mirror of
https://github.com/nathanriggs/AppleIIAsm-Collection.git
synced 2025-02-25 14:29:14 +00:00
32 lines
601 B
Plaintext
32 lines
601 B
Plaintext
ADDIT16
|
|
PLA
|
|
STA RETADR
|
|
PLA
|
|
STA RETADR+1
|
|
PLA
|
|
STA :ADD2
|
|
PLA
|
|
STA :ADD2+1
|
|
PLA
|
|
STA :ADD1
|
|
PLA
|
|
STA :ADD1+1
|
|
LDA :ADD1
|
|
CLC
|
|
ADC :ADD2
|
|
TAY ; LOW BYTE
|
|
STY RETURN
|
|
LDA :ADD1+1
|
|
ADC :ADD2+1
|
|
TAX ; HIGH BYTE
|
|
STX RETURN+1
|
|
LDA #2
|
|
STA RETLEN
|
|
LDA RETADR+1
|
|
PHA
|
|
LDA RETADR
|
|
PHA
|
|
RTS
|
|
:ADD1 DS 2
|
|
:ADD2 DS 2
|