mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-27 11:38:07 +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.
15 lines
351 B
Plaintext
15 lines
351 B
Plaintext
: OP1d
|
|
CREATE C,
|
|
DOES>
|
|
C@ ( d op )
|
|
SWAP ( op d )
|
|
<<4 ( op d<<4 )
|
|
OR A,
|
|
;
|
|
0xc5 OP1d PUSH, 0xc1 OP1d POP,
|
|
0x03 OP1d INCd, 0x0b OP1d DECd,
|
|
0x09 OP1d ADDHLd,
|
|
|
|
: ADDIXd, 0xdd A, ADDHLd, ; : ADDIXIX, HL ADDIXd, ;
|
|
: ADDIYd, 0xfd A, ADDHLd, ; : ADDIYIY, HL ADDIYd, ;
|