collapseos/blk/495

mirror of https://github.com/hsoft/collapseos.git
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-02 04:38:31 +10:00			`CODE @RDSEC ( drv cylsec addr -- f )`
recipes/trs80: making progress on floppy drivers 2020-05-01 06:10:35 +10:00			`HL POPqq,`
			`DE POPqq,`
			`BC POPqq,`
			`chkPS,`
			`A 0x31 LDrn, ( @RDSEC )`
			`0x28 RSTn,`
			`PUSHZ,`
			`;CODE`