* Script  9 TIMER
scrp 2 20 7 9
	doif sean eq 2
		doif seav eq 10
			setv var0 0
			esee 2 20 3
				doif ov02 eq 0
					addv var0 1
				endi
			next
			doif var0 ge 4
				kill targ
			endi
			setv var0 posl
			setv var1 post
			subv var0 4
			subv var1 1
			inst
			new: simp zand 32 0 6000 0
			setv cls2 2 20 3
			setv ov11 1000
			setv ov00 0
			setv ov01 0
			setv ov02 0
			rndv ov03 4 7
			loop
				rndv ov50 -5 5
			untl ov50 ne 0
			rndv var2 0 1
			doif var2 eq 0
				setv ov51 1
			else
				setv ov51 1
			endi
			setv ov04 seav
			divv ov04 5
			addv ov04 1
			mulv ov04 5
			modv ov04 20
			setv attr 67
			setv rest 100
			setv accg 3
			setv rnge 40
			setv puhl -1 8 4
			base 0
			doif ov50 lt 0
				pose 16
			else
				pose 24
			endi
			mvto var0 var1
			doif ov50 lt 0
				base 16
			else
				base 24
			endi
			anim [01234567R]
			setv velx ov50
			setv vely ov51
			tick 1
			kill ownr
		endi
	endi
endm
