mirror of
https://github.com/nathanriggs/AppleIIAsm-Collection.git
synced 2025-03-02 00:29:29 +00:00
Massive updates that changes the way most subroutines are handled. Major bugfixes, various utilities added, started higher-level libraries.
41 lines
711 B
Plaintext
41 lines
711 B
Plaintext
COMP16
|
|
PLA
|
|
STA RETADR
|
|
PLA
|
|
STA RETADR+1
|
|
PLA
|
|
STA :SUBT
|
|
PLA
|
|
STA :SUBT+1
|
|
PLA
|
|
STA :MINU
|
|
PLA
|
|
STA :MINU+1
|
|
LDA RETADR+1
|
|
PHA
|
|
LDA RETADR
|
|
PHA
|
|
LDA :MINU
|
|
CMP :SUBT
|
|
BEQ :EQUAL
|
|
LDA :MINU+1
|
|
SBC :SUBT+1
|
|
ORA #1
|
|
|
|
BVS :OVFLOW
|
|
|
|
RTS
|
|
:EQUAL
|
|
LDA :MINU+1
|
|
SBC :SUBT+1
|
|
BVS :OVFLOW
|
|
RTS
|
|
:OVFLOW
|
|
EOR #$80
|
|
ORA #1
|
|
|
|
|
|
RTS
|
|
:MINU DS 2
|
|
:SUBT DS 2
|