git.sur5r.net Git - cc65/blob - libsrc/geos-common/conio/where.s

   1 ;
   2 ; Maciej 'YTM/Elysium' Witkowiak
   3 ;
   4 ; 27.10.2001
   5 ; 06.03.2002
   6 ; 02.01.2003
   7
   8 ; unsigned char wherex (void);
   9 ; unsigned char wherey (void);
  10
  11             .export _wherex, _wherey
  12             .importzp cursor_c, cursor_r
  13
  14 _wherex:
  15         lda cursor_c
  16         ldx #0
  17         rts
  18
  19 _wherey:
  20         lda cursor_r
  21         ldx #0
  22         rts