ROBLOX Naruto Script

--[[ 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 = 0
mfol = false
biju = false
rid = false
rs = false

ras = {

}

welds= {

}

welds2 = {

}

mcs = {

}

clones = {

}

char:FindFirstChildOfClass'Humanoid'.WalkSpeed = 32
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://738548104"
    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://738548104"
    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 = 1
            sou.Volume = 1.2
            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)