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

(public
	Room2 0
)

(instance Room2 of Rm
	(properties
		picture 2
	)
	
	(method (init)
		(= north 26)
		(= south 8)
		(= east 3)
		(= west 1)
		(= horizon 68)
		(= global101 0)
		(super init:)
		(if global100 (gRoom overlay: 102))
		(gEgo view: 2 init:)
		(self setRegions: 506 514)
	)
	
	(method (handleEvent pEvent)
		(if (pEvent claimed?) (return 1))
		(return
			(if
			(and (== (pEvent type?) evSAID) (Said 'look>'))
				(cond 
					(
						(or
							(Said '/room')
							(Said '/around')
							(Said '[<around][/!*]')
						)
						(Print 2 0)
					)
					((Said '/brook') (Print 2 1))
				)
			else
				0
			)
		)
	)
	
	(method (newRoom newRoomNumber)
		(if (gCast contains: gNewAct_5)
			(= global211 global160)
			(= global212 global159)
		)
		(super newRoom: newRoomNumber)
	)
)
