* 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

16 files changed, 2196 insertions, 2098 deletions

diff --git a/conf/battle/party.conf b/conf/battle/party.conf
index 68df9088b..63fc3a94a 100644
--- a/conf/battle/party.conf
+++ b/conf/battle/party.conf
@@ -45,7 +45,7 @@ party_item_share_type: 0
 idle_no_share: no
 
 // Give additional experience bonus per party-member involved on even-share parties (excluding youself)?
-// ex. If set to 10, a even-share party of 5 people will receive +40% exp (4 members * 10% exp):
+// ex. If set to 10, an even-share party of 5 people will receive +40% exp (4 members * 10% exp):
 //     140% party experience in total, so each member receives 140%/5 = 28% exp (instead of 20%).
 party_even_share_bonus: 0
 
diff --git a/db/quest_db.txt b/db/quest_db.txt
index cd56e6746..a680628ce 100644
--- a/db/quest_db.txt
+++ b/db/quest_db.txt
@@ -670,18 +670,18 @@
 7161,0,0,0,0,0,0,0,"Mysterious Cryptogram - 2nd"
 7162,0,0,0,0,0,0,0,"Mysterious Cryptogram - 2nd"
 7163,0,0,0,0,0,0,0,"Mysterious Cryptogram - 2nd"
-7164,0,0,0,0,0,0,0,"Hunt for shadow of deception"
+7164,0,2076,1,0,0,0,0,"Hunt for shadow of deception"
 7165,0,0,0,0,0,0,0,"Key of deception"
 7166,0,0,0,0,0,0,0,"Rachel Branch of Shadow Workshop"
 7167,0,0,0,0,0,0,0,"Mysterious Cryptogram - 3rd"
 7168,0,0,0,0,0,0,0,"Mysterious Cryptogram - 3rd"
 7169,0,0,0,0,0,0,0,"Mysterious Cryptogram - 3rd"
 7170,0,0,0,0,0,0,0,"Mysterious Cryptogram - 3rd"
-7171,0,0,0,0,0,0,0,"Hunt for shadow of delusion"
+7171,0,2077,1,0,0,0,0,"Hunt for shadow of delusion"
 7172,0,0,0,0,0,0,0,"Key of delusion"
 7173,0,0,0,0,0,0,0,"Message to Halled from Paul"
 7174,0,0,0,0,0,0,0,"Mysterious Cryptogram - 4th"
-7175,0,0,0,0,0,0,0,"Hunft for shadow of gaiety"
+7175,0,2078,1,0,0,0,0,"Hunft for shadow of gaiety"
 7176,0,0,0,0,0,0,0,"Key of Gaiety"
 7177,0,0,0,0,0,0,0,"A young guy in Lighthalzen"
 7178,0,0,0,0,0,0,0,"Destination of Deception, Delusion and Gaiety"
diff --git a/npc/kafras/kafras.txt b/npc/kafras/kafras.txt
index 9dacc071f..8e6d49c8a 100644
--- a/npc/kafras/kafras.txt
+++ b/npc/kafras/kafras.txt
@@ -3,7 +3,7 @@
 //===== By: ================================================== 
 //= Joseph
 //===== Current Version: ===================================== 
-//= 1.0
+//= 1.1
 //===== Compatible With: ===================================== 
 //= rAthena SVN
 //===== Description: =========================================
@@ -19,6 +19,7 @@
 //= 0.x Previous Authors: 
 //=     - L0ne_W0lf, kobra_k88, Samuray22, Evera, Lupus
 //= 1.0 Merged and cleaned up Kafras. [Joseph]
+//= 1.1 Added Izlude RE coordinates. [Euphy]
 //============================================================ 
 
 // Aldebaran
@@ -411,7 +412,10 @@ cmd_fild07,136,134,4	script	Kafra Employee::kaf_cmd_fild07	721,{
 	mes "are always on your side.";
 	mes "How may I assist you?";
 	callfunc "F_Kafra",5,0,1,40,820;
-	savepoint "izlude",94,103;
+	if (checkre(0))
+		savepoint "izlude",129,97;
+	else
+		savepoint "izlude",94,103;
 	callfunc "F_KafEnd",0,1,"in the city of Izlude";
 }
 
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;
diff --git a/npc/re/jobs/3-2/shadow_chaser.txt b/npc/re/jobs/3-2/shadow_chaser.txt
index e04899d9c..231e52835 100644
--- a/npc/re/jobs/3-2/shadow_chaser.txt
+++ b/npc/re/jobs/3-2/shadow_chaser.txt
@@ -1,72 +1,199 @@
 //===== rAthena Script ======================================= 
 //= Shadow Chaser Job Quest
 //===== By: ================================================== 
-//= ultragunner
-//= Credits: Oshinoke
+//= Muad_Dib
 //===== Current Version: ===================================== 
-//= 1.2
+//= 1.3
 //===== Compatible With: ===================================== 
 //= rAthena SVN
 //===== Description: ========================================= 
+//= [Official Conversion]
 //= Job change Quest from Rogue / Stalker -> Shadow Chaser.
-//= Based on Official pRO server
 //===== Additional Comments: ================================= 
-//= 1.0 First Version.
+//= 1.0 First Version. [ultragunner, Oshinoke]
 //= 1.1 Standardized. [Euphy]
 //= 1.2 Updated dialogue. [Joseph]
+//= 1.3 Updated to official script. [Euphy]
 //============================================================
 
-morocc,156,70,3	script	Girl#H-1	93,{
+morocc,156,70,3	script	Girl#sc00	93,3,3,{
 	mes "[Girl]";
