/*
 * Copyright (C) 2008-2013 TrinityCore <http://www.trinitycore.org/>
 * Copyright (C) 2006-2009 ScriptDev2 <https://scriptdev2.svn.sourceforge.net/>
 *
 * 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/>.
 */

/* ScriptData
SDName: Arcatraz
SD%Complete: 60
SDComment: Warden Mellichar, event controller for Skyriss event. Millhouse Manastorm. @todo make better combatAI for Millhouse.
SDCategory: Tempest Keep, The Arcatraz
EndScriptData */

/* ContentData
npc_millhouse_manastorm
npc_warden_mellichar
mob_zerekethvoidzone
EndContentData */

#include "ScriptMgr.h"
#include "ScriptedCreature.h"
#include "arcatraz.h"

/*#####
# npc_millhouse_manastorm
#####*/

enum eMillhouseSays
{
    SAY_INTRO_1                = 0,
    SAY_INTRO_2                = 1,
    SAY_WATER                  = 2,
    SAY_BUFFS                  = 3,
    SAY_DRINK                  = 4,
    SAY_READY                  = 5,
    SAY_KILL                   = 6,
    SAY_PYRO                   = 7,
    SAY_ICEBLOCK               = 8,
    SAY_LOWHP                  = 9,
    SAY_DEATH                  = 10,
    SAY_COMPLETE               = 11,
};

enum eMillhouseSpells
{
    SPELL_CONJURE_WATER        = 36879,
    SPELL_ARCANE_INTELLECT     = 36880,
    SPELL_ICE_ARMOR            = 36881,
    SPELL_ARCANE_MISSILES      = 33833,
    SPELL_CONE_OF_COLD         = 12611,
    SPELL_FIRE_BLAST           = 13341,
    SPELL_FIREBALL             = 14034,
    SPELL_FROSTBOLT            = 15497,
    SPELL_PYROBLAST            = 33975,
};

class npc_millhouse_manastorm : public CreatureScript
{
    public:

        npc_millhouse_manastorm()
            : CreatureScript("npc_millhouse_manastorm")
        {
        }
        struct npc_millhouse_manastormAI : public ScriptedAI
        {
            npc_millhouse_manastormAI(Creature* creature) : ScriptedAI(creature)
            {
                instance = creature->GetInstanceScript();
            }

            InstanceScript* instance;

            uint32 EventProgress_Timer;
            uint32 Phase;
            bool Init;
            bool LowHp;

            uint32 Pyroblast_Timer;
            uint32 Fireball_Timer;

            void Reset()
            {
                EventProgress_Timer = 2000;
                LowHp = false;
                Init = false;
                Phase = 1;

                Pyroblast_Timer = 1000;
                Fireball_Timer = 2500;

                if (instance)
                {
                    if (instance->GetData(TYPE_WARDEN_2) == DONE)
                        Init = true;

                    if (instance->GetData(TYPE_HARBINGERSKYRISS) == DONE)
                        Talk(SAY_COMPLETE);
                }
            }

            void AttackStart(Unit* who)
            {
                if (me->Attack(who, true))
                {
                    me->AddThreat(who, 0.0f);
                    me->SetInCombatWith(who);
                    who->SetInCombatWith(me);
                    me->GetMotionMaster()->MoveChase(who, 25.0f);
                }
            }

            void EnterCombat(Unit* /*who*/){}

            void KilledUnit(Unit* /*victim*/)
            {
                Talk(SAY_KILL);
            }

            void JustDied(Unit* /*killer*/)
            {
                Talk(SAY_DEATH);

                /*for questId 10886 (heroic mode only)
                if (instance && instance->GetData(TYPE_HARBINGERSKYRISS) != DONE)
                ->FailQuest();*/
            }

