some_nice_bear_hides.lua 2.7 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859
  1. --[[
  2. Script Name : Quests/NorthQeynos/some_nice_bear_hides.lua
  3. Script Author : Dorbin
  4. Script Date : 2022.05.11 03:05:03
  5. Script Purpose :
  6. Zone : NorthQeynos
  7. Quest Giver: Danielle Clothspinner
  8. Preceded by: None
  9. Followed by:
  10. --]]
  11. function Init(Quest)
  12. AddQuestStepKill(Quest, 1, "Skin four bears in Antonica for the Clothspinner shop.", 4, 60, "I must try and obtain four preserved bear hides in Antonica for Danielle. Some of the great bears there may have the right quality of coats.", 93, 121370,120257,120011)
  13. AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
  14. end
  15. function Accepted(Quest, QuestGiver, Player)
  16. FaceTarget(QuestGiver, Player)
  17. local conversation = CreateConversation()
  18. PlayFlavor(QuestGiver, "voiceover/english/danielle_clothspinner/qey_north/danielleclothspinner004.mp3", "", "happy", 237301026, 160623065, Player)
  19. AddConversationOption(conversation, "That sounds great! I'll be back with the pelts.")
  20. StartConversation(conversation, QuestGiver, Player, "Perfect, once I am done with all the sewing and dying for this job I can get started on some top notch pelt work.")
  21. end
  22. function Declined(Quest, QuestGiver, Player)
  23. -- Add dialog here for when the quest is declined
  24. end
  25. function Deleted(Quest, QuestGiver, Player)
  26. -- Remove any quest specific items here when the quest is deleted
  27. end
  28. function Step1Complete(Quest, QuestGiver, Player)
  29. UpdateQuestStepDescription(Quest, 1, "I have the skins of four bears.")
  30. UpdateQuestTaskGroupDescription(Quest, 1, "I have gathered the four preserved bear hides for Danielle.")
  31. AddQuestStepChat(Quest, 2, "I should speak with Danielle Clothspinner.", 1, "I must make sure I get these bear hides to Danielle in North Qeynos.", 93, 2220061)
  32. AddQuestStepCompleteAction(Quest, 2, "QuestComplete")
  33. end
  34. function QuestComplete(Quest, QuestGiver, Player)
  35. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  36. UpdateQuestStepDescription(Quest, 2, "I have spoken with Danielle Clothspinner.")
  37. UpdateQuestTaskGroupDescription(Quest, 2, "I have given the preserved bear hide to Danielle.")
  38. UpdateQuestDescription(Quest, "I have helped Danielle get four preserved bear hides. So when she is done with her normal sewing and dying she can make some really high quality products to sell.")
  39. GiveQuestReward(Quest, Player)
  40. end
  41. function Reload(Quest, QuestGiver, Player, Step)
  42. if Step == 1 then
  43. Step1Complete(Quest, QuestGiver, Player)
  44. elseif Step == 2 then
  45. QuestComplete(Quest, QuestGiver, Player)
  46. end
  47. end