mirror of
https://github.com/nathanriggs/AppleIIAsm-Collection.git
synced 2025-02-19 21:30:37 +00:00
70 lines
1.6 KiB
NASM
70 lines
1.6 KiB
NASM
|
*``````````````````````````````*
|
||
|
* Z80 MACRO ALIASES *
|
||
|
* *
|
||
|
* CALL : JSR EQUIVALENT *
|
||
|
* CPL : INVERTS BITS IN .A *
|
||
|
* JP : JMP EQUIVALENT *
|
||
|
* LD : MOV VAL FROM SRC,DEST *
|
||
|
* POP : PULL TOP FROM STACK *
|
||
|
* RET : RTS EQUIVALENT *
|
||
|
* SCF : SET CARRY FLAG *
|
||
|
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
|
||
|
*
|
||
|
*``````````````````````````````*
|
||
|
* JSR EQUIVALENT *
|
||
|
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
|
||
|
*
|
||
|
CALL MAC
|
||
|
JSR ]1 ; ++<3B6C>
|
||
|
<<<
|
||
|
*
|
||
|
*``````````````````````````````*
|
||
|
* INVERT .A BITS *
|
||
|
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
|
||
|
*
|
||
|
CPL MAC
|
||
|
EOR $FF ; ++<2B2C>
|
||
|
<<<
|
||
|
*
|
||
|
*``````````````````````````````*
|
||
|
* JUMP EQUIVALENT *
|
||
|
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
|
||
|
*
|
||
|
JP MAC
|
||
|
JMP ]1 ; <1B5C>
|
||
|
<<<
|
||
|
*
|
||
|
*``````````````````````````````*
|
||
|
* LOAD FROM SOURCE TO DEST *
|
||
|
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
|
||
|
*
|
||
|
LD MAC ; NOT YET
|
||
|
; FUNCTIONAL UNTIL MOV
|
||
|
; MACRO IS DONE
|
||
|
<<<
|
||
|
*
|
||
|
*``````````````````````````````*
|
||
|
* PULL EQUIVALENT *
|
||
|
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
|
||
|
*
|
||
|
POP MAC
|
||
|
PLA ; ++<1B4C>
|
||
|
<<<
|
||
|
*
|
||
|
*``````````````````````````````*
|
||
|
* RTS EQUIVALENT *
|
||
|
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
|
||
|
*
|
||
|
RET MAC
|
||
|
RTS ; ++<1B6C>
|
||
|
<<<
|
||
|
*
|
||
|
*``````````````````````````````*
|
||
|
* SET CARRY FLAG *
|
||
|
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
|
||
|
*
|
||
|
SCF MAC
|
||
|
SEC ; ++<1B2C>
|
||
|
<<<
|
||
|
*
|