(version 2)
(include "sci.sh")
(exports
    0 rm305
)
(use "Main")
(use "CueObj")
(use "Cycle")
(use "Game")
(use "View")
(use "Obj")
(script 305)



(instance public rm305 of Rm
    (properties
        noun 5
        picture 305
    )

    (method (init)
        (super:init())
        proc0_13()
        (send gMainIconBar:disable(4))
        (kreesha:init())
        (junk:init())
        (apoth:init())
        (laws:init())
        (doneButton:init())
    )

)
(instance doneButton of Prop
    (properties
        x 173
        y 189
        view 930
        loop 15
        cel 1
    )

    (method (doVerb)
        (rm305:setScript(sExit))
    )

)
(instance laws of Feature
    (properties
        x 162
        y 90
        nsTop 62
        nsLeft 137
        nsBottom 118
        nsRight 188
    )

    (method (doVerb)
        (send gQg3Messager:say(1 6 1))
    )

)
(instance apoth of Feature
    (properties
        x 205
        y 70
        nsTop 60
        nsLeft 196
        nsBottom 81
        nsRight 215
    )

    (method (doVerb)
        (send gQg3Messager:say(3 6 3))
    )

)
(instance kreesha of Feature
    (properties
        x 116
        y 71
        nsTop 61
        nsLeft 106
        nsBottom 82
        nsRight 126
    )

    (method (doVerb)
        (send gQg3Messager:say(2 6 2))
    )

)
(instance junk of Feature
    (properties
        x 201
        y 118
        nsTop 109
        nsLeft 192
        nsBottom 128
        nsRight 210
    )

    (method (doVerb)
        (send gQg3Messager:say(4 6 4))
    )

)
(instance sExit of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (doneButton:setCycle(Beg self))
            )
            (case 1
                (send gOwner:
                    x(113)
                    y(126)
                )
                proc0_3()
                (send global2:newRoom(300))
            )
        )
    )

)
