local Players = game:GetService("Players")
local RunService = game:GetService("RunService")

local screenGui = Instance.new("ScreenGui")
screenGui.Name = "UserInterface"
screenGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
screenGui.ResetOnSpawn = false

local button = Instance.new("ImageButton")
button.Name = "TriangleButton"
button.Size = UDim2.new(0, 60, 0, 60)
button.Position = UDim2.new(0, 10, 0.5, -30)
button.BackgroundTransparency = 1
button.Image = "rbxassetid://6035047377"
button.ImageColor3 = Color3.fromRGB(100, 150, 255)
button.Rotation = 0
button.Parent = screenGui

local frame = Instance.new("Frame")
frame.Name = "MainInterface"
frame.Size = UDim2.new(0.3, 0, 0.5, 0)
frame.Position = UDim2.new(0.05, -300, 0.25, 0)
frame.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
frame.BorderSizePixel = 0
frame.Parent = screenGui

local frameCorner = Instance.new("UICorner")
frameCorner.CornerRadius = UDim.new(0, 10)
frameCorner.Parent = frame

local usernameLabel = Instance.new("TextLabel")
usernameLabel.Name = "UsernameLabel"
usernameLabel.Size = UDim2.new(1, 0, 0.1, 0)
usernameLabel.Position = UDim2.new(0, 0, 0, 0)
usernameLabel.BackgroundTransparency = 1
usernameLabel.TextColor3 = Color3.fromRGB(200, 200, 200)
usernameLabel.Text = "Usuario: " .. game.Players.LocalPlayer.Name
usernameLabel.TextScaled = true
usernameLabel.Font = Enum.Font.GothamBold
usernameLabel.Parent = frame

local textLabel = Instance.new("TextLabel")
textLabel.Name = "MainText"
textLabel.Size = UDim2.new(1, 0, 0.1, 0)
textLabel.Position = UDim2.new(0, 0, 0.1, 0)
textLabel.BackgroundTransparency = 1
textLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
textLabel.Text = "t6kla"
textLabel.TextScaled = true
textLabel.Font = Enum.Font.Gotham
textLabel.Parent = frame

local scrollingFrame = Instance.new("ScrollingFrame")
scrollingFrame.Name = "OptionsScroll"
scrollingFrame.Size = UDim2.new(1, 0, 0.8, 0)
scrollingFrame.Position = UDim2.new(0, 0, 0.2, 0)
scrollingFrame.CanvasSize = UDim2.new(0, 0, 3, 0)
scrollingFrame.ScrollBarThickness = 8
scrollingFrame.BackgroundTransparency = 1
scrollingFrame.Parent = frame

local function createCheckbox(parent, text, position, variable)
    local checkbox = Instance.new("TextButton")
    checkbox.Size = UDim2.new(1, -20, 0, 30)
    checkbox.Position = position
    checkbox.Text = text
    checkbox.BackgroundColor3 = Color3.fromRGB(50, 50, 50)
    checkbox.TextColor3 = Color3.fromRGB(255, 255, 255)
    checkbox.Font = Enum.Font.Gotham
    checkbox.TextScaled = true
    checkbox.Parent = parent

    local isChecked = false
    checkbox.MouseButton1Click:Connect(function()
        isChecked = not isChecked
        checkbox.Text = (isChecked and "✔ " or "") .. text
        _G[variable] = isChecked
    end)
end

local function createTextBox(parent, text, position, variable, defaultValue)
    local label = Instance.new("TextLabel")
    label.Size = UDim2.new(1, -20, 0, 20)
    label.Position = position
    label.Text = text
    label.BackgroundTransparency = 1
    label.TextColor3 = Color3.fromRGB(255, 255, 255)
    label.Font = Enum.Font.Gotham
    label.TextScaled = true
    label.Parent = parent

    local textBox = Instance.new("TextBox")
    textBox.Size = UDim2.new(1, -20, 0, 30)
    textBox.Position = UDim2.new(0, 10, 0, position.Y.Offset + 25)
    textBox.Text = tostring(defaultValue)
    textBox.PlaceholderText = "Ingrese un valor..."
    textBox.BackgroundColor3 = Color3.fromRGB(60, 60, 60)
    textBox.TextColor3 = Color3.fromRGB(255, 255, 255)
    textBox.Font = Enum.Font.Gotham
    textBox.TextScaled = true
    textBox.Parent = parent

    textBox.FocusLost:Connect(function(enterPressed)
        if enterPressed then
            local value = tonumber(textBox.Text)
            if value then
                _G[variable] = value
            else
                textBox.Text = tostring(_G[variable])
            end
        end
    end)
end

createCheckbox(scrollingFrame, "Cuadro Hit", UDim2.new(0, 10, 0, 0), "enablecuadrohit")
createTextBox(scrollingFrame, "Ancho del Cuadro Hit", UDim2.new(0, 10, 0, 40), "Ancho", 6)
createTextBox(scrollingFrame, "Altura del Cuadro Hit", UDim2.new(0, 10, 0, 100), "Altura", 10)

