* Script  0 Deactivate
scrp 4 2 0 0
	doif from eq pntr
		stm# writ targ 3
	else
		stm# writ targ 4
	endi
endm

* Script  1 Activate(1)
scrp 4 2 0 1
	setv actv 0
	doif from eq pntr
		stm# writ targ 1
	else
		stm# writ targ 2
	endi
	doif aslp gt 0
		stop
	endi
	doif uncs ne 0
		stop
	endi
	doif chem 1 lt 16
		doif chem 172 lt 20
			wait 3
			snde glaf
		endi
	endi
endm

* Script  2 Activate(2)
scrp 4 2 0 2
	setv actv 0
	targ from
	doif fmly ne 4
		stop
	endi
	targ ownr
	doif spcs eq 2
		wait 5
		stim writ ownr 150 -1 0 0 13 50 45 40 36 40 0 0
		pose 12
		snde glaf
		wait 40
		done
		stop
	endi
	stim writ ownr 100 -1 0 0 12 150 9 80 0 0 0 0
endm

* Script 64 Involuntary Action 0
scrp 4 2 0 64
	ltcy 0 4 8
	pose 75
	snde gslp
	wait 10
	stm# writ ownr 28
	done
endm

* Script 66 Involuntary Action 2
scrp 4 2 0 66
	ltcy 2 3 20
	anim [071071072072072]
	snde gshv
	stm# writ ownr 30
	over
	snez
	wait 5
	done
endm

* Script 67 Involuntary Action 3
scrp 4 2 0 67
	ltcy 3 3 20
	anim [071071072072]
	snde gshv
	over
	snez
	stm# writ ownr 30
	wait 5
	done
endm

* Script 68 Involuntary Action 4
scrp 4 2 0 68
	ltcy 4 20 80
	anim [046047046047046047047046R]
	snde gshv
	stm# writ ownr 32
	rndv var0 50 150
	wait var0
	pose 46
	done
endm

* Script 70 Involuntary Action 6
scrp 4 2 0 70
	ltcy 6 60 200
	pose 58
	rndv var0 1 3
	reps var0
		rndv var1 40 140
		wait var1
		stm# writ targ 22
		snde gdie
	repe
	done
endm

* Script 72 Death Script
scrp 4 2 0 72
	pose 77
	addv ontr 50
	snde gdie
	wait 600
	kill ownr
endm
