summaryrefslogtreecommitdiff
path: root/world/map/npc/030-2/present_helper.txt
blob: 9637b778991f2ec1f16be1caf16065edce878a82 (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
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
// Annual Xmas
// Author: wushin
// Present Reclaimation

030-2.gat,47,82,0|script|Jonanthan|328,
{
    callfunc "XmasStates";

    if($@xmas_time)
        goto L_XmasMain;
    goto L_OffSeason;

L_OffSeason:
    mes "[Jonathan]";
    mes "\"Hello! Welcome to the reclamation department.\"";
    mes "\"Lucky all the presents stolen have been replaced. Save any you find. You never know what we will need to replace next year.\"";
    goto L_Close;

L_XmasMain:
    mes "[Jonathan]";
    mes "\"Hello! Welcome to the reclamation department.\"";

    if(@xmas_helper_bit) goto L_Helping;

    mes "\"We are incredibly busy right now, monsters have stolen some of our presents.\"";
    mes "\"I must go inform Chief Warrick immediately.\"";
    goto L_Close;

L_Helping:
    mes "\"Here we take back any presents stolen from us by those nasty creatures.\"";
    next;

L_Main:
    mes "\"Did you find any presents you would like to return?\"";
    next;
    menu
        "No, I just wanted to say hello.",-,
        $@xmas_present_amount + " Purple present boxes.",L_Purple,
        $@xmas_present_amount + " Blue present boxes.",L_Blue,
        $@xmas_present_amount + " Green present boxes.",L_Green,
        $@xmas_present_amount + " Yellow present boxes.",L_Yellow,
        $@xmas_present_amount + " White present boxes.",L_White;
    goto L_Close;

L_Purple:
    set @karma_bonus, $@xmas_karma_bonus;
    set @present_name$, "PurplePresentBox";
    goto L_RewardIncrease;

L_Blue:
    set @karma_bonus, $@xmas_karma_bonus;
    set @present_name$, "BluePresentBox";
    goto L_RewardIncrease;

L_Green:
    set @karma_bonus, $@xmas_karma_bonus;
    set @present_name$, "GreenPresentBox";
    goto L_RewardIncrease;

L_Yellow:
    set @karma_bonus, 2;
    set @present_name$, "YellowPresentBox";
    goto L_RewardIncrease;

L_White:
    set @karma_bonus, 2;
    set @present_name$, "WhitePresentBox";
    goto L_RewardIncrease;

L_RewardIncrease:
    if ($@xmas_present_amount > countitem(@present_name$))
        goto L_NotEnough;
    mes "\"Oh, thank you!\"";
    delitem @present_name$, $@xmas_present_amount;
    callfunc "XmasNice";
    goto L_Close;

L_NotEnough:
    mes "\"I am sorry, but you don't have enough presents to return.\"";
    goto L_Main;

L_Close:
    mes "\"See You later!\"";
    set @present_name$, "";
    close;
}