createCheckbox(scrollingFrame, "Perseguir Usuarios", UDim2.new(0, 10, 0, 160), "EnablePerseguirUsuario")

createCheckbox(scrollingFrame, "Teleport Users", UDim2.new(0, 10, 0, 200), "EnableTeleportUser")
createTextBox(scrollingFrame, "Distancia de Teleport", UDim2.new(0, 10, 0, 240), "CHARACTER_TELEPORT_DISTANCE", 20)
createTextBox(scrollingFrame, "Tiempo de Espera", UDim2.new(0, 10, 0, 300), "BOMB_TRANSFER_TIMEOUT", 0.5)
createTextBox(scrollingFrame, "Tiempo entre Teleports", UDim2.new(0, 10, 0, 360), "RE_TELEPORT_DELAY", 10)

createCheckbox(scrollingFrame, "Escapar de Usuarios", UDim2.new(0, 10, 0, 420), "EnableEscaparDeUsuarios")

local isOpen = false
button.MouseButton1Click:Connect(function()
    isOpen = not isOpen
    local targetPosition = isOpen and UDim2.new(0.05, 70, 0.25, 0) or UDim2.new(0.05, -300, 0.25, 0)
    local targetRotation = isOpen and 90 or 0

    frame:TweenPosition(targetPosition, Enum.EasingDirection.Out, Enum.EasingStyle.Quad, 0.5, true)
    button:TweenRotation(targetRotation, Enum.EasingDirection.Out, Enum.EasingStyle.Quad, 0.5, true)
end)

function button:TweenRotation(target, direction, style, time, override)
    local info = TweenInfo.new(time, style, direction)
    local goal = {Rotation = target}
    game:GetService("TweenService"):Create(self, info, goal):Play()
end

game.Players.LocalPlayer.CharacterAdded:Connect(function()
    screenGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
end)

_G.enablecuadrohit = false
_G.Ancho = 6
_G.Altura = 10
_G.EnablePerseguirUsuario = false
_G.EnableTeleportUser = false
_G.CHARACTER_TELEPORT_DISTANCE = 20
_G.BOMB_TRANSFER_TIMEOUT = 0.5
_G.RE_TELEPORT_DELAY = 10
_G.EnableEscaparDeUsuarios = false

-- Cuadro Hit
local boxes = {}

local function playerHasItems(player)
    local character = player.Character
    if not character then return false end

    if character:FindFirstChildOfClass("Tool") then
        return true
    end

    local backpack = player:FindFirstChildOfClass("Backpack")
    if backpack and #backpack:GetChildren() > 0 then
        return true
    end

    return false
end

local function updateBox(player)
    if not _G.enablecuadrohit then return end
    if player == Players.LocalPlayer then return end

    local character = player.Character
    if not character then return end

    if playerHasItems(player) then
        if not boxes[player] then
            local box = Instance.new("Part")
            box.Anchored = true
            box.CanCollide = false
            box.Transparency = 0.5
            box.Color = Color3.new(1, 0, 0)
            box.Size = Vector3.new(_G.Ancho, _G.Altura, 1)
            box.Parent = workspace
            boxes[player] = box
        end

        local box = boxes[player]
        box.CFrame = character:WaitForChild("HumanoidRootPart").CFrame
    else
        if boxes[player] then
            boxes[player]:Destroy()
            boxes[player] = nil
        end
    end
end

local function onPlayerAdded(player)
    if player ~= Players.LocalPlayer then
        player.CharacterAdded:Connect(function(character)
            character:WaitForChild("HumanoidRootPart")
            updateBox(player)
        end)

        player.Backpack.ChildAdded:Connect(function()
            updateBox(player)
        end)
        player.Backpack.ChildRemoved:Connect(function()
            updateBox(player)
        end)

        player.CharacterAdded:Connect(function(character)
            updateBox(player)
            character.ChildAdded:Connect(function(child)
                if child:IsA("Tool") then
                    updateBox(player)
                end
            end)
            character.ChildRemoved:Connect(function(child)
                if child:IsA("Tool") then
                    updateBox(player)
                end
            end)
        end)
    end
end

for _, player in ipairs(Players:GetPlayers()) do
    onPlayerAdded(player)
end

Players.PlayerAdded:Connect(onPlayerAdded)

Players.PlayerRemoving:Connect(function(player)
    if boxes[player] then
        boxes[player]:Destroy()
        boxes[player] = nil
    end
end)

-- Perseguir Usuarios
local localPlayer = Players.LocalPlayer
local character = localPlayer.Character or localPlayer.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local rootPart = character:WaitForChild("HumanoidRootPart")

local function hasItem()
    if character:FindFirstChildOfClass("Tool") then
        return true
    end

    local backpack = localPlayer:FindFirstChild("Backpack")
    if backpack and #backpack:GetChildren() > 0 then
        return true
    end

    return false
end

local function getClosestPlayer()
    local closestPlayer = nil
    local shortestDistance = math.huge

    for _, player in ipairs(Players:GetPlayers()) do
        if player ~= localPlayer and player.Character and player.Character:FindFirstChild("HumanoidRootPart") then
            local playerHumanoid = player.Character:FindFirstChild("Humanoid")

            if playerHumanoid and playerHumanoid.Health > 0 then
                local distance = (rootPart.Position - player.Character.HumanoidRootPart.Position).Magnitude
                if distance < shortestDistance then
                    shortestDistance = distance
                    closestPlayer = player
                end
            end
        end
    end

    return closestPlayer
