-- LocalScript en StarterPlayerScripts

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

local player = Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local rootPart = character:WaitForChild("HumanoidRootPart")

-- Crear GUI
local screenGui = Instance.new("ScreenGui")
screenGui.Name = "ProAdminGUI"
screenGui.Parent = player.PlayerGui

-- Panel principal
local panel = Instance.new("Frame")
panel.Size = UDim2.new(0, 220, 0, 400)
panel.Position = UDim2.new(0.7, 0, 0.3, 0)
panel.BackgroundColor3 = Color3.fromRGB(20, 20, 20)
panel.BorderSizePixel = 0
panel.Parent = screenGui
panel.ClipsDescendants = true

-- Título
local title = Instance.new("TextLabel")
title.Size = UDim2.new(1, 0, 0, 40)
title.Position = UDim2.new(0, 0, 0, 0)
title.BackgroundTransparency = 1
title.Text = "Pro Admin GUI"
title.Font = Enum.Font.GothamBold
title.TextSize = 20
title.TextColor3 = Color3.fromRGB(255,255,255)
title.Parent = panel

-- Botón para expandir/contraer
local toggleSize = Instance.new("TextButton")
toggleSize.Size = UDim2.new(0, 40, 0, 40)
toggleSize.Position = UDim2.new(1, -45, 0, 0)
toggleSize.Text = "-"
toggleSize.Font = Enum.Font.GothamBold
toggleSize.TextSize = 20
toggleSize.BackgroundColor3 = Color3.fromRGB(50,50,50)
toggleSize.TextColor3 = Color3.fromRGB(255,255,255)
toggleSize.Parent = panel

local expanded = true
toggleSize.MouseButton1Click:Connect(function()
    expanded = not expanded
    if expanded then
        panel.Size = UDim2.new(0, 220, 0, 400)
        toggleSize.Text = "-"
    else
        panel.Size = UDim2.new(0, 220, 0, 40)
        toggleSize.Text = "+"
    end
end)

-- Función para crear botones
local function createButton(text, position, callback)
    local button = Instance.new("TextButton")
    button.Size = UDim2.new(0, 200, 0, 35)
    button.Position = position
    button.BackgroundColor3 = Color3.fromRGB(35,35,35)
    button.TextColor3 = Color3.fromRGB(255,255,255)
    button.Text = text
    button.Font = Enum.Font.Gotham
    button.TextSize = 16
    button.AutoButtonColor = false
    button.Parent = panel

    -- Hover effect
    button.MouseEnter:Connect(function()
        button.BackgroundColor3 = Color3.fromRGB(60,60,60)
    end)
    button.MouseLeave:Connect(function()
        button.BackgroundColor3 = Color3.fromRGB(35,35,35)
    end)

    button.MouseButton1Click:Connect(callback)
    return button
end

-- Rainbow animation
RunService.RenderStepped:Connect(function()
    local hue = tick() % 5 / 5
    for _, obj in pairs(panel:GetChildren()) do
        if obj:IsA("TextButton") and obj ~= toggleSize then
            obj.TextColor3 = Color3.fromHSV(hue, 1, 1)
        end
    end
end)

-- Noclip
local noclipEnabled = false
createButton("Toggle Noclip", UDim2.new(0, 10, 0, 50), function()
    noclipEnabled = not noclipEnabled
end)

RunService.Stepped:Connect(function()
    for _, part in pairs(character:GetChildren()) do
        if part:IsA("BasePart") then
            part.CanCollide = not noclipEnabled
        end
    end
end)

-- Velocidades
local speeds = {100, 200, 300, 400, 900, 99999}
for i, speed in ipairs(speeds) do
    createButton("Speed "..speed, UDim2.new(0, 10, 0, 100 + (i-1)*40), function()
        humanoid.WalkSpeed = speed
    end)
end

-- Saltos
local jumps = {99, 150, 200}
for i, jump in ipairs(jumps) do
    createButton("Jump "..jump, UDim2.new(0, 10, 0, 350 + (i-1)*40), function()
        humanoid.JumpPower = jump
    end)
end

-- Fly
local flying = false
local flySpeed = 50
local bodyVelocity
createButton("Toggle Fly", UDim2.new(0, 10, 0, 250), function()
    flying = not flying
    if flying then
        bodyVelocity = Instance.new("BodyVelocity")
        bodyVelocity.MaxForce = Vector3.new(1e5,1e5,1e5)
        bodyVelocity.Velocity = Vector3.new(0,0,0)
        bodyVelocity.Parent = rootPart
    else
        if bodyVelocity then bodyVelocity:Destroy() end
    end
end)

UserInputService.InputBegan:Connect(function(input, processed)
    if flying and not processed and bodyVelocity then
        local direction = Vector3.new()
        if input.KeyCode == Enum.KeyCode.W then
            direction = direction + workspace.CurrentCamera.CFrame.LookVector
        elseif input.KeyCode == Enum.KeyCode.S then
            direction = direction - workspace.CurrentCamera.CFrame.LookVector
        elseif input.KeyCode == Enum.KeyCode.A then
            direction = direction - workspace.CurrentCamera.CFrame.RightVector
        elseif input.KeyCode == Enum.KeyCode.D then
            direction = direction + workspace.CurrentCamera.CFrame.RightVector
        elseif input.KeyCode == Enum.KeyCode.Space then
            direction = direction + Vector3.new(0,1,0)
        elseif input.KeyCode == Enum.KeyCode.LeftControl then
            direction = direction - Vector3.new(0,1,0)
        end
        if direction.Magnitude > 0 then
            bodyVelocity.Velocity = direction.Unit * flySpeed
        else
            bodyVelocity.Velocity = Vector3.new(0,0,0)
        end
    end
end)

-- Arrastrar panel
local dragging = false
local dragStart
local startPos

title.InputBegan:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseButton1 then
        dragging = true
        dragStart = input.Position
        startPos = panel.Position
        input.Changed:Connect(function()
            if input.UserInputState == Enum.UserInputState.End then
                dragging = false
            end
        end)
    end
end)

UserInputService.InputChanged:Connect(function(input)
    if dragging and input.UserInputType == Enum.UserInputType.MouseMovement then
        local delta = input.Position - dragStart
        panel.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
    end
end)