summaryrefslogtreecommitdiff
path: root/npc/030-2/present_helper.txt
blob: ef9e1c14a4a2ae0187c8984794b175d2611fac15 (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
030-2,47,82,0	script	Jonathan	NPC328,{
    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;
    goto L_Main;

L_Main:
    mes "\"Did you find any presents you would like to return?\"";
    next;
    menu
        "No, I just wanted to say hello.",L_close,
        $@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;

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

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

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

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

L_White:
    @karma_bonus = 2;
    @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!\"";
    @present_name$ = "";
    close;
}