Mana Stone - Fix the experience functions. Should work now

1 files changed, 4 insertions, 16 deletions

diff --git a/npc/012-3/mana-seed.txt b/npc/012-3/mana-seed.txt
index b4c69999..1f65ef1e 100644
--- a/npc/012-3/mana-seed.txt
+++ b/npc/012-3/mana-seed.txt
@@ -1,12 +1,4 @@
 012-3,62,130,0	script	Forest Mana Seed#_M	NPC166,{
-    setarray @magic_exp_needed,
-        0, // level 0
-        0,
-        100,
-        1200,
-        8000,
-        40000; // level 5
-
     setarray @exp_bonus,
         0,
         1000, // level 1
@@ -152,20 +144,16 @@ L_Magic_touch:
     mes "You touch the Mana Seed again.";
     if (getskilllv(SKILL_MAGIC) >= @max_magic)
         goto L_Magic_maxed_out;
-    @exp_needed = @magic_exp_needed[getskilllv(SKILL_MAGIC) + 1];
-    @magic_exp = MAGIC_EXPERIENCE & 65535;
-    if (@magic_exp >= @exp_needed)
+    if (abizit() >= 10)
         goto L_Magic_levelup;
-    @prev_exp_needed = @magic_exp_needed[getskilllv(SKILL_MAGIC)];
-    @exp_diff = @exp_needed - @prev_exp_needed;
-    @index = ((@magic_exp - @prev_exp_needed) * 5) / @exp_diff;
-    setarray @messages$,
+    setarray .@messages$,
         "The orb's energy effortlessly rushes through you, ignoring your feeble attempts at containing it. You will need considerably more practice with your magical skills before you can hope to contain it.",
         "You only barely manage to hang on to some strands of the orb's energy, but not enough to contain it. You still need noticeably more practice with your magical skills.",
         "The orb's powers are still no match for you; you will need more practice to contain more of its powers.",
         "You feel close to being able to contain the orb's powers. Still, some more practice is needed.",
         "The orb's energy only barely evades your attempts at containing it. Soon you will be able to extract more power from it.";
-    mes @messages$[@index];
+    .@index=abizit()/2;
+    mes .@messages$[.@index];
     next;
     goto L_Magic_mainmenu;