local function K(n,B)for n,D in ipairs(n:GetChildren())do if D:IsA("\066\097\115\101\080\097\114\116")or D:IsA("\077\101\115\104\080\097\114\116")then D.Anchored=B end K(D,B)end end local function n(n,B)for n,D in ipairs(n:GetChildren())do if D:IsA("\066\097\115\101\080\097\114\116")or D:IsA("\077\101\115\104\080\097\114\116")then D.CanCollide=B end K(D,B)end end local function B(K,n)for K,D in ipairs(K:GetChildren())do if D:IsA("\066\097\115\101\080\097\114\116")or D:IsA("\077\101\115\104\080\097\114\116")then D.Transparency=n end B(D,n)end end local function D(K)for K,n in ipairs(K:GetChildren())do D(n)if not n:IsA("\072\117\109\097\110\111\105\100")and(not n:IsA("\077\111\116\111\114\054\068")and(n.Name~="\072\101\097\100"and n.Name~="\085\112\112\101\114\084\111\114\115\111"))then n:Destroy()end end end local function f(K,n)for n,B in ipairs(n:GetChildren())do B.Parent=K f(B,B)end end local function k(K,n)for K,B in pairs(K:GetChildren())do if B:IsA("\066\097\115\101\080\097\114\116")or B:IsA("\077\101\115\104\080\097\114\116")then PhysicsService:SetPartCollisionGroup(B,n)end end end

local function setModelAnchored(parent, anchored)
	for _, child in ipairs(parent:GetChildren()) do
		if (child:IsA("BasePart")) or (child:IsA("MeshPart")) then
			child.Anchored = anchored
		end
		setModelAnchored(child, anchored)
	end
end -- setModelAnchored()

local function setModelCanCollide(parent, canCollide)
	for _, child in ipairs(parent:GetChildren()) do
		if (child:IsA("BasePart")) or (child:IsA("MeshPart")) then
			child.CanCollide = canCollide
		end
		setModelAnchored(child, canCollide)
	end
end -- setModelCanCollide()

local function setModelTransparency(parent, transparency)
	for _, child in ipairs(parent:GetChildren()) do
		if (child:IsA("BasePart")) or (child:IsA("MeshPart")) then
			child.Transparency = transparency
		end
		setModelTransparency(child, transparency)
	end
end -- setModelTransparency()

local function removeLimbsAndThings(character)
	for _, child in ipairs(character:GetChildren()) do
		removeLimbsAndThings(child)
		if (not child:IsA("Humanoid")) and (not child:IsA("Motor6D")) 
			and (child.Name ~= "Head") and (child.Name ~= "UpperTorso") then
				child:Destroy()
		end
	end
end -- removeLimbsAndThings()

local function insertModelIntoCharacter(character, model)
	for _, child in ipairs(model:GetChildren()) do
		child.Parent = character
		insertModelIntoCharacter(child, child)
	end
end -- insertModelIntoCharacter()

local function setCollisionGroup(parent, group)
	for _,part in pairs(parent:GetChildren()) do
		if (part:IsA("BasePart") or (part:IsA("MeshPart"))) then
			PhysicsService:SetPartCollisionGroup(part, group)
		end
	end
end -- SetCollisionGroup()