Переглянути джерело

Updated Umbala npcs, quests, and warps.

git-svn-id: https://svn.code.sf.net/p/rathena/svn/trunk@12403 54d463be-8e91-2dee-dedb-b68131a5f0ec
L0ne_W0lf 17 роки тому
батько
коміт
c8d4cc6a2d

+ 3 - 1
npc/Changelog.txt

@@ -1,7 +1,9 @@
 Date		Added
 ======
+2008/03/20
+	* Rev. 12403 Updated Umbala npcs, quests, and warps. [L0ne_W0lf]
 2008/03/17
-	* Rev. 12387 Corrected variable used in Lighthalzen quest. [L0ne_W0lf]
+	* Rev. 12388 Corrected variable used in Lighthalzen quest. [L0ne_W0lf]
 	* Rev. 12387 Corrected small error in St. Patrick's Day event. [L0ne_W0lf]
 2008/03/16
 	* Rev. 12380 Updated Divorce script. [L0ne_W0lf]

+ 922 - 770
npc/cities/umbala.txt

@@ -3,12 +3,12 @@
 //===== By: ==================================================
 //= jAthena (1.0) Fusion Dev Team (1.1) Muad Dib (1.2) Darkchild (1.3)
 //===== Current Version: =====================================
-//= 1.9
+//= 2.1
 //===== Compatible With: =====================================
-//= Any eAthena Version; RO Episode XX
+//= eAthena SVN; RO Episode XX
 //===== Description: =========================================
+//- [Aegis Conversion]
 //= Umbala Town Npcs
-//==================================================
 //===== Additional Comments: =================================
 //= 1.0 - Done By jAthena (dunno Who)
 //= 1.1 - Translated by Fusion Dev Team
@@ -21,865 +21,1017 @@
 //= 1.8 - Warps you to Niff with 1HP [Lance]
 //= 1.9 - Moved Umbala Event, Create Essence/Dismantle Stone, and Skeletal Gate to npc/quests/quests_umbala.txt [Evera]
 //= 2.0 - Removed duplicates, max NPC name length is 23, so Utan Tribe Young Adult#1, the 1 is skipped [Toms]
+//= 2.1 - Updated to Aegis 10.3 standards. [L0ne_W0lf]
+//=	- Disabled warping to Niflheim from the bungee jump, uncomment to reenable.
 //============================================================
 
+comodo,170,137,7	script	La Ed#um	84,{
+	end;
 
-//========================================================
-// == NPCs on the road to Umbala ==
-//========================================================
-//Note that On_Emotion is NOT an npc command but just an trigger for DoNpcEvent!!
-comodo,170,137,7	script	Reid	84,{
-	close;
-On_Emotion20:
+OnEmoteHmm:
 	emotion e_hmm;
 	end;
-On_Emotion29:
+
+OnEmoteGG:
 	emotion e_gg;
 	end;
 }
 
-//========================================================
-comodo,171,137,1	script	Heath	92,{
-	mes "[Reid]";
-	mes "There's a huuuuuuuge treasure hidden";
-	mes "somewhere around here!";
+comodo,171,137,1	script	Haith#um	92,{
+	mes "[La Ed]";
+	mes "There MUST be a treasure hidden in that place!";
+	next;
+	mes "[Haith]";
+	mes "If we find it, people will no longer think we're losers~!!";
 	next;
-	mes "[Heath]";
-	mes "If only we could get our hands on it,";
-	mes "the people who call us the 'Dunce Duo'";
-	mes "will certainly have to eat their words!!";
+	mes "[La Ed]";
+	mes "Finally!";
 	next;
-	mes "[Reid]";
-	mes "We'll keep looking as long as it takes!";
+	mes "[Haith]";
+	mes "Let's go find that treasure!";
 	next;
-	donpcevent "Reid::On_Emotion29";
+	mes "[La Ed]";
+	mes "Let's do it~ !!";
+	emotion e_gg;
 	emotion e_gg;
-	mes "[Heath]";
-	mes "Hey, Reid, come on!";
 	next;
-	mes "[Reid]";
-	mes "............";
+	mes "[Haith]";
+	mes "................";
 	next;
-	donpcevent "Reid::On_Emotion29";
+	mes "[La Ed]";
+	mes "By the way...do you think he";
+	mes "would tell us about such a";
+	mes "great treasure so easily?";
 	emotion e_hmm;
-	mes "[Reid]";
-	mes "Okay, okay...I'm coming.";
+	donpcevent "La Ed#um::OnEmoteHmm";
 	next;
-	menu "Hey, wait!  Treasure?",Lwhat_1;
-
-	Lwhat_1:
-		mes "[Reid]";
-		mes "You mean you've never heard of it?!";
-		next;
-		emotion e_gg;
-		mes "[Heath]";
-		mes "Oh, you want to hear the story of the";
-		mes "treasure, huh?  Well, how important";
-		mes "is it to you, really?";
-		next;
-		mes "[Reid and Heath]";
-		donpcevent "Reid::On_Emotion29";
-		emotion e_gg;
-		mes "Important enough for you to";
-		mes "cough up 1000 zeny?!";
-		next;
-		menu "Alright.  I'll be a sucker today",Lzeny_1,"Dream on, Dunce Duo!",Lzeny_2;
-
-		Lzeny_1:
-			if(Zeny < 1000) goto Lzeny_no;
-			set Zeny,Zeny-1000;
-			mes "[Heath]";
-			mes "Alright, my 'friend'. listen up.";
+	select("Hm? What treasure?");
+	mes "[La Ed]";
+	mes "Wha--?! when did you start listening to us?!";
+	next;
+	mes "[Haith]";
+	mes "Huh...seems like you wanna know";
+	mes "more about the treasure. Well,";
+	mes "this information doesn't come cheap...";
+	emotion e_gg;
+	next;
+	mes "[La Ed]";
+	mes "Plus, we'll need a little";
+	mes "a little something in case";
+	mes "*cough!* ^555555we don't find";
+	mes "anything at all.^000000";
+	next;
+	mes "[La Ed, Haith]";
+	mes "If you pay us 1,000 zeny, we will tell you!";
+	emotion e_gg;
+	donpcevent "La Ed#um::OnEmoteGG";
+	next;
+	if (select("Pay 1,000 zeny:Refuse to pay") == 1) {
+		if (Zeny > 999) {
+			set zeny,zeny-1000;
+			mes "[Haith]";
+			mes "Hahahaha! You the man!";
 			next;
-			mes "[Reid]";
-			mes "A famous adventurer named Niles";
-			mes "returned to this village from his";
-			mes "adventures abroad.";
-			mes "He was dragging...";
+			mes "[La Ed]";
+			mes "Okay, not too long ago, a famous";
+			mes "adventurer named Niels came back from his travels.";
 			next;
-			mes "[Heath]";
-			mes "...(Whisperwhisperwhisper)";
-			mes "a really big box along behind him!!";
+			mes "[Haith]";
+			mes "*Whispers*";
+			mes "^555555He brought a big box with him.^000000";
 			next;
-			mes "[Reid]";
-			mes "He returned during the dead of night,";
-			mes "hoping no one would see his cargo.";
+			mes "[La Ed]";
+			mes "Also, he came back in the middle";
+			mes "of the night without telling";
+			mes "anyone. So, of course he's got";
+			mes "some secret, don't you think?";
 			next;
-			mes "[Heath]";
-			mes "There has to be something";
-			mes "valuable in that box!";
-			mes "There's no other explanation!";
+			mes "[Haith]";
+			mes "What could be inside that box~?";
+			mes "It just has to be treasure!!";
 			next;
-			mes "[Reid]";
-			mes "I'm on a search for that box!";
-			mes "I'm going to find it!";
+			mes "[La Ed]";
+			mes "So! We decided to go on a journey to find treasure of our own-!!";
 			next;
+			mes "[Haith]";
+			mes "The problem is, we are not sure";
+			mes "whether or not Niels would tell";
+			mes "us the location of where he";
+			mes "found the treasure...";
 			emotion e_hmm;
-			mes "[Heath]";
-			mes "There's just one problem.";
-			mes "We don't have the slightest";
-			mes "idea where Niles put the treasure.";
 			next;
-			mes "[Reid]";
-			mes "Niles is making us look foolish!";
+			mes "[La Ed]";
+			mes "Because Niels always treat us like";
+			mes "we're stupid!! Bah~!!";
 			next;
-			menu "Where is Niles now?",Lwhere_1;
-
-			Lwhere_1:
-				mes "[Reid]";
-				mes "He's on the north side of the village.";
-				next;
-				mes "[Heath]";
-				mes "I hope this information was worth";
-				mes "it.";
-				next;
-				mes "[Reid and Heath]";
-				mes "It was certainly worth it to us!";
-				mes "Heh heh heh!";
-				close;
-
-			Lzeny_no:
-				mes "[Reid]";
-				mes "Hey!  Come back when you're not dirt";
-				mes "poor!  Gotta spend money to make money, right?";
-				close;
-
-		Lzeny_2:
-			donpcevent "Reid::On_Emotion20";
-			emotion e_hmm;
-			mes "[Heath]";
-			mes "Whaaaaat?!  I swear that our marks";
-			mes "aren't as gullible as they used to be.";
-			mes "How are we supposed to make an honest zeny?!";
+			select("Where is this Niels person?");
+			mes "[La Ed]";
+			mes "He's staying at the northern part";
+			mes "of this village.";
+			next;
+			mes "[Haith]";
+			mes "Since we gave you good information,";
+			mes "we expect that you pay us back!";
+			next;
+			mes "[La Ed, Haith]";
+			mes "Good luck!";
 			close;
+		}
+		mes "[La Ed]";
+		mes "Oh well~! If you don't have the money, then we can't give you the information~";
+		close;
+	}
+	mes "[Haith]";
+	mes "Bah! Whatever~";
+	emotion e_hmm;
+	emotion e_hmm;
+	close;
 }
 
