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 13:18:48 +00:00			`;`
			`; clock_t clock (void);`
			`;`

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

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