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

   1
   2         .export _kbrepeat, _kbrepeatdelay, _kbrepeatrate
   3
   4         .include        "c128.inc"
   5
   6 _kbrepeat:
   7         ldx KBDREPEAT           ; get old value
   8         sta KBDREPEAT           ; store new value
   9         txa                     ; return old value
  10         rts
  11
  12 _kbrepeatdelay:
  13         ldx KBDREPEATDELAY      ; get old value
  14         sta KBDREPEATDELAY      ; store new value
  15         txa                     ; return old value
  16         rts
  17
  18 _kbrepeatrate:
  19         ldx KBDREPEATRATE       ; get old value
  20         sta KBDREPEATRATE       ; store new value
  21         txa                     ; return old value
  22         rts