// TMW2 Script
// Author:
//  Jesusalva
// Description:
//  Mr. Saves of Scholar Class

003-0,34,25,0	script	Mr Saves	NPC_BLACKALCHEMIST,{
    if (!MAGIC_LVL) goto L_NoMagic;
    mes l(".:: Scholarship Class ::.");
    mesc l("Specialized in support, buff, debuff and strengthening skills.");
    next;
    mesn;
    do {
    mesc l("You have @@ magic skill points available.", sk_points());
    next;
    mesc l("Healing - The most basic healing skill, requires no items to use.");
    mesc l("Mana Wisdom - Passive - Raise Mana EXP Gain rate");
    mesc l("Accumulate Power - Raise damage of next skill.");
    mesc l("Provoke - Provoke a single monster");

    mesc l("Mass Provoke - Provoke all monsters under your cursor");
    mesc l("High Healing - Use a Lifestone for supreme healing.");

    mesc l("Windwalker - Increase walk speed and flee rate.");
    mesc l("Last Standing Man - Passive - Raise Max HP and Holy Defense");
    menuint
        l("Healing"), AL_HEAL,
        l("Mana Wisdom"), TMW2_SAGE,
        l("Accumulate Power"), HW_MAGICPOWER,
        l("Provoke"), SM_PROVOKE,
        l("Mass Provoke"), EVOL_MASS_PROVOKE,
        l("High Healing"), AB_HIGHNESSHEAL,
        l("Windwalker"), SN_WINDWALK,
        l("Last Standing Man"), CR_TRUST,
        l("Cancel"), 0;
    mes "";

    switch (@menuret) {
        case AL_HEAL:
            if (!mlearn(AL_HEAL, 4, 1, SpellBookPage, 1))
                mesc l("You do not meet all requisites for this skill."), 1;
            break;
        case TMW2_SAGE:
            if (!mlearn(TMW2_SAGE, 5, 1, SpellBookPage, 1))
                mesc l("You do not meet all requisites for this skill."), 1;
            break;
        case HW_MAGICPOWER:
            if (!mlearn(HW_MAGICPOWER, 5, 1, SpellBookPage, 1))
                mesc l("You do not meet all requisites for this skill."), 1;
            break;
        case SM_PROVOKE:
            if (!mlearn(SM_PROVOKE, 1, 1, SpellBookPage, 1))
                mesc l("You do not meet all requisites for this skill."), 1;
            break;
        case EVOL_MASS_PROVOKE:
            if (!mlearn(EVOL_MASS_PROVOKE, 10, 2, SpellBookPage, 1))
                mesc l("You do not meet all requisites for this skill."), 1;
            break;
        case AB_HIGHNESSHEAL:
            if (!mlearn(AB_HIGHNESSHEAL, 1, 2, SpellBookPage, 1))
                mesc l("You do not meet all requisites for this skill."), 1;
            break;
        case SN_WINDWALK:
            if (!mlearn(SN_WINDWALK, 3, 3, SpellBookPage, 1))
                mesc l("You do not meet all requisites for this skill."), 1;
            break;
        case CR_TRUST:
            if (!mlearn(CR_TRUST, 2, 3, SpellBookPage, 1))
                mesc l("You do not meet all requisites for this skill."), 1;
            break;
        default:
            if (@menuret)
                Exception("ERROR skill not implemented", RB_DEFAULT|RB_SPEECH);
            else
                closeclientdialog;
            break;
    }
    } while (@menuret);
    close;

L_NoMagic:
    next;
    mesn;
    mesq l("Your lack of magical power is critical. I dare say, you might never in your life get access to a Mana Stone.");
    next;
    mesn;
    mesq l("Besides the Magic Council, Andrei Sakar have his own Mana Stone, but I doubt he would train the likes of you, or share his Mana Stone.");
    next;
    mesn;
    mesq l("Perhaps, in the city, someone knows rumors about Mana Stones and can teach you. Other than that, you're on your own.");
    close;

OnInit:
    .sex = G_MALE;
    .distance = 5;
    end;

}