/scripts/eastern_kingdoms/karazhan/karazhan.cpp

/* Copyright (C) 2006 - 2012 ScriptDev2 <http://www.scriptdev2.com/>
 * 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, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 */

/* ScriptData
SDName: Karazhan
SD%Complete: 100
SDComment: Support for Barnes (Opera controller) and Berthold (Doorman).
SDCategory: Karazhan
EndScriptData */

/* ContentData
npc_barnes
npc_berthold
EndContentData */

#include "precompiled.h"
#include "karazhan.h"
#include "escort_ai.h"

/*######
# npc_barnesAI
######*/

#define GOSSIP_READY        "I'm not an actor."

#define SAY_READY           "Splendid, I'm going to get the audience ready. Break a leg!"
#define SAY_OZ_INTRO1       "Finally, everything is in place. Are you ready for your big stage debut?"
#define OZ_GOSSIP1          "I'm not an actor."
#define SAY_OZ_INTRO2       "Don't worry, you'll be fine. You look like a natural!"
#define OZ_GOSSIP2          "Ok, I'll give it a try, then."

#define SAY_RAJ_INTRO1      "The romantic plays are really tough, but you'll do better this time. You have TALENT. Ready?"
#define RAJ_GOSSIP1         "I've never been more ready."

#define OZ_GM_GOSSIP1       "[GM] Change event to EVENT_OZ"
#define OZ_GM_GOSSIP2       "[GM] Change event to EVENT_HOOD"
#define OZ_GM_GOSSIP3       "[GM] Change event to EVENT_RAJ"

struct Dialogue
{
    int32  iTextId;
    uint32 uiTimer;
};

static Dialogue aOzDialogue[4]=
{
    {-1532103, 6000},
    {-1532104, 18000},
    {-1532105, 9000},
    {-1532106, 15000}
};

static Dialogue aHoodDialogue[4]=
{
    {-1532107, 6000},
    {-1532108, 10000},
    {-1532109, 14000},
    {-1532110, 15000}
};

static Dialogue aRAJDialogue[4]=
{
    {-1532111, 5000},
    {-1532112, 7000},
    {-1532113, 14000},
    {-1532114, 14000}
};

struct Spawn
{
    uint32  uiEntry;
    float   fPosX;
};

// Entries and spawn locations for creatures in Oz event
Spawn aSpawns_OZ[4]=
{
    {17535, -10896.0f},                                     // Dorothee
    {17546, -10891.0f},                                     // Roar
    {17547, -10884.0f},                                     // Tinhead
    {17543, -10902.0f},                                     // Strawman
};
Spawn Spawn_HOOD = {17603, -10892.0f};                      // Grandmother
Spawn Spawn_RAJ  = {17534, -10900.0f};                      // Julianne

enum
{
    NPC_SPOTLIGHT       = 19525,

    SPELL_SPOTLIGHT     = 25824,
    SPELL_TUXEDO        = 32616
};

const float SPAWN_Z = 90.5f;
const float SPAWN_Y = -1758.0f;
const float SPAWN_O = 4.738f;

struct MANGOS_DLL_DECL npc_barnesAI : public npc_escortAI
{
    npc_barnesAI(Creature* pCreature) : npc_escortAI(pCreature)
    {
        m_bRaidWiped = false;
        m_uiEventId  = 0;
        m_pInstance  = (ScriptedInstance*)pCreature->GetInstanceData();
        Reset();
    }

    ScriptedInstance* m_pInstance;

    ObjectGuid m_spotlightGuid;

    uint32 m_uiTalkCount;
    uint32 m_uiTalkTimer;
    uint32 m_uiWipeTimer;
    uint32 m_uiEventId;

    bool m_bPerformanceReady;
    bool m_bRaidWiped;

    void Reset()
    {
        m_spotlightGuid.Clear();

        m_uiTalkCount = 0;
        m_uiTalkTimer = 2000;
        m_uiWipeTimer = 5000;

        m_bPerformanceReady = false;

        if (m_pInstance)
            m_uiEventId = m_pInstance->GetData(DATA_OPERA_PERFORMANCE);
    }

