9
3

scout_training_pt_ii.lua 4.1 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586
  1. --[[
  2. Script Name : Quests/Hallmark/scout_training_pt_ii.lua
  3. Script Author : Dorbin
  4. Script Date : 2022.11.29 01:11:15
  5. Script Purpose :
  6. Zone : Hallmark
  7. Quest Giver: Councilor Vemerik
  8. Preceded by: Scout Training, pt I
  9. Followed by: Path of the (Scout Class)
  10. --]]
  11. require "SpawnScripts/Generic/DialogModule"
  12. function Init(Quest)
  13. AddQuestStepKill(Quest, 1, "I must kill five forest scavengers in the Forest Ruins.", 5, 100, "I need to kill five forest scavengers in the Forest Ruins in order to learn about predators", 91, 8270037,8270015)
  14. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  15. end
  16. function Accepted(Quest, QuestGiver, Player)
  17. FaceTarget(QuestGiver, Player)
  18. Dialog.New(QuestGiver, Player)
  19. Dialog.AddDialog("Hmph! I like it the way I said it. Anyways... I think you might find an interesting time tracking down the creepy crawlies that waylay the unobservant. Take the idea of what a predator does for a living and track down those spiders.")
  20. Dialog.AddVoiceover("voiceover/english/counselor_vemerik/qey_north/counselor_vemerik015.mp3", 3018112745, 368427142)
  21. PlayFlavor(QuestGiver, "", "", "sigh", 0, 0, Player)
  22. Dialog.AddOption("I'll learn what I can from these spiders. They shouldn't be a problem.")
  23. Dialog.AddOption("Oof. Spiders. It HAD to be spiders?!")
  24. Dialog.Start()
  25. if GetQuestStep(Player,5880)==1 then
  26. SetStepComplete(Player,5880,1)
  27. end
  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 killed five forest scavengers in the Forest Ruins.")
  37. UpdateQuestTaskGroupDescription(Quest, 1, "I've killed the forest scavengers as Vemerik advised.")
  38. AddQuestStepChat(Quest, 2, "I need to speak with Vemerik in North Qeynos.", 1, "I should let Vemerik know what I've done.", 11, 2220485)
  39. AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  40. end
  41. function Step2Complete(Quest, QuestGiver, Player)
  42. UpdateQuestStepDescription(Quest, 2, "I've spoken with Vemerik.")
  43. UpdateQuestTaskGroupDescription(Quest, 2, "I've told Vemerik that I've killed the scavengers.")
  44. AddQuestStepChat(Quest, 3, "Speak to Sentry Acton at the eastern end of Antonica on the southernmost bridge", 1, "Vemerik has sent me out to Antonica to tell let one of the guards by the bridge know that his sister is sick but she's in good hands.", 11,121413)
  45. AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
  46. end
  47. function Step3Complete(Quest, QuestGiver, Player)
  48. UpdateQuestStepDescription(Quest, 3, "I've spoken with Sentry Acton next to the bridge.")
  49. UpdateQuestTaskGroupDescription(Quest, 3, "Vemerik was updated on what the guard said.")
  50. AddQuestStepChat(Quest, 4, "I need to speak with Vemerik in North Qeynos.", 1, "I should tell Vemerik that I spoke with the corrupt guard.", 11, 2220485)
  51. AddQuestStepCompleteAction(Quest, 4, "QuestComplete")
  52. end
  53. function QuestComplete(Quest, QuestGiver, Player)
  54. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  55. UpdateQuestStepDescription(Quest, 4, "I've spoken with Vemerik.")
  56. UpdateQuestTaskGroupDescription(Quest, 4, "I have informed Vemerik that the corrupt guard threatened him.")
  57. UpdateQuestDescription(Quest, "I've learned how uses my skills in better ways. I've decided to focus on one type of skill in order to excel in my chosen field. I have only Vemerik to thank for this.")
  58. GiveQuestReward(Quest, Player)
  59. end
  60. function Reload(Quest, QuestGiver, Player, Step)
  61. if Step == 1 then
  62. Step1Complete(Quest, QuestGiver, Player)
  63. elseif Step == 2 then
  64. Step2Complete(Quest, QuestGiver, Player)
  65. elseif Step == 3 then
  66. Step3Complete(Quest, QuestGiver, Player)
  67. elseif Step == 4 then
  68. QuestComplete(Quest, QuestGiver, Player)
  69. end
  70. end