X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;ds=sidebyside;f=libsrc%2Fcbm610%2Fcputc.s;h=ae8bfb16fea608c1acf57d8d43cb9d83d6551b4e;hb=3b69c2fd21a0da8f9a06112c765d009a287cd765;hp=9454b138a8bc8dd487f488c549d477a48398a8ef;hpb=e906d07cc1c0d4ed97157828eeab61d24fc95235;p=cc65

diff --git a/libsrc/cbm610/cputc.s b/libsrc/cbm610/cputc.s
index 9454b138a..ae8bfb16f 100644
--- a/libsrc/cbm610/cputc.s
+++ b/libsrc/cbm610/cputc.s
@@ -8,13 +8,13 @@
     	.export	     	_cputcxy, _cputc, cputdirect, putchar
 	.export	     	newline, plot
 	.exportzp	CURS_X, CURS_Y
+
+        .import         PLOT
 	.import		_gotoxy
 	.import	     	popa
-	.import	     	xsize, revers
 
 	.include     	"cbm610.inc"
-	.include	"zeropage.inc"
-	.include     	"../cbm/cbm.inc"
+
 
 _cputcxy:
 	pha	     		; Save C
@@ -52,7 +52,7 @@ cputdirect:
 
 advance:
         iny
-        cpy     xsize
+        cpy     #XSIZE
         bne     L3
         jsr     newline         ; new line
         ldy     #0              ; + cr
@@ -61,7 +61,7 @@ L3:     sty     CURS_X
 
 newline:
    	clc
-   	lda	xsize
+   	lda	#XSIZE
    	adc	CharPtr
    	sta     CharPtr
    	bcc	L4
@@ -71,7 +71,7 @@ L4:	inc	CURS_Y
 
 ; Handle character if high bit set
 
-L10:	and	#$7F	 
+L10:	and	#$7F
        	cmp    	#$7E 	       	; PI?
 	bne	L11
 	lda	#$5E 	       	; Load screen code for PI
@@ -93,7 +93,7 @@ putchar:
 	ldx	IndReg
 	ldy	#$0F
 	sty	IndReg
-    	ora	revers	    	; Set revers bit
+    	ora	RVS		; Set revers bit
        	ldy    	CURS_X
 	sta	(CharPtr),y 	; Set char
 	stx	IndReg