-- ==============================================
-- 🏆 SUPER ADMIN "K" (VERSIÓN INTEGRAL COMPLETA)
-- ==============================================
local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")
local StarterGui = game:GetService("StarterGui")
local RunService = game:GetService("RunService")
local Workspace = game:GetService("Workspace")
local LocalPlayer = Players.LocalPlayer

local function Notify(title, text)
    pcall(function()
        StarterGui:SetCore("SendNotification", {
            Title = title,
            Text = text,
            Duration = 4
        })
    end)
end

-- 1. LIMPIEZA ANTICOLISIÓN
local targetParent = LocalPlayer:WaitForChild("PlayerGui")
if targetParent:FindFirstChild("PureAdminKGui") then
    targetParent.PureAdminKGui:Destroy()
end

-- 2. CREACIÓN DE LA INTERFAZ BASE
local AdminGui = Instance.new("ScreenGui")
AdminGui.Name = "PureAdminKGui"
AdminGui.ResetOnSpawn = false
AdminGui.DisplayOrder = 999999
AdminGui.Parent = targetParent

local KButton = Instance.new("TextButton")
KButton.Name = "KButton"
KButton.Size = UDim2.new(0, 55, 0, 55)
KButton.Position = UDim2.new(0.05, 0, 0.4, 0)
KButton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
KButton.Text = "K"
KButton.TextColor3 = Color3.fromRGB(255, 255, 255)
KButton.TextSize = 28
KButton.Font = Enum.Font.SourceSansBold
KButton.Active = true
KButton.Parent = AdminGui

Instance.new("UICorner", KButton).CornerRadius = UDim.new(1, 0)
local KStroke = Instance.new("UIStroke", KButton)
KStroke.Color = Color3.fromRGB(255, 255, 255)
KStroke.Thickness = 2

local CommandBar = Instance.new("TextBox")
CommandBar.Name = "CommandBar"
CommandBar.Size = UDim2.new(0, 220, 0, 40)
CommandBar.Position = UDim2.new(0.05, 65, 0.4, 5)
CommandBar.BackgroundColor3 = Color3.fromRGB(15, 15, 15)
CommandBar.TextColor3 = Color3.fromRGB(255, 255, 255)
CommandBar.PlaceholderText = "Escribe comando o ;cmds..."
CommandBar.PlaceholderColor3 = Color3.fromRGB(150, 150, 150)
CommandBar.Text = ""
CommandBar.TextSize = 14
CommandBar.Font = Enum.Font.SourceSans
CommandBar.Visible = false
CommandBar.Parent = AdminGui

Instance.new("UICorner", CommandBar).CornerRadius = UDim.new(0, 8)
local BarStroke = Instance.new("UIStroke", CommandBar)
BarStroke.Color = Color3.fromRGB(255, 255, 255)

-- SISTEMA DRAGGABLE COMPATIBLE TÁCTIL
local function makeDraggable(gui)
    local dragging, dragStart, startPos
    gui.InputBegan:Connect(function(input)
        if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
            dragging = true
            dragStart = input.Position
            startPos = gui.Position
        end
    end)
    UserInputService.InputChanged:Connect(function(input)
        if dragging and (input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch) then
            local delta = input.Position - dragStart
            gui.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
        end
    end)
    gui.InputEnded:Connect(function(input)
        if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
            dragging = false
        end
    end)
end
makeDraggable(KButton)

-- 3. VENTANA DE COMANDOS VISUALES
local CmdsFrame = Instance.new("Frame")
CmdsFrame.Name = "CmdsFrame"
CmdsFrame.Size = UDim2.new(0, 300, 0, 350)
CmdsFrame.Position = UDim2.new(0.5, -150, 0.5, -175)
CmdsFrame.BackgroundColor3 = Color3.fromRGB(12, 12, 12)
CmdsFrame.BorderSizePixel = 0
CmdsFrame.Visible = false
CmdsFrame.Active = true
CmdsFrame.Parent = AdminGui
makeDraggable(CmdsFrame)

Instance.new("UICorner", CmdsFrame).CornerRadius = UDim.new(0, 10)
local FrameStroke = Instance.new("UIStroke", CmdsFrame)
FrameStroke.Color = Color3.fromRGB(255, 255, 255)
FrameStroke.Thickness = 1.5

