Replace makepot with Transmigration/Transmutation general spell (TODO/WIP)

1 files changed, 8 insertions, 16 deletions

diff --git a/npc/magic/mkpot.txt b/npc/magic/transmigration.txt
index 576de7ebc..4e45d8510 100644
--- a/npc/magic/mkpot.txt
+++ b/npc/magic/transmigration.txt
@@ -1,22 +1,14 @@
 // TMW2 script
 // Author: Jesusalva <admin@tmw2.org>
 //
-// Magic Script: TMW2_MKPOT
+// Magic Script: TMW2_TRANSMIGRATION
 //
-// Attempts to make a haste potion from Mouboo Milk and Plushroom.
-// May make sewer water on failure.
-// TODO: Using too much transmutation magic may have dire consequences! Like, uh, transmutating your head!
-// Nah, it is probably just propaganda... I hope. ¬.¬
+// Attempts to make stuff from other stuff
+// This is actually referred as transmutation in human-readable forms, and
+// transmigration in scripts.
 
 -	script	sk#mkpot	32767,{
     end;
-
-/*
-OnFriendlyDeath:
-    emote 4;
-    end;
-*/
-
 OnCall:
     // Other requeriments
     if (countitem(Plushroom) < 10 || !countitem(Milk)) {
@@ -31,7 +23,7 @@ OnCall:
     }
 
     // Check requisites
-    if (!MagicCheck(TMW2_MKPOT, 185, -5))
+    if (!MagicCheck(TMW2_TRANSMIGRATION, 185, -5))
         end;
 
     // Consume items
@@ -42,7 +34,7 @@ OnCall:
     // The closer to zero, best;
     // Each 3 mexp reduces chance to get a fail
     // Each skill level reduces chances to get a fail
-    .@r=rand(141,181)-(MAGIC_EXP/3)-getskilllv(TMW2_MKPOT);
+    .@r=rand(141,181)-(MAGIC_EXP/3)-getskilllv(TMW2_TRANSMIGRATION);
     if (.@r < 21) {
             // Get up to 6 Haste Potions depending on your skill.
             getitem HastePotion, abizit()+1;
@@ -61,10 +53,10 @@ OnCall:
     @mkpot_at=@mkpot_at+6;
 
     // Get a few mana experience points (this is NOT used by Mana Stone)
-    GetManaExp(TMW2_MKPOT, rand(4,11));
+    GetManaExp(TMW2_TRANSMIGRATION, rand2(4,11));
     end;
 
 OnInit:
-    bindatcmd "sk-mkpot", "sk#mkpot::OnCall", 0, 100, 0;
+    bindatcmd "sk-trans", "sk#mkpot::OnCall", 0, 100, 0;
     end;
 }