Add gemstones to rings.

Everything is ***UNTESTED*** so please DO NOT reload scripts on test server.

1 files changed, 99 insertions, 1 deletions

diff --git a/npc/003-5/jeweler.txt b/npc/003-5/jeweler.txt
index 471db2cc8..b69996147 100644
--- a/npc/003-5/jeweler.txt
+++ b/npc/003-5/jeweler.txt
@@ -19,7 +19,7 @@ L_Menu:
     menu
         l("I want to shop."), -,
         l("I want to craft rings."), L_Craft,
-        //rif(countitem(GoldenRing) >= 1, l("I want to add gemstones to a ring.")), -,
+        rif(countitem(GoldenRing) >= 1, l("I want to add gemstones to a ring.")), L_Gemstone,
         l("Nothing, sorry."), L_Close;
 
     openshop;
@@ -47,6 +47,104 @@ L_Craft:
     next;
     goto L_Menu;
 
+L_Gemstone:
+    mes "";
+    mesn;
+    mesq l("Adding gems will give special stats to rings, and they'll become lighter, but these gems cannot be removed easily.");
+    mesq l("I charge a service fee of 1000 GP.");
+    next;
+    if (Zeny < 1000) {
+        mesn;
+        mesq lg("You clearly don't have money, so let's not bother with that right now.");
+        next;
+        goto L_Menu;
+    }
+    menu
+        rif(countitem(Diamond) >= 1 , l("Diamond Ring (+2 vit)"), L_Diamond,
+        rif(countitem(Ruby) >= 1    , l("Ruby Ring (+2 str)"),     L_Ruby,
+        rif(countitem(Amethyst) >= 1, l("Amethyst Ring (+2 dex)"), L_Amethyst,
+        rif(countitem(Sapphire) >= 1, l("Sapphire Ring (+2 int)"), L_Sapphire,
+        rif(countitem(Topaz) >= 1   , l("Topaz Ring (+2 agi)"),    L_Topaz,
+
+        rif(countitem(Emerald) >= 1 , l("Emerald Ring (+2 luck)"), L_Emerald,
+        rif(countitem(Pearl) >= 3   , l("3x Pearl Ring (+1 agi/int/dex)"), L_Pearl,
+        rif(countitem(BlackPearl) >= 1, l("Black Pearl Ring (+1 str/vit/luk)"), L_BlackPearl,
+        l("I don't have any gemstone or three pearls with me."), L_Close;
+
+// As usual, I don't care with cheaters, so if you try to cheat money or gemstones, YOU WILL LOSE ALL REAGENTS. No refunds.
+L_Diamond:
+    inventoryplace GoldenDiamondRing;
+    delitem GoldenRing, 1;
+    Zeny=Zeny-1000;
+    delitem Diamond, 1;
+    getitem GoldenDiamondRing, 1;
+    getexp 800, 0;
+    goto L_Menu;
+
+L_Ruby:
+    inventoryplace GoldenRubyRing;
+    delitem GoldenRing, 1;
+    Zeny=Zeny-1000;
+    delitem Ruby, 1;
+    getitem GoldenRubyRing, 1;
+    getexp 800, 0;
+    goto L_Menu;
+
+L_Amethyst:
+    inventoryplace GoldenAmethystRing;
+    delitem GoldenRing, 1;
+    Zeny=Zeny-1000;
+    delitem Amethyst, 1;
+    getitem GoldenAmethystRing, 1;
+    getexp 800, 0;
+    goto L_Menu;
+
+L_Sapphire:
+    inventoryplace GoldenSapphireRing;
+    delitem GoldenRing, 1;
+    Zeny=Zeny-1000;
+    delitem Sapphire, 1;
+    getitem GoldenSapphireRing, 1;
+    getexp 800, 0;
+    goto L_Menu;
+
+L_Topaz:
+    inventoryplace GoldenTopazRing;
+    delitem GoldenRing, 1;
+    Zeny=Zeny-1000;
+    delitem Topaz, 1;
+    getitem GoldenTopazRing, 1;
+    getexp 800, 0;
+    goto L_Menu;
+
+L_Emerald:
+    inventoryplace GoldenEmeraldRing;
+    delitem GoldenRing, 1;
+    Zeny=Zeny-1000;
+    delitem Emerald, 1;
+    getitem GoldenEmeraldRing, 1;
+    getexp 800, 0;
+    goto L_Menu;
+
+L_Pearl:
+    inventoryplace GoldenPearlRing;
+    delitem GoldenRing, 1;
+    Zeny=Zeny-1000;
+    delitem Pearl, 3;
+    getitem GoldenPearlRing, 1;
+    getexp 1000, 0;
+    goto L_Menu;
+
+L_Pearl:
+    inventoryplace GoldenBlackPearlRing;
+    delitem GoldenRing, 1;
+    Zeny=Zeny-1000;
+    delitem BlackPearl, 1;
+    getitem GoldenBlackPearlRing, 1;
+    getexp 1000, 0;
+    goto L_Menu;
+
+
 L_Close:
     closedialog;
     goodbye;