-//========================================================
-cmd_in01,175,120,3	script	Iria	69,{
-	mes "[Iria]";
-	mes "That guy over at the far table";
-	mes "in the corner is the adventurer";
-	mes "Niles.  He seems to have a wealth";
-	mes "of stories about his many adventures.";
-	next;
-	mes "[Iria]";
-	mes "He's always so boisterous, saying things";
-	mes "like 'Will your journey lead you to fame,";
-	mes "or to certain death?!'";
-	next;
-	mes "[Iria]";
-	mes "Nevertheless, anyone who talks to Niles";
-	mes "for any length of time seems to be invariably";
-	mes "inspired by his passion.";
+cmd_in01,175,120,3	script	Iriya#um	69,{
+	mes "[Iriya]";
+	mes "Mr. Niels is at the table in the";
+	mes "corner. He has many interesting";
+	mes "stories about the world.";
+	next;
+	mes "[Iriya]";
+	mes "I am not sure where he has been";
+	mes "this time. He just laughs and";
+	mes "says 'I don't think I am fit";
+	mes "for this teaching job.'";
+	next;
+	mes "[Iriya]";
+	mes "In the meantime, people keep";
+	mes "visiting Mr. Niels... and I";
+	mes "can't help but wonder...";
+	mes "Where has he gone?";
 	close;
 }
 
-//========================================================
-cmd_in01,164,115,1	script	Niles	731,{
-	mes "[Niles]";
-	mes "Oh?";
-	mes "Another fool come to ask about";
-	mes "that idiotic rumour circulating";
-	mes "around town?";
-	next;
-	mes "[Niles]";
-	mes "The story about me finding a great";
-	mes "treasure is a big misunderstanding.";
-	mes "In reality, it's just my collection";
-	mes "of modest finds.";
-	next;
-	mes "[Niles]";
-	mes "That said, I think I have a lead";
-	mes "on a potentially lucrative ";
-	mes "item just waiting to be found.";
-	next;
-	mes "[Niles]";
-	mes "Don't you think that cave";
-	mes "near Comodo village is interesting?";
-	next;
-	mes "[Niles]";
-	mes "I think a large jewel may be";
-	mes "hidden within its confines.";
-	next;
-	mes "[Niles]";
-	mes "Until recently, we didn't know how to";
-	mes "reach the cave.";
-	next;
-	mes "[Niles]";
-	mes ".............";
-	next;
-	mes "[Niles]";
-	mes ".......Hm?";
+cmd_in01,164,115,1	script	Niels#um	731,{
+	mes "[Niels]";
+	mes "Hmm? What's that look for?";
+	mes "Ah~ You must of heard the rumors";
+	mes "of me finding some kind of";
+	mes "treasure. Yeah, that's understandable...";
 	next;
-	mes "[Niles]";
-	mes "Is your mind set on going there?!";
-	mes "Can you imagine what you'll find?!";
+	mes "[Niels]";
+	mes "Well, those rumors of me stumbling";
+	mes "on some wonderful treasure is";
+	mes "just the result of overactive";
+	mes "imaginations. All I've found";
+	mes "was a little something to add";
+	mes "to my collection.";
 	next;
-	mes "[Niles]";
-	mes "Doesn't just talking about it make";
-	mes "you want to go on an adventure?!!!";
+	mes "[Niels]";
+	mes "But...since I've proven to myself";
+	mes "that 'it' actually exists by";
+	mes "seeing it with my own eyes,";
+	mes "to me, what I've obtained is a";
+	mes "valuable treasure.";
 	next;
-	mes "[Niles]";
-	mes "Just break down any barrier in your";
-	mes "path and trust your primal instincts";
-	mes "to guide you to your goal!";
+	mes "[Niels]";
+	mes "This village of Comodo!";
+	mes "Don't you think the caves are too";
+	mes "small and narrow for some reason?";
 	next;
-	mes "[Niles]";
-	mes "Go!  Quickly!";
+	mes "[Niels]";
+	mes "So I was thinking about it...";
+	mes "And I came to the conclusion that";
+	mes "there should be something hidden";
+	mes "inside the cave...";
 	next;
-	mes "[Niles]";
-	mes "Will you find the path to fame on";
-	mes "your journey, or the path to certain";
-	mes "death?!  Hahahaha!!!!";
-	close;
-}
-
-
-//==================================================================
-//	Umbala NPCs and Quests
-//==================================================================
-
-//==================================================================
-//Trade money for meat
-umbala,70,106,3	script	Utan Child#1	781,{
-if(event_umbala < 3) goto LumWord;
-	mes "[???]";
-	mes "Hello!  I'm a member of";
-	mes "the Utan tribe.";
-	next;
-	mes "[???]";
-	mes "My name is Hatan!  Nice to";
-	mes "meet you.";
-	emotion e_heh;
-	next;
-	mes "[Hatan]";
-	mes "...I can't play now, because";
-	mes "a recent thunderstorm caused";
-	mes "the roof of our house to become";
-	mes "cracked...";
-	emotion e_sob;
+	mes "[Niels]";
+	mes "And then!";
+	mes "I finally found it.";
+	mes "The patch to 'the place'";
+	mes "that no one has ever found!";
 	next;
-	mes "[Hatan]";
-	mes "...!";
+	mes "[Niels]";
+	mes "................";
 	next;
-	mes "[Hatan]";
-	mes "Hey!  You guys seem pretty well";
-	mes "off.  Do you think you could";
-	mes "give us a little zeny";
-	mes "so we can fix the crack?";
-	mes "Please!";
-	emotion e_sob;
+	mes "[Niels]";
+	mes ".......Hm?";
 	next;
-	menu "Nod",-,"Shake Head",Lend2;
-
-		if(Zeny < 1000) goto LError2;
-		mes "[Hatan]";
-		mes "Yay!!";
-		mes "You're the best!!";
-		set Zeny,Zeny-1000;
-		getitem 517,1;//Items: Meat,
-		emotion e_swt2;
-		next;
-		mes "[Hatan]";
-		mes "Please take this as a token of my gratitude.";
-		emotion e_heh;
-		close;
-
-		LError2:
-			mes "[Hatan]";
-			mes "Well, maybe I underestimated your";
-			mes "wealth, but you shouldn't lie...";
-			emotion e_pif;
-			close;
-	Lend2:
-		mes "[Hatan]";
-		mes "...Awwwww.";
-		emotion e_sob;
-		close;
-
-LumWord:
-	mes "[???]";
-	mes "Umba!";
-	mes "Umbaluwababawamuba.";
-	next;
-	mes "[???]";
-	mes "Umba!  Umbaumba!";
-	mes "Umbabama Hatan baba.";
-	emotion e_heh;
-	next;
-	mes "[Hatan]";
-	mes "...Umba, Umbaumbaumba.";
-	mes "Umbaumbaumbababa.";
-	mes "Umbabawaumbaumbaba.";
-	mes "Umbaumba.";
-	mes "...Umbaumbamabababumba.";
-	emotion e_sob;
+	mes "[Niels]";
+	mes "I was expecting a spectacular and";
+	mes "rather dramatic sound effect";
+	mes "for my declaration!";
+	mes "Eh, oh well...";
+	emotion e_hmm;
 	next;
-	mes "[Hatan]";
-	mes "...!";
+	mes "[Niels]";
+	mes "Well, in the spirit of discovery,";
+	mes "don't ever think of asking me";
+	mes "about directions to 'the place'";
+	mes "or about what is in 'the place.'";
+	mes "I wouldn't want to spoil the";
+	mes "surprise.";
 	next;
-	mes "[Hatan]";
-	mes "Umba!";
-	mes "Umbaumbaumbababa.";
-	mes "Umbababaumbawabaumba!";
-	mes "Umbaumbaumbababa.";
-	mes "wamfuba!  Umba!";
-	emotion e_sob;
+	mes "[Niels]";
+	mes "If you're a real adventurer,";
+	mes "I expect you to scream at the";
+	mes "top of your lungs...";
 	next;
-	menu "Nod",-,"Shake Head",Lend;
+	mes "[Niels]";
+	mes "'Ahhhh! I need to know what it";
+	mes "is!!' Kick the door open and run";
+	mes "like hell to find this place on";
+	mes "your own!!";
+	next;
+	mes "[Niels]";
+	mes "Now! Hurry and seek this place";
+	mes "out! Will this place be a totally";
+	mes "new world, or will it be a trap";
+	mes "to hell?! Go forth, meet your";
+	mes "destiny, adventurer!";
+	close;
+}
 
