bobsetup:

 	lea $dff000,a6
 	move.l #-1,bltafwm(a6)
 	move.w #$09f0,bltcon0(a6)
 	clr.w bltcon1(a6)
 	clr.w bltamod(a6)
 	move.w #40-2,bltdmod(a6)              
 	move.w #40-2,bltamod(a6)             
 	move.l #picdata,bltdpt(a6)       
 	move.l #picdata+2,bltapt(a6)            
 	move.w #%0000010000000001,bltsize(a6) 	
 	rts