;
; Ullrich von Bassewitz, 2003-12-19
;
; SETTIM kernal call
;

        .export         SETTIM
        .import         time : zeropage


.proc   SETTIM

	sei
	sta  	time+0
   	stx  	time+1
	sty	time+2
	cli
	rts

.endproc

