zydronium/project-meteor-server
1
0
Fork 0
mirror of https://bitbucket.org/Ioncannon/project-meteor-server.git synced 2025-06-10 14:34:32 +02:00
Code Issues Projects Releases Packages Wiki Activity

Added a buttload of side quests. This should mean all talky quests and 'kill x things' quests are done. Also updated the attention messages as they were using the wrong one for getting items or killing mobs. Fixed some journal issues on various quests as well.

Browse source
This commit is contained in:
Filip Maj 2022-04-02 11:52:32 -04:00
parent 938cca0298
commit 6bbe272d48
35 changed files with 2171 additions and 182 deletions
Download patch file Download diff file Expand all files Collapse all files

104
Data/scripts/quests/etc/etc2u2.lua Normal file
View file

@ -0,0 +1,104 @@
require ("global")
--[[
Quest Script
Name: Ore for an Ore
Code: Etc2u2
Id: 110687
Prereq: Level 28, Any DoW/DoM
]]
-- Sequence Numbers
SEQ_000 = 0; -- Kill Iron Coblyns.
SEQ_005 = 5; -- Talk to Pahja Zhwan.
-- Actor Class Ids
ENPC_PAHJA_ZHWAN = 1001840;
BNPC_IRON_COBLYN = 2102105;
-- Quest Markers
MRKR_COBLYN_AREA = 11068701;
MRKR_PAHJA_ZHWAN = 11068702;
-- Counters
COUNTER_QUESTITEM = 0;
-- Quest Details
OBJECTIVE_ITEMID = 11000226;
OBJECTIVE_AMOUNT = 10;
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(ENPC_PAHJA_ZHWAN, QFLAG_PLATE);
elseif (sequence == SEQ_000) then
quest:SetENpc(ENPC_PAHJA_ZHWAN);
quest:SetENpc(BNPC_IRON_COBLYN);
elseif (sequence == SEQ_005) then
quest:SetENpc(ENPC_PAHJA_ZHWAN, QFLAG_REWARD);
end
end
function onTalk(player, quest, npc, eventName)
local npcClassId = npc.GetActorClassId();
local seq = quest:GetSequence();
-- Offer the quest
if (npcClassId == ENPC_PAHJA_ZHWAN and seq == SEQ_ACCEPT) then
local questAccepted = callClientFunction(player, "delegateEvent", player, quest, "processEventPAHJAZHWANStart");
if (questAccepted == 1) then
player:AcceptQuest(quest);
end
player:EndEvent();
return;
-- Quest Progress
elseif (seq == SEQ_000) then
if (npcClassId == ENPC_PAHJA_ZHWAN) then
callClientFunction(player, "delegateEvent", player, quest, "processEvent000");
end
--Quest Complete
elseif (seq == SEQ_005) then
if (npcClassId == ENPC_PAHJA_ZHWAN) then
callClientFunction(player, "delegateEvent", player, quest, "processEvent010");
callClientFunction(player, "delegateEvent", player, quest, "sqrwa", 200, 1, 1, 9);
player:CompleteQuest(quest);
end
end
quest:UpdateENPCs();
player:EndEvent();
end
function onKillBNpc(player, quest, bnpc)
if (quest:GetSequence() == SEQ_000 and bnpc == BNPC_IRON_COBLYN) then
local counterAmount = quest:GetData():IncCounter(COUNTER_QUESTITEM);
attentionMessage(player, 25226, OBJECTIVE_ITEMID, 1, counterAmount, OBJECTIVE_AMOUNT); -- You obtain <item> (X of Y)
if (counterAmount >= OBJECTIVE_AMOUNT) then
attentionMessage(player, 25225, quest:GetQuestId()); -- Objectives complete!
quest:StartSequence(SEQ_005);
end
end
end
function getJournalInformation(player, quest)
return quest:GetData():GetCounter(COUNTER_QUESTITEM);
end
function getJournalMapMarkerList(player, quest)
local sequence = quest:getSequence();
if (sequence == SEQ_000) then
return MRKR_COBLYN_AREA;
elseif (sequence == SEQ_005) then
return MRKR_PAHJA_ZHWAN;
end
end