            void UpdateAI(uint32 diff)
            {
                if (!Init)
                {
                    if (EventProgress_Timer <= diff)
                    {
                        if (Phase < 8)
                        {
                            switch (Phase)
                            {
                            case 1:
                                Talk(SAY_INTRO_1);
                                EventProgress_Timer = 18000;
                                break;
                            case 2:
                                Talk(SAY_INTRO_2);
                                EventProgress_Timer = 18000;
                                break;
                            case 3:
                                Talk(SAY_WATER);
                                DoCast(me, SPELL_CONJURE_WATER);
                                EventProgress_Timer = 7000;
                                break;
                            case 4:
                                Talk(SAY_BUFFS);
                                DoCast(me, SPELL_ICE_ARMOR);
                                EventProgress_Timer = 7000;
                                break;
                            case 5:
                                Talk(SAY_DRINK);
                                DoCast(me, SPELL_ARCANE_INTELLECT);
                                EventProgress_Timer = 7000;
                                break;
                            case 6:
                                Talk(SAY_READY);
                                EventProgress_Timer = 6000;
                                break;
                            case 7:
                                if (instance)
                                    instance->SetData(TYPE_WARDEN_2, DONE);
                                Init = true;
                                break;
                            }
                            ++Phase;
                        }
                    }
                    else
                        EventProgress_Timer -= diff;
                }

                if (!UpdateVictim())
                    return;
                if (!LowHp && HealthBelowPct(20))
                {
                    Talk(SAY_LOWHP);
                    LowHp = true;
                }

                if (Pyroblast_Timer <= diff)
                {
                    if (me->IsNonMeleeSpellCasted(false))
                        return;

                    Talk(SAY_PYRO);

                    DoCast(me->getVictim(), SPELL_PYROBLAST);
                    Pyroblast_Timer = 40000;
                }
                else
                    Pyroblast_Timer -=diff;

                if (Fireball_Timer <= diff)
                {
                    DoCast(me->getVictim(), SPELL_FIREBALL);
                    Fireball_Timer = 4000;
                }
                else
                    Fireball_Timer -=diff;

                DoMeleeAttackIfReady();
            }
        };

        CreatureAI* GetAI(Creature* creature) const
        {
            return new npc_millhouse_manastormAI(creature);
        }
};
/*#####
# npc_warden_mellichar
#####*/

enum eWardenSays
{
    YELL_INTRO1         = 0,
    YELL_INTRO2         = 1,
    YELL_RELEASE1       = 2,
    YELL_RELEASE2A      = 3,
    YELL_RELEASE2B      = 4,
    YELL_RELEASE3       = 5,
    YELL_RELEASE4       = 6,
    YELL_WELCOME        = 7,
};

enum eWardenUnits
{
    //phase 2(acid mobs)
    ENTRY_TRICKSTER    = 20905,
    ENTRY_PH_HUNTER    = 20906,
    //phase 3
    ENTRY_MILLHOUSE    = 20977,
    //phase 4(acid mobs)
    ENTRY_AKKIRIS      = 20908,
    ENTRY_SULFURON     = 20909,
    //phase 5(acid mobs)
    ENTRY_TW_DRAK      = 20910,
    ENTRY_BL_DRAK      = 20911,
    //phase 6
    ENTRY_SKYRISS      = 20912,
};

enum eWardenSpells
{
    //TARGET_SCRIPT
    SPELL_TARGET_ALPHA  = 36856,
    SPELL_TARGET_BETA   = 36854,
    SPELL_TARGET_DELTA  = 36857,
    SPELL_TARGET_GAMMA  = 36858,
    SPELL_TARGET_OMEGA  = 36852,
    SPELL_BUBBLE_VISUAL = 36849,
};

class npc_warden_mellichar : public CreatureScript
{
    public:

        npc_warden_mellichar() : CreatureScript("npc_warden_mellichar")
        {
        }

        struct npc_warden_mellicharAI : public ScriptedAI
        {
            npc_warden_mellicharAI(Creature* creature) : ScriptedAI(creature)
            {
                instance = creature->GetInstanceScript();
            }

            InstanceScript* instance;

            bool IsRunning;
            bool CanSpawn;

            uint32 EventProgress_Timer;
            uint32 Phase;

            void Reset()
            {
                IsRunning = false;
                CanSpawn = false;

                EventProgress_Timer = 22000;
                Phase = 1;

                me->SetFlag(UNIT_FIELD_FLAGS, UNIT_FLAG_NON_ATTACKABLE);
                DoCast(me, SPELL_TARGET_OMEGA);

                if (instance)
                    instance->SetData(TYPE_HARBINGERSKYRISS, NOT_STARTED);
            }

            void AttackStart(Unit* /*who*/) {}

