9
3

marcus_cantariuss_monumental_hatred.lua 2.7 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364
  1. --[[
  2. Script Name : marcus_cantariuss_monumental_hatred.lua
  3. Script Purpose : Handles the quest, "Marcus Cantarius's Monumental Hatred"
  4. Script Author : torsten\\Dorbin
  5. Script Date : 16.07.2022
  6. Script Notes :
  7. Zone : Beggar's Court
  8. Quest Giver : Marcus Cantarius
  9. Preceded by : None
  10. Followed by : Deliver Help to Janus Fieri
  11. --]]
  12. require "SpawnScripts/Generic/DialogModule"
  13. function Init(Quest)
  14. AddQuestStepKill(Quest, 1, "I need to collect twenty dervish thug scalps.", 20, 100, "I need to collect scalps from the dervish thugs in the Commonlands for Marcus Cantarius.", 138, 330096, 330105)
  15. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  16. UpdateQuestZone(Quest,"The Commonlands")
  17. end
  18. function Step1Complete(Quest, QuestGiver, Player)
  19. UpdateQuestStepDescription(Quest, 1, "I have enough dervish thug scalps.")
  20. UpdateQuestTaskGroupDescription(Quest, 1, "I need to take these scalps to Marcus Cantarius in the Beggar's Court.")
  21. UpdateQuestZone(Quest,"Beggar's Court")
  22. AddQuestStepChat(Quest, 2, "I need to take these scalps to Marcus Cantarius.", 1, "I need to take these scalps back to Marcus Cantarius in Beggar's Court.", 138, 1370042)
  23. AddQuestStepCompleteAction(Quest, 2, "QuestComplete")
  24. end
  25. function QuestComplete(Quest, QuestGiver, Player)
  26. UpdateQuestStepDescription(Quest, 2, "I gave the scalps to Marcus Cantarius.")
  27. UpdateQuestTaskGroupDescription(Quest, 2, "I gave the dervish thug scalps to Marcus Cantarius.")
  28. UpdateQuestDescription(Quest, "It was a long and arduous task killing so many dervish thugs, but the reward was well worth the effort!")
  29. GiveQuestReward(Quest, Player)
  30. end
  31. function Accepted(Quest, QuestGiver, Player)
  32. FaceTarget(QuestGiver, Player)
  33. Dialog.New(QuestGiver, Player)
  34. Dialog.AddDialog("My hatred for the dervish thugs is unequaled. Bring me a large amount of these fiends' scalps. I wish to decorate my home with them. I promise to reward you handsomely.")
  35. Dialog.AddVoiceover("voiceover/english/marcus_cantarius/fprt_hood04/quests/marcuscantarius/marcuscantarius003.mp3", 3150858972, 2644148691)
  36. Dialog.AddOption("Gladly.")
  37. if CanReceiveQuest(Player, 5660) then
  38. Dialog.AddOption("Of course. Other than scalping dervish, do you need anything else?","Dialog4")
  39. end
  40. Dialog.Start()
  41. end
  42. function Declined(Quest, QuestGiver, Player)
  43. -- Add dialog here for when the quest is declined
  44. end
  45. function Deleted(Quest, QuestGiver, Player)
  46. -- Remove any quest specific items here when the quest is deleted
  47. end
  48. function Reload(Quest, QuestGiver, Player, Step)
  49. if Step == 1 then
  50. Step1Complete(Quest, QuestGiver, Player)
  51. elseif Step == 2 then
  52. QuestComplete(Quest, QuestGiver, Player)
  53. end
  54. end