collapseos/blk/495

CODE @RDSEC ( drv cylsec addr -- f )
    HL POPqq,
    DE POPqq,
    BC POPqq,
    chkPS,
    A 0x31 LDrn, ( @RDSEC )
    0x28 RSTn,
    PUSHZ,
;CODE
trs80: add CL< and CL> 2020-05-01 14:38:31 -04:00			`CODE @RDSEC ( drv cylsec addr -- f )`
recipes/trs80: making progress on floppy drivers 2020-04-30 16:10:35 -04:00			`HL POPqq,`
			`DE POPqq,`
			`BC POPqq,`
			`chkPS,`
			`A 0x31 LDrn, ( @RDSEC )`
			`0x28 RSTn,`
			`PUSHZ,`
			`;CODE`