beets_the_alternative.lua 2.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960
  1. --[[
  2. Script Name : Quests/FrostfangSea/beets_the_alternative.lua
  3. Script Purpose : the quest Beets the Alternative
  4. Script Author : theFoof
  5. Script Date : 2013.5.18
  6. Zone : Frostfang Sea
  7. Quest Giver : Wregan Firebeard
  8. Preceded by :
  9. Followed by :
  10. --]]
  11. function Init(Quest)
  12. AddQuestRewardCoin(Quest, math.random(50,90), math.random(2,5), 0, 0)
  13. AddQuestStep(Quest, 1, "Gather tundra beets along the frozen beach front north of Gwenevyn's Cove, between the pillars of ice.", 3, 100, "First though, you must help gather provisions necessary for the journey.", 816)
  14. AddQuestStepCompleteAction(Quest, 1, "GatheredBeets")
  15. end
  16. function Declined(Quest, QuestGiver, Player)
  17. end
  18. function Deleted(Quest, QuestGiver, Player)
  19. end
  20. function Accepted(Quest, QuestGiver, Player)
  21. FaceTarget(QuestGiver, Player)
  22. conversation = CreateConversation()
  23. PlayFlavor(QuestGiver, "wregan_firebeard/halas/gwenevyns_cove/wregan_firebeard_007.mp3", "", "", 2495625045, 3478965655, Player)
  24. AddConversationOption(conversation, "I will, believe me.")
  25. StartConversation(conversation, QuestGiver, Player, "Yes. Now go and harvest some tundra beets. They grow along the frozen beach front north of us, between the pillars of ice. Be wary of the blizzard grizzlies nearby!")
  26. end
  27. function GatheredBeets(Quest, QuestGiver, Player)
  28. UpdateQuestStepDescription(Quest, 1, "You gathered tundra beets.")
  29. AddQuestStep(Quest, 2, "You should gather one more tundra beet.", 1, 100, "First though, you must help gather provisions necessary for the journey.", 816)
  30. AddQuestStepCompleteAction(Quest, 2, "GotLastBeet")
  31. end
  32. function GotLastBeet(Quest, QuestGiver, Player)
  33. RemoveSpawnAccess(GetSpawn(Player, 4700035), Player)
  34. UpdateQuestTaskGroupDescription(Quest, 1, "You gathered enough tundra beets, but you also found fresh orc footprints within the snow and ice!")
  35. AddQuestStepChat(Quest, 3, "Return to Wregan Firebeard and tell him of the orcish threat!", 1, "You should return to Wregan Firebeard, the Pilgrimage Guardian, in Gwenevyn's Cove, and tell him of the orcish threat!", 0, 4700034)
  36. AddQuestStepCompleteAction(Quest, 3, "CompleteQuest")
  37. end
  38. function CompleteQuest(Quest, QuestGiver, Player)
  39. GiveQuestReward(Quest, Player)
  40. end
  41. function Reload(Quest, QuestGiver, Player, Step)
  42. if Step == 1 then
  43. GatheredBeets(Quest, QuestGiver, Player)
  44. elseif Step == 2 then
  45. GotLastBeet(Quest, QuestGiver, Player)
  46. elseif Step == 3 then
  47. CompleteQuest(Quest, QuestGiver, Player)
  48. end
  49. end