-- Server-side Hack GUI Script with Additional Features

-- Create a ScreenGui
local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Parent = game:GetService("CoreGui")

-- Create a Frame
local Frame = Instance.new("Frame")
Frame.Size = UDim2.new(0, 250, 0, 400)
Frame.Position = UDim2.new(0.5, -125, 0.5, -200)
Frame.BackgroundColor3 = Color3.new(0, 0, 0)
Frame.BorderSizePixel = 1
Frame.Parent = ScreenGui

-- Create a Title Label
local Title = Instance.new("TextLabel")
Title.Size = UDim2.new(1, 0, 0, 50)
Title.Position = UDim2.new(0, 0, 0, 0)
Title.BackgroundColor3 = Color3.new(0, 0, 0)
Title.TextColor3 = Color3.new(1, 1, 1)
Title.Text = "Advanced Hack GUI"
Title.TextSize = 24
Title.Font = Enum.Font.SourceSansBold
Title.Parent = Frame

-- Create a Robux Button
local RobuxButton = Instance.new("TextButton")
RobuxButton.Size = UDim2.new(1, 0, 0, 50)
RobuxButton.Position = UDim2.new(0, 0, 0, 50)
RobuxButton.BackgroundColor3 = Color3.new(0, 1, 0)
RobuxButton.TextColor3 = Color3.new(1, 1, 1)
RobuxButton.Text = "Give Robux"
RobuxButton.TextSize = 20
RobuxButton.Font = Enum.Font.SourceSans
RobuxButton.Parent = Frame

RobuxButton.MouseButton1Click:Connect(function()
    local player = game.Players.LocalPlayer
    local leaderstats = player:WaitForChild("leaderstats")
    local robux = leaderstats:WaitForChild("Robux")
    robux.Value = robux.Value + 1000
end)

-- Create a WalkSpeed Slider
local WalkSpeedSlider = Instance.new("TextButton")
WalkSpeedSlider.Size = UDim2.new(1, 0, 0, 50)
WalkSpeedSlider.Position = UDim2.new(0, 0, 0, 100)
WalkSpeedSlider.BackgroundColor3 = Color3.new(0, 0, 1)
WalkSpeedSlider.TextColor3 = Color3.new(1, 1, 1)
WalkSpeedSlider.Text = "WalkSpeed: 16"
WalkSpeedSlider.TextSize = 20
WalkSpeedSlider.Font = Enum.Font.SourceSans
WalkSpeedSlider.Parent = Frame

local walkSpeed = 16
WalkSpeedSlider.MouseButton1Click:Connect(function()
    walkSpeed = walkSpeed + 1
    WalkSpeedSlider.Text = "WalkSpeed: " .. tostring(walkSpeed)
    for _, player in pairs(game.Players:GetPlayers()) do
        player.Character.Humanoid.WalkSpeed = walkSpeed
    end
end)

-- Create a JumpPower Slider
local JumpPowerSlider = Instance.new("TextButton")
JumpPowerSlider.Size = UDim2.new(1, 0, 0, 50)
JumpPowerSlider.Position = UDim2.new(0, 0, 0, 150)
JumpPowerSlider.BackgroundColor3 = Color3.new(1, 0, 0)
JumpPowerSlider.TextColor3 = Color3.new(1, 1, 1)
JumpPowerSlider.Text = "JumpPower: 50"
JumpPowerSlider.TextSize = 20
JumpPowerSlider.Font = Enum.Font.SourceSans
JumpPowerSlider.Parent = Frame

local jumpPower = 50
JumpPowerSlider.MouseButton1Click:Connect(function()
    jumpPower = jumpPower + 10
    JumpPowerSlider.Text = "JumpPower: " .. tostring(jumpPower)
    for _, player in pairs(game.Players:GetPlayers()) do
        player.Character.Humanoid.JumpPower = jumpPower
    end
end)

-- Create a Fly Button
local FlyButton = Instance.new("TextButton")
FlyButton.Size = UDim2.new(1, 0, 0, 50)
FlyButton.Position = UDim2.new(0, 0, 0, 200)
FlyButton.BackgroundColor3 = Color3.new(1, 1, 0)
FlyButton.TextColor3 = Color3.new(0, 0, 0)
FlyButton.Text = "Fly"
FlyButton.TextSize = 20
FlyButton.Font = Enum.Font.SourceSans
FlyButton.Parent = Frame

