; Assumes 8_bit mem, 16-Bit index
; Wait for Vblank routine
;###########################
; Wait for vertical blank. #
;###########################
vblank:
 php
 sep #$20

Vloop:
 lda $4210
 and #$80
 beq Vloop
 plp
rts