Displays=2 DisplayColor=Color3.fromRGB(255,175,175)This=script.Parent Elevator=This.Parent.Parent.Parent.Parent.Parent CustomLabel=require(Elevator.CustomLabel)Characters=require(Elevator.LandingCharacters)CustomText=CustomLabel.CUSTOMFLOORLABEL;(Elevator:WaitForChild("\070\108\111\111\114")).Changed:connect(function(A)ChangeFloor(tostring(A))end)function ChangeFloor(A)if CustomText[tonumber(A)]then if string.len(CustomText[tonumber(A)])>1 or tonumber(A)>9 then script.Parent.Display.Position=UDim2.new(-0.07,0,0,0)else script.Parent.Display.Position=UDim2.new(-0.15,0,0,0)end A=CustomText[tonumber(A)]end SetDisplay(2,string.len(A)==2 and A:sub(1,1)or"\078\073\076")SetDisplay(3,string.len(A)==2 and A:sub(2,2)or A)end function SetDisplay(A,N,E)if This.Display:FindFirstChild("\077\097\116\114\105\120"..A)and Characters[N]~=nil then for N,E in pairs(Characters[N])do for I=1,7,1 do This.Display["\077\097\116\114\105\120"..A]["\082\111\119"..N]["\068"..I].ImageTransparency=E:sub(I,I)=="\049"and 0 or 1 end end end end for A=1,Displays,1 do for N=1,15,1 do for E=1,7,1 do This.Display["\077\097\116\114\105\120"..A]["\082\111\119"..N]["\068"..E].ImageColor3=DisplayColor end end end


Displays = 2 -- Sets how many displays this scripts will use...
DisplayColor = Color3.fromRGB(255, 175, 175)

This = script.Parent
Elevator = This.Parent.Parent.Parent.Parent.Parent
CustomLabel = require(Elevator.CustomLabel)
Characters = require(Elevator.LandingCharacters)

CustomText = CustomLabel["CUSTOMFLOORLABEL"]

Elevator:WaitForChild("Floor").Changed:connect(function(floor)
	--custom indicator code--
	ChangeFloor(tostring(floor))
end)

function ChangeFloor(SF)
	if CustomText[tonumber(SF)] then
		if string.len(CustomText[tonumber(SF)]) > 1 or tonumber(SF) > 9  then
			script.Parent.Display.Position = UDim2.new(-0.07, 0,0, 0)
		else
			script.Parent.Display.Position = UDim2.new(-0.15, 0,0, 0)
		end
		SF = CustomText[tonumber(SF)]
	end
	SetDisplay(2,(string.len(SF) == 2 and SF:sub(1,1) or "NIL"))        
	SetDisplay(3,(string.len(SF) == 2 and SF:sub(2,2) or SF))
end

function SetDisplay(ID,CHAR,TOP)
	if This.Display:FindFirstChild("Matrix"..ID) and Characters[CHAR] ~= nil then
		for i,l in pairs(Characters[CHAR]) do 
			for r=1,7 do    
				This.Display["Matrix"..ID]["Row"..i]["D"..r].ImageTransparency = (l:sub(r,r) == "1" and 0 or 1)
			end
		end
	end
end

for M = 1, Displays do
	for R = 1, 15 do
		for D = 1, 7 do
			This.Display["Matrix"..M]["Row"..R]["D"..D].ImageColor3 = DisplayColor
		end
	end
end
