From 58ea237c4b337d212ef4412b7ad480996df945ec Mon Sep 17 00:00:00 2001 From: L0ne_W0lf Date: Thu, 20 Mar 2008 18:48:27 +0000 Subject: Updated Umbala npcs, quests, and warps. git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@12403 54d463be-8e91-2dee-dedb-b68131a5f0ec --- npc/quests/quests_umbala.txt | 2061 +++++++++++++++++++++++++----------------- 1 file changed, 1214 insertions(+), 847 deletions(-) (limited to 'npc/quests/quests_umbala.txt') diff --git a/npc/quests/quests_umbala.txt b/npc/quests/quests_umbala.txt index 85084f6fc..b1ae1022f 100644 --- a/npc/quests/quests_umbala.txt +++ b/npc/quests/quests_umbala.txt @@ -3,10 +3,11 @@ //===== By: ================================================== //= sabernet09 & eAthena Team //===== Current Version: ===================================== -//= 2.0 +//= 2.1 //===== Compatible With: ===================================== //= eAthena 7.15 + //===== Description: ========================================= +//= [Aegis Conversion] //= Umbalian Language Quest, Umbala Skeletal Gate Quest, //= Umbala Event, Create Essence/Dismantle Stone // Phase1.Learning the Language @@ -19,6 +20,9 @@ // 5 (Elder)Ask about conditions needed to be fulfilled to get permission // 6 (Elder)Get permission // 7 (Shaman)Use the shaman to create essences and dismantle elemental stones. +//= Umbala Domestic Dispute? +//= - This quest is only avaliable if you ahve not done language quest. +//= - Variables in use: um_wind, MISC_QUEST (Bit 32768) //===== Additional Comments: ================================= //= fixed by x[tsk], Lupus, PoW //= Quest completion is now registered @@ -30,590 +34,421 @@ //= 1.9 Added functionality to allow players to dismantle more //= than a stone at once, up to 10. [SinSloth] //= 2.0 Updated hack check and added a weight check to dismantling. [SinSloth] +//= 2.1 Rescripted to Aegis 10.3 standards. Added strange quest. [L0ne_W0lf] //============================================================ - -//========================================================================================================================\\ -// Little Quest NPC to enter the dungeon -//========================================================================================================================\\ -umbala,65,253,4 script Tree Guardian 752,{ - mes "[Tree Guardian]"; - mes "Stop, stranger, here is the entrance to the ancient tree!"; - next; - mes "[Tree Guardian]"; - mes "I cannot allow you to enter, you look pretty weak!"; - next; -L_MENU: - menu "Talk about tree",-, "Talk about Umbala",M_TALKUMB, "Enter Dungeon",M_DUN, "Leave",M_Leave; - - mes "[Tree Guardian]"; - mes "The tree is an ancient relique of our culture!"; - next; - mes "[Tree Guardian]"; - mes "But recently some monsters overwhelmed the tree and are now"; - mes "slowly killing the tree...like a poison...from inside.."; - next; - goto L_MENU; -M_TALKUMB: - mes "[Tree Guardian]"; - mes "We don't have many visitors in our small town.."; - next; - mes "[Tree Guardian]"; - mes "Most people don't find us or are just afraid of us!"; - next; - mes "[Tree Guardian]"; - mes "And now, we are even more unpopular, because of that damn beast!"; - next; - menu "What beast?",- ,"Leave",M_Leave; - - mes "[Tree Guardian]"; - mes "The Werewolf of course!!"; - next; - mes "[Tree Guardian]"; - mes "He is sneaking around our town and killing our soldiers at night!"; - next; - mes "[Tree Guardian]"; - mes "Hey...if you could get rid of that beast!"; - next; - mes "[Tree Guardian]"; - mes "I'll let you in!"; - next; - mes "[Tree Guardian]"; - mes "From now on we can live in peace again, thanks to you!"; - next; - mes "[Tree Guardian]"; - mes "You may enter the dungeon now!"; - set umbdun,1; - close; -M_DUN: - mes "[Tree Guardian]"; - if(umbdun != 1) mes "We do not permit weak people to enter!"; - if(umbdun != 1) close; - mes "Come on in, brave warrior!"; - warp "um_dun01",42,30; -M_Leave: - close; -} - //============================================================================== -//Skeletal Gate +// Umbala Language Quest //============================================================================== -umbala,221,193,1 script #Skeletal Gate 111,{ - if(event_umbala==7) goto LwarpNoText; - set @ryumon,0; - mes "^3355FFThe gate is shaped like a skeleton"; - mes "You cannot pass this point as the gate is"; - mes "locked. You hear sounds coming from the"; - mes "inside.^000000"; - next; - menu "Examine the skeleton",-,"Nothing",Lend; - mes "^3355FFWhen you examine the gate"; - mes "carefully, you notice that there"; - mes "is a hole about the size of a gemstone"; - mes "on the left side of the gate about where"; - mes "the skeleton's left eye should be. There is"; - mes "a matching hole on the other side.^000000"; - next; - mes "^3355FFWhat you would like to"; - mes "to do with the left socket?^000000"; - next; - menu "Nothing",-,"Insert a Blue Gemstone",L1_2,"Insert a Yellow Gemstone",L1_3,"Insert a Red Gemstone",L1_4; - mes "^3355FFNothing was inserted into the left socket.^000000"; - next; - goto LRight; - L1_2: - //Blue - if(countitem(717) < 1) goto L1_2_e;//Items: Blue Gemstone, - mes "^3355FFYou inserted a Blue Gemstone into the"; - mes "left socket.^000000"; - next; - delitem 717,1;//Items: Blue Gemstone, - getitem 717,1;//Items: Blue Gemstone, - set @ryumon,1; - mes "^3355FFA rolling sound can be heard, and"; - mes "the gemstone comes out of the skeleton's mouth.^000000"; - next; - goto LRight; - L1_3: - //Yellow - if(countitem(715) < 1) goto L1_3_e;//Items: Yellow Gemstone, - mes "^3355FFYou inserted a Yellow Gemstone into the"; - mes "left socket.^000000"; - next; - delitem 715,1;//Items: Yellow Gemstone, - getitem 715,1;//Items: Yellow Gemstone, - set @ryumon,2; - mes "^3355FFA rolling sound can be heard, and"; - mes "the gemstone comes out of the skeleton's mouth.^000000"; - next; - goto LRight; - L1_4: - //Red - if(countitem(716) < 1) goto L1_4_e;//Items: Red Gemstone, - mes "^3355FFYou inserted a Red Gemstone into the"; - mes "left socket.^000000"; - next; - delitem 716,1;//Items: Red Gemstone, - getitem 716,1;//Items: Red Gemstone, - set @ryumon,3; - mes "^3355FFA rolling sound can be heard, and"; - mes "the gemstone comes out of the skeleton's mouth.^000000"; - next; - goto LRight; - L1_2_e: - mes "^3355FFYou don't have a Blue Gemstone."; - goto L1_e; - L1_3_e: - mes "^3355FFYou don't have a Yellow Gemstone."; - goto L1_e; - L1_4_e: - mes "^3355FFYou don't have a Red Gemstone."; - L1_e: - mes "Therefore, nothing was inserted into"; - mes "the left socket.^000000"; - next; - LRight: - mes "^3355FFWhat about the right"; - mes "socket?^000000"; - next; - menu "Nothing",-,"Insert a Blue Gemstone",L2_2,"Insert a Yellow Gemstone",L2_3,"Insert a Red Gemstone",L2_4; - mes "^3355FFNothing was inserted into the right socket.^000000"; - next; - goto Lfin; - L2_2: - //Blue - if(countitem(717) < 1) goto L2_2_e;//Items: Blue Gemstone, - mes "^3355FFYou inserted a Blue Gemstone into the"; - mes "right socket.^000000"; - next; - delitem 717,1;//Items: Blue Gemstone, - getitem 717,1;//Items: Blue Gemstone, - set @ryumon,@ryumon+10; - mes "^3355FFA rolling sound can be heard, and"; - mes "the gemstone comes out of the skeleton's mouth.^000000"; - next; - goto Lfin; - L2_3: - //Yellow - if(countitem(715) < 1) goto L2_3_e;//Items: Yellow Gemstone, - mes "^3355FFYou inserted a Yellow Gemstone into the"; - mes "right socket.^000000"; +um_in,39,122,5 script Utan Chief 784,{ + if (event_umbala == 0) { + mes "[Karkatan]"; + mes "Huh huh, a Rune-Midgardian."; + mes "I guess this is your first"; + mes "visit to my village, isn't it?"; + next; + mes "[Karkatan]"; + mes "Everyone from Rune-Midgard"; + mes "that I've met had the same"; + mes "same expression on their"; + mes "face as you do right now"; + mes "when they first came here."; + next; + mes "[Karkatan]"; + mes "Maybe it's because they cannot"; + mes "communicate with us due to"; + mes "the language barrier, so"; + mes "they have no idea what's going"; + mes "on. Yeah, I understand..."; + mes "Anyway, welcome to my village."; + next; + mes "[Karkatan]"; + mes "My name is Karkatan, and I"; + mes "am the chief of the Utan tribe."; + mes "You must be wondering how"; + mes "I can speak your language."; + next; + mes "[Karkatan]"; + mes "It was taught to me long ago"; + mes "by an adventurer from your"; + mes "land. It's been a long time,"; + mes "and I do not know what has"; + mes "become of him..."; + next; + mes "[Karkatan]"; + mes "Anyhow, I learned many things"; + mes "about Rune-Midgardian culture"; + mes "and language."; + next; + mes "[Karkatan]"; + mes "Sometimes, I teach the Utan"; + mes "langauge, but I do not give"; + mes "everyone that privilege."; + mes "If unscrupulous outsiders"; + mes "learn the Utan language, they"; + mes "may bring harm to my tribe."; + next; + mes "[Karkatan]"; + mes "Before you can learn the Utan"; + mes "language, first try to learn"; + mes "Utan culture by exploring our"; + mes "village."; + next; + mes "[Karkatan]"; + mes "Although you are not able to"; + mes "communicate with my people"; + mes "right now, try to understand"; + mes "our way of life through your"; + mes "observations."; + next; + mes "[Karkatan]"; + mes "Pay attention to the dress,"; + mes "appearance and life style of the"; + mes "local people. When you think"; + mes "you understand enough about Utan"; + mes "culture, come back to me and show me what you have learned."; + set event_umbala,1; + close; + } + else if (event_umbala == 1) { + mes "[Karkatan]"; + mes "Oh, it's you again. So..."; + mes "Have you learned about Utan"; + mes "culture? I want to hear your"; + mes "opinion, as well as your impression."; + next; + mes "[Karkatan]"; + mes "There are still some villagers"; + mes "who are very naive about Rune-Midgardians."; + mes "Usually, they fear encounters"; + mes "with your people and will"; + mes "hide themselves."; + next; + mes "[Karkatan]"; + mes "So..."; + mes "May I help you with anything?"; + mes "I assume you did not have much of"; + mes "a problem looking around the"; + mes "village, but it seems you have something to ask of me."; + next; + switch(select("I want to learn Utan language.:Umbabah Umbabah?:Nothing.")) { + case 1: + if (isequipped(2278) || isequipped(2297) || isequipped(2288) || isequipped(2292) || isequipped(5005) || isequipped(2281) || isequipped(5043)) { + mes "[Karkatan]"; + mes "Hmmm...That's an awesome mask"; + mes "you're wearing. We Utans like"; + mes "wearing masks to keep from"; + mes "showing our facial expressions."; next; - delitem 715,1;//Items: Yellow Gemstone, - getitem 715,1;//Items: Yellow Gemstone, - set @ryumon,@ryumon+20; - mes "^3355FFA rolling sound can be heard, and"; - mes "the gemstone comes out of the skeleton's mouth.^000000"; + mes "[Karkatan]"; + mes "That's why we wear masks all the"; + mes "time. We believe that interaction"; + mes "and treatment of other people"; + mes "should not depend on how we look."; next; - goto Lfin; - L2_4: - //Red - if(countitem(716) < 1) goto L2_4_e;//Items: Red Gemstone, - mes "^3355FFYou inserted a Red Gemstone into the"; - mes "right socket.^000000"; + mes "[Karkatan]"; + mes "Alright. I am sure you are"; + mes "qualified to learn the Utan"; + mes "language. I will teach you how"; + mes "speak and to read in Utan from"; + mes "now on."; next; - delitem 716,1;//Items: Red Gemstone, - getitem 716,1;//Items: Red Gemstone, - set @ryumon,@ryumon+30; - mes "^3355FFA rolling sound can be heard, and"; - mes "the gemstone comes out of the skeleton's mouth.^000000"; + mes "[Karkatan]"; + mes "However, I need you to get some"; + mes "items ready so that we may proceed"; + mes "with the lessons. First, we need"; + mes "two different kinds of paper."; + mes "^3377FF10 Oil Paper^000000 and "; + mes "^3377FF5 Slick Paper^000000."; next; - goto Lfin; - L2_2_e: - mes "^3355FFYou don't have a Blue Gemstone."; - goto L2_e; - L2_3_e: - mes "^3355FFYou don't have a Yellow Gemstone."; - goto L2_e; - L2_4_e: - mes "^3355FFYou don't have a Red Gemstone."; - L2_e: - mes "Therefore, nothing was inserted into"; - mes "the right socket.^000000"; + mes "[Karkatan]"; + mes "We'll also need something to"; + mes "write with. Let's use"; + mes "^3377FF1 Squid Ink^000000 and"; + mes "^3377FF1 Feather of Birds^000000."; + mes "Please bring me those, and I will"; + mes "teach you when you're ready."; + set event_umbala,2; + close; + } + else { + mes "[Karkatan]"; + mes "You don't seem to understand"; + mes "our culture yet. You cannot"; + mes "learn another language if you"; + mes "do not understand the culture."; next; - Lfin: - mes "^3355FF..........^000000"; + mes "[Karkatan]"; + mes "When you have that expression on"; + mes "your face, Utans will be"; + mes "intimidated... Since we do"; + mes "not show our faces to others,"; + mes "we are actually very"; + mes "vulnerable to facial expression."; next; - mes "^3355FF..................."; - mes ".....................^000000"; + mes "[Karkatan]"; + mes "Go explore the village a little"; + mes "longer. You can come back"; + mes "anytime when you think you're ready."; next; - mes "^3355FF......................."; - mes "........................."; - mes ".........................^000000"; + mes "[Karkatan]"; + mes "In any case, what do you think"; + mes "about my mask? It's the current"; + mes "trend among us Utans...don't you"; + mes "think it's awesome?"; + close; + } + case 2: + mes "[Karkatan]"; + mes "Haha~ When you're just imitating"; + mes "the sound, you won't make any"; + mes "sense. Language is a mutual system"; + mes "for the communication of thoughts and feelings."; + next; + mes "[Karkatan]"; + mes "I regret to say that it seems that"; + mes "nowadays, all peoples are no"; + mes "longer sensitive to other cultures"; + mes "in that respect."; + next; + mes "[Karkatan]"; + mes "I see people that despise or"; + mes "ridicule others that do not"; + mes "understand them. It's really"; + mes "sad that such bigotry still exists..."; + next; + mes "[Karkatan]"; + mes "If you are interested in Utan"; + mes "language, try to understand our"; + mes "culture better and come back"; + mes "when you're ready. I will"; + mes "teach you the meanings of those sounds you are using."; + close; + case 3: + mes "[Karkatan]"; + mes "Sometimes it's good to wander"; + mes "without purpose. But it's"; + mes "better to set a goal for"; + mes "a journey if you want to"; + mes "learn something out of"; + mes "the experience."; + close; + } + } + else if (event_umbala == 2) { + if ((countitem(7151) > 9) && (countitem(7111) > 4) && (countitem(1024) > 0) && (countitem(916) > 0)) { + mes "[Karkatan]"; + mes "Okay, I guess we're good to go."; + mes "Let's get the lesson started."; + mes "I hope you will communicate better"; + mes "with Utans when we are done."; + next; + mes "[Karkatan]"; + mes ".............."; + next; + mes "[Karkatan]"; + mes ".............."; + mes "....................."; + next; + mes "[Karkatan]"; + mes ".............."; + mes "....................."; + mes "............................"; + next; + mes "[Karkatan]"; + mes "Alright, that's all. Just forget"; + mes "about how you've felt about Utans"; + mes "before you learned the language."; + mes "Now go try to talk to Utans."; + mes "Conversation is a very important method in understanding others."; + delitem 7151,10; //Oil_Paper + delitem 7111,5; //Smooth_Paper + delitem 1024,1; //Chinese_Ink + delitem 916,1; //Feather_Of_Birds + set event_umbala,3; + next; + mes "[Karkatan]"; + mes "Okay, if you have any business"; + mes "in our village later, feel free"; + mes "to talk to me. I will try to help"; + mes "you as much as I can."; + close; + } + else { + mes "[Karkatan]"; + mes "I guess you are not ready yet..."; + mes "Did you forget what items you"; + mes "need? I will let you know"; + mes "again, so please bring them"; + mes "so that we can start the lesson."; + next; + mes "[Karkatan]"; + mes "^3377FF10 Oil Paper^000000,"; + mes "^3377FF5 Slick Paper^000000,"; + mes "^3377FF1 Squid Ink^000000,"; + mes "^3377FF1 Feather of Birds^000000."; + mes "When you bring all of these,"; + mes "I will teach you our language."; + close; + } + } + else if (event_umbala >= 3) { + if (event_umbala == 4) { + mes "[Karkatan]"; + mes "Puchuchartan must have sent you to"; + mes "me. I need to check whether or not"; + mes "you are qualified to request"; + mes "her help...We Utans do not want"; + mes "to help evil people."; + next; + mes "[Karkatan]"; + mes "Hmmmm...."; + mes "It would be good to have a mask"; + mes "that was made in Rune-Midgard..."; + next; + mes "[Karkatan]"; + mes "I wish to have ^3377FF1 Mr. Smile^000000."; + mes "To Utans, receiving a mask as a"; + mes "present is considered an"; + mes "honor. Maybe Puchuchartan"; + mes "wants you to show us your respect by doing so."; + set event_umbala,5; + close; + } + else if (event_umbala == 5) { + if (countitem(2278) > 0) { + mes "[Karkatan]"; + mes "Oh, you brought it! Yes, I've"; + mes "always wished that I could have"; + mes "this mask! This is truly an"; + mes "honor! Thank you, adventurer"; + mes "from Rune-Midgard."; next; - if(event_umbala < 6) goto LSecondCheck; - if(@ryumon == 33) goto Lwarp; - LSecondCheck: - if(event_umbala >= 6) goto LNewEnd; - if(@ryumon == 13) goto Lwarp; - LNewEnd: - mes "^3355FFNothing happened."; - mes "You hear a faint laugh, but"; - mes "decide that it's all in"; - mes "your head.^000000"; - close; - Lwarp: - mes "^3355FFA rumbling sound can be"; - mes "heard as the gate opens."; - mes "As you step across the threshold."; - mes "you feel as if you're walking in"; - mes "into the arms of death itself.^000000"; - next; - LwarpNoText: - warp "um_in",32,71; - close; -Lend: - mes "^3355FFAfter hitting the gate a few"; - mes "times with no result, you decide to give"; - mes "up.^000000"; - close; -} - -//============================================================================== -//Umbala Event -//============================================================================== -um_in,39,122,5 script Utan Tribal Elder 784,{ - if(event_umbala == 1) goto LStart2; - if(event_umbala == 2) goto LStart3; - if(event_umbala == 3) goto LStart4; - if(event_umbala == 4) goto LStart5; - if(event_umbala == 5) goto LStart6; - if(event_umbala == 6) goto LStart4; - if(event_umbala == 7) goto LStart4; - mes "[Karukatan]"; - mes "Aha, You're new to the Utan"; - mes "family's little village, aren't"; - mes "you? I would remember such a face"; - mes "had I met you before."; - next; - mes "[Karukatan]"; - mes "We know there is a wide world around"; - mes "us, but the there is something to"; - mes "be appreciated in the simple life"; - mes "we lead here."; - next; - mes "[Karukatan]"; - mes "All decisions in the village are made"; - mes "by me or with my input"; - next; - mes "[Karukatan]"; - mes "You want to know how I speak your"; - mes "language when it seems no one else in"; - mes "the village does? A fair question."; - mes "I picked up your tongue from the"; - mes "adventurers who sometimes pass"; - mes "through this village."; - next; - mes "[Karukatan]"; - mes "Some outsiders have also settled near here"; - mes "over time. In exchange for information"; - mes "about their customs and culture, I"; - mes "teach them the language and customs"; - mes "of the Utan tribe."; - next; - mes "[Karukatan]"; - mes "If you want to learn our language,"; - mes "you must immerse yourselves in"; - mes "our customs and cultural traditions."; - mes "You should even try and look as much"; - mes "like us as you can."; - next; - mes "[Karukatan]"; - mes "I hope you're worthy of my confidence."; - mes "Some members of the tribe have expressed"; - mes "the sentiment that welcoming outsiders"; - mes "is dangerous to the village."; - next; - mes "[Karukatan]"; - mes "When you want to begin learning the"; - mes "language, come and visit me. Don't"; - mes "forget to make yourself appear as"; - mes "much like us as you can."; - set event_umbala,1; - close; -LStart2: - mes "[Karukatan]"; - mes "Ahh, have you looked around the"; - mes "village a bit? Did other people"; - mes "from the tribe hide from you when"; - mes "they saw you? Don't worry. They"; - mes "were just surprised to see a new face."; - next; - mes "[Karukatan]"; - mes "Hmm? You need something from me?"; - mes "How can I make your stay in the village"; - mes "more pleasant?"; - next; - menu "I want to learn the tribal language",-,"Umbaumbaba?",L2,"Forget it",L3; - if ((getequipisequiped(9)>0) && (getequipisequiped(10)>0)) goto L1_mask; - mes "[Karukatan]"; - mes "Well, in order to understand our"; - mes "language, you need to assimilate"; - mes "our cultural values, too. Trying to"; - mes "understand a language in the context of an"; - mes "alien culture is foolish, right?"; - next; - mes "[Karukatan]"; - mes "Besides, if the tribesmen in the"; - mes "village fear you, how will you"; - mes "ever get them to speak with you?"; - mes "You should try making yourself"; - mes "look like us in order to be more"; - mes "accepted."; - close; - L1_mask: - mes "[Karukatan]"; - mes "What a cute mask. The Utan tribe"; - mes "appreciates its traditional masks"; - mes "because sometimes by hiding your"; - mes "face, you can express more genuine"; - mes "feelings."; - next; - mes "[Karukatan]"; - mes "Over time, the mask itself"; - mes "has come to symbolize trust among"; - mes "the members of the Utan tribe."; - next; - mes "[Karukatan]"; - mes "Now that you're prepared, I will"; - mes "begin teaching you the Utan"; - mes "language as promised. First,"; - mes "you need to make some preparations,"; - mes "however..."; - next; - mes "[Karukatan]"; - mes "First, I need some paper. With"; - mes "paper, I can write down the words"; - mes "I intend to teach."; - next; - mes "[Karukatan]"; - mes "I need ^3377FF10x Oil Paper^000000, and ^3377FF5x Slick Paper^000000."; - mes "I also need something to write with."; - mes "of course."; - mes "For that, ^3377FF1x Squid Ink^000000 and ^3377FF1x Feather of Birds^000000"; - mes "will do nicely."; - next; - mes "[Karukatan]"; - mes "Once you get these, I can start"; - mes "teaching you the language."; - set event_umbala,2; - close; - L2: - mes "[Karukatan]"; - mes "Haha. Only imitating the sound"; - mes "of the words is useless. Even"; - mes "though it sounds random, there is"; - mes "a specific way of combining the"; - mes "words."; - next; - mes "[Karukatan]"; - mes "Also, our language has depends a"; - mes "a lot on emotion to convey its"; - mes "meaning. Outsiders can't pick up"; - mes "the subtlety right away, even though"; - mes "we're the same race, "; - next; - mes "[Karukatan]"; - mes "It seems you have an interest"; - mes "in learning the language of the"; - mes "Utan tribe. If that's the case,"; - mes "come visit me and I'll teach you."; - next; - mes "[Karukatan]"; - mes "Then, you won't sound so silly."; - close; - L3: - mes "[Karukatan]"; - mes "Ah. If you want to continue your"; - mes "trip, please keep this village in"; - mes "your memories."; - close; -LStart3: - if ((countitem(7151)>=10) && (countitem(7111)>=5) && (countitem(1024)>=1) && (countitem(916)>=1)) goto Lchkok;//Items: Oiled Paper, String Paper, Squid Ink, Feather of Birds, - mes "[Karukatan]"; - mes "It seems you've not yet prepared the"; - mes "proper items. Did you forget what"; - mes "you need to gather before I can"; - mes "teach you the language? You need to gather"; - next; - mes "[Karukatan]"; - mes "^3377FF10x Oil Paper^000000,"; - mes "^3377FF5x Slick Paper^000000,"; - mes "^3377FF1x Squid Ink^000000, and"; - mes "^3377FF1x Feather of Bird^000000."; - mes "Once you have gathered those, I can teach"; - mes "you Utan tribal language."; - close; -Lchkok: - delitem 7151,10;//Items: Oiled Paper, - delitem 7111,5;//Items: String Paper, - delitem 1024,1;//Items: Squid Ink, - delitem 916,1;//Items: Feather of Birds, - mes "[Karukatan]"; - mes "Good. You've prepared all the"; - mes "necessary materials. Now, I can"; - mes "begin to teach you the Utan tribal"; - mes "language."; - next; - mes "[Karukatan]"; - mes "............"; - next; - mes "[Karukatan]"; - mes "............"; - mes "............"; - next; - mes "[Karukatan]"; - mes "............"; - mes "............"; - mes "............"; - next; - mes "[Karukatan]"; - mes "Do you feel more enlightened now?"; - mes "Try talking to others in the Utan"; - mes "tribe. They'll warm up to your quickly"; - mes "now that you speak the language."; - set event_umbala,3; - next; - mes "[Karukatan]"; - mes "If you need something while you're"; - mes "here, don't hesitate to visit me."; - close; -LStart4: -//fin - mes "[Karukatan]"; - mes "Do you need something?"; - mes "If you need someone to guide you around"; - mes "the village, you should ask someone else."; - mes "I can't leave here right now."; - next; - mes "[Karukatan]"; - mes "The best way to get a feel for"; - mes "the village is to just walk"; - mes "around and see the sights. By doing"; - mes "that, you can form a personal"; - mes "bond with the village."; - close; -LStart5: - mes "[Karukatan]"; - mes "Oh, it seems you're enjoying yourself here."; - mes "You need something else?"; - next; - mes "[Karukatan]"; - mes "It seems you want to ask the"; - mes "shaman Putsuchiratan something"; - mes "and you're seeking my permission"; - mes "to do so."; - next; - mes "[Karukatan]"; - mes "Well...There's a mask from"; - mes "abroad that Putsuchiratan and I"; - mes "have both always desired. Putsuchiratan"; - mes "heard about it some time ago."; - next; - mes "[Karukatan]"; - mes "If I could have the ^3377FFSmile Mask^000000,"; - mes "it would be a great honour, but"; - mes "I promised I would give it to"; - mes "to Putsuchiratan as a gift if I ever"; - mes "came across one. If you can find a Smile Mask for me,"; - mes "I'll give you permission to speak with her."; - set event_umbala,5; - close; -LStart6: - if(countitem(2278) > 0) goto Lsmileok;//Items: Mr. Smile, - mes "[Karukatan]"; - mes "Did you find the ^3377FFSmile Mask^000000 yet?"; - mes "In order to let you see the shaman,"; - mes "you need to collect one."; - mes "A gift will put Putsuchiritan in"; - mes "a good mood, also."; - close; -Lsmileok: - delitem 2278,1;//Items: Mr. Smile, - mes "[Karukatan]"; - mes "Ahh! It's a Smile Mask!"; - mes "I would really like to put this"; - mes "on just once, but I promised to"; - mes "give this to Putsuchiritan as"; - mes "a gift."; - set event_umbala,6; - next; - mes "[Karukatan]"; - mes "I'll tell Putsuchiritan to allow you"; - mes "to meet with her. I'm certain that you"; - mes "will find her talents to be a tremendous"; - mes "help on your journey."; - close; + mes "[Karkatan]"; + mes "I will tell Puchuchartan that I"; + mes "confirmed your qualification."; + mes "Go and speak to her. Though I"; + mes "am not sure what help she can give"; + mes "you, I hope we will be able to return this favor."; + delitem 2278,1; //Mr_Smile + set event_umbala,6; + close; + } + else { + mes "[Karkatan]"; + mes "Did I tell you that you need"; + mes "^3377FF1 Mr. Smile^000000?"; + mes "Please bring that as proof"; + mes "of your goodwill, as well"; + mes "as your sense of honor."; + close; + } + } + else { + mes "[Karkatan]"; + mes "How's it going?"; + mes "I wish I could guide you around"; + mes "the village, but I cannot neglect"; + mes "my duty as tribal chief."; + next; + mes "[Karkatan]"; + mes "Leading a tribe is not as easy"; + mes "as it looks. You would understand"; + mes "if you were in the same position"; + mes "as me. Anyway, I hope you will enjoy your time in our village."; + close; + } + } } //===================================================================== // Create Essence/Dismantle Stone //===================================================================== -um_in,44,71,2 script Utan Tribe Shaman 782,{ - +um_in,44,71,2 script Utan Shaman 782,{ switch(event_umbala) { default: - mes "[?????]"; - mes "Umbaumbaumbaba Utan Umbaba"; - mes "Umbaumbaumbafumbabauma..."; - mes "Umbabaumbaumbabaumbabaumba"; - mes "Umbabaumbabaumbaumbabaumba"; - mes "Fumbaumba."; - next; + mes "[??????????]"; + mes "Umbah umbah umbabah Utan umbah"; + mes "Umbah mookala umbabah.."; + mes "Umbabahumbah umbabah"; + mes "Umbabah umbaba umbaumbah umbah"; + mes "Hum umbah umbah."; + close2; warp "umbala",217,186; - close; + end; case 3: - mes "[Putsuchiritan]"; - mes "I will not see outsiders that are"; - mes "not from the Utan tribe."; - mes "...There are many things about the"; - mes "nature of our society that you do"; - mes "not yet understand."; + mes "[Puchuchartan]"; + mes "I did not expect that even"; + mes "more of you Rune-Midgardians"; + mes "would find my village. I am"; + mes "afraid that Mother Earth may"; + mes "be caused suffering because"; + mes "of this..."; next; - mes "[Putsuchiritan]"; - mes "Others of your type will do anything"; - mes "to set foot on land which is sacred"; - mes "to the Utan tribe. We fear that"; - mes "revealing our secrets will expose"; - mes "use to danger."; + mes "[Puchuchartan]"; + mes "You Rune-Midgardians are a very"; + mes "evil tribe...always accomplishing"; + mes "your goals whether the means are"; + mes "foul or fair, never hesitating to"; + mes "ruin the property of others to get"; + mes "what you want."; next; - mes "[Putsuchiritan]"; - mes "What's worse, I don't think that"; - mes "outsiders understand our desire"; - mes "to preserve our tribal culture."; + mes "[Puchuchartan]"; + mes "I am worried how continuing"; + mes "contact with the outside world"; + mes "will affect our future..."; next; - mes "[Putsuchiritan]"; - mes "As my talents are foremost for"; - mes "the use of the Utan tribe, you"; - mes "must get permission from the elder"; - mes "if you want my assistance."; - mes "Also, don't be stirring up trouble"; - mes "among the tribesmen."; + mes "[Puchuchartan]"; + mes "No one from Rune-Midgard has "; + mes "visited me without some purpose"; + mes "and I do not think that you"; + mes "are an exception."; + next; + mes "[Puchuchartan]"; + mes "I only use my power for the"; + mes "service of my tribe, and do not"; + mes "give my aid to strangers. If you"; + mes "really need my help, go ask for"; + mes "the chief's permission."; + next; + mes "[Puchuchartan]"; + mes "Also, I do not approve of"; + mes "outsiders talking to the tribe"; + mes "more than they have to..."; + mes "We want to live a peaceful life, so do not disturb us."; set event_umbala,4; close; case 4: case 5: - mes "[Putsuchiritan]"; - mes "Didn't you hear me? You need"; - mes "to get the elder's permission before"; - mes "I can help you."; + mes "[Puchuchartan]"; + mes "I already told you to get the"; + mes "chief's approval. There is also"; + mes "the matter of my own business to take care of."; + next; + mes "[Puchuchartan]"; + mes "I know that you have gone through"; + mes "many difficulties to come here,"; + mes "but you have to leave now."; close; case 6: - mes "[Putsuchiritan]"; - mes "You seem to have gotten permission from"; - mes "the elder. Fine, I'll help you, though"; - mes "I don't really want to."; + mes "[Puchuchartan]"; + mes "I've heard from the chief that he"; + mes "has given you his approval..."; + mes "Although I do not like this, I"; + mes "will keep my promise. But it's"; + mes "your call if you really need my help or not."; next; - mes "[Putsuchiritan]"; - mes "I can call forth hidden talents"; - mes "buried deep within your psyche"; - mes "and tap the power hidden in"; - mes "elemental stones."; + mes "[Puchuchartan]"; + mes "My power allows me to create rough"; + mes "enchanted stones and to divide a"; + mes "pure enchanted stone into rough"; + mes "ones. So I may be able to help"; + mes "you in this way."; next; - mes "[Putsuchiritan]"; - mes "I need to prepare my rituals."; - mes "When you're ready to proceed, please"; - mes "talk to me again."; + mes "[Puchuchartan]"; + mes "So come and speak to me when"; + mes "you think my power may be"; + mes "of service to you."; set event_umbala,7; close; case 7: @@ -627,355 +462,887 @@ um_in,44,71,2 script Utan Tribe Shaman 782,{ mes "or, dismantle elemental stones into their component essences."; mes "Which would you like to do?"; } - next; - - set .@need,0; - - switch (select("Create Essence","Dismantle Elemental Stone","Nothing")) { + mes "[Puchuchartan]"; + mes "Rune-Midgardian who has asked for"; + mes "my help...Although I am not sure"; + mes "if you really need my power, I"; + mes "will try to provide my assistance."; + next; + if (checkweight(1101,10) == 0) { + mes "[Puchuchartan]"; + mes "Wait--!"; + mes "something in your possession"; + mes "is disturbing my peace of"; + mes "mind. This will not do..."; + next; + mes "[Puchuchartan]"; + mes "Go leave your belongings"; + mes "elsewhere, and only bring the"; + mes "items that you need right now."; + next; + mes "[Puchuchartan]"; + mes "If you refuse to do so,"; + mes "I cannot do anything for you."; + mes "Get yourself ready and then"; + mes "come back."; + close; + } + mes "[Puchuchartan]"; + mes "Now, what do you wish to do?"; + mes "My power allows me to create rough"; + mes "enchanted stones and to divide a"; + mes "pure enchanted stone into rough ones."; + next; + switch (select("Create rough enchanted stones:Divide a pure enchanted stone:Quit.")) { case 1: - mes "[Putsuchiritan]"; - mes "Which elemental essence would you"; - mes "like to create? I can create earth, water,"; - mes "fire, and wind essence."; + mes "[Puchuchartan]"; + mes "Do you wish to create rough"; + mes "enchanted stones? Which"; + mes "property do you wish to create?"; + mes "Earth, Water, Fire, Wind..."; + mes "...choose one."; next; - switch (select("Earth","Water","Fire","Wind")) { - case 1: - if(countitem(947)<15) { - mes "[Putsuchiritan]"; - mes "Earth...You need that which is"; - mes "a friend of the earth. Explore"; - mes "the verdant forest and find"; - mes "^3377FF15x Horn^000000 for the ritual."; + switch (select("Earth:Water:Fire:Wind")) { + case 1: + set .@consume,947; //Horn + set .@amount,15; + set .@success,993; //Yellow_Live + break; + case 2: + set .@consume,946; //Snail's_Shell + set .@amount,20; + set .@success,991; //Crystal_Blue + break; + case 3: + set .@consume,904; //Scorpion's_Tail + set .@amount,20; + set .@success,990; //Boody_Red + break; + case 4: + set .@consume,1013; //Colorful_Shell + set .@amount,25; + set .@success,992; //Wind_Of_Verdure + break; + } + if (countitem(.@consume) >= .@amount) { + mes "[Puchuchartan]"; + mes "I will try to amplify the hidden"; + mes "power of natural objects in"; + mes "order to create rough enchanted"; + mes "stones. Choose one number from"; + mes "'1' to '9.' If you wish to cancel"; + mes "this request, enter '0.'"; + next; + while(1) { + input .@input,0,10; + if (.@input == 0) { + mes "[Puchuchartan]"; + mes "I see. It's your call."; + mes "Come back when you need me."; + close; + } + else if (.@input > 9) { + mes "[Puchuchartan]"; + mes "Remember to choose a number"; + mes "from 1 to 9."; + next; } else { - set .@need,947; - set .@amount,15; - set .@gain,993; + break; } + } + mes "[Puchuchartan]"; + switch(.@success) { + case 990: + mes "I am putting these tails into a"; break; + case 991: + mes "I am putting these shells into a"; break; + case 992: + mes "I am putting these shells into a"; break; + case 993: + mes "I am putting these horns into a"; break; + } + mes "boiling pot, and casting a"; + mes "sacred incantation. Remember"; + mes "the number you entered."; + next; + mes "[Puchuchartan]"; + mes "Amba Omba Zatumba! Umba! Ti!"; + mes "Umputaun Eulukaba! Umba! Ha!"; + mes "Julu Humba Rulala! Umba! La!"; + mes "Datuha Ombabalaka! Umba! Si!"; + mes "Sunutaba Abulumba! Umba! Si!"; + next; + if (rand(1,10) == 1) { + mes "[Puchuchartan]"; + mes "I guess my power was not enough."; + mes "The natural power I gathered with"; + mes "my spell lost focus and was scattered..."; + delitem .@consume,.@amount; + getitem 910,1; //Garlet + next; + mes "[Puchuchartan]"; + mes "It seems the spirits of nature"; + mes "were not in harmony at the moment."; + mes "However, if you come back later,"; + mes "I will try to help you. Of course,"; + mes "there will still be the same possibility that I may fail."; + close; + } + else { + mes "[Puchuchartan]"; + mes "Here's the enchanted stone you"; + mes "wished to have. I created this"; + mes "with a lot of effort, so make"; + mes "good use of it."; + delitem .@consume,.@amount; + getitem .@success,1; + close; + } + } + else { + mes "[Puchuchartan]"; + switch (.@success) { + case 990: + mes "Fire property..."; + mes "I will need natural"; + mes "objects that are filled with"; + mes "the spirit of fire."; + next; + mes "[Puchuchartan]"; + mes "Scorpion which endures the"; + mes "blazing heat of the desert"; + mes "is brimming with fire energy."; + mes "I need ^3377FF20 Scorpion Tails^000000."; break; - case 2: - if(countitem(946)<20) { - mes "[Putsuchiritan]"; - mes "Water...You need that which is"; - mes "saturated with water. Explore"; - mes "the area around here and find"; - mes "^3377FF20x Snails Shell^000000 for the ritual."; + case 991: + mes "Water property..."; + mes "I will need natural"; + mes "objects that are filled with"; + mes "the spirit of water."; + next; + mes "[Puchuchartan]"; + mes "Ambernite...the spirit of"; + mes "water is contained within its"; + mes "protective shell..."; + mes "I will need ^3377FF20 Snail's Shell.^000000"; + break; + case 992: + mes "Wind property..."; + mes "I will need natural"; + mes "objects that are filled with"; + mes "the spirit of wind."; + next; + mes "[Puchuchartan]"; + mes "Stainer...the beetle"; + mes "that flies through the sky"; + mes "has the wind's spirit."; + mes "I need ^3377FF25 Rainbow Shells^000000."; + break; + case 993: + mes "Earth property...I need natural"; + mes "objects that are filled with"; + mes "the spirit of the Earth."; + next; + mes "[Puchuchartan]"; + mes "Horn...that dwells in the forest"; + mes "is filled with the spirits of"; + mes "earth and wood...Horn..."; + mes "I need ^3377FF15 Horn^000000 from Horns."; + break; + } + mes "[Puchuchartan]"; + mes "That's all I need..."; + mes "Come back when"; + mes "you're ready."; + mes "I will be here."; + close; + } + case 2: + mes "[Puchuchartan]"; + mes "Do you wish to divide a pure"; + mes "enchanted stone into rough ones?"; + mes "Which property do you want to"; + mes "divide? Earth, Water, Fire, Wind... "; + mes "Choose one."; + next; + switch(select("Earth:Water:Fire:Wind")) { + case 1: + set .@divide,997; //Great_Nature + break; + case 2: + set .@divide,995; //Mistic_Frozen + break; + case 3: + set .@divide,994; //Flame_Heart + break; + case 4: + set .@divide,996; //Rough_Wind + break; + } + if (countitem(.@divide) > 0) { + mes "[Puchuchartan]"; + mes "Let me try to return the enchanted"; + mes "stone to its rough form..."; + mes "Choose a number from 1 to 9."; + mes "If you wish to cancel this"; + mes "request, enter 0."; + next; + while(1) { + input .@input,0,10; + if (.@input == 0) { + mes "[Puchuchartan]"; + mes "I see. It's your call."; + mes "Come back when you need me."; + close; + } + else if (.@input > 9) { + mes "[Puchuchartan]"; + mes "Remember to choose a number"; + mes "from 1 to 9."; + next; } else { - set .@need,946; - set .@amount,20; - set .@gain,991; + break; } - break; - case 3: - if(countitem(904)<20) { - mes "[Putsuchiritan]"; - mes "Fire...You need that which"; - mes "can withstand the roiling heat"; - mes "of perpetual flame. Explore the"; - mes "desert and find ^3377FF20x Scorpion Tail^000000"; - mes "for the ritual."; + } + mes "[Puchuchartan]"; + mes "I will now cast a sacred"; + mes "incantation. Remember the number you entered."; + next; + mes "[Puchuchartan]"; + mes "Umba Umba Kalapum! Umba! Ta!"; + mes "Lukura Ukulele Um! Umba! Ka!"; + mes "Abulaka Tabulakan! Umba! La!"; + mes "Ombaludu Zan Kunu! Umba! Ku!"; + mes "Kum Tum Lakulakun! Umba! Ha!"; + next; + mes "[Puchuchartan]"; + mes "Here's the rough enchanted stones"; + mes "you wished to have. I created this"; + mes "with a lot of effort, so make good"; + mes "use of them."; + delitem .@divide,1; + switch(.@divide) { + case 994: + set .@shaman_p,rand(1,10); + if (.@shaman_p == 1) { + getitem 990,10; //Boody_Red + } + else if (.@shaman_p == 2 || .@shaman_p == 3) { + getitem 990,8; //Boody_Red + } + else if (.@shaman_p >= 4 && .@shaman_p == 6) { + getitem 990,7; //Boody_Red } else { - set .@need,904; - set .@amount,20; - set .@gain,990; + getitem 990,6; //Boody_Red } - break; - case 4: - if(countitem(1013)<25) { - mes "[Putsuchiritan]"; - mes "Wind...You need that which"; - mes "has an easy camaraderie with"; - mes "the sky itself."; - mes "You need ^3377FF25x Rainbow Shell^000000"; - mes "to complete the ritual."; + close; + case 995: + set .@shaman_p,rand(1,10); + if (.@shaman_p == 1) { + getitem 991,10; //Crystal_Blue + } + else if (.@shaman_p == 2 || .@shaman_p == 3) { + getitem 991,8; //Crystal_Blue + } + else if (.@shaman_p >= 4 && .@shaman_p <= 6) { + getitem 991,7; //Crystal_Blue } else { - set .@need,1013; - set .@amount,25; - set .@gain,992; + getitem 991,6; //Crystal_Blue + } + close; + case 996: + set .@shaman_p,rand(1,10); + if (.@shaman_p == 1) { + if (rand(1,2) == 1) { + getitem 992,10; //Wind_Of_Verdure + } + else { + getitem 992,6; //Wind_Of_Verdure + } + } + else if (.@shaman_p == 2 || .@shaman_p == 3) { + getitem 992,8; //Wind_Of_Verdure + } + else if (.@shaman_p >= 4 && .@shaman_p == 6) { + getitem 992,7; //Wind_Of_Verdure + } + else { + getitem 992,6; //Wind_Of_Verdure + } + close; + case 997: + set .@shaman_p,rand(1,5); + if (.@shaman_p == 1) { + getitem 993,10; //Yellow_Live + } + else if (.@shaman_p == 2) { + getitem 993,8; //Yellow_Live + } + else if (.@shaman_p >= 3 || .@shaman_p <= 4) { + getitem 993,7; //Yellow_Live + } + else { + if (rand(1,2) == 1) { + getitem 993,6; //Yellow_Live + } + else { + getitem 993,7; //Yellow_Live + } } - break; - } - if(.@need == 0) { - next; - mes "[Putsuchiritan]"; - mes "Once you've prepared these"; - mes "objects from nature, please return here"; - mes "so we can complete the ritual."; - close; - } - mes "[Putsuchiritan]"; - mes "Now, I will try to tap the"; - mes "source of power hidden deep within"; - mes "you. Choose a number between 1 and 9."; - mes "If you don't want to create essence"; - mes "after all, choose 0."; - while(1) { - next; - input .@num; - if(.@num<=0) { - mes "[Putsuchiritan]"; - mes "If you don't wish my help at the moment,"; - mes "that's fine. When you do, please come"; - mes "by again."; close; } - if(.@num>9) { - mes "[Putsuchiritan]"; - mes "You must choose a number between"; - mes "1 and 9. It is very important that"; - mes "you choose the number most dear to"; - mes "your heart."; - continue; - } - break; - } - mes "[Putsuchiritan]"; - switch(.@need) { - case 947: mes "The horn begins to vibrate."; break; - case 904: mes "The tail begins to vibrate."; break; - default: mes "The shell begins to vibrate."; break; } - mes "I will now chant a holy mantra."; - mes "Imagine the number in your mind"; - mes "and imagine power radiating forth from"; - mes "your body."; - next; - mes "[Putsuchiritan]"; - mes "Amba Omba Sanba! Unba Chi!"; - mes "Wanbatauma Eurukaba! Unba! Ba!"; - mes "Jyur! Fumuba Rurara! Wamba! Ra!"; - mes "Damtsuha Ombabaraka! Unba! Shi!"; - mes "Sukatamba Aburumba! Umba! Shi!"; - next; - mes "[Putsuchiritan]"; - if(countitem(.@need)<.@amount){ - mes "You're An Amba HacK0R!"; - mes "I'm clearing your mind!"; - //we reset the whole quest for the hacker - set event_umbala,0; - emotion e_swt,1; + else { + mes "[Puchuchartan]"; + mes "So, you wish to have rough"; + switch(.@divide) { + case 994: + mes "fire stones? Then I will need"; + mes "you to bring a pure fire stone."; + break; + case 995: + mes "water stones? Then I'll need"; + mes "you to bring a pure water stone."; + break; + case 996: + mes "wind stones? Then I will need"; + mes "you to bring a pure wind stone."; + break; + case 997: + mes "earth stones? Then I'll need"; + mes "you to bring a pure earth stone."; + break; + } + mes "^3377FF1 "+getitemname(.@divide)+"^000000."; + next; + mes "[Puchuchartan]"; + mes "That's all I need..."; + mes "Come back when"; + mes "you're ready."; + mes "I will be here."; close; } - delitem .@need,.@amount; - if(!rand(10)){ - getitem 910,1; //if failed get Garlet - mes "Your inner power has failed"; - mes "to convert these objects"; - mes "from nature into elemental essence..."; - next; - mes "[Putsuchiritan]"; - mes "Purify your mind and try again."; - close; - } - getitem .@gain,1; - mes "There. Your inner power has converted"; - mes "these objects from nature into"; - mes "elemental essence. Put"; - mes "it to good use."; + case 3: + mes "[Puchuchartan]"; + mes "I see. It's your call."; + mes "Come back when you need me."; close; - case 2: - mes "[Putsuchiritan]"; - mes "What type of stone would you like to"; - mes "dismantle? Please choose earth, water,"; - mes "fire, or wind."; + } +} + +umbala,221,193,1 script #Skulldoor 111,{ + if (event_umbala >= 7) { + warp "um_in",32,71; + end; + } + else { + mes "^3355FFA human skull disturbingly"; + mes "hangs beside the door. The door is"; + mes "locked tight, so you can't get in."; + mes "As you peer through the keyhole,"; + mes "you can see somebody moving inside the room.^000000"; next; - switch (select("Earth","Water","Fire","Wind")) { + if (select("Examine the skull.:Quit.") == 1) { + mes "^3355FFYou see that the eye sockets"; + mes "of the skull are empty."; + mes "How peculiar..."; + mes "It seems that Gemstones"; + mes "would fit perfectly inside of"; + mes "them.^000000"; + next; + mes "^3355FFYou see the left eye socket of the"; + mes "skull. What do you want to do?^000000"; + next; + switch(select("Leave it as it is.:Insert a Blue Gemstone.:Insert a Yellow Gemstone.:Insert a Red Gemstone.")) { case 1: - if(countitem(997)==0) { - mes "[Putsuchiritan]"; - mes "You need to have"; - mes "^3377FF1x Great Nature^000000"; - mes "to disassemble into its"; - mes "component essence."; - } - else { - set .@need,997; - set .@gain,993; - } + mes "^3355FFYou left the eye socket as it was.^000000"; + next; break; case 2: - if(countitem(995)==0) { - mes "[Putsuchiritan]"; - mes "You need to have"; - mes "^3377FF1x Mystic Frozen^000000"; - mes "to disassemble into its"; - mes "component essence."; + set .@insert,717; + break; + case 3: + set .@insert,715; + break; + case 4: + set .@insert,716; + break; + } + if (.@insert) { + if (countitem(.@insert) > 0) { + mes "^3355FFYou inserted a "+getitemname(.@insert)+""; + mes "into the eye socket.^000000"; + next; + mes "^3355FFThe gemstone rolled back out of"; + mes "the mouth of the skull.^000000"; + set .@skulldoor,.@skulldoor+1; + switch (.@insert) { + case 715: set .@skull,2; break; + case 716: set .@skull,3; break; + case 717: set .@skull,1; break; + } + delitem .@insert,1; + getitem .@insert,1; + next; } else { - set .@need,995; - set .@gain,991; + mes "^3355FFYou forgot to carry "+getitemname(.@insert)+""; + mes "with you. So you couldn't do what you"; + mes "had intended.^000000"; + next; } + } + mes "^3355FFYou see the right eye socket of"; + mes "the skull. What do you want to do?^000000"; + next; + switch(select("Leave it as it is.:Insert a Blue Gemstone.:Insert a Yellow Gemstone.:Insert a Red Gemstone.")) { + case 1: + mes "^3355FFYou left the eye socket as it was.^000000"; + next; + break; + case 2: + set .@insert2,717; break; case 3: - if(countitem(994)==0) { - mes "[Putsuchiritan]"; - mes "You need to have"; - mes "^3377FF1x Flaming Heart^000000"; - mes "to disassemble into its"; - mes "component essence."; + set .@insert2,715; + break; + case 4: + set .@insert2,716; + break; + } + if (.@insert2) { + if (countitem(.@insert2) > 0) { + mes "^3355FFYou inserted a "+getitemname(.@insert2)+""; + mes "into the eye socket.^000000"; + next; + mes "^3355FFThe gemstone rolled back out of"; + mes "the mouth of the skull.^000000"; + if (.@insert2 == .@insert) { + set .@skulldoor,.@skulldoor+1; + } + else { + set .@skulldoor,.@skulldoor+2; + } + delitem .@insert2,1; + getitem .@insert2,1; + next; } else { - set .@need,994; - set .@gain,990; + mes "^3355FFYou forgot to carry "+getitemname(.@insert2)+""; + mes "with you. So you couldn't do what you"; + mes "had intended.^000000"; + next; + } + } + mes "^3355FF..............................^000000"; + next; + mes "^3355FF.............................."; + mes "..............................^000000"; + next; + mes "^3355FF.............................."; + mes ".............................."; + mes "..............................^000000"; + next; + switch(.@skulldoor) { + case 3: + if (rand(1,4) != 1) { + set .@skullopen,1; } break; - case 4: - if(countitem(996)==0) { - mes "[Putsuchiritan]"; - mes "You need to have"; - mes "^3377FF1x Rough Wind^000000"; - mes "to disassemble into its"; - mes "component essence."; + case 2: + if (rand(1,2) == 2) { + set .@skullopen,1; } - else { - set .@need,996; - set .@gain,992; + break; + case 1: + if (rand(1,4) == 1) { + set .@skullopen,1; } break; + default: + break; + } + if (.@skullopen == 0) { + mes "^3355FFNothing happened."; + mes "You have the feeling that the"; + mes "skull is grinning at you. But..."; + mes "It's probably just a trick of the light.^000000"; + close; + } + else { + mes "^3355FFSuddenly, a clicking sound comes"; + mes "from the skull's eye sockets and"; + mes "the door opens. Before you know"; + mes "it, you walk inside as if guided"; + mes "by an unseen force...^000000"; + close2; + warp "um_in",32,71; + end; + } } + mes "^3355FFYou decided to pass by the door."; + mes "It looks like it might be too hard to open.^000000"; + close; + } +} + + +//============================================================ +// Umbala Domestic Dispute +//============================================================ +um_in,139,48,5 script Phrenetan 783,{ + if (event_umbala >= 3) { + mes "[Phrenetan]"; + mes "I am so sick and tired of"; + mes "my husband!! It's like he"; + mes "flirts with every girl"; + mes "in the village!"; + next; + mes "[Phrenetan]"; + mes "If I see him flirting with"; + mes "women again...I swear..."; + mes "I will show him hell!!"; + close; + } + if (BaseJob == Job_Novice && Upper != 2) { + mes "[Phrenetan]"; + mes "Umba~ umbaumbah!"; + mes "Umbah woomumum!"; + mes "Umbah woomum umbabah!"; + close; + } + if (um_wind <= 3 && (MISC_QUEST & 32768) == 0) { + if (um_wind) set um_wind,1; + emotion e_an; + mes "[Phrenetan]"; + mes "Umbaumbah wooga wooga"; + mes "Umbaumbabah babababah!"; + mes "Umbaum!"; + next; + emotion e_oh; + mes "[Phrenetan]"; + mes "Umbah umbaumba umbah"; + mes "Umbabababah wooga woo!"; + mes "Wooga wooga umbabah umbaum!"; + next; + emotion e_go; + close; + } + else if (um_wind == 6 || MISC_QUEST & 32768) { + emotion e_an; + mes "[Phrenetan]"; + mes "Umbabah! Umbaumbah....."; + mes "Umbaum Umbaum Wooga wooga!"; + mes "Wooga umumum woombababap!!!!!"; next; - if(.@need == 0) { - mes "[Putsuchiritan]"; - mes "Once you have the necessary stone,"; - mes "please come back and visit me"; - mes "so that the ritual can be completed."; + emotion e_swt; + close; + } + end; + +OnEmoteOmg: + emotion e_omg; + end; + +OnEmoteRock: + emotion e_rock; + end; +} + +um_in,144,45,5 script Umpokoriohtan 789,{ + if (event_umbala >= 3) { + if(rand(1,3) == 2) { + mes "[Umpokoriohtan]"; + mes "Hey there, cool cat."; + mes "Don't mind the wife..."; + mes "Much as I love her,"; + mes "I know my obligations, ya dig?"; + next; + mes "[Umpokoriohtan]"; + mes "If a man's got plenty, he's"; + mes "got to share it with those"; + mes "that got nothing to give."; + next; + mes "[Umpokoriohtan]"; + mes "If a man's hands are good"; + mes "at healin', he's got to use"; + mes "those hands to help folks live."; + next; + mes "[Umpokoriohtan]"; + mes "If a man's lips be good at"; + mes "singin', he's got to croon the"; + mes "songs we like to hear so much."; + next; + mes "[Umpokoriohtan]"; + mes "But if sweet lovin' is golden,"; + mes "then baby...I got the Midas touch."; + next; + mes "[Umpokoriohtan]"; + mes "Ooh...!"; + mes "..........."; + mes "My back--!"; + mes "Simmer down, baby, your turn is comin' in a minute~"; + donpcevent "Phrenetan::OnEmoteRock"; + emotion e_swt; close; } - mes "[Putsuchiritan]"; - mes "Also, my power is strong"; - mes "enough to break more than"; - mes "stone at once. How many of"; - mes "them would you like me to"; - mes "work on? Yet, I don't intend"; - mes "to work on more than 10."; - next; - input .@want; - if(.@want <= 0) - { - mes "[Putsuchiritan]"; - mes "If you don't wish my help at the moment,"; - mes "that's fine. When you do, please come"; - mes "by again."; + else { + mes "[Umpokoriohtan]"; + mes "Man...sometimes my wife can"; + mes "be a lil' too rough, maybe"; + mes "even hurtful. But that's cool..."; + mes "it just means she's got fire."; + next; + mes "[Umpokoriohtan]"; + mes "But someday, she'll have to"; + mes "learn that I gots to share"; + mes "this heart of mine with the ladies"; + mes "who really need a dose of vitamin"; + mes "lovin', ya dig? It's my obligation."; + next; + mes "[Umpokoriohtan]"; + mes "Wainatan, Bertztan, Chabimatan..."; + mes "Those pretty girls been waitin'"; + mes "toooooo long. Don't worry,"; + mes "big daddy's comin' soon."; + next; + mes "[Umpokoriohtan]"; + mes "OOOH~! Phrenetan!"; + mes "Baby, why you gotta be rough?"; + mes "Hit me gently, ya dig??"; + mes "I don't mean to hurt you~"; + donpcevent "Phrenetan::OnEmoteOmg"; + emotion e_wah; close; } - if(.@want > 10) - { - mes "[Putsuchiritan]"; - mes "I'm not responsible of what"; - mes "can happen if I work on"; - mes "more than 10 stones at once."; - mes "I don't even want to try."; + } + emotion e_heh; + mes "[Umpokoriohtan]"; + mes "Umbaumbah..........."; + mes "Umbahwooga woogawoo!"; + mes "Umbah umumbabah umbawoo gaga."; + next; + emotion e_an; + close; + +OnInit: + disablenpc "Umpokoriohtan"; + end; +} + +um_in,101,73,3 script Wainatan 783,{ + if (event_umbala >= 3) { + mes "[Wainatan]"; + mes "I am sick and tired of this guy"; + mes "who always appears at night and bugs the hell out of me..."; + next; + mes "[Wainatan]"; + mes "'Smooth operator that gets the"; + mes "job done?' Oh my god...!"; + mes "I hate him with a passion!"; + mes "I wish Umpokoriohtan would"; + mes "just drop dead."; + close; + } + if (um_wind == 1) { + if (gettime(3) > 18) { + set um_wind,2; + emotion e_an; + mes "[Wainatan]"; + mes "Umbaumbah umgagaga."; + mes "Umbaumbawoogawoo gababah."; + mes "Umbahumbabah gawoo."; + next; + emotion e_oh; + mes "[Wainatan]"; + mes "Wooga wooga woogagagah"; + mes "Wogagagah woogagagah"; + mes "Gawoo gawoo gah."; close; } - if(countitem(.@need) < .@want) - { - mes "[Putsuchiritan]"; - mes "I can't dismantle something"; - mes "that doesn't even exist. Please"; - mes "come back when you'll have the"; - mes "number of stones you want me to"; - mes "break."; + else { + mes "[Wainatan]"; + mes "Umbabah! Umbaumbah wooga"; + mes "Woogawooga umbawooga umum."; + mes "Umbabababababababababah."; close; } - mes "[Putsuchiritan]"; - switch(.@need) { - case 997: mes "I will dismantle your earth crystal"; break; - case 995: mes "I will dismantle your frozen crystal"; break; - case 994: mes "I will dismantle your heart of flame"; break; - case 996: mes "I will dismantle your rough wind stone"; break; - } - mes "into its component essence."; - mes "Choose a number between 1 and 9."; - mes "If you don't want me to dismantle the"; - mes "stone, choose 0."; - if(.@want > 1) - { - next; - mes "[Putsuchiritan]"; - mes "Choose well your number."; - mes "It will affect my potential"; - mes "and your spirit for all the"; - mes "stones at once."; + } + else { + mes "[Wainatan]"; + mes "Umbaumbah umbaumbah umbah"; + mes "Wooga wooga woogawooga wooga"; + mes "Umumumum umumumum umum."; + close; + } +} + +um_in,94,123,5 script Bertztan 783,{ + if (event_umbala >= 3) { + mes "[Bertztan]"; + mes "...*Sigh* That sicko"; + mes "Umpo-whatever! I told him"; + mes "I don't like him, but he"; + mes "just doesn't listen!"; + mes "I wish...I wish he would"; + mes "just disappear!"; + close; + } + if (um_wind == 2) { + if (gettime(3) > 18) { + set um_wind,3; + emotion e_an; + mes "[Bertztan]"; + mes "Umbaumbah umgagaga."; + mes "Umbaumbawoogawoo gababah."; + mes "Umbahumbabah gawoo."; + next; + emotion e_oh; + mes "[Bertztan]"; + mes "Wooga umbar umbar umbah!"; + mes "Umbar woogagaga woo! Woo! Woo!"; + mes "Wooga~ wooga~ Woo woo woo umbar."; + close; } - while(1) { - next; - input .@num; - if(.@num<=0) { - mes "[Putsuchiritan]"; - mes "If you don't wish my help at the moment,"; - mes "that's fine. When you do, please come"; - mes "by again."; - close; - } - if(.@num>9) { - mes "[Putsuchiritan]"; - mes "You must choose a number between"; - mes "1 and 9. It is very important that"; - mes "you choose the number most dear to"; - mes "your heart."; - continue; - } - break; + else { + mes "[Bertztan]"; + mes "Umbar woogaumbarumbah um!"; + mes "Um~ wooga wooga umbarum."; + mes "Umbah...wooum."; + close; } -L_Dismantle: - set .@num,rand(1,10); //official amount chance - if(.@num == 1) - set .@num,10; - else if(.@num == 2 || .@num == 3) - set .@num,8; - else if(.@num < 7) - set .@num,7; - else - set .@num,6; - set .@want,.@want -1; - set .@result,.@result + .@num; - set .@delete,.@delete +1; - if(.@want) goto L_Dismantle; - mes "[Putsuchiritan]"; - mes "Please place the elemental stone"; - mes "inside this holy circle. I will chant a"; - mes "a mantra. I don't know if I can"; - mes "completely dismantle the stone,"; - mes "but here goes..."; - next; - mes "[Putsuchiritan]"; - mes "Unba Unba Karama! Unba! Ta!"; - mes "Rukara! Ukarere! Un! Unba! Ka!"; - mes "Anburaka Taburaka Taburakan! Unba Ra!"; - mes "Onbaruzu Zan Kata! Unba Ka!"; + } + else { + mes "[Bertztan]"; + mes "Umbar wooga umbar umbah um!"; + mes "Um~ woogawooga umbar um."; + mes "Umbah...wooum."; + close; + } +} + +umbala,145,217,3 script Chabimatan 783,{ + if (event_umbala >= 3) { + mes "[Chabimatan]"; + mes "...*Sigh* Umpokoriohtan seems"; + mes "to be married. I have no"; + mes "idea why he still flirts"; + mes "with other women. Maybe he's"; + mes "not very mature, or he's"; + mes "irresponsible..."; next; - mes "[Putsuchiritan]"; - if(countitem(.@need)<.@delete){ - mes "You're An Amba HacK0R!"; - mes "I'm clearing your mind!"; - //we reset the whole quest for the hacker - set event_umbala,0; - emotion e_swt,1; + mes "[Chabimatan]"; + mes "Well, whatever he is,"; + mes "he's certainly not"; + mes "romantic. Those pick-up"; + mes "lines of his could"; + mes "some work, maybe"; + mes "even some clean up."; + close; + } + if (um_wind == 3) { + if (gettime(3) > 18) { + set um_wind,4; + emotion e_an; + mes "[Chabimatan]"; + mes "Umbabah umbarbar woogawooga um"; + mes "Umbabah umbarbar woogawooga umbah"; + mes "Umumum! Wooga!"; + next; + emotion e_oh; + mes "[Chabimatan]"; + mes "Umbabah~~~~~~~"; + mes "Woogawooga umbar umbar woo!"; + mes "Wooga umbar woogawoogagah."; + enablenpc "Umpokoriohtan"; + enablenpc "#!@#$%"; close; } - if(checkweight(.@gain,.@result) != 1) - { - mes "You are overweight."; - mes "Please clear your inventory"; - mes "or make some empty slots."; + else { + mes "[Chabimatan]"; + mes "Umbabah~~~~~~~"; + mes "Woogawooga umbar umbar woo"; + mes "woo woo! Nook nook~"; + mes "Wooga umbar wooga umbar"; + mes "wooga woogagah."; close; } - delitem .@need,.@delete; - getitem .@gain,.@result; - mes "The elemental stone has been"; - mes "dismantled into its natural"; - mes "essence. Please put it to"; - mes "good use."; - close; - case 3: - mes "[Putsuchiritan]"; - mes "If you don't wish my help at the moment,"; - mes "that's fine. When you do, please come"; - mes "by again."; + } + else { + mes "[Chabimatan]"; + mes "Umbabah~~~~~~~"; + mes "Woogawooga umbar umbar"; + mes "woo woo woo nook nook."; + mes "Wooga umbar wooga umbar"; + mes "wooga woogagah."; close; } } + +um_in,141,46,0 script #!@#$% -1,8,8,{ +OnInit: + disablenpc "#!@#$%"; + end; + +OnTouch: + if (um_wind == 4) { + set um_wind,5; + mes "^3355FFAs you enter the house"; + mes "you happen to witness"; + mes "Phrenetan beating a guy"; + mes "mercilessly.^000000"; + next; + emotion e_an; + mes "[Phrenetan]"; + mes "Umbaumbaumbaumbah!"; + mes "Umbaumbahumbah!!"; + mes "Umbaumbahumbah!!!!!!"; + next; + mes "^3355FFYou were kicked out of the house"; + mes "by Phrenetan.^000000"; + next; + enablenpc "#unpc"; + disablenpc "#!@#$%"; + warp "umbala",94,181; + } + end; +} + +umbala,94,181,0 script #unpc -1,1,1,{ +OnInit: + disablenpc "#unpc"; + end; + +OnTouch: + if (um_wind == 5) { + mes "^3355FFAs you realized what happened"; + mes "after being kicked out of the"; + mes "house, you see a leaf on the"; + mes "ground near where you're standing.^000000"; + next; + if (select("Take it.:Leave it.") == 1) { + close2; + set um_wind,0; + set MISC_QUEST,MISC_QUEST | 32768; + getitem 610,1; //Leaf_Of_Yggdrasil + disablenpc "#unpc"; + end; + } + set um_wind,0; + set MISC_QUEST,MISC_QUEST | 32768; + mes "[" + strcharinfo(0) + "]"; + mes "I am not supposed to take"; + mes "what may belong to other people."; + next; + mes "[" + strcharinfo(0) + "]"; + mes "Yeah, I'm a such good person."; + close2; + disablenpc "#unpc"; + } + end; +} -- cgit v1.2.3-60-g2f50