far_seas_direct_requisition_frn0378.lua 2.4 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162
  1. --[[
  2. Script Name : Quests/TheForestRuins/far_seas_direct_requisition_frn0378.lua
  3. Script Author : Dorbin
  4. Script Date : 2022.02.24 12:02:31
  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 kill some sun beetles.", 10, 100, " To fill the requisition, I must hunt down the creatures in the Forest Ruins, reachable by mariner bell in the City of Qeynos.", 164, 1960034, 8270020)
  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 killed some sun beetles.")
  26. CheckProgress(Quest, QuestGiver, Player)
  27. end
  28. function CheckProgress(Quest, QuestGiver, Player)
  29. if QuestStepIsComplete(Player, 5488, 1) then
  30. UpdateQuestZone(Quest,"Starcrest Commune")
  31. UpdateQuestTaskGroupDescription(Quest, 1, "I have hunted down all the resources to fill the requisition.")
  32. AddQuestStepChat(Quest, 2, "I must speak to Grekin in Starcrest.", 1, "I must go to Starcrest Commune to seek out the client of this order.", 164, 2340037)
  33. AddQuestStepCompleteAction(Quest, 2, "QuestComplete")
  34. end
  35. end
  36. function QuestComplete(Quest, QuestGiver, Player)
  37. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  38. UpdateQuestStepDescription(Quest, 2, "I spoke to Grekin.")
  39. UpdateQuestTaskGroupDescription(Quest, 2, "I have delivered the goods to Merchant Grekin.")
  40. 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.")
  41. GiveQuestReward(Quest, Player)
  42. if HasItem(Player,7076) then
  43. RemoveItem(Player,7076,1)
  44. end
  45. end
  46. function Reload(Quest, QuestGiver, Player, Step)
  47. if Step == 1 then
  48. Step1Complete(Quest, QuestGiver, Player)
  49. elseif Step == 2 then
  50. QuestComplete(Quest, QuestGiver, Player)
  51. end
  52. end