AppleIIAsm-Collection/source/diskX_minidisk_A/T.MIN.SUB.FPRINT
nathanriggs c8cac53c5e Rev 0.4 updates
Massive updates that changes the way most subroutines are handled. Major bugfixes, various utilities added, started higher-level libraries.
2019-04-26 18:49:10 -04:00

24 lines
394 B
Plaintext

FPRINT
PLA
STA RETADR
PLA
STA RETADR+1
LDY #$01
:LP
LDA (RETADR),Y
BEQ :DONE
JSR FCOUT
INY
BNE :LP
:DONE
CLC
TYA
ADC RETADR
STA RETADR
LDA RETADR+1
ADC #$00
PHA
LDA RETADR
PHA
RTS