9
3

BogSludgeHunt.lua 2.4 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061
  1. --[[
  2. Script Name : BogSludgeHunt.lua
  3. Script Purpose : Handles the quest, "Bog Sludge Hunt"
  4. Script Author : EmemJr
  5. Script Date : 10/28/2017
  6. Script Notes : Applied Accept Dialog - Dorbin 06.24.2022
  7. Zone : Peat Bog/Starcrest
  8. Quest Giver : Captain Santis
  9. Preceded by : None
  10. Followed by : None
  11. --]]
  12. require "SpawnScripts/Generic/DialogModule"
  13. function Init(Quest)
  14. AddQuestStepKill(Quest, 1, "I must kill several bog sludges", 10, 100, "I need to kill Bog Sludges in the Peat Bog.", 346, 1980002,8290004)
  15. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  16. UpdateQuestZone(Quest,"Peat Bog")
  17. end
  18. function Step1Complete(Quest, QuestGiver, Player)
  19. UpdateQuestStepDescription(Quest, 1, "I have killed the bog sludges.")
  20. UpdateQuestZone(Quest,"Starcrest")
  21. AddQuestStepChat(Quest, 2, "I need to return to Captain Santis.", 1, "I should return to Captain Santis for my reward.", 11, 2340018)
  22. AddQuestStepCompleteAction(Quest, 2, "QuestComplete")
  23. end
  24. function QuestComplete(Quest, QuestGiver, Player)
  25. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  26. UpdateQuestStepDescription(Quest, 2, "I spoke to Captain Santis.")
  27. UpdateQuestTaskGroupDescription(Quest, 2, "I received my reward for defeating the Bog Sludges.")
  28. UpdateQuestDescription(Quest, "I was able to make the Peat Bog a little safer for others by getting rid of several Bog Sludges. I also made a little coin on the side thanks to the payment from Captain Santis. <br>")
  29. GiveQuestReward(Quest, Player)
  30. end
  31. function Reload(Quest, QuestGiver, Player, Step)
  32. if Step == 1 then
  33. Step1Complete(Quest, QuestGiver, Player)
  34. elseif Step == 2 then
  35. QuestComplete(Quest, QuestGiver, Player)
  36. end
  37. end
  38. function Accepted(Quest, QuestGiver, Player)
  39. FaceTarget(QuestGiver)
  40. Dialog.New(QuestGiver, Player)
  41. PlayFlavor(QuestGiver, "", "", "nod", 0, 0, Player)
  42. Dialog.AddDialog("Excellent! Go to the Peat Bog, slay several sludges and report back to me. I will reward you for your service to Qeynos.")
  43. Dialog.AddVoiceover("voiceover/english/knight-captain_santis/qey_village02/captainsantis002.mp3", 1892648125, 144917500)
  44. Dialog.AddOption("Sounds good. I'll get right on it.")
  45. Dialog.Start()end
  46. function Declined(Quest, QuestGiver, Player)
  47. -- Add dialog here for when the quest is declined
  48. end