EQ2EMu/server/Quests/FrostfangSea/rygorr_mining_operations.lua

--[[
	Script Name		:	Quests/FrostfangSea/rygorr_mining_operations.lua
	Script Purpose	:	for the quest "Ry'Gorr Mining Operations'
	Script Author	:	theFoof
	Script Date		:	2013.6.13
	Script Notes	:	

	Zone			:	Frostfang Sea
	Quest Giver		:	Thirin Veliumdelver
	Preceded by		:	Below The Frozen Waves
	Followed by		:	A Good Distraction
--]]

function Init(Quest)
	AddQuestRewardCoin(Quest, math.random(5,90), math.random(27,40), 0, 0)
	AddQuestStep(Quest, 1, "I should look for an exploding barrel and set it in front of the hastily made wall.", 1, 100, "I should look around for a Ry'Gorr Explosive Mining Barrel and use it on the wall I discovered.", 0)
	AddQuestStepCompleteAction(Quest, 1, "DestroyedWall")
end

function Accepted(Quest, QuestGiver, Player)
	FaceTarget(QuestGiver, Player)
	conversation = CreateConversation()

	PlayFlavor(QuestGiver, "thirin_veliumdelver/halas/cragged_spine/thirin_veliumdelver_cave005.mp3", "", "", 3687695451, 727081902, Player)
	AddConversationOption(conversation, "I won't, Thirin.")
	StartConversation(conversation, QuestGiver, Player, "I'll be expecting a good show, adventurer.  Don't let me down.")
end

function Deleted(Quest, QuestGiver, Player)
	local zone = GetZone(Player)
	if GetZoneID(zone) == 470 then
	    AddSpawnAccess(GetSpawnByLocationID(zone, 441164), Player)
	    AddSpawnAccess(GetSpawnByLocationID(zone, 571511), Player)
	end
end

function Declined(Quest, QuestGiver, Player)
end

function DestroyedWall(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 1, "I was able to destroy the wall.")
	AddQuestStepLocation(Quest, 2, "With the wall destroyed I should investigate what is on the other side.", 10, "I should look around for a Ry'Gorr Explosive Mining Barrel and use it on the wall I discovered.", 0, -44.05, -67.39, 141.07)
    AddQuestStepCompleteAction(Quest, 2, "FoundCreatures")
end

function FoundCreatures(Quest, QuestGiver, Player)
	UpdateQuestStepDescription(Quest, 2, "I have discovered velium creatures that appear to have slain a number of Ry'Gorr orcs. I should report what I've found to Thirin Veliumdelver.")
	UpdateQuestTaskGroupDescription(Quest, 1, "I was able to destroy the wall and discovered creatures that appear to be made from velium.")
	AddQuestStepChat(Quest, 3, "I should speak with Thirin Veliumdelver of the creatures I've found.", 1, "I should return to Thirin Veliumdelver and tell him of the velium creatures I found beyond the cave-in.", 0, 4700112)
    AddQuestStepCompleteAction(Quest, 3, "CompleteQuest")
end

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

function Reload(Quest, QuestGiver, Player, Step)
	if Step == 1 then
		DestroyedWall(Quest, QuestGiver, Player)
	elseif Step == 2 then
		FoundCreatures(Quest, QuestGiver, Player)
	end
end