local function L(w,F,K)for K,z in pairs(K:GetChildren())do if z:IsA("\066\097\115\101\080\097\114\116")and(z~=F and(z.Name~="\072\101\097\100"and z.Name~="\085\112\112\101\114\084\111\114\115\111"))then local L=Instance.new("\087\101\108\100\067\111\110\115\116\114\097\105\110\116")L.Parent=w L.Name="\087\101\108\100"L.Part0,L.Part1=z,F end L(w,F,z)end end

local function weld(folder, main, parent)		
	for _,child in pairs(parent:GetChildren()) do
		if ((child:IsA("BasePart")) and (child ~= main) and (child.Name ~= "Head") 
			and (child.Name ~= "UpperTorso")) then
			
			local weld = Instance.new("WeldConstraint")
			weld.Parent = folder
			weld.Name = "Weld"
			weld.Part0, weld.Part1 = child, main
		end
		weld(folder, main, child)
	end
end -- weld()