vengeance_for_shoreside.lua 5.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116
  1. --[[
  2. Script Name : Quests/Ruins/vengeance_for_shoreside.lua
  3. Script Purpose : Handles the quest, "Vengeance for Shoreside"
  4. Script Author : Scatman
  5. Script Date : 2009.08.20
  6. Zone : The Ruins
  7. Quest Giver: Captain Arellius
  8. Preceded by: Knock the Fight Out of 'Em (knock_the_fight_out_of_em.lua)
  9. Followed by: Identifying the Lonetusk Ally (identifying_the_lonetusk_ally.lua)
  10. --]]
  11. function Init(Quest)
  12. AddQuestStepKill(Quest, 1, "I must slay five Lonetusk sentries.", 5, 100, "In memory of the fallen citizens of Shoreside, I will take revenge upon the Lonetusk orcs.", 2488, 1270041, 1270049, 1270048, 1270059)
  13. AddQuestStepKill(Quest, 2, "I must slay five Lonetusk warriors.", 5, 100, "In memory of the fallen citizens of Shoreside, I will take revenge upon the Lonetusk orcs.", 2488, 1270115, 1270116, 1270113, 1270133)
  14. AddQuestStepKill(Quest, 3, "I must slay five Lonetusk crushers.", 5, 100, "In memory of the fallen citizens of Shoreside, I will take revenge upon the Lonetusk orcs.", 2488, 1270112, 1270114)
  15. AddQuestStepKill(Quest, 4, "I must slay five Lonetusk pounders.", 5, 100, "In memory of the fallen citizens of Shoreside, I will take revenge upon the Lonetusk orcs.", 2488, 1270063, 1270081)
  16. AddQuestStepKill(Quest, 5, "I must slay five Lonetusk shamans.", 5, 100, "In memory of the fallen citizens of Shoreside, I will take revenge upon the Lonetusk orcs.", 2488, 1270051, 1270052)
  17. AddQuestStepKill(Quest, 6, "I must slay five Lonetusk prophets.", 5, 100, "In memory of the fallen citizens of Shoreside, I will take revenge upon the Lonetusk orcs.", 2488, 1270117, 1270118)
  18. AddQuestStepCompleteAction(Quest, 1, "Step1_Complete_KilledSentries")
  19. AddQuestStepCompleteAction(Quest, 2, "Step2_Complete_KilledWarriors")
  20. AddQuestStepCompleteAction(Quest, 3, "Step3_Complete_KilledCrushers")
  21. AddQuestStepCompleteAction(Quest, 4, "Step4_Complete_KilledPounders")
  22. AddQuestStepCompleteAction(Quest, 5, "Step5_Complete_KilledShaman")
  23. AddQuestStepCompleteAction(Quest, 6, "Step6_Complete_KilledProphets")
  24. end
  25. function Accepted(Quest, QuestGiver, Player)
  26. FaceTarget(QuestGiver, Player)
  27. conversation = CreateConversation()
  28. PlayFlavor(QuestGiver, "voiceover/english/tutorial_revamp/lieutenant_imperidus/fprt_adv04_ruins/revamp/lieutenant_imperidus013.mp3", "", "", 1435258692, 228785667, Player)
  29. AddConversationOption(conversation, "I like the sound of this plan.", "dlg_6_3")
  30. StartConversation(conversation, QuestGiver, Player, "The surest way to take the fight out of the orcs is to thin their numbers. We have to show we will not tolerate their presence anymore. I need you to make a serious dent in the Lonetusk population. The streets of Shoreside must swell with the blood of these brutes.")
  31. end
  32. function Declined(Quest, QuestGiver, Player)
  33. end
  34. function Step1_Complete_KilledSentries(Quest, QuestGiver, Player)
  35. UpdateQuestStepDescription(Quest, 1, "I have slain five Lonetusk sentries.")
  36. if QuestIsComplete(Player, 287) then
  37. Multiple_Steps_Complete(Player, QuestGiver, Player)
  38. end
  39. end
  40. function Step2_Complete_KilledWarriors(Quest, QuestGiver, Player)
  41. UpdateQuestStepDescription(Quest, 2, "I have slain five Lonetusk warriors.")
  42. if QuestIsComplete(Player, 287) then
  43. Multiple_Steps_Complete(Player, QuestGiver, Player)
  44. end
  45. end
  46. function Step3_Complete_KilledCrushers(Quest, QuestGiver, Player)
  47. UpdateQuestStepDescription(Quest, 3, "I have slain five Lonetusk crushers.")
  48. if QuestIsComplete(Player, 287) then
  49. Multiple_Steps_Complete(Player, QuestGiver, Player)
  50. end
  51. end
  52. function Step4_Complete_KilledPounders(Quest, QuestGiver, Player)
  53. UpdateQuestStepDescription(Quest, 4, "I have slain five Lonetusk pounders.")
  54. if QuestIsComplete(Player, 287) then
  55. Multiple_Steps_Complete(Player, QuestGiver, Player)
  56. end
  57. end
  58. function Step5_Complete_KilledShaman(Quest, QuestGiver, Player)
  59. UpdateQuestStepDescription(Quest, 5, "I have slain five Lonetusk shamans.")
  60. if QuestIsComplete(Player, 287) then
  61. Multiple_Steps_Complete(Player, QuestGiver, Player)
  62. end
  63. end
  64. function Step6_Complete_KilledProphets(Quest, QuestGiver, Player)
  65. UpdateQuestStepDescription(Quest, 6, "I have slain five Lonetusk prophets.")
  66. if QuestIsComplete(Player, 287) then
  67. Multiple_Steps_Complete(Player, QuestGiver, Player)
  68. end
  69. end
  70. function Multiple_Steps_Complete(Quest, QuestGiver, Player)
  71. UpdateQuestTaskGroupDescription(Quest, 1, "I have honored the memory of Freeport's fallen by taking revenge on the Lonetusk.")
  72. AddQuestStepChat(Quest, 7, "I should report back to the lieutenant.", 1, "Having wiped out a considerable number of Lonetusk, I should report back to Lieutenant Imperidus.", 0, 1270070)
  73. AddQuestStepCompleteAction(Quest, 7, "Quest_Complete")
  74. end
  75. function Quest_Complete(Quest, QuestGiver, Player)
  76. UpdateQuestStepDescription(Quest, 7, "I have reported back to the lieutenant.")
  77. UpdateQuestTaskGroupDescription(Quest, 2, "I have reported back to Lieutenant Imperidus.")
  78. UpdateQuestDescription(Quest, "I killed Lonetusk orcs. Lots and lots of orcs. Lieutenant Imperidus and I both feel that we're making progress against these foul beasts, but more must be done to ensure Freeport's safety. The lieutenant has further orders for me that will hopefully help us turn the tide at last. Perhaps my efforts here have brought some measure of peace to the dead citizens of Shoreside.")
  79. GiveQuestReward(Quest, Player)
  80. end
  81. function Reload(Quest, QuestGiver, Player, Step)
  82. if Step == 1 then
  83. Step1_Complete_KilledSentries(Quest, QuestGiver, Player)
  84. elseif Step == 2 then
  85. Step2_Complete_KilledWarriors(Quest, QuestGiver, Player)
  86. elseif Step == 3 then
  87. Step3_Complete_KilledCrushers(Quest, QuestGiver, Player)
  88. elseif Step == 4 then
  89. Step4_Complete_KilledPounders(Quest, QuestGiver, Player)
  90. elseif Step == 5 then
  91. Step5_Complete_KilledShaman(Quest, QuestGiver, Player)
  92. elseif Step == 6 then
  93. Step6_Complete_KilledProphets(Quest, QuestGiver, Player)
  94. end
  95. end