mirror of
https://github.com/nathanriggs/AppleIIAsm-Collection.git
synced 2025-02-19 21:30:37 +00:00
73 lines
1.3 KiB
Plaintext
73 lines
1.3 KiB
Plaintext
|
*
|
||
|
|
ZMLOAD
|
||
|
|
*
|
||
|
|
PLA
|
||
|
|
STA :RETADR
|
||
|
|
PLA
|
||
|
|
STA :RETADR+1
|
||
|
|
PLA
|
||
|
|
STA ADDR1
|
||
|
|
PLA
|
||
|
|
STA ADDR1+1
|
||
|
|
LDY #2
|
||
|
|
LDA (ADDR1),Y
|
||
|
|
STA $08
|
||
|
|
INY
|
||
|
|
LDA (ADDR1),Y
|
||
|
|
STA $09
|
||
|
|
INY
|
||
|
|
LDA (ADDR1),Y
|
||
|
|
STA $19
|
||
|
|
INY
|
||
|
|
LDA (ADDR1),Y
|
||
|
|
STA $1E
|
||
|
|
INY
|
||
|
|
LDA (ADDR1),Y
|
||
|
|
STA $E3
|
||
|
|
INY
|
||
|
|
LDA (ADDR1),Y
|
||
|
|
STA $EB
|
||
|
|
INY
|
||
|
|
LDA (ADDR1),Y
|
||
|
|
STA $EC
|
||
|
|
INY
|
||
|
|
LDA (ADDR1),Y
|
||
|
|
STA $ED
|
||
|
|
INY
|
||
|
|
LDA (ADDR1),Y
|
||
|
|
STA $EE
|
||
|
|
INY
|
||
|
|
LDA (ADDR1),Y
|
||
|
|
STA $EF
|
||
|
|
INY
|
||
|
|
LDA (ADDR1),Y
|
||
|
|
STA $FA
|
||
|
|
INY
|
||
|
|
LDA (ADDR1),Y
|
||
|
|
STA $FB
|
||
|
|
INY
|
||
|
|
LDA (ADDR1),Y
|
||
|
|
STA $FC
|
||
|
|
INY
|
||
|
|
LDA (ADDR1),Y
|
||
|
|
STA $FD
|
||
|
|
INY
|
||
|
|
LDA (ADDR1),Y
|
||
|
|
STA $FE
|
||
|
|
INY
|
||
|
|
LDA (ADDR1),Y
|
||
|
|
STA $FF
|
||
|
|
LDY #0
|
||
|
|
LDA (ADDR1),Y
|
||
|
|
TAX
|
||
|
|
LDA (ADDR1+1),Y
|
||
|
|
TAY
|
||
|
|
STX ADDR1
|
||
|
|
STY ADDR1+1
|
||
|
|
LDA :RETADR+1
|
||
|
|
PHA
|
||
|
|
LDA :RETADR
|
||
|
|
PHA
|
||
|
|
RTS
|
||
|
|
:RETADR DS 2
|