boss_the_lich_king.cpp

Go to the documentation of this file.

/*
 * This file is part of the TrinityCore Project. See AUTHORS file for Copyright information
 *
 * This program is free software; you can redistribute it and/or modify it
 * under the terms of the GNU General Public License as published by the
 * Free Software Foundation; either version 2 of the License, or (at your
 * option) any later version.
 *
 * This program is distributed in the hope that it will be useful, but WITHOUT
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
 * more details.
 *
 * You should have received a copy of the GNU General Public License along
 * with this program. If not, see <http://www.gnu.org/licenses/>.
 */
 
#include "icecrown_citadel.h"
#include "CellImpl.h"
#include "Containers.h"
#include "CreatureTextMgr.h"
#include "GridNotifiersImpl.h"
#include "InstanceScript.h"
#include "MotionMaster.h"
#include "ObjectAccessor.h"
#include "ScriptedCreature.h"
#include "ScriptMgr.h"
#include "SpellAuraEffects.h"
#include "SpellScript.h"
#include "TemporarySummon.h"
#include "Vehicle.h"
#include "Weather.h"
 
enum LichKingTexts
{
    // The Lich King
    SAY_LK_INTRO_1                  = 0,
    SAY_LK_INTRO_2                  = 1,
    SAY_LK_INTRO_3                  = 2,
    SAY_LK_REMORSELESS_WINTER       = 4,
    SAY_LK_QUAKE                    = 5,
    SAY_LK_SUMMON_VALKYR            = 6,
    SAY_LK_HARVEST_SOUL             = 7,
    SAY_LK_FROSTMOURNE_ESCAPE       = 8,    // not said on heroic
    SAY_LK_FROSTMOURNE_KILL         = 9,    // not said on heroic
    SAY_LK_KILL                     = 10,
    SAY_LK_BERSERK                  = 11,
    EMOTE_DEFILE_WARNING            = 12,
    EMOTE_NECROTIC_PLAGUE_WARNING   = 13,
    SAY_LK_OUTRO_1                  = 14,
    SAY_LK_OUTRO_2                  = 15,
    SAY_LK_OUTRO_3                  = 16,
    SAY_LK_OUTRO_4                  = 17,
    SAY_LK_OUTRO_5                  = 18,
    SAY_LK_OUTRO_6                  = 19,
    SAY_LK_OUTRO_7                  = 20,
    SAY_LK_OUTRO_8                  = 21,
 
    // Highlord Tirion Fordring
    SAY_TIRION_INTRO_1              = 0,
    SAY_TIRION_INTRO_2              = 1,
    SAY_TIRION_OUTRO_1              = 2,
    SAY_TIRION_OUTRO_2              = 3,
 
    // Terenas Menethil (outro)
    SAY_TERENAS_OUTRO_1             = 0,
    SAY_TERENAS_OUTRO_2             = 1,
 
    // Terenas Menethil (Frostmourne)
    SAY_TERENAS_INTRO_1             = 0,
    SAY_TERENAS_INTRO_2             = 1,
    SAY_TERENAS_INTRO_3             = 2,
};
 
enum LichKingSpells
{
    // The Lich King
    SPELL_PLAGUE_AVOIDANCE              = 72846,    // raging spirits also get it
    SPELL_EMOTE_SIT_NO_SHEATH           = 73220,
    SPELL_BOSS_HITTIN_YA                = 73878,
    SPELL_EMOTE_SHOUT_NO_SHEATH         = 73213,
    SPELL_ICE_LOCK                      = 71614,
 
    // Phase 1
    SPELL_SUMMON_SHAMBLING_HORROR       = 70372,
    SPELL_RISEN_WITCH_DOCTOR_SPAWN      = 69639,
    SPELL_SUMMON_DRUDGE_GHOULS          = 70358,
    SPELL_INFEST                        = 70541,
    SPELL_NECROTIC_PLAGUE               = 70337,
    SPELL_NECROTIC_PLAGUE_JUMP          = 70338,
    SPELL_PLAGUE_SIPHON                 = 74074,
    SPELL_SHADOW_TRAP                   = 73539,
    SPELL_SHADOW_TRAP_AURA              = 73525,
    SPELL_SHADOW_TRAP_KNOCKBACK         = 73529,
    SPELL_SHADOW_TRAP_VISUAL            = 73530,
 
    // Phase Transition
    SPELL_REMORSELESS_WINTER_1          = 68981,
    SPELL_REMORSELESS_WINTER_2          = 72259,
    SPELL_PAIN_AND_SUFFERING            = 72133,
    SPELL_SUMMON_ICE_SPHERE             = 69104,
    SPELL_ICE_SPHERE                    = 69090,
    SPELL_ICE_BURST_TARGET_SEARCH       = 69109,
    SPELL_ICE_PULSE                     = 69091,
    SPELL_ICE_BURST                     = 69108,
    SPELL_RAGING_SPIRIT                 = 69200,
    SPELL_RAGING_SPIRIT_VISUAL          = 69197,
    SPELL_RAGING_SPIRIT_VISUAL_CLONE    = 69198,
    SPELL_SOUL_SHRIEK                   = 69242,
    SPELL_QUAKE                         = 72262,
 
    // Phase 2
    SPELL_DEFILE                        = 72762,
    SPELL_DEFILE_AURA                   = 72743,
    SPELL_DEFILE_GROW                   = 72756,
    SPELL_SUMMON_VALKYR                 = 69037,
    SPELL_SUMMON_VALKYR_PERIODIC        = 74361,
    SPELL_HARVEST_SOUL_VALKYR           = 68985,    // Val'kyr Shadowguard vehicle aura
    SPELL_SOUL_REAPER                   = 69409,
    SPELL_SOUL_REAPER_BUFF              = 69410,
    SPELL_WINGS_OF_THE_DAMNED           = 74352,
    SPELL_VALKYR_TARGET_SEARCH          = 69030,
    SPELL_CHARGE                        = 74399,    // cast on selected target
    SPELL_VALKYR_CARRY                  = 74445,    // removes uninteractible flag
    SPELL_LIFE_SIPHON                   = 73488,
    SPELL_LIFE_SIPHON_HEAL              = 73489,
    SPELL_EJECT_ALL_PASSENGERS          = 68576,
    SPELL_VALKYR_TRANSFORM              = 73501,
 
    // Phase 3
    SPELL_VILE_SPIRITS                  = 70498,
    SPELL_VILE_SPIRIT_MOVE_SEARCH       = 70501,
    SPELL_VILE_SPIRIT_DAMAGE_SEARCH     = 70502,
    SPELL_SPIRIT_BURST                  = 70503,
    SPELL_HARVEST_SOUL                  = 68980,
    SPELL_HARVEST_SOULS                 = 73654,    // Heroic version, weird because it has all 4 difficulties just like above spell
    SPELL_HARVEST_SOUL_VEHICLE          = 68984,
    SPELL_HARVEST_SOUL_VISUAL           = 71372,
    SPELL_HARVEST_SOUL_TELEPORT         = 72546,
    SPELL_HARVEST_SOULS_TELEPORT        = 73655,    // Heroic version, also periodic damage (Frostmourne)
    SPELL_HARVEST_SOUL_TELEPORT_BACK    = 72597,
    SPELL_IN_FROSTMOURNE_ROOM           = 74276,
    SPELL_KILL_FROSTMOURNE_PLAYERS      = 75127,
    SPELL_HARVESTED_SOUL                = 72679,
    SPELL_TRIGGER_VILE_SPIRIT_HEROIC    = 73582,    
 
    // Frostmourne
    SPELL_LIGHTS_FAVOR                  = 69382,
    SPELL_RESTORE_SOUL                  = 72595,
    SPELL_RESTORE_SOULS                 = 73650,    // Heroic
    SPELL_DARK_HUNGER                   = 69383,    // Passive proc healing
    SPELL_DARK_HUNGER_HEAL              = 69384,
    SPELL_DESTROY_SOUL                  = 74086,    // Used when Terenas Menethil dies
    SPELL_SOUL_RIP                      = 69397,    // Deals increasing damage
    SPELL_SOUL_RIP_DAMAGE               = 69398,
    SPELL_TERENAS_LOSES_INSIDE          = 72572,
    SPELL_SUMMON_SPIRIT_BOMB_1          = 73581,    // (Heroic)
    SPELL_SUMMON_SPIRIT_BOMB_2          = 74299,    // (Heroic)
    SPELL_EXPLOSION                     = 73576,    // Spirit Bomb (Heroic)
 
    // Outro
    SPELL_FURY_OF_FROSTMOURNE           = 72350,
    SPELL_FURY_OF_FROSTMOURNE_NO_REZ    = 72351,
    SPELL_EMOTE_QUESTION_NO_SHEATH      = 73330,
    SPELL_RAISE_DEAD                    = 71769,
    SPELL_LIGHTS_BLESSING               = 71797,
    SPELL_JUMP                          = 71809,
    SPELL_JUMP_TRIGGERED                = 71811,
    SPELL_JUMP_2                        = 72431,
    SPELL_SUMMON_BROKEN_FROSTMOURNE     = 74081,    // visual
    SPELL_SUMMON_BROKEN_FROSTMOURNE_2   = 72406,    // animation
    SPELL_SUMMON_BROKEN_FROSTMOURNE_3   = 73017,    // real summon
    SPELL_BROKEN_FROSTMOURNE            = 72398,
    SPELL_BROKEN_FROSTMOURNE_KNOCK      = 72405,
    SPELL_SOUL_BARRAGE                  = 72305,
    SPELL_SUMMON_TERENAS                = 72420,
    SPELL_MASS_RESURRECTION             = 72429,
    SPELL_MASS_RESURRECTION_REAL        = 72423,
    SPELL_PLAY_MOVIE                    = 73159,
 
    // Shambling Horror
    SPELL_SHOCKWAVE                     = 72149,
    SPELL_ENRAGE                        = 72143,
    SPELL_FRENZY                        = 28747,
};
 
#define NECROTIC_PLAGUE_LK   RAID_MODE<uint32>(70337, 73912, 73913, 73914)
#define NECROTIC_PLAGUE_PLR  RAID_MODE<uint32>(70338, 73785, 73786, 73787)
#define REMORSELESS_WINTER_1 RAID_MODE<uint32>(68981, 74270, 74271, 74272)
#define REMORSELESS_WINTER_2 RAID_MODE<uint32>(72259, 74273, 74274, 74275)
#define SUMMON_VALKYR        RAID_MODE<uint32>(69037, 74361, 69037, 74361)
#define HARVEST_SOUL         RAID_MODE<uint32>(68980, 74325, 74296, 74297)
#define ENRAGE               RAID_MODE<uint32>(72143, 72146, 72147, 72148)
 
enum LichKingEvents
{
    // The Lich King
    // intro events
    EVENT_INTRO_MOVE_1 = 1,
    EVENT_INTRO_MOVE_2,
    EVENT_INTRO_MOVE_3,
    EVENT_INTRO_TALK_1,
    EVENT_EMOTE_CAST_SHOUT,
    EVENT_INTRO_EMOTE_1,
    EVENT_INTRO_CHARGE,
    EVENT_INTRO_CAST_FREEZE,
    EVENT_FINISH_INTRO,
 
    // combat events
    EVENT_SUMMON_SHAMBLING_HORROR,
    EVENT_SUMMON_DRUDGE_GHOUL,
    EVENT_INFEST,
    EVENT_NECROTIC_PLAGUE,
    EVENT_SHADOW_TRAP, // heroic only
    EVENT_SOUL_REAPER,
    EVENT_DEFILE,
    EVENT_HARVEST_SOUL, // normal mode only
    EVENT_PAIN_AND_SUFFERING,
    EVENT_SUMMON_ICE_SPHERE,
    EVENT_SUMMON_RAGING_SPIRIT,
    EVENT_QUAKE,
    EVENT_SUMMON_VALKYR,
    EVENT_GRAB_PLAYER,
    EVENT_MOVE_TO_DROP_POS,
    EVENT_LIFE_SIPHON, // heroic only
    EVENT_MOVE_TO_CENTER, // heroic only
    EVENT_START_ATTACK,
    EVENT_SUMMON_RAGING_SPIRIT_2,
    EVENT_QUAKE_2,
    EVENT_VILE_SPIRITS,
    EVENT_HARVEST_SOULS, // heroic only
    EVENT_BERSERK,
    EVENT_SOUL_RIP,
    EVENT_DESTROY_SOUL,
    EVENT_FROSTMOURNE_TALK_1,
    EVENT_FROSTMOURNE_TALK_2,
    EVENT_FROSTMOURNE_TALK_3,
    EVENT_TELEPORT_BACK,
    EVENT_FROSTMOURNE_HEROIC,
    EVENT_OUTRO_TALK_1,
    EVENT_OUTRO_TALK_2,
    EVENT_OUTRO_EMOTE_TALK,
    EVENT_OUTRO_TALK_3,
    EVENT_OUTRO_MOVE_CENTER,
    EVENT_OUTRO_TALK_4,
    EVENT_OUTRO_RAISE_DEAD,
    EVENT_OUTRO_TALK_5,
    EVENT_OUTRO_BLESS,
    EVENT_OUTRO_REMOVE_ICE,
    EVENT_OUTRO_MOVE_1,
    EVENT_OUTRO_JUMP,
    EVENT_OUTRO_TALK_6,
    EVENT_OUTRO_KNOCK_BACK,
    EVENT_OUTRO_SOUL_BARRAGE,
    EVENT_OUTRO_SUMMON_TERENAS,
    EVENT_OUTRO_TERENAS_TALK_1,
    EVENT_OUTRO_TERENAS_TALK_2,
    EVENT_OUTRO_TALK_7,
    EVENT_OUTRO_TALK_8,
 
    // Shambling Horror
    EVENT_SHOCKWAVE,
    EVENT_ENRAGE,
 
    // Raging Spirit
    EVENT_SOUL_SHRIEK,
    EVENT_SET_AGRESSIVE,
 
    // Strangulate Vehicle (Harvest Soul)
    EVENT_TELEPORT,
    EVENT_MOVE_TO_LICH_KING,
    EVENT_DESPAWN_SELF,
 
    //Spirit Bomb
    EVENT_BOMB_EXPLOSION
};
 
enum LichKingEventGroups
{
    EVENT_GROUP_BERSERK         = 1,
    EVENT_GROUP_VILE_SPIRITS    = 2,
};
 
enum LichKingPhases
{
    PHASE_INTRO                 = 1,
    PHASE_ONE                   = 2,
    PHASE_TWO                   = 3,
    PHASE_THREE                 = 4,
    PHASE_TRANSITION            = 5,
    PHASE_FROSTMOURNE           = 6,    // only set on heroic mode when all players are sent into frostmourne
    PHASE_OUTRO                 = 7
};
 
#define PHASE_TWO_THREE  (events.IsInPhase(PHASE_TWO) ? PHASE_TWO : PHASE_THREE)
 
Position const CenterPosition     = {503.6282f, -2124.655f, 840.8569f, 0.0f};
Position const TirionSpawn        = {505.2118f, -2124.353f, 840.9403f, 3.141593f};
Position const TirionIntro        = {489.2970f, -2124.840f, 840.8569f, 0.0f};
Position const TirionCharge       = {482.9019f, -2124.479f, 840.8570f, 0.0f};
Position const LichKingIntro[3]   =
{
    {432.0851f, -2123.673f, 864.6582f, 0.0f},
    {457.8351f, -2123.423f, 841.1582f, 0.0f},
    {465.0730f, -2123.470f, 840.8569f, 0.0f},
};
Position const OutroPosition1     = {493.6286f, -2124.569f, 840.8569f, 0.0f};
Position const OutroFlying        = {508.9897f, -2124.561f, 845.3565f, 0.0f};
Position const TerenasSpawn       = {495.5542f, -2517.012f, 1050.000f, 4.6993f};
Position const TerenasSpawnHeroic = {495.7080f, -2523.760f, 1050.000f, 0.0f};
Position const SpiritWardenSpawn  = {495.3406f, -2529.983f, 1050.000f, 1.5592f};
 
