summaryrefslogtreecommitdiff
path: root/npc/re/cities/malangdo.txt
blob: 58e6be2f3f50a5c86ee3513dadab01eaa3a148d8 (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
//===== rAthena Script ======================================= 
//= Malangdo Town
//===== By: ================================================== 
//= Muad_Dib
//===== Current Version: ===================================== 
//= 1.2
//===== Compatible With: ===================================== 
//= rAthena SVN
//===== Description: ========================================= 
//= Malangdo Town Script
//===== Additional Comments: ================================= 
//= 1.0 First version. [Euphy]
//= 1.1 Added entrance scripts.
//= 1.2 Added Official coordinates for Odgnalam [Streusel]
//============================================================

// Entrance :: malangdo_go
//============================================================
-	script	Dolangmal	-1,{
	if (checkquest(5091) == -1) {
		mes "[Dolangmal]";
		mes "Hey~! Hi human~ This is Mr. Dolangmal. kakaka~";
		next;
		mes "[Dolangmal]";
		mes "We are sent to here to take you to the heaven of cat, ^A2314BMeow Meow Island^000000.";
		next;
		mes "[Dolangmal]";
		set .@s$,"Why don't you go to ^A2314BMeow Meow Island^000000? ";
		switch(atoi(strnpcinfo(2))) {
			case 1: mes "How is that? Crowd people in Prontera is good, but why don't you go our heaven of the cat, ^A2314BMeow Meow Island^000000?"; break;
			case 2: mes "Why don't you go to ^A2314BMeow Meow Island^000000? That place is better than geffen where only simple honest wizards are crowded."; break;
			case 3: mes "Fresh air Payon is not bad, but why don't you go better palce the heaven of the cat, ^A2314BMeow Meow Island^000000?"; break;
			case 4: mes .@s$+"The beautiful and quiet place is better than Aldebaran where is so noisy with ticktock sound of clock."; break;
			case 5: mes .@s$+"The beautiful and quiet place is better than Morroc where is so hot and sandstorm?"; break;
			case 6: mes .@s$+"The beautiful place is better than Yuno where are full of headache books."; break;
			case 7: mes .@s$+"The complex place is better than Rachel where is too queit horribly?"; break;
			case 8: mes .@s$+"The safety place is better than Lighthanlzen where is too dangerous."; break;
			case 9: mes .@s$+"The smell of sea place is better than Mora where is full of grass smell."; break;
		}
		next;
		if(select("No:^A2314BMeow Meow Island^000000~ Go~ Go~") == 1) {
			mes "[Dolangmal]";
			mes "What!? You don't want to go ^A2314BMeow Meow Island^000000? Chet!";
			next;
			mes "[Dolangmal]";
			mes "You such an annoying guy. If you don't go, why did you talk to me... but...";
			next;
			mes "[Dolangmal]";
			mes "^9E1837Admiral Thomas^000000 said kidnapping human.. No.. Bring them politely?";
			next;
			mes "[Dolangmal]";
			mes "Anyway I got you. Whenever you want to go, just tell me.";
			close;
		}
		mes "[Dolangmal]";
		mes "Ok! I like your attitude with full of passion.";
		next;
		mes "[Dolangmal]";
		mes "Now, before you go ^A2314BMeow Meow Island^000000, let me tell you some detail of caution.";
		next;
		mes "[Dolangmal]";
		mes "First!! It is natural thing. When you arrive on the ^A2314BMeow Meow Island^000000, should notify that you are here to ^9E1837Admiral Thomas^000000..";
		next;
		mes "[Dolangmal]";
		mes "If you don't do that, you might be attacked by scary and wild cats when you walk on dark street.";
		next;
		mes "[Dolangmal]";
		mes "Secondly!! This ^A2314BMeow Meow Island^000000 is absolutely our island of cat even though we open to the human.";
		next;
		mes "[Dolangmal]";
		mes "We have a personality... no... no... respect us like one catality because we are cats.";
		next;
		mes "[Dolangmal]";
		mes "And the next one is...";
		next;
		mes "Dolangmal must say that just say some cautions, but he said 100 kinds of cautions.";
		next;
		mes "[Dolangmal]";
		mes "Ok! That is all for cautions!! It's easy and simple cautions... how is that? Can you keep this all?";
		next;
		if(select("Keep this cautions:Can't keep this cautions") == 2) {
			mes "[Dolangmal]";
			mes "What!? Can't you keep this easy rule? Chet!";
			next;
			mes "[Dolangmal]";
			mes "You such an annoying guy. If you can't keep this, why did not tell me during the conversation. I told you everything..tierd.. but..";
			next;
			mes "[Dolangmal]";
			mes "^9E1837Admiral Thomas^000000 said kidnapping human.. No.. Bring them politely?";
			next;
			mes "[Dolangmal]";
			mes "Anyway I got you. Just tell me whenever you want to go.";
			close;
		}
		mes "[Dolangmal]";
		mes "Ok! Do not bite two mice with one mouth. ^9E1837Admiral Thomas^000000 is located at the ^A2314Bcenter of ship in Meow Meow Island^000000.";
		next;
		mes "[Dolangmal]";
		mes "Don't forget give notice of arrival.";
		next;
		mes "[Dolangmal]";
		mes "Alright. Let's go to the heaven of the cat, ^A2314BMeow Meow Island^000000~";
		setquest 5091;
		completequest 5091;
		warp "malangdo",217,85;
		close;
	}
	mes "[Dolangmal]";
	mes "Uh? You must be last time...? Alright. Did you visit ^A2314BMeow Meow Island^000000?";
	next;
	if(select("Take me to ^A2314BMeow Meow Island^000000 again:I have visited") == 1) {
		mes "[Dolangmal]";
		mes "I really want to send you there, but I can't because of the policy. It is difficult to send people who visit ^A2314BMeow Meow Island^000000 at first.";
		next;
		mes "[Dolangmal]";
		mes "And you just heard roughly what I said... It is supposed to be rule 53...";
		next;
		mes "[Dolangmal]";
		mes "Specially, let me tell you rule 53. I am an indulgent cat.";
		next;
		mes "[Dolangmal]";
		mes "If you want to go back to ^A2314BMeow Meow Island^000000, just take ship at Izlude or Alberata.";
		next;
		mes "[Dolangmal]";
		mes "If you enjoy pleasant sea trip, you will arrive the heaven of cat ^A2314BMeow Meow Island^000000.";
		next;
		mes "[Dolangmal]";
		mes "So easy! Isn't it? Well, good bye~";
		close;
	}
	mes "[Dolangmal]";
	mes "How is that? You like it? I knew it. Kakaka";
	next;
	mes "[Dolangmal]";
	mes "Ah! I just want to make sure..";
	next;
	mes "[Dolangmal]";
	mes "Again, if you want to go back to ^A2314BMeow Meow Island^000000, do you know that take a ship at Izlude or Alberta?";
	next;
	mes "[Dolangmal]";
	mes "Hm~ You might know that because you are smart person. Well, see you again~";
	close;
}
prontera,114,77,6	duplicate(Dolangmal)	Dolangmal#1	553
geffen,109,61,6	duplicate(Dolangmal)	Dolangmal#2	553
payon,200,106,4	duplicate(Dolangmal)	Dolangmal#3	553
aldebaran,170,104,4	duplicate(Dolangmal)	Dolangmal#4	553
morocc,168,275,4	duplicate(Dolangmal)	Dolangmal#5	553
yuno,165,122,4	duplicate(Dolangmal)	Dolangmal#6	553
rachel,121,126,4	duplicate(Dolangmal)	Dolangmal#7	553
lighthalzen,254,83,5	duplicate(Dolangmal)	Dolangmal#8	553
mora,57,150,4	duplicate(Dolangmal)	Dolangmal#9	553


izlude,182,218,4	script	Odgnalam#iz	554,{
	if (strnpcinfo(4) == "izlude")
		mes "Receiving the warm sun of Izlude, the cat is sleeping.";
	else if (strnpcinfo(4) == "alberta")
		mes "Receiving the warm sun of Alberta, the cat is sleeping.";
	next;
	if(select("Let him sleep:Talk to him") == 1) close;
	mes "[Odgnalam]";
	mes "Meow? Uh?";
	next;
	if (ep13_yong1 == 0) {
		set .@price,1000;
		set .@s1$,"Huh!! You are such an annoying person. Let me send you to the heaven of the cat, ^A2314BMeow Meow Island^000000 with ^0000FF1000 Zeny^000000.";
		set .@s2$,"Money? Where is the money? You can't go anywhere without the money. Shame on you.";
	} else if (ep13_yong1 < 60) {
		set .@price,999;
		set .@s1$,"You have a little relationship with fleet of cat. I'll give you special discount price ^0000FF999 Zeny^000000 to the heaven of the cat, ^A2314BMeow Meow Island^000000, because you have relationship with fleet.";
		set .@s2$,"Where is the money? You don't have a sense of honor.";
	} else if (ep13_yong1 > 59 && ep13_yong1 < 80) {
		set .@price,500;
		set .@s1$,"You gave several help to our cat's fleet so let me give you special that with 50% discount price ^0000FF500 Zeny^000000. I'll send you to the heaven of the cat, ^A2314BMeow Meow Island^000000.";
		set .@s2$,"You don't have any money for paying 50% discount price? I can't believe it.";
	} else {
		mes "[Odgnalam]";
		mes "You are a hero of cat's fleet. Your activity is the legend between us.";
		next;
		mes "[Odgnalam]";
		mes "As you are hero of fleet so let me send you to the heaven of the cat, ^A2314BMeow Meow Island^000000 for free.";
		next;
		if(select("Let's go Meow Meow Island!!:Do not go") == 1) {
			mes "[Odgnalam]";
			mes "Have a comfortable trip... Alright let's go~";
			warp "malangdo",217,85;
		}
		close;
	}
	mes "[Odgnalam]";
	mes .@s1$;
	next;
	if(select("Let's go Meow Meow Island!!:Do not go") == 2) close;
	if (Zeny < .@price) {
		mes "[Odgnalam]";
		mes "Money? Where is the money? You can't go anywhere without the money. Shame on you.";
		close;
	}
	set Zeny, Zeny - .@price;
	mes "[Odgnalam]";
	mes "Let me send you right away. Let's go~";
	warp "malangdo",217,85;
	close;
}
alberta,200,151,4	duplicate(Odgnalam#iz)	Odgnalam#albe	554

malangdo,219,86,4	script	Kong#malang	545,{
	mes "[Kong]";
	mes "Did you have fun in Malangdo?";
	mes "The fleet has a service to Izlude and Alberta.";
	next;
	if (ep13_yong1 == 0) {
		set .@price,1000;
		set .@s1$, "1000 zeny";
		set .@s2$, "Have a nice day in Meow Meow Island.";
		set .@no_money$, "It is difficult for free.";
		set .@yes_money$, "Have a nice trip.";
		mes "[Kong]";
		mes "The fee of ship is only 1000 zeny, where you want to go?";
		next;
	} else if (ep13_yong1 < 60) {
		set .@price,999;
		set .@s1$,"999 zeny";
		set .@s2$, "Have a full of fortune day in Meow Meow Island...";
		set .@no_money$, "It is difficult even though you have a relationship with fleet.";
		set .@yes_money$, "Thanks, have a wonderful trip.";
		mes "[Kong]";
		mes "You have a connection with our fleet. Apply special price 999 zeny. Where do you want to go?";
		next;
	} else if (ep13_yong1 > 59 && ep13_yong1 < 80) {
		set .@price,500;
		set .@s1$,"500 zeny";
		set .@s2$, "There are full of fortune and jackpot in Meow Meow Island.";
		set .@no_money$, "Oh my god. You don't have 500 zeny? It is difficult for free.";
		set .@yes_money$, "Have nice trip and come again.";
		mes "[Kong]";
		mes "Wow~ You contributed our fleet a lot. Alright!! Special discount price 500 zeny. Where do you want to go?";
		next;
	} else {
		set .@price,0;
		set .@s1$,"Free for hero of fleet!!";
		set .@s2$, "No one objects the hero of fleet to stay in Meow Meow Island...";
		mes "[Kong]";
		mes "Ah... You are the hero of cat's fleet and it is the legend.";
		next;
		mes "[Kong]";
		mes "We can't charge from hero of fleet. Where is your destination?";
		next;
	}
	set .@i, select("- Izlude destination --- "+.@s1$+":- Alberta destination --- "+.@s1$+":- Stay on Malangdo");
	mes "[Kong]";
	if (.@i == 3) {
		mes .@s2$;
		close;
	}
	if (ep13_yong1 > 80) {
		mes "Have a comfortable trip.";
		if (.@i == 1)
			warp "izlude",195,212;
		else
			warp "alberta",192,150;
		close;
	}
	if (Zeny < .@price) {
		mes .@no_money$;
		close;
	}
	set Zeny, Zeny - .@price;
	mes .@yes_money$;
	if (.@i == 1)
		warp "izlude",195,212;
	else
		warp "alberta",192,150;
	close;
}