-		if(Zeny < 1000) goto LError;
-		mes "[Hatan]";
-		mes "Umbaumba!!";
-		mes "Um!-babaumba-baumba-.";
-		mes "Umba-umba-Umbabawamamaba!";
-		set Zeny,Zeny-1000;
-		getitem 517,1;//Items: Meat,
-		emotion e_swt2;
-		next;
-		mes "[Hatan]";
-		mes "Umbaumba....";
+umbala,70,106,3	script	Utan Kid#um	781,{
+	if (event_umbala >= 3) {
+		mes "[???]";
+		mes "Huh?";
+		mes "You're not one of us, are you?";
+		next;
+		mes "[???]";
+		mes "Heh! Hi!";
+		mes "My name is Haatan.";
 		emotion e_heh;
-		close;
-
-		LError:
-			mes "[Hatan]";
-			mes "Umba-Umbana!";
-			emotion e_pif;
+		next;
+		mes "[Haatan]";
+		mes "...*Sigh*";
+		mes "I am sorry, but I cannot play with";
+		mes "you right now. My parent's house";
+		mes "was struck by lightning yesterday";
+		mes "and it burned down our roof...";
+		emotion e_sob;
+		next;
+		mes "[Haatan]";
+		mes " . . . !";
+		next;
+		mes "[Haatan]";
+		mes "Oh yes! Could you help me?";
+		mes "You look pretty well off...";
+		mes "Can donate some money for";
+		mes "re-constructing my parents' house?";
+		mes "You Rune-Midgardians are all";
+		mes "richier than Utans! I beg you!";
+		emotion e_heh;
+		next;
+		if (select("(Nod head):(Shake head)") == 1) {
+			mes "[Haatan]";
+			mes "Whoaaaa!!";
+			mes "You the man~!";
+			mes "Thank you so much, yay~!";
+			if (zeny > 1000) {
+				set zeny,zeny-1000;
+				if (checkweight(517,1)) {
+					getitem 517,1; //Meat
+				}
+				emotion e_swt2;
+			}
+			else {
+				next;
+				mes "[Haatan]";
+				mes "Uh...";
+				mes "It looks like...";
+				mes "You don't have much";
+				mes "yourself...";
+				emotion e_pif;
+				close;
+			}
+			next;
+			mes "[Haatan]";
+			mes "Thank you so much!";
+			emotion e_heh;
 			close;
-	Lend:
-		mes "[Hatan]";
-		mes "....Umba....";
+		}
+		mes "[Haatan]";
+		mes ".............*Sob*...";
+		emotion e_sob;
+		close;
+	}
+	else {
+		mes "[???]";
+		mes "Umbah?";
+		mes "Umbala umbabah umbah?";
+		next;
+		mes "[???]";
+		mes "Umbah! Umbaumbah!";
+		mes "Umbahumbah Haatan babah.";
 		emotion e_sob;
+		next;
+		mes "[Haatan]";
+		mes "........umbah,";
+		mes "Umbah umbah umbaumbumbah umbah umbah";
+		mes "Babaum babahum woombah umbah umbabah";
+		mes "Umbah umbah";
+		mes "..Umbah umbabah umbah...";
+		emotion e_heh;
+		next;
+		mes "[Haatan]";
+		mes " . . . !";
+		next;
+		mes "[Haatan]";
+		mes "Umbah!";
+		mes "Umbah umbah? Umbah umbahbah";
+		mes "abaum babahum woombah!";
+		mes "Umbahumbah umbabahumbaumhumbah! Umbah!";
+		emotion e_heh;
+		next;
+		if (select("(Nod head):(Shake head)") == 1) {
+			mes "[Haatan]";
+			mes "Umbaumbah!!";
+			mes "Um~bahumbah~ Um~baumbah~";
+			mes "Um~baumbah~ um~baumbah~";
+			if (zeny > 1000) {
+				set zeny,zeny-1000;
+				if (checkweight(517,1)) {
+					getitem 517,1; //Meat
+				}
+				emotion e_swt2;
+			}
+			else {
+				next;
+				mes "[Haatan]";
+				mes "...umbah? Umbahumbah!! Umbaum!";
+				emotion e_pif;
+				close;
+			}
+			next;
+			mes "[Haatan]";
+			mes "Umba umba umbaum.";
+			emotion e_sob;
+			close;
+		}
+		mes "[Haatan]";
+		mes "........umbah..";
+		emotion e_heh;
 		close;
+	}
+	close;
 }
 
-//==================================================================
-//Trade Meat for Clover, ???, and Soft Fur 
-umbala,59,243,5	script	Utan Child#4	787,{
-if(event_umbala < 3) goto LumWord;
-	mes "[Kotan]";
-	mes ".....";
-	mes ".....";
-	mes "...I want meat.";
-	mes "...Gimme meat!";
-	next;
-	menu "Sure",-,"No way!",L2;
-	if(countitem(517) < 1) goto LError;//Items: Meat,
-		delitem 517,1;//Items: Meat,
+umbala,59,243,5	script	Utan Kid#1	787,{
+	if (event_umbala >= 3) {
 		mes "[Kotan]";
-		mes "Hey, thanks!";
-		mes "Take these!";
-		emotion e_scissors;
-		getitem 909,2;//Items: Jellopy,
-		getitem 914,2;//Items: Fluff,
-		getitem 705,2;//Items: Clover,
-		close;
-	L2:
+		mes "............";
+		mes ".........poop!";
+		mes ".....me like Meat.";
+		mes "....gimme a Meat.";
+		emotion e_rock;
+		next;
+		if (select("Give him Meat.:Refuse.") == 1) {
+			if (countitem(517) > 0) {
+				mes "[Kotan]";
+				mes "Whoa, are you really giving me";
+				mes "Meat? Thanks! I will pay you";
+				mes "back with these.";
+				delitem 517,1; //Meat
+				getitem 909,2; //Jellopy
+				getitem 914,2; //Fluff
+				getitem 705,2; //Clover
+				emotion e_scissors;
+				close;
+			}
+			mes "[Kotan]";
+			mes "Hah! You don't have Meat,";
+			mes "but pretend that you do?!";
+			mes "I hate people who lie";
+			mes "to me!!";
+			percentheal -20,0;
+			emotion e_an;
+			close;
+		}
 		mes "[Kotan]";
-		mes "......";
-		mes "...I'm hungry!";
-		mes "...Gimme meat!";
+		mes ".........";
+		mes ".....hungwee.";
+		mes ".....I want Meat.";
+		percentheal -1,0;
 		emotion e_sob;
 		close;
-LError:
-	mes "[Kotan]";
-	mes "Hey!  You said you have";
-	mes "meat!  So you were lying?";
-	mes "I hate you!";
-	emotion e_an;
-	close;
-LumWord:
-	mes "[???]";
-	mes "....";
-	mes "....";
-	mes "...Umbaba!";
-	mes "...Famba!";
-	emotion e_rock;
-	next;
-	menu "Umba",-,"Umbabu",Lu2;
-	if(countitem(517) < 1) goto LuError;//Items: Meat,
-		delitem 517,1;//Items: Meat,
+	}
+	else {
 		mes "[???]";
-		mes "Umbaumbaumbababa.";
-		mes "Umbababauma.";
-		emotion e_scissors;
-		getitem 909,2;//Items: Jellopy,
-		getitem 914,2;//Items: Fluff,
-		getitem 705,2;//Items: Clover,
-		close;
-	Lu2:
+		mes "............";
+		mes "........umbah.";
+		mes ".......umbabah.";
+		mes "......humbah.";
+		emotion e_rock;
+		next;
+		if (select("Umbah:Umbaboo") == 1) {
+			if (countitem(517) > 0) {
+				mes "[???]";
+				mes "Umbaumbaumbabababah.";
+				mes "Umbababahum.";
+				delitem 517,1; //Meat
+				getitem 909,2; //Jellopy
+				getitem 914,2; //Fluff
+				getitem 705,2; //Clover
+				emotion e_scissors;
+				close;
+			}
+			mes "[???]";
+			mes "Umbahumumhumbubabababah!!";
+			mes "Umbahumbababah umbahumboo!";
+			percentheal -20,0;
+			emotion e_an;
+			close;
+		}
 		mes "[???]";
-		mes "....";
-		mes "......Unguba!";
-		mes "....Umbababa.";
+		mes "...........";
+		mes "......woong bah.";
+		mes "....umbabababah.";
 		emotion e_sob;
+		percentheal -1,0;
 		close;
-LuError:
-	mes "[???]";
-	mes "Umbawamufumabababa!";
-	mes "Umbabababaumbaumbu!";
-	emotion e_an;
-	close;
+	}
 }
 
