collapseos/blk/312

mirror of https://github.com/hsoft/collapseos.git synced 2024-11-27 20:28:06 +11:00
( a b -- )
CODE 2DROP
    HL POPqq,
    HL POPqq,
;CODE

( a b -- a b a b )
CODE 2DUP
    HL POPqq, ( b ) DE POPqq, ( a )
    chkPS,
    DE PUSHqq, HL PUSHqq,
    DE PUSHqq, HL PUSHqq,
;CODE
Copy boot.z80 to blkfs 2020-04-23 11:19:12 +10:00			`( a b -- )`
			`CODE 2DROP`
			`HL POPqq,`
			`HL POPqq,`
			`;CODE`

ti84: kbd driver wip 2020-05-10 01:55:58 +10:00			`( a b -- a b a b )`
			`CODE 2DUP`
			`HL POPqq, ( b ) DE POPqq, ( a )`
			`chkPS,`
			`DE PUSHqq, HL PUSHqq,`
			`DE PUSHqq, HL PUSHqq,`
			`;CODE`
Copy boot.z80 to blkfs 2020-04-23 11:19:12 +10:00