local b=script.Parent.Interactive local n={}local Q="\117\112"local X=b.Sound function CheckChildren(b)for b,Q in pairs(b:GetChildren())do if Q:IsA("\066\097\115\101\080\097\114\116")and Q.Name=="\076\105\103\104\116"then table.insert(n,Q)end CheckChildren(Q)end end CheckChildren(script.Parent.Parent)b.ClickDetector.MouseClick:Connect(function(b,P)if script.Parent.Parent.LightsOn.Value==false then script.Parent.Parent.LightsOn.Value=true for b=1,#n,1 do n[b].PointLight.Enabled=true n[b].Material=Enum.Material.Neon end else script.Parent.Parent.LightsOn.Value=false for b=1,#n,1 do n[b].PointLight.Enabled=false n[b].Material=Enum.Material.SmoothPlastic end end if Q=="\117\112"then Q="\100\111\119\110"script.Parent.Interactive.CFrame=script.Parent.Interactive.CFrame*CFrame.Angles(math.rad(-10),0,0)else Q="\117\112"script.Parent.Interactive.CFrame=script.Parent.Interactive.CFrame*CFrame.Angles(math.rad(10),0,0)end X:Play()end)


local interactive = script.Parent.Interactive
local lights = {}
local switch = "up"
local sound = interactive.Sound

function CheckChildren(obj)
	for i, v in pairs(obj:GetChildren()) do
		if v:IsA("BasePart") and v.Name == "Light" then
			table.insert(lights,v)
		end
		CheckChildren(v)
	end
end

CheckChildren(script.Parent.Parent)

interactive.ClickDetector.MouseClick:Connect(function(player, part)
	if script.Parent.Parent.LightsOn.Value == false then
		script.Parent.Parent.LightsOn.Value = true
		for i = 1, #lights do
			lights[i].PointLight.Enabled = true
			lights[i].Material = Enum.Material.Neon
		end
	else
		script.Parent.Parent.LightsOn.Value = false
		for i = 1, #lights do
			lights[i].PointLight.Enabled = false
			lights[i].Material = Enum.Material.SmoothPlastic
		end
	end
	if switch == "up" then
		switch = "down"
		script.Parent.Interactive.CFrame = script.Parent.Interactive.CFrame * CFrame.Angles(math.rad(-10),0,0)
	else
		switch = "up"
		script.Parent.Interactive.CFrame = script.Parent.Interactive.CFrame * CFrame.Angles(math.rad(10),0,0)
	end
	sound:Play()
end)
