--[[

	Simple Clone script
	Cronnie#8709

--]]

--[[ Controls

	H = Replaces you with a Clone so people think they killed you but they actually did not.
	I = Become visible, usually helpful when you're invisible after you press H
	T = Tp to your mouse
	C = Remove clones
	Q = toggle mouse follow (default is non mouse follow)
	E = Summons 5 clones around you
	L = Spawns a clone on ur mouse
	R = Rasengan only for you
	F = Rasengan for clones
	X = Make clones ride each other ( buggy )

--]]

plr = game:service'Players'.LocalPlayer
char = plr.Character
cam = workspace.Camera
m = plr:GetMouse()
char.Archivable = true

cooldown = true
disable = true
rad = math.rad
cloneamount = 30
mfol = false
biju = false
rid = false
rs = false

ras = {

}

welds= {

}

welds2 = {

}

mcs = {

}

clones = {

}

char:FindFirstChildOfClass'Humanoid'.WalkSpeed = 50
char:FindFirstChildOfClass'Humanoid'.JumpPower = 100

hair = Instance.new("Part", char)
hair.Size = Vector3.new(0.2,0.2,0.2)
hairmesh = Instance.new("SpecialMesh", hair)
hairmesh.MeshId = "rbxassetid://520462259"
hairmesh.Scale = Vector3.new(0.07, 0.07, 0.074)
hairmesh.TextureId = "rbxassetid://520462269"
hair.Transparency = 0
hair.CanCollide = false
hair.Name = "plrhair"
hair.Anchored = false
hair.BrickColor = BrickColor.new("Really black")
Weld = Instance.new("Weld", char)
Weld.Part0 = char["Head"]
Weld.Part1 = hair
Weld.C1 = CFrame.new(0, 0.4, 0.1)*CFrame.Angles(0,rad(180),0)

for _, a in pairs(char:children()) do
	if a:IsA'Accessory' or a:IsA'CharacterMesh' or a:IsA'Pants' or a:IsA'Shirt' then
		a:Destroy()
	end
end

char.Head.face.Texture =  "http://www.roblox.com/asset/?id=727692296"

local s = Instance.new('Shirt', char)
s.ShirtTemplate = "rbxassetid://208297138"
local p = Instance.new('Pants', char)
p.PantsTemplate = "rbxassetid://184745905"

function crasengan(a)
	coroutine.resume(coroutine.create(function()
	local sou =Instance.new("Sound")
	sou.Pitch =1
	sou.Volume= 2
	sou.SoundId= "rbxassetid://1327404927"
	sou.Parent= a["Head"]
	sou:Play()
	local arm= {a["Right Arm"]}
	a.Torso["Right Shoulder"].Archivable =true
	part1 =Instance.new("Part")
	table.insert(ras,part1)
	part1.CFrame =a["Right Arm"].CFrame
	part1.Parent =a
	part1.Name= "TriggerR"
	part1.Transparency =0.560
	part1.Shape ="Ball"
	part1.BrickColor= BrickColor.new("Toothpaste")
	part1.TopSurface =0
	part1.Material="Neon"
	part1.BottomSurface =0
	part1.CanCollide=false
	part1.Size =Vector3.new(2,2,2)
	part1.Anchored =false
	local mc =a.Torso["Right Shoulder"]:Clone()
	table.insert(mcs,mc)
	weld = Instance.new("Weld",arm[1])
	table.insert(welds,mc)
	weld.Part0=a.Torso
	weld.Part1=weld.Parent
	weld.C1 =CFrame.new(-1.5,.5,.5)*CFrame.Angles(math.rad(-90),0,0)
	part1.CFrame = a["Right Arm"].CFrame* CFrame.new(0,1, 1.75)
	local Weld= Instance.new("Weld", a)
	Weld.Part0= a["Right Arm"]
	Weld.Part1=part1
	Weld.C1=CFrame.new(0,1.75,0)*CFrame.fromEulerAnglesXYZ(0,0,0)

	part1.Touched:connect(function(hit)
		part1.Transparency = 1
		if hit.Parent:FindFirstChild("Humanoid") then
			if hit.Parent.Name ~= plr.Name and rs then
				rs = false
				for _, a in pairs(ras) do
					a:Destroy()
				end
				local part2 = part1:Clone()
				table.insert(ras,part2)
				part2.Name = "FakeR"
				part1:Destroy()
				weld:Destroy()
				mc.Parent = a.Torso
				for _, a in pairs(mcs) do
					for _, b in pairs(clones) do
						if b:FindFirstChild'Torso' then
							a.Parent = b.Torso
						end
					end
				end
			  	part2.Parent = hit.Parent
			  	part2.Transparency = 0
			 	local Weld = Instance.new("Weld", a)
			 	Weld.Part0 = hit.Parent.HumanoidRootPart
			  	Weld.Part1 = part2
			  	Weld.C1 = CFrame.new(0, 1, 0)*CFrame.fromEulerAnglesXYZ(0, 0, 0)
				local bv = Instance.new('BodyVelocity')
				bv.MaxForce = Vector3.new(math.huge,math.huge,math.huge)
				bv.P = 7555
				bv.Velocity = hit.Parent:FindFirstChild("Head").CFrame.lookVector + Vector3.new(math.random(-100,1),math.random(0,1),math.random(-100,1))
				bv.Parent = hit.Parent:FindFirstChild("HumanoidRootPart")
				game.Debris:AddItem(bv, 0.6)
				wait(0.6)
				ypcall(function()
					hit.Parent:FindFirstChild('HumanoidRootPart').Anchored = true
				end)
				part2.Anchored = true
				for i=0,15,1 do
					wait(.05)
					part2.Transparency = part2.Transparency + 0.1
					part2.Size = part2.Size + Vector3.new(10,10,10)
				end
				part2:Destroy()
				ypcall(function()
					hit.Parent:FindFirstChild('HumanoidRootPart').Anchored = false
					hit.Parent:BreakJoints()
				end)
			end
		end
	end)
	end))
