summaryrefslogtreecommitdiff
path: root/npc/pre-re/quests/quests_umbala.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/pre-re/quests/quests_umbala.txt')
-rw-r--r--npc/pre-re/quests/quests_umbala.txt1330
1 files changed, 1330 insertions, 0 deletions
diff --git a/npc/pre-re/quests/quests_umbala.txt b/npc/pre-re/quests/quests_umbala.txt
new file mode 100644
index 000000000..e7b632cc2
--- /dev/null
+++ b/npc/pre-re/quests/quests_umbala.txt
@@ -0,0 +1,1330 @@
+//===== rAthena Script =======================================
+//= Quest NPCs related to Umbala
+//===== By: ==================================================
+//= sabernet09 & rAthena Team
+//===== Current Version: =====================================
+//= 2.2a
+//===== Compatible With: =====================================
+//= rAthena 7.15 +
+//===== Description: =========================================
+//= [Aegis Conversion]
+//= Umbalian Language Quest, Umbala Skeletal Gate Quest,
+//= Umbala Event, Create Essence/Dismantle Stone
+// Phase1.Learning the Language
+// 1 (Elder)First discussion
+// 2 (Elder)Asking about learning the language
+// 3 (Elder)Final step (understanding NPC speech)
+// ------------------------------------------
+// Phase2.Create Essence/Dismantle Stone
+// 4 (Shaman)Get permission to speak with her from the chief
+// 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
+//= 1.1 fixed Poporing Egg ID -> Poring Egg, fixed condition
+//= 1.2-1.6 fixed some Umbalian Language quests [Lupus]
+//= 1.7 Moved Umbala Event, Create Essence/Dismantle Stone, and Skeletal Gate from npc/cities/umbala.txt [Evera]
+//= 1.7a Removed all custom quests to custom folder [Lupus]
+//= 1.8 Added official chance of failure to Create Essence/Dismantle Stone [Lupus]
+//= 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]
+//= 2.2 Readded the ability to dismantle multiple stones at once. [L0ne_W0lf]
+//= 2.2a Fixed weight check from previous update. [L0ne_w0lf]
+//============================================================
+
+//==============================================================================
+// Umbala Language Quest
+//==============================================================================
+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 "language, 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;
+ 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;
+ 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;
+ 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;
+ 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;
+ 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 "[Karkatan]";
+ mes "Go explore the village a little";
+ mes "longer. You can come back";
+ mes "anytime when you think you're ready.";
+ next;
+ 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;
+ 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 Shaman 782,{
+ if (checkweight(908,600) == 0) {
+ mes "^3355FFWait a second!";
+ mes "Right now, you're carrying";
+ mes "too many things with you.";
+ mes "Please come back after";
+ mes "using the Kafra Service";
+ mes "to store some of your items.^000000";
+ close;
+ }
+ switch(event_umbala) {
+ default:
+ 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;
+ end;
+ case 3:
+ 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 "[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 "[Puchuchartan]";
+ mes "I am worried how continuing";
+ mes "contact with the outside world";
+ mes "will affect our future...";
+ next;
+ 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 "[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 "[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 "[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 "[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:
+ mes "[Putsuchiritan]";
+ mes "I don't know whether my talents";
+ mes "will be useful to you, but I'll";
+ mes "help you anyway.";
+ next;
+ mes "[Putsuchiritan]";
+ mes "I can create elemental essence from natural objects,";
+ mes "or, dismantle elemental stones into their component essences.";
+ mes "Which would you like to do?";
+ }
+ next;
+ 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 "[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:
+ 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 {
+ 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 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;
+ }
+ mes "[Puchuchartan]";
+ mes "Please enter the";
+ mes "number of enchanted";
+ mes "stones that you wish";
+ mes "to divide. I can only";
+ mes "divide up to 10 at a time.";
+ next;
+ input .@input,0,11;
+ if ((.@input > 0) && (.@input < 11)) {
+ if (countitem(.@divide) >= .@input) {
+ if (checkweight(908,(.@input * 30)) == 0) {
+ mes "[Puchuchartan]";
+ mes "You're carrying too";
+ mes "many items right now.";
+ mes "Put some of your stuff";
+ mes "in Kafra Storage, and then";
+ mes "come back to me, okay?";
+ close;
+ }
+ mes "[Puchuchartan]";
+ mes "I'll try to revert these";
+ mes "enchanted stones to their";
+ mes "rough forms. Enter a number";
+ mes "from 1 to 9, or enter 0 if";
+ mes "you decide to cancel.";
+ next;
+ while(1) {
+ input .@input2,0,10;
+ if (.@input2 == 0) {
+ mes "[Puchuchartan]";
+ mes "You want to cancel?";
+ mes "Well, if you change your";
+ mes "mind, feel free to come";
+ mes "ask me to help at any time.";
+ close;
+ }
+ else if (.@input2 > 9) {
+ mes "[Puchuchartan]";
+ mes "Hm? You need to enter";
+ mes "a number from 1 to 9.";
+ next;
+ }
+ else {
+ break;
+ }
+ }
+ mes "[Puchuchartan]";
+ mes "I will now chant the";
+ mes "sacred words. Remember";
+ mes "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.";
+ while(1) {
+ if (.@sha_man == .@input) {
+ break;
+ }
+ else {
+ set .@shaman_max,.@shaman_max + rand(6,10);
+ set .@sha_man,.@sha_man + 1;
+ }
+ }
+ switch(.@divide) {
+ case 994:
+ getitem 990,.@shaman_max; //Boody_Red
+ break;
+ case 995:
+ getitem 991,.@shaman_max; //Crystal_Blue
+ break;
+ case 996:
+ getitem 992,.@shaman_max; //Wind_Of_Verdure
+ break;
+ case 997:
+ getitem 993,.@shaman_max; //Yellow_Live
+ }
+ delitem .@divide,.@input;
+ close;
+ }
+ 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 "+input_want+" pure fire stone.";
+ break;
+ case 995:
+ mes "water stones? Then I'll need";
+ mes "you to bring "+input_want+" pure water stone.";
+ break;
+ case 996:
+ mes "wind stones? Then I will need";
+ mes "you to bring "+input_want+" pure wind stone.";
+ break;
+ case 997:
+ mes "earth stones? Then I'll need";
+ mes "you to bring "+.@input+" pure earth stone.";
+ break;
+ }
+ mes "^3377FF"+.@input+" "+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;
+ }
+ }
+ else {
+ mes "[Puchuchartan]";
+ mes "Hm? You need to enter";
+ mes "a number from 1 to 10.";
+ close;
+ }
+ case 3:
+ mes "[Puchuchartan]";
+ mes "I see. It's your call.";
+ mes "Come back when you need me.";
+ close;
+ }
+}
+
+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;
+ 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:
+ mes "^3355FFYou left the eye socket as it was.^000000";
+ next;
+ break;
+ case 2:
+ 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 {
+ 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:
+ 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 {
+ 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 2:
+ if (rand(1,2) == 2) {
+ set .@skullopen,1;
+ }
+ 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;
+ emotion e_swt;
+ close;
+ }
+ 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~";
+ emotion e_rock,0,"Phrenetan";
+ emotion e_swt;
+ close;
+ }
+ 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~";
+ emotion e_omg,0,"Phrenetan";
+ emotion e_wah;
+ close;
+ }
+ }
+ 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;
+ }
+ else {
+ mes "[Wainatan]";
+ mes "Umbabah! Umbaumbah wooga";
+ mes "Woogawooga umbawooga umum.";
+ mes "Umbabababababababababah.";
+ close;
+ }
+ }
+ 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;
+ }
+ else {
+ mes "[Bertztan]";
+ mes "Umbar woogaumbarumbah um!";
+ mes "Um~ wooga wooga umbarum.";
+ mes "Umbah...wooum.";
+ close;
+ }
+ }
+ 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 "[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;
+ }
+ else {
+ mes "[Chabimatan]";
+ mes "Umbabah~~~~~~~";
+ mes "Woogawooga umbar umbar woo";
+ mes "woo woo! Nook nook~";
+ mes "Wooga umbar wooga umbar";
+ mes "wooga woogagah.";
+ close;
+ }
+ }
+ 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;
+}