9
3

pilgrim_scout.lua 2.0 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950
  1. --[[
  2. Script Name : Quests/FrostfangSea/pilgrim_scout.lua
  3. Script Purpose : the quest Pilgrim Scout
  4. Script Author : theFoof
  5. Script Date : 2013.5.19
  6. Zone : Frostfang Sea
  7. Quest Giver : Verien Skysigh
  8. Preceded by : Pilgrim Pathfinder
  9. Followed by :
  10. --]]
  11. function Accepted(Quest, QuestGiver, Player)
  12. FaceTarget(QuestGiver, Player)
  13. conversation = CreateConversation()
  14. PlayFlavor(QuestGiver, "verien_skysigh/halas/gwenevyns_cove/verien_skysigh_015.mp3", "", "", 1474870749, 1583499766, Player)
  15. AddConversationOption(conversation, "I understand.")
  16. StartConversation(conversation, QuestGiver, Player, "Forgive me if you think I'm being timid, but I am leery about walking into a trap or into a treacherous situation.")
  17. end
  18. function Declined(Quest, QuestGiver, Player)
  19. end
  20. function Deleted(Quest, QuestGiver, Player)
  21. end
  22. function Init(Quest)
  23. AddQuestRewardCoin(Quest, math.random(10,80), math.random(5,10), 0, 0)
  24. AddQuestStepLocation(Quest, 1, "Follow the path that travels west from the pilgrims' camp, keeping the wall of ice and stone on your left, as far as you can.", 10, "Scout ahead of the pilgrims and confirm that the path you spotted from atop the blizzard grizzly den is indeed traversable.", 0, 300, 53.22, -260.45)
  25. AddQuestStepCompleteAction(Quest, 1, "CheckedPath")
  26. end
  27. function CheckedPath(Quest, QuestGiver, Player)
  28. UpdateQuestTaskGroupDescription(Quest, 1, "The path is a dead end! An avalanche of ice and stone blocks your way.")
  29. AddQuestStepChat(Quest, 2, "Return to Verien Skysigh and inform him that the path leads nowhere.", 1, "You should return to Verien Skysigh, at the pilgrims' camp within Gwenevyn's Cove, and tell him the unfortunate news.", 0, 4700034)
  30. AddQuestStepCompleteAction(Quest, 2, "CompleteQuest")
  31. end
  32. function CompleteQuest(Quest, QuestGiver, Player)
  33. GiveQuestReward(Quest, Player)
  34. end
  35. function Reload(Quest, QuestGiver, Player, Step)
  36. if Step == 1 then
  37. CheckedPath(Quest, QuestGiver, Player)
  38. elseif Step == 2 then
  39. CompleteQuest(Quest, QuestGiver, Player)
  40. end
  41. end