---------------------------------
--Fallen Angel                 --
---------------------------------
--By: OmegaNoscope             --
--Edit of: CKBackup's Archangel--
---------------------------------

player = game.Players.LocalPlayer
chara = player.Character
debby = game:GetService("Debris")


--Animations--
function loada(anim)
local loaded = chara.Humanoid:LoadAnimation(anim)
return loaded
end

IdleA = New("Animation",chara,"Idle",{AnimationId = "rbxassetid://169638954"})
IdleAnim = loada(IdleA)
IdleAnim:Play()

--Sounds--
Music = New("Sound",chara,"Music",{SoundId = "rbxassetid://626484846",Volume = 1,Looped = true})
SpellCastSnd = New("Sound",chara,"SpellCast",{SoundId = "rbxassetid://161006131",Volume = 1})
ExplodeSnd = New("Sound",chara,"Explode",{SoundId = "rbxassetid://221920694",Volume = 1})
MeteorSnd = New("Sound",chara,"Meteor",{SoundId = "rbxassetid://231917888",Volume = 1})
LasChgSnd = New("Sound",chara,"LasChg",{SoundId = "rbxassetid://137463716",Volume = 1})
LaserSnd = New("Sound",chara,"Laser",{SoundId = "rbxassetid://162246701",Volume = 1})
LasLoopSnd = New("Sound",chara,"LasLoop",{SoundId = "rbxassetid://162246683",Volume = 1,Looped = true})
deathmus = New("Sound",chara.Torso,"DeathMus",{SoundId = "rbxassetid://19094700",PlaybackSpeed = .5,Volume = 5,Looped = true})
deathex = New("Sound",chara.Torso,"DeathEx",{SoundId = "rbxassetid://11984351",PlaybackSpeed = 1,Volume = 5})
Snd = New("Sound",chara,"",{SoundId = "",Volume = 1})
Music:Play()

--Fly--
local truflyposy = chara.Torso.Position.Y+10
local flyposy = truflyposy
local bodfly = Instance.new("BodyPosition", chara.Torso)
bodfly.Name = "Fly"
bodfly.maxForce = Vector3.new(0,10000,0)
bodfly.Position = Vector3.new(0,flyposy,0)

--Enamate--
function Enamate(part)
local trace = Instance.new("Part",chara)
trace.Size = Vector3.new(1,1,1)
trace.TopSurface = 0
trace.BottomSurface = 0
trace.BrickColor = BrickColor.new("Really black")
trace.CanCollide = false
trace.Anchored = true
trace.CFrame = part.CFrame * CFrame.fromEulerAnglesXYZ(math.rad(math.random(0,359)),math.rad(math.random(0,359)),math.rad(math.random(0,359)))
local tracedisp = coroutine.wrap(function()
for i = 1, 9 do
wait(.01)
trace.Transparency = trace.Transparency + .1
end
wait(.01)
trace:Destroy()
end)
tracedisp()
end
function Enamate2(part,name)
if chara:FindFirstChild(name)== nil then
local angl = CFrame.fromEulerAnglesXYZ(math.rad(math.random(0,359)),math.rad(math.random(0,359)),math.rad(math.random(0,359)))
local trace = Instance.new("Part",chara)
trace.Size = Vector3.new(1,1,1)
trace.Name = name
trace.TopSurface = 0
trace.BottomSurface = 0
trace.BrickColor = BrickColor.new("Really black")
trace.CanCollide = false
trace.Anchored = true
trace.CFrame = part.CFrame * angl
local tracem = Instance.new("SpecialMesh",trace)
tracem.MeshId = "rbxassetid://3270017"
local tracedisp = coroutine.wrap(function()
for i = 1, 9 do
wait(.01)
trace.Transparency = trace.Transparency + .1
trace.CFrame = part.CFrame * angl
tracem.Scale = tracem.Scale + Vector3.new(.5,.5,0)
end
wait(.01)
trace:Destroy()
end)
tracedisp()
end
end
function Enamate3()
if chara:FindFirstChild("Ring")== nil then
local trace = Instance.new("Part",chara)
trace.Size = Vector3.new(1,1,1)
trace.Name = "Ring"
trace.TopSurface = 0
trace.BottomSurface = 0
trace.BrickColor = BrickColor.new("Really black")
trace.CanCollide = false
trace.Anchored = true
trace.CFrame = chara.Torso.CFrame
local tracem = Instance.new("SpecialMesh",trace)
tracem.MeshId = "rbxassetid://3270017"
local tracedisp = coroutine.wrap(function()
for i = 1, 99 do
wait(.01)
trace.Transparency = trace.Transparency + .01
trace.CFrame = chara.Torso.CFrame
tracem.Scale = tracem.Scale + Vector3.new(.2,.2,0)
end
wait(.01)
trace:Destroy()
end)
tracedisp()
end
end

