picnic_basket_for_yola.lua 1.9 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253
  1. --[[
  2. Script Name : Quests/Baubbleshire/picnic_basket_for_yola.lua
  3. Script Author : Dorbin
  4. Script Date : 2022.01.19 04:01:42
  5. Script Purpose :
  6. Zone : Baubbleshire
  7. Quest Giver: Tapster Bregun
  8. Preceded by: None
  9. Followed by:
  10. --]]
  11. function Init(Quest)
  12. AddQuestStepChat(Quest, 1, "I need to deliver a basket to Yola.", 1, "I need to deliver a picnic basket to Yola over by the pond.", 2695, 2380032)
  13. AddQuestStepCompleteAction(Quest, 1, "Delivery")
  14. end
  15. function Accepted(Quest, QuestGiver, Player)
  16. conversation = CreateConversation()
  17. PlayFlavor(QuestGiver,"","","nod",0,0,Player)
  18. AddConversationOption(conversation, "I'll dash right over.")
  19. StartConversation(conversation, QuestGiver, Player, "Great, let me know when you get done with that delivery!")
  20. end
  21. function Declined(Quest, QuestGiver, Player)
  22. end
  23. function Delivery(Quest, QuestGiver, Player)
  24. UpdateQuestStepDescription(Quest, 1, "I delievered Yola's food order.")
  25. UpdateQuestTaskGroupDescription(Quest, 1, "I delivered the picnic basket to Yola Sindlefop.")
  26. AddQuestStepChat(Quest, 2, "I need to return to Bregun.", 1, "Tapster Bregun will be happy to know I delivered Yola's food.", 0, 2380028)
  27. AddQuestStepCompleteAction(Quest, 2, "QuestComplete")
  28. end
  29. function QuestComplete(Quest, QuestGiver, Player)
  30. UpdateQuestStepDescription(Quest, 2, "I've returned to Bregun.")
  31. UpdateQuestTaskGroupDescription(Quest, 2, "I've returned to Bregun after a successful delivery.")
  32. UpdateQuestDescription(Quest, "I delivered the picnic basket to Yola over at the pond. She was quite happy with the delivery, and Bregun was pleased when I came back.")
  33. GiveQuestReward(Quest, Player)
  34. end
  35. function Reload(Quest, QuestGiver, Player, Step)
  36. if Step == 1 then
  37. Delivery(Quest, QuestGiver, Player)
  38. elseif Step == 2 then
  39. QuestComplete(Quest, QuestGiver, Player)
  40. end
  41. end