-	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;
}