-
-//=====================================================================
-umbala,177,153,3	script	Bast	97,{
-	if (event_umbala>=3) emotion e_gasp;
-	mes "[Bast]";
-	mes "Oh!  Another outsider.  It's";
-	mes "great to encounter another one";
-	mes "in this village!  My name is";
-	mes "Bast.";
-	next;
-	mes "[Bast]";
-	mes "Because Umbala village is isolated";
-	mes "within a deep forest, its culture";
-	mes "is unaffected by the steady pull";
-	mes "of progress.";
-	next;
-	mes "[Bast]";
-	mes "Not only that, but the natives' skin colour";
-	mes "and language are also different.";
-	mes "Aren't you confused by their";
-	mes "alien gestures and expressions?";
-	next;
-	mes "[Bast]";
-	mes "Even the things you would expect";
-	mes "to transcend culture have a";
-	mes "different meaning in Umbala.";
-	next;
-	mes "[Bast]";
-	mes "Just because a tribeman's face laughs";
-	mes "doesn't necessarily mean his";
-	mes "heart is laughing.  Understand?";
+umbala,177,153,3	script	Pasto#um	97,{
+	mes "[Pasto]";
+	emotion e_gasp;
+	mes "Oh my god~! Finally,";
+	mes "another Rune-Midgardian!";
+	mes "I've never seen anyone from";
+	mes "home in this place before!";
+	mes "Nice to meet you, my name is Pasto!";
+	next;
+	mes "[Pasto]";
+	mes "This place is called Umbala.";
+	mes "The local people in this village";
+	mes "have formed a culture that's";
+	mes "totally different from other";
+	mes "places I've been.";
+	next;
+	mes "[Pasto]";
+	mes "I guess it's because this";
+	mes "place has been isolated from";
+	mes "other regions because of its";
+	mes "geographical features.";
 	next;
+	mes "[Pasto]";
+	mes "They look different from us, and";
+	mes "use a language that is still very";
+	mes "confusing to me. I was also";
+	mes "confounded by their different use";
+	mes "of facial expression.";
+	next;
+	mes "[Pasto]";
+	mes "Of course, there are some";
+	mes "similarities. However, you might";
+	mes "want to be careful about certain";
+	mes "issues.";
+	next;
+	mes "[Pasto]";
+	mes "Sometimes, what you say or do";
+	mes "or do could be misinterpreted as";
+	mes "having the totally opposite meaning.";
+	next;
+	mes "[Pasto]";
+	mes "I wish I could speak their";
+	mes "language...*Sigh*";
+	mes "...Or I wish I could meet more";
+	mes "people here that speak my";
+	mes "language...I...I'm...";
+	mes "So very lonely...*Sob*";
 	emotion e_sob;
-	mes "[Bast]";
-	mes "Because of that, people in the village";
-	mes "who know our language may have trouble!!";
-	close;
-}
-
-//=====================================================================
-umbala,80,146,4	script	Yuki	753,{
-	mes "[Yuki]";
-	mes "Umbaubaugau...Oh!";
-	mes "You're from abroad?  That's";
-	mes "wonderful!  I didn't think that";
-	mes "I would meet someone else from abroad.";
-	mes "Hahaha.";
-	next;
-	mes "[Yuki]";
-	mes "I came here looking for strong";
-	mes "companions, but I was unable";
-	mes "to understand the language.";
-	mes "I had to listen to the language being spoken";
-	mes "for some time before I picked it up.";
-	mes "Hahaha.";
-	next;
-	mes "[Yuki]";
-	mes "The people here seem to want to";
-	mes "preserve their native culture while";
-	mes "eschewing the trappings of modern life.";
-	mes "The tribesmen are really prone to";
-	mes "mischief-making.";
-	next;
-	mes "[Yuki]";
-	mes "The primitive atmosphere here is really";
-	mes "refreshing.  Tribal law is very lax and";
-	mes "doesn't intrude upon one's enjoyment of";
-	mes "the village.  It's really wonderful.";
-	close;
-}
-
-//=====================================================================
-um_in,101,73,3	script	Yunatan 	783,{
-	if(event_umbala < 3) goto LumWord;
-	mes "[Yunatan]";
-	mes "I'm standing out here because I";
-	mes "can't stand to lay eyes on";
-	mes "that lecher Wambokoriotan.";
-	mes "I hate his guts!";
-	close;
-LumWord:
-	mes "[Yunatan]";
-	mes "Umbaba!  Umbaumbaugaga";
-	mes "Ugugumubaugaumuumu.";
-	mes "Umbabababababababa.";
 	close;
 }
 
-//=====================================================================
-um_in,94,123,5	script	Bartsutan	783,{
-	if(event_umbala < 3) goto LumWord;
-	mes "[Bartsutan]";
-	mes "I want to see Wambokoriotan";
-	mes "morph into an insect so I can";
-	mes "have the satisfaction of crushing";
-	mes "his skull!  I hate him and his";
-	mes "advances!  I wish he would just stay";
-	mes "away from me.";
-	close;
-LumWord:
-	mes "[Bartsutan]";
-	mes "Umbarugumbarumbauma!";
-	mes "Umuguugumubarumba.";
-	mes "Umba...uumu.";
+umbala,80,146,4	script	Yuwooki#um	753,{
+	mes "[Yuwooki]";
+	mes "Umbah umbah woogawoo...";
+	mes "oops, sorry! I'm so used";
+	mes "to speaking in Utan by now.";
+	mes "It's a pleasure to meet you.";
+	next;
+	mes "[Yuwooki]";
+	mes "I never imagined that I would";
+	mes "meet another person from";
+	mes "the homeland in this village.";
+	mes "Hahahahah~!";
+	next;
+	mes "[Yuwooki]";
+	mes "I came here to seek strong people";
+	mes "to help me master my fighting";
+	mes "skills. But I was soon frustrated";
+	mes "because it took me a long";
+	mes "time to learn the language...";
+	next;
+	mes "[Yuwooki]";
+	mes "Well, now I am kind of used to my";
+	mes "circumstances. Even though it";
+	mes "took me a while to used to";
+	mes "Utan culture. Hahahaha~!";
+	next;
+	mes "[Yuwooki]";
+	mes "But you know what was the weirdest";
+	mes "thing I found out about Utan";
+	mes "culture? At first the Utan men";
+	mes "seemed to have, shall we say, a";
+	mes "strong species preservation instinct.";
+	next;
+	mes "[Yuwooki]";
+	mes "There are many Utan playboys in";
+	mes "this village. Some may think";
+	mes "the Utans are primitive in";
+	mes "this respect, but...";
+	next;
+	mes "[Yuwooki]";
+	mes "As I learned more about them,";
+	mes "I eventually realized that their";
+	mes "courtship rituals are actually";
+	mes "more advanced than anything the";
+	mes "Rune-Midgard culture has to offer.";
+	next;
+	mes "[Yuwooki]";
+	mes "It's really quite fascinating.";
+	mes "I'm actually still learning";
+	mes "quite much from the Utan";
+	mes "playboys and their awesome methods.";
 	close;
 }
 
-//=====================================================================
-umbala,140,157,6	script	Utan Tribe Young Adult::UtanTribeYougAdult1	785,{
-	if(event_umbala < 3) goto LumWord;
-	mes "[Seirutan]";
-	mes "Bungy jumping is extremely dangerous.";
-	mes "As such, completing a successful";
-	mes "jump is a prerequisite for recognition";
-	mes "as an adult in the Utan tribe.";
-	close;
-LumWord:
-	mes "[?????]";
-	mes "Umbaumbafumba.";
-	mes "Uwambaunbaumbabaufumba";
-	mes "Umbababaumbaumba.";
-	close;
+umbala,140,157,6	script	Utan Man#1	785,{
+	if (event_umbala >= 3) {
+		mes "[Jertan]";
+		mes "Bungee jumping can be dangerous,";
+		mes "and you can risk your life doing";
+		mes "it. We Utans have consider";
+		mes "bungee jumping an important";
+		mes "part of the ceremony of";
+		mes "becoming an adult.";
+		close;
+	}
+	else {
+		mes "[???]";
+		mes "Umbaumbah humba.";
+		mes "Woo umbaumbaumbabah woo humbah";
+		mes "Umbababah umba umba.";
+		close;
+	}
 }
 
-//=====================================================================
-umbala,146,157,4	script	Utan Young Adult#2	786,{
-	if(event_umbala < 3) goto LumWord;
-	mes "[Arotan]";
-	mes "Making a safe bungy jump is a";
-	mes "really big deal.  When someone makes";
-	mes "their first jump safely, many people";
-	mes "gather for a large feast.";
-	close;
-LumWord:
-	mes "[????]";
-	mes "Umbaumbaumbabaumbaba.";
-	mes "Umbaumbabaumbababaumufumuba.";
-	close;
+umbala,146,157,4	script	Utan Man#2	786,{
+	if (event_umbala >= 3) {
+		mes "[Arotan]";
+		mes "Completing the bungee jump";
+		mes "is very difficult to do.";
+		mes "Today, we are here in celebration";
+		mes "of the people that made it and";
+		mes "have shown their courage.";
+		close;
+	}
+	else {
+		mes "[???]";
+		mes "Woo umbaumbaumbabah woo humbah";
+		mes "Umbababah umba umba.";
+		close;
+	}
 }
 
