selwyns_errands__part_ii.lua 5.4 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586
  1. --[[
  2. Script Name : selwyns_errands_-_part_v.lua
  3. Script Purpose : Handles the quest, "Selwyn's Errands - Part V"
  4. Script Author : Dorbin
  5. Script Date : 7/8/2022
  6. Script Notes : Auto generated with QuestParser.
  7. Zone : The City of Qeynos
  8. Quest Giver : Selwyn
  9. Preceded by : Selwyn's Errands - Part I
  10. Followed by : Selwyn's Errands - Part III
  11. --]]
  12. require "SpawnScripts/Generic/DialogModule"
  13. function Init(Quest)
  14. AddQuestStepKill(Quest, 1, "I must kill the hulking stalkers that have been plaguing the farmers in Antonica.", 25, 100, "Thank you so much for your help earlier. I have a few other errands I need done. If you could help me keep the balance and thin the numbers of the hulking stalkers it might help keep them from going after the livestock of the farmers out in Windstalker Village. Also, it seems that the giant spiders in Blackburrow have been running the gnolls out of there. If you could do us all a favor dear and squash some of the broodtenders that would be wonderful. And a friend of mine asked me to see if I could do something about some plaguebringer priests out in Antonica. - Selwyn", 611, 120141)
  15. AddQuestStepKill(Quest, 2, "I need to squash some of the blightfang broodtenders in Blackburrow.", 8, 100, "Thank you so much for your help earlier. I have a few other errands I need done. If you could help me keep the balance and thin the numbers of the hulking stalkers it might help keep them from going after the livestock of the farmers out in Windstalker Village. Also, it seems that the giant spiders in Blackburrow have been running the gnolls out of there. If you could do us all a favor dear and squash some of the broodtenders that would be wonderful. And a friend of mine asked me to see if I could do something about some plaguebringer priests out in Antonica. - Selwyn", 1876, 170006)
  16. AddQuestStepKill(Quest, 3, "I'm supposed to look for a plaguebringer acolytes and destroy them within Antonica.", 20, 100, "Thank you so much for your help earlier. I have a few other errands I need done. If you could help me keep the balance and thin the numbers of the hulking stalkers it might help keep them from going after the livestock of the farmers out in Windstalker Village. Also, it seems that the giant spiders in Blackburrow have been running the gnolls out of there. If you could do us all a favor dear and squash some of the broodtenders that would be wonderful. And a friend of mine asked me to see if I could do something about some plaguebringer priests out in Antonica. - Selwyn", 611, 120523,120544, 120545, 120546)
  17. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  18. AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  19. AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
  20. UpdateQuestZone(Quest,"Multiple Zones")
  21. end
  22. function Accepted(Quest, QuestGiver, Player)
  23. FaceTarget(QuestGiver, Player)
  24. Dialog.New(QuestGiver, Player)
  25. Dialog.AddDialog( "Oh good, I was hoping you'd be willing to help. I hate to disappoint someone when I just can't get around to what they are waiting on. Here's my list. Now be careful, Antonica can be a little dangerous sometimes.")
  26. -- Dialog.AddVoiceover("voiceover/english/selwyn_oakheart/qey_south/quests/selwyn_oakheart/selwyn001.mp3", 390832885, 49061382)
  27. PlayFlavor(QuestGiver,"","","smile", 0, 0, Player)
  28. Dialog.AddOption( "Don't worry about me. I'll be fine.")
  29. Dialog.Start()
  30. end
  31. function Declined(Quest, QuestGiver, Player)
  32. end
  33. function Step1Complete(Quest, QuestGiver, Player)
  34. UpdateQuestStepDescription(Quest, 1, "I have killed the hulking stalkers that have been plaguing the farmers in Antonica.")
  35. CheckProgress(Quest, QuestGiver, Player)
  36. end
  37. function Step2Complete(Quest, QuestGiver, Player)
  38. UpdateQuestStepDescription(Quest, 2, "I have squashed some of the blightfang broodtenders in Blackburrow.")
  39. CheckProgress(Quest, QuestGiver, Player)
  40. end
  41. function Step3Complete(Quest, QuestGiver, Player)
  42. UpdateQuestStepDescription(Quest, 3, "I have found and destroyed the plaguebringer acolytes.")
  43. CheckProgress(Quest, QuestGiver, Player)
  44. end
  45. function CheckProgress(Quest, QuestGiver, Player)
  46. if QuestStepIsComplete(Player, 5607, 1) and QuestStepIsComplete(Player, 5607, 2) and QuestStepIsComplete(Player, 5607, 3) then
  47. UpdateQuestTaskGroupDescription(Quest, 1, "I have completed all of Selwyn's errands I should return to her.")
  48. UpdateQuestZone(Quest,"South Qeynos")
  49. AddQuestStepChat(Quest, 4, "I should return to Selwyn in South Qeynos.", 1, "I need to speak to Selwyn Oakheart in South Qeynos.", 11, 2310028)
  50. AddQuestStepCompleteAction(Quest, 4, "QuestComplete")
  51. end
  52. end
  53. function QuestComplete(Quest, QuestGiver, Player)
  54. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  55. UpdateQuestStepDescription(Quest, 4, "I have returned to Selwyn in South Qeynos.")
  56. UpdateQuestTaskGroupDescription(Quest, 2, "I have spoken with Selwyn in South Qeynos.")
  57. UpdateQuestDescription(Quest, "Selwyn has paid me with some armor for my forearms.")
  58. GiveQuestReward(Quest, Player)
  59. end
  60. function Reload(Quest, QuestGiver, Player, Step)
  61. if Step == 1 then
  62. Step1Complete(Quest, QuestGiver, Player)
  63. elseif Step == 2 then
  64. Step2Complete(Quest, QuestGiver, Player)
  65. elseif Step == 3 then
  66. Step3Complete(Quest, QuestGiver, Player)
  67. elseif Step == 4 then
  68. QuestComplete(Quest, QuestGiver, Player)
  69. end
  70. end