EQ2EMu/server/SpawnScripts/Graystone/TacklemasterMoyna.lua

--[[
	Script Name	: SpawnScripts/Graystone/TacklemasterMoyna.lua
	Script Purpose	: Tacklemaster Moyna
	Script Author	: Scatman
	Script Date	: 2008.09.19
	Script Notes	: Added fishingpole quest -2022.03.09 Dorbin
--]]

local QUEST_1 = 293
local FishingPole = 5505

function spawn(NPC)
	ProvidesQuest(NPC, QUEST_1)
SetPlayerProximityFunction(NPC, 10, "InRange", "LeaveRange")	
end

function InRange(NPC, Spawn) --Quest Callout
if math.random(1, 100) <= 75 then
    if not HasCompletedQuest (Spawn, QUEST_1) and not HasQuest (Spawn, QUEST_1) then         
        choice = math.random(1,2)
             if choice ==1 then
             FaceTarget(NPC, Spawn)                
            PlayFlavor(NPC, "voiceover/english/tacklemaster_moyna/qey_village03/100_tacklemaster_barbarian_female_moyna_callout_5f36d1ce.mp3", "Drat... almost out of bait. You there! Can you fetch me some more bait?", "point", 1502130237, 2117204021, Spawn)
            else
	        FaceTarget(NPC, Spawn)                
        	PlayFlavor(NPC, "voiceover/english/tacklemaster_moyna/qey_village03/100_tacklemaster_barbarian_female_moyna_multhail1_58a69dc2.mp3", "Oh, I thought you were someone else! On your way now.", "doubletake", 2978375268, 150991096, Spawn)
            end
        elseif HasQuest(Spawn, QUEST_1) then
            FaceTarget(NPC, Spawn)
            PlayFlavor(NPC, "voiceover/english/tacklemaster_moyna/qey_village03/100_tacklemaster_barbarian_female_moyna_multhail3_629de1e4.mp3", "What's taking you so long, friend? I don't have all day! Fetch me my centipedes", "tap", 1963777615, 3216865707, Spawn)
            else
         choice = math.random(1,2)
            if choice ==1 then
            PlayFlavor(NPC, "", "", "hello", 0, 0, Spawn)
            else
            PlayFlavor(NPC, "", "", "tap", 0, 0, Spawn)
            end
        end
    end
end


function hailed(NPC, Spawn)
	FaceTarget(NPC, Spawn)
	conversation = CreateConversation()

	if HasQuest(Spawn, QUEST_1) and GetQuestStep(Spawn, QUEST_1) == 2 then
		AddConversationOption(conversation, "I've returned with the bait you requested.", "ReturnedWithBait")
	elseif not HasQuest(Spawn, QUEST_1) and not HasCompletedQuest(Spawn, QUEST_1) then
		AddConversationOption(conversation, "I'm interested in finding a little work around here.", "FindingWork")
	end
    if GetQuestStep(Spawn,FishingPole)==1 then
		AddConversationOption(conversation, "I'm here to pick up a new fishing pole for Bryce.", "GetPole")
    end
	PlayFlavor(NPC, "voiceover/english/tacklemaster_moyna/qey_village03/tacklemastermoyna.mp3", "", "", 2910658366, 1466320622, Spawn)
	AddConversationOption(conversation, "No thanks, not today.")
	StartConversation(conversation, NPC, Spawn, "Welcome to Graystone! With our Kerran population, the fish supply is never enough. If you're looking to fill that supply, you'll need some of my goods. Care to have a look?")
end

function respawn(NPC)
	spawn(NPC)
end
--[[
function RandomVoice(NPC, Spawn)
	local choice = math.random(1, 3)
	if choice == 1 then
		PlayFlavor(NPC, "voiceover/english/voice_emotes/greetings/greetings_1_1001.mp3", "", "", 0, 0, Spawn)
	elseif choice == 2 then
		PlayFlavor(NPC, "voiceover/english/voice_emotes/greetings/greetings_2_1001.mp3", "", "", 0, 0, Spawn)
	else
		PlayFlavor(NPC, "voiceover/english/voice_emotes/greetings/greetings_3_1001.mp3", "", "", 0, 0, Spawn)
	end
end
]]--

-----------------------------------------------------------------------------------------------------
--						QUEST 1
-----------------------------------------------------------------------------------------------------

function FindingWork(NPC, Spawn)
	FaceTarget(NPC, Spawn)
	conversation = CreateConversation()

	PlayFlavor(NPC, "voiceover/english/tacklemaster_moyna/qey_village03/tacklemastermoyna001.mp3", "", "", 530187050, 1736772086, Spawn)
	AddConversationOption(conversation, "Provided the job actually pays, I'll do it.", "ProvidedItPays")
	AddConversationOption(conversation, "No thanks, sounds icky.")
	StartConversation(conversation, NPC, Spawn, "You're in luck. I need more bait. If you're interested, you could fetch me some centipede meat. Ubani and Brice catch all the fish from the pier, and I always need more bait.")
end

function ProvidedItPays(NPC, Spawn)
	FaceTarget(NPC, Spawn)
	conversation = CreateConversation()

	PlayFlavor(NPC, "voiceover/english/tacklemaster_moyna/qey_village03/tacklemastermoyna002.mp3", "", "", 3085757696, 757857128, Spawn)
	AddConversationOption(conversation, "I'll be back when I've got what you need.", "OfferQuest1")
	StartConversation(conversation, NPC, Spawn, "It'll pay but not too well. The bait business is decent next to the pier, but the stuff isn't exactly worth its weight in platinum, if you know what I mean. I need you to gather some centipede meat for me from the Forest Ruins.")
end

function OfferQuest1(NPC, Spawn)
	FaceTarget(NPC, Spawn)
	OfferQuest(NPC, Spawn, QUEST_1)
end

function ReturnedWithBait(NPC, Spawn)
	SetStepComplete(Spawn, QUEST_1, 2)
	
	FaceTarget(NPC, Spawn)
	conversation = CreateConversation()

	AddConversationOption(conversation, "Thank you Moyna!")
	StartConversation(conversation, NPC, Spawn, "Thank you! With this supply, I can keep my bait buckets filled for at least another day or two. Well done. Here's your reward as promised.")
end

function GetPole(NPC, Spawn)
	FaceTarget(NPC, Spawn)
	conversation = CreateConversation()

	PlayFlavor(NPC, "voiceover/english/tacklemaster_moyna/qey_village03/tacklemastermoyna000.mp3", "", "ponder", 1055547501, 1408950171, Spawn)
	AddConversationOption(conversation, "I'll get this to him. Thanks.", "Pickup")
	StartConversation(conversation, NPC, Spawn, "Let me see how much coin Bryce has to spend... Hmmm, well I've got this pole. It should suit his needs.  He's not got enough coin to do any better, but this should do nicely.")
end

function Pickup(NPC,Spawn)
  SetStepComplete(Spawn, FishingPole, 1)  
  end