Remove direct calls to mlearn()

2 files changed, 14 insertions, 70 deletions

diff --git a/npc/027-1/luca.txt b/npc/027-1/luca.txt
index 477f48f7d..d61f47a03 100644
--- a/npc/027-1/luca.txt
+++ b/npc/027-1/luca.txt
@@ -32,38 +32,14 @@
         l("Cancel"), 0;
     mes "";
 
-    switch (@menuret) {
-        case SM_BASH:
-            if (!mlearn(SM_BASH, 10, 1, FluoPowder, 3))
-                mesc l("You do not meet all requisites for this skill."), 1;
-            break;
-        case MC_MAMMONITE:
-            if (!mlearn(MC_MAMMONITE, 10, 1, FluoPowder, 3))
-                mesc l("You do not meet all requisites for this skill."), 1;
-            break;
-        case AC_SHOWER:
-            if (!mlearn(AC_SHOWER, 10, 3, FluoPowder, 3))
-                mesc l("You do not meet all requisites for this skill."), 1;
-            break;
-        case KN_AUTOCOUNTER:
-            if (!mlearn(KN_AUTOCOUNTER, 5, 2, FluoPowder, 3))
-                mesc l("You do not meet all requisites for this skill."), 1;
-            break;
-        case ASC_METEORASSAULT:
-            if (!mlearn(ASC_METEORASSAULT, 3, 2, FluoPowder, 3))
-                mesc l("You do not meet all requisites for this skill."), 1;
-            break;
-        case SN_SHARPSHOOTING:
-            if (!mlearn(SN_SHARPSHOOTING, 1, 3, FluoPowder, 3))
-                mesc l("You do not meet all requisites for this skill."), 1;
-            break;
-        default:
-            if (@menuret)
-                Exception("ERROR skill not implemented", RB_DEFAULT|RB_SPEECH);
-            else
-                closeclientdialog;
-            break;
+    // Handle result
+    if (@menuret) {
+        if (!learn_magic(@menuret))
+            mesc l("You do not meet all requisites for this skill."), 1;
+    } else {
+        closeclientdialog;
     }
+
     } while (@menuret);
     close;
 
diff --git a/npc/027-1/saves.txt b/npc/027-1/saves.txt
index 4cb146f4f..2a9eaa52f 100644
--- a/npc/027-1/saves.txt
+++ b/npc/027-1/saves.txt
@@ -35,46 +35,14 @@
         l("Cancel"), 0;
     mes "";
 
-    switch (@menuret) {
-        case TMW2_FIRSTAID:
-            if (!mlearn(TMW2_FIRSTAID, 4, 1, SpellBookPage, 1))
-                mesc l("You do not meet all requisites for this skill."), 1;
-            break;
-        case TMW2_SAGE:
-            if (!mlearn(TMW2_SAGE, 5, 1, SpellBookPage, 1))
-                mesc l("You do not meet all requisites for this skill."), 1;
-            break;
-        case HW_MAGICPOWER:
-            if (!mlearn(HW_MAGICPOWER, 5, 1, SpellBookPage, 1))
-                mesc l("You do not meet all requisites for this skill."), 1;
-            break;
-        case SM_PROVOKE:
-            if (!mlearn(SM_PROVOKE, 1, 1, SpellBookPage, 1))
-                mesc l("You do not meet all requisites for this skill."), 1;
-            break;
-        case EVOL_AREA_PROVOKE:
-            if (!mlearn(EVOL_AREA_PROVOKE, 10, 2, SpellBookPage, 1))
-                mesc l("You do not meet all requisites for this skill."), 1;
-            break;
-        case TMW2_HEALING:
-            if (!mlearn(TMW2_HEALING, 1, 2, SpellBookPage, 1))
-                mesc l("You do not meet all requisites for this skill."), 1;
-            break;
-        case SN_WINDWALK:
-            if (!mlearn(SN_WINDWALK, 3, 3, SpellBookPage, 1))
-                mesc l("You do not meet all requisites for this skill."), 1;
-            break;
-        case CR_TRUST:
-            if (!mlearn(CR_TRUST, 2, 3, SpellBookPage, 1))
-                mesc l("You do not meet all requisites for this skill."), 1;
-            break;
-        default:
-            if (@menuret)
-                Exception("ERROR skill not implemented", RB_DEFAULT|RB_SPEECH);
-            else
-                closeclientdialog;
-            break;
+    // Handle result
+    if (@menuret) {
+        if (!learn_magic(@menuret))
+            mesc l("You do not meet all requisites for this skill."), 1;
+    } else {
+        closeclientdialog;
     }
+
     } while (@menuret);
     close;