* Script  1 Activate(1)
scrp 2 9 7 1
	doif ov00 eq 0
		anim [3210]
		over
		snde dor1
		setv door 1 123 154 0
		setv ov00 1
		setv actv 0
		stop
	endi
	doif ov00 eq 1
		rtar 2 9 8
		doif ov00 eq 1
			rtar 2 3 4
			doif ov00 eq 1
				mesg writ targ 0
				wait 10
			endi
			targ ownr
			anim [0123]
			setv door 1 123 154 255
			setv ov00 0
			setv actv 0
			stop
		else
			mesg writ targ 0
			wait 5
			rtar 2 3 4
			doif ov00 eq 1
				mesg writ targ 0
				wait 10
			endi
			targ ownr
			anim [0123]
			setv door 1 123 154 255
			setv ov00 0
			setv actv 0
			stop
		endi
	endi
endm
