classic animation

--suitable for void script builder, made by Protofer_S, and yes i changed my username

    NLS([[

part = Instance.new("Part",game.Lighting)
part.Anchored = true
equiped=false
part.FormFactor = Enum.FormFactor.Custom
part.CanCollide = false
part.LeftSurface = Enum.SurfaceType.SmoothNoOutlines
part.TopSurface = Enum.SurfaceType.SmoothNoOutlines
part.RightSurface = Enum.SurfaceType.SmoothNoOutlines
part.FrontSurface = Enum.SurfaceType.SmoothNoOutlines
part.BottomSurface = Enum.SurfaceType.SmoothNoOutlines
part.Size = Vector3.new(2,0.2,2)
part.BackSurface = Enum.SurfaceType.SmoothNoOutlines
part.BrickColor = BrickColor.new("Lime green")
mesh = Instance.new("CylinderMesh",part)
mesh.Scale = Vector3.new(1, 0.100000001, 1)
mouse=game:service'Players'.LocalPlayer:GetMouse()
ClearAngles=function(cf)
return CFrame.new(cf.x,cf.y,cf.z)
end
game:service'RunService'.RenderStepped:connect(function()
if mouse.Hit~=nil and mouse.Target~=nil and mouse.Target~=part then
part.CFrame=ClearAngles(mouse.Hit)
part.Transparency=0
elseif mouse.Target==nil then
part.Transparency=1
end
local th=0
for i,v in pairs(game:service'Players'.LocalPlayer.Character:children()) do
if v:IsA'Tool' then
th=th+1
end
end
for i,v in pairs(game:service'Players'.LocalPlayer.Backpack:children()) do
if v:IsA'HopperBin' and v.Active==true then
th=th+1
end
end
if th~= 0 then
part.Transparency=1
equiped=true
else
equiped=false
end
end)
mouse.Button1Down:connect(function()
coroutine.resume(coroutine.create(function()
for i,v in pairs(game:service'Players'.LocalPlayer.Character:children()) do
if v:IsA'Humanoid' and equiped==false then
v:MoveTo(part.Position)
end
end
end))
end)


]],owner.Backpack)



    function waitForChild(parent, childName)
        local child = parent:findFirstChild(childName)
        if child then return child end
        while true do
            child = parent.ChildAdded:wait()
            if child.Name==childName then return child end
        end
    end


local Figure = owner.Character
local an = waitForChild(Figure,"Animate")
an.Disabled=true
local Torso = waitForChild(Figure,"Torso")
local Humanoid = waitForChild(Figure, "Humanoid")
Humanoid.BreakJointsOnDeath=false
Humanoid:ClearAllChildren()
local Humanoidroot = waitForChild(Figure,"HumanoidRootPart")
Instance.new("Animator",Humanoid).Name="Animator"


for i,g in pairs(Humanoidroot:GetDescendants()) do
    if g:IsA("Sound") then
        g:Destroy()
        end
    end



function makeJoint(limbName, jointName, c0, c1)
    local limb = waitForChild(Figure, limbName)
    if limb.Name=="Head" then

    else
        limb:BreakJoints()

    end
        local joint = Instance.new"Motor6D"
       joint.Name = jointName

        joint.Part0 = Torso
        joint.Part1 = limb
        joint.C0 = c0
        joint.C1 = c1
        joint.MaxVelocity = 0.5
        joint.archivable = true
        joint.Parent = Torso
        return joint
    end



    local Neck = makeJoint("Head","Neck", CFrame.new(0, 1, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0), CFrame.new(0, -0.5, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0))
    local RightShoulder = makeJoint("Right Arm", "Right Shoulder", CFrame.new(1, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0), CFrame.new(-0.5, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0))
    local LeftShoulder = makeJoint("Left Arm", "Left Shoulder", CFrame.new(-1, 0.5, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0), CFrame.new(0.5, 0.5, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0))
    local RightHip = makeJoint("Right Leg", "Right Hip", CFrame.new(1, -1, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0), CFrame.new(0.5, 1, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0))
    local LeftHip = makeJoint("Left Leg", "Left Hip", CFrame.new(-1, -1, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0), CFrame.new(-0.5, 1, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0))




Humanoid.BreakJointsOnDeath=true


-- util

    function sound()

function waitForChild(parent, childName)
    while true do
        local child = parent:findFirstChild(childName)
        if child then
            return child
        end
        parent.ChildAdded:wait()
    end
end

function newSound(id)
    local sound = Instance.new("Sound")
    sound.SoundId = id
    sound.Parent = owner.Character.Head
    sound.Volume=1
    return sound
end

-- declarations
--rbxasset://sounds/button.wav
local sDied = newSound("rbxasset://sounds/uuhhh.wav")
local sFallingDown = newSound("rbxasset://sounds/splat.wav")
local sFreeFalling = newSound("rbxassetid://2428506580")
local sGettingUp = newSound("rbxasset://sounds/hit.wav")
local sJumping = newSound("rbxasset://sounds/button.wav")
local sRunning = newSound("rbxasset://sounds/bfsl-minifigfoots1.mp3")
sRunning.Looped = true



-- functions

function onDied()
    sDied:play()
end

function onState(state, sound)
    if state then
        sound:play()
    else
        sound:pause()
    end
end

function onRunning(speed)
    if speed>0 then
        sRunning:play()
    else
        sRunning:pause()
    end
end

-- connect up

Humanoid.Died:connect(onDied)
Humanoid.Running:connect(onRunning)
Humanoid.Jumping:connect(function(state) onState(state, sJumping) end)
Humanoid.GettingUp:connect(function(state) onState(state, sGettingUp) end)
Humanoid.FreeFalling:connect(function(state) onState(state, sFreeFalling) end)
Humanoid.FallingDown:connect(function(state) onState(state, sFallingDown) end)


