qeynos_to_freeport__conversion.lua 3.8 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980
  1. --[[
  2. Script Name : Quests/Hallmark/qeynos_to_freeport__conversion.lua
  3. Script Author : Dorbin
  4. Script Date : 2023.09.29 03:09:05
  5. Script Purpose :
  6. Zone : Hallmark
  7. Quest Giver:
  8. Preceded by: None
  9. Followed by:
  10. --]]
  11. function Init(Quest)
  12. AddQuestStepKill(Quest, 1, "Slay the orc Commander Du'Nar", 1, 100, "\"There is no salvation other than death for the Orcs. The blood of their officers will be added to the mortar used to cement the walls of our fair city.\" - Matthias", 611, 1)
  13. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  14. end
  15. function Accepted(Quest, QuestGiver, Player)
  16. -- Add dialog here for when the quest is accepted
  17. end
  18. function Declined(Quest, QuestGiver, Player)
  19. -- Add dialog here for when the quest is declined
  20. end
  21. function Deleted(Quest, QuestGiver, Player)
  22. -- Remove any quest specific items here when the quest is deleted
  23. end
  24. function Step1Complete(Quest, QuestGiver, Player)
  25. UpdateQuestStepDescription(Quest, 1, "I have slain Commander Du'Nar")
  26. AddQuestStepKill(Quest, 2, "Slay the orc Commander Grik'Sna", 1, 100, "\"There is no salvation other than death for the Orcs. The blood of their officers will be added to the mortar used to cement the walls of our fair city.\" - Matthias", 611,1)
  27. AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  28. end
  29. function Step2Complete(Quest, QuestGiver, Player)
  30. UpdateQuestStepDescription(Quest, 2, "I have slain Commander Grik'Sna")
  31. AddQuestStepKill(Quest, 3, "Slay the orc Lieutenant Vrah'Kna", 1, 100,"\"There is no salvation other than death for the Orcs. The blood of their officers will be added to the mortar used to cement the walls of our fair city.\" - Matthias", 611, 1)
  32. AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
  33. end
  34. function Step3Complete(Quest, QuestGiver, Player)
  35. UpdateQuestStepDescription(Quest, 3, "I have slain Lieutenant Vrah'Kna")
  36. AddQuestStepKill(Quest, 4, "Slay the orc General Vhar'Taug", 1, 100,"\"There is no salvation other than death for the Orcs. The blood of their officers will be added to the mortar used to cement the walls of our fair city.\" - Matthias", 611,1)
  37. AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
  38. end
  39. function Step4Complete(Quest, QuestGiver, Player)
  40. UpdateQuestStepDescription(Quest, 4, "I have slain General Vhar'Taug")
  41. UpdateQuestTaskGroupDescription(Quest, 1, "I have killed the orc enemies of Freeport")
  42. AddQuestStepChat(Quest, 5, "I need to return to Matthias", 1, "The enemies of Freeport lay scattered at my feet. It is time I returned to Matthias and informed him of my slaughter.", 11, 331144)
  43. AddQuestStepCompleteAction(Quest, 5, "QuestComplete")
  44. end
  45. function QuestComplete(Quest, QuestGiver, Player)
  46. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  47. UpdateQuestStepDescription(Quest, 5, "I have returned to Matthias")
  48. UpdateQuestTaskGroupDescription(Quest, 2, "I have let Matthias know that the enemies of Freeport have been reduced in number.")
  49. UpdateQuestDescription(Quest, "I have decimated the enemies of Freeport using the true power of vengeance to guide my way. I have shown Freeport that I am a kindred soul to their beliefs. If they do not accept me within their walls, then they too will suffer my wrath.")
  50. GiveQuestReward(Quest, Player)
  51. end
  52. function Reload(Quest, QuestGiver, Player, Step)
  53. if Step == 1 then
  54. Step1Complete(Quest, QuestGiver, Player)
  55. elseif Step == 2 then
  56. Step2Complete(Quest, QuestGiver, Player)
  57. elseif Step == 3 then
  58. Step3Complete(Quest, QuestGiver, Player)
  59. elseif Step == 4 then
  60. Step4Complete(Quest, QuestGiver, Player)
  61. elseif Step == 5 then
  62. QuestComplete(Quest, QuestGiver, Player)
  63. end
  64. end