;;; Sierra Script 1.0 - (do not remove this comment)
(script# 72)
(include sci.sh)
(use Main)
(use Game)

(public
	Room72 0
)

(instance Room72 of Rm
	(properties
		picture 72
		style $0010
	)
	
	(method (init)
		(self setRegions: 605)
		(super init:)
		(= global101 1)
		(= south 75)
		(gEgo view: 904 xStep: 4 yStep: 1)
		(if (== gPrevRoomNum 75)
			(gEgo posn: 160 172 init:)
		else
			(gEgo posn: 85 94 init:)
		)
		(gEgo priority: (CoordPri (gEgo y?)))
		(proc0_10 605 1)
	)
	
	(method (doit)
		(super doit:)
		(if (& (gEgo onControl: 0) $0040)
			(= gNewRoomNumber_2 71)
		)
	)
	
	(method (dispose)
		(super dispose:)
	)
)
