Run it
Copy the script and paste it into your executor.
Players = :()
UserInputService = :()
RunService = :()
player = Players.LocalPlayer
ScreenGui = .()
ScreenGui.ResetOnSpawn =
ScreenGui.Parent = player:()
Frame = .()
Frame.Size = .(, , , )
Frame.Position = .(, , , )
Frame.BackgroundColor3 = .(, , )
Frame.BorderSizePixel =
Frame.Parent = ScreenGui
Slider = .()
Slider.Size = .(, , , )
Slider.Position = .(, , , )
Slider.BackgroundColor3 = .(, , )
Slider.BorderSizePixel =
Slider.Parent = Frame
Knob = .()
Knob.Size = .(, , , )
Knob.Position = .(, , , )
Knob.BackgroundColor3 = .(, , )
Knob.BorderSizePixel =
Knob.Parent = Slider
Label = .()
Label.Size = .(, , , )
Label.Position = .(, , , )
Label.BackgroundTransparency =
Label.TextColor3 = .(, , )
Label.TextScaled =
Label.Text =
Label.Parent = Frame
TextBox = .()
TextBox.Size = .(, , , )
TextBox.Position = .(, , , )
TextBox.BackgroundColor3 = .(, , )
TextBox.TextScaled =
TextBox.Text =
TextBox.Parent = Frame
minSpeed, maxSpeed, defaultSpeed = , ,
dragging =
currentSpeed = defaultSpeed
manualOverride =
(xPos)
manualOverride
relativePos = .((xPos - Slider.AbsolutePosition.X) / Slider.AbsoluteSize.X, , )
currentSpeed = minSpeed + (maxSpeed - minSpeed) * relativePos
currentSpeed = .(currentSpeed * ) /
Knob.Position = .(relativePos, , , )
Label.Text = .. (currentSpeed)
TextBox.Text = (currentSpeed)
Knob.InputBegan:((input)
input.UserInputType == .UserInputType.MouseButton1
dragging =
manualOverride =
)
UserInputService.InputChanged:((input)
dragging input.UserInputType == .UserInputType.MouseMovement
(input.Position.X)
)
UserInputService.InputEnded:((input)
input.UserInputType == .UserInputType.MouseButton1
dragging =
)
TextBox.FocusLost:(()
enteredSpeed = (TextBox.Text)
enteredSpeed
currentSpeed = enteredSpeed
Label.Text = .. (currentSpeed)
manualOverride =
TextBox.Text = (currentSpeed)
)
()
character = player.Character
character
humanoid = character:() character:()
humanoid
_, track (humanoid:())
track:(currentSpeed)
RunService.Heartbeat:(applyAnimationSpeed)
player.CharacterAdded:(()
()
()
)
(Slider.AbsolutePosition.X + (Slider.AbsoluteSize.X * ))

Universal