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

Display("    After moving around in space for a while,    " dsFONT 900 dsCOORD 17 61 dsCOLOUR 1)
Display("  you notice that there are no other planets  " dsFONT 900 dsCOORD 17 71 dsCOLOUR 1)
Display("   surrounding you anymore. That could only" dsFONT 900 dsCOORD 17 81 dsCOLOUR 1)
Display("                  mean one thing...   " dsFONT 900 dsCOORD 18 91 dsCOLOUR 1)
Display("                   YOU'RE LOST!!         " dsFONT 900 dsCOORD 17 117 dsCOLOUR 1)

Display("    After moving around in space for a while,    " dsFONT 900 dsCOORD 16 60 dsCOLOUR 9)
Display("  you notice that there are no other planets  " dsFONT 900 dsCOORD 16 70 dsCOLOUR 9)
Display("   surrounding you anymore. That could only" dsFONT 900 dsCOORD 16 80 dsCOLOUR 9)
Display("                  mean one thing...   " dsFONT 900 dsCOORD 17 90 dsCOLOUR 9)
Display("                   YOU'RE LOST!!         " dsFONT 900 dsCOORD 16 116 dsCOLOUR 9)
 (aE: init() setMotion(MoveTo 316 10 RoomScript))

	)
)
/******************************************************************************/
(instance RoomScript of Script
	(properties)
  (method (changeState newState)
  (var dyingScript)
  = state newState
  (switch (state)
    (case 0


   )
    (case 1
  = dyingScript ScriptID(DYING_SCRIPT)
  (send dyingScript:
    caller(3)
register("Since you didn't have what it takes to set the right course for the rocket, you got lost in space.")
  )
  (send gGame:setScript(dyingScript))
   )
   )
   )
)
 (instance aE of Act
 (properties
 view 300
 x 30
 y 10
))
/******************************************************************************/
