9
3

rabid_shriller_wings.lua 2.3 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253
  1. --[[
  2. Script Name : Quests/SouthQeynos/rabid_shriller_wings.lua
  3. Script Author : Dorbin
  4. Script Date : 2022.05.16 04:05:31
  5. Script Purpose :
  6. Zone : SouthQeynos
  7. Quest Giver: Khalil'Mun
  8. Preceded by: None
  9. Followed by:
  10. --]]
  11. function Init(Quest)
  12. AddQuestStepKill(Quest, 1, "Hunt rabid shrillers in the Down Below.", 8, 100, "I must go into the Down Below and collect eight pairs of rabid shriller wings.", 140, 1990001)
  13. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  14. UpdateQuestZone(Quest,"The Down Below")
  15. end
  16. function Accepted(Quest, QuestGiver, Player)
  17. -- Add dialog here for when the quest is accepted
  18. end
  19. function Declined(Quest, QuestGiver, Player)
  20. -- Add dialog here for when the quest is declined
  21. end
  22. function Deleted(Quest, QuestGiver, Player)
  23. -- Remove any quest specific items here when the quest is deleted
  24. end
  25. function Step1Complete(Quest, QuestGiver, Player)
  26. UpdateQuestStepDescription(Quest, 1, "I have obtained the rabid shriller wings.")
  27. UpdateQuestTaskGroupDescription(Quest, 1, "I have been to the catacombs and collected eight pairs of rabid shriller wings.")
  28. UpdateQuestZone(Quest,"South Qeynos")
  29. AddQuestStepChat(Quest, 2, "Return to Khalil'Mun with the shriller wings.", 1, "I must return to Khalil'Mun with these shriller wings. His shop is located in South Qeynos.", 140, 2310048)
  30. AddQuestStepCompleteAction(Quest, 2, "QuestComplete")
  31. end
  32. function QuestComplete(Quest, QuestGiver, Player)
  33. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  34. UpdateQuestStepDescription(Quest, 1, "I have returned to Khalil'Mun with the wings.")
  35. UpdateQuestTaskGroupDescription(Quest, 1, "I have delivered the eight pairs of rabid shriller wings to Khalil'Mun.")
  36. UpdateQuestDescription(Quest, "I have given Khalil'Mun of the Herb Jar in South Qeynos the eights pairs of rabid shriller wings that he requested. He was excited to finally have what he needs to continue with his experiments.")
  37. GiveQuestReward(Quest, Player)
  38. end
  39. function Reload(Quest, QuestGiver, Player, Step)
  40. if Step == 1 then
  41. Step1Complete(Quest, QuestGiver, Player)
  42. elseif Step == 2 then
  43. QuestComplete(Quest, QuestGiver, Player)
  44. end
  45. end