Hildibrand series of quests all in. Requires inn dream handling and some retail accuracy double-checking to finish it off. Misc script fixes also.

=============================== Nudgenpc.lua - Added a command variation Testmapobj.lua - Added !help documentation DftWil.lua - Corrected an npc name/function Player.cs - Changed Dalamud packet to default to 7, not 0. Fixes the moon not displaying in a specific Hildibrand cutscene Etc5g0.lua - Made quest accepting retail-accurate with how it displayed messages/ended the TalkEvent Etc5g1.lua - Added Bed !. Kinda kludged in atm since it's a pre-accepted quest state. Etc5u1.lua - Same as above Etc5l1.lua - Quest "Private Eyes" scripted. Etc5l2.lua - Quest "Mysteries of the Red Moon" scripted Etc5l3.lua - Quest "Prophecy Inspection" scripted
2025-06-09 05:54:50 +02:00 · 2022-04-13 11:45:49 -04:00 · 2022-04-13 11:45:49 -04:00 · a7b1b79461
commit a7b1b79461
parent 01d05b5cee
10 changed files with 583 additions and 15 deletions
--- a/Data/scripts/quests/etc/etc5l2.lua
+++ b/Data/scripts/quests/etc/etc5l2.lua
@ -0,0 +1,140 @@
+require("global");
+
+--[[
+
+Quest Script
+
+Name:   Mysteries of the Red Moon
+Code:   Etc5l2
+Id:     110840
+Prereq: Level 20.  Man5l1 (Private Eyes) complete.  [110839]
+Notes: 
+
+]]
+
+-- Sequence Numbers
+SEQ_000 = 0;  -- Investigate the room.
+SEQ_005 = 5;  -- Head to the Arrzaneth Ossuary
+
+-- Actor Class Ids
+KOPURU_FUPURU           = 1002047;
+BOOK                    = 1200412;
+INN_EXIT                = 1090089;
+CUTSCENE_PUSH_TRIGGER   = 1090253; -- Already had from capture
+
+-- Quest Markers
+MRKR_KOPURU_FUPURU      = 11072201;
+MRKR_BOOK               = 11072202;
+MRKR_CUTSCENE           = 11072203;
+
+-- Quest Item
+ITEM_HIDLIBRAND_DOSSIER = 10011252;
+
+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(KOPURU_FUPURU, QFLAG_NORM);
+    elseif (sequence == SEQ_000) then
+        quest:SetENpc(KOPURU_FUPURU, QFLAG_NORM);
+        quest:SetENpc(BOOK, QFLAG_NORM);
+        quest:SetENpc(INN_EXIT, QFLAG_MAP, false, true, false, true);
+    elseif (sequence == SEQ_005) then
+        quest:SetENpc(BOOK);
+        quest:SetENpc(KOPURU_FUPURU);
+        quest:SetENpc(INN_EXIT, QFLAG_MAP, false, true, false, true);
+        quest:SetENpc(CUTSCENE_PUSH_TRIGGER, QFLAG_MAP,false, true, false, true);
+    end
+end
+
+function onTalk(player, quest, npc)
+    local sequence = quest:getSequence();
+    local classId = npc:GetActorClassId();
+
+    -- Offer the quest
+    if (classId == KOPURU_FUPURU and sequence == SEQ_ACCEPT) then
+        local questAccepted = callClientFunction(player, "delegateEvent", player, quest, "processEventStart");
+		if (questAccepted == 1) then
+			player:AcceptQuest(quest);
+		end
+		player:EndEvent();
+		return;	        
+    -- Quest Progress        
+    elseif (sequence == SEQ_000) then
+        if (classId == KOPURU_FUPURU) then
+            callClientFunction(player, "delegateEvent", player, quest, "processEvent000_KOPURU");
+            GetWorldManager():DoZoneChange(player, 181, "PrivateAreaMasterPast", 5, 15, 0,0,0, player.rotation);
+        elseif (classId == BOOK) then
+            callClientFunction(player, "delegateEvent", player, quest, "processEvent000");
+            quest:UpdateENPCs(); -- Band-aid for a QFLAG_NORM issue
+            quest:StartSequence(SEQ_005);
+        end
+    elseif (sequence == SEQ_005) then
+       if (classId == KOPURU_FUPURU) then
+            callClientFunction(player, "delegateEvent", player, quest, "processEvent000_KOPURU");
+            GetWorldManager():DoZoneChange(player, 181, "PrivateAreaMasterPast", 5, 15, 0,0,0, player.rotation);
+        elseif (classId == BOOK) then
+            callClientFunction(player, "delegateEvent", player, quest, "processEvent000_BOOK");
+        end        
+    end
+    
+    player:EndEvent()
+	quest:UpdateENPCs();
+end
+
+
+
+function onPush(player, quest, npc)
+	local classId = npc.GetActorClassId();
+	
+    
+    if (classId == INN_EXIT) then
+        choice = callClientFunction(player, "delegateEvent", player, quest, "processEventExit");
+        if (choice == 1) then
+          player:EndEvent();
+          GetWorldManager():DoZoneChange(player, 209, "", 0, 15, -104.296, 203, 162.257, -0.4);
+        end
+    -- Quest Complete
+    elseif (classId == CUTSCENE_PUSH_TRIGGER) then
+        callClientFunction(player, "delegateEvent", player, quest, "processEvent005_NQ"); 
+        --TO-DO: Get the scaled EXP for this sqrwa figured out
+        callClientFunction(player, "delegateEvent", player, quest, "sqrwa", 1000, 1, 1, 9);
+        
+        player:SendGameMessage(player, GetWorldMaster(), 51149, MESSAGE_TYPE_SYSTEM, ITEM_HIDLIBRAND_DOSSIER);
+        local itemCheck = giveWantedItem(player);
+        if (itemCheck == true) then
+            player:CompleteQuest(quest);
+        end
+    end
+    player:EndEvent();
+end
+
+
+function getJournalMapMarkerList(player, quest)
+    local sequence = quest:getSequence();
+
+    if (sequence == SEQ_000) then  
+        return MRKR_KOPURU_FUPURU;
+        -- TO-DO: Check for private area and use MRKR_BOOK in place of this
+    elseif (sequence == SEQ_005) then
+        return MRKR_CUTSCENE;
+    end
+end
+
+
+function giveWantedItem(player)
+
+    local invCheck = player:getItemPackage(INVENTORY_NORMAL):addItem(ITEM_HIDLIBRAND_DOSSIER, 1, 1);
+            
+    if (invCheck == INV_ERROR_SUCCESS) then
+        player:SendGameMessage(player, GetWorldMaster(), 25246, MESSAGE_TYPE_SYSTEM_ERROR, ITEM_HIDLIBRAND_DOSSIER, 1);
+        return true;
+    end
+end