1 files changed, 36 insertions, 0 deletions
diff --git a/npc/functions/quest-debug/003-ShipQuests_Peter.txt b/npc/functions/quest-debug/003-ShipQuests_Peter.txt
new file mode 100644
index 00000000..4732d238
--- /dev/null
+++ b/npc/functions/quest-debug/003-ShipQuests_Peter.txt
@@ -0,0 +1,36 @@
+// Peter quest debug
+// Author:
+//    gumi
+//    jesusalva
+// Notes:
+//    Using l() usually is not a good idea (translating debug text? What?)
+
+function	script	QuestDebug3	{
+    do
+    {
+        clear;
+        setnpcdialogtitle l("Quest debug");
+        mes "ShipQuests_Peter";
+        mes "---";
+        mes l("Quest state: @@", getq(ShipQuests_Peter));
+        mes l("Killed mob bitmask: @@", getq2(ShipQuests_Peter));
+        mes l("Instance ID: @@", getq3(ShipQuests_Peter));
+        next;
+
+        .@q=getq(ShipQuests_Peter);
+
+        GenericQuestDebug ShipQuests_Peter,
+            l("Does not have the quest"), 0,
+            l("Peter needs help"), 1,
+            l("Toggle Tortuga Bounty"), .@q^2,
+            l("Toggle Ratto Bounty"), .@q^4,
+            l("Toggle Croc Bounty"), .@q^8,
+            l("Quest complete"), 15;
+
+        if (@menuret < 0)
+        {
+            return;
+        }
+
+    } while (1);
+}