    void StartEvent()
    {
        if (!m_pInstance)
            return;

        m_pInstance->SetData(TYPE_OPERA, IN_PROGRESS);

        //resets count for this event, in case earlier failed
        if (m_uiEventId == EVENT_OZ)
            m_pInstance->SetData(DATA_OPERA_OZ_DEATHCOUNT, IN_PROGRESS);

        Start(false, NULL, NULL, true);
    }

    void WaypointReached(uint32 uiPointId)
    {
        if (!m_pInstance)
            return;

        switch(uiPointId)
        {
            case 0:
                m_creature->CastSpell(m_creature, SPELL_TUXEDO, false);
                m_pInstance->DoUseDoorOrButton(GO_STAGE_DOOR_LEFT);
                break;
            case 4:
                m_uiTalkCount = 0;
                SetEscortPaused(true);

                if (Creature* pSpotlight = m_creature->SummonCreature(NPC_SPOTLIGHT,
                    m_creature->GetPositionX(), m_creature->GetPositionY(), m_creature->GetPositionZ(), 0.0f,
                    TEMPSUMMON_TIMED_OR_DEAD_DESPAWN, 60000))
                {
                    pSpotlight->SetFlag(UNIT_FIELD_FLAGS, UNIT_FLAG_NOT_SELECTABLE);
                    pSpotlight->CastSpell(pSpotlight, SPELL_SPOTLIGHT, false);
                    m_spotlightGuid = pSpotlight->GetObjectGuid();
                }
                break;
            case 8:
                m_pInstance->DoUseDoorOrButton(GO_STAGE_DOOR_LEFT);
                m_bPerformanceReady = true;
                break;
            case 9:
                PrepareEncounter();
                m_pInstance->DoUseDoorOrButton(GO_STAGE_CURTAIN);
                break;
        }
    }

    void Talk(uint32 uiCount)
    {
        int32 iTextId = 0;

        switch(m_uiEventId)
        {
            case EVENT_OZ:
                if (aOzDialogue[uiCount].iTextId)
                    iTextId = aOzDialogue[uiCount].iTextId;
                if (aOzDialogue[uiCount].uiTimer)
                    m_uiTalkTimer = aOzDialogue[uiCount].uiTimer;
                break;

            case EVENT_HOOD:
                if (aHoodDialogue[uiCount].iTextId)
                    iTextId = aHoodDialogue[uiCount].iTextId;
                if (aHoodDialogue[uiCount].uiTimer)
                    m_uiTalkTimer = aHoodDialogue[uiCount].uiTimer;
                break;

            case EVENT_RAJ:
                if (aRAJDialogue[uiCount].iTextId)
                    iTextId = aRAJDialogue[uiCount].iTextId;
                if (aRAJDialogue[uiCount].uiTimer)
                    m_uiTalkTimer = aRAJDialogue[uiCount].uiTimer;
                break;
        }

        if (iTextId)
            DoScriptText(iTextId, m_creature);
    }

    void PrepareEncounter()
    {
        debug_log("SD2: Barnes Opera Event - Introduction complete - preparing encounter %d", m_uiEventId);

        switch(m_uiEventId)
        {
            case EVENT_OZ:
                for(int i=0; i < 4; ++i)
                    m_creature->SummonCreature(aSpawns_OZ[i].uiEntry, aSpawns_OZ[i].fPosX, SPAWN_Y, SPAWN_Z, SPAWN_O, TEMPSUMMON_TIMED_OR_DEAD_DESPAWN, HOUR*2*IN_MILLISECONDS);
                break;
            case EVENT_HOOD:
                m_creature->SummonCreature(Spawn_HOOD.uiEntry, Spawn_HOOD.fPosX, SPAWN_Y, SPAWN_Z, SPAWN_O, TEMPSUMMON_TIMED_OR_DEAD_DESPAWN, HOUR*2*IN_MILLISECONDS);
                break;
            case EVENT_RAJ:
                m_creature->SummonCreature(Spawn_RAJ.uiEntry, Spawn_RAJ.fPosX, SPAWN_Y, SPAWN_Z, SPAWN_O, TEMPSUMMON_TIMED_OR_DEAD_DESPAWN, HOUR*2*IN_MILLISECONDS);
                break;
            default:
                error_log("SD2: Barnes Opera Event - Wrong EventId set: %d", m_uiEventId);
                break;
        }

        m_bRaidWiped = false;
    }

