git.sur5r.net Git - cc65/blob - libsrc/pce/gotoxy.s

   1 ;
   2 ; void gotoxy (unsigned char x, unsigned char y);
   3 ;
   4
   5                 .export _gotoxy
   6                 .import popa, plot
   7
   8                 .include "pce.inc"
   9
  10 _gotoxy:
  11                 sta     CURS_Y          ; Set Y
  12                 jsr     popa            ; Get X
  13                 sta     CURS_X          ; Set X
  14                 jmp     plot            ; Set the cursor position
  15
  16 ;-------------------------------------------------------------------------------
  17 ; force the init constructor to be imported
  18
  19                 .import initconio
  20 conio_init = initconio
  21