9
3

qeynosian_civil_service.lua 3.2 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071
  1. --[[
  2. Script Name : QeynosianCivilService.lua
  3. Script Purpose : Handles the quest, "Qeynosian Civil Service"
  4. Script Author : geordie0511
  5. Script Date : 13.03.2019
  6. Script Notes :
  7. Zone : Antonica
  8. Quest Giver : Knight-Lieutenant Alesso
  9. Preceded by : None
  10. Followed by : None
  11. --]]
  12. function Init(Quest)
  13. SetQuestFeatherColor(Quest, 3)
  14. SetQuestRepeatable(Quest)
  15. AddQuestStepKill(Quest, 1, "I need to kill ten rats.", 10, 100, "I need to head out into Antonica and kill the vermin that infest the land; rats, snakes and beetles. Knight-Lieutenant Alesso said I should kill about ten of each.", 99, 120066, 121224)
  16. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  17. end
  18. function Step1Complete(Quest, QuestGiver, Player)
  19. UpdateQuestStepDescription(Quest, 1, "I've killed ten rats.")
  20. AddQuestStepKill(Quest, 2, "I need to kill ten snakes.", 10, 100, "I need to head out into Antonica and kill the vermin that infest the land; rats, snakes and beetles. Knight-Lieutenant Alesso said I should kill about ten of each.", 1908, 120068, 121226, 121347)
  21. AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  22. end
  23. function Step2Complete(Quest, QuestGiver, Player)
  24. UpdateQuestStepDescription(Quest, 2, "I have killed ten snakes.")
  25. AddQuestStepKill(Quest, 3, "I need to kill ten beetles.", 10, 100, "I need to head out into Antonica and kill the vermin that infest the land; rats, snakes and beetles. Knight-Lieutenant Alesso said I should kill about ten of each.", 162, 120067, 121225, 120253, 120373, 120367, 121443, 120371, 121369)
  26. AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
  27. end
  28. function Step3Complete(Quest, QuestGiver, Player)
  29. UpdateQuestStepDescription(Quest, 3, "I have killed ten beetles.")
  30. UpdateQuestTaskGroupDescription(Quest, 1, "I've killed the vermin that Sir Alesso tasked me with.")
  31. AddQuestStepChat(Quest, 4, "I need to speak with Knight-Lieutenant Alesso.", 1, "I've killed a great many vermin that once infested Antonica. I should return to Knight-Lieutenant Alesso.", 11, 120083)
  32. AddQuestStepCompleteAction(Quest, 4, "QuestComplete")
  33. end
  34. function QuestComplete(Quest, QuestGiver, Player)
  35. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  36. UpdateQuestStepDescription(Quest, 4, "I've spoken with Knight-Lieutenant Alesso.")
  37. UpdateQuestTaskGroupDescription(Quest, 2, "I've spoken with Knight-Lieutenant Alesso.")
  38. UpdateQuestDescription(Quest, "I've lowered the vermin population quite a bit out in Antonica. Knight-Lieutenant Alesso was pleased with my efforts and paid me for my service to Qeynos.")
  39. GiveQuestReward(Quest, Player)
  40. end
  41. function Reload(Quest, QuestGiver, Player, Step)
  42. if Step == 1 then
  43. Step1Complete(Quest, QuestGiver, Player)
  44. elseif Step == 2 then
  45. Step2Complete(Quest, QuestGiver, Player)
  46. elseif Step == 3 then
  47. Step3Complete(Quest, QuestGiver, Player)
  48. elseif Step == 4 then
  49. QuestComplete(Quest, QuestGiver, Player)
  50. end
  51. end
  52. function Accepted(Quest, QuestGiver, Player)
  53. -- Add dialog here for when the quest is accepted
  54. end
  55. function Declined(Quest, QuestGiver, Player)
  56. -- Add dialog here for when the quest is declined
  57. end