ESP VERIFICADOR DE PLAYER BY THE MR RED BLACK OWNER

-- Criação da GUI
local ScreenGui = Instance.new("ScreenGui")
local Frame = Instance.new("Frame")
local TitleLabel = Instance.new("TextLabel")
local ActivateButton = Instance.new("TextButton")
local DeactivateButton = Instance.new("TextButton")
local DestroyButton = Instance.new("TextButton")

ScreenGui.Parent = game.CoreGui
Frame.Parent = ScreenGui
Frame.BackgroundColor3 = Color3.new(0.5, 0.25, 0)
Frame.Size = UDim2.new(0, 200, 0, 150)
Frame.Position = UDim2.new(0.5, -100, 0.5, -75)
Frame.Active = true
Frame.Draggable = true

TitleLabel.Parent = Frame
TitleLabel.Size = UDim2.new(1, 0, 0, 30)
TitleLabel.Position = UDim2.new(0, 0, 0, 0)
TitleLabel.BackgroundTransparency = 1
TitleLabel.Text = "🎩 ESP FEITO POR MR RED BLACK OWNER 🎩"
TitleLabel.TextColor3 = Color3.new(1, 1, 1)
TitleLabel.TextScaled = true

ActivateButton.Parent = Frame
ActivateButton.BackgroundColor3 = Color3.new(0, 1, 0)
ActivateButton.Size = UDim2.new(0, 180, 0, 30)
ActivateButton.Position = UDim2.new(0, 10, 0, 40)
ActivateButton.Text = "Ativar ESP"

DeactivateButton.Parent = Frame
DeactivateButton.BackgroundColor3 = Color3.new(0, 1, 0)
DeactivateButton.Size = UDim2.new(0, 180, 0, 30)
DeactivateButton.Position = UDim2.new(0, 10, 0, 80)
DeactivateButton.Text = "Desativar ESP"

DestroyButton.Parent = Frame
DestroyButton.BackgroundColor3 = Color3.new(1, 0, 0)
DestroyButton.Size = UDim2.new(0, 180, 0, 30)
DestroyButton.Position = UDim2.new(0, 10, 0, 120)
DestroyButton.Text = "DESTRUIR GUI"

-- Função para criar ESP
local function createESP(player)
    local espLabel = Instance.new("BillboardGui")
    espLabel.Name = "ESPLabel"
    espLabel.Adornee = player.Character:FindFirstChild("HumanoidRootPart")
    espLabel.Size = UDim2.new(0, 100, 0, 50)
    espLabel.AlwaysOnTop = true
    espLabel.StudsOffset = Vector3.new(0, 2, 0)
    espLabel.Parent = player.Character:FindFirstChild("HumanoidRootPart")

    local textLabel = Instance.new("TextLabel")
    textLabel.Parent = espLabel
    textLabel.Size = UDim2.new(1, 0, 1, 0)
    textLabel.BackgroundTransparency = 1
    textLabel.Text = player.Name
    textLabel.TextColor3 = Color3.new(1, 1, 1)
    textLabel.TextScaled = true

    for _, part in pairs(player.Character:GetChildren()) do
        if part:IsA("BasePart") then
            local espBox = Instance.new("BoxHandleAdornment")
            espBox.Name = "ESP"
            espBox.Adornee = part
            espBox.Size = part.Size
            espBox.Transparency = 0.5
            espBox.AlwaysOnTop = true
            espBox.ZIndex = 10
            espBox.Parent = part

            local function updateESP()
                if player.Character.Humanoid.Sit then
                    espBox.Color3 = Color3.new(0, 1, 1)
                elseif player.Character.Humanoid:GetState() == Enum.HumanoidStateType.Swimming then
                    espBox.Color3 = Color3.new(1, 0, 0)
                elseif player.Character.HumanoidRootPart.Velocity.Magnitude > 50 then
                    espBox.Color3 = Color3.new(1, 1, 0)
                else
                    espBox.Color3 = Color3.new(0, 1, 0)
                end
            end

            player.Character.Humanoid:GetPropertyChangedSignal("Sit"):Connect(updateESP)
            player.Character.Humanoid.StateChanged:Connect(updateESP)
            player.Character.HumanoidRootPart:GetPropertyChangedSignal("Velocity"):Connect(updateESP)
            updateESP()
        end
    end
end

-- Função para ativar ESP
local function activateESP()
    for _, player in pairs(game.Players:GetPlayers()) do
        if player ~= game.Players.LocalPlayer then
            createESP(player)
        end
    end
end

-- Função para desativar ESP
local function deactivateESP()
    for _, player in pairs(game.Players:GetPlayers()) do
        if player.Character:FindFirstChild("HumanoidRootPart") and player.Character.HumanoidRootPart:FindFirstChild("ESPLabel") then
            player.Character.HumanoidRootPart.ESPLabel:Destroy()
        end
        for _, part in pairs(player.Character:GetChildren()) do
            if part:IsA("BasePart") and part:FindFirstChild("ESP") then
                part.ESP:Destroy()
            end
        end
    end
end

-- Função para destruir a GUI
local function destroyGUI()
    ScreenGui:Destroy()
end

ActivateButton.MouseButton1Click:Connect(activateESP)
DeactivateButton.MouseButton1Click:Connect(deactivateESP)
DestroyButton.MouseButton1Click:Connect(destroyGUI)