--//////////////////////////////////
--////   Holystone Productions  ////
--////       Copy Right         ////
--////  Blizzlike Repack v 1.0  ////
--//////////////////////////////////

local Lady = 36855
local Addone = 37890
local AddTwo = 37949

function LadyDeathWhisper_OnSpawn(punit, event)
end

function LadyDeathWhisper_OnCombat(punit, event)
   punit:SendChatMessage(14, 0, "What is this disturbance?! You dare trespass upon this hallowed ground? This shall be your final resting place.")
   punit:PlaySoundToSet(16868)
   punit:Root()
   punit:RegisterEvent("Lady_PhaseOne", 1000, 1)
end

function Lady_PhaseOne(punit, event)
   punit:RemoveEvents()
   punit:SetCombatCapable(1)
   punit:CastSpell(70842)
   punit:RegisterEvent("Lady_ShadowBolt", 3000, 0)
   punit:RegisterEvent("Lady_Add_Waves", 60000, 0)
   punit:RegisterEvent("Lady_DeathAndDecay", 15000, 0)
   punit:RegisterEvent("Lady_PhaseTwo", 1000, 0)
end

function Lady_ShadowBolt(punit, event)
   punit:FullCastSpellOnTarget(71254)
end

function Lady_Add_Waves(punit, event)
   local Addsspawn = math.random (1, 2)
    if (Addsspawn== 1) then
   punit:SpawnCreature(Addone, -620.625916, 2182.600098, 49.476868, 1.003537, 14, 80000)
   punit:SpawnCreature(Addone, -610.811829, 2212.762451, 49.465561, 3.175164, 14, 80000)
   punit:SpawnCreature(AddTwo, -621.614380, 2238.325928, 49.477795, 4.031246, 14, 80000)
   punit:SendChatMessage(42, 0, "Two Cult Fanatics and a Cult Adherent join the fight!")
    elseif (Addsspawn== 2) then
   punit:SpawnCreature(AddTwo, -620.625916, 2182.600098, 49.476868, 1.003537, 14, 80000)
   punit:SpawnCreature(Addone, -610.811829, 2212.762451, 49.465561, 3.175164, 14, 80000)
   punit:SpawnCreature(AddTwo, -621.614380, 2238.325928, 49.477795, 4.031246, 14, 80000)
   punit:SendChatMessage(42, 0, "Two Cult Adherents and a Cult Fanatic join the fight!")
  end
end

function Lady_DeathAndDecay(punit, event)
   punit:PlaySoundToSet(16880)
   punit:SendChatMessage(14, 0, "Arise and exult in your pure form!")
    local plr = punit:GetRandomPlayer(0)
    local x = plr:GetX()
    local y = plr:GetY()
    local z = plr:GetZ()
    punit:CastSpellAoF(x, y, z,71001)
end

function Lady_PhaseTwo(punit, event)
   if pUnit:GetHealthPct() <= 70 then
  punit:SendChatMessage(42, 0, "The Mana Barrier fades!")
  punit:SendChatMessage(14, 0, "This charade has gone on long enough! I see I must take matters into my own hands!")
  punit:RemoveEvents()
  punit:RemoveAllAuras()
  punit:SetHealthPct(100)
  punit:SetMana(0)
  punit:Unroot()
  punit:RegisterEvent("Lady_Frostbolt", 3000, 0)
  punit:RegisterEvent("Lady_DeathandDecayTwo", 15000, 0)
  punit:RegisterEvent("Lady_TouchofInsignificance", 5000, 0)
  end
end

function Lady_Frostbolt(punit, event)
  punit:FullCastSpellOnTarget(71420, punit:GetRandomPlayer(0))
end

function Lady_DeathandDecayTwo(punit, event)
   punit:PlaySoundToSet(16880)
   punit:SendChatMessage(14, 0, "Arise and exult in your pure form!")
    local plr = punit:GetRandomPlayer(0)
    local x = plr:GetX()
    local y = plr:GetY()
    local z = plr:GetZ()
    punit:CastSpellAoF(x, y, z,71001)
end

function Lady_TouchofInsignificance(punit, event)
    local plr = punit:GetClosestTarget()
    plr:AddAura(71204, 30000)
end

function LadyDeathWhisper_OnLeaveCombat(punit, event)
    punit:RemoveEvents()
end

function LadyDeathWhisper_OnKillPlayer(punit, event)
  local chance = math.random(1, 2)
   if(chance == 1) then
  punit:PlaySoundToSet(16869)
  punit:SendChatMessage(14, 0, "Do you yet grasp of the futility of your actions?")
   end
   if(chance == 2) then
  punit:PlaySoundToSet(16870)
  punit:SendChatMessage(14, 0, "Embrace the darkness... Darkness eternal!")
end

function LadyDeathWhisper_OnDead(punit, event)
  punit:SendChatMessage(14, 0, "All part of the masters plan! Your end is... inevitable!")
  punit:PlaySoundToSet(16871)
  punit:RemoveEvents()
end

RegisterUnitEvent(Lady, 18, "LadyDeathWhisper_OnSpawn")
RegisterUnitEvent(Lady, 1, "LadyDeathWhisper_OnCombat")
RegisterUnitEvent(Lady, 2, "LadyDeathWhisper_OnLeaveCombat")
RegisterUnitEvent(Lady, 3, "LadyDeathWhisper_OnKillPlayer")
RegisterUnitEvent(Lady, 4, "LadyDeathWhisper_OnDied")