1--[[ ScriptHUB: Modificado com Tecla H e Persistência ao Morrer ]]--
2
3local Players = game:GetService("Players")
4local UserInputService = game:GetService("UserInputService")
5local localPlayer = Players.LocalPlayer
6local PlayerGui = localPlayer:WaitForChild("PlayerGui")
7
8local active = true -- Estado inicial
9
10-- Criar Interface Persistente
11local screenGui = Instance.new("ScreenGui")
12screenGui.Name = "HitboxControl"
13screenGui.ResetOnSpawn = false -- FAZ O BOTÃO NÃO SUMIR AO MORRER
14screenGui.Parent = PlayerGui
15
16local toggleBtn = Instance.new("TextButton", screenGui)
17toggleBtn.Size = UDim2.new(0, 150, 0, 50)
18toggleBtn.Position = UDim2.new(0, 10, 0, 10)
19toggleBtn.BackgroundColor3 = Color3.fromRGB(255, 0, 0)
20toggleBtn.Text = "Hitbox: ON (H)"
21toggleBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
22toggleBtn.Font = Enum.Font.SourceSansBold
23toggleBtn.TextSize = 20
24
25local function toggleHitboxes()
26    active = not active
27    toggleBtn.Text = active and "Hitbox: ON (H)" or "Hitbox: OFF (H)"
28    toggleBtn.BackgroundColor3 = active and Color3.fromRGB(255, 0, 0) or Color3.fromRGB(50, 50, 50)
29    
30    for _, player in ipairs(Players:GetPlayers()) do
31        if player.Character then
32            for _, desc in ipairs(player.Character:GetDescendants()) do
33                if desc.Name == "HitboxVisual" and desc:IsA("SelectionBox") then
34                    desc.Visible = active
35                end
36            end
37        end
38    end
39end
40
41-- Ativação por Clique
42toggleBtn.MouseButton1Click:Connect(toggleHitboxes)
43
44-- Ativação pela Tecla H
45UserInputService.InputBegan:Connect(function(input, gameProcessed)
46    if not gameProcessed and input.KeyCode == Enum.KeyCode.H then
47        toggleHitboxes()
48    end
49end)
50
51local function applyHitbox(part)
52    if part:IsA("BasePart") and not part:FindFirstChild("HitboxVisual") then
53        if part:FindFirstAncestorOfClass("Accessory") or part:FindFirstAncestorOfClass("Tool") then
54            return
55        end
56
57        local sb = Instance.new("SelectionBox")
58        sb.Name = "HitboxVisual"
59        sb.Adornee = part
60        sb.Color3 = Color3.fromRGB(255, 0, 0)
61        sb.LineThickness = 0.05
62        sb.Transparency = 0
63        sb.Visible = active 
64        sb.Parent = part
65    end
66end
67
68local function monitorCharacter(char)
69    if not char then return end
70    for _, obj in ipairs(char:GetDescendants()) do
71        applyHitbox(obj)
72    end
73    char.DescendantAdded:Connect(applyHitbox)
74end
75
76local function setupPlayer(player)
77    player.CharacterAdded:Connect(monitorCharacter)
78    if player.Character then
79        monitorCharacter(player.Character)
80    end
81end
82
83Players.PlayerAdded:Connect(setupPlayer)
84for _, player in ipairs(Players:GetPlayers()) do
85    setupPlayer(player)
86end