From e6daabfe8687f6713f8c94591e6758d6b7d04df0 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Sat, 25 Jan 2020 22:30:56 -0300
Subject: Wands no longer give passive MP regeneration. Only equipment does so.
 Instead, wands will allow you to use a skill to convert 20% of HP to MP. The
 ratio is 6:1 (as opposed to official ratio, something close to 4:1)

---
 npc/functions/hub.txt |  3 +++
 npc/magic/mpgen.txt   | 36 ++++++++++++++++++++++++++++++++++++
 npc/scripts.conf      |  1 +
 3 files changed, 40 insertions(+)
 create mode 100644 npc/magic/mpgen.txt

(limited to 'npc')

diff --git a/npc/functions/hub.txt b/npc/functions/hub.txt
index 0e052720e..2a1bb9fed 100644
--- a/npc/functions/hub.txt
+++ b/npc/functions/hub.txt
@@ -187,6 +187,9 @@ function	script	HUB_SkillInvoke	{
         case TMW2_FAKESKILL:
             atcommand("@refresh");
             break;
+        case TMW2_MPREGEN:
+            SK_mpregen();
+            break;
         case TMW2_FAKESKILL2:
             //CMD_lang(); next; closeclientdialog;
             CMD_toevent();
diff --git a/npc/magic/mpgen.txt b/npc/magic/mpgen.txt
new file mode 100644
index 000000000..1a45de552
--- /dev/null
+++ b/npc/magic/mpgen.txt
@@ -0,0 +1,36 @@
+// TMW2 script
+// Author: Jesusalva <jesusalva@tmw2.org>
+//
+// Magic Script: -
+//
+// mpgen to make mana from HP
+
+function	script	SK_mpregen	{
+    // Convert HP to mana (20% HP - 1) (To prevent 5 casts from killing)
+    .@basehp=(MaxHp/5)-1;
+    // How much MP is that worth?
+    // Well, 400HP:120MP so base formula is 4:1
+    // Let's have a 50% penalty, so, 6:1
+    .@mpheal=.@basehp/6;
+    heal -.@basehp, .@mpheal;
+    return;
+}
+
+/*
+-	script	sk#mpgen	32767,{
+    end;
+
+OnCall:
+    // Must have magic
+    if (!MAGIC_LVL)
+        end;
+
+    unitskilluseid(getcharid(3), TMW2_MPREGEN, 1, getcharid(3));
+    end;
+
+OnInit:
+    bindatcmd "sk-mpgen", "sk#mpgen::OnCall", 0, 100, 0;
+    end;
+}
+*/
+
diff --git a/npc/scripts.conf b/npc/scripts.conf
index a7e0b2345..1b5cba8c0 100644
--- a/npc/scripts.conf
+++ b/npc/scripts.conf
@@ -125,6 +125,7 @@
 "npc/magic/kalspike.txt",
 "npc/magic/kalwulf.txt",
 "npc/magic/limerizer.txt",
+"npc/magic/mpregen.txt",
 "npc/magic/transmigration.txt",
 "npc/magic/parum.txt",
 "npc/magic/plantkingdom.txt",
-- 
cgit v1.2.3-70-g09d2