izaya
/
collapseos
mirror of https://github.com/hsoft/collapseos.git
1
0
Fork 0
Code Issues Releases Wiki Activity
collapseos/blk/814

6 lines
130 B
Plaintext
Raw Normal View History

pcat: implement execute and nativeWord
2020-06-15 05:27:26 +10:00
L1 BSET PC 3 - ORG @ 0x34 + ! ( execute -- BX -> wordref )
AH AH XORrr,
AL [BX] MOVr[],
BX INCx, ( PFA )
pcat: read LATEST and jump to it
2020-06-15 04:51:32 +10:00
AX JMPr,