9
3

ians_forgetful_family__part_vi.lua 5.8 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485
  1. --[[
  2. Script Name : Quests/QeynosHarbor/ians_forgetful_family__part_vi.lua
  3. Script Author : Dorbin
  4. Script Date : 2022.06.16 10:06:36
  5. Script Purpose :
  6. Zone : QeynosHarbor
  7. Quest Giver: Ian Cathlan
  8. Preceded by: Ian's Forgetful Family - Part V
  9. Followed by: None
  10. --]]
  11. require "SpawnScripts/Generic/DialogModule"
  12. function Init(Quest)
  13. AddQuestStepKill(Quest, 1, "Ian's brother in law lost his collected bear hides after being chased out of the Thundering Steppes by Steelhoof hunters.", 15, 100, "Only a few more things I can think of that I need found in the Thundering Steppes. If you could look for the bear hides that my brother in law lost after a run-in with some Steelhoof hunters that would be appreciated. My grandfather was a bard and always had a variety of flutes on him. Probably because he lost so many, but if you could find the ones he lost near an area with a lot of skeletal troopers that would be appreciated. And last of all I lost my father's murky cutlass when walking up Deadview Pass in the Steppes. A mean giant by the name of Ott Stompgut nearly grabbed me but got the cutlass instead and I'd like it back. - Ian", 123, 2490107)
  14. AddQuestStepKill(Quest, 2, "Ian's grandfather a once famous bard lost his instrument bag within the Thundering Steppes after battling skeletal troopers.", 10, 100, "Only a few more things I can think of that I need found in the Thundering Steppes. If you could look for the bear hides that my brother in law lost after a run-in with some Steelhoof hunters that would be appreciated. My grandfather was a bard and always had a variety of flutes on him. Probably because he lost so many, but if you could find the ones he lost near an area with a lot of skeletal troopers that would be appreciated. And last of all I lost my father's murky cutlass when walking up Deadview Pass in the Steppes. A mean giant by the name of Ott Stompgut nearly grabbed me but got the cutlass instead and I'd like it back. - Ian", 2246, 2490218)
  15. AddQuestStepKill(Quest, 3, "Ian's father lost his murky steel cutlass after having to run from Ott Stompgut a powerful giant in the Thundering Steppes", 1, 100, "Only a few more things I can think of that I need found in the Thundering Steppes. If you could look for the bear hides that my brother in law lost after a run-in with some Steelhoof hunters that would be appreciated. My grandfather was a bard and always had a variety of flutes on him. Probably because he lost so many, but if you could find the ones he lost near an area with a lot of skeletal troopers that would be appreciated. And last of all I lost my father's murky cutlass when walking up Deadview Pass in the Steppes. A mean giant by the name of Ott Stompgut nearly grabbed me but got the cutlass instead and I'd like it back. - Ian", 1678, 2490835)
  16. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  17. AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  18. AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
  19. UpdateQuestZone(Quest,"Thundering Steppes")
  20. end
  21. function Accepted(Quest, QuestGiver, Player)
  22. FaceTarget(QuestGiver, Player)
  23. Dialog.New(QuestGiver, Player)
  24. Dialog.AddDialog("Hrm ... well, this set didn't give me as much of a clue as I hoped. But you can always try where we left off and see where that takes you. Here, I'll write a few suggestions down. See if those help.")
  25. Dialog.AddVoiceover("voiceover/english/optional3/ian_cathlan/qey_harbor/quests/ian_cathlan/iancathlan015.mp3", 1301702054, 185851169)
  26. Dialog.AddOption("Thanks Ian, I'll hope for the best.")
  27. Dialog.Start()
  28. end
  29. function Declined(Quest, QuestGiver, Player)
  30. -- Add dialog here for when the quest is declined
  31. end
  32. function Deleted(Quest, QuestGiver, Player)
  33. -- Remove any quest specific items here when the quest is deleted
  34. end
  35. function Step1Complete(Quest, QuestGiver, Player)
  36. UpdateQuestStepDescription(Quest, 1, "I have found the missing bear hides.")
  37. CheckProgress(Quest, QuestGiver, Player)
  38. end
  39. function Step2Complete(Quest, QuestGiver, Player)
  40. UpdateQuestStepDescription(Quest, 3, "I have found the missing instruments.")
  41. CheckProgress(Quest, QuestGiver, Player)
  42. end
  43. function Step3Complete(Quest, QuestGiver, Player)
  44. UpdateQuestStepDescription(Quest, 3, "I have found the murky steel cutlass.")
  45. CheckProgress(Quest, QuestGiver, Player)
  46. end
  47. function CheckProgress(Quest, QuestGiver, Player)
  48. if QuestStepIsComplete(Player, 5593, 1) and QuestStepIsComplete(Player, 5593, 2) and QuestStepIsComplete(Player, 5593, 3) then
  49. UpdateQuestTaskGroupDescription(Quest, 1, "I've recovered everything Ian needed, I should return to him.")
  50. UpdateQuestZone(Quest,"Qeynos Harbor")
  51. AddQuestStepChat(Quest, 4, "I should return to Ian in Qeynos Harbor.", 1, 100, "I need to speak to Ian Cathlan in the Qeynos Harbor.", 11,2210084)
  52. AddQuestStepCompleteAction(Quest, 4, "QuestComplete")
  53. end
  54. end
  55. function QuestComplete(Quest, QuestGiver, Player)
  56. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  57. UpdateQuestStepDescription(Quest, 4, "I have returned to Ian in Qeynos Harbor.")
  58. UpdateQuestTaskGroupDescription(Quest, 2, "I have spoken with Ian in Qeynos Harbor.")
  59. UpdateQuestDescription(Quest, "Ian has rewarded me with armor for collecting a few of his lost family's possessions.")
  60. GiveQuestReward(Quest, Player)
  61. end
  62. function Reload(Quest, QuestGiver, Player, Step)
  63. if Step == 1 then
  64. Step1Complete(Quest, QuestGiver, Player)
  65. elseif Step == 2 then
  66. Step2Complete(Quest, QuestGiver, Player)
  67. elseif Step == 3 then
  68. Step3Complete(Quest, QuestGiver, Player)
  69. elseif Step == 4 then
  70. QuestComplete(Quest, QuestGiver, Player)
  71. end
  72. end