EQ2EMu/server/Quests/Antonica/the_starwisp_sword.lua

--[[
    Script Name    : Quests/Antonica/the_starwisp_sword.lua
    Script Author  : Dorbin
    Script Date    : 2023.05.15 07:05:31
    Script Purpose : 

        Zone       : Antonica
        Quest Giver: 
        Preceded by: None
        Followed by: 
--]]
--

function Init(Quest)
	AddQuestStep(Quest, 1, "I need to find some freshly milled flour somewhere here in Antonica.", 1, 100, "If I'm going to restore this sword back to its original condition, I'm going to need to give a little extra effort.", 11)
	AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
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 Step1Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 1, "I've grabbed a handful of milled flour from the Millers' house.")
	AddQuestStep(Quest, 2, "I should mix the flour into a paste and apply it to the sword.", 1, 100, "If I'm going to restore this sword back to its original condition, I'm going to need to give a little extra effort.", 2155)
	AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
end

--Now I should use the etching tool on the newly cleaned sword.
function Step2Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 2, "I've managed to scrub away nearly all the rust on the blade.")
	AddQuestStepKill(Quest, 3, "I now need to find an etching tool from the coldwind crewman that lurk about Antonica.", 1, 50, "If I'm going to restore this sword back to its original condition, I'm going to need to give a little extra effort.", 25, 120672)
	AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
end

function Step3Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 3, "I've been able to find an etching tool.")
	AddQuestStep(Quest, 4, "I need to use the etching tool on the blade to repair the star pattern.", 1, 100, "If I'm going to restore this sword back to its original condition, I'm going to need to give a little extra effort.",2155)
	AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
end

function Step4Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 4, "I've etched the stars back into the blade.")
	AddQuestStepKill(Quest, 5, "For some reason, all I can think about is killing klicniks in Antonica.", 15, 100, "If I'm going to restore this sword back to its original condition, I'm going to need to give a little extra effort.", 611, 120372,120211,120253,120367,	120371,	120453,120452)
	AddQuestStepCompleteAction(Quest, 5, "Step5Complete")
end

function Step5Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 5, "I've killed enough kliknics and can feel the power in the blade!")
	AddQuestStep(Quest, 6, "I need to examine the blade one last time to see if it is satisfied.", 1, 100, "If I'm going to restore this sword back to its original condition, I'm going to need to give a little extra effort.", 2155)
	AddQuestStepCompleteAction(Quest, 6, "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, 6, "I've killed quite a number of klicniks in Antonica.  I have a feeling my desire to do so came from the sword.")
	UpdateQuestTaskGroupDescription(Quest, 1, "I've been able to restore Starwisp to its original condition.")

	UpdateQuestDescription(Quest, "I've been able to not only clean the sword but restore it back to its original condition.  For some reason I believe the name of the sword is Starwisp.")
	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
		QuestComplete(Quest, QuestGiver, Player)
end
end