0% found this document useful (0 votes)
26 views5 pages

Server 23

The document outlines a Lua script for creating a GUI in Roblox, featuring a main frame with various buttons for functionalities like Infinite Health, Flight, Speed Boost, and more. It includes event listeners for resizing the frame and handling button clicks to execute specific actions in the game. The script also manages user input for dragging the frame and adjusting its size dynamically.

Uploaded by

cudorobloxvn
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
0% found this document useful (0 votes)
26 views5 pages

Server 23

The document outlines a Lua script for creating a GUI in Roblox, featuring a main frame with various buttons for functionalities like Infinite Health, Flight, Speed Boost, and more. It includes event listeners for resizing the frame and handling button clicks to execute specific actions in the game. The script also manages user input for dragging the frame and adjusting its size dynamically.

Uploaded by

cudorobloxvn
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
You are on page 1/ 5

local ScreenGui = Instance.

new("ScreenGui")
local MainFrame = Instance.new("Frame")
local ScrollingFrame = Instance.new("ScrollingFrame")
local Resizer = Instance.new("TextButton")
local InfHpButton = Instance.new("TextButton")
local FlightButton = Instance.new("TextButton")
local ExitButton = Instance.new("TextButton")
local SpeedBoostButton = Instance.new("TextButton")
local DarknessButton = Instance.new("TextButton")
local DiceButton = Instance.new("TextButton")
local DukeButton = Instance.new("TextButton")
local DamageGainButton = Instance.new("TextButton")
local UICorner = Instance.new("UICorner")
local ButtonCorner = Instance.new("UICorner")

-- GUI Properties
ScreenGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
MainFrame.Parent = ScreenGui
MainFrame.BackgroundColor3 = Color3.fromRGB(0, 0, 0) -- Black background
MainFrame.BorderColor3 = Color3.fromRGB(169, 169, 169) -- Grey outline
MainFrame.BorderSizePixel = 2
MainFrame.Size = UDim2.new(0, 450, 0, 400) -- Increased size
MainFrame.Position = UDim2.new(0.5, -225, 0.5, -200)
MainFrame.Active = true
MainFrame.Draggable = false -- Disable built-in draggable
MainFrame.Visible = true -- Set to visible initially

UICorner.Parent = MainFrame
UICorner.CornerRadius = UDim.new(0.05, 0) -- Round corners for MainFrame

ScrollingFrame.Parent = MainFrame
ScrollingFrame.Size = UDim2.new(1, -20, 1, -60) -- Adjust size to fit the main
frame
ScrollingFrame.Position = UDim2.new(0, 10, 0, 10)
ScrollingFrame.CanvasSize = UDim2.new(0, 0, 1, 500) -- Adjust canvas size for
scrolling
ScrollingFrame.ScrollBarThickness = 10
ScrollingFrame.BackgroundTransparency = 1 -- Make the scrolling frame background
transparent

Resizer.Parent = MainFrame
Resizer.BackgroundColor3 = Color3.fromRGB(169, 169, 169) -- Grey resizer
Resizer.Size = UDim2.new(0, 60, 0, 30)
Resizer.Position = UDim2.new(1, -60, 1, -30)
Resizer.BorderSizePixel = 0
Resizer.Text = "Resize"
Resizer.TextColor3 = Color3.fromRGB(0, 0, 0)
Resizer.TextSize = 14

local resizing = false

Resizer.InputBegan:Connect(function(input)
if input.UserInputType == Enum.UserInputType.MouseButton1 then
resizing = true
end
end)

Resizer.InputEnded:Connect(function(input)
if input.UserInputType == Enum.UserInputType.MouseButton1 then
resizing = false
end
end)

game:GetService("UserInputService").InputChanged:Connect(function(input)
if resizing then
local newSize = UDim2.new(0, input.Position.X -
MainFrame.AbsolutePosition.X, 0, input.Position.Y - MainFrame.AbsolutePosition.Y)
MainFrame.Size = newSize
end
end)

local dragging
local dragInput
local dragStart
local startPos

local function update(input)


local delta = input.Position - dragStart
MainFrame.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X,
startPos.Y.Scale, startPos.Y.Offset + delta.Y)
end

