Add support for quest 4921 (The scent of Lar'Korwi)

Patch by D_Skywalk
Fixes issue 1671

--HG--
branch : trunk

2 files changed, 43 insertions, 0 deletions

diff --git a/sql/updates/8122_world_scriptname.sql b/sql/updates/8122_world_scriptname.sql
new file mode 100644
index 00000000000..b5ee81683ef
--- /dev/null
+++ b/sql/updates/8122_world_scriptname.sql
@@ -0,0 +1,17 @@
+DELETE FROM `areatrigger_scripts` WHERE `entry` BETWEEN 1726 AND 1740;
+INSERT INTO `areatrigger_scripts` (`entry`,`ScriptName`) VALUES
+(1726, 'at_scent_larkorwi'),
+(1727, 'at_scent_larkorwi'),
+(1728, 'at_scent_larkorwi'),
+(1729, 'at_scent_larkorwi'),
+(1730, 'at_scent_larkorwi'),
+(1731, 'at_scent_larkorwi'),
+(1732, 'at_scent_larkorwi'),
+(1733, 'at_scent_larkorwi'),
+(1734, 'at_scent_larkorwi'),
+(1735, 'at_scent_larkorwi'),
+(1736, 'at_scent_larkorwi'),
+(1737, 'at_scent_larkorwi'),
+(1738, 'at_scent_larkorwi'),
+(1739, 'at_scent_larkorwi'),
+(1740, 'at_scent_larkorwi');
diff --git a/src/scripts/world/areatrigger_scripts.cpp b/src/scripts/world/areatrigger_scripts.cpp
index 6caddcce5b4..05764a18ad3 100644
--- a/src/scripts/world/areatrigger_scripts.cpp
+++ b/src/scripts/world/areatrigger_scripts.cpp
@@ -181,6 +181,27 @@ bool AreaTrigger_at_stormwright_shelf(Player* pPlayer, const AreaTriggerEntry* /
     return true;
 }
 
+/*######
+## at_scent_larkorwi
+######*/
+
+enum eScentLarkorwi
+{
+    QUEST_SCENT_OF_LARKORWI                     = 4291,
+    NPC_LARKORWI_MATE                           = 9683
+};
+
+bool AreaTrigger_at_scent_larkorwi(Player* pPlayer, const AreaTriggerEntry* pAt)
+{
+    if (!pPlayer->isDead() && pPlayer->GetQuestStatus(QUEST_SCENT_OF_LARKORWI) == QUEST_STATUS_INCOMPLETE)
+    {
+        if (!pPlayer->FindNearestCreature(NPC_LARKORWI_MATE,15))
+            pPlayer->SummonCreature(NPC_LARKORWI_MATE, pPlayer->GetPositionX()+5, pPlayer->GetPositionY(), pPlayer->GetPositionZ(), 3.3, TEMPSUMMON_TIMED_DESPAWN_OUT_OF_COMBAT, 100000);
+    }
+
+    return false;
+}
+
 /*#####
 ## at_last_rites
 #####*/
@@ -253,6 +274,11 @@ void AddSC_areatrigger_scripts()
     newscript->RegisterSelf();
 
     newscript = new Script;
+    newscript->Name = "at_scent_larkorwi";
+    newscript->pAreaTrigger = &AreaTrigger_at_scent_larkorwi;
+    newscript->RegisterSelf();
+
+    newscript = new Script;
     newscript->Name = "at_last_rites";
     newscript->pAreaTrigger = &AreaTrigger_at_last_rites;
     newscript->RegisterSelf();