1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-12-29 13:08:05 +11:00
collapseos/blk/240
2020-08-15 08:11:48 -04:00

12 lines
189 B
Plaintext

( i -- )
: OP3i
CREATE C,
DOES>
C@ A,
A,,
;
0xcd OP3i CALL,
0xc3 OP3i JP,
0x22 OP3i LD(i)HL, 0x2a OP3i LDHL(i),
0x32 OP3i LD(i)A, 0x3a OP3i LDA(i),