function WeldPair(R,C)local w=Instance.new("\087\101\108\100",R)w.Part0=R w.Part1=C w.C1=C.CFrame:toObjectSpace(R.CFrame)end function WeldAll(R,C)if R:IsA("\066\097\115\101\080\097\114\116")then WeldPair(C,R)end for R,w in pairs(R:GetChildren())do WeldAll(w,C)end end function UnanchorAll(R)if R:IsA("\066\097\115\101\080\097\114\116")then R.Anchored=false end for R,C in pairs(R:GetChildren())do UnanchorAll(C)end end WeldAll(script.Parent.Body,script.Parent.MainSeat)UnanchorAll(script.Parent)script:Destroy()
-- MasterWeld by Zephyred
-- Works for all types of parts, unions etc.
function WeldPair(x, y)
	local weld = Instance.new("Weld", x)
	weld.Part0 = x
	weld.Part1 = y
	weld.C1 = y.CFrame:toObjectSpace(x.CFrame)
end

function WeldAll(model, main) -- model can be anything
	if model:IsA("BasePart") then
		WeldPair(main, model)
	end
	for _, v in pairs(model:GetChildren()) do
		WeldAll(v, main)
	end
end

function UnanchorAll(model) -- model can be anything
	if model:IsA("BasePart") then
		model.Anchored = false
	end
	for _, v in pairs(model:GetChildren()) do
		UnanchorAll(v)
	end
end

WeldAll(script.Parent.Body, script.Parent.MainSeat)
UnanchorAll(script.Parent)

script:Destroy() -- Done, clean script up.
