mirror of
https://github.com/zellyn/goapple2.git
synced 2025-01-07 01:29:25 +00:00
add misc code at f699
This commit is contained in:
parent
0d7d92c281
commit
2f2fdcbccd
32
source/redbook/misc-f699.asm
Normal file
32
source/redbook/misc-f699.asm
Normal file
@ -0,0 +1,32 @@
|
|||||||
|
* 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
|
Loading…
Reference in New Issue
Block a user