AppleIIAsm-Collection/source/diskX_minidisk_A/T.MIN.SUB.DPRINT
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

23 lines
367 B
Plaintext

DPRINT
PLA
STA RETADR
PLA
STA RETADR+1
PLA
STA ADDR1
PLA
STA ADDR1+1
LDY #$00
:LOOP
LDA (ADDR1),Y
BEQ :EXIT
JSR COUT1
INY
BNE :LOOP
:EXIT
LDA RETADR+1
PHA
LDA RETADR
PHA
RTS