// Town NPCs :: malang_tre
//============================================================
malangdo,147,117,3	script	Innkeeper#malang	554,{
	mes "Can see a lazy cat standing on a chair.";
	mes "Thought it is an Innkeeper, but do not looks like that having a business.";
	next;
	switch(select("Can I rest in hammock?:Want to store in inn.:Looks free at the moment.")) {
	case 1:
		mes "[Innkeeper]";
		mes "You can use hammock as you want but give me ^FF00005 pieces of Malang Sp Can^000000, then will make you stress out.";
		next;
		switch(select("Give the can.:No need.")) {
		case 1:
			if (countitem(12636) > 4) {
				delitem 12636,5; //Malang_Sp_Can
				percentheal 100,100;
				specialeffect2 EF_HEALSP;
				mes "[Innkeeper]";
				mes "Take a relaxation.";
				emotion e_kis;
				next;
				warp "malangdo",140,121;
				close;
			}
			mes "[Innkeeper]";
			mes "It looks like lack of cans.";
			close;
		case 2:
			mes "[Innkeeper]";
			mes "You are strong man than appearance.";
			close;
		}
	case 2:
		mes "[Innkeeper]";
		mes "Storation is done. We should keep company haha.";
		savepoint "malangdo",142,118;
		close;
	case 3:
		mes "[Innkeeper]";
		mes "A busy moment make you hurry and laziness makes you lazy.";
		next;
		mes "- Wonder if there is work time. -";
		close;
	}
	close;
}

