(version 2)
(include "sci.sh")
(exports
    0 storyTalker
    1 StoryTeller
)
(use "GloryTalker")
(use "View")
(script 53)



(instance public storyTalker of GloryTalker
    (properties
        x 5
        y 10
        view 422
        loop 1
        talkWidth 140
        back 57
        textX 145
        textY 3
    )

    (method (init param1)
        (super:init(storyBust storyEyes storyMouth rest param1))
    )

)
(instance storyMouth of Prop
    (properties
        nsTop 45
        nsLeft 42
        view 422
        cycleSpeed 10
    )
)
(instance storyEyes of Prop
    (properties
        nsTop 33
        nsLeft 44
        view 422
        loop 2
        cycleSpeed 30
    )
)
(instance storyBust of Prop
    (properties
        nsTop 16
        nsLeft 39
        view 422
        loop 3
    )
)
(instance public StoryTeller of Actor
    (properties
        view 421
    )
)
