9
3

deep_marshes.lua 8.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198
  1. --[[
  2. Script Name : Quests/Unknown/deep_marshes.lua
  3. Script Author : Dorbin
  4. Script Date : 2022.06.06 10:06:35
  5. Script Purpose :
  6. Zone : Unknown
  7. Quest Giver: Deep Marshes (book)
  8. Preceded by: None
  9. Followed by:
  10. --]]
  11. function Init(Quest)
  12. AddQuestStepKill(Quest, 1, "I need to kill 10 jungle leapers.", 10, 100, "I believe I will find the book's missing pages in the Feerrott.", 611, 1210144)
  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 have killed 10 jungle leapers.")
  26. AddQuestStep(Quest, 2, "I should read the book.", 1, 100, "I believe I will find the book's missing pages in the Feerrott.", 2180)
  27. AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  28. end
  29. function Step2Complete(Quest, QuestGiver, Player)
  30. UpdateQuestStepDescription(Quest, 2, "I have read the book.")
  31. AddQuestStepKill(Quest, 3, "I need to kill 10 swamp feeders.", 10, 100, "I believe I will find the book's missing pages in the Feerrott.", 611, 1210023)
  32. AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
  33. end
  34. function Step3Complete(Quest, QuestGiver, Player)
  35. UpdateQuestStepDescription(Quest, 3, "I have killed 10 swamp feeder")
  36. AddQuestStep(Quest, 4, "I should read the book.", 1, 100, "I believe I will find the book's missing pages in the Feerrott.", 2180)
  37. AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
  38. end
  39. function Step4Complete(Quest, QuestGiver, Player)
  40. UpdateQuestStepDescription(Quest, 4, "I have read the book.")
  41. AddQuestStepKill(Quest, 5, "I need to kill 8 toxic water skaters.", 8, 100, "I believe I will find the book's missing pages in the Feerrott.", 611, 1210061,1210147)
  42. AddQuestStepCompleteAction(Quest, 5, "Step5Complete")
  43. end
  44. function Step5Complete(Quest, QuestGiver, Player)
  45. UpdateQuestStepDescription(Quest, 5, "I have killed 8 toxic water skaters.")
  46. AddQuestStep(Quest, 6, "I should read the book.", 1, 100, "I believe I will find the book's missing pages in the Feerrott.", 2180)
  47. AddQuestStepCompleteAction(Quest, 6, "Step6Complete")
  48. end
  49. function Step6Complete(Quest, QuestGiver, Player)
  50. UpdateQuestStepDescription(Quest, 6, "I have read the book.")
  51. AddQuestStepKill(Quest, 7, "I need to kill 7 underbrush fiends.", 7, 100, "I believe I will find the book's missing pages in the Feerrott.", 611, 1210099)
  52. AddQuestStepCompleteAction(Quest, 7, "Step7Complete")
  53. end
  54. function Step7Complete(Quest, QuestGiver, Player)
  55. UpdateQuestStepDescription(Quest, 7, "I have killed 7 underbrush fiends.")
  56. AddQuestStep(Quest, 8, "I should read the book.", 1, 100, "I believe I will find the book's missing pages in the Feerrott.", 2180)
  57. AddQuestStepCompleteAction(Quest, 8, "Step8Complete")
  58. end
  59. function Step8Complete(Quest, QuestGiver, Player)
  60. UpdateQuestStepDescription(Quest, 8, "I have read the book.")
  61. AddQuestStepKill(Quest, 9, "I need to kill 8 thule sattars.", 8, 100, "I believe I will find the book's missing pages in the Feerrott.", 611,1210097)
  62. AddQuestStepCompleteAction(Quest, 9, "Step9Complete")
  63. end
  64. function Step9Complete(Quest, QuestGiver, Player)
  65. UpdateQuestStepDescription(Quest, 9, "I have killed 8 thule sattars,")
  66. AddQuestStep(Quest, 10, "I should read the book.", 1, 100, "I believe I will find the book's missing pages in the Feerrott.", 2180)
  67. AddQuestStepCompleteAction(Quest, 10, "Step10Complete")
  68. end
  69. function Step10Complete(Quest, QuestGiver, Player)
  70. UpdateQuestStepDescription(Quest, 10, "I have read the book.")
  71. AddQuestStepKill(Quest, 11, "I need to kill 8 bitter blooms.", 8, 100, "I believe I will find the book's missing pages in the Feerrott.", 611, 1210035)
  72. AddQuestStepCompleteAction(Quest, 11, "Step11Complete")
  73. end
  74. function Step11Complete(Quest, QuestGiver, Player)
  75. UpdateQuestStepDescription(Quest, 11, "I have killed 8 bitter blooms.")
  76. AddQuestStep(Quest, 12, "I should read the book.", 1, 100, "I believe I will find the book's missing pages in the Feerrott.", 2180)
  77. AddQuestStepCompleteAction(Quest, 12, "Step12Complete")
  78. end
  79. function Step12Complete(Quest, QuestGiver, Player)
  80. UpdateQuestStepDescription(Quest, 12, "I have read the book.")
  81. AddQuestStepKill(Quest, 13, "I need to kill 6 forest creeps.", 6, 100, "I believe I will find the book's missing pages in the Feerrott.", 611, 1210069)
  82. AddQuestStepCompleteAction(Quest, 13, "Step13Complete")
  83. end
  84. function Step13Complete(Quest, QuestGiver, Player)
  85. UpdateQuestStepDescription(Quest, 13, "I have killed 6 forest creeps.")
  86. AddQuestStep(Quest, 14, "I should read the book.", 1, 100, "I believe I will find the book's missing pages in the Feerrott.", 2180)
  87. AddQuestStepCompleteAction(Quest, 14, "Step14Complete")
  88. end
  89. function Step14Complete(Quest, QuestGiver, Player)
  90. UpdateQuestStepDescription(Quest, 14, "I have read the book.")
  91. AddQuestStepKill(Quest, 15, "I need to kill 7 thule sattars.", 7, 100, "I believe I will find the book's missing pages in the Feerrott.", 611, 1210097)
  92. AddQuestStepCompleteAction(Quest, 15, "Step15Complete")
  93. end
  94. function Step15Complete(Quest, QuestGiver, Player)
  95. UpdateQuestStepDescription(Quest, 15, "I have killed 7 thule sattars.")
  96. AddQuestStep(Quest, 16, "I should read the book.", 1, 100, "I believe I will find the book's missing pages in the Feerrott.", 2180)
  97. AddQuestStepCompleteAction(Quest, 16, "Step16Complete")
  98. end
  99. function Step16Complete(Quest, QuestGiver, Player)
  100. UpdateQuestStepDescription(Quest, 16, "I have read the book.")
  101. AddQuestStepKill(Quest, 17, "I need to kill 5 Evol Ew warders", 5, 100, "I believe I will find the book's missing pages in the Feerrott.", 611, 1210063)
  102. AddQuestStepCompleteAction(Quest, 17, "Step17Complete")
  103. end
  104. function Step17Complete(Quest, QuestGiver, Player)
  105. UpdateQuestStepDescription(Quest, 17, "I have killed 5 Evol Ew warders")
  106. AddQuestStep(Quest, 18, "I should read the book.", 1, 100, "I believe I will find the book's missing pages in the Feerrott.", 2180)
  107. AddQuestStepCompleteAction(Quest, 18, "QuestComplete")
  108. end
  109. function QuestComplete(Quest, QuestGiver, Player)
  110. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  111. UpdateQuestStepDescription(Quest, 18, "I have read the book.")
  112. UpdateQuestTaskGroupDescription(Quest, 1, "I've found the book's missing pages.")
  113. UpdateQuestDescription(Quest, "I have found all of the missing pages for the book titled \"Deep Marshes\".")
  114. GiveQuestReward(Quest, Player)
  115. end
  116. function Reload(Quest, QuestGiver, Player, Step)
  117. if Step == 1 then
  118. Step1Complete(Quest, QuestGiver, Player)
  119. elseif Step == 2 then
  120. Step2Complete(Quest, QuestGiver, Player)
  121. elseif Step == 3 then
  122. Step3Complete(Quest, QuestGiver, Player)
  123. elseif Step == 4 then
  124. Step4Complete(Quest, QuestGiver, Player)
  125. elseif Step == 5 then
  126. Step5Complete(Quest, QuestGiver, Player)
  127. elseif Step == 6 then
  128. Step6Complete(Quest, QuestGiver, Player)
  129. elseif Step == 7 then
  130. Step7Complete(Quest, QuestGiver, Player)
  131. elseif Step == 8 then
  132. Step8Complete(Quest, QuestGiver, Player)
  133. elseif Step == 9 then
  134. Step9Complete(Quest, QuestGiver, Player)
  135. elseif Step == 10 then
  136. Step10Complete(Quest, QuestGiver, Player)
  137. elseif Step == 11 then
  138. Step11Complete(Quest, QuestGiver, Player)
  139. elseif Step == 12 then
  140. Step12Complete(Quest, QuestGiver, Player)
  141. elseif Step == 13 then
  142. Step13Complete(Quest, QuestGiver, Player)
  143. elseif Step == 14 then
  144. Step14Complete(Quest, QuestGiver, Player)
  145. elseif Step == 15 then
  146. Step15Complete(Quest, QuestGiver, Player)
  147. elseif Step == 16 then
  148. Step16Complete(Quest, QuestGiver, Player)
  149. elseif Step == 17 then
  150. Step17Complete(Quest, QuestGiver, Player)
  151. elseif Step == 18 then
  152. QuestComplete(Quest, QuestGiver, Player)
  153. end
  154. end