Context Navigation

aldebaran.txt @ 25

Revision 1, 54.2 kB (checked in by jinshiro, 17 years ago)

Line
1	//===== eAthena Script =======================================
2	//= Al De Baran Town
3	//===== By: ==================================================
4	//= eAthena dev team; L0ne_W0lf
5	//===== Current Version: =====================================
6	//= 2.3
7	//===== Compatible With: =====================================
8	//= eAthena SVN
9	//===== Description: =========================================
10	//= [Aegis Conversion]
11	//= Al De Baran Town NPCs
12	//===== Additional Comments: =================================
13	//= v1.1 Added RS125 NPC. Added another Kafra Reserve points agent.
14	//= The 2nd reserve points agent is not complete yet.
15	//= 1.2 Lottery input number fix [Lupus], 1.2a - label typo fixed
16	//= 1.3 Gatekeeper's bug fixed (wrong check and wrong item ID
17	//= for underground), fixed some typos [Lupus]
18	//= 1.4 Fixed Typos & Spellcheck [massdriller]
19	//= 1.5 Finally added the Special Reserve 2 Lotto 8))
20	//= with official prizes (80% official, 4-5 entries are made up)
21	//= also changed typo Orange Potions -> Red Potions [Lupus]
22	//= 1.6 Fixed bug (missing label), optimized all menus [Lupus]
23	//= 1.7 Fixed exploits [Lupus] 1.8 Removed Duplicates [Silent]
24	//= 1.9 Fixed a bunch of typos with information from Crono/Hollengrhen [Evera]
25	//= 1.9a Now Pavianne doesn't sell Kafra Passes. She refunds them [Lupus]
26	//= 2.0 Re-made all the dialog-only NPCs with official dialogs.
27	//= Kafra and Clock Tower NPCs pending remake. [DZeroX]
28	//= 2.01 removed all .GATs [Lupus]
29	//= 2.1 Rescripted most NPCs to Aegis 10.3 standards. [L0ne_W0lf]
30	//= 2.2 Corrected NPC names to fall within proper resctrictions. [L0ne_W0lf]
31	//= 2.3 Fixed exploit with kafra pass
32	//============================================================
33
34	// Al De Baran
35	//============================================================
36	aldebaran,113,70,4 script Forger Munster#alde 48,{
37	mes "[Munster]";
38	mes "My family used to live in Geffen. So I guess it was natural that we studied forging and eventually became Blacksmiths. Then, we finally moved to this town,";
39	mes "Al De Baran.";
40	next;
41	if (select("About ^3355FFItem Upgrade^000000:Quit") == 1) {
42	mes "[Munster]";
43	mes "My father was a famous blacksmith in Geffen, and he taught me a lot about forging equipment.";
44	next;
45	mes "[Munster]";
46	mes "One of the fundamentals is that the success probability of upgrading an item depends on the level of the weapon.";
47	next;
48	mes "[Munster]";
49	mes "For level 1 weapons, you may upgrade up to + 7 without the risk of breaking the weapon. Level 2 weapons can be upgraded to +6. Level 3 weapons can be upgraded to +5 safely.";
50	next;
51	mes "[Munster]";
52	mes "For level 4 weapons, you can upgrade + 4 without too much risk. As for armors, you can upgrade them to +4. But if the upgrade for the equipment fails, it will be destroyed!";
53	close;
54	}
55	mes "[Munster]";
56	mes "Hmm...";
57	mes "If you get a chance, try to visit my father's workshop here in Al de Baran. If I may say so, he's a pretty talented Blacksmith.";
58	close;
59	}
60
61	aldebaran,64,104,4 script Smithing Guy#alde 55,{
62	mes "[Quatro]";
63	mes "Have you heard that a famous Blacksmith moved here from Geffen?";
64	next;
65	if (select("Famous Blacksmith?:End Conversation") == 1) {
66	mes "[Quatro]";
67	mes "From what I've heard, he's one of those Blacksmiths that can upgrade your weapons and armor. When you upgrade a weapon, its attack strength is increased.";
68	next;
69	mes "[Quatro]";
70	mes "For each upgrade level, attack strength increases by 2 for level 1 weapons. On level 2 weapons, 3 attack strength is added.";
71	next;
72	mes "[Quatro]";
73	mes "On level 3 weapons, 5 attack strength is added for each level, and for level 4 weapons, 7 attack strength is added for each level.";
74	close;
75	}
76	mes "[Quatro]";
77	mes "This Blacksmith's family lives here, since his wife is sick and weak. Because of her condition, she needs to take medicinal herbs that grow near Al de Baran.";
78	next;
79	mes "[Quatro]";
80	mes "They also have a dutiful son who's always helping out with the family business. I'm sure that kid will grow up to become a good Blacksmith like his father.";
81	close;
82	}
83
84	aldebaran,49,93,4 script Young Man#alde 83,{
85	mes "[Miller]";
86	mes "Aren't level 4 weapons cool!";
87	mes "I can't believe such powerful";
88	mes "weapons exist!";
89	next;
90	mes "[Miller]";
91	mes "Well, they're rarely seen in the open market, but boss monsters will drop them by a low chance if you happen to be able to kill them.";
92	close;
93	}
94
95	aldebaran,81,61,4 script Shell Gathering Lady#ald 101,{
96	mes "[Joanne]";
97	mes "I enjoy gathering shells from the sea. It's really fun and relaxing~";
98	next;
99	if (select("Shell Gathering?:End Conversation") == 1) {
100	mes "[Joanne]";
101	mes "When you see bubbles popping up from the sand or muddy puddles, try digging into the ground a bit. You might find some shells underneath the ground!";
102	next;
103	mes "[Joanne]";
104	mes "Have you heard";
105	mes "of Ambernite?";
106	mes "That shell monster";
107	mes "is pretty tough~";
108	next;
109	mes "[Joanne]";
110	mes "It's usually seen at the beach near the west province of Prontera. If you ever try attacking it without being prepared, you might be in trouble.";
111	next;
112	mes "[Joanne]";
113	mes "Ambernite is";
114	mes "pretty strong!";
115	mes "So look out for it!";
116	close;
117	}
118	mes "[Joanne]";
119	mes "Ambernite is";
120	mes "pretty strong!";
121	mes "So look out for it!";
122	close;
123	}
124
125	aldebaran,46,129,4 script Canal Guy#alde 97,{
126	mes "[Panama]";
127	mes "Al De Baran is known world wide as the City of Canals. The waterways really add a sophisticated, romantic touch to our fair city.";
128	next;
129	switch(select("About the Canals:End Conversation")) {
130	case 1:
131	mes "[Panama]";
132	mes "Well, a canal is an artificial waterway used for travel,";
133	mes "shipping, or irrigation.";
134	next;
135	mes "[Panama]";
136	mes "However, the canals over here are just for show. If we needed to transport anything, we just use the Kafra Corporation Teleport service!";
137	close;
138	break;
139	case 2:
140	mes "[Panama]";
141	mes "I have that you will enjoy your stay in Al De Baran.";
142	close;
143	break;
144	}
145	}
146
147	aldebaran,67,154,4 script Forest Guy#alde 98,{
148	mes "[Isenberg]";
149	mes "Mt. Mjolnir and Payon Forest.";
150	mes "Both of those places are tough";
151	mes "to travel through.";
152	next;
153	switch(select("Mt.Mjolnir?:Payon Forest...?:End Conversation")) {
154	case 1:
155	mes "[Isenberg]";
156	mes "To arrive here from Prontera or Geffen, you've got to cross the Mjolnir Mountains.";
157	next;
158	mes "[Isenberg]";
159	mes "If you've made it here by foot without using the Kafra Teleportation service,";
160	mes "then good job!";
161	next;
162	mes "[Isenberg]";
163	mes "The Mjolnir Mountains are really steep, and it's full of aggressive and hostile monsters. So it's always a risk to travel through there alone.";
164	close;
165	case 2:
166	mes "[Isenberg]";
167	mes "If you wish to visit Alberta or the city of Payon, you must first travel through the Payon Forest.";
168	next;
169	mes "[Isenberg]";
170	mes "The Payon Forest is a winding, intricate maze where it's easy to get lost. Unless you concentrate and keep track of your path, you might be stuck wandering in that dangerous place.";
171	next;
172	mes "[Isenberg]";
173	mes "Payon, the Archer Village, was built deep inside this steep and rugged forest so that it may be protected from outside invaders. So I guess that a good decision on their part.";
174	close;
175	case 3:
176	mes "[Isenberg]";
177	mes "The huge mountains surrounding this town";
178	mes "blocks people from outside to come into this town.";
179	mes "That may be a part of the reason how we have been able to";
180	mes "keep this beautiful canal and mysterious alchemy";
181	mes "without any influence from outside.";
182	close;
183	}
184	}
185
186	aldebaran,90,170,4 script Slot Guy#alde 47,{
187	mes "[Epthiel]";
188	mes "Some weapons or armor have Slots where you can insert Cards obtained from monsters.";
189	next;
190	switch(select("About the number of Slots:Relation between Cards and Slots:End Conversation")) {
191	case 1:
192	mes "[Epthiel]";
193	mes "Items dropped by monsters possess more Slots than ordinary weapons or armor sold in NPC shops.";
194	next;
195	mes "[Epthiel]";
196	mes "I guess you can assume that an item with more Slots is more valuable than the same item with fewer Slots.";
197	close;
198	case 2:
199	mes "[Epthiel]";
200	mes "Once a Card is inserted into a Slot, it is impossible to remove it. So please be careful when you insert Cards into weapons or armor.";
201	next;
202	mes "[Epthiel]";
203	mes "Also, when you mouse over equipment in the Item Window or Vending Window, the name of the item will be followed by the number of its Slots in brackets.";
204	next;
205	mes "[Epthiel]";
206	mes "For example, a Shield with 1 Slot, when moused over, would display the name 'Shield [1].'";
207	next;
208	mes "[Epthiel]";
209	mes "You may also right-click an item, and check the Card Slot window below the item description window for the number of Slots.";
210	close;
211	case 3:
212	mes "[Epithiel]";
213	mes "Have you ever obtained a card from a monster?";
214	close;
215	}
216	}
217
218	aldebaran,117,181,4 script Phracon Guy#alde 48,{
219	mes "[Joy]";
220	mes "Level 1 weapons, which are the lowest grade, need a metal named ^3355FFPhracon^000000 in order to be upgraded.";
221	next;
222	switch(select("About Phracon:Advice about Phracon:End Conversation")) {
223	case 1:
224	mes "[Joy]";
225	mes "Phracon is a pretty common metal and can be found all over the Rune-Midgard continent.";
226	next;
227	mes "[Joy]";
228	mes "Although it lacks the strength of other metals, it's easy to find and obtain. You can get Phracons by killing monsters or by buying them in Forging Shops in towns.";
229	next;
230	mes "[Joy]";
231	mes "When you no longer need Phracons because you are using higher level weapons, you can sell them for some zeny!";
232	close;
233	case 2:
234	mes "[Joy]";
235	mes "Well, I hear lots of monsters carry Phracons and will drop them once killed. Why don't you go hunting for them?";
236	next;
237	mes "[Joy]";
238	mes "It shouldn't be too difficult. Once I found a Phracon that dropped after killing a Bebe Savage! But if you're desperate, you can always buy them at the Forging Shop.";
239	close;
240	case 3:
241	mes "[Joy]";
242	mes "Good luck with finding Phracons!";
243	close;
244	}
245	}
246
247	aldebaran,121,231,4 script Alchemy Guy#alde 49,{
248	mes "[Chemirre]";
249	mes "Alchemists, one of the 2nd Jobs, are able to create items out of several materials using knowledge from the ancient age of Al De Baran.";
250	next;
251	switch(select("About Alchemy in Payon:Definition of Alchemy:. . . . .:End Conversation")) {
252	case 1:
253	mes "[Chemirre]";
254	mes "Most people don't know that there was an oriental form of Alchemy that developed in Payon.";
255	next;
256	mes "[Chemirre]";
257	mes "These Payon Alchemists were able to create Gold out of different materials. However, Payon Alchemy never advanced as much as the Alchemy in Al De Baran.";
258	next;
259	mes "[Chemirre]";
260	mes "Materials for Alchemy in Payon were scarse and interest in that field eventually waned. Now, you can only study Alchemy here in Al De Baran.";
261	next;
262	mes "[Chemirre]";
263	mes "Still, I can't help but wonder what secrets were lost after the Payon art of Alchemy disappeared from the face of the Earth...";
264	close;
265	case 2:
266	mes "[Chemirre]";
267	mes "Alchemists specialize in chemical research in order to create useful items out of various things.";
268	next;
269	mes "[Chemirre]";
270	mes "I also hear that they create all sorts of Potions, and can even summon certain monsters! It seems that their studies have all sorts of nifty applications.";
271	close;
272	case 3:
273	mes "[Chemirre]";
274	mes "You are bored, aren't you?";
275	mes "Alright then, I will tell you a story about monster cards and item slots.";
276	mes "As you already know, if you ever have obtained a monster card before,";
277	next;
278	mes "[Chemirre]";
279	mes "you can only insert a monster card to an item";
280	mes "that satisfies the card's location requirement.";
281	mes "For instance, let's say, you have obtained a Poring Card.";
282	next;
283	mes "[Chemirre]";
284	mes "When you right click on the card, you will see";
285	mes "its ability as LUK+2 and Perfect Dodge+1";
286	mes "and its location as 'Armor'. ";
287	next;
288	mes "[Chemirre]";
289	mes "If you try to insert this card to a dagger with many slots,";
290	mes "it is not going to work because the card only can be inserted to";
291	mes "armor items.";
292	next;
293	mes "[Chemirre]";
294	mes "Almost every armor items that are being sold";
295	mes "in town shops do not have slots on them.";
296	mes "That means, you can only obtain";
297	mes "slotted armors by hunting monsters.";
298	next;
299	mes "[Chemirre]";
300	mes "Ah, let me tell you how you can insert a card to an item.";
301	mes "If you want to insert a card on your equipped armor,";
302	mes "you must unequip the armor first.";
303	mes "And then, double click a card that you want to use.";
304	mes "Then a list of armor, that you can insert the card, will be displayed.";
305	next;
306	mes "[Chemirre]";
307	mes "It is not that complicated, is it?";
308	close;
309	case 4:
310	mes "[Chemirre]";
311	mes "You can talk about Rune Midgard's alchemy";
312	mes "without talking about the Al De Baran Alchemist Guild!";
313	mes "Long Live Alchemists!";
314	close;
315	}
316	}
317
318	aldebaran,86,228,4 script Little Kid#alde 62,{
319	mes "[Bebe]";
320	mes "A while ago I went out for a walk toward Mt. Mjolnir with my pet Savage Bebe. His name is NukNuk!";
321	mes "We got attacked, but luckily we weren't hurt.";
322	next;
323	switch(select("Attacked?:About Mt.Mjolnir:End Conversation")) {
324	case 1:
325	mes "[Bebe]";
326	mes "I was walking up a narrow path, and out of the blue, a giant and ugly plant started to attack me and NukNuk!";
327	next;
328	mes "[Bebe]";
329	mes "I was so surprised, so me and NukNuk had to run away. I threw rocks at it, but I don't think I hurt it. It must have been really strong!";
330	next;
331	mes "[Bebe]";
332	mes "What really surprised me was the plant that attacked me was a huge flower with the face of a person! So, look out for those. They're dangerous!";
333	close;
334	case 2:
335	mes "[Bebe]";
336	mes "Even though people are fascinated by the scenic beauty of Mt. Mjolnir, it's full of dangerous monsters!";
337	next;
338	mes "[Bebe]";
339	mes "There are Flowers, Insects, Bees, Butterflies and Moths that are big enough to kill you if you're not careful!";
340	next;
341	mes "[Bebe]";
342	mes "Then again, most of these monsters won't hurt you if you don't attack first. But some of them will attack you once they see you!";
343	close;
344	case 3:
345	mes "[Bebe]";
346	mes "By the way, where is my NukNuk...?";
347	mes "NukNuk! Come out!";
348	close;
349	}
350	}
351
352	aldebaran,159,242,4 script Insect Guy#alde 119,{
353	mes "[Stromme]";
354	mes "Even to a strong Swordman, the Insects or Mt. Mjolnir pose a considerable threat. You've got to know your enemy before engaging it in battle!";
355	next;
356	if (select("About Insects:End Conversation") == 1) {
357	mes "[Stromme]";
358	mes "Honey Bees, Butterflies and Moths seem like simple creatures, but that doesn't mean you should underestimate them.";
359	next;
360	mes "[Stromme]";
361	mes "These Insects have evolved over time, and can counter attacks from threats like you adventurers!";
362	next;
363	mes "[Stromme]";
364	mes "There are also carnivorous Insects, such as praying Spiders, praying Mantises, and the millipede like Argiopes.";
365	next;
366	mes "[Stromme]";
367	mes "These monsters have mutated and are too strong for a person at certain levels. You should especially watch out for Argiopes.";
368	next;
369	mes "[Stromme]";
370	mes "Luckily, their eyesight is pretty bad, so it won't notice you if you walk a safe distance away from it.";
371	close;
372	}
373	mes "[Stromme]";
374	mes "No matter how harmless and pretty insects are,";
375	mes "take heed to not touch them.";
376	mes "They are extremely strong unlike their innocent looking.";
377	mes "Don't belittle the livings in the Mt. Mjolnir.";
378	close;
379	}
380
381	aldebaran,60,70,4 script Sylvia#alde 69,{
382	mes "[Sylvia]";
383	mes "I came all the way here from Prontera because I heard the Kafra Main Office was somewhere here in Al De Baran.";
384	next;
385	mes "[Sylvia]";
386	mes "It shouldn't be that hard to find, but I'm awful at following directions. I always get lost, no matter how hard I try!";
387	next;
388	mes "[Sylvia]";
389	mes "If that wasn't bad enough, I left my Magnifiers back in Prontera, so now I have to find someone to help me with these weapons I've got to appraise!";
390	next;
391	if (select("Appraise?:That's very nice.") == 1) {
392	mes "[Sylvia]";
393	mes "Equipment that is dropped by monsters can't be equipped right away.";
394	next;
395	mes "[Sylvia]";
396	mes "If you right-click the equippable item in the Item Inventory, you'll see that it is Unidentified and that Appraisal is needed. What to do?";
397	next;
398	mes "[Sylvia]";
399	mes "Well, in that case, you've gotta use ^3355FF Magnifier^000000!";
400	next;
401	mes "[Sylvia]";
402	mes "Even without a Blacksmith, Alchemist or Merchant in your party, you can appraise your equipment! Of course, a Magnifier is consumed each time you use one...";
403	close;
404	}
405	mes "[Sylvia]";
406	mes "Hey...";
407	mes "Was that a hint of sarcasm in your voice when you said that?";
408	close;
409	}
410
411	aldebaran,93,80,4 script Issei#alde 48,{
412	mes "[Issei]";
413	mes "Al De Baran is such a wonderful place with its romantic canals and classic architecture. I love nothing more than to stroll through this city with my beautiful girlfriend.";
414	next;
415	if (select("You have a girlfriend?:End Conversation.") == 1) {
416	mes "[Issei]";
417	mes "Hey...";
418	mes "Is that so hard to believe?! Yeah, ask anyone! She really exists! Although, sometimes, just sometimes mind you, she gets too excited about weapons and armor.";
419	next;
420	mes "[Issei]";
421	mes "I mean, instead of enjoying a romantic dinner, she'll just go on about how equipment dropped from monsters is higher quality than those sold in shops...";
422	next;
423	mes "[Issei]";
424	mes "I mean, why should I care if equipment dropped by monsters tend to have more Slots?! I can't even kill a Poring!";
425	next;
426	mes "[Issei]";
427	mes "As you can see,";
428	mes "I'm a lover,";
429	mes " not a fighter.";
430	close;
431	}
432	mes "[Issei]";
433	mes "So, you don't think of me stupid, do you?";
434	close;
435	}
436
437	aldebaran,180,46,4 script Joo Jahk#alde 88,{
438	mes "[Joo Jahk]";
439	mes "I'm a tourist";
440	mes "from Payon,";
441	mes "the City of Forests.";
442	next;
443	mes "[Joo Jahk]";
444	mes "The tempature here in Al De Baran is very cool, probably because of the waterways. Do you think the water in the canals is drinkable?";
445	next;
446	mes "[Joo Jahk]";
447	mes "Well, it's too late for me, since I already drank some. Still, I'm a little worried...";
448	next;
449	if (select("Continue.:End conversation.") == 1) {
450	mes "[Joo Jahk]";
451	mes "On one of my travels around Rune-Midgard, I've heard from a really high level Mage that physical attacks, or magic with Neutral Property, won't damage Spiritual Property monsters.";
452	next;
453	mes "[Joo Jahk]";
454	mes "Maybe that advice will come in handy, now that you know that. Always remember the importance of the Properties of your skills and weapons when battling monsters.";
455	close;
456	}
457	mes "[Joo Jahk]";
458	mes "On the other hand, the water I drank did taste pretty good. Hopefully it didn't have anything too weird in it...";
459	close;
460	}
461
462	aldebaran,212,122,4 script Citizen#alde 97,{
463	mes "[Gavin]";
464	mes "Welcome!";
465	mes "The town of";
466	mes "Al De Baran";
467	mes "welcomes you!";
468	next;
469	mes "[Gavin]";
470	mes "Well, that might be an exaggeration. After all, it's just me that's welcoming you.";
471	mes "Hey there!";
472	next;
473	if (select("Now, tell me about monsters.:End conversation.") == 1) {
474	mes "[Gavin]";
475	mes "Monsters...?";
476	mes "Aren't we straying off topic a little bit? Ah, you must be one of those adventurers!";
477	next;
478	mes "[Gavin]";
479	mes "Can't get your mind off the job, eh? Alright, now there was some monster that I saw just recently...";
480	next;
481	mes "[Gavin]";
482	mes "Ah, now I remember! Just a few days ago, I saw a really interesting looking monster! It was a Poring with Angel's wings!";
483	next;
484	mes "[Gavin]";
485	mes "I swear! He was jumping around somewhere near Mt. Mjolnir with some ordinary Porings. I think he was, like, their leader.";
486	close;
487	}
488	mes "[Gavin]";
489	mes "Awww...";
490	mes "Don't be too disappointed that there's only one person in your welcome wagon!";
491	close;
492	}
493
494	aldebaran,146,124,4 script Town Girl#alde 101,{
495	mes "[Nastasia]";
496	mes "Somewhere in the world there is an ^3355FFAssassin Guild^000000, where they teach people the subtle art of assassination.";
497	next;
498	mes "[Nastasia]";
499	mes "But isn't killing illegal? And do they even collect educational tutition?";
500	next;
501	if (select("Continue conversation.:End Conversation.") == 1) {
502	mes "[Nastasia]";
503	mes "Although Assassins benefit from being very quick and having lots of AGI, they should still have some DEX.";
504	next;
505	mes "[Nastasia]";
506	mes "DEX is especially important if you want to hit monsters with wings. Those monsters are quick moving and fast in attacking.";
507	next;
508	mes "[Nastasia]";
509	mes "In general, if you want to hit monsters that are as fast, or even faster, than you are, you're going to need some DEX.";
510	close;
511	}
512	mes "[Nastasia]";
513	mes "It's usually said that in this world, nothing is free. Still, if you don't have to pay money to learn to be an Assassin...";
514	close;
515	}
516
517	aldebaran,143,136,4 script Bell Keeper#A 89,{
518	mes "[Bell Keeper]";
519	mes "I have been charged by the Committee of 'Heaven on Earth' to guard this entrance of the Clock Tower.";
520	next;
521	if (select("About Clock Tower.:Quit.") == 1) {
522	mes "[Bell Keeper]";
523	mes "Every floor of this tower is connected to each other by a certain device we like to call 'Warp Gear.'";
524	next;
525	mes "[Bell Keeper]";
526	mes "Even though there are interconnecting warps everywhere in the Clock Tower, beware the 'Random Warp.'";
527	next;
528	mes "[Bell Keeper]";
529	mes "The 'Random Warp' will transport you to an unknown spot. Be advised if you don't want to suddenly be separated from your party...";
530	next;
531	mes "[Bell Keeper]";
532	mes "Remember, Random Warps are shown in green on the mini-map. So keep your eyes peeled for that, as well as for those dangerous Clocks.";
533	close;
534	}
535	mes "[Bell Keeper]";
536	mes "Please take heed that this Clock Tower is filled with extremely dangerous monsters.";
537	close;
538	}
539
540	// Inside Al De Baran
541	//============================================================
542	aldeba_in,232,241,4 script RS125#alde 48,{
543	mes "[RS125]";
544	mes "I may sound unhuman rather robotic";
545	mes "however, I hope you will not be afraid of me. I am as humane as you are.";
546	next;
547	mes "[RS125]";
548	mes "I may have a machine heart and I may disturb you with loud noises from the heart,";
549	mes "that will never stop me from running for future of Al De Baran.";
550	next;
551	if (select("Listen to his story.:End Conversation") == 1) {
552	mes "[RS125]";
553	mes "It's been 3 years already.";
554	mes "My brother 996 used to be a short track athlete in the Al De Baran city field team.";
555	mes "Back then, people gave him a nickname, 'Al De Baran's Pco Peco',";
556	mes "for his amazingly fast legs...";
557	next;
558	mes "[RS125]";
559	mes "He became so popular for his exciting play,";
560	mes "so everytime when the 'Al De Baran Turbo Track' was held once every 4 years,";
561	mes "many people from all over the continent came to this city only to see my brother.";
562	mes "I was his manager at the time and I was so stressed out because of his fans.";
563	next;
564	mes "[RS125]";
565	mes "However, there is nothing last forever...";
566	mes "One day, a girl from Payon beat my brother from a game.";
567	next;
568	mes "[RS125]";
569	mes "My brother couldn't accept the fact that he lost the game";
570	mes "so he did too much of practice and had a serious heart attack.";
571	mes "He is still in bed.";
572	next;
573	mes "[RS125]";
574	mes "I am my brother's only hope and the future of Al De Baran!";
575	mes "Please wish me luck, I will beat her, 'Breezy Havana' from Payon!";
576	close;
577	}
578	mes "[RS125]";
579	mes "I want to travel around the world one of thesedays.";
580	mes "If I can see the ocean from the port of Alberta, it must be so wonderful.";
581	mes "After the next year's athletic competition, I will go on a round-the-world tour with my brother.";
582	close;
583	}
584
585	aldeba_in,223,121,4 script Threatening-Looking Man 63,{
586	mes "[Threatening-Looking Man]";
587	mes "Hey, you don't come inside someone else's house without permission.";
588	mes "This is ridiculous!";
589	mes "How dare you to come inside of my house and talk to me as if that is a normal thing to do?";
590	next;
591	mes "[Threatening-Looking Man]";
592	mes "Hahahaha...chill out, I was just joking.";
593	next;
594	if (select("Continue:Quit") == 1) {
595	mes "[Threatening-Looking Man]";
596	mes "You may know this already, but";
597	mes "we have a system called, the mercenary system in this world.";
598	mes "Yes, I am a mercenary soldier.";
599	next;
600	mes "[Threatening-Looking Man]";
601	mes "It is simple. You just pay for someone to aid you in fight.";
602	mes "Better mercenary soldier you want, more money you have to pay, you know?";
603	next;
604	mes "[Threatening-Looking Man]";
605	mes "Let's stop talking about boring stuffs.";
606	mes "I will tell you how you can find a good mercenary soldier.";
607	next;
608	mes "[Threatening-Looking Man]";
609	mes "Check its nose if it is clean and wet.";
610	mes "A good mercenary soldier must have the wet nose";
611	mes "because it shows that the soldier is at his best in health condition.";
612	mes "If the nose is dry, that means that he caught a cold.";
613	next;
614	mes "[Threatening-Looking Man]";
615	mes "And don't forget to check the soldier's ankle.";
616	mes "The best mercenary soldier has thin ankles and a white neck!";
617	mes "If he has long hair, it's better! If the hair is permed and wavy, that's perfect!";
618	next;
619	mes "[Threatening-Looking Man]";
620	mes "Lastly, you have to check whether he is ready to serve you with quality service!";
621	mes "That means, he must do his best in aiding you in fight!";
622	close;
623	}
624	mes "[Threatening-Looking Man]";
625	mes "Get out, now!";
626	mes "If you a cop, show me a warrent,";
627	mes "if you are a member of my family, prove it with your birth mark!";
628	close;
629	}
630
631	aldeba_in,219,61,4 script Friendly-Looking Man#ald 109,{
632	mes "[Friendly-Looking Man]";
633	mes "You don't have to listen to a guy right next to my room.";
634	mes "Two years ago, he was in a mercenary training center and fell off from a tree";
635	mes "while trying to gather a nut from it.";
636	next;
637	mes "[Friendly-Looking Man]";
638	mes "He keeps talking to himself loud and it gives me a headache...";
639	mes "Gosh!";
640	close;
641	}
642
643	aldeba_in,152,47,4 script Fussy Man#alde 97,{
644	mes "[Fussy Man]";
645	mes "Aaaaarrrggghhh...I AM IN TROUBLE!";
646	mes "My little chicken has left me!";
647	mes "Oh, my god! Oh, my god!";
648	next;
649	if (select("What do you call the chicken?:. . . . .") == 1) {
650	mes "[Fussy Man]";
651	mes "I used to call it 'Amazing Picky'...";
652	mes "Sob What should I do! How could this happen!";
653	mes "Please, please help me to find my sweet little chicken!";
654	next;
655	if (select("What? That is such a boring name!:. . . . .") == 1) {
656	mes "[Fussy Man]";
657	mes "Don't be so ridiculous!";
658	mes "'Amazing Picky' is the most wonderful and the most unique name";
659	mes "in this world, and my chicken deserves the name!";
660	close;
661	}
662	mes "[Fussy Man]";
663	mes "You don't care, do you?";
664	mes "I am only child in my family, so I have been thinking of my little chicken as my brother!";
665	mes "I want my chicken back...Sob";
666	close;
667	}
668	mes "[Fussy Man]";
669	mes "You don't care, do you?";
670	mes "I am only child in my family, so I have been thinking of my little chicken as my brother!";
671	mes "I want my chicken back...Sob";
672	close;
673	}
674
675	aldeba_in,156,179,4 script Master#alde 61,{
676	mes "[Master]";
677	mes "The Kafra Corporation Headquarters is located here in Al De Baran.";
678	mes "Do you know";
679	mes "what that means?";
680	next;
681	mes "[Master]";
682	mes "That means those cute Kafra Employees come here for their lunch breaks! Isn't that great?!";
683	next;
684	mes "[Master]";
685	mes "Alright, then!";
686	mes "Pop Quiz Time!";
687	mes "Who's your";
688	mes "favorite Kafra girl?";
689	next;
690	if (sex == 0) {
691	mes "[Master]";
692	mes "Oh, and don't worry. I know that girls have some kind of opinion about how pretty other girls are.";
693	next;
694	}
695	if (select("Awesome!:No way, I ain't a perv.") == 1) {
696	mes "[Master]";
697	mes "Alright, here we go!";
698	mes "Choose your favorite Kafra Lady!";
699	next;
700	mes "[Master]";
701	mes "The original Kafra Mascot, the classic blue haired lady! Candidate Number One: ^3355FFPavianne^000000!";
702	next;
703	mes "[Master]";
704	mes "Her graceful ponytail takes mens' breath away! The fan favorite amongst teen males! Candidate Number Two: ^5533FFBlossom^000000!";
705	next;
706	mes "[Master]";
707	mes "Her long, straight hair, like silk from the East, is her charm point. Direct from Payon, it's Candidate Number Three: ^555555Jasmine^000000!";
708	next;
709	mes "[Master]";
710	mes "A tomboy with bright orange, shortly cut hair. Candidate Number Four: ^1133DDRoxie^000000!";
711	next;
712	mes "[Master]";
713	mes "Intelligent, sophisticated and never seen without her luxurious glasses. It's Candidate Number Five: ^33FF55Leilah^000000!";
714	next;
715	mes "[Master]";
716	mes "Pretty, cute and fresh faced. Although She looks young and immature,She's the best staff!";
717	mes "Candidate Number (6) ^AAAA00Curly Sue^000000 !!";
718	next;
719	switch(select("(1) Pavianne:(2) Blossom:(3) Jasmine:(4) Roxie:(5) Leilah:(6) Curly Sue")) {
720	case 1:
721	mes "[Master]";
722	mes "Oh~";
723	mes "So you're a lover of classics. I respect that very much.";
724	next;
725	mes "[Master]";
726	mes "I'll also guess that you tend to enjoy the original movie more than sequels, and dislike bad imitations. Am I right?";
727	close;
728	case 2:
729	mes "[Master]";
730	mes "Hmmm...";
731	mes "Blossom strikes me as the girl-next-door type. So I guess that's the type of girl you're attracted to, eh?";
732	close;
733	case 3:
734	mes "[Master]";
735	mes "So...";
736	mes "Long, luxurious hair is important to you, hmm? I suppose it such hair makes a woman look quite elegant.";
737	close;
738	case 4:
739	mes "[Master]";
740	mes "Ah, so you tend to like active, spontaneous types. I can understand that...";
741	next;
742	mes "[Master]";
743	mes "Since Roxie isn't exactly the demure housewife type, you probably have an open mind when it comes to defining femininity, right?";
744	close;
745	case 5:
746	mes "[Master]";
747	mes "Ah, so you like the intellectual type. That's good, that's good.";
748	next;
749	mes "[Master]";
750	mes "Still, that Leilah can be cold as stone sometimes. I've seen her shrug off many young men and crush even more hearts!";
751	close;
752	case 6:
753	mes "[Master]";
754	mes "Say whaaat?!";
755	mes "She's too young!";
756	close;
757	}
758	}
759	mes "[Master]";
760	mes "But I worked so hard on this delightful survey! Come now, be a sport! Admiring a pretty woman is like appreciating fine art.";
761	close;
762	}
763
764	aldeba_in,84,166,4 script Kafra Service#alde 117,{
765	cutin "kafra_01",2;
766	mes "[Kafra Pavianne]";
767	mes "Welcome! I'm Pavianne,";
768	mes "one of the senior Kafra Employees. The Kafra Corporation Service is always trying to satisfy 100 % of our customers' expectations.";
769	next;
770	mes "[Kafra Pavianne]";
771	mes "Due to a change in customer support policy, we no longer accept Kafra Passes. However, we are offering refunds for our customers who still possess these passes.";
772	next;
773	if (select("Sell Kafra Pass:Alright, bye~") == 1) {
774	if (countitem(1084) == 0) {
775	mes "[Kafra Pavianne]";
776	mes "I'm sorry,";
777	mes "but you don't";
778	mes "have any Kafra Passes.";
779	close2;
780	cutin "",255;
781	end;
782	}
783	else {
784	set .@kafrapassmoney,countitem(1084)*2000;
785	mes "[Kafra Pavianne]";
786	mes "Let's see...";
787	if (countitem(1084) == 1) {
788	mes "You have 1 Kafra Pass.";
789	mes "You can sell that pass to us for 2000 zeny. Would you like to sell this Kafra Pass back to the Kafra Corporation?";
790	}
791	else {
792	mes "You have "+ countitem(1084) +" Kafra Passes.";
793	mes "If you want to sell them to us, you will receive "+ .@kafrapassmoney +" zeny. Would you like to sell these back to the Kafra Corporation?";
794	}
795	next;
796	if (select("Yes:No") == 1) {
797	if (countitem(1084) == 0) {
798	mes "[Kafra Pavianne]";
799	mes "I'm sorry, but you don't have any Kafra Passes.";
800	close2;
801	cutin "",255;
802	end;
803	}
804	delitem 1084,countitem(1084); //Kapra's_Pass
805	set Zeny,Zeny+.@kafrapassmoney;
806	mes "[Kafra Pavianne]";
807	mes "Thank you.";
808	}
809	close2;
810	cutin "",255;
811	end;
812	}
813	}
814	mes "[Kafra Pavianne]";
815	mes "Thank you,";
816	mes "have a good day.";
817	close2;
818	cutin "",255;
819	end;
820	}
821
822	aldeba_in,83,245,4 script Kafra Service#2alde 116,{
823	cutin "kafra_02",2;
824	mes "[Kafra Blossom]";
825	mes "Welcome to the";
826	mes "Kafra Corporation.";
827	mes "The Kafra Employees are";
828	mes "always here to serve you.";
829	next;
830	mes "[Kafra Blossom]";
831	mes "We appreciate your continued use of the Kafra Service. Please feel free to ask me if you have any questions.";
832	next;
833	switch(select("How does Kafra Storage work?:How do you teleport people?")) {
834	mes "[Kafra Blossom]";
835	mes "Well, adventurers like yourself can place items into Kafra Storage, so that you don't have to carry all of your stuff around.";
836	next;
837	mes "[Kafra Blossom]";
838	mes "Now, the Kafra Storage Window is separated into three tabs into which items are automatically sorted.";
839	next;
840	mes "[Kafra Blossom]";
841	mes "The ^3355FFItem^000000, ^3355FFEquip^000000, and ^3355FFEtc^000000 tabs work just like the tabs in your character Item Inventory.";
842	next;
843	mes "[Kafra Blossom]";
844	mes "Multiple items of the same type will only take up one Slot in the Item and Etc. tabs. For example, 324 Jellopies would take up only one Slot, and 22 Red Potions would take another Slot.";
845	next;
846	mes "[Kafra Blossom]";
847	mes "However, in the Equip tab, each and every single item takes up its own Slot. I guess that's because each and every single equipment can be uniquely upgraded by forging or through Cards.";
848	next;
849	mes "[Kafra Blossom]";
850	mes "There's a total of 300 Slots for all three item categories in the Kafra Storage, so it might be helpful to remember that.";
851	next;
852	break;
853	case 2:
854	mes "[Kafra Blossom]";
855	mes "Oh, I get that question all the time. '^CC0066Oh Blossom, how do you do it?^000000' Well...";
856	next;
857	mes "[Kafra Blossom]";
858	mes "Well, I couldn't really go too much into detail, of course. That's confidential information. But I can tell you our teleportation works through a mix of magic and technology.";
859	next;
860	mes "[Kafra Blossom]";
861	mes "Also, the Kafra girls alone can't teleport our customers. We just receive and process your teleportation request.";
862	next;
863	mes "[Kafra Blossom]";
864	mes "Behind the scenes, skilled professionals and technicians are working 24 hours a day to ensure that you teleport quickly and safely to your destination.";
865	next;
866	break;
867	}
868	mes "[Kafra Blossom]";
869	mes "Anyway, I hope you enjoy your visit here in the Kafra Corporation Headquarters.";
870	if (rand(1,11) == 9) {
871	next;
872	mes "[Kafra Blossom]";
873	mes "...";
874	next;
875	mes "[Kafra Blossom]";
876	mes "...";
877	mes "......";
878	next;
879	mes "[Kafra Blossom]";
880	mes "Oh Mansoo...";
881	}
882	close2;
883	cutin "",255;
884	end;
885	}
886
887	aldeba_in,24,245,4 script Kafra Jasmine#alde 115,{
888	cutin "kafra_03",2;
889	mes "[Kafra Jasmine]";
890	mes "Welcome!";
891	mes "The Kafra service is";
892	mes "always on your side.";
893	next;
894	mes "[Kafra Jasmine]";
895	mes "Thank you for coming all the way to visit us at the Kafra Corporation Headquarters here in Al De Baran!";
896	next;
897	mes "[Kafra Jasmine]";
898	mes "The Kafra Service is always behind our customers with a dependable reputation that has been established over five thousand, eight hundred years...";
899	next;
900	switch(select("What?! I can't believe that!:Ahh~ Shut Up!:Your service is great!")) {
901	case 1:
902	mes "["+ strcharinfo(0) +"]";
903	mes "What?!";
904	mes "I can't";
905	mes "believe that!";
906	next;
907	mes "["+ strcharinfo(0) +"]";
908	mes "FIVE THOUSAND AND EIGHT HUNDRED YEARS?! THAT'S INSANE!";
909	next;
910	mes "[Kafra Jasmine]";
911	mes "Arrrrghh! Shut up and listen! It took me a week to memorize all this! My memory isn't as good as the other Kafra Employees...!";
912	next;
913	mes "[Kafra Jasmine]";
914	mes "Now, um...";
915	mes "As I was saying, the Kafra Corporation was founded eight thousand, five hundred years ago by, um, Emilio Alexander Kafra... Inventor of the word 'Kafra?'";
916	next;
917	mes "[Kafra Jasmine]";
918	mes "He...";
919	mes "He was a great man. He... Argh! I can't remember!";
920	next;
921	mes "[Kafra Jasmine]";
922	mes "Oh no...!";
923	mes "This can't be the right story! Five million, eight hundred years?! It's impossible!";
924	break;
925	case 2:
926	mes "[Kafra Jasmine]";
927	mes "Listen...";
928	mes "Punk.";
929	next;
930	mes "[Kafra Jasmine]";
931	mes "I was a member of the Kafra Garrison before joining the Kafra Service Team. My specialty was ^990000Magnum Break^000000, so if you know what's good for you, don't mess with me.";
932	next;
933	mes "[Kafra Jasmine]";
934	mes "I'm trying my best to live as quietly and as femininely as I can, so don't make me break your knuckles! You got it?!";
935	break;
936	case 3:
937	mes "[Kafra Jasmine]";
938	mes "Hooray!";
939	mes "That's great news to hear. We're always working hard to make sure that our customers are satisfied with the services that we provide.";
940	break;
941	}
942	close2;
943	cutin "",255;
944	end;
945	}
946
947	aldeba_in,142,238,4 script Kafra Service#3alde 114,{
948	cutin "kafra_04",2;
949	mes "[Kafra Roxie]";
950	mes "Welcome~!";
951	mes "The Kafra Corporation will always support Rune-Midgard's adventurers with our excellent services.";
952	next;
953	mes "[Kafra Roxie]";
954	mes "My name is Roxie!";
955	mes "I hope you enjoy";
956	mes "your visit here in";
957	mes "Kafra Corporation's";
958	mes "Headquarters.";
959	next;
960	mes "[Kafra Roxie]";
961	mes "I'm here to answer any of your questions regarding Kafra Corporations policies, as well as take note of any of your feedback.";
962	next;
963	switch(select("Kafra Policies:I love Kafra!")) {
964	case 1:
965	mes "[Kafra Roxie]";
966	mes "So, you'd like more details on our policies and eligibility for our services? What would you like me to explain?";
967	next;
968	switch(select("Kafra Storage:Cart Rental:Actually, never mind.")) {
969	case 1:
970	mes "[Kafra Roxie]";
971	mes "As you probably already know, our customers must have at least Basic Skill level 6 in order to use the Kafra Storage.";
972	next;
973	mes "[Kafra Roxie]";
974	mes "As for the reason for this certain policy, we've had problems with young, fresh faced Novices that would put everything into their Storage.";
975	next;
976	mes "[Kafra Roxie]";
977	mes "Now you remember your days as a Novice. Everything was new and exciting, but zeny was scarce. Well, a lot of Novices would even put their weapons and armor in Kafra Storage.";
978	next;
979	mes "[Kafra Roxie]";
980	mes "However, by this time, they've already spent what little zeny they had to open their Storage. But they don't have enough to access their Storage again!";
981	next;
982	mes "[Kafra Roxie]";
983	mes "So, these weaponless, armorless Novices must fight monsters with their bare hands until they gather the zeny to open their Kafra Storage again!";
984	next;
985	mes "[Kafra Roxie]";
986	mes "It's a silly mistake, to be sure, but we here at Kafra Corporation value human life, and decided on the Basic Skill Level 6 Requirement to prevent this kind of mishap.";
987	break;
988	case 2:
989	mes "[Kafra Roxie]";
990	mes "As you may know, the Kafra Corporation has a special relationship with the Merchant Guild, as well as the Blacksmith and Alchemist guilds in Rune-Midgard.";
991	next;
992	mes "[Kafra Roxie]";
993	mes "The Kafra Corporation only rents Carts to Merchants, Blacksmiths and Alchemists since these job associations have a special contract with us.";
994	next;
995	mes "[Kafra Roxie]";
996	mes "Also, it'd be really impractical to rent carts out to people who couldn't create or sell goods.";
997	next;
998	mes "[Kafra Roxie]";
999	mes "As for Super Novices, well, we're really not supposed to rent carts to them since the Super Novice Society in Al De Baran doesn't have a contract with us.";
1000	next;
1001	mes "[Kafra Roxie]";
1002	mes "If a Kafra Employee rented a Cart to a Super Novice, she'd probably get in big trouble with Leilah...";
1003	break;
1004	case 3:
1005	mes "[Kafra Roxie]";
1006	mes "Oh, alright~!";
1007	mes "If you have any questions,";
1008	mes "please let me know!";
1009	break;
1010	}
1011	break;
1012	case 2:
1013	mes "[Kafra Roxie]";
1014	mes "Thank you!";
1015	mes "It's great to know that we're appreciated by our customers! All of us are working hard to make sure that our service meets your standards of excellence~";
1016	break;
1017	}
1018	close2;
1019	cutin "",255;
1020	end;
1021	}
1022
1023	aldeba_in,91,244,4 script Kafra Service#4alde 112,{
1024	cutin "kafra_06",2;
1025	mes "[Kafra Curly Sue]";
1026	mes "Hello, hello!!";
1027	mes "I'm Curly Sue,";
1028	mes "the newest member";
1029	mes "of the Kafra Staff!";
1030	next;
1031	mes "[Kafra Curly Sue]";
1032	mes "I may still need to learn more about serving our customers, but I'm always doing my best!";
1033	next;
1034	if (select("Where's your mommy, kid?:End conversation.") == 1) {
1035	mes "[Kafra Curly Sue]";
1036	mes "Waaaaaaah~!";
1037	mes "I'm not a kid!";
1038	close2;
1039	cutin "",255;
1040	end;
1041	}
1042	mes "[Kafra Curly Sue]";
1043	mes "Here at Kafra Corporation, we are all doing our very best to give you the excellent service that you expect from us.";
1044	close2;
1045	cutin "",255;
1046	end;
1047	}
1048
1049	// Kafra Special Reserve Point NPCs
1050	//============================================================
1051	// Special Reserve ----------------------------------------------
1052	aldeba_in,79,161,6 script Kafra#04 115,{
1053	cutin "kafra_03",2;
1054	mes "[Kafra]";
1055	mes "Welcome, ^6666FF" + strcharinfo(0) + "^000000. This is where you can trade in your special reserve points for useful items and cool prizes.";
1056	next;
1057	mes "[Kafra]";
1058	mes "Each Kafra will allow you to trade in reserve points of varying amounts. I can trade in reserve points starting from ^2222FF100 pts up to 3000 pts^000000.";
1059	next;
1060	mes "[Kafra]";
1061	mes "The amount of special reserve points that you have is: ^FF0000"+RESRVPTS+"^000000 pts. Please make a choice based on your point total.";
1062	M_Menu:
1063	next;
1064	menu "100- Sweet Potato 7 ea",M_1a, "200- Sweet Potato 15 ea",M_1b, "300- Sweet Potato 25 ea",M_1c, "400- Sweet Potato 35 ea",M_1d,
1065	"500- Sweet Potato 50 ea",M_1e, "600- Sweet Potato 60 ea",M_1f, "700- Sweet Potato 75 ea",M_1g, "800- Sweet Potato 85 ea",M_1h,
1066	"900- Sweet Potato 100 ea",M_1i, "1000- 1st Lottery Chance!",M_1j, "Next items",M_2, "Cancel",M_End;
1067
1068	M_1a:
1069	if(RESRVPTS < 100) goto sL_LowPts1;
1070	mes "[Kafra]";
1071	mes "Here you are.";
1072	getitem 516, 7;
1073	set RESRVPTS, RESRVPTS - 100;
1074	close;
1075	M_1b:
1076	if(RESRVPTS < 200) goto sL_LowPts1;
1077	mes "[Kafra]";
1078	mes "Here you are.";
1079	getitem 516, 15;
1080	set RESRVPTS, RESRVPTS - 200;
1081	close;
1082	M_1c:
1083	if(RESRVPTS < 300) goto sL_LowPts1;
1084	mes "[Kafra]";
1085	mes "Here you are.";
1086	getitem 516, 25;
1087	set RESRVPTS, RESRVPTS - 300;
1088	close;
1089	M_1d:
1090	if(RESRVPTS < 400) goto sL_LowPts1;
1091	mes "[Kafra]";
1092	mes "Here you are.";
1093	getitem 516, 35;
1094	set RESRVPTS, RESRVPTS - 400;
1095	close;
1096	M_1e:
1097	if(RESRVPTS < 500) goto sL_LowPts1;
1098	mes "[Kafra]";
1099	mes "Here you are.";
1100	getitem 516, 50;
1101	set RESRVPTS, RESRVPTS - 500;
1102	close;
1103	M_1f:
1104	if(RESRVPTS < 600) goto sL_LowPts1;
1105	mes "[Kafra]";
1106	mes "Here you are.";
1107	getitem 516, 60;
1108	set RESRVPTS, RESRVPTS - 600;
1109	close;
1110	M_1g:
1111	if(RESRVPTS < 700) goto sL_LowPts1;
1112	mes "[Kafra]";
1113	mes "Here you are.";
1114	getitem 516, 75;
1115	set RESRVPTS, RESRVPTS - 700;
1116	close;
1117	M_1h:
1118	if(RESRVPTS < 800) goto sL_LowPts1;
1119	mes "[Kafra]";
1120	mes "Here you are.";
1121	getitem 516, 85;
1122	set RESRVPTS, RESRVPTS - 800;
1123	close;
1124	M_1i:
1125	if(RESRVPTS < 900) goto sL_LowPts1;
1126	mes "[Kafra]";
1127	mes "Here you are.";
1128	getitem 516, 100;
1129	set RESRVPTS, RESRVPTS - 900;
1130	close;
1131	M_1j:
1132	if(RESRVPTS < 1000) goto sL_LowPts1;
1133	set RESRVPTS, RESRVPTS - 1000;
1134	mes "[Kafra]";
1135	mes "^0000FF1st Lottery Opportunity!!^000000";
1136	set @Lotto, 1;
1137	next;
1138	callfunc "F_Lottery";
1139	goto M_End;
1140
1141	sL_LowPts1:
1142	mes "[Kafra]";
1143	mes "I'm sorry but you do not have enough reserve points for that selection.";
1144	goto M_Menu;
1145
1146	M_2:
1147	menu "1100- Red Potion 7 ea",M_2a, "1300- Red Potion 15 ea",M_2b, "1500- Red Potion 25 ea",M_2c,
1148	"1700- Red Potion 35 ea",M_2d, "1900- Red Potion 50 ea",M_2e, "2100- Red Potion 60 ea",M_2f,
1149	"2300- Red Potion 75 ea",M_2g, "2500- Red Potion 85 ea",M_2h, "2800- Red Potion 100 ea",M_2i,
1150	"3000- 2nd Lotery Chance!",M_2j, "Previous List",M_Menu, "Cancel",M_End;
1151
1152	M_2a:
1153	if(RESRVPTS < 1100) goto sL_LowPts2;
1154	mes "[Kafra]";
1155	mes "Here you are.";
1156	getitem 501, 7;
1157	set RESRVPTS, RESRVPTS - 1100;
1158	close;
1159	M_2b:
1160	if(RESRVPTS < 1300) goto sL_LowPts2;
1161	mes "[Kafra]";
1162	mes "Here you are.";
1163	getitem 501, 15;
1164	set RESRVPTS, RESRVPTS - 1300;
1165	close;
1166	M_2c:
1167	if(RESRVPTS < 1500) goto sL_LowPts2;
1168	mes "[Kafra]";
1169	mes "Here you are.";
1170	getitem 501, 25;
1171	set RESRVPTS, RESRVPTS - 1500;
1172	close;
1173	M_2d:
1174	if(RESRVPTS < 1700) goto sL_LowPts2;
1175	mes "[Kafra]";
1176	mes "Here you are.";
1177	getitem 501, 35;
1178	set RESRVPTS, RESRVPTS - 1700;
1179	close;
1180	M_2e:
1181	if(RESRVPTS < 1900) goto sL_LowPts2;
1182	mes "[Kafra]";
1183	mes "Here you are.";
1184	getitem 501, 50;
1185	set RESRVPTS, RESRVPTS - 1900;
1186	close;
1187	M_2f:
1188	if(RESRVPTS < 2100) goto sL_LowPts2;
1189	mes "[Kafra]";
1190	mes "Here you are.";
1191	getitem 501, 60;
1192	set RESRVPTS, RESRVPTS - 2100;
1193	close;
1194	M_2g:
1195	if(RESRVPTS < 2300) goto sL_LowPts2;
1196	mes "[Kafra]";
1197	mes "Here you are.";
1198	getitem 501, 75;
1199	set RESRVPTS, RESRVPTS - 2300;
1200	close;
1201	M_2h:
1202	if(RESRVPTS < 2500) goto sL_LowPts2;
1203	mes "[Kafra]";
1204	mes "Here you are.";
1205	getitem 501, 85;
1206	set RESRVPTS, RESRVPTS - 2500;
1207	close;
1208	M_2i:
1209	if(RESRVPTS < 2800) goto sL_LowPts2;
1210	mes "[Kafra]";
1211	mes "Here you are.";
1212	getitem 501, 100;
1213	set RESRVPTS, RESRVPTS - 2800;
1214	close;
1215	M_2j:
1216	if(RESRVPTS < 3000) goto sL_LowPts2;
1217	set RESRVPTS, RESRVPTS - 3000;
1218	mes "[Kafra]";
1219	mes "^0000FF2nd Lottery Opportunity!!^000000";
1220	set @Lotto, 2;
1221	next;
1222	callfunc "F_Lottery";
1223	goto M_End;
1224
1225	sL_LowPts2:
1226	mes "[Kafra]";
1227	mes "I'm sorry but you do not have enough reserve points for that selection.";
1228	next;
1229	goto M_2;
1230
1231	M_End:
1232	mes "[Kafra]";
1233	mes "Please come back anytime when you have more reserve points.";
1234	cutin "",255;
1235	close;
1236	}
1237
1238	// Special Reserve 2 ----------------------------------------------
1239	aldeba_in,88,161,3 script Kafra#05 115,{
1240	cutin "kafra_03",2;
1241	mes "[Kafra]";
1242	mes "Welcome ^5577FF"+strcharinfo(0)+"^000000. We are currently having a special event for our customers.";
1243	mes "You can get free gifts by using your ^FF5533special reserve points^000000 in the ^3355FFSpecial Kafra Gift Event^000000!!";
1244	next;
1245	mes "[Kafra]";
1246	mes "Would you like to use your points?";
1247	next;
1248	menu "Yes I would.",-, "Maybe next time.",M_End;
1249
1250	mes "[Kafra]";
1251	mes "You have the following amount of special reserve points: ^5544FF"+RESRVPTS+"^000000.";
1252	mes "Make a choice and test your luck!";
1253	next;
1254	menu "5000pts = 1st Lottery Chance!",sM_1st, "7000pts = 2nd Lottery Chance!",sM_2nd, "10000pts = 3rd Lottery Chance!",sM_3rd, "Cancel",M_End;
1255
1256	sM_1st:
1257	if(RESRVPTS < 5000) goto sL_NotEnuf;
1258	set RESRVPTS, RESRVPTS - 5000;
1259	set @Lotto, 3;
1260	callfunc "F_Lottery";
1261	goto M_End;
1262	sM_2nd:
1263	if(RESRVPTS < 7000) goto sL_NotEnuf;
1264	set RESRVPTS, RESRVPTS - 7000;
1265	set @Lotto, 4;
1266	callfunc "F_Lottery";
1267	goto M_End;
1268	sM_3rd:
1269	if(RESRVPTS < 10000) goto sL_NotEnuf;
1270	set RESRVPTS, RESRVPTS - 10000;
1271	set @Lotto, 5;
1272	callfunc "F_Lottery";
1273	goto M_End;
1274
1275	sL_NotEnuf:
1276	mes "[Kafra]";
1277	mes "I'm sorry dear but you do not have enough points for this selection.";
1278	cutin "",255;
1279	close;
1280	M_End:
1281	mes "[Kafra]";
1282	mes "No problem. Collect more and more special reserve points by using the Kafra Services found throughout Rune Midgard.";
1283	mes "Thank you for using Kafra Corp. services.";
1284	cutin "",255;
1285	close;
1286	}
1287
1288	// Function F_Lottery ------------------------------------------------------------------------------------------
1289	function script F_Lottery {
1290	mes "[Kafra]";
1291	mes "You have the unique opportunity to win a prize sent down from the heavens themselves!!";
1292	next;
1293	mes "[Kafra]";
1294	mes "Don't miss this one and only chance! Now dear, are you ready?";
1295	next;
1296	mes "[Kafra]";
1297	mes "How many times do you want the Lottery Machine to spin? You can choose up to 5 times.";
1298	next;
1299	input @input;
1300	if(@input < 1 \|\| @input > 5) set @input, rand(1,5); //Lupus's fix
1301	callsub sF_Spin;
1302	mes "[Kafra]";
1303	mes "Ok~ Let me check the results~ guess what it is?";
1304	next;
1305	mes "[Kafra]";
1306	mes "^FF0000Lets see.... This is...!!^000000";
1307	next;
1308	if(@temp < 1) goto sL_Prize1;
1309	if(@temp < 2) goto sL_Prize2;
1310	if(@temp < 3) goto sL_Prize3;
1311	if(@temp <= 4) goto sL_Prize4;
1312	goto sL_Prize5;
1313
1314	sL_Prize1:
1315	mes "[Kafra]";
1316	mes "WOW!!!!..... You win!!! 1st Prize~! Congratulations~~ You got the 1st prize~~";
1317	if(@Lotto == 1) getitem 2328,1;//Items: Wooden_Mail,
1318	if(@Lotto == 2) getitem 2307,1;//Items: Mantle,
1319	if(@Lotto == 3) getitem 657,10;//Items: Berserk_Potion,
1320	if(@Lotto == 4) {
1321	getitem 607,2;//Items: Yggdrasilberry,
1322	getitem 608,1;//Items: Yggdrasil_Seed,
1323	}
1324	if(@Lotto == 5) getitem 607,3;//Items: Yggdrasilberry,
1325	return;
1326	sL_Prize2:
1327	mes "[Kafra]";
1328	mes "Oh! WOW! You've won the 2nd prize! Congratulations!!";
1329	if(@Lotto == 1) getitem 2403,1;//Items: Shoes,
1330	if(@Lotto == 2) getitem 2226,1;//Items: Cap,
1331	if(@Lotto == 3) getitem 2201,1;//Items: Sunglasses,
1332	if(@Lotto == 4) getitem 526,3;//Items: Royal_Jelly,
1333	if(@Lotto == 5) {
1334	getitem 608,1;//Items: Yggdrasil_Seed,
1335	getitem 526,10;//Items: Royal_Jelly,
1336	}
1337	return;
1338	sL_Prize3:
1339	mes "[Kafra]";
1340	mes "Congratulations! You've won the 3rd prize.";
1341	if(@Lotto == 1) getitem 602,4;//Items: Butterfly_Wing,
1342	if(@Lotto == 2) getitem 505,3;//Items: Blue_Potion,
1343	if(@Lotto == 3) getitem 2203,1;//Items: Glasses,
1344	if(@Lotto == 4) getitem 504,15;//Items: White_Potion,
1345	if(@Lotto == 5) getitem 504,30;//Items: White_Potion,
1346	return;
1347	sL_Prize4:
1348	mes "[Kafra]";
1349	mes "You've won the 4th prize.";
1350	if(@Lotto == 1) getitem 516,100;//Items: Sweet_Potato,
1351	if(@Lotto == 2) getitem 501,150;//Items: Red_Potion,
1352	if(@Lotto == 3) getitem 502,150;//Items: Orange_Potion,
1353	if(@Lotto == 4) getitem 505,5;//Items: Blue_Potion,
1354	if(@Lotto == 5) getitem 505,10;//Items: Blue_Potion,
1355	return;
1356	sL_Prize5:
1357	mes "[Kafra]";
1358	mes "You've won the 5th prize.";
1359	if(@Lotto == 1) getitem 516,50;//Items: Sweet_Potato,
1360	if(@Lotto == 2) getitem 501,100;//Items: Red_Potion,
1361	if(@Lotto == 3) getitem 501,200;//Items: Red_Potion,
1362	if(@Lotto == 4) getitem 501,250;//Items: Red_Potion,
1363	if(@Lotto == 5) getitem 501,300;//Items: Red_Potion,
1364	return;
1365
1366	sF_Spin:
1367	mes "[Lottery Machine]";
1368	mes "Number of spins remaining: "+@input;
1369	next;
1370	mes "[Lottery Machine]";
1371	mes "(rumble~rumble~rumble~)...";
1372	next;
1373	set @temp, rand(10);
1374	set @input, @input -1;
1375	if(@input <= 0) return;
1376	goto sF_Spin;
1377	}
1378
1379	// Inside Clock Tower
1380	//============================================================
1381	c_tower3,10,249,4 script Gatekeeper#ct 84,{
1382	//Key_Of_Clock_Tower
1383	callfunc "F_ClockTowerGate","4th",7026,"c_tower4",185,44;
1384	}
1385
1386	alde_dun03,264,16,4 script Gatekeeper#ct1 101,{
1387	//Underground_Key
1388	callfunc "F_ClockTowerGate","B4th",7027,"alde_dun04",79,267;
1389	}
1390
1391	function script F_ClockTowerGate {
1392	mes "[Gatekeeper Boy]";
1393	mes "Welcome to";
1394	mes "Kinase - Blue Gallino";
1395	mes "The one of Local Speciality in Aldebaran.";
1396	mes "You can't go through from "+getarg(0)+" Floor,";
1397	mes "Please go back.";
1398	next;
1399	switch(select("About Clock Tower:About the "+getarg(0)+" Floor:Move to the "+getarg(0)+" Floor:End Dialogue")) {
1400	case 1:
1401	mes "[Gatekeeper Boy]";
1402	mes "Homeland of Alchemy,Aldebaran!";
1403	mes "Long Time ago, there were";
1404	mes "3 Legendary Alchemists...They are";
1405	mes "Bruke Seimer";
1406	mes "Philip Warisez";
1407	mes "And ..";
1408	next;
1409	mes "[Gatekeeper Boy]";
1410	mes "Romero Specialre!";
1411	mes "This venerable architecture is";
1412	mes "their masterpiece.";
1413	mes "I assume you would feel something unusual";
1414	mes "While on the way to this floor,";
1415	mes "Every feature of This Clocktower ";
1416	next;
1417	mes "[Gatekeeper Boy]";
1418	mes "Consists of Mysterious Ancient Magics.";
1419	mes "If you just wander around here,";
1420	mes " without any intention";
1421	next;
1422	mes "[Gatekeeper Boy]";
1423	mes "By any means,";
1424	mes "You will meet with a mishap";
1425	mes "by Gatekeeper Creatures.";
1426	mes "Please be careful ..";
1427	close;
1428	case 2:
1429	mes "[Gatekeeper Boy]";
1430	mes "Ancient Alchemists";
1431	mes "Sealed the Gate of 4th Floor using an Alchemistic Device ";
1432	mes "To keep something";
1433	mes "From Evil Creatures and Human Enemies.";
1434	mes "To go through this door";
1435	next;
1436	mes "[Gatekeeper Boy]";
1437	mes "It needs a Key.";
1438	mes "That Key has rumored to be possessed by Gatekeeper Creatures";
1439	mes "Prowling around here.";
1440	next;
1441	mes "[Gatekeeper Boy]";
1442	mes "The Key is the Intensiveness of Ancient Alchemy,";
1443	mes "By hearsay When used once,";
1444	mes "It will be released from being spelled";
1445	mes "And be disapeared.";
1446	next;
1447	mes "[Gatekeeper Boy]";
1448	mes "If that key";
1449	mes "Comes into your porssession,";
1450	mes "Please show me.";
1451	mes "The one who possesses the Key";
1452	mes "Will have access to go through";
1453	mes "This Gate with his own will!";
1454	next;
1455	mes "[Gatekeeper Boy]";
1456	mes "I will give you a chance.";
1457	mes ". . . . .";
1458	close;
1459	case 3:
1460	if (countitem(getarg(1)) > 0) {
1461	mes "[Gatekeeper Boy]";
1462	mes "Hmm! I already felt that you are not an Ordinary person,";
1463	mes "Now it seems to be successful in Speculation.";
1464	mes "Please,You may enter.";
1465	mes "May God bless you ..";
1466	close2;
1467	delitem getarg(1),1;
1468	warp getarg(2),getarg(3),getarg(4);
1469	end;
1470	}
1471	else {
1472	mes "[Gatekeeper Boy]";
1473	mes ". . . . . .";
1474	mes "Unfortunately you don't have a privilege";
1475	mes "To enter this Gate ..";
1476	mes "You won't be able to go through";
1477	mes "As long as Ancient Alchemists";
1478	mes " Don't grant you.";
1479	close;
1480	}
1481	case 4:
1482	mes "[Gatekeeper Boy]";
1483	mes "This Clock Tower";
1484	mes "Is the place where the 3 Ancient Legendary Alchemists";
1485	mes "Has left their Spirits and Skills.";
1486	mes "Please Do not Scribble or Damage on the Interior.";
1487	close;
1488	}
1489	}
1490

Note: See TracBrowser for help on using the browser.

Context Navigation

root/npc/cities/aldebaran.txt @ 25

Download in other formats: