Toggleable walkspeed ROBLOX

-- Gui to Lua

-- Version: 3

-- Instances:

local SpeedGUI = Instance.new("ScreenGui")
local Frame = Instance.new("Frame")
local Toggle = Instance.new("TextLabel")
local ON = Instance.new("TextButton")
local OFF = Instance.new("TextButton")
local Change = Instance.new("TextButton")
local desiredspeedText = Instance.new("TextLabel")
local SpeedDesiredTextBox = Instance.new("TextBox")
local Madeby = Instance.new("TextLabel")
local KeyToPressStringValue = Instance.new("StringValue")
local speedDesiredIntValue = Instance.new("IntValue")

--Properties:

speedDesiredIntValue.Name = "SpeedDesired"
speedDesiredIntValue.Value = 30
speedDesiredIntValue.Parent = Frame

KeyToPressStringValue.Name = "KeyToPress"
KeyToPressStringValue.Value = "E"
KeyToPressStringValue.Parent = Frame

SpeedGUI.Name = "SpeedGUI"
SpeedGUI.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
SpeedGUI.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
SpeedGUI.ResetOnSpawn = false

Frame.Parent = SpeedGUI
Frame.BackgroundColor3 = Color3.new(0.113725, 0.113725, 0.113725)
Frame.BackgroundTransparency = 0.5
Frame.Position = UDim2.new(0, 0, 0.143098891, 0)
Frame.Size = UDim2.new(0, 100, 0, 338)
Frame.Draggable = true
Frame.Active = true

Toggle.Name = "Toggle"
Toggle.Parent = Frame
Toggle.BackgroundColor3 = Color3.new(1, 1, 1)
Toggle.BackgroundTransparency = 1
Toggle.Position = UDim2.new(0, 0, 0.147928983, 0)
Toggle.Size = UDim2.new(0, 100, 0, 50)
Toggle.Font = Enum.Font.SourceSans
Toggle.Text = "Toggle"
Toggle.TextColor3 = Color3.new(1, 1, 1)
Toggle.TextScaled = true
Toggle.TextSize = 14
Toggle.TextWrapped = true

ON.Name = "ON"
ON.Parent = Frame
ON.BackgroundColor3 = Color3.new(0.45098, 1, 0)
ON.BackgroundTransparency = 0.5
ON.Position = UDim2.new(0, 0, 0.320364118, 0)
ON.Size = UDim2.new(0, 50, 0, 50)
ON.Font = Enum.Font.SourceSans
ON.Text = "ON"
ON.TextColor3 = Color3.new(1, 1, 1)
ON.TextScaled = true
ON.TextSize = 14
ON.TextWrapped = true

OFF.Name = "OFF"
OFF.Parent = Frame
OFF.BackgroundColor3 = Color3.new(1, 0, 0)
OFF.BackgroundTransparency = 0.5
OFF.Position = UDim2.new(0.5, 0, 0.320364118, 0)
OFF.Size = UDim2.new(0, 50, 0, 50)
OFF.Font = Enum.Font.SourceSans
OFF.Text = "OFF"
OFF.TextColor3 = Color3.new(1, 1, 1)
OFF.TextScaled = true
OFF.TextSize = 14
OFF.TextWrapped = true

Change.Name = "Change"
Change.Parent = Frame
Change.BackgroundColor3 = Color3.new(0.192157, 0.192157, 0.192157)
Change.BackgroundTransparency = 0.5
Change.Position = UDim2.new(0, 0, 0.502157867, 0)
Change.Size = UDim2.new(0, 100, 0, 81)
Change.Font = Enum.Font.SourceSans
Change.Text = "Click here to change the key to toggle, default is 'E'"
Change.TextColor3 = Color3.new(1, 1, 1)
Change.TextScaled = true
Change.TextSize = 14
Change.TextWrapped = true

desiredspeedText.Name = "desiredspeedText"
desiredspeedText.Parent = Frame
desiredspeedText.BackgroundColor3 = Color3.new(0.184314, 0.184314, 0.184314)
desiredspeedText.BackgroundTransparency = 0.5
desiredspeedText.Position = UDim2.new(0, 0, 0.773519158, 0)
desiredspeedText.Size = UDim2.new(0, 100, 0, 27)
desiredspeedText.Font = Enum.Font.SourceSans
desiredspeedText.Text = "Desired Speed"
desiredspeedText.TextColor3 = Color3.new(1, 1, 1)
desiredspeedText.TextScaled = true
desiredspeedText.TextSize = 14
desiredspeedText.TextWrapped = true

