git.sur5r.net Git - cc65/blob - libsrc/apple2/wherey.s

   1 ;
   2 ; Kevin Ruland
   3 ;
   4 ; unsigned char wherey (void);
   5 ;
   6
   7         .export         _wherey
   8
   9         .include        "apple2.inc"
  10
  11 _wherey:
  12         lda     CV
  13         sec
  14         sbc     WNDTOP
  15         ldx     #$00
  16         rts