summaryrefslogtreecommitdiff
path: root/npc/quests/monstertamers.txt
blob: 2d33df7fea41881e6475a3fd471ea5581b006659 (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
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
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
//===== eAthena Script =======================================
//= Monster Tamers
//===== By: ==================================================
//= kobra_k88, Darkchild, x[tsk]
//===== Current Version: =====================================
//= 1.3
//===== Compatible With: =====================================
//= eAthena 1.0
//===== Description: =========================================
//= Cute pet quest items
//===== Additional Comments: =================================
//= May not have all of the Monster Tamers, but the ones here are fully working.
//= 1.1 Fixed exploits [Lupus]
//= 1.2 Removed Duplicates [Silent]
//= 1.3 Added Bongun's taming item quest. Credits to Lone_Wolf. [SinSloth]
//============================================================


//<================================================= Alberta ===============================================>\\
alberta_in,173,77,3	script	Monster Tamer#01	125,{
	mes "[Monster Tamer Iwado]";
	mes "Monster taming has never been more popular than it is now! Why not join in on all of the excitement?....";
M_Menu:
	next;
	menu 	"^5555FFMonster Taming^000000",M_0,
		"^5555FF'Monster Juice'^000000",M_1,
		"^5555FF'Singing Flower'^000000",M_2,
		"^5555FF'Wild Flower'^000000",M_3,
		"Please make one for me",M_Make,
		"Cancel",M_End;
	M_0:
		mes "[Monster Tamer Iwado]";
		mes "Monster Taming is the way in which players can get certain monsters to become their pets.";
		mes "By using a ^5555FF'Taming Item'^000000 a player can lure a monster into becoming a pet.";
		next;
		mes "[Monster Tamer Iwado]";
		mes "These Taming Items are very hard to come by, but Monster Tamer Guild members such as myself can get them to you without any hassle.";
		next;
		mes "[Monster Tamer Iwado]";
		mes "Here the Taming Items that I offer:";
		mes "^5555FF'Monster Juice'^000000";
		mes "^5555FF'Singing Flower'^000000";
		mes "^5555FF'Wild Flower'^000000";
		next;
		mes "[Monster Tamer Iwado]";
		mes "These are fantastic items! You should really give them a try!";
		goto M_Menu;
	M_1:
		mes "[Monster Tamer Iwado]";
		mes "It is a drink made from animal blood.  It's nothing a person would want to drink, but for the monster '^FF5555'Hunter Fly'^000000, it's a delicacy.";
		next;
		mes "[Monster Tamer Iwado]";
		mes "I can give you a ^5555FF'Monster Juice'^000000 in exchange for:";
		mes "-^FF5555'1 Animal Gore'";
		mes "-'2 Apples'^000000";
		next;
		mes "[Monster Tamer Iwado]";
		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
		goto M_Menu;
	M_2:
		mes "[Monster Tamer Iwado]";
		mes "The flower of a Singing Plant.  It is a very unique and unusual item that seems to attract ^FF5555'Rockers'^000000.";
		next;
		mes "[Monster Tamer Iwado]";
		mes "I can give you a ^5555FF'Singing Flower'^000000 in exchange for:";
		mes "-^FF5555'1 Singing Plant'^000000";
		next;
		mes "[Monster Tamer Iwado]";
		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
		goto M_Menu;
	M_3:
		mes "[Monster Tamer Iwado]";
		mes "This flower blooms naturally here in Rune-Midgard.  It can be used as armor for your ^FF5555Orc Warrior^000000 pet.";
		mes "I can give you a ^5555FF'Wild Flower'^000000 in exchange for:";
		mes "-^FF5555'1 Fancy Flower'";
		mes "-'1 Clover'^000000";
		next;
		mes "[Monster Tamer Iwado]";
		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
		goto M_Menu;
	M_Make:
		mes "[Monster Tamer Iwado]";
		mes "Which Taming Item would you like?";
		next;
		menu "^5555FF'Monster Juice'^000000",sM_1, "^5555FF'Singing Flower'^000000",sM_2, "^5555FF'Wild Flower'^000000",sM_3, "Cancel",M_End;

		sM_1:
			if(countitem(702)<1 || countitem(512)<2) goto sL_NoItems;
			delitem 702,1;
			delitem 512,2;
			mes "[Monster Tamer Iwado]";
			mes "Alright, just a minute while I prepare the tame......";
			next;
			mes "[Monster Tamer Iwado]";
			mes "Here you are! A Monster Juice! Enjoy and feel free to come back anytime.";
			getitem 626,1;
			close;
		sM_2:
			if(countitem(707)<1) goto sL_NoItems;
			delitem 707,1;
			mes "[Monster Tamer Iwado]";
			mes "Alright, just a minute while I prepare the tame......";
			next;
			mes "[Monster Tamer Iwado]";
			mes "Here you are! A Singing Flower! Enjoy and feel free to come back anytime.";
			getitem 629,1;
			close;
		sM_3:
			if(countitem(2207)<1 || countitem(705)<1) goto sL_NoItems;
			delitem 2207,1;
			delitem 705,1;
			mes "[Monster Tamer Iwado]";
			mes "Alright, just a minute while I prepare the tame......";
			next;
			mes "[Monster Tamer Iwado]";
			mes "Here you are! A Wild Flower! Enjoy and feel free to come back anytime.";
			getitem 10009,1;
			close;

			sL_NoItems:
				mes "[Monster Tamer Iwado]";
				mes "It looks like you don't have enough items to exchange for this tame.  Please come back when you do.";
				close;
	M_End:
		mes "[Monster Tamer Iwado]";
		mes "Oh... I see.  You probably haven't decided on what monster to raise as a pet yet.  It's a very important decision, so please, take your time.";
		close;

}


