git.sur5r.net Git - cc65/blob - libsrc/vic20/kbrepeat.s

   1 ;
   2 ; unsigned char __fastcall__ kbrepeat (unsigned char mode);
   3 ;
   4
   5         .export _kbrepeat
   6
   7         .include        "vic20.inc"
   8
   9 _kbrepeat:
  10         ldx KBDREPEAT           ; get old value
  11         sta KBDREPEAT           ; store new value
  12         txa                     ; return old value
  13         ldx #0
  14         rts