9
3

field_testing_part_two.lua 2.0 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950
  1. --[[
  2. Script Name : Quests/FrostfangSea/field_testing_part_two.lua
  3. Script Purpose : the quest Field Testing Part Two
  4. Script Author : theFoof
  5. Script Date : 2013.5.20
  6. Zone : Frostfang Sea
  7. Quest Giver : Blorpisa Bogchild
  8. Preceded by : Field Testing
  9. Followed by : None
  10. --]]
  11. function Accepted(Quest, QuestGiver, Player)
  12. FaceTarget(QuestGiver, Player)
  13. conversation = CreateConversation()
  14. PlayFlavor(QuestGiver, "blorpisa_bogchild/halas/gwenevyns_cove/blorpisa_bogchild/blorpisa_bogchild_057.mp3", "", "", 4242418516, 2706446294, Player)
  15. AddConversationOption(conversation, "I will return to you once I have scouted out the location.")
  16. StartConversation(conversation, QuestGiver, Player, "Here, let me cast the spell on you. Do take care!")
  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,50), math.random(5,12), 0, 0)
  24. AddQuestStepLocation(Quest, 1, "I must test the Frost-born Ward's effectiveness by scouting the Pride Overlook.", 25, "I must head to the Pride Overlook on the Icemane Plains to test the new Frost-born Ward. Pride Overlook is west of Gwenevyn's Cove.", 3163, 598.01, 66.20, -505.68)
  25. AddQuestStepCompleteAction(Quest, 1, "ScoutedPride")
  26. end
  27. function ScoutedPride(Quest, QuestGiver, Player)
  28. UpdateQuestTaskGroupDescription(Quest, 1, "I have determined that the Frost-born Ward is still ineffective.")
  29. AddQuestStepChat(Quest, 2, "I must speak with Blorpisa Bogchild in Gwenevyn's Cove.", 1, "I must return to Blorpisa Bogchild in Gwenevyn's Cove.", 0, 4700039)
  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. ScoutedPride(Quest, QuestGiver, Player)
  38. elseif Step == 2 then
  39. CompleteQuest(Quest, QuestGiver, Player)
  40. end
  41. end