From 07af06bc4c8d49207b5e653e6159c8b108ea9196 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Sat, 10 Aug 2019 22:36:14 -0300
Subject: Scorpion Transmigration Subsystem

---
 npc/magic/transmigration.txt | 47 ++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 47 insertions(+)

diff --git a/npc/magic/transmigration.txt b/npc/magic/transmigration.txt
index c2efa4a9b..2a567856e 100644
--- a/npc/magic/transmigration.txt
+++ b/npc/magic/transmigration.txt
@@ -29,6 +29,8 @@ OnCall:
             rif(false, l("Downgrade Snake Skin")), SnakeSkin,
             rif(false, l("Downgrade Snake Egg")), SnakeEgg,
             rif(false, l("Downgrade Snake Tongue")), SnakeTongue,
+            rif(false, l("Downgrade Scorpion Stinger")), ScorpionStinger,
+            rif(false, l("Downgrade Scorpion Claw")), ScorpionClaw,
             l("Mouboo Figurine"), MoubooFigurine;
 
         mes "";
@@ -64,6 +66,19 @@ OnCall:
             l("Snake Tongue -> Cave Snake Tongue"), CaveSnakeTongue,
             l("Cancel");
             break;
+        case ScorpionStinger:
+            menuint
+            l("Black Scorpion Stinger -> Red Scorpion Stinger"), RedScorpionStinger,
+            l("Red Scorpion Stinger -> Scorpion Stinger"), ScorpionStinger,
+            l("Cancel");
+            break;
+        case ScorpionClaw:
+            menuint
+            l("Golden Scorpion Claw -> Black Scorpion Claw"), BlackScorpionClaw,
+            l("Black Scorpion Claw -> Red Scorpion Claw"), RedScorpionClaw,
+            l("Red Scorpion Claw -> Scorpion Claw"), ScorpionClaw,
+            l("Cancel");
+            break;
         default:
             Exception("ERROR, INVALID TRANSMIGRATION OPTION", RB_DEFAULT|RB_SPEECH); @menuret=0; break;
         }
@@ -150,6 +165,38 @@ OnCall:
                 end;
             }
             break;
+        // Scorpion Stinger Chain
+        case RedScorpionStinger:
+            if (!transcheck(BlackScorpionStinger, 1)) {
+                dispbottom l("Not enough items!");
+                end;
+            }
+            break;
+        case ScorpionStinger:
+            if (!transcheck(RedScorpionStinger, 1)) {
+                dispbottom l("Not enough items!");
+                end;
+            }
+            break;
+        // Scorpion Claw Chain
+        case BlackScorpionClaw:
+            if (!transcheck(GoldenScorpionClaw, 1)) {
+                dispbottom l("Not enough items!");
+                end;
+            }
+            break;
+        case RedScorpionClaw:
+            if (!transcheck(BlackScorpionClaw, 1)) {
+                dispbottom l("Not enough items!");
+                end;
+            }
+            break;
+        case ScorpionClaw:
+            if (!transcheck(RedScorpionClaw, 1)) {
+                dispbottom l("Not enough items!");
+                end;
+            }
+            break;
 
         default:
             Exception("ERROR, INVALID TRANSMIGRATION REAGENTS", RB_DEFAULT|RB_SPEECH|RB_ISFATAL); break;
-- 
cgit v1.2.3-60-g2f50