-	if (Class == Job_Rogue || Class == Job_Stalker || Class == Job_Baby_Rogue) {
-		if (BaseLevel == 99 && JobLevel > 49) {
-			if (job_sha == 0) {
-				mes "Hey! Stop!";
-				mes "Are you interested in hearing a funny story?";
-				next;
-				select("What story?");
-				mes "[Girl]";
-				mes "Have you been to the guild recently?";
-				mes "Some interesting things have happened lately.";
-				mes "Maybe new guests...";
-				next;
-				mes "[Girl]";
-				mes "I heard it has to do with something called a Shadow Chaser.";
-				mes "You should go and check it out.";
-				next;
-				mes "[Girl]";
-				mes "Everytime they visit us, they are on new missions.";
-				mes "What missions are they doing I wonder?";
-				set job_sha,1;
-			} else if (job_sha == 1) {
-				mes "If you have any interest... just go! Do you know where the guild is?";
-				next;
-				mes "[Girl]";
-				mes "It is in a fortress under Pharos lighthouse.";
-				mes "Sigh....";
-				mes "You must visit there!";
-			} else if (job_sha > 1 && job_sha < 28) {
-				mes "Wow, you look busy.";
-				mes "Have you heard that there are visitors?";
-				mes "They're on a treasure hunt!";
-				next;
-				mes "[Girl]";
-				mes "It must be fun.";
-				mes "I wanna try!";
+	if (BaseJob == Job_Rogue) {
+		if (job_sha == 0) {
+			if (BaseLevel < 99 || JobLevel < 50) {
+				mes "You're not ready.";
+				close;
 			}
+			mes "Hey? Stop!";
+			mes "Aren't you interested in hearing a funny story?";
+			next;
+			select("What story?");
+			mes "[Girl]";
+			mes "Have you been to the guild recently?";
+			mes "Some interesting things have happened lately.";
+			mes "Maybe new guests...";
+			next;
+			mes "[Girl]";
+			mes "I heard it has to do with something called a Shadow Chaser.";
+			mes "You should go and check it out.";
+			next;
+			mes "[Girl]";
+			mes "Every time they visit us, they are on new missions.";
+			mes "What missions are they doing I wonder?";
+			set job_sha,1;
+			close;
+		} else if (job_sha == 1) {
+			mes "If you have any interest... just go!";
+			mes "Do you know where the guild is?";
+			next;
+			mes "[Girl]";
+			mes "It is in a fortress under Pharos lighthouse.";
+			mes "Sigh....";
+			mes "You must visit there!";
 			close;
 		} else {
-			mes "You're not ready.";
+			mes "Wow, you look busy.";
+			mes "Have you heard that there are visiters?";
+			mes "They're on a treasure hunt!";
+			next;
+			mes "[Girl]";
+			mes "It must be fun.";
+			mes "I wanna try!";
 			close;
 		}
 	}
-	mes "Eh...";
+	mes "Eh?";
 	mes "I don't have anything for you...";
 	close;
+OnTouch:
+	if (BaseJob == Job_Rogue && BaseLevel > 98 && JobLevel > 49 && job_sha == 0) {
+		mes "[Girl]";
+		mes "Hey? Stop!";
+		mes "Aren't you interested in hearing a funny story?";
+		close;
+	}
+	end;
 }
 
-in_rogue,378,103,3	script	Scary Man#H-10	810,{
-	if (job_sha == 1) {
+in_rogue,376,100,5	script	Guild Member#sc01	828,{
+	if (BaseJob == Job_Rogue) {
+		if (job_sha < 2) {
+			set @job_sha,0;
+		OnDialogue:
+			mes "[Vin]";
+			mes "Ah? What's this?";
+			mes "Lotte, you know what this means?";
+			next;
+			mes "[Lotte]";
+			mes "Hmm '3847147298' this is the only thing I've used on...";
+			mes "Then, why'd they use numbers to name the villages?";
+			next;
+			mes "[Lotte]";
+			mes "Vin! This is crap!";
+			next;
+			mes "[Vin]";
+			mes "What?";
+			next;
+			if (BaseLevel == 99) {
+				mes "[Scary man]";
+				mes "Hey there?";
+				next;
+				switch(select("Me?:Sorry, I am busy...")) {
+				case 1:
+					mes "[Scary man]";
+					mes "Yes! You there!";
+					mes "Let me introduce myself to you.";
+					mes "My name is Urupa.";
+					mes "If you are interested, could you come over here?";
+					if (@job_sha == 1) {
+						set job_sha,1;
+						set @job_sha,0;
+					}
+					close;
+				case 2:
+					mes "[Scary man]";
+					mes "What? You're just going to give up like that?";
+					mes "So disappointing...";
+					close;
+				}
+			}
+			mes "[Scary man]";
+			mes "You are supposed to figure this one out!";
+			mes "But you are still so... weak.";
+			close;
+		} else {
+			mes "[Vin]";
+			mes "Yes...";
+			mes "Sooner or later I'll solve it myself if I dare to get the map...!";
+			close;
+		}
+	} else if (Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser) {
+		mes "[Vin]";
+		mes "Huh! This is a Shadow Chaser!";
+		mes "How unbelievable!";
+		mes "But it seems familiar doesn't it?";
+		next;
+		mes "[Vin]";
+		mes "Hmm......";
+		mes "..........";
+		mes "Oh my! I can't remember...!";
+		close;
+	}
+	mes "[Vin]";
+	mes "Ah? Who's there?";
+	mes "We are flooded with guests today...";
+	close;
+}
+
+in_rogue,379,99,1	script	Guild Member#sc02	747,{
+	if (BaseJob == Job_Rogue) {
+		if (job_sha < 2) {
+			set @job_sha,1;
+			doevent "Guild Member#sc01::OnDialogue";
+			end;
+		}
+		mes "[Lotte]";
+		mes "What?";
+		mes "Damn...";
+		next;
+		mes "[Lotte]";
+		mes "I just hate numbers!";
+		close;
+	} else if (Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser) {
+		mes "[Lotte]";
+		mes "Wow!";
+		mes "You are the one!";
+		mes "Just extraordinary smart and emotionally advanced...";
+		next;
+		mes "[Lotte]";
+		mes "SHADOW CHASER!";
+		mes "Wow when could I become one.";
+		close;
+	}
+	mes "[Lotte]";
+	mes "I don't need anything.";
+	close;
+}
+
+in_rogue,379,101,3	script	Scary Man#sc03	810,{
+	if (job_sha == 0) {
+		if (BaseJob == Job_Rogue && BaseLevel > 98 && JobLevel > 49) {
+			mes "[Scary man]";
+			mes "Oh you are so talented?";
+			mes "Now I have one interesting quetion! Do you want it solved?";
+			next;
+			mes "[Urupa]";
+			mes "My name is Urupa.";
+			mes "If you have anything interesting just challenge it.";
+			set job_sha,1;
+			close;
+		}
+		mes "[Scary man]";
+		mes "What's your business?";
+		mes "I don't have anything to do with you.";
+		mes "I don't care for people like you. I just deal with the extraordinary.";
+		close;
+	} else if (job_sha == 1) {
 		mes "[Urupa]";
 		mes "We give a quiz and nobody has yet to solve it.";
 		mes "You want it to be solved?";
@@ -87,84 +214,78 @@ in_rogue,378,103,3	script	Scary Man#H-10	810,{
 		mes "Now here's what needs to be to solved.";
 		mes "Decipher the code and go where it tells you...";
 		next;
-		mes "[Urupa]";
-		mes "Here we go!";
-		next;
 		callsub L_Code,2;
 		next;
-		set job_sha,2;
-		setquest 7160;
 		mes "[Urupa]";
 		mes "So write this down!";
 		mes "I expected that you would take this adventure!";
+		set job_sha,2;
+		setquest 7160;
 		close;
-	} else if (job_sha > 1 && job_sha < 3) {
+	} else if (job_sha == 2) {
 		mes "[Urupa]";
 		mes "You want one more explanation?";
 		mes "Or do you just want the code?";
 		next;
 		switch(select("More explanation.:Get the code.")) {
-			case 1:
-				callsub L_Code,1;
-				mes "[Urupa]";
-				mes "Now it's up to you!";
-				mes "So go! Go!";
-				close;
-			case 2:
-				mes "[Urupa]";
-				mes "Let me show you the code again...";
-				next;
-				mes "[Urupa]";
-				mes "Here we go!";
-				next;
-				callsub L_Code,2;
-				close;
+		case 1:
+			callsub L_Code,1;
+			mes "[Urupa]";
+			mes "Now it's up to you!";
+			mes "So go! Go!";
+			close;
+		case 2:
+			mes "[Urupa]";
+			mes "Let me show you the code again...";
+			next;
+			callsub L_Code,2;
+			close;
 		}
-	} else if (job_sha > 2 && job_sha < 28) {
+	} else if (job_sha > 2 && job_sha < 31) {
 		mes "[Urupa]";
 		mes "Ok, have you solved it yet?";
 		mes "Good luck!";
 		close;
-	} else if (Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser) {
+	} else if (job_sha == 31) {
 		mes "[Urupa]";
-		mes "Nothing special?";
-		mes "As you see... I am ok here!";
+		mes "You have just become a Shadow Chaser.";
+		mes "The quizzes are for collecting the right people...";
 		close;
 	}
-	mes "[Scary man]";
-	mes "What's your business?";
-	mes "I don't have anything to do with you.";
-	mes "I don't care for people like you.";
-	mes "I just deal with the extraordinary.";
+	mes "[Urupa]";
+	mes "Nothing special?";
+	mes "As you see... I am ok here!";
 	close;
-
 L_Code:
-	if (getarg(0)==1) {
+	if (getarg(0) == 1) {
 		mes "[Urupa]";
 		mes "3511543433";
 		mes "This means PAYON.";
 		next;
 		mes "[Urupa]";
 		mes "The numbers have to be paired.";
-		mes "3511543433";
-		mes "35 11 54 34 33 breaks down into 5 pairs!";
+		mes "3511543433!";
+		mes "35 11 54 34 33 break down into 5 pairs!";
 		next;
 		mes "[Urupa]";
-		mes "So the pairs mean:";
-		mes "35-P, 11-A,"; 
-		mes "54-Y, 34-O, 33-N.";
+		mes "So the pairs mean.";
+		mes "35 - P, 11 - A,";
+		mes "54 - Y, 34 - O, 33 - N.";
 		next;
 		mes "[Urupa]";
 		mes "Here are the numbers all in a row.";
 		mes "33, 34, 35!";
-		mes "N, O, P?";
+		mes "N , O , P ?";
 		next;
 	} else {
-		mes " ";
-		mes "^aaaaff43231114345243^000000";
-		mes "^aaaaff11441531241542^000000";
-		mes "^aaaaff2433^000000";
-		mes "^aaaaff3542343344154211^000000";
+		mes "Here we go!";
+		next;
+		mes "^4d4dff";
+		mes "43231114345243";
+		mes "11441531241542";
+		mes "2433";
+		mes "3542343344154211";
+		mes "^000000";
 		next;
 		mes "[Urupa]";
 		mes "Could you do that?";
@@ -173,123 +294,7 @@ L_Code:
 	return;
 }
 
-function	script	sc_gldmes	{
-	if (getarg(0)==1) {
-		mes "[Vin]";
-		mes "Ah? What's this?";
-		mes "Lotte, you know what this means?";
-		next;
-		mes "[Lotte]";
-		mes "Hmm '3847147298' this is the only thing I've used on...";
-		mes "Then, why'd they use numbers to name the villages?";
-		next;
-		mes "[Lotte]";
-		mes "Vin! This is crap!";
-		next;
-		mes "[Vin]";
-		mes "What?";
-		next;
-		mes "[Scary man]";
-		mes "Hey there!?";
-		next;
-		switch(select("Yes? Me?:Sorry, I am busy...")) {
-			case 1:
-				mes "[Scary man]";
-				mes "Yes! You there!";
-				mes "Let me introduce myself to you.";
-				mes "My name is Urupa.";
-				mes "If you are interested, could you come over here?";
-				close;
-			case 2:
-				mes "[Scary man]";
-				mes "What? You're just going to give up like that?";
-				mes "So disappointing...";
-				close;
-		}
-	} else {
-		mes "[Vin]";
-		mes "Ah? What's this?";
-		next;
-		mes "[Lotte]";
-		mes "Hmm '3847147298' this is the only";
-		mes "thing I've used on...";
-		mes "Then, why'd they use numbers to";
-		mes "name the villages?";
-		next;
-		mes "[Lotte]";
-		mes "Vin! This is crap!";
-		next;
-		mes "[Vin]";
-		mes "What?";
-		next;
-		mes "[Scary man]";
-		mes "You are supposed to figure this one out!";
-		mes "But you are still so... weak.";
-		close;
-	}
-}
-
-in_rogue,375,102,5	script	Guild Member#H-11	828,{
-	if (Class == Job_Rogue || Class == Job_Stalker || Class == Job_Baby_Rogue) {
-		if (job_sha == 1) callfunc "sc_gldmes",1;
-		else if (job_sha > 1) && (job_sha < 28) {
-			mes "[Vin]";
-			mes "Yes...";
-			mes "Sooner or later I'll solve it";
-			mes "myself if I dare to get the";
-			mes "map...!";
-			close;
-		}
-		else callfunc "sc_gldmes",2;
-	} else if (Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser) {
-		mes "[Vin]";
-		mes "Huh! This is a Shadow Chaser!";
-		mes "How unbelievable!";
-		mes "But it seems familiar, doesn't it?";
-		next;
-		mes "[Vin]";
-		mes "Hmm......";
-		mes "..........";
-		mes "Oh my! I can't remember...!";
-		close;
-	}
-	mes "[Vin]";
-	mes "Ah? Who's there?";
-	mes "We are flooded with guests";
-	mes "today...";
-	close;
-}
-
-in_rogue,378,100,2	script	Guild Member#H-12	747,{
-	if (Class == Job_Rogue || Class == Job_Stalker || Class == Job_Baby_Rogue) {
-		if (job_sha == 1) callfunc "sc_gldmes",1;
-		else if (job_sha > 1) && (job_sha < 28) {
-			mes "[Lotte]";
-			mes "What?";
-			mes "Damn...";
-			next;
-			mes "[Lotte]";
-			mes "I just hate numbers!";
-			close;
-		}
-		else callfunc "sc_gldmes",2;
-	} else if (Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser) {
-		mes "[Lotte]";
-		mes "Wow!";
-		mes "You are the one!";
-		mes "The extraordinarily smart and emotionally advanced...";
-		next;
-		mes "[Lotte]";
-		mes "SHADOW CHASER!";
-		mes "Wow, when could I become one?";
-		close;
-	}
-	mes "[Lotte]";
-	mes "I don't need anything.";
-	close;
-}
-
-s_atelier,65,123,4	script	Manager#H-2	903,{
+s_atelier,65,123,5	script	Manager#sc04_prt	903,{
 	if (job_sha == 2) {
 		mes "[Manager]";
 		mes "Where's Max!?";
@@ -297,18 +302,14 @@ s_atelier,65,123,4	script	Manager#H-2	903,{
 		mes "Hey...";
 		next;
 		switch(select("Show the deciphered code!:...")) {
-			case 1:
-				mes "[Manager]";
-				mes "Wow, you deciphered it?";
-				mes "So, what's the right answer?";
-				next;
-				input .@SCAtelier$;
+		case 1:
+			mes "[Manager]";
+			mes "Wow, you deciphered it?";
+			mes "So, what's the right answer?";
+			next;
+			input .@inputstr$;
+			if (.@inputstr$ == "shadows atelier in prontera" || .@inputstr$ == "SHADOWS ATELIER IN PRONTERA") {
 				mes "[Manager]";
-				if (.@SCAtelier$ != "shadows atelier in prontera") {
-					mes "Remember to put the code exactly as it should be deciphered.";
-					mes "Maybe you should try again...";
-					close;
-				}
 				mes "Good.";
 				mes "You just got it.";
 				mes "Then why have you come over here?";
@@ -316,18 +317,22 @@ s_atelier,65,123,4	script	Manager#H-2	903,{
 				select("The code says here's the one...");
 				mes "[Manager]";
 				mes "So you are the one.";
-				mes "Could you wait for a sec?";
+				mes "Could you wait for a sec'?";
 				set job_sha,3;
 				close;
-			case 2:
-				mes "[Manager]";
-				mes "Only allowed for people";
-				mes "involved....";
-				mes "Could you ask the clerk at the shop?";
-				close;
+			}
+			mes "[Manager]";
+			mes "Remember to put the code exactly as it should be deciphered.";
+			mes "Maybe you should try again...";
+			close;
+		case 2:
+			mes "[Manager]";
+			mes "Only allowed for people involved....";
+			mes "Could you ask the clerk at the shop?";
+			close;
 		}
 	} else if (job_sha == 3) {
-		mes "[Graham]";
+		mes "[Manager]";
 		mes "Now let me introduce myself to you!";
 		mes "I am Graham, the manager of this shadow gallery...";
 		next;
@@ -342,8 +347,7 @@ s_atelier,65,123,4	script	Manager#H-2	903,{
 		mes "Ok.";
 		next;
 		mes "[Graham]";
-		mes "So we've got to know things";
-		mes "like...";
+		mes "So we've got to know things like...";
 		mes "special codes and information where the treasures are.";
 		next;
 		mes "[Graham]";
@@ -365,54 +369,68 @@ s_atelier,65,123,4	script	Manager#H-2	903,{
 		mes "You seem like the right one.";
 		mes "So I will give you the code.";
 		mes "Please find the treasure!";
-		next;	
-		set job_sha,4;
+		next;
 		switch(select("No way!:I'll give it a try!")) {
-			case 1:
-				mes "[Graham]";
-				mes "What the hell?";
-				mes "If you are not going to help then I'll just find someone else.";
-				close;
-			case 2:
-				mes "[Graham]";
-				mes "You are so powerful!";
-				mes "So here...";
-				next;
-				callsub L_Code;
+		case 1:
+			mes "[Graham]";
+			mes "What the hell?";
+			mes "If you are not going to help then I'll just find someone else.";
+			set job_sha,4;
+			close;
+		case 2:
+			mes "[Graham]";
+			mes "You are so powerful!";
+			mes "So here...";
+			next;
+			callsub L_Code,0;
+			close;
 		}
 	} else if (job_sha == 4) {
 		mes "[Graham]";
 		mes "Are you interested in it now?";
 		next;
 		switch(select("Not at all.:Hmm, I'll take it.")) {
-			case 1:
-				mes "[Graham]";
-				mes "Damn it.";
-				close;
-			case 2:
-				mes "[Graham]";
-				mes "You are just so picky...";
-				mes "Here...";
-				next;
-				callsub L_Code;
+		case 1:
+			mes "[Graham]";
+			mes "Damn it.";
+			close;
+		case 2:
+			mes "[Graham]";
+			mes "You are just so picky...";
+			mes "Here...";
+			next;
+			callsub L_Code,0;
+			close;
 		}
-	} else if (job_sha > 4 && job_sha < 8) {
+	} else if (job_sha == 5) {
 		mes "[Graham]";
 		mes "Did you find something?";
 		next;
 		switch(select("I need an explanation.:What's the code again?")) {
-			case 1:
-				mes "[Graham]";
-				mes "You are so powerful!";
-				next;
-				callsub L_Code,1;
-			case 2:
-				mes "[Graham]";
-				mes "I've given you the code.";
-				mes "So crazy...";
-				mes "Don't you have a memo of it?";
-				close;
+		case 1:
+			mes "[Graham]";
+			mes "You are so powerful!";
+			next;
+			callsub L_Code,1;
+			mes "[Graham]";
+			mes "Got it?";
+			close;
+		case 2:
+			mes "[Graham]";
+			mes "I've given you the code.";
+			mes "So crazy...";
+			mes "Don't you have a memo of it?";
+			close;
 		}
+	} else if (job_sha == 6 || job_sha == 7) {
+		mes "[Graham]";
+		mes "Nothing special...?";
+		mes "You've been to places...?";
+		mes "There's definetely something.";
+		next;
+		mes "Graham seems to know something.";
+		mes "I'd better go there again.";
+		close;
 	} else if (job_sha == 8) {
 		mes "[Graham]";
 		mes "So, any improvements?";
@@ -448,14 +466,13 @@ s_atelier,65,123,4	script	Manager#H-2	903,{
 		mes "Find the gallery in Rachel...";
 		mes "Tell 'em that you just came from Graham and ask for the code.";
 		next;
-		erasequest 7165;
-		setquest 7166;
-		set job_sha,9;
 		mes "[Graham]";
 		mes "Ok?";
 		mes "Then go there!";
+		set job_sha,9;
+		changequest 7165,7166;
 		close;
-	} else if (job_sha > 8 && job_sha < 11) {
+	} else if (job_sha == 9) {
 		mes "[Graham]";
 		mes "There're four galleries...";
 		mes "Prontera, Rachel, Juno, and Lighthalzen.";
@@ -487,23 +504,23 @@ s_atelier,65,123,4	script	Manager#H-2	903,{
 		mes "But we are here for very special things.";
 		next;
 		mes "[Graham]";
-		mes "Go to ^aaaaffRachel Gallery^000000 and get the code...";
+		mes "Go to ^4d4dffRachel Gallery^000000 and get the code...";
 		mes "They will support you if you explain everything.";
 		mes "Ok?";
 		close;
-	} else if (job_sha > 10 && job_sha < 27) {
+	} else if (job_sha > 9 && job_sha < 30) {
 		mes "[Graham]";
 		mes "How about everything?";
 		mes "We are dying to know about the key.";
-		mes "So you got support from the other galleries...";
+		mes "So you got support from the other galleries.";
 		close;
-	} else if (Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser || job_sha == 27) {
+	} else if (job_sha > 29) {
 		mes "[Graham]";
 		mes "Shadow Chaser!!";
 		mes "Ah!";
 		next;
 		mes "[Graham]";
-		mes "It's not intentionally deceiving...";
+		mes "It's not intentionally decieving...";
 		mes "Hahaha!!";
 		next;
 		mes "[Graham]";
@@ -523,23 +540,22 @@ s_atelier,65,123,4	script	Manager#H-2	903,{
 	mes "Only allowed for people involved...";
 	mes "Could you ask the clerk at the shop?";
 	close;
-
 L_Code:
 	mes "-note.";
-	mes "^aaaaff13 15 18 15 3 3 18 21 9 14^000000";
-	mes "key: 0-";
+	mes "^4d4dff 13 15 18 15 3 3 18 21 9 14^000000";
+	mes "key : 0 -";
 	next;
 	select("These are just numbers...");
 	mes "[Graham]";
 	mes "The only difference from the one from the Rogue Guild is that you don't need to match them in pairs.";
 	next;
 	mes "[Graham]";
-	mes "Also here's the keyword.";
-	mes "This case is... 0.";
+	mes "Also here's the keyword...";
+	mes "This case is key 0.";
 	next;
 	mes "[Graham]";
-	mes "Let's see.";
-	mes "13 15 18 15 3 3 18 21 9 14 =";
+	mes "Let's see. For example.";
+	mes "13 15 18 15 3 3 18 21 9 14 = ";
 	mes "M O R O C C R U I N";
 	next;
 	mes "[Graham]";
@@ -549,26 +565,43 @@ L_Code:
 	mes "[Graham]";
 	mes "Do you get it?";
 	mes "But this won't be given with keyword 0. When I give you the keyword you can figure it out for yourself.";
-	if (getarg(0,0)) close;
 	next;
+	if (getarg(0)) return;
 	mes "[Graham]";
-	mes "Now let's think about the mission.";
-	mes "Here's the things we've got.";
+	mes "Now let's move on to the mission.";
+	mes "Here's the cipher...";
 	next;
-	erasequest 7160;
-	setquest 7163;
+	set .@key01, rand(3,5);
+	set .@a, 1 + .@key01;
+	set .@b, 2 + .@key01;
+	set .@d, 4 + .@key01;
+	set .@e, 5 + .@key01;
+	set .@f, 6 + .@key01;
+	set .@h, 8 + .@key01;
+	set .@i, 9 + .@key01;
+	set .@l, 12 + .@key01;
+	set .@n, 14 + .@key01;
+	set .@o, 15 + .@key01;
+	set .@r, 18 + .@key01;
+	set .@s, 19 + .@key01;
+	set .@t, 20 + .@key01;
+	set .@u, 21 + .@key01;
+	mes "^4d4dff" + .@b + " " + .@l + " " + .@u + " " + .@e + " ";
+	mes "" + .@f + " " + .@i + " " + .@r + " " + .@e + " ";
+	mes "" + .@i + " " + .@n + " ";
+	mes "" + .@t + " " + .@u + " " + .@r + " " + .@t + " " + .@l + " " + .@e + " ";
+	mes "" + .@i + " " + .@s + " " + .@l + " " + .@a + " " + .@n + " " + .@d + " ";
+	mes "" + .@t + " " + .@h + " " + .@i + " " + .@r + " " + .@d + " ";
+	mes "" + .@f + " " + .@l + " " + .@o + " " + .@o + " " + .@r + " ";
+	mes "key : " + .@key01 + ".";
 	set job_sha,5;
-	mes "^aaaaff5 15 24 8^000000";
-	mes "^aaaaff9 12 21 8^000000";
-	mes "^aaaaff12 17^000000";
-	mes "^aaaaff23 24 21 23 15 8^000000";
-	mes "^aaaaff12 22 15 4 17 7^000000";
-	mes "^aaaaff23 11 12 21 7^000000";
-	mes "^aaaaff9 15 18 18 21^000000";
-	mes "^aaaaffkey: 3.^000000";
+	erasequest 7160;
+	if (.@key01 == 3) setquest 7161;
+	else if (.@key01 == 4) setquest 7162;
+	else if (.@key01 == 5) setquest 7163;
 	next;
 	mes "[Graham]";
-	mes "You just take it.";
+	mes "Just take it.";
 	mes "I have a bad memory.";
 	mes "You have all the information so you are on your own now.";
 	next;
@@ -580,157 +613,126 @@ L_Code:
 	close;
 }
 
