Roblox - Detailed Time Stop

print("Loaded Successfully!")
    --[[Changeable Variables]]--
local multiplier = 1 --Attack multiplier (default is 1)
local soundlist = {
    HardHit1 = "rbxassetid://565207203",
    HardHit2 = "rbxassetid://541909913",
    HardHit3 = "rbxassetid://541909983",
    WeakHit1 = "rbxassetid://558642292",
    WeakHit2 = "rbxassetid://541907812",
    Slice1 = "rbxassetid://260429964",
    Slice2 = "rbxassetid://260430015",
    Explosion1 = "rbxassetid://138186576",
    Explosion2 = "rbxassetid://157878578",
    Woosh1 = "rbxassetid://541909867",
    Woosh2 = "rbxassetid://541909763",
    TimeSlow = "rbxassetid://615678808",
    TimeStop = "rbxassetid://926382097",
    TimeResume = "rbxassetid://894793352",
    TimeFast = "rbxassetid://743499393",
    TimeReverse = "rbxassetid://618737332",

}

    --[[Important Variables]]--
local plr = game:GetService('Players').LocalPlayer
local char = plr.Character
local mouse = plr:GetMouse()
local input = game:GetService('UserInputService')
----
local joints = {"Right Shoulder", "Left Shoulder", "Right Hip", "Left Hip", "Neck", "RootJoint"}
local torso,head,rootpart = char.Torso,char.Head,char.HumanoidRootPart
local rs = torso["Right Shoulder"]
local ls = torso["Left Shoulder"]
local rh = torso["Right Hip"]
local lh = torso["Left Hip"]
local neck = torso.Neck
local rj = rootpart["RootJoint"]
----
local huge = Vector3.new(math.huge, math.huge, math.huge)
local attacking = false
local cananim = true
local timestop = false
local timeslow = false
local timefast = false
local reversing = false
local unfreeze = {}
local sounddata = {}
local connections = {}
local healthstuff = {}

    --[[ Functions ]]--
function addattack(keycode, func)
    input.InputBegan:connect(function(inp)
        if inp.KeyCode == keycode and not input:GetFocusedTextBox() then
            func()
        end
    end)
end
function attackend(keycode, func)
    input.InputEnded:connect(function(inp)
        if inp.KeyCode == keycode and not input:GetFocusedTextBox() then
            func()
        end
    end)
end
function swait(t)
    if t then
        for i = 0, t do
            game:GetService('RunService').Stepped:wait(0)
        end
    else
        game:GetService('RunService').Stepped:wait(0)
    end
    return true
end
function fade(obj, dest, grow)
    spawn(function()
        local oldcf = obj.CFrame
        for i = 0, 10 do
            if grow then
                obj.Size = obj.Size +Vector3.new(1,1,1)
                obj.CFrame = oldcf
            end
            obj.Transparency = obj.Transparency +0.1
            swait()
        end
        if dest then
        obj:Destroy()
        end
    end)
end
function replacejoint(name)
    local j = torso:FindFirstChild(name)
    if not j then j = char.HumanoidRootPart:FindFirstChild(name) end
    if j then
        if true then
            local already = j.Parent:FindFirstChild(j.Name.." Replacement")
            local new = Instance.new("Weld")
            local c0 = j.C0
            local c1 = j.C1
            new.Part0 = j.Part0
            j.Part0 = nil
            new.Name = j.Name.." Replacement"
            if already then c0 = already.C0 c1 = already.C1 already:Destroy() end
            new.Parent = j.Parent
            new.Part1 = j.Part1
            new.C0 = c0
            new.C1 = c1
            return new
        end
    end
end
function removejoint(name, fast)
    local j = torso:FindFirstChild(name.." Replacement")
    if not j then j = char.HumanoidRootPart:FindFirstChild(name.." Replacement") end
    if j then
        local p0 = j.Part0
        if p0 ~= nil then
        local c0 = j.C0
        local c1 = j.C1
        j:Destroy()
        local new = p0:FindFirstChild(name)
        local ac0 = new.C0
        local ac1 = new.C1
        new.Part0 = p0
        new.C0 = c0
        new.C1 = c1
        spawn(function()
            if name ~= "RootJoint" then
            if not fast then
            for i = 0, 0.6, 0.1 do
                new.C0 = new.C0:Lerp(ac0, 0.5)
                new.C1 = new.C1:lerp(ac1, 0.5)
                swait()
            end
            else
                new.C0 = new.C0:Lerp(ac0, 1)
                new.C1 = new.C1:lerp(ac1, 1)
            end
            end
        end)
        end
    end
