* Script  1 Activate(1)
scrp 3 10 6 1
	setv thrt 200
	doif ov00 eq 0
		gpas
		sndl trap
		part 2
		pose 1
		part 3
		anim [0123456789]
		over
		pose 10
		anim [56789R]
		setv ov00 1
		setv actv 0
	else
		setv thrt 100
		part 2
		pose 0
		part 3
		anim [9876543210]
		over
		dpas
		fade
		setv ov00 0
		setv actv 0
	endi
endm

* Script  2 Activate(2)
scrp 3 10 6 2
	setv var1 0
	etch 4 0 0
		doif movs eq 3
			setv var1 monk
			setv var2 targ
		endi
	next
	targ ownr
	setv ov01 var1
	part 0
	sndl humm
	anim [01234567]
	over
	doif var2 ne 0
		targ var2
		doif gnus eq 1
			dde: died
		endi
		kill targ
	endi
	targ ownr
	reps 10
		anim [4567]
		over
	repe
	fade
	snde tel4
	anim [456780]
	over
	doif ov00 eq 1
		sndl trap
	endi
	setv actv 0
endm
