The journal update msg shows even when completing quests now. Added Revenge on the Reavers, Till Death Do Us Part, Beryl Overboard, Have You Seen My Son, and Food for Thought.

Data/scripts/quests/etc/etc1l5.lua

@@ -0,0 +1,104 @@
+require ("global")
+
+--[[
+
+Quest Script
+
+Name: 	Till Death Do Us Part
+Code: 	Etc1l5
+Id: 	110638
+Prereq: Level 20, Any DoW/DoM
+
+]]
+
+-- Sequence Numbers
+SEQ_000	= 0;  -- Kill Musk Roselings.
+SEQ_001	= 1;  -- Talk to H'lahono.
+
+-- Actor Class Ids
+ENPC_HLAHONO 		= 1000250;
+BNPC_MUSK_ROSELING	= 2102717;
+
+-- Quest Markers
+MRKR_ROSELING_AREA	= 11063801;
+MRKR_HLAHONO		= 11063802;
+
+-- Counters
+COUNTER_QUESTITEM	= 0;
+
+-- Quest Details
+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_HLAHONO, QFLAG_PLATE);
+	elseif (sequence == SEQ_000) then
+        quest:SetENpc(ENPC_HLAHONO);
+		quest:SetENpc(BNPC_MUSK_ROSELING);
+	elseif (sequence == SEQ_001) then
+		quest:SetENpc(ENPC_HLAHONO, QFLAG_REWARD);
+	end	
+end
+
+function onTalk(player, quest, npc, eventName)
+	local npcClassId = npc.GetActorClassId();
+	local seq = quest:GetSequence();
+    
+	-- Offer the quest
+	if (npcClassId == ENPC_HLAHONO and seq == SEQ_ACCEPT) then
+		local questAccepted = callClientFunction(player, "delegateEvent", player, quest, "processEventLahonoStart");
+		if (questAccepted == 1) then
+			player:AcceptQuest(quest);
+		end
+		player:EndEvent();
+		return;	
+	-- Quest Progress
+	elseif (seq == SEQ_000) then
+        if (npcClassId == ENPC_HLAHONO) then
+            callClientFunction(player, "delegateEvent", player, quest, "processEventFree");
+		end
+	--Quest Complete
+	elseif (seq == SEQ_001) then
+		if (npcClassId == ENPC_HLAHONO) then
+			callClientFunction(player, "delegateEvent", player, quest, "processEventAfter");
+			callClientFunction(player, "delegateEvent", player, quest, "sqrwa", 200, 1, 1, 9);
+            player:CompleteQuest(quest);
+		end
+	end
+	
+	quest:UpdateENPCs();	
+	player:EndEvent();
+end
+
+-- TODO FINISH THIS
+function onKillBNpc(player, quest, bnpc)
+	if (bnpc == BNPC_MUSK_ROSELING) then
+		local counterAmount = quest:GetData():IncCounter(COUNTER_QUESTITEM);
+		attentionMessage(player, 51062, 0, counterAmount, 4); -- You obtain <item>
+        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:GetData():GetCounter(COUNTER_QUESTITEM);
+end
+
+function getJournalMapMarkerList(player, quest)
+    local sequence = quest:getSequence();
+    
+    if (sequence == SEQ_000) then
+		return MRKR_ROSELING_AREA;
+    elseif (sequence == SEQ_001) then
+        return MRKR_HLAHONO;
+    end
+end