Character=script.Parent Humanoid=Character:FindFirstChild("\072\117\109\097\110\111\105\100")Debris=game:GetService("\068\101\098\114\105\115")WindDirection=script:FindFirstChild("\087\105\110\100\068\105\114\101\099\116\105\111\110")Force=script:FindFirstChild("\070\111\114\099\101")Parts={}BaseColor=BrickColor.new("\082\111\121\097\108 \112\117\114\112\108\101")Color=BaseColor.Color Gravity=196.2 Duration=3 Classes={BasePart={BrickColor=BaseColor;Material=Enum.Material.Plastic,Reflectance=0,Transparency=.75},FileMesh={TextureId=""};DataModelMesh={VertexColor=Vector3.new(Color.r,Color.g,Color.b)};CharacterMesh={BaseTextureId=0;OverlayTextureId=0},Shirt={ShirtTemplate=""};Pants={PantsTemplate=""},FaceInstance={Texture=""};Sparkles={SparkleColor=Color;Enabled=false},Fire={Color=Color,SecondaryColor=Color,Enabled=false},Smoke={Color=Color;Enabled=false};Light={Color=Color,Enabled=false};ParticleEmitter={Color=ColorSequence.new(Color,Color);Enabled=false}}Fire=script:FindFirstChild("\070\105\114\101")Objects={}RemovedObjects={}FakeParts={}Hats={}Tools={}Particles={}function DestroyScript()Debris:AddItem(script,.5)end function TweenNumber(q,x,L)return(x-q)/L end function Decorate(q)local x={Object=nil,Properties={}}for L,y in pairs(Classes)do if q:IsA(L)then if q:IsA("\067\104\097\114\097\099\116\101\114\077\101\115\104")then local x=Instance.new("\083\112\101\099\105\097\108\077\101\115\104")x.MeshType=Enum.MeshType.FileMesh x.MeshId="\104\116\116\112\058\047\047\119\119\119\046\114\111\098\108\111\120\046\099\111\109\047\097\115\115\101\116\047\063\105\100\061"..q.MeshId for L,y in pairs(Character:GetChildren())do if y:IsA("\066\097\115\101\080\097\114\116")and q.BodyPart.Name==string.gsub(y.Name," ","")then x.Parent=y table.insert(RemovedObjects,{Object=q;NewObject=x,Parent=q.Parent})q.Parent=nil end end elseif q:IsA("\066\097\115\101\080\097\114\116")and q.Transparency>=1 then else x.Object=q for L,y in pairs(y)do local s=nil local h=false pcall(function()s=q[L]h=true q[L]=y end)if h then x.Properties[L]=s end end end end end table.insert(Objects,x)end function Redesign(q)for q,x in pairs(q:GetChildren())do if x~=script then Decorate(x)Redesign(x)end end end if not Humanoid or not WindDirection then DestroyScript()return end for q,x in pairs(Character:GetChildren())do if x:IsA("\072\097\116")or x:IsA("\084\111\111\108")then local q=x:Clone()Decorate(q)table.insert(x:IsA("\072\097\116")and Hats or Tools,x)for q,L in pairs(q:GetChildren())do if L:IsA("\066\097\115\101\080\097\114\116")then local q=L:Clone()q.Name=x.Name table.insert(FakeParts,q)q.Parent=Character q.CFrame=L.CFrame end end end end Humanoid:UnequipTools()for q,x in pairs({Hats,Tools})do for q,x in pairs(x)do x.Parent=nil end end Redesign(Character)local q=Instance.new("\077\111\100\101\108")q.Name="\071\104\111\115\116\077\111\100\101\108"for x,L in pairs(Character:GetChildren())do if L:IsA("\066\097\115\101\080\097\114\116")then if L.Name~="\072\117\109\097\110\111\105\100\082\111\111\116\080\097\114\116"then local x=L:Clone()x.Name="\080\097\114\116"x.CanCollide=false for q,x in pairs(x:GetChildren())do if not x:IsA("\068\097\116\097\077\111\100\101\108\077\101\115\104")then x:Destroy()end end table.insert(FakeParts,x)local y=L:GetMass()*Gravity^2 local s=Instance.new("\066\111\100\121\086\101\108\111\099\105\116\121")s.maxForce=Vector3.new(y,y,y)s.velocity=WindDirection.Value*Force.Value s.Parent=x x.Parent=q local h=Fire:Clone()h.Enabled=true table.insert(Particles,h)h.Parent=x end L:Destroy()end end Spawn(function()local q=Classes.BasePart.Transparency local x=1 local L=.75 local y=.033333333333333 local s=L/y for L=1,s,1 do local h=q+TweenNumber(q,x,s/(L+1))for q,x in pairs(FakeParts)do if x and x.Parent then x.Transparency=h end end wait(y)end for q,x in pairs(Particles)do x.Enabled=false end end)Debris:AddItem(q,5)q.Parent=game:GetService("\087\111\114\107\115\112\097\099\101")


Character = script.Parent
Humanoid = Character:FindFirstChild("Humanoid")

Debris = game:GetService("Debris")

WindDirection = script:FindFirstChild("WindDirection")
Force = script:FindFirstChild("Force")

Parts = {}

BaseColor = BrickColor.new("Royal purple")
Color = BaseColor.Color

Gravity = 196.20

Duration = 3

