diff --git a/libsrc/cbm510/Makefile b/libsrc/cbm510/Makefile index 4760f2973..64d453d8a 100644 --- a/libsrc/cbm510/Makefile +++ b/libsrc/cbm510/Makefile @@ -66,10 +66,12 @@ OBJS = _scrsize.o \ kernal.o \ kiobase.o \ kopen.o \ + krdtim.o \ kreadst.o \ kscnkey.o \ kscreen.o \ ksetnam.o \ + ksettim.o \ kudtim.o \ mainargs.o \ peeksys.o \ diff --git a/libsrc/cbm510/krdtim.s b/libsrc/cbm510/krdtim.s new file mode 100644 index 000000000..85e2f5a0c --- /dev/null +++ b/libsrc/cbm510/krdtim.s @@ -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 + diff --git a/libsrc/cbm510/ksettim.s b/libsrc/cbm510/ksettim.s new file mode 100644 index 000000000..dab570fe6 --- /dev/null +++ b/libsrc/cbm510/ksettim.s @@ -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 +