/******************************************************************************/
(include "sci.sh")
(include "game.sh")
/******************************************************************************/
(script 141)
/******************************************************************************/
(use "controls")
(use "cycle")
(use "door")
(use "feature")
(use "game")
(use "inv")
(use "main")
(use "obj")
(use "menubar")
/******************************************************************************/
(instance public rm141 of Rm
	(properties
		picture 8
		north 0
		east 0
		south 0
		west 0
	)
	(method (init)
		(super:init())
		(self:setScript(RoomScript))

		(SL:disable())
		(TheMenuBar:hide())
    Display(
			"After some time of driving\n   you reach the town..."
            dsCOORD 80 40
			dsCOLOUR 1
            dsFONT 999
		)
        Display(
			"...and pull over at the probable\n      location of the troops"
            dsCOORD 55 130
			dsCOLOUR 1
            dsFONT 999
		)
      Display(
			"After some time of driving\n   you reach the town..."
            dsCOORD 81 41
			dsCOLOUR 9
            dsFONT 999
		)
        Display(
			"...and pull over at the probable\n      location of the troops"
            dsCOORD 56 131
			dsCOLOUR 9
            dsFONT 999
		)
  )
)
/******************************************************************************/
(instance RoomScript of Script
	(properties)
(method (handleEvent pEvent)
        (super:handleEvent(pEvent))
        (if( not (send pEvent:claimed) )
                                      (if( (== (send pEvent:type) evKEYBOARD) and (== (send pEvent:message) $3C00) )
				ToggleSound()
			)(else
          (send gRoom:newRoom(99))
          PlayerControl()

(TheMenuBar:draw())
		(SL:enable())
 )
 )
 )
 )

/******************************************************************************/
