local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local player = Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local hrp = character:WaitForChild("HumanoidRootPart")
-- GUI Setup
local gui = Instance.new("ScreenGui", player:WaitForChild("PlayerGui"))
gui.Name = "SpeedChangerGUI"
local frame = Instance.new("Frame", gui)
frame.Size = UDim2.new(0, 250, 0, 120)
frame.Position = UDim2.new(0.5, -125, 0.6, 0)
frame.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
frame.BorderSizePixel = 0
frame.Active = true
frame.Draggable = false -- We'll implement custom dragging
local title = Instance.new("TextLabel", frame)
title.Size = UDim2.new(1, 0, 0, 30)
title.Text = "Speed Changer"
title.TextColor3 = Color3.new(1,1,1)
title.BackgroundTransparency = 1
title.Font = Enum.Font.SourceSansBold
title.TextScaled = true
local textbox = Instance.new("TextBox", frame)
textbox.Position = UDim2.new(0.1, 0, 0.4, 0)
textbox.Size = UDim2.new(0.8, 0, 0.25, 0)
textbox.PlaceholderText = "Enter speed"
textbox.Text = ""
textbox.BackgroundColor3 = Color3.fromRGB(50, 50, 50)
textbox.TextColor3 = Color3.new(1,1,1)
textbox.Font = Enum.Font.SourceSans
textbox.TextScaled = true
local applyButton = Instance.new("TextButton", frame)
applyButton.Position = UDim2.new(0.1, 0, 0.7, 0)
applyButton.Size = UDim2.new(0.8, 0, 0.2, 0)
applyButton.Text = "Apply Speed"
applyButton.BackgroundColor3 = Color3.fromRGB(70, 130, 180)
applyButton.TextColor3 = Color3.new(1,1,1)
applyButton.Font = Enum.Font.SourceSansBold
applyButton.TextScaled = true
local currentSpeed = 0
applyButton.MouseButton1Click:Connect(function()
local newSpeed = tonumber(textbox.Text)
if newSpeed then
currentSpeed = newSpeed
end
end)
RunService.RenderStepped:Connect(function()
if character and hrp then
hrp.Velocity = hrp.CFrame.LookVector * currentSpeed
end
end)
-- Dragging functionality
local dragging
local dragInput
local dragStart
local startPos
local function update(input)
local delta = input.Position - dragStart
frame.Position = UDim2.new(
startPos.X.Scale,
startPos.X.Offset + delta.X,
startPos.Y.Scale,
startPos.Y.Offset + delta.Y
)
end
frame.InputBegan:Connect(function(input)
if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
dragging = true
dragStart = input.Position
startPos = frame.Position
input.Changed:Connect(function()
if input.UserInputState == Enum.UserInputState.End then
dragging = false
end
end)
end
end)
frame.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 dragging and input == dragInput then
update(input)
end
end)
Comments
makes me lag alot when i change the speed maybe try to make it less laggy
love the script, can you make a herb gather for Cultivation Era?