mirror of
https://github.com/cc65/cc65.git
synced 2024-08-19 02:29:33 +00:00
41 lines
1.1 KiB
ArmAsm
41 lines
1.1 KiB
ArmAsm
|
;
|
||
|
; 2019-12-27, Greg King
|
||
|
;
|
||
|
; Common stuff for the clock routines
|
||
|
;
|
||
|
|
||
|
.export TM, load_jiffy
|
||
|
|
||
|
.importzp sreg
|
||
|
|
||
|
|
||
|
;----------------------------------------------------------------------------
|
||
|
; Load .EAX with the approximate number of nanoseconds
|
||
|
; in one jiffy (1/60th of a second).
|
||
|
|
||
|
.proc load_jiffy
|
||
|
|
||
|
lda #<(17 * 1000 * 1000 / $10000)
|
||
|
ldx #>(17 * 1000 * 1000 / $10000)
|
||
|
sta sreg
|
||
|
stx sreg+1
|
||
|
lda #<(17 * 1000 * 1000)
|
||
|
ldx #>(17 * 1000 * 1000)
|
||
|
rts
|
||
|
|
||
|
.endproc
|
||
|
|
||
|
;----------------------------------------------------------------------------
|
||
|
; TM struct with "is daylight-saving time" set to "unknown"
|
||
|
.data
|
||
|
|
||
|
TM: .word 0 ; tm_sec
|
||
|
.word 0 ; tm_min
|
||
|
.word 0 ; tm_hour
|
||
|
.word 0 ; tm_mday
|
||
|
.word 0 ; tm_mon
|
||
|
.word 0 ; tm_year
|
||
|
.word 0 ; tm_wday
|
||
|
.word 0 ; tm_yday
|
||
|
.word .loword(-1) ; tm_isdst
|