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
|
019-1.gat,74,75,0 script Santa 105,{
if (ChristmasQuest2 == 1) goto done;
mes "[Santa]";
mes "Ho ho ho.";
mes "Hello my young friend.";
mes "Would you like to help me?";
next;
mes "Those monsters stolen my 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]";
mes "Hmm, let me check what you have.";
next;
if(countitem(515)<25) goto NoItem;
if(countitem(516)<20) goto NoItem;
if(countitem(538)<5) goto NoItem;
mes "Great! Here is something for you";
delitem 515,25;
delitem 516,20;
delitem 538,5;
getitem 563+rand(2),1;
set ChristmasQuest2,1;
close;
L_R:
mes "[Santa]";
mes "I need:";
mes "25 purple present boxes";
mes "20 blue present boxes";
mes "5 green present boxes";
next;
goto L_M;
L_N:
mes "[Santa]";
mes "Enjoy your holidays and I wish you an happy Christmas!";
close;
NoItem:
mes "[Santa]";
mes "You dont seem to have enough presents.";
close;
done:
mes "[Santa]";
mes "All the children got their Christmas presents.";
mes "Thank you for your help.";
close;
}
|
