-- ESP
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local Workspace = game:GetService("Workspace")
local LP = Players.LocalPlayer

local Resources = Workspace:WaitForChild("Resources")

-- ITENS + PLAYERS
local trackedItems = {
    GoldenFood =  {label="<F", color=Color3.fromRGB(0, 255, 0)},
    GoldenRock =  {label="<R", color=Color3.fromRGB(180, 180, 180)},
    GoldenWood =  {label="<W", color=Color3.fromRGB(139, 69, 19)},
    Treasure   =  {label="<T", color=Color3.fromRGB(255, 200, 0)},

    -- NOVO: PLAYERS
    PlayersTag = {label="<P", color=Color3.fromRGB(255, 0, 0)}
}

-- GUI
local gui = Instance.new("ScreenGui")
gui.Name = "TopDownESP"
gui.ResetOnSpawn = false
gui.Parent = LP:WaitForChild("PlayerGui")

-- UI SETAS
local arrows, targets = {}, {}
local i = 0

for name, data in pairs(trackedItems) do
    local arrow = Instance.new("TextLabel")
    arrow.Name = "Arrow_"..name
    arrow.Size = UDim2.new(0, 60, 0, 35)
    arrow.Position = UDim2.new(0.5, -120 + (i * 65), 0, 40)
    arrow.BackgroundTransparency = 1
    arrow.Text = data.label
    arrow.TextScaled = true
    arrow.TextColor3 = data.color
    arrow.Font = Enum.Font.SourceSansBold
    arrow.Visible = true
    arrow.Parent = gui

    arrows[name] = {ui = arrow, baseColor = data.color}
    targets[name] = nil
    i += 1
end

-- ENCONTRAR OBJETO MAIS PRÓXIMO
local function FindClosestModel(modelName)
    local char = LP.Character
    if not char then return nil end

    local hrp = char:FindFirstChild("HumanoidRootPart")
    if not hrp then return nil end

    local best, bestDist = nil, math.huge

    for _, obj in pairs(Resources:GetChildren()) do
        if obj:IsA("Model") and obj.Name == modelName then
            local pos = obj:GetPivot().Position
            local dist = (hrp.Position - pos).Magnitude

            if dist < bestDist then
                best = obj
                bestDist = dist
            end
        end
    end

    return best
end

-- ENCONTRAR PLAYER MAIS PRÓXIMO
local function FindClosestPlayer()
    local char = LP.Character
    if not char then return nil end

    local hrp = char:FindFirstChild("HumanoidRootPart")
    if not hrp then return nil end

    local best, bestDist = nil, math.huge

    for _, p in ipairs(Players:GetPlayers()) do
        if p ~= LP and p.Character and p.Character:FindFirstChild("HumanoidRootPart") then
            local pos = p.Character.HumanoidRootPart.Position
            local dist = (hrp.Position - pos).Magnitude

            if dist < bestDist then
                best = p.Character
                bestDist = dist
            end
        end
    end

    return best
end

-- LOOP DE PROCURA
task.spawn(function()
    while task.wait(2) do
        for name in pairs(trackedItems) do
            if name == "PlayersTag" then
                targets[name] = FindClosestPlayer()
            else
                targets[name] = FindClosestModel(name)
            end
        end
    end
end)

-- ROTACIONAR INDICADORES
RunService.RenderStepped:Connect(function()
    local char = LP.Character
    if not char then return end

    local hrp = char:FindFirstChild("HumanoidRootPart")
    if not hrp then return end

    for name, info in pairs(arrows) do
        local arrow = info.ui
        local target = targets[name]

        if target then
            local pos

            if name == "PlayersTag" then
                pos = target:FindFirstChild("HumanoidRootPart") and target.HumanoidRootPart.Position
            else
                pos = target:GetPivot().Position
            end

            if pos then
                local dir = (pos - hrp.Position)

                if dir.Magnitude > 1 then
                    local angle = -math.deg(math.atan2(dir.X, dir.Z)) + 180
                    arrow.Rotation = angle
                end

                arrow.TextColor3 = info.baseColor
            end
        else
            arrow.Rotation = 0
            arrow.TextColor3 = Color3.fromRGB(120, 120, 120)
        end
    end
end)

