cc65/libsrc/gamate/waitvsync.s

;
; Written by Groepaz <groepaz@gmx.net>
;
; void waitvsync (void);
;

        .include        "gamate.inc"
        .include        "extzp.inc"

        .forceimport    ticktock
        .export         _waitvsync

; FIXME: is this actually correct?

.proc   _waitvsync

        lda     tickcount
@lp:    cmp     tickcount
        beq     @lp
        rts

.endproc
conio and most other stuff working now 2015-11-29 00:14:59 +00:00			`;`
add headers/fix formatting 2017-07-17 23:04:53 +00:00			`; Written by Groepaz <groepaz@gmx.net>`
			`;`
rename all waitvblank() to waitvsync() 2017-07-17 21:15:05 +00:00			`; void waitvsync (void);`
conio and most other stuff working now 2015-11-29 00:14:59 +00:00			`;`

			`.include "gamate.inc"`
			`.include "extzp.inc"`

			`.forceimport ticktock`
rename all waitvblank() to waitvsync() 2017-07-17 21:15:05 +00:00			`.export _waitvsync`
conio and most other stuff working now 2015-11-29 00:14:59 +00:00
			`; FIXME: is this actually correct?`

rename all waitvblank() to waitvsync() 2017-07-17 21:15:05 +00:00			`.proc _waitvsync`
conio and most other stuff working now 2015-11-29 00:14:59 +00:00
			`lda tickcount`
			`@lp: cmp tickcount`
			`beq @lp`
			`rts`

			`.endproc`