EQ2EMu/server/SpawnScripts/IsleRefuge1/GuardVraen.lua

--[[
    Script Name    : SpawnScripts/IsleRefuge1/GuardVraen.lua
    Script Author  : Dorbin
    Script Date    : 2022.09.04 10:09:48
    Script Purpose : 
                   : 
--]]
require "SpawnScripts/Generic/DialogModule"
require "SpawnScripts/Generic/NPCModule"

function spawn(NPC, Spawn)
    NPCModule(NPC, Spawn)
	SetPlayerProximityFunction(NPC, 10, "InRange", "LeaveRange")
end

function InRange(NPC,Spawn)
    if GetClass(Spawn)==0 then	
	FaceTarget(NPC, Spawn)
    PlayFlavor(NPC,"","","point",0,0, Spawn)
	FaceTarget(NPC, Spawn)
	Dialog.New(NPC, Spawn)
	Dialog.AddDialog("Make sure to speak with Garven Tralk before you venture too far.  Danger lies beyond these gates.")
	Dialog.AddVoiceover("voiceover/english/erudite_eco_good_1/ft/erudite/erudite_eco_good_1_notcitizen_gf_48350e59.mp3",3405287024, 2122169059)
	Dialog.AddOption("Alright.")
	Dialog.Start()
	end
end


function hailed(NPC, Spawn)
	FaceTarget(NPC, Spawn)
    choice = MakeRandomInt(1,3)
    if choice == 1 then
	PlayFlavor(NPC, "voiceover/english/halfelf_eco_farsea_1/ft/service/guard/halfelf_guard_service_farsea_1_hail_gf_2b42c14f.mp3", "After twelve weeks at sea, bashing the head of a nosy landlubber sounds quite appealing!", "threaten", 1936614211, 2469553737, Spawn, 0)
    elseif choice == 2 then
	PlayFlavor(NPC, "voiceover/english/halfelf_eco_farsea_1/ft/service/guard/halfelf_guard_service_farsea_1_hail_gf_a837e4f4.mp3", "Once I am off duty, I will be heading straight to the tavern.", "nod", 3411176323, 4077972480, Spawn, 0)
    elseif choice == 3 then
	PlayFlavor(NPC, "voiceover/english/halfelf_eco_farsea_1/ft/service/guard/halfelf_guard_service_farsea_1_hail_gf_f9615d93.mp3", "This ain't a show, stranger.  Buy your goods and shove-off!", "glare", 1941361840, 4269078583, Spawn, 0)
    end    
end

function respawn(NPC)
	spawn(NPC)
end