mirror of
https://github.com/zellyn/goapple2.git
synced 2024-12-21 13:29:41 +00:00
33 lines
488 B
NASM
33 lines
488 B
NASM
|
* MISCELLANEOUS ROUTINES AT $F699
|
||
|
|
* IN THE APPLE II INTEGER BASIC ROM
|
||
|
|
ORG $F669
|
||
|
|
* ADDRESSES
|
||
|
|
ASAVE EQU $56
|
||
|
|
XSAVE EQU $57
|
||
|
|
YSAVE EQU $58
|
||
|
|
PSAVE EQU $59
|
||
|
|
STACK EQU $100
|
||
|
|
*
|
||
|
|
SAVE STY YSAVE
|
||
|
|
STX XSAVE
|
||
|
|
STA ASAVE
|
||
|
|
PHP
|
||
|
|
PLA
|
||
|
|
STA PSAVE
|
||
|
|
TSX
|
||
|
|
INX
|
||
|
|
INX
|
||
|
|
LDA $0100,X
|
||
|
|
ASL
|
||
|
|
ASL
|
||
|
|
ASL
|
||
|
|
ASL
|
||
|
|
RTS
|
||
|
|
RESTORE LDY YSAVE
|
||
|
|
LDX XSAVE
|
||
|
|
LDA PSAVE
|
||
|
|
PHA
|
||
|
|
LDA ASAVE
|
||
|
|
PLP
|
||
|
|
RTS
|