9
3

the_dusty_blue_stone.lua 6.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126
  1. --[[
  2. Script Name : the_dusty_blue_stone.lua
  3. Script Purpose : Handles the quest, "The Dusty Blue Stone"
  4. Script Author : Dorbin
  5. Script Date : 3/11/2022
  6. Script Notes : Auto generated with QuestParser.
  7. Zone : The City of Qeynos
  8. Quest Giver : dusty blue stone
  9. Preceded by : Vida Needs a New Broom
  10. Followed by : Restoring Ghoulbane
  11. --]]
  12. function Init(Quest)
  13. AddQuestStepChat(Quest, 1, "I need to find a mineral expert in Qeynos.", 1, "I need to speak to a mineral expert about this dusty blue stone that Vida Sweeps gave me.", 146, 2350019)
  14. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  15. UpdateQuestZone(Quest,"Graystone Yard")
  16. end
  17. function Accepted(Quest, QuestGiver, Player)
  18. -- Add dialog here for when the quest is accepted
  19. end
  20. function Declined(Quest, QuestGiver, Player)
  21. -- Add dialog here for when the quest is declined
  22. end
  23. function Deleted(Quest, QuestGiver, Player)
  24. -- Remove any quest specific items here when the quest is deleted
  25. end
  26. function Step1Complete(Quest, QuestGiver, Player)
  27. UpdateQuestStepDescription(Quest, 1, "I spoke to Gruffin about the stone.")
  28. UpdateQuestTaskGroupDescription(Quest, 1, "I showed the stone to Gruffin Goldtooth in the Qeynos Province District.")
  29. UpdateQuestZone(Quest,"The Thundering Steppes")
  30. AddQuestStepHarvest(Quest, 2, "I need to collect rock samples in the Thundering Steppes.", 40, 80, "I need to collect mineral samples in the Thundering Steppes while Gruffin investigates my blue stone.", 1085, 2490674)
  31. AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  32. end
  33. function Step2Complete(Quest, QuestGiver, Player)
  34. UpdateQuestStepDescription(Quest, 2, "I collected the rock samples from the Steppes.")
  35. UpdateQuestTaskGroupDescription(Quest, 2, "I collected the Thundering Steppes mineral samples for Gruffin.")
  36. UpdateQuestZone(Quest,"Graystone Yard")
  37. AddQuestStepChat(Quest, 3, "I need to deliver the rock samples to Gruffin.", 1, "I need to return these collected rock samples to Gruffin in the Qeynos Province District.", 1085, 2350019)
  38. AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
  39. end
  40. function Step3Complete(Quest, QuestGiver, Player)
  41. UpdateQuestStepDescription(Quest, 3, "I delivered the rock samples to Gruffin.")
  42. UpdateQuestTaskGroupDescription(Quest, 3, "I gave the mineral samples to Gruffin.")
  43. UpdateQuestZone(Quest,"South Qeynos")
  44. AddQuestStepChat(Quest, 4, "I should find a mage in Qeynos that knows about enchanted minerals.", 1, "I should find a mage familiar with enchanted minerals and ask him about this stone.", 146, 2310076)
  45. AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
  46. end
  47. function Step4Complete(Quest, QuestGiver, Player)
  48. UpdateQuestStepDescription(Quest, 4, "I spoke to Aristide about the stone.")
  49. UpdateQuestTaskGroupDescription(Quest, 4, "I showed the dusty blue stone to Aristide Calais at the mage tower.")
  50. UpdateQuestZone(Quest,"The Thundering Steppes")
  51. AddQuestStepChat(Quest, 5, "I need to deliver the bag of enchanted steel bars to Olden Highguard in Thundermist Village.", 1, "I need to take this bag of enchanted steel bars to Olden out in the Thundermist Village.", 10, 2490161)
  52. AddQuestStepCompleteAction(Quest, 5, "Step5Complete")
  53. end
  54. function Step5Complete(Quest, QuestGiver, Player)
  55. UpdateQuestStepDescription(Quest, 5, "I delivered the steel bars to Olden.")
  56. UpdateQuestTaskGroupDescription(Quest, 5, "I delivered the bag of enchanted steel bars to Olden in Thundermist Village.")
  57. UpdateQuestZone(Quest,"South Qeynos")
  58. AddQuestStepChat(Quest, 6, "I should return to Aristide.", 1, "I should return to Aristide in South Qeynos and see what he found about the blue stone.", 146, 2490161)
  59. AddQuestStepCompleteAction(Quest, 6, "Step6Complete")
  60. end
  61. function Step6Complete(Quest, QuestGiver, Player)
  62. UpdateQuestStepDescription(Quest, 6, "I spoke to Aristide.")
  63. UpdateQuestTaskGroupDescription(Quest, 6, "I spoke to Aristide about the blue stone.")
  64. UpdateQuestZone(Quest,"North Qeynos")
  65. AddQuestStepChat(Quest, 7, "I should find someone in Qeynos that knows about blessed objects.", 1, "I should find someone in Qeynos that may know something of blessed objects.", 11, 2220154)
  66. AddQuestStepCompleteAction(Quest, 7, "Step7Complete")
  67. end
  68. function Step7Complete(Quest, QuestGiver, Player)
  69. UpdateQuestStepDescription(Quest, 7, "I spoke to Toranim about the stone.")
  70. UpdateQuestTaskGroupDescription(Quest, 7, "I spoke to Toranim at the Temple of Life about my blue stone.")
  71. UpdateQuestZone(Quest,"Stormhold")
  72. AddQuestStepKill(Quest, 8, "I need to slay powerful undead in Stormhold.", 30, 100, "I should follow Toranim's advice and slay a number of the more powerful ghouls in Stormhold.", 91, 150012, 150080,150066,150086,150013, 150085,150020,150021,150246,150246,150254,150077,150244,150017,150016,150022,150114,150035,150039,150057,150272,150035.150245)
  73. AddQuestStepCompleteAction(Quest, 8, "Step8Complete")
  74. end
  75. function Step8Complete(Quest, QuestGiver, Player)
  76. UpdateQuestStepDescription(Quest, 8, "I destroyed a number of undead in Stormhold.")
  77. UpdateQuestTaskGroupDescription(Quest, 8, "After slaying a number of powerful ghouls in Stormhold my blue stone began to grow brighter and feel warmer.")
  78. UpdateQuestZone(Quest,"North Qeynos")
  79. AddQuestStepChat(Quest, 9, "I should speak to Toranim in Qeynos.", 1, "I should return to Toranim and let him know the stone feels warmer and is beginning to glow.", 146, 2220154)
  80. AddQuestStepCompleteAction(Quest, 9, "QuestComplete")
  81. end
  82. function QuestComplete(Quest, QuestGiver, Player)
  83. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  84. UpdateQuestStepDescription(Quest, 9, "I showed the glowing stone to Toranim.")
  85. UpdateQuestTaskGroupDescription(Quest, 9, "I spoke to Toranim about the blue stone feeling more powerful.")
  86. UpdateQuestDescription(Quest, "After asking a few different people to look at the stone it turns out it is the adornment of an ancient undead slaying sword called Ghoulbane.")
  87. GiveQuestReward(Quest, Player)
  88. end
  89. function Reload(Quest, QuestGiver, Player, Step)
  90. if Step == 1 then
  91. Step1Complete(Quest, QuestGiver, Player)
  92. elseif Step == 2 then
  93. Step2Complete(Quest, QuestGiver, Player)
  94. elseif Step == 3 then
  95. Step3Complete(Quest, QuestGiver, Player)
  96. elseif Step == 4 then
  97. Step4Complete(Quest, QuestGiver, Player)
  98. elseif Step == 5 then
  99. Step5Complete(Quest, QuestGiver, Player)
  100. elseif Step == 6 then
  101. Step6Complete(Quest, QuestGiver, Player)
  102. elseif Step == 7 then
  103. Step7Complete(Quest, QuestGiver, Player)
  104. elseif Step == 8 then
  105. Step8Complete(Quest, QuestGiver, Player)
  106. elseif Step == 9 then
  107. QuestComplete(Quest, QuestGiver, Player)
  108. end
  109. end