enum LichKingPoints
{
    POINT_CENTER_1          = 1,
    POINT_CENTER_2          = 2,
    POINT_TIRION_INTRO      = 3,
    POINT_LK_INTRO_1        = 4,
    POINT_LK_INTRO_2        = 5,
    POINT_LK_INTRO_3        = 6,
    POINT_TIRION_CHARGE     = 7,
    POINT_DROP_PLAYER       = 8,
    POINT_LK_OUTRO_1        = 9,
    POINT_TIRION_OUTRO_1    = 10,
    POINT_OUTRO_JUMP        = 11,
    POINT_LK_OUTRO_2        = 12,
    POINT_GROUND            = 13,
    POINT_SIPHON            = 14,
    POINT_CHARGE            = 1003, // globally used number for charge spell effects
};
 
enum LichKingActions
{
    ACTION_START_ENCOUNTER      = 0,
    ACTION_CONTINUE_INTRO       = 1,
    ACTION_START_ATTACK         = 2,
    ACTION_OUTRO                = 3,
    ACTION_PLAY_MUSIC           = 4,
    ACTION_BREAK_FROSTMOURNE    = 5,
    ACTION_SUMMON_TERENAS       = 6,
    ACTION_FINISH_OUTRO         = 7,
    ACTION_TELEPORT_BACK        = 8,
    ACTION_DISABLE_RAGING       = 9
};
 
enum LichKingMiscData
{
    LIGHT_DEFAULT               = 2488,
    LIGHT_SNOWSTORM             = 2490,
    LIGHT_SOULSTORM             = 2508,
    LIGHT_FOG                   = 2509,
 
    MUSIC_FROZEN_THRONE         = 17457,
    MUSIC_SPECIAL               = 17458,    // Summon Shambling Horror, Remorseless Winter, Quake, Summon Val'kyr Periodic, Harvest Soul, Vile Spirits
    MUSIC_FURY_OF_FROSTMOURNE   = 17459,
    MUSIC_FINAL                 = 17460,    // Raise Dead, Light's Blessing
 
    SOUND_PAIN                  = 17360,    // separate sound, not attached to any text
 
    EQUIP_ASHBRINGER_GLOWING    = 50442,
    EQUIP_BROKEN_FROSTMOURNE    = 50840,
 
    DATA_PLAGUE_STACK           = 70337,
    DATA_VILE                   = 45814622,
    DATA_GRABBED_PLAYER_GUID    = 0,
 
    GOSSIP_MENU_START_INTRO     = 10993,
};
 
class NecroticPlagueTargetCheck
{
    public:
        NecroticPlagueTargetCheck(Unit const* obj, uint32 notAura1 = 0, uint32 notAura2 = 0)
            : _sourceObj(obj), _notAura1(notAura1), _notAura2(notAura2)
        {
        }
 
        bool operator()(Unit* unit) const
        {
            if (!unit || unit == _sourceObj || !unit->isTargetableForAttack() || unit->GetTypeId() != TYPEID_PLAYER || unit->HasAura(SPELL_PLAGUE_AVOIDANCE))
                return false;
            if ((_notAura1 && unit->HasAura(_notAura1)) || (_notAura2 && unit->HasAura(_notAura2)))
                return false;
            return true;
        }
 
    private:
        Unit const* _sourceObj;
        uint32 _notAura1;
        uint32 _notAura2;
};
 
class FrozenThroneResetWorker
{
    public:
        FrozenThroneResetWorker() { }
 
        bool operator()(GameObject* go)
        {
            switch (go->GetEntry())
            {
                case GO_ARTHAS_PLATFORM:
                    go->SetDestructibleState(GO_DESTRUCTIBLE_REBUILDING);
                    break;
                case GO_DOODAD_ICECROWN_THRONEFROSTYWIND01:
                    go->SetGoState(GO_STATE_ACTIVE);
                    break;
                case GO_DOODAD_ICECROWN_THRONEFROSTYEDGE01:
                    go->SetGoState(GO_STATE_READY);
                    break;
                case GO_DOODAD_ICESHARD_STANDING02:
                case GO_DOODAD_ICESHARD_STANDING01:
                case GO_DOODAD_ICESHARD_STANDING03:
                case GO_DOODAD_ICESHARD_STANDING04:
                    go->ResetDoorOrButton();
                    break;
                default:
                    break;
            }
 
            return false;
        }
};
 
class VileSpiritActivateEvent : public BasicEvent
{
    public:
        explicit VileSpiritActivateEvent(Creature* owner)
            : _owner(owner)
        {
        }
 
        bool Execute(uint64 /*time*/, uint32 /*diff*/) override
        {
            _owner->SetReactState(REACT_AGGRESSIVE);
            _owner->CastSpell(_owner, SPELL_VILE_SPIRIT_MOVE_SEARCH, true);
            _owner->CastSpell(nullptr, SPELL_VILE_SPIRIT_DAMAGE_SEARCH, true);
            return true;
        }
 
    private:
        Creature* _owner;
};
 
class TriggerWickedSpirit : public BasicEvent
{
    public:
        explicit TriggerWickedSpirit(Creature* owner)
            : _owner(owner), _counter(13)
        {
        }
 
        bool Execute(uint64 /*time*/, uint32 /*diff*/) override
        {
            _owner->CastSpell(nullptr, SPELL_TRIGGER_VILE_SPIRIT_HEROIC, { SPELLVALUE_MAX_TARGETS, 1 });
 
            if (--_counter)
            {
                _owner->m_Events.AddEvent(this, _owner->m_Events.CalculateTime(3s));
                return false;
            }
 
            return true;
        }
 
    private:
        Creature* _owner;
        uint32 _counter;
};
 
// 36597 - The Lich King
struct boss_the_lich_king : public BossAI
{
    boss_the_lich_king(Creature* creature) : BossAI(creature, DATA_THE_LICH_KING)
    {
        Initialize();
    }
 
    void Initialize()
    {
        _necroticPlagueStack = 0;
        _vileSpiritExplosions = 0;
    }
 
    void Reset() override
    {
        _Reset();
        me->SetImmuneToPC(true);
        me->SetReactState(REACT_PASSIVE);
        events.SetPhase(PHASE_INTRO);
        Initialize();
        SetEquipmentSlots(true);
 
        // Reset The Frozen Throne gameobjects
        FrozenThroneResetWorker reset;
        Trinity::GameObjectWorker<FrozenThroneResetWorker> worker(me, reset);
        Cell::VisitGridObjects(me, worker, 333.0f);
 
        // Reset any light override
        me->GetMap()->SetZoneOverrideLight(AREA_ICECROWN_CITADEL, LIGHT_DEFAULT, 0, 5s);
 
        if (!ObjectAccessor::GetCreature(*me, instance->GetGuidData(DATA_HIGHLORD_TIRION_FORDRING)))
            me->SummonCreature(NPC_HIGHLORD_TIRION_FORDRING_LK, TirionSpawn, TEMPSUMMON_MANUAL_DESPAWN);
    }
 
    void JustDied(Unit* killer) override
    {
        _JustDied();
        DoCastAOE(SPELL_PLAY_MOVIE, false);
        me->SetDisableGravity(false);
        me->GetMotionMaster()->MoveFall();
        if (Creature* frostmourne = me->FindNearestCreature(NPC_FROSTMOURNE_TRIGGER, 50.0f))
            frostmourne->DespawnOrUnsummon();
        me->GetMap()->SetZoneOverrideLight(AREA_ICECROWN_CITADEL, LIGHT_DEFAULT, LIGHT_FOG, 5s);
        me->GetMap()->SetZoneWeather(AREA_ICECROWN_CITADEL, WEATHER_STATE_FOG, 0.0f);
 
        if (Is25ManRaid())
            if (Player* player = Object::ToPlayer(killer))
                player->RewardPlayerAndGroupAtEvent(NPC_THE_LICH_KING_QUEST, player);
    }
 
    void JustEngagedWith(Unit* target) override
    {
        if (!instance->CheckRequiredBosses(DATA_THE_LICH_KING, target->ToPlayer()))
        {
            EnterEvadeMode(EvadeReason::Other);
            instance->DoCastSpellOnPlayers(LIGHT_S_HAMMER_TELEPORT);
            return;
        }
 
        me->setActive(true);
        DoZoneInCombat();
 
        events.SetPhase(PHASE_ONE);
        events.ScheduleEvent(EVENT_SUMMON_SHAMBLING_HORROR, 20s, 0, PHASE_ONE);
        events.ScheduleEvent(EVENT_SUMMON_DRUDGE_GHOUL, 10s, 0, PHASE_ONE);
        events.ScheduleEvent(EVENT_INFEST, 5s, 0, PHASE_ONE);
        events.ScheduleEvent(EVENT_NECROTIC_PLAGUE, 30s, 33s, 0, PHASE_ONE);
        events.ScheduleEvent(EVENT_BERSERK, 15min, EVENT_GROUP_BERSERK);
        if (IsHeroic())
            events.ScheduleEvent(EVENT_SHADOW_TRAP, 15500ms, 0, PHASE_ONE);
    }
 
    bool CanAIAttack(Unit const* target) const override
    {
        // The Lich King must not select targets in frostmourne room if he killed everyone outside
        return !target->HasAura(SPELL_IN_FROSTMOURNE_ROOM) && BossAI::CanAIAttack(target);
    }
 
    void EnterEvadeMode(EvadeReason /*why*/) override
    {
        if (Creature* tirion = ObjectAccessor::GetCreature(*me, instance->GetGuidData(DATA_HIGHLORD_TIRION_FORDRING)))
            tirion->DespawnOrUnsummon();
        DoCastAOE(SPELL_KILL_FROSTMOURNE_PLAYERS);
        EntryCheckPredicate pred(NPC_STRANGULATE_VEHICLE);
        summons.DoAction(ACTION_TELEPORT_BACK, pred);
        summons.DespawnAll();
        _DespawnAtEvade();
    }
 
    void KilledUnit(Unit* victim) override
    {
        if (victim->GetTypeId() == TYPEID_PLAYER && !me->IsInEvadeMode() && !events.IsInPhase(PHASE_OUTRO))
            Talk(SAY_LK_KILL);
    }
 
    void DoAction(int32 action) override
    {
        switch (action)
        {
            case ACTION_START_ENCOUNTER:
                instance->SetBossState(DATA_THE_LICH_KING, IN_PROGRESS);
                Talk(SAY_LK_INTRO_1);
                me->GetMap()->SetZoneMusic(AREA_ICECROWN_CITADEL, MUSIC_FROZEN_THRONE);
                // schedule talks
                me->SetStandState(UNIT_STAND_STATE_STAND);
                events.ScheduleEvent(EVENT_INTRO_MOVE_1, 4s);
                break;
            case ACTION_START_ATTACK:
                events.ScheduleEvent(EVENT_START_ATTACK, 5s);
                break;
            case ACTION_PLAY_MUSIC:
                me->GetMap()->SetZoneMusic(AREA_ICECROWN_CITADEL, MUSIC_FINAL);
                break;
            case ACTION_RESTORE_LIGHT:
                me->GetMap()->SetZoneOverrideLight(AREA_ICECROWN_CITADEL, LIGHT_DEFAULT, 0, 5s);
                break;
            case ACTION_BREAK_FROSTMOURNE:
                me->CastSpell(nullptr, SPELL_SUMMON_BROKEN_FROSTMOURNE, TRIGGERED_IGNORE_CAST_IN_PROGRESS);
                me->CastSpell(nullptr, SPELL_SUMMON_BROKEN_FROSTMOURNE_2, TRIGGERED_IGNORE_CAST_IN_PROGRESS);
                SetEquipmentSlots(false, EQUIP_BROKEN_FROSTMOURNE);
                events.ScheduleEvent(EVENT_OUTRO_TALK_6, 2500ms, 0, PHASE_OUTRO);
                break;
            case ACTION_FINISH_OUTRO:
                events.ScheduleEvent(EVENT_OUTRO_TALK_7, 7s, 0, PHASE_OUTRO);
                events.ScheduleEvent(EVENT_OUTRO_TALK_8, 17s, 0, PHASE_OUTRO);
                break;
            case ACTION_TELEPORT_BACK:
            {
                EntryCheckPredicate pred(NPC_STRANGULATE_VEHICLE);
                summons.DoAction(ACTION_TELEPORT_BACK, pred);
                if (!IsHeroic())
                    Talk(SAY_LK_FROSTMOURNE_ESCAPE);
                break;
            }
            default:
                break;
        }
    }
 
    uint32 GetData(uint32 type) const override
    {
        switch (type)
        {
            case DATA_PLAGUE_STACK:
                return _necroticPlagueStack;
            case DATA_VILE:
                return _vileSpiritExplosions;
            default:
                break;
        }
 
        return 0;
    }
 
    void SetData(uint32 type, uint32 value) override
    {
        switch (type)
        {
            case DATA_PLAGUE_STACK:
                _necroticPlagueStack = std::max(value, _necroticPlagueStack);
                break;
            case DATA_VILE:
                _vileSpiritExplosions += value;
                break;
            default:
                break;
        }
    }
 
    void DamageTaken(Unit* /*attacker*/, uint32& /*damage*/, DamageEffectType /*damageType*/, SpellInfo const* /*spellInfo = nullptr*/) override
    {
        if (events.IsInPhase(PHASE_ONE) && !HealthAbovePct(70))
        {
            events.SetPhase(PHASE_TRANSITION);
            me->SetReactState(REACT_PASSIVE);
            me->AttackStop();
            me->InterruptNonMeleeSpells(true);
            me->GetMotionMaster()->MovePoint(POINT_CENTER_1, CenterPosition);
            return;
        }
 
        if (events.IsInPhase(PHASE_TWO) && !HealthAbovePct(40))
        {
            events.SetPhase(PHASE_TRANSITION);
            me->SetReactState(REACT_PASSIVE);
            me->AttackStop();
            me->InterruptNonMeleeSpells(true);
            me->GetMotionMaster()->MovePoint(POINT_CENTER_2, CenterPosition);
            return;
        }
 
        if (events.IsInPhase(PHASE_THREE) && !HealthAbovePct(10))
        {
            me->SetReactState(REACT_PASSIVE);
            me->AttackStop();
            events.Reset();
            events.SetPhase(PHASE_OUTRO);
            summons.DespawnAll();
            me->GetMap()->SetZoneMusic(AREA_ICECROWN_CITADEL, MUSIC_FURY_OF_FROSTMOURNE);
            me->InterruptNonMeleeSpells(true);
            me->CastSpell(nullptr, SPELL_FURY_OF_FROSTMOURNE, TRIGGERED_NONE);
            me->SetWalk(true);
            events.ScheduleEvent(EVENT_OUTRO_TALK_1, 2600ms, 0, PHASE_OUTRO);
            events.ScheduleEvent(EVENT_OUTRO_EMOTE_TALK, 6600ms, 0, PHASE_OUTRO);
            events.ScheduleEvent(EVENT_OUTRO_EMOTE_TALK, 17600ms, 0, PHASE_OUTRO);
            events.ScheduleEvent(EVENT_OUTRO_EMOTE_TALK, 27600ms, 0, PHASE_OUTRO);
            events.ScheduleEvent(EVENT_OUTRO_TALK_2, 34600ms, 0, PHASE_OUTRO);
            events.ScheduleEvent(EVENT_OUTRO_TALK_3, 43600ms, 0, PHASE_OUTRO);
            events.ScheduleEvent(EVENT_EMOTE_CAST_SHOUT, 54600ms, 0, PHASE_OUTRO);
            events.ScheduleEvent(EVENT_OUTRO_EMOTE_TALK, 58600ms, 0, PHASE_OUTRO);
            events.ScheduleEvent(EVENT_OUTRO_MOVE_CENTER, 69600ms, 0, PHASE_OUTRO);
            // stop here. rest will get scheduled from MovementInform
            return;
        }
    }
 
