mirror of
https://github.com/cc65/cc65.git
synced 2024-11-18 15:05:14 +00:00
23 lines
506 B
ArmAsm
23 lines
506 B
ArmAsm
|
;
|
||
|
|
; Ullrich von Bassewitz, 22.11.2002
|
||
|
|
;
|
||
|
|
; RDTIM replacement function
|
||
|
|
;
|
||
|
|
|
||
|
|
.export RDTIM
|
||
|
|
|
||
|
|
.include "plus4.inc"
|
||
|
|
|
||
|
|
; Read the clock from the zero page to avoid banking in the ROM
|
||
|
|
|
||
|
|
.proc RDTIM
|
||
|
|
sei ; No interrupts
|
||
|
|
lda TIME+2
|
||
|
|
ldx TIME+1
|
||
|
|
ldy TIME ; Read the time
|
||
|
|
cli ; Allow interrupts
|
||
|
|
rts ; Return to caller
|
||
|
|
.endproc
|
||
|
|
|
||
|
|
|