mirror of
https://github.com/nathanriggs/AppleIIAsm-Collection.git
synced 2024-12-05 01:50:59 +00:00
74 lines
1.3 KiB
Plaintext
74 lines
1.3 KiB
Plaintext
|
*
|
||
|
ZMSAVE
|
||
|
*
|
||
|
LDX ADDR1
|
||
|
LDY ADDR1+1
|
||
|
PLA
|
||
|
STA :RETADR
|
||
|
PLA
|
||
|
STA :RETADR+1
|
||
|
PLA
|
||
|
STA ADDR1
|
||
|
PLA
|
||
|
STA ADDR1+1
|
||
|
TYA
|
||
|
LDY #1
|
||
|
STA (ADDR1),Y
|
||
|
LDY #0
|
||
|
TXA
|
||
|
STA (ADDR1),Y
|
||
|
LDY #2
|
||
|
LDA $08
|
||
|
STA (ADDR1),Y
|
||
|
INY
|
||
|
LDA $09
|
||
|
STA (ADDR1),Y
|
||
|
INY
|
||
|
LDA $19
|
||
|
STA (ADDR1),Y
|
||
|
INY
|
||
|
LDA $1E
|
||
|
STA (ADDR1),Y
|
||
|
INY
|
||
|
LDA $E3
|
||
|
STA (ADDR1),Y
|
||
|
INY
|
||
|
LDA $EB
|
||
|
STA (ADDR1),Y
|
||
|
INY
|
||
|
LDA $EC
|
||
|
STA (ADDR1),Y
|
||
|
INY
|
||
|
LDA $ED
|
||
|
STA (ADDR1),Y
|
||
|
INY
|
||
|
LDA $EE
|
||
|
STA (ADDR1),Y
|
||
|
INY
|
||
|
LDA $EF
|
||
|
STA (ADDR1),Y
|
||
|
INY
|
||
|
LDA $FA
|
||
|
STA (ADDR1),Y
|
||
|
INY
|
||
|
LDA $FB
|
||
|
STA (ADDR1),Y
|
||
|
INY
|
||
|
LDA $FC
|
||
|
STA (ADDR1),Y
|
||
|
INY
|
||
|
LDA $FD
|
||
|
STA (ADDR1),Y
|
||
|
INY
|
||
|
LDA $FE
|
||
|
STA (ADDR1),Y
|
||
|
INY
|
||
|
LDA $FF
|
||
|
STA (ADDR1),Y
|
||
|
LDA :RETADR+1
|
||
|
PHA
|
||
|
LDA :RETADR
|
||
|
PHA
|
||
|
RTS
|
||
|
:RETADR DS 2
|