local TitleLabel = Instance.new("TextLabel")
TitleLabel.Size = UDim2.new(1, -40, 0, 35)
TitleLabel.Position = UDim2.new(0, 10, 0, 5)
TitleLabel.BackgroundTransparency = 1
TitleLabel.Text = "📜 LISTA DE COMANDOS"
TitleLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
TitleLabel.TextSize = 14
TitleLabel.Font = Enum.Font.SourceSansBold
TitleLabel.TextXAlignment = Enum.TextXAlignment.Left
TitleLabel.Parent = CmdsFrame

local CloseBtn = Instance.new("TextButton")
CloseBtn.Size = UDim2.new(0, 30, 0, 30)
CloseBtn.Position = UDim2.new(1, -35, 0, 5)
CloseBtn.BackgroundTransparency = 1
CloseBtn.Text = "✕"
CloseBtn.TextColor3 = Color3.fromRGB(255, 80, 80)
CloseBtn.TextSize = 20
CloseBtn.Font = Enum.Font.SourceSansBold
CloseBtn.Parent = CmdsFrame

CloseBtn.Activated:Connect(function() CmdsFrame.Visible = false end)

local ScrollList = Instance.new("ScrollingFrame")
ScrollList.Name = "ScrollList"
ScrollList.Size = UDim2.new(1, -20, 1, -50)
ScrollList.Position = UDim2.new(0, 10, 0, 45)
ScrollList.BackgroundTransparency = 1
ScrollList.BorderSizePixel = 0
ScrollList.CanvasSize = UDim2.new(0, 0, 0, 0)
ScrollList.ScrollBarThickness = 4
ScrollList.Parent = CmdsFrame

local UIListLayout = Instance.new("UIListLayout")
UIListLayout.SortOrder = Enum.SortOrder.LayoutOrder
UIListLayout.Padding = UDim.new(0, 5)
UIListLayout.Parent = ScrollList

local CustomCmds = {
    {name = ";fly [vel]", desc = "Volar"},
    {name = ";unfly", desc = "Apagar vuelo"},
    {name = ";speed [num]", desc = "Velocidad"},
    {name = ";jumppower [num]", desc = "Salto"},
    {name = ";infjump", desc = "Salto infinito"},
    {name = ";noclip / ;clip", desc = "Atravesar paredes"},
    {name = ";god / ;ungod", desc = "Modo Dios"},
    {name = ";invisible", desc = "Invisible"},
    {name = ";visible", desc = "Visible"},
    {name = ";esp / ;unesp", desc = "Ver jugadores"},
    {name = ";view [nombre]", desc = "Espectar"},
    {name = ";unview", desc = "Salir de espectador"},
    {name = ";viewinv [nombre]", desc = "Ver inventario"},
    {name = ";tp [nombre]", desc = "Teletransporte"},
    {name = ";spin [vel]", desc = "Girar"},
    {name = ";fling [nombre]", desc = "Empujar/Eliminar jugador"},
    {name = ";hitbox [num]", desc = "Agrandar golpes (Rango)"},
    {name = ";sit", desc = "Sentarse"},
    {name = ";btools", desc = "Herramientas"},
    {name = ";re", desc = "Reiniciar"},
    {name = ";cmds", desc = "Menu"}
}

for _, cmd in ipairs(CustomCmds) do
    local Item = Instance.new("Frame")
    Item.Size = UDim2.new(1, 0, 0, 30)
    Item.BackgroundColor3 = Color3.fromRGB(22, 22, 22)
    Item.Parent = ScrollList
    Instance.new("UICorner", Item).CornerRadius = UDim.new(0, 5)

    local N = Instance.new("TextLabel")
    N.Size = UDim2.new(0.48, 0, 1, 0)
    N.Position = UDim2.new(0, 5, 0, 0)
    N.BackgroundTransparency = 1
    N.Text = cmd.name
    N.TextColor3 = Color3.fromRGB(255, 255, 255)
    N.Font = Enum.Font.SourceSansBold
    N.TextSize = 12
    N.TextXAlignment = Enum.TextXAlignment.Left
    N.Parent = Item

    local D = Instance.new("TextLabel")
    D.Size = UDim2.new(0.52, -10, 1, 0)
    D.Position = UDim2.new(0.48, 5, 0, 0)
    D.BackgroundTransparency = 1
    D.Text = cmd.desc
    D.TextColor3 = Color3.fromRGB(160, 160, 160)
    D.Font = Enum.Font.SourceSans
    D.TextSize = 11
    D.TextXAlignment = Enum.TextXAlignment.Left
    D.Parent = Item