    void JustSummoned(Creature* summon) override
    {
        switch (summon->GetEntry())
        {
            case NPC_SHAMBLING_HORROR:
            case NPC_DRUDGE_GHOUL:
                summon->CastSpell(summon, SPELL_RISEN_WITCH_DOCTOR_SPAWN, true);
                summon->SetReactState(REACT_PASSIVE);
                summon->HandleEmoteCommand(EMOTE_ONESHOT_EMERGE);
                SetAggressiveStateAfter(5s, summon, true, me, StartCombatArgs().SetAvoidTargetVictim(true));
                break;
            case NPC_SHADOW_TRAP:
                summon->CastSpell(summon, SPELL_SHADOW_TRAP_VISUAL, true);
                break;
            case NPC_ICE_SPHERE:
            {
                if (Unit* target = SelectTarget(SelectTargetMethod::Random, 0, 0.0f, true))
                {
                    summon->SetReactState(REACT_PASSIVE);
                    summon->CastSpell(summon, SPELL_ICE_SPHERE, false);
                    summon->CastSpell(summon, SPELL_ICE_BURST_TARGET_SEARCH, false);
                    summon->CastSpell(target, SPELL_ICE_PULSE, false);
                    summon->GetMotionMaster()->MoveFollow(target, 0.0f, 0.0f);
                }
                else
                    summon->DespawnOrUnsummon();
                break;
            }
            case NPC_DEFILE:
                summon->SetReactState(REACT_PASSIVE);
                summon->CastSpell(summon, SPELL_DEFILE_AURA, false);
                break;
            case NPC_FROSTMOURNE_TRIGGER:
            {
                summon->CastSpell(nullptr, SPELL_BROKEN_FROSTMOURNE, true);
 
                me->GetMap()->SetZoneOverrideLight(AREA_ICECROWN_CITADEL, LIGHT_DEFAULT, LIGHT_SOULSTORM, 10s);
                me->GetMap()->SetZoneWeather(AREA_ICECROWN_CITADEL, WEATHER_STATE_BLACKSNOW, 0.5f);
 
                events.ScheduleEvent(EVENT_OUTRO_SOUL_BARRAGE, 5s, 0, PHASE_OUTRO);
                return;
            }
            case NPC_VILE_SPIRIT:
            {
                summons.Summon(summon);
                summon->SetReactState(REACT_PASSIVE);
                summon->SetSpeedRate(MOVE_FLIGHT, 0.5f);
                summon->GetMotionMaster()->MoveRandom(10.0f);
                if (!events.IsInPhase(PHASE_FROSTMOURNE))
                    summon->m_Events.AddEvent(new VileSpiritActivateEvent(summon), summon->m_Events.CalculateTime(15s));
                return;
            }
            case NPC_STRANGULATE_VEHICLE:
                summons.Summon(summon);
                return;
            case NPC_HIGHLORD_TIRION_FORDRING_LK:
                return;
            default:
                break;
        }
 
        BossAI::JustSummoned(summon);
    }
 
    void SummonedCreatureDies(Creature* summon, Unit* /*killer*/) override
    {
        switch (summon->GetEntry())
        {
            case NPC_SHAMBLING_HORROR:
            case NPC_DRUDGE_GHOUL:
            case NPC_ICE_SPHERE:
            case NPC_VALKYR_SHADOWGUARD:
            case NPC_RAGING_SPIRIT:
            case NPC_VILE_SPIRIT:
                summon->ToTempSummon()->SetTempSummonType(TEMPSUMMON_CORPSE_DESPAWN);
                break;
            default:
                break;
        }
    }
 
    void SpellHit(WorldObject* /*caster*/, SpellInfo const* spellInfo) override
    {
        if (spellInfo->Id == SPELL_HARVESTED_SOUL && me->IsInCombat() && !IsHeroic())
            Talk(SAY_LK_FROSTMOURNE_KILL);
 
        if (spellInfo->Id == REMORSELESS_WINTER_1 || spellInfo->Id == REMORSELESS_WINTER_2)
        {
            me->GetMap()->SetZoneOverrideLight(AREA_ICECROWN_CITADEL, LIGHT_DEFAULT, LIGHT_SNOWSTORM, 5s);
            me->GetMap()->SetZoneWeather(AREA_ICECROWN_CITADEL, WEATHER_STATE_LIGHT_SNOW, 0.5f);
            summons.DespawnEntry(NPC_SHADOW_TRAP);
        }
    }
 
    void MovementInform(uint32 type, uint32 pointId) override
    {
        if (type != POINT_MOTION_TYPE)
            return;
 
        switch (pointId)
        {
            case POINT_LK_INTRO_1:
                // schedule for next update cycle, current update must finalize movement
                events.ScheduleEvent(EVENT_INTRO_MOVE_2, 1ms, 0, PHASE_INTRO);
                break;
            case POINT_LK_INTRO_2:
                events.ScheduleEvent(EVENT_INTRO_MOVE_3, 1ms, 0, PHASE_INTRO);
                break;
            case POINT_LK_INTRO_3:
                if (Creature* tirion = ObjectAccessor::GetCreature(*me, instance->GetGuidData(DATA_HIGHLORD_TIRION_FORDRING)))
                    tirion->AI()->DoAction(ACTION_CONTINUE_INTRO);
                events.ScheduleEvent(EVENT_INTRO_TALK_1, 9s, 0, PHASE_INTRO);
                break;
            case POINT_CENTER_1:
                me->SetFacingTo(0.0f);
                Talk(SAY_LK_REMORSELESS_WINTER);
                me->GetMap()->SetZoneMusic(AREA_ICECROWN_CITADEL, MUSIC_SPECIAL);
                DoCastSelf(SPELL_REMORSELESS_WINTER_1);
                events.ScheduleEvent(EVENT_QUAKE, 62500ms, 0, PHASE_TRANSITION);
                events.ScheduleEvent(EVENT_PAIN_AND_SUFFERING, 4s, 0, PHASE_TRANSITION);
                events.ScheduleEvent(EVENT_SUMMON_ICE_SPHERE, 8s, 0, PHASE_TRANSITION);
                events.ScheduleEvent(EVENT_SUMMON_RAGING_SPIRIT, 6s, 0, PHASE_TRANSITION);
                events.ScheduleEvent(EVENT_SUMMON_VALKYR, 78s, 0, PHASE_TWO);
                events.ScheduleEvent(EVENT_INFEST, 70s, 0, PHASE_TWO);
                events.ScheduleEvent(EVENT_DEFILE, 97s, 0, PHASE_TWO);
                events.ScheduleEvent(EVENT_SOUL_REAPER, 94s, 0, PHASE_TWO);
                break;
            case POINT_CENTER_2:
                me->SetFacingTo(0.0f);
                Talk(SAY_LK_REMORSELESS_WINTER);
                me->GetMap()->SetZoneMusic(AREA_ICECROWN_CITADEL, MUSIC_SPECIAL);
                DoCastSelf(SPELL_REMORSELESS_WINTER_2);
                summons.DespawnEntry(NPC_VALKYR_SHADOWGUARD);
                events.ScheduleEvent(EVENT_QUAKE_2, 62500ms, 0, PHASE_TRANSITION);
                events.ScheduleEvent(EVENT_PAIN_AND_SUFFERING, 6s, 0, PHASE_TRANSITION);
                events.ScheduleEvent(EVENT_SUMMON_ICE_SPHERE, 8s, 0, PHASE_TRANSITION);
                events.ScheduleEvent(EVENT_SUMMON_RAGING_SPIRIT_2, 5s, 0, PHASE_TRANSITION);
                events.ScheduleEvent(EVENT_DEFILE, 95500ms, 0, PHASE_THREE);
                events.ScheduleEvent(EVENT_SOUL_REAPER, 99500ms, 0, PHASE_THREE);
                events.ScheduleEvent(EVENT_VILE_SPIRITS, 79500ms, EVENT_GROUP_VILE_SPIRITS, PHASE_THREE);
                events.ScheduleEvent(IsHeroic() ? EVENT_HARVEST_SOULS : EVENT_HARVEST_SOUL, 73500ms, 0, PHASE_THREE);
                break;
            case POINT_LK_OUTRO_1:
                events.ScheduleEvent(EVENT_OUTRO_TALK_4, 1ms, 0, PHASE_OUTRO);
                events.ScheduleEvent(EVENT_OUTRO_RAISE_DEAD, 1s, 0, PHASE_OUTRO);
                events.ScheduleEvent(EVENT_OUTRO_TALK_5, 29s, 0, PHASE_OUTRO);
                break;
            case POINT_LK_OUTRO_2:
                if (Creature* tirion = ObjectAccessor::GetCreature(*me, instance->GetGuidData(DATA_HIGHLORD_TIRION_FORDRING)))
                    tirion->AI()->Talk(SAY_TIRION_OUTRO_2);
                if (Creature* frostmourne = me->FindNearestCreature(NPC_FROSTMOURNE_TRIGGER, 50.0f))
                    frostmourne->AI()->DoAction(ACTION_SUMMON_TERENAS);
                break;
            default:
                break;
        }
    }
 
