* NEW - originally contained within 
* DS creatureDoneTo.cos

*	creature has been dropped
scrp 4 0 0 5
	inst
	rtar 1 1 154
	doif targ eq null
		stop
	endi
	seta va50 targ
	doif touc ownr va50 gt 0
*	creature is touching the chamber, send it a refresh message
		rtar 1 2 208
		doif targ ne null
*		if closed, send it a refresh
			doif ov00 eq 1
				mesg writ targ 1065
			else
*				dbg: outs "CLOSE CHAMBER"
*		otherwise close it
				mesg wrt+ targ 1004 1 0 0
			endi
		endi
	endi
endm