end




function waitForChild(parent, childName)
    while true do
        local child = parent:findFirstChild(childName)
        if child then
            return child
        end
        parent.ChildAdded:wait()
    end
end

-- declarations

--local Figure = owner.Character
--local Torso = waitForChild(Figure, "Torso")
--local Humanoid = waitForChild(Figure, "Humanoid")
--local RightShoulder = waitForChild(Torso, "Right Shoulder")
--local LeftShoulder = waitForChild(Torso, "Left Shoulder")
--local RightHip = waitForChild(Torso, "Right Hip")
--local LeftHip = waitForChild(Torso, "Left Hip")
--local Neck = waitForChild(Torso, "Neck")


-- functions



local toolAnim = "None"
local toolAnimTime = 0

-- functions

function onRunning(speed)
    if speed>0 then
        pose = "Running"
    else
        pose = "Standing"
    end
end

function onDied()
    pose = "Dead"
end

function onJumping(state)
    pose = "Jumping"
end

function onClimbing()
    pose = "Climbing"
end

function onGettingUp(state)
    pose = "GettingUp"
end

function onFreeFall(state)
    pose = "FreeFall"
end

function onFallingDown(state)
    pose = "FallingDown"
end

function onSeated()
    pose = "Seated"
end

function moveJump()
    RightShoulder.MaxVelocity = 0.5
    LeftShoulder.MaxVelocity = 0.5
    RightShoulder.DesiredAngle = 3.14
    LeftShoulder.DesiredAngle = -3.14
    RightHip.DesiredAngle = 0
    LeftHip.DesiredAngle = 0
end


-- same as jump for now

function moveFreeFall()
    RightShoulder.MaxVelocity = 0.5
    LeftShoulder.MaxVelocity = 0.5
    RightShoulder.DesiredAngle = 3.14
    LeftShoulder.DesiredAngle = -3.14
    RightHip.DesiredAngle = 0
    LeftHip.DesiredAngle = 0
end

function moveSit()
    RightShoulder.MaxVelocity = 0.15
    LeftShoulder.MaxVelocity = 0.15
    RightShoulder.DesiredAngle = 3.14 /2
    LeftShoulder.DesiredAngle = -3.14 /2
    RightHip.DesiredAngle = 3.14 /2
    LeftHip.DesiredAngle = -3.14 /2
end

local function getTool()
    for i, v in ipairs(Figure:GetChildren()) do
        if v:IsA"Tool" then
            return v
        end
    end
    return nil
end

function getToolAnim(tool)
    for _, c in ipairs(tool:GetChildren()) do
        if c.Name == "toolanim" and c.className == "StringValue" then
            return c
        end
    end
    return nil
end

function animateTool()

    if (toolAnim == "None") then
        RightShoulder.DesiredAngle = 1.57
        return
    end

    if (toolAnim == "Slash") then
        RightShoulder.MaxVelocity = 0.5
        RightShoulder.DesiredAngle = 0
        return
    end

    if (toolAnim == "Lunge") then
        RightShoulder.MaxVelocity = 0.5
        LeftShoulder.MaxVelocity = 0.5
        RightHip.MaxVelocity = 0.5
        LeftHip.MaxVelocity = 0.5
        RightShoulder.DesiredAngle = 1.57
        LeftShoulder.DesiredAngle = 1.0
        RightHip.DesiredAngle = 1.57
        LeftHip.DesiredAngle = 1.0
        return
    end
end

function move(time)
    local amplitude
    local frequency

    if (pose == "Jumping") then
        moveJump()
        return
    end

    if (pose == "FreeFall") then
        moveFreeFall()
        return
    end

    if (pose == "Seated") then
        moveSit()
        return
    end

    local climbFudge = 0

    if (pose == "Running") then
        RightShoulder.MaxVelocity = 0.15
        LeftShoulder.MaxVelocity = 0.15
        amplitude = .99
        frequency = 9
    elseif (pose == "Climbing") then
        RightShoulder.MaxVelocity = 0.5
        LeftShoulder.MaxVelocity = 0.5
        amplitude = .99
        frequency = 9
        climbFudge = 3.14
    else
        amplitude = 0.1
        frequency = 1
    end

    desiredAngle = amplitude * math.sin(time*frequency)

    RightShoulder.DesiredAngle = desiredAngle + climbFudge
    LeftShoulder.DesiredAngle = desiredAngle - climbFudge
    RightHip.DesiredAngle = -desiredAngle
    LeftHip.DesiredAngle = -desiredAngle


    local tool = getTool()

    if tool then

        animStringValueObject = getToolAnim(tool)

        if animStringValueObject then
            toolAnim = animStringValueObject.Value
            -- message recieved, delete StringValue
            animStringValueObject.Parent = nil
            toolAnimTime = time + .3
        end

        if time > toolAnimTime then
            toolAnimTime = 0
            toolAnim = "None"
        end

        animateTool()


    else
        toolAnim = "None"
        toolAnimTime = 0
    end
end


-- connect events

Humanoid.Died:connect(onDied)
Humanoid.Running:connect(onRunning)
Humanoid.Jumping:connect(onJumping)
Humanoid.Climbing:connect(onClimbing)
Humanoid.GettingUp:connect(onGettingUp)
Humanoid.FreeFalling:connect(onFreeFall)
Humanoid.FallingDown:connect(onFallingDown)
Humanoid.Seated:connect(onSeated)


    sound()

-- main program

--local runService = game:service("RunService");

game:GetService('RunService').Heartbeat:Connect(function()
if Figure.Parent~=nil then
local _, time = wait()
    move(time)
end

end)

--while Figure.Parent~=nil do
    --local _, time = wait(0.1)
    --move(time)
--end