//<================================================= Al De Baran ===============================================>\\
aldeba_in,167,177,3	script	Monster Tamer#02	125,{
	mes "[Monster Tamer YuU]";
	mes "You must be looking for some Taming Items.... When it comes to making Taming Items there is no one better than me here in Rune Midgard.";
M_Menu:
	next;
	menu 	"^5555FF'Monster Taming'^000000",M_0,
		"^5555FF'Skull Helm'^000000",M_1,
		"^5555FF'Monster Oxygen Mask'^000000",M_2,
		"^5555FF'Silk Ribbon'^000000",M_3,
		"^5555FF'Stellar Hairpin'^000000",M_4,
		"^5555FF'Tiny Egg Shell'^000000",M_5,
		"^5555FF'Rocker Glasses'^000000",M_6,
		"Please make one for me",M_Make,
		"Cancel",M_End;
	M_0:
		mes "[Monster Tamer YuU]";
		mes "Monster Taming is the way in which players can get certain monsters to become their pets.";
		mes "By using a ^5555FF'Taming Item'^000000 a player can lure a monster into becoming a pet.";
		next;
		mes "[Monster Tamer YuU]";
		mes "Once you obtain a pet, you must show it love and appreciation.  This is the most important part of monster taming.";
		next;
		mes "[Monster Tamer YuU]";
		mes "The best way to show your new pet you care, is to get it an 'Accessory' to make it stand out from the rest of the monsters in Rune Midgard.";
		next;
		mes "[Monster Tamer YuU]";
		mes "These ^5555FF'Cute Pet Accessories'^000000 are very hard to come by, but Monster Tamer Guild members such as myself can get them to you without any hassle.";
		next;
		mes "[Monster Tamer YuU]";
		mes "Here the Taming Items that I offer:";
		mes "^5555FF'Skull Helm'";
		mes "'Monster Oxygen Mask'";
		mes "'Silk Ribbon'";
		mes "'Stellar Hairpin'";
		mes "'Tiny Egg Shell'";
		mes "'Rocker Glasses'^000000";
		next;
		mes "[Monster Tamer YuU]";
		mes "These are fantastic items! You should really give them a try!";
		goto M_Menu;
	M_1:
		mes "[Monster Tamer YuU]";
		mes "It may be disgusting, but it has a mysterious power that has the potential to make its wearer go crazy!";
		mes "This item will look great on your '^FF5555'Baphomet Jr.'^000000 pet.";
		next;
		mes "[Monster Tamer YuU]";
		mes "I can give you a ^5555FF'Skull Helm'^000000 in exchange for:";
		mes "-^FF5555'1 Bone Helm'^000000";
		next;
		mes "[Monster Tamer YuU]";
		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
		goto M_Menu;
	M_2:
		mes "[Monster Tamer YuU]";
		mes "Once worn it makes it difficult to tell whether or not the wearer is a monster or a human.";
		mes "A great gift for your ^FF5555'Choncon', 'Steel Choncon', or 'Hunter Fly'^000000.";
		next;
		mes "[Monster Tamer YuU]";
		mes "I can give you a ^5555FF'Monster Oxygen Mask'^000000 in exchange for:";
		mes "-^FF5555'1 Oxygen Mask'^000000";
		next;
		mes "[Monster Tamer YuU]";
		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
		goto M_Menu;
	M_3:
		mes "[Monster Tamer YuU]";
		mes "It's a high quality ribbon knitted out of smooth silk.  It will make your pet ^FF5555'Lunatic'^000000 look even cuter!.";
		next;
		mes "[Monster Tamer YuU]";
		mes "I can give you a ^5555FF'Silk Ribbon'^000000 in exchange for:";
		mes "-^FF5555'1 Ribbon (0 Slotts)'^000000";
		next;
		mes "[Monster Tamer YuU]";
		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
		goto M_Menu;
	M_4:
		mes "[Monster Tamer YuU]";
		mes "It is extremely sharp and possesses a mysterious power that makes monsters want to wear it.";
		mes "Your ^FF5555'Green Petite'^000000 will love wearing this!";
		next;
		mes "[Monster Tamer YuU]";
		mes "I can give you a ^5555FF'Stellar Hairpin'^000000 in exchange for:";
		mes "-^FF5555'1 Stellar'^000000";
		next;
		mes "[Monster Tamer YuU]";
		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
		goto M_Menu;
	M_5:
		mes "[Monster Tamer YuU]";
		mes "This seems to have a peculiar scent and a magnificent shine! It can be used as armor for your ^FF5555'Picky'^000000.";
		mes "I can give you a ^5555FF'Tiny Egg Shell'^000000 in exchange for:";
		mes "-^FF5555'1 Egg Shell'^000000";
		next;
		mes "[Monster Tamer YuU]";
		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
		goto M_Menu;
	M_6:
		mes "[Monster Tamer YuU]";
		mes "Mysterious pair of eye glasses which make its wearer look like a geek.  It's perfect for your ^FF5555Rocker^000000 pet.";
		next;
		mes "[Monster Tamer YuU]";
		mes "I can give you a pair of ^5555FF'Rocker Glasses'^000000 in exchange for:";
		mes "-^FF5555'1 Ribbon (0 Slotts)'";
		mes "-'2 Zargon'";
		mes "-'400 Zeny'^000000";
		next;
		mes "[Monster Tamer YuU]";
		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
		goto M_Menu;
	M_Make:
		mes "[Monster Tamer YuU]";
		mes "Which Taming Item would you like?";
		next;
		menu 	"^5555FF'Skull Helm'^000000",sM_1,
			"^5555FF'Monster Oxygen Mask'^000000",sM_2,
			"^5555FF'Silk Ribbon'^000000",sM_3,
			"^5555FF'Stellar Hairpin'^000000",sM_4,
			"^5555FF'Tiny Egg Shell'^000000",sM_5,
			"^5555FF'Rocker Glasses'^000000",sM_6,
			"Cancel",M_End;

		sM_1:
			if(countitem(5017)<1) goto sL_NoItems;
			delitem 5017,1;
			mes "[Monster Tamer YuU]";
			mes "Alright, just a minute while I prepare the tame......";
			next;
			mes "[Monster Tamer YuU]";
			mes "Here you are! A Skull Helm! Enjoy and feel free to come back anytime.";
			getitem 10001,1;
			close;
		sM_2:
			if(countitem(5004)<1) goto sL_NoItems;
			delitem 5004,1;
			mes "[Monster Tamer YuU]";
			mes "Alright, just a minute while I prepare the tame......";
			next;
			mes "[Monster Tamer YuU]";
			mes "Here you are! A Monster Oxygen Mask! Enjoy and feel free to come back anytime.";
			getitem 10002,1;
			close;
		sM_3:
			if(countitem(2208)<1) goto sL_NoItems;
			delitem 2208,1;
			mes "[Monster Tamer YuU]";
			mes "Alright, just a minute while I prepare the tame......";
			next;
			mes "[Monster Tamer YuU]";
			mes "Here you are! A Silk Ribbon! Enjoy and feel free to come back anytime.";
			getitem 10007,1;
			close;
		sM_4:
			if(countitem(2294)<1) goto sL_NoItems;
			delitem 2294,1;
			mes "[Monster Tamer YuU]";
			mes "Alright, just a minute while I prepare the tame......";
			next;
			mes "[Monster Tamer YuU]";
			mes "Here you are! Stellar Hairpin! Enjoy and feel free to come back anytime.";
			getitem 10011,1;
			close;
		sM_5:
			if(countitem(5015)<1) goto sL_NoItems;
			delitem 5015,1;
			mes "[Monster Tamer YuU]";
			mes "Alright, just a minute while I prepare the tame......";
			next;
			mes "[Monster Tamer YuU]";
			mes "Here you are! A Tiny Egg Shell! Enjoy and feel free to come back anytime.";
			getitem 10012,1;
			close;
		sM_6:
			if(countitem(2208)<1 || countitem(912)<2 || Zeny<400) goto sL_NoItems;
			delitem 2208,1;
			delitem 912,2;
			set Zeny, Zeny-400;
			mes "[Monster Tamer YuU]";
			mes "Alright, just a minute while I prepare the tame......";
			next;
			mes "[Monster Tamer YuU]";
			mes "Here you are! A pair of Rocker Glasses! Enjoy and feel free to come back anytime.";
			getitem 10014,1;
			close;

			sL_NoItems:
				mes "[Monster Tamer YuU]";
				mes "It looks like you don't have enough items to exchange for this tame.  Please come back when you do.";
				close;
	M_End:
		mes "[Monster Tamer YuU]";
		mes "Oh... I see.  You probably haven't decided on what monster to raise as a pet yet.  It's a very important decision, so please, take your time.";
		close;

}


