bra inloop ; Go into the loop
again:
move.w (a0)+,d3 ; Grab another word
btst d2,(a3) ; Check blit done
wait2:
btst d2,(a3) ; Check again
bne wait2 ; oops, not ready, loop around
inloop:
move.w d3,(a4) ; stuff new word to make vertical
move.w d1,(a5) ; start the blit
subq.w #1,d0 ; is that the last word?
bne again ; keep going if not
gone:
rts
end
- 200 Blitter Hardware -