* 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
