mirror of
https://github.com/nathanriggs/AppleIIAsm-Collection.git
synced 2025-02-24 08:28:59 +00:00
c8cac53c5e
Massive updates that changes the way most subroutines are handled. Major bugfixes, various utilities added, started higher-level libraries.
34 lines
605 B
Plaintext
34 lines
605 B
Plaintext
DIVD8
|
|
PLA
|
|
STA RETADR
|
|
PLA
|
|
STA RETADR+1
|
|
PLA
|
|
STA :DVEND
|
|
PLA
|
|
STA :DVSOR
|
|
LDA #$00
|
|
LDY #8
|
|
ASL :DVSOR
|
|
:L1 ROL
|
|
CMP :DVEND
|
|
BCC :L2
|
|
SBC :DVEND
|
|
:L2 ROL :DVSOR
|
|
DEY
|
|
BNE :L1
|
|
STA :REM
|
|
LDA RETADR+1
|
|
PHA
|
|
LDA RETADR
|
|
PHA
|
|
LDY :REM
|
|
LDA #1
|
|
STA RETLEN
|
|
LDA :DVSOR
|
|
STA RETURN
|
|
RTS
|
|
:REM DS 1
|
|
:DVEND DS 1
|
|
:DVSOR DS 1
|