9
3

pecketts_patrol.lua 8.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166
  1. --[[
  2. Script Name : Quests/Antonica/pecketts_patrol.lua
  3. Script Author : Premierio015
  4. Script Date : 2022.08.11 08:08:59
  5. Script Purpose :
  6. Zone : Antonica
  7. Quest Giver:
  8. Preceded by: None
  9. Followed by:
  10. --]]
  11. function Init(Quest)
  12. AddQuestStepChat(Quest, 1, "Speak to Corporal Peckett.", 1, "I must speak to Corporal Peckett near the lighthouse at Coldwind Point in Antonica.", 11, 120097)
  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, "Spoke to Corporal Peckett.")
  26. UpdateQuestTaskGroupDescription(Quest, 1, "I spoke to Corporal Peckett at the lighthouse on Coldwind Point.")
  27. AddQuestStepZoneLoc(Quest, 2, "Walk the trailhead.", 10, "I will patrol the Coldwind Trail that begins near the lighthouse bridge in Antonica.", 11, 405, -24, 668, 12)
  28. AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  29. end
  30. function Step2Complete(Quest, QuestGiver, Player)
  31. UpdateQuestStepDescription(Quest, 2, "Walked the trailhead.")
  32. AddQuestStepZoneLoc(Quest, 3, "Follow the trail you are on.", 10, "I will patrol the Coldwind Trail that begins near the lighthouse bridge in Antonica.", 11, 421, -26, 590, 12)
  33. AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
  34. end
  35. function Step3Complete(Quest, QuestGiver, Player)
  36. UpdateQuestStepDescription(Quest, 3, "Followed the trail.")
  37. AddQuestStepZoneLoc(Quest, 4, "Follow the trail you are on.", 10, "I will patrol the Coldwind Trail that begins near the lighthouse bridge in Antonica.", 11, 296, -21, 471, 12)
  38. AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
  39. end
  40. function Step4Complete(Quest, QuestGiver, Player)
  41. UpdateQuestStepDescription(Quest, 4, "Walked the midtrail.")
  42. AddQuestStepZoneLoc(Quest, 5, "Walk the trailend.", 10, "I will patrol the Coldwind Trail that begins near the lighthouse bridge in Antonica.", 11, 319, -19, 404, 12)
  43. AddQuestStepCompleteAction(Quest, 5, "Step5Complete")
  44. end
  45. function Step5Complete(Quest, QuestGiver, Player)
  46. UpdateQuestStepDescription(Quest, 5, "Walked the trailend.")
  47. UpdateQuestTaskGroupDescription(Quest, 2, "I patrolled the Coldwind Trail that begins near the lighthouse bridge in Antonica.")
  48. AddQuestStepChat(Quest, 6, "Speak to Corporal Batton.", 1, "I must check in with Corporal Batton at the South Gate of Qeynos in Antonica.", 11, 120446)
  49. AddQuestStepCompleteAction(Quest, 6, "Step6Complete")
  50. end
  51. function Step6Complete(Quest, QuestGiver, Player)
  52. UpdateQuestStepDescription(Quest, 6, "Spoke to Corporal Batton.")
  53. UpdateQuestTaskGroupDescription(Quest, 3, "I checked in with Corporal Batton at the South Gate of Qeynos in Antonica.")
  54. AddQuestStepZoneLoc(Quest, 7, "Walk the north bank.", 10, "I must patrol the banks of Crater Pond just east of the South Gate of Qeynos.", 11, 149, -24, 392, 12)
  55. AddQuestStepCompleteAction(Quest, 7, "Step7Complete")
  56. end
  57. function Step7Complete(Quest, QuestGiver, Player)
  58. UpdateQuestStepDescription(Quest, 7, "Walked the north bank.")
  59. AddQuestStepZoneLoc(Quest, 8, "Walk the south bank.", 10, "I must patrol the banks of Crater Pond just east of the South Gate of Qeynos.", 11, 162, -21, 542, 12)
  60. AddQuestStepCompleteAction(Quest, 8, "Step8Complete")
  61. end
  62. function Step8Complete(Quest, QuestGiver, Player)
  63. UpdateQuestStepDescription(Quest, 8, "Walked the south bank.")
  64. UpdateQuestTaskGroupDescription(Quest, 4, "I patrolled the banks of Crater Pond just east of the South Gate of Qeynos.")
  65. AddQuestStepZoneLoc(Quest, 9, "Walk the trailhead of Black Glade Trail.", 10, "I must patrol Black Glade Trail just northeast of Crater Pond in Antonica. I should start where Black Glade Trail meets the road to Qeynos and then follow it south.", 11, -31, -9, 231, 12)
  66. AddQuestStepCompleteAction(Quest, 9, "Step9Complete")
  67. end
  68. function Step9Complete(Quest, QuestGiver, Player)
  69. UpdateQuestStepDescription(Quest, 9, "Walked the trailhead.")
  70. AddQuestStepZoneLoc(Quest, 10, "Follow the trail you are on.", 10, "I must patrol Black Glade Trail just northeast of Crater Pond in Antonica. I should start where Black Glade Trail meets the road to Qeynos and then follow it south.", 11, -78, -26, 367, 12)
  71. AddQuestStepCompleteAction(Quest, 10, "Step10Complete")
  72. end
  73. function Step10Complete(Quest, QuestGiver, Player)
  74. UpdateQuestStepDescription(Quest, 10, "Followed the trail.")
  75. AddQuestStepZoneLoc(Quest, 11, "Follow the trail you are on.", 10, "I must patrol Black Glade Trail just northeast of Crater Pond in Antonica. I should start where Black Glade Trail meets the road to Qeynos and then follow it south.", 11, -70, -27, 477, 12)
  76. AddQuestStepCompleteAction(Quest, 11, "Step11Complete")
  77. end
  78. function Step11Complete(Quest, QuestGiver, Player)
  79. UpdateQuestStepDescription(Quest, 11, "Followed the trail.")
  80. AddQuestStepZoneLoc(Quest, 12, "Follow the trail you are on.", 10, "I must patrol Black Glade Trail just northeast of Crater Pond in Antonica. I should start where Black Glade Trail meets the road to Qeynos and then follow it south.", 11, -66, -24, 552, 12)
  81. AddQuestStepCompleteAction(Quest, 12, "Step12Complete")
  82. end
  83. function Step12Complete(Quest, QuestGiver, Player)
  84. UpdateQuestStepDescription(Quest, 12, "Walked the midtrail.")
  85. UpdateQuestTaskGroupDescription(Quest, 5, "I patrolled Black Glade Trail just northeast of Crater Pond in Antonica.")
  86. AddQuestStepChat(Quest, 13, "Speak to Captain Antillin.", 1, "I should speak to Captain Antillin of the Coldwind Point Garrison. I have run into him on Black Glade Trail.", 11, 120264)
  87. AddQuestStepCompleteAction(Quest, 13, "Step13Complete")
  88. end
  89. function Step13Complete(Quest, QuestGiver, Player)
  90. UpdateQuestStepDescription(Quest, 13, "Spoke to Captain Antillin.")
  91. UpdateQuestTaskGroupDescription(Quest, 6, "I spoke to Captain Antillin of the Coldwind Point Garrison. I ran into him on Black Glade Trail.")
  92. AddQuestStepChat(Quest, 14, "Speak to Corporal Peckett.", 1, "I must return to Corporal Peckett at the lighthouse in Antonica.", 11, 120097)
  93. AddQuestStepCompleteAction(Quest, 14, "QuestComplete")
  94. end
  95. function QuestComplete(Quest, QuestGiver, Player)
  96. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  97. UpdateQuestStepDescription(Quest, 14, "Spoke to Corporal Peckett.")
  98. UpdateQuestTaskGroupDescription(Quest, 7, "I returned to Corporal Peckett at the lighthouse in Antonica.")
  99. UpdateQuestDescription(Quest, "I patrolled the lighthouse sector of Antonica for Corporal Peckett. I found Captain Antillin and learned that he has discovered a gnoll den. He returned to plot its location.")
  100. GiveQuestReward(Quest, Player)
  101. end
  102. function Reload(Quest, QuestGiver, Player, Step)
  103. if Step == 1 then
  104. Step1Complete(Quest, QuestGiver, Player)
  105. elseif Step == 2 then
  106. Step2Complete(Quest, QuestGiver, Player)
  107. elseif Step == 3 then
  108. Step3Complete(Quest, QuestGiver, Player)
  109. elseif Step == 4 then
  110. Step4Complete(Quest, QuestGiver, Player)
  111. elseif Step == 5 then
  112. Step5Complete(Quest, QuestGiver, Player)
  113. elseif Step == 6 then
  114. Step6Complete(Quest, QuestGiver, Player)
  115. elseif Step == 7 then
  116. Step7Complete(Quest, QuestGiver, Player)
  117. elseif Step == 8 then
  118. Step8Complete(Quest, QuestGiver, Player)
  119. elseif Step == 9 then
  120. Step9Complete(Quest, QuestGiver, Player)
  121. elseif Step == 10 then
  122. Step10Complete(Quest, QuestGiver, Player)
  123. elseif Step == 11 then
  124. Step11Complete(Quest, QuestGiver, Player)
  125. elseif Step == 12 then
  126. Step12Complete(Quest, QuestGiver, Player)
  127. elseif Step == 13 then
  128. Step13Complete(Quest, QuestGiver, Player)
  129. elseif Step == 14 then
  130. QuestComplete(Quest, QuestGiver, Player)
  131. end
  132. end