    void UpdateAI(uint32 diff) override
    {
        // check phase first to prevent updating victim and entering evade mode when not wanted
        if (!(events.IsInPhase(PHASE_OUTRO) || events.IsInPhase(PHASE_INTRO) || events.IsInPhase(PHASE_FROSTMOURNE)))
            if (!UpdateVictim())
                return;
 
        events.Update(diff);
 
        // during Remorseless Winter phases The Lich King is channeling a spell, but we must continue casting other spells
        if (me->HasUnitState(UNIT_STATE_CASTING) && !(events.IsInPhase(PHASE_TRANSITION) || events.IsInPhase(PHASE_OUTRO) || events.IsInPhase(PHASE_FROSTMOURNE)))
            return;
 
        while (uint32 eventId = events.ExecuteEvent())
        {
            switch (eventId)
            {
                case EVENT_INTRO_MOVE_1:
                    me->SetSheath(SHEATH_STATE_MELEE);
                    me->RemoveAurasDueToSpell(SPELL_EMOTE_SIT_NO_SHEATH);
                    me->SetWalk(true);
                    me->GetMotionMaster()->MovePoint(POINT_LK_INTRO_1, LichKingIntro[0]);
                    break;
                case EVENT_INTRO_MOVE_2:
                    me->GetMotionMaster()->MovePoint(POINT_LK_INTRO_2, LichKingIntro[1]);
                    break;
                case EVENT_INTRO_MOVE_3:
                    me->GetMotionMaster()->MovePoint(POINT_LK_INTRO_3, LichKingIntro[2]);
                    break;
                case EVENT_INTRO_TALK_1:
                    Talk(SAY_LK_INTRO_2);
                    // for some reason blizz sends 2 emotes in row here so (we handle one in Talk)
                    me->HandleEmoteCommand(EMOTE_ONESHOT_TALK_NO_SHEATHE);
                    events.ScheduleEvent(EVENT_EMOTE_CAST_SHOUT, 7s, 0, PHASE_INTRO);
                    events.ScheduleEvent(EVENT_INTRO_EMOTE_1, 13s, 0, PHASE_INTRO);
                    events.ScheduleEvent(EVENT_EMOTE_CAST_SHOUT, 18s, 0, PHASE_INTRO);
                    events.ScheduleEvent(EVENT_INTRO_CAST_FREEZE, 31s, 0, PHASE_INTRO);
                    break;
                case EVENT_EMOTE_CAST_SHOUT:
                    DoCastSelf(SPELL_EMOTE_SHOUT_NO_SHEATH, false);
                    break;
                case EVENT_INTRO_EMOTE_1:
                    me->HandleEmoteCommand(EMOTE_ONESHOT_POINT_NO_SHEATHE);
                    break;
                case EVENT_INTRO_CAST_FREEZE:
                    Talk(SAY_LK_INTRO_3);
                    DoCastAOE(SPELL_ICE_LOCK, false);
                    events.ScheduleEvent(EVENT_FINISH_INTRO, 1s, 0, PHASE_INTRO);
                    break;
                case EVENT_FINISH_INTRO:
                    me->SetWalk(false);
                    me->SetImmuneToPC(false);
                    me->SetReactState(REACT_AGGRESSIVE);
                    events.SetPhase(PHASE_ONE);
                    DoZoneInCombat();
                    break;
                case EVENT_SUMMON_SHAMBLING_HORROR:
                    DoCastSelf(SPELL_SUMMON_SHAMBLING_HORROR);
                    me->GetMap()->SetZoneMusic(AREA_ICECROWN_CITADEL, MUSIC_SPECIAL);
                    events.ScheduleEvent(EVENT_SUMMON_SHAMBLING_HORROR, 1min, 0, PHASE_ONE);
                    break;
                case EVENT_SUMMON_DRUDGE_GHOUL:
                    DoCastSelf(SPELL_SUMMON_DRUDGE_GHOULS);
                    events.ScheduleEvent(EVENT_SUMMON_DRUDGE_GHOUL, 30s, 0, PHASE_ONE);
                    break;
                case EVENT_INFEST:
                    DoCastSelf(SPELL_INFEST);
                    events.ScheduleEvent(EVENT_INFEST, 21s, 24s, 0, events.IsInPhase(PHASE_ONE) ? PHASE_ONE : PHASE_TWO);
                    break;
                case EVENT_NECROTIC_PLAGUE:
                    if (Unit* target = SelectTarget(SelectTargetMethod::Random, 1, NecroticPlagueTargetCheck(me, NECROTIC_PLAGUE_LK, NECROTIC_PLAGUE_PLR)))
                    {
                        Talk(EMOTE_NECROTIC_PLAGUE_WARNING, target);
                        DoCast(target, SPELL_NECROTIC_PLAGUE);
                    }
                    events.ScheduleEvent(EVENT_NECROTIC_PLAGUE, 30s, 33s, 0, PHASE_ONE);
                    break;
                case EVENT_SHADOW_TRAP:
                    if (Unit* target = SelectTarget(SelectTargetMethod::Random, 0, SpellTargetSelector(me, SPELL_SHADOW_TRAP)))
                        DoCast(target, SPELL_SHADOW_TRAP);
                    events.ScheduleEvent(EVENT_SHADOW_TRAP, 15500ms, 0, PHASE_ONE);
                    break;
                case EVENT_SOUL_REAPER:
                    DoCastVictim(SPELL_SOUL_REAPER);
                    events.ScheduleEvent(EVENT_SOUL_REAPER, 33s, 35s, 0, PHASE_TWO_THREE);
                    break;
                case EVENT_DEFILE:
                    if (Unit* target = SelectTarget(SelectTargetMethod::Random, 0, 0.0f, true, true, -SPELL_HARVEST_SOUL_VALKYR))
                    {
                        Talk(EMOTE_DEFILE_WARNING);
                        DoCast(target, SPELL_DEFILE);
                    }
                    events.ScheduleEvent(EVENT_DEFILE, 32s, 35s, 0, PHASE_TWO_THREE);
                    break;
                case EVENT_HARVEST_SOUL:
                    Talk(SAY_LK_HARVEST_SOUL);
                    if (Unit* target = SelectTarget(SelectTargetMethod::Random, 0, SpellTargetSelector(me, SPELL_HARVEST_SOUL)))
                        DoCast(target, SPELL_HARVEST_SOUL);
                    events.ScheduleEvent(EVENT_HARVEST_SOUL, 75s, 0, PHASE_THREE);
                    break;
                case EVENT_PAIN_AND_SUFFERING:
                    if (Unit* target = SelectTarget(SelectTargetMethod::Random, 0, 0.0f, true))
                        me->CastSpell(target, SPELL_PAIN_AND_SUFFERING, TRIGGERED_NONE);
                    events.ScheduleEvent(EVENT_PAIN_AND_SUFFERING, 1500ms, 4s, 0, PHASE_TRANSITION);
                    break;
                case EVENT_SUMMON_ICE_SPHERE:
                    DoCastAOE(SPELL_SUMMON_ICE_SPHERE);
                    events.ScheduleEvent(EVENT_SUMMON_ICE_SPHERE, 7500ms, 8500ms, 0, PHASE_TRANSITION);
                    break;
                case EVENT_SUMMON_RAGING_SPIRIT:
                    if (Unit* target = SelectTarget(SelectTargetMethod::Random, 0, 0.0f, true))
                        me->CastSpell(target, SPELL_RAGING_SPIRIT, TRIGGERED_NONE);
                    events.ScheduleEvent(EVENT_SUMMON_RAGING_SPIRIT, 22s, 23s, 0, PHASE_TRANSITION);
                    break;
                case EVENT_SUMMON_RAGING_SPIRIT_2:
                    if (Unit* target = SelectTarget(SelectTargetMethod::Random, 0, 0.0f, true))
                        me->CastSpell(target, SPELL_RAGING_SPIRIT, TRIGGERED_NONE);
                    events.ScheduleEvent(EVENT_SUMMON_RAGING_SPIRIT, 18s, 0, PHASE_TRANSITION);
                    break;
                case EVENT_QUAKE:
                    events.SetPhase(PHASE_TWO);
                    me->ClearUnitState(UNIT_STATE_CASTING);  // clear state to ensure check in DoCastAOE passes
                    DoCastAOE(SPELL_QUAKE);
                    me->GetMap()->SetZoneMusic(AREA_ICECROWN_CITADEL, MUSIC_SPECIAL);
                    Talk(SAY_LK_QUAKE);
                    break;
                case EVENT_QUAKE_2:
                    events.SetPhase(PHASE_THREE);
                    me->ClearUnitState(UNIT_STATE_CASTING);  // clear state to ensure check in DoCastAOE passes
                    DoCastAOE(SPELL_QUAKE);
                    me->GetMap()->SetZoneMusic(AREA_ICECROWN_CITADEL, MUSIC_SPECIAL);
                    Talk(SAY_LK_QUAKE);
                    break;
                case EVENT_SUMMON_VALKYR:
                    me->GetMap()->SetZoneMusic(AREA_ICECROWN_CITADEL, MUSIC_SPECIAL);
                    Talk(SAY_LK_SUMMON_VALKYR);
                    DoCastAOE(SUMMON_VALKYR, true);
                    events.ScheduleEvent(EVENT_SUMMON_VALKYR, 45s, 50s, 0, PHASE_TWO);
                    break;
                case EVENT_START_ATTACK:
                    me->SetReactState(REACT_AGGRESSIVE);
                    if (events.IsInPhase(PHASE_FROSTMOURNE))
                        events.SetPhase(PHASE_THREE);
                    break;
                case EVENT_VILE_SPIRITS:
                    me->GetMap()->SetZoneMusic(AREA_ICECROWN_CITADEL, MUSIC_SPECIAL);
                    DoCastAOE(SPELL_VILE_SPIRITS);
                    events.ScheduleEvent(EVENT_VILE_SPIRITS, 35s, 40s, EVENT_GROUP_VILE_SPIRITS, PHASE_THREE);
                    break;
                case EVENT_HARVEST_SOULS:
                    Talk(SAY_LK_HARVEST_SOUL);
                    DoCastAOE(SPELL_HARVEST_SOULS);
                    events.ScheduleEvent(EVENT_HARVEST_SOULS, 100s, 110s, 0, PHASE_THREE);
                    events.SetPhase(PHASE_FROSTMOURNE); // will stop running UpdateVictim (no evading)
                    me->SetReactState(REACT_PASSIVE);
                    me->AttackStop();
                    events.DelayEvents(50s, EVENT_GROUP_VILE_SPIRITS);
                    events.RescheduleEvent(EVENT_DEFILE, 50s, 0, PHASE_THREE);
                    events.RescheduleEvent(EVENT_SOUL_REAPER, 57s, 62s, 0, PHASE_THREE);
                    events.ScheduleEvent(EVENT_START_ATTACK, 49s);
                    events.ScheduleEvent(EVENT_FROSTMOURNE_HEROIC, 6500ms);
                    for (ObjectGuid guid : summons)
                    {
                        if (Creature* summon = ObjectAccessor::GetCreature(*me, guid))
                        {
                            if (summon->GetEntry() == NPC_VILE_SPIRIT)
                            {
                                summon->m_Events.KillAllEvents(true);
                                summon->m_Events.AddEvent(new VileSpiritActivateEvent(summon), summon->m_Events.CalculateTime(56500ms));
                                summon->SetReactState(REACT_PASSIVE);
                                summon->CombatStop(true);
                                summon->RemoveAurasDueToSpell(SPELL_VILE_SPIRIT_MOVE_SEARCH);
                                summon->RemoveAurasDueToSpell(SPELL_VILE_SPIRIT_DAMAGE_SEARCH);
                                summon->GetMotionMaster()->MoveTargetedHome();
                            }
                            else if (summon->GetEntry() == NPC_RAGING_SPIRIT)
                                summon->AI()->DoAction(ACTION_DISABLE_RAGING);
                        }
                    }
                    break;
                case EVENT_FROSTMOURNE_HEROIC:
                    if (TempSummon* terenas = me->GetMap()->SummonCreature(NPC_TERENAS_MENETHIL_FROSTMOURNE_H, TerenasSpawnHeroic, nullptr, 50s))
                    {
                        terenas->AI()->DoAction(ACTION_FROSTMOURNE_INTRO);
                        std::list<Creature*> triggers;
                        GetCreatureListWithEntryInGrid(triggers, terenas, NPC_WORLD_TRIGGER_INFINITE_AOI, 100.0f);
                        if (!triggers.empty())
                        {
                            triggers.sort(Trinity::ObjectDistanceOrderPred(terenas, true));
                            Creature* spawner = triggers.front();
                            spawner->setActive(true);
                            spawner->SetFarVisible(true);
                            spawner->CastSpell(spawner, SPELL_SUMMON_SPIRIT_BOMB_1, true);  // summons bombs randomly
                            spawner->CastSpell(spawner, SPELL_SUMMON_SPIRIT_BOMB_2, true);  // summons bombs on players
                            spawner->m_Events.AddEvent(new TriggerWickedSpirit(spawner), spawner->m_Events.CalculateTime(3s));
                        }
                    }
                    break;
                case EVENT_OUTRO_TALK_1:
                    Talk(SAY_LK_OUTRO_1);
                    DoCastAOE(SPELL_FURY_OF_FROSTMOURNE_NO_REZ, true);
                    break;
                case EVENT_OUTRO_TALK_2:
                    Talk(SAY_LK_OUTRO_2);
                    DoCastAOE(SPELL_EMOTE_QUESTION_NO_SHEATH);
                    break;
                case EVENT_OUTRO_EMOTE_TALK:
                    me->HandleEmoteCommand(EMOTE_ONESHOT_TALK_NO_SHEATHE);
                    break;
                case EVENT_OUTRO_TALK_3:
                    if (Creature* tirion = ObjectAccessor::GetCreature(*me, instance->GetGuidData(DATA_HIGHLORD_TIRION_FORDRING)))
                        me->SetFacingToObject(tirion);
                    Talk(SAY_LK_OUTRO_3);
                    break;
                case EVENT_OUTRO_MOVE_CENTER:
                    me->GetMotionMaster()->MovePoint(POINT_LK_OUTRO_1, CenterPosition);
                    break;
                case EVENT_OUTRO_TALK_4:
                    me->SetFacingTo(0.01745329f);
                    Talk(SAY_LK_OUTRO_4);
                    break;
                case EVENT_OUTRO_RAISE_DEAD:
                    DoCastAOE(SPELL_RAISE_DEAD);
                    me->ClearUnitState(UNIT_STATE_CASTING);
                    me->GetMap()->SetZoneMusic(AREA_ICECROWN_CITADEL, MUSIC_FINAL);
                    break;
                case EVENT_OUTRO_TALK_5:
                    Talk(SAY_LK_OUTRO_5);
                    if (Creature* tirion = ObjectAccessor::GetCreature(*me, instance->GetGuidData(DATA_HIGHLORD_TIRION_FORDRING)))
                        tirion->AI()->DoAction(ACTION_OUTRO);
                    break;
                case EVENT_OUTRO_TALK_6:
                    Talk(SAY_LK_OUTRO_6);
                    if (Creature* tirion = ObjectAccessor::GetCreature(*me, instance->GetGuidData(DATA_HIGHLORD_TIRION_FORDRING)))
                        tirion->SetFacingToObject(me);
                    me->CastSpell(nullptr, SPELL_SUMMON_BROKEN_FROSTMOURNE_3, TRIGGERED_IGNORE_CAST_IN_PROGRESS);
                    SetEquipmentSlots(false, EQUIP_UNEQUIP);
                    break;
                case EVENT_OUTRO_SOUL_BARRAGE:
                    me->CastSpell(nullptr, SPELL_SOUL_BARRAGE, TRIGGERED_IGNORE_CAST_IN_PROGRESS);
                    me->PlayDirectSound(SOUND_PAIN);
                    // set flight
                    me->SetDisableGravity(true);
                    me->GetMotionMaster()->MovePoint(POINT_LK_OUTRO_2, OutroFlying);
                    break;
                case EVENT_OUTRO_TALK_7:
                    Talk(SAY_LK_OUTRO_7);
                    break;
                case EVENT_OUTRO_TALK_8:
                    Talk(SAY_LK_OUTRO_8);
                    break;
                case EVENT_BERSERK:
                    Talk(SAY_LK_BERSERK);
                    DoCastSelf(SPELL_BERSERK2);
                    break;
                default:
                    break;
            }
 
            if (me->HasUnitState(UNIT_STATE_CASTING) && !(events.IsInPhase(PHASE_TRANSITION) || events.IsInPhase(PHASE_OUTRO) || events.IsInPhase(PHASE_FROSTMOURNE)))
                return;
        }
    }
 
private:
    uint32 _necroticPlagueStack;
    uint32 _vileSpiritExplosions;
};
 
// 38995 - Highlord Tirion Fordring
struct npc_tirion_fordring_tft : public ScriptedAI
{
    npc_tirion_fordring_tft(Creature* creature) : ScriptedAI(creature), _instance(creature->GetInstanceScript()) { }
 
    void Reset() override
    {
        _events.Reset();
        if (_instance->GetBossState(DATA_THE_LICH_KING) == DONE)
            me->RemoveNpcFlag(UNIT_NPC_FLAG_GOSSIP);
    }
 
    void MovementInform(uint32 type, uint32 id) override
    {
        if (type != POINT_MOTION_TYPE)
            return;
 
        switch (id)
        {
            case POINT_TIRION_INTRO:
                me->SetEmoteState(EMOTE_STATE_READY2H);
                if (Creature* theLichKing = ObjectAccessor::GetCreature(*me, _instance->GetGuidData(DATA_THE_LICH_KING)))
                    theLichKing->AI()->DoAction(ACTION_START_ENCOUNTER);
                break;
            case POINT_TIRION_OUTRO_1:
                _events.ScheduleEvent(EVENT_OUTRO_JUMP, 1ms, 0, PHASE_OUTRO);
                break;
        }
    }
 
    void DoAction(int32 action) override
    {
        switch (action)
        {
            case ACTION_CONTINUE_INTRO:
                Talk(SAY_TIRION_INTRO_1);
                _events.ScheduleEvent(EVENT_INTRO_TALK_1, 34s, 0, PHASE_INTRO);
                break;
            case ACTION_OUTRO:
                _events.SetPhase(PHASE_OUTRO);
                _events.ScheduleEvent(EVENT_OUTRO_TALK_1, 7s, 0, PHASE_OUTRO);
                _events.ScheduleEvent(EVENT_OUTRO_BLESS, 18s, 0, PHASE_OUTRO);
                _events.ScheduleEvent(EVENT_OUTRO_REMOVE_ICE, 23s, 0, PHASE_OUTRO);
                _events.ScheduleEvent(EVENT_OUTRO_MOVE_1, 25s, 0, PHASE_OUTRO);
                break;
        }
    }
 
    void SpellHit(WorldObject* /*caster*/, SpellInfo const* spellInfo) override
    {
        if (spellInfo->Id == SPELL_ICE_LOCK)
            me->SetFacingTo(3.085098f);
        else if (spellInfo->Id == SPELL_BROKEN_FROSTMOURNE_KNOCK)
            me->LoadEquipment(1); // remove glow on ashbringer
    }
 
    bool OnGossipSelect(Player* /*player*/, uint32 menuId, uint32 gossipListId) override
    {
        if (menuId == GOSSIP_MENU_START_INTRO && !gossipListId)
        {
            _events.SetPhase(PHASE_INTRO);
            me->RemoveNpcFlag(UNIT_NPC_FLAG_GOSSIP);
            me->SetWalk(true);
            me->GetMotionMaster()->MovePoint(POINT_TIRION_INTRO, TirionIntro);
        }
        return false;
    }
 
    void JustReachedHome() override
    {
        me->SetEmoteState(EMOTE_ONESHOT_NONE);
    }
 
    void UpdateAI(uint32 diff) override
    {
        if (!UpdateVictim() && !(_events.IsInPhase(PHASE_OUTRO) || _events.IsInPhase(PHASE_INTRO)))
            return;
 
        _events.Update(diff);
 
        if (me->HasUnitState(UNIT_STATE_CASTING))
            return;
 
        while (uint32 eventId = _events.ExecuteEvent())
        {
            switch (eventId)
            {
                case EVENT_INTRO_TALK_1:
                    Talk(SAY_TIRION_INTRO_2);
                    _events.ScheduleEvent(EVENT_INTRO_EMOTE_1, 2s, 0, PHASE_INTRO);
                    _events.ScheduleEvent(EVENT_INTRO_CHARGE, 5s, 0, PHASE_INTRO);
                    break;
                case EVENT_INTRO_EMOTE_1:
                    me->HandleEmoteCommand(EMOTE_ONESHOT_POINT_NO_SHEATHE);
                    break;
                case EVENT_INTRO_CHARGE:
                    me->SetWalk(false);
                    me->GetMotionMaster()->MovePoint(POINT_TIRION_CHARGE, TirionCharge);
                    break;
                case EVENT_OUTRO_TALK_1:
                    Talk(SAY_TIRION_OUTRO_1);
                    break;
                case EVENT_OUTRO_BLESS:
                    DoCastSelf(SPELL_LIGHTS_BLESSING);
                    break;
                case EVENT_OUTRO_REMOVE_ICE:
                    me->RemoveAurasDueToSpell(SPELL_ICE_LOCK);
                    SetEquipmentSlots(false, EQUIP_ASHBRINGER_GLOWING);
                    if (Creature* lichKing = ObjectAccessor::GetCreature(*me, _instance->GetGuidData(DATA_THE_LICH_KING)))
                    {
                        me->SetFacingToObject(lichKing);
                        lichKing->AI()->DoAction(ACTION_PLAY_MUSIC);
                    }
                    break;
                case EVENT_OUTRO_MOVE_1:
                    me->GetMotionMaster()->MovePoint(POINT_TIRION_OUTRO_1, OutroPosition1);
                    break;
                case EVENT_OUTRO_JUMP:
                    DoCastAOE(SPELL_JUMP);
                    break;
                default:
                    break;
            }
        }
    }
 
private:
    EventMap _events;
    InstanceScript* _instance;
};
 
