* Script  1 Activate(1)
scrp 2 9 21 1
	doif ov00 lt 0
		anim [012345]
		over
		negv ov00
		setv door 0 81 85 0
	else
		anim [543210]
		over
		negv ov00
		setv door 0 81 85 255
	endi
	snde dor1
	setv actv 0
endm
