(version 2)
(include "sci.sh")
(exports
    0 ComeOnDown
    1 laurelTalker
    2 hardyTalker
)
(use "Main")
(use "GloryTalker")
(use "Cycle")
(use "View")
(use "Obj")
(script 401)


(local
    local0

)
(instance public ComeOnDown of Script
    (properties)

    (method (changeState newState)
        (var temp0[2])
        (switch (= state newState)
            (case 0
                proc0_2()
                (send gMainIconBar:disable())
                = local0 (send gGame:setCursor(996 1))
                SetCursor(0)
                (hardy:
                    init()
                    setLoop(0)
                    setCycle(Walk)
                    cycleSpeed(6)
                    moveSpeed(7)
                    setMotion(MoveTo 143 119 self)
                )
                (hardyTalker:init())
                (laurelTalker:init())
                (laurel:
                    init()
                    setLoop(0)
                    setCycle(Walk)
                    cycleSpeed(6)
                    moveSpeed(7)
                    setMotion(MoveTo 181 125)
                )
            )
            (case 1
                (send gQg3Messager:say(1 6 1 0 self 400))
            )
            (case 2
                = cycles 20
            )
            (case 3
                (laurel:
                    cycleSpeed(10)
                    loop(1)
                    cel(0)
                )
                = cycles 20
            )
            (case 4
                (hardy:
                    cycleSpeed(10)
                    loop(1)
                    cel(0)
                )
                = cycles 20
            )
            (case 5
                (hardy:setCycle(End self))
            )
            (case 6
                = cycles 20
            )
            (case 7
                (hardy:
                    loop(2)
                    cel(0)
                )
                (send gQg3Messager:say(1 6 2 0 self 400))
            )
            (case 8
                (hardy:setCycle(End self))
            )
            (case 9
                = cycles 20
            )
            (case 10
                (hardy:
                    loop(3)
                    cel(0)
                )
                (send gQg3Messager:say(1 6 3 1 self 400))
            )
            (case 11
                (laurel:setCycle(End self))
            )
            (case 12
                = cycles 20
            )
            (case 13
                (send gQg3Messager:say(1 6 3 2 self 400))
            )
            (case 14
                (hardy:setCycle(End self))
            )
            (case 15
                = cycles 20
            )
            (case 16
                (send gQg3Messager:say(1 6 4 0 self 400))
            )
            (case 17
                (laurel:setCycle(Beg self))
            )
            (case 18
                (hardy:
                    setLoop(0)
                    cel(0)
                    cycleSpeed(6)
                    setCycle(Walk)
                    setMotion(MoveTo -15 123)
                )
                (laurel:
                    setLoop(0)
                    cel(0)
                    cycleSpeed(6)
                    setCycle(Walk)
                    setMotion(MoveTo -15 133 self)
                )
            )
            (case 19
                proc0_12(gOwner laurel self)
            )
            (case 20
                = cycles 2
            )
            (case 21
                (send gQg3Messager:say(3 6 25 0 self 400))
            )
            (case 22
                SetCursor(1)
                (send gGame:setCursor(local0 1))
                (send gMainIconBar:enable())
                (laurel:dispose())
                (laurelTalker:dispose())
                (hardy:dispose())
                (hardyTalker:dispose())
                (self:dispose())
            )
        )
    )

)
(instance laurel of Actor
    (properties
        x 352
        y 116
        view 408
        signal $4000
        origStep 1028
    )
)
(instance public laurelTalker of GloryTalker
    (properties
        x 1
        y 1
        view 409
        loop 1
        talkWidth 150
        back 57
        textX 137
        textY 5
    )

    (method (init param1)
        (super:init(laurelBrow laurelEyes laurelMouth rest param1))
    )

)
(instance laurelEyes of Prop
    (properties
        nsTop 38
        nsLeft 38
        view 409
        loop 2
    )
)
(instance laurelBrow of Prop
    (properties
        nsTop 29
        nsLeft 37
        view 409
        loop 3
    )
)
(instance laurelMouth of Prop
    (properties
        nsTop 54
        nsLeft 38
        view 409
        cel 2
    )
)
(instance hardy of Actor
    (properties
        x 325
        y 106
        view 406
        signal $4000
        origStep 1028
    )
)
(instance public hardyTalker of GloryTalker
    (properties
        x 1
        y 1
        view 407
        loop 1
        talkWidth 150
        back 57
        textX 137
        textY 5
    )

    (method (init param1)
        (super:init(hardyBrow hardyEyes hardyMouth rest param1))
    )


    (method (show param1)
        (send bust:cel(Random(0 1)))
        (super:show(rest param1))
    )

)
(instance hardyEyes of Prop
    (properties
        nsTop 36
        nsLeft 36
        view 407
        loop 2
        cel 2
    )
)
(instance hardyBrow of Prop
    (properties
        nsTop 28
        nsLeft 31
        view 407
        loop 3
        cel 1
    )
)
(instance hardyMouth of Prop
    (properties
        nsTop 51
        nsLeft 26
        view 407
        cel 8
    )
)
