Speed changer

local Players = game:GetService("Players")
local player = Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()

-- Buat GUI
local screenGui = Instance.new("ScreenGui", player:WaitForChild("PlayerGui"))
screenGui.Name = "SpeedGui"

local frame = Instance.new("Frame", screenGui)
frame.Size = UDim2.new(0, 200, 0, 220)
frame.Position = UDim2.new(0.05, 0, 0.5, -110)
frame.BackgroundColor3 = Color3.fromRGB(40, 40, 40)
frame.Active = true
frame.Draggable = true

local title = Instance.new("TextLabel", frame)
title.Size = UDim2.new(1, 0, 0, 30)
title.Text = "Speed Control"
title.BackgroundColor3 = Color3.fromRGB(80, 0, 100)
title.TextColor3 = Color3.fromRGB(255, 255, 255)
title.Font = Enum.Font.SourceSansBold
title.TextSize = 20

-- Fungsi ubah kecepatan
local function setSpeed(speed)
	local char = player.Character
	if char and char:FindFirstChildOfClass("Humanoid") then
		char:FindFirstChildOfClass("Humanoid").WalkSpeed = speed
	end
end

-- Tombol-tombol speed
local speeds = {16, 50, 100, 200}
for i, speed in ipairs(speeds) do
	local btn = Instance.new("TextButton", frame)
	btn.Size = UDim2.new(1, -20, 0, 30)
	btn.Position = UDim2.new(0, 10, 0, 30 + (i - 1) * 35)
	btn.Text = "Speed: " .. speed
	btn.BackgroundColor3 = Color3.fromRGB(0, 170, 0)
	btn.TextColor3 = Color3.fromRGB(255, 255, 255)
	btn.Font = Enum.Font.SourceSansBold
	btn.TextSize = 16

	btn.MouseButton1Click:Connect(function()
		setSpeed(speed)
	end)
end

-- Custom speed input
local input = Instance.new("TextBox", frame)
input.Size = UDim2.new(1, -20, 0, 30)
input.Position = UDim2.new(0, 10, 1, -65)
input.PlaceholderText = "Custom speed"
input.Text = ""
input.TextColor3 = Color3.fromRGB(0,0,0)
input.BackgroundColor3 = Color3.fromRGB(255,255,255)
input.Font = Enum.Font.SourceSans
input.TextSize = 16

local applyBtn = Instance.new("TextButton", frame)
applyBtn.Size = UDim2.new(1, -20, 0, 30)
applyBtn.Position = UDim2.new(0, 10, 1, -30)
applyBtn.Text = "Apply"
applyBtn.BackgroundColor3 = Color3.fromRGB(0, 100, 170)
applyBtn.TextColor3 = Color3.fromRGB(255,255,255)
applyBtn.Font = Enum.Font.SourceSansBold
applyBtn.TextSize = 16

applyBtn.MouseButton1Click:Connect(function()
	local val = tonumber(input.Text)
	if val then
		setSpeed(val)
	end
end)