for p,M in pairs(model:GetChildren())do if string.sub(M.Name,1,1)=="\099"then table.insert(c,1,M)end end for p,M in pairs(model:GetChildren())do if string.sub(M.Name,1,1)=="\100"then table.insert(d,1,M)end end function lightOn(p)for p,M in pairs(p)do if M:FindFirstChild("\083\117\114\102\097\099\101\076\105\103\104\116")then M.SurfaceLight.Enabled=true end if M:FindFirstChild("\083\112\111\116\076\105\103\104\116")then M.SpotLight.Enabled=true M.Material="\078\101\111\110"end end end function lightOff(p)for p,M in pairs(p)do if M:FindFirstChild("\083\117\114\102\097\099\101\076\105\103\104\116")then M.SurfaceLight.Enabled=false end if M:FindFirstChild("\083\112\111\116\076\105\103\104\116")then M.SpotLight.Enabled=false M.Material="\083\109\111\111\116\104\080\108\097\115\116\105\099"end end end while true do lightOn(c)wait(.05)lightOff(c)wait(.05)lightOn(d)wait(.05)lightOff(d)wait(.05)end

for i,part in pairs(model:GetChildren()) do
	if string.sub(part.Name, 1,1) == "c" then
		table.insert(c, 1, part)
	end
end
for i,part in pairs(model:GetChildren()) do
	if string.sub(part.Name, 1,1) == "d" then
		table.insert(d, 1, part)
	end
end

function lightOn(T)
	for i, part in pairs (T) do
		if part:FindFirstChild("SurfaceLight") then
			part.SurfaceLight.Enabled = true
		end
	    if part:FindFirstChild("SpotLight") then
			part.SpotLight.Enabled = true
			part.Material = "Neon"
		end
	end
end

function lightOff(T)
	for i, part in pairs (T) do
		if part:FindFirstChild("SurfaceLight") then
			part.SurfaceLight.Enabled = false
		end
	    if part:FindFirstChild("SpotLight") then
			part.SpotLight.Enabled = false
			part.Material = "SmoothPlastic"
		end
	end
end
while true do
	
	lightOn(c)
	wait(0.05)

	lightOff(c)
	wait(0.05)
	
	lightOn(d)
	wait(0.05)

	lightOff(d)
	wait(0.05)
	
end

