--[[
Script Completo - d4kas (atualizado)
PlaceId fixado: 118915549367482
UI preta arrastável com:

1. Botão Insta Handle
2. Botão Aerial View
3. Botão Boost Speed
4. Botão -FPS
5. Botão OP HOOK
6. Botão AIMBOT
7. Botão HOLD 2 TOOLS
8. Botão flutuante Abrir/Fechar
--]]

if not game:IsLoaded() then game.Loaded:Wait() end

-- === PlaceId check ===
local ALLOWED_PLACE = 118915549367482
if ALLOWED_PLACE ~= 0 and game.PlaceId ~= ALLOWED_PLACE then return end

-- Serviços
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local Workspace = game:GetService("Workspace")
local Lighting = game:GetService("Lighting")
local UserInputService = game:GetService("UserInputService")

local LocalPlayer = Players.LocalPlayer
local camera = Workspace.CurrentCamera

-- Variáveis de estado
local instaActive = false
local promptConnections = {}
local speedActive = false
local boostConn = nil
local aerialActive = false
local aerialConn = nil
local opHookActive = false
local hookConn = nil
local hookedTool = nil
local fpsActive = false
local aimbotActive = false
local aimbotSmoothing = 0.28
local aimbotMaxDist = 1000
local hold2Active = false

local TARGET_POS = Vector3.new(-27, 2, -122)

-- UTIL: desconectar conexões de prompt
local function disconnectPrompts()
    for _, c in ipairs(promptConnections) do
        pcall(function() c:Disconnect() end)
    end
    promptConnections = {}
end

-- TELEPORT
local function teleportPlayer()
    local char = LocalPlayer.Character
    if not char then return end
    local hrp = char:FindFirstChild("HumanoidRootPart")
    if not hrp then return end
    hrp.CFrame = CFrame.new(TARGET_POS + Vector3.new(0, 0.5, 0))
end

-- MONITOR PROMPTS / TOOLS
local function addMonitor(obj)
    if obj:IsA("ProximityPrompt") then
        local c = obj.Triggered:Connect(function(player)
            if instaActive and player == LocalPlayer then teleportPlayer() end
        end)
        table.insert(promptConnections, c)
    elseif obj:IsA("Tool") then
        local c = obj.Activated:Connect(function()
            if instaActive then teleportPlayer() end
        end)
        table.insert(promptConnections, c)
    end
end

local function enableInstaHandle()
    disconnectPrompts()
    instaActive = true
    for _, obj in ipairs(Workspace:GetDescendants()) do pcall(addMonitor, obj) end
    local c = Workspace.DescendantAdded:Connect(addMonitor)
    table.insert(promptConnections, c)
end

local function disableInstaHandle()
    instaActive = false
    disconnectPrompts()
end

-- OP HOOK
local function startHook(tool)
    if hookConn then hookConn:Disconnect() end
    hookConn = RunService.Stepped:Connect(function()
        local char = LocalPlayer.Character
        if not char then return end
        if tool and tool.Parent ~= char then
            pcall(function() tool.Parent = char end)
        end
    end)
end

local function stopHook()
    if hookConn then hookConn:Disconnect() hookConn = nil end
    hookedTool = nil
end

-- AERIAL VIEW
local function enableAerial(hrp)
    if not hrp then return end
    hrp.Anchored = true
    hrp.CFrame = CFrame.new(hrp.Position.X, 38, hrp.Position.Z)
    aerialConn = RunService.RenderStepped:Connect(function()
        if hrp then
            local pos = hrp.Position
            camera.CFrame = CFrame.new(Vector3.new(pos.X, pos.Y + 20, pos.Z), Vector3.new(pos.X, pos.Y, pos.Z))
        end
    end)
end

local function disableAerial(hrp, hum)
    if hrp then hrp.Anchored = false end
    if aerialConn then aerialConn:Disconnect() aerialConn = nil end
    if hum then camera.CameraSubject = hum end
end

-- BOOST SPEED
local function startBoost(hum)
    if boostConn then boostConn:Disconnect() boostConn = nil end
    boostConn = RunService.Stepped:Connect(function()
        if hum then hum.WalkSpeed = 100 end
    end)
end

local function stopBoost(hum)
    if boostConn then boostConn:Disconnect() boostConn = nil end
    if hum then pcall(function() hum.WalkSpeed = 16 end) end
end

-- -FPS placeholder
local function toggleFPS(button)
    if not fpsActive then
        for _, obj in pairs(Workspace:GetDescendants()) do
            if obj:IsA("ParticleEmitter") or obj:IsA("Trail") then pcall(function() obj.Enabled = false end) end
        end
        pcall(function() Lighting.GlobalShadows = false end)
        fpsActive = true
        button.Text = "-FPS: ON"
    else
        for _, obj in pairs(Workspace:GetDescendants()) do
            if obj:IsA("ParticleEmitter") or obj:IsA("Trail") then pcall(function() obj.Enabled = true end) end
        end
        pcall(function() Lighting.GlobalShadows = true end)
        fpsActive = false
        button.Text = "-FPS: OFF"
    end
