location Chapel
	description
		"$tThis small chapel is simply but tastefully decorated.
		The only ostentatious feature is the large circular stained
		glass window set into the floor (yes, that's not a typo,
		remember who built this house).
		$iThere is a marble-topped altar at the far end.
		$p"
	--exit west to UpstairsHallway.
end location.

object Chapel_west_door
	name west door
	name west
	at Chapel
	description
	verb examine does only
		describe interior_door.
	end verb.
	verb 'use' does only
		locate hero at UpstairsHallway.
	end verb.
end object.

object altar
	at Chapel
	container
		header "Sitting on the altar is"
		else "There is nothing on the altar."
	description
	verb examine does only
		list altar.
	end verb.
end object.

object crucifix	
	name silver crucifix
	name cross
	in altar
	is takeable.
	verb examine does
		"It's a small silver crucifix on a chain. Looking closer,
		it seems to be engraved with musical notes."
	end verb.
	verb 'use' does only
		"You could hang it around your neck, I suppose. Unless
		you can think of some other use for it?"
	end verb.
	verb use_on does only
		if iobj = piano then
			if piano is possessed then
				schedule exorcise_piano after 0.
			else
				"The piano doesn't seem to be in need of any
				further exorcism."
			end if.
		else
			"What, you think it's possessed, or something?" 
		end if.
	end verb.
end object.