-- -- -- -- -- -- --
--DIRECTION SCROLL--
-- -- -- -- -- -- --

This.Floor.Position = UDim2.new(0.25,0,0,0)
This.Direction.Text = ">"
wait(0.25)
This.Direction.Text = "->"
wait(0.25)
This.Direction.Text = "-->"
wait(0.25)
This.Direction.Text = "<"
wait(0.25)
This.Direction.Text = "<-"
wait(0.25)
This.Direction.Text = "<--"
wait(0.25)
This.Direction.Text = "SYSTEM READY"
wait(5)
This.Floor.Position = UDim2.new(0.125,0,0,0)
This.Direction.Text = ""
while wait() do
	if Lift:WaitForChild("Direction").Value ~= 0 then 
		if Lift:WaitForChild("Velocity").Value == 0 then
			if Lift:WaitForChild("Direction").Value == 1 then
				This.Floor.Position = UDim2.new(0.25,0,0,0)
				This.Direction.Text = "-->"
			else
				This.Floor.Position = UDim2.new(0.25,0,0,0)
				This.Direction.Text = "<--"
			end
		elseif Lift:WaitForChild("Velocity").Value ~= 0 then
			if Lift:WaitForChild("Direction").Value == 1 then
				This.Floor.Position = UDim2.new(0.25,0,0,0)
				This.Direction.Text = ">"
				wait(0.25)
				This.Direction.Text = "->"
				wait(0.25)
				This.Direction.Text = "-->"
				wait(0.25)
			else
				This.Floor.Position = UDim2.new(0.25,0,0,0)
				This.Direction.Text = "<"
				wait(0.25)
				This.Direction.Text = "<-"
				wait(0.25)
				This.Direction.Text = "<--"
				wait(0.25)
			end
		end
	else
		This.Floor.Position = UDim2.new(0.125,0,0,0)
		This.Direction.Text = ""
	end
end
