mirror of
https://github.com/cc65/cc65.git
synced 2024-07-05 06:28:57 +00:00
21 lines
326 B
ArmAsm
21 lines
326 B
ArmAsm
|
;
|
||
|
|
; void waitvblank (void);
|
||
|
|
;
|
||
|
|
|
||
|
|
.include "gamate.inc"
|
||
|
|
.include "extzp.inc"
|
||
|
|
|
||
|
|
.forceimport ticktock
|
||
|
|
.export _waitvblank
|
||
|
|
|
||
|
|
; FIXME: is this actually correct?
|
||
|
|
|
||
|
|
.proc _waitvblank
|
||
|
|
|
||
|
|
lda tickcount
|
||
|
|
@lp: cmp tickcount
|
||
|
|
beq @lp
|
||
|
|
rts
|
||
|
|
|
||
|
|
.endproc
|