9
3

DesperatelySeekingMoths.lua 3.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990
  1. --[[
  2. Script Name : DesperatelySeekingMoths!.lua
  3. Script Purpose :
  4. Script Author : XionnaeEQ
  5. Script Date : 6/11/2016
  6. Script Notes :
  7. Zone : Thundering Steppes
  8. Quest Giver : Elowys Laceleaf (2490013)
  9. Preceded by : Desperately Seeking Butterflies!
  10. Followed by : Desperately Seeking Ants!
  11. --]]
  12. function Init(Quest)
  13. AddQuestStepObtainItem(Quest, 1, "I'm looking for a plain brown moth for Elowys Laceleaf.", 1, 100, "I need to find some moths for Elowys Laceleaf in the Thundering Steppes.", 1899, 10409)
  14. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  15. end
  16. function Step1Complete(Quest, QuestGiver, Player)
  17. UpdateQuestStepDescription(Quest, 1, "I've found a plain brown moth.")
  18. AddQuestStepChat(Quest, 2, "I need to take the moth to Elowys Laceleaf on the docks of the Thundering Steppes.", 1, "I need to find some moths for Elowys Laceleaf in the Thundering Steppes.", 11, 10409)
  19. AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
  20. end
  21. function Step2Complete(Quest, QuestGiver, Player)
  22. UpdateQuestStepDescription(Quest, 2, "I've given the moth to Elowys.")
  23. AddQuestStepObtainItem(Quest, 3, "I'm looking for a spotted brown moth for Elowys Laceleaf.", 1, 100, "I need to find some moths for Elowys Laceleaf in the Thundering Steppes.", 1903, 13234)
  24. AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
  25. end
  26. function Step3Complete(Quest, QuestGiver, Player)
  27. UpdateQuestStepDescription(Quest, 3, "I've found a spotted brown moth.")
  28. AddQuestStepObtainItem(Quest, 4, "I'm looking for a striped brown moth for Elowys Laceleaf.", 1, 100, "I need to find some moths for Elowys Laceleaf in the Thundering Steppes.", 1907, 13471)
  29. AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
  30. end
  31. function Step4Complete(Quest, QuestGiver, Player)
  32. UpdateQuestStepDescription(Quest, 4, "I've found a striped brown moth.")
  33. AddQuestStepChat(Quest, 5, "I need to take this moth to Elowys Laceleaf on the docks of the Thundering Steppes.", 1, "I need to find some moths for Elowys Laceleaf in the Thundering Steppes.", 11, 13471)
  34. AddQuestStepCompleteAction(Quest, 5, "Step5Complete")
  35. end
  36. function Step5Complete(Quest, QuestGiver, Player)
  37. UpdateQuestStepDescription(Quest, 5, "I've given the moth to Elowys.")
  38. AddQuestStepObtainItem(Quest, 6, "I'm looking for a spotted yellow butterfly for Elowys Laceleaf.", 1, 100, "I need to find some moths for Elowys Laceleaf in the Thundering Steppes.", 1830, 13265)
  39. AddQuestStepCompleteAction(Quest, 6, "Step6Complete")
  40. end
  41. function Step6Complete(Quest, QuestGiver, Player)
  42. UpdateQuestStepDescription(Quest, 6, "I've found the butterfly.")
  43. AddQuestStepChat(Quest, 7, "I need to take this butterfly to Elowys Laceleaf on the docks of the Thundering Steppes.", 1, "I need to find some moths for Elowys Laceleaf in the Thundering Steppes.", 11, 13265)
  44. AddQuestStepCompleteAction(Quest, 7, "QuestComplete")
  45. SetCompleteFlag(Quest)
  46. end
  47. function Step7Complete(Quest, QuestGiver, Player)
  48. GiveQuestReward(Quest, Player)
  49. end
  50. function Accepted(Quest, QuestGiver, Player)
  51. end
  52. function Deleted(Quest, QuestGiver, Player)
  53. end
  54. function Declined(Quest, QuestGiver, Player)
  55. end
  56. function Reload(Quest, QuestGiver, Player, Step)
  57. if Step == 1 then
  58. Step1Complete(Quest, QuestGiver, Player)
  59. elseif Step == 2 then
  60. Step2Complete(Quest, QuestGiver, Player)
  61. elseif Step == 3 then
  62. Step3Complete(Quest, QuestGiver, Player)
  63. elseif Step == 4 then
  64. Step4Complete(Quest, QuestGiver, Player)
  65. elseif Step == 5 then
  66. Step5Complete(Quest, QuestGiver, Player)
  67. elseif Step == 6 then
  68. Step6Complete(Quest, QuestGiver, Player)
  69. elseif Step == 7 then
  70. QuestComplete(Quest, QuestGiver, Player)
  71. end
  72. end