ROBLOX Classic Animations + Classic NPC

local classic = true

local function Main()
    Connection = game.Workspace.DescendantAdded:Connect(function(c)
        if c.Name == "Animate" then
            c.Disabled=true
        end
    end)
    repeat wait() until game.Players.LocalPlayer.Character
    Char = c
    Died = game.Players.LocalPlayer.Character:WaitForChild("Humanoid").Died:Connect(function()
        Connection:Disconnect()
        Died:Disconnect()
    end)
    wait(.1)
    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

    -- ANIMATION

    -- declarations

    local Figure = game.Players.LocalPlayer.Character
    local Torso = waitForChild(Figure, "Torso")
    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")
    local Humanoid = waitForChild(Figure, "Humanoid")
    local pose = "Standing"

    local toolAnim = "None"
    local toolAnimTime = 0

    local jumpMaxLimbVelocity = 0.75

    -- functions

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

    function onDied()
        pose = "Dead"
    end

    function onJumping()
        pose = "Jumping"
    end

    function onClimbing()
        pose = "Climbing"
    end

    function onGettingUp()
        pose = "GettingUp"
    end

    function onFreeFall()
        pose = "FreeFall"
    end

    function onFallingDown()
        pose = "FallingDown"
    end

    function onSeated()
        pose = "Seated"
    end

    function onPlatformStanding()
        pose = "PlatformStanding"
    end

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

    function moveJump()
        RightShoulder.MaxVelocity = jumpMaxLimbVelocity
        LeftShoulder.MaxVelocity = jumpMaxLimbVelocity
        RightShoulder:SetDesiredAngle(3.14)
        LeftShoulder:SetDesiredAngle(-3.14)
        RightHip:SetDesiredAngle(0)
        LeftHip:SetDesiredAngle(0)
    end


    -- same as jump for now

    function moveFreeFall()
        RightShoulder.MaxVelocity = jumpMaxLimbVelocity
        LeftShoulder.MaxVelocity = jumpMaxLimbVelocity
        RightShoulder:SetDesiredAngle(3.14)
        LeftShoulder:SetDesiredAngle(-3.14)
        RightHip:SetDesiredAngle(0)
        LeftHip:SetDesiredAngle(0)
    end

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

    function getTool()
        for _, kid in ipairs(Figure:GetChildren()) do
            if kid.className == "Tool" then return kid 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:SetDesiredAngle(1.57)
            return
        end

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

        if (toolAnim == "Lunge") then
            RightShoulder.MaxVelocity = 0.5
            LeftShoulder.MaxVelocity = 0.5
            RightHip.MaxVelocity = 0.5
            LeftHip.MaxVelocity = 0.5
            RightShoulder:SetDesiredAngle(1.57)
            LeftShoulder:SetDesiredAngle(1.0)
            RightHip:SetDesiredAngle(1.57)
            LeftHip:SetDesiredAngle(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
            if (RightShoulder.CurrentAngle > 1.5 or RightShoulder.CurrentAngle < -1.5) then
                RightShoulder.MaxVelocity = jumpMaxLimbVelocity
            else
                RightShoulder.MaxVelocity = 0.15
            end
            if (LeftShoulder.CurrentAngle > 1.5 or LeftShoulder.CurrentAngle < -1.5) then
                LeftShoulder.MaxVelocity = jumpMaxLimbVelocity
            else
                LeftShoulder.MaxVelocity = 0.15
            end
            amplitude = 1
            frequency = 9
        elseif (pose == "Climbing") then
            RightShoulder.MaxVelocity = 0.5
            LeftShoulder.MaxVelocity = 0.5
            amplitude = 1
            frequency = 9
            climbFudge = 3.14
        else
            amplitude = 0.1
            frequency = 1
        end

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

        RightShoulder:SetDesiredAngle(desiredAngle + climbFudge)
        LeftShoulder:SetDesiredAngle(desiredAngle - climbFudge)
        RightHip:SetDesiredAngle(-desiredAngle)
        LeftHip:SetDesiredAngle(-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)
    Humanoid.PlatformStanding:connect(onPlatformStanding)
    Humanoid.Swimming:connect(onSwimming)
    -- main program

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

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

game.Players.LocalPlayer.CharacterAdded:Connect(function(c)
    if classic then
        coroutine.wrap(Main)()
    end
end)

local bot = false
local d = game:GetService("UserInputService")

d.InputBegan:Connect(function(c,v)
    if v then
        return
    else
        if c.KeyCode == Enum.KeyCode.KeypadFive then
            bot = not bot
            print("ClassicBotMode:"..tostring(bot))
        elseif c.KeyCode == Enum.KeyCode.KeypadSix then
            classic = not classic
            print("ClassicAnims:"..tostring(classic))

        end
    end
end)

while wait() do
    if bot then
        local c = game.Players.LocalPlayer.Character or game.Players.LocalPlayer.CharacterAdded:Wait()
        wait(math.random(1,7))
        if math.random(1,5) > 2.5 then
            c:FindFirstChild("Humanoid").Jump = true
        end
        c:FindFirstChild("Humanoid").WalkToPoint = Vector3.new(math.random(1,2),math.random(1,2),math.random(1,2))
    end
end