git.sur5r.net Git - cc65/blob - libsrc/plus4/kreadst.s

   1 ;
   2 ; Ullrich von Bassewitz, 22.11.2002
   3 ;
   4 ; READST replacement function
   5 ;
   6
   7         .export         READST
   8
   9         .include        "plus4.inc"
  10         .importzp       ST
  11
  12 ; Read the status byte from the zero page instead of banking in the ROM
  13
  14 .proc   READST
  15         lda     ST                      ; Load status
  16         rts                             ; Return to caller
  17 .endproc
  18
  19