summaryrefslogtreecommitdiff
path: root/world/map/npc/019-1/santa_helper.txt
blob: 9c14840723e1b8f6507fb6cfdebf5cd74a292d21 (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
// Author: accoring to git history probably Jaxad
// quest made seasonal and adapted to new scripting standards by Jenalya

019-1.gat,74,75,0|script|Santa's Helper|105,{
    if (ChristmasQuest2 == 1) goto L_Done;

    if ($@month == 12) goto L_Quest;

    mes "[Santa's Helper]";
    mes "\"Ah, isn't it peaceful here? Around Christmas time we always have problems with some slimy monsters.";
    mes "They steal the presents boxes. I think they feel attracted by the spiritual power of the Christmas presents.\"";
    next;
    mes "He smiles happily.";
    mes "[Santa's Helper]";
    mes "\"But at this time of the year everything's calm and relaxing.\"";
    goto L_Close;

L_Quest:
    set @purple_amount, 25;
    set @blue_amount, 20;
    set @green_amount, 5;

    mes "[Santa's Helper]";
    mes "\"Hello my young friend.";
    mes "Would you like to help me?\"";
    next;
    mes "[Santa's Helper]";
    mes "\"Those monsters stole Santa's presents.";
    mes "If you help me, I'll give you something very nice\"";
    next;

L_M:
    menu
        "I have some present boxes", L_Y,
        "Hmm, see you later", L_N,
        "What you need exactly?", L_R;

L_Y:
    mes "[Santa's Helper]";
    mes "\"Hmm, let me check what you have.\"";
    next;
    if (countitem("PurplePresentBox") < @purple_amount)
        goto L_NoItem;
    if (countitem("BluePresentBox") < @blue_amount)
        goto L_NoItem;
    if (countitem("GreenPresentBox") < @green_amount)
        goto L_NoItem;
    getinventorylist;
    if (@inventorylist_count > 99)
        goto L_TooMany;
    mes "[Santa's Helper]";
    mes "\"Great! Here is something for you\"";
    delitem "PurplePresentBox", @purple_amount;
    delitem "BluePresentBox", @blue_amount;
    delitem "GreenPresentBox", @green_amount;
    getitem "TurtleneckSweater", 1;
    set ChristmasQuest2,1;
    goto L_Close;

L_R:
    mes "[Santa's Helper]";
    mes "\"I need:";
    mes @purple_amount + " Purple Present Boxes";
    mes @blue_amount + " Blue Present Boxes";
    mes @green_amount + " Green Present Boxes\"";
    next;
    goto L_M;

L_N:
    mes "[Santa's Helper]";
    mes "\"Enjoy your holidays and I wish you a happy Christmas!\"";
    goto L_Close;

L_NoItem:
    mes "[Santa's Helper]";
    mes "\"You dont seem to have enough presents.\"";
    goto L_Close;

L_Done:
    mes "[Santa's Helper]";
    mes "\"All the children got their Christmas presents.";
    mes "Thank you for your help.\"";
    goto L_Close;

L_TooMany:
    mes "[Santa's Helper]";
    mes "\"It doesn't look like you have room for this. Come back later.\"";
    goto L_Close;

L_Close:
    set @purple_amount, 0;
    set @blue_amount, 0;
    set @green_amount, 0;
    close;
}