            void MoveInLineOfSight(Unit* who)
            {
                if (IsRunning)
                    return;

                if (!me->getVictim() && me->canCreatureAttack(who))
                {
                    if (!me->CanFly() && me->GetDistanceZ(who) > CREATURE_Z_ATTACK_RANGE)
                        return;
                    if (who->GetTypeId() != TYPEID_PLAYER)
                        return;

                    float attackRadius = me->GetAttackDistance(who)/10;
                    if (me->IsWithinDistInMap(who, attackRadius) && me->IsWithinLOSInMap(who))
                        EnterCombat(who);
                }
            }

            void EnterCombat(Unit* /*who*/)
            {
                Talk(YELL_INTRO1);
                DoCast(me, SPELL_BUBBLE_VISUAL);

                if (instance)
                {
                    instance->SetData(TYPE_HARBINGERSKYRISS, IN_PROGRESS);
                    instance->HandleGameObject(instance->GetData64(DATA_SPHERE_SHIELD), false);
                    IsRunning = true;
                }
            }

            bool CanProgress()
            {
                if (instance)
                {
                    if (Phase == 7 && instance->GetData(TYPE_WARDEN_4) == DONE)
                        return true;
                    if (Phase == 6 && instance->GetData(TYPE_WARDEN_3) == DONE)
                        return true;
                    if (Phase == 5 && instance->GetData(TYPE_WARDEN_2) == DONE)
                        return true;
                    if (Phase == 4)
                        return true;
                    if (Phase == 3 && instance->GetData(TYPE_WARDEN_1) == DONE)
                        return true;
                    if (Phase == 2 && instance->GetData(TYPE_HARBINGERSKYRISS) == IN_PROGRESS)
                        return true;
                    if (Phase == 1 && instance->GetData(TYPE_HARBINGERSKYRISS) == IN_PROGRESS)
                        return true;
                    return false;
                }
                return false;
            }

            void DoPrepareForPhase()
            {
                if (instance)
                {
                    me->InterruptNonMeleeSpells(true);
                    me->RemoveAurasByType(SPELL_AURA_DUMMY);

                    switch (Phase)
                    {
                    case 2:
                        DoCast(me, SPELL_TARGET_ALPHA);
                        instance->SetData(TYPE_WARDEN_1, IN_PROGRESS);
                        instance->HandleGameObject(instance->GetData64(DATA_SPHERE_SHIELD), false);
                        break;
                    case 3:
                        DoCast(me, SPELL_TARGET_BETA);
                        instance->SetData(TYPE_WARDEN_2, IN_PROGRESS);
                        break;
                    case 5:
                        DoCast(me, SPELL_TARGET_DELTA);
                        instance->SetData(TYPE_WARDEN_3, IN_PROGRESS);
                        break;
                    case 6:
                        DoCast(me, SPELL_TARGET_GAMMA);
                        instance->SetData(TYPE_WARDEN_4, IN_PROGRESS);
                        break;
                    case 7:
                        instance->SetData(TYPE_WARDEN_5, IN_PROGRESS);
                        break;
                    }
                    CanSpawn = true;
                }
            }