// 37698 - Shambling Horror
struct npc_shambling_horror_icc : public ScriptedAI
{
    npc_shambling_horror_icc(Creature* creature) : ScriptedAI(creature)
    {
        _frenzied = false;
    }
 
    void Reset() override
    {
        _events.Reset();
        _events.ScheduleEvent(EVENT_SHOCKWAVE, 20s, 25s);
        _events.ScheduleEvent(EVENT_ENRAGE, 11s, 14s);
    }
 
    void DamageTaken(Unit* /*attacker*/, uint32& damage, DamageEffectType /*damageType*/, SpellInfo const* /*spellInfo = nullptr*/) override
    {
        if (!_frenzied && IsHeroic() && me->HealthBelowPctDamaged(20, damage))
        {
            _frenzied = true;
            DoCastSelf(SPELL_FRENZY, true);
        }
    }
 
    void UpdateAI(uint32 diff) override
    {
        if (!UpdateVictim())
            return;
 
        _events.Update(diff);
 
        if (me->HasUnitState(UNIT_STATE_CASTING))
            return;
 
        while (uint32 eventId = _events.ExecuteEvent())
        {
            switch (eventId)
            {
                case EVENT_SHOCKWAVE:
                    DoCastSelf(SPELL_SHOCKWAVE);
                    _events.ScheduleEvent(EVENT_SHOCKWAVE, 20s, 25s);
                    break;
                case EVENT_ENRAGE:
                    if (SPELL_CAST_OK != DoCastSelf(SPELL_ENRAGE))
                        _events.ScheduleEvent(EVENT_ENRAGE, 1s);
                    else
                        _events.ScheduleEvent(EVENT_ENRAGE, 20s, 25s);
                    break;
                default:
                    break;
            }
        }
    }
 
    void OnSpellFailed(SpellInfo const* spell) override
    {
        if (spell->Id == ENRAGE)
            _events.RescheduleEvent(EVENT_ENRAGE, 1s);
    }
 
private:
    EventMap _events;
    bool _frenzied;
};
 
// 36701 - Raging Spirit
struct npc_raging_spirit : public ScriptedAI
{
    npc_raging_spirit(Creature* creature) : ScriptedAI(creature), _instance(creature->GetInstanceScript()) { }
 
    void Reset() override
    {
        me->SetReactState(REACT_PASSIVE);
        _events.Reset();
        _events.ScheduleEvent(EVENT_SET_AGRESSIVE, 2s);
        _events.ScheduleEvent(EVENT_SOUL_SHRIEK, 12s, 15s);
        DoCastSelf(SPELL_PLAGUE_AVOIDANCE, true);
        DoCastSelf(SPELL_RAGING_SPIRIT_VISUAL, true);
        if (TempSummon* summon = me->ToTempSummon())
            if (Unit* summoner = summon->GetSummonerUnit())
                summoner->CastSpell(me, SPELL_RAGING_SPIRIT_VISUAL_CLONE, true);
        DoCastSelf(SPELL_BOSS_HITTIN_YA, true);
    }
 
    void DoAction(int32 action) override
    {
        if (action == ACTION_DISABLE_RAGING)
        {
            _events.Reset();
            _events.SetPhase(PHASE_FROSTMOURNE);
            _events.ScheduleEvent(EVENT_SET_AGRESSIVE, 52s);
            me->SetReactState(REACT_PASSIVE);
            me->AttackStop();
            me->InterruptNonMeleeSpells(true);
        }
    }
 
    void IsSummonedBy(WorldObject* /*summoner*/) override
    {
        // player is the spellcaster so register summon manually
        if (Creature* lichKing = ObjectAccessor::GetCreature(*me, _instance->GetGuidData(DATA_THE_LICH_KING)))
            lichKing->AI()->JustSummoned(me);
    }
 
    void JustDied(Unit* /*killer*/) override
    {
        if (Creature* lichKing = ObjectAccessor::GetCreature(*me, _instance->GetGuidData(DATA_THE_LICH_KING)))
            lichKing->AI()->SummonedCreatureDespawn(me);
        if (TempSummon* summon = me->ToTempSummon())
            summon->SetTempSummonType(TEMPSUMMON_CORPSE_DESPAWN);
    }
 
    void UpdateAI(uint32 diff) override
    {
        if (!_events.IsInPhase(PHASE_FROSTMOURNE) && !UpdateVictim())
            return;
 
        _events.Update(diff);
 
        if (me->HasUnitState(UNIT_STATE_CASTING))
            return;
 
        while (uint32 eventId = _events.ExecuteEvent())
        {
            switch (eventId)
            {
                case EVENT_SOUL_SHRIEK:
                    DoCastAOE(SPELL_SOUL_SHRIEK);
                    _events.ScheduleEvent(EVENT_SOUL_SHRIEK, 12s, 15s);
                    break;
                case EVENT_SET_AGRESSIVE:
                    me->SetReactState(REACT_AGGRESSIVE);
                    if (_events.IsInPhase(PHASE_FROSTMOURNE))
                    {
                        _events.SetPhase(PHASE_THREE);
                        _events.ScheduleEvent(EVENT_SOUL_SHRIEK, 12s, 15s);
                    }
                    break;
                default:
                    break;
            }
        }
    }
 
private:
    EventMap _events;
    InstanceScript* _instance;
};
 
// 36609 - Val'kyr Shadowguard
struct npc_valkyr_shadowguard : public ScriptedAI
{
    npc_valkyr_shadowguard(Creature* creature) : ScriptedAI(creature), _instance(creature->GetInstanceScript())
    {
        SetCombatMovement(false);
    }
 
    void Reset() override
    {
        _events.Reset();
        me->SetReactState(REACT_PASSIVE);
        DoCastSelf(SPELL_WINGS_OF_THE_DAMNED, false);
    }
 
    void IsSummonedBy(WorldObject* /*summoner*/) override
    {
        _events.Reset();
        _events.ScheduleEvent(EVENT_GRAB_PLAYER, 2500ms);
    }
 
    void DamageTaken(Unit* /*attacker*/, uint32& damage, DamageEffectType /*damageType*/, SpellInfo const* /*spellInfo = nullptr*/) override
    {
        if (!IsHeroic())
            return;
 
        if (!me->HasAuraType(SPELL_AURA_CONTROL_VEHICLE))
            return;
 
        if (me->HealthBelowPctDamaged(50, damage))
        {
            DoCastAOE(SPELL_EJECT_ALL_PASSENGERS);
            ScheduleHeroicEvents();
        }
    }
 
    void ScheduleHeroicEvents()
    {
        _events.Reset();
        _events.ScheduleEvent(EVENT_MOVE_TO_CENTER, 1ms);
        me->ClearUnitState(UNIT_STATE_EVADE);
    }
 
    void MovementInform(uint32 type, uint32 id) override
    {
        if (type != POINT_MOTION_TYPE)
            return;
 
        switch (id)
        {
            case POINT_DROP_PLAYER:
                DoCastAOE(SPELL_EJECT_ALL_PASSENGERS);
                if (IsHeroic())
                    ScheduleHeroicEvents();
                else
                    me->DespawnOrUnsummon(1s);
                break;
            case POINT_CHARGE:
                if (Player* target = ObjectAccessor::GetPlayer(*me, _grabbedPlayer))
                {
                    me->SetUninteractible(false);
                    if (GameObject* platform = ObjectAccessor::GetGameObject(*me, _instance->GetGuidData(DATA_ARTHAS_PLATFORM)))
                    {
                        std::list<Creature*> triggers;
                        GetCreatureListWithEntryInGrid(triggers, me, NPC_WORLD_TRIGGER, 150.0f);
                        triggers.remove_if(Trinity::HeightDifferenceCheck(platform, 5.0f, true));
                        if (triggers.empty())
                            return;
 
                        triggers.sort(Trinity::ObjectDistanceOrderPred(me));
                        DoCast(target, SPELL_VALKYR_CARRY);
                        _dropPoint.Relocate(triggers.front()->GetPositionX(), triggers.front()->GetPositionY(), me->GetFloorZ() + 2.f);
                        _events.ScheduleEvent(EVENT_MOVE_TO_DROP_POS, 1s + 500ms);
                    }
                }
                else
                    me->DespawnOrUnsummon();
                break;
            case POINT_SIPHON:
                DoCastSelf(SPELL_VALKYR_TRANSFORM);
                me->SetReactState(REACT_AGGRESSIVE);
                DoZoneInCombat();
                _events.ScheduleEvent(EVENT_LIFE_SIPHON, 2s);
                break;
            default:
                break;
        }
    }
 
    void SetGUID(ObjectGuid const& guid, int32 id) override
    {
        if (id != DATA_GRABBED_PLAYER_GUID)
            return;
 
        _grabbedPlayer = guid;
    }
 
    void UpdateAI(uint32 diff) override
    {
        if (!UpdateVictim())
            return;
 
        _events.Update(diff);
 
        if (me->HasUnitState(UNIT_STATE_CASTING))
            return;
 
        while (uint32 eventId = _events.ExecuteEvent())
        {
            switch (eventId)
            {
                case EVENT_GRAB_PLAYER:
                    if (!_grabbedPlayer)
                    {
                        DoCastAOE(SPELL_VALKYR_TARGET_SEARCH);
                        _events.ScheduleEvent(EVENT_GRAB_PLAYER, 2s);
                    }
                    break;
                case EVENT_MOVE_TO_DROP_POS:
                    me->GetMotionMaster()->MovePoint(POINT_DROP_PLAYER, _dropPoint);
                    break;
                case EVENT_LIFE_SIPHON:
                     DoCastVictim(SPELL_LIFE_SIPHON);
                     _events.Repeat(2s + 500ms);
                    break;
                case EVENT_MOVE_TO_CENTER:
                {
                    Position pos = me->GetRandomPoint(CenterPosition, 4.0f);
                    pos.m_positionZ = me->GetHomePosition().m_positionZ;
                    me->GetMotionMaster()->MovePoint(POINT_SIPHON, pos);
                    break;
                }
                default:
                    break;
            }
 
            if (me->HasUnitState(UNIT_STATE_CASTING))
                return;
        }
    }
 
private:
    EventMap _events;
    Position _dropPoint;
    ObjectGuid _grabbedPlayer;
    InstanceScript* _instance;
};
 
// 36598 - Strangulate Vehicle
struct npc_strangulate_vehicle : public ScriptedAI
{
    npc_strangulate_vehicle(Creature* creature) : ScriptedAI(creature), _instance(creature->GetInstanceScript()) { }
 
    void IsSummonedBy(WorldObject* summonerWO) override
    {
        Unit* summoner = summonerWO->ToUnit();
        if (!summoner)
            return;
        me->SetFacingToObject(summoner);
        DoCast(summoner, SPELL_HARVEST_SOUL_VEHICLE);
        _events.Reset();
        _events.ScheduleEvent(EVENT_MOVE_TO_LICH_KING, 2s);
        _events.ScheduleEvent(EVENT_TELEPORT, 6s);
 
        // this will let us easily access all creatures of this entry on heroic mode when its time to teleport back
        if (Creature* lichKing = ObjectAccessor::GetCreature(*me, _instance->GetGuidData(DATA_THE_LICH_KING)))
            lichKing->AI()->JustSummoned(me);
    }
 
    void DoAction(int32 action) override
    {
        if (action != ACTION_TELEPORT_BACK)
            return;
 
        if (TempSummon* summ = me->ToTempSummon())
        {
            if (Unit* summoner = summ->GetSummonerUnit())
            {
                DoCast(summoner, SPELL_HARVEST_SOUL_TELEPORT_BACK);
                summoner->RemoveAurasDueToSpell(SPELL_HARVEST_SOULS_TELEPORT);
            }
        }
 
        if (Creature* lichKing = ObjectAccessor::GetCreature(*me, _instance->GetGuidData(DATA_THE_LICH_KING)))
            lichKing->AI()->SummonedCreatureDespawn(me);
        me->DespawnOrUnsummon();
    }
 
    void UpdateAI(uint32 diff) override
    {
        UpdateVictim();
 
        _events.Update(diff);
 
        while (uint32 eventId = _events.ExecuteEvent())
        {
            switch (eventId)
            {
                case EVENT_TELEPORT:
                    me->GetMotionMaster()->Clear();
                    me->GetMotionMaster()->MoveIdle();
                    if (TempSummon* summ = me->ToTempSummon())
                    {
                        if (Unit* summoner = summ->GetSummonerUnit())
                        {
                            summoner->CastSpell(nullptr, SPELL_HARVEST_SOUL_VISUAL, true);
                            summoner->ExitVehicle(summoner);
                            if (!IsHeroic())
                                summoner->CastSpell(summoner, SPELL_HARVEST_SOUL_TELEPORT, true);
                            else
                            {
                                summoner->CastSpell(summoner, SPELL_HARVEST_SOULS_TELEPORT, true);
                                summoner->RemoveAurasDueToSpell(HARVEST_SOUL, ObjectGuid::Empty, 0, AURA_REMOVE_BY_EXPIRE);
                            }
                        }
                    }
 
                    _events.ScheduleEvent(EVENT_DESPAWN_SELF, 65s);
                    break;
                case EVENT_MOVE_TO_LICH_KING:
                    if (Creature* lichKing = ObjectAccessor::GetCreature(*me, _instance->GetGuidData(DATA_THE_LICH_KING)))
                    {
                        if (me->GetExactDist(lichKing) > 10.0f)
                        {
                            Position pos = lichKing->GetNearPosition(rand_norm() * 5.0f + 7.5f, lichKing->GetAbsoluteAngle(me));
                            me->GetMotionMaster()->MovePoint(0, pos);
                        }
                    }
                    break;
                case EVENT_DESPAWN_SELF:
                    if (Creature* lichKing = ObjectAccessor::GetCreature(*me, _instance->GetGuidData(DATA_THE_LICH_KING)))
                        lichKing->AI()->SummonedCreatureDespawn(me);
                    me->DespawnOrUnsummon(1ms);
                    break;
                default:
                    break;
            }
        }
    }
 
private:
    EventMap _events;
    InstanceScript* _instance;
};
 
// 36823, 38579, 39217 - Terenas Menethil
struct npc_terenas_menethil : public ScriptedAI
{
    npc_terenas_menethil(Creature* creature) : ScriptedAI(creature), _instance(creature->GetInstanceScript()) { }
 
    bool CanAIAttack(Unit const* target) const override
    {
        return target->GetEntry() != NPC_THE_LICH_KING;
    }
 
