// TMW2 Script
// Author:
//    Saulc
//    Vasily_Makarov (original from Evol)
//    Jesusalva
//    seeds
// Description:
//    Status Reset

033-2,26,24,0	script	Lune	NPC_PIOU_ALCHEMIST,{

    speech S_LAST_NEXT,
        l("I am %s, a piou alchemist specializing in reset and agility potions.", .name$);

L_Menu:
    select
        l("Can you reset my stats please?"),
        lg("I'm allergic to piou potions, goodbye.");
    mes "";

    switch (@menu)
    {
        case 1:
            goto L_ResetStats;
        default:
            goto L_Quit;
            break;
    }
    close;

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:
    closeclientdialog;
    goodbye;
    close;

OnInit:
    .sex = G_OTHER;
    .distance = 4;
    end;
}