pilgrim_pelts.lua 2.0 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950
  1. --[[
  2. Script Name : Quests/FrostfangSea/pilgrim_pelts.lua
  3. Script Purpose : the quest Pilgrim Pelts
  4. Script Author : theFoof
  5. Script Date : 2013.5.20
  6. Zone : Frostfang Sea
  7. Quest Giver : Verien Skysigh
  8. Preceded by : Pilgrim Scout
  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_023.mp3", "", "", 4231608247, 3609708675, Player)
  15. AddConversationOption(conversation, "I'm glad to help.")
  16. StartConversation(conversation, QuestGiver, Player, "Thank you, brave " .. GetName(Player) .. ". I thank the gods that you arrived here when you did.")
  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(20,80), math.random(13,20), 0, 0)
  24. AddQuestStepKill(Quest, 1, "Slay any of the big icemane felines you find upon the dangerous Icemane Plains.", 6, 100, "The froglok pilgrims were not blessed by Marr with much protection from the elements. Verien fears they may die due to exposure during the trip.", 126, 4700072, 4700070, 4700074)
  25. AddQuestStepCompleteAction(Quest, 1, "KilledCats")
  26. end
  27. function KilledCats(Quest, QuestGiver, Player)
  28. UpdateQuestTaskGroupDescription(Quest, 1, "You have slain many icemane felines for their pelts.")
  29. AddQuestStepChat(Quest, 2, "Return to Verien Skysigh with the icemane pelts you obtained.", 1, "You should return to Verien Skysigh, at the pilgrims' camp within Gwenevyn's Cove, with the icemane pelts you obtained.", 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. KilledCats(Quest, QuestGiver, Player)
  38. elseif Step == 2 then
  39. CompleteQuest(Quest, QuestGiver, Player)
  40. end
  41. end