local function setNoCollide(p)
	p.CanCollide=false
	p.CanTouch=false
	p.CanQuery=false
end

local function isMeshPart(p)
	return p:IsA("MeshPart") or p:FindFirstChildOfClass("SpecialMesh")
end

local function process(v)
	if v:IsA("BasePart") and not isMeshPart(v) then
		if v.Transparency>=1 then
			if v.Parent and (v.Parent:IsA("Model") or v.Parent:IsA("Folder")) then
				setNoCollide(v)
			else
				v:Destroy()
			end
		end
	end
end

for _,v in ipairs(workspace:GetDescendants()) do
	process(v)
end

workspace.DescendantAdded:Connect(process)