end

function rasengan(a)
	coroutine.resume(coroutine.create(function()
	local sou =Instance.new("Sound")
	sou.Pitch =1
	sou.Volume= 2
	sou.SoundId= "rbxassetid://1327404927"
	sou.Parent= a["Head"]
	sou:Play()
	local arm= {a["Right Arm"]}
	a.Torso["Right Shoulder"].Archivable =true
	part1 =Instance.new("Part")
	table.insert(ras,part1)
	part1.CFrame =a["Right Arm"].CFrame
	part1.Parent =a
	part1.Name= "TriggerR"
	part1.Transparency =0.560
	part1.Shape ="Ball"
	part1.BrickColor= BrickColor.new("Toothpaste")
	part1.TopSurface =0
	part1.Material="Neon"
	part1.BottomSurface =0
	part1.CanCollide=false
	part1.Size =Vector3.new(2,2,2)
	part1.Anchored =false
	local mc =a.Torso["Right Shoulder"]:Clone()
	weld = Instance.new("Weld",arm[1])
	weld.Part0=a.Torso
	weld.Part1=weld.Parent
	weld.C1 =CFrame.new(-1.5,.5,.5)*CFrame.Angles(math.rad(-90),0,0)
	part1.CFrame = a["Right Arm"].CFrame* CFrame.new(0,1, 1.75)
	local Weld= Instance.new("Weld", a)
	Weld.Part0= a["Right Arm"]
	Weld.Part1=part1
	Weld.C1=CFrame.new(0,1.75,0)*CFrame.fromEulerAnglesXYZ(0,0,0)

	part1.Touched:connect(function(hit)
		part1.Transparency = 1
		if hit.Parent:FindFirstChild("Humanoid") then
			if hit.Parent.Name ~= plr.Name and rs then
				rs = false
				for _, a in pairs(ras) do
					a:Destroy()
				end
				local part2 = part1:Clone()
				table.insert(ras,part2)
				part2.Name = "FakeR"
				part1:Destroy()
				weld:Destroy()
				mc.Parent = a.Torso
			  	part2.Parent = hit.Parent
			  	part2.Transparency = 0
			 	local Weld = Instance.new("Weld", a)
			 	Weld.Part0 = hit.Parent.HumanoidRootPart
			  	Weld.Part1 = part2
			  	Weld.C1 = CFrame.new(0, 1, 0)*CFrame.fromEulerAnglesXYZ(0, 0, 0)
				local bv = Instance.new('BodyVelocity')
				bv.MaxForce = Vector3.new(math.huge,math.huge,math.huge)
				bv.P = 7555
				bv.Velocity = hit.Parent:FindFirstChild("Head").CFrame.lookVector + Vector3.new(math.random(-100,1),math.random(0,1),math.random(-100,1))
				bv.Parent = hit.Parent:FindFirstChild("HumanoidRootPart")
				game.Debris:AddItem(bv, 0.6)
				wait(0.6)
				ypcall(function()
					hit.Parent:FindFirstChild('HumanoidRootPart').Anchored = true
				end)
				part2.Anchored = true
				for i=0,15,1 do
					wait(.05)
					part2.Transparency = part2.Transparency + 0.1
					part2.Size = part2.Size + Vector3.new(10,10,10)
				end
				part2:Destroy()
				ypcall(function()
					hit.Parent:FindFirstChild('HumanoidRootPart').Anchored = false
					hit.Parent:BreakJoints()
				end)
			end
		end
	end)
	end))
