/******************************************************************************/
(include "sci.sh")
(include "game.sh")
/******************************************************************************/
(script 162)
/******************************************************************************/
(use "controls")
(use "cycle")
(use "door")
(use "feature")
(use "game")
(use "inv")
(use "main")
(use "obj")
/******************************************************************************/
(instance public rm162 of Rm
	(properties
		picture 55
		north 0
		east 0
		south 0
		west 0
	)
	(method (init)
		(super:init())
		(self:setScript(RoomScript))
  (send gTheMusic:
			prevSignal(0)
			stop()
			number(18)
			loop(-1)
			play()
		)
    (doctor: init())
  (aPhone: init())
  Print("Welkom to my lab, Dr Jummybummy. I zhink we have nod been introduzed yet. I'm prof. Grankenztein, perzonal prof. of Lord Bather. He azked me to perform a little tezt." #title "Prof. Grankenztein:" #icon 778 0 0)
 Print("What are you going to do, you ***** ******!!?" #title "Dr.Jummybummy:" #icon 777 0 18)
 Print("I'm tezting out the mobile lazer beam for the troops invading Earth. And I'm alzo working on zhe Big Lazer." #title "Prof. Grankenztein:" #icon 778 0 0 #icon 778 0 0)
 Print("It won't work! You don't have the Moon Stone! Haa!" #title "Dr.Jummybummy:" #icon 777 0 18)
 Print("But we're getting clozer. We know it'z in an old temple, zomewhere in the dezert." #title "Prof. Grankenztein:" #icon 778 0 0)
 Print("Thanks for telling me!" #title "Dr.Jummybummy:" #icon 777 0 18)
 Print("Don't you worry. You'll be dead by zhat time." #title "Prof. Grankenztein:" #icon 778 0 0)
 Print("You're not getting away with this!" #title "Dr.Jummybummy:" #icon 777 0 18)
 Print("And now it'z time..." #title "Prof. Grankenztein:" #icon 778 0 0)
  (send gRoom: newRoom(54))
 )
)
/******************************************************************************/
(instance RoomScript of Script
	(properties)
)

(instance doctor of Act
(properties
view 80
x 154
y 125
cel 2
))
(instance aPhone of Act
(properties
view 81
x 58
y 59
)
)
/******************************************************************************/
