From 247c29f7a522cd32120df5e51e070c53e2703543 Mon Sep 17 00:00:00 2001
From: cpg <cpg@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Tue, 30 May 2000 22:20:01 +0000
Subject: [PATCH] don't use INVFLG but our own variable to indicate revers -
 the INVFLG is changed by the Atari key

git-svn-id: svn://svn.cc65.org/cc65/trunk@16 b7a2c559-68d2-44c3-8de9-860c34a00d81
---
 libsrc/atari/cputc.s  | 3 ++-
 libsrc/atari/revers.s | 9 +++++++--
 2 files changed, 9 insertions(+), 3 deletions(-)

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
-- 
2.39.5