conio/gotox.s


1
2
3
4
5
6
7
8
9
10
11
12
13
14

;
; Christian Groessler, 19-Feb-2000
;
; void gotox (unsigned char x);
;

        .include        "atari.inc"
        .export         _gotox

_gotox:
        sta     COLCRS          ; Set X
        lda     #0
        sta     COLCRS+1
        rts