mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-27 12:58:09 +11:00
440ea43a88
Initially, I used the same letters as those used in the z80 ref docs, but it makes the different assemblers harder to use than they should. Having consistent "argtype" rules across assemblers should help.
12 lines
128 B
Plaintext
12 lines
128 B
Plaintext
( n -- )
|
|
: OP3n
|
|
CREATE C,
|
|
DOES>
|
|
C@ A,
|
|
A,,
|
|
;
|
|
0xcd OP3n CALL,
|
|
0xc3 OP3n JP,
|
|
0x22 OP3n LD(n)HL,
|
|
0x2a OP3n LDHL(n),
|