summaryrefslogtreecommitdiff
path: root/world/map/npc/functions/stat_reset.txt
blob: fdb833f76e8dda0de64eedadaf3c410752635640 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
//

function|script|StatReset
{
// if (ResetA_charstate == 1) goto L_Multiple;

// set @cost, 10000000 / ($ResetA_uses + 1);

    set @cost, BaseLevel * 100;

    mes "[" + @npcname$ + "]";
    mes "\"I have come across a spell that will";
    mes "reset your status points.";
    mes "Normally this spell is expensive, but";
    mes "due to an unusual constellation of the";
    mes "stars I can cast it very cheaply!";
    mes "For you it will cost only "+@cost+" gp.\"";
    next;
    menu
        "Reset my stats",L_Next,
        "Forget about it",L_Pass;

L_Next:
    if (Zeny<@cost) goto L_NoMoney;
    goto L_Reset;

// set $ResetA_uses, $ResetA_uses + 1;
// set ResetA_charstate, 1;

L_Reset:
    set Zeny, Zeny-@cost;
    resetstatus;

    mes "[" + @npcname$ + "]";
    mes "\"There you are.";
    mes "";
    mes "Good as new!\"";
    goto L_Return;

L_Pass:
    mes "[" + @npcname$ + "]";
    mes "\"Very well then, see you.\"";
    goto L_Return;

L_NoMoney:
    mes "[" + @npcname$ + "]";
    mes "\"Oh dear, the price cannot be bargained.";
    mes "";
    mes "Perhaps you can borrow from a friend?\"";
    goto L_Return;

L_Return:
    set @cost, 0;
    return;
}