Added SkillUp function and used it whenever we magic-skill-up

1 files changed, 8 insertions, 5 deletions

diff --git a/npc/009-2_Hurnscald/wyara.txt b/npc/009-2_Hurnscald/wyara.txt
index e82457e0..01793fee 100644
--- a/npc/009-2_Hurnscald/wyara.txt
+++ b/npc/009-2_Hurnscald/wyara.txt
@@ -6,6 +6,10 @@
         set @Q_SHIFT, NIBBLE_2_SHIFT;
         set @Q_status, (QUEST_MAGIC2 & @Q_MASK) >> @Q_SHIFT;
 
+        // Set up SkillUp function
+        set @SUP_id, SKILL_MAGIC_NATURE;
+        set @SUP_name$, "Nature Magic";
+
         set @STATUS_INITIAL, 0;
         set @STATUS_PURIFY_EXPLAINED, 1;
         set @STATUS_PURIFY_ONCE, 2;
@@ -433,12 +437,11 @@ L_Magic_purify_done:
 
         mes "[Wyara the Witch]";
         mes "Slowly, the sensation recedes, but you feel changed.";
-        mes "[5000 experience points]";
-        mes "[Level 2 in Nature Magic]";
 
-        getexp 5000, 0;
-        if (getskilllv(SKILL_MAGIC_NATURE) < 2)
-        	setskill SKILL_MAGIC_NATURE, 2;
+        set @SUP_xp, 5000;
+        set @SUP_lvl, 2;
+        callfunc "SkillUp";
+
         set @Q_status, @STATUS_PURIFY_OVER;
         callsub S_update_var;
         close;