collapseos/blk/310

16 lines
264 B
Plaintext
Raw Normal View History

2020-04-22 21:19:12 -04:00
CODE PICK
HL POP,
2020-04-22 21:19:12 -04:00
( x2 )
L SLA, H RL,
SP ADDHLd,
2020-04-22 21:19:12 -04:00
C (HL) LDrr,
HL INCd,
2020-04-22 21:19:12 -04:00
B (HL) LDrr,
( check PS range before returning )
EXDEHL,
HL PS_ADDR LDdn,
DE SUBHLd,
CC lblofl @ JPc, ( abortUnderflow-B298 )
BC PUSH,
2020-04-22 21:19:12 -04:00
;CODE