end

function ride()
	ypcall(function()
	local b = 1
	local last = #clones
	for _, a in pairs(clones) do
		wait(.05)
		local minus = #clones
		local plus = #clones - 1
		local total = plus - minus
		local cur = b
		local nex = cur - total
		p = Instance.new('Weld', clones[cur])
		table.insert(welds2, p)
		p.Part0 = clones[cur]:FindFirstChild("Torso") or clones[cur]:FindFirstChild("UpperTorso")
		p.Part1 = clones[nex]:FindFirstChild("Torso") or clones[nex]:FindFirstChild("UpperTorso")
		p.C0 = CFrame.new(0,-2.2,-.50)
		clones[cur].Humanoid.Sit = true
		b = b + 1
	end
	p = Instance.new('Weld', clones[last])
	table.insert(welds2, p)
	p.Part0 = char:FindFirstChild("Torso") or char:FindFirstChild("UpperTorso")
	p.Part1 = clones[last]:FindFirstChild("Torso") or clones[last]:FindFirstChild("UpperTorso")
	p.C0 = CFrame.new(0,-2.2,-.50)
	end)
end

function clonerasengan()
	for _, a in pairs(clones) do
		if a ~= nil and a:FindFirstChildOfClass'Humanoid' then
			crasengan(a)
		end
	end
end

function hai(b)
	hair = Instance.new("Part", b.Head)
	hairmesh = Instance.new("SpecialMesh", hair)
	hairmesh.MeshId = "rbxassetid://520462259"
	hairmesh.Scale = Vector3.new(0.07, 0.07, 0.074)
	hairmesh.TextureId = "rbxassetid://520462269"
	hair.Transparency = 0
	hair.CanCollide = false
	hair.Name = "plrhair"
	hair.Anchored = false
	hair.BrickColor = BrickColor.new("Really black")
	Weld = Instance.new("Weld",b)
	Weld.Part0 = b["Head"]
	Weld.Part1 = hair
	Weld.C1 = CFrame.new(0, 0.4, 0.1)*CFrame.Angles(0,rad(180),0)
end

function cclones()
	cloneamount = 0
	for _, a in pairs(char:children()) do
		if a:FindFirstChild('Id'..plr.Name) then
			local p = Instance.new('Part', char)
			p.Transparency = 1
			p.CanCollide = false
			p.Anchored = true
			p.Size = Vector3.new(0.2,0.2,0.2)
			if a:FindFirstChild'Torso' then
				p.CFrame = a.Torso.CFrame
			elseif not a:FindFirstChild'Torso' then
				for _, b in pairs(a:children()) do
					if b:IsA'Part' then
						p.CFrame = b.CFrame
					end
				end
			end
			local sou = Instance.new("Sound")
			sou.Pitch = 0
			sou.Volume = 5
			sou.SoundId = "rbxassetid://722960601"
			sou.Parent = p
			sou:Play()
			local pe = Instance.new("ParticleEmitter")
			pe.Acceleration = Vector3.new(0, 8, 0)
			pe.Lifetime = NumberRange.new(1, 1.5)
			pe.Rate = 20000
			pe.RotSpeed = NumberRange.new(-30, 30)
			pe.Rotation = NumberRange.new(0, 360)
			pe.Size = NumberSequence.new({
			NumberSequenceKeypoint.new(0, 4.38, 0),
			NumberSequenceKeypoint.new(0.672, 4.14, 0),
			NumberSequenceKeypoint.new(1, 1.48, 0)
			})
			pe.Texture = "rbxassetid://244221440"
			pe.Transparency = NumberSequence.new({
			NumberSequenceKeypoint.new(0, 0, 0),
			NumberSequenceKeypoint.new(0.529, 0.3, 0),
			NumberSequenceKeypoint.new(1, 1, 1)
			})
			pe.ZOffset = 5
			pe.VelocitySpread = 360
			pe.Parent = p
			pe.Enabled = true
			wait(0.1)
			pe.Enabled = false
		a:Destroy()
		end
	end
