project-meteor-server/Data/scripts/quests/etc/etc2l3.lua

110 lines
2.7 KiB
Lua

require ("global")
--[[
Quest Script
Name: A Misty Past
Code: Etc2l3
Id: 110646
Prereq: Level 17, Any Class
]]
-- Sequence Numbers
SEQ_000 = 0; -- Talk to the ??? in Shposhae.
SEQ_005 = 5; -- Talk to F'ongho and think about what NM you saw.
SEQ_010 = 10; -- Talk to F'ongho and tell her what it was.
-- Actor Class Ids
QUEST_OBJECTIVE = 1000359;
FONGHO = 1000367;
-- Quest Markers
MRKR_OBJECTIVE = 11064601;
MRKR_FONGHO = 11064602;
-- Quest Misc
RING_ITEMID = 11000228;
function onStart(player, quest)
quest:StartSequence(SEQ_000);
end
function onFinish(player, quest)
end
function onStateChange(player, quest, sequence)
if (sequence == SEQ_ACCEPT) then
quest:SetENpc(FONGHO, QFLAG_PLATE);
end
if (sequence == SEQ_000) then
quest:SetENpc(FONGHO);
quest:SetENpc(QUEST_OBJECTIVE, QFLAG_MAP);
elseif (sequence == SEQ_005) then
quest:SetENpc(QUEST_OBJECTIVE);
quest:SetENpc(FONGHO, QFLAG_PLATE);
elseif (sequence == SEQ_010) then
quest:SetENpc(FONGHO, QFLAG_REWARD);
end
end
function onTalk(player, quest, npc, eventName)
local npcClassId = npc.GetActorClassId();
local seq = quest:GetSequence();
-- Offer the quest
if (npcClassId == FONGHO and not player:HasQuest(quest)) then
local questAccepted = callClientFunction(player, "delegateEvent", player, quest, "processEventFONGHOStart");
if (questAccepted == 1) then
player:AcceptQuest(quest);
end
player:EndEvent();
return;
end
-- Quest Progress
if (seq == SEQ_000) then
if (npcClassId == FONGHO) then
callClientFunction(player, "delegateEvent", player, quest, "processEvent_000");
elseif (npcClassId == QUEST_OBJECTIVE) then
attentionMessage(player, 25246, RING_ITEMID, 1); -- You obtain <item>
quest:StartSequence(SEQ_005);
end
elseif (seq == SEQ_005) then
if (npcClassId == FONGHO) then
callClientFunction(player, "delegateEvent", player, quest, "processEvent_015");
quest:StartSequence(SEQ_010);
end
elseif (seq == SEQ_010) then
--Quest Complete
if (npcClassId == FONGHO) then
local monsterChoice = callClientFunction(player, "delegateEvent", player, quest, "processEvent_020");
if (monsterChoice == 1) then
callClientFunction(player, "delegateEvent", player, quest, "sqrwa", 200, 1, 1, 9);
player:CompleteQuest(quest);
end
end
end
quest:UpdateENPCs();
player:EndEvent();
end
function getJournalInformation(player, quest)
return quest:GetSequence() > SEQ_000 and 1 or 0;
end
function getJournalMapMarkerList(player, quest)
local sequence = quest:getSequence();
if (sequence == SEQ_000) then
return MRKR_OBJECTIVE;
elseif (sequence == SEQ_005) then
return MRKR_FONGHO;
elseif (sequence == SEQ_010) then
return MRKR_FONGHO;
end
end