(include "sci.sh")
(use "Main")
(use "SQRoom")
(use "MCyc")
(use "Sound")
(use "PicView")
(use "Obj")
(script 9)


(local
    local0
    local1[53] = (0 0 126 37 0 1 129 37 0 2 131 41 0 3 136 47 0 4 144 60 0 5 154 71 0 6 159 80 0 6 162 88 0 6 166 96 0 6 169 104 0 6 173 113 0 6 177 124 0 0 65436 65436 32768 )

)
(instance public rm009 of SQRoom
    (properties
        picture 9
    )

    (method (init)
        Load(rsVIEW 1)
        (super:init())
        (self:
            setScript(mallardScript)
            setRegions(707)
        )
    )

)
(instance mallardScript of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                = seconds 4
            )
            (case 1
                = local0 proc0_12("We rejoin our friend and semi-hero Roger Wilco as he rockets back toward his home planet, Xenon, which he hasn't seen since Space Quest II. Having successfully rescued those two ingrates from Andromeda he decides a pit stop on Magmetheus is in order." 67 2 5 70 315 28 global135 29 global129 30 1 33 310)
                = seconds 15
            )
            (case 2
                (soundFX:
                    init()
                    loop(1)
                    number(110)
                    play()
                )
                = seconds 1
                proc0_12(local0)
                (mallard:
                    init()
                    setCycle(MCyc @local1 self)
                )
                = seconds 2
            )
            (case 3
                (mallard:dispose())
                = seconds 3
            )
            (case 4
                (send global2:newRoom(10))
            )
        )
    )

)
(instance mallard of Prop
    (properties
        view 1
    )
)
(instance soundFX of Sound
    (properties)
)
