far_seas_requisition_okf063.lua 3.2 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273
  1. --[[
  2. Script Name : Quests/Oakmyst/far_seas_requisition_okf063.lua
  3. Script Purpose : Handles the quest, "Far Seas Requisition #OKF063"
  4. Script Author : ememjr
  5. Script Date : 5/9/2017
  6. Script Notes :
  7. Zone : Oakmyst Forest
  8. Quest Giver :
  9. Preceded by : None
  10. Followed by : None
  11. --]]
  12. function Init(Quest)
  13. AddQuestStepKill(Quest, 1, "I must collect five Oakmyst deer pelts.", 5, 80, "To fill the requisition, I must hunt down the creatures in Oakmyst Forest, reachable by any number of mariner bells in the City of Qeynos.", 138, 1950001, 1950007)
  14. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  15. end
  16. function Step1Complete(Quest, QuestGiver, Player)
  17. UpdateQuestStepDescription(Quest, 1, "I have collected five Oakmyst fawn pelts.")
  18. AddQuestStepKill(Quest, 2, "I must collect five badger cub pelts.", 5, 80, "To fill the requisition, I must hunt down the creatures in Oakmyst Forest, reachable by any number of mariner bells in the City of Qeynos.", 129, 1950035)
  19. AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  20. end
  21. function Step2Complete(Quest, QuestGiver, Player)
  22. UpdateQuestStepDescription(Quest, 2, "I have collected five badger cub pelts.")
  23. AddQuestStepKill(Quest, 3, "I must collect a single bear cub pelt.", 1, 70, "To fill the requisition, I must hunt down the creatures in Oakmyst Forest, reachable by any number of mariner bells in the City of Qeynos.", 128, 1950000)
  24. AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
  25. end
  26. function Step3Complete(Quest, QuestGiver, Player)
  27. UpdateQuestStepDescription(Quest, 3, "I have collected a single bear cub pelt.")
  28. UpdateQuestTaskGroupDescription(Quest, 1, "I have collected all of the items listed in the requisition.")
  29. UpdateQuestZone(Quest, "Baubbleshire")
  30. AddQuestStepChat(Quest, 4, "I need to talk to Diggin Diggs", 1, "I must go to the province district of Qeynos to seek out the client for this order.", 10, 6600085, 2380049)
  31. AddQuestStepCompleteAction(Quest, 4, "QuestComplete")
  32. end
  33. function QuestComplete(Quest, QuestGiver, Player)
  34. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  35. UpdateQuestStepDescription(Quest, 4, "I talked to Diggin Diggs.")
  36. UpdateQuestTaskGroupDescription(Quest, 4, "I have delivered the goods to Diggin Diggs.")
  37. UpdateQuestDescription(Quest, "I filled the Far Seas Requisition and delivered the goods to the client in the Baubbleshire & Qeynos Province District. I have been paid in full for this work, but the order was late.")
  38. GiveQuestReward(Quest, Player)
  39. if HasItem(Player, 7079) then
  40. RemoveItem(Player, 7079)
  41. end
  42. end
  43. function Reload(Quest, QuestGiver, Player, Step)
  44. if Step == 1 then
  45. Step1Complete(Quest, QuestGiver, Player)
  46. elseif Step == 2 then
  47. Step2Complete(Quest, QuestGiver, Player)
  48. elseif Step == 3 then
  49. Step3Complete(Quest, QuestGiver, Player)
  50. elseif Step == 4 then
  51. QuestComplete(Quest, QuestGiver, Player)
  52. end
  53. end
  54. function Accepted(Quest, QuestGiver, Player)
  55. -- Add dialog here for when the quest is accepted
  56. end
  57. function Declined(Quest, QuestGiver, Player)
  58. -- Add dialog here for when the quest is declined
  59. end