(version 2)
(include "sci.sh")
(exports
    0 eatIt
)
(use "Main")
(use "Cycle")
(use "Obj")
(script 781)



(instance public eatIt of Script
    (properties)

    (method (changeState newState)
        (switch (= state newState)
            (case 0
                proc0_2()
                = gGEgoIllegalBits (send gEgo:illegalBits)
                (send gEgo:
                    view(
                        (if (proc0_12(0))
                            27
                        )(else
                            24
                        )
)
                    cel(0)
                    cycleSpeed(1)
                    setCycle(End self)
                    setMotion(0)
                )
            )
            (case 1
                proc0_1()
                (send gEgo:
                    loop(2)
                    illegalBits(gGEgoIllegalBits)
                )
                proc0_3()
                (self:dispose())
            )
        )
    )

)
