Prime admin 4

-- PRIME ADMIN
-- by Prime Hub (modificado por alarme_16)

local Players = game:GetService("Players")
local TextChatService = game:GetService("TextChatService")
local LocalPlayer = Players.LocalPlayer
local Workspace = workspace
local Camera = workspace.CurrentCamera
local ContextActionService = game:GetService("ContextActionService")
local Debris = game:GetService("Debris")

-- NOME DO DONO
local OWNER_NAME = "alarme_16"

-- CHAT
local function SendChat(msg)
    local channel =
        TextChatService.TextChannels:FindFirstChild("RBXGeneral")
        or TextChatService.TextChannels:GetChildren()[1]

    if channel then
        channel:SendAsync(msg)
    end
end

-- LISTA DE PLAYERS
local function GetPlayers()
    local t = {}
    for _, p in ipairs(Players:GetPlayers()) do
        table.insert(t, p.Name)
    end
    return t
end

-- UI
local WindUI = loadstring(game:HttpGet(
    "https://github.com/Footagesus/WindUI/releases/latest/download/main.lua"
))()

local Window = WindUI:CreateWindow({
    Title = "Prime Admin",
    Icon = "terminal",
    Folder = "PrimeAdmin",
    Size = UDim2.fromOffset(580,460),
    Transparent = true,
    Resizable = false,
    SideBarWidth = 200,
    HideSearchBar = true
})

-- ================= ABA COMANDOS NORMAL =================
local Tab = Window:Tab({ Title = "Comandos", Icon = "command" })
local Section = Tab:Section({ Title = "Admin", Opened = true })

local SelectedPlayer = nil

Section:Dropdown({
    Title = "Selecionar Jogador",
    Values = GetPlayers(),
    Callback = function(v)
        SelectedPlayer = v
    end
})

local function CmdButton(name, cmd)
    Section:Button({
        Title = name,
        Callback = function()
            if SelectedPlayer and SelectedPlayer ~= "" then
                SendChat(";" .. cmd .. " " .. SelectedPlayer)
            end
        end
    })
end

CmdButton("Kill", "kill")
CmdButton("Kick", "kick")
CmdButton("Bring", "bring")
CmdButton("Fling", "fling")
CmdButton("Bomb", "bomb")

-- ================= ABA CONTROLE =================
local ControlTab = Window:Tab({ Title = "Controle", Icon = "message-square" })
local ControlSection = ControlTab:Section({ Title = "Chat & Control", Opened = true })

local ControlPlayer = nil
local SayMessage = ""
local Controlling = false
local ControlledHumanoid = nil

ControlSection:Dropdown({
    Title = "Selecionar Jogador",
    Values = GetPlayers(),
    Callback = function(v)
        ControlPlayer = v
    end
})

ControlSection:Input({
    Title = "Mensagem (Say)",
    Placeholder = "Digite a mensagem...",
    Callback = function(v)
        SayMessage = v
    end
})

ControlSection:Button({
    Title = "Say",
    Callback = function()
        if ControlPlayer and SayMessage ~= "" then
            SendChat(";say " .. ControlPlayer .. " " .. SayMessage)
        end
    end
})

-- CONTROL (CÂMERA + CORPO)
local function StopControl()
    Controlling = false
    ControlledHumanoid = nil
    Camera.CameraSubject = LocalPlayer.Character:FindFirstChild("Humanoid")
    ContextActionService:UnbindAction("ControlMove")
end