-//=====================================================================
-umbala,149,165,4	script	Utan Young Adult#3	781,{
-	if(event_umbala < 3) goto LumWord;
-	mes "[Kryubatan]";
-	mes "I'm really afraid of heights,";
-	mes "so I really don't want to jump,";
-	mes "but I must in order to be";
-	mes "recognized as a courageous";
-	mes "member of the Utan tribe.";
-	close;
-LumWord:
-	mes "[??????]";
-	mes "Umbaumbaumbababa.";
-	mes "Umbaumbaumumbabaumfumuba.";
-	mes "Umbaumbaumumubafumba.";
-	close;
+umbala,149,165,4	script	Utan Kid#3	781,{
+	if (event_umbala >= 3) {
+		mes "[Klumatan]";
+		mes "It's really scary, falling from";
+		mes "such a high place...";
+		mes "But I guess you have to do it,";
+		mes "otherwise no one will ever";
+		mes "consider you a grownup.";
+		next;
+		mes "[Klumatan]";
+		mes "I guess I don't want to";
+		mes "be a grownup right away.";
+		mes "But some kids my age are";
+		mes "in too big of a hurry";
+		mes "to not be kids anymore.";
+		close;
+	}
+	else {
+		mes "[???]";
+		mes "Umbahumba umumbah.";
+		mes "Umbahumbah umbabah.";
+		mes "Umbahumhumbabahum.";
+		close;
+	}
 }
 
-//=====================================================================
-umbala,92,159,4	script	Hartan	785,{
-	if(event_umbala < 3) goto LumWord;
-	mes "[Hartan]";
-	mes "You want to know why our";
-	mes "skin is jet-black?";
-	mes "......";
-	next;
-	mes "[Hartan]";
-	mes "Well...";
-	mes "Every night before we sleep,";
-	mes "we eat lots of chocolate!";
-	next;
-	mes "[Hartan]";
-	mes "Mmmmmmm...Chocolate...";
-	close;
-LumWord:
-	mes "[????]";
-	mes "Umbaumbaumba";
-	mes "Umbaumbaumba";
-	mes "Umbaumbaumba";
-	next;
-	mes "[????]";
-	mes "Umbaumbabaungaha.";
-	emotion e_sob;
+umbala,92,159,4	script	Bertan#um	785,{
+	if (event_umbala >= 3) {
+		mes "[Bertan]";
+		mes "What up, loser!";
+		next;
+		mes "[Bertan]";
+		mes "What's the matter,";
+		mes "ya big Rune-Midgardian?!?!";
+		mes "I just called you a 'loser!'";
+		mes "I guess you're too stupid";
+		mes "to understand!!";
+		mes "Hahahahahahaahahhahaha~!";
+		next;
+		mes "[Bertan]";
+		mes "...";
+		mes "Uh...oh!";
+		next;
+		mes "[Bertan]";
+		mes "It looks like you can understand";
+		mes "me--! Good job, good job!";
+		mes "Alright, by way of apology,";
+		mes "do you want to hear a joke?";
+		next;
+		mes "[Bertan]";
+		mes "Alright, alright.";
+		mes "Here we go.";
+		mes "Ummmm...";
+		mes "Alright, I got one.";
+		next;
+		switch(rand(1,6)) {
+		case 1:
+			mes "[Bertan]";
+			mes "What did the Rune-Midgardian";
+			mes "say to the Savage?";
+			mes "...";
+			next;
+			mes "[Bertan]";
+			mes "I don't know...";
+			mes "But they didn't have any";
+			mes "trouble understanding";
+			mes "each other!!! HAHAHAHA~!";
+			mes "Get it? 'Cuz, like,";
+			mes "they're both pigs~!";
+			next;
+			mes "[Bertan]";
+			mes "Not funny, huh?";
+			mes "Oh well. I guess my";
+			mes "sense of humor is just";
+			mes "too sophisticated.";
+			close;
+		case 2:
+			mes "[Bertan]";
+			mes "Okay...what's the best";
+			mes "way to tame an Orc Lady?";
+			mes "Give up..?";
+			next;
+			mes "[Bertan]";
+			mes "With a wedding ring!";
+			mes "HAHAHAHAHAHAHHA!";
+			mes "Oh God~ I'm hilarious!!";
+			next;
+			mes "[Bertan]";
+			mes "...";
+			mes "...Wait.";
+			mes "Wait a minute...";
+			next;
+			mes "[Bertan]";
+			mes "That's not even funny...";
+			mes "Just incredibly...";
+			mes "Scary...";
+			mes "Brrr--!";
+			mes "She's hideous!!";
+			close;
+		case 3:
+			mes "[Bertan]";
+			mes "Actually...forget it.";
+			next;
+			mes "[Bertan]";
+			mes "I was going to say a";
+			mes "knock knock joke about";
+			mes "Isis, but then decided";
+			mes "that kind of humor is";
+			mes "too low brow.";
+			mes "...Zing!";
+			close;
+		case 4:
+			mes "[Bertan]";
+			mes "Why are Rune-Midgardians";
+			mes "SOOoOOoo...";
+			mes "Um, hmmmmm.";
+			mes "Maybe that joke";
+			mes "isn't so good for this";
+			mes "situation, yeah?";
+			close;
+		case 5:
+			mes "[Bertan]";
+			mes "Okay, why is it that";
+			mes "GMs prefer not to be";
+			mes "seen...? Give up?";
+			next;
+			mes "[Bertan]";
+			mes "BECAUSE THOSE GUYS WEAR";
+			mes "SKIRTS ~! HAHAHA!";
+			mes "OH MAN, I MADE A FUNNY!";
+			next;
+			mes "[Bertan]";
+			mes "*Whew* Yowza~";
+			mes "Oh, man.";
+			mes "Utterly classic.";
+			close;
+		case 6:
+			mes "[Bertan]";
+			mes "A Crusader, an Alchemist and a Novice walk into a bar.";
+			next;
+			mes "[Bertan]";
+			mes "Inside, they see a sign that";
+			mes "says '^CC0000Monster Help Agency:";
+			mes "LADIES ONLY.^000000'";
+			next;
+			mes "[Bertan]";
+			mes "'^000099Oh!^000000' says the Crusader.";
+			mes "'^000099It's a lucky thing we are";
+			mes "all ladies.^000000' She goes up";
+			mes "and says '^000099Gimmie a ride.^000000'";
+			mes "Kinda rude for a Crusader,";
+			mes "but whatever.";
+			next;
+			mes "[Bertan]";
+			mes "Out of nowhere, this";
+			mes "Grand PecoPeco appears";
+			mes "and is all '^CC0000I'll give you";
+			mes "a ride, baby. Careful, this";
+			mes "road can get buuuuumpy.^000000'";
+			mes "And then they're off.";
+			next;
+			mes "[Bertan]";
+			mes "Next comes the Alchemist";
+			mes "and she's like '^330099I need";
+			mes "help killing Zombies^000000' and";
+			mes "then this Marine Sphere";
+			mes "comes from out of";
+			mes "nowhere and is all...";
+			next;
+			mes "[Bertan]";
+			mes "'^CC0000I got your fire. Careful";
+			mes "baby, touch me the wrong";
+			mes "way and I might just";
+			mes "exploooode.^000000' So then";
+			mes "they're off on their";
+			mes "merry way too.";
+			next;
+			mes "[Bertan]";
+			mes "Finally, the Novice";
+			mes "comes up and says";
+			mes "'^006633I need someone to";
+			mes "party with.^000000'";
+			next;
+			mes "[Bertan]";
+			mes "Out of nowhere, this";
+			mes "Hode pops up and says...";
+			next;
+			mes "[Bertan]";
+			mes "'^CC0000I know some people";
+			mes "but let me check my";
+			mes "Rolodex. HODE on!^000000'";
+			mes "....";
+			next;
+			mes "[Bertan]";
+			mes ".....";
+			mes "..........";
+			mes "No go?";
+			next;
+			mes "[Bertan]";
+			mes "Well, come on!";
+			mes "I can't be funny";
+			mes "all the time, you know?";
+			close;
+		}
+	}
+	else {
+		mes "[????]";
+		mes "Umbaumba Umbaumbah";
+		next;
+		mes "[????]";
+		mes "Bwahbwah hahbrah!";
+		mes "Umbaumba Umbaumbah";
+		mes "Umbaumba Umbaumbah";
+		next;
+		mes "[????]";
+		mes "Umbaumba Umbaumbah woo~";
+		emotion e_ho;
+		close;
+	}
 	close;
 }
 
