EQ2EMu/server/Quests/LongshadowAlley/no_rivals_for_yarana_part_i.lua

--[[
	Script Name		:	no_rivals_for_yarana_part_i.lua
	Script Purpose	:	Handles the quest, "No Rivals For Yarana"
	Script Author	:	torsten
	Script Date		:	18.07.2022
	Script Notes	:	later this quest was splitted up into 3 Parts

	Zone			:	Longshadow Alley
	Quest Giver		:	Yarana D'Ven
	Preceded by		:	None
	Followed by		:	None
--]]


function Init(Quest)
	AddQuestStepKill(Quest, 1, "Destroy 8 filthy moccasins.", 8, 100, "I need to go to the Serpent Sewers and destroy 8 filthy moccasins.", 611, 1550002, 1550039)
	AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
end

function Step1Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 1, "I killed the filthy moccasins.")
	
	AddQuestStepChat(Quest, 2, "I should return to Yarana.", 1,  "I should return to Yarana in Longshadow Alley.", 11, 1380028)
	AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
end

function Step2Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 2, "I returned to Yarana in Longshadow Alley.")
	
	AddQuestStepKill(Quest, 3, "Destroy 7 shadow lurkers.", 7, 100,  "I need search Fallen Gate for seven slime sacs and destroy them.", 611, 1190001)
	AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
end

function Step3Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 3, "I killed the shadow lurkers.")
	
	AddQuestStepChat(Quest, 4, "I should return to Yarana.", 1, "I should return to Yarana.", 11, 1380028)
	AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
end

function Step4Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 4, "I returned to Yarana in Longshadow Alley.")
	
	AddQuestStepKill(Quest, 5, "Destroy two suspended watchers.", 2, 100, "Go back to Fallen Gate and destroy two suspended watchers.", 611, 1190029, 1190030)
	AddQuestStepCompleteAction(Quest, 5, "Step5Complete")
end

function Step5Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 5, "I killed two suspended watchers in Fallen Gate.")
	
	AddQuestStepChat(Quest, 6, "I should return to Yarana.", 1, "I should return to Yarana to collect my reward.", 11, 1380028)
	AddQuestStepCompleteAction(Quest, 6, "QuestComplete")
end

function QuestComplete(Quest, QuestGiver, Player)
	UpdateQuestDescription(Quest, "I completed all the tasks for Yarana and received a nice silver ring.")
	GiveQuestReward(Quest, Player)
end

function Accepted(Quest, QuestGiver, Player)
	-- Add dialog here for when the quest is accepted
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 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
	    QuestComplete(Quest, QuestGiver, Player)
	end
end