9
3

the_scholars_search.lua 6.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118
  1. --[[
  2. Script Name : Quests/NorthQeynos/the_scholars_search.lua
  3. Script Author : Dorbin
  4. Script Date : 2022.05.15 02:05:01
  5. Script Purpose :
  6. Zone : NorthQeynos
  7. Quest Giver: Scholar Demini
  8. Preceded by: The Age of Rediscovery
  9. Followed by: Never Judge a Book by it's Cover
  10. --]]
  11. function Init(Quest)
  12. AddQuestStepLocation(Quest, 1, "I need to find and search the area around the Bells of Vhalen.", 6, "According to Demini, the scholar to the Sage of Ages was last seen at the Bells of Vhalen out in Antonica. Perhaps I can find him there.", 11, -1300, 38 ,45)
  13. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  14. end
  15. function Accepted(Quest, QuestGiver, Player)
  16. -- Add dialog here for when the quest is accepted
  17. end
  18. function Declined(Quest, QuestGiver, Player)
  19. -- Add dialog here for when the quest is declined
  20. end
  21. function Deleted(Quest, QuestGiver, Player)
  22. -- Remove any quest specific items here when the quest is deleted
  23. end
  24. function Step1Complete(Quest, QuestGiver, Player)
  25. UpdateQuestStepDescription(Quest, 1, "I've searched the Bells of Vhalen, but found no trace of the wandering scholar.")
  26. UpdateQuestTaskGroupDescription(Quest, 1, "I didn't find the scholar at the Bells, but I found a number of badger tracks around the area. Maybe that's a clue as to where he can be found.")
  27. AddQuestStepKill(Quest, 2, "I need to kill the grizzled badgers until I find a clue to the scholar's whereabouts.", 1, 66, "I should see if any of the badgers possess any clue as to where the scholar might be found.", 75, 120014, 121194)
  28. AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  29. end
  30. function Step2Complete(Quest, QuestGiver, Player)
  31. UpdateQuestStepDescription(Quest, 2, "I've found a partially eaten page from a journal.")
  32. UpdateQuestTaskGroupDescription(Quest, 2, "I've found a clue on a badger. It's a page from a journal, claiming that the scholar was actually escorting the Sage of Ages personally. Unfortunately, the last words on the page claim the two had been accosted by bandits.")
  33. AddQuestStepLocation(Quest, 3, "I need to search the area around the Bramble Woods.", 10, "I should check the surrounding region to see if I can find both the scholar and the Sage of Ages. I hope it's not too late to find them.", 11, -1659, -11, 416)
  34. AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
  35. end
  36. function Step3Complete(Quest, QuestGiver, Player)
  37. UpdateQuestStepDescription(Quest, 3, "I've searched the Bramble Woods, but found no trace of the pair.")
  38. AddQuestStepLocation(Quest, 4, "I need to search the area around the Qeynos Highway", 10, "I should check the surrounding region to see if I can find both the scholar and the Sage of Ages. I hope it's not too late to find them.", 11,-1723, -14, 376)
  39. AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
  40. end
  41. function Step4Complete(Quest, QuestGiver, Player)
  42. UpdateQuestStepDescription(Quest, 4, "I've searched the Qeynos Highway, but found no trace of the pair")
  43. AddQuestStepLocation(Quest, 5, "I need to search the area around the Northern Farmlands", 10, "I should check the surrounding region to see if I can find both the scholar and the Sage of Ages. I hope it's not too late to find them.", 11, -1902, -14, 42)
  44. AddQuestStepCompleteAction(Quest, 5, "Step5Complete")
  45. end
  46. function Step5Complete(Quest, QuestGiver, Player)
  47. UpdateQuestStepDescription(Quest, 5, "I've searched the Northern Farmlands, but found no trace of the pair")
  48. AddQuestStepLocation(Quest, 6, "I need to search the area around the Gnollslayer Highlands", 10, "I should check the surrounding region to see if I can find both the scholar and the Sage of Ages. I hope it's not too late to find them.", 11, -1755, -14, 521)
  49. AddQuestStepCompleteAction(Quest, 6, "Step6Complete")
  50. end
  51. function Step6Complete(Quest, QuestGiver, Player)
  52. UpdateQuestStepDescription(Quest, 6, "I've searched the Gnollslayer Highlands, but found no trace of the pair")
  53. AddQuestStepLocation(Quest, 7, "I need to search the area around the Scarecrow Fields", 10, "I should check the surrounding region to see if I can find both the scholar and the Sage of Ages. I hope it's not too late to find them.", 11,-1755, -14, 521)
  54. AddQuestStepCompleteAction(Quest, 7, "Step7Complete")
  55. end
  56. function Step7Complete(Quest, QuestGiver, Player)
  57. UpdateQuestStepDescription(Quest, 7, "I've searched the Scarecrow Fields, but found no trace of the pair")
  58. AddQuestStepLocation(Quest, 8, "I need to search the area around the Keep of the Gnollslayers", 8, "I should check the surrounding region to see if I can find both the scholar and the Sage of Ages. I hope it's not too late to find them.", 11, -2089, -45, 474)
  59. AddQuestStepCompleteAction(Quest, 8, "Step8Complete")
  60. end
  61. function Step8Complete(Quest, QuestGiver, Player)
  62. UpdateQuestStepDescription(Quest, 8, "I've searched the Keep of the Gnollslayers, but found no trace of the pair")
  63. UpdateQuestTaskGroupDescription(Quest, 3, "I found no trace of either the scholar or the Sage of Ages. It seems that the bandits have done away with them.")
  64. AddQuestStepChat(Quest, 9, "I need to speak to Demini in North Qeynos.", 1, "I should bring these pages back to Demini for my reward that he promised me.", 11, 2220086)
  65. AddQuestStepCompleteAction(Quest, 9, "QuestComplete")
  66. end
  67. function QuestComplete(Quest, QuestGiver, Player)
  68. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  69. UpdateQuestStepDescription(Quest, 9, "I've spoken with Demini.")
  70. UpdateQuestTaskGroupDescription(Quest, 4, "I've given the pages of the journal to Demini in exchange for a nice reward.")
  71. UpdateQuestDescription(Quest, "I've given Demini the bad news that the scholar he was searching for had met a bad fate at the hands of some bandits.")
  72. GiveQuestReward(Quest, Player)
  73. end
  74. function Reload(Quest, QuestGiver, Player, Step)
  75. if Step == 1 then
  76. Step1Complete(Quest, QuestGiver, Player)
  77. elseif Step == 2 then
  78. Step2Complete(Quest, QuestGiver, Player)
  79. elseif Step == 3 then
  80. Step3Complete(Quest, QuestGiver, Player)
  81. elseif Step == 4 then
  82. Step4Complete(Quest, QuestGiver, Player)
  83. elseif Step == 5 then
  84. Step5Complete(Quest, QuestGiver, Player)
  85. elseif Step == 6 then
  86. Step6Complete(Quest, QuestGiver, Player)
  87. elseif Step == 7 then
  88. Step7Complete(Quest, QuestGiver, Player)
  89. elseif Step == 8 then
  90. Step8Complete(Quest, QuestGiver, Player)
  91. elseif Step == 9 then
  92. QuestComplete(Quest, QuestGiver, Player)
  93. end
  94. end