//<================================================= Izlude ===============================================>\\
izlude_in,128,64,3	script	Monster Tamer#03	125,{
	mes "[Monster Tamer Shogo]";
	mes "Are you pre-occupied with gathering items for your cute pets, and want a break? Then let us find those items for you.....";
M_Menu:
	next;
	menu 	"^5555FFMonster Taming^000000",M_0,
		"^5555FF'Book of Devil'^000000",M_1,
		"^5555FF'No Recipient'^000000",M_2,
		"^5555FF'Horror of Tribe'^000000",M_3,
		"Please make one for me",M_Make,
		"Cancel",M_End;
	M_0:
		mes "[Monster Tamer Shogo]";
		mes "Monster Taming is the way in which players can get certain monsters to become their pets.";
		mes "By using a ^5555FF'Taming Item'^000000 a player can lure a monster into becoming a pet.";
		next;
		mes "[Monster Tamer Shogo]";
		mes "These Taming Items are very hard to come by, but Monster Tamer Guild members such as myself can get them to you without any hassle.";
		next;
		mes "[Monster Tamer Shogo]";
		mes "Here the Taming Items that I offer:";
		mes "^5555FF'Book of Devil'^000000,";
		mes "^5555FF'No Recipient'^000000,";
		mes "^5555FF'Horror of Tribe'^000000.";
		next;
		mes "[Monster Tamer Shogo]";
		mes "These are fantastic items! You should really give them a try!";
		goto M_Menu;
	M_1:
		mes "[Monster Tamer Shogo]";
		mes "This book is far too powerfull for any mere mortal to read and contains the secret method of summoning a devil!";
		mes "Use it to lure the monster ^FF5555'Baphomet Jr.'^000000.";
		next;
		mes "[Monster Tamer Shogo]";
		mes "I can give you a ^5555FF'Book of Devil'^000000 in exchange for:";
		mes "-^FF5555'1 Old Magic Book'";
		mes "-'2 Horrendous Mouth'^000000";
		next;
		mes "[Monster Tamer Shogo]";
		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
		goto M_Menu;
	M_2:
		mes "[Monster Tamer Shogo]";
		mes "An old letter which wasn't delivered because of an unkown recipient.";
		mes "It has no meaning to any living human, but ^FF5555'Munaks'^000000 seem to be very fond of it.";
		next;
		mes "[Monster Tamer Shogo]";
		mes "I can give you a ^5555FF'No Recipient'^000000 in exchange for:";
		mes "-^FF5555'1 Old Portrait'^000000";
		next;
		mes "[Monster Tamer Shogo]";
		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
		goto M_Menu;
	M_3:
		mes "[Monster Tamer Shogo]";
		mes "This trophy is an ^FF5555'Orc Warrior's'^000000 favorite item.";
		mes "I can give you a ^5555FF'Horror of Tribe'^000000 in exchange for:";
		mes "-^FF5555'1 Chivalry Emblem'";
		mes "-'1 Scorpion Tail'^000000";
		next;
		mes "[Monster Tamer Shogo]";
		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
		goto M_Menu;
	M_Make:
		mes "[Monster Tamer Shogo]";
		mes "Which Taming Item would you like?";
		next;
		menu "^5555FF'Book of Devil'^000000",sM_1, "^5555FF'No Recipient'^000000",sM_2, "^5555FF'Horror of Tribe'^000000",sM_3, "Cancel",M_End;

		sM_1:
			if(countitem(1006)<1 || countitem(958)<2) goto sL_NoItems;
			delitem 1006,1;
			delitem 958,2;
			mes "[Monster Tamer Shogo]";
			mes "Alright, just a minute while I prepare the tame......";
			next;
			mes "[Monster Tamer Shogo]";
			mes "Here you are! A Book of Devil! Enjoy and feel free to come back anytime.";
			getitem 642,1;
			close;
		sM_2:
			if(countitem(7014)<1) goto sL_NoItems;
			delitem 7014,1;
			mes "[Monster Tamer Shogo]";
			mes "Alright, just a minute while I prepare the tame......";
			next;
			mes "[Monster Tamer Shogo]";
			mes "Here you are! A No Recipient! Enjoy and feel free to come back anytime.";
			getitem 636,1;
			close;
		sM_3:
			if(countitem(1004)<1 || countitem(904)<1) goto sL_NoItems;
			delitem 1004,1;
			delitem 904,1;
			mes "[Monster Tamer Shogo]";
			mes "Alright, just a minute while I prepare the tame......";
			next;
			mes "[Monster Tamer Shogo]";
			mes "Here you are! A Horror of Tribe! Enjoy and feel free to come back anytime.";
			getitem 635,1;
			close;

			sL_NoItems:
				mes "[Monster Tamer Shogo]";
				mes "It looks like you don't have enough items to exchange for this tame.  Please come back when you do.";
				close;
	M_End:
		mes "[Monster Tamer Shogo]";
		mes "Oh... I see.  You probably haven't decided on what monster to raise as a pet yet.  It's a very important decision, so please, take your time.";
		close;
}