end

function id(a)
	local num = Instance.new'NumberValue'
	num.Parent = a
	num.Name = "Id"..plr.Name
end

function invis(b)
	hair.Transparency = 1
	b.Head.face.Transparency = 1
	for _, a in pairs(b:children()) do
		if a:IsA'Part' and a.Name ~= 'HumanoidRootPart' then
			a.Transparency = 1
		elseif a:IsA'Accessory' then
			a.Handle.Transparency = 1
		end
	end
	hair.Transparency = 1
end

function vis(b)
	hair.Transparency = 0
	b.Head.face.Transparency = 0
	for _, a in pairs(b:children()) do
		if a:IsA'BasePart' and a.Name ~= 'HumanoidRootPart' then
			a.Transparency = 0
		elseif a:IsA'Accessory' then
			a.Handle.Transparency = 0
		end
	end
end

function clear(b)
	for _, a in pairs(b:children()) do
		if a:IsA'Model' and a.Name == plr.Name and plr.Parent then
			a:Destroy()
		end
	end
end

function add(b)
	table.insert(clones,b)
end

function sub()
	hair.Transparency = 1
	local p = Instance.new('Part', char.Torso)
	p.Anchored = true
	p.CanCollide = false
	p.Transparency = 1
	p.Size = Vector3.new(0.1,.1,.1)
	p.Anchored = true
	p.CFrame = char.Torso.CFrame
	local v = char:Clone()
	cloneamount = cloneamount + 1
	clear(v)
	hai(v)
	add(v)
	vis(v)
	id(v)
	invis(char)
	v.Parent = char
	char.Torso.CFrame = char.Torso.CFrame * CFrame.new(0,15,0)
	v.Torso.CFrame = p.CFrame
	v.Humanoid.MaxHealth = 100
	for _, a in pairs(char:children()) do
		if a:IsA'Part' then
			a.Transparency = 1
		elseif a:IsA'Accessory' then
			a.Handle.Transparency = 1
		end
	end
	char.Head["face"].Transparency = 1
	if v:FindFirstChildOfClass'Humanoid' then
		health = v:FindFirstChildOfClass'Humanoid'.Health
	end
	if v:FindFirstChildOfClass'Humanoid' then
		v:FindFirstChildOfClass'Humanoid'.Changed:connect(function()
			if v:FindFirstChildOfClass'Humanoid' and v:FindFirstChildOfClass'Humanoid'.Health < health then
				local part = Instance.new('Part', game.Workspace)
				cloneamount = cloneamount - 1
				part.Transparency = 1
				part.CanCollide = false
				part.Size = Vector3.new(0.2,0.2,0.2)
				part.CFrame = v.Torso.CFrame
				v:Destroy()
				local sou = Instance.new("Sound")
				sou.Pitch = 1
				sou.Volume = 1.2
				sou.SoundId = "rbxassetid://722960601"
				sou.Parent = part
				sou:Play()
				local pe = Instance.new("ParticleEmitter")
				pe.Acceleration = Vector3.new(0, 8, 0)
				pe.Lifetime = NumberRange.new(1, 1.5)
				pe.Rate = 20000
				pe.RotSpeed = NumberRange.new(-30, 30)
				pe.Rotation = NumberRange.new(0, 360)
				pe.Size = NumberSequence.new({
				NumberSequenceKeypoint.new(0, 4.38, 0),
				NumberSequenceKeypoint.new(0.672, 4.14, 0),
				NumberSequenceKeypoint.new(1, 1.48, 0)
				})
				pe.Texture = "rbxassetid://244221440"
				pe.Transparency = NumberSequence.new({
				NumberSequenceKeypoint.new(0, 0, 0),
				NumberSequenceKeypoint.new(0.529, 0.3, 0),
				NumberSequenceKeypoint.new(1, 1, 1)
				})
				pe.ZOffset = 5
				pe.VelocitySpread = 360
				pe.Parent = part
				pe.Enabled = true
				wait(0.1)
				pe.Enabled = false
			end
			if v:FindFirstChildOfClass'Humanoid' then
				health = v:FindFirstChildOfClass'Humanoid'.Health
			end
		end)
	end
