rygorr_mining_operations.lua 2.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263
  1. --[[
  2. Script Name : Quests/FrostfangSea/rygorr_mining_operations.lua
  3. Script Purpose : for the quest "Ry'Gorr Mining Operations'
  4. Script Author : theFoof
  5. Script Date : 2013.6.13
  6. Script Notes :
  7. Zone : Frostfang Sea
  8. Quest Giver : Thirin Veliumdelver
  9. Preceded by : Below The Frozen Waves
  10. Followed by : A Good Distraction
  11. --]]
  12. function Init(Quest)
  13. AddQuestRewardCoin(Quest, math.random(5,90), math.random(27,40), 0, 0)
  14. AddQuestStep(Quest, 1, "I should look for an exploding barrel and set it in front of the hastily made wall.", 1, 100, "I should look around for a Ry'Gorr Explosive Mining Barrel and use it on the wall I discovered.", 0)
  15. AddQuestStepCompleteAction(Quest, 1, "DestroyedWall")
  16. end
  17. function Accepted(Quest, QuestGiver, Player)
  18. FaceTarget(QuestGiver, Player)
  19. conversation = CreateConversation()
  20. PlayFlavor(QuestGiver, "thirin_veliumdelver/halas/cragged_spine/thirin_veliumdelver_cave005.mp3", "", "", 3687695451, 727081902, Player)
  21. AddConversationOption(conversation, "I won't, Thirin.")
  22. StartConversation(conversation, QuestGiver, Player, "I'll be expecting a good show, adventurer. Don't let me down.")
  23. end
  24. function Deleted(Quest, QuestGiver, Player)
  25. local zone = GetZone(Player)
  26. if GetZoneID(zone) == 470 then
  27. AddSpawnAccess(GetSpawnByLocationID(zone, 441164), Player)
  28. AddSpawnAccess(GetSpawnByLocationID(zone, 571511), Player)
  29. end
  30. end
  31. function Declined(Quest, QuestGiver, Player)
  32. end
  33. function DestroyedWall(Quest, QuestGiver, Player)
  34. UpdateQuestStepDescription(Quest, 1, "I was able to destroy the wall.")
  35. AddQuestStepLocation(Quest, 2, "With the wall destroyed I should investigate what is on the other side.", 10, "I should look around for a Ry'Gorr Explosive Mining Barrel and use it on the wall I discovered.", 0, -44.05, -67.39, 141.07)
  36. AddQuestStepCompleteAction(Quest, 2, "FoundCreatures")
  37. end
  38. function FoundCreatures(Quest, QuestGiver, Player)
  39. UpdateQuestStepDescription(Quest, 2, "I have discovered velium creatures that appear to have slain a number of Ry'Gorr orcs. I should report what I've found to Thirin Veliumdelver.")
  40. UpdateQuestTaskGroupDescription(Quest, 1, "I was able to destroy the wall and discovered creatures that appear to be made from velium.")
  41. AddQuestStepChat(Quest, 3, "I should speak with Thirin Veliumdelver of the creatures I've found.", 1, "I should return to Thirin Veliumdelver and tell him of the velium creatures I found beyond the cave-in.", 0, 4700112)
  42. AddQuestStepCompleteAction(Quest, 3, "CompleteQuest")
  43. end
  44. function CompleteQuest(Quest, QuestGiver, Player)
  45. GiveQuestReward(Quest, Player)
  46. end
  47. function Reload(Quest, QuestGiver, Player, Step)
  48. if Step == 1 then
  49. DestroyedWall(Quest, QuestGiver, Player)
  50. elseif Step == 2 then
  51. FoundCreatures(Quest, QuestGiver, Player)
  52. end
  53. end