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.

Data/scripts/quests/etc/etc1g8.lua

@@ -0,0 +1,120 @@
+require ("global")
+
+--[[
+
+Quest Script
+
+Name: 	Say it with Wolf Tails
+Code: 	Etc1g8
+Id: 	110662
+Prereq: Level 30, Any DoW/DoM, Etc1l7 complete
+
+]]
+
+-- Sequence Numbers
+SEQ_000	= 0;  -- Kill Gnawing Gnats.
+SEQ_001	= 1;  -- Talk to Francis.
+SEQ_002	= 2;  -- Talk to Imania.
+
+-- Actor Class Ids
+ENPC_FRANCIS 		= 1000566;
+ENPC_IMANIA 		= 1001567;
+BNPC_GNAWING_GNATS	= 2100609;
+
+-- Quest Markers
+MRKR_FRANCIS		= 11066201;
+MRKR_IMANIA			= 11066202;
+MRKR_GNAT_AREA		= 11066203;
+
+-- Counters
+COUNTER_KILLS		= 0;
+
+-- Quest Details
+QUESTITEM_WOLFTAIL	= 11000152;
+OBJECTIVE_AMOUNT	= 8;
+
+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_FRANCIS, QFLAG_PLATE);
+	elseif (sequence == SEQ_000) then
+        quest:SetENpc(ENPC_FRANCIS);
+		quest:SetENpc(BNPC_GNAWING_GNATS);
+	elseif (sequence == SEQ_001) then
+		quest:SetENpc(ENPC_FRANCIS, QFLAG_PLATE);
+	elseif (sequence == SEQ_002) then
+		quest:SetENpc(ENPC_IMANIA, QFLAG_REWARD);
+        quest:SetENpc(ENPC_FRANCIS);
+	end	
+end
+
+function onTalk(player, quest, npc, eventName)
+	local npcClassId = npc.GetActorClassId();
+	local seq = quest:GetSequence();
+    
+	-- Offer the quest
+	if (npcClassId == ENPC_FRANCIS and seq == SEQ_ACCEPT) then
+		local questAccepted = callClientFunction(player, "delegateEvent", player, quest, "processEventFrancisStart1g8", OBJECTIVE_AMOUNT);
+		if (questAccepted == 1) then
+			player:AcceptQuest(quest);
+		end
+		player:EndEvent();
+		return;	
+	-- Quest Progress
+	elseif (seq == SEQ_000) then
+        if (npcClassId == ENPC_FRANCIS) then
+            callClientFunction(player, "delegateEvent", player, quest, "processEventFrancisFree", 0, OBJECTIVE_AMOUNT);
+		end
+	elseif (seq == SEQ_001) then
+		if (npcClassId == ENPC_FRANCIS) then
+			callClientFunction(player, "delegateEvent", player, quest, "processEventFrancisAfter", 0, OBJECTIVE_AMOUNT);
+			attentionMessage(player, 25246, QUESTITEM_WOLFTAIL, 1); -- You obtain <item>
+			quest:StartSequence(SEQ_002);
+		end
+	--Quest Complete
+	elseif (seq == SEQ_002) then
+		if (npcClassId == ENPC_IMANIA) then
+			callClientFunction(player, "delegateEvent", player, quest, "processEventImania");
+			callClientFunction(player, "delegateEvent", player, quest, "sqrwa", 200, 1, 1, 9);
+            player:CompleteQuest(quest);
+		elseif (npcClassId == ENPC_FRANCIS) then
+			callClientFunction(player, "delegateEvent", player, quest, "processEventFrancisAfterFree", 0, OBJECTIVE_AMOUNT);
+		end
+	end
+	
+	quest:UpdateENPCs();	
+	player:EndEvent();
+end
+
+function onKillBNpc(player, quest, bnpc)
+	if (quest:GetSequence() == SEQ_000 and bnpc == BNPC_GNAWING_GNATS) then
+		local counterAmount = quest:GetData():IncCounter(COUNTER_KILLS);
+		attentionMessage(player, 50041, 3100611, 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 getJournalInformation(player, quest)
+	return quest:GetSequence() == SEQ_002 and 1 or 0, 0, 0, 0, OBJECTIVE_AMOUNT;
+end
+
+function getJournalMapMarkerList(player, quest)
+    local sequence = quest:getSequence();
+    
+    if (sequence == SEQ_000) then
+		return MRKR_GNAT_AREA;
+    elseif (sequence == SEQ_001) then
+        return MRKR_FRANCIS;
+    elseif (sequence == SEQ_002) then
+        return MRKR_IMANIA;
+    end
+end