end

-- === AIMBOT ===
local function isValidTarget(p)
    if not p or p == LocalPlayer then return false end
    local char = p.Character
    if not char then return false end
    local hum = char:FindFirstChildOfClass("Humanoid")
    if not hum or hum.Health <= 0 then return false end
    local head = char:FindFirstChild("Head") or char:FindFirstChild("HumanoidRootPart")
    if not head then return false end
    return true
end

local function getClosestToCursor(maxDist)
    local mouse = LocalPlayer:GetMouse()
    local closest, bestDist = nil, maxDist or math.huge
    for _, p in ipairs(Players:GetPlayers()) do
        if p ~= LocalPlayer and isValidTarget(p) then
            local head = p.Character:FindFirstChild("Head") or p.Character:FindFirstChild("HumanoidRootPart")
            if head then
                local screenPos, onscreen = camera:WorldToScreenPoint(head.Position)
                if onscreen then
                    local dx = screenPos.X - mouse.X
                    local dy = screenPos.Y - mouse.Y
                    local dist = math.sqrt(dx*dx + dy*dy)
                    if dist < bestDist then
                        bestDist = dist
                        closest = p
                    end
                end
            end
        end
    end
    return closest
end

local function aimAt(target, smooth)
    if not target or not target.Character then return end
    local head = target.Character:FindFirstChild("Head") or target.Character:FindFirstChild("HumanoidRootPart")
    if not head then return end
    local camPos = camera.CFrame.Position
    local desired = CFrame.new(camPos, head.Position)
    if smooth and smooth > 0 then
        camera.CFrame = camera.CFrame:Lerp(desired, math.clamp(1 - smooth, 0.01, 1))
    else
        camera.CFrame = desired
    end
end

local mouse = LocalPlayer:GetMouse()
local rightDown = false
mouse.Button2Down:Connect(function() rightDown = true end)
mouse.Button2Up:Connect(function() rightDown = false end)

RunService.RenderStepped:Connect(function()
    if aimbotActive and rightDown then
        local target = getClosestToCursor(200)
        if target then aimAt(target, aimbotSmoothing) end
    end
end)

-- === UI ===
local screenGui = Instance.new("ScreenGui", game.CoreGui)
screenGui.Name = "d4kas_UI"

local mainFrame = Instance.new("Frame", screenGui)
mainFrame.Size = UDim2.new(0, 260, 0, 360)
mainFrame.Position = UDim2.new(0.04, 0, 0.22, 0)
mainFrame.BackgroundColor3 = Color3.fromRGB(15,15,15)
mainFrame.BorderSizePixel = 0
Instance.new("UICorner", mainFrame).CornerRadius = UDim.new(0,12)
mainFrame.Active = true
mainFrame.Draggable = true

local function createBtn(text, y, parent)
    parent = parent or mainFrame
    local b = Instance.new("TextButton", parent)
    b.Size = UDim2.new(0, 240, 0, 36)
    b.Position = UDim2.new(0, 10, 0, y)
    b.BackgroundColor3 = Color3.fromRGB(28,28,28)
    b.TextColor3 = Color3.fromRGB(255,255,255)
    b.Font = Enum.Font.GothamBold
    b.TextSize = 16
    b.Text = text .. " : OFF"
    Instance.new("UICorner", b).CornerRadius = UDim.new(0,8)
    local ind = Instance.new("Frame", b)
    ind.Size = UDim2.new(0,16,0,16)
    ind.Position = UDim2.new(1, -22, 0.5, -8)
    ind.BackgroundColor3 = Color3.fromRGB(150,0,0)
    Instance.new("UICorner", ind).CornerRadius = UDim.new(1,0)
    return b, ind
end

-- Insta Handle
local instaBtn, instaInd = createBtn("Insta Handle", 10)
instaBtn.MouseButton1Click:Connect(function()
    if not instaActive then
        enableInstaHandle()
        instaBtn.Text = "Insta Handle : ON"
        instaInd.BackgroundColor3 = Color3.fromRGB(0,180,40)
    else
        disableInstaHandle()
        instaBtn.Text = "Insta Handle : OFF"
        instaInd.BackgroundColor3 = Color3.fromRGB(150,0,0)
    end
end)

-- Aerial View
local aerialBtn, aerialInd = createBtn("Aerial View", 56)
aerialBtn.MouseButton1Click:Connect(function()
    local char = LocalPlayer.Character
    if not char then return end
    local hrp = char:FindFirstChild("HumanoidRootPart")
    local hum = char:FindFirstChildOfClass("Humanoid")
    if not aerialActive then
        if hrp then enableAerial(hrp) end
        aerialActive = true
        aerialBtn.Text = "Aerial View : ON"
        aerialInd.BackgroundColor3 = Color3.fromRGB(0,180,255)
    else
        if hrp then disableAerial(hrp, hum) end
        aerialActive = false
        aerialBtn.Text = "Aerial View : OFF"
        aerialInd.BackgroundColor3 = Color3.fromRGB(150,0,0)
    end
end)

