(include "sci.sh")
(use "Main")
(use "rm201")
(use "eureka")
(use "Obj")
(script 220)


(local
    local0

)
(procedure (localproc_00a2 param1 param2 param3)
    (send (ScriptID(201 13)):
        normal(0)
        keepWindow(1)
        curNoun(param1)
        curCase(param3)
        curVerb(param2)
    )
    (send gSQ5:handsOn())
    (send gSq5IconBar:select((send gSq5IconBar:at(2))))
    (send gSQ5:setCursor(982))
)


(procedure (localproc_00ee param1 param2 param3)
    (send (ScriptID(201 12)):
        normal(0)
        keepWindow(1)
        curNoun(param1)
        curCase(param3)
        curVerb(param2)
    )
    (send gSQ5:handsOn())
    (send gSq5IconBar:select((send gSq5IconBar:at(2))))
    (send gSQ5:setCursor(982))
)


(instance public sDStarconChoices of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (localproc_01ee(4 0 5) = cycles 1  )
            )
            (case 1
                ((send gTestMessager:say(4 0 5 1 self 202))  )
            )
            (case 2
                ((send (ScriptID(201 12)):
                    normal(1)
                    keepWindow(0)
                )
 
                (if ((send (ScriptID(201 12)):whichSelect))
                    (send gSQ5:handsOff())
                    (switch ((send (ScriptID(201 12)):whichSelect))
                        (case 1
                            (send gTestMessager:say(4 0 2 0 self 202))
                        )
                        (case 2
                            (send gTestMessager:say(4 0 3 0 self 202))
                        )
                        (case 3
                            (send gTestMessager:say(4 0 4 0 self 202))
                        )
                        (default 
                            = cycles 1
                        )
                    )
                )(else
                    = cycles 1
                )
 )
            )
            (case 3
                ((self:dispose()) )
            )
        )
    )

)
(instance public sFStarconChoices of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (localproc_00a2(12 0 8) = cycles 1  )
            )
            (case 1
                ((send gTestMessager:say(12 0 8 1 self 202))  )
            )
            (case 2
                ((send (ScriptID(201 13)):
                    normal(1)
                    keepWindow(0)
                )
 
                (if ((send (ScriptID(201 13)):whichSelect))
                    (send gSQ5:handsOff())
                    (switch ((send (ScriptID(201 13)):whichSelect))
                        (case 1
                            (send gTestMessager:say(12 0 9 0 self 202))
                        )
                        (case 2
                            = local0 1
                            (send gTestMessager:say(12 0 10 1 3 self 202))
                        )
                        (case 3
                            (send gTestMessager:say(12 0 11 0 self 202))
                        )
                        (default 
                            = cycles 1
                        )
                    )
                )(else
                    = cycles 1
                )
 )
            )
            (case 3
                (
                (if (local0)
                    (self:setScript(sDrooleComments self))
                )(else
                    = cycles 1
                )
 )
            )
            (case 4
                ((self:dispose()) )
            )
        )
    )

)
(instance public sDAlienChoices of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (= cycles 1 localproc_00ee(26 0 36)  )
            )
            (case 1
                ((send gTestMessager:say(26 0 36 1 self 202))  )
            )
            (case 2
                ((send (ScriptID(201 12)):
                    normal(1)
                    keepWindow(0)
                )
 
                (if ((send (ScriptID(201 12)):whichSelect))
                    (send gSQ5:handsOff())
                    (switch ((send (ScriptID(201 12)):whichSelect))
                        (case 1
                            (send gTestMessager:say(26 0 37 0 self 202))
                        )
                        (case 2
                            (self:setScript(sDTree6Choice2 self))
                        )
                        (case 3
                            (send (ScriptID(201 15)):talkWidth(250))
                            (send gTestMessager:say(26 0 38 0 self 202))
                        )
                        (default 
                            = cycles 1
                        )
                    )
                )(else
                    = cycles 1
                )
 )
            )
            (case 3
                ((send (ScriptID(201 15)):talkWidth(0)) (self:dispose()) )
            )
        )
    )

)
(instance public sDDefaultChoices of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (= cycles 1 localproc_00ee(26 0 47)  )
            )
            (case 1
                ((send gTestMessager:say(26 0 47 1 self 202))  )
            )
            (case 2
                ((send (ScriptID(201 12)):
                    normal(1)
                    keepWindow(0)
                )
 
                (if ((send (ScriptID(201 12)):whichSelect))
                    (send gSQ5:handsOff())
                    (switch ((send (ScriptID(201 12)):whichSelect))
                        (case 1
                            (send (ScriptID(201 12)):talkWidth(127))
                            (send gTestMessager:say(26 0 48 0 self 202))
                        )
                        (case 2
                            (send gTestMessager:say(26 0 49 0 self 202))
                        )
                        (case 3
                            (send gTestMessager:say(26 0 50 0 self 202))
                        )
                        (default 
                            = cycles 1
                        )
                    )
                )(else
                    = cycles 1
                )
 )
            )
            (case 3
                ((send (ScriptID(201 12)):talkWidth(120)) (self:dispose()) )
            )
        )
    )

)
(instance sDTree6Choice2 of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gTestMessager:say(26 0 40 1 2 self 202))  )
            )
            (case 1
                (proc201_6(self)  )
            )
            (case 2
                ((send gTestMessager:say(26 0 40 3 4 self 202))  )
            )
            (case 3
                ((self:setScript(ScriptID(201 4) self))  )
            )
            (case 4
                ((self:dispose()) )
            )
        )
    )

)
(instance public sFAlienChoices of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (localproc_00a2(12 0 32) = cycles 1  )
            )
            (case 1
                ((send gTestMessager:say(12 0 32 1 self 202))  )
            )
            (case 2
                ((send (ScriptID(201 13)):
                    normal(1)
                    keepWindow(0)
                )
 
                (if ((send (ScriptID(201 13)):whichSelect))
                    (send gSQ5:handsOff())
                    (switch ((send (ScriptID(201 13)):whichSelect))
                        (case 1
                            (send gTestMessager:say(12 0 33 0 self 202))
                        )
                        (case 2
                            (send gTestMessager:say(12 0 34 0 self 202))
                        )
                        (case 3
                            (if (< global127 3)
                                (send gTestMessager:say(12 0 35 0 self 202))
                            )(else
                                (send gTestMessager:say(25 0 22 0 self 202))
                            )
                        )
                        (default 
                            = cycles 1
                        )
                    )
                )(else
                    = cycles 1
                )
 )
            )
            (case 3
                ((self:dispose()) )
            )
        )
    )

)
(instance public sFNoiseChoices of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (localproc_00a2(12 0 27) = cycles 1  )
            )
            (case 1
                ((send gTestMessager:say(12 0 27 1 self 202))  )
            )
            (case 2
                ((send (ScriptID(201 13)):
                    normal(1)
                    keepWindow(0)
                )
 
                (if ((send (ScriptID(201 13)):whichSelect))
                    (send gSQ5:handsOff())
                    (switch ((send (ScriptID(201 13)):whichSelect))
                        (case 1
                            (send gTestMessager:say(12 0 28 0 self 202))
                        )
                        (case 2
                            (send gTestMessager:say(12 0 29 0 self 202))
                        )
                        (case 3
                            (if (< global127 3)
                                (send gTestMessager:say(12 0 30 0 self 202))
                            )(else
                                (send gTestMessager:say(25 0 22 0 self 202))
                            )
                        )
                        (default 
                            = cycles 1
                        )
                    )
                )(else
                    = cycles 1
                )
 )
            )
            (case 3
                ((self:dispose()) )
            )
        )
    )

)
(instance public sFDefault of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (localproc_00a2(12 0 41) = cycles 1  )
            )
            (case 1
                ((send gTestMessager:say(12 0 41 1 self 202))  )
            )
            (case 2
                ((send (ScriptID(201 13)):
                    normal(1)
                    keepWindow(0)
                )
 
                (if ((send (ScriptID(201 13)):whichSelect))
                    (send gSQ5:handsOff())
                    (switch ((send (ScriptID(201 13)):whichSelect))
                        (case 1
                            (if (proc0_1(30))
                                (send gTestMessager:say(4 0 3 2 self))
                            )(else
                                (send gTestMessager:say(12 0 43 0 self 202))
                            )
                        )
                        (case 2
                            (send gTestMessager:say(12 0 44 (+ (eureka:destination) 1) self 202))
                        )
                        (case 3
                            (if (< global127 3)
                                (send gTestMessager:say(25 0 21 1 self 202))
                            )(else
                                (if (not proc0_1(30) and (== global127 3))
                                    (send gTestMessager:say(25 0 22 1 self 202))
                                )(else
                                    (if (proc0_1(30) and not proc0_1(93))
                                        (send gTestMessager:say(25 0 26 1 self 202))
                                    )(else
                                        (if ((== global142 1) and not proc0_1(94))
                                            (send gTestMessager:say(25 0 24 0 self 202))
                                        )(else
                                            (if ((>= global142 1) and not proc0_1(75))
                                                (send gTestMessager:say(25 0 25 0 self 202))
                                            )(else
                                                (send gTestMessager:say(12 0 44 (+ (eureka:destination) 1) self 202))
                                            )
                                        )
                                    )
                                )
                            )
                        )
                        (default 
                            = cycles 1
                        )
                    )
                )(else
                    = cycles 1
                )
 )
            )
            (case 3
                ((self:dispose()) )
            )
        )
    )

)
(instance public sFGenericChoices of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (localproc_00a2(12 0 42) = cycles 1  )
            )
            (case 1
                ((send gTestMessager:say(12 0 42 1 self 202))  )
            )
            (case 2
                ((send (ScriptID(201 13)):
                    normal(1)
                    keepWindow(0)
                )
 
                (if ((send (ScriptID(201 13)):whichSelect))
                    (send gSQ5:handsOff())
                    (switch ((send (ScriptID(201 13)):whichSelect))
                        (case 1
                            (send gTestMessager:say(12 0 45 0 self 202))
                        )
                        (case 2
                            (send gTestMessager:say(12 0 46 0 self 202))
                        )
                        (case 3
                            (if (< global127 3)
                                (send gTestMessager:say(12 0 60 0 self 202))
                            )(else
                                (send gTestMessager:say(25 0 22 0 self 202))
                            )
                        )
                        (default 
                            = cycles 1
                        )
                    )
                )(else
                    = cycles 1
                )
 )
            )
            (case 3
                ((self:dispose()) )
            )
        )
    )

)
(instance public sDCloroxChoices of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (localproc_00ee(26 0 55) = cycles 1  )
            )
            (case 1
                ((send gTestMessager:say(26 0 55 1 self 202))  )
            )
            (case 2
                ((send (ScriptID(201 12)):
                    normal(1)
                    keepWindow(0)
                )
 (send gSQ5:handsOff()) 
                (if ((send (ScriptID(201 12)):whichSelect))
                    (send gSQ5:handsOff())
                    (switch ((send (ScriptID(201 12)):whichSelect))
                        (case 1
                            (send gTestMessager:say(26 0 56 0 self 202))
                        )
                        (case 2
                            (send gTestMessager:say(26 0 57 0 self 202))
                        )
                        (case 3
                            (send gTestMessager:say(26 0 58 0 self 202))
                        )
                        (default 
                            = cycles 1
                        )
                    )
                )(else
                    = cycles 1
                )
 )
            )
            (case 3
                ((self:dispose()) )
            )
        )
    )

)
(instance public sFCloroxChoices of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (localproc_00a2(12 0 51) = cycles 1  )
            )
            (case 1
                ((send gTestMessager:say(12 0 51 1 self 202))  )
            )
            (case 2
                ((send (ScriptID(201 13)):
                    normal(1)
                    keepWindow(0)
                )
 (send gSQ5:handsOff()) proc201_27(0) 
                (if ((send (ScriptID(201 13)):whichSelect))
                    (send gSQ5:handsOff())
                    (switch ((send (ScriptID(201 13)):whichSelect))
                        (case 1
                            (self:setScript(sFTree9Choice1 self))
                        )
                        (case 2
                            (send gTestMessager:say(12 0 53 0 self 202))
                        )
                        (case 3
                            (send gTestMessager:say(12 0 54 0 self 202))
                        )
                        (default 
                            = cycles 1
                        )
                    )
                )(else
                    = cycles 1
                )
 )
            )
            (case 3
                (proc201_27(1) (self:dispose()) )
            )
        )
    )

)
(instance sFTree9Choice1 of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gTestMessager:say(12 0 52 1 5 self 202))  )
            )
            (case 1
                (proc201_7(self) proc201_27(1) (send gEgo:
                    setLoop(0)
                    posn(134 95)
                    setCel(0)
                    show()
                )
  )
            )
            (case 2
                ((send gTestMessager:say(12 0 52 6 self 202))  )
            )
            (case 3
                ((self:setScript(ScriptID(201 8) self)) (send gEgo:
                    setLoop(1)
                    setCel(0)
                    posn(178 95)
                )
  )
            )
            (case 4
                ((send gTestMessager:say(12 0 52 7 8 self 202))  )
            )
            (case 5
                ((self:dispose()) )
            )
        )
    )

)
(instance sFTree9Choice2 of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gTestMessager:say(12 0 53 1 8 self 202))  )
            )
            (case 1
                ((send gEgo:
                    setLoop(0)
                    posn(134 95)
                    setCel(0)
                )
 = seconds 3  )
            )
            (case 2
                ((send gEgo:
                    setLoop(1)
                    setCel(0)
                    posn(178 95)
                )
 = seconds 1  )
            )
            (case 3
                ((send gTestMessager:say(12 0 53 9 10 self 202))  )
            )
            (case 4
                ((self:dispose()) )
            )
        )
    )

)
(instance public sDThrakusChoices of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (= cycles 1 localproc_00ee(26 0 74)  )
            )
            (case 1
                ((send gTestMessager:say(26 0 74 1 self 202))  )
            )
            (case 2
                ((send (ScriptID(201 12)):
                    normal(1)
                    keepWindow(0)
                )
 proc201_5(0) 
                (if ((send (ScriptID(201 12)):whichSelect))
                    (send gSQ5:handsOff())
                    (switch ((send (ScriptID(201 12)):whichSelect))
                        (case 1
                            (send gTestMessager:say(26 0 75 0 self 202))
                        )
                        (case 2
                            (send gTestMessager:say(26 0 76 0 self 202))
                        )
                        (case 3
                            (send gTestMessager:say(26 0 77 0 self 202))
                        )
                        (default 
                            = cycles 1
                        )
                    )
                )(else
                    = cycles 1
                )
 )
            )
            (case 3
                (proc201_5(1) (self:dispose()) )
            )
        )
    )

)
(instance public sFThrakusChoices of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (localproc_00a2(12 0 79) = cycles 1  )
            )
            (case 1
                ((send gTestMessager:say(12 0 79 1 self 202))  )
            )
            (case 2
                ((send (ScriptID(201 13)):
                    normal(1)
                    keepWindow(0)
                )
 
                (if ((send (ScriptID(201 13)):whichSelect))
                    (send gSQ5:handsOff())
                    (switch ((send (ScriptID(201 13)):whichSelect))
                        (case 1
                            (send gTestMessager:say(12 0 80 0 self 202))
                        )
                        (case 2
                            (send gTestMessager:say(12 0 81 0 self 202))
                        )
                        (case 3
                            (send gTestMessager:say(12 0 82 0 self 202))
                        )
                        (default 
                            = cycles 1
                        )
                    )
                )(else
                    = cycles 1
                )
 )
            )
            (case 3
                ((self:dispose()) )
            )
        )
    )

)
(instance public sFAfterClorox of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (localproc_00a2(12 0 64) = cycles 1  )
            )
            (case 1
                ((send gTestMessager:say(12 0 64 1 self 202))  )
            )
            (case 2
                ((send (ScriptID(201 13)):
                    normal(1)
                    keepWindow(0)
                )
 
                (if ((send (ScriptID(201 13)):whichSelect))
                    (send gSQ5:handsOff())
                    (switch ((send (ScriptID(201 13)):whichSelect))
                        (case 1
                            (send gTestMessager:say(12 0 65 0 self 202))
                        )
                        (case 2
                            (send gTestMessager:say(12 0 66 0 self 202))
                        )
                        (default 
                            = cycles 1
                        )
                    )
                )(else
                    = cycles 1
                )
 )
            )
            (case 3
                ((self:dispose()) )
            )
        )
    )

)
(instance public sFBeforeGoliath of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (localproc_00a2(12 0 83) = cycles 1  )
            )
            (case 1
                ((send gTestMessager:say(12 0 83 1 self 202))  )
            )
            (case 2
                ((send (ScriptID(201 13)):
                    normal(1)
                    keepWindow(0)
                )
 
                (if ((send (ScriptID(201 13)):whichSelect))
                    (send gSQ5:handsOff())
                    (switch ((send (ScriptID(201 13)):whichSelect))
                        (case 1
                            (send gTestMessager:say(12 0 84 0 self 202))
                        )
                        (case 2
                            (send gTestMessager:say(12 0 85 0 self 202))
                        )
                        (case 3
                            (send gTestMessager:say(12 0 87 0 self 202))
                        )
                        (default 
                            = cycles 1
                        )
                    )
                )(else
                    = cycles 1
                )
 )
            )
            (case 3
                ((self:dispose()) )
            )
        )
    )

)
(instance public sDAfterClorox of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                (localproc_00ee(26 0 70) = cycles 1  )
            )
            (case 1
                ((send gTestMessager:say(26 0 70 1 self 202))  )
            )
            (case 2
                ((send (ScriptID(201 12)):
                    normal(1)
                    keepWindow(0)
                )
 
                (if ((send (ScriptID(201 12)):whichSelect))
                    (send gSQ5:handsOff())
                    (switch ((send (ScriptID(201 12)):whichSelect))
                        (case 1
                            (send gTestMessager:say(26 0 71 0 self 202))
                        )
                        (case 2
                            (send gTestMessager:say(26 0 72 0 self 202))
                        )
                        (default 
                            = cycles 1
                        )
                    )
                )(else
                    = cycles 1
                )
 )
            )
            (case 3
                ((self:dispose()) )
            )
        )
    )

)
(instance public sAsteroidChoices of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gTestMessager:say(13 0 20 1 self 201))  )
            )
            (case 1
                (= cycles 1 localproc_00ee(22 0 8)  )
            )
            (case 2
                ((send gTestMessager:say(22 0 8 1 self 202))  )
            )
            (case 3
                ((send (ScriptID(201 12)):
                    normal(1)
                    keepWindow(0)
                )
 
                (if ((send (ScriptID(201 12)):whichSelect))
                    (send gSQ5:handsOff())
                    (switch ((send (ScriptID(201 12)):whichSelect))
                        (case 1
                            (eureka:setScript(0))
                            (eureka:
                                warnings(3)
                                timer(5)
                            )
                            proc0_3(42)
                            proc0_10(189 35)
                        )
                        (case 2
                        )
                        (case 3
                        )
                        (default 
                            = cycles 1
                        )
                    )
                )(else
                    (self:dispose())
                )
 = cycles 1  )
            )
            (case 4
                ((send gSQ5:handsOff()) (self:dispose()) )
            )
        )
    )

)
(instance sDrooleComments of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                ((send gEgo:
                    setLoop(0)
                    posn(134 95)
                    setCel(0)
                    show()
                )
 proc201_7(self)  )
            )
            (case 1
                ((send gTestMessager:say(12 0 10 4 self 202))  )
            )
            (case 2
                ((send gEgo:
                    setLoop(1)
                    setCel(0)
                    posn(178 95)
                )
 = cycles 2  )
            )
            (case 3
                ((send gTestMessager:say(12 0 10 5 self 202))  )
            )
            (case 4
                ((self:setScript(ScriptID(201 8) self))  )
            )
            (case 5
                (= local0 0 (self:dispose()) )
            )
        )
    )

)
