1 files changed, 35 insertions, 0 deletions
diff --git a/npc/magic/level2-enchant-lifestone.txt b/npc/magic/level2-enchant-lifestone.txt
new file mode 100755
index 00000000..06fba65d
--- /dev/null
+++ b/npc/magic/level2-enchant-lifestone.txt
@@ -0,0 +1,35 @@
+-	script	enchant-lifestone	NPC32767,{
+    if(call("magic_checks")) end; 
+    if (Sp < 15) end;
+    if (getskilllv(.school) < .level) end;
+    if   (countitem("BugLeg") >= 1) delitem "BugLeg", 1;
+    elif (countitem("MaggotSlime") >= 1) delitem "MaggotSlime", 1;
+    elif (countitem("MauveHerb") >= 1 && countitem("AlizarinHerb") >= 1 && countitem("CobaltHerb") >= 1 && countitem("GambogeHerb") >= 1) goto L_Herbs;
+    else end;
+    goto L_Proceed;
+
+L_Herbs:
+    delitem "MauveHerb", 1;
+    delitem "AlizarinHerb", 1;
+    delitem "CobaltHerb", 1;
+    delitem "GambogeHerb", 1;
+    goto L_Proceed;
+
+L_Proceed:
+    set @_M_BLOCK, 1; // block casting, until the timer clears it
+    addtimer 4000, "Magic Timer::OnClear"; // set the new debuff
+    callfunc "adjust_spellpower";
+    Sp = Sp - 15;
+    misceffect FX_MAGIC_GENERIC, strcharinfo(0);
+    getitem "Lifestone", 1;
+    callfunc "magic_exp";
+    end;
+
+OnInit:
+    .school = SKILL_MAGIC;
+    set .invocation$, chr(MAGIC_SYMBOL) + "manpahil"; // used in npcs that refer to this spell
+    void call("magic_register");
+    .level = 2;
+    .exp_gain = 1;
+    end;
+}