-- Boost Speed
local boostBtn, boostInd = createBtn("Boost Speed", 102)
boostBtn.MouseButton1Click:Connect(function()
    local char = LocalPlayer.Character
    if not char then return end
    local hum = char:FindFirstChildOfClass("Humanoid")
    if not speedActive then
        if hum then startBoost(hum) end
        speedActive = true
        boostBtn.Text = "Boost Speed : ON"
        boostInd.BackgroundColor3 = Color3.fromRGB(0,180,40)
    else
        if hum then stopBoost(hum) end
        speedActive = false
        boostBtn.Text = "Boost Speed : OFF"
        boostInd.BackgroundColor3 = Color3.fromRGB(150,0,0)
    end
end)

-- -FPS
local fpsBtn, fpsInd = createBtn("-FPS", 148)
fpsBtn.MouseButton1Click:Connect(function() toggleFPS(fpsBtn) end)

-- OP HOOK
local opBtn, opInd = createBtn("OP HOOK", 194)
opBtn.MouseButton1Click:Connect(function()
    local char = LocalPlayer.Character
    if not char then return end
    if not opHookActive then
        local tool = char:FindFirstChildOfClass("Tool")
        if tool then
            hookedTool = tool
            startHook(tool)
            opHookActive = true
            opBtn.Text = "OP HOOK : ON"
            opInd.BackgroundColor3 = Color3.fromRGB(0,180,40)
        else
            local bp = LocalPlayer:FindFirstChild("Backpack")
            if bp then
                local t = bp:FindFirstChildOfClass("Tool")
                if t then
                    pcall(function() t.Parent = char end)
                    hookedTool = t
                    startHook(t)
                    opHookActive = true
                    opBtn.Text = "OP HOOK : ON"
                    opInd.BackgroundColor3 = Color3.fromRGB(0,180,40)
                else
                    opBtn.Text = "OP HOOK : NO TOOL"
                end
            end
        end
    else
        stopHook()
        opHookActive = false
        opBtn.Text = "OP HOOK : OFF"
        opInd.BackgroundColor3 = Color3.fromRGB(150,0,0)
    end
end)

-- AIMBOT
local aimBtn, aimInd = createBtn("AIMBOT", 240)
aimBtn.MouseButton1Click:Connect(function()
    aimbotActive = not aimbotActive
    if aimbotActive then
        aimBtn.Text = "AIMBOT : ON (Hold RMB)"
        aimInd.BackgroundColor3 = Color3.fromRGB(0,180,40)
    else
        aimBtn.Text = "AIMBOT : OFF"
        aimInd.BackgroundColor3 = Color3.fromRGB(150,0,0)
    end
end)

-- HOLD 2 TOOLS
local holdBtn, holdInd = createBtn("HOLD 2 TOOLS", 286)
holdBtn.MouseButton1Click:Connect(function()
    hold2Active = not hold2Active
    local char = LocalPlayer.Character
    if not char then return end
    if hold2Active then
        local bp = LocalPlayer:FindFirstChild("Backpack")
        if not bp then return end
        local tools = {}
        for _, t in ipairs(char:GetChildren()) do if t:IsA("Tool") then table.insert(tools,t) end end
        for _, t in ipairs(bp:GetChildren()) do if t:IsA("Tool") then table.insert(tools,t) end end
        if #tools >= 1 then pcall(function() tools[1].Parent = char end) end
        if #tools >= 2 then pcall(function() tools[2].Parent = char end) end
        holdBtn.Text = "HOLD 2 TOOLS : ON"
        holdInd.BackgroundColor3 = Color3.fromRGB(0,180,40)
    else
        holdBtn.Text = "HOLD 2 TOOLS : OFF"
        holdInd.BackgroundColor3 = Color3.fromRGB(150,0,0)
    end
end)

-- Botão flutuante abrir/fechar
local toggleGuiBtn = Instance.new("TextButton", screenGui)
toggleGuiBtn.Size = UDim2.new(0, 100, 0, 36)
toggleGuiBtn.Position = UDim2.new(0.02, 0, 0.08, 0)
toggleGuiBtn.BackgroundColor3 = Color3.fromRGB(28,28,28)
toggleGuiBtn.TextColor3 = Color3.fromRGB(255,255,255)
toggleGuiBtn.Font = Enum.Font.GothamBold
toggleGuiBtn.TextSize = 14
toggleGuiBtn.Text = "Abrir/Fechar UI"
Instance.new("UICorner", toggleGuiBtn).CornerRadius = UDim.new(0,8)
toggleGuiBtn.MouseButton1Click:Connect(function() mainFrame.Visible = not mainFrame.Visible end)

print("[d4kas UI] carregado com PlaceId:", ALLOWED_PLACE)