(include "sci.sh")
(use "Main")
(use "Blink")
(use "Scaler")
(use "PolyPath")
(use "Polygon")
(use "n958")
(use "StopWalk")
(use "Grooper")
(use "Sound")
(use "Cycle")
(use "Sounds")
(use "View")
(use "Obj")
(script 500)


(local
    local0
    local1
    local2
    local3
    local4
    local5
    local6
    local7[17] = (65516 220 30 161 340 220 287 161 65516 65516 31 27 340 65516 287 27 )
    theGPEventX_2
    theGPEventY_2
    local26
    local27[3] = (504 5041 5042 )

)
(instance theMusic3 of Sound
    (properties)
)
(instance theMusic4 of Sound
    (properties)
)
(instance public rm500 of Rm
    (properties
        picture 72
        style 10
        vanishingY 50
    )

    (method (init param1)
        (send gEgo:view(0))
        (send gRoom:addObstacle((send ((Polygon:new())):
                type(3)
                init(0 156 0 165 176 165 226 156 316 156 316 142 223 142 205 109 147 109 146 112 154 118 109 144 53 144 22 157)
                yourself()
            )
))
        (send gRoom:setRegions(505))
        (send (ScriptID(501 29)):init())
        (send (ScriptID(501 2)):
            init()
            setOnMeCheck(1 32)
        )
        (send (ScriptID(501 30)):init())
        (send (ScriptID(501 31)):
            init()
            setOnMeCheck(1 64)
        )
        (send (ScriptID(501 3)):
            init()
            setOnMeCheck(1 16)
        )
        (send (ScriptID(501 7)):
            init()
            setOnMeCheck(1 256)
        )
        (send (ScriptID(501 5)):
            init()
            setOnMeCheck(1 512)
        )
        (send (ScriptID(501 6)):
            init()
            setOnMeCheck(1 1024)
        )
        (send (ScriptID(501 4)):init())
        (send (ScriptID(501 10)):init())
        (send (ScriptID(501 32)):init())
        (send (ScriptID(501 33)):init())
        (send (ScriptID(501 34)):init())
        (super:init(rest param1))
        (send gWalkHandler:addToFront(self))
        (send gWalkHandler:addToFront(ScriptID(501 30)))
        (send gWalkHandler:addToFront(ScriptID(501 31)))
        (send gWalkHandler:addToFront(ScriptID(501 3)))
        (send gWalkHandler:addToFront(ScriptID(501 33)))
        (if (not proc0_1(54))
            proc958_0(128 502 515)
            (send (ScriptID(501 22)):
                init()
                stopUpd()
            )
            (send (ScriptID(501 25)):
                init()
                stopUpd()
            )
            (lavaLamp:init())
            (lavaglob1:
                init()
                setScript(ScriptID(501 13))
            )
            (lavaglob2:
                init()
                setScript(ScriptID(501 14))
            )
            (bartender:
                setCycle(Fwd)
                detailLevel(2)
                init()
            )
            (ex1:
                setCycle(Fwd)
                detailLevel(2)
                init()
            )
            (ex2:
                setCycle(Fwd)
                detailLevel(2)
                init()
            )
            (ex3:
                setCycle(Fwd)
                detailLevel(2)
                init()
            )
            (ex4:
                setCycle(Fwd)
                detailLevel(2)
                init()
            )
            (ex5:
                setCycle(Fwd)
                detailLevel(2)
                init()
            )
            (ex6:
                setCycle(Fwd)
                detailLevel(2)
                init()
            )
        )
        (if (proc0_1(48))
            (bigbody:
                init()
                setCycle(Fwd)
                cycleSpeed(300)
            )
            (bigtail:
                init()
                setCycle(Fwd)
            )
            (send (ScriptID(501 20)):
                init()
                setCycle(Fwd)
                cycleSpeed(50)
            )
            (send (ScriptID(501 21)):
                init()
                setStep(6 4)
                setCycle(Fwd)
                cycleSpeed(50)
            )
            (send (ScriptID(501 16)):
                init()
                setStep(10 8)
                setCycle(Fwd)
            )
            (send (ScriptID(501 17)):
                init()
                setStep(8 5)
                setCycle(Fwd)
            )
            (send (ScriptID(501 18)):
                init()
                setCycle(Fwd)
                setStep(12 10)
            )
            (send (ScriptID(501 19)):
                init()
                setCycle(Fwd)
                setStep(6 4)
            )
        )
        (if (not proc0_1(54) and proc0_1(48))
            (bartender:stopUpd())
            (ex1:stopUpd())
            (ex2:stopUpd())
            (ex3:stopUpd())
            (ex4:stopUpd())
            (ex5:stopUpd())
            (ex6:stopUpd())
        )
        (switch (gGModNum)
            (case 510
                (
                (if (proc0_1(54) and not proc0_1(49))
                    (send gSQ5:handsOff())
                    (send gRoom:setScript(sEscape self))
                )(else
                    (send gSQ5:handsOff())
                    (send gRoom:setScript(sFromDetention self))
                )
 )
            )
            (case 520
                ((send gSQ5:handsOff()) 
                (switch (global124)
                    (case 9
                        (proc0_3(62) (send gRoom:setScript(sFromTableWQuirk)) (flo:setScript(sDrinking))  )
                    )
                    (case 8
                        (proc0_2(62) (send gRoom:setScript(sFromTableWSalesman)) (flo:setScript(sDrinking))  )
                    )
                    (case 7
                        (proc0_2(62) (send gRoom:setScript(sSalesmanToTable)) (flo:setScript(sDrinking))  )
                    )
                    (case 11
                        (proc0_2(62) (flo:init()) (drool:init()) (send gEgo:
                            init()
                            view(501)
                            setLoop(3)
                            cel(0)
                            x(81)
                            y(127)
                            setPri(8)
                        )
 (flo:setScript(sDrinking)) (self:setScript(sInitRoom)) (send gSQ5:handsOn()) )
                    )
                )
  )
            )
            (case 850
                (
                (if (proc0_1(70))
                    (self:setScript(sFromUpstairs))
                )(else
                    proc958_0(128 507)
                    (self:setScript(sCliffyFight))
                )
 )
            )
            (default 
                ((send gSQ5:handsOff()) 
                (if (proc999_5(global124 0 1 2))
                    (send gEgo:
                        init()
                        view(500)
                        loop(0)
                        cel(0)
                        x(254)
                        y(126)
                    )
                )
 
                (switch (global124)
                    (case 0
                        (proc0_2(52) proc0_2(53) proc958_0(128 500 20 0 515) (send gRoom:setScript(sCrewFromEureka))  )
                    )
                    (case 1
                        ((send gRoom:setScript(sRogerFromEureka))  )
                    )
                    (case 2
                        ((send gRoom:setScript(sRogerFromEureka))  )
                    )
                    (case 10
                        ((send gRoom:setScript(sCliffyFight)) )
                    )
                )
 )
            )
        )
    )


    (method (dispose param1)
        (send gWalkHandler:delete(ScriptID(501 30)))
        (send gWalkHandler:delete(ScriptID(501 3)))
        (send gWalkHandler:delete(ScriptID(501 31)))
        (send gWalkHandler:delete(ScriptID(501 33)))
        (send gWalkHandler:delete(self))
        DisposeScript(501)
        (super:dispose(rest param1))
    )


    (method (doVerb param1 param2)
        (if (proc0_1(62))
            (switch (param1)
                (case 3
                    = theGPEventX_2 gPEventX
                    = theGPEventY_2 gPEventY
                    (send gRoom:setScript(sGetUpFromTable))
                    return 1
                )
                (default 
                    (super:doVerb(param1 rest param2))
                )
            )
        )
        (if (proc0_1(70))
            (switch (param1)
                (case 3
                    = theGPEventX_2 gPEventX
                    = theGPEventY_2 gPEventY
                    (send gRoom:setScript(sFromUpstairs))
                    return 1
                )
                (default 
                    (super:doVerb(param1 rest param2))
                )
            )
        )
        return 
            (switch (param1)
                (case 1
                    (
                    (if (not proc0_1(48))
                        (send gTestMessager:say(20 1 0 0))
                    )(else
                        (send gTestMessager:say(20 1 1 0))
                    )
 )
                )
            )
    )

)
(instance sInitRoom of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (
                (if (proc0_1(54))
                    (theMusic3:
                        number(105)
                        loop(-1)
                        flags(1)
                        play()
                    )
                )(else
                    (theMusic3:
                        number(500)
                        loop(-1)
                        flags(1)
                        play()
                    )
                )
 (send gSQ5:handsOff()) 
                (if (proc0_1(48) and proc0_1(81))
                    (send gRoom:overlay(78))
                )
 
                (if (proc0_1(52) and not proc0_1(54))
                    (send (ScriptID(501 22)):addToPic())
                    (send (ScriptID(501 25)):startUpd())
                    (if (proc0_1(48) and not proc0_1(81))
                        (send gSq5Music1:
                            number(26)
                            loop(-1)
                            play()
                        )
                        (send (ScriptID(501 25)):setScript(sGuyTalk))
                        proc0_2(81)
                        (send gRoom:overlay(77))
                    )(else
                        (send (ScriptID(501 25)):setScript(ScriptID(501 24)))
                    )
                    (drool:init())
                    (flo:init())
                    (if (proc0_1(51))
                        (flo:setScript(sDrinking))
                    )
                )
 
                (if (proc0_1(50))
                    (cliffy:init())
                    (Cliffysfriend:init())
                )
 
                (if (< global125 3)
                    (salesman:init())
                    (quirk:init())
                    (quirkHead:
                        init()
                        setScript(sQuirk)
                    )
                    (alien:init())
                )
 
                (if (proc0_1(48))
                    (send (ScriptID(501 15)):
                        init()
                        setScript(ambientMonkeys)
                    )
                    (theMusic4:
                        number(501)
                        loop(-1)
                        play()
                    )
                )
 
                (if (== global124 11)
                    proc0_2(62)
                )
 
                (if (proc0_1(54) and not proc0_1(69))
                    (self:setScript(sAliensBeam self))
                )(else
                    = cycles 1
                )
 )
            )
            (case 1
                ((send gSQ5:handsOn()) (self:dispose()) )
            )
        )
    )

)
(instance sGuyTalk of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (= seconds 3  )
            )
            (case 1
                ((send gTestMessager:say(3 0 0 0 self))  )
            )
            (case 2
                ((send (ScriptID(501 25)):setScript(ScriptID(501 24))) (self:dispose()) )
            )
        )
    )

)
(instance sEscape of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSq5Music1:
                    number(26)
                    loop(-1)
                    play()
                )
 (theMusic3:
                    number(105)
                    loop(-1)
                    play()
                )
 (theMusic4:
                    number(501)
                    loop(-1)
                    play()
                )
 (bartender:dispose()) (send gRoom:overlay(78)) 
                (if (proc0_1(54))
                    (send (ScriptID(501 15)):
                        init()
                        setScript(ambientMonkeys)
                    )
                )
 
                (if (not proc0_1(69))
                    (self:setScript(sAliensBeam self))
                )(else
                    = cycles 3
                )
 )
            )
            (case 1
                ((send gEgo:
                    init()
                    view(517)
                    setLoop(0)
                    cel(0)
                    x(306)
                    y(144)
                    setCycle(End self)
                )
  )
            )
            (case 2
                ((send gEgo:
                    view(6)
                    setLoop(0)
                    setCel(15)
                    setScale(Scaler 85 85 157 109)
                    x(292)
                    y(126)
                )
 (cliffy:
                    init()
                    view(20)
                    loop(1)
                    cel(0)
                    x(330)
                    y(151)
                    setPri(10)
                    setScale(Scaler 132 38 157 109)
                    setCycle(StopWalk -1)
                    setLoop(Grooper)
                    setMotion(MoveTo 210 151 self)
                )
  )
            )
            (case 3
                ((send gTestMessager:say(25 0 0 0 self))  )
            )
            (case 4
                ((cliffy:setMotion(MoveTo 214 129 self))  )
            )
            (case 5
                ((cliffy:
                    setScale(Scaler 80 80 157 109)
                    setStep(6 6)
                    setMotion(MoveTo 233 119 self)
                )
  )
            )
            (case 6
                ((cliffy:setMotion(MoveTo 244 118 self))  )
            )
            (case 7
                ((cliffy:
                    view(500)
                    setLoop(1)
                    setCel(15)
                    x(244)
                    y(118)
                    setCycle(Beg self)
                )
 (send gEgo:setCycle(Beg self)) (send gSq5Music2:
                    number(260)
                    setLoop(1)
                    play()
                )
  )
            )
            (case 8
                (0  )
            )
            (case 9
                ((cliffy:hide()) (send gEgo:hide()) (send gSq5Music1:fade()) (theMusic3:fade()) (theMusic4:fade()) proc0_10(176 200) = cycles 5  )
            )
            (case 10
                ((send gRoom:newRoom(550)) )
            )
        )
    )

)
(instance sDrinking of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (= seconds Random(1 5)  )
            )
            (case 1
                (
                (if (< global125 3)
                    = local4 
                        (switch (Random(1 3))
                            (case 1
                                drool
                            )
                            (case 2
                                flo
                            )
                            (case 3
                                gEgo
                            )
                        )
                )(else
                    = local4 
                        (switch (Random(1 2))
                            (case 1
                                drool
                            )
                            (case 2
                                flo
                            )
                        )
                )
 = cycles 1  )
            )
            (case 2
                ((send local4:setCycle(End)) = seconds Random(1 3)  )
            )
            (case 3
                ((send local4:setCycle(Beg self))  )
            )
            (case 4
                (= state -1 = cycles 1 )
            )
        )
    )

)
(instance sQuirk of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (= seconds Random(1 5)  )
            )
            (case 1
                ((quirkHead:setCycle(End self))  )
            )
            (case 2
                ((alien:setCycle(Fwd)) = seconds Random(1 4)  )
            )
            (case 3
                ((alien:setCycle(End)) = seconds Random(1 5)  )
            )
            (case 4
                ((quirkHead:setCycle(Beg self))  )
            )
            (case 5
                (= state -1 = cycles 1 )
            )
        )
    )

)
(instance sAliensBeam of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((alien1:
                    init()
                    setLoop(0)
                    cel(0)
                    setPri(10)
                    setCycle(End self)
                )
 (alien2:
                    init()
                    setLoop(2)
                    cel(0)
                    setPri(11)
                    setCycle(End self)
                )
  )
            )
            (case 1
                (0  )
            )
            (case 2
                ((alien1:
                    setLoop(1)
                    cel(15)
                    x(237)
                    y(116)
                    setCycle(Beg self)
                )
 (alien2:
                    setLoop(3)
                    cel(15)
                    x(248)
                    y(126)
                    setCycle(Beg self)
                )
 (send gSq5Music2:
                    number(260)
                    setLoop(1)
                    play()
                )
  )
            )
            (case 3
                (0  )
            )
            (case 4
                ((alien1:
                    hide()
                    dispose()
                )
 (alien2:
                    hide()
                    dispose()
                )
 = cycles 1  )
            )
            (case 5
                (proc0_2(69) (self:dispose()) )
            )
        )
    )

)
(instance sFromDetention of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSq5Music1:
                    number(26)
                    loop(-1)
                    play()
                )
 (send gSQ5:handsOff()) (self:setScript(sInitRoom self))  )
            )
            (case 1
                ((send gSQ5:handsOff()) = cycles 1  )
            )
            (case 2
                (= seconds 1  )
            )
            (case 3
                (proc0_6(0) (send gEgo:
                    init()
                    view(0)
                    setScale(Scaler 132 38 157 109)
                    setLoop(1)
                    posn(319 151)
                    setMotion(MoveTo 210 149 self)
                )
  )
            )
            (case 4
                (
                (if (proc0_1(48))
                    (send gTestMessager:say(9 0 0 0 self))
                )(else
                    = cycles 1
                )
 )
            )
            (case 5
                (proc0_3(62) (send gSQ5:handsOn()) (self:dispose()) )
            )
        )
    )

)
(instance sSalesmanToTable of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((theMusic3:
                    number(500)
                    setLoop(-1)
                    play()
                )
 (send (ScriptID(501 22)):addToPic()) (send (ScriptID(501 25)):startUpd()) (send (ScriptID(501 25)):setScript(ScriptID(501 24))) proc0_2(51) (Cliffysfriend:init()) (alien:init()) (quirk:init()) (quirkHead:
                    init()
                    setScript(sQuirk)
                )
 (flo:init()) (drool:init()) (cliffy:
                    init()
                    setPri(7)
                    setScale(Scaler 132 38 157 109)
                    view(20)
                    loop(8)
                    cel(1)
                    posn(174 111)
                )
 (send gEgo:
                    init()
                    view(501)
                    loop(3)
                    cel(0)
                    x(81)
                    y(127)
                    setPri(8)
                )
 (send (ScriptID(501 27)):
                    init()
                    setScript(ScriptID(501 28))
                )
 (salesman:init()) = seconds 3  )
            )
            (case 1
                ((salesman:setCycle(End self))  )
            )
            (case 2
                ((salesman:
                    view(503)
                    setLoop(5)
                    cel(0)
                    x(216)
                    y(114)
                    setScale(Scaler 132 38 157 109)
                    setCycle(Fwd)
                    setMotion(MoveTo 140 128 self)
                )
  )
            )
            (case 3
                ((salesman:
                    setLoop(1)
                    cel(0)
                    setScale(Scaler 80 80 157 109)
                    setStep(6 6)
                    setMotion(MoveTo 109 125 self)
                )
  )
            )
            (case 4
                ((salesman:
                    setLoop(6)
                    cel(0)
                    setCycle(0)
                )
 = seconds 2  )
            )
            (case 5
                (= global125 1 (send gRoom:newRoom(520)) )
            )
        )
    )

)
(instance sFromTableWQuirk of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((theMusic3:
                    number(500)
                    setLoop(-1)
                    play()
                )
 (send (ScriptID(501 22)):addToPic()) (send (ScriptID(501 25)):startUpd()) (send (ScriptID(501 25)):setScript(ScriptID(501 24))) (Cliffysfriend:init()) (cliffy:
                    init()
                    setPri(7)
                    setScale(Scaler 132 38 157 109)
                    view(20)
                    loop(8)
                    cel(1)
                    posn(174 111)
                )
 (flo:
                    init()
                    view(501)
                    loop(4)
                    cel(0)
                    x(90)
                    y(124)
                    setPri(7)
                )
 (drool:
                    init()
                    view(501)
                    loop(5)
                    cel(0)
                    x(55)
                    y(115)
                    setPri(8)
                )
 (send gEgo:
                    init()
                    view(520)
                    setLoop(1)
                    cel(7)
                    x(40)
                    y(150)
                    setStep(7 3)
                    setPri(10)
                )
 (quirk:
                    init()
                    view(527)
                    setLoop(0)
                    cel(0)
                    x(48)
                    y(145)
                    setPri(10)
                )
 = seconds 2  )
            )
            (case 1
                ((send gEgo:
                    setCycle(Fwd)
                    setMotion(MoveTo 65516 120 self)
                )
 (quirk:
                    setCycle(Fwd)
                    setMotion(MoveTo 65516 110 self)
                )
  )
            )
            (case 2
                (0  )
            )
            (case 3
                (= seconds 2  )
            )
            (case 4
                ((quirk:
                    view(9)
                    loop(0)
                    cel(0)
                    x(65526)
                    y(48)
                    setPri(1)
                    setLoop(Grooper)
                    setMotion(MoveTo 58 48 self)
                )
  )
            )
            (case 5
                (proc0_6(0 0) (send gEgo:
                    setHeading(0)
                    x(65526)
                    y(48)
                    setMotion(MoveTo 24 48 self)
                )
  )
            )
            (case 6
                (= global124 10 (send gSq5Music1:fade()) (send gRoom:newRoom(850)) )
            )
        )
    )

)
(instance public sStairs of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) 
                (if (proc0_1(62))
                    = theGPEventX_2 60
                    = theGPEventY_2 150
                    (self:setScript(sGetUpFromTable self))
                )(else
                    (send gEgo:setMotion(PolyPath 40 150 self))
                )
 )
            )
            (case 1
                ((send gSQ5:handsOff()) (send gEgo:
                    init()
                    view(520)
                    setLoop(1)
                    cel(7)
                    x(40)
                    y(150)
                    setStep(7 3)
                    setScale(0)
                    setPri(10)
                    setCycle(Fwd)
                    setMotion(MoveTo 65516 120 self)
                )
  )
            )
            (case 2
                (proc0_6(0 0) (send gEgo:
                    init()
                    view(0)
                    loop(0)
                    setScale(0)
                    setHeading(0)
                    x(65526)
                    y(48)
                    setMotion(MoveTo 58 48 self)
                )
 proc0_2(70)  )
            )
            (case 3
                ((send gSQ5:handsOn()) = global167 2 (self:dispose()) )
            )
        )
    )

)
(instance sFromTableWSalesman of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((theMusic3:
                    number(500)
                    setLoop(-1)
                    play()
                )
 (send (ScriptID(501 22)):addToPic()) (send (ScriptID(501 25)):startUpd()) (send (ScriptID(501 25)):setScript(ScriptID(501 24))) (Cliffysfriend:init()) (cliffy:
                    init()
                    setPri(7)
                    setScale(Scaler 132 38 157 109)
                    view(20)
                    loop(8)
                    cel(1)
                    posn(174 111)
                )
 (flo:init()) (drool:init()) (send gEgo:
                    init()
                    view(501)
                    loop(3)
                    cel(0)
                    x(81)
                    y(127)
                    setPri(8)
                )
 (quirk:init()) (quirkHead:
                    init()
                    setScript(sQuirk)
                )
 (alien:init()) (salesman:
                    init()
                    view(503)
                    setLoop(0)
                    cel(2)
                    x(111)
                    y(128)
                    setScale(Scaler 80 80 157 109)
                )
 (quirk:setScript(sQuirkApproaches)) = seconds 2  )
            )
            (case 1
                ((salesman:
                    setCycle(Fwd)
                    setMotion(MoveTo 118 121 self)
                )
  )
            )
            (case 2
                ((salesman:
                    setStep(5 6)
                    setMotion(MoveTo 140 128 self)
                )
  )
            )
            (case 3
                ((salesman:
                    setStep(5 2)
                    setScale(Scaler 132 38 157 109)
                    setMotion(MoveTo 147 135 self)
                )
  )
            )
            (case 4
                ((salesman:
                    view(503)
                    setLoop(4)
                    cel(3)
                    setMotion(MoveTo 151 139 self)
                )
  )
            )
            (case 5
                ((salesman:
                    setLoop(2)
                    cel(0)
                    setMotion(MoveTo 150 146 self)
                )
  )
            )
            (case 6
                ((salesman:setMotion(MoveTo 141 149 self))  )
            )
            (case 7
                ((salesman:
                    setLoop(5)
                    cel(0)
                    setMotion(MoveTo 109 162 self)
                )
  )
            )
            (case 8
                ((salesman:
                    setLoop(1)
                    cel(0)
                    setMotion(MoveTo 65516 162 self)
                )
  )
            )
            (case 9
                ((salesman:dispose()) (self:dispose()) )
            )
        )
    )

)
(instance sAlienExits of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((alien:
                    setLoop(4)
                    setCycle(End self)
                )
  )
            )
            (case 1
                ((alien:
                    setLoop(5)
                    cel(0)
                    setCycle(Fwd)
                    setMotion(MoveTo 325 22 self)
                )
  )
            )
            (case 2
                ((alien:
                    setCycle(0)
                    dispose()
                )
 (self:dispose()) )
            )
        )
    )

)
(instance sQuirkApproaches of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (proc0_3(53) (quirkHead:
                    hide()
                    setScript(sAlienExits)
                )
 (quirk:
                    view(506)
                    setLoop(1)
                    cel(7)
                    setCycle(End self)
                )
  )
            )
            (case 1
                ((quirk:
                    view(506)
                    setLoop(2)
                    cel(0)
                    setCycle(End self)
                )
  )
            )
            (case 2
                ((quirk:
                    view(9)
                    loop(0)
                    cel(4)
                    x(260)
                    y(46)
                    setCycle(Walk)
                    setMotion(MoveTo 330 46 self)
                )
  )
            )
            (case 3
                (= seconds 5  )
            )
            (case 4
                ((quirk:
                    loop(1)
                    x(322)
                    y(152)
                    setScale(Scaler 132 38 157 109)
                    setMotion(MoveTo 237 149 self)
                )
  )
            )
            (case 5
                ((quirk:setMotion(MoveTo 140 128 self))  )
            )
            (case 6
                ((quirk:
                    setScale(Scaler 80 80 157 109)
                    setStep(6 6)
                    setMotion(MoveTo 118 119 self)
                )
  )
            )
            (case 7
                ((quirk:
                    setStep(5 2)
                    setMotion(MoveTo 108 123 self)
                )
  )
            )
            (case 8
                ((quirk:
                    setLoop(4)
                    cel(1)
                )
 = cycles 2  )
            )
            (case 9
                (= global125 2 (send gRoom:newRoom(520)) )
            )
        )
    )

)
(instance sCrewFromEureka of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSq5Music1:
                    number(26)
                    loop(-1)
                    play(0)
                    fade(127 25 10 0)
                )
 (theMusic3:
                    number(500)
                    loop(-1)
                    play()
                )
 (quirk:init()) (quirkHead:
                    init()
                    setScript(sQuirk)
                )
 (alien:init()) (salesman:init()) (Cliffysfriend:init()) (send (ScriptID(501 22)):addToPic()) (send (ScriptID(501 25)):setScript(ScriptID(501 24))) (cliffy:
                    init()
                    view(534)
                    loop(2)
                    posn(214 129)
                    setScale(Scaler 132 38 157 109)
                    setCycle(StopWalk -1)
                    setLoop(Grooper)
                )
 (drool:init()) (flo:init()) = seconds 2  )
            )
            (case 1
                ((send gSq5Music2:
                    number(260)
                    setLoop(1)
                    play()
                )
 (send gEgo:
                    setScale(Scaler 80 80 157 109)
                    setCycle(End self)
                )
  )
            )
            (case 2
                (proc0_10(213 10) = cycles 2  )
            )
            (case 3
                ((send gTestMessager:say(7 0 0 0 self))  )
            )
            (case 4
                ((cliffy:
                    setStep(5 2)
                    setScale(Scaler 132 38 157 109)
                    setMotion(MoveTo 174 111 self)
                )
  )
            )
            (case 5
                (proc0_6(0 1) (send gEgo:
                    setHeading(315)
                    posn(254 126)
                    setMotion(MoveTo 234 119 self)
                )
  )
            )
            (case 6
                ((send gEgo:
                    view(0)
                    setHeading(270)
                    setStep(5 7)
                    setMotion(MoveTo 214 129 self)
                )
  )
            )
            (case 7
                ((send gEgo:
                    setStep(6 2)
                    setPri(13)
                    setScale(Scaler 132 38 157 109)
                    setMotion(MoveTo 180 129 self)
                )
  )
            )
            (case 8
                (= seconds 3  )
            )
            (case 9
                (= global167 0 proc0_2(50) proc0_2(52) (send gSQ5:handsOn()) (self:dispose()) )
            )
        )
    )

)
(instance sRogerFromEureka of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSq5Music1:
                    number(26)
                    loop(-1)
                    play(0)
                    fade(127 25 10 0)
                )
 (theMusic3:
                    number(500)
                    loop(-1)
                    play()
                )
 (send gSQ5:handsOff()) (self:setScript(sInitRoom self))  )
            )
            (case 1
                ((send gSQ5:handsOff()) (send gEgo:
                    setScale(Scaler 80 80 157 109)
                    setCycle(End self)
                )
 (send gSq5Music2:
                    number(260)
                    setLoop(1)
                    play()
                )
  )
            )
            (case 2
                (proc0_6(0 1) (send gEgo:
                    view(0)
                    setHeading(315)
                    posn(254 126)
                    setScale(Scaler 80 80 157 109)
                    setMotion(MoveTo 233 119 self)
                )
  )
            )
            (case 3
                ((send gEgo:
                    view(0)
                    setHeading(270)
                    setStep(5 7)
                    setMotion(MoveTo 214 129 self)
                )
  )
            )
            (case 4
                ((send gEgo:
                    setScale(Scaler 132 38 157 109)
                    setStep(6 2)
                    setPri(13)
                    setMotion(MoveTo 180 129 self)
                )
  )
            )
            (case 5
                (= global167 0 (send gSQ5:handsOn()) (self:dispose()) )
            )
        )
    )

)
(instance sQuirkFromNukem of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((quirk:
                    init()
                    view(519)
                    setLoop(1)
                    cel(0)
                    x(0)
                    y(100)
                    setPri(12)
                    setCycle(Fwd)
                    setMotion(MoveTo 57 109 self)
                )
  )
            )
            (case 1
                ((quirk:
                    view(17)
                    loop(0)
                    cel(0)
                    x(63)
                    y(144)
                    setScale(Scaler 132 38 157 109)
                    setCycle(StopWalk -1)
                    setLoop(Grooper)
                )
 = cycles 4  )
            )
            (case 2
                (UnLoad(128 519) (self:dispose()) )
            )
        )
    )

)
(instance sRogerFromNukem of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gEgo:
                    init()
                    view(518)
                    setLoop(0)
                    cel(0)
                    x(0)
                    y(126)
                    setStep(8 3)
                    setPri(13)
                    setCycle(Fwd)
                    setScale(Scaler 110 110 157 109)
                    setMotion(MoveTo 38 156 self)
                )
  )
            )
            (case 1
                (UnLoad(128 518) 
                (if (not proc0_1(70))
                    proc0_6(0 8)
                    (send gEgo:
                        view(0)
                        loop(6)
                        x(36)
                        y(153)
                        setStep(3 2)
                        setScale(Scaler 132 38 157 109)
                        setPri(13)
                    )
                )(else
                    proc0_6(0 8)
                    (send gEgo:
                        view(0)
                        loop(0)
                        x(36)
                        y(153)
                        setStep(3 2)
                        setScale(Scaler 132 38 157 109)
                        setPri(13)
                    )
                )
 = cycles 2  )
            )
            (case 2
                (= seconds 1  )
            )
            (case 3
                ((self:dispose()) )
            )
        )
    )

)
(instance sFromUpstairs of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) 
                (if (proc0_1(70))
                    (send gEgo:setMotion(MoveTo 65526 48 self))
                )(else
                    (send gSq5Music1:
                        number(26)
                        loop(-1)
                        play(0)
                        fade(127 25 10 0)
                    )
                    = cycles 1
                )
 )
            )
            (case 1
                ((self:setScript(sRogerFromNukem self))  )
            )
            (case 2
                ((send gEgo:
                    setStep(5 2)
                    setScale(Scaler 132 38 157 109)
                    setMotion(PolyPath theGPEventX_2 theGPEventY_2)
                )
 proc0_3(70) = global167 0 (send gSQ5:handsOn()) (self:dispose()) )
            )
        )
    )

)
(instance public sDownTheStairs of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) proc0_3(70) (send gEgo:setMotion(MoveTo 65526 48 self))  )
            )
            (case 1
                ((self:setScript(sRogerFromNukem self))  )
            )
            (case 2
                ((send gEgo:
                    setStep(5 2)
                    setScale(Scaler 132 38 157 109)
                    setMotion(PolyPath 45 153 self)
                )
  )
            )
            (case 3
                (= global167 0 (send gSQ5:handsOn()) (self:dispose()) )
            )
        )
    )

)
(instance sFightNoise of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((theMusic4:
                    number(local27[Random(0 2)])
                    setLoop(1)
                    play(self)
                )
  )
            )
            (case 1
                (= state -1 = cycles 1 )
            )
        )
    )

)
(instance sWalkToFight of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gEgo:
                    setLoop(0)
                    setCycle(Fwd)
                    setMotion(MoveTo 120 147 self)
                )
  )
            )
            (case 1
                ((send gEgo:
                    view(16)
                    loop(8)
                    cel(6)
                    x(118)
                    y(147)
                    setCycle(0)
                    setPri(13)
                    stopUpd()
                )
 = cycles 1  )
            )
            (case 2
                ((self:dispose()) )
            )
        )
    )

)
(instance sCliffyFight of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSq5Music1:
                    number(26)
                    loop(-1)
                    play(0)
                    fade(127 25 10 0)
                )
 (theMusic3:
                    number(500)
                    loop(-1)
                    play()
                )
 (send gSQ5:handsOff()) = local26 1 proc0_3(62) (send (ScriptID(501 22)):addToPic()) (bartender:
                    hide()
                    stopUpd()
                )
 (ex1:stopUpd()) (ex2:stopUpd()) (ex3:stopUpd()) (ex4:stopUpd()) (ex5:stopUpd()) (ex6:stopUpd()) (send (ScriptID(501 22)):addToPic()) (send (ScriptID(501 25)):setScript(0)) (flo:
                    init()
                    stopUpd()
                )
 (drool:
                    init()
                    stopUpd()
                )
 (cliffy:
                    init()
                    view(507)
                    setLoop(0)
                    cel(0)
                    x(192)
                    y(136)
                    signal(16384)
                )
 (victim:init()) (guard2:init()) (drool:setScript(sRogerFromNukem)) (self:setScript(sQuirkFromNukem self))  )
            )
            (case 1
                (= seconds 1  )
            )
            (case 2
                ((send gTestMessager:say(14 0 0 0 self))  )
            )
            (case 3
                ((cliffy:setCycle(CT 3 1 self)) (theMusic4:
                    number(5042)
                    loop(1)
                    play()
                )
  )
            )
            (case 4
                ((cliffy:setCycle(End self)) (victim:setCycle(End self))  )
            )
            (case 5
                (0  )
            )
            (case 6
                ((guard2:hide()) (victim:
                    setLoop(5)
                    cel(0)
                    setCycle(End self)
                )
  )
            )
            (case 7
                ((self:setScript(sFightNoise)) (cliffy:
                    setLoop(1)
                    setCycle(Fwd)
                )
 (victim:
                    setLoop(6)
                    cycleSpeed(10)
                    setCycle(Fwd)
                )
 (quirk:setMotion(MoveTo 130 138 self)) (send gEgo:setScript(sWalkToFight))  )
            )
            (case 8
                ((quirk:stopUpd()) = cycles 2  )
            )
            (case 9
                (= seconds 3  )
            )
            (case 10
                ((send gTestMessager:say(6 0 0 0 self))  )
            )
            (case 11
                ((cliffy:setCycle(End self)) (victim:setCycle(End self))  )
            )
            (case 12
                (0  )
            )
            (case 13
                ((self:setScript(0)) (cliffy:
                    setLoop(2)
                    cel(0)
                    setCycle(End self)
                )
 (victim:
                    setLoop(7)
                    cel(0)
                )
 (guard2:
                    show()
                    setLoop(8)
                    cel(0)
                    x(159)
                    y(134)
                    setCycle(End)
                )
  )
            )
            (case 14
                (UnLoad(128 507) Load(rsVIEW 5072) = cycles 2  )
            )
            (case 15
                ((guard1:
                    init()
                    view(5072)
                    setLoop(11)
                    cel(0)
                    x(190)
                    y(134)
                    setCycle(End self)
                )
 (cliffy:
                    view(5072)
                    setLoop(9)
                    cel(0)
                    setCycle(End self)
                )
 (guard2:
                    view(5072)
                    setLoop(13)
                    cel(0)
                    setCycle(End self)
                )
 (victim:
                    view(5072)
                    setLoop(12)
                    cel(0)
                    setPri(13)
                )
  )
            )
            (case 16
                (0  )
            )
            (case 17
                (0  )
            )
            (case 18
                ((cliffy:
                    view(510)
                    setLoop(2)
                    cel(0)
                    x(193)
                    y(135)
                    setScale(Scaler 104 87 152 135)
                    setCycle(Fwd)
                    setMotion(MoveTo 201 152 self)
                )
 (guard1:
                    view(509)
                    setLoop(2)
                    cel(0)
                    x(208)
                    y(136)
                    setScale(Scaler 103 88 146 133)
                    setCycle(Fwd)
                    setMotion(MoveTo 211 146 self)
                )
  )
            )
            (case 19
                (0  )
            )
            (case 20
                ((quirk:startUpd()) (cliffy:
                    setLoop(3)
                    setMotion(MoveTo 227 153 self)
                )
 (guard1:
                    setLoop(3)
                    setMotion(MoveTo 236 147 self)
                )
 (victim:setScript(ScriptID(501 11))) (guard2:setScript(ScriptID(501 12)))  )
            )
            (case 21
                (0  )
            )
            (case 22
                ((quirk:setScript(sQuirkExit)) (cliffy:
                    setLoop(0)
                    setMotion(MoveTo 340 153 self)
                )
 (guard1:
                    setLoop(0)
                    setMotion(MoveTo 340 147 self)
                )
  )
            )
            (case 23
                (0  )
            )
            (case 24
                ((guard1:
                    setCycle(0)
                    dispose()
                )
 (cliffy:
                    setCycle(0)
                    dispose()
                )
 = cycles 1  )
            )
            (case 25
                ((bartender:
                    show()
                    startUpd()
                )
 (ex1:startUpd()) (ex2:startUpd()) (ex3:startUpd()) (ex4:startUpd()) (ex5:startUpd()) (ex6:startUpd()) (drool:startUpd()) (flo:
                    startUpd()
                    setScript(sDrinking)
                )
 (send (ScriptID(501 25)):setScript(ScriptID(501 24))) = cycles 2  )
            )
            (case 26
                (proc0_6(0 0) (send gEgo:
                    view(0)
                    loop(6)
                    x(118)
                    y(147)
                    setPri(13)
                    startUpd()
                )
 = global124 11 proc0_2(49) = global167 0 = local26 0 = cycles 2  )
            )
            (case 27
                ((send gSQ5:handsOn()) (self:dispose()) )
            )
        )
    )

)
(instance sQuirkExit of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send ((quirk:looper)):dispose()) (quirk:
                    view(17)
                    setLoop(0)
                    setMotion(MoveTo 214 129 self)
                )
  )
            )
            (case 1
                ((quirk:
                    setScale(Scaler 80 80 157 109)
                    setStep(6 6)
                    setMotion(MoveTo 233 119 self)
                )
  )
            )
            (case 2
                ((quirk:setMotion(MoveTo 254 126 self))  )
            )
            (case 3
                ((quirk:
                    view(528)
                    setLoop(0)
                    cel(15)
                    setCycle(Beg self)
                )
 (victim:setCycle(Beg self)) (send gSq5Music2:
                    number(260)
                    setLoop(1)
                    play()
                )
  )
            )
            (case 4
                (0  )
            )
            (case 5
                ((quirk:hide()) (victim:dispose()) = cycles 2  )
            )
            (case 6
                ((send gSQ5:handsOn()) (self:dispose()) )
            )
        )
    )

)
(instance public gotoTable of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) 
                (if (== global167 2)
                    = theGPEventX_2 45
                    = theGPEventY_2 153
                    (self:setScript(sFromUpstairs self))
                )(else
                    = cycles 2
                )
 )
            )
            (case 1
                ((send gSQ5:handsOff()) (send gEgo:setMotion(PolyPath 140 128 self))  )
            )
            (case 2
                ((send gEgo:
                    setScale(Scaler 80 80 157 109)
                    setStep(6 6)
                    setMotion(MoveTo 118 119 self)
                )
  )
            )
            (case 3
                ((send gEgo:
                    setStep(6 2)
                    setHeading(5)
                    setMotion(MoveTo 88 127 self)
                )
  )
            )
            (case 4
                ((send gEgo:
                    view(501)
                    loop(0)
                    cel(0)
                    x(81)
                    y(127)
                    setPri(8)
                    setScale(0)
                    setCycle(End self)
                )
  )
            )
            (case 5
                (= global167 1 proc0_2(62) (send gRoom:newRoom(520)) )
            )
        )
    )

)
(instance public gotoTeleporterFTable of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) proc0_3(62) (send gEgo:
                    view(501)
                    setLoop(0)
                    setCel(7)
                    x(81)
                    y(127)
                    setPri(8)
                    setScale(0)
                )
 = cycles 1  )
            )
            (case 1
                ((send gEgo:
                    cel(7)
                    setCycle(CT 4 -1 self)
                )
  )
            )
            (case 2
                (proc0_6(0 6) (send gEgo:
                    view(0)
                    loop(1)
                    posn(88 127)
                    setStep(6 2)
                    setHeading(45)
                    setScale(Scaler 80 80 157 109)
                    setMotion(MoveTo 118 119 self)
                )
  )
            )
            (case 3
                ((send gEgo:
                    setStep(6 7)
                    setMotion(MoveTo 140 128 self)
                )
  )
            )
            (case 4
                ((send gEgo:
                    setStep(6 2)
                    setMotion(MoveTo 214 128 self)
                )
  )
            )
            (case 5
                ((send gEgo:
                    setStep(6 6)
                    setMotion(MoveTo 231 119 self)
                )
  )
            )
            (case 6
                ((send gEgo:
                    setStep(6 2)
                    setMotion(MoveTo 254 126 self)
                )
  )
            )
            (case 7
                ((send gEgo:
                    view(500)
                    loop(0)
                    cel(15)
                    setCycle(Beg self)
                )
 (send gSq5Music2:
                    number(260)
                    setLoop(1)
                    play()
                )
  )
            )
            (case 8
                (
                (if (proc0_1(48))
                    = global124 2
                )(else
                    = global124 1
                )
 (send gSq5Music1:fade()) (theMusic3:fade()) (send gRoom:newRoom(240)) )
            )
        )
    )

)
(instance public gotoTeleporter of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) 
                (if (== global167 2)
                    (self:setScript(sDownTheStairs self))
                )(else
                    = cycles 1
                )
 )
            )
            (case 1
                ((send gSQ5:handsOff()) (send gEgo:setMotion(PolyPath 214 129 self))  )
            )
            (case 2
                ((send gEgo:
                    setHeading(90)
                    setStep(6 6)
                    setScale(Scaler 80 80 157 109)
                    setMotion(MoveTo 233 119 self)
                )
  )
            )
            (case 3
                ((send gEgo:setMotion(MoveTo 254 128 self))  )
            )
            (case 4
                ((send gEgo:
                    view(500)
                    loop(0)
                    cel(15)
                    setCycle(Beg self)
                )
 (send gSq5Music2:
                    number(260)
                    setLoop(1)
                    play()
                )
  )
            )
            (case 5
                (
                (if (proc0_1(48))
                    = global124 2
                )(else
                    = global124 1
                )
 (send gSq5Music1:fade()) (theMusic3:fade()) (send gRoom:newRoom(240)) )
            )
        )
    )

)
(instance public sToDetention of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (
                (switch (global167)
                    (case 2
                        (= theGPEventX_2 45 = theGPEventY_2 153 (self:setScript(sDownTheStairs self))  )
                    )
                    (case 1
                        (= theGPEventX_2 180 = theGPEventY_2 149 (self:setScript(sGetUpFromTable self))  )
                    )
                    (case 0
                        (= cycles 1 )
                    )
                )
  )
            )
            (case 1
                ((send gSQ5:handsOff()) (send gEgo:setMotion(MoveTo 215 149 self))  )
            )
            (case 2
                ((send gEgo:setMotion(MoveTo 315 149 self)) (send gSq5Music1:fade()) (theMusic3:fade())  )
            )
            (case 3
                ((send gRoom:newRoom(510)) )
            )
        )
    )

)
(instance public sGetUpFromTable of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gSQ5:handsOff()) (send gEgo:
                    view(501)
                    setLoop(0)
                    cel(7)
                    x(81)
                    y(127)
                    setPri(8)
                    setScale(0)
                )
 = cycles 1  )
            )
            (case 1
                ((send gEgo:setCycle(CT 3 -1 self))  )
            )
            (case 2
                (proc0_6(0 6) (send gEgo:
                    view(0)
                    loop(6)
                    posn(81 127)
                    setStep(6 2)
                    setHeading(45)
                    setScale(Scaler 80 80 157 109)
                    setMotion(MoveTo 118 119 self)
                )
  )
            )
            (case 3
                ((send gEgo:
                    setStep(6 7)
                    setMotion(MoveTo 140 128 self)
                )
  )
            )
            (case 4
                ((send gEgo:
                    setScale(Scaler 132 38 157 109)
                    setMotion(PolyPath theGPEventX_2 theGPEventY_2 self)
                )
  )
            )
            (case 5
                (proc0_3(62) = global167 0 (send gSQ5:handsOn()) (self:dispose()) )
            )
        )
    )

)
(instance ambientMonkeys of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (= seconds Random(1 6)  )
            )
            (case 1
                (= local5 (* (= local5 Random(0 3)) 4) = cycles 1  )
            )
            (case 2
                ((bighead1:
                    init()
                    x(local7[local5])
                    y(local7[+ local5 1])
                    setMotion(MoveTo local7[+ local5 2] local7[+ local5 3] self)
                )
 (bigeyes1:
                    init()
                    setCycle(Fwd)
                    cycleSpeed(100)
                )
  )
            )
            (case 3
                (= seconds Random(1 5)  )
            )
            (case 4
                ((bighead1:setMotion(MoveTo local7[local5] local7[(+ local5 1)] self))  )
            )
            (case 5
                ((bighead1:dispose()) (bigeyes1:dispose()) = state -1 = cycles 2 )
            )
        )
    )

)
(instance quirk of Actor
    (properties
        x 250
        y 43
        noun 15
        view 506
        priority 13
        signal 24576
        illegalBits 0
    )

    (method (init param1)
        (super:init(rest param1))
        (if (proc0_1(53))
            (self:
                view(506)
                loop(0)
                cel(1)
                x(250)
                y(43)
            )
        )
    )

)
(instance quirkHead of Prop
    (properties
        x 246
        y 17
        view 506
        loop 3
    )
)
(instance alien of Actor
    (properties
        x 266
        y 22
        view 506
        loop 4
        cel 3
    )

    (method (init param1)
        (super:init(rest param1))
        (if (proc0_1(53))
            (self:
                view(506)
                loop(6)
                cel(0)
                x(266)
                y(22)
            )
        )
    )

)
(instance salesman of Actor
    (properties
        x 218
        y 111
        noun 16
        view 503
        loop 7
        priority 8
        signal 16384
    )
)
(instance guard1 of Actor
    (properties
        x 209
        y 133
        view 507
        loop 9
        cel 1
    )
)
(instance public guard2 of Actor
    (properties
        x 143
        y 98
        view 507
        loop 3
        priority 7
        signal 16400
    )
)
(instance public victim of Actor
    (properties
        x rm500
        y 136
        view 507
        loop 4
        priority 15
        signal 16400
    )
)
(instance cliffy of Actor
    (properties
        x 244
        y 118
        noun 5
        view 500
        loop 1
        priority 7
        signal 16400
    )

    (method (init param1)
        (super:init(rest param1))
        (if (proc0_1(50))
            (cliffy:
                view(20)
                loop(8)
                cel(1)
                posn(174 111)
                setCycle(StopWalk -1)
                setLoop(Grooper)
                setScale(Scaler 132 38 157 109)
            )
        )
    )

)
(instance drool of Actor
    (properties
        x 293
        y 126
        view 500
        loop 3
        signal 16384
    )

    (method (init param1)
        (super:init(rest param1))
        (if (proc0_1(52))
            (self:
                view(501)
                loop(1)
                cel(0)
                x(61)
                y(128)
                setPri(8)
                setScale(0)
            )
        )
        (if (proc0_1(51))
            (self:
                view(501)
                setLoop(5)
                cel(0)
                x(55)
                y(115)
                setPri(8)
            )
        )
    )

)
(instance flo of Actor
    (properties
        x 277
        y 118
        view 500
        loop 2
        signal 16384
    )

    (method (init param1)
        (super:init(rest param1))
        (if (proc0_1(52))
            (self:
                view(501)
                loop(2)
                cel(0)
                x(90)
                y(124)
                setScale(0)
                setPri(7)
            )
        )
        (if (proc0_1(51))
            (self:
                view(501)
                setLoop(4)
                cel(0)
                x(90)
                y(124)
                setPri(7)
            )
        )
    )

)
(instance lavaLamp of Prop
    (properties
        x 177
        y 96
        view 502
        priority 5
        signal 16400
        cycleSpeed 12
        detailLevel 2
    )

    (method (init param1)
        (self:
            setLoop(0)
            setCycle(Fwd)
        )
        (super:init(rest param1))
    )

)
(instance public lavaglob1 of Actor
    (properties
        x 188
        y 83
        view 502
        loop 1
        cel 3
        priority 4
        signal 16384
        detailLevel 2
    )

    (method (init param1)
        (self:
            setLoop(1)
            cycleSpeed(12)
            setCycle(Fwd)
        )
        (super:init(rest param1))
    )

)
(instance public lavaglob2 of Actor
    (properties
        x sInitRoom
        y 1
        view 502
        loop 2
        cel 3
        priority 3
        signal 16384
        detailLevel 2
    )

    (method (init param1)
        (self:
            setLoop(2 cycleSpeed 12)
            setCycle(Fwd)
        )
        (super:init(rest param1))
    )

)
(instance bartender of Actor
    (properties
        view 515
        loop 7
        priority 6
        signal 16400
        detailLevel 2
    )

    (method (init param1)
        (if (== x 169)
            = local0 169
            = local2 226
            = local6 6
            (self:show())
        )(else
            = local0 226
            = local2 169
            = local6 4
            (self:hide())
        )
        (self:
            setLoop(7)
            setCycle(Fwd)
            x(local0)
            y(93)
            setPri(local6)
            detailLevel(2)
            setMotion(MoveTo local2 93 self)
        )
        (super:init(rest param1))
    )


    (method (cue)
        (self:init())
    )

)
(instance ex1 of Prop
    (properties
        x 141
        y 98
        view 515
        loop 2
        cel 1
        cycleSpeed 15
        detailLevel 2
    )
)
(instance ex2 of Prop
    (properties
        x 149
        y 98
        view 515
        loop 1
        cycleSpeed 15
        detailLevel 2
    )
)
(instance ex3 of Prop
    (properties
        x 259
        y 100
        view 515
        cel 3
        cycleSpeed 15
        detailLevel 2
    )
)
(instance ex4 of Prop
    (properties
        x 111
        y 105
        view 515
        loop 3
        cel 2
        cycleSpeed 15
        detailLevel 2
    )
)
(instance ex5 of Prop
    (properties
        x 247
        y 103
        view 515
        loop 4
        cel 2
        cycleSpeed 15
        detailLevel 2
    )
)
(instance ex6 of Prop
    (properties
        x 123
        y 101
        view 515
        loop 5
        cycleSpeed 15
        detailLevel 2
    )
)
(instance bigbody of Actor
    (properties
        noun 18
        view 504
        loop 1
        priority 15
        signal 18448
        illegalBits 0
    )

    (method (init param1)
        (switch (Random(0 1))
            (case 0
                ((super:init(rest param1)) = local0 65496 = local1 Random(10 180) = local2 360 = local3 Random(10 180) (self:
                    setLoop(1)
                    x(local0)
                    y(local1)
                    setMotion(MoveTo local2 local3 self)
                )
  )
            )
            (case 1
                ((super:init(rest param1)) = local0 360 = local1 Random(10 180) = local2 65496 = local3 Random(10 180) (self:
                    setLoop(0)
                    x(local0)
                    y(local1)
                    setMotion(MoveTo local2 local3 self)
                )
 )
            )
        )
    )


    (method (cue)
        (self:init())
        (bigtail:init())
    )

)
(instance bigtail of Prop
    (properties
        view 504
        loop 3
        priority 15
        signal 16400
    )

    (method (init param1)
        (super:init(rest param1))
        (if (== 0 (bigbody:loop))
            (self:setLoop(2))
        )(else
            (self:setLoop(3))
        )
        (self:
            x((bigbody:x))
            y(- (bigbody:y) 1)
        )
    )


    (method (doit param1)
        (self:
            x((bigbody:x))
            y(- (bigbody:y) 1)
        )
        (super:doit(rest param1))
    )

)
(instance bighead1 of Actor
    (properties
        x 65516
        y sInitRoom
        noun 17
        view 504
        loop 4
        priority 15
        signal 24592
        illegalBits 0
    )

    (method (init param1)
        (switch (local5)
            (case 0
                ((self:
                    setPri(15)
                    setLoop(4)
                    setCel(0)
                    x(65516)
                    y(220)
                )
  )
            )
            (case 4
                ((self:
                    setPri(15)
                    setLoop(5)
                    setCel(0)
                    x(340)
                    y(220)
                )
  )
            )
            (case 8
                ((self:
                    setPri(15)
                    setLoop(8)
                    setCel(0)
                    x(65511)
                    y(65511)
                )
  )
            )
            (case 12
                ((self:
                    setPri(15)
                    setLoop(9)
                    setCel(0)
                    x(340)
                    y(65516)
                )
 )
            )
        )
        (super:init(rest param1))
    )

)
(instance bigeyes1 of Prop
    (properties
        x 30
        y 161
        view 504
        loop 6
        priority 15
        signal 24592
    )

    (method (init param1)
        (super:init(rest param1))
        (switch ((bighead1:loop))
            (case 4
                ((self:setLoop(6))  )
            )
            (case 5
                ((self:setLoop(7))  )
            )
            (case 8
                ((self:setLoop(8))  )
            )
            (case 9
                ((self:setLoop(11)) )
            )
        )
        (self:
            x((bighead1:x))
            y((bighead1:y))
        )
    )


    (method (doit param1)
        (self:
            x((bighead1:x))
            y((bighead1:y))
        )
        (super:doit(rest param1))
    )

)
(instance Cliffysfriend of View
    (properties
        x 162
        y 97
        view 501
        loop 6
        priority 6
        signal 16
    )
)
(instance alien1 of Actor
    (properties
        x 227
        y 118
        view 516
        cel 8
    )
)
(instance alien2 of Actor
    (properties
        x 234
        y 127
        view 516
        loop 1
        cel 6
    )
)
(instance public genTalker of Narrator
    (properties
        talkWidth 200
    )

    (method (init param1)
        = font gFont
        = gSq5Win gNewSpeakWindow
        (switch (global122)
            (case 49
                ((send gSq5Win:
                    tailX(255)
                    tailY(130)
                    xOffset(65446)
                    isBottom(1)
                )
  )
            )
            (case 9
                ((send gSq5Win:
                    tailX(190)
                    tailY(75)
                    xOffset(65466)
                    isBottom(1)
                )
 )
            )
        )
        (super:init(rest param1))
    )


    (method (dispose param1)
        = gSq5Win gSq5Win_2
        (super:dispose(rest param1))
    )

)
