9
3

in_the_name_of_prestige.lua 5.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113
  1. --[[
  2. Script Name : Quests/OutpostOverlord/in_the_name_of_prestige.lua
  3. Script Purpose :
  4. Script Author : vo1d
  5. Script Date : 2019.11.02
  6. Script Notes : Added quest item for completion the quest.
  7. Modified by : premierio015
  8. Modified Date : 18.05.2020
  9. Zone : Outpost of the Overlord
  10. Quest Giver : Charles Arker
  11. Preceded by : None
  12. Followed by : In the Name of Honor
  13. --]]
  14. function Init(Quest)
  15. AddQuestStepChat(Quest, 1, "Receive the parchment pieces from Charles Arker.", 1, "Charles Arker will give me the pieces of parchment I'll need to investigate this puzzle.", 11, 2780075)
  16. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  17. end
  18. function Accepted(Quest, QuestGiver, Player)
  19. -- Add dialog here for when the quest is accepted
  20. end
  21. function Declined(Quest, QuestGiver, Player)
  22. -- Add dialog here for when the quest is declined
  23. end
  24. function Deleted(Quest, QuestGiver, Player)
  25. -- Remove any quest specific items here when the quest is deleted
  26. end
  27. function Step1Complete(Quest, QuestGiver, Player)
  28. UpdateQuestStepDescription(Quest, 1, "Received the first parchment pieces.")
  29. UpdateQuestTaskGroupDescription(Quest, 1, "I've received the initial pieces of parchment from Charles Arker.")
  30. GiveQuestItem(Quest, Player, "I've recieved the initial pieces of parchment from Charles Arker.", 10316)
  31. AddQuestStep(Quest, 2, "I should take a look at these parchment scraps given to me by Charles Arker to get some more clues on where to gather more.", 1, 100, "The Tunarians have probably hidden the rest of this parchment and they feel secure. It will be up to me to shatter their security.", 11)
  32. AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  33. end
  34. function Step2Complete(Quest, QuestGiver, Player)
  35. UpdateQuestStepDescription(Quest, 2, "I've examined the parchment.")
  36. AddQuestStepKill(Quest, 3, "Search the Tunarian horse sentries for more pieces of parchment.", 3, 100, "The Tunarians have probably hidden the rest of this parchment and they feel secure. It will be up to me to shatter their security.", 611, 2780070)
  37. AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
  38. end
  39. function Step3Complete(Quest, QuestGiver, Player)
  40. UpdateQuestStepDescription(Quest, 3, "I've located another piece of parchment.")
  41. AddQuestStep(Quest, 4, "I should examine the parchment pieces.", 1, 100, "The Tunarians have probably hidden the rest of this parchment and they feel secure. It will be up to me to shatter their security.", 11)
  42. AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
  43. end
  44. function Step4Complete(Quest, QuestGiver, Player)
  45. UpdateQuestStepDescription(Quest, 4, "I've examined the parchment.")
  46. AddQuestStepKill(Quest, 5, "Remove some of the wilderbear cubs. Taking out the young will delay the Tunarian plans for them.", 4, 100, "The Tunarians have probably hidden the rest of this parchment and they feel secure. It will be up to me to shatter their security.", 93, 2780069)
  47. AddQuestStepCompleteAction(Quest, 5, "Step5Complete")
  48. end
  49. function Step5Complete(Quest, QuestGiver, Player)
  50. UpdateQuestStepDescription(Quest, 5, "I've slain the wilderbear cubs.")
  51. AddQuestStepKill(Quest, 6, "Now to remove some of the wilderbears themselves!", 4, 100, "The Tunarians have probably hidden the rest of this parchment and they feel secure. It will be up to me to shatter their security.", 93, 2780071)
  52. AddQuestStepCompleteAction(Quest, 6, "Step6Complete")
  53. end
  54. function Step6Complete(Quest, QuestGiver, Player)
  55. UpdateQuestStepDescription(Quest, 6, "I've slain several wilderbears.")
  56. AddQuestStep(Quest, 7, "I'm not sure whether there's more to this parchment or not. I'll take another look and see if it makes any more sense now.", 1, 100, "The Tunarians have probably hidden the rest of this parchment and they feel secure. It will be up to me to shatter their security.", 11)
  57. AddQuestStepCompleteAction(Quest, 7, "Step7Complete")
  58. end
  59. function Step7Complete(Quest, QuestGiver, Player)
  60. UpdateQuestStepDescription(Quest, 7, "I've found most, but not all, of the parchment.")
  61. UpdateQuestTaskGroupDescription(Quest, 2, "I've located many pieces of this parchment and pieced together what I could locate.")
  62. AddQuestStepChat(Quest, 8, "Speak with Charles Arker.", 1, "I need to return to Charles Arker and show him the pieces I've assembled. Hopefully, he has found the scraps that I missed and we'll know what the Tunarians are doing.", 11, 2780075)
  63. AddQuestStepCompleteAction(Quest, 8, "QuestComplete")
  64. end
  65. function QuestComplete(Quest, QuestGiver, Player)
  66. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  67. UpdateQuestStepDescription(Quest, 8, "I spoke with Charles Arker.")
  68. UpdateQuestTaskGroupDescription(Quest, 3, "I returned to Charles Arker with the parchment pieces.")
  69. UpdateQuestDescription(Quest, "Though I located some of the notes' scattered pieces, I wasn't able to locate every piece. Neither was Charles Arker, though he still believes this note has some significance. It's frustrating to realize that the Tunarians are planning something, yet we are unable to completely solve the riddle. Perhaps in time, more will be made clear to me.")
  70. GiveQuestReward(Quest, Player)
  71. end
  72. function Reload(Quest, QuestGiver, Player, Step)
  73. if Step == 1 then
  74. Step1Complete(Quest, QuestGiver, Player)
  75. elseif Step == 2 then
  76. Step2Complete(Quest, QuestGiver, Player)
  77. elseif Step == 3 then
  78. Step3Complete(Quest, QuestGiver, Player)
  79. elseif Step == 4 then
  80. Step4Complete(Quest, QuestGiver, Player)
  81. elseif Step == 5 then
  82. Step5Complete(Quest, QuestGiver, Player)
  83. elseif Step == 6 then
  84. Step6Complete(Quest, QuestGiver, Player)
  85. elseif Step == 7 then
  86. Step7Complete(Quest, QuestGiver, Player)
  87. elseif Step == 8 then
  88. QuestComplete(Quest, QuestGiver, Player)
  89. end
  90. end