Animations lost after making my character invisible, how do I avoid this?

Why doesn't my Character have the default moving animations when I run this script? All I did was make the HumanoidRootPart transparent... Is there a more efficient way of making your character invisible?

tool = script.Parent
plr = script.Parent.Parent.Parent
char = plr.Character

script.Parent.Selected:connect(function()
        for i,v in pairs(char:GetChildren()) do
            if v:IsA("Part") and v.Name ~= "HumanoidRootPart" then
            v.Transparency = 1

            end
            if v:IsA("Hat") then
                v.Handle.Transparency = 1
            end
        end
end)

script.Parent.Deselected:connect(function()

        for i,v in pairs(char:GetChildren()) do
            if v:IsA("Part") and v.Name ~= "HumanoidRootPart" then
            v.Transparency = 0

            end
            if v:IsA("Hat") then
                v.Handle.Transparency = 0
            end
        end


        end)