eq2emu-content/SpawnScripts/Starcrest/ScholarObidudyn.lua
2024-10-26 11:37:28 +00:00

92 lines
No EOL
3.6 KiB
Lua
Executable file

--[[
Script Name : SpawnScripts/Starcrest/ScholarObidudyn.lua
Script Purpose : Scholar Obidudyn
Script Author : Dorbin
Script Date : 07.01.2022
Script Notes :
--]]
require "SpawnScripts/Generic/DialogModule"
function spawn(NPC)
SetPlayerProximityFunction(NPC, 10, "InRange", "LeaveRange")
ProvidesQuest(NPC,5600)
end
function respawn(NPC)
spawn(NPC)
end
function InRange(NPC, Spawn)
if GetFactionAmount(Spawn,11)<0 then
FaceTarget(NPC, Spawn)
PlayFlavor(NPC, "", "", "glare", 0, 0, Spawn)
else
if HasCompletedQuest(Spawn,5600)then
local chance = math.random(0, 100)
if chance <= 80 then
PlayFlavor(NPC, "", "", "tapfoot", 0, 0, Spawn, 0)
end
elseif not HasQuest(Spawn, 5600) and not HasCompletedQuest(Spawn,5600)then
local chance = math.random(0, 100)
if chance <= 80 then
FaceTarget(NPC, Spawn)
PlayFlavor(NPC, "voiceover/english/scholar_obidudyn/qey_village02/100_erudite_scholar_callout_9435d1c5.mp3", "Oh, a moment of peace. What I'd give for one moment without little human girls, felines ... or inquisitive adventurers... What do you want? Unless you're of any use, get out of my sight.", "", 3858056740, 933386302, Spawn)
end
end
end
end
function hailed(NPC, Spawn)
FaceTarget(NPC, Spawn)
if GetFactionAmount(Spawn,11)<0 then
PlayFlavor(NPC, "", "", "shakefist", 0, 0, Spawn)
else
Dialog1(NPC, Spawn)
end
end
function Dialog1(NPC, Spawn)
FaceTarget(NPC, Spawn)
Dialog.New(NPC, Spawn)
PlayFlavor(NPC, "", "", "sniff", 0, 0, Spawn)
Dialog.AddDialog("Oh to have a moment of peace. A moment without little human girls or felines ... or inquisitive adventurers...")
Dialog.AddVoiceover("voiceover/english/scholar_obidudyn/qey_village02/scholarobidudyn000.mp3", 139374477, 106530516)
if not HasCompletedQuest (Spawn, 5600) and not HasQuest (Spawn, 5600) then
Dialog.AddOption("You must have a reason for stay here then. What are you contemplating?","Dialog2")
end
if GetQuestStep (Spawn, 5600)==2 then
Dialog.AddOption("I've returned with the elemental essences you needed for your research.","Delivered")
end
Dialog.AddOption("Just passing by. Good day.")
Dialog.Start()
end
function Dialog2(NPC, Spawn)
FaceTarget(NPC, Spawn)
Dialog.New(NPC, Spawn)
PlayFlavor(NPC, "", "", "no", 0, 0, Spawn)
Dialog.AddDialog("I don't expect your feeble mind to comprehend my wisdom of elemental summoning. If it weren't for all my disruptions I would be a summoner of great renown! However, you do seem curious. Perhaps you could help me with a simple task.")
Dialog.AddVoiceover("voiceover/english/scholar_obidudyn/qey_village02/scholarobidudyn001.mp3", 2445829460, 388945180)
Dialog.AddOption("I am actually curious. What can I do to help your research?", "QuestBegin")
Dialog.AddOption("You'll have to go finish your simple task with all that wisdom. Goodbye.")
Dialog.Start()
end
function QuestBegin (NPC, Spawn)
FaceTarget(NPC, Spawn)
OfferQuest(NPC, Spawn, 5600)
end
function Delivered(NPC, Spawn)
FaceTarget(NPC, Spawn)
Dialog.New(NPC, Spawn)
SetStepComplete(Spawn, 5600, 2)
PlayFlavor(NPC, "", "", "nod", 0, 0, Spawn)
Dialog.AddDialog("Impressive! You accomplished that task rather quickly. I imagined it would take you much longer. Prehaps you are not as dimwitted as I first precieved. No matter. Here is the coin I promised for the essences. May your thirst for knowledge know no bounderies.")
Dialog.AddVoiceover("voiceover/english/scholar_obidudyn/qey_village02/scholarobidudyn002.mp3", 139374477, 106530516)
Dialog.AddOption("Glad to be of assistance.")
Dialog.AddOption("Thanks... I think?")
Dialog.Start()
end