diff --git a/libsrc/apple2/Makefile b/libsrc/apple2/Makefile
index 81ac2c989..ee4e992a8 100644
--- a/libsrc/apple2/Makefile
+++ b/libsrc/apple2/Makefile
@@ -47,7 +47,8 @@ OBJS=	_scrsize.o	\
 	revers.o	\
         systime.o       \
         sysuname.o      \
-	where.o		\
+	wherex.o       	\
+       	wherey.o	\
 	write.o
 
 #--------------------------------------------------------------------------
diff --git a/libsrc/apple2/wherex.s b/libsrc/apple2/wherex.s
new file mode 100644
index 000000000..a7ceb22d8
--- /dev/null
+++ b/libsrc/apple2/wherex.s
@@ -0,0 +1,17 @@
+
+	;; Keivn Ruland
+	;;
+	;; unsigned char wherex( void );
+
+	.export	       	_wherex
+
+	.include	"apple2.inc"
+
+.proc   _wherex
+
+	lda    	CH
+        ldx     #0
+	rts
+
+.endproc
+
diff --git a/libsrc/apple2/where.s b/libsrc/apple2/wherey.s
similarity index 50%
rename from libsrc/apple2/where.s
rename to libsrc/apple2/wherey.s
index b17c1f832..bd7342c86 100644
--- a/libsrc/apple2/where.s
+++ b/libsrc/apple2/wherey.s
@@ -1,18 +1,17 @@
 
 	;; Keivn Ruland
 	;;
-	;; unsigned char wherex( void );
 	;; unsigned char wherey( void );
 
-	.export		_wherex, _wherey
+	.export	       	_wherey
 
 	.include	"apple2.inc"
 
-_wherex:
-	lda	CH
+.proc   _wherey
+
+	lda	CV
+        ldx     #0
 	rts
 
-_wherey:
-	lda	CV
-	rts
-	
\ No newline at end of file
+.endproc
+