Allow player to craft Lifestones

1 files changed, 11 insertions, 21 deletions

diff --git a/npc/004-1/elanore.txt b/npc/004-1/elanore.txt
index aa79f8da0..1278b0ad7 100644
--- a/npc/004-1/elanore.txt
+++ b/npc/004-1/elanore.txt
@@ -41,7 +41,7 @@ L_Menu:
     mes "";
     menu
         rif(Zeny >= .@price, l("Please heal me!")), L_Heal_L,
-        rif(BaseLevel > 15 && 1==2, l("Do you make Lifestones?")), L_Lifestones,
+        l("Do you make Lifestones?"), L_Lifestones,
         l("Another time, maybe."), L_Close;
 
 
@@ -64,7 +64,7 @@ L_Lifestones:
     mesn;
     mesq l("Lifestones have the potential to heal the user, and thus are used for potions.");
     next;
-    mesq l("I will need 1 @@, 1 @@ and 100 GP to craft a single stone.", getitemlink(BugLeg), getitemlink(MaggotSlime));
+    mesq l("I will need 3 @@, 5 @@ and 100 GP to craft a single stone.", getitemlink(BugLeg), getitemlink(MaggotSlime));
     next;
     mes "";
     menu
@@ -73,25 +73,20 @@ L_Lifestones:
         l("Here you are!"), L_Trade;
 
 L_Trade:
-    if (countitem("BugLeg") < 1) goto L_Trade_Missing;
-    if (countitem("MaggotSlime") < 1) goto L_Trade_Missing;
+    if (countitem("BugLeg") < 3) goto L_Trade_Missing;
+    if (countitem("MaggotSlime") < 5) goto L_Trade_Missing;
     if (Zeny < 100) goto L_Trade_Missing;
 
-    // TODO: There is a function to do that check in one line
-    getinventorylist;
-    if (@inventorylist_count == 100 && countitem("Lifestone") == 0
-        && countitem("BugLeg") > 1
-        && countitem("MaggotSlime") > 1) goto L_NoRoom;
+    inventoryplace Lifestone, 1;
 
-    delitem "BugLeg", 1;
-    delitem "MaggotSlime", 1;
+    delitem "BugLeg", 3;
+    delitem "MaggotSlime", 5;
     set Zeny, Zeny - 100;
 
-    // TODO: MISSING ITEM
-    //getitem "Lifestone", 1;
+    getitem Lifestone, 1;
 
-    // TODO: Only grant Experience on first craft
-    getexp 80, 0;
+    // Possible enhancement: Only grant Experience on first craft
+    getexp 40, 0;
     mesn;
     mesq l("These will do just fine.");
     next;
@@ -101,12 +96,7 @@ L_Trade:
     mesq l("I guess that you could use these lifestones to gain a regeneration effect, too, but I do not know how.");
     next;
     mes l("She smiles.");
-    mes l("[80 experience points]");
-    goto L_Close;
-
-L_NoRoom:
-    mesn;
-    mesq l("Oh... it seems that you have no room for the lifestones. But please do come back later when you have made a little space.");
+    mes l("[40 experience points]");
     goto L_Close;
 
 L_Trade_Missing: