1
0
mirror of https://github.com/cc65/cc65.git synced 2024-07-10 23:29:05 +00:00
cc65/libsrc/c64/waitvblank.s
2016-02-28 22:35:46 +01:00

21 lines
355 B
ArmAsm

.export _waitvblank
.include "c64/c64.inc"
_waitvblank:
lda PALFLAG
beq @ntsc
ldx #(312-24)-256
.byte $2c
@ntsc:
ldx #(262-4)-256
@l1:
lda VIC_CTRL1
and #$80
beq @l1
@l2:
cpx VIC_HLINE
bcs @l2
rts