far_seas_direct_requisition_frn0931.lua 3.0 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071
  1. --[[
  2. Script Name : Quests/TheForestRuins/far_seas_direct_requisition_frn0931.lua
  3. Script Author : Dorbin
  4. Script Date : 2022.02.24 02:02:19
  5. Script Purpose :
  6. Zone : TheForestRuins
  7. Quest Giver:
  8. Preceded by: None
  9. Followed by:
  10. --]]
  11. function Init(Quest)
  12. AddQuestStepKill(Quest, 1, "I must collect four Antonican hawk feathers.", 4, 100, " To fill the requisition, I must hunt down the creatures in the Forest Ruins, reachable by mariner bell in the City of Qeynos.", 150, 1960034,8270026)
  13. AddQuestStepKill(Quest, 2, "I must collect six stoneshell snapper tails.", 6, 100, " To fill the requisition, I must hunt down the creatures in the Forest Ruins, reachable by mariner bell in the City of Qeynos.", 172, 1960034,8270019)
  14. AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  15. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  16. end
  17. function Accepted(Quest, QuestGiver, Player)
  18. -- Add dialog here for when the quest is accepted
  19. end
  20. function Declined(Quest, QuestGiver, Player)
  21. -- Add dialog here for when the quest is declined
  22. end
  23. function Deleted(Quest, QuestGiver, Player)
  24. -- Remove any quest specific items here when the quest is deleted
  25. end
  26. function Step1Complete(Quest, QuestGiver, Player)
  27. UpdateQuestStepDescription(Quest, 1, "I have collected four Antonican hawk feathers")
  28. CheckProgress(Quest, QuestGiver, Player)
  29. end
  30. function Step2Complete(Quest, QuestGiver, Player)
  31. UpdateQuestStepDescription(Quest, 2, "I have collected six stoneshell snapper tails")
  32. CheckProgress(Quest, QuestGiver, Player)
  33. end
  34. function CheckProgress(Quest, QuestGiver, Player)
  35. if QuestStepIsComplete(Player, 5489, 1) and QuestStepIsComplete(Player, 5489, 2) then
  36. UpdateQuestZone(Quest,"Starcrest Commune")
  37. UpdateQuestTaskGroupDescription(Quest, 1, "I have hunted down all the resources to fill the requisition.")
  38. AddQuestStepChat(Quest, 3, "I must speak to Grekin in Starcrest.", 1, "I must go to Starcrest Commune to seek out the client of this order.", 0, 2340037)
  39. AddQuestStepCompleteAction(Quest, 3, "QuestComplete")
  40. end
  41. end
  42. function QuestComplete(Quest, QuestGiver, Player)
  43. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  44. UpdateQuestStepDescription(Quest, 3, "I spoke to Grekin.")
  45. UpdateQuestTaskGroupDescription(Quest, 3, "I have delivered the goods to Merchant Grekin.")
  46. UpdateQuestDescription(Quest, "I filled the Far Seas Requisition and delivered the goods to the client in Starcrest Commune. I have been paid in full for this work, but the order was late.")
  47. GiveQuestReward(Quest, Player)
  48. if HasItem(Player,7077) then
  49. RemoveItem(Player,7077,1)
  50. end
  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. QuestComplete(Quest, QuestGiver, Player)
  59. end
  60. end