badger_pelts_for_diggs.lua 2.2 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253
  1. --[[
  2. Script Name : Quests/Baubbleshire/badger_pelts_for_diggs.lua
  3. Script Purpose : Handles the quest, "Badger Pelts for Diggs"
  4. Script Author : Scatman
  5. Script Date : 2009.09.27
  6. Zone : Baubbleshire
  7. Quest Giver: Diggin Digs
  8. Preceded by: None
  9. Followed by: None
  10. --]]
  11. require "SpawnScripts/Generic/DialogModule"
  12. function Init(Quest)
  13. AddQuestStepKill(Quest, 1, "I need ten badger pelts.", 10, 100, "I must collect ten badger pelts in the Forest Ruins or Oakmyst Forest.", 93, 1960011, 1960017, 1950035, 1950039, 8270025,8270016,8300001,8300008)
  14. AddQuestStepCompleteAction(Quest, 1, "step1_complete_killedBadgers")
  15. UpdateQuestZone(Quest,"Multiple Zones")
  16. end
  17. function Accepted(Quest, QuestGiver, Player)
  18. FaceTarget(QuestGiver, Player)
  19. Dialog.New(QuestGiver, Player)
  20. Dialog.AddDialog("Then prepare for a hunting trip in the Forest Ruins or Oakmyst Forest. I'll pay you handsomely for a bundle of badger pelts. I may even toss in a bit of Diggs' finest armor.")
  21. Dialog.AddVoiceover("voiceover/english/merchant_diggin_diggs/qey_village06/merchantdiggindiggs002.mp3", 2590912109, 2110560767)
  22. Dialog.AddOption("I will return with the bundle of badger pelts. ", "Dialog8")
  23. Dialog.Start()
  24. end
  25. function Declined(Quest, QuestGiver, Player)
  26. end
  27. function step1_complete_killedBadgers(Quest, QuestGiver, Player)
  28. UpdateQuestStepDescription(Quest, 1, "I have collected ten badger pelts.")
  29. UpdateQuestTaskGroupDescription(Quest, 1, "I have collected then badger pelts for Diggs.")
  30. UpdateQuestZone(Quest, "Baubbleshire")
  31. AddQuestStepChat(Quest, 2, "I must return to Armorsmith Diggs.", 1, "I must return to Armorsmith Diggs in Baubbleshire.", 93, 2380049 )
  32. AddQuestStepCompleteAction(Quest, 2, "quest_complete")
  33. end
  34. function quest_complete(Quest, QuestGiver, Player, Step)
  35. UpdateQuestStepDescription(Quest, 2, "I have collected the souls.")
  36. UpdateQuestTaskGroupDescription(Quest, 2, "I returned to Armorsmith Diggs in Baubbleshire.")
  37. UpdateQuestDescription(Quest, "I collected ten badger pelts for Armorsmith Diggs.")
  38. GiveQuestReward(Quest, Player)
  39. end
  40. function Reload(Quest, QuestGiver, Player, Step)
  41. if Step == 1 then
  42. step1_complete_killedBadgers(Quest, QuestGiver, Player)
  43. end
  44. end