Classes = {
	BasePart = {
		BrickColor = BaseColor,
		Material = Enum.Material.Plastic,
		Reflectance = 0,
		Transparency = 0.75,
	},
	FileMesh = {
		TextureId = "",
	},
	DataModelMesh = {
		VertexColor = Vector3.new(Color.r, Color.g, Color.b),
	},
	CharacterMesh = {
		BaseTextureId = 0,
		OverlayTextureId = 0,
	},
	Shirt = {
		ShirtTemplate = "",
	},
	Pants = {
		PantsTemplate = "",
	},
	FaceInstance = {
		Texture = "",
	},
	Sparkles = {
		SparkleColor = Color,
		Enabled = false,
	},
	Fire = {
		Color = Color,
		SecondaryColor = Color,
		Enabled = false,
	},
	Smoke = {
		Color = Color,
		Enabled = false,
	},
	Light = {
		Color = Color,
		Enabled = false,
	},
	ParticleEmitter = {
		Color = ColorSequence.new(Color, Color),
		Enabled = false,
	}
}

Fire = script:FindFirstChild("Fire")

Objects = {}
RemovedObjects = {}
FakeParts = {}
Hats = {}
Tools = {}
Particles = {}

function DestroyScript()
	Debris:AddItem(script, 0.5)
end

function TweenNumber(Start, Goal, Time)
	return ((Goal - Start) / Time)
end

function Decorate(Object)
	local ObjectData = {
		Object = nil,
		Properties = {},
	}
	for i, v in pairs(Classes) do
		if Object:IsA(i) then
			if Object:IsA("CharacterMesh") then
				local Mesh = Instance.new("SpecialMesh")
				Mesh.MeshType = Enum.MeshType.FileMesh
				Mesh.MeshId = ("http://www.roblox.com/asset/?id=" .. Object.MeshId)
				for ii, vv in pairs(Character:GetChildren()) do
					if vv:IsA("BasePart") and Object.BodyPart.Name == string.gsub(vv.Name, " ", "") then
						Mesh.Parent = vv
						table.insert(RemovedObjects, {Object = Object, NewObject = Mesh, Parent = Object.Parent})
						Object.Parent = nil
					end
				end
			elseif Object:IsA("BasePart") and Object.Transparency >= 1 then
			else
				ObjectData.Object = Object
				for ii, vv in pairs(v) do
					local PropertyValue = nil
					local PropertyValueSet = false
					pcall(function()
						PropertyValue = Object[ii]
						PropertyValueSet = true
						Object[ii] = vv
					end)
					if PropertyValueSet then
						ObjectData.Properties[ii] = PropertyValue
					end
				end
			end
		end
	end
	table.insert(Objects, ObjectData)
end

function Redesign(Parent)
	for i, v in pairs(Parent:GetChildren()) do
		if v ~= script then
			Decorate(v)
			Redesign(v)
		end
	end
end

if not Humanoid or not WindDirection then
	DestroyScript()
	return
end

for i, v in pairs(Character:GetChildren()) do
	if v:IsA("Hat") or v:IsA("Tool") then
		local FakeObject = v:Clone()
		Decorate(FakeObject)
		table.insert(((v:IsA("Hat") and Hats) or Tools), v)
		for ii, vv in pairs(FakeObject:GetChildren()) do
			if vv:IsA("BasePart") then
				local FakePart = vv:Clone()
				FakePart.Name = v.Name
				table.insert(FakeParts, FakePart)
				FakePart.Parent = Character
				FakePart.CFrame = vv.CFrame
			end
		end
	end
end

Humanoid:UnequipTools()

for i, v in pairs({Hats, Tools}) do
	for ii, vv in pairs(v) do
		vv.Parent = nil
	end
end

Redesign(Character)

local GhostModel = Instance.new("Model")
GhostModel.Name = "GhostModel"

for i, v in pairs(Character:GetChildren()) do
	if v:IsA("BasePart") then
		if v.Name ~= "HumanoidRootPart" then
			local FakePart = v:Clone()
			FakePart.Name = "Part"
			FakePart.CanCollide = false
			for ii, vv in pairs(FakePart:GetChildren()) do
				if not vv:IsA("DataModelMesh") then
					vv:Destroy()
				end
			end
			table.insert(FakeParts, FakePart)
			local Mass = (v:GetMass() * Gravity ^ 2)
			local BodyVelocity = Instance.new("BodyVelocity")
			BodyVelocity.maxForce = Vector3.new(Mass, Mass, Mass)
			BodyVelocity.velocity = (WindDirection.Value * Force.Value)
			BodyVelocity.Parent = FakePart
			FakePart.Parent = GhostModel
			local FireParticle = Fire:Clone()
			FireParticle.Enabled = true
			table.insert(Particles, FireParticle)
			FireParticle.Parent = FakePart
		end
		v:Destroy()
	end
end

Spawn(function()
	local Start = Classes.BasePart.Transparency
	local End = 1
	local Time = 0.75
	local Rate = (1 / 30)
	local Frames = (Time / Rate)
	for i = 1, Frames do
		local Transparency = (Start + TweenNumber(Start, End, (Frames / (i + 1))))
		for ii, vv in pairs(FakeParts) do
			if vv and vv.Parent then
				vv.Transparency = Transparency
			end
		end
		wait(Rate)
	end
	for i, v in pairs(Particles) do
		v.Enabled = false
	end
end)

Debris:AddItem(GhostModel, 5)
GhostModel.Parent = game:GetService("Workspace")
