--[[ Script Name : SpawnScripts/Blackburrow/GeologistFribden.lua Script Author : Premierio015 Script Date : 2022.07.12 08:07:46 Script Purpose : : --]] require "SpawnScripts/Generic/DialogModule" local RareRocksLost = 5640 function spawn(NPC) ProvidesQuest(NPC, RareRocksLost) end function hailed(NPC, Spawn) FaceTarget(NPC, Spawn) if not HasQuest(Spawn, RareRocksLost) and not HasCompletedQuest(Spawn, RareRocksLost) then Option0(NPC, Spawn) elseif GetQuestStep(Spawn, RareRocksLost) == 1 or GetQuestStep(Spawn, RareRocksLost) == 2 or GetQuestStep(Spawn, RareRocksLost) == 3 or GetQuestStep(Spawn, RareRocksLost) == 4 then Progress(NPC, Spawn) elseif GetQuestStep(Spawn, RareRocksLost) == 5 then Option3(NPC, Spawn) elseif HasCompletedQuest(Spawn, RareRocksLost) then Finished(NPC, Spawn) end end function Progress(NPC, Spawn) Dialog.New(NPC, Spawn) Dialog.AddVoiceover("voiceover/english/geologist_fribden/blackburrow/geologist_fribden008.mp3", 3978965868, 3637464686) Dialog.AddOption("Not yet.") Dialog.AddDialog("Well then. You recovered the rock samples I lost?") Dialog.Start() end function Option0(NPC, Spawn) Dialog.New(NPC, Spawn) Dialog.AddDialog("I've found such amazing rock formation in these caves. They're dangerous, indeed, but the sights are worth the treacherous journey.") Dialog.AddVoiceover("voiceover/english/geologist_fribden/blackburrow/geologist_fribden001.mp3", 2146454780, 3217102942) Dialog.AddOption("What are you doing down here?", "Option1") Dialog.AddOption("I'll keep an eye out.") Dialog.Start() end function Option1(NPC, Spawn) FaceTarget(NPC, Spawn) Dialog.New(NPC, Spawn) Dialog.AddDialog("Why, isn't it obvious? Wilabus and I are studying the structure and mineral constitution of Antonica ... Perhaps it's not so obvious, you appear to be one of those adventuring types, am I right?") Dialog.AddVoiceover("voiceover/english/geologist_fribden/blackburrow/geologist_fribden005.mp3", 4214643568, 2530978770) Dialog.AddOption("[continue]", "Option2") Dialog.Start() end function Option2(NPC, Spawn) FaceTarget(NPC, Spawn) Dialog.New(NPC, Spawn) Dialog.AddDialog("Why, yes, of course you are. Say! I need someone with your unique credentials. While in the upper mines, I lost some rather rare samples that I had been collecting. Would you venture to the mines and recover them for me?") Dialog.AddVoiceover("voiceover/english/geologist_fribden/blackburrow/geologist_fribden006.mp3", 2444720403, 3772890138) Dialog.AddOption("I can for a price.", "offer") Dialog.AddOption("No can do. ") Dialog.Start() end function Option3(NPC, Spawn) FaceTarget(NPC, Spawn) Dialog.New(NPC, Spawn) Dialog.AddDialog("Good to see you again, my adventurous friend. I see you've recovered my samples. It would have taken me weeks to replace them. I'm truly in your debt.") Dialog.AddVoiceover("voiceover/english/geologist_fribden/blackburrow/geologist_fribden010.mp3", 2842935841, 2634256248) Dialog.AddOption("Pay me and we'll be square. ", "Option4") Dialog.Start() end function Option4(NPC, Spawn) SetStepComplete(Spawn, RareRocksLost, 5) FaceTarget(NPC, Spawn) Dialog.New(NPC, Spawn) Dialog.AddDialog("Of course, accept these gems as compensation for your efforts. It has been an honor to make your acquaintance. May whatever faith guide you, shine evermore brightly.") Dialog.AddVoiceover("voiceover/english/geologist_fribden/blackburrow/geologist_fribden011.mp3", 3464640416, 2538518646) Dialog.AddOption("Thanks.") Dialog.Start() end function Finished(NPC, Spawn) FaceTarget(NPC, Spawn) Dialog.New(NPC, Spawn) Dialog.AddDialog("These gnolls are quite adept at mining. I would even venture to say their mining skills surpass those of the dwarves.") Dialog.AddVoiceover("voiceover/english/geologist_fribden/blackburrow/geologist_fribden012.mp3", 293315046, 2022548794) Dialog.AddOption("You don't say.") Dialog.Start() end function offer(NPC, Spawn) OfferQuest(NPC, Spawn, RareRockskLost) end function respawn(NPC) spawn(NPC) end