(include "sci.sh")
(use "Main")
(use "eureka")
(use "n255")
(use "Scaler")
(use "Osc")
(use "RandCycle")
(use "Polygon")
(use "CueObj")
(use "MoveFwd")
(use "n958")
(use "Sound")
(use "Cycle")
(use "Sounds")
(use "View")
(use "Obj")
(script 225)


(local
    local0
    local1
    local2
    local3
    local4[9] = (58 71 84 60 73 85 63 74 87 )
    local13[20] = (124 110 4 124 111 5 124 112 113 115 153 154 1 153 159 2 151 159 123 157 )

)
(procedure (localproc_01cc)
    (if (== (eureka:garbage) 1)
        (garb1:init())
        (garb2:init())
        (groundGarbage:init())
        (groundPeel:init())
    )
)


(procedure (localproc_01fb)
    (if (proc0_1(61))
        (if (<> (send gSq5Music1:number) 20)
            (send gSq5Music1:
                number(20)
                loop(-1)
                play()
            )
        )
    )(else
        (if (proc0_1(84))
            (if (<> (send gSq5Music1:number) 42)
                (send gSq5Music1:
                    number(42)
                    loop(-1)
                    play()
                )
            )
        )(else
            (send gSq5Music1:
                number(101)
                loop(-1)
                play(127)
            )
        )
    )
)


(instance theMusic3 of Sound
    (properties)
)
(instance public rm225 of Rm
    (properties
        noun 17
        picture 42
        style 10
        vanishingY 50
    )

    (method (init param1)
        (send gRoom:setRegions(210))
        proc958_0(128 235 0 2 180 230 233 238 239)
        (send gRoom:addObstacle(
            (if (== global130 1)
                (send ((Polygon:new())):
                    type(3)
                    init(222 182 186 165 155 124 147 124 133 108 107 109 110 120 92 134 91 142 117 143 125 169 95 180)
                    yourself()
                )
            )(else
                (send ((Polygon:new())):
                    type(3)
                    init(222 182 186 165 155 124 147 124 135 109 107 109 110 120 92 134 91 142 117 143 125 169 95 180)
                    yourself()
                )
            )
))
        (send gRoom:setScript(sInitRoom))
        (super:init(rest param1))
        (send gWalkHandler:addToFront(northDoor scienceDoor))
    )


    (method (doit)
        (super:doit())
        (if (script)
            0
        )(else
            (if ((elevator:onMe(gEgo)) and local0)
                (send gRoom:setScript(sElevDown))
            )(else
                (if (((proc0_1(113) and (acidHole1:onMe(gEgo))) and (<= 91 (send gEgo:heading))) and (<= (send gEgo:heading) 269))
                    (send gRoom:setScript(fallInHole 0 acidHole1))
                )(else
                    (if (proc0_1(114) and (acidHole2:onMe(gEgo)))
                        (send gRoom:setScript(fallInHole 0 acidHole2))
                    )(else
                        (if (not proc0_1(86) and not proc0_1(60))
                            (send gRoom:setScript(ScriptID(227 1)))
                        )(else
                            (if (((pukeDrip:onMe(gEgo)) or (blobReach:onMe(gEgo))) and local2)
                                (blobReach:dispose())
                                = local2 0
                                (send gRoom:setScript(sApproachPuke))
                            )
                        )
                    )
                )
            )
        )
    )


    (method (dispose)
        (send gWalkHandler:delete(northDoor scienceDoor openDoor))
        DisposeScript(227)
        (switch ((eureka:puke))
            (case 4
                ((eureka:puke(5))  )
            )
            (case 5
                ((eureka:puke(6)) )
            )
        )
        (super:dispose())
    )

)
(instance sInitRoom of Script
    (properties)

    (method (changeState newState)
        (var temp0)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) (toolBox:
                    init()
                    setOnMeCheck(1 2)
                )
 (elevator:init()) (northDoor:init()) (scienceDoor:init()) (pipes:init()) (emptyTrash:init()) (serviceTunnel:init()) 
                (if (proc0_1(113))
                    (acidHole1:
                        setCel((acidHole1:lastCel()))
                        init()
                    )
                )
 
                (if (proc0_1(114))
                    (acidHole2:
                        setCel((acidHole2:lastCel()))
                        init()
                    )
                )
 
                (if (== (eureka:puke) 7)
                    = local2 1
                )
 
                (switch (gGModNum)
                    (case 200
                        (proc0_6(0 2) (send gEgo:
                            init()
                            posn(121 105)
                            setScale(Scaler 153 42 168 107)
                        )
 = next sEnterNorth  )
                    )
                    (case 226
                        (proc0_6(0 1) (send gEgo:
                            init()
                            setScale(Scaler 153 42 168 107)
                            posn(120 155)
                        )
 (send gSQ5:handsOn())  )
                    )
                    (case 228
                        ((send gEgo:
                            view(241)
                            init()
                            posn(145 115)
                            setLoop(1)
                            cel(9)
                            show()
                        )
 = next sEnterEast  )
                    )
                    (case 230
                        (proc0_6(0 2) (send gEgo:
                            init()
                            posn(167 141)
                            setScale(Scaler 153 42 168 107)
                        )
 = global126 4 = next sSpikeScoots  )
                    )
                    (case 240
                        (proc0_6(0 0) (send gEgo:
                            init()
                            posn(66 133)
                            setScale(Scaler 153 42 168 107)
                        )
 = next sEnterWest  )
                    )
                    (case 250
                        (proc0_6(0) (send gEgo:
                            init()
                            setScale(Scaler 153 42 168 107)
                            hide()
                        )
 (elevLighttl:init()) (elevLighttr:init()) (elevLightbl:init()) (elevLightbr:init()) (elevButtonLight:init()) = next sUpElev  )
                    )
                    (default 
                        (
                        (if (>= (= temp0 proc255_1("Eureka State: \n\n\n(0) Meet Cliffy \n(1) Spike's Here \n(2) Cliffy Hammering \n(3) Puke Bulging \n(4) Puke Dripping \n(5) Puke Grabbing\n")) 0)
                            = local3 temp0
                        )(else
                            = local3 0
                        )
 
                        (switch (local3)
                            (case 0
                                (= gEurekaCurLocation 0 = next sEnterNorth proc0_3(60) proc0_6(0 2) (send gEgo:
                                    init()
                                    posn(121 105)
                                    setScale(Scaler 153 42 168 107)
                                )
  )
                            )
                            (case 1
                                (= gEurekaCurLocation 16 = global126 1 = global130 4 = global170 1 = global127 1 = next sEnterNorth proc0_2(60) proc0_2(35) proc0_6(0 2) (send gEgo:
                                    init()
                                    posn(121 105)
                                    setScale(Scaler 153 42 168 107)
                                )
  )
                            )
                            (case 2
                                (= next sEnterNorth = gEurekaCurLocation 16 = global126 4 = global130 1 proc0_2(60) proc0_6(0 2) (send gEgo:
                                    init()
                                    posn(121 105)
                                    setScale(Scaler 153 42 168 107)
                                )
  )
                            )
                            (case 3
                                ((eureka:puke(4)) = gEurekaCurLocation 14 = global126 0 = global130 0 = next sEnterNorth proc0_2(60) proc0_6(0 2) (send gEgo:
                                    init()
                                    posn(121 105)
                                    setScale(Scaler 153 42 168 107)
                                )
  )
                            )
                            (case 4
                                ((eureka:puke(5)) = next sEnterNorth = gEurekaCurLocation 14 = global126 0 = global130 0 proc0_6(0 2) (send gEgo:
                                    init()
                                    posn(121 105)
                                    setScale(Scaler 153 42 168 107)
                                )
 proc0_2(60)  )
                            )
                            (case 5
                                ((eureka:puke(6)) proc0_2(60) = gEurekaCurLocation 14 = global126 0 = global130 0 proc0_2(73) (send gEgo:
                                    view(239)
                                    init()
                                    posn(145 115)
                                    setLoop(0)
                                    cel(9)
                                    show()
                                )
 = next sEnterEast  )
                            )
                            (default 
                                (proc0_6(0 2) (send gEgo:
                                    init()
                                    posn(121 105)
                                    setScale(Scaler 153 42 168 107)
                                )
 proc0_2(60) = next sEnterNorth )
                            )
                        )
 )
                    )
                )
 (trashDoorBottom:init()) (trashDoorTop:init()) localproc_01cc() (blobReach:init()) (garbageButton:init()) (elevButton:init()) (redCross:init()) (redLight:init()) (light1:init()) (send (ScriptID(227 0)):init()) = cycles 1  )
            )
            (case 1
                ((spike:init()) localproc_01fb() = cycles 1  )
            )
            (case 2
                ((self:dispose()) )
            )
        )
    )

)
(instance sExitNorth of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) 
                (if ((send gEgo:has(20)))
                    (send gTestMessager:say(17 4 3 0 self))
                )(else
                    = cycles 1
                )
 )
            )
            (case 1
                (
                (if ((send gEgo:has(20)))
                    (send gSQ5:handsOn())
                    (self:dispose())
                )(else
                    = cycles 1
                )
 )
            )
            (case 2
                ((northDoor:setCycle(End self))  )
            )
            (case 3
                (
                (if ((send gCast:contains(ScriptID(227 0))) and (== (send (ScriptID(227 0)):view) 241))
                    (send (ScriptID(227 0)):setCycle(Beg))
                )
 (send gEgo:setMotion(MoveTo 121 105 self))  )
            )
            (case 4
                ((send gRoom:newRoom(200)) (self:dispose()) )
            )
        )
    )

)
(instance spikeStuff of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (
                (if (proc0_1(114) and not proc0_1(113))
                    proc0_2(113)
                    = register acidHole1
                )(else
                    (if (proc0_1(113))
                        = register 0
                    )(else
                        proc0_2(114)
                        = register acidHole2
                    )
                )
 
                (if (register)
                    (send gSq5Music2:
                        number(256)
                        loop(1)
                        play()
                    )
                    (send register:
                        init()
                        setCycle(End self)
                    )
                )(else
                    = cycles 1
                )
 )
            )
            (case 1
                (
                (if (register)
                    (send register:stopUpd())
                )
 (spike:
                    setCycle(Walk)
                    setMotion(MoveTo 129 195 self)
                )
  )
            )
            (case 2
                ((send gTestMessager:say(10 0 0 1 self))  )
            )
            (case 3
                (
                (if ((send gCast:contains(ScriptID(227 0))) and (<> (send (ScriptID(227 0)):view) 241))
                    (send gTestMessager:say(4 0 2 0 self))
                )(else
                    = cycles 1
                )
 )
            )
            (case 4
                (= global126 3 (spike:dispose()) (self:dispose()) )
            )
        )
    )

)
(instance sEnterNorth of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) 
                (if (== global126 4)
                    (self:setScript(spikeStuff self))
                )(else
                    = cycles 1
                )
 )
            )
            (case 1
                ((send gEgo:setMotion(MoveFwd 10 self))  )
            )
            (case 2
                ((northDoor:setCycle(Beg self))  )
            )
            (case 3
                (= cycles 1  )
            )
            (case 4
                (
                (if (== global126 1)
                    (if (== global130 1)
                        (send gTestMessager:say(11 0 0 0 self))
                    )(else
                        (self:setScript(ScriptID(227 4) self))
                    )
                )(else
                    = cycles 1
                )
 )
            )
            (case 5
                (
                (if (proc999_5((eureka:puke) 5 6) and (<> (theMusic3:number) 250))
                    (trashDoorTop:cue())
                )
 (northDoor:stopUpd()) (send gSQ5:handsOn()) (self:dispose()) )
            )
        )
    )

)
(instance sExitWest of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) (scienceDoor:setCycle(End self))  )
            )
            (case 1
                ((send gEgo:setMotion(MoveTo 66 133 self))  )
            )
            (case 2
                ((send gRoom:newRoom(240)) (self:dispose()) )
            )
        )
    )

)
(instance sEnterWest of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) 
                (if (== global126 4)
                    (self:setScript(spikeStuff self))
                )(else
                    = cycles 1
                )
 )
            )
            (case 1
                ((send gEgo:setMotion(MoveFwd 30 self))  )
            )
            (case 2
                ((scienceDoor:setCycle(Beg self))  )
            )
            (case 3
                (
                (if ((send gEgo:has(20)))
                    (send gTestMessager:say(17 0 3 0 self))
                )(else
                    = cycles 1
                )
 )
            )
            (case 4
                (
                (if (proc999_5((eureka:puke) 5 6) and (<> (theMusic3:number) 250))
                    (trashDoorTop:cue())
                )
 (scienceDoor:stopUpd()) (send gSQ5:handsOn()) (self:dispose()) )
            )
        )
    )

)
(instance sExitEast of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (= seconds 1 (send gSQ5:handsOff())  )
            )
            (case 1
                ((send gEgo:
                    view(241)
                    posn(145 115)
                    setLoop(1)
                    cel(0)
                    setScale(0)
                    setCycle(End self)
                )
  )
            )
            (case 2
                ((send gRoom:newRoom(228)) (self:dispose()) )
            )
        )
    )

)
(instance sEnterEast of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) = seconds 2  )
            )
            (case 1
                ((send gEgo:setCycle(Beg self)) 
                (if ((== global126 1) and (== global130 1))
                )
 )
            )
            (case 2
                (proc0_6(0 0) (send gEgo:
                    posn(135 115)
                    setScale(Scaler 153 42 168 107)
                )
 = seconds 1  )
            )
            (case 3
                (
                (if (proc0_1(73) and (== (eureka:puke) 6))
                    = next sPukeAttacks
                )
 = cycles 1  )
            )
            (case 4
                ((send gSQ5:handsOn()) (self:dispose()) )
            )
        )
    )

)
(instance sElevDown of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) = local0 0 (send gEgo:setMotion(MoveTo 129 130 self))  )
            )
            (case 1
                ((send gEgo:heading(180)) = cycles 1  )
            )
            (case 2
                ((send gEgo:hide()) (elevator:
                    setPri(7)
                    setLoop(1)
                    setCel(2)
                )
 = cycles 20  )
            )
            (case 3
                ((elevator:setMotion(MoveTo 130 189 self)) (theMusic3:
                    number(127)
                    loop(1)
                    play()
                )
  )
            )
            (case 4
                ((send gRoom:newRoom(250)) (self:dispose()) )
            )
        )
    )

)
(instance sUpElev of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) 
                (if (== global126 4)
                    (self:setScript(spikeStuff self))
                )(else
                    = cycles 1
                )
 )
            )
            (case 1
                ((elevator:
                    setPri(7)
                    setMotion(MoveTo 130 136 self)
                )
 (send gEgo:
                    posn(129 130)
                    setHeading(180)
                )
  )
            )
            (case 2
                ((theMusic3:
                    number(241)
                    setLoop(1)
                    play()
                )
 = seconds 1  )
            )
            (case 3
                (= cycles 1 (elevator:setCel(1)) (elevLighttl:dispose()) (elevLighttr:dispose()) (elevLightbl:dispose()) (elevLightbr:dispose()) (elevButtonLight:dispose()) (send gEgo:show(self))  )
            )
            (case 4
                ((send gSQ5:handsOn()) (theMusic3:dispose()) (self:dispose()) )
            )
        )
    )

)
(instance sCycleLights of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (Palette(6 114 116 1) Palette(6 231 235 -1) = cycles 1  )
            )
            (case 1
                (= state (- state 2) = cycles 1 )
            )
        )
    )

)
(instance sOpenGarbageDoors of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) (send gEgo:
                    view(235)
                    posn(165 134)
                    cel(0)
                    setScale(0)
                    setLoop(0)
                    setCycle(CT 3 1 self)
                )
  )
            )
            (case 1
                ((send gEgo:
                    cel(3)
                    setCycle(CT 0 -1 self)
                )
  )
            )
            (case 2
                (proc0_6(0 0) (send gEgo:
                    setScale(Scaler 153 42 168 107)
                    posn(165 138)
                )
 
                (if (proc999_5((eureka:puke) 4 5 6))
                    = next sPukeAttacks
                    (self:dispose())
                )(else
                    (if (== (eureka:gdoor) 0)
                        (trashDoorTop:heading(0))
                        (eureka:gdoor(1))
                        = cycles 1
                    )(else
                        (trashDoorTop:heading(180))
                        (eureka:gdoor(0))
                        = cycles 1
                    )
                )
 )
            )
            (case 3
                ((trashDoorTop:
                    setStep(1 5)
                    setMotion(MoveFwd 17 self)
                )
 (theMusic3:
                    number(108)
                    setLoop(1)
                    play()
                )
  )
            )
            (case 4
                ((send gSQ5:handsOn()) (self:dispose()) )
            )
        )
    )

)
(instance fallInHole of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) = register 
                    (if (== register acidHole1)
                        0
                    )(else
                        10
                    )
 (send gEgo:setMotion(MoveTo local13[(+ register 0)] local13[(+ register 1)] self))  )
            )
            (case 1
                ((send gEgo:
                    view(240)
                    loop(local13[+ register 2])
                    cel(0)
                    posn(local13[+ register 3] local13[+ register 4])
                    setCycle(End self)
                )
 
                (if (not register)
                    (send gEgo:setScale(0))
                )(else
                    (send gEgo:setScale(Scaler 153 42 168 107))
                )
 )
            )
            (case 2
                ((send gEgo:hide()) (send (ScriptID(227 2)):pause(1)) (theMusic3:
                    number(102)
                    loop(1)
                    play()
                )
 = seconds 2  )
            )
            (case 3
                ((theMusic3:
                    number(116)
                    loop(1)
                    play()
                )
 = seconds 4  )
            )
            (case 4
                ((send (ScriptID(227 2)):pause(0)) (send gEgo:
                    show()
                    loop(local13[+ register 5])
                    cel(0)
                    setCycle(End self)
                )
  )
            )
            (case 5
                (proc0_6(0 5) (send gEgo:
                    posn(local13[+ register 6] local13[+ register 7])
                    setScale(Scaler 153 42 168 107)
                    setMotion(MoveTo local13[+ register 8] local13[+ register 9] self)
                )
  )
            )
            (case 6
                ((send gEgo:setHeading(90 self))  )
            )
            (case 7
                ((send gTestMessager:say(1 0 4 0 self))  )
            )
            (case 8
                ((send gSQ5:handsOn()) (self:dispose()) )
            )
        )
    )

)
(instance sGarbageFalls of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) = seconds 1 (eureka:garbage(1))  )
            )
            (case 1
                ((send gEgo:
                    view(235)
                    posn(165 134)
                    cel(0)
                    setScale(0)
                    setLoop(0)
                    setCycle(CT 3 1 self)
                )
  )
            )
            (case 2
                ((trashDoorTop:
                    yStep(15)
                    heading(0)
                    setMotion(MoveFwd 17 self)
                )
 
                (if (== global126 1)
                    (send gSq5Music2:
                        number(2451)
                        loop(-1)
                        play()
                    )
                )
 (eureka:gdoor(1))  )
            )
            (case 3
                ((send gEgo:setCycle(CT 7 1 self)) (theMusic3:
                    number(244)
                    setLoop(1)
                    play()
                )
  )
            )
            (case 4
                ((send gEgo:
                    setCel(8)
                    setCycle(0)
                )
 (garb1:init()) = ticks 1  )
            )
            (case 5
                ((send gEgo:setCel(9)) (garb2:init()) = ticks 1  )
            )
            (case 6
                ((send gEgo:setCel(10)) (garb3:init()) = ticks 1  )
            )
            (case 7
                ((send gEgo:setCycle(End self))  )
            )
            (case 8
                ((groundGarbage:init()) (send gEgo:
                    setLoop(1)
                    setCel(0)
                )
 = ticks 1  )
            )
            (case 9
                ((send gEgo:
                    setLoop(1)
                    setCel(1)
                )
 = ticks 1  )
            )
            (case 10
                ((justBody:init()) (send gEgo:
                    setLoop(2)
                    setCel(0)
                    posn(148 131)
                    setCycle(CT 3 1 self)
                )
  )
            )
            (case 11
                ((groundPeel:init()) (send gEgo:
                    cycleSpeed(9)
                    setCycle(CT 7 1 self)
                )
  )
            )
            (case 12
                (= seconds 2  )
            )
            (case 13
                ((justBody:hide()) (send gEgo:
                    setLoop(3)
                    setCel(0)
                    posn(167 141)
                    cycleSpeed(12)
                    setCycle(CT 9 1 self)
                )
  )
            )
            (case 14
                (
                (if (== global126 1)
                    (send gRoom:setScript(sSpikeAttacks))
                    (self:dispose())
                )(else
                    = cycles 1
                )
 )
            )
            (case 15
                (proc0_6(0 0) (send gEgo:
                    posn(165 138)
                    setScale(Scaler 153 42 168 107)
                )
 (send gSQ5:handsOn()) (self:dispose()) )
            )
        )
    )

)
(instance sSpikeAttacks of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gEgo:
                    setLoop(3)
                    setCel(10)
                    cycleSpeed(8)
                    setCycle(CT 15 1 self)
                )
 (send gSq5Music2:
                    number(22)
                    setLoop(-1)
                    play()
                )
  )
            )
            (case 1
                (= seconds 2  )
            )
            (case 2
                ((theMusic3:
                    number(246)
                    setLoop(1)
                    play()
                )
 (send gEgo:
                    setLoop(4)
                    cel(0)
                    setCycle(CT 1 1 self)
                )
  )
            )
            (case 3
                ((theMusic3:
                    number(228)
                    setLoop(1)
                    play()
                )
 (send gSq5Music2:
                    number(90)
                    setLoop(1)
                    play()
                )
 (send gEgo:
                    cel(2)
                    cycleSpeed(4)
                    setCycle(CT 10 1 self)
                )
  )
            )
            (case 4
                ((theMusic3:
                    number(2471)
                    loop(-1)
                    play()
                )
 = cycles 1 = register 4  )
            )
            (case 5
                ((send gEgo:
                    cel(2)
                    setCycle(CT 10 1 self)
                )
  )
            )
            (case 6
                (
                (if (--register)
                    = state (- state 2)
                )
 = cycles 1  )
            )
            (case 7
                ((send gEgo:
                    setLoop(5)
                    setCel(0)
                    cycleSpeed(12)
                    setCycle(CT 4 1 self)
                )
  )
            )
            (case 8
                ((theMusic3:
                    number(247)
                    loop(1)
                    play(127)
                )
 (send gEgo:
                    cel(5)
                    setCycle(CT 7 1 self)
                )
 (send gSq5Music2:
                    number(23)
                    setLoop(-1)
                    play(0)
                    fade(127 5 5 0)
                )
  )
            )
            (case 9
                (= global126 4 (theMusic3:dispose()) (send gRoom:newRoom(230)) (self:dispose()) )
            )
        )
    )

)
(instance sPushElev of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) = cycles 1  )
            )
            (case 1
                ((send gEgo:
                    view(230)
                    setLoop(0)
                    cel(0)
                    setScale(0)
                    posn(157 124)
                    setCycle(End self)
                )
  )
            )
            (case 2
                (
                (if (not local0)
                    (elevator:setCel(0))
                    (elevButtonLight:init())
                    (elevLighttl:init())
                    (elevLighttr:init())
                    (elevLightbl:init())
                    (elevLightbr:init())
                    = local0 1
                    = seconds 1
                )(else
                    (elevator:setCel(1))
                    (elevButtonLight:dispose())
                    (elevLighttl:dispose())
                    (elevLighttr:dispose())
                    (elevLightbl:dispose())
                    (elevLightbr:dispose())
                    = local0 0
                    = seconds 1
                )
 )
            )
            (case 3
                ((send gEgo:setCycle(Beg self))  )
            )
            (case 4
                ((send gEgo:
                    posn(154 124)
                    setScale(Scaler 153 42 168 107)
                )
 proc0_6(0) = cycles 1  )
            )
            (case 5
                ((send gSQ5:handsOn()) (self:dispose()) )
            )
        )
    )

)
(instance sGreenLights of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (= register 0 = cycles 1  )
            )
            (case 1
                ((light1:
                    x(65531)
                    y(local4[register])
                    setCel(0)
                )
 = seconds 1  )
            )
            (case 2
                ((light1:
                    setStep(8 1)
                    setMotion(MoveTo 28 local4[register] self)
                )
  )
            )
            (case 3
                ((light1:
                    x(34)
                    y(local4[register])
                    cel(1)
                )
 = cycles 3  )
            )
            (case 4
                ((light1:
                    x(40)
                    y(local4[+ register 3])
                    cel(2)
                    setStep(2 1)
                    setMotion(MoveTo 50 local4[+ register 6] self)
                )
  )
            )
            (case 5
                (= cycles 1 = register (% ++register 3) = state 0 )
            )
        )
    )

)
(instance sPukeAttacks of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) 
                (if (== (eureka:puke) 4)
                    (eureka:puke(6))
                    (pukeDrip:init())
                )
 = seconds 2  )
            )
            (case 1
                ((pukeDrip:
                    view(238)
                    setLoop(1)
                    cel(0)
                    x(213)
                    y(99)
                    cycleSpeed(2)
                    setCycle(CT 2 1 self)
                )
  )
            )
            (case 2
                ((pukeDrip:setCycle(CT 8 1 self)) (trashDoorTop:
                    view(238)
                    setLoop(0)
                    cel(0)
                    x(143)
                    y(113)
                    cycleSpeed(4)
                    setPri(7)
                    signal(| (trashDoorTop:signal) $1000)
                    noun(2)
                    setCycle(End self)
                    show()
                )
 (theMusic3:
                    number(251)
                    setLoop(1)
                    play()
                )
 (send gEgo:setHeading(180)) (eureka:puke(7))  )
            )
            (case 3
                (0  )
            )
            (case 4
                ((send gTestMessager:say(2 0 12 0 self)) (send gSq5Music2:
                    number(249)
                    setLoop(-1)
                    play()
                )
  )
            )
            (case 5
                ((pukeDrip:setCel(9)) (trashDoorTop:setPri(8)) (pukeEyes:init()) (pukeHand:init()) (ambPuke1:init()) (ambPuke2:init()) 
                (if (== (send gEgo:x) 165)
                    = next sPukeRoger
                    (send gEgo:
                        view(239)
                        setLoop(4)
                        setScale(0)
                        setMotion(0)
                        posn(153 142)
                    )
                    (self:dispose())
                )(else
                    = cycles 1
                )
 )
            )
            (case 6
                (= local2 1 (send gSQ5:handsOn()) (self:dispose()) )
            )
        )
    )

)
(instance sApproachPuke of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) (send gEgo:setMotion(MoveTo 110 129 self))  )
            )
            (case 1
                ((pukeHand:
                    setCycle(End)
                    cycleSpeed(2)
                )
 (scienceDoor:setCycle(End self))  )
            )
            (case 2
                ((pukeHand:
                    setLoop(7)
                    cel(0)
                    setCycle(End)
                )
 (send gEgo:
                    view(239)
                    setLoop(2)
                    cel(0)
                    x(102)
                    y(129)
                    cycleSpeed(6)
                    setScale(0)
                    setMotion(0)
                )
 (send gSq5Music2:
                    number(249)
                    setLoop(-1)
                    play()
                )
 = cycles 1  )
            )
            (case 3
                ((send gEgo:setCycle(Osc)) (pukeHand:setCycle(Osc)) (openDoor:init()) (send gWalkHandler:addToFront(openDoor)) = seconds 2  )
            )
            (case 4
                (
                (if (== gGModNum 240)
                    = next sPukeRoger
                    (self:dispose())
                )(else
                    = cycles 1
                )
 )
            )
            (case 5
                ((send gSQ5:handsOn()) (send gUser:canControl(0)) (self:dispose()) )
            )
        )
    )

)
(instance sJumpRoger of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) (send gEgo:setCycle(Beg self))  )
            )
            (case 1
                ((send gEgo:
                    setLoop(1)
                    setCycle(End self)
                )
  )
            )
            (case 2
                ((send gRoom:newRoom(240)) (self:dispose()) )
            )
        )
    )

)
(instance sPukeRoger of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) (send gEgo:setCycle(Beg self))  )
            )
            (case 1
                ((send gEgo:
                    setLoop(4)
                    cel(0)
                    cycleSpeed(6)
                    setCycle(End self)
                )
  )
            )
            (case 2
                (= cycles 1  )
            )
            (case 3
                (proc0_9(9) (self:dispose()) )
            )
        )
    )

)
(instance sSpikeScoots of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) proc0_10(168 20) (spike:
                    setCycle(Walk)
                    setMotion(MoveTo 129 195 self)
                )
  )
            )
            (case 1
                ((send gTestMessager:say(13 0 0 1 self))  )
            )
            (case 2
                ((spike:dispose()) 
                (if (proc0_1(84))
                    (send gSq5Music2:
                        number(105)
                        loop(-1)
                        play()
                    )
                )(else
                    (send gSq5Music2:fade())
                )
 = seconds 3  )
            )
            (case 3
                ((send gSQ5:handsOn()) (self:dispose()) )
            )
        )
    )

)
(instance sBlobNoise of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (= cycles 2  )
            )
            (case 1
                ((theMusic3:
                    number(
                        (if (== (eureka:puke) 4)
                            250
                        )(else
                            249
                        )
)
                    loop(-1)
                    play(0)
                    fade(127 5 5 0)
                )
 = cycles 1  )
            )
            (case 2
                ((self:dispose()) )
            )
        )
    )

)
(instance trashDoorTop of Actor
    (properties
        x 199
        y 86
        noun 15
        view 233
        loop 7
        priority 3
        signal 20496
    )

    (method (init)
        (if (== global126 1)
            (eureka:gdoor(0))
        )
        (if (< (eureka:puke) 4)
            (self:
                view(233 x 199)
                y(
                    (if (== (eureka:gdoor) 0)
                        86
                    )(else
                        69
                    )
)
                stopUpd()
                setLoop(7)
                noun(15)
            )
        )(else
            (trashDoorBottom:dispose())
            (if (proc999_5((eureka:puke) 4 5 6))
                (self:
                    view(237)
                    loop(0)
                    cel(0)
                    x(206)
                    y(99)
                    priority(10)
                    setCycle(Osc)
                    noun(22)
                    setScript(sBlobNoise)
                )
            )(else
                (self:
                    view(238)
                    loop(0)
                    cel(4)
                    x(143)
                    y(113)
                    priority(7)
                    noun(2)
                )
            )
            (if (proc999_5((eureka:puke) 5 6 7))
                (pukeDrip:init())
            )
        )
        (super:init())
    )


    (method (doit param1)
        (super:doit(rest param1))
        (if ((not cel and proc999_5((eureka:puke) 5 6)) and (<> (theMusic3:number) 250))
            (self:cue())
        )
    )


    (method (dispose param1)
        (theMusic3:dispose())
        (super:dispose(rest param1))
    )


    (method (cue)
        (theMusic3:
            number(250)
            loop(1)
            play(self)
        )
    )

)
(instance pukeDrip of Prop
    (properties
        x 205
        y 99
        noun 2
        view 237
        loop 1
        cel 4
        priority 11
        signal 20496
    )

    (method (init param1)
        (if (< (eureka:puke) 7)
            (self:
                view(237)
                setLoop(
                    (if (== (eureka:puke) 5)
                        1
                    )(else
                        2
                    )
)
                cycleSpeed(10)
                setCycle(Fwd)
            )
            (pukeSpill:init())
        )(else
            (self:
                view(238)
                loop(1)
                cel(9)
                x(213)
                y(99)
                priority(11)
            )
            (send gSq5Music2:
                number(249)
                setLoop(-1)
                play()
            )
            (pukeEyes:init())
            (pukeHand:init())
            (ambPuke1:init())
            (ambPuke2:init())
        )
        (super:init(rest param1))
    )

)
(instance pukeSpill of Prop
    (properties
        x 202
        y 135
        noun 2
        view 237
        loop 3
        priority 11
        signal 20496
    )

    (method (init param1)
        (if (== (eureka:puke) 5)
            (self:
                setLoop(3)
                cel(0)
                cycleSpeed(50)
                setCycle(End self)
            )
        )(else
            (self:
                setLoop(4)
                cel(0)
                cycleSpeed(15)
                setCycle(Osc)
            )
        )
        (super:init(rest param1))
    )


    (method (cue)
        (self:
            setLoop(4)
            cycleSpeed(15)
            ignoreActors(1)
            setCycle(Fwd)
        )
    )

)
(instance ambPuke1 of Prop
    (properties
        x 131
        y 133
        noun 2
        view 238
        loop 2
        cel 2
        priority 12
        signal 20496
    )

    (method (init)
        (self:
            setLoop(2)
            cycleSpeed(20)
            setCycle(Fwd)
            ignoreActors(1)
        )
        (super:init())
    )

)
(instance ambPuke2 of Prop
    (properties
        x 151
        y 112
        noun 2
        view 238
        loop 3
        priority 12
        signal 20496
    )

    (method (init)
        (self:
            setLoop(3)
            cycleSpeed(10)
            ignoreActors(1)
            setCycle(Fwd)
        )
        (super:init())
    )

)
(instance pukeEyes of Prop
    (properties
        x 187
        y 105
        noun 2
        view 238
        loop 5
        cel 1
        priority 12
        signal 20496
    )

    (method (init)
        (self:
            setLoop(5)
            cycleSpeed(80)
            ignoreActors(1)
            setCycle(Fwd)
        )
        (super:init())
    )

)
(instance pukeHand of Prop
    (properties
        x 120
        y 151
        noun 2
        view 238
        loop 6
        priority 12
        signal 20496
    )

    (method (init)
        (self:
            setLoop(6)
            setCel(0)
            ignoreActors(1)
        )
        (super:init())
    )

)
(instance spike of Actor
    (properties
        noun 12
        view 242
        loop 1
        signal 16384
    )

    (method (init param1)
        (if ((<> gGModNum 226) and (== global126 4))
            (if (proc0_1(114) and not proc0_1(113))
                (self:
                    x(118)
                    y(110)
                )
            )(else
                (if (== gGModNum 230)
                    (self:
                        x(160)
                        y(153)
                    )
                )(else
                    (self:
                        x(140)
                        y(153)
                    )
                )
            )
            (super:init(rest param1))
            (self:setScale(Scaler 100 35 166 107))
            (if (<> (send gSq5Music2:number) 23)
                (theMusic3:
                    number(23)
                    loop(-1)
                    play()
                )
            )
        )(else
            (if (== global126 1)
                (send gSq5Music2:
                    number(245)
                    loop(-1)
                    play()
                )
            )
        )
    )


    (method (dispose param1)
        (theMusic3:fade())
        (super:dispose(rest param1))
    )


    (method (cue)
        (self:dispose())
    )

)
(instance acidHole1 of Prop
    (properties
        x 122
        y 108
        noun 1
        view 240
        loop 3
        priority 1
        signal 16400
    )

    (method (init param1)
        (super:init(rest param1))
        (self:stopUpd())
    )

)
(instance acidHole2 of Prop
    (properties
        x 131
        y 142
        noun 1
        view 240
        priority 9
        signal 16400
    )

    (method (init param1)
        (super:init(rest param1))
        (self:stopUpd())
    )

)
(instance light1 of Actor
    (properties
        x 2
        y 58
        yStep 5
        view 233
        loop 3
        priority 10
        signal 16
        xStep 5
    )

    (method (init)
        (self:
            setLoop(3)
            setPri(10)
            moveSpeed(0)
            setScript(sGreenLights)
        )
        (super:init())
    )

)
(instance elevator of Actor
    (properties
        x 130
        noun 5
        view 230
        loop 1
        signal 16384
        moveSpeed 0
    )

    (method (init)
        (if (<> gGModNum 250)
            (self:
                y(136)
                setCel(1)
            )
        )(else
            (self:
                y(188)
                setCel(2)
            )
        )
        (self:
            stopUpd()
            setLoop(1)
            ignoreActors(1)
            setPri(3)
        )
        (super:init())
    )

)
(instance redLight of Prop
    (properties
        x 250
        y 74
        view 233
        loop 4
        cel 1
    )

    (method (init param1)
        (if (proc0_1(84) or (>= (eureka:puke) 4))
            (if (<> (send gSq5Music2:number) 105)
                (send gSq5Music2:
                    number(105)
                    loop(-1)
                    play()
                )
            )
            (self:
                cycleSpeed(16)
                setCycle(Osc)
            )
            (super:init(rest param1))
        )
    )

)
(instance trashDoorBottom of View
    (properties
        x 201
        y 100
        noun 15
        view 233
        loop 7
        cel 1
        priority 3
        signal 16
    )

    (method (init param1)
        (if (<= (eureka:puke) 3)
            (super:init(rest param1))
        )
    )


    (method (doit)
        (self:posn(x (+ 100 (- 86 (trashDoorTop:y)))))
        (super:doit())
    )

)
(instance groundGarbage of View
    (properties
        x 167
        y 191
        z 50
        noun 16
        view 235
        loop 6
        priority 9
        signal 16400
    )

    (method (init)
        (self:ignoreActors(1))
        (super:init())
    )


    (method (doVerb param1)
        (switch (param1)
            (case 4
                ((send gTestMessager:say(16 4 0 1))  )
            )
            (default 
                ((super:doVerb(param1)) )
            )
        )
    )

)
(instance groundPeel of View
    (properties
        x 122
        y 191
        z 50
        view 235
        loop 6
        cel 1
        priority 9
        signal 16400
    )

    (method (init)
        (self:ignoreActors(1))
        (super:init())
    )


    (method (doVerb param1)
        (switch (param1)
            (case 4
                ((send gTestMessager:say(16 4 0 1))  )
            )
            (default 
                ((super:doVerb(param1)) )
            )
        )
    )

)
(instance justBody of View
    (properties
        x 167
        y 191
        z 50
        view 235
        loop 1
        cel 2
        priority 9
        signal 16400
    )

    (method (init)
        (self:ignoreActors(1))
        (super:init())
    )

)
(instance garb1 of View
    (properties
        x 200
        y 171
        z 50
        noun 16
        view 235
        loop 6
        cel 2
        priority 9
        signal 16400
    )

    (method (init)
        (self:ignoreActors(1))
        (super:init())
    )


    (method (doVerb param1)
        (switch (param1)
            (case 4
                ((send gTestMessager:say(16 4 0 1))  )
            )
            (default 
                ((super:doVerb(param1)) )
            )
        )
    )

)
(instance garb2 of View
    (properties
        x 181
        y 180
        z 50
        noun 16
        view 235
        loop 6
        cel 3
        priority 9
        signal 16400
    )

    (method (init)
        (self:ignoreActors(1))
        (super:init())
    )


    (method (doVerb param1)
        (switch (param1)
            (case 4
                ((send gTestMessager:say(16 4 0 1))  )
            )
            (default 
                ((super:doVerb(param1)) )
            )
        )
    )

)
(instance garb3 of View
    (properties
        x 170
        y 190
        z 50
        noun 16
        view 235
        loop 6
        cel 4
        priority 9
        signal 16400
    )

    (method (init)
        (self:ignoreActors(1))
        (super:init())
    )


    (method (doVerb param1)
        (switch (param1)
            (case 4
                ((send gTestMessager:say(16 4 0 1))  )
            )
            (default 
                ((super:doVerb(param1)) )
            )
        )
    )

)
(instance elevButtonLight of View
    (properties
        x 167
        y 91
        noun 19
        view 230
        loop 3
    )
)
(instance elevLighttr of View
    (properties
        x 143
        y 125
        view 230
        loop 2
    )

    (method (init)
        (self:
            ignoreActors(1)
            setPri(3)
        )
        (super:init())
    )

)
(instance elevLightbl of View
    (properties
        x 115
        y 139
        view 230
        loop 2
        cel 2
        priority 8
        signal 16400
    )

    (method (init)
        (self:
            ignoreActors(1)
            setPri(8)
        )
        (super:init())
    )

)
(instance elevLightbr of View
    (properties
        x 150
        y 138
        view 230
        loop 2
        cel 3
    )

    (method (init)
        (self:
            ignoreActors(1)
            setPri(8)
        )
        (super:init())
    )

)
(instance elevLighttl of View
    (properties
        x 113
        y 127
        view 230
        loop 2
        cel 1
        priority 3
        signal 16400
    )

    (method (init)
        (self:
            ignoreActors(1)
            setPri(3)
        )
        (super:init())
    )

)
(instance redCross of Prop
    (properties
        x 169
        y 175
        view 233
        loop 2
        priority 15
        signal 16
    )

    (method (init)
        (self:
            setCycle(RandCycle)
            ignoreActors()
            setScript(sCycleLights)
        )
        (super:init())
    )

)
(instance emptyTrash of Feature
    (properties
        x 206
        y 85
        noun 20
        nsTop 85
        nsLeft 194
        nsBottom 122
        nsRight 219
        sightAngle 40
    )

    (method (init param1)
        (if (proc0_1(35) or proc0_1(36))
            (self:noun(16))
        )(else
            (self:noun(20))
        )
        (super:init(rest param1))
    )

)
(instance pipes of Feature
    (properties
        x 253
        y 135
        noun 8
        nsTop 106
        nsLeft 233
        nsBottom 165
        nsRight 274
        sightAngle 40
    )
)
(instance blobReach of Feature
    (properties
        x 119
        y 225
        z 100
        nsTop 121
        nsLeft 94
        nsBottom 133
        nsRight 125
        sightAngle 40
        approachX 114
        approachY 129
    )

    (method (init param1)
        (if (> (eureka:puke) 5)
            (super:init(rest param1))
        )
    )

)
(instance serviceTunnel of Feature
    (properties
        x 152
        y 98
        noun 6
        nsTop 91
        nsLeft 146
        nsBottom 106
        nsRight 158
        sightAngle 40
        approachX 141
        approachY 115
        approachDist 1
    )

    (method (init)
        (self:approachVerbs(4 1))
        (super:init())
    )


    (method (doVerb param1)
        (switch (param1)
            (case 4
                (
                (if ((== (eureka:puke) 7) and (== (send gEgo:view) 239))
                    (send gRoom:setScript(sPukeRoger))
                )(else
                    (if (not (send gCast:contains(ScriptID(227 0))) or (<> (send (ScriptID(227 0)):view) 241))
                        (send gRoom:setScript(sExitEast))
                    )(else
                        (send gTestMessager:say(noun 4 1 1))
                    )
                )
 )
            )
            (default 
                ((super:doVerb(param1)) )
            )
        )
    )

)
(instance elevButton of Feature
    (properties
        x 195
        y 120
        noun 19
        nsTop 91
        nsLeft 168
        nsBottom 95
        nsRight 172
        sightAngle 0
        approachX 154
        approachY 124
        approachDist 10
    )

    (method (init)
        (self:approachVerbs(4 1))
        (super:init())
    )


    (method (doVerb param1 param2)
        (switch (param1)
            (case 4
                (
                (if ((== (eureka:puke) 7) and (== (send gEgo:view) 239))
                    (send gRoom:setScript(sPukeRoger))
                )(else
                    (send gRoom:setScript(sPushElev))
                )
 )
            )
            (default 
                ((super:doVerb(param1 rest param2)) )
            )
        )
    )

)
(instance toolBox of Feature
    (properties
        x 97
        y 150
        noun 21
        onMeCheck 2
        approachX 120
        approachY 155
    )

    (method (init param1)
        (super:init(rest param1))
        (self:approachVerbs(4 1))
    )


    (method (doVerb param1 param2)
        (switch (param1)
            (case 4
                (
                (if ((== (eureka:puke) 7) and (== (send gEgo:view) 239))
                    (send gRoom:setScript(sPukeRoger))
                )(else
                    (send gRoom:newRoom(226))
                )
 )
            )
            (default 
                ((super:doVerb(param1 rest param2)) )
            )
        )
    )

)
(instance garbageButton of Feature
    (properties
        x 186
        y 97
        noun 14
        nsTop 92
        nsLeft 184
        nsBottom 103
        nsRight 189
        sightAngle 40
        approachX 165
        approachY 138
        approachDist 10
    )

    (method (init)
        (self:approachVerbs(4 1))
        (super:init())
    )


    (method (doVerb param1 param2)
        (switch (param1)
            (case 4
                (
                (if (== (eureka:puke) 7)
                    (if (== (send gEgo:view) 239)
                        (send gRoom:setScript(sPukeRoger))
                    )
                )(else
                    (if ((not proc0_1(30) and (proc0_1(35) or proc0_1(36))) and (== (eureka:garbage) 0))
                        (send gRoom:setScript(sGarbageFalls))
                    )(else
                        (send gRoom:setScript(sOpenGarbageDoors))
                    )
                )
 )
            )
            (default 
                ((super:doVerb(param1 rest param2)) )
            )
        )
    )

)
(instance doorSound of Sound
    (properties)
)
(instance northDoor of Prop
    (properties
        x 120
        y 106
        noun 3
        approachX 121
        approachY 110
        view 233
    )

    (method (init)
        (self:
            ignoreActors(1)
            approachVerbs(4 3)
            setPri(4)
            stopUpd()
            cel(
                (if (proc999_5(gGModNum 100 200))
                    (self:lastCel())
                )(else
                    0
                )
)
        )
        (super:init())
    )


    (method (doVerb param1 param2)
        (switch (param1)
            (case 3
                (
                (if ((== (eureka:puke) 7) and not local2)
                    (send gRoom:setScript(sPukeRoger))
                )(else
                    (send gRoom:setScript(sExitNorth))
                )
 )
            )
            (case 4
                (
                (if ((== (eureka:puke) 7) and not local2)
                    (send gRoom:setScript(sPukeRoger))
                )(else
                    (send gRoom:setScript(sExitNorth))
                )
 )
            )
            (default 
                ((super:doVerb(param1 rest param2)) )
            )
        )
    )


    (method (setCycle param1 param2)
        (if (param1)
            (doorSound:
                number(103)
                loop(1)
                play()
            )
        )
        (super:setCycle(param1 rest param2))
    )

)
(instance public scienceDoor of Prop
    (properties
        x 79
        y 137
        noun 9
        view 233
        loop 1
    )

    (method (init param1)
        (self:
            approachX(96)
            approachY(133)
            setPri(5)
            stopUpd()
            cel(
                (if (== gGModNum 240)
                    (self:lastCel())
                )(else
                    0
                )
)
            approachVerbs(4 3)
        )
        (super:init(rest param1))
    )


    (method (dispose param1)
        (doorSound:dispose())
        (super:dispose(rest param1))
    )


    (method (doVerb param1 param2)
        (switch (param1)
            (case 3
                ((send gRoom:setScript(sExitWest))  )
            )
            (case 4
                (
                (if ((== (eureka:puke) 7) and not local2)
                    (send gRoom:setScript(sJumpRoger))
                )(else
                    (send gRoom:setScript(sExitWest))
                )
 )
            )
            (default 
                ((super:doVerb(param1 rest param2)) )
            )
        )
    )


    (method (setCycle param1 param2)
        (if (param1)
            (doorSound:
                number(103)
                loop(1)
                play()
            )
        )
        (super:setCycle(param1 rest param2))
    )

)
(instance openDoor of Feature
    (properties
        x 79
        y 207
        z 100
        noun 9
        nsTop 90
        nsLeft 65
        nsBottom 125
        nsRight 95
        sightAngle 40
    )

    (method (doVerb param1)
        (switch (param1)
            (case 4
                ((send gRoom:setScript(sJumpRoger))  )
            )
            (case 3
                ((send gRoom:setScript(sJumpRoger))  )
            )
            (default 
                ((super:doVerb(param1)) )
            )
        )
    )

)
