loosening_their_grip.lua 1.9 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849
  1. --[[
  2. Script Name : Quests/FrostfangSea/loosening_their_grip.lua
  3. Script Purpose : the quest Loosening Their Grip
  4. Script Author : theFoof
  5. Script Date : 2013.6.4
  6. Zone : Frostfang Sea
  7. Quest Giver : Battlepriest Herga
  8. Preceded by : None
  9. Followed by : The Charge
  10. --]]
  11. function Init(Quest)
  12. AddQuestRewardCoin(Quest, math.random(5,90), math.random(13,25), 0, 0)
  13. AddQuestStep(Quest, 1, "I must cut the lines of the spears.", 5, 100, "I must cut the lines of the spears thrust into the two ice jetties below Herga's Choke and Pride Overlook.", 287)
  14. AddQuestStepCompleteAction(Quest, 1, "CutLines")
  15. end
  16. function Accepted(Quest, QuestGiver, Player)
  17. FaceTarget(QuestGiver, Player)
  18. conversation = CreateConversation()
  19. PlayFlavor(QuestGiver, "battlepriest_herga/halas/great_shelf/battlepriest_herga/battlepriest_herga010.mp3", "", "", 1073162923, 3013834754, Player)
  20. AddConversationOption(conversation, "I will return.")
  21. AddConversationOption(conversation, "I'll take care of them. Someone has to.")
  22. StartConversation(conversation, QuestGiver, Player, "Remove the claws of the Ry'Gorr, " .. GetName(Player) .. ". Loosen their grip upon our land.")
  23. end
  24. function Deleted(Quest, QuestGiver, Player)
  25. end
  26. function Declined(Quest, QuestGiver, Player)
  27. end
  28. function CutLines(Quest, QuestGiver, Player)
  29. UpdateQuestTaskGroupDescription(Quest, 1, "I must speak with Battlepriest Herga, who can be found on the battlefield at the Great Shelf.")
  30. AddQuestStepChat(Quest, 2, "I must speak with Battlepriest Herga.", 1, "I must speak with Battlepriest Herga, who can be found on the battlefield at the Great Shelf.", 0, 4700100)
  31. AddQuestStepCompleteAction(Quest, 2, "CompleteQuest")
  32. end
  33. function CompleteQuest(Quest, QuestGiver, Player)
  34. GiveQuestReward(Quest, Player)
  35. end
  36. function Reload(Quest, QuestGiver, Player, Step)
  37. if Step == 1 then
  38. CutLines(Quest, QuestGiver, Player)
  39. end
  40. end