
		XDEF	_FastLineClear
_FastLineClear:	
		move.l	4(SP),a0
		movem.l d2-d7/a1-a6,-(SP)
		move.l	#8,d0
loop
		clr.b 	(a0)+
		
		clr.l	(a0)+
		clr.l	(a0)+
		clr.l	(a0)+
		clr.l	(a0)+
		clr.l	(a0)+
		clr.l	(a0)+
		clr.l	(a0)+
		clr.l	(a0)+
		clr.l	(a0)+
		clr.l	(a0)+
		clr.l	(a0)+
		clr.l	(a0)+
		clr.l	(a0)+
		clr.l	(a0)+
		clr.l	(a0)+
		clr.l	(a0)+
		
		clr.b	(a0)+
		adda	#14,a0
		subq.b	#1,d0
		bne.s	loop

		movem.l	(SP)+,d2-d7/a1-a6
		rts

