wait_for_vblank:
    in a,(bf)
    and a,a
    jp p,wait_for_blank
    ret