loadstring([[
local Players = game:GetService("Players")
local TeleportService = game:GetService("TeleportService")
local LocalPlayer = Players.LocalPlayer
pcall(function()
LocalPlayer.PlayerGui:FindFirstChild("HD_GUI"):Destroy()
end)
local banned = {}
local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "HD_GUI"
ScreenGui.Parent = LocalPlayer:WaitForChild("PlayerGui")
ScreenGui.ResetOnSpawn = false
-- BOTÃO HD
local Button = Instance.new("TextButton")
Button.Parent = ScreenGui
Button.Size = UDim2.new(0,60,0,60)
Button.Position = UDim2.new(0.03,0,0.45,0)
Button.BackgroundColor3 = Color3.fromRGB(255,255,255)
Button.Text = "HD"
Button.TextColor3 = Color3.new(0,0,0)
Button.TextScaled = true
Button.Active = true
Button.Draggable = true
local BC = Instance.new("UICorner",Button)
BC.CornerRadius = UDim.new(1,0)
-- MENU
local Menu = Instance.new("Frame")
Menu.Parent = ScreenGui
Menu.Size = UDim2.new(0,280,0,350)
Menu.Position = UDim2.new(0.1,0,0.3,0)
Menu.BackgroundColor3 = Color3.fromRGB(25,25,25)
Menu.Visible = false
local MC = Instance.new("UICorner",Menu)
-- TITULO
local Title = Instance.new("TextLabel")
Title.Parent = Menu
Title.Size = UDim2.new(1,0,0,40)
Title.BackgroundTransparency = 1
Title.Text = "HD ADMIN MENU"
Title.TextColor3 = Color3.new(1,1,1)
Title.TextScaled = true
-- CAIXA
local Box = Instance.new("TextBox")
Box.Parent = Menu
Box.Size = UDim2.new(0.9,0,0,40)
Box.Position = UDim2.new(0.05,0,0.18,0)
Box.PlaceholderText = "/speed 100"
Box.Text = ""
Box.TextScaled = true
-- BOTÃO EXECUTAR
local Execute = Instance.new("TextButton")
Execute.Parent = Menu
Execute.Size = UDim2.new(0.9,0,0,40)
Execute.Position = UDim2.new(0.05,0,0.35,0)
Execute.Text = "EXECUTAR"
Execute.TextScaled = true
Execute.BackgroundColor3 = Color3.fromRGB(0,170,255)
-- OUTPUT
local Output = Instance.new("TextLabel")
Output.Parent = Menu
Output.Size = UDim2.new(0.9,0,0,160)
Output.Position = UDim2.new(0.05,0,0.5,0)
Output.BackgroundTransparency = 1
Output.TextColor3 = Color3.new(1,1,1)
Output.TextWrapped = true
Output.TextYAlignment = Enum.TextYAlignment.Top
Output.TextScaled = false
Output.Text =
"/speed 100\n/jump 150\n/reset\n/rejoin\n/sit\n/kick nome\n/ban nome"
-- ABRIR MENU
Button.MouseButton1Click:Connect(function()
Menu.Visible = not Menu.Visible
end)
-- PERSONAGEM
local function getCharacter()
return LocalPlayer.Character or LocalPlayer.CharacterAdded:Wait()
end
-- PEGAR PLAYER
local function getPlayer(name)
for _,plr in pairs(Players:GetPlayers()) do
if string.lower(plr.Name):sub(1,#name) == string.lower(name) then
return plr
end
end
end
-- EXECUTAR
Execute.MouseButton1Click:Connect(function()
local txt = Box.Text
local args = txt:split(" ")
-- SPEED
if args[1] == "/speed" then
local num = tonumber(args[2])
if num then
getCharacter():WaitForChild("Humanoid").WalkSpeed = num
Output.Text = "Speed alterada para "..num
end
-- JUMP
elseif args[1] == "/jump" then
local num = tonumber(args[2])
if num then
getCharacter():WaitForChild("Humanoid").JumpPower = num
Output.Text = "Jump alterado para "..num
end
-- RESET
elseif args[1] == "/reset" then
getCharacter():BreakJoints()
-- REJOIN
elseif args[1] == "/rejoin" then
TeleportService:Teleport(game.PlaceId, LocalPlayer)
-- SIT
elseif args[1] == "/sit" then
getCharacter():WaitForChild("Humanoid").Sit = true
-- KICK
elseif args[1] == "/kick" then
local target = getPlayer(args[2])
if target then
target:Kick("Você foi kickado.")
Output.Text = target.Name.." foi kickado."
else
Output.Text = "Player não encontrado."
end
-- BAN
elseif args[1] == "/ban" then
local target = getPlayer(args[2])
if target then
banned[target.UserId] = true
target:Kick("Você foi banido.")
Output.Text = target.Name.." foi banido."
else
Output.Text = "Player não encontrado."
end
else
Output.Text = "Comando não encontrado."
end
end)
-- SISTEMA BAN
Players.PlayerAdded:Connect(function(plr)
if banned[plr.UserId] then
plr:Kick("Banido.")
end
end)
]])()
Comments
Guión súper genial subestimado