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

   1 ;
   2 ; Ullrich von Bassewitz, 2003-12-19
   3 ;
   4 ; READST kernal call
   5 ;
   6
   7         .export         READST
   8
   9         .include        "cbm610.inc"
  10
  11
  12 .proc   READST
  13
  14         lda     ST                      ; Load status
  15         rts                             ; Return to caller
  16
  17 .endproc
  18
  19