collapseos/recipes/trs80/blk/613

BEGIN,
    A 0xff LDri, (HL) A LDrr, ( default mask )
    L1 BSET ( loop2 ) @GET, @PUT,
    0x20 CPi, JRZ, L4 FWR ( escapechar )
	( not an escape char, just apply the mask and write )
    (HL) ANDr, (HL) A LDrr,
    HL INCd,
JR, AGAIN,
L4 FSET ( escapechar, adjust by setting (hl) to 0x7f )
7 (HL) RES, JR, L1 BWR ( loop2 )
L2 FSET ( maybeerror, was it an error? )
A ORr, JRZ, L1 BWR ( loop2, not an error )
L3 FSET ( error )
C A LDrr, ( error code from @GET/@PUT )
A 0x1a LDri, ( @ERROR ) 0x28 RST, RET,
recipes/trs80: move RECV program to blkfs 2020-05-06 12:15:56 +10:00			`BEGIN,`
z80a: make mnemonic names more uniform across assemblers Initially, I used the same letters as those used in the z80 ref docs, but it makes the different assemblers harder to use than they should. Having consistent "argtype" rules across assemblers should help. 2020-06-28 12:01:56 +10:00			`A 0xff LDri, (HL) A LDrr, ( default mask )`
recipes/trs80: move RECV program to blkfs 2020-05-06 12:15:56 +10:00			`L1 BSET ( loop2 ) @GET, @PUT,`
z80a: make mnemonic names more uniform across assemblers Initially, I used the same letters as those used in the z80 ref docs, but it makes the different assemblers harder to use than they should. Having consistent "argtype" rules across assemblers should help. 2020-06-28 12:01:56 +10:00			`0x20 CPi, JRZ, L4 FWR ( escapechar )`
recipes/trs80: move RECV program to blkfs 2020-05-06 12:15:56 +10:00			`( not an escape char, just apply the mask and write )`
			`(HL) ANDr, (HL) A LDrr,`
z80a: make mnemonic names more uniform across assemblers Initially, I used the same letters as those used in the z80 ref docs, but it makes the different assemblers harder to use than they should. Having consistent "argtype" rules across assemblers should help. 2020-06-28 12:01:56 +10:00			`HL INCd,`
recipes/trs80: move RECV program to blkfs 2020-05-06 12:15:56 +10:00			`JR, AGAIN,`
			`L4 FSET ( escapechar, adjust by setting (hl) to 0x7f )`
z80a: make mnemonic names more uniform across assemblers Initially, I used the same letters as those used in the z80 ref docs, but it makes the different assemblers harder to use than they should. Having consistent "argtype" rules across assemblers should help. 2020-06-28 12:01:56 +10:00			`7 (HL) RES, JR, L1 BWR ( loop2 )`
recipes/trs80: move RECV program to blkfs 2020-05-06 12:15:56 +10:00			`L2 FSET ( maybeerror, was it an error? )`
			`A ORr, JRZ, L1 BWR ( loop2, not an error )`
			`L3 FSET ( error )`
			`C A LDrr, ( error code from @GET/@PUT )`
z80a: make mnemonic names more uniform across assemblers Initially, I used the same letters as those used in the z80 ref docs, but it makes the different assemblers harder to use than they should. Having consistent "argtype" rules across assemblers should help. 2020-06-28 12:01:56 +10:00			`A 0x1a LDri, ( @ERROR ) 0x28 RST, RET,`