//'Her heart' item to catch Bongun

comodo,112,182,0	script	Munak's Grandma	103,{
	if (countitem(1558) > 0) {
		mes "[Munak's grandma]";
		mes "Oh my...";
		mes "Have you seen my granddaughter,";
		if (Sex == 1) {
			mes "boy? My poor granddaughter";
		}
		else {
			mes "young lady? My poor granddaughter";
		}
		mes "has been missing...";
		next;
		mes "[Munak's Grandma]";
		mes "I can't remember exactly when it";
		mes "was, but when I lived in Payon, I";
		mes "had a cute granddaughter. She";
		mes "was really happy when I made her";
		mes "hair like ^000077Danggie^000000...";
		next;
		mes "[Munak's Grandma]";
		mes "She was alwaying working with the";
		mes "village chief... She was such a sweet";
		mes "girl, and always got along with";
		mes "chief's son...";
		next;
		mes "[Munak's Grandma]";
		mes "But one day our deity became angry";
		mes "and cursed the chief's son with a";
		mes "sickness! The village had to offer";
		mes "my granddaughter to him as a";
		mes "companion to lift the curse...";
		next;
		mes "[Munak's Grandma]";
		mes "The chief's son regained his";
		mes "health, but I lost my";
		mes "granddaughter! I can't look at him";
		mes "and not think of her, so I tried to";
		mes "leave my misery behind and came";
		mes "here to Comodo...";
		next;

		switch(select("Oh come on! Cheer up!:Um, is this diary...?")) {

		case 1:
			mes "[Munak's Grandma]";
			mes "It seems my granddaughter haunts my";
			mes "dreams every night. I believe I've";
			mes "been trying to cheer up for years";
			mes "now...";
			close;

		case 2:
			if (countitem(901) > 0) {
				mes "[Munak's Grandma]";
				mes "Oh god!";
				mes "It's my granddaughter's diary!";
				mes "Th-This is her writing! Oh my...!";
				next;
				mes "[Munak's Grandma]";
				if (Sex == 1) {
					mes "Young man... I'll read this to you if";
				}
				else {
					mes "Young lady... I'll read this to you if";
				}
				mes "you give it to me with a Danggie,";
				mes "please. I no longer have anything";
				mes "that belonged to her now...";
				next;

				switch(select("No way.:Ok, I'll.")) {

				case 1:
					mes "[Munak's Grandma]";
					mes "Oh...?";
					if (Sex == 1) {
						mes "Alright, young man.";
						mes "Thank you anyway.";
					}
					else {
						mes "Thank you anyway,";
						mes "young lady";
					}
					next;
					mes "[Munak's Grandma]";
					mes "It's alright...";
					mes "I can only hope that the deity is";
					mes "taking good care of her!";
					close;

				case 2:
					delitem 1558,1;
					delitem 901,1;
					mes "[Munak's Grandma]";
					if (Sex == 1) {
						mes "Oh!";
						mes "Thank you,";
						mes "young man~!";
					}
					else {
						mes "Goodness!";
						mes "Thank you,";
						mes "young lady...";
					}
					next;
					mes "[Munak's Grandma]";
					mes "Alright...";
					mes "I'll read this.";
					mes "Let me see...";
					next;
					mes "[Munak's Grandma]";
					mes "It seems that my granddaughter was";
					mes "treated by the chief like his own";
					mes "child! There are so many happy";
					mes "memories in this book!";
					next;
					getitem 659,1;
					mes "[Munak's Grandma]";
					mes "Oh, thank you. I now have a good";
					mes "keepsake of my granddaughter. Thank";
					mes "you so much! May God-Poing bless";
					mes "you!";
					close;

				}

			}

			else {
				mes "[Munak's Grandma]";
				mes "What? A diary? What's that diary...?";
				mes "I don't... I can't remember, oh my...";
				next;
				mes "[Munak's Grandma]";
				mes "I really wish I could make her hair";
				mes "into a ^000077Danggie^000000 again. I really";
				mes "wish... Oh, oh my granddaughter...";
				close;
			}


		}

	}

	else {
		mes "[Munak's Grandma]";
		mes "My own granddaughter...";
		mes "Why did she have to leave...?";
		close;
	}

}