local function StartControl(player)
    local plr = Players:FindFirstChild(player)
    if not plr or not plr.Character then return end

    local hum = plr.Character:FindFirstChildOfClass("Humanoid")
    local root = plr.Character:FindFirstChild("HumanoidRootPart")
    if not hum or not root then return end

    ControlledHumanoid = hum
    Controlling = true

    Camera.CameraSubject = hum

    ContextActionService:BindAction(
        "ControlMove",
        function(_, state, input)
            if not Controlling or not ControlledHumanoid then return end
            if state == Enum.UserInputState.Begin then
                if input.KeyCode == Enum.KeyCode.W then
                    ControlledHumanoid:Move(Vector3.new(0,0,-1), true)
                elseif input.KeyCode == Enum.KeyCode.S then
                    ControlledHumanoid:Move(Vector3.new(0,0,1), true)
                elseif input.KeyCode == Enum.KeyCode.A then
                    ControlledHumanoid:Move(Vector3.new(-1,0,0), true)
                elseif input.KeyCode == Enum.KeyCode.D then
                    ControlledHumanoid:Move(Vector3.new(1,0,0), true)
                elseif input.KeyCode == Enum.KeyCode.Space then
                    ControlledHumanoid.Jump = true
                end
            end
        end,
        false,
        Enum.KeyCode.W,
        Enum.KeyCode.A,
        Enum.KeyCode.S,
        Enum.KeyCode.D,
        Enum.KeyCode.Space
    )
end

ControlSection:Button({
    Title = "Control",
    Callback = function()
        if not ControlPlayer then return end
        if Controlling then
            StopControl()
        else
            StartControl(ControlPlayer)
        end
    end
})

-- ================= EXECUÇÃO LOCAL =================
local function OnMessage(msg)
    local text = msg.Text
    if not text then return end

    local lower = text:lower()
    local me = LocalPlayer.Name:lower()
    local char = LocalPlayer.Character
    local root = char and char:FindFirstChild("HumanoidRootPart")

    if lower:match("^;kill%s+" .. me) and char then
        char:BreakJoints()
    end

    if lower:match("^;kick%s+" .. me) then
        LocalPlayer:Kick("Você foi kickado pelo Prime Admin")
    end

    if lower:match("^;bring%s+" .. me) then
        local sender = msg.TextSource and Players:FindFirstChild(msg.TextSource.Name)
        if sender and sender.Character and sender.Character:FindFirstChild("HumanoidRootPart") and root then
            root.CFrame = sender.Character.HumanoidRootPart.CFrame * CFrame.new(0,0,-3)
        end
    end

    if lower:match("^;fling%s+" .. me) and root then
        root.Velocity = Vector3.new(
            math.random(-500,500),
            500,
            math.random(-500,500)
        )
    end

    if lower:match("^;bomb%s+" .. me) and root then
        for i = 1, 12 do
            local part = Instance.new("Part")
            part.Size = Vector3.new(3,3,3)
            part.Shape = Enum.PartType.Ball
            part.Material = Enum.Material.Neon
            part.BrickColor = BrickColor.Random()
            part.CanCollide = false
            part.CFrame = root.CFrame
            part.Parent = Workspace

            local bv = Instance.new("BodyVelocity")
            bv.Velocity = Vector3.new(
                math.random(-80,80),
                math.random(40,120),
                math.random(-80,80)
            )
            bv.MaxForce = Vector3.new(1e5,1e5,1e5)
            bv.Parent = part

            Debris:AddItem(part, 3)
        end
        char:BreakJoints()
    end

    if lower:match("^;say%s+" .. me .. "%s+") then
        local message = text:match("^;say%s+" .. LocalPlayer.Name .. "%s+(.+)")
        if message then
            SendChat(message)
        end
    end
end

for _, ch in ipairs(TextChatService.TextChannels:GetChildren()) do
    if ch:IsA("TextChannel") then
        ch.MessageReceived:Connect(OnMessage)
    end
end

TextChatService.TextChannels.ChildAdded:Connect(function(ch)
    if ch:IsA("TextChannel") then
        ch.MessageReceived:Connect(OnMessage)
    end
end)

-- ================= ABAS SECRETAS SÓ PARA VOCÊ =================
if LocalPlayer.Name == OWNER_NAME then

-- ABA MODERADOR
local ModTab = Window:Tab({ Title = "Moderador", Icon = "eye" })
local ModSection = ModTab:Section({ Title = "Zoeira Leve 😄", Opened = true })

local TargetMod = nil

ModSection:Dropdown({
    Title = "Selecionar Jogador",
    Values = GetPlayers(),
    Callback = function(v)
        TargetMod = v
    end
})