--Play Sound in Part--
function PlaySnd(snd,part)
local sound = snd:Clone()
sound.PlayOnRemove = true
sound.Parent = Part
sound:Destroy()
end

--Explosion--
function Expld(rad,pos)
local ex = Instance.new("Explosion",game.Workspace)
ex.BlastRadius = rad
ex.BlastPressure = 0
ex.Position = pos
ex.Visible = false
ex.Hit:connect(function(hit)
if hit.Parent ~= chara and hit.Parent:FindFirstChild("Humanoid")~= nil then
hit.Parent:FindFirstChild("Humanoid").Health = hit.Parent:FindFirstChild("Humanoid").Health - rad
end
end)
end

--Cross Explosion--
function CrossExplosion()
local cirpos = Mouse.Hit.p
local spellcircle = Instance.new("Part",chara)
spellcircle.Anchored = true
spellcircle.Size = Vector3.new(1,1,1)
spellcircle.CFrame = CFrame.new(cirpos.x,cirpos.y,cirpos.z)
spellcircle.Transparency = 1
spellcircle.CanCollide = false
local blkm = Instance.new("BlockMesh",spellcircle)
blkm.Scale = Vector3.new(0,1,0)
local dec = Instance.new("Decal",spellcircle)
dec.Texture = "rbxassetid://685910499"
dec.Transparency = 1
dec.Face = "Top"
local ptl = Instance.new("PointLight",spellcircle)
ptl.Range = 0
ptl.Color = Color3.new(0,0,0)
spellc = coroutine.wrap(function()
while spellc ~= nil do
wait(.01)
spellcircle.CFrame = spellcircle.CFrame * CFrame.fromEulerAnglesXYZ(0,math.rad(10),0)
end
end)
spellc()
PlaySnd(SpellCastSnd,spellcircle)
for i = 1, 10 do
wait(.01)
ptl.Range = ptl.Range + 1
dec.Transparency = dec.Transparency - .1
blkm.Scale = blkm.Scale + Vector3.new(1,0,1)
end
wait(.5)
PlaySnd(ExplodeSnd,spellcircle)
local pemit = Instance.new("ParticleEmitter",spellcircle)
pemit.Color = ColorSequence.new(Color3.new(0,0,0))
pemit.LightEmission = 1
pemit.Size = NumberSequence.new(5)
pemit.Texture = "rbxasset://textures/particles/smoke_main.dds"
pemit.Transparency = NumberSequence.new({NumberSequenceKeypoint.new(0,0),NumberSequenceKeypoint.new(0.9,0),NumberSequenceKeypoint.new(1,1)})
pemit.Lifetime = NumberRange.new(1)
pemit.Rate = 10000
pemit.Speed = NumberRange.new(100)
Expld(12,spellcircle.Position)
wait(.5)
local pt1 = Instance.new("Part",chara)
pt1.Size = Vector3.new(0,0,0)
pt1.Anchored = true
pt1.CFrame = spellcircle.CFrame + Vector3.new(0,60,0)
pt1.Transparency = 1
local pemit2 = pemit:clone()
pemit2.Lifetime = NumberRange.new(.25)
pemit2.EmissionDirection = "Left"
pemit2.Parent = pt1
local pemit3 = pemit2:clone()
pemit3.EmissionDirection = "Right"
pemit3.Parent = pt1
for i = 1, 10 do
Expld(12,spellcircle.Position)
wait(.5)
end
pemit.Enabled = false
pemit2.Enabled = false
pemit3.Enabled = false
for i = 1, 10 do
wait(.01)
ptl.Range = ptl.Range - 1
dec.Transparency = dec.Transparency + .1
blkm.Scale = blkm.Scale - Vector3.new(1,0,1)
end
wait(.01)
spellcircle:Destroy()
pt1:Destroy()
end

