EQ2EMu/server/Quests/MultipleZones/lore_and_legendskeleton.lua

--[[
    Script Name    : Quests/MultipleZones/lore_and_legendskeleton.lua
    Script Author  : AussieGlen
    Script Date    : 2021.12.29 07:12:07
    Script Purpose : 

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


function Init(Quest)
	AddQuestStepKillByRace(Quest, 1, "I need to find a skeleton essence.", 1, 30, "I must locate several skeleton body parts.", 2516, 340)
	AddQuestStepKillByRace(Quest, 2, "I need to find a skeleton skull.", 1, 40, "I must locate several skeleton body parts.", 91, 340)
	AddQuestStepKillByRace(Quest, 3, "I need to find a skeleton ribcage.", 1, 55, "I must locate several skeleton body parts.", 90, 340)
	AddQuestStep(Quest, 4, "I need to find and study a skeleton arm.", 1, 100, "I must locate several skeleton body parts.", 11)
	AddQuestStep(Quest, 5, "I need to find and study a skeleton leg.", 1, 100, "I must locate several skeleton body parts.", 11)
	AddQuestStep(Quest, 6, "I need to find and study a skeleton objurgatory hunger.", 1, 100, "I must locate several skeleton body parts.", 11)
	AddQuestStep(Quest, 7, "I need to find and study a skeleton reanimation rune.", 1, 100, "I must locate several skeleton body parts.", 11)
	AddQuestStep(Quest, 8, "I need to find and study a skeleton sorrow core.", 1, 100, "I must locate several skeleton body parts.", 11)
	AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
	AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
 	AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
 	AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
	AddQuestStepCompleteAction(Quest, 5, "Step5Complete")
	AddQuestStepCompleteAction(Quest, 6, "Step6Complete")
	AddQuestStepCompleteAction(Quest, 7, "Step7Complete")
	AddQuestStepCompleteAction(Quest, 8, "Step8Complete")
end

function Accepted(Quest, QuestGiver, Player)

end

function Declined(Quest, QuestGiver, Player)

end

function quest_complete(Quest, QuestGiver, 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
		QuestIsComplete(Quest, QuestGiver, Player)		
	end
end

function CheckProgress(Quest, QuestGiver, Player)
    if QuestStepIsComplete(Player, 5396, 1) and QuestStepIsComplete(Player, 5396, 2) and QuestStepIsComplete(Player, 5396, 3) and QuestStepIsComplete(Player, 5396, 4) and QuestStepIsComplete(Player, 5396, 5) and QuestStepIsComplete(Player, 5396, 6) and QuestStepIsComplete(Player, 5396, 7) and QuestStepIsComplete(Player, 5396, 8) then
        Step9Complete(Quest, QuestGiver, Player)
    end
end

function Step1Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 1, "I have found a skeleton essence.")
	CheckProgress(Quest, QuestGiver, Player)

end

function Step2Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 2, "I have found a skeleton skull.")
	CheckProgress(Quest, QuestGiver, Player)

end

function Step3Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 3, "I have found a skeleton ribcage.")
	CheckProgress(Quest, QuestGiver, Player)

end

function Step4Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 4, "I have found and studied a skeleton arm.")
	CheckProgress(Quest, QuestGiver, Player)

end

function Step5Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 5, "I have found and studied a skeleton leg.")
	CheckProgress(Quest, QuestGiver, Player)

end

function Step6Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 6, "I have found and studied a skeleton objurgatory hunger.")
	CheckProgress(Quest, QuestGiver, Player)

end

function Step7Complete(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 7, "I have found and studied a skeleton reanimation rune.")
	CheckProgress(Quest, QuestGiver, Player)
end

function Step8Complete(Quest, QuestGiver, Player)
   UpdateQuestStepDescription(Quest, 8, "I have found and studied a skeleton sorrow core.")
   CheckProgress(Quest, QuestGiver, Player)
end

function Step9Complete(Quest, QuestGiver, Player)
	UpdateQuestTaskGroupDescription(Quest, 1, "I have located all of the necessary skeleton body parts.")
	UpdateQuestDescription(Quest, "I have learned the secrets of the skeleton.")
	GiveQuestReward(Quest, Player)
end