* Script  9 TIMER
scrp 2 14 2 9
	snde thun
	addv pres 100
	addv temp 30
	setv var0 posl
	setv var1 post
	addv var0 207
	addv var1 111
	pose 4
	reps 5
		inst
		new: simp weat 3 19 8900 0
		setv cls2 2 14 4
		setv attr 64
		rndv var9 0 2
		pose var9
		mvto var0 var1
		slim
		slow
		addv var1 80
		rndv var3 0 1
		doif var3 eq 0
			subv var0 20
		else
			addv var0 20
		endi
		enum 4 0 0
			doif touc targ var8 gt 0
				stim writ targ 0 255 0 0 1 200 0 0 0 0 0 0
			endi
		next
	repe
	wait 5
	targ ownr
	anim [0123R]
	enum 2 14 4
		kill targ
	next
	targ ownr
	doif pres gt 200
		setv psrc ov00
		kill ownr
	else
		rndv var0 50 80
		tick var0
	endi
endm
