for i,v in pairs(workspace:GetDescendants()) do
	if v:IsA("BasePart") and string.find(v.Parent.Parent.Name, "Segment") and v.CanCollide then
		v.Color = Color3.fromRGB(0,255,0)
	elseif v:IsA("BasePart") and string.find(v.Parent.Parent.Name, "Segment") and not v.CanCollide  then
		v.Color = Color3.fromRGB(255,0,0)
		v.CanCollide = true
		v.CanTouch = false
	end
end