Character=script.Parent BaseColor=BrickColor.new("\066\114\105\103\104\116 \121\101\108\108\111\119")Color=BaseColor.Color Duration=150 Classes={BasePart={BrickColor=BaseColor;Material=Enum.Material.Plastic;Reflectance=.5,Anchored=true};FileMesh={TextureId=""},DataModelMesh={VertexColor=Vector3.new(Color.r,Color.g,Color.b)},CharacterMesh={BaseTextureId=0;OverlayTextureId=0},Shirt={ShirtTemplate=""};Pants={PantsTemplate=""},Decal={Texture=""}}Objects={}function Redesign(w)for w,k in pairs(w:GetChildren())do local u={Object=nil,Properties={}}for w,X in pairs(Classes)do if k:IsA(w)then u.Object=k for w,X in pairs(X)do local a=nil pcall(function()a=k[w]k[w]=X end)if a then u.Properties[w]=a end end end end table.insert(Objects,u)Redesign(k)end end Redesign(script.Parent)wait(Duration)for w,k in pairs(Objects)do for w,u in pairs(k.Properties)do k.Object[w]=u end end script:Destroy()


Character = script.Parent

BaseColor = BrickColor.new("Bright yellow")
Color = BaseColor.Color

Duration = 150

Classes = {
	BasePart = {
		BrickColor = BaseColor,
		Material = Enum.Material.Plastic,
		Reflectance = 0.5,
		Anchored = true,
	},
	FileMesh = {
		TextureId = "",
	},
	DataModelMesh = {
		VertexColor = Vector3.new(Color.r, Color.g, Color.b),
	},
	CharacterMesh = {
		BaseTextureId = 0,
		OverlayTextureId = 0,
	},
	Shirt = {
		ShirtTemplate = "",
	},
	Pants = {
		PantsTemplate = "",
	},
	Decal = {
		Texture = "",
	}
}

Objects = {}

function Redesign(Parent)
	for i, v in pairs(Parent:GetChildren()) do
		local Object = {
			Object = nil,
			Properties = {},
		}
		for ii, vv in pairs(Classes) do
			if v:IsA(ii) then
				Object.Object = v
				for iii, vvv in pairs(vv) do
					local PropertyValue = nil
					pcall(function()
						PropertyValue = v[iii]
						v[iii] = vvv
					end)
					if PropertyValue then
						Object.Properties[iii] = PropertyValue
					end
				end
			end
		end
		table.insert(Objects, Object)
		Redesign(v)
	end
end

Redesign(script.Parent) --Goldify the player

wait(Duration)

for i, v in pairs(Objects) do --Unfreeze the player
	for ii, vv in pairs(v.Properties) do
		v.Object[ii] = vv
	end
end

script:Destroy()
