--[[ Script Name : the_travelers_three_meanings_of_life.lua Script Purpose : Handles the quest, "The Traveler's Three Meanings of Life" Script Author : premierio015 Script Date : 15.06.2021 Script Notes : Auto generated with QuestParser. Zone : Nektulos Forest Quest Giver : The Traveling Augur Preceded by : None Followed by : None --]] function Init(Quest) AddQuestStepZoneLoc(Quest, 1, "I need to travel to Gargoyle Gorge in Nektulos Forest", 10, "The Traveling Augur is teaching me three meanings of life.", 11, -926, 79, -1605, 179) AddQuestStepCompleteAction(Quest, 1, "Step1Complete") end function Accepted(Quest, QuestGiver, Player) FaceTarget(QuestGiver, Player) local conversation = CreateConversation() AddConversationOption(conversation, "I just got here...oh, never mind. I'll be back.") StartConversation(conversation, QuestGiver, Player, "The first meaning you must learn is the expansion of one's mind. Many times, we channel our energies toward outward manifestations of peril when in reality the greatest peril is internal. Traveling is one way to expand one's mind. Go, then, and return when you've finished your journey.") end function Declined(Quest, QuestGiver, Player) -- Add dialog here for when the quest is declined end function Deleted(Quest, QuestGiver, Player) -- Remove any quest specific items here when the quest is deleted end function Step1Complete(Quest, QuestGiver, Player) UpdateQuestStepDescription(Quest, 1, "I've traveled to Gargoyle Gorge") AddQuestStepZoneLoc(Quest, 2, "I need to travel to Behemoth Pond in Nektulos Forest", 10, "The Traveling Augur is teaching me three meanings of life.", 11, -236, 3, -276, 179) AddQuestStepCompleteAction(Quest, 2, "Step2Complete") end function Step2Complete(Quest, QuestGiver, Player) UpdateQuestStepDescription(Quest, 2, "I've been to Behemoth Pond") AddQuestStepZoneLoc(Quest, 3, "I need to travel to N'Mar's Ascent in Nektulos Forest", 10, "The Traveling Augur is teaching me three meanings of life.", 11, -369, 12, -1214, 179) AddQuestStepCompleteAction(Quest, 3, "Step3Complete") end function Step3Complete(Quest, QuestGiver, Player) UpdateQuestStepDescription(Quest, 3, "I've traveled to N'Mar's Ascent") AddQuestStepChat(Quest, 4, "I must speak with the Traveling Augur", 1, "The Traveling Augur is teaching me three meanings of life.", 11, 1790046) AddQuestStepCompleteAction(Quest, 4, "Step4Complete") end function Step4Complete(Quest, QuestGiver, Player) UpdateQuestStepDescription(Quest, 4, "I've spoken with the Traveling Augur") AddQuestStep(Quest, 5, "I must separate three individual roots from Nektulos Forest's rancid roots", 3, 100, "The Traveling Augur is teaching me three meanings of life.", 198) AddQuestStepCompleteAction(Quest, 5, "Step5Complete") end function Step5Complete(Quest, QuestGiver, Player) UpdateQuestStepDescription(Quest, 5, "I've separated out individual roots") AddQuestStep(Quest, 6, "I must separate three individual plants from Nektulos Forest's assortment of fungi", 3, 100, "The Traveling Augur is teaching me three meanings of life.", 822) AddQuestStepCompleteAction(Quest, 6, "Step6Complete") end function Step6Complete(Quest, QuestGiver, Player) UpdateQuestStepDescription(Quest, 6, "I've separated out three individual plants") AddQuestStepChat(Quest, 7, "I must speak with the Traveling Augur", 1, "The Traveling Augur is teaching me three meanings of life.", 11, 1790046) AddQuestStepCompleteAction(Quest, 7, "Step7Complete") end function Step7Complete(Quest, QuestGiver, Player) UpdateQuestStepDescription(Quest, 7, "I've spoken with the Traveling Augur") AddQuestStepKill(Quest, 8, "Learn personal effort by hunting three ashland piranhas in Nektulos Forest", 3, 100, "The Traveling Augur is teaching me three meanings of life.", 86, 1790213) AddQuestStepCompleteAction(Quest, 8, "Step8Complete") end function Step8Complete(Quest, QuestGiver, Player) UpdateQuestStepDescription(Quest, 8, "I've slain some ashland piranhas") AddQuestStepChat(Quest, 9, "I must speak with the Traveling Augur", 1, "The Traveling Augur is teaching me three meanings of life.", 11, 1790046) AddQuestStepCompleteAction(Quest, 9, "QuestComplete") end function QuestComplete(Quest, QuestGiver, Player) -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around UpdateQuestStepDescription(Quest, 9, "I've spoken with the Traveling Augur") UpdateQuestTaskGroupDescription(Quest, 1, "I've done what the Traveling Augur recommended.") UpdateQuestDescription(Quest, "Like all mystical ventures, I'm supposed to draw my own conclusions as to what I've learned about the meanings of life. I believe that being alive beats the alternative, but the Traveling Augur probably has something else in mind. At least he paid me for my time.") GiveQuestReward(Quest, Player) end function Reload(Quest, QuestGiver, Player, Step) if Step == 1 then Step1Complete(Quest, QuestGiver, Player) elseif Step == 2 then Step2Complete(Quest, QuestGiver, Player) elseif Step == 3 then Step3Complete(Quest, QuestGiver, Player) elseif Step == 4 then Step4Complete(Quest, QuestGiver, Player) elseif Step == 5 then Step5Complete(Quest, QuestGiver, Player) elseif Step == 6 then Step6Complete(Quest, QuestGiver, Player) elseif Step == 7 then Step7Complete(Quest, QuestGiver, Player) elseif Step == 8 then Step8Complete(Quest, QuestGiver, Player) elseif Step == 9 then QuestComplete(Quest, QuestGiver, Player) end end