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



while true do
	wait()
	if Lift:WaitForChild("Floor").Value == tonumber(This.Parent.Name) and Lift:WaitForChild("Velocity").Value == 0 then
	    if Lift:WaitForChild("Direction").Value == 1 then
			This.Display.ARW1.UP.BrickColor = BrickColor.new(ActiveCol)
			This.Display.ARW1.UP.Material = "Neon"
			This.Display.ARW1.MID.BrickColor = BrickColor.new(ActiveCol)
			This.Display.ARW1.MID.Material = "Neon"
			This.Display.ARW1.DOWN.BrickColor = BrickColor.new(InactiveCol)
			This.Display.ARW1.DOWN.Material = "SmoothPlastic"
			wait(0.3)
			This.Display.ARW1.UP.BrickColor = BrickColor.new(InactiveCol)
			This.Display.ARW1.UP.Material = "SmoothPlastic"
			This.Display.ARW1.MID.BrickColor = BrickColor.new(InactiveCol)
			This.Display.ARW1.MID.Material = "SmoothPlastic"
			This.Display.ARW1.DOWN.BrickColor = BrickColor.new(InactiveCol)
			This.Display.ARW1.DOWN.Material = "SmoothPlastic"
			wait(0.3)
	    elseif Lift:WaitForChild("Direction").Value == -1 then
			This.Display.ARW1.UP.BrickColor = BrickColor.new(InactiveCol)
			This.Display.ARW1.UP.Material = "SmoothPlastic"
			This.Display.ARW1.MID.BrickColor = BrickColor.new(ActiveCol)
			This.Display.ARW1.MID.Material = "Neon"
			This.Display.ARW1.DOWN.BrickColor = BrickColor.new(ActiveCol)
			This.Display.ARW1.DOWN.Material = "Neon"
			wait(0.3)
			This.Display.ARW1.UP.BrickColor = BrickColor.new(InactiveCol)
			This.Display.ARW1.UP.Material = "SmoothPlastic"
			This.Display.ARW1.MID.BrickColor = BrickColor.new(InactiveCol)
			This.Display.ARW1.MID.Material = "SmoothPlastic"
			This.Display.ARW1.DOWN.BrickColor = BrickColor.new(InactiveCol)
			This.Display.ARW1.DOWN.Material = "SmoothPlastic"
			wait(0.3)
		else
			This.Display.ARW1.UP.BrickColor = BrickColor.new(InactiveCol)
			This.Display.ARW1.UP.Material = "SmoothPlastic"
			This.Display.ARW1.MID.BrickColor = BrickColor.new(InactiveCol)
			This.Display.ARW1.MID.Material = "SmoothPlastic"
			This.Display.ARW1.DOWN.BrickColor = BrickColor.new(InactiveCol)
			This.Display.ARW1.DOWN.Material = "SmoothPlastic"
	    end
	else
	    if Lift:WaitForChild("Direction").Value == 1 then
			This.Display.ARW1.UP.BrickColor = BrickColor.new(ActiveCol)
			This.Display.ARW1.UP.Material = "Neon"
			This.Display.ARW1.MID.BrickColor = BrickColor.new(ActiveCol)
			This.Display.ARW1.MID.Material = "Neon"
			This.Display.ARW1.DOWN.BrickColor = BrickColor.new(InactiveCol)
			This.Display.ARW1.DOWN.Material = "SmoothPlastic"
	    elseif Lift:WaitForChild("Direction").Value == -1 then
			This.Display.ARW1.UP.BrickColor = BrickColor.new(InactiveCol)
			This.Display.ARW1.UP.Material = "SmoothPlastic"
			This.Display.ARW1.MID.BrickColor = BrickColor.new(ActiveCol)
			This.Display.ARW1.MID.Material = "Neon"
			This.Display.ARW1.DOWN.BrickColor = BrickColor.new(ActiveCol)
			This.Display.ARW1.DOWN.Material = "Neon"
		else
			This.Display.ARW1.UP.BrickColor = BrickColor.new(InactiveCol)
			This.Display.ARW1.UP.Material = "SmoothPlastic"
			This.Display.ARW1.MID.BrickColor = BrickColor.new(InactiveCol)
			This.Display.ARW1.MID.Material = "SmoothPlastic"
			This.Display.ARW1.DOWN.BrickColor = BrickColor.new(InactiveCol)
			This.Display.ARW1.DOWN.Material = "SmoothPlastic"
	    end
	end
	wait()
end
