1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-06 02:20:58 +11:00
collapseos/blk/305
2020-07-05 13:41:12 -04:00

12 lines
217 B
Plaintext

( Native words )
CODE EXECUTE
DE POP,
chkPS,
JR, lblexec BWR ( execute-B301 )
CODE EXIT
PC ORG @ 0x0d + ! ( stable ABI JP )
0x14 BCALL, ( popRS )
HL PUSH, IY POP, ( --> IP )
JPNEXT,