-//=====================================================================
-umbala,194,104,4	script	Utan Tribe Child#2	787,{
-	if(event_umbala < 3) goto LumWord;
-	mes "[Burkatan]";
-	mes "An outsider?";
-	mes "Are you here to try bungy jumping?";
-	next;
-	menu "You got it",-,"Well....",L2;
-		mes "[Burkatan]";
-		mes "What courage!";
-		mes "The Utan tribe welcomes those";
-		mes "with courageous hearts.";
-		close;
-	L2:
-		mes "[Burkatan]";
-		mes "The adults don't want me to even";
-		mes "get close to the bungy jumping area.";
-		mes "In this tribe, bungy jumping is a rite";
-		mes "of passage.  If I can show them that";
-		mes "I'm big enough to brave bungy jumping,";
-		mes "they'll have to recognize me as an adult!";
+umbala,194,104,4	script	Utan Kid#2	787,{
+	if (event_umbala >= 3) {
+		mes "[Boorkatan]";
+		mes "Huh? You're from Rune-Midgard,";
+		mes "aren't you? Have you ever been bungee jumping?";
+		next;
+		if (select("Yeah:No") == 1) {
+			mes "[Boorkatan]";
+			mes "Whoa, what a surprise! I never";
+			mes "would have thought someone from";
+			mes "outside would know how to do it.";
+			mes "Okay, I'll take your word for";
+			mes "it and welcome you to our village.";
+			close;
+		}
+		mes "[Boorkatan]";
+		mes "Er, I see...";
+		mes "As part of the ceremony of";
+		mes "adulthood, all Utans have to do";
+		mes "a bungee jump. When I grow up,";
+		mes "I'm gonna do it too, and prove";
+		mes "to everybody that I am a man!";
 		close;
-LumWord:
-	mes "[???]";
-	mes "Umbaumbababaumfumuba.";
-	mes "Umbababaumbabaumbaumba.";
-	next;
-	menu "Um...yes?",-,"Nope...",Lu2;
+	}
+	else {
 		mes "[???]";
-		mes "Umbaumbaumbababa.";
-		mes "Umbaumbaumubaba.";
-		close;
-	Lu2:
+		mes "Umbaumbababah umhumba.";
+		mes "Umbabaumumba umbaumbah?";
+		next;
+		if (select("Yeah:No") == 1) {
+			mes "[???]";
+			mes "Umba, Umumbah umbabah.";
+			mes "Umbaumbah umumbabah.";
+			close;
+		}
 		mes "[???]";
-		mes "Umbaumbaumuam.";
-		mes "Umbaumbaumbaba.";
-		mes "Umbaumfumababaumu.";
+		mes "Er, Umbahumba umumbah.";
+		mes "Umbahumbah umbabah.";
+		mes "Umbahumhumbabahum.";
 		close;
+	}
 }
 
-//=====================================================================
-umbala,193,208,6	script	Utan Child#3	789,{
-	if(event_umbala < 3) goto LumWord;
-	mes "[Fuitan]";
-	mes "When I was younger, I went bungy";
-	mes "jumping even though it was extremely";
-	mes "dangerous.  I did it, though, and my";
-	mes "chest swelled with a feeling of achievement.";
-	mes "The tradition encourages rash behavior, but";
-	mes "boys will be boys, don't you think?";
-	close;
-LumWord:
-	mes "[????]";
-	mes "Umbaumbababa.";
-	mes "Umbamubafumabaumumbabamua";
-	mes "Umumbababaumbafuma.";
-	close;
-}
-
-//=====================================================================
-umbala,139,205,4	script	Utan Tribe Young Adult::UtanTribeYougAdult5	785,{
-	if(event_umbala < 3) goto LumWord;
-	mes "[Tsunitan]";
-	mes "Awesome!  I haven't seen an outsider in some time.";
-	mes "You're just in time to watch as";
-	mes "youth from all over the village bungy";
-	mes "jump to prove their courage!";
-	next;
-	mes "[Tsunitan]";
-	mes "After you jump, you can use the";
-	mes "cord to climb.  Also, if you search";
-	mes "underwater, you might be able to find";
-	mes "a submerged cave.  Of course, there have";
-	mes "been unlucky souls who have died...";
-	next;
-	mes "[Tsunitan]";
-	mes "You may also feel sick";
-	mes "as the bottom draws near, because";
-	mes "the ominous shapes of aquatic monsters";
-	mes "drift slowly under the surface.";
-	mes "If you linger underwater, you might die...";
-	close;
-LumWord:
-	mes "[????]";
-	mes "Umbaumba!";
-	mes "Umbaumbabababaumumba.";
-	mes "Babaum Utan Umbaumbaba";
-	mes "Umbababafumu.";
-	mes "Umfumubabaumbaumbaumbaba.";
-	next;
-	mes "[????]";
-	mes "Umbafumumababaumba.";
-	mes "Umbabatanumbaumba.";
-	mes "Umumu.  Umbaumbaumbaum.";
-	mes "Umbabaumbaumbaumubaamum.";
-	mes "Umbaumbaumbafumu.";
-	close;
-}
-
-//=====================================================================
-um_in,158,71,3	script	Utan Tribesman	787,{
-	if(event_umbala < 3) goto LumWord;
-	mes "[Mutakutan]";
-	mes "Umbala has enough interesting trees";
-	mes "that studying them never gets old!";
-	next;
-	mes "[Mutakutan]";
-	mes "My favourite tree near Umbala is huge!";
-	mes "It stretches into the sky as far";
-	mes "as the eye can see!";
-	mes "It's supposed to be the tallest tree in the world!";
-	emotion e_ok;
-	next;
-	mes "[Mutakutan]";
-	mes "It's so old and large that";
-	mes "the top can't even be seen!";
-	next;
-	mes "[Mutakutan]";
-	mes "Even after climbing the tree";
-	mes "to quite a height, the top was not";
-	mes "in sight.  I consider myself";
-	mes "a tree-climbing expert, so this";
-	mes "was quite distressing.";
-	next;
-	mes "[Mutakutan]";
-	mes "That said, the fruit I was able";
-	mes "to pick off of some of the higher";
-	mes "branches is yummy!";
-	emotion e_no1;
-	next;
-	mes "[Mutakutan]";
-	mes "It has a slightly sour taste.  Eating";
-	mes "it makes me feel all tingly inside!!";
-	emotion e_no1;
-	next;
-	mes "[Mutakutan]";
-	mes "At the same time, a terrible illness";
-	mes "was ravaging Umbala village.";
-	next;
-	mes "[Mutakutan]";
-	mes "The elder's health was declining";
-	mes "and he was in danger of dying, but";
-	mes "when I gave him a piece of that";
-	mes "fruit, his health improved";
-	mes "dramatically in a short time.  Surely";
-	mes "this fruit was a gift from the forest!";
-	emotion e_sob;
-	next;
-	mes "[Mutakutan]";
-	mes "The tree is north of the village.  Why";
-	mes "not visit it if you're over that way?";
-	close;
-LumWord:
-	mes "[????]";
-	mes "Umbaumbaumbabaumba!";
-	mes "Umbaumbaumbababaumba";
-	mes "Umbaumbaumba";
-	mes "Umbabaumbaumbaba.";
-	close;
-}
-
-//=====================================================================
-umbala,145,217,3	script	Chibibatan	783,{
-	if(event_umbala < 3) goto LumWord;
-	mes "[Chibibatan]";
-	mes "I want to have some fun with";
-	mes "Wambokoriotan, but after seeing";
-	mes "how his wife can be, I don't know if";
-	mes "I want to end up being on her bad side.";
-	close;
-LumWord:
-	mes "[Chibibatan]";
-	mes "Umbaba.";
-	mes "Ugaugumbarumbaruuuu!";
-	mes "Ugugauwubaruguagumbagua.";
-	close;
+umbala,193,208,6	script	Utan Man#3	789,{
+	if (event_umbala >= 3) {
+		mes "[Weitan]";
+		mes "I too did the bungee jump when I";
+		mes "was young. I remember it well...";
+		mes "It was my first time, and the";
+		mes "ground rushed up to meet me...";
+		mes "For a moment, I thought I was";
+		mes "going to get myself killed...";
+		next;
+		mes "[Weitan]";
+		mes "But after I made it, I was so";
+		mes "proud of myself~";
+		mes "Some Utans may not agree, but";
+		mes "I think bungee jumping is an";
+		mes "important part of the ceremony";
+		mes "of adulthood.";
+		close;
+	}
+	else {
+		mes "[???]";
+		mes "Umbahumba umumbah.";
+		mes "Umbahumbah umbabah.";
+		mes "Umbahumhumbabahum.";
+		close;
+	}
 }
 
