diff options
Diffstat (limited to 'conio/gotoxy.s')
| -rw-r--r-- | conio/gotoxy.s | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/conio/gotoxy.s b/conio/gotoxy.s new file mode 100644 index 0000000..ca91b07 --- /dev/null +++ b/conio/gotoxy.s @@ -0,0 +1,18 @@ +; +; Ullrich von Bassewitz, 06.08.1998 +; +; void gotoxy (unsigned char x, unsigned char y); +; + + .include "atari.inc" + + .export _gotoxy + .import popa + +_gotoxy: ; Set the cursor position + sta ROWCRS ; Set Y + jsr popa ; Get X + sta COLCRS ; Set X + lda #0 + sta COLCRS+1 ; + rts |