-s_atelier,168,65,5	script	Manager#H-3	923,{
-	if (job_sha == 9) {
+s_atelier,168,65,5	script	Manager#sc08_ra	923,{
+	if (job_sha < 10) {
 		mes "[Manager]";
 		mes "Who are you?";
 		mes "This place isn't for you.";
 		next;
+		if (job_sha < 9) {
+			mes "[Manager]";
+			mes "What are they doing up there?";
+			mes "Bleh...";
+			close;
+		}
 		switch(select("Give me your password!:I was sent by Graham.")) {
-			case 1:
-				mes "[Manager]";
-				mes "You need my password?";
-				mes "How much would you pay me?";
-				next;
-				mes "[Manager]";
-				mes "10 million zeny?";
-				mes "Ok, I'll take that then!";
+		case 1:
+			mes "[Manager]";
+			mes "You need my password?";
+			mes "How much would you pay me?";
+			next;
+			mes "[Manager]";
+			mes "10 million zeny?";
+			mes "Ok I'll take that then!";
+			next;
+			mes "[Manager]";
+			mes "Yeah right!";
+			mes "Who the hell are you?";
+			mes "How dare you just ask for my password?";
+			close;
+		case 2:
+			mes "[Manager]";
+			mes "Graham?";
+			mes "Why?";
+			next;
+			if (countitem(6266) == 0) {
+				mes "You don't seem to have brought it here.";
 				next;
 				mes "[Manager]";
-				mes "Yeah, right!";
-				mes "Who the hell are you?";
-				mes "How dare you just ask for my password?";
+				mes "Are you mute?";
+				mes "I don't know why Graham sent you here.";
+				mes "Just go if you don't have any business here!";
+				close;
+			}
+			mes "[Manager]";
+			mes "So this key was sent by him.";
+			next;
+			select("No, I found it as the clue.");
+			mes "[Manager]";
+			mes "Ah?";
+			mes "So doesn't that mean that one code could be exchanged as a treasure...?";
+			next;
+			select("Maybe.");
+			mes "[Manager]";
+			mes "...........";
+			mes "Hmm....";
+			next;
+			mes "[Manager]";
+			mes "Hmm...";
+			next;
+			mes "- The manager seems -";
+			mes "- to be thinking about -";
+			mes "- something. Then he-";
+			mes "- hands over a paper. -";
+			next;
+			mes "[Manager]";
+			mes "No way.";
+			mes "Here's the clue.";
+			mes "Try to find it.";
+			next;
+			mes "[Manager]";
+			mes "Anyway my name is Paul.";
+			mes "...........";
+			next;
+			mes "[Paul]";
+			mes "Naturally...";
+			mes "I've already solved the clue.";
+			next;
+			mes "- Here's the paper that -";
+			mes "- Paul handed over. -";
+			next;
+			mes "R-E-N-N-N-D";
+			mes "L-N-N-W-W-N-D";
+			next;
+			mes "[Paul]";
+			mes "Isn't it so simple?";
+			mes "What do you think?";
+			mes "RENNND / LNNWWND means one thing.";
+			next;
+			switch(select("I think I got it.:I have no clue.")) {
+			case 1:
+				callsub L_Code,7166;
 				close;
 			case 2:
-				mes "[Manager]";
-				mes "Graham?";
-				mes "Why?";
-				next;
-				mes "[Manager]";
-				mes "So this key was sent by him.";
-				next;
-				select("No, I found it as the clue.");
-				mes "[Manager]";
-				mes "Ah?";
-				mes "So doesn't that mean that one code could be exchanged as a treasure?";
-				next;
-				select("Maybe.");
-				mes "[Manager]";
-				mes "..........";
-				mes "Hmm....";
-				next;
-				mes "[Manager]";
-				mes "Hmm...";
-				next;
-				mes "- The manager seems -";
-				mes "- to be thinking about -";
-				mes "- something. Then he -";
-				mes "- hands over a paper. -";
-				next;
-				mes "[Manager]";
-				mes "No way.";
-				mes "Here's the clue.";
-				mes "Try to find it.";
-				next;
-				mes "[Manager]";
-				mes "Anyway, my name is Paul.";
-				mes "..........";
-				next;
-				mes "[Paul]";
-				mes "Naturally...";
-				mes "I've already solved the clue.";
-				next;
-				mes "- Here's the paper that -";
-				mes "- Paul handed over. -";
-				next;
-				mes "R-E-N-N-N-D";
-				mes "L-N-N-W-W-N-D";
-				next;
 				mes "[Paul]";
-				mes "Isn't it so simple?";
-				mes "What do you think?";
-				mes "RENNND / LNNWWND can mean only one thing.";
-				next;	
-				switch(select("I think I got it.:I have no clue.")) {
-					case 1:
-						erasequest 7166;
-						setquest 7167;
-						set @job_sc_chest2,rand(1,3);
-						goto L_icedun;
-					case 2:
-						erasequest 7166;
-						setquest 7167;
-						set job_sha,10;
-						mes "[Paul]";
-						mes "What? You don't know it?";
-						mes "Then you'd better think about it more.";
-						mes "It's so easy.";
-						close;
-				}
+				mes "What? You don't know it?";
+				mes "Then you'd better think about it more.";
+				mes "It's so easy.";
+				set job_sha,10;
+				changequest 7166,7167;
+				close;
+			}
 		}
 	} else if (job_sha == 10) {
 		mes "[Paul]";
 		mes "So did you get what it means?";
 		next;
-		switch(select("Yes!:No I don't think so.")) {
-			case 1:
-				erasequest 7166;
-				setquest 7167;
-				set @job_sc_chest2,rand(1,3);
-				goto L_icedun;
-			case 2:
-				mes "[Paul]";
-				mes "Is it that hard?";
-				next;
-				select("I can't do it...");
-				mes "[Paul]";
-				mes "No way";
-				mes "Can I give you a hint?";
-				mes "Compass!";
-				close;
-		}
-	}
-L_icedun:
-	if (job_sha < 11) {
-		if (@job_sc_chest2 && @job_sc_chest2 < 4) {
-			mes "[Paul]";
-			mes "Really? Then I don't need to give you the answer.";
-			mes "Could you interpret the meaning of each letter?";
-			next;
-			select("It's kinda the combination of the places.");
-			mes "[Paul]";
-			mes "So?";
-			next;
-			select("E-N means East - North");
+		switch(select("Yes!:No, I don't think so.")) {
+		case 1:
+			callsub L_Code,7167;
+			close;
+		case 2:
 			mes "[Paul]";
-			mes "Ok, enough.";
-			mes "Then go and find out.";
-			next;
-			mes "Memorize this.";
-			mes "You might need it. It could be a clue for you.";
+			mes "Is it that hard?";
 			next;
+			select("I can't do it...");
 			mes "[Paul]";
-			switch(@job_sc_chest2) {
-				case 1:
-					mes "[S E E D]";
-					mes "It's seed.";
-					break;
-				case 2:
-					mes "[F O O T]";
-					mes "It's foot.";
-					break;
-				case 3: 
-					mes "[C O L D]";
-					mes "It's cold.";
-					break;
-			}
-			mes "I don't know what it really means, but it would be helpful to you to figure it out.";
-			set job_sha,11;
-			set job_chest2, @job_sc_chest2;
-			changequest 7167, @job_sc_chest2+7167;
+			mes "No way.";
+			mes "Can I give you a hint?";
+			mes "Compass!";
 			close;
 		}
-	} else if (job_sha > 10 && job_sha < 13) {
+	} else if (job_sha > 10 && job_sha < 14) {
 		mes "[Paul]";
 		mes "I've already given you all the info you need.";
 		next;
@@ -739,16 +741,37 @@ L_icedun:
 		mes "Isn't it enough?";
 		next;
 		mes "[Paul]";
-		mes "As you and Graham mentioned...";
+		mes "As you and Graham mentioned.";
 		mes "Go and find it out.";
 		next;
 		mes "[Paul]";
 		mes "If you find real things like treasure,";
 		mes "come back here.";
 		close;
-	} else if (job_sha == 14) {
+	} else if (job_sha > 13 && job_sha < 17) {
+		mes "[Paul]";
+		mes "You must find the right place.";
+		mes "The word is RENNND";
+		mes "It's refering the cave East - North - North - North from this Rachel.";
+		next;
+		mes "[Paul]";
+		mes "L-N-N-W-W-N-D is also same.";
+		mes "L is for Lighthalzen.";
+		mes "Lighthalzen - North- North - West - West.";
+		mes "That's the ice cave.";
+		next;
+		mes "[Paul]";
+		mes "Is there any improvement!?";
+		next;
+		select("You need to investigate more?");
+		mes "[Paul]";
+		mes "Really? Ok...";
+		mes "No way....";
+		mes "We will expect a good result.";
+		close;
+	} else if (job_sha == 17) {
 		mes "[Paul]";
-		mes "I was dying waiting for you.";
+		mes "I am dying to wait for you.";
 		mes "So what did you find out?";
 		next;
 		select("I found the key.:Hmm...");
@@ -760,7 +783,7 @@ L_icedun:
 		mes "So are you lying to me?";
 		next;
 		mes "[Paul]";
-		mes "I can feel how Graham felt it....";
+		mes "I can feel how Graham felt it...";
 		mes "We don't dare to get that tiny key...";
 		next;
 		mes "[Paul]";
@@ -769,7 +792,7 @@ L_icedun:
 		next;
 		mes "[Paul]";
 		mes "Hey...";
-		mes "if you go to Juno...";
+		mes "If you go to Juno...";
 		mes "There's a gallery...";
 		next;
 		mes "[Paul]";
@@ -781,40 +804,31 @@ L_icedun:
 		mes "Anyway...";
 		mes "So I really like to know the password and the identity of the key...";
 		next;
-		erasequest 7168;
-		erasequest 7169;
-		erasequest 7170;
-		erasequest 7172;
-		setquest 7173;
-		set job_sha,15;
 		mes "[Paul]";
 		mes "If Haled isn't supportive...";
-		mes "Tell him ^aaaaffI know what you did last summer!^000000";
+		mes "Tell him ^4d4dffI know what you did last summer!^000000";
 		mes "You shouldn't be wrong...!?";
+		set job_sha,18;
+		changequest 7172,7173;
 		close;
-	} else if (job_sha > 14 && job_sha < 18) {
+	} else if (job_sha == 18) {
 		mes "[Paul]";
 		mes "You could ask him to get the key...";
 		mes "He will help you if you tell him something...";
 		next;
 		mes "[Paul]";
 		mes "If Haled isn't supportive...";
-		mes "Tell him ^aaaaffI know what you did last summer!^000000";
+		mes "Tell him ^4d4dffI know what you did last summer!^000000";
 		close;
-	} else if (job_sha > 16 && job_sha < 27) {
+	} else if (job_sha > 18 && job_sha < 30) {
 		mes "[Paul]";
 		mes "So you are still looking for the treasure... right?";
 		mes "I would look for it...";
 		close;
-	} else if (job_sha == 27) {
-		// Custom Translation
-		mes "[Paul]";
-		mes "Hohohohehehehahaha.";
-		mes "Ouch! my stomach hurts.";
-		next;
+	} else if (job_sha == 30) {
 		mes "[Paul]";
 		mes "Now I almost guessed what would happen later...";
-		mes "It can't happen!";
+		mes "It can't have happened!";
 		next;
 		mes "[Paul]";
 		mes "Are you shocked?";
@@ -822,29 +836,62 @@ L_icedun:
 		mes "You could get a good person.";
 		mes "Hahaha...";
 		close;
-	} else if (Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser) {
-		mes "[Paul]";
-		mes "Do you need a painting tool?";
-		mes "You can request that to the assistant.";
-		mes "We always have it just in case.";
-		close;
 	}
-	mes "[Manager]";
-	mes "Who are you?";
-	mes "This place isn't for you.";
+	mes "[Paul]";
+	mes "Do you need a painting tool?";
+	mes "Then you can request that to the assistant.";
+	mes "We always have it just in case.";
+	close;
+L_Code:
+	mes "[Paul]";
+	mes "Really? Then I don't need to give you the answer.";
+	mes "Could you interpret the meaning of each letter.";
 	next;
-	mes "[Manager]";
-	mes "What are they doing up there?";
-	mes "Bleh...";
+	select("It's kinda the combination of places.");
+	mes "[Paul]";
+	mes "So?";
+	next;
+	select("E-N meaning East - North");
+	mes "[Paul]";
+	mes "Ok that's good enough.";
+	mes "Then go and find out.";
+	next;
+	mes "[Paul]";
+	mes "Memorize this.";
+	mes "You might need it. It could be a clue for you.";
+	next;
+	mes "[Paul]";
+	switch(rand(3)) {
+	case 0:
+		mes "[ S E E D ]";
+		mes "S E E D?";
+		set job_sha,11;
+		changequest getarg(0),7168;
+		break;
+	case 1:
+		mes "[ F O O T ]";
+		mes "F O O T?";
+		set job_sha,12;
+		changequest getarg(0),7169;
+		break;
+	case 2:
+		mes "[ C O L D ]";
+		mes "C O L D?";
+		set job_sha,13;
+		changequest getarg(0),7170;
+		break;
+	}
+	mes "I don't know what it really means, but it would be helpful to you to figure it out.";
 	close;
 }
 
-s_atelier,168,129,3	script	Manager#H-4	806,{
-	if (job_sha == 15) {
+s_atelier,167,129,3	script	Manager#sc06_yuno	806,{
+	if (job_sha < 19) {
 		mes "[Manager]";
 		mes "What?";
 		mes "If you've come here for some money, you are wrong.";
 		mes "This isn't a pawnshop.";
+		if (job_sha < 18) close;
 		next;
 		select("You are... Haled?");
 		mes "[Haled]";
@@ -866,7 +913,8 @@ s_atelier,168,129,3	script	Manager#H-4	806,{
 		mes "[Haled]";
 		mes "So...";
 		mes "I totally understand.";
-		mes "It's this key's location that shared the information!";
+		mes "It's this key's location that";
+		mes "shared the informaton!";
 		next;
 		mes "[Haled]";
 		mes "Anyway. Two are keys and the treasure that I have to open with this key, what can I do?";
@@ -877,15 +925,27 @@ s_atelier,168,129,3	script	Manager#H-4	806,{
 		mes "- Haled doesn't want to cooperate with you.";
 		mes "Remember what Paul said. -";
 		next;
-		goto L_Paul;
-	} else if (job_sha == 16) {
+		callsub L_Code;
+		mes "[Haled]";
+		mes "So what?";
+		mes "He's a wild-eyed person.";
+		mes "Did you just speak to me in a threatening tone?";
+		set job_sha,19;
+		close;
+	} else if (job_sha == 19) {
 		mes "[Haled]";
 		mes "What?";
-		mes "You want to talk with me?";
+		mes "You want to walk with me?";
 		mes "How about you just hand over that key to me?";
 		next;
-		goto L_Paul;
-	} else if (job_sha == 17) {
+		callsub L_Code;
+		mes "[Haled]";
+		mes "What's wrong with you?";
+		mes "Are you ok?";
+		mes "Paul? What do you want to say?";
+		set job_sha,19;
+		close;
+	} else if (job_sha == 20) {
 		mes "[Haled]";
 		mes "Got it.";
 		mes "Ok.";
@@ -896,10 +956,11 @@ s_atelier,168,129,3	script	Manager#H-4	806,{
 		mes "Listen carefully to this poem.";
 		next;
 		mes "[Haled]";
-		mes "^aaaaffThe end of thin root of life-giving water.^000000";
-		mes "^aaaaffIt's all of tears and signs of living people.^000000";
-		mes "^aaaaffThey are us but also not us.^000000";
-		mes "^aaaaffResidents of forgotten night play the waltz of despair.^000000";
+		mes "^4d4dffThe end of thin root of life-giving water.";
+		mes "It's all of tears and signs of living people.";
+		mes "They are us but also not us.";
+		mes "Residents of forgotten night";
+		mes "play the waltz of despair^000000.";
 		next;
 		mes "[Haled]";
 		mes "Do you know where it is?";
@@ -911,96 +972,108 @@ s_atelier,168,129,3	script	Manager#H-4	806,{
 		mes "Anyway, if you want to do it, go ahead.";
 		mes "If you know what this poem means.";
 		next;
-		erasequest 7173;
-		setquest 7174;
-		set job_sha,18;
 		mes "[Haled]";
 		mes "Of course, if you find something, you have to come back.";
 		mes "Got it?";
 		mes "I'm going to write it down so that you won't forget.";
+		set job_sha,21;
+		changequest 7173,7174;
 		close;
-	} else if (job_sha > 17 && job_sha < 22) {
+	} else if (job_sha == 21) {
 		mes "[Haled]";
 		mes "I won't be surprised with whatever you find.";
 		mes "You have to find the place that the poem speaks of.";
 		next;
 		mes "[Haled]";
-		mes "^aaaaffThe end of thin root of life-giving water.^000000";
-		mes "^aaaaffIt's all of tears and signs of living people.^000000";
-		mes "^aaaaffThey are us but also not us.^000000";
-		mes "^aaaaffResidents of forgotten night play the waltz of despair.^000000";
+		mes "^4d4dffThe end of thin root of life-giving water.";
+		mes "It's all of tears and signs of living people.";
+		mes "They are us but also not us.";
+		mes "Residents of forgotten night";
+		mes "play the waltz of despair^000000.";
 		next;
+		mes "[Haled]";
 		mes "Of course, if you find something, you have to come back.";
 		mes "Got it?";
 		close;
-	}
-	if (job_sha == 22) {
-		mes "[Haled]";
-		mes "Did you find something?";
-		next;
-		select("Show the Key of Pleasure.");
-		mes "[Haled]";
-		mes "Ha...........akkk.";
-		mes "Another key?";
-		mes "Is it the only key?!";
-		next;
-		mes "[Haled]";
-		mes "Then... do I have to ask help from the young man from Lighthalzen?";
-		mes "............";
-		mes "Ah...";
-		next;
-		mes "[Haled]";
-		mes "I have no choice.";
-		mes "Go to Lighthalzen with the three keys.";
-		mes "Meet Vicente, who is master of the store in Lighthalzen, and tell him everything.";
-		next;
-		mes "[Haled]";
-		mes "I told you that the old man is persistent and he ruins everything.";
-		next;
+	} else if (job_sha > 21 && job_sha < 25) {
 		mes "[Haled]";
-		mes "You have to have all your facts straight to send information to the guild.";
-		mes "First you have to work together in one accord.";
-		next;
-		mes "[Haled]";
-		mes "The thing you find can belong to the workplace.";
-		mes "It can be shared.";
-		next;
-		mes "[Haled]";
-		mes "I thought that it was a very simple thing.";
-		mes "We couldn't share that stuff together.";
-		next;
-		mes "[Haled]";
-		mes "All of the information that I got fromworkplace are key.";
-		mes "There must be something to use three key with.";
-		next;
+		mes "How's it going?";
+		mes "If you find something, you have to come back.";
+		mes "Don't go to Graham or Paul.";
+		close;
+	} else if (job_sha == 25) {
 		mes "[Haled]";
-		mes "Anyway it has to do with deceit and pleasure...";
-		mes "Is it teasing me...";
+		mes "Did you find something?";
 		next;
-		erasequest 7176;
-		setquest 7177;
-		set job_sha,23;
-		mes "[Haled]";
-		mes "Ok. Let me finish.";
-		mes "Go to Vicente in Lighthalzen.";
+		select("Show the key of pleasure.");
+		if (countitem(6268)) {
+			mes "[Haled]";
+			mes "Ha..........akkk.";
+			mes "Another key?";
+			mes "Is it the only key?!";
+			next;
+			mes "[Haled]";
+			mes "Then... do I have to ask help from the young man from Lighthalzen?";
+			mes "...........";
+			mes "Ah...";
+			next;
+			mes "[Haled]";
+			mes "I have no choice.";
+			mes "Go to Lighthalzen with the three keys.";
+			mes "Meet Vicente who is master of the store in Lighthalzen and tell him everything.";
+			next;
+			mes "[Haled]";
+			mes "I told you that the old man is persistant and he ruins everything.";
+			next;
+			mes "[Haled]";
+			mes "You have to have all your facts straight to send information to the guild.";
+			mes "First you have to work together in one accord.";
+			next;
+			mes "[Haled]";
+			mes "The thing you find can belong to the workplace.";
+			mes "It can be shared.";
+			next;
+			mes "[Haled]";
+			mes "I thought that it was a very simple thing.";
+			mes "We couldn't share that stuff together.";
+			next;
+			mes "[Haled]";
+			mes "All of the information that I got from workplace are key.";
+			mes "There must be something to use three key with.";
+			next;
+			mes "[Haled]";
+			mes "Anyway it has to do with deceit and pleasure...";
+			mes "Is it teasing me...";
+			next;
+			mes "[Haled]";
+			mes "Ok. Let me finish.";
+			mes "Go to Vicente in Lighthalzen.";
+			set job_sha,26;
+			changequest 7176,7177;
+			close;
+		}
+		mes "["+strcharinfo(0)+"]";
+		mes "I'm sorry.";
+		mes "I found one more key but I didn't bring it.";
+		mes "I'll bring it soon.";
 		close;
-	} else if (job_sha > 22 && job_sha < 24) {
+	} else if (job_sha == 26) {
 		mes "[Haled]";
-		mes "Shadow workplace in lighthalzen";
+		mes "Shadow workplace in Lighthalzen.";
 		mes "The manager's name is Vicente.";
 		mes "Tell him everything and get one last information.";
 		close;
-	} else if (job_sha == 24) {
+	} else if (job_sha > 26 && job_sha < 30) {
 		mes "[Haled]";
 		mes "Hey, you!";
-		mes "Was Vicente helpful?";
+		mes "Was Vicente helpful to you?";
 		mes "You have something important...";
 		mes "So you have to find out what is it.";
 		next;
 		mes "[Haled]";
 		mes "Keep trying.";
 		close;
-	} else if (job_sha == 27) {
+	} else if (job_sha == 30) {
 		mes "[Haled]";
 		mes "Hey, you!";
 		mes "What's going on?";
@@ -1008,74 +1081,614 @@ s_atelier,168,129,3	script	Manager#H-4	806,{
 		next;
 		mes "[Haled]";
 		mes "Did I know that fact?";
-		mes "Sure. I heard a little bit before I used to do work like this.";
+		mes "Sure. I heard a little bit before";
+		mes "I used to do work like this.";
 		next;
 		mes "[Haled]";
-		mes "It's honor to me cause It's for to pick a person up belongs to us.";
+		mes "It's an honor for me to pick a person who belongs to us.";
 		mes "Just accept that. You are going to be a good Shadow Chaser.";
-		close;		
-	} else if (Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser) {
-		mes "[Haled]";
-		mes "I like your face.";
-		mes "We don't have any special thing.";
-		mes "An assistant sells some paint and tool.";
 		close;
 	}
-	mes "[Manager]";
-	mes "What?";
-	mes "If you've come here for some money,";
-	mes "you are wrong.";
-	mes "This isn't a pawnshop.";
+	mes "[Haled]";
+	mes "I like your face.";
+	mes "We don't have any special thing.";
+	mes "An assistant sells some paint and tool.";
 	close;
-
-L_Paul:
+L_Code:
+	mes "["+strcharinfo(0)+"]";
+	mes "Paul said...";
+	next;
+	input .@inputstr$;
 	mes "["+strcharinfo(0)+"]";
-	mes "Paul said....";
+	mes "Paul said...";
+	mes "'"+.@inputstr$+"' .";
 	next;
-	input .@psaid$;
-	if (.@psaid$ != "I know what you did last summer!") {
-		set job_sha,16;
+	if (.@inputstr$ == "I know what you did last summer!") {
 		mes "[Haled]";
-		mes "So what?";
-		mes "He's a wild-eyed person.";
-		mes "Did you just speak to me in a threatening tone?";
+		mes "Ekk... He...";
+		mes "Knew everything...";
+		mes "Hmm...";
+		mes "I can help.";
+		mes "I will cooperate.";
+		next;
+		mes "[Haled]";
+		mes "I need some time to collect my thoughts.";
+		mes "Wait for me a bit.";
+		set job_sha,20;
 		close;
 	}
-	mes "["+strcharinfo(0)+"]";
-	mes "Paul said....";
-	mes "I know what you did last summer!";
-	next;
-	mes "[Haled]";
-	mes "Ekk... He...";
-	mes "Knew everything...";
-	mes "Hmm...";
-	mes "I can help.";
-	mes "I will cooperate.";
+	return;
+}
+
+s_atelier,25,75,3	script	Manager#sc10_lgt	899,{
+	if (job_sha < 26) {
+		mes "[Manager]";
+		mes "You are?";
+		mes "Sorry, but we don't trade old art goods.";
+		mes "If you neeed something, then ask an assistant.";
+		close;
+	} else if (job_sha == 26) {
+		mes "[Vicente]";
+		mes "Welcome.";
+		mes "I've been waiting for you.";
+		next;
+		select("For me?");
+		mes "[Vicente]";
+		mes "I wondered when you would visit.";
+		mes "I've been waiting a long time for you.";
+		mes "Huhu...";
+		next;
+		mes "[Vicente]";
+		mes "How were Graham,Paul and Haled?";
+		mes "They are not easy people to deal with huh?";
+		next;
+		select("You know everything?");
+		mes "[Vicente]";
+		mes "Sure.";
+		mes "They ignore me because they think that I'm too young.";
+		mes "As if they were all perfect. HahahaHah...";
+		next;
+		mes "[Vicente]";
+		mes "Did you bring all of the keys?";
+		mes "There should be three.";
+		mes "You came here to find out how to use them I assume, right?";
+		next;
+		select("Yeah, you're right!");
+		mes "[Vicente]";
+		mes "You don't have to be surprised.";
+		mes "I can't find how long it took for those three men to investigate before.";
+		mes "I already finished my work.";
+		next;
+		mes "[Vicente]";
+		mes "When I went to the final location I found a stone statue.";
+		mes "But it needs to have key.";
+		next;
+		mes "[Vicente]";
+		mes "Even Three.";
+		mes " ";
+		mes "(Vicente smiles)";
+		next;
+		mes "[Vicente]";
+		mes "At first, the information that was given from the guild means only one thing.";
+		mes "Because of the saying that they respect the right of our possessions,";
+		mes "we shared our information.";
+		next;
+		mes "[Vicente]";
+		mes "So we had to wait for it.";
+		mes "I thought the last man would never give it to me...";
+		next;
+		mes "[Vicente]";
+		mes "They thought I wanted to have the treasure for myself.";
+		mes "So that's why I've just been waiting for you.";
+		next;
+		mes "[Vicente]";
+		mes "Then let's make a point!";
+		mes "Do you know thanatos tower?";
+		next;
+		switch(select("Sure.:The tower of death?")) {
+		case 1:
+			mes "[Vicente]";
+			mes "You know that.";
+			mes "Then you can understand easily.";
+			next;
+			break;
+		case 2:
+			mes "[Vicente]";
+			mes "Yes, that tower in northen Juno.";
+			mes "There are huge monsters there.";
+			next;
+			break;
+		}
+		mes "[Vicente]";
+		mes "You told me that you went to the final place with the information?";
+		mes "That's the Thanatos Tower.";
+		next;
+		mes "[Vicente]";
+		mes "Fortunately, the location is the 1st floor of that tower.";
+		mes "So I'm going to tell what you have to do.";
+		next;
+		mes "[Vicente]";
+		mes "At the 1st floor of thanatos tower, there are members from the Rekenber Corporation.";
+		mes "Go north from their desk...";
+		next;
+		mes "[Vicente]";
+		mes "And you can find stairs and a location where light comes out of.";
+		mes "That's the location of the information that I have.";
+		next;
+		mes "[Vicente]";
+		mes "Now you know the location you have to go to with the three keys.";
+		mes "Find out the secret of the stone statue.";
+		next;
+		mes "[Vicente]";
+		mes "You can't imagine what kind of things you might find.";
+		mes "That's the final destination of all of the keys.";
+		set job_sha,27;
+		changequest 7177,7178;
+		next;
+		mes "[Vicente]";
+		mes "Good luck.";
+		close;
+	} else if (job_sha == 27) {
+		mes "[Vicente]";
+		mes "Listen carefully.";
+		mes "The location you need to find is";
+		mes "north from middle of thanatos 1st floor.";
+		mes "You can find stairs and a location where light comes out.";
+		next;
+		mes "[Vicente]";
+		mes "If you find something, come back here.";
+		mes "Actually, I want to get the key from you, but...";
+		next;
+		mes "[Vicente]";
+		mes "I just respect your opinion.";
+		mes "If you find something, come back here. Got it?";
+		close;
+	} else if (job_sha == 28) {
+		mes "[Vicente]";
+		mes "You are back?";
+		mes "Find anything?";
+		next;
+		switch(select("Throw the brush.:Grab him by the collar.:Drop the brush.")) {
+		case 1:
+			mes "[Vicente]";
+			mes "Hey, what are you doing?";
+			mes "This brush...";
+			mes "Is this the treasure hidden in the Thanatos Tower?";
+			next;
+			mes "Vicente looks surprised after taking a look at it.";
+			next;
+			break;
+		case 2:
+			mes "[Vicente]";
+			mes "What's wrong with you?";
+			mes "You can tell me more details?";
+			next;
+			mes "Vincente looks surpised after taking a look at it.";
+			next;
+			mes "[Vicente]";
+			mes "Is this the treasure hidden in the Thanatos Tower?";
+			next;
+			break;
+		case 3:
+			mes "[Vicente]";
+			mes "What the matter?";
+			mes "Are you ok?";
+			next;
+			mes "Vicente looks at me with a surprised face.";
+			next;
+			select("Point at the brush.");
+			mes "[Vicente]";
+			mes "Is this the treasure hidden in the Thanatos Tower?";
+			next;
+			mes "Vincente looks surpised after taking a look at it.";
+			next;
+			break;
+		}
+		mes "[Vicente]";
+		mes "Haha!!";
+		mes "Ahahahaha!!!!!";
+		mes "I got it now!";
+		mes "Congratulations.";
+		next;
+		mes "[Vicente]";
+		mes "It's treasure.";
+		mes "You found a big treasure!";
+		mes "Talk to me for bit, won't you?";
+		next;
+		mes "[Vicente]";
+		mes "There is someone who has been waiting for you.";
+		mes "He's been waiting for someone to bring this brush back.";
+		mes "Let's go inside.";
+		set job_sha,29;
+		erasequest 7179;
+		close;
+	} else if (job_sha == 29 || job_sha == 30) {
+		mes "[Vicente]";
+		mes "I'm going to listen to your story.";
+		close;
+	}
+	mes "[Vicente]";
+	mes "I'm expecting your work from now on.";
+	mes "You must be a good Shadow Chaser.";
+	mes "I'm sure of it.";
+	close;
+}
+
+s_atelier,73,65,3	script	Vicente#sc12_lgt	899,{
+	mes "[Vicente]";
+	if (job_sha < 29) {
+		mes "If you don't have anything special to do here, you'd better leave.";
+		mes "No trespassing.";
+		close;
+	} else if (job_sha == 29) {
+		mes "This way.";
+		mes "He's been waiting for you a while.";
+		mes "Not me, Dumk.";
+		close;
+	} else if (job_sha == 30) {
+		mes "Dumk wants to have you as a Shadow Chaser.";
+		mes "Big news right?";
+		close;
+	} else if (job_sha == 31) {
+		mes "I'm expecting your work from now on.";
+		mes "You must be a good Shadow Chaser.";
+		mes "I'm sure of it.";
+		close;
+	}
+	mes "I don't have any special reason to visit here.";
+	mes "An assistant sells tools and paint.";
+	close;
+}
+
+s_atelier,70,66,4	script	Dumk#sc13_lgh	481,{
+	if (Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser) {
+		mes "[Dumk]";
+		mes "What is it?";
+		mes "Have you been enjoying your new skills?";
+		next;
+		mes "[Dumk]";
+		mes "If you want to improve your skills, you have to seek out new uses for paint.";
+		next;
+		mes "[Dumk]";
+		mes "Don't forget.";
+		mes "We are Shadow Chasers.";
+		mes "Huhu...";
+		mes "HuhuHuhu...";
+		close;
+	}
+	if (checkweight(1201,4) == 0) {
+		mes "- You can't continue on in this quest because you are overweight. -";
+		close;
+	}
+	if (ismounting()) {
+		mes "[Dumk]";
+		mes "Who is this guy? Why should he sit in front of me so high?";
+		mes "Although I do not know why you riding on it, but here is in door,";
+		mes "That is no danger to rely on animals to escape, so you please get down!";
+		close;
+	}
+	if (BaseJob == Job_Rogue) {
+		if (job_sha < 29) {
+			mes "[Dumk]";
+			mes "Vicente. No Soliciting.";
+			next;
+			mes "[Vicente]";
+			mes "A solicitor?";
+			mes "I don't think so. He's our colleage.";
+			next;
+			mes "[Dumk]";
+			mes "...Ah?";
+			close;
+		}
+		if (BaseLevel < 99 || JobLevel < 50 || SkillPoint != 0) {
+			mes "[Dumk]";
+			mes "You are still green!";
+			mes "Did you expect that you can learn the dark arts with your ability?";
+			mes "You are wrong!";
+			next;
+			mes "[Vicente]";
+			mes "Haha...";
+			mes "Please, understand. Dumk has very bad communication skills.";
+			mes "Even doesn't talk to anyone who isn't a high enough level.";
+			next;
+			mes "[Vicente]";
+			mes "And as person who isn't not ready.";
+			mes "^4d4dffYou maybe are not ready for him^000000.";
+			next;
+			mes "[Dumk]";
+			mes "You talk too much.";
+			mes "Heh.";
+			next;
+			mes "[Vicente]";
+			mes "- He is pleased. -";
+			mes "Hey.";
+			mes "He could be ashamed.";
+			close;
+		}
+		if (job_sha == 29) {
+			mes "[Dumk]";
+			mes "It's you? You are the one who found the brush?";
+			next;
+			select("Show the brush to him.");
+			if (countitem(6269)) {
+				mes "[Dumk]";
+				mes "That's it.";
+				mes "Did you find it by yourself?";
+				next;
+				switch(select("Yes.:With my friends")) {
+				case 1:
+					mes "[Dumk]";
+					mes "Hmm...";
+					mes "You have a high ability.";
+					mes "Breaking the codes should have been tough.";
+					mes "But it wasn't for you.";
+					next;
+					break;
+				case 2:
+					mes "[Dumk]";
+					mes "Hmm...";
+					mes "That's your other skill.";
+					mes "People who have no friends must be lonely.";
+					next;
+					mes "[Dumk]";
+					mes "To us, relationships are very important.";
+					mes "You get more people, you get more help.";
+					next;
+					break;
+				}
+				mes "[Dumk]";
+				mes "It's time to introduce myself.";
+				mes "I'm Dumk.";
+				next;
+				select("You are...");
+				mes "[Vicente]";
+				mes "Chicken! How about the chicken for this supper?";
+				next;
+				mes "[Dumk]";
+				mes "Why chicken?";
+				mes "Why are you interrupting?";
+				mes "You wanna be fired?";
+				next;
+				mes "[Vicente]";
+				mes "Sorry...";
+				mes " ";
+				mes "(He turns to you and says it's taboo to talk about chicken.)";
+				next;
+				mes "[Dumk]";
+				mes "Anyway, let's make a point.";
+				mes "You.";
+				mes "Will you yield to the will of the brush?";
+				next;
+				select("Yield to? What?");
+				mes "[Dumk]";
+				mes "This brush was used by the master.";
+				mes "Paintings by him have mysterious power.";
+				next;
+				mes "[Dumk]";
+				mes "I can't tell you the root of the power.";
+				mes "Someday you will find out.";
+				mes "He sublimates power through the medium of his paintings.";
+				next;
+				select("I don't get it...?");
+				mes "[Dumk]";
+				mes "We walk in darkness without moonlight.";
+				mes "And find out our shining days are over.";
+				next;
+				mes "[Dumk]";
+				mes "We follow to other shadows";
+				mes "and we can be real";
+				mes "Shadow Chasers!";
+				next;
+				select("What are you talking about?");
+				mes "[Vicente]";
+				mes "He suggests that you become a Shadow Chaser.";
+				next;
+				mes "[Vicente]";
+				mes "In our guild, there is a special group that have unique skills.";
+				mes "They are Shadow Chasers.";
+				mes "They usually hide ther figure and they think they are different from others.";
+				next;
+				mes "[Dumk]";
+				mes "Don't be so sarcastic, Vicente!";
+				mes "I told you.";
+				mes "You are qualified to be a Shadow Chaser!";
+				next;
+				mes "[Dumk]";
+				mes "Give that brush to me.";
+				mes "I need it again.";
+				mes "I'm so thirsty.";
+				mes "Wait a minute.";
+				delitem 6269,1; //Master_Brush
+				set job_sha,30;
+				close;
+			}
+			mes "[Dumk]";
+			mes "Let me see...";
+			mes "Did you bring the brush?";
+			next;
+			mes "[Dumk]";
+			mes "What are you doing?";
+			mes "Show me the brush?";
+			mes "You didn't bring it?";
+			mes "You are not very careful...";
+			close;
+		} else if (job_sha == 30) {
+			mes "[Dumk]";
+			mes "So, do you want me to keep talking about Shadow Chasers?";
+			next;
+			switch(select("What is a Shadow Chaser?:Change me to Shadow Chaser.:I'll come back later.")) {
+			case 1:
+				mes "[Dumk]";
+				mes "Most spells are exclusively for Wizards and their kind.";
+				mes "But Knight has since been able to use a kind of magic with things called Runes.";
+				next;
+				mes "[Dumk]";
+				mes "So we tried finding a medium for spells that suit our characteristics.";
+				next;
+				mes "[Dumk]";
+				mes "So finally...";
+				mes "We found paint!";
+				next;
+				mes "[Dumk]";
+				mes "Paint gives us lots of feelings.";
+				mes "We can feel peaceful and happy or it can give us feelings of sorrow and fear.";
+				next;
+				mes "[Dumk]";
+				mes "We use that to harness the different emotions of people and exploit them when they're most vulnerable.";
+				next;
+				mes "[Dumk]";
+				mes "The effects on our enemies are similar to that of magic spells.";
+				next;
+				mes "[Dumk]";
+				mes "For instance, this power could be used to create blackholes to make your enemies vanish.";
+				next;
+				mes "[Dumk]";
+				mes "So if you want to have that power then you must have artistry.";
+				next;
+				mes "[Dumk]";
+				mes "You have to be a trendsetter when it comes to fashion!";
+				mes "The ability to understand art!";
+				mes "You should have everything.";
+				next;
+				select("Then what is the Master Brush?");
+				mes "[Dumk]";
+				mes "Ah?";
+				mes "That was a brush who was a master of dark arts.";
+				mes "Now we are looking for someone who can be a Shadow Chaser.";
+				next;
+				mes "[Dumk]";
+				mes "This is a kind of game.";
+				mes "If there is someone who wants to become a Shadow Chaser,";
+				mes "we just start the process to find this brush.";
+				next;
+				mes "[Dumk]";
+				mes "We put the codes to make sure that you can think outside of the box.";
+				mes "Did you have fun?";
+				close;
+			case 2:
+				mes "[Dumk]";
+				mes "You decided!";
+				mes "As your case, you can master the art of psychological warfare using paint!";
+				mes "The art created is beautiful but dangerous.";
+				next;
+				mes "[Dumk]";
+				mes "We use paint as a medium for spells.";
+				mes "We use that to harness the different emotions of people and exploit them when they're most vulnerable.";
+				next;
+				mes "[Dumk]";
+				mes "For instance, this power could be used to create black holes to make your enemies vanish.";
+				next;
+				mes "[Dumk]";
+				mes "So if you want to have that power then you must have artistry.";
+				next;
+				mes "[Dumk]";
+				mes "You have to be a trendsetter when it comes to fashion!";
+				mes "The ability to understand art!";
+				mes "You should have everything.";
+				next;
+				mes "[Dumk]";
+				mes "You performed your duties diligently and found the brush.";
+				mes "So you are qualified to be a Shadow Chaser.";
+				next;
+				mes "[Dumk]";
+				mes "Congratulations.";
+				mes "Welcome to your new life.";
+				jobchange roclass(eaclass()|EAJL_THIRD);
+				getitem 6121,1; //Makeover_Brush
+				getitem 6122,1; //Paint_Brush
+				set job_sha,32;
+				getitem 2795,1; //Green_Apple_Ring
+				getitem 5750,1; //Shadow_Handicraft
+				next;
+				mes "[Dumk]";
+				mes "It's a fashionable uniform.";
+				mes "It uses patterns of leopard and feathers";
+				mes "The fashion world will be shocked.";
+				next;
+				mes "[Dumk]";
+				mes "This shadow peacock I designed myself.";
+				mes "It's too hard to create something that absorbs my art sense.";
+				mes "Then about this part...";
+				next;
+				mes "Dumk keeps talking about fashion, art sense, paint and feeling.";
+				mes "He's obviously in his own world.";
+				next;
+				select("About this brush...");
+				mes "[Vicente]";
+				mes "Ah, I'll expain.";
+				mes "We need tools for painting.";
+				next;
+				mes "[Vicente]";
+				mes "The make-up brush is used for face painting.";
+				mes "You can get paint from the workplace.";
+				next;
+				mes "[Vicente]";
+				mes "The paint brush is used for painting big spaces.";
+				mes "You can get paint from the workplace too.";
+				next;
+				mes "[Vicente]";
+				mes "Don't you remember the location of the workplace?";
+				mes "Juno, Prontera, Rachel and Lighthalzen.";
+				next;
+				mes "[Vicente]";
+				mes "If you need paint, go to an assistant.";
+				mes "^4d4dffIf you don't have any tools, you can use skill needed paints.^000000";
+				next;
+				mes "[Vicente]";
+				mes "Congratulations to be our person.";
+				close;
+			case 3:
+				mes "[Dumk]";
+				mes "What?";
+				mes "Why not?";
+				mes "You don't want to be a Shadow Chaser?";
+				mes "I can teach you so much about painting.";
+				next;
+				mes "[Dumk]";
+				mes "You really won't understand until you become one.";
+				next;
+				mes "[Dumk]";
+				mes "Don't you want to learn how to harness a power stronger than what you know?";
+				mes "....";
+				next;
+				mes "Dumk seemed to be dissapointed because I didn't answer him.";
+				close;
+			}
+		}
+	}
+	mes "[Dumk]";
+	mes "..........";
+	mes "Heh.";
 	next;
