* Updated Minstrel and Shadow Chaser job quests to their latest versions.

* Fixed more Izlude RE coordinates (bugreport:6285).
* Disabled "Fish Tails" NPC in El Dicastes quests until Izlude RE coordinates are found; also, fixed a small mistake.

git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@17024 54d463be-8e91-2dee-dedb-b68131a5f0ec

1 files changed, 508 insertions, 574 deletions

diff --git a/npc/re/jobs/3-2/minstrel.txt b/npc/re/jobs/3-2/minstrel.txt
index 38a6cab22..9610e2c57 100644
--- a/npc/re/jobs/3-2/minstrel.txt
+++ b/npc/re/jobs/3-2/minstrel.txt
@@ -3,9 +3,9 @@
 //===== By: ================================================== 
 //= Muad_Dib
 //===== Current Version: ===================================== 
-//= 1.2
+//= 1.3
 //===== Compatible With: ===================================== 
-//= Any rAthena SVN
+//= rAthena SVN
 //===== Description: ========================================= 
 //= [Official Conversion]
 //= Job change Quest from Bard / Clown -> Minstrel.
@@ -13,136 +13,124 @@
 //= 1.0 First Version. [Masao]
 //= 1.1 Fix the checking of requirements before job change to Minstel [JayPee]
 //= 1.2 Optimized. [Euphy]
+//= 1.3 Updated script. [Euphy]
 //============================================================
 
 alberta,196,133,4	script	Bard#job_min	486,{
