recipes/trs80: still wip...

blk/162

@@ -6,7 +6,8 @@ CODE KEY
 ;CODE
 
 CODE EMIT
-    BC POPqq ( c == @DSP arg )
+    BC POPqq, ( c == @DSP arg )
     chkPS,
     A 0x02 LDrn, ( @DSP )
+    0x28 RSTn,
 ;CODE

blk/218

@@ -8,4 +8,3 @@
     OR A,
 ;
 0x04 OP1r INCr,                0x05 OP1r DECr,
-0xc7 OP1r RSTn,

blk/242

@@ -1,16 +1,14 @@
-( dd nn -- )
-: LDdd(nn),
+: LDdd(nn), ( dd nn -- )
     0xed A,
     SWAP <<4 0x4b OR A,
     A,,
 ;
-
-( nn dd -- )
-: LD(nn)dd,
+: LD(nn)dd, ( nn dd -- )
     0xed A,
     <<4 0x43 OR A,
     A,,
 ;
+: RSTn, 0xc7 OR A, ;
 
 : JP(IX), IX DROP JP(HL), ;
 : JP(IY), IY DROP JP(HL), ;