-//=====================================================================
-um_in,139,48,5	script	Purenotan	783,{
-	if(event_umbala < 3) goto LumWord;
-	mes "[Purenotan]";
-	mes "See that loser over there?";
-	mes "I'm on to him.  He hasn't";
-	mes "exactly made a secret of his desire";
-	mes "to have an affair or three.";
-	mes "He needs to be smacked in the nuts, HARD.";
-	close;
-LumWord:
-	mes "[Purenotan]";
-	mes "Umbaumbaugaga!";
-	mes "Umbaumbabababa!";
-	mes "Umbaumba!";
-	emotion e_an;
-	next;
-	mes "[Purenotan]";
-	mes "Umbaumabaumbaumbaba!";
-	mes "Umbababababaugau!";
-	mes "Uguugaumbabaumbagumba!";
-	emotion e_oh;
-	next;
-	emotion e_go;
-	close;
-On_emo:
-emotion e_an;
-end;
+umbala,139,205,4	script	Utan Man#5	785,{
+	if (event_umbala >= 3) {
+		mes "[Jooltan]";
+		mes "It's been a long time since I last";
+		mes "saw a Rune-Midgardian~!";
+		mes "Welcome, stranger.";
+		next;
+		mes "[Jooltan]";
+		mes "We Utans use this place for";
+		mes "bungee jumping. Many Utan";
+		mes "youngsters have shown their";
+		mes "bravery, earned their";
+		mes "self-respect, and became";
+		mes "adults in this very place.";
+		next;
+		mes "[Jooltan]";
+		mes "Oh...right. A few unlucky people";
+		mes "just fell and died after";
+		mes "messing up their bungee jump. And";
+		mes "a few had heart attacks while";
+		mes "looking at other people jumping down...";
+		next;
+		mes "[Jooltan]";
+		mes "So...";
+		mes "Be careful when you walk around,";
+		mes "You don't want to fall off.";
+		mes "And if you want to try a bungee";
+		mes "jump, you should get yourself ready.";
+		next;
+		mes "[Jooltan]";
+		mes "Oh...right. Supposedly,";
+		mes "there's an unidentified";
+		mes "creature living in the water...";
+		mes "So if you happen to get dunked,";
+		mes "get out of there~!";
+		close;
+	}
+	else {
+		mes "[???]";
+		mes "Umbah umbah!";
+		mes "Umbaumbah bababah umbah.";
+		mes "Babaumm Utan umbah umbabah";
+		mes "Umbaba hum.";
+		mes "Umumhumbah umbaumbah umbabah.";
+		next;
+		mes "[???]";
+		mes "Umbaum mahbababh umba,";
+		mes "Umbabatan umbaumbah.";
+		mes "Ba, umbaumbaumumbabaumm.";
+		mes "Umbabah umbaumumum.";
+		mes "Umbaumbaubahum.";
+		close;
+	}
 }
 
-//=====================================================================
-um_in,144,45,5	script	Wambokoriotan	789,{
-	if(event_umbala < 3) goto LumWord;
-	mes "[Wambokoriotan]";
-	mes "Ahhh...My wife is a real";
-	mes "hothead.  Ouch...ouch.";
-	next;
-	mes "[Wambokoriotan]";
-	mes "Yunatan, Bartsutan, Chibibatan...";
-	mes "I want Umbala's babes as much";
-	mes "as they want me...Ouch...ouch!";
-	close;
-LumWord:
-	mes "[Wambokoriotan]";
-	mes "Umbaumbaba.....";
-	mes "Umbaugua!";
-	mes "Umbagumumbabagumbagaga!";
-	emotion e_heh;
-	next;
-	donpcevent "Purenotan::On_emo";
+um_in,158,71,3	script	Utan villager#um	787,{
+	if (event_umbala >= 3) {
+		mes "[Mutakutan]";
+		mes "Umbala has many many trees!";
+		mes "I, Mutakutan, like trees so much.";
+		mes "Heh heh~";
+		next;
+		mes "[Mutakutan]";
+		mes "There is one special tree I like";
+		mes "the most! That is the oldest and";
+		mes "biggest tree in Umbala!";
+		mes "No wait, I think it is the oldest";
+		mes "and biggest in the world...";
+		mes "I'm sure it is!";
+		next;
+		mes "[Mutakutan]";
+		mes "It's really really big and old!";
+		mes "It's so tall, even I haven't seen";
+		mes "the top of this tree yet. I tried";
+		mes "climbing it before, but I could";
+		mes "never reach the top...even though";
+		mes "I'm great at tree climbing.";
+		next;
+		mes "[Mutakutan]";
+		mes "Oh, also the fruits from the tree";
+		mes "are very tasty! I bet they are the";
+		mes "most delicious fruit in the world~";
+		mes "Sweet and sour...eating it just";
+		mes "makes you feel refreshed and";
+		mes "invigorated~!";
+		next;
+		mes "[Mutakutan]";
+		mes "There's an amazing story about";
+		mes "this fruit. An old man in my";
+		mes "village was suffering from a";
+		mes "mortal disease...nothing";
+		mes "seemed to help...";
+		next;
+		mes "[Mutakutan]";
+		mes "But after he took medicine made";
+		mes "from the ground leaves of this";
+		mes "tree, he became healthy and sound";
+		mes "again! I think God sent us the";
+		mes "tree to bless us.";
+		next;
+		mes "[Mutakutan]";
+		mes "It's at north of my village, so";
+		mes "why don't you go see the greatness";
+		mes "of this tree for yourself?";
+	}
+	else {
+		mes "[??????]";
+		mes "Umbaumbah umbahbah woomhah!";
+		mes "Umbah umbah umbabah umbah";
+		mes "Umbah umbah umbah";
+		mes "Umbabah umbah umbabbah";
+		next;
+		mes "[??????]";
+		mes "....";
+		mes "......";
+		mes "Umbah balooooga?";
+		mes "Umbah balooooooooga?";
+		next;
+		mes "[??????]";
+		mes "...";
+		mes "Moogahaloo schluloo.";
+	}
 	close;
 }
 
-//==============================================================================
-//Bungee jumping!
-//==============================================================================
-umbala,140,197,0	script	#Shibonochikka	139,0,1,{
-	set @jumprand,rand(0,4);
-	if (@jumprand == 1) goto L1;
-	if (@jumprand == 2) goto L2;
-	if (@jumprand == 3) goto L3;
-	if (@jumprand == 4) goto L4;
-	mapannounce "umbala","Bungy Jumping Area: " + strcharinfo(0) + " : Iyahaaaaahh!",8;
-	end;
-
-L1:
-//Dead
-	mapannounce "umbala","Bungy Jumping Area: " + strcharinfo(0) + " : Ukiyaaaaaaaaaa!",8;
-	percentheal -100,0;
-	end;
-
-L2:
-//HP50% Damage
-	mapannounce "umbala","Bungy Jumping Area: " + strcharinfo(0) + " : Kyaaaaaaaaaaa!",8;
-	percentheal -50,0;
-	end;
-
-L3:
-//HP99% Damage
-	mapannounce "umbala","Bungy Jumping Area: " + strcharinfo(0) + " : Waaaaaaaaaah!",8;
-	percentheal -99,0;
-	end;
-
-L4:
-//1 HP left, warp to Niflheim
-	mapannounce "umbala","Bungy Jumping Area: " + strcharinfo(0) + " : No-o!",8;
-	heal -HP+1,0;
-	warp "nif_in",69,15;
-	end;
+umbala,140,197,1	script	Bungee Jump	-1,0,0,{
+OnTouch:
+	switch(rand(1,3)) {
+	case 1:
+		percentheal -100,0;
+		mapannounce "umbala","Bungee Jump: "+strcharinfo(0)+" : Kyaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa~~~~~~~",bc_map;
+		end;
+	case 2:
+		percentheal -50,0;
+		mapannounce "umbala","Bungee Jump: "+strcharinfo(0)+" : Wooooooaaaaaaaaaaaaaahhhhhhhhhhhh~~~~~~!",bc_map;
+		end;
+	case 3:
+		//if (rand(1,2) == 2) {
+		//	percentheal -99,0;
+		//	warp "warp "nif_in",69,15;
+		//}
+		end;
+	}
 }
 
-//=====================================================================
-umbala,136,195,0	script	#Warp Point	139,1,1,{
+umbala,136,195,0	script	 #jump	-1,1,1,{
+OnTouch:
 	warp "umbala",145,166;
 	end;
 }

+ 2 - 1
npc/guides/guides_um.txt

@@ -13,9 +13,10 @@
 //= 1.2 Optimized, updated common guide names [Lupus]
 //= 1.4 Fitted the many lines into 1 or 2, and corrected some typos [erKURITA]
 //= 1.5 Rescripted to Aegis 10.3 standards. [L0ne_W0lf]
+//= 1.6 Corrected activating ontouch. [L0ne_W0lf]
 //============================================================ 
 
-umbala,128,94,4	script	Adventurer#um	702,1,1,{
+umbala,128,94,4	script	Adventurer#um	702,{
 	mes "[Adventurer]";
 	mes "This is a very strange place...";
 	mes "It's underdeveloped, and there";

+ 1214 - 847
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;
+}

+ 22 - 29
npc/warps/cities/umbala.txt

@@ -10,36 +10,29 @@
 //===== Compatible With: =====================================
 //= Any Athena Version; RO Episode 6+
 //===== Description: =========================================
+//= [Aegis COnversion]
 //= Warp Points for Umbala
 //===== Additional Comments: =================================
-//= No Comment
+//= 1.3 Rescripted to Aegis 10.3 Standards. [L0nE_W0lf]
 //============================================================
 
