*Add scriptsupport for Quest 12848

--HG--
branch : trunk

7 files changed, 399 insertions, 1 deletions

diff --git a/src/bindings/scripts/CMakeLists.txt b/src/bindings/scripts/CMakeLists.txt
index 93fbeaf171a..46709dca121 100644
--- a/src/bindings/scripts/CMakeLists.txt
+++ b/src/bindings/scripts/CMakeLists.txt
@@ -151,6 +151,7 @@ SET(trinityscript_LIB_SRCS
    scripts/zone/dun_morogh/dun_morogh.cpp
    scripts/zone/dustwallow_marsh/dustwallow_marsh.cpp
    scripts/zone/eastern_plaguelands/eastern_plaguelands.cpp
+   scripts/zone/eastern_plaguelands/the_scarlet_enclave.cpp
    scripts/zone/elwynn_forest/elwynn_forest.cpp
    scripts/zone/eversong_woods/eversong_woods.cpp
    scripts/zone/felwood/felwood.cpp
diff --git a/src/bindings/scripts/Makefile.am b/src/bindings/scripts/Makefile.am
index 5e98755a8b4..6efe72e082a 100644
--- a/src/bindings/scripts/Makefile.am
+++ b/src/bindings/scripts/Makefile.am
@@ -183,6 +183,7 @@ scripts/zone/deadmines/def_deadmines.h \
 scripts/zone/dun_morogh/dun_morogh.cpp \
 scripts/zone/dustwallow_marsh/dustwallow_marsh.cpp \
 scripts/zone/eastern_plaguelands/eastern_plaguelands.cpp \
+scripts/zone/eastern_plaguelands/the_scarlet_enclave.cpp \
 scripts/zone/elwynn_forest/elwynn_forest.cpp \
 scripts/zone/eversong_woods/eversong_woods.cpp \
 scripts/zone/felwood/felwood.cpp \
diff --git a/src/bindings/scripts/ScriptMgr.cpp b/src/bindings/scripts/ScriptMgr.cpp
index bf80865f0bc..7adbf8e4d51 100644
--- a/src/bindings/scripts/ScriptMgr.cpp
+++ b/src/bindings/scripts/ScriptMgr.cpp
@@ -267,6 +267,7 @@ extern void AddSC_eversong_woods();
 //Exodar
 //Eastern Plaguelands
 extern void AddSC_eastern_plaguelands();
+extern void AddSC_the_scarlet_enclave();
 
 //Elwynn Forest
 extern void AddSC_elwynn_forest();
@@ -1121,7 +1122,7 @@ void ScriptsInit(char const* cfg_file = "trinitycore.conf")
 
     //Bloodmyst Isle
     AddSC_bloodmyst_isle();
-	
+
     //Borean Tundra
     AddSC_borean_tundra();
 
@@ -1196,6 +1197,7 @@ void ScriptsInit(char const* cfg_file = "trinitycore.conf")
     //Exodar
     //Eastern Plaguelands
     AddSC_eastern_plaguelands();
+    AddSC_the_scarlet_enclave();
 
     //Elwynn Forest
     AddSC_elwynn_forest();
diff --git a/src/bindings/scripts/VC71/71ScriptDev2.vcproj b/src/bindings/scripts/VC71/71ScriptDev2.vcproj
index f241121295a..3f8ea7f0c58 100644
--- a/src/bindings/scripts/VC71/71ScriptDev2.vcproj
+++ b/src/bindings/scripts/VC71/71ScriptDev2.vcproj
@@ -524,6 +524,10 @@
 						RelativePath="..\scripts\zone\eastern_plaguelands\eastern_plaguelands.cpp"
 						>
 					</File>
+					<File
+						RelativePath="..\scripts\zone\eastern_plaguelands\scarlet_enclave.cpp"
+						>
+					</File>
 				</Filter>
 				<Filter
 					Name="Moonglade"
diff --git a/src/bindings/scripts/VC80/80ScriptDev2.vcproj b/src/bindings/scripts/VC80/80ScriptDev2.vcproj
index b10552f9f57..a1efa4952bc 100644
--- a/src/bindings/scripts/VC80/80ScriptDev2.vcproj
+++ b/src/bindings/scripts/VC80/80ScriptDev2.vcproj
@@ -693,6 +693,10 @@
 						RelativePath="..\scripts\zone\eastern_plaguelands\eastern_plaguelands.cpp"
 						>
 					</File>
+					<File
+						RelativePath="..\scripts\zone\eastern_plaguelands\scarlet_enclave.cpp"
+						>
+					</File>
 				</Filter>
 				<Filter
 					Name="Moonglade"
diff --git a/src/bindings/scripts/VC90/90ScriptDev2.vcproj b/src/bindings/scripts/VC90/90ScriptDev2.vcproj
index 12331bbf34f..9c71563032f 100644
--- a/src/bindings/scripts/VC90/90ScriptDev2.vcproj
+++ b/src/bindings/scripts/VC90/90ScriptDev2.vcproj
@@ -1407,6 +1407,10 @@
 							RelativePath="..\scripts\zone\eastern_plaguelands\eastern_plaguelands.cpp"
 							>
 						</File>
+						<File
+							RelativePath="..\scripts\zone\eastern_plaguelands\the_scarlet_enclave.cpp"
+							>
+						</File>
 					</Filter>
 					<Filter
 						Name="Eversong Woods"
diff --git a/src/bindings/scripts/scripts/zone/eastern_plaguelands/the_scarlet_enclave.cpp b/src/bindings/scripts/scripts/zone/eastern_plaguelands/the_scarlet_enclave.cpp
new file mode 100644
index 00000000000..e6f51d85e3c
--- /dev/null
+++ b/src/bindings/scripts/scripts/zone/eastern_plaguelands/the_scarlet_enclave.cpp
@@ -0,0 +1,382 @@
+/*
+ * Copyright (C) 2009 Trinity <http://www.trinitycore.org/>
+ *
+ * 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
+ */
+
+#include "precompiled.h"
+
+#define GCD_CAST    1
+
+/*######
+##Quest 12848
+######*/
+
+#define SAY_EVENT_START                 "I will dismantle this festering hellhole!"
+#define SAY_EVENT_ATTACK                "It ends here!"
+
+#define SPELL_SOUL_PRISON_CHAIN_SELF    54612
+#define SPELL_SOUL_PRISON_CHAIN         54613
+
+#define SPELL_ICY_TOUCH                 52372
+#define SPELL_PLAGUE_STRIKE             52373
+#define SPELL_BLOOD_STRIKE              52374
+#define SPELL_DEATH_COIL                52375
+
+#define EVENT_ICY_TOUCH                 1
+#define EVENT_PLAGUE_STRIKE             2
+#define EVENT_BLOOD_STRIKE              3
+#define EVENT_DEATH_COIL                4
+
+uint32 acherus_soul_prison[12] =
+{
+    191577,
+    191580,
+    191581,
+    191582,
+    191583,
+    191584,
+    191585,
+    191586,
+    191587,
+    191588,
+    191589,
+    191590
+};
+
+uint32 acherus_unworthy_initiate[5] =
+{
+    29519,
+    29520,
+    29565,
+    29566,
+    29567
+};
+
+enum initiate_phase
+{
+    Chained,
+    ToEquipping,
+    Equipping,
+    ToAttacking,
+    Attacking
+};
+
+float modelid_dk_armor[20] =
+{
+    25432, // bloodelf female
+    25422, // bloodelf male
+    25412, // draenei female
+    25420, // draenei male
+    25406, // dwarf female
+    25414, // dwarf male
+    25438, // forsaken female
+    25426, // forsaken male
+    25408, // gnome female
+    25426, // gnome male
+    25404, // human female
+    25375, // human male
+    25410, // nightelf female
+    25418, // nightelf male
+    25436, // orc female
+    25424, // orc male
+    25440, // tauren female
+    25430, // tauren male
+    25434, // troll female
+    25428  // troll male
+};
+
+float modelid_dk_unworthy[20] =
+{
+    25369, // bloodelf female
+    25373, // bloodelf male
+    25363, // draenei female
+    25357, // draenei male
+    25361, // dwarf female
+    25356, // dwarf male
+    25372, // forsaken female
+    25367, // forsaken male
+    25362, // gnome female
+    25359, // gnome male
+    25355, // human female
+    25354, // human male
+    25360, // nightelf female
+    25358, // nightelf male
+    25368, // orc female
+    25364, // orc male
+    25371, // tauren female
+    25366, // tauren male
+    25370, // troll female
+    25365  // troll male
+};
+
+struct TRINITY_DLL_DECL npc_unworthy_initiateAI : public ScriptedAI
+{
+    npc_unworthy_initiateAI(Creature *c) : ScriptedAI(c) {Reset();}
+
+    bool event_startet;
+    uint64 event_starter;
+    initiate_phase phase;
+    uint32 wait_timer;
+    float targ_x,targ_y,targ_z;
+
+    EventMap events;
+
+    void Reset()
+    {
+        phase = Chained;
+        events.Reset();
+        m_creature->SetUInt32Value(UNIT_FIELD_BYTES_1, 8);
+        m_creature->SetUInt32Value(UNIT_VIRTUAL_ITEM_SLOT_ID  , 0);
+        event_startet = false;
+    }
+
+    void EnterCombat(Unit *who)
+    {
+        events.ScheduleEvent(EVENT_ICY_TOUCH, 1000, GCD_CAST);
+        events.ScheduleEvent(EVENT_PLAGUE_STRIKE, 3000, GCD_CAST);
+        events.ScheduleEvent(EVENT_BLOOD_STRIKE, 2000, GCD_CAST);
+        events.ScheduleEvent(EVENT_DEATH_COIL, 5000, GCD_CAST);
+    }
+
+    void JustDied(Unit *killer)
+    {
+        if(m_creature->GetEntry() !=  29519)
+            if(killer->GetTypeId() == TYPEID_PLAYER)
+                ((Player*)killer)->KilledMonster(29519,m_creature->GetGUID());
+    }
+
+    void AddEquipp()
+    {
+        int model_counter = 0;
+        for(int i = 0; i< 20; i++)
+        {
+            if(m_creature->GetDisplayId() == modelid_dk_unworthy[i])
+            {
+                model_counter = i;
+                break;
+            }
+        }
+
+        m_creature->SetUInt32Value(UNIT_FIELD_DISPLAYID, modelid_dk_armor[model_counter]);
+        m_creature->LoadEquipment(m_creature->GetEquipmentId());
+    }
+
+    void MovementInform(uint32 type, uint32 id)
+    {
+        if(type != POINT_MOTION_TYPE)
+            return;
+
+        if(id == 1)
+        {
+            wait_timer = 5000;
+            AddEquipp();
+
+            DoSay(SAY_EVENT_ATTACK,LANG_UNIVERSAL,NULL);
+            m_creature->HandleEmoteCommand(EMOTE_ONESHOT_TALK);
+
+            phase = ToAttacking;
+        }
+    }
+
+    void EventStart(Creature* anchor, Player* target)
+    {
+        wait_timer = 5000;
+        phase = ToEquipping;
+
+        m_creature->SetUInt32Value(UNIT_FIELD_BYTES_1, 0);
+
+        anchor->GetPosition(targ_x,targ_y,targ_z);
+        anchor->DealDamage(anchor,anchor->GetHealth());
+        m_creature->RemoveAurasDueToSpell(SPELL_SOUL_PRISON_CHAIN_SELF);
+        m_creature->RemoveAurasDueToSpell(SPELL_SOUL_PRISON_CHAIN);
+
+        DoSay(SAY_EVENT_START,LANG_UNIVERSAL,NULL);
+        m_creature->HandleEmoteCommand(EMOTE_ONESHOT_TALK);
+        event_starter = target->GetGUID();
+    }
+
+    void UpdateAI(const uint32 diff);
+};
+
+CreatureAI* GetAI_npc_unworthy_initiate(Creature *_Creature)
+{
+    return new npc_unworthy_initiateAI(_Creature);
+}
+
+struct TRINITY_DLL_DECL npc_unworthy_initiate_anchorAI : public ScriptedAI
+{
+    npc_unworthy_initiate_anchorAI(Creature *c) : ScriptedAI(c) { guid_target = 0; }
+
+    uint64 guid_target;
+
+    void Aggro(Unit *who) {}
+    void Reset(){}
+
+    void SetTarget(uint64 target);
+    uint64 GetTarget()
+    {
+        return guid_target;
+    }
+
+    void UpdateAI(const uint32 diff){}
+};
+
+void npc_unworthy_initiate_anchorAI::SetTarget(uint64 target)
+{
+    if(guid_target == 0)
+        guid_target = target;
+}
+
+void npc_unworthy_initiateAI::UpdateAI(const uint32 diff)
+{
+    switch(phase)
+    {
+    case Chained:
+        if(!m_creature->HasAura(SPELL_SOUL_PRISON_CHAIN)) 
+        {
+            float x, y, z;
+            float dist = 99;
+
+            for(int i = 0; i < 12; i++)
+            {
+                GameObject* temp_prison;
+                temp_prison = FindGameObject(acherus_soul_prison[i],30,m_creature);
+                if(!temp_prison) return;
+                if(dist == 99 || dist > m_creature->GetDistance2d(temp_prison))
+                {
+                    temp_prison->GetPosition(x, y, z);
+                    dist = m_creature->GetDistance2d(temp_prison);
+                }
+            }
+
+            Creature* trigger = m_creature->SummonCreature(29521,x,y,z,0,TEMPSUMMON_MANUAL_DESPAWN,1000);
+            if(trigger)
+            {
+                ((npc_unworthy_initiate_anchorAI*)trigger->AI())->SetTarget(m_creature->GetGUID());
+                trigger->CastSpell(m_creature,SPELL_SOUL_PRISON_CHAIN,true);
+            }
+
+        }
+        return;
+    case ToEquipping:
+        if(wait_timer)
+        {
+            if(wait_timer < diff)
+            {
+                m_creature->GetMotionMaster()->MovePoint(1,targ_x,targ_y,m_creature->GetPositionZ());
+                phase = Equipping;
+                wait_timer = 0;
+            }else wait_timer -= diff;
+        }
+        return;
+    case ToAttacking:
+        if(wait_timer)
+        {
+            if(wait_timer < diff)
+            {
+                m_creature->setFaction(14);
+                m_creature->RemoveFlag(UNIT_FIELD_FLAGS, UNIT_FLAG_NOT_ATTACKABLE_2);
+                phase = Attacking;
+
+                if(Unit* target = Unit::GetUnit((*m_creature),event_starter))
+                    m_creature->AI()->AttackStart(target);
+                wait_timer = 0;
+            }else wait_timer -= diff;
+        }
+        return;
+    case Attacking:
+            if(!UpdateVictim())
+                return;
+
+            events.Update(diff);
+
+            while(uint32 eventId = events.ExecuteEvent())
+            {
+                switch(eventId)
+                {
+                    case EVENT_ICY_TOUCH:
+                        DoCast(m_creature->getVictim(), SPELL_ICY_TOUCH);
+                        events.DelayEvents(1000, GCD_CAST);
+                        events.ScheduleEvent(EVENT_ICY_TOUCH, 5000, GCD_CAST);
+                        break;
+                    case EVENT_PLAGUE_STRIKE:
+                        DoCast(m_creature->getVictim(), SPELL_PLAGUE_STRIKE);
+                        events.DelayEvents(1000, GCD_CAST);
+                        events.ScheduleEvent(SPELL_PLAGUE_STRIKE, 5000, GCD_CAST);
+                        break;
+                    case EVENT_BLOOD_STRIKE:
+                        DoCast(m_creature->getVictim(), SPELL_BLOOD_STRIKE);
+                        events.DelayEvents(1000, GCD_CAST);
+                        events.ScheduleEvent(EVENT_BLOOD_STRIKE, 5000, GCD_CAST);
+                        break;
+                    case EVENT_DEATH_COIL:
+                        DoCast(m_creature->getVictim(), SPELL_DEATH_COIL);
+                        events.DelayEvents(1000, GCD_CAST);
+                        events.ScheduleEvent(EVENT_DEATH_COIL, 5000, GCD_CAST);
+                        break;
+                }
+            }
+
+            DoMeleeAttackIfReady();
+        return;
+    }
+}
+
+CreatureAI* GetAI_npc_unworthy_initiate_anchor(Creature *_Creature)
+{
+    return new npc_unworthy_initiate_anchorAI(_Creature);
+}
+
+bool GOHello_go_acherus_soul_prison(Player *player, GameObject* _GO)
+{
+    Creature* finder = player->SummonCreature(WORLD_TRIGGER,_GO->GetPositionX(),_GO->GetPositionY(),_GO->GetPositionZ(),0,TEMPSUMMON_TIMED_DESPAWN,2000);
+    if(!finder) return false;
+
+    Unit* prison_anchor = FindCreature(29521,5,finder);
+    if(!prison_anchor) return false;
+
+    uint64 owner = ((npc_unworthy_initiate_anchorAI*)((Creature*)prison_anchor)->AI())->GetTarget();
+
+    Creature* prisoner = Creature::GetCreature((*player),owner);
+    
+    if(prisoner && prison_anchor)
+    {
+        ((npc_unworthy_initiateAI*)(prisoner->AI()))->EventStart((Creature*)prison_anchor,player);
+    }
+
+    return false;
+}
+
+
+void AddSC_the_scarlet_enclave()
+{
+    Script *newscript;
+
+    newscript = new Script;
+    newscript->Name="npc_unworthy_initiate";
+    newscript->GetAI = GetAI_npc_unworthy_initiate;
+    newscript->RegisterSelf();
+
+    newscript = new Script;
+    newscript->Name="npc_unworthy_initiate_anchor";
+    newscript->GetAI = GetAI_npc_unworthy_initiate_anchor;
+    newscript->RegisterSelf();
+
+    newscript = new Script;
+    newscript->Name="go_acherus_soul_prison";
+    newscript->pGOHello = &GOHello_go_acherus_soul_prison;
+    newscript->RegisterSelf();
+}
\ No newline at end of file