Refactored

    function self:Animate(loop)
        if loop ~= self.sequence and self.Sound then
            self.Sound ''
            local tag = loop
            while tag do
                if self.SoundList[tag] then
                    self.Sound(self.SoundList[tag])
                    break
                else
                    tag = tag:match("^(.*):[^:]+")
                end
            end
        end
        return baseAnimate(self, loop)
    end