collapseos/blk/305

12 lines
207 B
Plaintext
Raw Normal View History

2020-07-05 13:41:12 -04:00
( Native words )
CODE EXECUTE
DE POP,
chkPS,
JR, lblexec BWR ( execute-B301 )
CODE EXIT
PC ORG @ 0x0d + ! ( stable ABI JP )
2020-07-05 13:44:38 -04:00
lblpopRS @ CALL,
2020-07-05 13:41:12 -04:00
HL PUSH, IY POP, ( --> IP )
JPNEXT,