--Meteor--
function Meteor()
local meteor = Instance.new("Part",game.Workspace)
meteor.Size = Vector3.new(5,5,5)
meteor.BrickColor = BrickColor.new("Really black")
meteor.Material = "Neon"
meteor.TopSurface = 0
meteor.BottomSurface = 0
meteor.Shape = 0
meteor.CFrame = chara.Torso.CFrame + Vector3.new(0,100,0)
meteor.Velocity = (Mouse.Hit.p - (chara.Torso.CFrame.p + Vector3.new(0,100,0))).unit*100
debby:AddItem(meteor,15)
local bfo = Instance.new("BodyForce",meteor)
bfo.Force = Vector3.new(0,game.Workspace.Gravity*meteor:GetMass(),0)
local eff = Instance.new("ParticleEmitter",meteor)
eff.Color = ColorSequence.new(Color3.new(0,0,0))
eff.LightEmission = 1
eff.Size = NumberSequence.new({NumberSequenceKeypoint.new(0,10),NumberSequenceKeypoint.new(1,0)})
eff.Transparency = NumberSequence.new({NumberSequenceKeypoint.new(0,0),NumberSequenceKeypoint.new(1,1)})
eff.Texture = "rbxasset://textures/particles/smoke_main.dds"
eff.Rate = 100000
eff.Speed = NumberRange.new(0)
eff.Lifetime = NumberRange.new(1)
local mehs = Instance.new("SpecialMesh",meteor)
mehs.MeshType = "Sphere"
mehs.Scale = Vector3.new(2,2,2)
--
meteor.Touched:connect(function(hit)
if meteor.Anchored == false then
meteor.Anchored = true
meteor.CanCollide = false
eff.Speed = NumberRange.new(50)
eff.VelocitySpread = 10000
PlaySnd(MeteorSnd,meteor)
Expld(15,meteor.Position)
for i = 1, 10 do
wait(.01)
mehs.Scale = mehs.Scale + Vector3.new(.5,.5,.5)
meteor.Transparency = meteor.Transparency + .1
end
eff.Enabled = false
end
end)
end





--KeyDown--
mus = true
function onKeyDown(key)
if key == "e" then
flyposy = flyposy - 10
elseif key == "q" then
flyposy = flyposy + 10
elseif key == "z" and lasactive == false then
CrossExplosion()
elseif key == "x" and lasactive == false then
Meteor()
elseif key == "c" and lasactive == false then
Beam()
elseif key == "v" and lasactive == false then
SwordStab()
elseif key == "m" then
if mus == true then
Music:Stop()
mus = false
elseif mus == false then
Music:Play()
mus = true
end
end
end

--Mouse Function--
Mouse = player:GetMouse()
if Mouse then
Mouse.KeyDown:connect(onKeyDown)
end

--Loop Function--
cter = 0
while chara.Humanoid.Health > 0 do
wait(.1)
chara.Humanoid.MaxHealth = math.huge
chara.Humanoid.Health = math.huge
bodfly.Position = Vector3.new(0,flyposy,0)
Enamate(EnamatePart)
Enamate2(EnamatePart,"EnamateRing")
Enamate(EnamatePart2)
Enamate2(EnamatePart2,"EnamateRing2")
Enamate3()
for i = 1, #lap do
lap[i].Anchored = false
end
for i = 1, #rap do
rap[i].Anchored = false
end
for i = 1, #llp do
llp[i].Anchored = false
end
for i = 1, #rlp do
rlp[i].Anchored = false
end
for i = 1, #chp do
chp[i].Anchored = false
end
for i = 1, #hdp do
hdp[i].Anchored = false
end
for i = 1, #ch do
if ch[i].ClassName == "Part" then
ch[i].Anchored = false
end
end
end