the10thwiz/cc65
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

add gotox, gotoy, and gotoxy

Browse Source
This commit is contained in:
Christian Groessler
2014-03-13 02:38:35 +01:00
parent 84c655a907
commit 30b418c734
4 changed files with 73 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
libsrc/atari5200/gotox.s Normal file
View File

@@ -0,0 +1,15 @@
;
; Christian Groessler, 13-Mar-2014
;
; void gotox (unsigned char x);
;
.include "atari5200.inc"
.export _gotox
.import setcursor
_gotox:
sta COLCRS_5200 ; Set X
lda #0
sta COLCRS_5200+1
jmp setcursor

19
libsrc/atari5200/gotoxy.s Normal file
View File

@@ -0,0 +1,19 @@
;
; Christian Groessler, 13-Mar-2014
;
; void gotoxy (unsigned char x, unsigned char y);
;
.include "atari5200.inc"
.export _gotoxy
.import popa
.import setcursor
_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

13
libsrc/atari5200/gotoy.s Normal file
View File

@@ -0,0 +1,13 @@
;
; Christian Groessler, 13-Mar-2014
;
; void gotoy (unsigned char y);
;
.include "atari5200.inc"
.export _gotoy
.import setcursor
_gotoy:
sta ROWCRS_5200 ; Set Y
jmp setcursor