X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=libsrc%2Fc64%2Fcputc.s;h=d5ba79ed79b8cdf634b58dffdafecef7d590ccf8;hb=148a6569e55822a562380c56df0340bccc653749;hp=1efeaa7018970d2b245bd1a0e0cae6ecc4936e06;hpb=e906d07cc1c0d4ed97157828eeab61d24fc95235;p=cc65

diff --git a/libsrc/c64/cputc.s b/libsrc/c64/cputc.s
index 1efeaa701..d5ba79ed7 100644
--- a/libsrc/c64/cputc.s
+++ b/libsrc/c64/cputc.s
@@ -1,17 +1,17 @@
 ;
-; Ullrich von Bassewitz, 06.08.1998
+; Ullrich von Bassewitz, 1998-08-06, 2009-09-26
 ;
-; void cputcxy (unsigned char x, unsigned char y, char c);
-; void cputc (char c);
+; void __fastcall__ cputcxy (unsigned char x, unsigned char y, char c);
+; void __fastcall__ cputc (char c);
 ;
 
     	.export	       	_cputcxy, _cputc, cputdirect, putchar
 	.export		newline, plot
 	.import		popa, _gotoxy
-	.import		xsize, revers
+        .import         PLOT
 
 	.include	"c64.inc"
-	.include	"../cbm/cbm.inc"
+
 
 _cputcxy:
 	pha	    		; Save C
@@ -49,7 +49,7 @@ cputdirect:
 
 advance:
    	iny
-   	cpy	xsize
+   	cpy	#XSIZE
    	bne	L3
 	jsr	newline		; new line
    	ldy	#0    	  	; + cr
@@ -58,13 +58,13 @@ L3:	sty	CURS_X
 
 newline:
    	clc
-   	lda	xsize
+   	lda	#XSIZE
    	adc	SCREEN_PTR
    	sta	SCREEN_PTR
    	bcc	L4
    	inc	SCREEN_PTR+1
    	clc
-L4:	lda    	xsize
+L4:	lda    	#XSIZE
    	adc	CRAM_PTR
    	sta	CRAM_PTR
    	bcc	L5
@@ -84,12 +84,12 @@ L11:	ora	#$40
 
 
 
-; Set cursor position, calculate RAM pointers
+; Set cursor position, calculate RAM pointers.
 
 plot:	ldy	CURS_X
 	ldx	CURS_Y
 	clc
-	jmp	PLOT		; Set the new cursor
+       	jmp     PLOT		; Set the new cursor
 
 
 
@@ -97,7 +97,7 @@ plot:	ldy	CURS_X
 ; position in Y
 
 putchar:
-    	ora	revers	  	; Set revers bit
+    	ora	RVS             ; Set revers bit
        	ldy    	CURS_X
 	sta	(SCREEN_PTR),y	; Set char
 	lda	CHARCOLOR