-//Witch House
-//Entrance via the Skeleton Gate Quest
-//umbala,220,190,0	warp	umba0027	1,1,um_in,32,70
-um_in,28,70,0	warp	umba0028	1,1,umbala,217,187
-
-//Weapons
-umbala,125,157,0	warp	umba0029	1,1,um_in,155,114
-um_in,155,110,0	warp	umba0030	1,1,umbala,126,152
-
-//Fan Shack
-umbala,138,129,0	warp	umba0031	1,1,um_in,99,114
-um_in,99,110,0	warp	umba0032	1,1,umbala,136,127
-
-//Lower Double Shack 
-umbala,95,186,0	warp	umba0033	1,1,um_in,142,42
-um_in,141,39,0	warp	umba0034	1,1,umbala,95,183
-
-//Upper Double Shack 
-umbala,100,202,0	warp	umba0035	1,1,um_in,163,70
-um_in,166,70,0	warp	umba0036	1,1,umbala,102,204
-
-//Small Shack 
-umbala,156,249,0	warp	umba0037	1,1,um_in,99,67
-um_in,99,63,0	warp	umba0038	1,1,umbala,160,247
-
-//Large Shack 
-umbala,108,164,0	warp	umba0039	1,1,um_in,38,112
-um_in,38,110,0	warp	umba0040	1,1,umbala,104,163
+umbala,68,253,0	warp	um_chief1-1	1,1,um_in,38,113
+um_in,38,110,0	warp	um_chief1-2	1,1,umbala,66,250
+umbala,138,129,0	warp	um_tool1-1	1,1,um_in,99,114
+um_in,99,111,0	warp	um_tool1-2	1,1,umbala,136,127
+umbala,125,157,0	warp	um_weapon1-1	1,1,um_in,155,114
+um_in,155,111,0	warp	um_weapon1-2	1,1,umbala,126,154
+umbala,94,186,0	warp	um_houseA1-1	1,1,um_in,141,42
+um_in,141,39,0	warp	um_houseA1-2	1,1,umbala,94,183
+umbala,100,203,0	warp	um_houseA2-1	1,1,um_in,163,69
+um_in,166,69,0	warp	um_houseA2-2	1,1,umbala,102,205
+umbala,107,130,0	warp	um_houseB1-1	1,1,um_in,99,66
+um_in,99,63,0	warp	um_houseB1-2	1,1,umbala,108,127
+umbala,220,189,0	script	um_shaman1-1	45,1,1,{
+OnTouch:
+	if (event_umbala == 7) {
+		warp "um_in",32,71;
+	}
+	end;
+}
+um_in,29,71,0	warp	um_shaman2-1	1,1,umbala,217,186

+ 19 - 20
npc/warps/dungeons/um_dun.txt

@@ -3,31 +3,30 @@
 //===== By: ==================================================
 //= Darkchild (1.0vA); Athena (1.0vB)
 //===== Current Version: =====================================
-//= 1.2 (Akaru)
+//= 1.3 (Akaru)
 //===== Compatible With: =====================================
 //= Any Athena Version; RO Episode 6+
 //===== Description: =========================================
+//= [Aegis Conversion]
 //= Warp Points for Umbala Dungeon (Yggdrasil Cave)
 //===== Additional Comments: =================================
 //= 1.2 Corrected NPC names to fall within proper restrictions. [L0ne_W0lf]
+//= 1.3 Rescripted to Aegis 10.3 standards. [L0ne_W0lf]
 //============================================================
 
-//= Dungeon Level 1 ==========================================
-umbala,106,286,0	warp	umba0011	1,1,um_dun01,42,31
-um_dun01,150,198,0	warp	umba0013	1,1,um_dun02,48,30
-um_dun01,42,26,0	warp	umba0012	1,1,umbala,111,283
-
-//= Dungeon Level 2 ==========================================
-um_dun02,103,208,0	warp	umba0020	1,1,um_dun02,116,208
-um_dun02,113,208,0	warp	umba0019	1,1,um_dun02,100,208
-um_dun02,169,38,0	warp	umba0025	1,1,um_dun02,180,38
-um_dun02,177,38,0	warp	umba0026	1,1,um_dun02,166,38
-um_dun02,216,77,0	warp	umba0018	1,1,um_dun02,217,88
-um_dun02,216,84,0	warp	umba0017	1,1,um_dun02,214,74
-um_dun02,222,259,0	warp	umba0015	1,1,um_dun02,234,255
-um_dun02,231,255,0	warp	umba0016	1,1,um_dun02,219,260
-um_dun02,25,244,0	warp	umba0022a	1,1,um_dun02,35,251
-um_dun02,33,249,0	warp	umba0021	1,1,um_dun02,23,242
-um_dun02,51,26,0	warp	umba0022b	1,1,um_dun01,153,201 
-um_dun02,60,88,0	warp	umba0023	1,1,um_dun02,66,77
-um_dun02,63,80,0	warp	umba0024	1,1,um_dun02,59,92
+umbala,106,285,0	warp	um_dun1-1	1,1,um_dun01,42,30
+um_dun01,42,27,0	warp	um_dun1-2	1,1,umbala,109,284
+um_dun01,149,198,0	warp	um_dun2-1	1,1,um_dun02,52,22
+um_dun02,55,19,0	warp	um_dun2-2	1,1,um_dun01,152,198
+um_dun02,60,89,0	warp	um_dun3-1	1,1,um_dun02,215,74
+um_dun02,215,77,0	warp	um_dun3-2	1,1,um_dun02,60,92
+um_dun02,64,79,0	warp	um_dun4-1	1,1,um_dun02,219,261
+um_dun02,222,259,0	warp	um_dun4-2	1,1,um_dun02,67,77
+um_dun02,26,244,0	warp	um_dun5-1	1,1,um_dun02,233,253
+um_dun02,231,255,0	warp	um_dun5-2	1,1,um_dun02,25,241
+um_dun02,103,208,0	warp	um_dun6-1	1,1,um_dun02,180,38
+um_dun02,177,38,0	warp	um_dun6-2	1,1,um_dun02,100,208
+um_dun02,32,249,0	warp	um_dun7-1	1,1,um_dun02,117,208
+um_dun02,113,208,0	warp	um_dun7-2	1,1,um_dun02,35,252
+um_dun02,215,85,0	warp	um_dun8-1	1,1,um_dun02,166,38
+um_dun02,169,38,0	warp	um_dun8-2	1,1,um_dun02,215,88

+ 19 - 23
npc/warps/fields/umbala_fild.txt

@@ -3,33 +3,29 @@
 //===== By: ==================================================
 //= Nana (1.0)
 //===== Current Version: =====================================
-//= 1.0
+//= 1.1
 //===== Compatible With: =====================================
 //= Any Athena Version; RO Episode 6+
 //===== Description: =========================================
+//= [Aegis Conversion]
 //= Warp Points for Umbala Field
 //===== Additional Comments: =================================
-//= No Comment
+//= 1.1 Rescripted to Aegis 10.3 Standards. [L0ne_W0lf]
 //============================================================
 
-//Umbala-Umbala Fields Connection
-um_fild04,215,340,0	warp	umba0055	1,1,umbala,130,80
-umbala,129,78,0	warp	umba0001	1,1,um_fild04,215,337
-
-//Umbala-Comodo Connection
-beach_dun2,258,244,0	warp	umba0052	1,1,um_fild01,35,276
-cmd_fild01,179,370,0	warp	umba0041	1,1,um_fild03,239,27
-cmd_fild01,78,367,0	warp	umba0043	1,1,um_fild03,117,51
-um_fild01,30,274,0	warp	umba0051	1,1,beach_dun2,255,244
-um_fild03,119,50,0	warp	umba0044	1,1,cmd_fild01,78,365
-um_fild03,239,25,0	warp	umba0042	1,1,cmd_fild01,179,368
-
-//Umbala Fields
-um_fild01,368,275,0	warp	umba0010	1,1,um_fild02,24,271
-um_fild02,191,374,0	warp	umba0053	1,1,um_fild04,179,13
-um_fild02,21,270,0	warp	umba0009	1,1,um_fild01,365,275
-um_fild02,374,149,0	warp	umba0008	1,1,um_fild03,35,146
-um_fild02,374,326,0	warp	umba0005	1,1,um_fild03,21,334
-um_fild03,18,334,0	warp	umba0006	1,1,um_fild02,371,326
-um_fild03,30,146,0	warp	umba0007	1,1,um_fild02,371,149
-um_fild04,179,10,0	warp	umba0054	1,1,um_fild02,191,372
+cmd_fild01,77,366,0	warp	um_fild1-1	1,1,um_fild03,114,53
+cmd_fild01,178,370,0	warp	um_fild1-2	1,1,um_fild03,243,29
+um_fild01,31,274,0	warp	um_fild1-3	1,1,beach_dun2,254,244
+beach_dun2,258,244,0	warp	um_fild1-4	1,1,um_fild01,35,276
+um_fild01,369,277,0	warp	um_fild1-5	1,1,um_fild02,25,272
+um_fild02,22,272,0	warp	um_fild2-1	1,1,um_fild01,366,277
+um_fild02,188,374,0	warp	um_fild2-2	1,1,um_fild04,182,16
+um_fild02,373,329,0	warp	um_fild2-3	1,1,um_fild03,23,334
+um_fild02,373,148,0	warp	um_fild2-4	1,1,um_fild03,36,145
+um_fild03,19,334,0	warp	um_fild3-1	1,1,um_fild02,370,329
+um_fild03,32,145,0	warp	um_fild3-2	1,1,um_fild02,370,148
+um_fild03,114,50,0	warp	um_fild3-3	1,1,cmd_fild01,74,363
+um_fild03,243,26,0	warp	um_fild3-4	1,1,cmd_fild01,176,367
+um_fild04,182,13,0	warp	um_fild4-1	1,1,um_fild02,190,371
+um_fild04,215,339,0	warp	um_fild4-2	1,1,umbala,130,82
+umbala,130,79,0	warp	um_fild4-3	1,1,um_fild04,215,336