(include "sci.sh")
(use "Main")
(use "n958")
(use "Cycle")
(use "Sounds")
(use "View")
(use "Obj")
(script 195)


(local
    local0[18] = (176 171 165 157 148 137 127 115 102 86 72 60 51 38 26 12 65535 65522 )
    local18[18] = (126 128 130 132 134 136 138 140 142 144 146 148 150 152 154 156 158 160 )
    local36[18] = (10 12 14 17 21 26 34 42 52 69 83 94 103 119 128 128 128 128 )
    local54

)
(instance public rm195 of Rm
    (properties
        picture 35
        style 32778
    )

    (method (init)
        (self:setRegions(109))
        proc958_0(128 155)
        proc0_6(0)
        (super:init())
        (send gRoom:setScript(sByeByeRog))
    )

)
(instance sByeByeRog of Script
    (properties)

    (method (doit param1)
        Palette(6 15 22 1)
        (super:doit(rest param1))
    )


    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) (ejectRoger:
                    init()
                    setCycle(0)
                    setLoop(-1)
                    setLoop(0)
                    setMotion(MoveTo 180 124 self)
                )
  )
            )
            (case 1
                ((send gSq5Music2:
                    number(154)
                    setLoop(1)
                    play()
                )
 = ticks 5  )
            )
            (case 2
                ((ejectRoger:
                    setCycle(0)
                    x(local0[local54])
                    y(local18[local54])
                    scaleX(local36[local54])
                    scaleY(local36[local54])
                )
 
                (if (<= ++local54 17)
                    --state
                )
 = ticks 5  )
            )
            (case 3
                (
                (if (not proc0_1(1))
                    proc0_9(1)
                )(else
                    (if (< global115 4)
                        proc0_9(2)
                    )(else
                        proc0_9(3)
                    )
                )
 )
            )
        )
    )

)
(instance ejectRoger of Actor
    (properties
        x 180
        y 103
        view 155
        scaleSignal 1
        scaleX 7
        scaleY 7
        moveSpeed 3
    )
)