end

local function moveToPlayer(targetPlayer)
    if not targetPlayer or not targetPlayer.Character then
        return
    end

    local targetPosition = targetPlayer.Character.HumanoidRootPart.Position
    humanoid:MoveTo(targetPosition)
end

-- Teleport Users
local lastBombTransferTime = {}
local lastTeleportTime = {}

local function CanTeleportToPlayer(player)
    local currentTime = tick()
    if lastTeleportTime[player.UserId] and currentTime - lastTeleportTime[player.UserId] < _G.RE_TELEPORT_DELAY then
        return false
    end
    return true
end

local function TeleportToPlayer(targetPlayer)
    local Character = localPlayer.Character
    if not Character then return end

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

    local targetCharacter = targetPlayer.Character
    if not targetCharacter then return end

    local targetRootPart = targetCharacter:FindFirstChild("HumanoidRootPart")
    if not targetRootPart then return end

    local forwardPosition = targetRootPart.CFrame:PointToWorldSpace(Vector3.new(0, 0, -3))
    HumanoidRootPart.CFrame = CFrame.new(forwardPosition, targetRootPart.Position)

    local RightHand = Character:FindFirstChild("RightHand") or Character:FindFirstChild("Right Arm")
    if RightHand then
        RightHand.CFrame = targetRootPart.CFrame * CFrame.new(-1, 0, 0)
    end

    lastTeleportTime[targetPlayer.UserId] = tick()
end

local function TeleportCharacterToClosestPlayer()
    local Character = localPlayer.Character
    if not Character then return end

    local Bomb = Character:FindFirstChildOfClass("Tool")
    if not Bomb or Bomb.Name ~= "Bomb" then return end

    local closestPlayer, closestDistance = getClosestPlayer()
    if not closestPlayer or closestDistance > _G.CHARACTER_TELEPORT_DISTANCE then return end

    if not CanTeleportToPlayer(closestPlayer) then return end

    local currentTime = tick()

    if lastBombTransferTime[closestPlayer.UserId] and currentTime - lastBombTransferTime[closestPlayer.UserId] > _G.BOMB_TRANSFER_TIMEOUT then
        print("Teletransportación cancelada: No se pasó la bomba a", closestPlayer.Name)
        lastTeleportTime[closestPlayer.UserId] = currentTime
        return
    end

    TeleportToPlayer(closestPlayer)

    if Bomb:FindFirstChild("Handle") then
        Bomb.Handle.CFrame = closestPlayer.Character.HumanoidRootPart.CFrame
        lastBombTransferTime[closestPlayer.UserId] = currentTime
        print("Bomba pasada a:", closestPlayer.Name)
    end
end

-- Escapar de Usuarios
local function EscaparDeUsuarios()
    if not _G.EnableEscaparDeUsuarios then return end

    local character = localPlayer.Character
    if not character then return end

    local humanoid = character:FindFirstChild("Humanoid")
    if not humanoid then return end

    local rootPart = character:FindFirstChild("HumanoidRootPart")
    if not rootPart then return end

    local closestPlayer = getClosestPlayer()
    if not closestPlayer then return end

    local closestCharacter = closestPlayer.Character
    if not closestCharacter then return end

    local closestRootPart = closestCharacter:FindFirstChild("HumanoidRootPart")
    if not closestRootPart then return end

    local direction = (rootPart.Position - closestRootPart.Position).Unit
    local targetPosition = rootPart.Position + direction * 10

    local raycastParams = RaycastParams.new()
    raycastParams.FilterDescendantsInstances = {character}
    raycastParams.FilterType = Enum.RaycastFilterType.Blacklist

    local raycastResult = workspace:Raycast(rootPart.Position, direction * 10, raycastParams)
    if raycastResult then
        targetPosition = raycastResult.Position - direction * 2
    end

    humanoid:MoveTo(targetPosition)
end

RunService.Heartbeat:Connect(function()
    for player, box in pairs(boxes) do
        if player.Character then
            local humanoidRootPart = player.Character:FindFirstChild("HumanoidRootPart")
            if humanoidRootPart then
                box.CFrame = humanoidRootPart.CFrame
                box.Size = Vector3.new(_G.Ancho, _G.Altura, 1)
            end
        end
    end

    if _G.EnablePerseguirUsuario and hasItem() then
        local closestPlayer = getClosestPlayer()
        if closestPlayer then
            moveToPlayer(closestPlayer)
        end
    end

    if _G.EnableTeleportUser then
        TeleportCharacterToClosestPlayer()
    end

    EscaparDeUsuarios()
end)

localPlayer.CharacterAdded:Connect(function(newCharacter)
    character = newCharacter
    humanoid = newCharacter:WaitForChild("Humanoid")
    rootPart = newCharacter:WaitForChild("HumanoidRootPart")
end)