end
function fixalljoints(fast)
    for i,v in pairs({"Right Shoulder", "Left Shoulder", "Right Hip", "Left Hip",  "Neck", "RootJoint"}) do
        removejoint(v, fast)
    end
end
function getnewjoints()
    local rs = replacejoint("Right Shoulder")
    local ls = replacejoint("Left Shoulder")
    local rh = replacejoint("Right Hip")
    local lh = replacejoint("Left Hip")
    local neck = replacejoint("Neck")
    local rj = replacejoint("RootJoint")
    return rs,ls,rh,lh,neck,rj
end
function knockback(hit, force)
    local bv = Instance.new("BodyVelocity")
    bv.MaxForce = huge
    bv.Velocity = force
    bv.Parent = hit
    game:GetService('Debris'):AddItem(bv, 0.15)
end
function soundeffect(id, volume, speed, parent, forcewait)
    local func = function()
        local s = LoadLibrary("RbxUtility").Create("Sound")()
        s.Name = "SoundEffect"
        s.Volume = volume
        s.PlaybackSpeed = speed
        s.SoundId = id
        s.Name = "dont"
        s.Looped = false
        s.Parent = parent
        s:Play()
        repeat wait() until not s.Playing
        s:Destroy()
    end
    if forcewait then
        func()
    else
        spawn(func)
    end
end
function getascendants(obj)
    local par = obj
    local ret = {}
    pcall(function()
        repeat
            par = par.Parent
            if par ~= nil then
                table.insert(ret, par)
            end
        until par == nil
    end)
    return ret
end
function findascendant(obj, class)
    local par = obj
    local ret = nil
    pcall(function()
        repeat
            par = par.Parent
            if par:IsA(class) then
                ret = par
                break
            end
        until par == nil
    end)
    return ret
end
function hurt(hit, dmg)
    --pcall(function()
        local hum = hit.Parent:FindFirstChildOfClass("Humanoid")
        if hum then
            if hum.Parent ~= char then
                hum.Health = hum.Health - dmg
                hum.Health = hum.Health - dmg
                soundeffect(soundlist.Headshot, 1.5, 1, workspace.CurrentCamera)
                return true
            end
        end
    --end)
end
    --[[ Actual script :OOOOOOOOOO ]]--
