; UPLINE = ?, KEY_UPARROW = GOTOY, ...
.export _cputcxy, _cputc
- .import _gotoxy, fixcursor
- .import popa
+ .import gotoxy, fixcursor
.import xsize,ysize
.importzp cursor_x, cursor_y, cursor_c, cursor_r
_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
; Plot a character - also used as internal function