summaryrefslogtreecommitdiff
path: root/npc/030-2/storage_helper.txt
blob: 94aa5bc529885856068768bbd8546dc25d3ba238 (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
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
030-2,25,35,0	script	Vellamo	NPC328,{
    @halloween_npc_id = $@halloween_npc_vellamo;
    callfunc "TrickOrTreat";
    callfunc "XmasStates";

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

L_OffSeason:
    mes "[Vellamo]";
    mes "\"Candy Stock is built back up. Though... the more we store the more they want...\"";
    goto L_close;

L_XmasMain:
    if (XMASTIME & $@xmas_helper_bit_storage) goto L_Candy;
    if (@xmas_helper_bit) goto L_Helping;

    mes "[Vellamo]";
    mes "\"Sorry, too busy to chat right now. The chief has got me working overtime for the holidays.\"";
    close;

L_Helping:
    mes "[Vellamo]";
    mes "\"Oh, hello. Visitors usually don't come down here in the basement. Here we store several things, materials for the presents, the finished presents, supplies.\"";
    menu
        "Nice. I have to go.", L_close,
        "Do you need help with anything?", L_Next;

L_Next:
    mes "[Vellamo]";
    mes "\"Oh? You want to help us? Actually, there is one thing you could do. Did you see those weird slimes out there on the snow fields? Argh, I hate those creatures, last year they invaded the entire basement...\"";
    next;
    mes "\"However, this year they tried again, but I was able to hold them off. They just managed to devour most of our candy supplies.\"";
    next;
    mes "\"So in case you find some of the Candies, feel free to bring them back. Ismo will give you some reward for them.\"";
    XMASTIME = XMASTIME | ($@xmas_helper_bit_storage);
    goto L_close;

L_Candy:
    mes "[Vellamo]";
    mes "\"Ah, welcome back. When you have found some of the candy, please give it to Ismo.\"";
    goto L_close;

L_close:
    close;
}

030-2,33,29,0	script	Ismo	NPC329,{
    callfunc "XmasStates";

    if(($@xmas_time) && (XMASTIME & $@xmas_helper_bit_storage))
        goto L_Helping;
    goto L_OffSeason;

L_OffSeason:
    mes "[Ismo]";
    mes "\"Hello. I'm helping Vellamo. He's the storage administrator.\"";
    goto L_close;

L_Helping:
    mes "[Ismo]";
    mes "\"Did you get back some candy from the slimes?\"";
    next;
    menu
        "Give " + $@xmas_good_friendly_name$, L_GoodCandy,
        "Give " + $@xmas_bad_friendly_name$ + "(What? how mean!).", L_BadCandy;

L_BadCandy:
    @dq_level = $@xmas_bad_level;
    @dq_cost = $@xmas_bad_cost;
    @dq_count = $@xmas_bad_count;
    @dq_name$ = $@xmas_bad_name$;
    @dq_friendly_name$ = $@xmas_bad_friendly_name$;
    @dq_money = $@xmas_bad_money;
    @dq_exp = $@xmas_bad_exp;

    callfunc "DailyQuest";
    if (countitem(@dq_name$) < @dq_count)
        goto L_close;
    @karma_bonus = $@xmas_karma_bonus;
    callfunc "XmasNaughty";
    goto L_close;

L_GoodCandy:
    @dq_level = $@xmas_good_level;
    @dq_cost = $@xmas_good_cost;
    @dq_count = $@xmas_good_count;
    @dq_name$ = $@xmas_good_name$;
    @dq_friendly_name$ = $@xmas_good_friendly_name$;
    @dq_money = $@xmas_good_money;
    @dq_exp = $@xmas_good_exp;

    callfunc "DailyQuest";
    if (countitem(@dq_name$) < @dq_count)
        goto L_close;
    @karma_bonus = $@xmas_karma_bonus;
    callfunc "XmasNice";
    goto L_close;

L_close:
    close;
}