* Script  9 TIMER
scrp 2 21 7 9
	doif ov00 eq 0
		tick 3
		doif ov10 eq -1
			rndv var0 -5 -1
		endi
		doif ov10 eq 0
			rndv var0 -4 4
		endi
		doif ov10 eq 1
			rndv var0 1 5
		endi
		rndv var1 -8 -1
		setv velx var0
		setv vely var1
		subv ov01 1
		doif ov01 le 0
			pose 6
			setv grav 1
			setv ov00 1
			tick 300
		endi
		stop
	endi
	doif ov00 eq 1
		etch 2 15 5
			kill ownr
		next
		setv var0 0
		esee 2 15 5
			addv var0 1
		next
		doif var0 gt 6
			kill ownr
		endi
		doif intr lt 70
			kill ownr
		endi
		doif intr lt 100
			rndv var0 0 1
			doif var0 eq 0
				kill ownr
			endi
		endi
		doif intr gt 200
			rndv var0 0 1
			doif var0 eq 0
				kill ownr
			endi
		endi
		doif temp lt 30
			kill ownr
		endi
		doif temp gt 225
			kill ownr
		endi
		subv ontr 2
		setv var0 posl
		subv var0 10
		setv var1 post
		subv var1 10
		inst
		new: simp puff 22 0 3000 0
		setv cls2 2 15 5
		setv attr 192
		setv rest 100
		mvto var0 var1
		setv grav 1
		tick 300
		slow
		kill ownr
		stop
	endi
endm
