EQ2EMu/server/Quests/Antonica/ignatia_cellus_history_of_antonica.lua

--[[
    Script Name    : Quests/Antonica/ignatia_cellus_history_of_antonica.lua
    Script Author  : Dorbin
    Script Date    : 2023.05.30 02:05:23
    Script Purpose : 

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


function Init(Quest)
	AddQuestStepKill(Quest, 1, "I need to search Sabertooth battlers.", 6, 100, "I want to find the pages to the book.", 611, 120184)
	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 have searched Sabertooth battlers and found the page!")

	AddQuestStep(Quest, 2, "I want to read the page I found.", 1, 100, "I want to find the pages to the book.", 185)
	AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
end

function Step2Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 2, "I believe the Sabertooth rune casters of Antonica will have more of these pages.")

	AddQuestStepKill(Quest, 3, "I need to search for Sabertooth rune casters.", 4, 100, "I want to find the pages to the book.", 611, 120300)
	AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
end

function Step3Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 3, "I have searched Sabertooth rune casters and found the page!")

	AddQuestStep(Quest, 4, "I want to read the page I found.", 1, 100, "I want to find the pages to the book.", 185)
	AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
end

function Step4Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 4, "I believe the Sabertooth battlers of Antonica will have more of these pages.")

	AddQuestStepKill(Quest, 5, "I need to search more Sabertooth battlers.", 8, 100, "I want to find the pages to the book.", 611, 120184)
	AddQuestStepCompleteAction(Quest, 5, "Step5Complete")
end

function Step5Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 5, "I have searched more Sabertooth battlers and found the page!")

	AddQuestStep(Quest, 6, "I want to read the page I found.", 1, 100, "I want to find the pages to the book.", 185)
	AddQuestStepCompleteAction(Quest, 6, "Step6Complete")
end

function Step6Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 6, "I believe the Sabertooth warlocks of Antonica will have more of these pages.")

	AddQuestStepKill(Quest, 7, "I need to search more Sabertooth warlocks.", 3, 100, "I want to find the pages to the book.", 611, 120300)
	AddQuestStepCompleteAction(Quest, 7, "Step7Complete")
end

function Step7Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 7, "I have searched more Sabertooth warlocks and found the page!")

	AddQuestStep(Quest, 8, "I want to read the page I found.", 1, 100, "I want to find the pages to the book.", 185)
	AddQuestStepCompleteAction(Quest, 8, "Step8Complete")
end

function Step8Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 8, "I believe the Sabertooth battlers of Antonica will have more of these pages.")

	AddQuestStepKill(Quest, 9, "I need to search the last of the Sabertooth battlers.", 8, 100, "I want to find the pages to the book.", 611, 120184)
	AddQuestStepCompleteAction(Quest, 9, "Step9Complete")
end

function Step9Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 9, "I have found the final battler page!")

	AddQuestStep(Quest, 10, "I want to read the page I found.", 1, 100, "I want to find the pages to the book.", 185)
	AddQuestStepCompleteAction(Quest, 10, "Step10Complete")
end

function Step10Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 10, "I believe the Sabertooth tormentors of Antonica will have more of these pages.")

	AddQuestStepKill(Quest, 11, "I need to search Sabertooth tormentors.", 1, 100, "I want to find the pages to the book.", 611, 	120380)
	AddQuestStepCompleteAction(Quest, 11, "Step11Complete")
end

function Step11Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 11, "I have searched Sabertooth tormentors and found the page!")

	AddQuestStep(Quest, 12, "I want to read the page I found.", 1, 100, "I want to find the pages to the book.", 185)
	AddQuestStepCompleteAction(Quest, 12, "Step12Complete")
end

function Step12Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 12, "I believe the Sabertooth battlers of Antonica will have more of these pages.")

	AddQuestStepKill(Quest, 13, "I need to search Sabertooth battlers.", 1, 100, "I want to find the pages to the book.", 611, 120184)
	AddQuestStepCompleteAction(Quest, 13, "Step13Complete")
end

function Step13Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 13, "I have searched the Sabertooth camp guards and found the final page!")

	AddQuestStep(Quest, 14, "I want to read the last page of the book.", 1, 100, "I want to find the pages to the book.", 185)
	AddQuestStepCompleteAction(Quest, 14, "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, 14, "I read the page I found.")
	UpdateQuestTaskGroupDescription(Quest, 1, "I've found all the missing pages.")

	UpdateQuestDescription(Quest, "I've gathered many scattered pages of Ignatia Cellus' book.  I wonder whether any of her descendants also wrote any histories?  I shall keep my eyes open.  Perhaps, someday, I'll find other tomes such as this throughout Norrath.")
	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
		Step9Complete(Quest, QuestGiver, Player)
	elseif Step == 10 then
		Step10Complete(Quest, QuestGiver, Player)
	elseif Step == 11 then
		Step11Complete(Quest, QuestGiver, Player)
	elseif Step == 12 then
		Step12Complete(Quest, QuestGiver, Player)
	elseif Step == 13 then
		Step13Complete(Quest, QuestGiver, Player)
	elseif Step == 14 then
		QuestComplete(Quest, QuestGiver, Player)
	end
end