    void UpdateEscortAI(const uint32 uiDiff)
    {
        if (HasEscortState(STATE_ESCORT_PAUSED))
        {
            if (m_uiTalkTimer < uiDiff)
            {
                if (m_uiTalkCount > 3)
                {
                    if (Creature* pSpotlight = m_creature->GetMap()->GetCreature(m_spotlightGuid))
                        pSpotlight->ForcedDespawn();

                    SetEscortPaused(false);
                    return;
                }

                Talk(m_uiTalkCount++);
            }
            else
                m_uiTalkTimer -= uiDiff;
        }

        if (m_bPerformanceReady)
        {
            if (!m_bRaidWiped)
            {
                if (m_uiWipeTimer < uiDiff)
                {
                    Map *pMap = m_creature->GetMap();
                    if (!pMap->IsDungeon())
                        return;

                    Map::PlayerList const &PlayerList = pMap->GetPlayers();
                    if (PlayerList.isEmpty())
                        return;

                    m_bRaidWiped = true;
                    for(Map::PlayerList::const_iterator i = PlayerList.begin();i != PlayerList.end(); ++i)
                    {
                        if (i->getSource()->isAlive() && !i->getSource()->isGameMaster())
                        {
                            m_bRaidWiped = false;
                            break;
                        }
                    }

                    if (m_bRaidWiped)
                        EnterEvadeMode();

                    m_uiWipeTimer = 15000;
                }
                else
                    m_uiWipeTimer -= uiDiff;
            }
        }
    }
};

CreatureAI* GetAI_npc_barnesAI(Creature* pCreature)
{
    return new npc_barnesAI(pCreature);
}

bool GossipHello_npc_barnes(Player* pPlayer, Creature* pCreature)
{
    if (ScriptedInstance* pInstance = (ScriptedInstance*)pCreature->GetInstanceData())
    {
        // Check for death of Moroes and if opera event is not done already
        if (pInstance->GetData(TYPE_MOROES) == DONE && pInstance->GetData(TYPE_OPERA) != DONE)
        {
            pPlayer->ADD_GOSSIP_ITEM(GOSSIP_ICON_CHAT, OZ_GOSSIP1, GOSSIP_SENDER_MAIN, GOSSIP_ACTION_INFO_DEF + 1);

            if (pPlayer->isGameMaster())                    // for GMs we add the possibility to change the event
            {
                pPlayer->ADD_GOSSIP_ITEM(GOSSIP_ICON_DOT, OZ_GM_GOSSIP1, GOSSIP_SENDER_MAIN, GOSSIP_ACTION_INFO_DEF + 3);
                pPlayer->ADD_GOSSIP_ITEM(GOSSIP_ICON_DOT, OZ_GM_GOSSIP2, GOSSIP_SENDER_MAIN, GOSSIP_ACTION_INFO_DEF + 4);
                pPlayer->ADD_GOSSIP_ITEM(GOSSIP_ICON_DOT, OZ_GM_GOSSIP3, GOSSIP_SENDER_MAIN, GOSSIP_ACTION_INFO_DEF + 5);
            }

            if (npc_barnesAI* pBarnesAI = dynamic_cast<npc_barnesAI*>(pCreature->AI()))
            {
                if (!pBarnesAI->m_bRaidWiped)
                    pPlayer->SEND_GOSSIP_MENU(8970, pCreature->GetObjectGuid());
                else
                    pPlayer->SEND_GOSSIP_MENU(8975, pCreature->GetObjectGuid());

                return true;
            }
        }
    }

    pPlayer->SEND_GOSSIP_MENU(8978, pCreature->GetObjectGuid());
    return true;
}

