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
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
|
//================= Hercules Script =======================================
//= _ _ _
//= | | | | | |
//= | |_| | ___ _ __ ___ _ _| | ___ ___
//= | _ |/ _ \ '__/ __| | | | |/ _ \/ __|
//= | | | | __/ | | (__| |_| | | __/\__ \
//= \_| |_/\___|_| \___|\__,_|_|\___||___/
//================= License ===============================================
//= This file is part of Hercules.
//= http://herc.ws - http://github.com/HerculesWS/Hercules
//=
//= Copyright (C) 2012-2015 Hercules Dev Team
//= Copyright (C) Kisuka
//=
//= Hercules is free software: you can redistribute it and/or modify
//= it under the terms of the GNU General Public License as published by
//= the Free Software Foundation, either version 3 of the License, or
//= (at your option) any later version.
//=
//= This program is distributed in the hope that it will be useful,
//= but WITHOUT ANY WARRANTY; without even the implied warranty of
//= MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
//= GNU General Public License for more details.
//=
//= You should have received a copy of the GNU General Public License
//= along with this program. If not, see <http://www.gnu.org/licenses/>.
//=========================================================================
//= In Memory of Heroes
//================= Description ===========================================
//= iRO Memorial Day (2008)
//================= Current Version =======================================
//= 1.2
//=========================================================================
//== Lauds =================================================
prontera,182,214,4 script Lauds#Memorial 1_M_MERCHANT,{
if (Memorial08 < 1) {
mes "[Mad Sago Lauds]";
mes "Hey, yo!";
mes "What are you doing there!?";
next;
mes "[Mad Sago Lauds]";
mes "Do you know what day it is!?";
mes "It's a very important date!";
mes "A very important date to remember!";
next;
mes "[Mad Sago Lauds]";
mes "What is this!?";
emotion e_gasp;
next;
mes "[Mad Sago Lauds]";
mes "Where is your towel!?";
next;
mes "[" + strcharinfo(PC_NAME) + "]";
mes "My what?";
next;
mes "[Mad Sago Lauds]";
mes "How are you supposed to go on your trip without your towel!?";
next;
mes "[Mad Sago Lauds]";
mes "If you think this is just another holiday, I'm not going to waste my breath.";
mes "But if you like to pay a tribute to great soldiers, I will help you ready yourself.";
next;
if (select("I guess so...", "Are you crazy or something?") == 2) {
mes "[Mad Sago Lauds]";
mes "Fine, be unprepared!";
next;
mes "[Mad Sago Lauds]";
mes "";
mes "^FF0000YOU WILL RUE THE DAY!^000000";
close;
}
mes "[Mad Sago Lauds]";
mes "Great!";
mes "Then listen to me carefully.";
next;
mes "[Mad Sago Lauds]";
mes "Now before you can pay tribute to the fallen soldiers you must be properly equipped.";
mes "Without your towel you will be lost!";
mes "If you bring me the materials, I can make you a towel.";
next;
mes "[Mad Sago Lauds]";
mes "Listen closely.";
mes "Bring me ^FF000030 Fabric and 20 Fluffs^000000.";
Memorial08 = 1;
close;
} else if (Memorial08 == 1) {
if (countitem(Transparent_Cloth) < 30 || countitem(Fluff) < 20) {
mes "[Mad Sago Lauds]";
mes "What are these? They aren't enough?!";
mes "*Sigh* Do I really have to tell you again?!";
mes "Bring me ^FF000030 Fabric and 20 Fluffs^000000.";
close;
} else {
mes "***Mad Sago Lauds appears to be muttering to himself***";
next;
mes "[Mad Sago Lauds]";
mes "So, did you bring the towel materials?";
next;
mes "[Mad Sago Lauds]";
mes "Excellent; you've brought them all.";
mes "Then I shall make you a Towel of Memory as I promised.";
mes "Give me a moment.";
next;
mes "[Mad Sago Lauds]";
mes "There you go!";
delitem 1059,30;
delitem 914,20;
getitem 6025,1;
getnameditem 6025," + strcharinfo(PC_NAME) + ";
Memorial08 = 2;
close;
}
} else if (Memorial08 == 2) {
mes "[Mad Sago Lauds]";
mes "Ah, you have fluffy new towel now I even put your name on it";
next;
mes "[Mad Sago Lauds]";
mes "Say, how do you like to go on a journey to pay a tribute to Memorial Day?";
next;
if (select("Sure.", "No, I'm Busy.") == 2) {
mes "[Mad Sago Lauds]";
mes "Don't come crying to me if someone decides to build a highway through your home!";
close;
}
mes "[Mad Sago Lauds]";
mes "Good. By the way, do you even know what the towel is for?";
next;
mes "[Mad Sago Lauds]";
mes "It seems you're just carrying it without understanding its meaning.";
mes "What a shame! You should go speak to ^FF0000Grast in Prontera^000000.";
Memorial08 = 3;
close;
} else if (Memorial08 == 3) {
mes "[Mad Sago Lauds]";
mes "What are you still doing here?";
mes "I told you to go speak to Grast in Prontera!";
close;
} else if (Memorial08 == 4 || Memorial08 == 5 || Memorial08 == 6) {
mes "[Mad Sago Lauds]";
mes "Go help Grast, and then come back.";
close;
} else if (Memorial08 == 7) {
mes "[Mad Sago Lauds]";
mes "Oh, you've brought them all.";
mes "Hahaha!";
mes "HAHAHAHAHAHA!!!! cough cough";
next;
mes "[Mad Sago Lauds]";
mes "Please give them to me. Thank you for your hard work, by the way.";
mes "Say, have you learned anything from the journey?";
mes "Now is to go visit the plaque at 12 o'clock direction in Prontera.";
next;
mes "[Mad Sago Lauds]";
mes "What do you mean you were just there?";
next;
mes "[Mad Sago Lauds]";
mes "What? Why are you giving me your garbage!";
mes "Those items are not useful to me at all.";
mes "You should be going to the plaque!";
Memorial08 = 8;
close;
} else if (Memorial08 == 8) {
mes "[Mad Sago Lauds]";
mes "Stop trying to give me your garbage!";
mes "Go to the plaque at 12 o'clock direction in Prontera for your journey!";
close;
} else if (Memorial08 >= 9) {
.@RandomMsg = rand(1,5);
if (.@RandomMsg == 1) {
mes "[Mad Sago Lauds]";
mes "Don't panic!";
emotion e_gasp;
close;
}
else if (.@RandomMsg == 2) {
mes "[Mad Sago Lauds]";
mes "Life... is like a grapefruit.";
mes "It's orange and squishy, and has a few pips in it, and some folks have half a one for breakfast.";
close;
}
else if (.@RandomMsg == 3) {
mes "[Mad Sago Lauds]";
mes "There was a point to this story, but it has temporarily escaped the chronicler's mind.";
close;
}
else if (.@RandomMsg == 4) {
mes "[Mad Sago Lauds]";
mes "42!";
close;
}
else if (.@RandomMsg == 5) {
mes "[Mad Sago Lauds]";
mes "It is a mistake to think you can solve any major problems just with potatoes.";
close;
}
}
}
//== Memorial Plaque =======================================
prontera,153,286,4 script Memorial Plaque#Memorial 4_BOARD3,{
if (Memorial08 < 8) {
mes "[" + strcharinfo(PC_NAME) + "]";
mes "- It's a dusty old plaque.-";
close;
} else if (Memorial08 == 8) {
mes "[" + strcharinfo(PC_NAME) + "]";
mes "- It's a dusty old plaque.-";
mes "'This must be what Lauds was talking about.'";
mes "'Let's dust it off with the towel.'";
next;
Memorial08 = 9;
getexp 93750,43750;
}
mes "- You see a message from the cleaned plaque.-";
next;
mes "-Although no sculptured marble should rise to their memory,-";
mes "-nor engraved stone bear record of their deeds,-";
mes "-yet will their remembrance be as lasting as the land they honored.-";
mes "-Daniel Webster-";
if (Memorial08 == 9) {
getexp 93750,43750;
}
next;
mes "-There's another message.-";
next;
mes "-I may not have gone where I intended to go,-";
mes "-but I think I have ended up where I needed to be.-";
mes "- Douglas Adams.-";
if (Memorial08 == 9) {
getexp 93750,43750;
}
next;
mes "-This is the last message.-";
next;
mes "-True heroism is remarkably sober, very undramatic.-";
mes "-It is not the urge to surpass all others at whatever cost,-";
mes "- but the urge to serve others at whatever cost. -";
mes "- Arthur Ashe -";
if (Memorial08 == 9) {
getexp 93750,43750;
Memorial08 = 10;
}
close;
}
//== Grast =================================================
prontera,150,270,4 script Grast#Memorial 4_M_HUMERCHANT,{
if (Memorial08 < 3) {
mes "[Grast]";
mes "Memorial Day is a sad and yet glorious day.";
mes "I wonder how many people remember them...";
close;
} else if (Memorial08 == 3) {
mes "[Grast]";
mes "Oh, isn't that a Towel of Memory?";
mes "I'm so glad to meet someone who understands the meaning of Memorial Day.";
next;
mes "[Grast]";
mes "It is very important to know what we're celebrating today, don't you think?";
next;
mes "[Grast]";
mes "If you like to go on a journey to pay a tribute to Memorial Day, you should bring me some materials I ask.";
next;
mes "[Grast]";
mes "Please bring me ^FF0000one of each Red Potion, Green Potion, Awakening Potion, and Butterfly Wing^000000.";
mes "I'll be waiting for your return.";
Memorial08 = 4;
close;
} else if (Memorial08 == 4) {
if (countitem(Red_Potion) < 1 || countitem(Green_Potion) < 1 || countitem(Awakening_Potion) < 1 || countitem(Wing_Of_Butterfly) < 1) {
mes "[Grast]";
mes "Oops, you haven't brought all materials.";
mes "Please make sure you need to bring me";
mes "^FF0000one of each Red Potion, Green Potion, Awakening Potion, and Butteryfly Wing^000000.";
next;
mes "[Grast]";
mes "You'll have to bring me more materials afterwards.";
mes "If you feel too burdened to gather them all,";
mes "I can provide you all the materials.";
next;
if (select("I'll gather the rest.", "Give me the materials.") == 2) {
callsub L_GiveUp;
}
callsub L_Continue;
} else {
mes "[Grast]";
mes "Oh, you've brought the materials I asked.";
next;
mes "[Grast]";
mes "Hmm, you will need some more things still...";
next;
mes "[Grast]";
mes "Please bring me ^FF0000one of each Trap, Yggdrasil Leaf, Blue Gemstone, Crystal Mirror, Meat, and Carrot.^000000";
mes "I'll be waiting for your return.";
Memorial08 = 5;
close;
}
} else if (Memorial08 == 5) {
if (countitem(Booby_Trap) < 1 || countitem(Leaf_Of_Yggdrasil) < 1 || countitem(Blue_Gemstone) < 1 || countitem(Crystal_Mirror) < 1 || countitem(Meat) < 1 || countitem(Carrot) < 1) {
mes "[Grast]";
mes "Oops, you haven't brought all materials.";
mes "Please make sure you'll have to bring me";
mes "^FF0000one of each Trap, Yggdrasil Leaf, Blue Gemstone, Crystal Mirror, Meat, and Carrot^000000.";
next;
mes "[Grast]";
mes "You'll have to bring me more materials afterwards.";
mes "If you feel too burdened to gather them all, I can provide you all the materials.";
next;
if (select("I'll gather the rest.", "Give me the materials.") == 2) {
callsub L_GiveUp;
}
callsub L_Continue;
} else {
mes "[Grast]";
mes "Oh, you've brought everything I asked.";
mes "Hmm, I think you need just a little bit more.";
next;
mes "[Grast]";
mes "Please bring me ^FF0000one of each Pet Incubator, Firecracker, Poring Doll, and Bouquet^000000.";
Memorial08 = 6;
close;
}
} else if (Memorial08 == 6) {
if (countitem(Pet_Incubator) < 1 || countitem(Fire_Cracker) < 1 || countitem(Poring_Doll) < 1 || countitem(Wedding_Bouquet) < 1) {
mes "[Grast]";
mes "Oops, you haven't brought all materials.";
mes "Please make sure you need to bring me";
mes "^FF0000one of each Pet Incubator, Firecracker, Poring Doll and Bouquet";
next;
mes "[Grast]";
mes "They are the last batch of materials.";
mes "If you feel too burdened to gather them all, I can provide you all the materials.";
next;
mes "[Grast]";
mes "If I provide you all materials, however, I won't have to thank you for your service.";
mes "It's your call, " + strcharinfo(PC_NAME) + ".";
next;
if (select("I'll gather the rest.", "Give me the materials.") == 2) {
callsub L_GiveUp;
}
callsub L_Continue;
} else {
mes "[Grast]";
mes "Have you brought the materials I asked?";
mes "Ah, thank you for your hard work you've brought all of them.";
next;
mes "[Grast]";
mes "I hope you'll learn a valuable lesson while gathering these materials.";
mes "I like to give you a small gift for your service.";
next;
mes "[Grast]";
mes "You see, I have two different gifts in my each hand.";
mes "A best thing would be giving you both of them, but...";
mes "How do you like to test your luck, " + strcharinfo(PC_NAME) + "?";
next;
mes "[Grast]";
mes "Okay, which hand would you like to pick?";
next;
if (select("Left hand.", "Right hand.") == 2) {
mes "[Grast]";
mes "You've selected my right hand.";
mes "Here's the gift for you.";
mes "Now, please bring all these materials to Lauds.";
Memorial08 = 7;
getitem 617,1;
close;
}
mes "[Grast]";
mes "You've selected my left hand.";
mes "Here's the gift for you.";
mes "Now, please bring all these materials to Lauds.";
Memorial08 = 7;
getitem 12109,1;
close;
}
} else if (Memorial08 == 7) {
mes "[Grast]";
mes "Have you met Lauds?";
mes "I hope you'll remember your freedom and happiness are built on thousands of lives sacrificed in war.";
close;
} else if (Memorial08 >= 8) {
mes "[Grast]";
mes "A towel is about the most massively useful thing an adventurer can have.";
close;
}
L_GiveUp:
mes "[Grast]";
mes "Oh, I see. I guess you're quite busy nowadays, huh?";
mes "No problem; I'll give you all the supplies...";
next;
mes "[Grast]";
mes "There you go.";
mes "I crushed all the items together into a more compact form for you.";
mes "You can thank me later for that extra service.";
mes "Please bring them to Lauds.";
Memorial08 = 7;
getitem 7126,1;
next;
mes "[Grast]";
mes "By the way, he had an unfortunate accident, and has kind of lost his mind.";
mes "Please don't be alarmed even if he starts babbling.";
close;
L_Continue:
mes "[Grast]";
mes "That's a good idea.";
mes "Then I'll be waiting for your return.";
close;
}
|