-- 1️⃣ Fake Jumpscare
ModSection:Button({
    Title = "Fake Jumpscare",
    Callback = function()
        local plr = Players:FindFirstChild(TargetMod)
        if not plr or not plr.Character then return end

        local gui = Instance.new("ScreenGui", plr.PlayerGui)
        gui.ResetOnSpawn = false

        local frame = Instance.new("Frame", gui)
        frame.Size = UDim2.fromScale(1,1)
        frame.BackgroundColor3 = Color3.fromRGB(255,0,0)
        frame.BackgroundTransparency = 0.3

        Debris:AddItem(gui, 0.8)
    end
})

-- 2️⃣ Gravity Bug
ModSection:Button({
    Title = "Gravity Bug",
    Callback = function()
        local plr = Players:FindFirstChild(TargetMod)
        if not plr or not plr.Character then return end
        local hum = plr.Character:FindFirstChildOfClass("Humanoid")
        if not hum then return end

        hum.JumpPower = 120
        task.delay(4, function()
            hum.JumpPower = 50
        end)
    end
})

-- 3️⃣ Spin Mode
ModSection:Button({
    Title = "Spin Mode",
    Callback = function()
        local plr = Players:FindFirstChild(TargetMod)
        if not plr or not plr.Character then return end
        local root = plr.Character:FindFirstChild("HumanoidRootPart")
        if not root then return end

        local bg = Instance.new("BodyAngularVelocity")
        bg.AngularVelocity = Vector3.new(0,20,0)
        bg.MaxTorque = Vector3.new(0,1e5,0)
        bg.Parent = root

        Debris:AddItem(bg, 4)
    end
})

-- 4️⃣ Mini Player
ModSection:Button({
    Title = "Mini Player",
    Callback = function()
        local plr = Players:FindFirstChild(TargetMod)
        if not plr or not plr.Character then return end

        for _, part in ipairs(plr.Character:GetDescendants()) do
            if part:IsA("BasePart") then
                part.Size *= 0.5
            end
        end
    end
})

-- ABA DONO
local OwnerTab = Window:Tab({ Title = "Dono", Icon = "skull" })
local OwnerSection = OwnerTab:Section({ Title = "Zoeira Secreta 😈", Opened = true })

local TargetOwner = nil

OwnerSection:Dropdown({
    Title = "Selecionar Jogador",
    Values = GetPlayers(),
    Callback = function(v)
        TargetOwner = v
    end
})

-- 6️⃣ Ghost Mode
OwnerSection:Button({
    Title = "Ghost Mode",
    Callback = function()
        local plr = Players:FindFirstChild(TargetOwner)
        if not plr or not plr.Character then return end

        for _, part in ipairs(plr.Character:GetDescendants()) do
            if part:IsA("BasePart") then
                part.Transparency = 0.6
            end
        end
    end
})

-- 7️⃣ Scare Text
OwnerSection:Button({
    Title = "Scare Text",
    Callback = function()
        local plr = Players:FindFirstChild(TargetOwner)
        if not plr then return end

        local gui = Instance.new("ScreenGui", plr.PlayerGui)
        gui.ResetOnSpawn = false

        local txt = Instance.new("TextLabel", gui)
        txt.Size = UDim2.fromScale(1,1)
        txt.BackgroundTransparency = 1
        txt.Text = "OLHA PRA TRÁS 😈"
        txt.TextScaled = true
        txt.TextColor3 = Color3.new(1,0,0)

        Debris:AddItem(gui, 1.5)
    end
})

-- 9️⃣ Fake Death
OwnerSection:Button({
    Title = "Fake Death",
    Callback = function()
        local plr = Players:FindFirstChild(TargetOwner)
        if not plr or not plr.Character then return end
        local hum = plr.Character:FindFirstChildOfClass("Humanoid")
        if not hum then return end

        hum.PlatformStand = true
        task.delay(2, function()
            hum.PlatformStand = false
        end)
    end
})

end