MainFrame.InputBegan:Connect(function(input)
if input.UserInputType == Enum.UserInputType.MouseButton1 or
input.UserInputType == Enum.UserInputType.Touch then
dragging = true
dragStart = input.Position
startPos = MainFrame.Position

input.Changed:Connect(function()
if input.UserInputState == Enum.UserInputState.End then
dragging = false
end
end)
end
end)

MainFrame.InputChanged:Connect(function(input)
if input.UserInputType == Enum.UserInputType.MouseMovement or
input.UserInputType == Enum.UserInputType.Touch then
dragInput = input
end
end)

game:GetService("UserInputService").InputChanged:Connect(function(input)
if input == dragInput and dragging then
update(input)
end
end)

local function createButton(button, text, position)


button.Parent = ScrollingFrame
button.Text = text
button.BackgroundColor3 = Color3.fromRGB(169, 169, 169) -- Grey button
button.BorderColor3 = Color3.fromRGB(169, 169, 169) -- Grey outline for button
button.BorderSizePixel = 2
button.Size = UDim2.new(0, 180, 0, 30)
button.Position = position
button.TextColor3 = Color3.fromRGB(255, 255, 255) -- White text

ButtonCorner = Instance.new("UICorner", button)


ButtonCorner.CornerRadius = UDim.new(0.2, 0) -- Round corners for buttons
end

createButton(InfHpButton, "Infinite Health", UDim2.new(0, 0, 0.05, 0))


createButton(FlightButton, "Flight", UDim2.new(0, 0, 0.15, 0))
createButton(SpeedBoostButton, "Speed Boost", UDim2.new(0, 0, 0.25, 0))
createButton(DarknessButton, "Darkness", UDim2.new(0, 0, 0.35, 0))
createButton(DiceButton, "Dice", UDim2.new(0, 0, 0.45, 0))
createButton(DukeButton, "Duke", UDim2.new(0, 0, 0.55, 0))
createButton(DamageGainButton, "Damage Gain", UDim2.new(0, 0, 0.65, 0))
createButton(ExitButton, "Exit", UDim2.new(0, 0, 0.75, 0))

-- Infinite Health Function


local function setInfiniteHealth()
local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
humanoid.Health = math.huge
humanoid.MaxHealth = math.huge
end

InfHpButton.MouseButton1Click:Connect(setInfiniteHealth)

-- Flight Function
local flying = false
local function toggleFlight()
local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")

if flying then
humanoid.PlatformStand = false
humanoid:ChangeState(Enum.HumanoidStateType.Running)
else
humanoid.PlatformStand = true
humanoid:ChangeState(Enum.HumanoidStateType.Freefall)
end

flying = not flying


end

FlightButton.MouseButton1Click:Connect(toggleFlight)

-- Speed Boost Function


local function setSpeedBoost()
local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
humanoid.WalkSpeed = 100 -- Adjust the speed as needed
end

SpeedBoostButton.MouseButton1Click:Connect(setSpeedBoost)

-- Darkness Function
local function setDarkness()
local args = {
[1] = "Input",
[2] = "AureusAurelion Hood",
[3] = 20,
[4] = "Darkness"
}

game:GetService("Players").LocalPlayer.Character.Combat.RemoteEvent:FireServer(unpa
ck(args))
end

DarknessButton.MouseButton1Click:Connect(setDarkness)

-- Dice Function
local function rollDice()
local args = {
[1] = "Input",
[2] = "GygaxDice of Gygax",
[3] = 8,
[4] = "Evil"
}

game:GetService("Players").LocalPlayer.Character.Combat.RemoteEvent:FireServer(unpa
ck(args))
end

DiceButton.MouseButton1Click:Connect(rollDice)

-- Duke Function
local function setDuke()
local args = {
[1] = "Input",
[2] = "DukeDuke of the Federation",
[3] = 28,
[4] = "R"
}

game:GetService("Players").LocalPlayer.Character.Combat.RemoteEvent:FireServer(unpa
ck(args))
end

DukeButton.MouseButton1Click:Connect(setDuke)

-- Damage Gain Function


local function setDamageGain()
local args = {
[1] = "Input",
[2] = "DukeDuke of the Federation",
[3] = 20,
[4] = "E"
}

for i = 1, 5 do

game:GetService("Players").LocalPlayer.Character.Combat.RemoteEvent:FireServer(unpa
ck(args))
end
end

DamageGainButton.MouseButton1Click:Connect(setDamageGain)

-- Exit Function

You might also like