Running in the 90s script

char = game.Players.LocalPlayer.Character
print("Sonic Forces! Double boost!")
local gui = Instance.new("ScreenGui",game.Players.LocalPlayer.PlayerGui)
local text = Instance.new("TextLabel",gui)
text.Position = UDim2.new(0.003, 0,0.781, 0)
text.Size = UDim2.new(0.203, 0,0.211, 0)
text.BackgroundTransparency = 1
text.TextColor3 = Color3.new(1,1,1)
text.TextScaled = true
text.Text = "Speed: 0"
char.Humanoid.Animator:Destroy()
char.Animate:Destroy()
char.HumanoidRootPart.RootJoint.C1 = CFrame.new(0,0,0)
char.Torso["Right Hip"].C1 = CFrame.new(0,0,0)
for i = 0,1 ,0.03 do
	char.HumanoidRootPart.RootJoint.C0 = char.HumanoidRootPart.RootJoint.C0:lerp(CFrame.new(0, 0.107334137, -0.173822403, 1, 0, 0, 0, 0.940232992, -0.340532184, 0, 0.340532184, 0.940232992):inverse(),i)
	char.Torso["Right Hip"].C0 = char.Torso["Right Hip"].C0:lerp(CFrame.new(0.5, -1.87479305, -0.59992981, 1, 0, 0, 0, 0.916532993, -0.399959058, 0, 0.399958998, 0.916533113),i)
	game:GetService("RunService").RenderStepped:wait()
end
char.Humanoid.WalkSpeed = 0
local boost = Instance.new("Sound",char)
boost.SoundId = "rbxassetid://294997736"
boost.Volume = 4
boost.Looped = true
boost:Play()
coroutine.wrap(function()
	while true do
		wait(0.01)
		if boost.Parent == nil then
			boost.Parent = char
		end
	end
end)()
wait(5)
local boostp = Instance.new("Part",char)
boostp.BrickColor = BrickColor.new("Cyan")
boostp.Transparency = 0.5
local boostm = Instance.new("FileMesh",boostp)
boostm.MeshId = "http://www.roblox.com/asset/?id=16150864"
boostm.Scale = Vector3.new(5,5,5)
local boostw = Instance.new("Weld",boostp)
boostw.Part0 = boostp
boostw.Part1 = char.Torso
boostw.C0 = CFrame.new(0.00974273682, 0.00136947632, -0.455072403, 0.998052895, -0.024946643, 0.0571669154, 0.0573021285, 0.00473886728, -0.998345733, 0.0246344674, 0.999677718, 0.00615915656)
local booste = Instance.new("Sound",char)
booste.SoundId = "rbxassetid://1295449565"
booste.Looped = true
booste.Volume = 2
booste:Play()
local boost2 = Instance.new("Sound",char)
boost2.Volume = 4
boost2.SoundId = "rbxassetid://1295446488"
boost2:Play()
lhandweld = char.Torso["Left Shoulder"]
rhandweld = char.Torso["Right Shoulder"]
llegweld = char.Torso["Left Hip"]
rlegweld = char.Torso["Right Hip"]
lhandweld.C1 = CFrame.new(0,0,0)
rhandweld.C1 = CFrame.new(0,0,0)
llegweld.C1 = CFrame.new(0,0,0)
rlegweld.C1 = CFrame.new(0,0,0)
local trail = Instance.new("Trail",char)
trail.Color = ColorSequence.new(boostp.BrickColor.Color)
trail.Lifetime = 0.5
local attachment0 = Instance.new("Attachment",char.Head)
attachment0.Name = "TrailAttachment0"
local attachment1 = Instance.new("Attachment",char.HumanoidRootPart)
attachment1.Name = "TrailAttachment1"
trail.Attachment0 = attachment0
trail.Attachment1 = attachment1
local newvel = Instance.new("BodyVelocity")
		newvel.Parent = char.Torso
		newvel.maxForce = Vector3.new(100000,3000,100000)
		newvel.velocity =  newvel.Parent.CFrame.lookVector*100
		newvel.Name = "SuperRun"
char.Torso.Touched:connect(function(part)
	local human = part.Parent:FindFirstChildOfClass("Humanoid")
	if human then
		human.Parent:BreakJoints()
	end
end)
coroutine.wrap(function()
	while true do
		wait(0.01)
		for i = 1,40 do
			wait()
			newvel.velocity =  newvel.Parent.CFrame.lookVector* math.random(100,1000)
			text.Text = "Speed: " .. math.random(100,1000)
		end
	end
end)()
while true do
	wait(0.01)
	char.Humanoid.WalkSpeed = math.random(100,200)
	for i = 0,1 ,0.3 do
		lhandweld.C0 = lhandweld.C0:lerp(CFrame.new(-1.5, 0.273401737, 0.445701599, 1, 0, 0, 0, 0.453197539, 0.891410112, 0, -0.891410232, 0.453197569),i)
		llegweld.C0 = llegweld.C0:lerp(CFrame.new(-0.5, -1.53495121, -0.844882965, 1, 0, 0, 0, 0.534950972, -0.844883084, 0, 0.844883084, 0.534951091),i)
		rhandweld.C0 = rhandweld.C0:lerp(CFrame.new(1.5, 0.313892841, 0.464073181, 1, 0, 0, 0, 0.37221545, 0.928146303, 0, -0.928146362, 0.372215509),i)
		rlegweld.C0 = rlegweld.C0:lerp(CFrame.new(0.5, -1.59347343, 0.804859161, 1, 0, 0, 0, 0.593472898, 0.804853976, 0, -0.804854035, 0.593472958),i)
		game:GetService("RunService").RenderStepped:wait()
	end
	for i = 0,1 ,0.3 do
		llegweld.C0 = llegweld.C0:lerp(CFrame.new(-0.5, -1.63476276, 0.772708893, 1, 0, 0, 0, 0.63476181, 0.77270782, 0, -0.77270788, 0.63476187),i)
		rlegweld.C0 = rlegweld.C0:lerp(CFrame.new(0.5, -1.49659729, -0.867980957, 1, 0, 0, 0, 0.496596336, -0.867981553, 0, 0.867981672, 0.496596336),i)
		game:GetService("RunService").RenderStepped:wait()
	end
end