(version 2)
(include "sci.sh")
(exports
    0 rm3
)
(use "Main")
(use "InterActor")
(use "InterFeature")
(use "InterProp")
(use "InterView")
(use "DPath")
(use "Sound")
(use "Cycle")
(use "Game")
(use "View")
(use "Obj")
(script 3)

(local
    local0

)
(instance public rm3 of Rm
    (properties
        picture 300
        style $000a
    )

    (method (init)
        (super:init())
        (aCaveMan:init())
        (aDiner:init())
        (anEgg:init())
        (aPicture:init())
        (aTiger:init())
        (aVacumn:init())
        (aWord0:init())
        (aWord1:init())
        (aWord2:init())
        (aWord3:init())
        (aWord4:init())
        (aWord5:init())
        (aWord6:init())
        (aWord7:init())
        (aWord8:init())
        (aWord9:init())
        (aWord10:init())
        (aWord11:init())
        (aWord12:init())
        (aWord13:init())
        (aWord14:init())
        (aWord15:init())
        (aWord16:init())
        (aWord17:init())
        (aWord18:init())
        (aWord19:init())
        (aWord20:init())
        (aWord21:init())
        (rock:init())
        (theTop:init())
        (cloud:init())
        (mountainCap1:init())
        (mountainCap2:init())
        (theCar:init())
        (aBird:init())
        (send gLongSong2:
            number(130)
            setLoop(-1)
            play(10)
            fade(127 10 30 0)
        )
        (send global2:setScript(rockScript))
    )


    (method (doit)
        (super:doit())
        (if ((global120 and not local0) and not (send global2:script))
            = local0 1
            (self:setScript(ScriptID(0 4)))
        )
    )


    (method (dispose)
        (mySound:dispose())
        (my2Sound:dispose())
        (birdSound:dispose())
        DisposeScript(964)
        (super:dispose())
    )


    (method (doVerb)
        return 0
    )


    (method (cue)
        (theView:
            hide()
            dispose()
        )
        (send global1:handsOn())
        (super:cue())
    )


    (method (newRoom newRoomNumber)
        (send gLongSong2:fade(0 10 30 1))
        (super:newRoom(newRoomNumber))
    )

)
(instance rockScript of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (send global1:handsOff())
                (rock:setCel(1))
                = ticks 45
            )
            (case 1
                (send global1:handsOff())
                (theView:
                    view(365)
                    setLoop(0)
                    setCel(1)
                    posn(73 173)
                    init()
                )
                (mySound:
                    number(1044)
                    setLoop(1)
                    play()
                )
                = ticks 25
            )
            (case 2
                (send global1:handsOff())
                (theProp:
                    view(365)
                    setLoop(1)
                    setCel(1)
                    posn(164 173)
                    init()
                )
                = ticks 43
            )
            (case 3
                (theView:
                    view(365)
                    setLoop(2)
                    setCel(1)
                    posn(174 173)
                )
                = ticks 54
            )
            (case 4
                (theProp:
                    view(365)
                    setLoop(3)
                    setCel(1)
                    posn(124 183)
                )
                = ticks 25
            )
            (case 5
                (theView:hide())
                = ticks 38
            )
            (case 6
                = ticks 4
            )
            (case 7
                (theView:
                    view(365)
                    setLoop(0)
                    setCel(1)
                    posn(217 183)
                    show()
                )
                = ticks 37
            )
            (case 8
                (theProp:
                    view(365)
                    setLoop(4)
                    setCel(1)
                    posn(152 185)
                )
                = ticks 28
            )
            (case 9
                (theView:
                    view(365)
                    setLoop(5)
                    setCel(1)
                    posn(150 194)
                )
                = ticks 55
            )
            (case 10
                = ticks 10
            )
            (case 11
                (theProp:
                    view(365)
                    setLoop(3)
                    setCel(1)
                    posn(263 194)
                )
                = ticks 50
            )
            (case 12
                (theView:
                    hide()
                    dispose()
                )
                = ticks 31
            )
            (case 13
                (theProp:
                    hide()
                    dispose()
                )
                (rock:
                    setCel(0)
                    stopUpd()
                )
                (send global1:handsOn())
                (self:dispose())
            )
        )
    )

)
(instance theCarScript of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (send global1:handsOff())
                (theCar:
                    view(335)
                    setLoop(0)
                    setCel(0)
                )
                = ticks 6
            )
            (case 1
                (theCar:setCycle(CT 5 1 self))
            )
            (case 2
                (mySound:
                    number(946)
                    setLoop(1)
                    play()
                )
                (theCar:setCycle(CT 15 1 self))
            )
            (case 3
                (mySound:
                    number(955)
                    setLoop(-1)
                    play()
                )
                (theCar:
                    setLoop(1)
                    setCel(0)
                    ignoreActors()
                    setCycle(CT 6 1 self)
                )
            )
            (case 4
                (mySound:
                    number(956)
                    setLoop(1)
                    play()
                )
                (my2Sound:
                    number(957)
                    setLoop(1)
                    play()
                )
                (theCar:setCycle(CT 15 1 self))
            )
            (case 5
                (mySound:
                    number(919)
                    setLoop(1)
                    play()
                )
                (theCar:
                    setLoop(2)
                    setCel(0)
                    setCycle(CT 7 1 self)
                )
            )
            (case 6
                (my2Sound:
                    number(930)
                    setLoop(1)
                    play()
                )
                (theCar:setCycle(CT 15 1 self))
            )
            (case 7
                (mySound:
                    number(955)
                    setLoop(-1)
                    play()
                )
                (theCar:
                    setLoop(3)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 8
                (mySound:stop())
                (theCar:
                    view(301)
                    setLoop(0)
                    setCel(7)
                    stopUpd()
                )
                (send global1:handsOn())
                (self:dispose())
            )
        )
    )

)
(instance aBirdScript of Script
    (properties)

    (method (doit)
        (super:doit())
        (if ((== (myBird:loop) 1) and (== (myBird:cel) 3))
            (birdSound:play())
        )
    )


    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (send global1:handsOff())
                (myBird:
                    setLoop(0)
                    setCel(1)
                    init()
                    setMotion(MoveTo 271 103 self)
                )
            )
            (case 1
                = ticks 50
            )
            (case 2
                (mySound:
                    number(956)
                    setLoop(1)
                    play()
                )
                (myBird:setCycle(CT 3 1 self))
            )
            (case 3
                = ticks 2
            )
            (case 4
                (myBird:setCycle(CT 4 1 self))
            )
            (case 5
                (myBird:
                    setCel(1)
                    setMotion(MoveTo 302 100 self)
                )
            )
            (case 6
                = ticks 50
            )
            (case 7
                (myBird:
                    setLoop(1)
                    setCel(0)
                    posn(302 64)
                    moveSpeed(3)
                    setCycle(Fwd)
                    setMotion(MoveTo 64 62 self)
                )
            )
            (case 8
                (mySound:
                    number(946)
                    setLoop(1)
                    play()
                )
                (myBird:
                    setLoop(2)
                    setCel(0)
                    posn(41 69)
                    setCycle(End self)
                )
            )
            (case 9
                (mySound:
                    number(988)
                    setLoop(1)
                    play()
                )
                (myBird:
                    setLoop(4)
                    setCel(0)
                    setCycle(Fwd)
                    setMotion(MoveTo 69 60 self)
                )
            )
            (case 10
                (myBird:
                    setLoop(3)
                    setCel(0)
                    setCycle(Fwd)
                )
                = ticks 25
            )
            (case 11
                (myBird:
                    setLoop(1)
                    setCel(0)
                    setCycle(Fwd)
                    setMotion(MoveTo 41 69 self)
                )
            )
            (case 12
                (myBird:
                    setLoop(2)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 13
                (mySound:
                    number(946)
                    setLoop(1)
                    play()
                )
                (myBird:
                    setLoop(2)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 14
                (mySound:
                    number(988)
                    setLoop(1)
                    play()
                )
                (myBird:
                    setLoop(4)
                    setCel(0)
                    ignoreActors()
                    setCycle(Fwd)
                    setMotion(MoveTo 69 123 self)
                )
            )
            (case 15
                (myBird:
                    setLoop(3)
                    setCel(0)
                    setCycle(Fwd)
                )
                = ticks 50
            )
            (case 16
                (myBird:
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 17
                (mySound:
                    number(978)
                    setLoop(-1)
                    play()
                )
                (myBird:
                    setLoop(4)
                    setCel(0)
                    setCycle(Fwd)
                )
                = ticks 6
            )
            (case 18
                (myBird:
                    setLoop(1)
                    setCel(0)
                    setCycle(Fwd)
                    setMotion(MoveTo 9 123 self)
                )
            )
            (case 19
                (mySound:stop())
                (myBird:
                    setLoop(0)
                    setCel(0)
                    posn(302 100)
                    dispose()
                )
                = cycles 2
            )
            (case 20
                (send global1:handsOn())
                (self:dispose())
            )
        )
    )

)
(instance aVacumnScript of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (send global1:handsOff())
                (vacDino:
                    init()
                    setCycle(End self)
                )
            )
            (case 1
                (mySound:
                    number(955)
                    setLoop(1)
                    play()
                )
                (vacDino:
                    setLoop(1)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 2
                (mySound:
                    number(955)
                    setLoop(1)
                    play()
                )
                (vacDino:
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 3
                (mySound:
                    number(955)
                    setLoop(1)
                    play()
                )
                (vacDino:
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 4
                (mySound:
                    number(1149)
                    setLoop(1)
                    play()
                )
                (vacDino:
                    setLoop(2)
                    setCel(2)
                    setCycle(CT 3 1 self)
                )
            )
            (case 5
                (vacDino:setCycle(CT 7 1 self))
            )
            (case 6
                (mySound:
                    number(1159)
                    setLoop(1)
                    play()
                )
                (vacDino:setCycle(CT 13 1 self))
            )
            (case 7
                (vacDino:setCycle(CT 15 1 self))
            )
            (case 8
                (vacDino:
                    setLoop(3)
                    setCel(0)
                    setCycle(CT 2 1 self)
                )
            )
            (case 9
                (vacDino:setCycle(CT 10 1 self))
            )
            (case 10
                (mySound:
                    number(982)
                    setLoop(1)
                    play()
                )
                (vacDino:setCycle(CT 14 1 self))
            )
            (case 11
                (vacDino:
                    setLoop(4)
                    setCel(0)
                    setCycle(Fwd)
                )
                = ticks 135
            )
            (case 12
                (vacDino:
                    setLoop(5)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 13
                (vacDino:
                    setLoop(0)
                    setCel(0)
                    dispose()
                )
                (send global1:handsOn())
                (self:dispose())
            )
        )
    )

)
(instance aPictureScript of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (send global1:handsOff())
                (myPicture:
                    init()
                    setCycle(End self)
                )
            )
            (case 1
                (myPicture:
                    setLoop(1)
                    setCel(0)
                    setCycle(CT 3 1 self)
                )
            )
            (case 2
                (mySound:
                    number(987)
                    setLoop(1)
                    play()
                )
                (myPicture:setCycle(CT 9 1 self))
            )
            (case 3
                (myPicture:
                    setLoop(1)
                    setCel(0)
                    setCycle(CT 3 1 self)
                )
            )
            (case 4
                (mySound:
                    number(987)
                    setLoop(1)
                    play()
                )
                (myPicture:setCycle(CT 9 1 self))
            )
            (case 5
                (myPicture:
                    setLoop(1)
                    setCel(0)
                    setCycle(CT 3 1 self)
                )
            )
            (case 6
                (mySound:
                    number(987)
                    setLoop(1)
                    play()
                )
                (myPicture:setCycle(CT 9 1 self))
            )
            (case 7
                (myPicture:
                    setLoop(2)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 8
                = ticks 90
            )
            (case 9
                (myPicture:
                    view(326)
                    setLoop(0)
                    setCel(0)
                )
                = ticks 3
            )
            (case 10
                (mySound:
                    number(986)
                    setLoop(-1)
                    play()
                )
                (myPicture:setCycle(End self))
            )
            (case 11
                (myPicture:
                    setLoop(1)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 12
                (mySound:
                    number(914)
                    setLoop(1)
                    play()
                )
                = ticks 90
            )
            (case 13
                (myPicture:
                    setLoop(2)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 14
                (myPicture:
                    view(325)
                    setLoop(0)
                    setCel(0)
                    dispose()
                )
                (send global1:handsOn())
                (self:dispose())
            )
        )
    )

)
(instance mountainCap1Script of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (send global1:handsOff())
                (theCar:posn(233 158))
                = ticks 10
            )
            (case 1
                (theCar:posn(242 158))
                = ticks 10
            )
            (case 2
                (theCar:posn(250 158))
                (mySound:
                    number(950)
                    setLoop(1)
                    play()
                )
                (mountainCap1:
                    view(300)
                    setLoop(0)
                    setCel(0)
                    posn(279 93)
                    setCycle(End self)
                )
            )
            (case 3
                (mySound:
                    number(977)
                    setLoop(-1)
                    play()
                )
                (bat1:
                    init()
                    setLoop(1)
                    setPri(10)
                    setCycle(Fwd)
                    setMotion(DPath 269 90 244 88 223 76 200 68 186 65 167 59 166 49 178 39 186 31 201 27 221 0 221 -20 self)
                )
            )
            (case 4
                (mySound:
                    number(946)
                    setLoop(1)
                    play()
                )
                (my2Sound:stop())
                (bat1:
                    setCycle(0)
                    setCel(0)
                    posn(269 90)
                    hide()
                    dispose()
                )
                (mountainCap1:setCycle(Beg self))
            )
            (case 5
                (theCar:posn(242 158))
                = ticks 10
            )
            (case 6
                (theCar:posn(233 158))
                = ticks 10
            )
            (case 7
                (send global1:handsOn())
                (theCar:
                    posn(224 158)
                    stopUpd()
                )
                (mountainCap1:
                    view(301)
                    setLoop(0)
                    setCel(0)
                    stopUpd()
                )
                (self:dispose())
            )
        )
    )

)
(instance mountainCap2Script of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (send global1:handsOff())
                (mountainCap2:
                    view(330)
                    setLoop(1)
                    setCel(0)
                    setPri(6)
                    setCycle(CT 1 1 self)
                )
            )
            (case 1
                (mySound:
                    number(1013)
                    setLoop(1)
                    play()
                )
                (mountainCap2:setCycle(CT 6 1 self))
            )
            (case 2
                (mySound:
                    number(976)
                    setLoop(1)
                    play()
                )
                (echo:
                    init()
                    setLoop(2)
                    moveSpeed(3)
                    ignoreActors()
                    ignoreControl()
                    setCycle(End)
                    setMotion(MoveTo 166 93)
                )
                (mountainCap2:setCycle(CT 11 1))
                = ticks 50
            )
            (case 3
                (echo2:
                    setCel(0)
                    setLoop(2)
                    moveSpeed(4)
                    ignoreActors()
                    ignoreControl()
                    init()
                    setCycle(End)
                    setMotion(MoveTo 166 93)
                )
                = ticks 50
            )
            (case 4
                (echo3:
                    setCel(0)
                    setLoop(2)
                    moveSpeed(5)
                    ignoreActors()
                    ignoreControl()
                    init()
                    setCycle(End)
                    setMotion(MoveTo 166 93)
                )
                = ticks 75
            )
            (case 5
                (mySound:
                    number(946)
                    setLoop(1)
                    play()
                )
                (echo:
                    posn(82 90)
                    setCel(0)
                    hide()
                    dispose()
                )
                (echo2:
                    posn(82 90)
                    setCel(0)
                    hide()
                    dispose()
                )
                (echo3:
                    posn(82 90)
                    setCel(0)
                    hide()
                    dispose()
                )
                (mountainCap2:
                    setLoop(3)
                    setCel(0)
                    setCycle(Fwd)
                )
                = ticks 25
            )
            (case 6
                (mySound:stop())
                (mountainCap2:setCycle(0))
                = ticks 3
            )
            (case 7
                (mountainCap2:
                    setLoop(0)
                    setCel(10)
                    setCycle(CT 12 1 self)
                )
            )
            (case 8
                (mountainCap2:
                    setLoop(0)
                    setCel(10)
                    setCycle(CT 15 1 self)
                )
            )
            (case 9
                (send global1:handsOn())
                (mountainCap2:
                    view(301)
                    setLoop(0)
                    setCel(6)
                    setPri(6)
                    stopUpd()
                )
                (self:dispose())
            )
        )
    )

)
(instance aTigerScript of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (send global1:handsOff())
                (tiger:
                    init()
                    setCycle(End self)
                )
            )
            (case 1
                (tiger:
                    setLoop(1)
                    setCel(2)
                    setCycle(CT 4 1 self)
                )
            )
            (case 2
                (mySound:
                    number(1170)
                    setLoop(1)
                    play()
                )
                (tiger:setCycle(End self))
            )
            (case 3
                (mySound:
                    number(1171)
                    setLoop(1)
                    play()
                )
                (tiger:
                    setLoop(2)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 4
                (tiger:
                    setLoop(1)
                    setCel(0)
                    setCycle(CT 4 1 self)
                )
            )
            (case 5
                (mySound:
                    number(1170)
                    setLoop(1)
                    play()
                )
                (tiger:setCycle(End self))
            )
            (case 6
                (mySound:
                    number(1171)
                    setLoop(1)
                    play()
                )
                (tiger:
                    setLoop(2)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 7
                (tiger:
                    setLoop(1)
                    setCel(0)
                    setCycle(CT 4 1 self)
                )
            )
            (case 8
                (mySound:
                    number(1170)
                    setLoop(1)
                    play()
                )
                (tiger:setCycle(End self))
            )
            (case 9
                (mySound:
                    number(1171)
                    setLoop(1)
                    play()
                )
                (tiger:
                    setLoop(2)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 10
                (mySound:stop())
                = ticks 18
            )
            (case 11
                (tiger:
                    setLoop(3)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 12
                (tiger:
                    setLoop(0)
                    setCel(0)
                    dispose()
                )
                (send global1:handsOn())
                (self:dispose())
            )
        )
    )

)
(instance theTopScript of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (send global1:handsOff())
                (theTop:
                    view(355)
                    setLoop(0)
                    setCel(0)
                    posn(161 88)
                    setCycle(CT 1 1 self)
                )
            )
            (case 1
                (mySound:
                    number(1013)
                    setLoop(1)
                    play()
                )
                (theTop:setCycle(End self))
            )
            (case 2
                = ticks 6
            )
            (case 3
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (prop1:
                    init()
                    setCycle(End)
                )
                = ticks 12
            )
            (case 4
                (theTop:hide())
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (prop2:
                    init()
                    setCycle(End)
                )
                = ticks 12
            )
            (case 5
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (prop3:
                    init()
                    setCycle(End)
                )
                = ticks 12
            )
            (case 6
                (prop3:hide())
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (prop4:
                    init()
                    setCycle(End)
                )
                = ticks 12
            )
            (case 7
                (theTop:hide())
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (prop1:
                    init()
                    setCycle(End)
                )
                (prop4:hide())
                = ticks 12
            )
            (case 8
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (prop6:
                    init()
                    setCycle(End)
                )
                = ticks 12
            )
            (case 9
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (prop5:
                    init()
                    setCycle(End)
                )
                = ticks 12
            )
            (case 10
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (prop7:
                    init()
                    setCycle(End)
                )
                = ticks 12
            )
            (case 11
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (prop7:hide())
                (prop8:
                    init()
                    setCycle(End)
                )
                = ticks 12
            )
            (case 12
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (prop8:hide())
                (prop2:
                    setCel(0)
                    setCycle(End)
                )
                = ticks 12
            )
            (case 13
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (prop1:
                    setCel(0)
                    setCycle(End)
                )
                = ticks 12
            )
            (case 14
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (prop4:
                    setCel(0)
                    show()
                    setCycle(End)
                )
                = ticks 12
            )
            (case 15
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (prop3:
                    setCel(0)
                    show()
                    setCycle(End)
                )
                (prop4:hide())
                = ticks 12
            )
            (case 16
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (prop3:hide())
                (prop6:
                    setCel(0)
                    setCycle(End)
                )
                = ticks 12
            )
            (case 17
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (prop5:
                    setCel(0)
                    setCycle(End)
                )
                = ticks 12
            )
            (case 18
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (prop7:
                    setCel(0)
                    show()
                    setCycle(End)
                )
                = ticks 12
            )
            (case 19
                (prop7:hide())
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (prop8:
                    setCel(0)
                    show()
                    setCycle(End)
                )
                = ticks 12
            )
            (case 20
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (prop8:hide())
                (prop1:
                    setCel(0)
                    hide()
                    dispose()
                )
                (prop2:
                    setCel(0)
                    hide()
                    dispose()
                )
                (prop3:
                    setCel(0)
                    hide()
                    dispose()
                )
                (prop4:
                    setCel(0)
                    hide()
                    dispose()
                )
                (prop5:
                    setCel(0)
                    hide()
                    dispose()
                )
                (prop6:
                    setCel(0)
                    hide()
                    dispose()
                )
                (prop7:
                    setCel(0)
                    hide()
                    dispose()
                )
                (prop8:
                    setCel(0)
                    hide()
                    dispose()
                )
                = ticks 6
            )
            (case 21
                (theTop:
                    show()
                    setCycle(Beg self)
                )
            )
            (case 22
                (mySound:
                    number(912)
                    setLoop(1)
                    play(self)
                )
            )
            (case 23
                (theTop:
                    view(301)
                    setLoop(0)
                    setCel(11)
                    stopUpd()
                )
                (send global1:handsOn())
                (self:dispose())
            )
        )
    )

)
(instance anEggScript of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (send global1:handsOff())
                (theEgg:
                    init()
                    setCycle(End self)
                )
            )
            (case 1
                (theEgg:
                    setLoop(1)
                    setCel(0)
                    posn(279 160)
                    setCycle(End self)
                )
            )
            (case 2
                (theEgg:
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 3
                (theEgg:
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 4
                (theEgg:
                    setLoop(2)
                    setCel(0)
                )
                (my2Sound:
                    number(984)
                    setLoop(-1)
                    play()
                )
                = ticks 6
            )
            (case 5
                (theEgg:setCycle(CT 6 1 self))
            )
            (case 6
                (theEgg:setCycle(CT 2 -1 self))
            )
            (case 7
                (theEgg:setCycle(CT 6 1 self))
            )
            (case 8
                (theEgg:setCycle(CT 2 -1 self))
            )
            (case 9
                (theEgg:setCycle(CT 6 1 self))
            )
            (case 10
                (my2Sound:stop())
                = ticks 2
            )
            (case 11
                (mySound:
                    number(985)
                    setLoop(1)
                    play()
                )
                (theEgg:setCycle(CT 8 1 self))
            )
            (case 12
                (mySound:
                    number(977)
                    setLoop(1)
                    play()
                )
                (theEgg:setCycle(CT 10 1 self))
            )
            (case 13
                = ticks 100
            )
            (case 14
                (mySound:
                    number(984)
                    setLoop(-1)
                    play()
                )
                (theEgg:
                    setLoop(3)
                    setCel(0)
                    setCycle(CT 4 1 self)
                )
            )
            (case 15
                (theEgg:setCycle(CT 0 -1 self))
            )
            (case 16
                (theEgg:setCycle(CT 4 1 self))
            )
            (case 17
                (theEgg:setCycle(CT 0 -1 self))
            )
            (case 18
                (theEgg:setCycle(CT 4 1 self))
            )
            (case 19
                (mySound:
                    number(985)
                    setLoop(1)
                    play()
                )
                (theEgg:setCycle(CT 6 1 self))
            )
            (case 20
                (mySound:
                    number(977)
                    setLoop(1)
                    play()
                )
                (theEgg:setCycle(CT 8 1 self))
            )
            (case 21
                = ticks 100
            )
            (case 22
                (mySound:
                    number(984)
                    setLoop(-1)
                    play()
                )
                (theEgg:
                    setLoop(4)
                    setCel(0)
                    setCycle(CT 4 1 self)
                )
            )
            (case 23
                (theEgg:setCycle(CT 0 -1 self))
            )
            (case 24
                (theEgg:setCycle(CT 4 1 self))
            )
            (case 25
                (theEgg:setCycle(CT 0 -1 self))
            )
            (case 26
                (theEgg:setCycle(CT 4 1 self))
            )
            (case 27
                (mySound:
                    number(985)
                    setLoop(1)
                    play()
                )
                (theEgg:setCycle(CT 6 1 self))
            )
            (case 28
                (mySound:
                    number(920)
                    setLoop(1)
                    play()
                )
                (theEgg:setCel(7))
                = ticks 3
            )
            (case 29
                (my2Sound:
                    number(986)
                    setLoop(1)
                    play()
                )
                (theEgg:setCycle(CT 12 1 self))
            )
            (case 30
                (theEgg:
                    setLoop(5)
                    setCel(0)
                    setCycle(CT 3 1 self)
                )
            )
            (case 31
                = ticks 100
            )
            (case 32
                (theEgg:
                    setLoop(6)
                    setCel(0)
                    posn(273 140)
                    setCycle(End self)
                )
            )
            (case 33
                (theEgg:
                    setLoop(0)
                    setCel(0)
                    posn(274 139)
                    dispose()
                )
                (send global1:handsOn())
                (self:dispose())
            )
        )
    )

)
(instance aDinerScript of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (send global1:handsOff())
                (diningDino:
                    init()
                    setCycle(CT 6 1 self)
                )
            )
            (case 1
                = ticks 50
            )
            (case 2
                (mySound:
                    number(1027)
                    setLoop(1)
                    play()
                )
                (dTongue:
                    init()
                    setPri(15)
                    ignoreActors()
                    setCycle(CT 4 1 self)
                )
            )
            (case 3
                (mySound:
                    number(1027)
                    setLoop(1)
                    play()
                )
                (dTongue:setCycle(CT 9 1 self))
            )
            (case 4
                (dTongue:setCel(0))
                = ticks 6
            )
            (case 5
                (dTongue:
                    hide()
                    dispose()
                )
                = ticks 50
            )
            (case 6
                (mySound:
                    number(911)
                    setLoop(1)
                    play()
                )
                (diningDino:setCycle(CT 15 1 self))
            )
            (case 7
                (mySound:
                    number(983)
                    setLoop(1)
                    play()
                )
                (diningDino:
                    setLoop(1)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 8
                (diningDino:
                    setLoop(2)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 9
                (diningDino:
                    setLoop(3)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 10
                (diningDino:
                    setLoop(0)
                    setCel(0)
                    dispose()
                )
                (send global1:handsOn())
                (self:dispose())
            )
        )
    )

)
(instance aCaveManScript of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (send global1:handsOff())
                (caveMan:
                    init()
                    setCycle(End self)
                )
            )
            (case 1
                (mySound:
                    number(980)
                    setLoop(-1)
                    play()
                )
                (caveMan:
                    setLoop(1)
                    setCel(0)
                    setCycle(Fwd)
                )
                = ticks 90
            )
            (case 2
                (mySound:stop())
                (caveMan:
                    setLoop(2)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 3
                = ticks 20
            )
            (case 4
                (mySound:
                    number(980)
                    setLoop(-1)
                    play()
                )
                (caveMan:
                    setLoop(1)
                    setCel(0)
                    setCycle(Fwd)
                )
                = ticks 90
            )
            (case 5
                (mySound:stop())
                (caveMan:
                    setLoop(2)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 6
                = ticks 20
            )
            (case 7
                (mySound:
                    number(980)
                    setLoop(-1)
                    play()
                )
                (caveMan:
                    setLoop(1)
                    setCel(0)
                    setCycle(Fwd)
                )
                = ticks 45
            )
            (case 8
                (mySound:
                    number(944)
                    setLoop(1)
                    play()
                )
                (caveMan:
                    setLoop(3)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 9
                (caveMan:
                    setLoop(4)
                    setCel(0)
                )
                = ticks 50
            )
            (case 10
                (caveMan:setCycle(CT 1 1 self))
            )
            (case 11
                (mySound:
                    number(956)
                    setLoop(1)
                    play()
                )
                (caveMan:setCycle(CT 4 1 self))
            )
            (case 12
                = ticks 50
            )
            (case 13
                (caveMan:
                    setLoop(5)
                    setCel(0)
                    setCycle(End self)
                )
            )
            (case 14
                (caveMan:
                    setLoop(0)
                    setCel(0)
                    dispose()
                )
                (send global1:handsOn())
                (self:dispose())
            )
        )
    )

)
(instance cloudScript of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (send global1:handsOff())
                PalVary(pvINIT 310 1)
                = ticks 60
            )
            (case 1
                (mySound:
                    number(979)
                    setLoop(1)
                    play()
                )
                (cloud:
                    view(305)
                    setLoop(0)
                    setCel(0)
                    setPri(8)
                    setCycle(End self)
                )
            )
            (case 2
                (cloud:
                    setLoop(1)
                    setCel(0)
                    setCycle(CT 2 1 self)
                )
                Load(rsSOUND 926)
            )
            (case 3
                (mySound:
                    number(926)
                    play()
                    setLoop(1)
                )
                (cloud:setCycle(CT 7 1 self))
            )
            (case 4
                (mySound:
                    number(988)
                    setLoop(1)
                    play()
                )
                (cloud:setCycle(CT 8 1 self))
            )
            (case 5
                (cloud:
                    setLoop(1)
                    setCel(5)
                    setCycle(CT 7 1 self)
                )
                (mySound:
                    number(926)
                    setLoop(1)
                    play()
                )
            )
            (case 6
                (mySound:
                    number(988)
                    setLoop(1)
                    play()
                )
                (cloud:setCycle(CT 8 1 self))
            )
            (case 7
                (cloud:
                    setLoop(1)
                    setCycle(CT 7 1 self)
                )
                (mySound:
                    number(926)
                    setLoop(1)
                    play()
                )
            )
            (case 8
                (mySound:
                    number(988)
                    setLoop(1)
                    play()
                )
                (cloud:setCycle(CT 8 1 self))
            )
            (case 9
                (mySound:
                    number(926)
                    setLoop(1)
                    play()
                )
                (cloud:
                    setLoop(0)
                    setCel(0)
                )
                PalVary(pvREVERSE 1)
                = ticks 60
            )
            (case 10
                (cloud:
                    view(301)
                    setLoop(0)
                    setCel(1)
                    setPri(6)
                    stopUpd()
                )
                (mySound:stop())
                (send global1:handsOn())
                (self:dispose())
            )
        )
    )

)
(instance aWord0 of InterFeature
    (properties
        nsTop 164
        nsLeft 26
        nsBottom 171
        nsRight 56
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1123)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(0)
            posn(41 172)
            init()
        )
    )

)
(instance aWord1 of InterFeature
    (properties
        nsTop 164
        nsLeft 63
        nsBottom 171
        nsRight 94
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1069)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(1)
            posn(78 172)
            init()
        )
    )

)
(instance aWord2 of InterFeature
    (properties
        nsTop 164
        nsLeft 97
        nsBottom 171
        nsRight 113
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1070)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(2)
            posn(105 172)
            init()
        )
    )

)
(instance aWord3 of InterFeature
    (properties
        nsTop 164
        nsLeft 118
        nsBottom 171
        nsRight 138
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1061)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(3)
            posn(126 172)
            init()
        )
    )

)
(instance aWord4 of InterFeature
    (properties
        nsTop 164
        nsLeft 141
        nsBottom 171
        nsRight 201
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1071)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(4)
            posn(170 172)
            init()
        )
    )

)
(instance aWord5 of InterFeature
    (properties
        nsTop 164
        nsLeft 203
        nsBottom 171
        nsRight 228
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1055)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(5)
            posn(216 172)
            init()
        )
    )

)
(instance aWord6 of InterFeature
    (properties
        nsTop 164
        nsLeft 231
        nsBottom 171
        nsRight 258
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1123)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(6)
            posn(245 172)
            init()
        )
    )

)
(instance aWord7 of InterFeature
    (properties
        nsTop 164
        nsLeft 264
        nsBottom 171
        nsRight 295
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1069)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(1)
            posn(280 172)
            init()
        )
    )

)
(instance aWord8 of InterFeature
    (properties
        nsTop 176
        nsLeft 38
        nsBottom 182
        nsRight 76
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1072)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(7)
            posn(57 183)
            init()
        )
    )

)
(instance aWord9 of InterFeature
    (properties
        nsTop 176
        nsLeft 78
        nsBottom 182
        nsRight 98
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1061)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(3)
            posn(88 183)
            init()
        )
    )

)
(instance aWord10 of InterFeature
    (properties
        nsTop 176
        nsLeft 102
        nsBottom 182
        nsRight 162
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1071)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(4)
            posn(131 183)
            init()
        )
    )

)
(instance aWord11 of InterFeature
    (properties
        nsTop 176
        nsLeft 169
        nsBottom 182
        nsRight 201
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1123)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(0)
            posn(185 183)
            init()
        )
    )

)
(instance aWord12 of InterFeature
    (properties
        nsTop 176
        nsLeft 204
        nsBottom 182
        nsRight 237
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1069)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(1)
            posn(222 183)
            init()
        )
    )

)
(instance aWord13 of InterFeature
    (properties
        nsTop 176
        nsLeft 240
        nsBottom 182
        nsRight 258
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1070)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(2)
            posn(249 183)
            init()
        )
    )

)
(instance aWord14 of InterFeature
    (properties
        nsTop 176
        nsLeft 256
        nsBottom 182
        nsRight 282
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1061)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(3)
            posn(271 183)
            init()
        )
    )

)
(instance aWord15 of InterFeature
    (properties
        nsTop 187
        nsLeft 19
        nsBottom 200
        nsRight 78
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1071)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(4)
            posn(49 194)
            init()
        )
    )

)
(instance aWord16 of InterFeature
    (properties
        nsTop 187
        nsLeft 85
        nsBottom 200
        nsRight 106
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1055)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(5)
            posn(96 194)
            init()
        )
    )

)
(instance aWord17 of InterFeature
    (properties
        nsTop 187
        nsLeft 110
        nsBottom 200
        nsRight 139
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1123)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(6)
            posn(124 194)
            init()
        )
    )

)
(instance aWord18 of InterFeature
    (properties
        nsTop 187
        nsLeft 142
        nsBottom 200
        nsRight 173
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1069)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(1)
            posn(159 194)
            init()
        )
    )

)
(instance aWord19 of InterFeature
    (properties
        nsTop 187
        nsLeft 179
        nsBottom 200
        nsRight 213
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1072)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(7)
            posn(197 194)
            init()
        )
    )

)
(instance aWord20 of InterFeature
    (properties
        nsTop 187
        nsLeft 217
        nsBottom 200
        nsRight 237
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1061)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(3)
            posn(228 194)
            init()
        )
    )

)
(instance aWord21 of InterFeature
    (properties
        nsTop 187
        nsLeft 240
        nsBottom 200
        nsRight 299
    )

    (method (doVerb)
        (send global1:handsOff())
        (mySound:
            number(1071)
            setLoop(1)
            play(rm3)
        )
        (theView:
            view(370)
            setLoop(4)
            posn(271 194)
            init()
        )
    )

)
(instance anEgg of InterFeature
    (properties
        nsTop 124
        nsLeft 246
        nsBottom 158
        nsRight 299
    )

    (method (doVerb)
        (send global2:setScript(anEggScript))
    )

)
(instance aPicture of InterFeature
    (properties
        nsTop 100
        nsLeft 129
        nsBottom 125
        nsRight 200
    )

    (method (doVerb)
        (send global2:setScript(aPictureScript))
    )

)
(instance aCaveMan of InterFeature
    (properties
        nsTop 106
        nsLeft 28
        nsBottom 129
        nsRight 82
    )

    (method (doVerb)
        (send global2:setScript(aCaveManScript))
    )

)
(instance aDiner of InterFeature
    (properties
        nsTop 129
        nsLeft 49
        nsBottom 156
        nsRight 77
    )

    (method (doVerb)
        (send global2:setScript(aDinerScript))
    )

)
(instance aTiger of InterFeature
    (properties
        nsTop 125
        nsLeft 119
        nsBottom 147
        nsRight 201
    )

    (method (doVerb)
        (send global2:setScript(aTigerScript))
    )

)
(instance aVacumn of InterFeature
    (properties
        nsTop 96
        nsLeft 250
        nsBottom 124
        nsRight 297
    )

    (method (doVerb)
        (send global2:setScript(aVacumnScript))
    )

)
(instance aBird of InterFeature
    (properties
        nsLeft 33
        nsBottom 71
        nsRight 288
    )

    (method (doVerb)
        (send global2:setScript(aBirdScript))
    )

)
(instance rock of InterView
    (properties
        x 19
        y 172
        view 360
        loop 3
        priority 15
        signal $0011
    )

    (method (doVerb)
        (send global2:setScript(rockScript))
    )

)
(instance theView of Prop
    (properties
        cel 1
        priority 15
        signal $0010
    )
)
(instance theProp of Prop
    (properties
        cel 1
        priority 15
        signal $0010
    )
)
(instance cloud of InterProp
    (properties
        x 99
        y 72
        view 301
        cel 1
        priority 6
        signal $4011
    )

    (method (doVerb)
        (send global2:setScript(cloudScript))
    )

)
(instance theTop of InterProp
    (properties
        x 161
        y 88
        view 301
        cel 11
        signal $1001
    )

    (method (doVerb)
        (send global2:setScript(theTopScript))
    )

)
(instance vacDino of Prop
    (properties
        x 277
        y 102
        view 350
        priority 10
        signal $0011
    )
)
(instance tiger of Prop
    (properties
        x 158
        y 160
        view 345
        signal $0001
    )
)
(instance caveMan of Prop
    (properties
        x 49
        y 100
        view 310
        priority 10
        signal $0011
    )
)
(instance myPicture of Prop
    (properties
        x 161
        y 162
        view 325
        signal $0001
    )
)
(instance diningDino of Prop
    (properties
        x 51
        y 164
        view 315
        signal $0001
    )
)
(instance dTongue of Prop
    (properties
        x 52
        y 131
        view 315
        loop 4
    )
)
(instance theEgg of Prop
    (properties
        x 274
        y 139
        view 320
        signal $0001
    )
)
(instance prop1 of Prop
    (properties
        x 69
        y 164
        view 355
        loop 1
        priority 8
        signal $0011
    )
)
(instance prop2 of Prop
    (properties
        x 261
        y 165
        view 355
        loop 2
        priority 8
        signal $0011
    )
)
(instance prop3 of Prop
    (properties
        x 39
        y 133
        view 355
        loop 3
        priority 8
        signal $0011
    )
)
(instance prop4 of Prop
    (properties
        x 284
        y 133
        view 355
        loop 4
        priority 8
        signal $0011
    )
)
(instance prop5 of Prop
    (properties
        x 47
        y 162
        view 355
        loop 1
        priority 8
        signal $0011
    )
)
(instance prop6 of Prop
    (properties
        x 254
        y 162
        view 355
        loop 2
        priority 8
        signal $0011
    )
)
(instance prop7 of Prop
    (properties
        x 23
        y 131
        view 355
        loop 3
        priority 8
        signal $0011
    )
)
(instance prop8 of Prop
    (properties
        x 302
        y 131
        view 355
        loop 4
        priority 8
        signal $0011
    )
)
(instance mountainCap1 of InterProp
    (properties
        x 279
        y 93
        view 301
        signal $5001
    )

    (method (doVerb)
        (send global2:setScript(mountainCap1Script))
    )

)
(instance mountainCap2 of InterProp
    (properties
        x 50
        y 109
        view 301
        cel 6
        signal $5001
    )

    (method (doVerb)
        (send global2:setScript(mountainCap2Script))
    )

)
(instance echo of Actor
    (properties
        x 82
        y 90
        view 330
        loop 1
        signal $4001
    )
)
(instance echo2 of Actor
    (properties
        x 82
        y 90
        view 330
        loop 1
        signal $4001
    )
)
(instance echo3 of Actor
    (properties
        x 82
        y 90
        view 330
        loop 1
        signal $4001
    )
)
(instance theCar of InterActor
    (properties
        x 224
        y 158
        view 301
        cel 7
        signal $5001
    )

    (method (doVerb)
        (send global2:setScript(theCarScript))
    )

)
(instance myBird of Actor
    (properties
        x 302
        y 100
        view 340
        priority 11
        signal $4010
    )
)
(instance bat1 of Actor
    (properties
        x 269
        y 90
        view 300
        loop 1
        cel 1
        signal $6000
    )
)
(instance mySound of Sound
    (properties)
)
(instance my2Sound of Sound
    (properties)
)
(instance birdSound of Sound
    (properties
        number 978
    )
)