malangdo,151,120,3	script	Wandering Minstrel#mal	479,{
	mes "[Wandering Minstrel]";
	mes "I have a sleepy momnet whenever seeing that innkeeper. So comfortable...";
	close;
}

malangdo,149,120,5	script	Wandering Wanderer#mal	485,5,1,{
	mes "[Wandering Wanderer]";
	mes "Cats living in here is so energetic.";
	mes "And it makes me dance~";
	close;
OnTouch:
	switch(rand(5)) {
	case 0:
		soundeffect "ring_of_nibelungen.wav",0;
		break;
	case 1:
		soundeffect "dont_forget_me_not.wav",0;
		break;
	case 2:
		soundeffect "humming.wav",0;
		break;
	case 3:
		soundeffect "assassin_of_sunset.wav",0;
		break;
	case 4: 
		emotion e_ho;
		emotion e_ho,0,"Wandering Minstrel#mal";
		break;
	}
	end;
}

malangdo,216,168,3	script	Cat Trainer#mal1	558,0,8,{
	emotion e_awsm;
	mes "[Cat Trainer]";
	mes "Phh there is a tail and butt with soft and tender!";
	mes "Can't stand, this is heaven~~!!";
	next;
	emotion e_gg;
	mes "[Cat Trainer]";
	mes "My hidden card ^FF0000<Silvervine Fruit>^000000 can make all cats in Meow Meow Island as my slaves~ haha!";
	next;
	select("^FF0000<Silvervine Fruit>^000000?");
	mes "[Cat Trainer]";
	mes "Silvervine Fruit is a rare item!";
	mes "I can barely get it.";
	mes "But every cat must love this one with no complaint.";
	next;
	select("Where can I get ^FF0000<Silvervine Fruit>^000000?");
	mes "[Cat Trainer]";
	mes "How do you get it that I could have it barely?";
	mes "This can't be taken even with ^3131FFall the zeny in this world^000000!";
	next;
	emotion e_gg;
	mes "[Cat Trainer]";
	mes "Cats in Meow Meow Island is mine...! And it should be done haha~";
	mes "^FF0000<Silvervine Fruit>^000000! I can be a king in Meow Meow Island~ ohhhh!!!";
	close;
OnTouch:
	emotion e_flash;
	end;
}
malangdo,164,203,3	duplicate(Cat Trainer#mal1)	Cat Trainer#mal2	853,5,8