rename all waitvblank() to waitvsync()
This commit is contained in:
26
libsrc/cbm510/waitvsync.s
Normal file
26
libsrc/cbm510/waitvsync.s
Normal file
@@ -0,0 +1,26 @@
|
||||
|
||||
.export _waitvsync
|
||||
.import PALFLAG
|
||||
.import sys_bank, restore_bank
|
||||
|
||||
.importzp vic
|
||||
|
||||
.include "cbm510.inc"
|
||||
|
||||
_waitvsync:
|
||||
rts ; FIXME
|
||||
|
||||
jsr sys_bank ; Switch to the system bank
|
||||
|
||||
sei
|
||||
|
||||
ldy #VIC_CTRL1
|
||||
@l1:
|
||||
lda (vic),y
|
||||
bpl @l1
|
||||
@l2:
|
||||
lda (vic),y
|
||||
bmi @l2
|
||||
|
||||
cli
|
||||
jmp restore_bank
|
||||
Reference in New Issue
Block a user