    void DoAction(int32 action) override
    {
        switch (action)
        {
            case ACTION_FROSTMOURNE_INTRO:
                me->setActive(true);
                me->SetFarVisible(false);
                if (!IsHeroic())
                    me->SetHealth(me->GetMaxHealth() / 2);
                DoCastSelf(SPELL_LIGHTS_FAVOR);
                _events.Reset();
                _events.ScheduleEvent(EVENT_FROSTMOURNE_TALK_1, 2s, PHASE_FROSTMOURNE);
                _events.ScheduleEvent(EVENT_FROSTMOURNE_TALK_2, 11s, PHASE_FROSTMOURNE);
                if (!IsHeroic())
                {
                    _events.ScheduleEvent(EVENT_DESTROY_SOUL, 1min, PHASE_FROSTMOURNE);
                    _events.ScheduleEvent(EVENT_FROSTMOURNE_TALK_3, 25s);
                }
                break;
            case ACTION_TELEPORT_BACK:
                me->CastSpell(nullptr, SPELL_RESTORE_SOUL, TRIGGERED_NONE);
                me->DespawnOrUnsummon(3s);
                break;
            default:
                break;
        }
    }
 
    void EnterEvadeMode(EvadeReason /*why*/) override
    {
        // no running back home
        if (!me->IsAlive())
            return;
 
        me->CombatStop(false);
        EngagementOver();
    }
 
    void DamageTaken(Unit* /*attacker*/, uint32& damage, DamageEffectType /*damageType*/, SpellInfo const* /*spellInfo = nullptr*/) override
    {
        if (damage >= me->GetHealth())
        {
            damage = me->GetHealth() - 1;
            if (!me->HasAura(SPELL_TERENAS_LOSES_INSIDE) && !IsHeroic())
            {
                me->SetUninteractible(true);
                DoCast(SPELL_TERENAS_LOSES_INSIDE);
                _events.ScheduleEvent(EVENT_TELEPORT_BACK, 1s);
                if (Creature* warden = me->FindNearestCreature(NPC_SPIRIT_WARDEN, 20.0f))
                {
                    warden->CastSpell(nullptr, SPELL_DESTROY_SOUL, TRIGGERED_NONE);
                    warden->DespawnOrUnsummon(2s);
                }
 
                me->DespawnOrUnsummon(2s);
            }
        }
    }
 
    void IsSummonedBy(WorldObject* /*summoner*/) override
    {
        _events.Reset();
        _events.SetPhase(PHASE_OUTRO);
        if (Creature* lichKing = ObjectAccessor::GetCreature(*me, _instance->GetGuidData(DATA_THE_LICH_KING)))
            me->SetFacingToObject(lichKing);
 
        _events.ScheduleEvent(EVENT_OUTRO_TERENAS_TALK_1, 2s, 0, PHASE_OUTRO);
        _events.ScheduleEvent(EVENT_OUTRO_TERENAS_TALK_2, 14s, 0, PHASE_OUTRO);
    }
 
    void UpdateAI(uint32 diff) override
    {
        UpdateVictim();
 
        _events.Update(diff);
 
        while (uint32 eventId = _events.ExecuteEvent())
        {
            switch (eventId)
            {
                case EVENT_FROSTMOURNE_TALK_1:
                    Talk(SAY_TERENAS_INTRO_1);
                    if (IsHeroic())
                        DoCastAOE(SPELL_RESTORE_SOULS);
                    break;
                case EVENT_FROSTMOURNE_TALK_2:
                    Talk(SAY_TERENAS_INTRO_2);
                    break;
                case EVENT_FROSTMOURNE_TALK_3:
                    Talk(SAY_TERENAS_INTRO_3);
                    break;
                case EVENT_OUTRO_TERENAS_TALK_1:
                    Talk(SAY_TERENAS_OUTRO_1);
                    break;
                case EVENT_OUTRO_TERENAS_TALK_2:
                    Talk(SAY_TERENAS_OUTRO_2);
                    DoCastAOE(SPELL_MASS_RESURRECTION);
                    if (Creature* lichKing = ObjectAccessor::GetCreature(*me, _instance->GetGuidData(DATA_THE_LICH_KING)))
                    {
                        lichKing->AI()->DoAction(ACTION_FINISH_OUTRO);
                        lichKing->SetImmuneToNPC(false);
                        if (Creature* tirion = ObjectAccessor::GetCreature(*me, _instance->GetGuidData(DATA_HIGHLORD_TIRION_FORDRING)))
                            tirion->AI()->AttackStart(lichKing);
                    }
                    break;
                case EVENT_DESTROY_SOUL:
                    me->SetUninteractible(true);
                    if (Creature* warden = me->FindNearestCreature(NPC_SPIRIT_WARDEN, 20.0f))
                        warden->CastSpell(nullptr, SPELL_DESTROY_SOUL, TRIGGERED_NONE);
                    DoCast(SPELL_TERENAS_LOSES_INSIDE);
                    _events.ScheduleEvent(EVENT_TELEPORT_BACK, 1s);
                    break;
                case EVENT_TELEPORT_BACK:
                    if (Creature* lichKing = ObjectAccessor::GetCreature(*me, _instance->GetGuidData(DATA_THE_LICH_KING)))
                        lichKing->AI()->DoAction(ACTION_TELEPORT_BACK);
                    break;
                default:
                    break;
            }
        }
    }
 
private:
    EventMap _events;
    InstanceScript* _instance;
};
 
// 36824 - Spirit Warden
struct npc_spirit_warden : public ScriptedAI
{
    npc_spirit_warden(Creature* creature) : ScriptedAI(creature), _instance(creature->GetInstanceScript()) { }
 
    void Reset() override
    {
        _events.Reset();
        _events.ScheduleEvent(EVENT_SOUL_RIP, 12s, 15s);
        DoCast(SPELL_DARK_HUNGER);
    }
 
    void JustDied(Unit* /*killer*/) override
    {
        if (Creature* terenas = ObjectAccessor::GetCreature(*me, _instance->GetGuidData(DATA_TERENAS_MENETHIL)))
            terenas->AI()->DoAction(ACTION_TELEPORT_BACK);
    }
 
    void UpdateAI(uint32 diff) override
    {
        if (!UpdateVictim())
            return;
 
        _events.Update(diff);
 
        while (uint32 eventId = _events.ExecuteEvent())
        {
            switch (eventId)
            {
                case EVENT_SOUL_RIP:
                    DoCastVictim(SPELL_SOUL_RIP);
                    _events.ScheduleEvent(EVENT_SOUL_RIP, 23s, 27s);
                    break;
                default:
                    break;
            }
        }
    }
 
private:
    EventMap _events;
    InstanceScript* _instance;
};
 
// 39189 - Spirit Bomb
struct npc_spirit_bomb : public CreatureAI
{
    npc_spirit_bomb(Creature* creature) : CreatureAI(creature) { }
 
    void IsSummonedBy(WorldObject* /*summoner*/) override
    {
        float destX, destY, destZ;
        me->GetPosition(destX, destY);
        destZ = 1055.0f;    // approximation, gets more precise later
        me->UpdateGroundPositionZ(destX, destY, destZ);
        me->GetMotionMaster()->MovePoint(POINT_GROUND, destX, destY, destZ);
    }
 
    void MovementInform(uint32 type, uint32 point) override
    {
        if (type != POINT_MOTION_TYPE || point != POINT_GROUND)
            return;
 
        _events.ScheduleEvent(EVENT_BOMB_EXPLOSION, 3s);
    }
 
    void AttackStart(Unit* /*victim*/) override
    {
    }
 
    void UpdateAI(uint32 diff) override
    {
        UpdateVictim();
 
        _events.Update(diff);
 
        if (_events.ExecuteEvent() == EVENT_BOMB_EXPLOSION)
        {
            me->RemoveAllAuras();
            DoCastAOE(SPELL_EXPLOSION);
            me->DespawnOrUnsummon(1s);
        }
    }
 
private:
    EventMap _events;
};
 
// 38584 - Frostmourne Trigger
struct npc_broken_frostmourne : public CreatureAI
{
    npc_broken_frostmourne(Creature* creature) : CreatureAI(creature) { }
 
    void Reset() override
    {
        _events.Reset();
    }
 
    void IsSummonedBy(WorldObject* /*summoner*/) override
    {
        _events.SetPhase(PHASE_OUTRO);
        _events.ScheduleEvent(EVENT_OUTRO_KNOCK_BACK, 3s, 0, PHASE_OUTRO);
    }
 
    void DoAction(int32 action) override
    {
        if (action == ACTION_SUMMON_TERENAS)
            _events.ScheduleEvent(EVENT_OUTRO_SUMMON_TERENAS, 6s, 0, PHASE_OUTRO);
    }
 
    void EnterEvadeMode(EvadeReason /*why*/) override
    {
    }
 
    void UpdateAI(uint32 diff) override
    {
        UpdateVictim();
 
        _events.Update(diff);
 
        while (uint32 eventId = _events.ExecuteEvent())
        {
            switch (eventId)
            {
                case EVENT_OUTRO_KNOCK_BACK:
                    DoCastAOE(SPELL_BROKEN_FROSTMOURNE_KNOCK);
                    break;
                case EVENT_OUTRO_SUMMON_TERENAS:
                    DoCastAOE(SPELL_SUMMON_TERENAS);
                    break;
                default:
                    break;
            }
        }
    }
 
private:
    EventMap _events;
};
 
// 70541, 73779, 73780, 73781 - Infest
class spell_the_lich_king_infest : public AuraScript
{
    void OnPeriodic(AuraEffect const* /*aurEff*/)
    {
        if (GetUnitOwner()->HealthAbovePct(90))
        {
            PreventDefaultAction();
            Remove(AURA_REMOVE_BY_ENEMY_SPELL);
        }
    }
 
    void OnUpdate(AuraEffect* aurEff)
    {
        // multiply, starting from 2nd tick
        if (aurEff->GetTickNumber() == 1)
            return;
 
        aurEff->SetAmount(aurEff->GetAmount() * 1.15);
    }
 
    void Register() override
    {
        OnEffectPeriodic += AuraEffectPeriodicFn(spell_the_lich_king_infest::OnPeriodic, EFFECT_0, SPELL_AURA_PERIODIC_DAMAGE);
        OnEffectUpdatePeriodic += AuraEffectUpdatePeriodicFn(spell_the_lich_king_infest::OnUpdate, EFFECT_0, SPELL_AURA_PERIODIC_DAMAGE);
    }
};
 
// 70337, 73912, 73913, 73914 - Necrotic Plague
class spell_the_lich_king_necrotic_plague : public AuraScript
{
    bool Validate(SpellInfo const* /*spell*/) override
    {
        return ValidateSpellInfo({ SPELL_NECROTIC_PLAGUE_JUMP });
    }
 
    void OnRemove(AuraEffect const* /*aurEff*/, AuraEffectHandleModes /*mode*/)
    {
        switch (GetTargetApplication()->GetRemoveMode())
        {
            case AURA_REMOVE_BY_ENEMY_SPELL:
            case AURA_REMOVE_BY_EXPIRE:
            case AURA_REMOVE_BY_DEATH:
                break;
            default:
                return;
        }
 
        CastSpellExtraArgs args(TRIGGERED_FULL_MASK);
        args.SetOriginalCaster(GetCasterGUID());
        args.AddSpellMod(SPELLVALUE_MAX_TARGETS, 1);
        GetTarget()->CastSpell(nullptr, SPELL_NECROTIC_PLAGUE_JUMP, args);
        if (Unit* caster = GetCaster())
            caster->CastSpell(caster, SPELL_PLAGUE_SIPHON, true);
    }
 
    void Register() override
    {
        AfterEffectRemove += AuraEffectRemoveFn(spell_the_lich_king_necrotic_plague::OnRemove, EFFECT_0, SPELL_AURA_PERIODIC_DAMAGE, AURA_EFFECT_HANDLE_REAL);
    }
};
 
// 70338, 73785, 73786, 73787 - Necrotic Plague (Jump)
class spell_the_lich_king_necrotic_plague_jump : public SpellScript
{
public:
    spell_the_lich_king_necrotic_plague_jump()
    {
        _hadAura = false;
    }
 
private:
    void SelectTarget(std::list<WorldObject*>& targets)
    {
        targets.sort(Trinity::ObjectDistanceOrderPred(GetCaster()));
        if (targets.size() < 2)
            return;
 
        targets.resize(1);
    }
 
    void CheckAura(SpellMissInfo missInfo)
    {
        if (missInfo != SPELL_MISS_NONE)
            return;
 
        if (GetHitUnit()->HasAura(GetSpellInfo()->Id))
            _hadAura = true;
    }
 
    void Register() override
    {
        OnObjectAreaTargetSelect += SpellObjectAreaTargetSelectFn(spell_the_lich_king_necrotic_plague_jump::SelectTarget, EFFECT_0, TARGET_UNIT_SRC_AREA_ENTRY);
        BeforeHit += BeforeSpellHitFn(spell_the_lich_king_necrotic_plague_jump::CheckAura);
    }
 
    bool _hadAura;
};
 
class spell_the_lich_king_necrotic_plague_jump_aura : public AuraScript
{
public:
    spell_the_lich_king_necrotic_plague_jump_aura()
    {
        _lastAmount = 0;
    }
 
private:
    void OnApply(AuraEffect const* /*aurEff*/, AuraEffectHandleModes /*mode*/)
    {
        if (Unit* caster = GetCaster())
            if (caster->GetAI())
                caster->GetAI()->SetData(DATA_PLAGUE_STACK, GetStackAmount());
    }
 
    void OnRemove(AuraEffect const* aurEff, AuraEffectHandleModes /*mode*/)
    {
        _lastAmount = aurEff->GetAmount();
        switch (GetTargetApplication()->GetRemoveMode())
        {
            case AURA_REMOVE_BY_EXPIRE:
            case AURA_REMOVE_BY_DEATH:
                break;
            default:
                return;
        }
 
        CastSpellExtraArgs args(TRIGGERED_FULL_MASK);
        args.SetOriginalCaster(GetCasterGUID());
        args.AddSpellMod(SPELLVALUE_AURA_STACK, GetStackAmount() + 1);
        GetTarget()->CastSpell(nullptr, SPELL_NECROTIC_PLAGUE_JUMP, args);
        if (Unit* caster = GetCaster())
            caster->CastSpell(caster, SPELL_PLAGUE_SIPHON, true);
    }
 
    void OnDispel(AuraEffect const* aurEff, AuraEffectHandleModes /*mode*/)
    {
        _lastAmount = aurEff->GetAmount();
    }
 
    void AfterDispel(AuraEffect const* aurEff, AuraEffectHandleModes /*mode*/)
    {
        // this means the stack increased so don't process as if dispelled
        if (aurEff->GetAmount() > _lastAmount)
            return;
 
        CastSpellExtraArgs args(TRIGGERED_FULL_MASK);
        args.SetOriginalCaster(GetCasterGUID());
        args.AddSpellMod(SPELLVALUE_AURA_STACK, GetStackAmount());
        args.AddSpellMod(SPELLVALUE_BASE_POINT1, AURA_REMOVE_BY_ENEMY_SPELL); // add as marker (spell has no effect 1)
        GetTarget()->CastSpell(nullptr, SPELL_NECROTIC_PLAGUE_JUMP, args);
        if (Unit* caster = GetCaster())
            caster->CastSpell(caster, SPELL_PLAGUE_SIPHON, true);
 
        Remove(AURA_REMOVE_BY_ENEMY_SPELL);
    }
 
