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

   1 ;
   2 ; Ullrich von Bassewitz, 22.11.2002
   3 ;
   4 ; SETTIM replacement function
   5 ;
   6
   7         .export         SETTIM
   8
   9         .include        "plus4.inc"
  10
  11 ; Set the clock by writing directly to zero page to avoid banking in the ROM
  12
  13 .proc   SETTIM
  14         sei                             ; No interrupts
  15         sta     TIME+2
  16         stx     TIME+1
  17         sty     TIME                    ; Set the time
  18         cli                             ; Allow interrupts
  19         rts                             ; Return to caller
  20 .endproc
  21
  22