diff --git a/libsrc/atari/cputc.s b/libsrc/atari/cputc.s index 95bc7756c..088e2bbf1 100644 --- a/libsrc/atari/cputc.s +++ b/libsrc/atari/cputc.s @@ -20,6 +20,7 @@ _cputcxy: .ifdef DIRECT_SCREEN .importzp tmp4,ptr4 + .import _revflag _cputc: cmp #$0D ; CR @@ -92,7 +93,7 @@ L3: clc adc SAVMSC+1 sta ptr4+1 pla ; get char again - ora INVFLG + ora _revflag ldy COLCRS sta (ptr4),y rts diff --git a/libsrc/atari/revers.s b/libsrc/atari/revers.s index ee59e7129..620e94139 100644 --- a/libsrc/atari/revers.s +++ b/libsrc/atari/revers.s @@ -6,6 +6,7 @@ .include "atari.inc" .export _revers + .export _revflag _revers: ldx #$00 ; Assume revers off @@ -13,11 +14,15 @@ _revers: beq L1 ; Jump if off ldx #$80 ; Load on value L1: ldy #$00 ; Assume old value is zero - lda INVFLG ; Load old value - stx INVFLG ; Set new value + lda _revflag ; Load old value + stx _revflag ; Set new value beq L2 ; Jump if old value zero iny ; Make old value = 1 L2: ldx #$00 ; Load high byte of result tya ; Load low byte, set CC rts + .data + +_revflag: + .byte 0