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.

2025-05-20 08:26:59 -04:00 · 2022-04-02 11:52:32 -04:00
parent 938cca0298
commit 6bbe272d48
35 changed files with 2171 additions and 182 deletions
--- a/Data/scripts/quests/etc/etc2i0.lua
+++ b/Data/scripts/quests/etc/etc2i0.lua
@@ -0,0 +1,99 @@
+require ("global")
+
+--[[
+
+Quest Script
+
+Name: 	Counting Sheep
+Code: 	Etc2i0
+Id: 	110706
+Prereq: Level 25, Any DoW/DoM
+
+]]
+
+-- Sequence Numbers
+SEQ_000	= 0;  -- Kill Dreadwolves.
+SEQ_001	= 1;  -- Talk to Patrick.
+
+-- Actor Class Ids
+ENPC_PATRICK 		= 1001358;
+BNPC_DREADWOLVES	= 2101403;
+
+-- Quest Markers
+MRKR_WOLF_AREA		= 11101901;
+MRKR_PATRICK		= 11101902;
+
+-- Counters
+COUNTER_KILLS		= 0;
+
+-- Quest Details
+OBJECTIVE_AMOUNT	= 4;
+
+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_PATRICK, QFLAG_PLATE);
+	elseif (sequence == SEQ_000) then
+        quest:SetENpc(ENPC_PATRICK);
+		quest:SetENpc(BNPC_DREADWOLVES);
+	elseif (sequence == SEQ_001) then
+		quest:SetENpc(ENPC_PATRICK, QFLAG_REWARD);
+	end	
+end
+
+function onTalk(player, quest, npc, eventName)
+	local npcClassId = npc.GetActorClassId();
+	local seq = quest:GetSequence();
+    
+	-- Offer the quest
+	if (npcClassId == ENPC_PATRICK and seq == SEQ_ACCEPT) then
+		local questAccepted = callClientFunction(player, "delegateEvent", player, quest, "processEventPatrickStart");
+		if (questAccepted == 1) then
+			player:AcceptQuest(quest);
+		end
+		player:EndEvent();
+		return;	
+	-- Quest Progress
+	elseif (seq == SEQ_000) then
+        if (npcClassId == ENPC_PATRICK) then
+            callClientFunction(player, "delegateEvent", player, quest, "processEvent000");
+		end
+	--Quest Complete
+	elseif (seq == SEQ_001) then
+		if (npcClassId == ENPC_PATRICK) 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_DREADWOLVES) then
+		local counterAmount = quest:GetData():IncCounter(COUNTER_KILLS);
+		attentionMessage(player, 50041, 3101403, counterAmount, OBJECTIVE_AMOUNT); -- The <dispName> has been defeated. (X of Y)
+        if (counterAmount >= OBJECTIVE_AMOUNT) then
+			attentionMessage(player, 25225, quest:GetQuestId()); -- Objectives complete!
+			quest:StartSequence(SEQ_001);
+		end
+	end
+end
+
+function getJournalMapMarkerList(player, quest)
+    local sequence = quest:getSequence();
+    
+    if (sequence == SEQ_000) then
+		return MRKR_WOLF_AREA;
+    elseif (sequence == SEQ_001) then
+        return MRKR_PATRICK;
+    end
+end