FlyButton.MouseButton1Click:Connect(function()
    for _, player in pairs(game.Players:GetPlayers()) do
        local character = player.Character or player.CharacterAdded:Wait()
        local humanoid = character:WaitForChild("Humanoid")
        local bodyVelocity = Instance.new("BodyVelocity")
        bodyVelocity.Velocity = Vector3.new(0, 50, 0)
        bodyVelocity.MaxForce = Vector3.new(4000, 4000, 4000)
        bodyVelocity.Parent = character.PrimaryPart
    end
end)

-- Create a Reset Button
local ResetButton = Instance.new("TextButton")
ResetButton.Size = UDim2.new(1, 0, 0, 50)
ResetButton.Position = UDim2.new(0, 0, 0, 250)
ResetButton.BackgroundColor3 = Color3.new(1, 0, 0)
ResetButton.TextColor3 = Color3.new(1, 1, 1)
ResetButton.Text = "Reset"
ResetButton.TextSize = 20
ResetButton.Font = Enum.Font.SourceSans
ResetButton.Parent = Frame

ResetButton.MouseButton1Click:Connect(function()
    for _, player in pairs(game.Players:GetPlayers()) do
        player.Character.Humanoid.WalkSpeed = 16
        player.Character.Humanoid.JumpPower = 50
        if player.Character:FindFirstChild("BodyVelocity") then
            player.Character.BodyVelocity:Destroy()
        end
    end
end)

-- Create a God Mode Button
local GodModeButton = Instance.new("TextButton")
GodModeButton.Size = UDim2.new(1, 0, 0, 50)
GodModeButton.Position = UDim2.new(0, 0, 0, 300)
GodModeButton.BackgroundColor3 = Color3.new(0, 1, 1)
GodModeButton.TextColor3 = Color3.new(1, 1, 1)
GodModeButton.Text = "God Mode"
GodModeButton.TextSize = 20
GodModeButton.Font = Enum.Font.SourceSans
GodModeButton.Parent = Frame

GodModeButton.MouseButton1Click:Connect(function()
    for _, player in pairs(game.Players:GetPlayers()) do
        player.Character.Humanoid.Health = math.huge
        player.Character.Humanoid.MaxHealth = math.huge
    end
end)

-- Create a NoClip Button
local NoClipButton = Instance.new("TextButton")
NoClipButton.Size = UDim2.new(1, 0, 0, 50)
NoClipButton.Position = UDim2.new(0, 0, 0, 350)
NoClipButton.BackgroundColor3 = Color3.new(1, 0, 1)
NoClipButton.TextColor3 = Color3.new(1, 1, 1)
NoClipButton.Text = "NoClip"
NoClipButton.TextSize = 20
NoClipButton.Font = Enum.Font.SourceSans
NoClipButton.Parent = Frame

NoClipButton.MouseButton1Click:Connect(function()
    for _, player in pairs(game.Players:GetPlayers()) do
        local character = player.Character or player.CharacterAdded:Wait()
        local humanoid = character:WaitForChild("Humanoid")
        humanoid.PlatformStand = true
    end
end)

-- Create a Speed Slider
local SpeedSlider = Instance.new("TextButton")
SpeedSlider.Size = UDim2.new(1, 0, 0, 50)
SpeedSlider.Position = UDim2.new(0, 0, 0, 400)
SpeedSlider.BackgroundColor3 = Color3.new(0, 0.5, 0)
SpeedSlider.TextColor3 = Color3.new(1, 1, 1)
SpeedSlider.Text = "Speed: 1"
SpeedSlider.TextSize = 20
SpeedSlider.Font = Enum.Font.SourceSans
SpeedSlider.Parent = Frame

local speed = 1
SpeedSlider.MouseButton1Click:Connect(function()
    speed = speed + 1
    SpeedSlider.Text = "Speed: " .. tostring(speed)
    for _, player in pairs(game.Players:GetPlayers()) do
        player.Character.Humanoid.WalkSpeed = speed * 16
    end
end)