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
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
|
new_4-1.gat,26,51,0 script Xmas12 105,{
if(XMASQUEST12 == 1) goto L_only_once;
mes "[Helper Santa]";
mes "It's Christmas.";
mes "The time for gifts and family reunions";
next;
mes "[Helper Santa]";
mes "You get a gift from me.";
mes "The kind will depend on whether";
mes "you've been nice or naughty.";
next;
menu "Want one?",L_nicenaughty,"No thanks.",L_no;
L_nicenaughty:
set XMASQUEST12,1;
mes "[Helper Santa]";
mes "In my book you're marked as...";
next;
set @TEMP,rand(9);
if(@TEMP == 6) goto L_naughty;
goto L_nice;
L_nice:
mes "[Helper Santa]";
mes "...nice!";
set @TEMP,rand(17);
next;
if(@TEMP == 0) goto L_nice_0;
if(@TEMP == 1) goto L_nice_1;
if(@TEMP == 2) goto L_nice_2;
if(@TEMP == 3) goto L_nice_3;
if(@TEMP == 4) goto L_nice_4;
if(@TEMP == 5) goto L_nice_5;
if(@TEMP == 6) goto L_nice_6;
if(@TEMP == 7) goto L_nice_7;
if(@TEMP == 8) goto L_nice_8;
if(@TEMP == 9) goto L_nice_9;
if(@TEMP == 10) goto L_nice_10;
if(@TEMP == 11) goto L_nice_11;
if(@TEMP == 12) goto L_nice_12;
if(@TEMP == 13) goto L_nice_13;
if(@TEMP == 14) goto L_nice_14;
if(@TEMP == 15) goto L_nice_15;
if(@TEMP == 16) goto L_nice_16;
if(@TEMP == 17) goto L_nice_17;
L_naughty:
mes "[Helper Santa]";
mes "...naughty!";
set @TEMP,rand(6);
next;
if(@TEMP == 0) goto L_naughty_0;
if(@TEMP == 1) goto L_naughty_1;
if(@TEMP == 2) goto L_naughty_2;
if(@TEMP == 3) goto L_naughty_3;
if(@TEMP == 4) goto L_naughty_4;
if(@TEMP == 5) goto L_naughty_5;
if(@TEMP == 6) goto L_naughty_6;
L_naughty_0:
mes "[Helper Santa]";
mes "Ho ho ho!";
mes "I borrowed some of your money for";
mes "my present budget this year.";
set Zeny,Zeny-rand(500,1500);
close;
L_naughty_1:
mes "[Helper Santa]";
mes "You will get a spanking";
next;
mes "[Helper Santa]";
mes "Remember to be nice to people!";
gmcommand strcharinfo(0)+":@die ";
close;
L_naughty_2:
mes "[Helper Santa]";
mes "But I won't mind!";
mes "Have a char reset as a present."
next;
mes "[Helper Santa]";
mes "Abracadabra!";
gmcommand strcharinfo(0)+":@charstreset "+strcharinfo(0);
gmcommand strcharinfo(0)+":@charskreset "+strcharinfo(0);
close;
L_naughty_3:
mes "[Helper Santa]";
mes "You will now get randomly warped!";
next;
gmcommand strcharinfo(0)+":@jump ";
mes "[Helper Santa]";
mes "Merry Christmas!";
close;
L_naughty_4:
mes "[Helper Santa]";
mes "Your sex will now change!";
mes "You always get naughty things for naughty things.";
mes "It's karma!";
next;
mes "[Helper Santa]";
mes "Ho ho ho!";
gmcommand strcharinfo(0)+":@charchangesex "+strcharinfo(0);
close;
L_naughty_5:
mes "[Helper Santa]";
mes "I'll now kill all monsters on this map.";
next;
mes "[Helper Santa]";
mes "Done!";
gmcommand strcharinfo(0)+":@killmonster2 ";
close;
L_naughty_6:
mes "[Helper Santa]";
mes "I'll diss you around the server.";
next;
mes "[Helper Santa]";
mes "Ho ho ho!";
gmcommand strcharinfo(0)+":@kami "+strcharinfo(0)+" is not in the holiday mood.";
close;
L_nice_0:
mes "[Helper Santa]";
mes "So you wanted money?.";
set Zeny,Zeny+rand(1,1000000);
close;
L_nice_1:
mes "[Helper Santa]";
mes "These hats are really hot now!";
getitem 1205,1;
close;
L_nice_2:
mes "[Helper Santa]";
mes "Axe Hats are always on the cutting edge!";
getitem 616,1;
close;
L_nice_3:
mes "[Helper Santa]";
mes "You just won a Pirate Hat!";
getitem 617,1;
close;
L_nice_4:
mes "[Helper Santa]";
mes "Now you can Goggle all you want.";
getitem 618,1;
close;
L_nice_5:
mes "[Helper Santa]";
mes "Let's Goggle all night long!";
getitem 619,1;
close;
L_nice_6:
mes "[Helper Santa]";
mes "You just won a Circlet!";
getitem 620,1;
close;
L_nice_7:
mes "[Helper Santa]";
mes "This patch is not an eyesore.";
getitem 621,1;
close;
L_nice_8:
mes "[Helper Santa]";
mes "Bandana time!";
getitem 622,1;
close;
L_nice_9:
mes "[Helper Santa]";
mes "5000 exp!";
getexp 5000,0;
close;
L_nice_10:
mes "[Helper Santa]";
mes "Soft packages are always nice.";
getitem 1202,1;
close;
L_nice_11:
mes "[Helper Santa]";
mes "Chuck Norris style!";
getitem 1203,1;
close;
L_nice_12:
mes "[Helper Santa]";
mes "Even Rudolph would be envious now.";
getitem 1204,1;
close;
L_nice_13:
mes "[Helper Santa]";
mes "Now you can become a Santa too!";
getitem 1206,1;
close;
L_nice_14:
mes "[Helper Santa]";
mes "Now you can became a Santa too!";
getitem 511,1;
close;
L_nice_15:
mes "[Helper Santa]";
mes "These gloves should keep you warm.";
getitem 564,1;
close;
L_nice_16:
mes "[Helper Santa]";
mes "This should keep you warm.";
getitem 624,1;
close;
L_nice_17:
mes "[Helper Santa]";
mes "This should keep you warm.";
getitem 564,1;
close;
L_only_once:
mes "[Helper Santa]";
mes "You already got one from me.";
close;
L_no:
mes "[Helper Santa]";
mes "You're not in the Christmas spirit?";
mes "I hope you get into this gift extravaganza soon.";
close;
}
|
