.export _cputcxy, _cputc
.export plot, cputdirect, putchar
- .import popa, _gotoxy, mul20
+ .import gotoxy, _mul20
.importzp ptr4
.import setcursor
_cputcxy:
pha ; Save C
- jsr popa ; Get Y
- jsr _gotoxy ; Set cursor, drop x
+ jsr gotoxy ; Set cursor, drop x and y
pla ; Restore C
_cputc:
pha ; save char
lda ROWCRS_5200
- jsr mul20 ; destroys tmp4
- clc
+ jsr _mul20 ; destroys tmp4, carry is cleared
adc SAVMSC ; add start of screen memory
sta ptr4
txa