local G=game:GetService("\082\117\110\083\101\114\118\105\099\101")local a={}wait(5)function SetUp()for G,t in pairs(game.Workspace.VisualComponents.Panels:GetChildren())do local d={}for G=1,8,1 do table.insert(d,t.VisualScreen.Main["\073\109\097\103\101"..G])end table.insert(a,d)end end SetUp()local t=#a local d=3000 local T=d/8 for a,t in pairs(workspace.VisualComponents.Panels:GetChildren())do G.RenderStepped:connect(function()t.VisualScreen.Main.Image1.Visible=workspace.VisualComponents.Values.On.Value t.VisualScreen.Main.Image2.Visible=workspace.VisualComponents.Values.On.Value t.VisualScreen.Main.Image3.Visible=workspace.VisualComponents.Values.On.Value t.VisualScreen.Main.Image4.Visible=workspace.VisualComponents.Values.On.Value t.VisualScreen.Main.Image5.Visible=workspace.VisualComponents.Values.On.Value t.VisualScreen.Main.Image6.Visible=workspace.VisualComponents.Values.On.Value t.VisualScreen.Main.Image7.Visible=workspace.VisualComponents.Values.On.Value t.VisualScreen.Main.Image8.Visible=workspace.VisualComponents.Values.On.Value end)end G.RenderStepped:connect(function(G)local p=script.Value.Value local o={}for G=1,8,1 do o[G]=((p+G)*T)%d end for G=1,t,1 do local t=a[G]for G,a in pairs(o)do t[G].Size=UDim2.new(0,a*10000,0,a*10000)end end end)


local RS = game:GetService("RunService")
local panels = {}
wait(5)

function SetUp()

	for _,v in pairs(game.Workspace.VisualComponents.Panels:GetChildren()) do
		local temp = {}
		for image = 1,8 do		
			table.insert(temp,v.VisualScreen.Main["Image"..image])
		end
		table.insert(panels,temp)
	end
end
SetUp()

local len = #panels 
local max = 3000
local max8 = max/8;
for i,v in pairs(workspace.VisualComponents.Panels:GetChildren()) do
	RS.RenderStepped:connect(function()
		v.VisualScreen.Main.Image1.Visible = workspace.VisualComponents.Values.On.Value
		v.VisualScreen.Main.Image2.Visible = workspace.VisualComponents.Values.On.Value
		v.VisualScreen.Main.Image3.Visible = workspace.VisualComponents.Values.On.Value
		v.VisualScreen.Main.Image4.Visible = workspace.VisualComponents.Values.On.Value
		v.VisualScreen.Main.Image5.Visible = workspace.VisualComponents.Values.On.Value
		v.VisualScreen.Main.Image6.Visible = workspace.VisualComponents.Values.On.Value
		v.VisualScreen.Main.Image7.Visible = workspace.VisualComponents.Values.On.Value
		v.VisualScreen.Main.Image8.Visible = workspace.VisualComponents.Values.On.Value
	end)
end
RS.RenderStepped:connect(function(delta)
	local t = script.Value.Value
	local tempArr = {}	
	for image = 1,8 do 
		tempArr[image] = (t + image) * max8 % max
	end	
	for index = 1,len do 
		local temp2 = panels[index]
		for key, value in pairs(tempArr) do				
			temp2[key].Size = UDim2.new(0,value*10000,0,value*10000)
		end
	end
end)
