git.sur5r.net Git - cc65/blob - libsrc/atari/where.s

   1 ;
   2 ; Ullrich von Bassewitz, 06.08.1998
   3 ;
   4 ; unsigned char wherex (void);
   5 ; unsigned char wherey (void);
   6
   7         .export         _wherex, _wherey
   8         .import         plot
   9
  10         .include        "atari.inc"
  11
  12 _wherex:
  13         sec
  14         jsr     plot            ; Get cursor position
  15         tya
  16         rts
  17
  18 _wherey:
  19         sec
  20         jsr     plot            ; Get cursor position
  21         txa
  22         rts
  23
  24
  25
  26
  27