rename all waitvblank() to waitvsync()

2017-07-17 23:15:05 +02:00
parent 3ff4a1333c
commit 1abce3a2a1
17 changed files with 32 additions and 32 deletions
--- a/libsrc/vic20/waitvsync.s
+++ b/libsrc/vic20/waitvsync.s
@@ -0,0 +1,21 @@
+        .export         _waitvsync
+
+        .include        "vic20.inc"
+
+; FIXME
+; this flag doesnt work on vic20!!!
+; it will have to be filled by a get_tv() constructor or so
+PALFLAG		= $2A6		; $01 = PAL, $00 = NTSC
+
+_waitvsync:
+        lda     PALFLAG
+        beq     @ntsc
+        ldx     #(312-8)/2
+        .byte $2c
+@ntsc:
+        ldx     #(262-8)/2
+@l2:
+        cpx     VIC_HLINE
+        bcs     @l2
+        rts
+