cc65/libsrc/pce/clock.s

;
; clock_t clock (void);
;

        .include "pce.inc"

        .export         _clock
        .importzp       sreg
;;        .importzp       tickcount

.proc   _clock

        lda tickcount+3
        sta sreg+1
        lda tickcount+2
        sta sreg
        ldx tickcount+1
        lda tickcount
        rts

.endproc
initial import, completely untested, does not compile yet 2014-11-29 14:18:48 +01:00			`;`
			`; clock_t clock (void);`
			`;`

more cleanup, joystick works again 2015-07-12 14:27:24 +02:00			`.include "pce.inc"`
more hacking 2014-11-30 11:20:57 +01:00
more cleanup, joystick works again 2015-07-12 14:27:24 +02:00			`.export _clock`
more hacking 2014-11-30 11:20:57 +01:00			`.importzp sreg`
_tickcount -> tickcount 2015-07-14 19:55:41 +02:00			`;; .importzp tickcount`
initial import, completely untested, does not compile yet 2014-11-29 14:18:48 +01:00
more cleanup, joystick works again 2015-07-12 14:27:24 +02:00			`.proc _clock`

_tickcount -> tickcount 2015-07-14 19:55:41 +02:00			`lda tickcount+3`
more cleanup and fixing 2015-07-12 16:40:52 +02:00			`sta sreg+1`
_tickcount -> tickcount 2015-07-14 19:55:41 +02:00			`lda tickcount+2`
more cleanup and fixing 2015-07-12 16:40:52 +02:00			`sta sreg`
_tickcount -> tickcount 2015-07-14 19:55:41 +02:00			`ldx tickcount+1`
			`lda tickcount`
more hacking 2014-11-30 11:20:57 +01:00			`rts`
initial import, completely untested, does not compile yet 2014-11-29 14:18:48 +01:00
			`.endproc`