Credits to the person who made it

--[[
	WARNING: Heads up! This script has not been verified by ScriptBlox. Use at your own risk!
]]
-- Create GUI elements
local ScreenGui = Instance.new("ScreenGui")
 Frame = .()
 TextLabel = .()
 TextBox = .()


ScreenGui.Parent = .Players.LocalPlayer:()


Frame.Parent = ScreenGui
Frame.BackgroundColor3 = .(, , ) 
Frame.Size = .(, , , )
Frame.Position = .(, -, , -) 


TextLabel.Parent = Frame
TextLabel.Text = 
TextLabel.TextColor3 = .(, , ) 
TextLabel.Size = .(, , , )
TextLabel.Position = .(, , , )
TextLabel.TextScaled = 


TextBox.Parent = Frame
TextBox.TextColor3 = .(, , ) 
TextBox.Size = .(, , , )
TextBox.Position = .(, , , )
TextBox.PlaceholderText = 
TextBox.TextScaled = 


 UserInputService = :()
 dragging, dragInput, dragStart, startPos

  (input)
     delta = input.Position - dragStart
    Frame.Position = .(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)


Frame.InputBegan:((input)
     input.UserInputType == .UserInputType.MouseButton1  input.UserInputType == .UserInputType.Touch 
        dragging = 
        dragStart = input.Position
        startPos = Frame.Position
        
        input.Changed:(()
             input.UserInputState == .UserInputState.End 
                dragging = 
            
        )
    
)

Frame.InputChanged:((input)
     input.UserInputType == .UserInputType.MouseMovement  input.UserInputType == .UserInputType.Touch 
        dragInput = input
    
)

UserInputService.InputChanged:((input)
     dragging  input == dragInput 
        (input)
    
)


TextBox.FocusLost:((enterPressed)
     enterPressed 
         speed = (TextBox.Text)
         speed 
            speed = .(speed, , )
             player = .Players.LocalPlayer
             character = player.Character  player.CharacterAdded:()
             humanoid = character:()
            humanoid.WalkSpeed = speed
        
    
)