-	set job_sha,17;
-	mes "[Haled]";
-	mes "I need some time to collect my thoughts.";
-	mes "Wait for me a bit.";
+	mes "[Vicente]";
+	mes "I'm sorry.";
+	mes "He is not interested in other people.";
+	mes "But you can't enter this space.";
+	mes "You can get tools at the store.";
 	close;
 }
 
-tur_dun03,38,209,5	script	Blue Flame#H-19	802,{
+// Flames
+//============================================================
+tur_dun03,38,209,1	script	Blue Flame#sc_f01	802,{
 	if (job_sha == 5) {
 		mes "A blue flame is roaring.";
 		mes "The deciphered code means...";
 		next;
-		input .@BLFnpc$;
-		if (.@BLFnpc$ != "blue fire in turtle island third floor") {
+		input .@inputstr$;
+		set .@dap01$, "blue fire in turtle island third floor";
+		set .@dap02$, "BLUE FIRE IN TURTLE ISLAND THIRD FLOOR";
+		if (.@inputstr$ != .@dap01$ && .@inputstr$ != .@dap02$) {
 			mes "["+strcharinfo(0)+"]";
 			mes "What was it?";
 			mes "I guess I have to make sure I don't use any capital letters.";
 			close;
 		}
 		mes "["+strcharinfo(0)+"]";
-		mes "^aaaaffblue fire in turtle island third floor^000000";
+		mes "^4d4dff"+.@inputstr$+"^000000";
 		mes "It's clearly pointing to this.";
 		next;
-		mes "You murmur the sentence when the flame begins growing.";
+		mes "You just murmur the sentence when the flame begins growing.";
 		next;
 		mes "[Unknown voice]";
 		mes "Hm? Someone is coming?";
@@ -1104,47 +1717,49 @@ tur_dun03,38,209,5	script	Blue Flame#H-19	802,{
 		mes "I laugh behind their backs.";
 		mes "HahaHaha...";
 		next;
-		erasequest 7163;
-		setquest 7164;
-		set job_sha,6;
-		mes "The Blue Flame is growing and rolling.";
+		mes "The Blue Flame is growning and rolling.";
 		mes "They seem to be related.";
+		set job_sha,6;
+		setquest 7164;
+		if (checkquest(7161) >= 0) erasequest 7161;
+		if (checkquest(7162) >= 0) erasequest 7162;
+		if (checkquest(7163) >= 0) erasequest 7163;
 		close;
 	} else if (job_sha == 6) {
-		if (checkquest(7164,HUNTING) != 2)	{
-			mes "The flame is still rolling with a";
-			mes "strong spell.";
-			mes "You have to cut the relation with it.";
-			close;
-		}
-		else if (checkquest(7164,HUNTING) == 2) {
+		if (checkquest(7164,HUNTING) == 2) {
 			mes "It looks like the blue flame is under the limitation.";
 			mes "You can't feel that rolling effect of a spell like before.";
 			next;
 			select("Pick up the marbles.");
 			mes "When you pick them up, you can feel that your weight is lightened.";
-			close2;
 			set job_sha,7;
 			erasequest 7164;
+			close2;
 			warp "job3_sha01",22,82;
 			end;
 		}
+		mes "The flame is still rolling with a strong spell.";
+		mes "You have to cut the relation with it.";
+		close;
 	} else if (job_sha == 7) {
 		mes "It looks like the blue flame is under the limitation.";
-		mes "You can't feel that rolling effect of a spell like before.";	
+		mes "You can't feel that rolling effect of a spell like before.";
 		next;
 		select("Pick up the marbles.");
 		mes "When you pick it up, you can feel that your weight is lightened.";
 		close2;
 		warp "job3_sha01",22,82;
-		end;	
+		end;
 	}
 	mes "The flame is rolling.";
 	close;
 }
 
-ice_dun02,206,223,5	script	Red Flame#H-20	802,{
-	if (job_sha == 11) {
+ice_dun02,206,223,1	script	Red Flame#sc_f02	802,{
+	if (job_sha < 11) {
+		mes "An unknown red flame is roaring.";
+		close;
+	} else if (job_sha > 10 && job_sha < 14) {
 		mes "The red flame is roaring.";
 		mes "It changed to a woman in black.";
 		next;
@@ -1164,60 +1779,54 @@ ice_dun02,206,223,5	script	Red Flame#H-20	802,{
 		mes "Sad soul.";
 		mes "A shadow of illusion without truth.";
 		next;
-		setquest 7171;
-		set job_sha,12;
 		mes "[Shadow of Illusion]";
 		mes "What do you want?";
 		mes "Do you want treasure?";
 		mes "Then pick it up.";
 		mes "Tear my soul and";
 		mes "show the truth.";
+		set job_sha, job_sha+3;
+		setquest 7171;
 		close;
-	} else if (job_sha == 12) {
-		if (checkquest(7171,HUNTING) != 2) {
-			mes "[Shadow of Illusion]";
-			mes "Huhu.";
-			mes "What's wrong?";
-			mes "You couldn't find the half of my soul?";
-			mes "Huhu...";
-			next;
-			mes "[Shadow of Illusion]";
-			mes "Ah, hurry and give me rest.";
-			mes "I want to die softly.";
-			mes "I want to give up the phony life.";
-			next;
-			mes "[Shadow of Illusion]";
-			mes "Huhu...";
-			mes "When the false shadow is gone, you can see the truth.";
-			mes "Please, tear the false to dazzle who are blind...";
-			mes "without any trace..";
-			close;
-		} else if (checkquest(7171,HUNTING) == 2) {
+	} else if (job_sha == 14 || job_sha == 15 || job_sha == 16) {
+		if (checkquest(7171,HUNTING) == 2) {
 			mes "You can't feel the soul from the flame.";
 			mes "When you go closer, you can't see well because of darkness.";
 			close2;
-			set job_sha,13;
-			erasequest 7171;
 			warp "job3_sha01",22,33;
 			end;
 		}
-	} else if (job_sha == 13) {
-		mes "You can't feel the soul from the flame.";
-		mes "When you go closer, you can't see well because of darkness.";	
-		close2;
-		warp "job3_sha01",22,33;
-		end;
-	} else if (job_sha > 13 && job_sha < 28) {
-		mes "The flame is rolling.";
-		mes "You can't see well because of the light of ice.";
+		mes "[Shadow of Illusion]";
+		mes "Huhu.";
+		mes "What's wrong?";
+		mes "You couldn't find the half of my soul?";
+		mes "Huhu...";
+		next;
+		mes "[Shadow of Illusion]";
+		mes "Ah, hurry and give me rest.";
+		mes "I want to die softly.";
+		mes "I want to give up the phony life.";
+		next;
+		mes "[Shadow of Illusion]";
+		mes "Huhu...";
+		mes "When the false shadow is gone, you can see the truth.";
+		mes "Please, tear the false to dazzle who are blind...";
+		mes "Without any trace...";
 		close;
 	}
-	mes "An unknown red flame is roaring.";
+	mes "The flame is rolling.";
+	mes "You can't see well because of the light of ice.";
 	close;
 }
 
-niflheim,230,276,5	script	Red Flame#H-21	802,{
-	if (job_sha == 18) {
+niflheim,230,276,1	script	Red Flame#sc_f03	802,{
+	if (job_sha < 21) {
+		mes "That's a mysterious flame.";
+		mes "It looks like cursing.";
+		mes "Go away form that.";
+		close;
+	}
+	else if (job_sha == 21) {
 		mes "["+strcharinfo(0)+"]";
 		mes "The poem that Haled told me was pointing to Niflheim.";
 		mes "There is a flame that looks like the one from turtle island and ice dungeon.";
@@ -1247,7 +1856,8 @@ niflheim,230,276,5	script	Red Flame#H-21	802,{
 		mes "Can you play the waltz of death for me?";
 		next;
 		mes "[Someone's voice]";
-		mes "I don't to be subject to restraint and be with sign of dead people.";
+		mes "I don't to be subject to restraint";
+		mes "and be with sign of dead people.";
 		next;
 		mes "[Shadow of Pleasure]";
 		mes "I'm a shadow.";
@@ -1256,119 +1866,118 @@ niflheim,230,276,5	script	Red Flame#H-21	802,{
 		next;
 		mes "[Shadow of Pleasure]";
 		mes "The soul got tangled by cold chains";
-		mes "I can't see the dream and the shadow lost the pleasure that will be lasting forever.";
+		mes "I can't see the dream";
+		mes "and the shadow lost the pleasure that will be lasting forever.";
 		next;
 		mes "[Shadow of Pleasure]";
 		mes "Please, help me.";
-		mes "Give me two hands to escape from here!";
+		mes "Give me two hands to";
+		mes "escape from here!";
 		next;
 		mes "[Shadow of Pleasure]";
 		mes "Can you stifle me with two hands?";
-		mes "The other side of my senses gas for breath.";
+		mes "The other side of my senses";
+		mes "gas for breath.";
 		next;
 		mes "[Shadow of Pleasure]";
 		mes "That's the evidence that I live.";
 		mes "That's the evidence that I cross over the line.";
-		mes "With start of life the last pleasure.";
+		mes "With start of life";
+		mes "the last pleasure.";
 		next;
 		mes "[Shadow of Pleasure]";
-		mes "Show me the sweet death.";
+		mes "Show me the";
+		mes "sweet death.";
 		next;
-		erasequest 7174;
-		setquest 7175;
-		set job_sha,19;
 		mes "The flame is dying.";
 		mes "You should handle the shadow of pleasure.";
+		set job_sha,22;
+		erasequest 7174;
+		setquest 7175;
 		close;
-	} else if (job_sha == 19) {
-		if (checkquest(7175,HUNTING) != 2) {
-			mes "You can feel a strong soul in the flame.";
-			mes "You should handle the shadow of pleasure.";
-			close;
-		} else if (checkquest(7175,HUNTING) == 2) {
+	} else if (job_sha == 22) {
+		if (checkquest(7175,HUNTING) == 2) {
 			mes "You can't feel the soul from the flame.";
 			mes "When you go closer, you can't see well because of darkness.";
-			set job_sha,20;
+			set job_sha,23;
 			erasequest 7175;
 			close2;
 			warp "job3_sha01",73,87;
 			end;
 		}
-	} else if (job_sha == 20) {
+		mes "You can feel a strong soul in the flame.";
+		mes "You should handle the shadow of pleasure.";
+		close;
+	} else if (job_sha == 23 || job_sha == 24) {
 		mes "You can't feel the soul from the flame.";
 		mes "When you go closer, you can't see well because of darkness.";
 		close2;
 		warp "job3_sha01",73,87;
 		end;
-	} else if (job_sha > 21 && job_sha < 27) {
-		mes "There is a flame.";
-		mes "You can't feel anything from it.";
-		close;
 	}
-	mes "That's a mysterious flame.";
-	mes "It looks like cursing.";
-	mes "Go away from that";
+	mes "There is a flame.";
+	mes "You can't feel anything from it.";
 	close;
 }
 
-tha_t01,149,228,0	script	#shadowc07	45,1,1,{
-	if ((Class == Job_Rogue || Class == Job_Stalker || Class == Job_Baby_Rogue) && job_sha == 24){
-		mes "You can feel weird power.";
-		mes "You are getting dizzy.";
-		close2;
-		warp "job3_sha01",71,36;
-		end;
+// Boxes
+//============================================================
+job3_sha01,22,78,0	script	????#keybox01	844,{
+	if (checkweight(1201,1) == 0) {
+		mes "- You can't continue on in this quest because you are overweight. -";
+		close;
 	}
-	mes "You can feel weird power.";
-	mes "You don't know what it is.";
-	close;
-}
-
-job3_sha01,22,78,5	script	????#H-22	844,{
 	if (job_sha == 7) {
-		setarray .@Codes1$[1],"EFDFJWF","FGEGKXG","GHFHLYH","HIGIMZI","IJHJNAJ","JKIKOBK","KLJLPCL","LMKLQDM";
-		setarray .@Codes2$[1],"IPOFTUZ","JQPGUVA","IRQHVWB","LSRIWXC","MTSJXYD","NUTKYZE","OVULZAF","PWVMABG";
-		set @job_sc_chest1,rand(1,8);		
 		mes "It's a small box made of a hard turtle's shell.";
 		mes "The middle of it...";
 		next;
 		select("Touch the middle.:Push the middle.");
 		mes "When you touch it, something comes out!";
 		next;
-		mes "DECEIVE";
+		setarray .@Codes1$[1],"EFDFJWF","FGEGKXG","GHFHLYH","HIGIMZI","IJHJNAJ","JKIKOBK","KLJLPCL","LMKMQDM";
+		setarray .@Codes2$[1],"IPOFTUZ","JQPGUVA","KRQHVWB","LSRIWXC","MTSJXYD","NUTKYZE","OVULZAF","PWVMABG";
+		set .@i, rand(1,8);
+		mes " ";
+		mes " ";
+		mes " DECEIVE";
 		next;
-		mes ""+@job_sc_chest1;
+		mes " ";
+		mes " ";
+		mes " "+.@i;
 		next;
-		mes .@Codes1$[@job_sc_chest1];
+		mes "";
+		mes "";
+		mes " "+.@Codes1$[.@i];
 		next;
 		mes "It shows some letters and numbers.";
 		mes " ";
-		mes "Deceive,";
-		mes "then "+@job_sc_chest1+",";
-		mes "and "+.@Codes1$[@job_sc_chest1]+".";
+		mes "Deceive.";
+		mes "Then "+.@i+".";
+		mes "And "+.@Codes1$[.@i]+".";
 		next;
 		select("What does it mean?");
 		mes "["+strcharinfo(0)+"]";
 		mes "Is it also code.";
-		mes "It must be a kind of rule of code?";
-		mes "Ah, something is shown again...?";
+		mes "It must be!";
+		mes "Ah, something is showing up again...?";
 		next;
 		mes "- You can see some letters on the turtle's shell. -";
 		next;
+		mes " ";
 		mes "HONESTY";
-		mes "And also letters. They are";
-		mes "blinking as if waiting for a code to be input.";
+		mes " ";
+		mes "And also letters. They are blinking as if waiting for a code to be input.";
 		next;
-		input .@sccst1$;
-		if (.@sccst1$ == .@Codes2$[@job_sc_chest1]) {
-			mes "When you put the correct";
-			mes "answer in there, the box opens.";
-			mes "There is a small key inside.";
+		input .@inputstr$;
+		if (.@inputstr$ == .@Codes2$[.@i] || .@inputstr$ == strtolower(.@Codes2$[.@i])) {
+			mes "When you put the correct answer in there,";
+			mes "the box is opened.";
+			mes "There is a small and fabulous key.";
 			next;
-			getitem 6266,1;
-			setquest 7165;
-			set job_sha,8;
 			mes "- You get the Key of Deception. -";
+			set job_sha,8;
+			getitem 6266,1; //Cheat_Key
+			setquest 7165;
 			close;
 		}
 		mes "- You put the answer -";
@@ -1378,24 +1987,29 @@ job3_sha01,22,78,5	script	????#H-22	844,{
 	}
 	mes "You don't have to stay in here.";
 	next;
-	switch(select("Go outside.:Stay here.")) {
-		case 1: warp "tur_dun03",42,204;
-		case 2: close;
-	}
+	if(select("Go outside.:Stay here.") == 1)
+		warp "tur_dun03",40,201;
+	close;
 }
 
-job3_sha01,25,28,5	script	????#H-23	844,{
-	if (job_sha == 13) {
-		setarray .@Words$[1],"SEED","FOOT","COLD";
-		setarray .@Numbers[1],24,25,20;
-		mes "There are lots of boxes";
-		mes "with numbers on them.";
-		next;
-		mes "1 2 3 4 5";
-		mes "6 7 8 9 0";
-		mes " [][]";
-		next;
-		mes "When you touched that number, it moved.";
+job3_sha01,25,28,0	script	????#keybox02	844,{
+	if (checkweight(1201,1) == 0) {
+		mes "- You can't continue on in this quest because you are overweight. -";
+		close;
+	}
+	setarray .@Words$[0],"SEED","FOOT","COLD";
+	setarray .@Numbers[0],24,25,20;
+	set .@i,job_sha-14;
+	if (job_sha > 13 && job_sha < 17) {
+		mes "There are lots of boxes.";
+		mes "with sort of numbers.";
+		next;
+		mes " 1 2 3 4 5";
+		mes " 6 7 8 9 0";
+		mes " ";
+		mes " [ ][ ] ";
+		next;
+		mes "When you touched that number, then it moved.";
 		mes "You find the empty space.";
 		next;
 		mes "["+strcharinfo(0)+"]";
@@ -1403,144 +2017,131 @@ job3_sha01,25,28,5	script	????#H-23	844,{
 		mes "I have two empty squares to put two numbers.";
 		mes "What will it be good for?";
 		next;
-		select("I think it's related to the word given by Paul.");
+		select("I think it's related with the word given by Paul.");
 		mes "["+strcharinfo(0)+"]";
-		mes "I got "+.@Words$[job_chest2]+".";
+		mes "I got "+.@Words$[.@i]+".";
 		mes "Now I have to convert it into a number...";
-		next;	
+		next;
 		switch(select("Input the answer.:I can't get it.")) {
-			case 1:
-				input .@sccst2;
-				if (.@sccst2 == .@Numbers[job_chest2]) {
-					mes "You put 2 and "+(.@Numbers[job_chest2]-20)+".";
-					mes "The box opens and you get one key.";
-					next;
-					mes "You picked up the Key of Illusion.";
-					next;
-					mes "["+strcharinfo(0)+"]";
-					mes "It's not a treasure.";
-					mes "The Key of Illusion? Is it related to the Shadow of Illusion?";
-					mes "I got the Key of Deception after I handled Deception...";
-					next;
-					getitem 6267,1;
-					setquest 7172;
-					set job_sha,14;
-					set job_chest2,0;
-					mes "["+strcharinfo(0)+"]";
-					mes "Anyway, Paul will be disappointed.";
-					mes "A key again....";
-					mes "How can I escape from here?";
-					next;
-					mes "When you push the box, it opens a door leading outside.";
-					close2;
-					warp "ice_dun02",209,219;
-					end;
-				}
-				mes "When you enter the number, it goes back to the first.";
-				close;
-			case 2:
+		case 1:
+			input .@input;
+			if (.@input == .@Numbers[.@i]) {
+				mes "You put 2 and "+(.@Numbers[.@i]-20)+".";
+				mes "The box opens and you get one key.";
+				next;
+				mes "You got the Key of Illusion.";
+				next;
 				mes "["+strcharinfo(0)+"]";
-				mes "Hmm.";
-				mes "I can't get it...";
-				mes "Is it the same code as the Prontera workplace...?";
+				mes "It's not a treasure.";
+				mes "The Key of Illusion? Is it related with the Shadow of Illusion?";
+				mes "I got the Key of Deception after I handled Deception...";
 				next;
 				mes "["+strcharinfo(0)+"]";
-				mes "According to that method...";
-				mes "A means 11 and B means 12.";
-				close;
+				mes "Anyway, Paul will be disappointed.";
+				mes "Key again...";
+				mes "How can I escape from here...?";
+				set job_sha,17;
+				getitem 6267,1; //Virtual_Key
+				erasequest 7171;
+				changequest 7168+.@i,7172;
+				next;
+				mes "When I push the box, it shows the door to go outside.";
+				close2;
+				warp "ice_dun02",209,219;
+				end;
+			}
+			mes "When you enter the number, it goes back to the first.";
+			close;
+		case 2:
+			mes "["+strcharinfo(0)+"]";
+			mes "Hmm.";
+			mes "I can't get it...";
+			mes "Is it the same code as the Prontera workplace...?";
+			next;
+			mes "["+strcharinfo(0)+"]";
+			mes "According to that method...";
+			mes "A means 11 and B means 12.";
+			close;
 		}
 	}
-	// Custom Translation
-	mes "The box engraved with mysterious pattern.";
-	mes "When you push the box, it opens a door leading outside.";
+	mes "It's a myterious box.";
+	mes "When I push the box, it shows the door to go outside.";
 	close2;
 	warp "ice_dun02",209,219;
 	end;
 }
 
-job3_sha01,73,80,5	script	????#H-24	844,{
-	if (job_sha == 20) {
-		mes "There is a box that looks like a house.";
-		mes "There's a small paper in the chimmney.";
-		next;
-		mes "It says:";
-		mes "-----------------";
-		mes "20 21 18 14";
-		mes "1 14 4";
-		mes "19 8 1 11 5";
-		mes "-----------------";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "I think it's another code.";
-		mes "I should solve it the same way as before.";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "There are no clues...";
-		mes "1 could equal A,";
-		mes "And the the answer is...";
-		next;
-		input .@sccst3$;
-		set job_sha,21;
-		if (.@sccst3$ != "TURN AND SHAKE") {
+job3_sha01,73,80,0	script	????#keybox03	844,{
+	if (checkweight(1201,1) == 0) {
+		mes "- You can't continue on in this quest because you are overweight. -";
+		close;
+	}
+	if (job_sha == 23 || job_sha == 24) {
+		if (job_sha == 23) {
+			mes "There is a box that looks like a house.";
+			mes "There's a small paper in the chimney.";
+			next;
+			mes "It says...";
+			mes "-----------------";
+			mes " 20 21 18 14";
+			mes " 1 14 4";
+			mes " 19 8 1 11 5";
+			mes "-----------------";
+			next;
 			mes "["+strcharinfo(0)+"]";
-			mes "..."+.@sccst3$+"....?";
-			mes "What does that mean?";
-			close;
+			mes "I think it's another code.";
+		} else {
+			mes "["+strcharinfo(0)+"]";
+			mes "Let me think again...";
+			mes "20 21 18 14";
+			mes "1 14 4 ";
+			mes "19 8 1 11 5";
+			mes "...";
 		}
-	} else if (job_sha == 21) {
-		mes "["+strcharinfo(0)+"]";
-		mes "Let me think again...";
-		mes "20 21 18 14";
-		mes "1 14 4";
-		mes "19 8 1 11 5";
 		next;
 		mes "["+strcharinfo(0)+"]";
 		mes "It's the same as before.";
 		mes "There's no code, so 1 should be A.";
 		mes "And the answer is...";
 		next;
-		input .@sccst3$;
-		if (.@sccst3$ != "TURN AND SHAKE") {
+		input .@inputstr$;
+		if (.@inputstr$ == "turn and shake" || .@inputstr$ == "TURN AND SHAKE") {
 			mes "["+strcharinfo(0)+"]";
-			mes "..."+.@sccst3$+"....?";
-			mes "Again? I don't get it.";
-			close;
-		}
-	}
-	if (job_sha == 21) {
-		mes "["+strcharinfo(0)+"]";
-		mes "Turn... Turn... and";
-		mes "Shake? Shake?";
-		mes "For what?";
-		next;
-	L_chest32:
-		switch(select("Turn the roof.:Turn the house.:Turn the handle.")) {
-			case 1:
-				mes "You turn the roof.";
-				next;
-				switch(select("Shake the roof.:Shake the house.")) {
+			mes "Turn... Turn... and";
+			mes "Shake? Shake?";
+			mes "For what?";
+			next;
+			while(1) {
+				switch(select("Turn the roof.:Turn the house.:Turn the handle.")) {
+				case 1:
+					mes "You turn the roof.";
+					next;
+					switch(select("Shake the roof.:Shake the house.")) {
 					case 1:
-						mes "Even though you shake the roof, nothing happens.";
+						mes "Even though you shake the roof but";
+						mes "nothing happens.";
 						next;
 						mes "["+strcharinfo(0)+"]";
 						mes "That's not it.";
 						mes "Hmm...";
 						next;
-						goto L_chest32;
+						break;
 					case 2:
-						mes "You tried to shake the house but it doesn't do anything.";
+						mes "You tried to shake the house but";
+						mes "it doesn't do anything.";
 						next;
 						mes "["+strcharinfo(0)+"]";
 						mes "It's wrong.";
-						mes "I'll put it back";
-						mes "and try again...";
+						mes "Put it back";
+						mes "and try it again.";
 						next;
-						goto L_chest32;
+						break;
 					}
-			case 2:
-				mes "You grab the whole house and turn it.";
-				next;				
-				switch(select("Shake up and down.:Shake back and forth.:Turn 'round and 'round and shake.:Roll it upside down.")) {
+					break;
+				case 2:
+					mes "You grab the whole house and turn it.";
+					next;
+					switch(select("Shake up and down.:Shake back and forth.:Turn 'round and 'round and shake.:Roll it upside down.")) {
 					case 1:
 					case 2:
 						mes "Nothing happens.";
@@ -1548,19 +2149,19 @@ job3_sha01,73,80,5	script	????#H-24	844,{
 						next;
 						mes "["+strcharinfo(0)+"]";
 						mes "That's not it.";
-						mes "Hmm.";
+						mes "Hmm...";
 						next;
-						goto L_chest32;
+						break;
 					case 3:
-						mes "You shake it slowly.";
-						mes "You can hear a noise,";
-						mes "but nothing's coming out.";
+						mes "You shake it slowly";
+						mes "you can hear a noise";
+						mes "But nothing's coming out.";
 						next;
 						mes "["+strcharinfo(0)+"]";
 						mes "That's not it.";
-						mes "Hmm.";
+						mes "Hmm...";
 						next;
-						goto L_chest32;
+						break;
 					case 4:
 						mes "Rolling it upside down causes something inside to move.";
 						next;
@@ -1570,763 +2171,302 @@ job3_sha01,73,80,5	script	????#H-24	844,{
 						next;
 						mes "- You got the Key of Pleasure. -";
 						next;
-						getitem 6268,1;
-						erasequest 7175;
-						setquest 7176;
-						set job_sha,22;
 						mes "["+strcharinfo(0)+"]";
 						mes "What? A key again!";
-						mes "Haled will be disappointed...";
-						mes "I better go back.";
+						mes "Haled will be disappointed.";
+						mes "I better to go back.";
+						set job_sha,25;
+						setquest 7176;
+						getitem 6268,1; //Mirth_Key
 						close;
+					}
+					break;
+				case 3:
+					mes "You tried to turn the small handle";
+					mes "but it doesn't work.";
+					next;
+					mes "["+strcharinfo(0)+"]";
+					mes "What should I do now?";
+					next;
+					break;
 				}
-			case 3:
-				mes "You tried to turn the small handle but it doesn't work.";
-				next;
-				mes "["+strcharinfo(0)+"]";
-				mes "What should I do now?";
-				next;
-				goto L_chest32;
+			}
 		}
+		mes "["+strcharinfo(0)+"]";
+		mes "..."+.@inputstr$+"...?";
+		if (job_sha == 23) {
+			mes "What does that mean?";
+			set job_sha,24;
+		} else
+			mes "Again? I don't get it.";
+		close;
 	}
 	mes "You don't have to stay in here.";
-	mes "You put the box down and see that there is a door leading outside.";
+	mes "You put the box down and see that there is a door to go outside.";
 	close2;
 	warp "niflheim",230,270;
 	end;
 }
 
-job3_sha01,72,28,5	script	????#H-25	844,{
-	if (countitem(6266) == 1 && countitem(6267) == 1 && countitem(6268) == 1) {
-		if (job_sha == 24) {
-			mes "There is a stone that looks like a small casket with a fabulous pattern around it.";
-			next;
-			mes "But you can't feel any power from it.";
-			mes "You find three holes in there.";
-			next;
-			mes "Inscribed next to the holes is written Deception, Illusion, and Pleasure.";
-			next;
-			select("Place the key in the holes.");
+job3_sha01,71,27,0	script	????#keybox04	844,{
+	if (checkweight(1201,1) == 0) {
+		mes "- You can't continue on in this quest because you are overweight. -";
+		close;
+	}
+	if (job_sha == 27) {
+		mes "There is a stone statue that looks";
+		mes "like a small casket with a fabulous pattern around it.";
+		next;
+		mes "But you can't feel any power from it.";
+		mes "You find three holes in there.";
+		next;
+		mes "Inscribed next to the holes is written";
+		mes "deception, illusion and pleasure.";
+		next;
+		select("Place the key in the holes.");
+		if (countitem(6266) && countitem(6267) && countitem(6268)) {
 			mes "["+strcharinfo(0)+"]";
 			mes "At first, Deception...";
 			mes "then Illusion...";
 			mes "and Pleasure...";
 			mes "Let me see.";
 			next;
-			mes "When you put the keys in, something comes out.";
+			mes "When you put the keys in";
+			mes "something comes out.";
 			next;
-			delitem 6266,1;
-			delitem 6267,1;
-			delitem 6268,1;
-			getitem 6269,1;
-			erasequest 7178;
-			setquest 7179;
-			set job_sha,25;
 			mes "- You got a brush with a fabulous pattern on it. -";
+			delitem 6266,1; //Cheat_Key
+			delitem 6267,1; //Virtual_Key
+			delitem 6268,1; //Mirth_Key
+			set job_sha,28;
+			getitem 6269,1; //Master_Brush
+			changequest 7178,7179;
 			next;
 			mes "["+strcharinfo(0)+"]";
 			mes "What???";
-			mes "A brush!!!";
+			mes "A brush!!!!";
 			mes "This isn't treasure!!!";
 			next;
 			mes "["+strcharinfo(0)+"]";
-			mes "Ahahhah!!!";
+			mes "Ahahhah!!!!";
 			mes "*sniff*";
 			mes "It's not treasure!";
 			next;
 			select("Now I'm pissed off.");
 			mes "["+strcharinfo(0)+"]";
 			mes "*Sigh*";
-			mes "Guess I should bring this to ^aaaaffVicente^000000!";
+			mes "Guess I should bring this to ^4d4dffVicente^000000!";
 			close;
 		}
+		mes "["+strcharinfo(0)+"]";
+		mes "I didn't bring all of the keys.";
+		mes "How could I be so stupid?";
+		close;
 	}
 	mes "It's an empty stone statue.";
 	close;
 }
 
-s_atelier,25,75,3	script	Manager#H-5	899,{
-	if (job_sha == 23) {
-		mes "[Vicente]";
-		mes "Welcome.";
-		mes "I've been waiting for you.";
-		next;
-		select("For me?");
-		mes "[Vicente]";
-		mes "I wondered when you would visit.";
-		mes "I've been waiting a long time for you.";
-		mes "Huhu...";
-		next;
-		mes "[Vicente]";
-		mes "How were Graham, Paul and Haled?";
-		mes "They are not easy people to deal with, huh?";
-		next;
-		select("You know everything?");
-		mes "[Vicente]";
-		mes "Sure.";
-		mes "They ignore me because they think that I'm too young.";
-		mes "As if they were all perfect.";
-		mes "Hahaha...";
-		next;
-		mes "[Vicente]";
-		mes "Did you bring all of the keys?";
-		mes "There should be three.";
-		mes "You came here to find out how to use them I assume, right?";
-		next;
-		select("Yeah, you're right!");
-		mes "[Vicente]";
-		mes "You don't have to be surprised.";
-		mes "I can't find how long it took for those three men to investigate before.";
-		mes "I already finished my work.";
-		next;
-		mes "[Vicente]";
-		mes "When I went to the final location I found a stone statue.";
-		mes "But it needed keys.";
-		next;
-		mes "[Vicente]";
-		mes "Three of them.";
-		mes "- Vicente smiles. -";
-		next;
-		mes "[Vicente]";
-		mes "At first, the information that was";
-		mes "given from the guild meant only one thing.";
-		mes "Because of the saying that they respect the right of our";
-		mes "possessions,";
-		mes "we shared our information.";
-		next;
-		mes "[Vicente]";
-		mes "So we had to wait for it.";
-		mes "I thought the last man would never give it to me...";
-		next;
-		mes "[Vicente]";
-		mes "They thought I wanted to have the treasure for myself.";
-		mes "So that's why I've just been";
-		mes "waiting for you.";
-		next;
-		mes "[Vicente]";
-		mes "Then let's make a point!";
-		mes "Do you know of the Thanatos Tower?";
+// Brush Shops
+//============================================================
+s_atelier,29,119,3	script	Max#sc05_prt	97,{
+	mes "[Max]";
+	mes "Welcome~";
+	if (Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser) {
+		mes "You are a member of the Rogue guild!";
+		mes "What can I help you with?";
 		next;
-		switch(select("Sure.:The tower of death?")) {
-			case 1:
-				mes "[Vicente]";
-				mes "You know that.";
-				mes "Then you can understand easily.";
-				next;
-				break;
-			case 2:
-				mes "[Vicente]";
-				mes "Yes, that tower in northern Juno.";
-				mes "There are huge monsters there.";
-				next;
-				break;
+		set .@i, select("I need a make-up brush.:I need a paint brush.:Nothing.");
+		mes "[Max]";
+		if (.@i == 1) setarray .@i[1],6121,1,10,100000;
+		else if (.@i == 2) setarray .@i[1],6122,2,30,200000;
+		else {
+			mes "If you need more";
+			mes "just visit me!";
+			close;
 		}
-		mes "[Vicente]";
-		mes "You told me that you went to the final place with the information?";
-		mes "That's the Thanatos Tower.";
-		next;
-		mes "[Vicente]";
-		mes "Fortunately, the location is the 1st floor of that tower.";
-		mes "So I'm going to tell what you have to do.";
-		next;
-		mes "[Vicente]";
-		mes "At the 1st floor of the Thanatos Tower, there are members from the Rekenber Corporation.";
-		mes "Go north from their desk...";
-		next;
-		mes "[Vicente]";
-		mes "And you can find stairs and a location where light comes out of.";
-		mes "That's the location of the";
-		mes "information that I have.";
-		next;
-		mes "[Vicente]";
-		mes "Now you know the location you have to go to with the three keys.";
-		mes "Find out the secret of the stone statue.";
-		next;
-		erasequest 7177;
-		setquest 7178;
-		set job_sha,24;
-		mes "[Vicente]";
-		mes "You can't imagine what kind of things you might find.";
-		mes "That's the final destination of all of the keys.";
-		next;
-		mes "[Vicente]";
-		mes "Good luck.";
-		close;
-	} else if (job_sha == 24) {
-		mes "[Vicente]";
-		mes "Listen carefully.";
-		mes "The location you need to find is";
-		mes "north from the middle of the 1st floor in the Thanatos Tower.";
-		mes "You can find stairs and a location where light comes out.";
-		next;
-		mes "[Vicente]";
-		mes "If you find something, come back here.";
-		mes "Actually, I want to get the key from you, but...";
-		next;
-		mes "[Vicente]";
-		mes "I just respect your opinion.";
-		mes "If you find something, come back here. Got it?";
-		close;
-	} else if (job_sha == 25) {
-		mes "[Vicente]";
-		mes "You're back?";
-		mes "Did you find anything?";
-		next;
-		switch(select("Throw the brush.:Grab him by the collar.:Drop the brush.")) {
-			case 1:
-				mes "[Vicente]";
-				mes "Hey, what are you doing?";
-				mes "This brush...";
-				mes "Is this the treasure hidden in the Thanatos Tower?";
-				next;
-				break;
-			case 2:
-				mes "[Vicente]";
-				mes "What's wrong with you?";
-				mes "You can't tell me more details?";
-				close;
-			case 3:
-				mes "[Vicente]";
-				mes "What's the matter?";
-				mes "Are you ok?";
-				next;
-				mes "- Vicente looks at me with a surprised face. -";
-				next;
-				select("Point at the brush.");
-				mes "[Vicente]";
-				mes "Is this the treasure hidden in thanatos tower?";
-				next;
-				break;
+		if (countitem(.@i[1])) {
+			mes "Are you kidding me?";
+			mes "You already have it?";
+			mes "You don't need anything else.";
+			next;
+			mes "[Max]";
+			mes "Visit later and use what you have!";
+			close;
 		}
-		mes "Vicente looks surprised after taking a look at it.";
-		next;
-		mes "[Vicente]";
-		mes "Haha!!";
-		mes "Ahahahaha!!!!!";
-		mes "I get it now!";
-		mes "Congratulations.";
-		next;
-		mes "[Vicente]";
-		mes "It's treasure.";
-		mes "You found a big treasure!";
-		mes "Talk to me for bit, won't you?";
-		next;
-		erasequest 7179;
-		setquest 7180;
-		set job_sha,26;
-		mes "[Vicente]";
-		mes "There is someone who has been waiting for you.";
-		mes "He's been waiting for someone to bring this brush back.";
-		mes "Let's go inside.";
-		close;
-	} else if (job_sha > 25 && job_sha < 28) {
-		mes "[Vicente]";
-		mes "I'm going to listen to your story.";
-		close;
-	} else if (Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser) {
-		mes "[Vicente]";
-		mes "I'm expecting your work from now on.";
-		mes "You'll be a good Shadow Chaser.";
-		mes "I'm sure of it.";
-		close;
-	}
-	mes "[Manager]";
-	mes "You are?";
-	mes "Sorry, but we don't trade old art goods.";
-	mes "If you need something, then ask an assistant.";
-	close;
-}
-
-s_atelier,73,65,3	script	Vicente#H-18	899,{
-	mes "[Vicente]";
-	if (job_sha > 25 && job_sha < 27) {
-		mes "This way.";
-		mes "He's been waiting for you for a while.";
-		mes "Not me, Dumk.";
-		close;
-	} else if (job_sha == 27) {
-		mes "Dumk wants to have you as a Shadow Chaser.";
-		mes "Big news, right?";
-		close;
-	} else if (Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser) {
-		mes "I don't have any special reason to visit here.";
-		mes "An assistant sells tools and paints.";
-		close;
-	}
-	mes "If you don't have anything special";
-	mes "to do here, you'd better leave.";
-	mes "No trespassing!";
-	close;
-}
-
-s_atelier,70,66,5	script	Dumk	481,{
-	mes "[Dumk]";
-	if ((Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser) && !countitem(6269)) {
-		mes "What is it?";
-		mes "Have you been enjoying your new skills?";
-		next;
-		mes "[Dumk]";
-		mes "If you want to improve your skills, you have to seek out new uses for paints.";
-		next;
-		mes "[Dumk]";
-		mes "Don't forget.";
-		mes "We are Shadow Chasers.";
-		mes "Huhu...";
-		mes "HuhuHuhu...";
-		close;
-	}
-	if (!countitem(6269)) {
-		if (Class == Job_Rogue || Class == Job_Stalker || Class == Job_Baby_Rogue) {
-			mes "Vicente, no soliciting!";
+		if (countitem(7150) >= .@i[2] && countitem(949) >= .@i[3] && Zeny >= .@i[4]) {
+			mes "Oh you brought all the things required.";
+			mes "Hold on a bit.";
 			next;
-			mes "[Vicente]";
-			mes "A solicitor?";
-			mes "I don't think so. That's our colleage.";
+			mes "[Max]";
+			mes "Here's what you need.";
 			next;
-			mes "[Dumk]";
-			mes "...Ah?";
+			mes "[Max]";
+			mes "Take it.";
+			mes "Good luck!";
+			delitem 7150,.@i[2]; //Bamboo_Cut
+			delitem 949,.@i[3]; //Feather
+			set Zeny, Zeny - .@i[4];
+			getitem .@i[1],1; //Makeover_Brush,Paint_Brush
 			close;
 		}
-		mes "........";
-		mes "Heh.";
-		next;
-		mes "[Vicente]";
-		mes "I'm sorry.";
-		mes "He is not interested in other people.";
-		mes "But you can't enter this space.";
-		mes "You can get tools at the store.";
-		close;
-	}
-	// Not sure if this is placed correctly...
-	if (BaseLevel != 99 || JobLevel < 50) {
-		mes "Sorry, but make sure that you're";
-		mes "Base Lvl. 99 / Job Lvl. 50 minimun and set all your Skillpoints.";
+		mes "Here's what you need to get a make-up brush.";
+		mes .@i[2]+" Bamboo Cut,";
+		mes .@i[3]+" Feather,";
+		mes "and "+.@i[0]+"00,000 zeny.";
 		close;
 	}
-	if (SkillPoint) {
-		mes "You are still green!";
-		mes "Did you expect to learn the dark arts with your ability?";
-		mes "You are wrong!";
-		next;
-		mes "[Vicente]";
-		mes "Haha...";
-		mes "Please, understand. Dumk has very bad communication skills.";
-		mes "He doesn't talk to anyone who isn't at a high enough level.";
-		next;
-		mes "[Vicente]";
-		mes "And to those who are not ready...";
-		mes "^aaaaffYou might not be ready for him.^000000";
-		next;
-		mes "[Dumk]";
-		mes "You talk too much.";
-		mes "Heh.";
-		next;
-		mes "[Vicente]";
-		mes "- He is pleased. -";
-		mes "Hey.";
-		mes "He could be ashamed.";
+	mes "We sell all art related things here~";
+	next;
+	switch(select("Paint!?:Where's the manager?")) {
+	case 1:
+		mes "[Max]";
+		mes "You are asking for paint?";
+		mes "Could you just ask them to get the paint?~";
 		close;
-	}
-	// Not sure if this is correct either...
-	if ((MaxWeight - Weight) < 1000) {
-		mes "Sorry, but you're overweight.";
-		mes "Please store some of your items first.";
+	case 2:
+		mes "[Max]";
+		mes "There's our manager.";
+		mes "Right over there.";
+		mes "**points**";
+		mes "Are you blind?";
 		close;
 	}
-	if (job_sha == 27) {
-		mes "So, do you want me to keep talking about Shadow Chasers?";
-		next;
-		switch(select("What is a Shadow Chaser?:Change me to Shadow Chaser.:I'll come back later.")) {
-			case 1:
-				mes "[Dumk]";
-				mes "Most spells are exclusively for Wizards and their kind.";
-				mes "But Knight has since been able to use a kind of magic with things called Runes.";
-				next;
-				mes "[Dumk]";
-				mes "So we tried finding a medium for spells that suit our characteristics.";
-				next;
-				mes "[Dumk]";
-				mes "So finally...";
-				mes "We found paint!";
-				next;
-				mes "[Dumk]";
-				mes "Paint gives us lots of feelings.";
-				mes "We can feel peaceful and happy or it can give us feelings of sorrow and fear.";
-				next;
-				mes "[Dumk]";
-				mes "We use that to harness the different emotions of people and exploit them when they're most vulnerable.";
-				next;
-				mes "[Dumk]";
-				mes "The effects on our enemies are similar to that of magic spells.";
-				next;
-				mes "[Dumk]";
-				mes "For instance, this power could be used to create blackholes to make your enemies vanish.";
-				next;
-				mes "[Dumk]";
-				mes "So if you want to have that power then you must have artistry.";
-				next;
-				mes "[Dumk]";
-				mes "You have to be a trendsetter when it comes to fashion!";
-				mes "The ability to understand art!";
-				mes "You should have everything.";
-				next;
-				select("Then what is the Master Brush?");
-				mes "[Dumk]";
-				mes "Ah?";
-				mes "That was a brush who was a master of dark arts.";
-				mes "Now we are looking for someone who can be Shadow Chaser.";
-				next;
-				mes "[Dumk]";
-				mes "This is kind of game.";
-				mes "If there is someone who wants to become a Shadow Chaser,";
-				mes "we just look the process to find this brush.";
-				next;
-				mes "[Dumk]";
-				mes "We put the codes to make sure that you can think outside of the box.";
-				mes "Did you have fun?";
-				close;
-			case 2:
-				mes "[Dumk]";
-				mes "You decided!";
-				mes "As your case, you can master the art of psychological warfare using paint!";
-				mes "The art created is beautiful but dangerous.";
-				next;
-				mes "[Dumk]";
-				mes "We use paint as a medium for spells.";
-				mes "We use that to harness the different emotions of people and exploit them when they're most vulnerable.";
-				next;
-				mes "[Dumk]";
-				mes "For instance, this power could be used to create blackholes to make your enemies vanish.";
-				next;
-				mes "[Dumk]";
-				mes "So if you want to have that power then you must have artistry.";
-				next;
-				mes "[Dumk]";
-				mes "You have to be a trendsetter when it comes to fashion!";
-				mes "The ability to understand art!";
-				mes "You should have everything.";
-				next;
-				mes "[Dumk]";
-				mes "You performed your duties diligently and found the brush.";
-				mes "So you are qualified to be a Shadow Chaser.";
-				next;
-				jobchange roclass(eaclass()|EAJL_THIRD);
-				set JobLevel, 1;
-				nude;
-				getitem 6121,1;
-				getitem 6122,1;
-				getitem 2795,1;
-				getitem 5750,1;
-				delitem 6269,1;
-				mes "[Dumk]";
-				mes "Congratulations.";
-				mes "Welcome to your new life.";
-				completequest 7180;
-				set job_sha,28;
-				next;
-				mes "[Dumk]";
-				mes "It's a fashionable uniform.";
-				mes "It uses patterns of leopard and feathers.";
-				mes "The fashion world will be shocked.";
-				next;
-				mes "[Dumk]";
-				mes "This shadow peacock I designed myself.";
-				mes "It's too hard to create something that absorbs my art sense.";
-				mes "Then about this part...";
-				next;
-				mes "Dumk keeps talking about fashion, art sense, paint and feeling.";
-				mes "He's obviously in his own world.";
-				next;
-				select("About this brush...");
-				mes "[Vicente]";
-				mes "Ah, I'll explain.";
-				mes "We need tools for painting.";
-				next;
-				mes "[Vicente]";
-				mes "The make-up brush is used for face painting.";
-				mes "You can get paint from the workplace.";
-				next;
-				mes "[Vicente]";
-				mes "The paint brush is used for painting big spaces.";
-				mes "You can get paint from the workplace too.";
-				next;
-				mes "[Vicente]";
-				mes "Don't you remember the location of the workplace?";
-				mes "Juno, Prontera, Rachel and Lighthalzen.";
-				next;
-				mes "[Vicente]";
-				mes "If you need paint, go to an assistant.";
-				mes "^aaaaffIf you don't have any tools, you can use skill needed paints.^000000";
-				next;
-				mes "[Vicente]";
-				mes "Congratulations to be our person.";
-				close;
-			case 3:
-				mes "[Dumk]";
-				mes "What?";
-				mes "Why not?";
-				mes "You don't want to be a Shadow Chaser?";
-				mes "I can teach you so much about painting.";
-				next;
-				mes "[Dumk]";
-				mes "You really won't understand until you become one.";
-				next;
-				mes "[Dumk]";
-				mes "Don't you want to learn how to harness a power stronger than what you know?";
-				mes "....";
-				next;
-				mes "Dumk seemed to be disappointed that you didn't answer him.";
-				close;
-		}
-	}
-	mes "It's you? You are the one who found the brush?";
-	next;
-	select("Show the brush to him.");
-	mes "[Dumk]";
-	mes "That's it.";
-	mes "Did you find it by yourself?";
-	next;
-	switch(select("Yes.:With my friends.")) {
-		case 1:
-			mes "[Dumk]";
-			mes "Hmm...";
-			mes "You have a high ability.";
-			mes "Breaking the codes should have been tough.";
-			mes "But it wasn't for you.";
-			next;
-			break;
-		case 2:
-			mes "[Dumk]";
-			mes "Hmm...";
-			mes "That's your other skill.";
-			mes "People who have no friends must be lonely.";
-			next;
-			mes "[Dumk]";
-			mes "To us, relationships are very important.";
-			mes "You get more people, you get more help.";
-			next;
-			break;
-		}
-	mes "[Dumk]";
-	mes "It's time to introduce myself.";
-	mes "I'm Dumk.";
-	next;
-	select("You are.....");
-	mes "[Vicente]";
-	mes "Chicken! How about the chicken for this supper?";
-	next;
-	mes "[Dumk]";
-	mes "Why chicken?";
-	mes "Why are you interrupting?";
-	mes "You wanna be fired?";
-	next;
-	mes "[Vicente]";
-	mes "Sorry...";
-	mes "(He turns to you and says it's taboo to talk about chicken.)";
-	next;
-	mes "[Dumk]";
-	mes "Anyway, let's make a point.";
-	mes "You.";
-	mes "Will you yield to the will of the brush?";
-	next;
-	select("Yield to? What?");
-	mes "[Dumk]";
-	mes "This brush was used by the master.";
-	mes "Paintings by him have mysterious power.";
-	next;
-	mes "[Dumk]";
-	mes "I can't tell you the root of the power.";
-	mes "Someday you will find out.";
-	mes "He sublimates power through the medium of his paintings.";
-	next;
-	select("I don't get it...?");
-	mes "[Dumk]";
-	mes "We walk in darkness without moonlight.";
-	mes "And find out our shining days are over.";
-	next;
-	mes "[Dumk]";
-	mes "We follow to other shadows and we can be real Shadow Chasers!";
-	next;
-	select("What are you talking about?");
-	mes "[Vicente]";
-	mes "So, he suggests that you become a Shadow Chaser.";
-	next;
-	mes "[Vicente]";
-	mes "In out guild, there is a special group that have unique skills.";
-	mes "They are Shadow Chasers.";
-	mes "They usually hide their figure and they think they are different from others.";
-	next;
-	mes "[Dumk]";
-	mes "Don't be so sarcastic, Vicente!";
-	mes "I told you.";
-	mes "You are qualified to be a Shadow Chaser!";
-	next;
-	mes "[Dumk]";
-	mes "Give that brush to me.";
-	mes "I need it again.";
-	mes "I'm so thirsty.";
-	mes "Wait a minute.";
-	set job_sha,27;
-	close;
 }
 
-s_atelier,29,119,3	script	Max#H-13	97,{
-	mes "[Max]";
-	mes "Welcome~";
+s_atelier,136,70,3	script	Titika#sc09_ra	914,{
+	mes "[Titika]";
+	mes "Welcome.";
 	if (Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser) {
-		mes "You are a member of the Rogue guild!";
+		mes "You are in a guild.";
 		mes "What can I help you with?";
 		next;
-		switch(select("I need a make-up brush.:I need a paint brush.:Nothing.")) {
-			case 1:
-				set .@i,1;
-			case 2:
-				mes "[Max]";
-				if (countitem(6122-.@i)) {
-					mes "Are you kidding me?";
-					mes "you already have it? you don't need anything else.";
-					next;
-					mes "[Max]";
-					mes "Visit later and use what you have!";
-					close;
-				}
-				mes "Here's your item.";
-				getitem (6122-.@i),1;
-				close;
-			case 3:
-				mes "[Max]";
-				mes "If you need more,";
-				mes "just visit me!";
-				close;
+		set .@i, select("Make a new make-up brush.:Make a new paint brush.:Nothing.");
+		mes "[Titika]";
+		if (.@i == 1) setarray .@i[1],6121,1,10,100000;
+		else if (.@i == 2) setarray .@i[1],6122,2,30,200000;
+		else {
+			mes "Visit me again.";
+			close;
 		}
-	}
-	mes "We sell all art related things here~";
-	next;
-	switch(select("Paint!?:Where's the manager?")) {
-		case 1:
-			mes "[Max]";
-			mes "You are asking for paint?";
-			mes "Could you just ask them to get the paint?~";
+		if (countitem(.@i[1])) {
+			mes "You already have a paint brush?";
+			mes "I think it's enough...";
 			close;
-		case 2:
-			mes "[Max]";
-			mes "There's our manager.";
-			mes "Right over there.";
-			mes "**points**";
-			mes "Are you blind?";
+		}
+		if (countitem(7150) >= .@i[2] && countitem(949) >= .@i[3] && Zeny >= .@i[4]) {
+			mes "You brought all the materials.";
+			mes "I'll exchange it with the goods that I made.";
+			delitem 7150,.@i[2]; //Bamboo_Cut
+			delitem 949,.@i[3]; //Feather
+			set Zeny, Zeny - .@i[4];
+			getitem .@i[1],1; //Makeover_Brush,Paint_Brush
 			close;
+		}
+		mes "To make a paint brush,";
+		mes "you need "+.@i[2]+" Bamboo Cut,";
+		mes .@i[3]+" Feathers,";
+		mes "and "+.@i[0]+"00,000 zeny.";
+		close;
+	}
+	mes "This is the Shadow Chaser workplace~";
+	next;
+	switch(select("Where is the paint?:Where is the manager?")) {
+	case 1:
+		mes "[Titika]";
+		mes "You mean paint?";
+		mes "Talk to the assistant and ask about the paint tool.";
+		close;
+	case 2:
+		mes "[Titika]";
+		mes "My manager is inside of the workplace.";
+		mes "If you visit him without a special reason, he will ignore you.";
+		close;
 	}
 }
 
-s_atelier,124,128,3	script	RimiGX#H-14	862,{
+s_atelier,124,128,3	script	RimiGX#sc07_yuno	862,{
 	mes "[RimiGX]";
 	mes "Welcome.";
 	if (Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser) {
 		mes "What are you looking for?";
 		next;
-		switch(select("Make a new blush for make-up.:Make a new blush for painting:Nothing.")) {
-			case 1:
-				set .@i,1;
-			case 2:
-				mes "[RimiGX]";
-				if (countitem(6122-.@i)) {
-					mes "I can't offer extra stuff.";
-					mes "Visit here when you've lost stuff.";
-					close;
-				}
-				mes "Here's your item.";
-				getitem (6122-.@i),1;
-				close;
-			case 3:
-				mes "[RimiGX]";
-				mes "Visit me again.";
-				close;
+		set .@i, select("Make a new blush for make-up.:Make a new blush for painting.:Nothing.");
+		mes "[RimiGX]";
+		if (.@i == 1) setarray .@i[1],6121,1,10,100000;
+		else if (.@i == 2) setarray .@i[1],6122,2,30,200000;
+		else {
+			mes "Visit me again.";
+			close;
 		}
-	}
-	mes "It's the shadow workplace~";
-	next;
-	switch(select("Where is the paint?:Where is the manager?")) {
-		case 1:
-			mes "[RimiGX]";
-			mes "Paint?";
-			mes "Ask an assistant that works over there.";
+		if (countitem(.@i[1])) {
+			mes "I can't offer extra stuff.";
+			mes "Visit here when you lost stuff.";
 			close;
-		case 2:
-			mes "[RimiGX]";
-			mes "Manager? He's in inside the workplace.";
-			mes "But when you visit him, you should have something to tell him...";
+		}
+		if (countitem(7150) >= .@i[2] && countitem(949) >= .@i[3] && Zeny >= .@i[4]) {
+			mes "You brought stuff you need.";
+			mes "It will be fast when I exchange the stuff made?";
+			delitem 7150,.@i[2]; //Bamboo_Cut
+			delitem 949,.@i[3]; //Feather
+			set Zeny, Zeny - .@i[4];
+			getitem .@i[1],1; //Makeover_Brush,Paint_Brush
 			close;
+		}
+		mes "For blush to "+((.@i[0] == 1)?"make up":"paint");
+		mes "you need "+.@i[2]+" Bamboo Cut,";
+		mes .@i[3]+" Feather, and "+.@i[0]+"00,000 zeny.";
+		close;
 	}
-}
-
-s_atelier,136,70,3	script	Titika#H-15	914,{
-	mes "[Titika]";
-	mes "Welcome~";
-	if (Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser) {
-		mes "You are in a guild.";
-		mes "What can I help you with?";
-		next;
-		switch(select("Make a new make-up brush.:Make a new paint brush.:Nothing.")) {
-			case 1:
-				set .@i,1;
-			case 2:
-				mes "[Titika]";
-				if (countitem(6122-.@i)) {
-					mes "You already have a paint brush?";
-					mes "I think it's enough...";
-					close;
-				}
-				mes "Here's your item.";
-				getitem (6122-.@i),1;
-				close;
-			case 3:
-				mes "[Titika]";
-				mes "Visit me again.";
-				close;
-			}
-	}
-	mes "This is the Shadow Chaser workplace~";
+	mes "It's the shadow workplace~";
 	next;
 	switch(select("Where is the paint?:Where is the manager?")) {
-		case 1:
-			mes "[Titika]";
-			mes "You want paint?";
-			mes "Talk to the assistant and ask about the paint tool.";
-			close;
-		case 2:
-			mes "[Titika]";
-			mes "My manager is inside the workplace.";
-			mes "If you visit him without a special reason, he will ignore you.";
-			close;
+	case 1:
+		mes "[RimiGX]";
+		mes "Paint?";
+		mes "Ask an assistant who works over there.";
+		close;
+	case 2:
+		mes "[RimiGX]";
+		mes "Manager? He's in inside of the workplace.";
+		mes "But when you visit him, you should have something to tell him....";
+		close;
 	}
 }
-	
-s_atelier,26,68,3	script	Vito#H-16	904,{
+
+s_atelier,26,68,3	script	Vito#sc11_lgt	904,{
 	mes "[Vito]";
 	mes "Welcome.";
 	if (Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser) {
 		mes "What are you looking for?";
 		next;
-		switch(select("Make a new brush for make-up.:Make a new brush for painting.:Nothing.")) {
-			case 1:
-				set .@i,1;
-			case 2:
-				mes "[Vito]";
-				if (countitem(6122-.@i)) {
-					mes "We offer only one brush per person.";
-					mes "We can't give out extra brushes.";
-					close;
-				}
-				mes "[Vito]";
-				mes "Here's your item.";
-				getitem (6122-.@i),1;
-				close;
-			case 3:
-				mes "[Vito]";
-				mes "Whenever you need a brush, visit me.";
-				mes "See you!";
-				close;
-			}
+		set .@i, select("Make a new blush for make-up.:Make a new blush for painting.:Nothing.");
+		mes "[Vito]";
+		if (.@i == 1) setarray .@i[1],6121,1,10,100000;
+		else if (.@i == 2) setarray .@i[1],6122,2,30,200000;
+		else {
+			mes "Whenever you need a blush, visit me.";
+			mes "See you!";
+			close;
+		}
+		if (countitem(.@i[1])) {
+			mes "We offer only one blush to each person.";
+			mes "We can't offer extra blushes.";
+			close;
+		}
+		if (countitem(7150) >= .@i[2] && countitem(949) >= .@i[3] && Zeny >= .@i[4]) {
+			mes "You brought all what you need.";
+			mes "I'm going to exchange the blush I made before.";
+			delitem 7150,.@i[2]; //Bamboo_Cut
+			delitem 949,.@i[3]; //Feather
+			set Zeny, Zeny - .@i[4];
+			getitem .@i[1],1; //Makeover_Brush,Paint_Brush
+			close;
+		}
+		mes "For blush to "+((.@i[0] == 1)?"make up":"paint");
+		mes "you need "+.@i[2]+" Bamboo Cut,";
+		mes .@i[3]+" Feather, and "+.@i[0]+"00,000 zeny.";
+		close;
 	}
 	mes "It's the shadow workplace.";
 	next;
@@ -2343,7 +2483,24 @@ s_atelier,26,68,3	script	Vito#H-16	904,{
 	}
 }
 
+// Warp Portal
+//============================================================
+tha_t01,149,228,0	script	#shadowc02	45,2,2,{
+	end;
+OnTouch:
+	mes "You can feel weird power.";
+	if (BaseJob == Job_Rogue && job_sha == 27) {
+		mes "You are getting dizzy.";
+		close2;
+		warp "job3_sha01",71,36;
+		end;
+	}
+	mes "You don't know what it is.";
+	close;
+}
+
 // Quest Mob Spawn
-tur_dun03,0,0,0,0	monster	Shadow of Deception	2076,1,0,0
-ice_dun02,0,0,0,0	monster	Shadow of Illusion	2077,1,0,0
-niflheim,0,0,0,0	monster	Shadow of Pleasure	2078,1,0,0
\ No newline at end of file
+//============================================================
+tur_dun03,0,0,0,0	monster	Shadow of Deception	2076,1,1000,0,0
+ice_dun02,0,0,0,0	monster	Shadow of Illusion	2077,1,1000,0,0
+niflheim,0,0,0,0	monster	Shadow of Pleasure	2078,1,1000,0,0
\ No newline at end of file
diff --git a/npc/re/quests/eden/11-25.txt b/npc/re/quests/eden/11-25.txt
index 43dd5e8cb..4e5d95a4d 100644
--- a/npc/re/quests/eden/11-25.txt
+++ b/npc/re/quests/eden/11-25.txt
@@ -1,5 +1,5 @@
 //===== rAthena Script =======================================
-// Eden Group Quests - Mission [11 - 25]
+//= Eden Group Quests - Mission [11 - 25]
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
diff --git a/npc/re/quests/eden/26-40.txt b/npc/re/quests/eden/26-40.txt
index ec33d04f7..267cc0994 100644
--- a/npc/re/quests/eden/26-40.txt
+++ b/npc/re/quests/eden/26-40.txt
@@ -1,5 +1,5 @@
 //===== rAthena Script =======================================
-// Eden Group Quests - Mission [26 - 40]
+//= Eden Group Quests - Mission [26 - 40]
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
diff --git a/npc/re/quests/eden/41-55.txt b/npc/re/quests/eden/41-55.txt
index 2f9ba31b7..dfa5e2df5 100644
--- a/npc/re/quests/eden/41-55.txt
+++ b/npc/re/quests/eden/41-55.txt
@@ -1,5 +1,5 @@
 //===== rAthena Script =======================================
-// Eden Group Quests - Mission [41 - 55]
+//= Eden Group Quests - Mission [41 - 55]
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
diff --git a/npc/re/quests/eden/56-70.txt b/npc/re/quests/eden/56-70.txt
index b54b45382..79a6af3ec 100644
--- a/npc/re/quests/eden/56-70.txt
+++ b/npc/re/quests/eden/56-70.txt
@@ -1,5 +1,5 @@
 //===== rAthena Script =======================================
-// Eden Group Quests - Mission [56 - 70]
+//= Eden Group Quests - Mission [56 - 70]
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
diff --git a/npc/re/quests/eden/71-85.txt b/npc/re/quests/eden/71-85.txt
index b6b94e81f..e1f9b17a9 100644
--- a/npc/re/quests/eden/71-85.txt
+++ b/npc/re/quests/eden/71-85.txt
@@ -1,5 +1,5 @@
 //===== rAthena Script =======================================
-// Eden Group Quests - Mission [71 - 85]
+//= Eden Group Quests - Mission [71 - 85]
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
diff --git a/npc/re/quests/eden/86-90.txt b/npc/re/quests/eden/86-90.txt
index 19726d5ef..eea07144c 100644
--- a/npc/re/quests/eden/86-90.txt
+++ b/npc/re/quests/eden/86-90.txt
@@ -1,5 +1,5 @@
 //===== rAthena Script =======================================
-// Eden Group Quests - Mission [86 - 90]
+//= Eden Group Quests - Mission [86 - 90]
 //===== By: ==================================================
 //= Chilly
 //===== Current Version: =====================================
diff --git a/npc/re/quests/eden/91-99.txt b/npc/re/quests/eden/91-99.txt
index 8b9c33279..2e7e7dd28 100644
--- a/npc/re/quests/eden/91-99.txt
+++ b/npc/re/quests/eden/91-99.txt
@@ -1,5 +1,5 @@
 //===== rAthena Script =======================================
-// Eden Group Quests - Mission [91 - 99]
+//= Eden Group Quests - Mission [91 - 99]
 //===== By: ==================================================
 //= Chilly
 //===== Current Version: =====================================
diff --git a/npc/re/quests/eden/eden_common.txt b/npc/re/quests/eden/eden_common.txt
index 72c37ba72..1b05030c8 100644
--- a/npc/re/quests/eden/eden_common.txt
+++ b/npc/re/quests/eden/eden_common.txt
@@ -1,9 +1,9 @@
 //===== rAthena Script ======================================= 
-// Eden Group Quests - Common NPCs
+//= Eden Group Quests - Common NPCs
 //===== By: ================================================== 
 //= L0ne_W0lf
 //===== Current Version: ===================================== 
-//= 1.5
+//= 1.6
 //===== Compatible With: ===================================== 
 //= rAthena SVN
 //===== Description: ========================================= 
@@ -16,6 +16,7 @@
 //= 1.3 Some little optimization here and there. [Masao]
 //= 1.4 Updated to match the new Izlude Map. [Masao]
 //= 1.5 Added some missing Eden Group Teleport Officers. [Masao]
+//= 1.6 Added Izlude RE coordinates. [Euphy]
 //============================================================
 
 moc_para01,27,35,5	script	Secretary Lime Evenor	952,{
@@ -246,7 +247,7 @@ OnTouch:
 		case 3: warp "geffen",120,39; end;
 		case 4: warp "alberta",117,56; end;
 		case 5: warp "aldebaran",168,112; end;
-		case 6: warp "izlude",127,142; end;
+		case 6: if (checkre(0)) warp "izlude",134,118; else warp "izlude",127,142; end;
 		case 7: warp "prt_church",99,78; end;
 		case 8: warp "geffen_in",162,99; end;
 		case 9: warp "moc_prydb1",51,118; end;
diff --git a/npc/re/quests/eden/eden_quests.txt b/npc/re/quests/eden/eden_quests.txt
index 057566f76..a13375198 100644
--- a/npc/re/quests/eden/eden_quests.txt
+++ b/npc/re/quests/eden/eden_quests.txt
@@ -1,5 +1,5 @@
 //===== rAthena Script =======================================
-// Eden Group Quest - Quests NPCs
+//= Eden Group Quest - Quests NPCs
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
diff --git a/npc/re/quests/eden/eden_service.txt b/npc/re/quests/eden/eden_service.txt
index fef7597ca..041395861 100644
--- a/npc/re/quests/eden/eden_service.txt
+++ b/npc/re/quests/eden/eden_service.txt
@@ -1,5 +1,5 @@
 //===== rAthena Script =======================================
-// Eden Group Quests - Service NPCs
+//= Eden Group Quests - Service NPCs
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
diff --git a/npc/re/quests/quests_dicastes.txt b/npc/re/quests/quests_dicastes.txt
index b4a942a03..ddc87b114 100644
--- a/npc/re/quests/quests_dicastes.txt
+++ b/npc/re/quests/quests_dicastes.txt
@@ -3,7 +3,7 @@
 //===== By: ==================================================
 //= Gennosuke Kouga, Muad_Dib
 //===== Current Version: =====================================
-//= 1.8
+//= 1.8a
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
@@ -24,6 +24,7 @@
 //= 1.6 Fixed missing checks for quest: Sapha's Visit. [Joseph]
 //= 1.7 Updated to match the official script. [Joseph]
 //= 1.8 Optimized and fixed invalid checkquest. [Joseph]
+//= 1.8a Disabled "Fish Tails" until Izlude RE coordinates are found. [Euphy]
 //============================================================
 
 // Entrance
@@ -1026,7 +1027,7 @@ dic_in01,40,193,1	script	Papyrus#0001	453,{
 	else if (.@doc == 11) eldicastes_dp(12169,"Stem","There is nothing like Midgard plants in Manuk.","These plants are used for food and medicine and some are even poisonous.");
 	else if (.@doc == 12) eldicastes_dp(12170,"Pointed Scale","Stem from a bumpy life form. Research required as the usage is unknown.","");
 	else if (.@doc == 13) eldicastes_dp(12171,"Resin","Sap from an old tree collected and solidified. Very valuable in the human world.","");
-	else if (.@doc == 14) eldicastes_dp(12174,"Fish Tail","Humans eat meat called fish.","Can be used as important food supply for foreign adventurers visiting in the city.");
+	//else if (.@doc == 14) eldicastes_dp(12174,"Fish Tail","Humans eat meat called fish.","Can be used as important food supply for foreign adventurers visiting in the city.");
 	else if (.@doc == 15) eldicastes_dp(12175,"Worm Peeling","They say some Worm Peelings are valuable.","But this is based on the human's standard of value. Research required.");
 	else if (.@doc == 16) eldicastes_dp(12176,"Gill","There are Midgard creatures that live in the sea and breathe through gills.","Further research on their ecology will be useful.");
 	else if (.@doc == 17) eldicastes_dp(12177,"Tooth of Bat","Traces of a nocturnal creature unknown to Manuk. Not a strong creature from the size of its teeth.","");
@@ -1063,6 +1064,7 @@ dic_in01,40,193,1	script	Papyrus#0001	453,{
 	else if (.@doc == 48) eldicastes_dp(12211,"Feather","Warm hair as soft as downy hair.","Must be used for cold protection. Collectable throughout Midgard.");
 	else if (.@doc == 49) eldicastes_dp(12212,"Red Herb","Kind of medicinal red plant.","Humans use this to make recovery medicine. Plant worth researching.");
 	else if (.@doc == 50) eldicastes_dp(12213,"Carrot","Red colored plant. Pub owner requests it all the time. Worth research.","");
+	close;
 
 	function	eldicastes_dp	{
 		if (checkquest(getarg(0)) >= 0) {
@@ -1087,24 +1089,24 @@ dic_in01,25,187,0	duplicate(Document Package#main)	Document Package#0004	844
 //============================================================
 
 function	script	unknown_d	{
-		if (checkquest(getarg(0)) == -1) {
-			mes "You see some traces of digging";
-			close;
-		}
-		specialeffect2 310;
-		specialeffect2 830;
-		progressbar "ffff00",4;
-		erasequest getarg(0);
-		mes "You were able to find information on the Reptile Tongue";
-		specialeffect2 18;
-		getitem getarg(1),rand(1,4);
-		if (!rand(2)) {
-			next;
-			mes "In addition, you've obtained an unknown relic to report back to the Saphas";
-			specialeffect2 18;
-			getitem 6308,1; //Unidentified_Relic
-		}
+	if (checkquest(getarg(0)) == -1) {
+		mes "You see some traces of digging";
 		close;
+	}
+	specialeffect2 310;
+	specialeffect2 830;
+	progressbar "ffff00",4;
+	erasequest getarg(0);
+	mes "You were able to find information on the "+getitemname(getarg(1))+".";
+	specialeffect2 18;
+	getitem getarg(1),rand(1,4);
+	if (!rand(2)) {
+		next;
+		mes "In addition, you've obtained an unknown relic to report back to the Saphas.";
+		specialeffect2 18;
+		getitem 6308,1; //Unidentified_Relic
+	}
+	close;
 }
 prt_fild09,371,255,0	script	Reptile Tongues	844,{ unknown_d(12167,903); }
 prt_fild09,352,241,0	script	Scorpion Tails	844,{ unknown_d(12168,904); }
@@ -1113,7 +1115,7 @@ pay_fild02,105,113,0	script	Pointed Scales	844,{ unknown_d(12170,906); }
 pay_fild01,152,171,0	script	Resin	844,{ unknown_d(12171,907); }
 gef_fild01,104,111,0	script	Spawn	844,{ unknown_d(12172,908); }
 prt_fild08,299,332,0	script	Jellopy	844,{ unknown_d(12173,909); }
-izlude,132,136,0	script	Fish Tails	844,{ unknown_d(12174,1023); }
+//izlude,132,136,0	script	Fish Tails	844,{ unknown_d(12174,1023); }
 prt_fild05,303,169,0	script	Worm Peelings	844,{ unknown_d(12175,955); }
 iz_dun03,155,165,0	script	Gills	844,{ unknown_d(12176,956); }
 mjo_dun01,222,226,0	script	Tooth of Bat	844,{ unknown_d(12177,913); }