.include "atari5200.inc"
- .export _gotoxy
+ .export gotoxy, _gotoxy
.import popa
.import setcursor
+gotoxy:
+ jsr popa ; Get Y
+
_gotoxy: ; Set the cursor position
sta ROWCRS_5200 ; Set Y
jsr popa ; Get X
sta COLCRS_5200 ; Set X
- lda #0
- sta COLCRS_5200+1 ;
jmp setcursor