It's incredible how these skills are expensive.

1 files changed, 79 insertions, 4 deletions

diff --git a/npc/014-5-1/sagratha.txt b/npc/014-5-1/sagratha.txt
index 32ab80ecb..480a57104 100644
--- a/npc/014-5-1/sagratha.txt
+++ b/npc/014-5-1/sagratha.txt
@@ -316,14 +316,89 @@ function teachMagic {
 	    skill TMW2_LIMERIZER, 1, 0;
         setq General_Sagratha, 1;
         break;
+    case 2:
+        if (MAGIC_LVL < 2)
+            goto L_Magicless;
+        mesn;
+        mesc l("@@ nods.", .name$);
+        mesq l("Be careful, because the more magic power you ask the Mana Seed, the more difficult to control it will be.");
+        next;
+        mesn;
+        mesq l("This is how the Monster King became an evil. Keep practicing magic, so you get more comfortable with it and fail less often.");
+        next;
+        mesn;
+        mesq l("Anyway. This is the HALHISS spell. It'll summon snakes.");
+        next;
+        mesn;
+        mesq l("Snakes are annoying and poisonous. Quite handy as a summon, though.");
+	    skill TMW2_HALHISS, 1, 0;
+        setq General_Sagratha, 3;
+        break;
+    case 4:
+        if (MAGIC_LVL < 3)
+            goto L_Magicless;
+        mesn;
+        mesc l("@@ nods.", .name$);
+        mesq l("You've been doing well. Be careful out there.");
+        next;
+        mesn;
+        mesq l("Anyway. This is the KALWULF spell. It'll spawn Wolverns.");
+        next;
+        mesn;
+        mesq l("Wolverns are fierce creatures who likes cold places. Their fur is soft.");
+	    skill TMW2_KALWULF, 1, 0;
+        setq General_Sagratha, 5;
+        break;
+    }
+    case 6:
+        if (MAGIC_LVL < 4)
+            goto L_Magicless;
+        mesn;
+        mesc l("@@ nods.", .name$);
+        mesq l("You've been doing quite well, indeed. Ever visited Lilit?");
+        next;
+        mesn;
+        mesq l("Lilit is the fairy kingdom, governed by Lilit the Fairy.");
+        next;
+        mesn;
+        mesq l("Anyway. This is the FAIRYKINGDOM spell. It'll spawn fairies.");
+        next;
+        mesn;
+        mesq l("Fairies usually behaves well, but they hate snakes, so avoid casting halhiss and fairykingdom at once. You never know.");
+	    skill TMW2_FAIRYKINGDOM, 1, 0;
+        setq General_Sagratha, 7;
+        break;
+    }
+    case 8:
+        if (MAGIC_LVL < 5)
+            goto L_Magicless;
+        mesn;
+        mesc l("@@ nods.", .name$);
+        mesq l("You've been doing very well, I'm surprised.");
+        next;
+        mesn;
+        mesq l("The most powerful spells can, sometimes, summon some monster you didn't wanted to.");
+        next;
+        mesn;
+        mesq l("This is the FROZENHEART spell. It'll summon... Yeti.");
+        next;
+        mesn;
+        mesq l("But if you're not skilled enough, or lose control of it, a Moggun might be spawned instead. Which is a young, weak, baby Yeti.");
+	    skill TMW2_FROZENHEART, 1, 0;
+        setq General_Sagratha, 9;
+        break;
     }
         /*
-		    skill TMW2_HALHISS, 12;
-		    skill TMW2_KALWULF, 9;
+            Limerizer Lv 30
+            Halhiss Lv 40
+            Wolvern Lv 45
+            Fairy Kingdom Lv 50 → Maybe Lilit?
+            Frozenheart Lv 60
+            Dragokin Lv 70 → Maybe Lilit?
+            Stoneheart Lv 80
+
 		    skill TMW2_DRAGOKIN, 5;
 		    skill TMW2_STONEHEART, 9;
-		    skill TMW2_FROZENHEART, 9;
-		    skill TMW2_FAIRYKINGDOM, 9;
         */
     next;
     return;