From d25606446fe111634ccec1530d6fca182cd24f6c Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Fri, 24 May 2024 22:24:43 -0300
Subject: Cat Ears Quest by Manatauro (+ misc notes)

---
 npc/010-4-1/katze.txt   | 50 +++++++++++++++++++++++++++++++++++++++++--------
 npc/017-1/inspector.txt |  4 ++++
 npc/functions/util.txt  |  4 ++--
 3 files changed, 48 insertions(+), 10 deletions(-)

diff --git a/npc/010-4-1/katze.txt b/npc/010-4-1/katze.txt
index 05012ac94..16ffde820 100644
--- a/npc/010-4-1/katze.txt
+++ b/npc/010-4-1/katze.txt
@@ -9,9 +9,13 @@
 
 010-4-1,44,30,0	script	Katze	NPC_KATZE,{
     mesn;
-    mesq l("Meow.");
+    if (isequipped(CatEars))
+        mesq l("Meow, fellow cat!");
+    else
+        mesq l("Meow.");
     next;
     if (getq(LoFQuest_Inspector) == 5) goto L_InspectorQuest;
+    if (getq(LoFQuest_Inspector) >= 6 && getq(CaveQuest_Katze) == 1) goto L_CatEars;
     mesn strcharinfo(0);
     mesq l("What is a cat doing in the middle of the desert?");
     next;
@@ -64,13 +68,43 @@ L_InspectorQuest:
     getexp 60000, 600;
     close;
 
-    // No Cat Ears regardless of whatever you donate, no "lets play" like TMW Classic
-    // Inspector Quest: You can ask her, she'll signal the pot, and THEN you start
-    // giving Katze the items for the cat ears.
-    // She'll, however, reward you with the information you're looking for.
-    // After instructing her on how to trade, she'll reward you a Golden Apple
-    // You can come back to Inspector to begin the second part.
-    // Use Fairy Hat instead of Inspector Hat?
+L_CatEars:
+    mesn;
+    mesq l("Actually, while we're friends, you don't look like a cat, which is weird. I guess we should fix that.");
+    next;
+    mesn;
+    mesq l("Please bring me the following, and I'll make a fine cat out of you!");
+    next;
+    mesc b(l(".:: Katze's Request ::.")), 3;
+    msObjective(countitem(WhiteFur) >= 250, l("* %d %s", 250, getitemlink(WhiteFur)));
+    msObjective(countitem(Milk)     >= 200, l("* %d %s", 200, getitemlink(Milk)));
+    msObjective(countitem(DuckFeather) >= 150, l("* %d %s", 150, getitemlink(DuckFeather)));
+    msObjective(countitem(RawLog)   >= 50, l("* %d %s", 50, getitemlink(RawLog)));
+    msObjective(countitem(BlackDye) >= 1,  l("* %d %s", 1, getitemlink(BlackDye)));
+    if (countitem(WhiteFur)     < 250 ||
+        countitem(Milk)         < 200 ||
+        countitem(DuckFeather)  < 150 ||
+        countitem(RawLog)       <  50 ||
+        countitem(BlackDye)     <   1)
+        close;
+    mesc l("Deliver the items to Katze?"), 1;
+    if (askyesno() == ASK_NO) { closeclientdialog; close; }
+    inventoryplace CatEars, 1;
+    delitem WhiteFur, 250;
+    delitem Milk, 200;
+    delitem DuckFeather, 150;
+    delitem RawLog, 50;
+    delitem BlackDye, 1;
+    getitem CatEars, 1;
+    getexp 92000, 8000;
+    setq1 CaveQuest_Katze, 2;
+    mesn;
+    mesq l("Purrfect! Now wear this %s and... Vóila! You look like me, meow!", getitemlink(CatEars));
+    next;
+    mesn;
+    mesq l("Come visit me whenever, meow!");
+    // TODO: Unlock access to Katze's Village
+    close;
 
 // At some times, she goes to rob the bank... No, just kidding, but she has errands
 OnClock1945:
diff --git a/npc/017-1/inspector.txt b/npc/017-1/inspector.txt
index d6a66880d..54e58b6f3 100644
--- a/npc/017-1/inspector.txt
+++ b/npc/017-1/inspector.txt
@@ -8,6 +8,8 @@
 
 017-1,77,104,0	script	Anselmo	NPC_ANSELMO_BR,{
     .@q = getq(LoFQuest_Inspector);
+    // TODO: Require orange pants like originally planned?
+    //if (getequipcardid(EQI_HEAD_TOP, 0) == GreenDye)
     mesn;
     mesq l("Hello. My name is Anselmo and I'm investigating a recent string of robberies.");
     next;
@@ -178,6 +180,8 @@ L_Arc4:
     mesc l("The inspector looks at you with a pale face.");
     mesq l("It's terrible... How could this happen?");
     next;
+    // You can come back to Inspector to begin the second part.
+    // Use Fairy Hat instead of Inspector Hat?
     mes "";
     mesc l("@@ You need to wait further releases to continue this quest!", b(l("WARNING:"))), 1;
     next;
diff --git a/npc/functions/util.txt b/npc/functions/util.txt
index 2a6cde446..3a875f560 100644
--- a/npc/functions/util.txt
+++ b/npc/functions/util.txt
@@ -483,8 +483,8 @@ function	script	reputation	{
         if (getq(HalinarzoQuest_Speed) >= 1)
             .@nr=.@nr+1;
 
-        // Katze Quest (TODO)
-        if (getq(CaveQuest_Katze) >= 1)
+        // Katze Quest (+1 rep)
+        if (getq(CaveQuest_Katze) >= 2)
             .@nr=.@nr+1;
 
         // HALINARZO Magical Forumula
-- 
cgit v1.2.3-70-g09d2