while wait(.2)do for i,k in pairs(Main:GetChildren())do if k:isA("\080\097\114\116")then Found=false local i=Region3.new(k.Position-k.Size/2,k.Position+k.Size/2)local b=Player.Character or Player.CharacterAdded:Wait()local O=workspace:FindPartsInRegion3WithWhiteList(i,b:GetDescendants())for i,k in pairs(O)do if k:FindFirstAncestor(Player.Name)then Found=true break else Found=false end end if Found==true then for i,k in pairs((Main:WaitForChild(k.Name.."\077\117\115\105\099")):GetChildren())do if k:isA("\083\111\117\110\100")and k.IsPlaying==false then k:Play()break end end else for i,k in pairs((Main:WaitForChild(k.Name.."\077\117\115\105\099")):GetChildren())do if k:isA("\083\111\117\110\100")then k:Stop()end end end end end end


while wait(0.2) do
	for _,v in pairs(Main:GetChildren()) do
		if v:isA("Part") then
			Found = false
			local hitbox = Region3.new(v.Position - (v.Size/2), v.Position + (v.Size/2))
			local Char = Player.Character or Player.CharacterAdded:Wait()
			local list = workspace:FindPartsInRegion3WithWhiteList(hitbox, Char:GetDescendants())
			
			for _, Filter in pairs(list) do
				if Filter:FindFirstAncestor(Player.Name) then
					Found = true
					break
				else
					Found = false
				end
			end
			if Found == true then
				for _,v in pairs(Main:WaitForChild(v.Name.."Music"):GetChildren()) do
					if v:isA("Sound") and v.IsPlaying == false then
						v:Play()
						break
					end
				end
			else
				for _,v in pairs(Main:WaitForChild(v.Name.."Music"):GetChildren()) do
					if v:isA("Sound") then
						v:Stop()
					end
				end
			end
		end
	end
end
