ARGH_HBlank:
n:          =       0
            while   n<64
@\#n        move.l  #$C0020000,vdp_control_port.l
            move.w  AG_CopperBuf+((n*2)&$FF1E).l,vdp_data_port.l
n:          =       n+1
            move.l  #@\#n,v_hblank+2.w
            rte
            endw

@64         move.l  #ARGH_HBlank_End,v_hblank+2.w

ARGH_HBlank_End:
            rte