Ghost

--[[ Script created by
Derek1017, enjoy!
Copyright, Ghost, and all Ghost functions, parts, etc
changing the name of who created, will cause in you breaking rules
--]]


s = game.Workspace

Player = game.Players.LocalPlayer
c = Player.Character
mouse = Player:GetMouse()

s2 = Instance.new("Sound", c.Head)
s2.Name = "Bleu"
s2.Volume = 1

c.Humanoid.MaxHealth = math.huge
c.Humanoid.Health = math.huge

game:GetService("Chat"):Chat(c, "Ghost, Created by Derek1017 [V0.136]")

        for i,v in pairs(c:GetChildren()) do
                if v:IsA("Shirt") or  v:IsA("Pants") or v:IsA("Hat") then
                v:remove()
wait()
                end
        end

c.Humanoid.DisplayDistanceType = "None"
c.Humanoid.NameOcclusion = "OccludeAll"
c.Head.Transparency = .6
c.Torso.Transparency = .4
c["Right Arm"].Transparency = .2
c["Left Arm"].Transparency = .2
c["Right Leg"].Transparency = .9
c["Left Leg"].Transparency = .9
c.Head.BrickColor = BrickColor.new("Industrial white")
c.Torso.BrickColor = BrickColor.new("Industrial white")
c["Right Arm"].BrickColor = BrickColor.new("Industrial white")
c["Left Arm"].BrickColor = BrickColor.new("Industrial white")
c["Right Leg"].BrickColor = BrickColor.new("Industrial white")
c["Left Leg"].BrickColor = BrickColor.new("Industrial white")
c.Head.face.Texture = "rbxassetid://0"

---Start of Invisibility---
mouse.KeyDown:connect(function(key)
    print("Key Pressed : "..key)
    if key == "e" then
game:GetService("Chat"):Chat(c, "Invisibility")
        s2.SoundId = "rbxassetid://134012322"
        s2:Play()
        s2.Volume = 1
        wait(0.05)
        c.Head.Transparency = 1
        c.Torso.Transparency = 1
        c["Right Arm"].Transparency = 1
        c["Left Arm"].Transparency = 1
        c["Right Leg"].Transparency = 1
        c["Left Leg"].Transparency = 1
        c.Head.CanCollide = false
        c.Torso.CanCollide = false
        c["Right Arm"].CanCollide = false
        c["Left Arm"].CanCollide = false
        c["Right Leg"].CanCollide = false
        c["Left Leg"].CanCollide = false
    end
end)

mouse.KeyUp:connect(function(key)
    if key == "e" then
        s2:Play()
        wait(0.05)
c.Head.Transparency = .6
c.Torso.Transparency = .4
c["Right Arm"].Transparency = .2
c["Left Arm"].Transparency = .2
c["Right Leg"].Transparency = .9
c["Left Leg"].Transparency = .9
c.Head.BrickColor = BrickColor.new("Industrial white")
c.Torso.BrickColor = BrickColor.new("Industrial white")
c["Right Arm"].BrickColor = BrickColor.new("Industrial white")
c["Left Arm"].BrickColor = BrickColor.new("Industrial white")
c["Right Leg"].BrickColor = BrickColor.new("Industrial white")
c["Left Leg"].BrickColor = BrickColor.new("Industrial white")
        c.Head.CanCollide = true
        c.Torso.CanCollide = true
        c["Right Arm"].CanCollide = true
        c["Left Arm"].CanCollide = true
        c["Right Leg"].CanCollide = true
        c["Left Leg"].CanCollide = true
    end
end)
---End of Invisibility---

---Start of Roar---
mouse.KeyDown:connect(function(key)
    if key == "r" then
game:GetService("Chat"):Chat(c, "Roar-Blast")
        s2.SoundId = "rbxassetid://222938768"
        s2.Volume = 5
        wait(.01)
        children = game.Players:GetChildren()

for i = 1, #children do
    children[i].Character.Humanoid.Health = 80
end

        s2:Play()
    end
end)
---End of Roar---

---Start of Slow Time---
mouse.KeyDown:connect(function(key)
    if key == "f" then
        game:GetService("Chat"):Chat(c, "Slow Time")
        s2.SoundId = "rbxassetid://159459861"
        s2.Volume = 5
        wait(.01)
        s2:Play()
        children = game.Players:GetChildren()

for i = 1, #children do
    children[i].Character.Humanoid.WalkSpeed = 3
end
        c.Humanoid.WalkSpeed = 50
wait(10)
for i = 1, #children do
    children[i].Character.Humanoid.WalkSpeed = 16
end
c.Humanoid.WalkSpeed = 16
    end
end)
---End of Slow Time---

