Wyara now sells Piberries Infusions, if Arkim released that knowledge.

2 files changed, 34 insertions, 6 deletions

diff --git a/npc/012-4/wyara.txt b/npc/012-4/wyara.txt
index c64df4e6d..24a477c86 100644
--- a/npc/012-4/wyara.txt
+++ b/npc/012-4/wyara.txt
@@ -19,12 +19,16 @@ L_Menu:
 
     select
         l("Can you reset my stats please?"),
+        rif($ARKIM_ST >= 1200,l("I want Piberries Infusion!")),
         lg("You are weird, I have to go sorry.");
 
+    mes "";
     switch (@menu) {
         case 1:
             goto L_ResetStats;
         case 2:
+            goto L_Piberries;
+        case 3:
             goto L_Quit;
     }
 
@@ -47,8 +51,7 @@ L_ConfirmReset:
                 rif(Zeny == 0, l("Oh no, I don't have any money on me right now.")),
                 l("I have to go, sorry.");
 
-            if (@menu > 1)
-            {
+            if (@menu > 1) {
                 goto L_Quit;
             }
 
@@ -61,8 +64,7 @@ L_ConfirmReset:
 
             .@wasSP = StatusPoint;
             resetstatus;
-            if (StatusPoint == .@wasSP)
-            {
+            if (StatusPoint == .@wasSP) {
                 speech S_LAST_NEXT,
                     l("It seems that you have no status points to reset!"),
                     l("But the money you brought was really awesome you know."),
@@ -82,9 +84,27 @@ L_ConfirmReset:
     }
 
 
-L_Quit:
+L_Piberries:
+    mesn;
+    mesq l("For (another) one @@, I'll need 4 @@ and 50 GP.", getitemlink(PiberriesInfusion), getitemlink(Piberries));
+    next;
+    select
+        rif(Zeny >= 50 && countitem(Piberries) >= 4, l("Do it!"),
+        l("Not now, sorry.");
+    if (@menu == 2)
+        goto L_Quit;
 
+    mes "";
+    inventoryplace PiberriesInfusion, 1;
+
+    Zeny=Zeny-50;
+    delitem Piberries, 4;
+    getitem PiberriesInfusion, 1;
+    goto L_Piberries;
+
+L_Quit:
     goodbye;
+    close;
 
 OnInit:
     .@npcId = getnpcid(0, .name$);
diff --git a/npc/015-3/hermit.txt b/npc/015-3/hermit.txt
index 715ba5625..559721c8d 100644
--- a/npc/015-3/hermit.txt
+++ b/npc/015-3/hermit.txt
@@ -105,7 +105,15 @@ L_Research:
         mesq l("The @@ is a powerful healing drink.", getitemlink(PiberriesInfusion-4+@menu));
         next;
         mesn;
-        mesq l("@@ is developing these potions.", "Jesusalva"); // TODO: NPCs: ??, Fate, Clotho, Lachesis and Atropos
+
+        switch (@menu) {
+            case 4:
+               mesq l("@@ is developing these potions.", "Wyara"); break;
+            default:
+               mesq l("@@ is developing these potions.", "Jesusalva"); // TODO: Fate, Clotho, Lachesis and Atropos
+               break;
+        }
+
         break;
     case 3:
         mesq l("Ah! @@. A very rare drop!", getitemlink(DarkDesertMushrooom));