* 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