---Start of Shadow Charm---
mouse.KeyDown:connect(function(key)
    if key == "g" then
game:GetService("Chat"):Chat(c, "Shadow Charm")
        s2.SoundId = "rbxassetid://171137312"
        s2:Play()
        s2.Volume = 1
c.Head.Transparency = .9
c.Torso.Transparency = .9
c["Right Arm"].Transparency = .9
c["Left Arm"].Transparency = .9
c["Right Leg"].Transparency = .9
c["Left Leg"].Transparency = .9
c["Right Arm"].Touched:connect(function(hit)
    hit.Parent.Humanoid.Health = -80
end)
c["Left Arm"].Touched:connect(function(hit)
    hit.Parent.Humanoid.Health = -80
end)
    end
end)

mouse.KeyUp:connect(function(key)
    if key == "g" then
        s2:Play()
c.Head.Transparency = .6
c.Torso.Transparency = .4
c["Right Arm"].Transparency = .2
c["Left Arm"].Transparency = .2
c["Right Leg"].Transparency = .9
c["Left Leg"].Transparency = .9
c["Right Arm"].Touched:connect(function(hit)
    hit.Parent.Humanoid.Health = 100
end)
c["Left Arm"].Touched:connect(function(hit)
    hit.Parent.Humanoid.Health = 100
end)
c.Head.BrickColor = BrickColor.new("Industrial white")
c.Torso.BrickColor = BrickColor.new("Industrial white")
c["Right Arm"].BrickColor = BrickColor.new("Industrial white")
c["Left Arm"].BrickColor = BrickColor.new("Industrial white")
c["Right Leg"].BrickColor = BrickColor.new("Industrial white")
c["Left Leg"].BrickColor = BrickColor.new("Industrial white")
    end
end)
---End of Shadow Charm---

---Start of Heal Others---
mouse.KeyDown:connect(function(key)
    if key == "h" then
game:GetService("Chat"):Chat(c, "Heal Others")
s2.SoundId = "rbxassetid://186883084"
s2.Volume = 10
s2:Play()
children = game.Players:GetChildren()

for i = 1, #children do
    children[i].Character.Humanoid.Health = 100
end
    end
end)
---End of Heal Others---

---Start of Fire---
mouse.KeyDown:connect(function(key)
    if key == "q" then
game:GetService("Chat"):Chat(c, "Fire")
s2.SoundId = "rbxassetid://199978176"
s2.Volume = 1
s2:Play()
c.Head.BrickColor = BrickColor.new("Bright red")
c.Torso.BrickColor = BrickColor.new("Bright red")
c["Right Arm"].BrickColor = BrickColor.new("Bright red")
c["Left Arm"].BrickColor = BrickColor.new("Bright red")
c["Right Leg"].BrickColor = BrickColor.new("Bright red")
c["Left Leg"].BrickColor = BrickColor.new("Bright red")
s = Instance.new("Fire", c.Torso)
c["Right Arm"].Touched:connect(function(hit)
    Instance.new("Fire", hit.Parent.Torso)
    hit.Parent.Humanoid.Health = 0
end)
    end
end)

mouse.KeyUp:connect(function(key)
    if key == "q" then
c.Head.BrickColor = BrickColor.new("Industrial white")
c.Torso.BrickColor = BrickColor.new("Industrial white")
c["Right Arm"].BrickColor = BrickColor.new("Industrial white")
c["Left Arm"].BrickColor = BrickColor.new("Industrial white")
c["Right Leg"].BrickColor = BrickColor.new("Industrial white")
c["Left Leg"].BrickColor = BrickColor.new("Industrial white")
c.Torso.Fire:Destroy()
    end
end)
---End of Fire---

