* Script  1 Activate(1)
scrp 2 15 3 1
	doif ov00 eq 1
		setv thrt 200
		base 9
		pose 3
		over
		stim writ from 50 255 0 0 18 100 235 50 0 0 0 0
		anim [3210]
		over
		base 0
	endi
	setv actv 0
endm
