1 files changed, 36 insertions, 0 deletions

diff --git a/npc/012-4/wyara.txt b/npc/012-4/wyara.txt
index 822ae07a8..f7afcf2ed 100644
--- a/npc/012-4/wyara.txt
+++ b/npc/012-4/wyara.txt
@@ -23,6 +23,7 @@ L_Menu:
     select
         l("Can you reset my stats please?"),
         rif($ARKIM_ST >= 1200,l("I want Piberries Infusion!")),
+        rif(getq(HurnscaldQuest_InjuriedMouboo) == 2,l("Do you know how to break curses?")),
         lg("You are weird, I have to go sorry.");
 
     mes "";
@@ -32,6 +33,8 @@ L_Menu:
         case 2:
             goto L_Piberries;
         case 3:
+            goto L_Uncurse;
+        case 4:
             goto L_Quit;
     }
 
@@ -106,6 +109,39 @@ L_Piberries:
     getexp 10, 0;
     goto L_Piberries;
 
+L_Uncurse:
+    mesn;
+    mesq l("Well, it depends on the curse. Some are easy to break, and others are... well...");
+    next;
+    select
+        l("It's a simple curse."),
+        l("It's a complex curse."),
+        l("It's a cursed mouboo.");
+    mes "";
+    mesn;
+    switch (@menu) {
+        case 1:
+            mesq l("Then you should look in buying Caffeinne. Curse is a status ailment which reduces your attack, nullifies your luck and makes you a snail. Simple Curses can be cured with time, too.");
+            break;
+        case 2:
+            mesq l("Oh, then you should seek the help of an specialist. These curses have an specific condition to break, like leveling up or being killed. Force-breaking them can be difficult.");
+            break;
+        case 3:
+            mesq l("A... Mouboo? Well, I know who can handle curses on cute Mouboos.");
+            next;
+            mesn;
+            mesq l("Go talk to Sagratha, she is usually in a hut in northen forest. The door have a magic barrier, so you'll need to have minimal magic skills to get close enough to open it.");
+            next;
+            mesn;
+            mesq l("She doesn't likes @@s, only cute animals. She doesn't likes Ghosts, Undeads, and Shadow monsters either.", get_race());
+            next;
+            mesn;
+            mesq l("So, when you get on the door, knock it, and say this: \"@@\". She will open the door for you.", l("Mouboos are cute"));
+            compareandsetq HurnscaldQuest_Sagratha, 0, 1;
+            break;
+    }
+    close;
+
 L_Quit:
     goodbye;
     close;