---Start of Poison--
mouse.KeyDown:connect(function(key)
        if key == "j" then
        game:GetService("Chat"):Chat(c, "Poison")
        s2.SoundId = "rbxassetid://138677306"
        s2.Volume = 1.5
        s2:Play()
c.Head.BrickColor = BrickColor.new("Lime green")
c.Torso.BrickColor = BrickColor.new("Lime green")
c["Right Arm"].BrickColor = BrickColor.new("Lime green")
c["Left Arm"].BrickColor = BrickColor.new("Lime green")
c["Right Leg"].BrickColor = BrickColor.new("Lime green")
c["Left Leg"].BrickColor = BrickColor.new("Lime green")
sp = Instance.new("Sparkles", c.Torso)
c["Left Arm"].Touched:connect(function(hit)
    Instance.new("Sparkles", hit.Parent.Torso)
hit.Parent.Head.BrickColor = BrickColor.new("Lime green")
hit.Parent.Torso.BrickColor = BrickColor.new("Lime green")
hit.Parent["Right Arm"].BrickColor = BrickColor.new("Lime green")
hit.Parent["Left Arm"].BrickColor = BrickColor.new("Lime green")
hit.Parent["Right Leg"].BrickColor = BrickColor.new("Lime green")
hit.Parent["Left Leg"].BrickColor = BrickColor.new("Lime green")
    hit.Parent.Humanoid.Health = hit.Parent.Humanoid.Health -25
    wait(3)
    hit.Parent.Humanoid.Health = hit.Parent.Humanoid.Health -25
    wait(3)
    hit.Parent.Humanoid.Health = hit.Parent.Humanoid.Health -25
    wait(3)
    hit.Parent.Humanoid.Health = hit.Parent.Humanoid.Health -25
end)

mouse.KeyUp:connect(function(key)
    if key == "j" then
        game:GetService("Chat"):Chat(c, "Poison")
        c.Head.BrickColor = BrickColor.new("Industrial white")
c.Torso.BrickColor = BrickColor.new("Industrial white")
c["Right Arm"].BrickColor = BrickColor.new("Industrial white")
c["Left Arm"].BrickColor = BrickColor.new("Industrial white")
c["Right Leg"].BrickColor = BrickColor.new("Industrial white")
c["Left Leg"].BrickColor = BrickColor.new("Industrial white")
sp:Destroy()
    end
end)
end
end)
---End of Poison---

---Start of Suicide---
mouse.KeyDown:connect(function(key)
    if key == "z" then
game:GetService("Chat"):Chat(c, "Suicide")
        s2.SoundId = "rbxassetid://137473066"
        s2.Volume = 1
        s2:Play()
        wait(0.05)
        s = Instance.new("Explosion", c.Torso)
        s.Name = "ex"
        c.Torso.ex.Position = c.Torso.Position
    end
end)
---End of Suicide---

---Start of Shield---
mouse.KeyDown:connect(function(key)
    if key == "x" then
game:GetService("Chat"):Chat(c, "Shield")
        s2.SoundId = "rbxassetid://181004943"
        s2.Volume = 2
        s2:Play()
x = Instance.new("Part")
x.FormFactor = "Custom"
x.Shape = "Ball"
x.Size = Vector3.new(6.5, 6.5, 6.5)
x.TopSurface = "Smooth"
x.BottomSurface = "Smooth"
x.BrickColor = BrickColor.new("Industrial white")
x.Transparency = .6
x.Parent = c
w1 = Instance.new("Weld", c)
w1.Part0 = w1.Parent["Torso"]
w1.Part1 = x
w1.C1 = CFrame.fromEulerAnglesXYZ(0, 0, 0) *CFrame.new(0, 0, 0)
    end
end)

mouse.KeyUp:connect(function(key)
    if key == "x" then
x:Destroy()
    end
end)
---End of Shield---

---Start of Dark Pulse---

mouse.KeyDown:connect(function(key)
    if key == "c" then
game:GetService("Chat"):Chat(c, "Dark Pulse")
        s2.SoundId = "rbxassetid://181004943"
        s2.Volume = 2
        s2:Play()
x = Instance.new("Part")
x.FormFactor = "Custom"
x.Shape = "Cylinder"
x.Size = Vector3.new(6.5, 6.5, 6.5)
x.TopSurface = "Smooth"
x.BottomSurface = "Smooth"
x.BrickColor = BrickColor.new("Really black")
x.CanCollide = false
x.Transparency = .6
x.Parent = c
w1 = Instance.new("Weld", c)
w1.Part0 = w1.Parent["Torso"]
w1.Part1 = x
w1.C1 = CFrame.fromEulerAnglesXYZ(0, 0, 300) *CFrame.new(0, 5, 0)
x.Touched:connect(function(hit)
    hit.Parent.Humanoid.Health = hit.Parent.Humanoid.Health -90
end)
    end
end)

mouse.KeyUp:connect(function(key)
    if key == "c" then
x:Destroy()
c.Head.Anchored = false
c.Torso.Anchored = false
c["Right Arm"].Anchored = false
c["Left Arm"].Anchored = false
c["Right Leg"].Anchored = false
c["Left Leg"].Anchored = false
    end
end)

---End of Dark Pulse---

--</\>Copyright Derek1017 2015</\>--