mirror of
https://github.com/cc65/cc65.git
synced 2025-01-27 09:33:42 +00:00
Added kernal replacement routines for RDTIM and SETTIM.
git-svn-id: svn://svn.cc65.org/cc65/trunk@4882 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
parent
94f1a17a47
commit
e907b57e9c
@ -66,10 +66,12 @@ OBJS = _scrsize.o \
|
|||||||
kernal.o \
|
kernal.o \
|
||||||
kiobase.o \
|
kiobase.o \
|
||||||
kopen.o \
|
kopen.o \
|
||||||
|
krdtim.o \
|
||||||
kreadst.o \
|
kreadst.o \
|
||||||
kscnkey.o \
|
kscnkey.o \
|
||||||
kscreen.o \
|
kscreen.o \
|
||||||
ksetnam.o \
|
ksetnam.o \
|
||||||
|
ksettim.o \
|
||||||
kudtim.o \
|
kudtim.o \
|
||||||
mainargs.o \
|
mainargs.o \
|
||||||
peeksys.o \
|
peeksys.o \
|
||||||
|
21
libsrc/cbm510/krdtim.s
Normal file
21
libsrc/cbm510/krdtim.s
Normal file
@ -0,0 +1,21 @@
|
|||||||
|
;
|
||||||
|
; Ullrich von Bassewitz, 2003-12-19
|
||||||
|
;
|
||||||
|
; RDTIM kernal call
|
||||||
|
;
|
||||||
|
|
||||||
|
.export RDTIM
|
||||||
|
.import time : zeropage
|
||||||
|
|
||||||
|
|
||||||
|
.proc RDTIM
|
||||||
|
|
||||||
|
sei
|
||||||
|
lda time+0
|
||||||
|
ldx time+1
|
||||||
|
ldy time+2
|
||||||
|
cli
|
||||||
|
rts
|
||||||
|
|
||||||
|
.endproc
|
||||||
|
|
21
libsrc/cbm510/ksettim.s
Normal file
21
libsrc/cbm510/ksettim.s
Normal file
@ -0,0 +1,21 @@
|
|||||||
|
;
|
||||||
|
; 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
|
||||||
|
|
Loading…
x
Reference in New Issue
Block a user