    void Register() override
    {
        OnEffectApply += AuraEffectApplyFn(spell_the_lich_king_necrotic_plague_jump_aura::OnApply, EFFECT_0, SPELL_AURA_PERIODIC_DAMAGE, AURA_EFFECT_HANDLE_REAL_OR_REAPPLY_MASK);
        AfterEffectRemove += AuraEffectRemoveFn(spell_the_lich_king_necrotic_plague_jump_aura::OnRemove, EFFECT_0, SPELL_AURA_PERIODIC_DAMAGE, AURA_EFFECT_HANDLE_REAL);
        AfterEffectRemove += AuraEffectRemoveFn(spell_the_lich_king_necrotic_plague_jump_aura::OnDispel, EFFECT_0, SPELL_AURA_PERIODIC_DAMAGE, AURA_EFFECT_HANDLE_REAPPLY);
        AfterEffectApply += AuraEffectRemoveFn(spell_the_lich_king_necrotic_plague_jump_aura::AfterDispel, EFFECT_0, SPELL_AURA_PERIODIC_DAMAGE, AURA_EFFECT_HANDLE_REAPPLY);
    }
 
    SpellEffectValue _lastAmount;
};
 
// 73530 - Shadow Trap (Visual)
class spell_the_lich_king_shadow_trap_visual : public AuraScript
{
    void OnRemove(AuraEffect const* /*aurEff*/, AuraEffectHandleModes /*mode*/)
    {
        if (GetTargetApplication()->GetRemoveMode() == AURA_REMOVE_BY_EXPIRE)
            GetTarget()->CastSpell(GetTarget(), SPELL_SHADOW_TRAP_AURA, TRIGGERED_NONE);
    }
 
    void Register() override
    {
        AfterEffectRemove += AuraEffectRemoveFn(spell_the_lich_king_shadow_trap_visual::OnRemove, EFFECT_0, SPELL_AURA_DUMMY, AURA_EFFECT_HANDLE_REAL);
    }
};
 
// 74282 - Shadow Trap (Periodic)
class spell_the_lich_king_shadow_trap_periodic : public SpellScript
{
    void CheckTargetCount(std::list<WorldObject*>& targets)
    {
        if (targets.empty())
            return;
 
        GetCaster()->CastSpell(nullptr, SPELL_SHADOW_TRAP_KNOCKBACK, true);
    }
 
    void Register() override
    {
        OnObjectAreaTargetSelect += SpellObjectAreaTargetSelectFn(spell_the_lich_king_shadow_trap_periodic::CheckTargetCount, EFFECT_0, TARGET_UNIT_SRC_AREA_ENEMY);
    }
};
 
// 72262 - Quake
class spell_the_lich_king_quake : public SpellScript
{
    bool Load() override
    {
        return GetCaster()->GetInstanceScript() != nullptr;
    }
 
    void FilterTargets(std::list<WorldObject*>& targets)
    {
        if (GameObject* platform = ObjectAccessor::GetGameObject(*GetCaster(), GetCaster()->GetInstanceScript()->GetGuidData(DATA_ARTHAS_PLATFORM)))
            targets.remove_if(Trinity::HeightDifferenceCheck(platform, 5.0f, false));
    }
 
    void HandleSendEvent(SpellEffIndex /*effIndex*/)
    {
        if (UnitAI* AI = GetCaster()->GetAI())
            AI->DoAction(ACTION_START_ATTACK);
    }
 
    void Register() override
    {
        OnObjectAreaTargetSelect += SpellObjectAreaTargetSelectFn(spell_the_lich_king_quake::FilterTargets, EFFECT_0, TARGET_UNIT_SRC_AREA_ENTRY);
        OnEffectHit += SpellEffectFn(spell_the_lich_king_quake::HandleSendEvent, EFFECT_1, SPELL_EFFECT_SEND_EVENT);
    }
};
 
// 69110 - Ice Burst Target Search
class spell_the_lich_king_ice_burst_target_search : public SpellScript
{
    bool Validate(SpellInfo const* /*spell*/) override
    {
        return ValidateSpellInfo({ SPELL_ICE_BURST });
    }
 
    void CheckTargetCount(std::list<WorldObject*>& unitList)
    {
        if (unitList.empty())
            return;
 
        // if there is at least one affected target cast the explosion
        GetCaster()->CastSpell(GetCaster(), SPELL_ICE_BURST, true);
        if (GetCaster()->GetTypeId() == TYPEID_UNIT)
        {
            GetCaster()->ToCreature()->SetReactState(REACT_PASSIVE);
            GetCaster()->AttackStop();
            GetCaster()->ToCreature()->DespawnOrUnsummon(500ms);
        }
    }
 
    void Register() override
    {
        OnObjectAreaTargetSelect += SpellObjectAreaTargetSelectFn(spell_the_lich_king_ice_burst_target_search::CheckTargetCount, EFFECT_0, TARGET_UNIT_SRC_AREA_ENEMY);
    }
};
 
// 69200 - Raging Spirit
class spell_the_lich_king_raging_spirit : public SpellScript
{
    void HandleScript(SpellEffIndex effIndex)
    {
        PreventHitDefaultEffect(effIndex);
        GetHitUnit()->CastSpell(GetHitUnit(), uint32(GetEffectValueAsInt()), true);
    }
 
    void Register() override
    {
        OnEffectHitTarget += SpellEffectFn(spell_the_lich_king_raging_spirit::HandleScript, EFFECT_0, SPELL_EFFECT_SCRIPT_EFFECT);
    }
};
 
class ExactDistanceCheck
{
    public:
        ExactDistanceCheck(Unit* source, float dist) : _source(source), _dist(dist) { }
 
        bool operator()(WorldObject* unit)
        {
            return _source->GetExactDist2d(unit) > _dist;
        }
 
    private:
        Unit* _source;
        float _dist;
};
 
// 72754, 73708, 73709, 73710 - Defile
class spell_the_lich_king_defile : public SpellScript
{
    void CorrectRange(std::list<WorldObject*>& targets)
    {
        targets.remove_if(ExactDistanceCheck(GetCaster(), 10.0f * GetCaster()->GetObjectScale()));
        targets.remove_if(Trinity::UnitAuraCheck(true, SPELL_HARVEST_SOUL_VALKYR));
    }
 
    void ChangeDamageAndGrow()
    {
        SetHitDamage(int32(GetHitDamage() * GetCaster()->GetObjectScale()));
        // HACK: target player should cast this spell on defile
        // however with current aura handling auras cast by different units
        // cannot stack on the same aura object increasing the stack count
        GetCaster()->CastSpell(GetCaster(), SPELL_DEFILE_GROW, true);
    }
 
    void Register() override
    {
        OnObjectAreaTargetSelect += SpellObjectAreaTargetSelectFn(spell_the_lich_king_defile::CorrectRange, EFFECT_0, TARGET_UNIT_SRC_AREA_ENEMY);
        OnObjectAreaTargetSelect += SpellObjectAreaTargetSelectFn(spell_the_lich_king_defile::CorrectRange, EFFECT_1, TARGET_UNIT_SRC_AREA_ENEMY);
        OnHit += SpellHitFn(spell_the_lich_king_defile::ChangeDamageAndGrow);
    }
};
 
/* 69037 - Summon Val'kyr
   70497 - Summon Vile Spirits Effect
   73579 - Summon Spirit Bomb
   74300 - Summon Spirit Bomb */
class spell_the_lich_king_summon_into_air : public SpellScript
{
    void ModDestHeight(SpellEffIndex /*effIndex*/)
    {
        static Position const offset = {0.0f, 0.0f, 15.0f, 0.0f};
        WorldLocation* dest = const_cast<WorldLocation*>(GetExplTargetDest());
        dest->RelocateOffset(offset);
        GetHitDest()->RelocateOffset(offset);
        // spirit bombs get higher
        if (GetEffectInfo().MiscValue == NPC_SPIRIT_BOMB)
        {
            static Position const offsetExtra = { 0.0f, 0.0f, 5.0f, 0.0f };
            dest->RelocateOffset(offsetExtra);
            GetHitDest()->RelocateOffset(offsetExtra);
        }
    }
 
    void Register() override
    {
        OnEffectLaunch += SpellEffectFn(spell_the_lich_king_summon_into_air::ModDestHeight, EFFECT_0, SPELL_EFFECT_SUMMON);
    }
};
 
// 69409, 73797, 73798, 73799 - Soul Reaper
class spell_the_lich_king_soul_reaper : public AuraScript
{
    bool Validate(SpellInfo const* /*spell*/) override
    {
        return ValidateSpellInfo({ SPELL_SOUL_REAPER_BUFF });
    }
 
    void OnPeriodic(AuraEffect const* /*aurEff*/)
    {
        if (Unit* caster = GetCaster())
            GetTarget()->CastSpell(caster, SPELL_SOUL_REAPER_BUFF, true);
    }
 
    void Register() override
    {
        OnEffectPeriodic += AuraEffectPeriodicFn(spell_the_lich_king_soul_reaper::OnPeriodic, EFFECT_1, SPELL_AURA_PERIODIC_DAMAGE);
    }
};
 
// 69030 - Val'kyr Target Search
class spell_the_lich_king_valkyr_target_search : public SpellScript
{
    bool Validate(SpellInfo const* /*spell*/) override
    {
        return ValidateSpellInfo({ SPELL_CHARGE });
    }
 
    void SelectTarget(std::list<WorldObject*>& targets)
    {
        if (targets.empty())
            return;
 
        targets.remove_if(Trinity::UnitAuraCheck(true, GetSpellInfo()->Id));
        if (targets.empty())
            return;
 
        _target = Trinity::Containers::SelectRandomContainerElement(targets);
        targets.clear();
        targets.push_back(_target);
        GetCaster()->GetAI()->SetGUID(_target->GetGUID(), DATA_GRABBED_PLAYER_GUID);
    }
 
    void ReplaceTarget(std::list<WorldObject*>& targets)
    {
        targets.clear();
        if (_target)
            targets.push_back(_target);
    }
 
    void HandleScript(SpellEffIndex effIndex)
    {
        PreventHitDefaultEffect(effIndex);
        GetCaster()->CastSpell(GetHitUnit(), SPELL_CHARGE, true);
    }
 
    void Register() override
    {
        OnObjectAreaTargetSelect += SpellObjectAreaTargetSelectFn(spell_the_lich_king_valkyr_target_search::SelectTarget, EFFECT_0, TARGET_UNIT_SRC_AREA_ENEMY);
        OnObjectAreaTargetSelect += SpellObjectAreaTargetSelectFn(spell_the_lich_king_valkyr_target_search::ReplaceTarget, EFFECT_1, TARGET_UNIT_SRC_AREA_ENEMY);
        OnEffectHitTarget += SpellEffectFn(spell_the_lich_king_valkyr_target_search::HandleScript, EFFECT_0, SPELL_EFFECT_SCRIPT_EFFECT);
    }
 
    WorldObject* _target = nullptr;
};
 
// 68984 - Harvest Soul
// 74445 - Val'kyr Carry
class spell_the_lich_king_cast_back_to_caster : public SpellScript
{
    void HandleScript(SpellEffIndex /*effIndex*/)
    {
        GetHitUnit()->CastSpell(GetCaster(), uint32(GetEffectValueAsInt()), true);
    }
 
    void Register() override
    {
        OnEffectHitTarget += SpellEffectFn(spell_the_lich_king_cast_back_to_caster::HandleScript, EFFECT_0, SPELL_EFFECT_SCRIPT_EFFECT);
    }
};
 
// 73488, 73782, 73783, 73784 - Life Siphon
class spell_the_lich_king_life_siphon : public SpellScript
{
    bool Validate(SpellInfo const* /*spell*/) override
    {
        return ValidateSpellInfo({ SPELL_LIFE_SIPHON_HEAL });
    }
 
    void TriggerHeal()
    {
        CastSpellExtraArgs args(TRIGGERED_FULL_MASK);
        args.AddSpellBP0(GetHitDamage() * 10);
        GetHitUnit()->CastSpell(GetCaster(), SPELL_LIFE_SIPHON_HEAL, args);
    }
 
    void Register() override
    {
        AfterHit += SpellHitFn(spell_the_lich_king_life_siphon::TriggerHeal);
    }
};
 
// 70498 - Vile Spirits
class spell_the_lich_king_vile_spirits : public AuraScript
{
public:
    spell_the_lich_king_vile_spirits()
    {
        _is25Man = false;
    }
 
private:
    bool Load() override
    {
        _is25Man = GetUnitOwner()->GetMap()->Is25ManRaid();
        return true;
    }
 
    void OnPeriodic(AuraEffect const* aurEff)
    {
        if (_is25Man || ((aurEff->GetTickNumber() - 1) % 5))
            GetTarget()->CastSpell(nullptr, aurEff->GetSpellEffectInfo().TriggerSpell, CastSpellExtraArgs(aurEff)
                .SetOriginalCaster(GetCasterGUID()));
    }
 
    void Register() override
    {
        OnEffectPeriodic += AuraEffectPeriodicFn(spell_the_lich_king_vile_spirits::OnPeriodic, EFFECT_0, SPELL_AURA_PERIODIC_DUMMY);
    }
 
    bool _is25Man;
};
 
// 70499 - Summon Vile Spirits Effect
class spell_the_lich_king_vile_spirits_visual : public SpellScript
{
    void ModDestHeight(SpellEffIndex /*effIndex*/)
    {
        Position offset = {0.0f, 0.0f, 15.0f, 0.0f};
        const_cast<WorldLocation*>(GetExplTargetDest())->RelocateOffset(offset);
    }
 
    void Register() override
    {
        OnEffectLaunch += SpellEffectFn(spell_the_lich_king_vile_spirits_visual::ModDestHeight, EFFECT_0, SPELL_EFFECT_DUMMY);
    }
};
 
// 70501 - Vile Spirit Move Target Search
class spell_the_lich_king_vile_spirit_move_target_search : public SpellScript
{
public:
    spell_the_lich_king_vile_spirit_move_target_search()
    {
        _target = nullptr;
    }
 
private:
    bool Load() override
    {
        return GetCaster()->GetTypeId() == TYPEID_UNIT;
    }
 
    void SelectTarget(std::list<WorldObject*>& targets)
    {
        if (targets.empty())
            return;
 
        _target = Trinity::Containers::SelectRandomContainerElement(targets);
    }
 
    void HandleScript(SpellEffIndex effIndex)
    {
        PreventHitDefaultEffect(effIndex);
        // for this spell, all units are in target map, however it should select one to attack
        if (GetHitUnit() != _target)
            return;
 
        GetCaster()->ToCreature()->AI()->AttackStart(GetHitUnit());
        GetCaster()->GetThreatManager().AddThreat(GetHitUnit(), 100000.0f);
    }
 
    void Register() override
    {
        OnObjectAreaTargetSelect += SpellObjectAreaTargetSelectFn(spell_the_lich_king_vile_spirit_move_target_search::SelectTarget, EFFECT_0, TARGET_UNIT_SRC_AREA_ENEMY);
        OnEffectHitTarget += SpellEffectFn(spell_the_lich_king_vile_spirit_move_target_search::HandleScript, EFFECT_0, SPELL_EFFECT_SCRIPT_EFFECT);
    }
 
    WorldObject* _target;
};
 
// 70534 - Vile Spirit Damage Target Search
class spell_the_lich_king_vile_spirit_damage_target_search : public SpellScript
{
    bool Load() override
    {
        return GetCaster()->GetTypeId() == TYPEID_UNIT;
    }
 
    void CheckTargetCount(std::list<WorldObject*>& targets)
    {
        if (targets.empty())
            return;
 
        // this spell has SPELL_AURA_BLOCK_SPELL_FAMILY so every next cast of this
        // searcher spell will be blocked
        if (TempSummon* summon = GetCaster()->ToTempSummon())
            if (Unit* summoner = summon->GetSummonerUnit())
                summoner->GetAI()->SetData(DATA_VILE, 1);
        GetCaster()->CastSpell(nullptr, SPELL_SPIRIT_BURST, true);
        GetCaster()->ToCreature()->DespawnOrUnsummon(3s);
        GetCaster()->SetUninteractible(true);
    }
 