end

function tp()
	for i = 1,25 do
		wait()
		for _, a in pairs(char:children()) do
			if a:IsA'Part' and a.Name ~= 'HumanoidRootPart' then
				a.Transparency = a.Transparency + 0.1
				char.Head.face.Transparency = char.Head.face.Transparency + 0.1
				hair.Transparency = hair.Transparency + 0.1
			end
		end
	end
	char.Torso.CFrame = m.Hit
	for i = 1,25 do
		wait()
		for _, a in pairs(char:children()) do
			if a:IsA'Part' and a.Name ~= 'HumanoidRootPart' then
				a.Transparency = a.Transparency - 0.1
				char.Head.face.Transparency = char.Head.face.Transparency - 0.1
				hair.Transparency = hair.Transparency - 0.1
			end
		end
	end
end

function bijuu()
	for _, a in pairs(char:children()) do
		for i = 1,1 do
			wait()
			if a:IsA'Part' then
				local red = Instance.new('Part', char)
				red.Anchored = false
				red.CanCollide = false
				red.Material = 'Neon'
				red.BrickColor = BrickColor.new'Crimson'
				red.Size = a.Size + Vector3.new(.05,.05,.05)
				red.Shape = a.Shape
				red.Transparency = 0.6
				local weld = Instance.new('Weld', red)
				weld.Part0 = a
				weld.Part1 = red
				weld.C0 = CFrame.new(0,0,0)
				if a.Name == "Head" then
					a:FindFirstChildOfClass'SpecialMesh':Clone().Parent = red
				end
			end
		end
	end
end

function around()
	local position = char.Torso.CFrame
	local number = 5
	local radius = 25

	for i=1, number do
		local clone = char:Clone()
		clone.Parent = char
		cloneamount = cloneamount + 1
		clear(clone)
		hai(clone)
		add(clone)
		vis(clone)
		id(clone)
		local sine = math.sin((360/number + 360/number*i)/(180/math.pi))
		local cosine = math.cos((360/number + 360/number*i)/(180/math.pi))
		clone.Torso.CFrame = position + Vector3.new(radius*sine, 0, radius*cosine)
		clone.Torso.CFrame = clone.Torso.CFrame*CFrame.fromEulerAnglesXYZ(0, (360/number + 360/number*i)/(180/math.pi), 0)
		clone.Torso.CFrame = CFrame.new(clone.Torso.Position, plr.Character.Torso.Position)
		local sou = Instance.new("Sound")
		sou.Pitch = 1
		sou.Volume = 0.9
		sou.SoundId = "rbxassetid://722960601"
		sou.Parent = clone.Torso
		sou:Play()
		local pe = Instance.new("ParticleEmitter")
		pe.Acceleration = Vector3.new(0, 8, 0)
		pe.Lifetime = NumberRange.new(1, 1.5)
		pe.Rate = 20000
		pe.RotSpeed = NumberRange.new(-30, 30)
		pe.Rotation = NumberRange.new(0, 360)
		pe.Size = NumberSequence.new({
		NumberSequenceKeypoint.new(0, 4.38, 0),
		NumberSequenceKeypoint.new(0.672, 4.14, 0),
		NumberSequenceKeypoint.new(1, 1.48, 0)
		})
		pe.Texture = "rbxassetid://244221440"
		pe.Transparency = NumberSequence.new({
		NumberSequenceKeypoint.new(0, 0, 0),
		NumberSequenceKeypoint.new(0.529, 0.3, 0),
		NumberSequenceKeypoint.new(1, 1, 1)
		})
		pe.ZOffset = 5
		pe.VelocitySpread = 360
		pe.Parent = clone.Torso
		pe.Enabled = true
		wait(0.1)
		pe.Enabled = false
	end
end

