summaryrefslogtreecommitdiff
path: root/world/map/npc/021-1/eurni.txt
blob: 3575ab1f1dc8b479f15efa35d46b941629b352b2 (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
//

021-1.gat,141,113,0|script|Eurni|136,{
    set @hw2011_npc_id, $@hw2011_npc_eurni;
    if (gettime(7) == $@hw2011_year && gettime(6) == 10 && gettime(5) >= $@hw2011_start_day)
        goto L_TrickOrTreat;

L_Begin:
    if (BaseLevel < 10) goto L_TooYoung;
    if (zeny < 10000) goto L_NoMoney;

    mes "[Eurni the Surgeon]";
    mes "\"Are you tired of being what you are?\"";
    next;

    mes "[Eurni the Surgeon]";
    mes "\"Would you maybe be interested in a sex change?\"";
    next;

    mes "[Server]";
    mes "Warning: All characters under this login will be changed. Once it's done, you will be kicked from the server. Don't panic, as everything is fine.";
    next;
    menu
        "Please do, my dear...", L_Change,
        "Leave alone my family treasure!", -;
    close;

L_Change:
    if (zeny < 10000)
        goto L_No_Money;
    set zeny, zeny - 10000;
    changesex;
    close;

L_TooYoung:
    mes "[Eurni the Surgeon]";
    mes "\"Move along, kid.\"";
    close;

L_NoMoney:
    mes "[Eurni the Surgeon]";
    mes "\"You don't have enough to pay for my services.\"";
    close;

L_TrickOrTreat:
    callfunc "TrickOrTreat2011";
    goto L_Begin;
}