Model=script.Parent Debris=game:GetService("\068\101\098\114\105\115")FadeRate=.025 Rate=.066666666666667 Removing=false function RemoveModel()if Removing then return end local q={}for w,M in pairs(Model:GetChildren())do if M:IsA("\077\111\100\101\108")then table.insert(q,M)end end if#q==0 then Removing=true Model.Name=""Debris:AddItem(Model,.5)end end Model.ChildRemoved:connect(function(q)RemoveModel()end)RemoveModel()while true do for q,w in pairs(Model:GetChildren())do if w:IsA("\077\111\100\101\108")then for q,w in pairs(w:GetChildren())do if w:IsA("\066\097\115\101\080\097\114\116")and w.Transparency<1 then local q=w.Transparency+FadeRate w.Transparency=q<=1 and q or 1 if w.Transparency>=1 then for q,w in pairs(w:GetChildren())do if w:IsA("\076\105\103\104\116")or w:IsA("\070\105\114\101")or w:IsA("\083\109\111\107\101")or w:IsA("\080\097\114\116\105\099\108\101\069\109\105\116\116\101\114")then w.Enabled=false end end end end end end end wait(Rate)end
--Made by Luckymaxer

Model = script.Parent

Debris = game:GetService("Debris")

FadeRate = 0.025
Rate = (1 / 15)

Removing = false

function RemoveModel()
	if Removing then
		return
	end
	local Parts = {}
	for i, v in pairs(Model:GetChildren()) do
		if v:IsA("Model") then
			table.insert(Parts, v)
		end
	end
	if #Parts == 0 then
		Removing = true
		Model.Name = ""
		Debris:AddItem(Model, 0.5)
	end
end

Model.ChildRemoved:connect(function(Child)
	RemoveModel()
end)

RemoveModel()

while true do
	for i, v in pairs(Model:GetChildren()) do
		if v:IsA("Model") then
			for ii, vv in pairs(v:GetChildren()) do
				if vv:IsA("BasePart") and vv.Transparency < 1 then
					local NewTransparency = (vv.Transparency + FadeRate)
					vv.Transparency = ((NewTransparency <= 1 and NewTransparency) or 1)
					if vv.Transparency >= 1 then
						for iii, vvv in pairs(vv:GetChildren()) do
							if
								vvv:IsA("Light")
								or vvv:IsA("Fire")
								or vvv:IsA("Smoke")
								or vvv:IsA("ParticleEmitter")
							then
								vvv.Enabled = false
							end
						end
					end
				end
			end
		end
	end
	wait(Rate)
end
