EQ2EMu/server/Quests/FrostfangSea/beets_the_alternative.lua

--[[
	Script Name	: Quests/FrostfangSea/beets_the_alternative.lua
	Script Purpose	: the quest Beets the Alternative
	Script Author	: theFoof
	Script Date	: 2013.5.18

        Zone            : Frostfang Sea
        Quest Giver     : Wregan Firebeard
        Preceded by     : 
        Followed by     : 
--]]

function Init(Quest)
    AddQuestRewardCoin(Quest, math.random(50,90), math.random(2,5), 0, 0)
    AddQuestStep(Quest, 1, "Gather tundra beets along the frozen beach front north of Gwenevyn's Cove, between the pillars of ice.", 3, 100, "First though, you must help gather provisions necessary for the journey.", 816)
	AddQuestStepCompleteAction(Quest, 1, "GatheredBeets")
end

function Declined(Quest, QuestGiver, Player)
end

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

	PlayFlavor(QuestGiver, "wregan_firebeard/halas/gwenevyns_cove/wregan_firebeard_007.mp3", "", "", 2495625045, 3478965655, Player)
	AddConversationOption(conversation, "I will, believe me.")
	StartConversation(conversation, QuestGiver, Player, "Yes.  Now go and harvest some tundra beets.  They grow along the frozen beach front north of us, between the pillars of ice.  Be wary of the blizzard grizzlies nearby!")
end

function GatheredBeets(Quest, QuestGiver, Player)
    UpdateQuestStepDescription(Quest, 1, "You gathered tundra beets.")
	AddQuestStep(Quest, 2, "You should gather one more tundra beet.", 1, 100, "First though, you must help gather provisions necessary for the journey.", 816)
	AddQuestStepCompleteAction(Quest, 2, "GotLastBeet")
end

function GotLastBeet(Quest, QuestGiver, Player)
    RemoveSpawnAccess(GetSpawn(Player, 4700035), Player)
    UpdateQuestTaskGroupDescription(Quest, 1, "You gathered enough tundra beets, but you also found fresh orc footprints within the snow and ice!")
	AddQuestStepChat(Quest, 3, "Return to Wregan Firebeard and tell him of the orcish threat!", 1, "You should return to Wregan Firebeard, the Pilgrimage Guardian, in Gwenevyn's Cove, and tell him of the orcish threat!", 0, 4700034)
	AddQuestStepCompleteAction(Quest, 3, "CompleteQuest")
end

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

function Reload(Quest, QuestGiver, Player, Step)
    if Step == 1 then
	    GatheredBeets(Quest, QuestGiver, Player)
	elseif Step == 2 then
	    GotLastBeet(Quest, QuestGiver, Player)
	elseif Step == 3 then
	    CompleteQuest(Quest, QuestGiver, Player)
	end
end