SpeedDesiredTextBox.Name = "SpeedDesiredTextBox"
SpeedDesiredTextBox.Parent = Frame
SpeedDesiredTextBox.BackgroundColor3 = Color3.new(0.737255, 0.737255, 0.737255)
SpeedDesiredTextBox.BackgroundTransparency = 0.5
SpeedDesiredTextBox.Position = UDim2.new(0, 0, 0.867595792, 0)
SpeedDesiredTextBox.Size = UDim2.new(0, 100, 0, 38)
SpeedDesiredTextBox.Font = Enum.Font.SourceSans
SpeedDesiredTextBox.Text = "Enter desired speed here, default is 30"
SpeedDesiredTextBox.TextColor3 = Color3.new(0, 0, 0)
SpeedDesiredTextBox.TextScaled = true
SpeedDesiredTextBox.TextSize = 14
SpeedDesiredTextBox.TextWrapped = true

Madeby.Name = "Madeby"
Madeby.Parent = Frame
Madeby.BackgroundTransparency = 1
Madeby.Size = UDim2.new(0, 100, 0, 50)
Madeby.Font = Enum.Font.SourceSans
Madeby.Text = "Made by NewMat on V3rmillion"
Madeby.TextColor3 = Color3.new(1, 1, 1)
Madeby.TextScaled = true
Madeby.TextSize = 14
Madeby.TextWrapped = true

-- Scripts:

local function QLISMC_fake_script() -- SpeedGUI.Controller
local script = Instance.new('LocalScript', SpeedGUI)

local player = game.Players.LocalPlayer
local userInputService = game:GetService("UserInputService")

local frame = script.Parent.Frame

local onButton = frame:WaitForChild("ON")
local offButton = frame:WaitForChild("OFF")
local changeButton = frame:WaitForChild("Change")
local speedDesiredTextBox = frame:WaitForChild("SpeedDesiredTextBox")
local speedDesiredIntValue = frame:WaitForChild("SpeedDesired")

local keyToPressStringValue = frame:WaitForChild("KeyToPress")
keyToPressStringValue.Value = "E"
local keyToPressKeyCode = Enum.KeyCode.E

local choosingKey = false
local speeding = false

_G.speedEnabled = true



changeButton.Text = "Click here to change the key to toggle" .. ", currently it is " .. "'" .. keyToPressStringValue.Value .. "'"


offButton.MouseButton1Click:connect(function()
_G.speedEnabled = false
end)

onButton.MouseButton1Click:connect(function()
_G.speedEnabled = true
end)

changeButton.MouseButton1Click:connect(function()
changeButton.Text = "Click any button on your keyboard to set the key"

choosingKey = true

userInputService.InputBegan:connect(function(input)

if input.UserInputType == Enum.UserInputType.Keyboard and choosingKey == true then

keyToPressKeyCode = input.KeyCode
keyToPressStringValue.Value = string.char(keyToPressKeyCode.Value):upper()
choosingKey = false

changeButton.Text = "'" .. keyToPressStringValue.Value .. "'" .. " button chosen as key"
wait(2)
changeButton.Text = "Click here to change the key to toggle" .. ", currently it is " .. "'" .. keyToPressStringValue.Value .. "'"

end

end)

end)


speedDesiredTextBox:GetPropertyChangedSignal("Text"):connect(function()
if tonumber(speedDesiredTextBox.Text) ~= nil then

speedDesiredIntValue.Value = tonumber(speedDesiredTextBox.Text)

end


end)

userInputService.InputBegan:connect(function(input)
if _G.speedEnabled == true then

if input.KeyCode == keyToPressKeyCode then

if speeding == false then

speeding = true
player.Character:findFirstChild("Humanoid").WalkSpeed = speedDesiredIntValue.Value

else
speeding = false
player.Character:findFirstChild("Humanoid").WalkSpeed = 16

end

end


end


end)







end
coroutine.wrap(QLISMC_fake_script)()