collapseos/blk/242
2020-08-15 08:11:48 -04:00

15 lines
206 B
Plaintext

: LDd(i), ( d i -- )
0xed A,
SWAP <<4 0x4b OR A,
A,,
;
: LD(i)d, ( i d -- )
0xed A,
<<4 0x43 OR A,
A,,
;
: RST, 0xc7 OR A, ;
: JP(IX), IX DROP JP(HL), ;
: JP(IY), IY DROP JP(HL), ;