the_stories_of_everfrost.lua 2.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263
  1. --[[
  2. Script Name : Quests/Everfrost/the_stories_of_everfrost.lua
  3. Script Author : Flunklesnarkin
  4. Script Date : 2015.10.14 12:10:29
  5. Script Purpose :
  6. Zone : Everfrost
  7. Quest Giver: Brahnagan MacLahnan
  8. Preceded by: None
  9. Followed by: Cull the Threat to the Pioneers
  10. --]]
  11. function Init(Quest)
  12. AddQuestRewardCoin(Quest, math.random(20,60), math.random(30,90), math.random(3,5), 0)
  13. AddQuestStepChat(Quest, 1, "I should interview Newlyn Icebreaker.", 1, "I have been sent by MacLahnan to speak with a number of individuals around Stormedge Isle so I can better appreciate the situation in Everfrost.", 0, 410013)
  14. AddQuestStepChat(Quest, 2, "I should interview Li Ning Ventur.", 1, "I have been sent by MacLahnan to speak with a number of individuals around Stormedge Isle so I can better appreciate the situation in Everfrost.", 0, 410011)
  15. AddQuestStepCompleteAction(Quest, 1, "Spoke_To_Newlyn_Icebreaker")
  16. AddQuestStepCompleteAction(Quest, 2, "Spoke_To_Li_Ning_Ventur")
  17. end
  18. function Accepted(Quest, QuestGiver, Player)
  19. end
  20. function Declined(Quest, QuestGiver, Player)
  21. end
  22. function Reload(Quest, QuestGiver, Player, Step)
  23. end
  24. function Spoke_To_Newlyn_Icebreaker(Quest, QuestGiver, Player)
  25. UpdateQuestStepDescription(Quest, 1, "I have interviewed Newlyn Icebreaker.")
  26. ProgressCheck_Quest1(Quest, QuestGiver, Player)
  27. end
  28. function Spoke_To_Li_Ning_Ventur(Quest, QuestGiver, Player)
  29. UpdateQuestStepDescription(Quest, 2, "I have interviewed Li Ning Ventur")
  30. ProgressCheck_Quest1(Quest, QuestGiver, Player)
  31. end
  32. function ProgressCheck_Quest1(Quest, QuestGiver, Player)
  33. if QuestStepIsComplete(Player, 167, 1) and QuestStepIsComplete(Player, 167, 2) then
  34. Add_Quest1_Step3(Quest, QuestGiver, Player)
  35. end
  36. end
  37. function Add_Quest1_Step3(Quest, QuestGiver, Player)
  38. UpdateQuestTaskGroupDescription(Quest, 1, "I have heard the stories of the people of Stormedge Isle.")
  39. SetCompleteFlag(Quest)
  40. AddQuestStepChat(Quest, 3, "I should speak with Brahnagan MacLahnan.", 1, "Having spoken with a number of individuals around Stormedge Isle, I should return to MacLahnan", 0, 410006)
  41. AddQuestStepCompleteAction(Quest, 3, "CompleteQuest")
  42. end
  43. function CompleteQuest(Quest, QuestGiver, Player)
  44. GiveQuestReward(Quest, Player)
  45. end