From 63437207a1d709d9e91662e077e61304fd6329e3 Mon Sep 17 00:00:00 2001
From: cuz <cuz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Sat, 27 Dec 2003 15:51:11 +0000
Subject: [PATCH] Use direct access to the position variables, since gotoxy
 uses them also.

git-svn-id: svn://svn.cc65.org/cc65/trunk@2844 b7a2c559-68d2-44c3-8de9-860c34a00d81
---
 libsrc/cbm/wherex.s | 8 +++-----
 libsrc/cbm/wherey.s | 6 ++----
 2 files changed, 5 insertions(+), 9 deletions(-)

diff --git a/libsrc/cbm/wherex.s b/libsrc/cbm/wherex.s
index c7076ad84..b8f5e16d4 100644
--- a/libsrc/cbm/wherex.s
+++ b/libsrc/cbm/wherex.s
@@ -5,14 +5,12 @@
 ;
 
   	.export		_wherex
-        .import         PLOT
+        .import         CURS_X: zp
 
 
 .proc   _wherex
-  	sec
-  	jsr	PLOT		; Get cursor position
-  	tya
+        lda     CURS_X
         ldx     #$00
   	rts
 .endproc
-        
+
diff --git a/libsrc/cbm/wherey.s b/libsrc/cbm/wherey.s
index 869be4baf..53c5b4f6d 100644
--- a/libsrc/cbm/wherey.s
+++ b/libsrc/cbm/wherey.s
@@ -5,13 +5,11 @@
 ;
 
  	.export		_wherey
-        .import         PLOT
+        .import         CURS_Y: zp
 
 
 .proc   _wherey
-	sec
-	jsr	PLOT		; Get cursor position
-	txa
+        lda     CURS_Y
         ldx     #$00
 	rts
 .endproc
-- 
2.39.5