addattack(Enum.KeyCode.G, function()
    if not timeslow and not timefast and not reversing then
        local p = Instance.new("Part")
        p.Anchored = true
        p.Material = "Glass"
        p.Size = Vector3.new(0.1,0.1,0.1)
        p.BrickColor = BrickColor.new("Toothpaste")
        p.CanCollide = false
        p.CFrame = char.HumanoidRootPart.CFrame
        local m = Instance.new("SpecialMesh")
        m.MeshType = "Sphere"
        m.Parent = p
        p.Parent = char
        spawn(function()
        for i = 1, 50 do
            p.Transparency = i/50
            p.Size = p.Size:Lerp(Vector3.new(40,40,40),0.1)
            p.CFrame = char.HumanoidRootPart.CFrame
            swait()
        end
        p:Destroy()
        end)
        if not timestop then
            local s = Instance.new("Sound")
            s.Volume = 3
            s.Name = "dont"
            s.SoundId = soundlist.TimeStop
            s.Parent = char
            s:Play()
            dcon = workspace.DescendantAdded:connect(function(obj)
            pcall(function()
                swait()
                local ok = true
                for i,v in pairs(getascendants(obj)) do
                    if v.Name:lower():find("ignoremodel") then
                        ok = false
                    end
                end
                if obj:IsA("BasePart") and ok and not findascendant(obj, "Tool") and not findascendant(obj, "HopperBin") and not findascendant(obj, "Camera") then
                    if not obj.Anchored and obj.Name ~= "HumanoidRootPart" then
                        table.insert(unfreeze, obj)
                        obj.Anchored = true
                    end
                end
                if obj:IsA("Sound") and obj.Name ~= "dont" then
                    if obj.Playing then
                    obj:Pause()
                    table.insert(unfreeze, obj)
                    end
                end
                if obj:IsA("Humanoid") then
                    local last = obj.Health
                    local always = last
                    local con = obj.HealthChanged:connect(function(health)
                        if last-health > 0 then
                        table.insert(healthstuff, {hum = obj, change = last-health})
                        end
                        last = health
                        obj.Health = always
                    end)
                    table.insert(connections, con)
                end
            end)
        end)
        for i,v in pairs(workspace:GetDescendants()) do
            pcall(function()
                if v:IsA("BasePart") then
                local ok = true
                for i,e in pairs(getascendants(v)) do
                    if e.Name:lower():find("ignore_model") then
                        ok = false
                    end
                    if e:IsA("Camera") then
                        ok = false
                    end
                end
                if not v.Anchored and ok and v.Parent ~= char and not findascendant(v, "Camera") and not findascendant(v, "Tool") and not findascendant(v, "HopperBin") then
                    local ok = true
                    if v.Parent:IsA("Accessory") then ok = false end
                    if ok and v.Name ~= "HumanoidRootPart" then
                    v.Anchored = true
                    table.insert(unfreeze, v)
                    end
                end
                end
            end)
            pcall(function()
                if v:IsA("Sound") and v.Name ~= "dont" then
                    if v.Playing then
                    v:Pause()
                    table.insert(unfreeze, v)
                    end
                end
            end)
            pcall(function()
                if v:IsA("Humanoid") then
                    local last = v.Health
                    local always = last
                    local con = v.HealthChanged:connect(function(health)
                        if last-health > 0 then
                        table.insert(healthstuff, {hum = v, change = last-health})
                        end
                        last = health
                        v.Health = always
                    end)
                    table.insert(connections, con)
                end
            end)
        end
        timestop = true
        local cor = Instance.new("ColorCorrectionEffect")
        cor.Name = "tstopef"
        cor.Parent = game:GetService('Lighting')
        for i = 1, 50 do
            cor.Saturation = Vector3.new(cor.Saturation,0,0):Lerp(Vector3.new(-5,0,0), 0.05).X
            swait()
        end
        game.Debris:AddItem(s, 2)
    else
        local s = Instance.new("Sound")
        s.Volume = 7
        s.Name = "dont"
        s.SoundId = soundlist.TimeResume
        s.Parent = char
        s:Play()
        local cor = game:GetService('Lighting'):FindFirstChild("tstopef")
        if cor then
        for i = 1, 50 do
            cor.Saturation = Vector3.new(cor.Saturation,0,0):Lerp(Vector3.new(0,0,0), 0.05).X
            swait()
        end
        cor:Destroy()
        end
        game.Debris:AddItem(s, 2)
        timestop = false
        for i,v in pairs(unfreeze) do
            pcall(function()
                v.Anchored = false
            end)
            pcall(function()
                v:Resume()
            end)
        end
        for i,v in pairs(connections) do
            pcall(function()
                v:disconnect()
            end)
        end
        for i,v in pairs(healthstuff) do
            pcall(function()
                local hum = v.hum
                hum.Health = hum.Health - v.change
                if hum.Parent:FindFirstChild("Health") then
                    pcall(function()
                        hum.Parent.Health.Disabled = false
                    end)
                end
            end)
        end
        pcall(function()
            dcon:disconnect()
        end)
                healthstuff = {}
        unfreeze = {}
        end
    end
end)
local humanoiddata = {}
local bodymoverdata = {}
local dcon2
local connectionsdata = {}
addattack(Enum.KeyCode.H, function()
    if not timeslow and not timestop and not reversing then
        local p = Instance.new("Part")
        p.Anchored = true
        p.Material = "Glass"
        p.Size = Vector3.new(0.1,0.1,0.1)
        p.BrickColor = BrickColor.new("Toothpaste")
        p.CanCollide = false
        p.CFrame = char.HumanoidRootPart.CFrame
        local m = Instance.new("SpecialMesh")
        m.MeshType = "Sphere"
        m.Parent = p
        p.Parent = char
        spawn(function()
        for i = 1, 50 do
            p.Transparency = i/50
            p.Size = p.Size:Lerp(Vector3.new(40,40,40),0.1)
            p.CFrame = char.HumanoidRootPart.CFrame
            swait()
        end
        p:Destroy()
        end)
        if not timefast then
            timefast = true
            soundeffect(soundlist.TimeFast, 1.5, 1, char)
            for i,v in pairs(workspace:GetDescendants()) do
                if v:IsA("Humanoid") then
                    table.insert(humanoiddata, {Hum = v, WS = v.WalkSpeed, JP = v.JumpPower})
                    for _,track in pairs(v:GetPlayingAnimationTracks()) do
                    end
                    local con = v.AnimationPlayed:connect(function(track)
                    end)
                    table.insert(connections, con)
                end
                if v:IsA("BodyVelocity") then
                    table.insert(bodymoverdata, {Mover = v, Vel = v.Velocity})
                end
                if v:IsA("BodyPosition") then
                    table.insert(bodymoverdata, {Mover = v, Vel = v.P})
                end
                if v.Name == "HumanoidRootPart" and v:IsA("BasePart") then
                end
                if v:IsA("Sound") and v.Name ~= "dont" then
                    table.insert(sounddata, {Sound = v, Speed = v.PlaybackSpeed})
                end
            end
            dcon2 = workspace.DescendantAdded:connect(function(v)
                swait(2)
                if v:IsA("Humanoid") then
                    table.insert(humanoiddata, {Hum = v, WS = v.WalkSpeed, JP = v.JumpPower})
                    for _,track in pairs(v:GetPlayingAnimationTracks()) do
                        track:AdjustSpeed(1.4)
                    end
                    local con = v.AnimationPlayed:connect(function(track)
                        track:AdjustSpeed(1.4)
                    end)
                    table.insert(connections, con)
                end
                if v:IsA("BodyVelocity") then
                    table.insert(bodymoverdata, {Mover = v, Vel = v.Velocity})
                end
                if v:IsA("BodyPosition") then
                    table.insert(bodymoverdata, {Mover = v, Vel = v.P})
                end
                if v.Name == "HumanoidRootPart" and v:IsA("BasePart") then
                end
                if v:IsA("Sound") and v.Name ~= "dont" then
                    table.insert(sounddata, {Sound = v, Speed = v.PlaybackSpeed})
                end
            end)
        else
            timefast = false
            soundeffect(soundlist.TimeResume, 1.5, 1, char)
            for i,v in pairs(humanoiddata) do
                pcall(function()
                    v["Hum"].WalkSpeed = v["WS"]
                    v["Hum"].JumpPower = v["JP"]
                end)
            end
            for i,v in pairs(bodymoverdata) do
                pcall(function()
                    if v["Mover"]:IsA("BodyVelocity") then
                        v["Mover"].Velocity = v["Vel"]
                    end
                    if v["Mover"]:IsA("BodyPosition") then
                        v["Mover"].P = v["Vel"]
                    end
                end)
            end
            for i,v in pairs(sounddata) do
                pcall(function()
                    v["Sound"].PlaybackSpeed = v["Speed"]
                end)
            end
            for i,v in pairs(connections) do
                pcall(function()
                    v:disconnect()
                end)
            end
            connections = {}
            pcall(function()
                dcon2:disconnect()
            end)
            humanoiddata = {}
        end
    end
end)
local reversedata = {}
local saved = false
addattack(Enum.KeyCode.C, function()
    if not timestop and not timeslow and not timefast then
    if not saved then
        saved = true
        for i,v in pairs(workspace:GetDescendants()) do
            end
    else
        reversing = true
        saved = false
        soundeffect(soundlist.TimeReverse, 2, 1, workspace)
        for i = 1, 10 do
            for _,v in pairs(reversedata) do
                local obj = v.obj
                local cf = v.cf                 obj.Anchored = true
                end
            end
            swait()
        end
        char.HumanoidRootPart.Velocity = Vector3.new(0,0,0)
        reversedata = {}
        reversing = false
    end
    end)