end
ScrollList.CanvasSize = UDim2.new(0, 0, 0, #CustomCmds * 35)

KButton.Activated:Connect(function()
    CommandBar.Visible = not CommandBar.Visible
    if CommandBar.Visible then
        CommandBar.Position = UDim2.new(KButton.Position.X.Scale, KButton.Position.X.Offset + 65, KButton.Position.Y.Scale, KButton.Position.Y.Offset + 5)
        CommandBar:CaptureFocus()
    end
end)

-- 4. MOTOR DE PROCESAMIENTO DE ACCIONES CONSOLIDADO
local Flying, FlySpeed, Noclipping, GodMode, IsInvisible, InfJumping, Spinning, Flinging = false, 50, false, false, false, false, false, false
local FlyBodyVel, FlyBodyGyro, SpinVelocity, NoclipConnection, GodConnection, InfJumpConnection, HitboxConnection

local function ProcessCommand(text)
    if text == "" then return end
    local clean = text:sub(1, 1) == ";" and text:sub(2) or text
    local args = string.split(clean, " ")
    local cmd = args[1]:lower()
    local param = args[2]

    if cmd == "cmds" then
        CmdsFrame.Visible = not CmdsFrame.Visible
    elseif cmd == "fly" then
        local char = LocalPlayer.Character
        if not char or not char:FindFirstChild("HumanoidRootPart") then return end
        if Flying then
            Flying = false
            if FlyBodyVel then FlyBodyVel:Destroy() end
            if FlyBodyGyro then FlyBodyGyro:Destroy() end
            Notify("Vuelo", "Desactivado")
        else
            Flying = true
            FlySpeed = tonumber(param) or 50
            FlyBodyVel = Instance.new("BodyVelocity", char.HumanoidRootPart)
            FlyBodyVel.MaxForce = Vector3.new(1e9, 1e9, 1e9)
            FlyBodyGyro = Instance.new("BodyGyro", char.HumanoidRootPart)
            FlyBodyGyro.MaxTorque = Vector3.new(1e9, 1e9, 1e9)
            task.spawn(function()
                while Flying and char and char:FindFirstChild("HumanoidRootPart") do
                    FlyBodyGyro.CFrame = Workspace.CurrentCamera.CFrame
                    FlyBodyVel.Velocity = Workspace.CurrentCamera.CFrame.LookVector * FlySpeed
                    RunService.RenderStepped:Wait()
                end
            end)
            Notify("Vuelo", "Activado")
        end
    elseif cmd == "unfly" then
        if Flying then Flying = false if FlyBodyVel then FlyBodyVel:Destroy() end if FlyBodyGyro then FlyBodyGyro:Destroy() end Notify("Vuelo", "Apagado") end
    elseif cmd == "speed" or cmd == "ws" then
        local num = tonumber(param) or 16
        if LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("Humanoid") then
            LocalPlayer.Character.Humanoid.WalkSpeed = num
            Notify("Velocidad", "Set a " .. num)
        end
    elseif cmd == "jumppower" or cmd == "jp" then
        local num = tonumber(param) or 50
        if LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("Humanoid") then
            LocalPlayer.Character.Humanoid.UseJumpPower = true
            LocalPlayer.Character.Humanoid.JumpPower = num
            Notify("Salto", "Set a " .. num)
        end
    elseif cmd == "infjump" then
        InfJumping = not InfJumping
        if InfJumpConnection then InfJumpConnection:Disconnect() end
        if InfJumping then
            InfJumpConnection = UserInputService.JumpRequest:Connect(function()
                if LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("Humanoid") then
                    LocalPlayer.Character.Humanoid:ChangeState(Enum.HumanoidStateType.Jumping)
                end
            end)
            Notify("Salto Infinito", "Activado")
        else
            Notify("Salto Infinito", "Desactivado")
        end
    elseif cmd == "noclip" then
        Noclipping = true
        if NoclipConnection then NoclipConnection:Disconnect() end
        NoclipConnection = RunService.Stepped:Connect(function()
            if LocalPlayer.Character then
                for _, p in ipairs(LocalPlayer.Character:GetDescendants()) do 
                    if p:IsA("BasePart") then p.CanCollide = false end 
                end
            end
        end)
        Notify("Noclip", "Activado")
    elseif cmd == "clip" then
        Noclipping = false
        if NoclipConnection then NoclipConnection:Disconnect() end
        Notify("Noclip", "Desactivado")
    elseif cmd == "god" then
        GodMode = true
        if GodConnection then GodConnection:Disconnect() end
        GodConnection = RunService.Heartbeat:Connect(function()
            if LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("Humanoid") then
                LocalPlayer.Character.Humanoid.Health = LocalPlayer.Character.Humanoid.MaxHealth
            end
        end)
        Notify("GodMode", "Activado")
    elseif cmd == "ungod" then
        GodMode = false
        if GodConnection then GodConnection:Disconnect() end
        Notify("GodMode", "Desactivado")
    elseif cmd == "invisible" or cmd == "invis" then
        if LocalPlayer.Character then
            for _, p in ipairs(LocalPlayer.Character:GetDescendants()) do
                if p:IsA("BasePart") and p.Name ~= "HumanoidRootPart" then 
                    p.Transparency = 1 
                elseif p:IsA("Decal") then 
                    p.Transparency = 1 
                end
            end
            Notify("Invisibilidad", "Activada")
        end
    elseif cmd == "visible" or cmd == "vis" then
        if LocalPlayer.Character then
            for _, p in ipairs(LocalPlayer.Character:GetDescendants()) do
                if p:IsA("BasePart") and p.Name ~= "HumanoidRootPart" then 
                    p.Transparency = 0 
                elseif p:IsA("Decal") then 
                    p.Transparency = 0 
                end
            end
            Notify("Invisibilidad", "Desactivada")
        end
    elseif cmd == "esp" then
        for _, p in ipairs(Players:GetPlayers()) do
            if p ~= LocalPlayer and p.Character and not p.Character:FindFirstChild("AdminK_ESP") then
                local h = Instance.new("Highlight", p.Character)
                h.Name = "AdminK_ESP"
                h.FillColor = Color3.fromRGB(0, 255, 150)
            end
        end
        Notify("ESP", "Activado")
    elseif cmd == "unesp" then
        for _, p in ipairs(Players:GetPlayers()) do
            if p.Character and p.Character:FindFirstChild("AdminK_ESP") then 
                p.Character.AdminK_ESP:Destroy() 
            end
        end
        Notify("ESP", "Desactivado")
    elseif (cmd == "tp" or cmd == "goto") and param then
        local target
        for _, p in ipairs(Players:GetPlayers()) do
            if p ~= LocalPlayer and p.Name:lower():sub(1, #param) == param:lower() then 
                target = p 
                break 
            end
        end
        if target and target.Character and target.Character:FindFirstChild("HumanoidRootPart") then
            LocalPlayer.Character.HumanoidRootPart.CFrame = target.Character.HumanoidRootPart.CFrame * CFrame.new(0, 0, -3)
            Notify("Teletransporte", "Llegaste a " .. target.Name)
        else
            Notify("Error", "Jugador no encontrado")
        end
    elseif cmd == "re" or cmd == "reset" then
        if LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("Humanoid") then
            LocalPlayer.Character.Humanoid.Health = 0
        end
    elseif cmd == "spin" then
        local char = LocalPlayer.Character
        if not char or not char:FindFirstChild("HumanoidRootPart") then return end
        if Spinning then
            Spinning = false
            if SpinVelocity then SpinVelocity:Destroy() end
            Notify("Girar", "Desactivado")
        else
            Spinning = true
            local speed = tonumber(param) or 30
            SpinVelocity = Instance.new("AngularVelocity", char.HumanoidRootPart)
            SpinVelocity.MaxTorque = math.huge
            SpinVelocity.AngularVelocity = Vector3.new(0, speed, 0)
            SpinVelocity.Attachment0 = char.HumanoidRootPart:FindFirstChildOfClass("Attachment") or Instance.new("Attachment", char.HumanoidRootPart)
            Notify("Girar", "Activado")
        end
    elseif cmd == "sit" then
        if LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("Humanoid") then
            LocalPlayer.Character.Humanoid.Sit = true
            Notify("Acción", "Sentado")
        end
    elseif cmd == "view" and param then
        local target
        for _, p in ipairs(Players:GetPlayers()) do
            if p.Name:lower():sub(1, #param) == param:lower() then 
                target = p 
                break 
            end
        end
        if target and target.Character and target.Character:FindFirstChild("Humanoid") then
            Workspace.CurrentCamera.CameraSubject = target.Character.Humanoid
            Notify("Espectar", "Viendo a " .. target.Name)
        end
    elseif cmd == "unview" then
        if LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("Humanoid") then
            Workspace.CurrentCamera.CameraSubject = LocalPlayer.Character.Humanoid
            Notify("Espectar", "Reset cámara")
        end
    elseif cmd == "viewinv" and param then
        local target
        for _, p in ipairs(Players:GetPlayers()) do
            if p.Name:lower():sub(1, #param) == param:lower() then 
                target = p 
                break 
            end
        end
        if target and target:FindFirstChild("Backpack") then
            local tools = {}
            for _, t in ipairs(target.Backpack:GetChildren()) do 
                if t:IsA("Tool") then table.insert(tools, t.Name) end 
            end
            Notify("Inventario de " .. target.Name, #tools > 0 and table.concat(tools, ", ") or "Vacío")
        end
    elseif cmd == "btools" then
        pcall(function()
            for i = 1, 4 do
                local tool = Instance.new("HopperBin", LocalPlayer:FindFirstChild("Backpack"))
                tool.BinType = i
            end
            Notify("BTools", "Añadidas")
        end)
    elseif cmd == "fling" and param then
        local target
        for _, p in ipairs(Players:GetPlayers()) do
            if p ~= LocalPlayer and p.Name:lower():sub(1, #param) == param:lower() then 
                target = p 
                break 
            end
        end
        if target and target.Character and target.Character:FindFirstChild("HumanoidRootPart") and LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("HumanoidRootPart") then
            Notify("Fling", "Lanzando a " .. target.Name)
            local root = LocalPlayer.Character.HumanoidRootPart
            local oldCFrame = root.CFrame
            Flinging = true
            local v = Instance.new("BodyAngularVelocity", root)
            v.MaxTorque = Vector3.new(math.huge, math.huge, math.huge)
            v.AngularVelocity = Vector3.new(0, 99999, 0)
            task.spawn(function()
                for i = 1, 50 do
                    if not Flinging or not target.Character or not target.Character:FindFirstChild("HumanoidRootPart") then break end
                    root.CFrame = target.Character.HumanoidRootPart.CFrame * CFrame.new(0, 0.5, 0)
                    RunService.Heartbeat:Wait()
                end
                v:Destroy()
                root.CFrame = oldCFrame
                Flinging = false
                Notify("Fling", "Ataque terminado")
            end)
        else
            Notify("Error", "Jugador no disponible")
        end
    elseif cmd == "hitbox" then
        local size = tonumber(param) or 15
        if HitboxConnection then HitboxConnection:Disconnect() end
        HitboxConnection = RunService.RenderStepped:Connect(function()
            for _, p in ipairs(Players:GetPlayers()) do
                if p ~= LocalPlayer and p.Character and p.Character:FindFirstChild("HumanoidRootPart") then
                    p.Character.HumanoidRootPart.Size = Vector3.new(size, size, size)
                    p.Character.HumanoidRootPart.Transparency = 0.7
                    p.Character.HumanoidRootPart.Color = Color3.fromRGB(255, 0, 0)
                    p.Character.HumanoidRootPart.CanCollide = false
                end
            end
        end)
        Notify("Hitbox", "Rango aumentado a " .. size)
    else
        Notify("Comando", "Desconocido: " .. cmd)
    end
end

CommandBar.FocusLost:Connect(function(enterPressed)
    if enterPressed then
        ProcessCommand(CommandBar.Text)
        CommandBar.Text = ""
        CommandBar.Visible = false
    end
end)

Notify("Super Admin K", "¡Todo operativo al 100%!")