git.sur5r.net Git - cc65/blob - libsrc/conio/scrsize.s

   1 ;
   2 ; Ullrich von Bassewitz, 08.08.1998
   3 ;
   4 ; void screensize (unsigned char* x, unsigned char* y);
   5 ;
   6
   7         .export         _screensize
   8         .export         xsize, ysize
   9
  10         .import         popax
  11         .importzp       ptr1, ptr2
  12
  13 .proc   _screensize
  14
  15         sta     ptr1            ; Store the y pointer
  16         stx     ptr1+1
  17
  18         jsr     popax           ; get the x pointer
  19         sta     ptr2
  20         stx     ptr2+1
  21
  22         ldy     #0
  23         lda     xsize
  24         sta     (ptr2),y
  25         lda     ysize
  26         sta     (ptr1),y
  27         rts
  28
  29 .endproc
  30
  31
  32 .bss
  33
  34 xsize:  .res    1
  35 ysize:  .res    1
  36
  37
  38