    void Register() override
    {
        OnObjectAreaTargetSelect += SpellObjectAreaTargetSelectFn(spell_the_lich_king_vile_spirit_damage_target_search::CheckTargetCount, EFFECT_0, TARGET_UNIT_SRC_AREA_ENEMY);
    }
};
 
// 68980, 74296, 74297, 74325 - Harvest Soul
class spell_the_lich_king_harvest_soul : public AuraScript
{
    bool Load() override
    {
        return GetOwner()->GetInstanceScript() != nullptr;
    }
 
    void OnRemove(AuraEffect const* /*aurEff*/, AuraEffectHandleModes /*mode*/)
    {
        // m_originalCaster to allow stacking from different casters, meh
        if (GetTargetApplication()->GetRemoveMode() == AURA_REMOVE_BY_DEATH)
            GetTarget()->CastSpell(nullptr, SPELL_HARVESTED_SOUL, CastSpellExtraArgs(TRIGGERED_FULL_MASK)
                .SetOriginalCaster(GetTarget()->GetInstanceScript()->GetGuidData(DATA_THE_LICH_KING)));
    }
 
    void Register() override
    {
        AfterEffectRemove += AuraEffectRemoveFn(spell_the_lich_king_harvest_soul::OnRemove, EFFECT_0, SPELL_AURA_PERIODIC_DAMAGE, AURA_EFFECT_HANDLE_REAL);
    }
};
 
// 69382 - Light's Favor
class spell_the_lich_king_lights_favor : public AuraScript
{
    void OnPeriodic(AuraEffect const* /*aurEff*/)
    {
        if (Unit* caster = GetCaster())
            if (AuraEffect* effect = GetAura()->GetEffect(EFFECT_1))
                effect->RecalculateAmount(caster);
    }
 
    void CalculateBonus(AuraEffect const* /*aurEff*/, SpellEffectValue& amount, bool& canBeRecalculated)
    {
        canBeRecalculated = true;
        amount = 0;
        if (Unit* caster = GetCaster())
            amount = caster->GetHealthPct();
    }
 
    void Register() override
    {
        OnEffectPeriodic += AuraEffectPeriodicFn(spell_the_lich_king_lights_favor::OnPeriodic, EFFECT_0, SPELL_AURA_PERIODIC_HEAL);
        DoEffectCalcAmount += AuraEffectCalcAmountFn(spell_the_lich_king_lights_favor::CalculateBonus, EFFECT_1, SPELL_AURA_MOD_DAMAGE_PERCENT_DONE);
    }
};
 
// 69397 - Soul Rip
class spell_the_lich_king_soul_rip : public AuraScript
{
    void OnPeriodic(AuraEffect const* aurEff)
    {
        PreventDefaultAction();
        // shouldn't be needed, this is channeled
        if (Unit* caster = GetCaster())
        {
            CastSpellExtraArgs args(aurEff);
            args.OriginalCaster = GetCasterGUID();
            args.AddSpellBP0(5000 * aurEff->GetTickNumber());
            caster->CastSpell(GetTarget(), SPELL_SOUL_RIP_DAMAGE, args);
        }
    }
 
    void Register() override
    {
        OnEffectPeriodic += AuraEffectPeriodicFn(spell_the_lich_king_soul_rip::OnPeriodic, EFFECT_0, SPELL_AURA_PERIODIC_DUMMY);
    }
};
 
// 72595, 73650 - Restore Soul
class spell_the_lich_king_restore_soul : public SpellScript
{
public:
    spell_the_lich_king_restore_soul()
    {
        _instance = nullptr;
    }
 
private:
    bool Load() override
    {
        _instance = GetCaster()->GetInstanceScript();
        return _instance != nullptr;
    }
 
    void HandleScript(SpellEffIndex /*effIndex*/)
    {
        if (Creature* lichKing = ObjectAccessor::GetCreature(*GetCaster(), _instance->GetGuidData(DATA_THE_LICH_KING)))
            lichKing->AI()->DoAction(ACTION_TELEPORT_BACK);
        if (Creature* spawner = GetCaster()->FindNearestCreature(NPC_WORLD_TRIGGER_INFINITE_AOI, 50.0f))
            spawner->RemoveAllAuras();
 
        std::list<Creature*> spirits;
        GetCaster()->GetCreatureListWithEntryInGrid(spirits, NPC_WICKED_SPIRIT, 200.0f);
        for (std::list<Creature*>::iterator itr = spirits.begin(); itr != spirits.end(); ++itr)
        {
            (*itr)->m_Events.KillAllEvents(true);
            (*itr)->SetReactState(REACT_PASSIVE);
            (*itr)->AI()->EnterEvadeMode();
        }
    }
 
    void RemoveAura(SpellMissInfo missInfo)
    {
        if (missInfo != SPELL_MISS_NONE)
            return;
 
        if (Unit* target = GetHitUnit())
            target->RemoveAurasDueToSpell(target->GetMap()->IsHeroic() ? SPELL_HARVEST_SOULS_TELEPORT : SPELL_HARVEST_SOUL_TELEPORT);
    }
 
    void Register() override
    {
        OnEffectHit += SpellEffectFn(spell_the_lich_king_restore_soul::HandleScript, EFFECT_0, SPELL_EFFECT_APPLY_AURA);
        BeforeHit += BeforeSpellHitFn(spell_the_lich_king_restore_soul::RemoveAura);
    }
 
    InstanceScript* _instance;
};
 
// 69383 - Dark Hunger
class spell_the_lich_king_dark_hunger : public AuraScript
{
    bool Validate(SpellInfo const* /*spellInfo*/) override
    {
        return ValidateSpellInfo({ SPELL_DARK_HUNGER_HEAL });
    }
 
    void HandleProc(AuraEffect* aurEff, ProcEventInfo& eventInfo)
    {
        PreventDefaultAction();
        DamageInfo* damageInfo = eventInfo.GetDamageInfo();
        if (!damageInfo || !damageInfo->GetDamage())
            return;
 
        CastSpellExtraArgs args(aurEff);
        args.AddSpellBP0(damageInfo->GetDamage() / 2);
        GetTarget()->CastSpell(GetTarget(), SPELL_DARK_HUNGER_HEAL, args);
    }
 
    void Register() override
    {
        OnEffectProc += AuraEffectProcFn(spell_the_lich_king_dark_hunger::HandleProc, EFFECT_0, SPELL_AURA_DUMMY);
    }
};
 
// 74276 - In Frostmourne Room
class spell_the_lich_king_in_frostmourne_room : public AuraScript
{
    bool Load() override
    {
        return GetOwner()->GetInstanceScript() != nullptr;
    }
 
    void OnRemove(AuraEffect const* /*aurEff*/, AuraEffectHandleModes /*mode*/)
    {
        // m_originalCaster to allow stacking from different casters, meh
        if (GetTargetApplication()->GetRemoveMode() == AURA_REMOVE_BY_DEATH)
            GetTarget()->CastSpell(nullptr, SPELL_HARVESTED_SOUL, CastSpellExtraArgs(TRIGGERED_FULL_MASK)
                .SetOriginalCaster(GetTarget()->GetInstanceScript()->GetGuidData(DATA_THE_LICH_KING)));
    }
 
    void Register() override
    {
        AfterEffectRemove += AuraEffectRemoveFn(spell_the_lich_king_in_frostmourne_room::OnRemove, EFFECT_0, SPELL_AURA_DUMMY, AURA_EFFECT_HANDLE_REAL);
    }
};
 
// 74302, 74341, 74342, 74343 - Summon Spirit Bomb
class spell_the_lich_king_summon_spirit_bomb : public SpellScript
{
    void HandleScript(SpellEffIndex effIndex)
    {
        PreventHitDefaultEffect(effIndex);
        GetHitUnit()->CastSpell(nullptr, uint32(GetEffectValueAsInt()), true);
    }
 
    void Register() override
    {
        OnEffectHitTarget += SpellEffectFn(spell_the_lich_king_summon_spirit_bomb::HandleScript, EFFECT_0, SPELL_EFFECT_SCRIPT_EFFECT);
    }
};
 
// 73582 - Trigger Vile Spirit (Inside, Heroic)
class spell_the_lich_king_trigger_vile_spirit : public SpellScript
{
    void ActivateSpirit()
    {
        Creature* target = GetHitCreature();
        if (!target)
            return;
 
        VileSpiritActivateEvent(target).Execute(0, 0);
    }
 
    void Register() override
    {
        OnHit += SpellHitFn(spell_the_lich_king_trigger_vile_spirit::ActivateSpirit);
    }
};
 
// 71811 - Jump
class spell_the_lich_king_jump : public SpellScript
{
    void HandleScript(SpellEffIndex effIndex)
    {
        PreventHitDefaultEffect(effIndex);
        GetHitUnit()->RemoveAurasDueToSpell(SPELL_RAISE_DEAD);
        GetHitUnit()->CastSpell(nullptr, SPELL_JUMP_2, true);
        if (Creature* creature = GetHitCreature())
            creature->AI()->DoAction(ACTION_BREAK_FROSTMOURNE);
    }
 
    void Register() override
    {
        OnEffectHitTarget += SpellEffectFn(spell_the_lich_king_jump::HandleScript, EFFECT_0, SPELL_EFFECT_SCRIPT_EFFECT);
    }
};
 
// 72431 - Jump (Remove Aura)
class spell_the_lich_king_jump_remove_aura : public SpellScript
{
    void HandleScript(SpellEffIndex effIndex)
    {
        PreventHitDefaultEffect(effIndex);
        GetHitUnit()->RemoveAurasDueToSpell(uint32(GetEffectValueAsInt()));
    }
 
    void Register() override
    {
        OnEffectHitTarget += SpellEffectFn(spell_the_lich_king_jump_remove_aura::HandleScript, EFFECT_0, SPELL_EFFECT_SCRIPT_EFFECT);
    }
};
 
// 73655 - Harvest Soul (Teleport)
class spell_the_lich_king_harvest_souls_teleport : public SpellScript
{
    void RelocateTransportOffset(SpellEffIndex /*effIndex*/)
    {
        float randCoordX = frand(-18.0f, 18.0f);
        float randCoordY = frand(-18.0f, 18.0f);
        GetHitDest()->RelocateOffset({ randCoordX, randCoordY, 0.0f, 0.0f });
    }
 
    void Register() override
    {
        OnEffectHitTarget += SpellEffectFn(spell_the_lich_king_harvest_souls_teleport::RelocateTransportOffset, EFFECT_1, SPELL_EFFECT_TELEPORT_UNITS);
    }
};
 
// 74399 - Charge (Valkyr)
class spell_the_lich_king_valkyr_charge : public SpellScript
{
    void ChargeDest(SpellEffIndex effIndex)
    {
        PreventHitDefaultEffect(effIndex);
 
        Unit* caster = GetCaster();
        Unit* target = GetExplTargetUnit();
        if (!target)
            return;
 
        Position pos = target->GetPosition();
        caster->GetMotionMaster()->MoveCharge(pos.m_positionX, pos.m_positionY, caster->GetFloorZ() + 2.f);
    }
 
    void Register() override
    {
        OnEffectLaunch += SpellEffectFn(spell_the_lich_king_valkyr_charge::ChargeDest, EFFECT_0, SPELL_EFFECT_CHARGE_DEST);
    }
};
 
class achievement_been_waiting_long_time : public AchievementCriteriaScript
{
    public:
        achievement_been_waiting_long_time() : AchievementCriteriaScript("achievement_been_waiting_long_time") { }
 
        bool OnCheck(Player* /*source*/, Unit* target) override
        {
            if (!target)
                return false;
 
            return target->GetAI()->GetData(DATA_PLAGUE_STACK) >= 30;
        }
};
 
class achievement_neck_deep_in_vile : public AchievementCriteriaScript
{
    public:
        achievement_neck_deep_in_vile() : AchievementCriteriaScript("achievement_neck_deep_in_vile") { }
 
        bool OnCheck(Player* /*source*/, Unit* target) override
        {
            if (!target)
                return false;
 
            return !target->GetAI()->GetData(DATA_VILE);
        }
};
 
void AddSC_boss_the_lich_king()
{
    // Creatures
    RegisterIcecrownCitadelCreatureAI(boss_the_lich_king);
    RegisterIcecrownCitadelCreatureAI(npc_tirion_fordring_tft);
    RegisterIcecrownCitadelCreatureAI(npc_shambling_horror_icc);
    RegisterIcecrownCitadelCreatureAI(npc_raging_spirit);
    RegisterIcecrownCitadelCreatureAI(npc_valkyr_shadowguard);
    RegisterIcecrownCitadelCreatureAI(npc_strangulate_vehicle);
    RegisterIcecrownCitadelCreatureAI(npc_terenas_menethil);
    RegisterIcecrownCitadelCreatureAI(npc_spirit_warden);
    RegisterIcecrownCitadelCreatureAI(npc_spirit_bomb);
    RegisterIcecrownCitadelCreatureAI(npc_broken_frostmourne);
 
    // Spells
    RegisterSpellScript(spell_the_lich_king_infest);
    RegisterSpellScript(spell_the_lich_king_necrotic_plague);
    RegisterSpellAndAuraScriptPair(spell_the_lich_king_necrotic_plague_jump, spell_the_lich_king_necrotic_plague_jump_aura);
    RegisterSpellScript(spell_the_lich_king_shadow_trap_visual);
    RegisterSpellScript(spell_the_lich_king_shadow_trap_periodic);
    RegisterSpellScript(spell_the_lich_king_quake);
    RegisterSpellScript(spell_the_lich_king_ice_burst_target_search);
    RegisterSpellScript(spell_the_lich_king_raging_spirit);
    RegisterSpellScript(spell_the_lich_king_defile);
    RegisterSpellScript(spell_the_lich_king_summon_into_air);
    RegisterSpellScript(spell_the_lich_king_soul_reaper);
    RegisterSpellScript(spell_the_lich_king_valkyr_target_search);
    RegisterSpellScript(spell_the_lich_king_cast_back_to_caster);
    RegisterSpellScript(spell_the_lich_king_life_siphon);
    RegisterSpellScript(spell_the_lich_king_vile_spirits);
    RegisterSpellScript(spell_the_lich_king_vile_spirits_visual);
    RegisterSpellScript(spell_the_lich_king_vile_spirit_move_target_search);
    RegisterSpellScript(spell_the_lich_king_vile_spirit_damage_target_search);
    RegisterSpellScript(spell_the_lich_king_harvest_soul);
    RegisterSpellScript(spell_the_lich_king_lights_favor);
    RegisterSpellScript(spell_the_lich_king_soul_rip);
    RegisterSpellScript(spell_the_lich_king_restore_soul);
    RegisterSpellScript(spell_the_lich_king_dark_hunger);
    RegisterSpellScript(spell_the_lich_king_in_frostmourne_room);
    RegisterSpellScript(spell_the_lich_king_summon_spirit_bomb);
    RegisterSpellScript(spell_the_lich_king_trigger_vile_spirit);
    RegisterSpellScript(spell_the_lich_king_jump);
    RegisterSpellScript(spell_the_lich_king_jump_remove_aura);
    RegisterSpellScriptWithArgs(spell_trigger_spell_from_caster, "spell_the_lich_king_mass_resurrection", SPELL_MASS_RESURRECTION_REAL);
    RegisterSpellScript(spell_the_lich_king_harvest_souls_teleport);
    RegisterSpellScript(spell_the_lich_king_valkyr_charge);
 
    // Achievements
    new achievement_been_waiting_long_time();
    new achievement_neck_deep_in_vile();
}