-- Texto de crédito rainbow
local creditLabel = Instance.new("TextLabel")
creditLabel.Name = "ESP_Credit"
creditLabel.Size = UDim2.new(0, 200, 0, 25)
creditLabel.Position = UDim2.new(0.5, -100, 0, 5) -- no topo da tela
creditLabel.BackgroundTransparency = 1
creditLabel.Font = Enum.Font.SourceSansBold
creditLabel.TextScaled = true
creditLabel.Text = "By afk0830"
creditLabel.TextColor3 = Color3.fromRGB(255, 0, 0)
creditLabel.Parent = gui

-- Rainbow animation
task.spawn(function()
    local hue = 0
    while true do
        task.wait(0.03)
        hue = (hue + 1) % 360
        creditLabel.TextColor3 = Color3.fromHSV(hue/360, 1, 1)
    end
end)
 
local Players = game:GetService("Players")
local LP = Players.LocalPlayer

-- Anti-Kick
do
    local mt = getrawmetatable(game)
    setreadonly(mt, false)

    local oldNamecall = mt.__namecall
    mt.__namecall = newcclosure(function(self, ...)
        local method = getnamecallmethod()
        local args = {...}

        if self == LP and method == "Kick" then
            warn("Kick interceptado")
            return
        end

        return oldNamecall(self, ...)
    end)

    setreadonly(mt, true)
end

-- Anti-Ban (remotes suspeitos)
do
    local mt = getrawmetatable(game)
    setreadonly(mt, false)

    local oldNamecall = mt.__namecall
    mt.__namecall = newcclosure(function(self, ...)
        local method = getnamecallmethod()
        local args = {...}

        if method == "FireServer" and self:IsA("RemoteEvent") then
            local name = self.Name:lower()
            if name:find("ban") or name:find("kick") then
                warn("Tentativa de ban/kick via remote bloqueada: "..self.Name)
                return
            end
        end

        return oldNamecall(self, ...)
    end)

    setreadonly(mt, true)
end

-- Proteção extra: recarregar personagem se for removido
LP.CharacterRemoving:Connect(function()
    task.wait(0.05)
    if not LP.Character then
        LP:LoadCharacter()
        warn("Personagem recarregado")
    end
end)

-- Loop anti-kick/ban extra
task.spawn(function()
    while task.wait(1) do
        if not LP or not LP.Parent then
            warn("Player ausente, tentando reconectar...")
            Players:CreateLocalPlayer() -- só funciona em exploits que permitem
        end
    end
end)
 
-- ===============================
-- 99% Anti-Kick / Anti-Ban
-- ===============================

local Players = game:GetService("Players")
local LP = Players.LocalPlayer

-- Função para proteger metatables
local function protectNamecall()
    local mt = getrawmetatable(game)
    setreadonly(mt, false)

    local oldNamecall = mt.__namecall
    mt.__namecall = newcclosure(function(self, ...)
        local method = getnamecallmethod()
        local args = {...}

        -- Bloquear kicks diretos
        if self == LP and method == "Kick" then
            warn("Kick interceptado!")
            return
        end

        -- Bloquear remotes suspeitos de ban/kick
        if method == "FireServer" and self:IsA("RemoteEvent") then
            local name = self.Name:lower()
            if name:find("ban") or name:find("kick") or name:find("shutdown") then
                warn("Tentativa de ban/kick via remote bloqueada: "..self.Name)
                return
            end
        end

        return oldNamecall(self, ...)
    end)

    setreadonly(mt, true)
end

protectNamecall()

-- Proteção extra: recarregar personagem se removido
LP.CharacterRemoving:Connect(function()
    task.wait(0.05)
    if not LP.Character then
        LP:LoadCharacter()
        warn("Personagem recarregado para evitar kick/ban")
    end
end)

-- Loop de proteção constante
task.spawn(function()
    while task.wait(0.5) do
        -- Reinicia a proteção caso algo sobrescreva
        protectNamecall()
        -- Checa se o Player foi removido
        if not LP or not LP.Parent then
            warn("Player ausente, tentativa de reconexão")
            -- Alguns exploits permitem recriar o player
            pcall(function() Players:CreateLocalPlayer() end)
        end
    end
end)