-
-	if (job_min == 0){
-		if (Class == Job_Bard || Class == Job_Clown || Class == Job_Baby_Bard){
-			if ((BaseLevel > 98) && (JobLevel > 49)){
-				mes "[Bard]";
-				mes "The voice of heaven revolves around in my ears";
-				mes "like a wandering wind,";
-				next;
-				mes "[Bard]";
-				mes "Even though I close my eyes and cover my ears,";
-				mes "I can hear a voice from somewhere,";
-				next;
-				mes "[Bard]";
-				mes "It put temptation in exhausted crewman to deep sleep,";
-				mes "made them feel as if they were in a land of dreams.";
-				next;
-				mes "[Girl]";
-				mes "Ahhh!! Awesome!!";
-				next;
-				mes "[Boy]";
-				mes "Encore!! Encore!!!";
-				next;
-				mes "[Old Man passing by]";
-				mes "Eeeee~ that's not real song...";
-				next;
-				mes "["+strcharinfo(0)+"]";
-				mes "Clap.";
-				mes "I can feel the rhythm.";
-				mes "Can I hear one more song?";
-				next;
-				mes "[Bard]";
-				mes "Hum?";
-				mes "Juding by your outfit I think you are good at singing, why don't you sing us a song?";
-				next;
-				mes "["+strcharinfo(0)+"]";
-				mes "??!!";
-				next;
-				mes "[Bard]";
-				mes "Hahaha!";
-				mes "Just kidding.";
-				mes "Were you serious? Haha.";
-				next;
-				mes "["+strcharinfo(0)+"]";
-				mes "...";
-				next;
-				mes "[Karian]";
-				mes "Sorry~";
-				mes "Don't be upset...";
-				mes "My name is Karian, I'm just going around.";
-				next;
-				mes "[Karian]";
-				mes "Do you want to go somewhere?";
-				mes "Alberta is perfect for traveling.";
-				next;
-				mes "[Karian]";
-				mes "But when you go to sea, you have to be careful.";
-				mes "If you run into a Siren, then it's only a matter of time before she kills you.";
-				next;
-				mes "[Karian]";
-				mes "No man can survive after hearing ^f57d7dthe voice of a Siren^000000.";
-				next;
-				mes "["+strcharinfo(0)+"]";
-				mes "I'm "+strcharinfo(0)+".";
-				mes "Are you here in Alberta to travel?";
-				next;
-				mes "[Karian]";
-				mes "Um.. I'm not trying to leave...";
-				mes "...";
-				next;
-				mes "[Karian]";
-				mes "Yes!";
-				mes "I'm looking for '^f57d7dMaestro Song^000000'.";
-				next;
-				mes "["+strcharinfo(0)+"]";
-				mes "^f57d7d'Maestro Song'^000000, you mean the poet of legend?";
-				next;
-				mes "[Karian]";
-				mes "That's right.";
-				mes "According to a rumor that I heard, he is a rich noble.";
-				mes "But other than that fact, I can't get anymore information.";
-				next;
+	if (job_min == 0) {
+		if (BaseJob == Job_Bard && BaseLevel > 98 && JobLevel > 49) {
+			mes "[Bard]";
+			mes "The voice of heaven revolves around in my ears";
+			mes "like a wandering wind,";
+			next;
+			mes "[Bard]";
+			mes "Even though I close my eyes and cover my ears,";
+			mes "I can hear a voice from somewhere,";
+			next;
+			mes "[Bard]";
+			mes "It put temptation in exhausted crewman to deep sleep,";
+			mes "made them feel as if they were in a land of dreams.";
+			next;
+			mes "[Girl]";
+			mes "Ahhh!! Awesome!!";
+			next;
+			mes "[Boy]";
+			mes "Encore!! Encore!!!";
+			next;
+			mes "[Old Man passing by]";
+			mes "Eeeee~ that's not real song...";
+			next;
+			mes "["+strcharinfo(0)+"]";
+			mes "Clap.";
+			mes "I can feel the rhythm.";
+			mes "Can I hear one more song?";
+			next;
+			mes "[Bard]";
+			mes "Hum?";
+			mes "Judging by your outfit I think you are good at singing, why don't you sing us a song?";
+			next;
+			mes "["+strcharinfo(0)+"]";
+			mes "??!!";
+			next;
+			mes "[Bard]";
+			mes "Hahaha!";
+			mes "Just kidding.";
+			mes "Were you serious? Haha.";
+			next;
+			mes "["+strcharinfo(0)+"]";
+			mes "...";
+			next;
+			mes "[Karian]";
+			mes "Sorry~";
+			mes "Don't be upset...";
+			mes "My name is Karian, I'm just going around.";
+			next;
+			mes "[Karian]";
+			mes "Do you want to go somewhere?";
+			mes "Alberta is perfect for traveling.";
+			next;
+			mes "[Karian]";
+			mes "But when you go to sea, you have to be careful.";
+			mes "If you run into a Siren, then it's only a matter of time before she kills you.";
+			next;
+			mes "[Karian]";
+			mes "No man can survive after hearing ^f57d7dthe voice of a Siren^000000.";
+			next;
+			mes "["+strcharinfo(0)+"]";
+			mes "I'm "+strcharinfo(0)+".";
+			mes "Are you here in Alberta to travel?";
+			next;
+			mes "[Karian]";
+			mes "Um... I'm not trying to leave...";
+			mes "...";
+			next;
+			mes "[Karian]";
+			mes "Yes!";
+			mes "I'm looking for '^f57d7dMaestro Song^000000'.";
+			next;
+			mes "["+strcharinfo(0)+"]";
+			mes "^f57d7d'Maestro Song'^000000, you mean the poet of legend?";
+			next;
+			mes "[Karian]";
+			mes "That's right.";
+			mes "According to a rumor that I heard, he is a rich noble.";
+			mes "But other than that fact, I can't get any more information.";
+			next;
+			mes "["+strcharinfo(0)+"]";
+			mes "Why can't you get any more information?";
+			next;
+			mes "[Karian]";
+			mes "Well?";
+			mes "That's why I tried to go Prontera...";
+			mes "Umm...";
+			next;
+			mes "[Karian]";
+			mes "If you are interested, why don't help me find out where ^f57d7d'Maestro Song'^000000 is?";
+			next;
+			if(select("Ok.:No.") == 2) {
 				mes "["+strcharinfo(0)+"]";
-				mes "Why can't you get anymore information?";
-				next;
-				mes "[Karian]";
-				mes "Well?";
-				mes "That's why I tried to go Prontera...";
-				mes "Umm...";
-				next;
-				mes "[Karian]";
-				mes "If you are interested, why don't help me find out where ^f57d7d'Maestro Song'^000000 is?";
-				next;
-				switch(select("Ok.:No.")){
-				case 1:
-					mes "[" +strcharinfo(0)+ "]";
-					mes "Ok, I will.";
-					set job_min,1;
-					setquest 11135;
-					next;
-					break;
-				case 2:
-					mes "["+strcharinfo(0)+"]";
-					mes "I'm not interested.";
-					next;
-					mes "[Karian]";
-					mes "Are you? It can't be helped.";
-					mes "See you later~";
-					close;
-				}
-				mes "[Karian]";
-				mes "It's good to travel by yourself but sometimes you feel that you want to have friends around.";
+				mes "I'm not interested.";
 				next;
 				mes "[Karian]";
-				mes "Then "+strcharinfo(0)+".";
-				mes "Can you collect some ^f57d7dInformation on 'Maestro Song'^000000 in ^f57d7dProntera^000000?";
-				mes "Because I have something to investigate in Alberta.";
-				next;
-				mes "[Karian]";
-				mes "Please come back here after finishing the investigation.";
+				mes "Are you? It can't be helped.";
+				mes "See you later~";
 				close;
 			}
-			mes "[Bard]";
-			mes "You have to be careful when you are going to sea.";
-			mes "If you run into a Siren, then it's only a matter of time before she kills you.";
+			mes "["+strcharinfo(0)+"]";
+			mes "Ok, I will.";
+			set job_min,1;
+			setquest 11135;
 			next;
-			mes "[Bard]";
-			mes "There is no one who can live when he hears^f57d7dthe voice of Siren^000000.";
+			mes "[Karian]";
+			mes "It's good to travel by yourself but sometimes you feel that you want to have friends around.";
+			next;
+			mes "[Karian]";
+			mes "Then "+strcharinfo(0)+".";
+			mes "Can you collect some ^f57d7dInformation on 'Maestro Song'^000000 in ^f57d7dProntera^000000?";
+			mes "Because I have something to investigate in Alberta.";
+			next;
+			mes "[Karian]";
+			mes "Please come back here after finishing the investigation.";
 			close;
 		}
 		mes "[Bard]";
@@ -152,7 +140,7 @@ alberta,196,133,4	script	Bard#job_min	486,{
 		mes "[Bard]";
 		mes "No man can survive after hearing ^f57d7dthe voice of a Siren^000000.";
 		close;
-	}else if (job_min == 1){
+	} else if (job_min == 1) {
 		mes "[Karian]";
 		mes "It's good to travel by yourself but sometimes you feel that you want to have friends around.";
 		next;
@@ -164,17 +152,17 @@ alberta,196,133,4	script	Bard#job_min	486,{
 		mes "[Karian]";
 		mes "Please come back here after finishing the investigation.";
 		close;
-	}else if ((job_min > 1) && (job_min < 4)){
+	} else if (job_min > 1 && job_min < 4) {
 		mes "[Karian]";
 		mes "Can you collect some ^f57d7d information on 'Maestro Song'^000000 in ^f57d7dProntera^000000?";
 		mes "Because I have something to investigate in Alberta.";
 		next;
 		mes "[Karian]";
-		mes "please come back here after finishing the investigation.";
+		mes "Please come back here after finishing the investigation.";
 		close;
-	}else if (job_min == 4){
+	} else if (job_min == 4) {
 		mes "[Karian]";
-		mes ""+strcharinfo(0)+"! Did you already go to Prontera?";
+		mes strcharinfo(0)+"! Did you already go to Prontera?";
 		mes "Did you get any useful information?";
 		next;
 		mes "[Karian]";
@@ -198,7 +186,7 @@ alberta,196,133,4	script	Bard#job_min	486,{
 		set job_min,5;
 		changequest 11138,11139;
 		close;
-	}else if (job_min == 100){
+	} else if (job_min == 100) {
 		mes "[Karian]";
 		mes "The voice of heaven revolves around my ears";
 		mes "like a wandering wind,";
@@ -218,7 +206,24 @@ alberta,196,133,4	script	Bard#job_min	486,{
 		mes "[Karian]";
 		mes "Well?";
 		mes "Let me leave here?";
-		close;
+		next;
+		mes "[Minstrel Song]";
+		mes "Whenever you want to see me, visit me.";
+		mes "If you have time come by and have a chat with me.";
+		next;
+		switch(select("Accept.:Refuse.")) {
+		case 1:
+			mes "[Minstrel Song]";
+			mes "Did you visit somewhere fun?";
+			mes "I'm excited!";
+			close2;
+			warp "prt_in",101,174;
+			end;
+		case 2:
+			mes "[Minstrel Song]";
+			mes "Then pass by here next time.";
+			close;
+		}
 	}
 	mes "[Bard]";
 	mes "The voice of heaven revolves around in my ears";
@@ -235,9 +240,8 @@ alberta,196,133,4	script	Bard#job_min	486,{
 }
 
 prontera,141,97,4	script	Warmhearted woman	701,{
-
-	if (job_min == 1){
-		mes "[Warmhearted woman]";
+	mes "[Warmhearted woman]";
+	if (job_min == 1) {
 		mes "Maestro Song?";
 		mes "I haven't heard that name before.";
 		next;
@@ -254,8 +258,7 @@ prontera,141,97,4	script	Warmhearted woman	701,{
 		set job_min,2;
 		changequest 11135,11136;
 		close;
-	}else if (job_min == 2){
-		mes "[Warmhearted woman]";
+	} else if (job_min == 2) {
 		mes "Ah! Ask a ^f57d7dman wearing glasses near the gate of the castle^000000 about the song.";
 		mes "They will make a book of 100 hit songs~";
 		next;
@@ -263,15 +266,13 @@ prontera,141,97,4	script	Warmhearted woman	701,{
 		mes "He must know something about making that book.";
 		close;
 	}
-	mes "[Warmhearted woman]";
 	mes "I heard that a ^f57d7dman wearing glasses near the gate of the castle^000000 is making a 100 hit song book~";
 	close;
 }
 
 prontera,140,331,6	script	Glasses-wearing Man	883,{
-
-	if (job_min == 2){
-		mes "[Glasses-wearing Man]";
+	mes "[Glasses-wearing Man]";
+	if (job_min == 2) {
 		mes "You mean Maestro Song?";
 		mes "I don't know details of his life but I heard that he wrote great songs.";
 		next;
@@ -279,7 +280,7 @@ prontera,140,331,6	script	Glasses-wearing Man	883,{
 		mes "I don't get how a boy raised in a rich environment could write a song like this.";
 		next;
 		mes "[Glasses-wearing Man]";
-		mes "He is still on a trip, but thesedays we haven't heard new songs from him.";
+		mes "He is still on a trip, but these days we haven't heard new songs from him.";
 		next;
 		mes "[Glasses-wearing Man]";
 		mes "So we are worried.";
@@ -289,12 +290,10 @@ prontera,140,331,6	script	Glasses-wearing Man	883,{
 		set job_min,3;
 		changequest 11136,11137;
 		close;
-	}else if (job_min == 3){
-		mes "[Glasses-wearing Man]";
+	} else if (job_min == 3) {
 		mes "It would better to ask the ^f57d7dwoman standing in front of the tool shop^000000.";
 		close;
 	}
-	mes "[Glasses-wearing Man]";
 	mes "100 hit songs!!";
 	mes "Whoever want to be a Minstrel should know about this!";
 	next;
@@ -305,8 +304,7 @@ prontera,140,331,6	script	Glasses-wearing Man	883,{
 }
 
 prontera,146,218,4	script	Woman#job_min	90,{
-
-	if (job_min == 3){
+	if (job_min == 3) {
 		mes "[Woman]";
 		mes "Do you know who Maestro Song is?";
 		mes "I think he must be my little boy.";
@@ -332,8 +330,8 @@ prontera,146,218,4	script	Woman#job_min	90,{
 		set job_min,4;
 		changequest 11137,11138;
 		close;
-	}else if (job_min == 4){
-		mes "- I can't get anymore -";
+	} else if (job_min == 4) {
+		mes "- I can't get any more -";
 		mes "- useful information. -";
 		mes "- Go back to Alberta. -";
 		mes "- and talk to that Bard. -";
@@ -345,25 +343,8 @@ prontera,146,218,4	script	Woman#job_min	90,{
 }
 
 airplane,222,67,6	script	Karian#job_min1	486,{
-
-	if (job_min == 5){
-		mes "[Karian]";
-		mes "Yup!!!!!!!!!!!!!!!!!!";
-		next;
-		mes "[Karian]";
-		mes "Please leave me alone.";
-		mes "I feel nauseated.";
-		next;
-		mes "[Karian]";
-		mes "Acchh...";
-		set job_min,6;
-		changequest 11139,11140;
-		close2;
-		warp "hu_in01",267,8;
-		end;
-	}
 	mes "[Karian]";
-	mes "Yup!!!!!!!!";
+	mes "Yup!!!!!!!!!!!!!!!!!!";
 	next;
 	mes "[Karian]";
 	mes "Please leave me alone.";
@@ -371,13 +352,19 @@ airplane,222,67,6	script	Karian#job_min1	486,{
 	next;
 	mes "[Karian]";
 	mes "Acchh...";
+	if (job_min == 5) {
+		set job_min,6;
+		changequest 11139,11140;
+		close2;
+		warp "hu_in01",267,8;
+		end;
+	}
 	close;
 }
 
 hu_in01,267,5,3	script	Karian#job_min2	486,{
-
-	if (job_min == 6){
-		mes "[Karian]";
+	mes "[Karian]";
+	if (job_min == 6) {
 		mes "Eeeeh it's so painful.";
 		mes "I don't want to feel like this ever again.";
 		next;
@@ -404,23 +391,20 @@ hu_in01,267,5,3	script	Karian#job_min2	486,{
 		set job_min,7;
 		changequest 11140,11141;
 		close;
-	}else if (job_min == 7){
-		mes "[Karian]";
+	} else if (job_min == 7) {
 		mes "Sorry... Owww!";
 		mes "You can get good information from the ^f57d7dPub^000000. Owww...";
 		close;
-	}else if (job_min == 8){
-		mes "[Karian]";
+	} else if (job_min == 8) {
 		mes "Wooo.";
 		mes "Did you get anything?";
 		next;
 		mes "- Karian doesn't look -";
-		mes "- like he's doing well -";
-		mes "- you can get information -";
+		mes "- like he's doing well. -";
+		mes "- You can get information -";
 		mes "- from a man in the Pub. -";
 		close;
-	}else if (job_min == 9){
-		mes "[Karian]";
+	} else if (job_min == 9) {
 		mes "Owww...";
 		next;
 		mes "["+strcharinfo(0)+"]";
@@ -464,7 +448,7 @@ hu_in01,267,5,3	script	Karian#job_min2	486,{
 		next;
 		mes "[Karian]";
 		mes "Ahh...";
-		mes "Y, yes...";
+		mes "Y-yes...";
 		next;
 		mes "["+strcharinfo(0)+"]";
 		mes "Hmm...";
@@ -492,12 +476,10 @@ hu_in01,267,5,3	script	Karian#job_min2	486,{
 		set job_min,10;
 		changequest 11142,11143;
 		close;
-	}else if (job_min == 10){
-		mes "[Karian]";
+	} else if (job_min == 10) {
 		mes "What are you doing? Let's go to Thanatos tower.";
 		close;
 	}
-	mes "[Karian]";
 	mes "Of course it's easy to take an airship, but sometimes it can be good to walk.";
 	next;
 	mes "[Karian]";
@@ -506,8 +488,7 @@ hu_in01,267,5,3	script	Karian#job_min2	486,{
 }
 
 hu_in01,361,103,3	script	Tone-deaf person	995,{
-
-	if (job_min == 7){
+	if (job_min == 7) {
 		mes "[Tone-deaf person]";
 		mes "Lala~ lala~";
 		mes "Humming~?";
@@ -521,7 +502,8 @@ hu_in01,361,103,3	script	Tone-deaf person	995,{
 		mes "- that such sounds could -";
 		mes "- be made from humans. -";
 		next;
-		if(select("You move to other side.:Keep listening.")==1) close;
+		if(select("You move to other side.:Keep listening.") == 1)
+			close;
 		mes "[Tone-deaf person]";
 		mes "Turuturu~";
 		mes "Dadada~";
@@ -534,7 +516,7 @@ hu_in01,361,103,3	script	Tone-deaf person	995,{
 		next;
 		mes "[Tone-deaf person]";
 		mes "Hum!! Hey you, you were listening to my song.";
-		mes "You look like a "+((Class == Job_Bard || Class == Job_Baby_Bard)?"Bard":"Clown")+", how about you sing for me as rewarding my song?";
+		mes "You look like a "+((Class == Job_Clown)?"Clown":"Bard")+", how about you sing for me as rewarding my song?";
 		next;
 		mes "["+strcharinfo(0)+"]";
 		mes "What?!";
@@ -549,7 +531,7 @@ hu_in01,361,103,3	script	Tone-deaf person	995,{
 		next;
 		mes "["+strcharinfo(0)+"]";
 		mes "You are standing in the middle of Asgard's field.";
-		mes "You hand the friut of heaven over to me~";
+		mes "You hand the fruit of heaven over to me~";
 		mes "You are loved by every god~";
 		next;
 		mes "[Tone-deaf person]";
@@ -567,7 +549,7 @@ hu_in01,361,103,3	script	Tone-deaf person	995,{
 		mes "For a long time I lost my dream, I'm already old.";
 		next;
 		mes "[Tone-deaf person]";
-		mes "I have famliy that needed my protection.";
+		mes "I have family that needed my protection.";
 		mes "But one day I believe that my dreams come true!";
 		next;
 		mes "[Tone-deaf person]";
@@ -578,8 +560,8 @@ hu_in01,361,103,3	script	Tone-deaf person	995,{
 		mes "And I can show my song to those who know the song.";
 		next;
 		mes "[Tone-deaf person]";
-		mes "They are usually suprised when they hear the song.";
-		mes "They are suprised by my skill.";
+		mes "They are usually surprised when they hear the song.";
+		mes "They are surprised by my skill.";
 		mes "Huhu";
 		next;
 		mes "[Tone-deaf person]";
@@ -627,7 +609,7 @@ hu_in01,361,103,3	script	Tone-deaf person	995,{
 		mes "Browsing browsing .";
 		set job_min,8;
 		close;
-	}else if (job_min == 8){
+	} else if (job_min == 8) {
 		mes "[Tone-deaf person]";
 		mes "I got it.";
 		mes "Hum!";
@@ -689,21 +671,21 @@ hu_in01,361,103,3	script	Tone-deaf person	995,{
 		set job_min,9;
 		changequest 11141,11142;
 		close;
-	}else if (job_min == 9){
+	} else if (job_min == 9) {
 		mes "["+strcharinfo(0)+"]";
 		mes "......";
 		next;
 		mes "-I'm so exhausted.-";
-		mes "-you got information-";
+		mes "-You got information-";
 		mes "-so go back to the hotel.-";
 		close;
-	}else if (job_min == 10){
+	} else if (job_min == 10) {
 		mes "[Tone-deaf person]";
 		mes "Are you leaving??";
 		mes "If you want to hear my song, you can visit me.";
 		mes "Hahahah";
 		close;
-	}else if (job_min == 100){
+	} else if (job_min == 100) {
 		mes "[Tone-deaf person]";
 		mes "Oh!!";
 		mes "You seem to be strong!";
@@ -725,10 +707,9 @@ hu_in01,361,103,3	script	Tone-deaf person	995,{
 	close;
 }
 
-tha_scene01,140,200,0	script	min_receipt	139,3,3,{
-
+tha_scene01,140,200,0	script	#min_receipt	139,3,3,{
 OnTouch:
-	if (job_min == 10 || (job_min == 11 && countitem(6271) < 1)){
+	if (job_min == 10 || (job_min == 11 && countitem(6271) == 0)) {
 		mes "-There is a piece of paper on the ground.-";
 		next;
 		mes "["+strcharinfo(0)+"]";
@@ -749,7 +730,7 @@ OnTouch:
 		mes "- Juno's store manager : Mr. Click.";
 		next;
 		mes "- Directions : Around Juno's plaza.";
-		getitem 6271,1;
+		getitem 6271,1; //Mins_Receipt
 		next;
 		mes "["+strcharinfo(0)+"]";
 		mes "Photo exchange receipt?";
@@ -765,35 +746,93 @@ OnTouch:
 		donpcevent "Karian#cmd1::OnDisable";
 		close;
 	}
+	end;
 }
 
 tha_scene01,139,204,6	script	Karian#cmd1	486,{
 	end;
-
 OnInit:
 	disablenpc "Karian#cmd1";
 	end;
-
 OnEnable:
 	enablenpc "Karian#cmd1";
 	initnpctimer;
 	end;
-
 OnDisable:
 	disablenpc "Karian#cmd1";
 	stopnpctimer;
 	end;
-
 OnTimer15000:
 	donpcevent "Karian#cmd1::OnDisable";
 	stopnpctimer;
 	end;
 }
 
-yuno,143,170,6	script	Mr. Click#job_min	748,{
+ve_fild07,129,132,5	script	Karian#cmd5	486,{
+	end;
+OnInit:
+	disablenpc "Karian#cmd5";
+	end;
+OnEnable:
+	enablenpc "Karian#cmd5";
+	initnpctimer;
+	end;
+OnDisable:
+	disablenpc "Karian#cmd5";
+	stopnpctimer;
+	end;
+OnTimer30000:
+	donpcevent "Karian#cmd5::OnDisable";
+	stopnpctimer;
+	end;
+}
 
-	if (job_min == 11){
-		mes "[Mr. Click]";
+prontera,155,49,4	script	Karian#cmd9	486,{
+	end;
+OnInit:
+	disablenpc "Karian#cmd9";
+	end;
+OnEnable:
+	enablenpc "Karian#cmd9";
+	initnpctimer;
+	end;
+OnDisable:
+	disablenpc "Karian#cmd9";
+	stopnpctimer;
+	end;
+OnTimer300000:
+	donpcevent "Karian#cmd9::OnDisable";
+	stopnpctimer;
+	end;
+}
+
+yuno,146,168,0	script	Karian#cmd2	486,{
+	end;
+OnInit:
+	disablenpc strnpcinfo(0);
+	end;
+OnEnable:
+	enablenpc strnpcinfo(0);
+	initnpctimer;
+	end;
+OnDisable:
+	disablenpc strnpcinfo(0);
+	stopnpctimer;
+	end;
+OnTimer100000:
+	donpcevent strnpcinfo(0)+"::OnDisable";
+	stopnpctimer;
+	end;
+}
+lighthalzen,160,124,6	duplicate(Karian#cmd2)	Karian#cmd3	486
+ra_in01,357,128,0	duplicate(Karian#cmd2)	Karian#cmd4	486
+comodo,184,109,0	duplicate(Karian#cmd2)	Karian#cmd6	486
+moc_fild16,204,231,0	duplicate(Karian#cmd2)	Karian#cmd7	486
+aldebaran,142,128,2	duplicate(Karian#cmd2)	Karian#cmd8	486
+
+yuno,143,170,6	script	Mr. Click#job_min	748,{
+	mes "[Mr. Click]";
+	if (job_min == 11) {
 		mes "Hi~ welcome~";
 		mes "I can take a picture for you.";
 		mes "Do you want to take a pic?";
@@ -871,7 +910,7 @@ yuno,143,170,6	script	Mr. Click#job_min	748,{
 		next;
 		mes "[Karian]";
 		mes "Um... Teddy Bear...";
-		mes "Between Einbroch and Lighthalzen, there is an area that teddybears live.";
+		mes "Between Einbroch and Lighthalzen, there is an area that teddy bears live.";
 		next;
 		mes "[Karian]";
 		mes "We might be able to get something there.";
@@ -883,18 +922,17 @@ yuno,143,170,6	script	Mr. Click#job_min	748,{
 		mes "Well... Go there and we might be able to find out something.";
 		next;
 		mes "[Karian]";
-		mes "Umm... Then I'll pass by Einbroch and go to Lighthalzen. Why don't you go to the place that Teddy Bears are?";
+		mes "Umm... Then I'll pass by Einbroch and go to Lighthalzen. Why don't you go to the place where Teddy Bears are?";
 		next;
 		mes "["+strcharinfo(0)+"]";
 		mes "Ok. Then let's meet at Lighthalzen's hotel.";
 		mes "I'll get the 33 Teddy Bears.";
 		donpcevent "Karian#cmd2::OnDisable";
 		set job_min,12;
-		getitem 6270,1;
+		getitem 6270,1; //Mins_Picture
 		changequest 11144,11145;
 		close;
-	}else if (job_min == 12){
-		mes "[Mr. Click]";
+	} else if (job_min == 12) {
 		mes "Then take care.";
 		next;
 		mes "[Karian]";
@@ -902,7 +940,7 @@ yuno,143,170,6	script	Mr. Click#job_min	748,{
 		donpcevent "Karian#cmd2::OnEnable";
 		next;
 		mes "[Karian]";
-		mes "Then I'll pass by Einbroch and go to Lighthalzen. Why don't you go to the place that Teddy Bears are?";
+		mes "Then I'll pass by Einbroch and go to Lighthalzen. Why don't you go to the place where Teddy Bears are?";
 		next;
 		mes "["+strcharinfo(0)+"]";
 		mes "Then let's meet at Lighthalzen's hotel.";
@@ -910,41 +948,16 @@ yuno,143,170,6	script	Mr. Click#job_min	748,{
 		donpcevent "Karian#cmd2::OnDisable";
 		close;
 	}
-	mes "[Mr. Click]";
 	mes "Hi~ welcome~";
 	mes "I can take a picture for you.";
 	mes "Do you want to take a pic?";
 	close;
 }
 
-yuno,146,168,0	script	Karian#cmd2	486,{
-	end;
-
-OnInit:
-	disablenpc strnpcinfo(0);
-	end;
-
-OnEnable:
-	enablenpc strnpcinfo(0);
-	initnpctimer;
-	end;
-
-OnDisable:
-	disablenpc strnpcinfo(0);
-	stopnpctimer;
-	end;
-
-OnTimer100000:
-	donpcevent strnpcinfo(0)+"::OnDisable";
-	stopnpctimer;
-	end;
-}
-
-lighthalzen,162,126,3	script	Little Girl#job_min	62,3,3,{
-
+lighthalzen,155,119,3	script	Little girl#job_min	891,3,3,{
 OnTouch:
-	if (checkquest(11145,2) == 2){
-		if (job_min == 12){
+	if (checkquest(11145,HUNTING) == 2) {
+		if (job_min == 12) {
 			mes "[Little Girl]";
 			mes "Ah!!!!";
 			mes "Teddy bear!!!";
@@ -970,13 +983,13 @@ OnTouch:
 			mes "Hooray!!!";
 			next;
 			mes "[Rion]";
-			mes "A man who I saw before didn't give me teddybears even though he had lots of them!";
+			mes "A man who I saw before didn't give me teddy bears even though he had lots of them!";
 			next;
 			mes "["+strcharinfo(0)+"]";
 			mes "Is he the guy in this pic?";
 			next;
 			mes "[Rion]";
-			mes "I can't rememebr well.";
+			mes "I can't remember well.";
 			mes "But I think he is.";
 			next;
 			mes "[Rion]";
@@ -1050,19 +1063,20 @@ OnTouch:
 			changequest 11145,11146;
 			donpcevent "Karian#cmd3::OnDisable";
 			close;
-		}else if (job_min == 13){
+		} else if (job_min == 13) {
 			mes "[Rion]";
 			mes "I heard that 'Maestro Song' when I went to the Ice Cave.";
 			mes "Thank you for the Teddy Bears!";
 			close;
-		}else if (job_min > 13){
+		} else if (job_min > 13) {
 			mes "[Rion]";
 			mes "I'm having a lot of fun playing with the Teddy Bears!";
 			close;
+		} else {
+			mes "[Little Girl]";
+			mes "I'm having a lot of fun playing with the Teddy Bears!";
+			close;
 		}
-		mes "[Little Girl]";
-		mes "I'm having a lot of fun playing with the Teddy Bears!";
-		close;
 	}
 	mes "[Little Girl]";
 	mes "Do you like teddy bears?";
@@ -1070,12 +1084,9 @@ OnTouch:
 	close;
 }
 
-lighthalzen,160,124,6	duplicate(Karian#cmd2)	Karian#cmd3	486
-
-ice_dun01,157,15,0	script	Ice Cave Minstrel1	139,2,2,{
-
+ice_dun01,157,15,0	script	#Minsicecave1	139,2,2,{
 OnTouch:
-	if (job_min == 13){
+	if (job_min == 13) {
 		mes "-A long time ago-";
 		close2;
 		warp "ice_dun01",157,23;
@@ -1084,11 +1095,10 @@ OnTouch:
 	end;
 }
 
-ice_dun01,157,23,0	script	Ice Cave Minstrel2	139,2,2,{
-
+ice_dun01,157,23,0	script	#Minsicecave2	139,2,2,{
 OnTouch:
-	if (job_min == 13){
-		mes "-THe giant born to ice-";
+	if (job_min == 13) {
+		mes "-The giant born to ice-";
 		close2;
 		warp "ice_dun01",141,41;
 		end;
@@ -1096,10 +1106,9 @@ OnTouch:
 	end;
 }
 
-ice_dun01,141,41,0	script	Ice Cave Minstrel3	139,2,2,{
-
+ice_dun01,141,41,0	script	#Minsicecave3	139,2,2,{
 OnTouch:
-	if (job_min == 13){
+	if (job_min == 13) {
 		mes "-died-";
 		close2;
 		warp "ice_dun01",120,35;
@@ -1108,10 +1117,9 @@ OnTouch:
 	end;
 }
 
-ice_dun01,120,35,0	script	Ice Cave Minstrel4	139,2,2,{
-
+ice_dun01,120,35,0	script	#Minsicecave4	139,2,2,{
 OnTouch:
-	if (job_min == 13){
+	if (job_min == 13) {
 		mes "-His body became the ground-";
 		close2;
 		warp "ice_dun01",104,30;
@@ -1120,10 +1128,9 @@ OnTouch:
 	end;
 }
 
-ice_dun01,104,30,0	script	Ice Cave Minstrel5	139,2,2,{
-
+ice_dun01,104,30,0	script	#Minsicecave5	139,2,2,{
 OnTouch:
-	if (job_min == 13){
+	if (job_min == 13) {
 		mes "-His bones became a mountain-";
 		close2;
 		warp "ice_dun01",86,23;
@@ -1132,11 +1139,10 @@ OnTouch:
 	end;
 }
 
-ice_dun01,86,23,0	script	Ice Cave Minstrel6	139,2,2,{
-
+ice_dun01,86,23,0	script	#Minsicecave6	139,2,2,{
 OnTouch:
-	if (job_min == 13){
-		mes "-his skin became soil-";
+	if (job_min == 13) {
+		mes "-His skin became soil-";
 		close2;
 		warp "ice_dun01",75,19;
 		end;
@@ -1144,10 +1150,9 @@ OnTouch:
 	end;
 }
 
-ice_dun01,75,19,0	script	Ice Cave Minstrel7	139,2,2,{
-
+ice_dun01,75,19,0	script	#Minsicecave7	139,2,2,{
 OnTouch:
-	if (job_min == 13){
+	if (job_min == 13) {
 		mes "-His blood became a river-";
 		close2;
 		warp "ice_dun01",56,12;
@@ -1156,11 +1161,10 @@ OnTouch:
 	end;
 }
 
-ice_dun01,56,12,0	script	Ice Cave Minstrel8	139,2,2,{
-
+ice_dun01,56,12,0	script	#Minsicecave8	139,2,2,{
 OnTouch:
-	if (job_min == 13){
-		mes "-his hair became a plant-";
+	if (job_min == 13) {
+		mes "-His hair became a plant-";
 		close2;
 		warp "ice_dun01",29,26;
 		end;
@@ -1168,10 +1172,9 @@ OnTouch:
 	end;
 }
 
-ice_dun01,29,26,0	script	Ice Cave Minstrel9	139,2,2,{
-
+ice_dun01,29,26,0	script	#Minsicecave9	139,2,2,{
 OnTouch:
-	if (job_min == 13){
+	if (job_min == 13) {
 		mes "-His head became the sky-";
 		close2;
 		warp "ice_dun01",25,46;
@@ -1180,10 +1183,9 @@ OnTouch:
 	end;
 }
 
-ice_dun01,25,46,0	script	Ice Cave Minstrel10	139,2,2,{
-
+ice_dun01,25,46,0	script	#Minsicecave10	139,2,2,{
 OnTouch:
-	if (job_min == 13){
+	if (job_min == 13) {
 		mes "-His tears from his-";
 		close2;
 		warp "ice_dun01",20,66;
@@ -1192,10 +1194,9 @@ OnTouch:
 	end;
 }
 
-ice_dun01,20,66,0	script	Ice Cave Minstrel11	139,2,2,{
-
+ice_dun01,20,66,0	script	#Minsicecave11	139,2,2,{
 OnTouch:
-	if (job_min == 13){
+	if (job_min == 13) {
 		mes "-eyes became dew-";
 		close2;
 		warp "ice_dun01",22,85;
@@ -1204,10 +1205,9 @@ OnTouch:
 	end;
 }
 
-ice_dun01,22,85,0	script	Ice Cave Minstrel12	139,2,2,{
-
+ice_dun01,22,85,0	script	#Minsicecave12	139,2,2,{
 OnTouch:
-	if (job_min == 13){
+	if (job_min == 13) {
 		mes "-on the leaves-";
 		percentheal -90,0;
 		set job_min,14;
@@ -1219,10 +1219,9 @@ OnTouch:
 	end;
 }
 
-ra_in01,361,129,0	script	jmRachelHotel	139,2,2,{
-
+ra_in01,361,129,0	script	#jmRachelHotel	139,2,2,{
 OnTouch:
-	if (job_min == 14){
+	if (job_min == 14) {
 		mes "[Old Woman]";
 		mes "Huu!!";
 		mes "Wake up!";
@@ -1236,9 +1235,8 @@ OnTouch:
 }
 
 ra_in01,358,130,4	script	Old Woman#job_min	979,{
-
-	if (job_min == 14){
-		mes "[Old Woman]";
+	mes "[Old Woman]";
+	if (job_min == 14) {
 		mes "Huu!!";
 		mes "Wake up!";
 		next;
@@ -1246,10 +1244,9 @@ ra_in01,358,130,4	script	Old Woman#job_min	979,{
 		mes "Where am I...?";
 		set job_min,15;
 		close;
-	}else if (job_min == 15){
-		mes "[Old Woman]";
+	} else if (job_min == 15) {
 		mes "You're in Rachel.";
-		mes "You arere strange. You have to wear warmer clothes if you want to go into the Ice Cave.";
+		mes "You are strange. You have to wear warmer clothes if you want to go into the Ice Cave.";
 		next;
 		mes "[Old Woman]";
 		mes "You're lucky that my husband found you when he did.";
@@ -1316,8 +1313,7 @@ ra_in01,358,130,4	script	Old Woman#job_min	979,{
 		set job_min,16;
 		changequest 11147,11148;
 		close;
-	}else if (job_min == 16){
-		mes "[Old Woman]";
+	} else if (job_min == 16) {
 		mes "Ah! It's Comodo over southern Veins.";
 		next;
 		mes "[Old Woman]";
@@ -1325,7 +1321,6 @@ ra_in01,358,130,4	script	Old Woman#job_min	979,{
 		mes "In southern of Veins, there is a port. If you are lucky you can take it...";
 		close;
 	}
-	mes "[Old Woman]";
 	mes "I heard that Comodo is a very fun place, I want to go there before I die.";
 	next;
 	mes "[Old Woman]";
@@ -1336,11 +1331,9 @@ ra_in01,358,130,4	script	Old Woman#job_min	979,{
 	close;
 }
 
-ra_in01,357,128,0	duplicate(Karian#cmd2)	Karian#cmd4	486
-
 ve_fild07,131,132,5	script	=Notice=#job_min	837,{
 function Choice;
-	if (job_min == 16){
+	if (job_min == 16) {
 		mes "===Notice===";
 		mes "Maestro Song, Go to Comodo by boat!";
 		mes "Be ambitious!";
@@ -1354,148 +1347,132 @@ function Choice;
 		next;
 		mes "-It's not easy to trust her-";
 		next;
-		switch(select("I don't like this.:Take the kayak.")){
-		case 1:
+		if(select("I don't like this.:Take the kayak.") == 1) {
 			mes "[Karian]";
 			mes "I never ride airships ever...";
 			donpcevent "Karian#cmd5::OnDisable";
 			close;
-		case 2:
-			mes "[Karian]";
-			mes "Ok Then let's go!!!!!";
-			next;
-			mes "-If you take a small boat,-";
-			mes "-and go ahead-";
-			mes "-to Comodo,-";
-			mes "-You should see-";
-			mes "-other small boats.-";
-			next;
-			mes "["+strcharinfo(0)+"]";
-			mes "Hmm...";
-			mes "I didn't think that there was anyone who would cross over this sea with a boat.";
-			mes "You sure I'll see other boats?";
-			next;
-			mes "[Karian]";
-			mes "They will be headed the other direction.";
-			donpcevent "Karian#cmd5::OnDisable";
-			next;
-			mes "["+strcharinfo(0)+"]";
-			mes "Where are you going?";
-			next;
-			mes "[Karian]";
-			mes "Well? I haven't heard of the place's name before.";
-			mes "It's just called 'island' from what I heard.";
-			next;
-			mes "-For a whlie the silence-";
-			mes "-continues. Karian starts-";
-			mes "-to hum as she rows.-";
-			next;
-			mes "-Listening to Karian hum-";
-			mes "-You suddenly feel like-";
-			mes "-you're sitting in water.-";
-			next;
-			mes "["+strcharinfo(0)+"]";
-			mes "Hey! There's a water leak!!";
-			next;
-			mes "[Karian]";
-			mes "Ahhhh!!!!!!!!!!!!!!";
-			next;
-			set .@rand,rand(3);
-			if (.@rand == 1) Choice("Throw the water out.","Row.","Dance.");
-			else if (.@rand == 2) Choice("Row.","Throw the water out.","Dance.");
-			Choice("Dance.","Row.","Throw the water out.");
-			set .@rand,rand(3);
-			if (.@rand == 1) Choice("Throw the water out.","Row.","Dance.");
-			else if (.@rand == 2) Choice("Row.","Throw the water out.","Sleep.");
-			Choice("Sleep.","Row.","Throw the water out.");
-			set .@rand,rand(3);
-			if (.@rand == 1) Choice("Throw the water out.","Row.","Sleep.");
-			else if (.@rand == 2) Choice("Row.","Throw the water out.","Sing.");
-			Choice("Sing.","Row.","Throw the water out.");
-			set .@rand,rand(3);
-			if (.@rand == 1) Choice("Throw the water out.","Row.","Have some water.");
-			else if (.@rand == 2) Choice("Row.","Throw the water out.","Have some water.");
-			Choice("Have some water.","Row.","Throw the water out.");
-			set .@rand,rand(3);
-			if (.@rand == 1) Choice("Throw the water out.","Row.","Shout 'Viva'.");
-			else if (.@rand == 2) Choice("Row.","Throw the water out.","Shout 'Viva'.");
-			Choice("Shout 'Viva'.","Row.","Throw the water out.");
-			set .@rand,rand(3);
-			if (.@rand == 1) Choice("Throw the water out.","Row.","Go fishing.");
-			else if (.@rand == 2) Choice("Row.","Throw the water out.","Go fishing.");
-			Choice("Go fishing.","Row.","Throw the water out.");
-			set .@rand,rand(3);
-			if (.@rand == 1) Choice("Throw the water out.","Row.","Listen to my song.");
-			else if (.@rand == 2) Choice("Row.","Throw the water out.","Listen to my song.");
-			Choice("Listen to my song.","Row.","Throw the water out.");
-			set .@rand,rand(3);
-			if (.@rand == 1) Choice("Throw the water out.","Row.","Pray.");
-			else if (.@rand == 2) Choice("Row.","Throw the water out.","Pray.");
-			Choice("Pray.","Row.","Throw the water out.");
-			set .@rand,rand(3);
-			if (.@rand == 1) Choice("Throw the water out.","Row.","Eat some food.");
-			else if (.@rand == 2) Choice("Row.","Throw the water out.","Eat some food.");
-			Choice("Eat some food.","Row.","Throw the water out.");
-			set .@rand,rand(3);
-			if (.@rand == 1) Choice("Throw the water out.","Row.","Give up.");
-			else if (.@rand == 2) Choice("Row.","Throw the water out.","Give up.");
-			Choice("Give up.","Row.","Throw the water out.");
-			mes "-I've escaped from the-";
-			mes "-throes of death a-";
-			mes "-countless amount of times.-";
-			set job_min,17;
-			changequest 11148,11149;
-			close2;
-			warp "comodo",184,108;
-			end;
 		}
+		mes "[Karian]";
+		mes "Ok then let's go!!!!!";
+		next;
+		mes "-If you take a small boat,-";
+		mes "-and go ahead-";
+		mes "-to Comodo,-";
+		mes "-You should see-";
+		mes "-other small boats.-";
+		next;
+		mes "["+strcharinfo(0)+"]";
+		mes "Hmm...";
+		mes "I didn't think that there was anyone who would cross over this sea with a boat.";
+		mes "You sure I'll see other boats?";
+		next;
+		mes "[Karian]";
+		mes "They will be headed the other direction.";
+		donpcevent "Karian#cmd5::OnDisable";
+		next;
+		mes "["+strcharinfo(0)+"]";
+		mes "Where are you going?";
+		next;
+		mes "[Karian]";
+		mes "Well? I haven't heard of the place's name before.";
+		mes "It's just called 'island' from what I heard.";
+		next;
+		mes "-For a while the silence-";
+		mes "-continues. Karian starts-";
+		mes "-to hum as she rows.-";
+		next;
+		mes "-Listening to Karian hum-";
+		mes "-You suddenly feel like-";
+		mes "-you're sitting in water.-";
+		next;
+		mes "["+strcharinfo(0)+"]";
+		mes "Hey! There's a water leak!!";
+		next;
+		mes "[Karian]";
+		mes "Ahhhh!!!!!!!!!!!!!!";
+		next;
+		switch(rand(3)) {
+			case 0: Choice("Dance.","Row.","Throw the water out."); break;
+			case 1: Choice("Throw the water out.","Row.","Dance."); break;
+			case 2: Choice("Row.","Throw the water out.","Dance."); break;
+		}
+		switch(rand(3)) {
+			case 0: Choice("Sleep.","Row.","Throw the water out."); break;
+			case 1: Choice("Throw the water out.","Row.","Dance."); break;
+			case 2: Choice("Row.","Throw the water out.","Sleep."); break;
+		}
+		switch(rand(3)) {
+			case 0: Choice("Sing.","Row.","Throw the water out."); break;
+			case 1: Choice("Throw the water out.","Row.","Sleep."); break;
+			case 2: Choice("Row.","Throw the water out.","Sing."); break;
+		}
+		switch(rand(3)) {
+			case 0: Choice("Have some water.","Row.","Throw the water out."); break;
+			case 1: Choice("Throw the water out.","Row.","Have some water."); break;
+			case 2: Choice("Row.","Throw the water out.","Have some water."); break;
+		}
+		switch(rand(3)) {
+			case 0: Choice("Shout 'Viva'.","Row.","Throw the water out."); break;
+			case 1: Choice("Throw the water out.","Row.","Shout 'Viva'."); break;
+			case 2: Choice("Row.","Throw the water out.","Shout 'Viva'."); break;
+		}
+		switch(rand(3)) {
+			case 0: Choice("Go fishing.","Row.","Throw the water out."); break;
+			case 1: Choice("Throw the water out.","Row.","Go fishing."); break;
+			case 2: Choice("Row.","Throw the water out.","Go fishing."); break;
+		}
+		switch(rand(3)) {
+			case 0: Choice("Listen to my song.","Row.","Throw the water out."); break;
+			case 1: Choice("Throw the water out.","Row.","Listen to my song."); break;
+			case 2: Choice("Row.","Throw the water out.","Listen to my song."); break;
+		}
+		switch(rand(3)) {
+			case 0: Choice("Pray.","Row.","Throw the water out."); break;
+			case 1: Choice("Throw the water out.","Row.","Pray."); break;
+			case 2: Choice("Row.","Throw the water out.","Pray."); break;
+		}
+		switch(rand(3)) {
+			case 0: Choice("Eat some food.","Row.","Throw the water out."); break;
+			case 1: Choice("Throw the water out.","Row.","Eat some food."); break;
+			case 2: Choice("Row.","Throw the water out.","Eat some food."); break;
+		}
+		switch(rand(3)) {
+			case 0: Choice("Give up.","Row.","Throw the water out."); break;
+			case 1: Choice("Throw the water out.","Row.","Give up."); break;
+			case 2: Choice("Row.","Throw the water out.","Give up."); break;
+		}
+		mes "-I've escaped from the-";
+		mes "-throes of death a-";
+		mes "-countless amount of times.-";
+		set job_min,17;
+		changequest 11148,11149;
+		close2;
+		warp "comodo",184,108;
+		end;
 	}
 	mes "===Notice===";
 	mes "Maestro Song, Go to Comodo by boat!";
 	mes "Be ambitious!";
 	close;
-	
-function Choice {
-	set .@i$, getarg(select(getarg(0),getarg(1),getarg(2))-1);
-	mes "[Karian]";
-	if (.@i$ == "Throw the water out.") {
-		mes "I'll row and you just throw the water out!!";
-		next;
-		return;
-	}
-	if (.@i$ == "Row.") mes "The boat is sinking!!!";
-	else mes "What the hell do you think you're doing?";
-	close;
-}
-}
 
-ve_fild07,129,132,5	script	Karian#cmd5	486,{
-	end;
-
-OnInit:
-	disablenpc "Karian#cmd5";
-	end;
-
-OnEnable:
-	enablenpc "Karian#cmd5";
-	initnpctimer;
-	end;
-
-OnDisable:
-	disablenpc "Karian#cmd5";
-	stopnpctimer;
-	end;
-
-OnTimer30000:
-	donpcevent "Karian#cmd5::OnDisable";
-	stopnpctimer;
-	end;
+	function Choice {
+		set .@i$, getarg(select(getarg(0),getarg(1),getarg(2))-1);
+		mes "[Karian]";
+		if (.@i$ == "Throw the water out.") {
+			mes "I'll row and you just throw the water out!!";
+			next;
+			return;
+		}
+		if (.@i$ == "Row.") mes "The boat is sinking!!!";
+		else mes "What the hell do you think you're doing?";
+		close;
+	}
 }
 
-comodo,184,108,0	script	jmComodo Almost Dead	139,2,2,{
-
+comodo,184,108,0	script	#jmComodo Almost Dead	139,2,2,{
 OnTouch:
-	if (job_min == 17){
+	if (job_min == 17) {
 		mes "["+strcharinfo(0)+"]";
 		mes "I'm... I'm alive~";
 		next;
@@ -1533,12 +1510,9 @@ OnTouch:
 	end;
 }
 
-comodo,184,109,0	duplicate(Karian#cmd2)	Karian#cmd6	486
-
 comodo,192,119,0	script	Kayak Master#job_min	98,{
-
-	if (job_min == 18){
-		mes "[Kayak Master]";
+	mes "[Kayak Master]";
+	if (job_min == 18) {
 		mes "What?";
 		mes "Maestro Song?";
 		mes "I don't know~";
@@ -1554,7 +1528,6 @@ comodo,192,119,0	script	Kayak Master#job_min	98,{
 		changequest 11150,11151;
 		close;
 	}
-	mes "[Kayak Master]";
 	mes "The sea is man's dream.";
 	next;
 	mes "[Kayak Master]";
@@ -1563,9 +1536,8 @@ comodo,192,119,0	script	Kayak Master#job_min	98,{
 }
 
 comodo,159,316,4	script	Woman Roasting Meat	701,{
-
-	if (job_min == 19){
-		mes "[Woman Roasting Meat]";
+	mes "[Woman Roasting Meat]";
+	if (job_min == 19) {
 		mes "Maestro Song?";
 		mes "Yes, I remember that face because he visited a few years ago.";
 		next;
@@ -1578,7 +1550,7 @@ comodo,159,316,4	script	Woman Roasting Meat	701,{
 		mes "It was so crowded because of him.";
 		next;
 		mes "[Woman Roasting Meat]";
-		mes "Finally, he became exhaused and he wanted to go somewhere quiet.";
+		mes "Finally, he became exhausted and he wanted to go somewhere quiet.";
 		next;
 		mes "[Woman Roasting Meat]";
 		mes "I told him that there was a quiet place near Morroc, and he left.";
@@ -1591,8 +1563,7 @@ comodo,159,316,4	script	Woman Roasting Meat	701,{
 		set job_min,20;
 		changequest 11151,11152;
 		close;
-	}else if (job_min == 20){
-		mes "[Woman Roasting Meat]";
+	} else if (job_min == 20) {
 		mes "Where is the quiet place?";
 		mes "Well I'm not sure but there is a mysterious building in south-eastern part of Morroc.";
 		next;
@@ -1601,7 +1572,6 @@ comodo,159,316,4	script	Woman Roasting Meat	701,{
 		mes "I think they're part of some secret guild called ash... or assa... Oh I forget...";
 		close;
 	}
-	mes "[Woman Roasting Meat]";
 	mes "He ate a whole plate of baby back ribs by himself.";
 	next;
 	mes "[Woman Roasting Meat]";
@@ -1609,10 +1579,9 @@ comodo,159,316,4	script	Woman Roasting Meat	701,{
 	close;
 }
 
-moc_fild16,206,232,0	script	jmTransfer news	139,3,3,{
-
+moc_fild16,206,232,0	script	#jmTransfer news	139,3,3,{
 OnTouch:
-	if (job_min == 20){
+	if (job_min == 20) {
 		mes "["+strcharinfo(0)+"]";
 		mes "Um? What is this?";
 		mes "Something covered by sand?";
@@ -1626,7 +1595,7 @@ OnTouch:
 		donpcevent "Karian#cmd7::OnEnable";
 		next;
 		mes "["+strcharinfo(0)+"]";
-		mes "The lyrics from the man I met in hugel on the receipt...";
+		mes "The lyrics from the man I met in Hugel on the receipt...";
 		next;
 		mes "["+strcharinfo(0)+"]";
 		mes "and this poem written on this paper.";
@@ -1657,7 +1626,7 @@ OnTouch:
 		mes "[Karian]";
 		mes "Will you join me?";
 		next;
-		switch(select("Refuse.:Accept.")){
+		switch(select("Refuse.:Accept.")) {
 		case 1:
 			mes "[Karian]";
 			mes "Come on~Come on~";
@@ -1665,7 +1634,7 @@ OnTouch:
 			mes "Come on~~~~~~~~~";
 			next;
 			mes "[Karian]";
-			mes "We don't have anymore clues.";
+			mes "We don't have any more clues.";
 			next;
 			mes "[Karian]";
 			break;
@@ -1686,12 +1655,9 @@ OnTouch:
 	end;
 }
 
-moc_fild16,204,231,0	duplicate(Karian#cmd2)	Karian#cmd7	486
-
-aldebaran,140,130,0	script	jmAldebaran Clock Tower	139,3,3,{
-
+aldebaran,140,130,0	script	#jmAldebaran Clock Tower	139,3,3,{
 OnTouch:
-	if (job_min == 21){
+	if (job_min == 21) {
 		mes "["+strcharinfo(0)+"]";
 		mes "Anyway why do you want to visit this place?";
 		next;
@@ -1743,23 +1709,20 @@ OnTouch:
 		changequest 11153,11154;
 		donpcevent "Karian#cmd8::OnDisable";
 		close;
-	}else if (job_min == 22){
+	} else if (job_min == 22) {
 		mes "[Karian]";
 		mes "Let's go back to Prontera?";
 		next;
 		mes "[Karian]";
-		mes "I can't get rid of the the memories that I was impressed with when I entered Prontera's gates.";
+		mes "I can't get rid of the memories that I was impressed with when I entered Prontera's gates.";
 		close;
 	}
 	end;
 }
 
-aldebaran,142,128,2	duplicate(Karian#cmd2)	Karian#cmd8	486
-
-prontera,155,40,0	script	jmprt1	139,2,2,{
-
+prontera,155,40,0	script	#jmprt1	139,2,2,{
 OnTouch:
-	if (job_min == 22){
+	if (job_min == 22) {
 		mes "[Karian]";
 		mes "I've finally come back.";
 		mes "Back to Prontera...";
@@ -1775,33 +1738,9 @@ OnTouch:
 	end;
 }
 
-prontera,155,49,4	script	Karian#cmd9	486,{
-	end;
-
-OnInit:
-	disablenpc "Karian#cmd9";
-	end;
-
-OnEnable:
-	enablenpc "Karian#cmd9";
-	initnpctimer;
-	end;
-
-OnDisable:
-	disablenpc "Karian#cmd9";
-	stopnpctimer;
-	end;
-
-OnTimer300000:
-	donpcevent "Karian#cmd9::OnDisable";
-	stopnpctimer;
-	end;
-}
-
-prontera,155,42,0	script	prtjm1	139,1,1,{
-
+prontera,155,42,0	script	#prtjm1	139,1,1,{
 OnTouch:
-	if (job_min == 23){
+	if (job_min == 23) {
 		mes "-Let me go back to my hometown.-";
 		set job_min,24;
 		close2;
@@ -1811,10 +1750,9 @@ OnTouch:
 	end;
 }
 
-prontera,155,44,0	script	prtjm2	139,1,1,{
-
+prontera,155,44,0	script	#prtjm2	139,1,1,{
 OnTouch:
-	if (job_min == 24){
+	if (job_min == 24) {
 		mes "-There are many beautiful flowers.-";
 		set job_min,25;
 		close2;
@@ -1824,10 +1762,9 @@ OnTouch:
 	end;
 }
 
-prontera,155,46,0	script	prtjm3	139,1,1,{
-
+prontera,155,46,0	script	#prtjm3	139,1,1,{
 OnTouch:
-	if (job_min == 25){
+	if (job_min == 25) {
 		mes "-The birds sing for me.-";
 		set job_min,26;
 		close2;
@@ -1837,114 +1774,81 @@ OnTouch:
 	end;
 }
 
-prontera,155,48,0	script	prtjm4	139,1,1,{
-
+prontera,155,48,0	script	#prtjm4	139,1,1,{
 OnTouch:
-	if (job_min == 26 || job_min == 27){
+	if (job_min == 26 || job_min == 27) {
 		mes "-It's this old town.-";
 		next;
-		if(SkillPoint != 0){
+		if (SkillPoint != 0) {
 			mes "[Karian]";
 			mes "Hey... Don't you know how to use your skill points?";
 			mes "You should use them.";
 			close;
 		}
-		if(checkweight(1201,1) == 0){
+		if (checkweight(1201,1) == 0 || MaxWeight - Weight < 3500) {
 			mes "^3355FFWait a minute! You're";
 			mes "carrying too many items";
-			mes "right now: store some of";
+			mes "right now, store some of";
 			mes "your extra things in Kafra";
 			mes "Storage, and then come back.^000000";
 			close;
 		}
-		if (JobLevel < 50 || BaseLevel < 99){
+		if (BaseLevel < 99 || JobLevel < 50) {
 			mes "[Karian]";
 			mes "Hey... why are you so low?";
 			mes "How did you lose levels?";
 			close;
 		}
-		if (Class == Job_Bard || Class == Job_Clown || Class == Job_Baby_Bard){
-			mes "["+strcharinfo(0)+"]";
-			mes "-It's a poem that you picked up in the desert.-";
-			next;
-			mes "["+strcharinfo(0)+"]";
-			mes "-How does Karian know-";
-			mes "-that song's not a poem?-";
-			next;
+		if (BaseJob != Job_Bard) {
 			mes "[Karian]";
-			mes "Why are you looking at me?";
-			mes "How was it? Have fun??";
-			set job_min,27;
-			donpcevent "Karian#cmd9::OnDisable";
-			close2;
-			warp "prt_in",101,174;
-			end;
+			mes "Hey... you changed your outfit?";
+			mes "How'd you do that?";
+			close;
 		}
+		mes "["+strcharinfo(0)+"]";
+		mes "-It's a poem that you picked up in the desert.-";
+		next;
+		mes "["+strcharinfo(0)+"]";
+		mes "-How does Karian know-";
+		mes "-that song's not a poem?-";
+		next;
 		mes "[Karian]";
-		mes "Hey... you changed your outfit?";
-		mes "How'd you do that?";
-		close;
+		mes "Why are you looking at me?";
+		mes "How was it? Have fun??";
+		set job_min,27;
+		donpcevent "Karian#cmd9::OnDisable";
+		close2;
+		warp "prt_in",101,174;
+		end;
 	}
 	end;
 }
 
 prt_in,94,172,4	script	Karian#job_min3	480,{
-
-if(job_min >= 27) {
-	if (job_min > 99){
-		switch(select("Talk.:Leave.")){
-		case 1:
-			mes "[Maestro Song]";
-			mes "The name 'Karian'?";
-			mes "He gave it to me.";
-			next;
-			mes "[Maestro Song]";
-			mes "He said that when he hears my song, he feels warmhearted.";
-			mes "'Kallianga' means hot air.";
-			next;
-			mes "[Maestro Song]";
-			mes "He likes to sing..";
-			next;
-			mes "[Maestro Song]";
-			mes "And he's good at singing for sure?";
-			next;
-			mes "[Maestro Song]";
-			mes "Ah! If it's okay with you, I want to take a pic with you in Juno?";
-			next;
-			mes "[Maestro Song]";
-			mes "I want to have something to remember you by.";
+	if (job_min == 27) {
+		if (checkweight(1201,1) == 0 || MaxWeight - Weight < 3500) {
+			mes "While you are on a trip, you gain lots of stuff. Make yourself lighter.";
 			close;
-		case 2:
-			mes "[Maestro Song]";
-			mes "See you.";
-			mes "It was really fun.";
-			close2;
-			warp "prontera",156,99;
-			end;
 		}
-	}
-	if(checkweight(1201,1) == 0){
-		mes "^3355FFWait a minute! You're";
-		mes "carrying too many items";
-		mes "right now: store some of";
-		mes "your extra things in Kafra";
-		mes "Storage, and then come back.^000000";
-		close;
-	}
-	if (JobLevel < 50 || BaseLevel < 99){
-		mes "[Karian]";
-		mes "Hey... why are you so low?";
-		mes "How did you lose levels?";
-		close;
-	}
-	if (SkillPoint != 0){
-		mes "[Karian]";
-		mes "Hey... Don't you know how to use your skill points?";
-		mes "You should use them.";
-		close;
-	}
-	if (Class == Job_Bard || Class == Job_Clown || Class == Job_Baby_Bard){
 		mes "[Karian]";
+		if (SkillPoint != 0) {
+			mes "Ah~! Did you know that you still have skill points?";
+			mes "Handle that quickly.";
+			close;
+		}
+		if (BaseLevel < 99 || JobLevel < 50) {
+			mes "Ah~! Your level looks lower than before.";
+			mes "How did you degrade?";
+			close;
+		}
+		if (ismounting()) {
+			mes "Please unequip your riding pet and try again!";
+			close;
+		}
+		if (BaseJob != Job_Bard) {
+			mes "Huh?";
+			close;
+		}
 		mes "I'm sorry about the lie.";
 		mes "The song written on this paper...";
 		next;
@@ -1962,7 +1866,7 @@ if(job_min >= 27) {
 		next;
 		mes "[Maestro Song]";
 		mes "Yes! I'm 'Maestro Song'!";
-		mes "Are you suprised!?";
+		mes "Are you surprised!?";
 		next;
 		mes "["+strcharinfo(0)+"]";
 		mes "......";
@@ -1975,11 +1879,41 @@ if(job_min >= 27) {
 		set job_min,100;
 		jobchange roclass(eaclass()|EAJL_THIRD);
 		completequest 11154;
-		getitem 5751,1;
-		getitem 2795,1;
+		getitem 5751,1; //Minstrel_Song_Hat
+		getitem 2795,1; //Green_Apple_Ring
 		close;
+	} else if (job_min > 99) {
+		switch(select("Talk.:Leave.")) {
+		case 1:
+			mes "[Maestro Song]";
+			mes "The name 'Karian'?";
+			mes "He gave it to me.";
+			next;
+			mes "[Maestro Song]";
+			mes "He said that when he hears my song, he feels warmhearted.";
+			mes "'Kallianga' means hot air.";
+			next;
+			mes "[Maestro Song]";
+			mes "He likes to sing...";
+			next;
+			mes "[Maestro Song]";
+			mes "And he's good at singing for sure?";
+			next;
+			mes "[Maestro Song]";
+			mes "Ah! If it's okay with you, I want to take a pic with you in Juno?";
+			next;
+			mes "[Maestro Song]";
+			mes "I want to have something to remember you by.";
+			close;
+		case 2:
+			mes "[Maestro Song]";
+			mes "See you.";
+			mes "It was really fun.";
+			close2;
+			warp "prontera",156,99;
+			end;
+		}
 	}
-}
 	mes "[Karian]";
 	mes "How did you get in here?";
 	close;