collapseos/blk/326

CODE >R
    HL POPqq, chkPS,
    17 BCALL, ( 17 == pushRS )
;CODE
CODE 2>R
    DE POPqq, HL POPqq, chkPS,
    17 BCALL, ( 17 == pushRS ) EXDEHL, 17 BCALL,
;CODE
CODE R>
    20 BCALL, ( 20 == popRS )
    HL PUSHqq,
;CODE
CODE 2R>
    20 BCALL, ( 20 == popRS ) EXDEHL, 20 BCALL,
    HL PUSHqq, DE PUSHqq,
;CODE
Copy boot.z80 to blkfs 2020-04-23 11:19:12 +10:00			`CODE >R`
Add 2>R and 2R> This allows us to make DO..LOOP more compact. 2020-05-06 23:49:37 +10:00			`HL POPqq, chkPS,`
			`17 BCALL, ( 17 == pushRS )`
			`;CODE`
			`CODE 2>R`
			`DE POPqq, HL POPqq, chkPS,`
			`17 BCALL, ( 17 == pushRS ) EXDEHL, 17 BCALL,`
Copy boot.z80 to blkfs 2020-04-23 11:19:12 +10:00			`;CODE`
			`CODE R>`
Add 2>R and 2R> This allows us to make DO..LOOP more compact. 2020-05-06 23:49:37 +10:00			`20 BCALL, ( 20 == popRS )`
Copy boot.z80 to blkfs 2020-04-23 11:19:12 +10:00			`HL PUSHqq,`
			`;CODE`
Add 2>R and 2R> This allows us to make DO..LOOP more compact. 2020-05-06 23:49:37 +10:00			`CODE 2R>`
			`20 BCALL, ( 20 == popRS ) EXDEHL, 20 BCALL,`
			`HL PUSHqq, DE PUSHqq,`
			`;CODE`
Copy boot.z80 to blkfs 2020-04-23 11:19:12 +10:00