function mawn()
	local clone = char:Clone()
	clone.Parent = char
	clone.Torso.CFrame = m.Hit
	cloneamount = cloneamount + 1
	clear(clone)
	hai(clone)
	add(clone)
	vis(clone)
	id(clone)
	local part = Instance.new('Part', game.Workspace)
	part.Transparency = 1
	part.CanCollide = false
	part.Size = Vector3.new(0.2,0.2,0.2)
	part.CFrame = clone.Torso.CFrame
	local sou = Instance.new("Sound")
	sou.Pitch = 1
	sou.Volume = 1.2
	sou.SoundId = "rbxassetid://722960601"
	sou.Parent = part
	sou:Play()
	local pe = Instance.new("ParticleEmitter")
	pe.Acceleration = Vector3.new(0, 8, 0)
	pe.Lifetime = NumberRange.new(1, 1.5)
	pe.Rate = 20000
	pe.RotSpeed = NumberRange.new(-30, 30)
	pe.Rotation = NumberRange.new(0, 360)
	pe.Size = NumberSequence.new({
	NumberSequenceKeypoint.new(0, 4.38, 0),
	NumberSequenceKeypoint.new(0.672, 4.14, 0),
	NumberSequenceKeypoint.new(1, 1.48, 0)
	})
	pe.Texture = "rbxassetid://244221440"
	pe.Transparency = NumberSequence.new({
	NumberSequenceKeypoint.new(0, 0, 0),
	NumberSequenceKeypoint.new(0.529, 0.3, 0),
	NumberSequenceKeypoint.new(1, 1, 1)
	})
	pe.ZOffset = 5
	pe.VelocitySpread = 360
	pe.Parent = part
	pe.Enabled = true
	wait(0.1)
	pe.Enabled = false
end

function visible()
	for i = 1,15 do
		wait()
		for _, a in pairs(char:children()) do
			if a:IsA'Part' and a.Name ~= 'HumanoidRootPart' then
				a.Transparency = a.Transparency - 0.1
				char.Head.face.Transparency = char.Head.face.Transparency - 0.1
				hair.Transparency = hair.Transparency - 0.1
			end
		end
	end
end

m.KeyDown:connect(function(key)
	if key == "h" and disable then
		sub()
	elseif key == "i" and cooldown then
		cooldown = false
		visible()
		cooldown = true
	elseif key == "t" and cooldown  then
		cooldown = false
		tp()
		cooldown = true
	elseif key == "c" and cooldown then
		cooldown = false
		cclones()
		cooldown = true
	elseif key == "q" then
		if mfol == false then
			mfol = true
		elseif mfol then
			mfol = false
		end
	elseif key == "e" and cooldown and disable then
		cooldown = false
		around()
		cooldown = true
	elseif key == "l" and cooldown and disable then
		cooldown = false
		mawn()
		cooldown = true
	elseif key == "r" and cooldown then
		cooldown = false
		rs = true
		rasengan(char)
		cooldown = true
	elseif key == "f" then
		cooldown = false
		rs = true
		clonerasengan()
		cooldown = true
	elseif key == "g" then
		cooldown = false
		bijuu()
		cooldown = true
	elseif key == "x" then
		if rid == false and cooldown then
			rid = true
			cooldown = false
			ride()
			cooldown = true
		elseif rid and cooldown then
			rid = false
			cooldown = false
			for _, a in pairs(welds2) do
				a:Destroy()
			end
			welds2 = {}
			cooldown = true
		end
	end
end)

game:GetService('RunService').RenderStepped:connect(function()
	if cloneamount >= 10 then
		disable = false
	elseif cloneamount <= 9 then
		disable = true
	end
end)

local jump = false
m.Button1Down:connect(function()
	if mfol then
		jump = true
		wait(.08)
		jump = false
	end
end)


game:GetService('RunService').RenderStepped:connect(function()
	for _, a in pairs(clones) do
		if a ~= nil and a:FindFirstChildOfClass'Humanoid' then
			if mfol == false then
				local random = math.random(1,100)
				if random == 7 then
					a.Humanoid.Jump = true
				end
				a.Humanoid:MoveTo(Vector3.new(math.random(100,255),math.random(100,255),math.random(100,255)))
			elseif mfol then
				if jump then
					a.Humanoid.Jump = true
				end
				a.Humanoid:MoveTo(m.Hit.p)
			end
		end
	end
end)