mirror of
https://bitbucket.org/Ioncannon/project-meteor-server.git
synced 2025-06-09 05:54:50 +02:00
- man0g0 - Majority of the work ported from the old quest system. Still polish to be had and fringe cases to deal with (especially relogging)
- man0g1 - Initial privateArea mostly scripted. - SimpleContent30010 - Fixed Yda/Papalymo Id being backwards, added Active states to match retail - QuestDirectorMan0g001- Updated to play itself out (this is a mess to wrap my head around). Mostly sorta kinda working on both DoW & DoM tutorials. End cutscene on DoW not firing currently, will fix later.
This commit is contained in:
CuriousJorge
parent
682ddd9cae
commit
a87244d13b
5 changed files with 582 additions and 164 deletions
|
|
@ -1,3 +1,312 @@
|
|||
--Quest Flags
|
||||
MAN0L0_FLAG_STARTED_TALK_TUT = 0;
|
||||
MAN0G0_FLAG_MINITUT_DONE1 = 1;
|
||||
require("global");
|
||||
|
||||
--[[
|
||||
|
||||
Quest Script
|
||||
|
||||
Name: Sundered Skies
|
||||
Code: Man0g0
|
||||
Id: 110005
|
||||
Prereq: None (Given on chara creation)
|
||||
Notes:
|
||||
|
||||
|
||||
]]
|
||||
|
||||
--[[
|
||||
SEQS
|
||||
[@IF($E4($E8(1),0),
|
||||
[@SHEET(xtx/journalxtxFst,177,1)]
|
||||
,)]
|
||||
[@IF($E4($E8(1),5),
|
||||
[@SHEET(xtx/journalxtxFst,178,1)]
|
||||
,)]
|
||||
[@IF($E4($E8(1),10),
|
||||
[@SHEET(xtx/journalxtxFst,179,1)]
|
||||
,)]
|
||||
|
||||
|
||||
qItem
|
||||
[@IF($E0($E8(1),10),
|
||||
[@SHEET(xtx/itemName,11000088,5)][@CR]
|
||||
,)]
|
||||
--]]
|
||||
|
||||
|
||||
|
||||
-- Sequence Numbers
|
||||
SEQ_000 = 0; -- Intro with Yda & Papalymo
|
||||
SEQ_005 = 5; -- Combat tutorial
|
||||
SEQ_010 = 10; -- Gridania section
|
||||
|
||||
-- Actor Class Ids
|
||||
YDA = 1000009;
|
||||
PAPALYMO = 1000010;
|
||||
|
||||
FARRIMOND = 1000017;
|
||||
CECILIA = 1000683;
|
||||
SWETHYNA = 1000680;
|
||||
TKEBBE = 1000876;
|
||||
LONSYGG = 1000951;
|
||||
GUILD_ENTRANCE = 1099046;
|
||||
BLOCKER1 = 1099047;
|
||||
|
||||
-- Non-interactive NPCs
|
||||
|
||||
GUILD_ANENE = 1000427;
|
||||
GUILD_SYLBERT = 1000428; -- No source
|
||||
GUILD_HONGA_VUNGA = 1000429;
|
||||
GUILD_NONCO_MENANCO = 1000430;
|
||||
GUILD_LTANDHAA = 1000431;
|
||||
GUILD_POFUFU = 1000432;
|
||||
GUILD_ODILIE = 1000434; -- No source
|
||||
GUILD_BASEWIN = 1000435; -- No source
|
||||
GUILD_SEIKFRAE = 1000436; -- No source
|
||||
GUILD_EDASSHYM = 1000437;
|
||||
GUILD_TIERNEY = 1000456;
|
||||
GUILD_GONTRANT = 1000457;
|
||||
GUILD_VKOROLON = 1000458;
|
||||
GUILD_EMONI = 1001183;
|
||||
GUILD_GYLES = 1001184;
|
||||
GUILD_PENELOPE = 1700001; -- No source
|
||||
|
||||
|
||||
|
||||
|
||||
-- PrivateAreaMasterPast 1
|
||||
|
||||
-- Quest Markers
|
||||
MRKR_LONSYGG = 11000501; -- Obsolete. Pre-1.19 location for this npc
|
||||
MRKR_YDA = 11000502;
|
||||
MRKR_PAPALYMO = 11000503;
|
||||
MRKR_GUILD = 11000504;
|
||||
|
||||
-- Quest Flags
|
||||
FLAG_SEQ000_MINITUT0 = 0; -- Talked to YDA
|
||||
FLAG_SEQ000_MINITUT1 = 1; -- Talked to PAPALYMO
|
||||
FLAG_SEQ000_MINITUT2 = 2; -- Talked to YDA again
|
||||
|
||||
FLAG_SEQ010_TKEBBE = 0; -- Talked to T'kebbe (optional)
|
||||
|
||||
|
||||
|
||||
|
||||
--[[
|
||||
processEvent000_0
|
||||
processEvent000_1
|
||||
processEvent000_2
|
||||
processEvent000_3
|
||||
processEvent000_4
|
||||
processEvent010_1
|
||||
processEvent020_1
|
||||
processEvent020_2
|
||||
processEvent020_3
|
||||
processEvent020_4
|
||||
processEvent020_5
|
||||
processEvent020_6
|
||||
processTtrNomal001withHQ -- Intro CS
|
||||
processTtrNomal001
|
||||
processTtrNomal002(arg1)
|
||||
processTtrNomal003(arg1)
|
||||
processTtrMini001 -- Unused
|
||||
processTtrMini002 -- Unused
|
||||
processTtrMini003
|
||||
processTtrAfterBtl001
|
||||
processTtrBtl001(arg1)
|
||||
processTtrBtlMagic001(arg1)
|
||||
processTtrBtl002(arg1)
|
||||
processTtrBtl003
|
||||
processTtrBlkNml001 - Aims at 1600102 Lonsygg
|
||||
processTtrBlkNml002
|
||||
processTtrBtl004
|
||||
processInformDialogAsQuest
|
||||
--]]
|
||||
|
||||
|
||||
|
||||
|
||||
function onStart(player, quest)
|
||||
quest:StartSequence(SEQ_000);
|
||||
end
|
||||
|
||||
function onFinish(player, quest)
|
||||
end
|
||||
|
||||
function onStateChange(player, quest, sequence)
|
||||
|
||||
if (sequence == SEQ_000) then
|
||||
-- Setup states incase we loaded in.
|
||||
local data = quest:GetData();
|
||||
|
||||
local ydaCanPush = (not data:GetFlag(FLAG_SEQ000_MINITUT0));
|
||||
local ydaFlag = QFLAG_PLATE;
|
||||
|
||||
if (not data:GetFlag(FLAG_SEQ000_MINITUT0)) or (data:GetFlag(FLAG_SEQ000_MINITUT1)) then
|
||||
ydaFlag = QFLAG_PLATE;
|
||||
else
|
||||
ydaFlag = QFLAG_NONE;
|
||||
end
|
||||
|
||||
local papalymoFlag = ((not data:GetFlag(FLAG_SEQ000_MINITUT1)) and data:GetFlag(FLAG_SEQ000_MINITUT0) and QFLAG_PLATE or QFLAG_NONE);
|
||||
|
||||
--SetENpc(classId, byte flagType=0,isTalkEnabled, isPushEnabled, isEmoteEnabled, isSpawned)
|
||||
quest:SetENpc(YDA, ydaFlag, true, ydaCanPush);
|
||||
quest:SetENpc(PAPALYMO, papalymoFlag);
|
||||
|
||||
|
||||
elseif (sequence == SEQ_010) then
|
||||
local data = quest:GetData();
|
||||
|
||||
local tkebbeTalk = (not data:GetFlag(FLAG_SEQ010_TKEBBE) and QFLAG_PLATE or QFLAG_NONE);
|
||||
|
||||
quest:SetENpc(FARRIMOND);
|
||||
quest:SetENpc(CECILIA);
|
||||
quest:SetENpc(SWETHYNA);
|
||||
quest:SetENpc(TKEBBE, tkebbeTalk);
|
||||
quest:SetENpc(LONSYGG);
|
||||
quest:SetENpc(BLOCKER1, QFLAG_NONE, false, true);
|
||||
quest:setENpc(GUILD_ENTRANCE, QFLAG_MAP, false, true);
|
||||
|
||||
|
||||
|
||||
end
|
||||
end
|
||||
|
||||
|
||||
function onTalk(player, quest, npc)
|
||||
local sequence = quest:getSequence();
|
||||
local classId = npc:GetActorClassId();
|
||||
|
||||
if (sequence == SEQ_000) then
|
||||
seq000_onTalk(player, quest, npc, classId);
|
||||
elseif (sequence == SEQ_010) then
|
||||
seq010_onTalk(player, quest, npc, classId);
|
||||
end
|
||||
quest:UpdateENPCs();
|
||||
end
|
||||
|
||||
|
||||
|
||||
function onPush(player, quest, npc)
|
||||
local sequence = quest:getSequence();
|
||||
local classId = npc:GetActorClassId();
|
||||
local data = quest:GetData();
|
||||
|
||||
if (sequence == SEQ_000) then
|
||||
if (classId == YDA) then
|
||||
callClientFunction(player, "delegateEvent", player, quest, "processTtrNomal002");
|
||||
player:EndEvent();
|
||||
end
|
||||
elseif (sequence == SEQ_010) then
|
||||
if (classId == BLOCKER1) then
|
||||
callClientFunction(player, "delegateEvent", player, quest, "processTtrBlkNml001");
|
||||
GetWorldManager():DoPlayerMoveInZone(player, 109.966, 7.559, -1206.117, -2.7916, 0x11)
|
||||
player:EndEvent();
|
||||
elseif (classId == GUILD_ENTRANCE) then
|
||||
player:ReplaceQuest(quest, "Man0g1")
|
||||
return;
|
||||
end
|
||||
end
|
||||
quest:UpdateENPCs();
|
||||
end
|
||||
|
||||
function onNotice(player, quest, target)
|
||||
callClientFunction(player, "delegateEvent", player, quest, "processTtrNomal001withHQ");
|
||||
|
||||
--callClientFunction(player, "delegateEvent", player, quest, "processTtrNomal001"); -- On relog pre-combat
|
||||
--callClientFunction(player, "delegateEvent", player, quest, "processTtrAfterBtl001"); -- On relog post-combat
|
||||
player:EndEvent();
|
||||
quest:UpdateENPCs();
|
||||
end
|
||||
|
||||
function seq000_onTalk(player, quest, npc, classId)
|
||||
local data = quest:GetData();
|
||||
if (classId == YDA) then
|
||||
|
||||
if (not data:GetFlag(FLAG_SEQ000_MINITUT0)) then -- If Talk tutorial
|
||||
callClientFunction(player, "delegateEvent", player, quest, "processTtrNomal003");
|
||||
data:SetFlag(FLAG_SEQ000_MINITUT0); -- Disable Yda's PushEvent and set up Papalymo
|
||||
elseif (data:GetFlag(FLAG_SEQ000_MINITUT1)) then -- If Talked to after Papaylmo
|
||||
doContentArea(player, quest, npc); -- Set up Combat Tutorial
|
||||
else
|
||||
callClientFunction(player, "delegateEvent", player, quest, "processEvent000_3");
|
||||
end
|
||||
|
||||
elseif (classId == PAPALYMO) then
|
||||
if (data:GetFlag(FLAG_SEQ000_MINITUT0)) then
|
||||
callClientFunction(player, "delegateEvent", player, quest, "processEvent000_2");
|
||||
data:SetFlag(FLAG_SEQ000_MINITUT1);
|
||||
else
|
||||
callClientFunction(player, "delegateEvent", player, quest, "processEvent000_2");
|
||||
end
|
||||
end
|
||||
|
||||
player:EndEvent();
|
||||
end
|
||||
|
||||
function seq010_onTalk(player, quest, npc, classId)
|
||||
local data = quest:GetData();
|
||||
|
||||
if (classId == SWETHYNA) then
|
||||
callClientFunction(player, "delegateEvent", player, quest, "processEvent020_2");
|
||||
elseif (classId == CECILIA) then
|
||||
callClientFunction(player, "delegateEvent", player, quest, "processEvent020_3");
|
||||
elseif (classId == FARRIMOND) then
|
||||
callClientFunction(player, "delegateEvent", player, quest, "processEvent020_4");
|
||||
elseif (classId == TKEBBE) then
|
||||
callClientFunction(player, "delegateEvent", player, quest, "processEvent020_5");
|
||||
data:SetFlag(FLAG_SEQ010_TKEBBE);
|
||||
elseif (classId == LONSYGG) then
|
||||
callClientFunction(player, "delegateEvent", player, quest, "processEvent020_6");
|
||||
end
|
||||
|
||||
player:EndEvent();
|
||||
end
|
||||
|
||||
|
||||
function getJournalMapMarkerList(player, quest)
|
||||
local sequence = quest:getSequence();
|
||||
local possibleMarkers = {};
|
||||
local data = quest:GetData();
|
||||
|
||||
if (sequence == SEQ_000) then
|
||||
|
||||
if (not data:GetFlag(FLAG_SEQ000_MINITUT0)) or (data:GetFlag(FLAG_SEQ000_MINITUT1)) then
|
||||
table.insert(possibleMarkers, MRKR_YDA);
|
||||
end
|
||||
|
||||
if (data:GetFlag(FLAG_SEQ000_MINITUT0)) and (not data:GetFlag(FLAG_SEQ000_MINITUT1)) then
|
||||
table.insert(possibleMarkers, MRKR_PAPALYMO);
|
||||
end
|
||||
|
||||
elseif (sequence == SEQ_010) then
|
||||
table.insert(possibleMarkers, MRKR_GUILD);
|
||||
end
|
||||
|
||||
return unpack(possibleMarkers)
|
||||
end
|
||||
|
||||
|
||||
|
||||
|
||||
function doContentArea(player, quest, npc)
|
||||
quest:GetData():ClearData();
|
||||
quest:StartSequence(SEQ_005);
|
||||
contentArea = player.CurrentArea:CreateContentArea(player, "/Area/PrivateArea/Content/PrivateAreaMasterSimpleContent", "man0g01", "SimpleContent30010", "Quest/QuestDirectorMan0g001");
|
||||
|
||||
if (contentArea == nil) then
|
||||
return;
|
||||
end
|
||||
|
||||
director = contentArea:GetContentDirector();
|
||||
player:AddDirector(director);
|
||||
director:StartDirector(false);
|
||||
|
||||
player:KickEvent(director, "noticeEvent", true);
|
||||
player:SetLoginDirector(director);
|
||||
|
||||
GetWorldManager():DoZoneChangeContent(player, contentArea, 362.4087, 4, -703.8168, 1.5419, 16);
|
||||
return;
|
||||
end
|
||||
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue