9
3

TheyreHere.lua 5.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109
  1. --[[
  2. Script Name : Quests/Freeport/TheyreHere.lua
  3. Script Purpose : Handles the quest, "They're Here..."
  4. Script Author : premierio015
  5. Script Date : 22.08.2020
  6. Script Notes : Auto generated with QuestParser.
  7. Zone : The City of Freeport
  8. Quest Giver : Sneel Valyin
  9. Preceded by : None
  10. Followed by : None
  11. --]]
  12. function Init(Quest)
  13. AddQuestStep(Quest, 1, "Search for a sickened citizen in one of the taverns.", 1, 100, "I should follow Sneel's warning, and see if I can find any of these sickened citizens. I'll search through the city and see what I can find.", 2492)
  14. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  15. end
  16. function Accepted(Quest, QuestGiver, Player)
  17. -- Add dialog here for when the quest is accepted
  18. end
  19. function Declined(Quest, QuestGiver, Player)
  20. -- Add dialog here for when the quest is declined
  21. end
  22. function Deleted(Quest, QuestGiver, Player)
  23. -- Remove any quest specific items here when the quest is deleted
  24. end
  25. function Step1Complete(Quest, QuestGiver, Player)
  26. UpdateQuestStepDescription(Quest, 1, "")
  27. AddQuestStep(Quest, 2, "There's likely a sickened citizen near the Temple of War", 1, 100, "I should follow Sneel's warning, and see if I can find any of these sickened citizens. I'll search through the city and see what I can find.", 11)
  28. AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  29. end
  30. function Step2Complete(Quest, QuestGiver, Player)
  31. UpdateQuestStepDescription(Quest, 2, "")
  32. AddQuestStep(Quest, 3, "Perhaps there is a sickened citizen dying alone in the streets of the city.", 1, 100, "I should follow Sneel's warning, and see if I can find any of these sickened citizens. I'll search through the city and see what I can find.", 11)
  33. AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
  34. end
  35. function Step3Complete(Quest, QuestGiver, Player)
  36. UpdateQuestStepDescription(Quest, 3, "")
  37. UpdateQuestTaskGroupDescription(Quest, 1, "I found a few of the sickened citizens, and the news I have for Sneel does not appear to be good.")
  38. AddQuestStepChat(Quest, 4, "Return to Sneel in Freeport with the news.", 1, "I should return to Sneel, and inform him of what I found.", 11, 5590218)
  39. AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
  40. end
  41. function Step4Complete(Quest, QuestGiver, Player)
  42. UpdateQuestStepDescription(Quest, 4, "")
  43. AddQuestStep(Quest, 5, "Search for the strangely acting ratonga in Freeport.", 1, 100, "I should return to Sneel, and inform him of what I found.", 11)
  44. AddQuestStepCompleteAction(Quest, 5, "Step5Complete")
  45. end
  46. function Step5Complete(Quest, QuestGiver, Player)
  47. UpdateQuestStepDescription(Quest, 5, "")
  48. AddQuestStepLocation(Quest, 6, "I should investigate the door that the ratonga were standing close to.", 1, "I should return to Sneel, and inform him of what I found.", 11, 123) -- need ID
  49. AddQuestStepCompleteAction(Quest, 6, "Step6Complete")
  50. end
  51. function Step6Complete(Quest, QuestGiver, Player)
  52. UpdateQuestStepDescription(Quest, 6, "")
  53. AddQuestStepKill(Quest, 7, "Defeat the roekillik", 1, 100, "I should return to Sneel, and inform him of what I found.", 2483, 123) -- need ID
  54. AddQuestStepCompleteAction(Quest, 7, "Step7Complete")
  55. end
  56. function Step7Complete(Quest, QuestGiver, Player)
  57. UpdateQuestStepDescription(Quest, 7, "")
  58. AddQuestStepChat(Quest, 8, "Return to Sneel with the news of your discovery", 1, "I should return to Sneel, and inform him of what I found.", 11, 5590218)
  59. AddQuestStepCompleteAction(Quest, 8, "QuestComplete")
  60. end
  61. function QuestComplete(Quest, QuestGiver, Player)
  62. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  63. UpdateQuestStepDescription(Quest, 8, "")
  64. UpdateQuestTaskGroupDescription(Quest, 2, "It seems that the roekillik have already infiltrated Freeport. Hopefully, our warning will not fall on deaf ears.")
  65. UpdateQuestDescription(Quest, "That was frighteningly close - the roekillik HAD broken into Freeport, and were beginning to unleash their own diabolical plans. It might not have been the Dark Agenda, but it's clear they are testing the civilized races of Norrath. Hopefully our evidence will convince the Overlord of the seriousness of this situation - if not, I doubt any of the ratonga will remain in Freeport, and the citizens will find themselves facing the Roekillik without us.")
  66. GiveQuestReward(Quest, Player)
  67. end
  68. function Reload(Quest, QuestGiver, Player, Step)
  69. if Step == 1 then
  70. Step1Complete(Quest, QuestGiver, Player)
  71. elseif Step == 2 then
  72. Step2Complete(Quest, QuestGiver, Player)
  73. elseif Step == 3 then
  74. Step3Complete(Quest, QuestGiver, Player)
  75. elseif Step == 4 then
  76. Step4Complete(Quest, QuestGiver, Player)
  77. elseif Step == 5 then
  78. Step5Complete(Quest, QuestGiver, Player)
  79. elseif Step == 6 then
  80. Step6Complete(Quest, QuestGiver, Player)
  81. elseif Step == 7 then
  82. Step7Complete(Quest, QuestGiver, Player)
  83. elseif Step == 8 then
  84. QuestComplete(Quest, QuestGiver, Player)
  85. end
  86. end