EQ2EMu/server/Quests/FrostfangSea/roughing_up_the_reinforcements.lua

--[[
	Script Name		:	Quests/FrostfangSea/roughing_up_the_reinforcements.lua
	Script Purpose	:	for the quest Roughing Up the Reinforcements
	Script Author	:	theFoof
	Script Date		:	2013.6.10
	Script Notes	:	

	Zone			:	Frostfang Sea
	Quest Giver		:	Thirin Veliumdelver
	Preceded by		:	Nothing to Waste
	Followed by		:	Through Thine Eyes
--]]

function Init(Quest)
	AddQuestRewardCoin(Quest, math.random(5,90), math.random(12,24), 0, 0)
	AddQuestStepKill(Quest, 1, "I must slay four Ry'Gorr grenadiers.", 4, 100, "I must travel to the Jagged Daggers Isle and engage the Ry'Gorr orcs. While there I should also destroy as many weapon supplies as I can find.", 2488, 4700120, 4700543)
	AddQuestStepKill(Quest, 2, "I must slay four Ry'Gorr infiltrators.", 4, 100, "I must travel to the Jagged Daggers Isle and engage the Ry'Gorr orcs. While there I should also destroy as many weapon supplies as I can find.", 2488, 4700119, 4700538)
	AddQuestStep(Quest, 3, "I must destroy four of the Ry'Gorr orcs' weapon supplies.", 4, 100, "I must travel to the Jagged Daggers Isle and engage the Ry'Gorr orcs. While there I should also destroy as many weapon supplies as I can find.", 287)
    AddQuestStepCompleteAction(Quest, 1, "KilledGrenadiers")
	AddQuestStepCompleteAction(Quest, 2, "KilledInfiltrators")
	AddQuestStepCompleteAction(Quest, 3, "DestroyedSpears")
end

function Accepted(Quest, QuestGiver, Player)
	local thirin = GetSpawnByLocationID(GetZone(QuestGiver), 14520)
	FaceTarget(thirin, Player)
	conversation = CreateConversation()

	PlayFlavor(thirin, "thirin_veliumdelver/halas/thirin_veliumdelver/thirin_veliumdelver012.mp3", "", "", 830312044, 2813539587, Player)
	AddConversationOption(conversation, "And you, Thirin.")
	StartConversation(conversation, thirin, Player, "Good.  Brell be with you on your quest, adventurer.")
end

function Deleted(Quest, QuestGiver, Player)
end

function Declined(Quest, QuestGiver, Player)
end

function KilledGrenadiers(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 1, "I have slain four Ry'Gorr grenadiers.")
	CheckProgress(Quest, QuestGiver, Player)
end

function KilledInfiltrators(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 2, "I have slain four Ry'Gorr infiltrators.")
	CheckProgress(Quest, QuestGiver, Player)
end

function DestroyedSpears(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 3, "I have destroyed the Ry'Gorr orcs' weapon supplies.")
	CheckProgress(Quest, QuestGiver, Player)
end

function CheckProgress(Quest, QuestGiver, Player)
	if QuestStepIsComplete(Player, 57, 1) and QuestStepIsComplete(Player, 57, 2) and QuestStepIsComplete(Player, 57, 3) then
		AddStep4(Quest, QuestGiver, Player)
	end
end

function AddStep4(Quest, QuestGiver, Player)
	UpdateQuestTaskGroupDescription(Quest, 1, "With so many Ry'Gorr weapons and orcs destroyed, re-enforcement will be hard.")
	AddQuestStepKill(Quest, 4, "Thirin requested that I slay a war shaman as well, to prevent their scrying magics.", 1, 100, "I should slay a Ry'Gorr war shaman so the Ry'Gorr will be unable to scry Thirin's encampment.", 2488, 4700542, 4700121)
	AddQuestStepCompleteAction(Quest, 4, "KilledShaman")
end

function KilledShaman(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 4, "The Ry'Gorr war shaman, now slain, may have something useful on them.")
	AddQuestStepObtainItem(Quest, 5, "I should see what the Ry'Gorr war shaman has. There may be something of use.", 1, 100, "I should slay a Ry'Gorr war shaman so the Ry'Gorr will be unable to scry Thirin's encampment.", 83, 11820)
	AddQuestStepCompleteAction(Quest, 5, "GotEye")
end

function GotEye(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 5, "It appears to the war shaman has some sort of Orcish scrying eye. I should show this to Thirin Veliumdelver at the Cragged Spine.")
	UpdateQuestTaskGroupDescription(Quest, 2, "I found an odd Orcish scrying eye. Thirin would be interested in this.")
    AddQuestStepChat(Quest, 6, "I must speak with Thirin Veliumdelver.", 1, "I should return to Thirin Veliumdelver, with the Orcish scrying eye, at the Cragged Spine.", 0, 4700112)
	AddQuestStepCompleteAction(Quest, 6, "CompleteQuest")
end

function CompleteQuest(Quest, QuestGiver, Player)
	GiveQuestReward(Quest, Player)
end

function Reload(Quest, QuestGiver, Player, Step)
	if QuestStepIsComplete(Player, 57, 1) and GetQuestStep(Player, 57) < 4 then
		KilledGrenadiers(Quest, QuestGiver, Player)
	end
	if QuestStepIsComplete(Player, 57, 2) and GetQuestStep(Player, 57) < 4 then
		KilledInfiltrators(Quest, QuestGiver, Player)
	end
	if QuestStepIsComplete(Player, 57, 3) and GetQuestStep(Player, 57) < 4 then
		DestroyedSpears(Quest, QuestGiver, Player)
	end
	if GetQuestStep(Player, 57) == 4 then
		AddStep4(Quest, QuestGiver, Player)
	elseif Step == 4 then
		KilledShaman(Quest, QuestGiver, Player)
	elseif Step == 5 then
		GotEye(Quest, QuestGiver, Player)
	end		
end