git.sur5r.net Git - cc65/blob - libsrc/cbm510/ksettim.s

   1 ;
   2 ; Ullrich von Bassewitz, 2003-12-19
   3 ;
   4 ; SETTIM kernal call
   5 ;
   6
   7         .export         SETTIM
   8         .import         time : zeropage
   9
  10
  11 .proc   SETTIM
  12
  13         sei
  14         sta     time+0
  15         stx     time+1
  16         sty     time+2
  17         cli
  18         rts
  19
  20 .endproc
  21