---<>- Made by Megablok13 -<>---
   ---<>- Green Hoodie -<>---
--Converted with ttyyuu12345's model to script plugin v4
local Player = game.Players.localPlayer
local Character = Player.Character
local Humanoid = Character.Humanoid
local mouse = Player:GetMouse()
local p = game.Players.LocalPlayer
local char = p.Character
local Head = p.Character.Head
function swait(num)
  if num == 0 or num == nil then
    game:service("RunService").RenderStepped:wait(0)
  else
    for i = 0, num do
      game:service("RunService").RenderStepped:wait(0)
    end
  end
end
mouse.KeyDown:connect(function(key)
	if key == "r" and Player.Character.Parent == workspace then
		Player.Character.Parent = workspace.Camera
		char = Player.Character
		char.Archivable = true


		cloneChar = char:Clone()
		cloneChar.Parent = workspace
		cloneChar.Name = "KYLETHORNTON" -- put it to any name
		cloneChar.Head.Anchored = true
		Humanoid.WalkSpeed = 16



	end
end)




mouse.KeyUp:connect(function(key)
	if key == "r" and Player.Character.Parent == workspace.Camera then
		Player.Character.Parent = workspace
		Humanoid.WalkSpeed = 16
		cloneChar:destroy()

	end
	end)

function smooth(obj)
	local sides = {"Left", "Right", "Top", "Bottom", "Front", "Back"}
	for i,v in pairs(sides) do
		obj[v.."Surface"] = "SmoothNoOutlines"
	end
end
function fade(obj, dest, grow)
	spawn(function()
		local oldcf = obj.CFrame
		for i = 0, 10 do
			if grow then
				obj.Size = obj.Size +Vector3.new(1,1,1)
				obj.CFrame = oldcf
			end
			obj.Transparency = obj.Transparency +0.2
			swait()
		end
		if dest then
		obj:Destroy()
		end
	end)
end


sprint = false
mouse.KeyDown:connect(function(key)
	if key=="r" then
		sprint = true
		char:FindFirstChildOfClass("Humanoid")
		local mod = Instance.new("Model", workspace.Camera)
		mod.Name = "MobModel"
		for i,v in pairs(char:children()) do
			if v:IsA("Accessory") and not rage then
				if v:FindFirstChild("Handle") then
					v.Handle.Transparency = 0
				end
			end
			if v:IsA("BasePart") and v.Name ~= "HumanoidRootPart" and v.Name ~= "Percent" then
				v.Transparency = 0
			end
		end
		if char.Head:FindFirstChild("face") then
			char.Head.face.Transparency = 0
		end
		repeat wait()
			if not workspace:FindFirstChild("MobModel") then
				mod = Instance.new("Model", workspace.Camera)
				mod.Name = "MobModel"
			end
			for i,v in pairs(Character:children()) do
				if v:IsA("Part") and v.Name ~= "HumanoidRootPart" and v.Name ~= "Percent" then
					local new = v:Clone()
					smooth(new)
					new.Transparency = 0.3
					new.Anchored = true
					new.CanCollide = false
					new.Material = "Neon"
					new.BrickColor = BrickColor.new("Lime green")
					for i,v in pairs(new:children()) do if not v:IsA("SpecialMesh") then v:Destroy() end end
					new.Parent = mod
					fade(new, true)
				end
			end
		until not sprint
		if mod then
			spawn(function()
			repeat wait() until not mod or #mod:children() == 0
			mod:Destroy()
			end)
		end
		char:FindFirstChildOfClass("Humanoid")
	end
end)
mouse.KeyUp:connect(function(key)
 if key=="r" then
		sprint = false
		for i,v in pairs(char:children()) do
			if v:IsA("Accessory") and not rage then
				if v:FindFirstChild("Handle") then
					v.Handle.Transparency = 0
				end
			end
			if v:IsA("BasePart") and v.Name ~= "HumanoidRootPart" and v.Name ~= "Percent" and not v:FindFirstChildOfClass("ParticleEmitter") then
				v.Transparency = 0
			end
		end
		if char.Head:FindFirstChild("face") then
			char.Head.face.Transparency = 0
		end
	end
end)