// TMW2/LoF scripts.
// Authors:
//    Jesusalva
// Description:
//    Status Reset. Formely named Bobby

017-6,25,30,0	script	Axzell the Alchemist	NPC_PLAYER,{

    speech S_LAST_NEXT,
        l("I am @@, an alchemist specialized in reset potions.", .name$);

L_Menu:
    .@plush_count = BaseLevel*190-(9*210);
    // Lv 10: 10 GP
    // Lv 90: 1.690 GP
    if (BaseLevel > 10)
        .@plush_count = .@plush_count/(BaseLevel/10);

    select
        l("Can you reset my stats please?"),
        l("Hey, nice hat! Can I have it?"),
        lg("You are weird, I have to go sorry.");

    mes "";
    switch (@menu) {
        case 1:
            goto L_ResetStats;
        case 2:
            mesn;
            mesq l("Maybe.");
            next;
            mesn strcharinfo(0);
            mes l("*_* \"Pretty please?\"");
            next;
            mesn;
            mesq l("Well, I and my brother could make another one, but they are being checked for safety.");
            next;
            mesn;
            mesq l("After all, what would you do if it open a black hole on your head by accident? %%4");
            next;
            mesn strcharinfo(0);
            mesq l("Welp, no, please!");
            next;
            mesn;
            mesq l("%%@ Then wait until Saulc says they are safe!");
            next;
            goto L_Menu;
        case 3:
            goto L_Quit;
    }

L_ResetStats:
    mesn;
    mesq l("Status point reset can't be undone. Do you really want this?");

L_ConfirmReset:
    ConfirmStatusReset();
    goto L_Quit;

L_Quit:
    closedialog;
    goodbye;
    close;

OnTimer1000:
    domovestep;

OnInit:
    .@npcId = getnpcid(.name$);
    setunitdata(.@npcId, UDT_HEADTOP, ChemistHelmet);
    setunitdata(.@npcId, UDT_HEADMIDDLE, AlchemistArmor);
    setunitdata(.@npcId, UDT_HEADBOTTOM, RaidTrousers);
    setunitdata(.@npcId, UDT_WEAPON, LousyMoccasins); // Boots
    setunitdata(.@npcId, UDT_HAIRSTYLE, 14);
    setunitdata(.@npcId, UDT_HAIRCOLOR, 17);

    initpath "move", 25, 30,
             "dir", DOWN, 0,
             "wait", 15, 0,
             "move", 29, 21,
             "dir", LEFT, 0,
             "wait", 5, 0,
             "dir", DOWN, 0,
             "wait", 15, 0,
             "move", 28, 34,
             "dir", RIGHT, 0,
             "wait", 15, 0,
             "move", 22, 37,
             "dir", RIGHT, 0,
             "wait", 30, 0,
             "move", 22, 48,
             "dir", UP, 0,
             "wait", 15, 0,
             "move", 28, 62,
             "dir", UP, 0,
             "wait", 15, 0,
             "move", 29, 47,
             "dir", UP, 0,
             "wait", 15, 0;
    initialmove;
    initnpctimer;

    .sex = G_MALE;
    .distance = 5;
    end;
}