bool GossipSelect_npc_barnes(Player* pPlayer, Creature* pCreature, uint32 uiSender, uint32 uiAction)
{
    npc_barnesAI* pBarnesAI = dynamic_cast<npc_barnesAI*>(pCreature->AI());

    switch(uiAction)
    {
        case GOSSIP_ACTION_INFO_DEF+1:
            pPlayer->ADD_GOSSIP_ITEM(GOSSIP_ICON_CHAT, OZ_GOSSIP2, GOSSIP_SENDER_MAIN, GOSSIP_ACTION_INFO_DEF+2);
            pPlayer->SEND_GOSSIP_MENU(8971, pCreature->GetObjectGuid());
            break;
        case GOSSIP_ACTION_INFO_DEF+2:
            pPlayer->CLOSE_GOSSIP_MENU();
            if (pBarnesAI)
                pBarnesAI->StartEvent();
            break;
        case GOSSIP_ACTION_INFO_DEF+3:
            pPlayer->CLOSE_GOSSIP_MENU();
            if (pBarnesAI && pPlayer->isGameMaster())
                pBarnesAI->m_uiEventId = EVENT_OZ;
            outstring_log("SD2: %s manually set Opera event to EVENT_OZ", pPlayer->GetGuidStr().c_str());
            break;
        case GOSSIP_ACTION_INFO_DEF+4:
            pPlayer->CLOSE_GOSSIP_MENU();
            if (pBarnesAI && pPlayer->isGameMaster())
                pBarnesAI->m_uiEventId = EVENT_HOOD;
            outstring_log("SD2: %s manually set Opera event to EVENT_HOOD", pPlayer->GetGuidStr().c_str());
            break;
        case GOSSIP_ACTION_INFO_DEF+5:
            pPlayer->CLOSE_GOSSIP_MENU();
            if (pBarnesAI && pPlayer->isGameMaster())
                pBarnesAI->m_uiEventId = EVENT_RAJ;
            outstring_log("SD2: %s manually set Opera event to EVENT_RAJ", pPlayer->GetGuidStr().c_str());
            break;
    }

    return true;
}

/*###
# npc_berthold
####*/

enum
{
    SPELL_TELEPORT              = 39567
};

#define GOSSIP_ITEM_TELEPORT    "Teleport me to the Guardian's Library"

bool GossipHello_npc_berthold(Player* pPlayer, Creature* pCreature)
{
    if (ScriptedInstance* pInstance = (ScriptedInstance*)pCreature->GetInstanceData())
    {
        // Check if Shade of Aran event is done
        if (pInstance->GetData(TYPE_ARAN) == DONE)
            pPlayer->ADD_GOSSIP_ITEM(GOSSIP_ICON_CHAT, GOSSIP_ITEM_TELEPORT, GOSSIP_SENDER_MAIN, GOSSIP_ACTION_INFO_DEF + 1);
    }

    pPlayer->SEND_GOSSIP_MENU(pPlayer->GetGossipTextId(pCreature), pCreature->GetObjectGuid());
    return true;
}

bool GossipSelect_npc_berthold(Player* pPlayer, Creature* pCreature, uint32 uiSender, uint32 uiAction)
{
    if (uiAction == GOSSIP_ACTION_INFO_DEF + 1)
        pPlayer->CastSpell(pPlayer, SPELL_TELEPORT, true);

    pPlayer->CLOSE_GOSSIP_MENU();
    return true;
}

void AddSC_karazhan()
{
    Script* pNewScript;

    pNewScript = new Script;
    pNewScript->Name = "npc_barnes";
    pNewScript->GetAI = &GetAI_npc_barnesAI;
    pNewScript->pGossipHello = &GossipHello_npc_barnes;
    pNewScript->pGossipSelect = &GossipSelect_npc_barnes;
    pNewScript->RegisterSelf();

    pNewScript = new Script;
    pNewScript->Name = "npc_berthold";
    pNewScript->pGossipHello = &GossipHello_npc_berthold;
    pNewScript->pGossipSelect = &GossipSelect_npc_berthold;
    pNewScript->RegisterSelf();
}