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