            void UpdateAI(uint32 diff)
            {
                if (!IsRunning)
                    return;

                if (EventProgress_Timer <= diff)
                {
                    if (instance)
                    {
                        if (instance->GetData(TYPE_HARBINGERSKYRISS) == FAIL)
                        {
                            Reset();
                            return;
                        }
                    }

                    if (CanSpawn)
                    {
                        //continue beam omega pod, unless we are about to summon skyriss
                        if (Phase != 7)
                            DoCast(me, SPELL_TARGET_OMEGA);

                        switch (Phase)
                        {
                        case 2:
                            switch (urand(0, 1))
                            {
                            case 0:
                                me->SummonCreature(ENTRY_TRICKSTER, 478.326f, -148.505f, 42.56f, 3.19f, TEMPSUMMON_TIMED_OR_DEAD_DESPAWN, 600000);
                                break;
                            case 1:
                                me->SummonCreature(ENTRY_PH_HUNTER, 478.326f, -148.505f, 42.56f, 3.19f, TEMPSUMMON_TIMED_OR_DEAD_DESPAWN, 600000);
                                break;
                            }
                            break;
                        case 3:
                            me->SummonCreature(ENTRY_MILLHOUSE, 413.292f, -148.378f, 42.56f, 6.27f, TEMPSUMMON_TIMED_OR_DEAD_DESPAWN, 600000);
                            break;
                        case 4:
                            Talk(YELL_RELEASE2B);
                            break;
                        case 5:
                            switch (urand(0, 1))
                            {
                            case 0:
                                me->SummonCreature(ENTRY_AKKIRIS, 420.179f, -174.396f, 42.58f, 0.02f, TEMPSUMMON_TIMED_OR_DEAD_DESPAWN, 600000);
                                break;
                            case 1:
                                me->SummonCreature(ENTRY_SULFURON, 420.179f, -174.396f, 42.58f, 0.02f, TEMPSUMMON_TIMED_OR_DEAD_DESPAWN, 600000);
                                break;
                            }
                            break;
                        case 6:
                            switch (urand(0, 1))
                            {
                            case 0:
                                me->SummonCreature(ENTRY_TW_DRAK, 471.795f, -174.58f, 42.58f, 3.06f, TEMPSUMMON_TIMED_OR_DEAD_DESPAWN, 600000);
                                break;
                            case 1:
                                me->SummonCreature(ENTRY_BL_DRAK, 471.795f, -174.58f, 42.58f, 3.06f, TEMPSUMMON_TIMED_OR_DEAD_DESPAWN, 600000);
                                break;
                            }
                            break;
                        case 7:
                            me->SummonCreature(ENTRY_SKYRISS, 445.763f, -191.639f, 44.64f, 1.60f, TEMPSUMMON_TIMED_OR_DEAD_DESPAWN, 600000);
                            Talk(YELL_WELCOME);
                            break;
                        }
                        CanSpawn = false;
                        ++Phase;
                    }
                    if (CanProgress())
                    {
                        switch (Phase)
                        {
                        case 1:
                            Talk(YELL_INTRO2);
                            EventProgress_Timer = 10000;
                            ++Phase;
                            break;
                        case 2:
                            Talk(YELL_RELEASE1);
                            DoPrepareForPhase();
                            EventProgress_Timer = 7000;
                            break;
                        case 3:
                            Talk(YELL_RELEASE2A);
                            DoPrepareForPhase();
                            EventProgress_Timer = 10000;
                            break;
                        case 4:
                            DoPrepareForPhase();
                            EventProgress_Timer = 15000;
                            break;
                        case 5:
                            Talk(YELL_RELEASE3);
                            DoPrepareForPhase();
                            EventProgress_Timer = 15000;
                            break;
                        case 6:
                            Talk(YELL_RELEASE4);
                            DoPrepareForPhase();
                            EventProgress_Timer = 15000;
                            break;
                        case 7:
                            DoPrepareForPhase();
                            EventProgress_Timer = 15000;
                            break;
                        }
                    }
                }
                else
                    EventProgress_Timer -= diff;
            }
        };

        CreatureAI* GetAI(Creature* creature) const
        {
            return new npc_warden_mellicharAI(creature);
        }
};

/*#####
# mob_zerekethvoidzone (this script probably not needed in future -> `creature_template_addon`.`auras`='36120 0')
#####*/

enum ZerekethSpell
{
    SPELL_VOID_ZONE_DAMAGE = 36120,
};

class mob_zerekethvoidzone : public CreatureScript
{
    public:

        mob_zerekethvoidzone() : CreatureScript("mob_zerekethvoidzone")
        {
        }
        struct mob_zerekethvoidzoneAI : public ScriptedAI
        {
            mob_zerekethvoidzoneAI(Creature* creature) : ScriptedAI(creature) {}

            void Reset()
            {
                me->SetUInt32Value(UNIT_NPC_FLAGS, 0);
                me->setFaction(16);
                me->SetFlag(UNIT_FIELD_FLAGS, UNIT_FLAG_NOT_SELECTABLE);

                DoCast(me, SPELL_VOID_ZONE_DAMAGE);
            }

            void EnterCombat(Unit* /*who*/) {}
        };

        CreatureAI* GetAI(Creature* creature) const
        {
            return new mob_zerekethvoidzoneAI(creature);
        }
};

void AddSC_arcatraz()
{
    new npc_millhouse_manastorm();
    new npc_warden_mellichar();
    new mob_zerekethvoidzone();
}
