EQ2EMu/server/Quests/SouthQeynos/selwyns_errands__part_i.lua

--[[
	Script Name		:	selwyns_errands_-_part_v.lua
	Script Purpose	:	Handles the quest, "Selwyn's Errands - Part V"
	Script Author	:	Dorbin
	Script Date		:	7/8/2022
	Script Notes	:	Auto generated with QuestParser.

	Zone			:	The City of Qeynos
	Quest Giver		:	Selwyn
	Preceded by		:	None
	Followed by		:	Selwyn's Errands - Part II
--]]
require "SpawnScripts/Generic/DialogModule"

function Init(Quest)
	AddQuestStepKill(Quest, 1, "I must find and destroy the fetishes that the Sabertooth elders wear within Antonica.", 4, 100, "Thank you for the help dear.  If you could do me two favors I should have those gloves for you in no time.  Well first the foul Sabertooth gnolls are at their tricks again.  They need to be taught a little bit of a lesson. If they can't handle their gifts responsibily we'll have to take their toys away.  Destroy the fetishes that the Sabertooth elders wear, as many as you can.  And I need to destroy several of the Caltorsis clerics out in the old ruins in Antonica.  If you could do that for me it would go a long way to helping me out. - Selwyn", 372, 120376)
	AddQuestStepKill(Quest, 2, "I need to destroy the Caltorsis clerics within Antonica.", 20, 100, "Thank you for the help dear.  If you could do me two favors I should have those gloves for you in no time.  Well first the foul Sabertooth gnolls are at their tricks again.  They need to be taught a little bit of a lesson. If they can't handle their gifts responsibily we'll have to take their toys away.  Destroy the fetishes that the Sabertooth elders wear, as many as you can.  And I need to destroy several of the Caltorsis clerics out in the old ruins in Antonica.  If you could do that for me it would go a long way to helping me out. - Selwyn", 611, 120131)
	AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
	AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
    UpdateQuestZone(Quest,"Antonica")
end

function Accepted(Quest, QuestGiver, Player)
	FaceTarget(QuestGiver, Player)
	Dialog.New(QuestGiver, Player)
    Dialog.AddDialog( "Oh, I always make a list so I don't forget. Here let me get that out.  Hrm ... oh yes I'd forgotten about that. Well, here you are. I'll just give it to you and write myself a new list for those adjustments.  Thank you so much, dear, for your help.")
--	Dialog.AddVoiceover("voiceover/english/selwyn_oakheart/qey_south/quests/selwyn_oakheart/selwyn001.mp3", 390832885, 49061382)
	PlayFlavor(QuestGiver,"","","agree", 0, 0, Player)
	Dialog.AddOption( "My pleasure Selwyn.  I'll be back soon.")
	Dialog.Start()
end

function Declined(Quest, QuestGiver, Player)

end

function Step1Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 1, "I have found and destroyed the fetishes that the Sabertooth elders wear within Antonica.")
    CheckProgress(Quest, QuestGiver, Player)
end

function Step2Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 2, "I have returned several Caltorsis clerics back to their graves.")
    CheckProgress(Quest, QuestGiver, Player)
end

function CheckProgress(Quest, QuestGiver, Player)
 if QuestStepIsComplete(Player, 5606, 1) and QuestStepIsComplete(Player, 5606, 2) and QuestStepIsComplete(Player, 5606, 3)  then

	UpdateQuestTaskGroupDescription(Quest, 1, "I have completed all of Selwyn's errands I should return to her.")
    UpdateQuestZone(Quest,"South Qeynos")
	AddQuestStepChat(Quest, 3, "I should return to Selwyn in South Qeynos.", 1, "I need to speak to Selwyn Oakheart in South Qeynos.", 11, 2310028)
	AddQuestStepCompleteAction(Quest, 3, "QuestComplete")
end
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, 3, "I have returned to Selwyn in South Qeynos.")
	UpdateQuestTaskGroupDescription(Quest, 2, "I have spoken with Selwyn in South Qeynos.")

	UpdateQuestDescription(Quest, "Selwyn has paid me with some armor for my hands.")
	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
		QuestComplete(Quest, QuestGiver, Player)
	end
end