- Massive EOL normalization & 'svn:eol-style native' flag setting for all txt/conf/h/c files.

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

68 files changed, 63457 insertions, 63457 deletions

diff --git a/npc/quests/Lvl4_weapon_quest.txt b/npc/quests/Lvl4_weapon_quest.txt
index b3183c526..20ca80b3d 100644
--- a/npc/quests/Lvl4_weapon_quest.txt
+++ b/npc/quests/Lvl4_weapon_quest.txt
@@ -1,3615 +1,3615 @@
-//===== eAthena Script ======================================= 

-//= Grade A and Grade S weapon quests

-//===== By: ================================================== 

-//= Vicious_Pucca, Reddozen & MasterOfMuppets

-//===== Current Version: ===================================== 

-//= 1.21

-//===== Compatible With: ===================================== 

-//= eAthena SVN 3422+(Requires jA Script System)

-//===== Description: ========================================= 

-//= Grade A and Grade S weapon quests

-//===== Additional Comments: ================================= 

-//= 1.0 First Version, Credits goes to Vicious_Pucca for converting [MasterOfMuppets]

-//=     the quest from aegis format to eA format. Also thanks to 

-//=	reddozen for fixing bugs.

-//= 1.1 Many fixes to spelling, grammar, and sentence order. [Silent]

-//= 1.2 A small fix, thanks to vicious_pucca [MasterOfMuppets]

-//= 1.21 Fixing MoM's typos (Citrin -> Citrine) [erKURITA]

-//============================================================ 

-

-//---------------------------------------------------------------

-// Initialize the basic materials for easier reading/conversion 

-//---------------------------------------------------------------

-

--	script	lv4_weapon_init	-1,{

-OnInit:

-	set $@LV4_Citrine, 7295; // 7295,Citrine

-	set $@LV4_Turquoise, 7294; // 7294,Turquoise

-	set $@LV4_Agate, 7291; // 7291,Agate

-	

-	set $@LV4_Muscovite, 7292; // 7292,Muscovite

-	set $@LV4_Biotite, 7297; // 7297,Biotite

-	set $@LV4_Pyroxene, 7296; // 7296,Pyroxene

-	

-	set $@LV4_Phlogopite, 7290; // 7290,Phlogopite

-	set $@LV4_Olivine, 7289; // 7289,Peridot

-	set $@LV4_Rose_Quartz, 7293; // 7293,Rose_Quartz	

-	

-	set $@LV4_Gold, 969; // 969,Gold

-	set $@LV4_Steel, 999; // 999,Steel

-	set $@LV4_Emperium, 714; // 714,Emperium

-	set $@LV4_Hammer_Of_Blacksmith, 1005; // 1005,Hammer_of_Blacksmith

-	set $@LV4_Emperium_Anvil, 989; // 989,Emperium_Anvil

-	set $@LV4_Illusion_Flower, 710; // 710,Illusion_Flower

-	end;		

-}

-

-//---------------------------------------------------------------

-// Bazo, creates Immaterial Sword, Quadrille and Slash

-//---------------------------------------------------------------

-

-umbala.gat,117,285,3	script	Bazo	85,{

-	set @NowWeight, MaxWeight - Weight;

-	if (@NowWeight >= 3000) goto LV4_NOT_OW;

-	mes "- Wait a minute! -";

-	mes "- Currently you are overweight. -";

-	mes "- Please lighten your weight -";

-	mes "- and try again. -";

-	close;

-

-	

-LV4_NOT_OW:

-	if(lv4_weapon == 0) goto LV4_0;

-	if(lv4_weapon == 1) goto LV4_1;

-	if(lv4_weapon == 2) goto LV4_2;

-	if(lv4_weapon == 3) goto LV4_2;

-	if(lv4_weapon == 4) goto LV4_2;

-	if(lv4_weapon == 5) goto LV4_5;

-	if(lv4_weapon == 6) goto LV4_5;

-	if(lv4_weapon == 7) goto LV4_5;

-	if(lv4_weapon > 7) goto LV4_7;	

-	end; // shouldn't be here

-

-	

-LV4_0:

-	mes "[Bazo]";

-	mes "Hello, you are from outside, huh?";

-	mes "I can tell by your appearance.";

-	mes "Pleased to meet you. My name is Bazo Heburiech.";

-	mes "I am also from outside.";

-	next;

-	mes "[Bazo]";

-	mes "We must have been meant to meet each other.";

-	mes "If you don't mind, let me explain about this place for a while.";

-	mes "Umbala is adjacent to Nifflheim, the city of the dead.";

-	mes "Even at a first sight, I knew that";

-	mes "there is something about this village.";

-	next;

-	mes "[Bazo]";

-	mes "Due to that geographical trait,";

-	mes "this village was filled with evil power";

-	mes "that was influenced by the city of the dead.";

-	next;

-	mes "[Bazo]";

-	mes "The local people have learned";

-	mes "to manipulate the evil power for";

-	mes "producing specialties.";

-	next;

-	mes "[Bazo]";

-	mes "While staying here, I also have learned";

-	mes "some recipes. If you bring me materials,";

-	mes "I am willing to show you my skills.";

-	mes "How does that sound?";

-	next;

-	

-	switch( select( "Sounds good.", "No, thanks." ) ) {

-		case 1:

-			if(BaseLevel >= 70) goto L4_0_1;

-			

-			mes "[Bazo]";

-			mes "Err...I don't think that you are powerful";

-			mes "enough to handle my products.";

-			mes "They are charged with evil power.";

-			next;

-			mes "That means if their owners are not powerful";

-			mes "and not experienced enough,";

-			mes "they will drive the owners insane.";

-			mes "And I cannot do that to my friend.";

-			next;

-			mes "[Bazo]";

-			mes "Therefore, I want you to go back and level up first.";

-			mes "I will gladly expect you to come back when you are ready.";

-			break;

-L4_0_1:

-			mes "[Bazo]";

-			mes "Excellent! Let me tell you";

-			mes "the materials I need. I hope you will write them down.";

-			mes "There is not that many though.";

-			next;

-			mes "[Bazo]";

-			mes "I need 10 Gold, 50 Steel and 10 Emperium";

-			mes "as basic materials...";

-			mes "and you can enchant the product with a certain trait.";

-			mes "For that, I need some rare ores...";

-			next;

-			mes "[Bazo]";

-			mes "Please bring me 30 of either Citrine, Turquoise or Agate.";

-			mes "Each one of them possess their own attribute";

-			mes "and following by the ore you have brought,";

-			mes "my product will possess a special trait.";

-			next;

-			mes "[Bazo]";

-			mes "I wish you good luck...";

-			mes "I will wait for you!";

-			

-			set lv4_weapon, 1;

-			break;

-		case 2:

-			mes "[Bazo]";

-			mes "Oh, okay. That is fine with me.";

-			mes "By the way, don't you want to know how evil the city of the dead will be?";

-			mes "I do since that city influences so much of this village";

-			mes "with it's mysterious power, you know.";

-			break;			

-	}	

-	close;

-	

-

-

-//--------------------------------------------------

-//Gold, Steel, Emp Check + Choosing the gem

-//--------------------------------------------------

-LV4_1:

-	if(countitem($@LV4_Gold) < 10) goto LV4_1_FAIL;

-	if(countitem($@LV4_Steel) < 50) goto LV4_1_FAIL;

-	if(countitem($@LV4_Emperium) < 10) goto LV4_1_FAIL;

-

-	mes "[Bazo]";

-	mes "Oh...you have brought all the basic materials.";

-	mes "Now let me check what kind of rare ores";

-	mes "you have brought...";

-	next;

-	

-	if (countitem($@LV4_Citrine) >= 30 && countitem($@LV4_Turquoise) >= 30 && countitem($@LV4_Agate) >= 30) goto LV4_1_CTA;

-	if (countitem($@LV4_Citrine) >= 30 && countitem($@LV4_Turquoise) >= 30) goto LV4_1_CT;

-	if (countitem($@LV4_Citrine) >= 30 && countitem($@LV4_Agate) >= 30) goto LV4_1_CA;

-	if (countitem($@LV4_Turquoise) >= 30 && countitem($@LV4_Agate) >= 30) goto LV4_1_TA;

-	if (countitem($@LV4_Citrine) >= 30) goto LV4_1_C;

-	if (countitem($@LV4_Turquoise) >= 30) goto LV4_1_T;

-	if (countitem($@LV4_Agate) >= 30) goto LV4_1_A;

-	goto LV4_1_NOGEM;

-	end;

-

-

-LV4_1_CTA:	

-	mes "[Bazo]";

-	mes "Hahaha, I asked you to bring one kind not all of them.";

-	mes "You can only use one kind of ore.";

-	mes "Which one would you like to use?";

-	next;

-	

-	switch( select( "Citrine", "Turquoise", "Agate" ) ) {

-		case 1:

-			mes "[Bazo]";

-			mes "Citrine...okay. Before we start,";

-			set @gem, $@LV4_Citrine;

-			set @gemstring$,"Citrine";

-			break;

-		case 2:

-			mes "[Bazo]";

-			mes "Turquoise...okay. Before we start,";

-			set @gem, $@LV4_Turquoise;

-			set @gemstring$,"Turquoise";

-			break;

-		case 3:

-			mes "[Bazo]";

-			mes "Agate....okay. Before we start,";

-			set @gem, $@LV4_Agate;

-			set @gemstring$,"Agate";

-			break;

-	}

-	

-	goto LV4_1_PICK;

-	end; // shouldn't be here

-	

-	

-LV4_1_CT:

-	mes "[Bazo]";

-	mes "Hahaha, I asked you to bring one kind not two.";

-	mes "You can only use one kind of ore.";

-	mes "Which one would you like to use?";

-	next;

-	

-	switch( select( "Citrine", "Turquoise" ) ) {

-		case 1:

-			mes "[Bazo]";

-			mes "Citrine...okay. Before we start,";

-			set @gem, $@LV4_Citrine;

-			set @gemstring$,"Citrine";

-			break;

-		case 2:

-			mes "[Bazo]";

-			mes "Turquoise...okay. Before we start,";

-			set @gem, $@LV4_Turquoise;

-			set @gemstring$,"Turquoise";

-			break;

-	}

-	

-	goto LV4_1_PICK;

-	end; // shouldn't be here

-	

-

-LV4_1_CA:	

-	mes "[Bazo]";

-	mes "Hahaha, I asked you to bring one kind not two.";

-	mes "You can only use one kind of ore.";

-	mes "Which one would you like to use?";

-	next;

-	

-	switch( select( "Citrine", "Agate" ) ) {

-		case 1:

-			mes "[Bazo]";

-			mes "Citrine...okay. Before we start,";

-			set @gem, $@LV4_Citrine;

-			set @gemstring$,"Citrine";

-			break;

-		case 2:

-			mes "[Bazo]";

-			mes "Agate....okay. Before we start,";

-			set @gem, $@LV4_Agate;

-			set @gemstring$,"Agate";

-			break;

-	}

-	

-	goto LV4_1_PICK;

-	end; // shouldn't be here

-	

-	

-LV4_1_TA:	

-	mes "[Bazo]";

-	mes "Hahaha, I asked you to bring one kind not two.";

-	mes "You can only use one kind of ore.";

-	mes "Which one would you like to use?";

-	next;

-	

-	switch( select( "Turquoise", "Agate" ) ) {

-			case 1:

-				mes "[Bazo]";

-				mes "Turquoise...okay. Before we start,";

-				set @gem, $@LV4_Turquoise;

-				set @gemstring$,"Turquoise";

-				break;

-			case 2:

-				mes "[Bazo]";

-				mes "Agate....okay. Before we start,";

-				set @gem, $@LV4_Agate;

-				set @gemstring$,"Agate";

-				break;

-	}

-	

-	goto LV4_1_PICK;

-	end; // shouldn't be here

-	

-	

-LV4_1_C:

-	mes "[Bazo]";

-	mes "Citrine...okay. Before we start,";

-	set @gem, $@LV4_Citrine;

-	set @gemstring$,"Citrine";

-	goto LV4_1_PICK;

-	end; // shouldn't be here

-		

-		

-LV4_1_T:

-	mes "[Bazo]";

-	mes "Turquoise...okay. Before we start,";

-	set @gem, $@LV4_Turquoise;

-	set @gemstring$,"Turquoise";

-	goto LV4_1_PICK;

-	end; // shouldn't be here

-	

-	

-LV4_1_A:

-	mes "[Bazo]";

-	mes "Agate....okay. Before we start,";

-	set @gem, $@LV4_Agate;

-	set @gemstring$,"Agate";

-	goto LV4_1_PICK;

-	end; // shouldn't be here

-	

-	

-LV4_1_PICK:

-	mes "we must do one thing first.";

-	mes "That is, testing your luck.";

-	mes "As you already know,";

-	mes "I cannot guarantee you that we will succeed";

-	mes "to make one right away.";

-	next;

-	mes "[Bazo]";

-	mes "If we can raise your luck before we start,";

-	mes "we will be able to succeed.";

-	next;

-	mes "[Bazo]";

-	mes "Now you must be wondering what we";

-	mes "will do in order to increase your luck.";

-	mes "It is simple, we will play a mind-reading game.";

-	mes "I am going to think of one monster among 4 of my favorite ones,";

-	mes "you will guess what the monster is.";

-	next;

-	mes "[Bazo]";

-	mes "You must answer correctly at least";

-	mes "1 out of 5 times. It shouldn't be that difficult.";

-	mes "And if you fail to answer, we must do something else";

-	mes "to drive away your bad luck.";

-	next;

-	mes "[Bazo]";

-	mes "I will take 10 of the special ore you chose.";

-	mes "Well, I understand that it does not sound tempting";

-	mes "but let's think of it this way.";

-	mes "It is much better than wasting 30 ore";

-	mes "by failing to create the item, isn't it?";

-	next;

-	mes "[Bazo]";

-	mes "Okay, now I need some time to prepare...";

-	mes "Talk to you later!";

-	

-	if(countitem($@LV4_Gold) < 10) goto LV4_HACK;

-	if(countitem($@LV4_Steel) < 50) goto LV4_HACK;

-	if(countitem($@LV4_Emperium) < 10) goto LV4_HACK;

-	delitem $@LV4_Gold, 10;

-	delitem $@LV4_Steel, 50;

-	delitem $@LV4_Emperium, 10;

-	if(@gem == $@LV4_Citrine) set lv4_weapon, 2;

-	if(@gem == $@LV4_Turquoise) set lv4_weapon, 3;

-	if(@gem == $@LV4_Agate) set lv4_weapon, 4;	

-	close;

-

-

-LV4_1_NOGEM:

-	mes "[Bazo]";

-	mes "I seem to recall that I asked you to bring";

-	mes "30 of a special ore, Citrine, Turquoise, or Agate...";

-	mes "And I don't see any of them.";

-	mes "You must have forgot them. Please go get them too.";

-	close;

-

-

-LV4_1_FAIL:

-	mes "[Bazo]";

-	mes "Please bring me 10 Gold, 50 Steel and 10 Emperium";

-	mes "as basic materials...";

-	mes "and you can enchant the product with a certain trait.";

-	mes "For that, I need some rare ores...";

-	next;

-	mes "[Bazo]";

-	mes "Please bring me 30 of either Citrine, Turquoise or Agate.";

-	mes "Each one of them possess their own attribute";

-	mes "and using the ore you have brought,";

-	mes "my product will possess a special trait.";

-	next;

-	mes "[Bazo]";

-	mes "I wish you good luck...";

-	mes "I will wait for you!";

-	close;

-

-

-

-//--------------------------------------------------

-//Guessing Game

-//--------------------------------------------------

-LV4_2:

-	if(lv4_weapon == 2) set @gem, $@LV4_Citrine;

-	if(lv4_weapon == 3) set @gem, $@LV4_Turquoise;

-	if(lv4_weapon == 4) set @gem, $@LV4_Agate;

-	if(countitem(@gem) < 30) goto LV4_2_NOGEM; 

-	

-	mes "[Bazo]";

-	mes "Ok, you seem to be ready.";

-	mes "Let's get started.";

-	mes "My favorite monsters are Poring,";

-	mes "Hode, Obeaune, and Minorous.";

-	next;

-

-	set @dap, 0;

-	set @correct[0],1;

-	for( set @i, 1; @i <= 5; set @i, @i + 1 ) {

-		mes "[Bazo]";

-		

-		if(@i == 1) mes "Here's the 1st question. Guess what monster";

-		if(@i != 1) mes "Alright. Now guess what monster";

-		

-		mes "I have in my mind at this moment.";

-		next;

-

-		set @mons, rand(1, 4);		

-

-		switch( select( "Poring", "Hode", "Obeaune", "Minorous" ) ) {

-				case 1:

-					set @correct[@i], 1;

-					if(@mons == 1) set @dap, @dap + 1;

-					break;

-

-				case 2:

-					set @correct[@i], 2;

-					if(@mons == 2) set @dap, @dap + 1;

-					break;

-

-				case 3:

-					set @correct[@i], 3;

-					if(@mons == 3) set @dap, @dap + 1;

-					break;

-

-				case 4:

-					set @correct[@i], 4;

-					if(@mons == 4) set @dap, @dap + 1;

-					break;

-		}

-	}

-

-	mes "[Bazo]";

-	mes "Okay, let me give you answers for the questions.";

-	mes "I was thinking of the monsters in the order of";

-	next;

-	mes "[Bazo]";

-

-	for( set @i, 1; @i <= 5; set @i, @i + 1 ) {

-		if(@correct[@i] == 1) mes "Poring";

-		if(@correct[@i] == 2) mes "Hode";

-		if(@correct[@i] == 3) mes "Obeaune";

-		if(@correct[@i] == 4) mes "Minorous";

-	}

-

-	if(@dap < 1) goto LV4_2_FAIL;

-	

-	next;

-	mes "[Bazo]";

-	mes "You answered " + @dap + " times!";

-	mes "I must say you're amazing!";

-	mes "As I promised, I will make an Umbala specialty for you.";

-	mes "Please give me some time to prepare.";

-	mes "Talk to you later.";

-	

-	if(countitem(@gem) < 30) goto LV4_HACK;

-	delitem @gem, 30;

-	set lv4_weapon, lv4_weapon + 3;

-	close;

-	

-	

-LV4_2_FAIL:

-	if(countitem(@gem) < 10) goto LV4_HACK;

-	delitem @gem, 10;

-	

-	next;

-	mes "[Bazo]";

-	mes "Errr... I don't think you are good at reading";

-	mes "other people's minds. Or you had bad luck, I guess.";

-	mes "We cannot do that again unless";

-	mes "we drive away the bad luck.";

-	mes "Give me 10 " + @gemstring$ + ", that will do the job.";

-	next;

-	mes "[Bazo]";

-	mes "Well...if you want to do this mind-reading game again,";

-	mes "please come back with the materials.";

-	mes "I will wait here for you.";

-	close;

-

-

-LV4_2_NOGEM:

-	mes "[Bazo]";

-	mes "Errr...something doesn't feel right. We lack something...";

-	mes "Will you check the materials that you have brought?";

-	close;

-	

-	

-	

-//--------------------------------------------------

-//Weapon Creation

-//--------------------------------------------------

-LV4_5:

-	mes "[Bazo]";

-	mes "Great... now, let's do it!";

-	mes "Wish me luck...ah, I forgot to tell you this.";

-	mes "I cannot tell you what kind of product it will be. It is so random.";

-	mes "Let's wish that a good thing will come out, okay?";

-	next;

-	mes "- You feel unknown power start gathering in -";

-	mes "- the materials. It seems the materials are -";

-	mes "- absorbing all the evil power in the air. -";

-	next;

-	mes "- Then, the materials start merging into one -";

-	mes "- even though Bazo didn't touch them at all. -";

-	next;

-	mes "[Bazo]";

-	mes "Can you feel that? The materials are gathering";

-	mes "power at their own will.";

-	mes "They are out of my hand now. Let's wait and hope.";

-	next;

-	mes "- After a while, the air becomes calm -";

-	mes "- and you check the result. -";

-	next;

-	mes "[Bazo]";

-	mes "Ooooooh! It is done!";

-	mes "We have succeeded! Ah, it's amazing!";

-	mes "Did I tell you that it is really rare to succeed right away?";

-	mes "Yes, God must have listened to our prayers.";

-	mes "Oh, it is a weapon! It will be very useful to you.";

-	mes "Let's take a closer look...";

-	next;

-

-	mes "[Bazo]";

-

-	switch( lv4_weapon ) {

-		case 5:

-			mes "Immaterial Sword!";

-			getitem 1141, 1; // 1141,Immaterial_Sword

-			break;

-		case 6:

-			mes "it is Slash!";

-			getitem 1526, 1; // 1526,Slash

-			break;

-		case 7:

-			mes "it is Quadrille!";

-			getitem 1527, 1; // 1527,Quadrille

-			break;

-	}

-

-	set lv4_weapon, 0;

-	mes "This sword was born to be yours!";

-	mes "Congratulations and hopefully it will have a good use for you.";

-	next;

-

-	mes "[Bazo]";

-	mes "I feel so gratified. If you wish to have";

-	mes "another one, please feel free to visit me anytime.";

-	mes "Have a good travel!";

-	close;

-

-

-

-//--------------------------------------------------

-//Other Quests

-//--------------------------------------------------

-LV4_7:

-	mes "[Bazo]";

-	mes "Hmm...I feel something strange from you.";

-	mes "I regret to say that there is nothing I can do for you.";

-	mes "I hope you have a safe travel.";

-	close;

-	

-	

-	

-//--------------------------------------------------

-//Hack Attempt

-//--------------------------------------------------

-LV4_HACK:

-	mes "[Bazo]";

-	mes "Hmm. There seems to be a bit of problem.";

-	set lv4_weapon, 0;

-	logmes "[" +strcharinfo(0) + "] tried to hack LV4 quest.";

-	close;

-}

-

-//---------------------------------------------------------------

-// Hibilaithan, creates Mailbreaker, Swordbreaker and Slaughter

-//---------------------------------------------------------------

-

-umbala.gat,163,257,3	script	Hibilaithan	785,{

-	if(event_umbala < 3) goto LumWord;

-	set @NowWeight, MaxWeight - Weight;

-	if (@NowWeight >= 3000) goto LV4_NOT_OW;

-	mes "- Wait a minute! -";

-	mes "- Currently you are overweight. -";

-	mes "- Please lighten your weight -";

-	mes "- and try again. -";

-	close;

-

-	

-LV4_NOT_OW:

-	if(lv4_weapon == 0) goto LV4_0;

-	if(lv4_weapon == 8) goto LV4_8;

-	if(lv4_weapon == 9) goto LV4_9;

-	if(lv4_weapon == 10) goto LV4_9;

-	if(lv4_weapon == 11) goto LV4_9;

-	if(lv4_weapon == 12) goto LV4_12;

-	if(lv4_weapon == 13) goto LV4_12;

-	if(lv4_weapon == 14) goto LV4_12;

-	if(lv4_weapon < 8) goto LV4_7;

-	if(lv4_weapon > 14) goto LV4_7;	

-	end; // shouldn't be here

-	

-

-LumWord:

-		mes "[Hibilaithan]";

-		mes "Umba! Umbaba...umum! Baumba!";

-		mes "Umumumbababaumumbabaumba!";

-		mes "Umbaumbaumbaumbaumhah!";

-		mes "Umumumumumbababababab!";

-	close;

-

-	

-LV4_0:

-	mes "[Hibilaithan]";

-	mes "Haha, yeah, I knew this day would come.";

-	mes "Finally people recognize my value";

-	mes "as the best artisan in Umbala!";

-	next;

-	mes "[Hibilaithan]";

-	mes "Okay, let's talk straight.";

-	mes "I, Hibilaithan shall craft something nice";

-	mes "if you bring me materials!";

-	mes "Hahahahahaha!";

-	next;

-	mes "[Hibilaithan]";

-	mes "Eh? What? You didn't come to see me?";

-	mes "Stop joking around...Don't play me for a fool!";

-	mes "People are too shy to tell the truth nowadays!";

-	mes "Let's be honest and tell me if you want it or not.";

-	next;

-	

-	switch( select( "...okay.", "...sorry, I don't need it!" ) ) {

-		case 1:

-			if(BaseLevel >= 70) goto L4_0_1;

-			

-			mes "[Hibilaithan]";

-			mes "...what a shame! I regret to tell you this,";

-			mes "but your spirit is too weak";

-			mes "to handle the power of my stuff!";

-			mes "This is not good, not good at all!";

-			mes "Go and train yourself first.";

-			mes "When you become strong, you may come back!";

-			break;

-L4_0_1:

-			mes "[Hibilaithan]";

-			mes "Great! I like your attitute! Great, great!";

-			mes "I am going to tell you what I need.";

-			mes "It is not much, so do not forget.";

-			next;

-			mes "[Hibilaithan]";

-			mes "Bring me 10 Gold, 50 Steel and 10 Emperium";

-			mes "... as basic materials.";

-			mes "And I need some rare ores to endow power...";

-			next;

-			mes "[Hibilaithan]";

-			mes "Bring me 30 of one ore among Muscovite, Biotite or Pyroxene.";

-			mes "Remember you are going to bring 30 of one ore.";

-			mes "I cannot pick one among those because I am";

-			mes "not sure what will come out. Heh.";

-			next;

-			mes "[Hibilaithan]";

-			mes "Okay, wish you good luck!";

-			mes "Meanwhile I am going to chill here.";

-			

-			set lv4_weapon, 8;

-			break;

-		case 2:

-			mes "[Hibilaithan]";

-			mes "Bah~ what are you afraid of?";

-			mes "I am just trying to do you a favor, you know?";

-			mes "Alright, it is your call.";

-			mes "But if you change your mind,";

-			mes "feel free to come back.";

-			break;			

-	}	

-	close;

-	

-

-

-//--------------------------------------------------

-//Gold, Steel, Emp Check + Choosing the gem

-//--------------------------------------------------

-LV4_8:

-	if(countitem($@LV4_Gold) < 10) goto LV4_8_FAIL;

-	if(countitem($@LV4_Steel) < 50) goto LV4_8_FAIL;

-	if(countitem($@LV4_Emperium) < 10) goto LV4_8_FAIL;

-

-	mes "[Hibilaithan]";

-	mes "Oh...you have brought all the basic materials.";

-	mes "Now let me check what kind of rare ores";

-	mes "you have brought...";

-	next;

-	

-	if (countitem($@LV4_Muscovite) >= 30 && countitem($@LV4_Biotite) >= 30 && countitem($@LV4_Pyroxene) >= 30) goto LV4_8_MBP;

-	if (countitem($@LV4_Muscovite) >= 30 && countitem($@LV4_Biotite) >= 30) goto LV4_8_MB;

-	if (countitem($@LV4_Muscovite) >= 30 && countitem($@LV4_Pyroxene) >= 30) goto LV4_8_MP;

-	if (countitem($@LV4_Biotite) >= 30 && countitem($@LV4_Pyroxene) >= 30) goto LV4_8_BP;

-	if (countitem($@LV4_Muscovite) >= 30) goto LV4_8_M;

-	if (countitem($@LV4_Biotite) >= 30) goto LV4_8_B;

-	if (countitem($@LV4_Pyroxene) >= 30) goto LV4_8_P;

-	goto LV4_8_NOGEM;

-	end;

-

-

-LV4_8_MBP:	

-	mes "[Hibilaithan]";

-	mes "Gosh, did you brought all three kinds?";

-	mes "Hahaha, it's fine.";

-	mes "But we cannot use all of them this time.";

-	mes "Pick one that you want to use.";

-	next;

-			

-	switch( select( "Muscovite", "Biotite", "Pyroxene" ) ) {

-		case 1:

-			mes "[Hibilaithan]";

-			mes "Muscovite...okay. Before we start,";

-			set @gem, $@LV4_Muscovite;

-			set @gemstring$,"Muscovite";

-			break;

-		case 2:

-			mes "[Hibilaithan]";

-			mes "Biotite...okay. Before we start,";

-			set @gem, $@LV4_Biotite;

-			set @gemstring$,"Biotite";

-			break;

-		case 3:

-			mes "[Hibilaithan]";

-			mes "Pyroxene....okay. Before we start,";

-			set @gem, $@LV4_Pyroxene;

-			set @gemstring$,"Pyroxene";

-			break;

-	}

-	

-	goto LV4_8_PICK;

-	end; // shouldn't be here

-	

-	

-LV4_8_MB:

-	mes "[Hibilaithan]";

-	mes "Hahaha, I asked you to bring one kind not two.";

-	mes "You can only use one kind of ore.";

-	mes "Which one would you like to use?";

-	next;

-	

-	switch( select( "Muscovite", "Biotite" ) ) {

-		case 1:

-			mes "[Hibilaithan]";

-			mes "Muscovite...okay. Before we start,";

-			set @gem, $@LV4_Muscovite;

-			set @gemstring$,"Muscovite";

-			break;

-		case 2:

-			mes "[Hibilaithan]";

-			mes "Biotite...okay. Before we start,";

-			set @gem, $@LV4_Biotite;

-			set @gemstring$,"Biotite";

-			break;

-	}

-	

-	goto LV4_8_PICK;

-	end; // shouldn't be here

-	

-

-LV4_8_MP:	

-	mes "[Hibilaithan]";

-	mes "Hahaha, I asked you to bring one kind not two.";

-	mes "You can only use one kind of ore.";

-	mes "Which one would you like to use?";

-	next;

-	

-	switch( select( "Muscovite", "Pyroxene" ) ) {

-		case 1:

-			mes "[Hibilaithan]";

-			mes "Muscovite...okay. Before we start,";

-			set @gem, $@LV4_Muscovite;

-			set @gemstring$,"Muscovite";

-			break;

-		case 2:

-			mes "[Hibilaithan]";

-			mes "Pyroxene....okay. Before we start,";

-			set @gem, $@LV4_Pyroxene;

-			set @gemstring$,"Pyroxene";

-			break;

-	}

-	

-	goto LV4_8_PICK;

-	end; // shouldn't be here

-	

-	

-LV4_8_BP:	

-	mes "[Hibilaithan]";

-	mes "Hahaha, I asked you to bring one kind not two.";

-	mes "You can only use one kind of ore.";

-	mes "Which one would you like to use?";

-	next;

-	

-	switch( select( "Biotite", "Pyroxene" ) ) {

-			case 1:

-				mes "[Hibilaithan]";

-				mes "Biotite...okay. Before we start,";

-				set @gem, $@LV4_Biotite;

-				set @gemstring$,"Biotite";

-				break;

-			case 2:

-				mes "[Hibilaithan]";

-				mes "Pyroxene....okay. Before we start,";

-				set @gem, $@LV4_Pyroxene;

-				set @gemstring$,"Pyroxene";

-				break;

-	}

-	

-	goto LV4_8_PICK;

-	end; // shouldn't be here

-	

-	

-LV4_8_M:

-	mes "[Hibilaithan]";

-	mes "Muscovite...okay. Before we start,";

-	set @gem, $@LV4_Muscovite;

-	set @gemstring$,"Muscovite";

-	goto LV4_8_PICK;

-	end; // shouldn't be here

-		

-		

-LV4_8_B:

-	mes "[Hibilaithan]";

-	mes "Biotite...okay. Before we start,";

-	set @gem, $@LV4_Biotite;

-	set @gemstring$,"Biotite";

-	goto LV4_8_PICK;

-	end; // shouldn't be here

-	

-	

-LV4_8_P:

-	mes "[Hibilaithan]";

-	mes "Pyroxene....okay. Before we start,";

-	set @gem, $@LV4_Pyroxene;

-	set @gemstring$,"Pyroxene";

-	goto LV4_8_PICK;

-	end; // shouldn't be here

-	

-	

-LV4_8_PICK:

-	mes "we must do one thing first.";

-	mes "That is, to test your luck.";

-	mes "As you already know,";

-	mes "I cannot guarantee you that we will succeed";

-	mes "to make one right away.";

-	next;

-	mes "[Hibilaithan]";

-	mes "If we can raise your luck before we start,";

-	mes "we will be able to succeed.";

-	next;

-	mes "[Hibilaithan]";

-	mes "Now you must be wondering what we";

-	mes "will do in order to increase your luck.";

-	mes "It is simple, we will play a mind-reading game.";

-	mes "I am going to think of one monster among 4 of my favorites,";

-	mes "you will guess what that monster is.";

-	next;

-	mes "[Hibilaithan]";

-	mes "You must answer correctly at least";

-	mes "1 out of 5 times. It should not be that difficult.";

-	mes "And if you fail to answer, we must do something else";

-	mes "to drive away your bad luck.";

-	next;

-	mes "[Hibilaithan]";

-	mes "I will take 10 of the special ore you have chose.";

-	mes "Well, I understand that it does not sound tempting";

-	mes "but let's think of it this way.";

-	mes "It is much better than wasting 30 ore";

-	mes "by failing to create the item, isn't it?";

-	next;

-	mes "[Hibilaithan]";

-	mes "Okay, now I need some time to prepare...";

-	mes "Talk to you later!";

-	

-	if(countitem($@LV4_Gold) < 10) goto LV4_HACK;

-	if(countitem($@LV4_Steel) < 50) goto LV4_HACK;

-	if(countitem($@LV4_Emperium) < 10) goto LV4_HACK;

-	delitem $@LV4_Gold, 10;

-	delitem $@LV4_Steel, 50;

-	delitem $@LV4_Emperium, 10;

-	if(@gem == $@LV4_Muscovite) set lv4_weapon, 9;

-	if(@gem == $@LV4_Biotite) set lv4_weapon, 10;

-	if(@gem == $@LV4_Pyroxene) set lv4_weapon, 11;	

-	close;

-

-

-LV4_8_NOGEM:

-	mes "[Hibilaithan]";

-	mes "I seem to recall that I asked you to bring";

-	mes "30 of a special ore among Muscovite, Biotite or Pyroxene...";

-	mes "And I don't see any of them.";

-	mes "You must have forgot that. Please go get them too.";

-	close;

-

-

-LV4_8_FAIL:

-	mes "[Hibilaithan]";

-	mes "Please bring me 10 Gold, 50 Steel and 10 Emperium";

-	mes "as basic materials...";

-	mes "and you can enchant the product with a certain trait.";

-	mes "For that, I need some rare ores...";

-	next;

-	mes "[Hibilaithan]";

-	mes "Please bring me 30 of an ore among Citrine, Biotite or Pyroxene.";

-	mes "Each one of them possess their own attributes";

-	mes "and by using the ore you have brought,";

-	mes "my product will possess a special trait.";

-	next;

-	mes "[Hibilaithan]";

-	mes "I wish you good luck...";

-	mes "I will wait for you!";

-	close;

-

-

-

-//--------------------------------------------------

-//Guessing Game

-//--------------------------------------------------

-LV4_9:

-	if(lv4_weapon == 9) set @gem, $@LV4_Muscovite;

-	if(lv4_weapon == 10) set @gem, $@LV4_Biotite;

-	if(lv4_weapon == 11) set @gem, $@LV4_Pyroxene;

-	if(countitem(@gem) < 30) goto LV4_9_NOGEM; 

-	

-	mes "[Hibilaithan]";

-	mes "Okay, let's get started!";

-	mes "It is simple. There are";

-	mes "4 monsters that I like. I am going to think";

-	mes "of a monster among the 4, you will guess what it is.";

-	mes "We will play this game 5 times and you must";

-	mes "answer correctly at least 1 out of 5 times. Doesn't that sound easy?";

-	next;

-	mes "[Hibilaithan]";

-	mes "This is a very good game for";

-	mes "increasing your luck!";

-	mes "Okay, you better be ready now.";

-	next;

-	

-	set @dap, 0;

-	set @correct[0],1;

-	for( set @i, 1; @i <= 5; set @i, @i + 1 ) {

-		mes "[Hibilaithan]";

-		

-		if(@i == 1) mes "I like Zealotus, Alice,";

-		if(@i == 1) mes "Munak, and Isis among all monsters.";

-		

-		mes "Now, guess which one";

-		mes "I am thinking of at this moment.";		

-		next;

-

-		set @mons, rand(1, 4);		

-

-		switch( select( "Zhertilsh", "Alice", "Munak", "Isis" ) ) {

-				case 1:

-					set @correct[@i], 1;

-					if(@mons == 1) set @dap, @dap + 1;

-					break;

-

-				case 2:

-					set @correct[@i], 2;

-					if(@mons == 2) set @dap, @dap + 1;

-					break;

-

-				case 3:

-					set @correct[@i], 3;

-					if(@mons == 3) set @dap, @dap + 1;

-					break;

-

-				case 4:

-					set @correct[@i], 4;

-					if(@mons == 4) set @dap, @dap + 1;

-					break;

-		}

-	}

-

-	mes "[Hibilaithan]";

-	mes "Okay, that's all! Now let me";

-	mes "check the answers. I was thinking";

-	mes "monsters in the order of...";

-	next;

-	mes "[Hibilaithan]";

-

-	for( set @i, 1; @i <= 5; set @i, @i + 1 ) {

-		if(@correct[@i] == 1) mes "Zhertilsh";

-		if(@correct[@i] == 2) mes "Alice";

-		if(@correct[@i] == 3) mes "Munak";

-		if(@correct[@i] == 4) mes "Isis";

-	}

-

-	if(@dap < 1) goto LV4_9_FAIL;

-	

-	next;

-	mes "[Hibilaithan]";

-	mes "Wow, are you a mind reader or what?";

-	mes "You answered " + @dap + " times correctly! Whoa...";

-	mes "I guess you are already a lucky one,";

-	mes "therefore we don't have any reason";

-	mes "to prolong the work now!";

-	mes "I need some time to prepare, talk to you later!";

-	

-	if(countitem(@gem) < 30) goto LV4_HACK;

-	delitem @gem, 30;

-	set lv4_weapon, lv4_weapon + 3;

-	close;

-	

-	

-LV4_9_FAIL:

-	if(countitem(@gem) < 10) goto LV4_HACK;

-	delitem @gem, 10;

-	

-	next;

-	mes "[Hibilaithan]";

-	mes "This is not good, not good at all!";

-	mes "You didn't even have a correct answer.";

-	mes "We cannot start the work with this kind of result.";

-	mes "Okay...we must drive away your bad luck first.";

-	mes "10 " + @gemstring$ + " will do it!";

-	next;

-	mes "[Hibilaithan]";

-	mes "Now, we need to play the game again.";

-	mes "If you don't anymore ore, go get some.";

-	mes "I am not going anywhere";

-	mes "so you don't need to be in hurry.";

-	mes "Take your time!";

-	close;

-

-

-LV4_9_NOGEM:

-	mes "[Hibilaithan]";

-	mes "Hum. You might lack of";

-	mes "materials? Check them again.";

-	mes "See. I knew it.";

-	close;

-	

-	

-	

-//--------------------------------------------------

-//Weapon Creation

-//--------------------------------------------------

-LV4_12:

-	mes "[Hibilaithan]";

-	mes "Ah, I can tell you are ready. Alright...";

-	mes "I will try to make an awsome item for you.";

-	mes "...and you are not going to look over my shoulder!";

-	mes "I don't want to share my secret recipe with anyone!";

-	next;

-	mes "- Hibilaithan picks up all the materials -";

-	mes "- and turns his back at you. -";

-	mes "- You see him busying himself with something. -";

-	mes "- Although the way he is doing it -";

-	mes "- looks very primitive and crude, -";

-	mes "- you feel that some strange energy has gathered around him. -";

-	next;

-	mes "[Hibilaithan]";

-	mes "Umm~ umm~ umm~";

-	mes "Aww~aww~ aww~";

-	mes "Phew~ phew~ phew~";

-	mes "Woo~ woo~ woo~";

-	mes "Ho~ ho~ ho~";

-	next;

-	mes "[Hibilaithan]";

-	mes " ";

-	mes " ";

-	mes "Haha, there it is! Phew, that was really hard...";

-	mes "You're anxious, aren't you? Ok, let's see...";

-	next;

-	

-	mes "[Hibilaithan]";

-	mes "It's a big success! Hahaha, sure, I made it...";

-	mes "Therefore, it should be a big success.";

-	mes "Oh, you got a weapon here...let's see,";

-	

-	switch( lv4_weapon ) {

-		case 12:

-			mes "it is a Mailbreaker!";

-			getitem 1225, 1; // 1225,Mail_Breaker

-			break;

-		case 13:

-			mes "it is a Swordbreaker!";

-			getitem 1224, 1; // 1224,Sword_Breaker

-			break;

-		case 14:

-			mes "it is a Slaughter!";

-			getitem 1367, 1; // 1367,Slaughter

-			break;

-	}

-

-	set lv4_weapon, 0;

-	mes "This was made competely because I am that skillful,";

-	mes "you got to be thankful for that!";

-	next;

-	

-	mes "[Hibilaithan]";

-	mes "Whenever you want to have a nice thing,";

-	mes "come back to me anytime!";

-	mes "I am a very generous genius, you know?";

-	mes "Always be thankful for the weapon that I made for you, okay?";

-	mes "See you!";

-	close;

-

-

-

-//--------------------------------------------------

-//Other Quests

-//--------------------------------------------------

-LV4_7:

-	mes "[Hibilaithan]";

-	mes "Hmm...I feel something strange from you.";

-	mes "I regret to say that there is nothing I can do for you.";

-	mes "I hope you have a safe travel.";

-	close;

-	

-	

-	

-//--------------------------------------------------

-//Hack Attempt

-//--------------------------------------------------

-LV4_HACK:

-	mes "[Hibilaithan]";

-	mes "Hmm. There seems to be a bit of problem.";

-	set lv4_weapon, 0;

-	logmes "[" +strcharinfo(0) + "] tried to hack LV4 quest.";

-	close;

-}

-

-//--------------------------------------------------

-// Tabezthan, creates Talefing, Sabbath and Caesar's Sword

-//--------------------------------------------------

-

-um_in.gat,156,77,5	script	Tabezthan	788,{

-	if(event_umbala < 3) goto LumWord;

-	set @NowWeight, MaxWeight - Weight;

-	if (@NowWeight >= 3000) goto LV4_NOT_OW;

-	mes "- Wait a minute! -";

-	mes "- You are currently overweight. -";

-	mes "- Please lose some weight -";

-	mes "- and try again. -";

-	close;

-

-	

-LV4_NOT_OW:

-	if(lv4_weapon == 0) goto LV4_0;

-	if(lv4_weapon == 15) goto LV4_15;

-	if(lv4_weapon == 16) goto LV4_16;

-	if(lv4_weapon == 17) goto LV4_16;

-	if(lv4_weapon == 18) goto LV4_16;

-	if(lv4_weapon == 19) goto LV4_19;

-	if(lv4_weapon == 20) goto LV4_19;

-	if(lv4_weapon == 21) goto LV4_19;

-	if(lv4_weapon < 15) goto LV4_14;

-	if(lv4_weapon > 21) goto LV4_14;	

-	end; // shouldn't be here

-	

-

-LumWord:

-		mes "[Tabezthan]";

-		mes "Umba! Umbaba...umum! Baumba!";

-		mes "Umumumbababaumumbabaumba!";

-		mes "Umbaumbaumbaumbaumhah!";

-		mes "Umumumumumbababababab!";

-	close;

-

-	

-LV4_0:

-	mes "[Tabezthan]";

-	mes "Hmm...I feel something different about you...";

-	mes "You are a stranger...aren't you?";

-	next;

-	mes "[Tabezthan]";

-	mes "Let me introduce myself.";

-	mes "I am Tabezthan,";

-	mes "the storage of the knowledge and the genius of Umbala...";

-	mes "Hahahaha.";

-	next;

-	mes "[Tabezthan]";

-	mes "I have two diciples. One is Hibilaithan the fool";

-	mes "and the other one is Bazo who is intelligent";

-	mes "and is from outside the same as you.";

-	next;

-	mes "[Tabezthan]";

-	mes "Of course both of them are talented and skillful";

-	mes "but I am worried about Hibilaithan, for he";

-	mes "makes many stupid mistakes and is shameless";

-	mes "for what he has done.";

-	next;

-	mes "[Tabezthan]";

-	mes "I have tought them how to manipulate";

-	mes "the mysterious energy existing in Umbala";

-	mes "for creating things with it..";

-	mes "I heard that there is a similar skill called Alchemy";

-	mes "in the outside world. Although I am not sure if I remember it correctly.";

-	next;

-	mes "[Tabezthan]";

-	mes "Anyways, would you like to see my skill?";

-	mes "If so, bring me materials I need,";

-	mes "I am more than willing to present my skill for you.";

-	next;

-	

-	switch( select( "Yes, please.", "No, thank you." ) ) {

-		case 1:

-			if(BaseLevel >= 70) goto L4_0_1;

-			

-			mes "[Tabezthan]";

-			mes "Sebelumnya saya harus menekankan ini";

-			mes "Barang spesial ini akan menjadi berbahaya jika kamu sendiri masih lemah";

-			mes "Kamu harus lebih berpengalaman lagi anak muda";

-			mes "Naikan level kamu terlebih dahulu";

-			mes "jika kamu sudah merasa kuat kembalilah kesini kembali";

-			mes "Sampai jumpa ~~";

-			break;

-L4_0_1:

-			mes "[Tabezthan]";

-			mes "One with curiousity...he is called the young adventurer...";

-			mes "Fine. Then let me inform you of";

-			mes "the matetrials I need. Please memorize them";

-			mes "or write them down.";

-			mes "It is not much however.";

-			next;

-			mes "[Tabezthan]";

-			mes "I need 10 Gold, 50 Steel and 10 Emperium";

-			mes "as basic materials...";

-			mes "and you can enchant the product with a certain trait.";

-			mes "For that, I need some rare ores...";

-			next;

-			mes "[Tabezthan]";

-			mes "Please bring me 30 of an ore among Phlogopite, Peridot or Rose Quartz.";

-			mes "Each one of them possess their own attribute";

-			mes "and by using the ore you have brought,";

-			mes "my product will possess a special trait.";

-			next;

-			mes "[Tabezthan]";

-			mes "However, please be aware that";

-			mes "I cannot guarantee what will come out as a result.";

-			mes "There are too many factors in the world of alchemy";

-			mes "where my knowledge is limited.";

-			mes "So you must be willing to accept the result as it is";

-			mes "even if it does not satisfy your expectations.";

-			next;

-			mes "[Tabezthan]";

-			mes "That means that you should place trust in luck.";

-			mes "Let's talk about it later...please go prepare the materials first.";

-			mes "Come back when you are ready.";

-			mes "I will wait here.";

-			

-			set lv4_weapon, 15;

-			break;

-		case 2:

-			mes "[Tabezthan]";

-			mes "Oh...I see. I was not forcing you anyhow.";

-			mes "However, it is a little bit dissappointing to hear that.";

-			mes "I was going to display my ability at full length.";

-			mes "When you change your mind, please come back.";

-			break;			

-	}	

-	close;

-	

-

-

-//--------------------------------------------------

-//Gold, Steel, Emp Check + Choosing the gem

-//--------------------------------------------------

-LV4_15:

-	if(countitem($@LV4_Gold) < 10) goto LV4_15_FAIL;

-	if(countitem($@LV4_Steel) < 50) goto LV4_15_FAIL;

-	if(countitem($@LV4_Emperium) < 10) goto LV4_15_FAIL;

-

-	mes "[Tabezthan]";

-	mes "Ah~ you came back ealier than I thought.";

-	mes "Let's see...you have all the basic materials...and";

-	mes "we need one more thing, remember?";

-	mes "Did you bring it as well?";

-	next;

-	

-	if (countitem($@LV4_Phlogopite) >= 30 && countitem($@LV4_Olivine) >= 30 && countitem($@LV4_Rose_Quartz) >= 30) goto LV4_15_POR;

-	if (countitem($@LV4_Phlogopite) >= 30 && countitem($@LV4_Olivine) >= 30) goto LV4_15_PO;

-	if (countitem($@LV4_Phlogopite) >= 30 && countitem($@LV4_Rose_Quartz) >= 30) goto LV4_15_PR;

-	if (countitem($@LV4_Olivine) >= 30 && countitem($@LV4_Rose_Quartz) >= 30) goto LV4_15_OR;

-	if (countitem($@LV4_Phlogopite) >= 30) goto LV4_15_P;

-	if (countitem($@LV4_Olivine) >= 30) goto LV4_15_O;

-	if (countitem($@LV4_Rose_Quartz) >= 30) goto LV4_15_R;

-	goto LV4_15_NOGEM;

-	end;

-

-

-LV4_15_POR:	

-	mes "[Tabezthan]";

-	mes "You made a great effort to bring all of them.";

-	mes "However, you can only use one kind at a time.";

-	mes "Please choose what you want to use this time.";

-	next;

-			

-	switch( select( "Phlogopite", "Peridot", "Rose Quartz" ) ) {

-		case 1:

-			mes "[Tabezthan]";

-			mes "Phlogopite...okay. Before we start,";

-			set @gem, $@LV4_Phlogopite;

-			set @gemstring$,"Phlogopite";

-			break;

-		case 2:

-			mes "[Tabezthan]";

-			mes "Peridot...okay. Before we start,";

-			set @gem, $@LV4_Olivine;

-			set @gemstring$,"Peridot";

-			break;

-		case 3:

-			mes "[Tabezthan]";

-			mes "Rose Quartz....okay. Before we start,";

-			set @gem, $@LV4_Rose_Quartz;

-			set @gemstring$,"Rose Quartz";

-			break;

-	}

-	

-	goto LV4_15_PICK;

-	end; // shouldn't be here

-	

-	

-LV4_15_PO:

-	mes "[Tabezthan]";

-	mes "Hahaha, I asked you to bring one kind not two.";

-	mes "You can only use one kind of ore.";

-	mes "Which one would you like to use?";

-	next;

-	

-	switch( select( "Phlogopite", "Peridot" ) ) {

-		case 1:

-			mes "[Tabezthan]";

-			mes "Phlogopite...okay. Before we start,";

-			set @gem, $@LV4_Phlogopite;

-			set @gemstring$,"Phlogopite";

-			break;

-		case 2:

-			mes "[Tabezthan]";

-			mes "Peridot...okay. Before we start,";

-			set @gem, $@LV4_Olivine;

-			set @gemstring$,"Peridot";

-			break;

-	}

-	

-	goto LV4_15_PICK;

-	end; // shouldn't be here

-	

-

-LV4_15_PR:	

-	mes "[Tabezthan]";

-	mes "Hahaha, I asked you to bring one kind not two.";

-	mes "You can only use one kind of ore.";

-	mes "Which one would you like to use?";

-	next;

-	

-	switch( select( "Phlogopite", "Rose Quartz" ) ) {

-		case 1:

-			mes "[Tabezthan]";

-			mes "Phlogopite...okay. Before we start,";

-			set @gem, $@LV4_Phlogopite;

-			set @gemstring$,"Phlogopite";

-			break;

-		case 2:

-			mes "[Tabezthan]";

-			mes "Rose Quartz....okay. Before we start,";

-			set @gem, $@LV4_Rose_Quartz;

-			set @gemstring$,"Rose Quartz";

-			break;

-	}

-	

-	goto LV4_15_PICK;

-	end; // shouldn't be here

-	

-	

-LV4_15_OR:	

-	mes "[Tabezthan]";

-	mes "Hahaha, I asked you to bring one kind not two.";

-	mes "You can only use one kind of ore.";

-	mes "Which one would you like to use?";

-	next;

-	

-	switch( select( "Peridot", "Rose Quartz" ) ) {

-			case 1:

-				mes "[Tabezthan]";

-				mes "Peridot...okay. Before we start,";

-				set @gem, $@LV4_Olivine;

-				set @gemstring$,"Peridot";

-				break;

-			case 2:

-				mes "[Tabezthan]";

-				mes "Rose Quartz....okay. Before we start,";

-				set @gem, $@LV4_Rose_Quartz;

-				set @gemstring$,"Rose Quartz";

-				break;

-	}

-	

-	goto LV4_15_PICK;

-	end; // shouldn't be here

-	

-	

-LV4_15_P:

-	mes "[Tabezthan]";

-	mes "Phlogopite...okay. Before we start,";

-	set @gem, $@LV4_Phlogopite;

-	set @gemstring$,"Phlogopite";

-	goto LV4_15_PICK;

-	end; // shouldn't be here

-		

-		

-LV4_15_O:

-	mes "[Tabezthan]";

-	mes "Peridot...okay. Before we start,";

-	set @gem, $@LV4_Olivine;

-	set @gemstring$,"Peridot";

-	goto LV4_15_PICK;

-	end; // shouldn't be here

-	

-	

-LV4_15_R:

-	mes "[Tabezthan]";

-	mes "Rose Quartz....okay. Before we start,";

-	set @gem, $@LV4_Rose_Quartz;

-	set @gemstring$,"Rose Quartz";

-	goto LV4_15_PICK;

-	end; // shouldn't be here

-	

-	

-LV4_15_PICK:

-	mes "we must do one thing first.";

-	mes "That is, to test your luck.";

-	mes "As you already know,";

-	mes "I cannot guarantee you that we will succeed";

-	mes "in makeing one right away.";

-	next;

-	mes "[Tabezthan]";

-	mes "If we can raise your luck before we start,";

-	mes "we will be able to succeed.";

-	next;

-	mes "[Tabezthan]";

-	mes "Now you must be wondering what we";

-	mes "will do in order to increase your luck.";

-	mes "It is simple, we will play a mind-reading game.";

-	mes "I am going to think of one monster among 4 of my favorites,";

-	mes "you will guess what the monster is.";

-	next;

-	mes "[Tabezthan]";

-	mes "You must answer correctly at least";

-	mes "1 out of 5 times. It should not be that difficult.";

-	mes "And if you fail to answer correctly, we must do something else";

-	mes "to drive away your bad luck.";

-	next;

-	mes "[Tabezthan]";

-	mes "I will take 10 of the special ore you chose.";

-	mes "Well, I understand that it does not sound tempting";

-	mes "but let's think of it this way.";

-	mes "It is much better than wasting 30 ore";

-	mes "by failing to create the item, isn't it?";

-	next;

-	mes "[Tabezthan]";

-	mes "Okay, now I need some time to prepare...";

-	mes "Talk to you later!";

-	

-	if(countitem($@LV4_Gold) < 10) goto LV4_HACK;

-	if(countitem($@LV4_Steel) < 50) goto LV4_HACK;

-	if(countitem($@LV4_Emperium) < 10) goto LV4_HACK;

-	delitem $@LV4_Gold, 10;

-	delitem $@LV4_Steel, 50;

-	delitem $@LV4_Emperium, 10;

-	if(@gem == $@LV4_Phlogopite) set lv4_weapon, 16;

-	if(@gem == $@LV4_Olivine) set lv4_weapon, 17;

-	if(@gem == $@LV4_Rose_Quartz) set lv4_weapon, 18; 

-	close;

-

-

-LV4_15_NOGEM:

-	mes "[Tabezthan]";

-	mes "Hmmm...I cannot find any rare ores in";

-	mes "the materials that you have brought...";

-	mes "Please bring me 30 of an ore among Phlogopite, Peridot";

-	mes "or Rose Quartz.";

-	close;

-

-

-LV4_15_FAIL:

-	mes "[Tabezthan]";

-	mes "I need 10 Gold, 50 Steel and 10 Emperium";

-	mes "as basic materials...";

-	mes "and you can enchant the product with a certain trait.";

-	mes "For that, I need some rare ores...";

-	next;

-	mes "[Tabezthan]";

-	mes "Please bring me 30 of an ore among Phlogopite, Peridot or Rose Quartz.";

-	mes "Each one of them possess their own attribute";

-	mes "and by using the ore you have brought,";

-	mes "my product will possess a special trait.";

-	close;

-

-

-

-//--------------------------------------------------

-//Guessing Game

-//--------------------------------------------------

-LV4_16:

-	if(lv4_weapon == 16) set @gem, $@LV4_Phlogopite;

-	if(lv4_weapon == 17) set @gem, $@LV4_Olivine;

-	if(lv4_weapon == 18) set @gem, $@LV4_Rose_Quartz;

-	if(countitem(@gem) < 30) goto LV4_2_NOGEM; 

-	

-	mes "[Tabezthan]";

-	mes "Okay, let's get started!";

-	mes "It is simple. There are";

-	mes "4 monsters that I like. I am going to think";

-	mes "of a monster among the 4, you will guess what it is.";

-	mes "We will play this game 5 times and you must";

-	mes "answer correctly at least 1 out of 5 times. Doesn't it sound easy?";

-	next;

-	mes "[Hibilaithan]";

-	mes "This is a very good game for";

-	mes "increasing your luck!";

-	mes "Okay, better be ready now.";

-	next;

-	

-	set @dap, 0;

-	set @correct[0],1;

-	for( set @i, 1; @i <= 5; set @i, @i + 1 ) {

-		mes "[Tabezthan]";

-		

-		if(@i == 1) mes "I like Baphomet, Dark Lord,";

-		if(@i == 1) mes "Bloody Knight, and Stormy Knight among all monsters.";

-		

-		mes "Now, guess which one";		

-		mes "I am thinking at this moment.";

-		next;

-

-		set @mons, rand(1, 4);		

-

-		switch( select( "Baphomet", "Dark Lord", "Bloody Knight", "Stormy Knight" ) ) {

-				case 1:

-					set @correct[@i], 1;

-					if(@mons == 1) set @dap, @dap + 1;

-					break;

-

-				case 2:

-					set @correct[@i], 2;

-					if(@mons == 2) set @dap, @dap + 1;

-					break;

-

-				case 3:

-					set @correct[@i], 3;

-					if(@mons == 3) set @dap, @dap + 1;

-					break;

-

-				case 4:

-					set @correct[@i], 4;

-					if(@mons == 4) set @dap, @dap + 1;

-					break;

-		}

-	}

-

-	mes "[Tabezthan]";

-	mes "Okay, that's all! Now let me check";

-	mes "the answers. I was thinking";

-	mes "of the monsters in the order of...";

-	next;

-	mes "[Tabezthan]";

-

-	for( set @i, 1; @i <= 5; set @i, @i + 1 ) {

-		if(@correct[@i] == 1) mes "Baphomet";

-		if(@correct[@i] == 2) mes "Dark Lord";

-		if(@correct[@i] == 3) mes "Bloody Knight";

-		if(@correct[@i] == 4) mes "Stormy Knight";

-	}

-

-	if(@dap < 1) goto LV4_16_FAIL;

-	

-	next;

-	mes "[Tabezthan]";

-	mes "You have answered " + @dap + " times correctly.";

-	mes "It seems that your luck is at its highest.";

-	mes "I need some time to prepare, talk to you later.";

-	

-	if(countitem(@gem) < 30) goto LV4_HACK;

-	delitem @gem, 30;

-	set lv4_weapon, lv4_weapon + 3;

-	close;

-	

-	

-LV4_16_FAIL:

-	if(countitem(@gem) < 10) goto LV4_HACK;

-	delitem @gem, 10;

-	

-	next;

-	mes "[Tabezthan]";

-	mes "Unfortunately you have failed...";

-	mes "When you have bad luck, you'd better";

-	mes "not expect a good result.";

-	mes "Okay, we must drive away your bad luck.";

-	mes "10 " + @gemstring$ + " will do it.";

-	next;

-	mes "[Tabezthan]";

-	mes "Do not be so dissappointed.";

-	mes "It is still better than wasting 30 of them";

-	mes "for trying to make a thing when you know";

-	mes "you would not make it. ";

-	next;

-	mes "[Tabezthan]";

-	mes "If you need something to prepare,";

-	mes "please do. I will wait for you here.";

-	close;

-

-

-LV4_16_NOGEM:

-	mes "[Tabezthan]";

-	mes "Umm...it seems you are lacking " + @gemstring$;

-	mes "Please count them and";

-	mes "if you don't have enough,";

-	mes "you can go gather more first.";

-	close;

-	

-	

-	

-//--------------------------------------------------

-//Weapon Creation

-//--------------------------------------------------

-LV4_19:

-	mes "[Tabezthan]";

-	mes "Great, I am also ready.";

-	mes "Shall we start now? Give me a minute.";

-	mes "I need to arrange these materials in a magic circle.";

-	next;

-	mes "- He arranges materials in a strange circle -";

-	mes "- and starts chanting in a strange language. -";

-	mes "- As he does that, suddenly the air surrounding him -";

-	mes "- seems to change and you feel something powerful-";

-	mes "- gathering around him and the materials. -";

-	next;

-	mes "[Tabezthan]";

-	mes "Please understand that the power is not from me.";

-	mes "I just used my ability to gather the power into these materials.";

-	mes "The power has come from the city of the dead.";

-	next;

-	mes "[Tabezthan]";

-	mes "The result is in God's hands.";

-	mes "Let's pray for a good result together.";

-	mes "Hmmmmm!";

-	next;

-	mes "- After a while...you find the materials -";

-	mes "- are gathering and combining into one new thing. -";

-	mes "- Does that mean that you have succeeded or failed?! -";

-	next;

-	mes "[Tabezthan]";

-	mes "?!...God must bless you!";

-	mes "I cannot believe that I created such a rare weapon!";

-	mes "Yes, my late father told me the name of this weapon.";

-	

-	switch( lv4_weapon ) {

-		case 19:

-			mes "That is Caesar's Sword.";

-			getitem 1134, 1; // 1134,Caesar's_Sword

-			break;

-		case 20:

-			mes "That is Talefing.";

-			getitem 1139, 1; // 1139,Talefing_

-			break;

-		case 21:

-			mes "That is Sabbath.";

-			getitem 1365, 1; // 1365,Sabbath

-			break;

-	}

-

-	set lv4_weapon, 0;

-	mes "[Tabezthan]";

-	mes "Now, since I made this with materials";

-	mes "that you have brought, this is yours now.";

-	mes "I only helped you to make it,";

-	mes "and I am glad to give this to you.";

-	next;

-	mes "[Tabezthan]";

-	mes "Well, feel free to come back";

-	mes "if you want to make a thing again...hahaha.";

-	mes "The weapon was made to be yours.";

-	close;

-

-

-

-//--------------------------------------------------

-//Other Quests

-//--------------------------------------------------

-LV4_14:

-	mes "[Tabezthan]";

-	mes "Umm...you don't have a business with me, do you?";

-	mes "Please do not think of me as an old fool.";

-	mes "When a man gets older, he can see through other people's minds.";

-	mes "Go ahead and do what you have been doing.";

-	mes "Do not let me intrrupt you any longer.";

-	close;

-	

-	

-	

-//--------------------------------------------------

-//Hack Attempt

-//--------------------------------------------------

-LV4_HACK:

-	mes "[Tabezthan]";

-	mes "Hmm. There seems to be a bit of problem.";

-	set lv4_weapon, 0;

-	logmes "[" +strcharinfo(0) + "] tried to hack LV4 quest.";

-	close;

-}

-

-//--------------------------------------------------

-// Bill Thayer, Gives hints for S grade weapons quests

-//--------------------------------------------------

-

-aldebaran.gat,178,239,3	script	Bill Thayer	712,{

-	// Explain Materials

-	if(lv4_weapon == 26) goto LV4_26;

-	if(lv4_weapon == 27) goto LV4_27;

-	if(lv4_weapon == 28) goto LV4_28;

-	

-	if(lv4_weapon == 35) goto LV4_35;

-	if(lv4_weapon == 36) goto LV4_36;

-	if(lv4_weapon == 37) goto LV4_37;

-

-	if(lv4_weapon == 44) goto LV4_44;

-	if(lv4_weapon == 45) goto LV4_45;

-	if(lv4_weapon == 46) goto LV4_46;

-	

-	if(lv4_weapon == 53) goto LV4_53;

-	if(lv4_weapon == 54) goto LV4_54;

-	if(lv4_weapon == 55) goto LV4_55;

-	

-	// Guide

-	if(lv4_weapon == 22) goto LV4_22;

-	if(lv4_weapon == 23) goto LV4_23;

-		

-	if(lv4_weapon == 31) goto LV4_31;

-	if(lv4_weapon == 32) goto LV4_32;

-	

-	if(lv4_weapon == 40) goto LV4_40;

-	if(lv4_weapon == 41) goto LV4_41;

-	

-	if(lv4_weapon == 49) goto LV4_49;

-	if(lv4_weapon == 50) goto LV4_50;

-	

-	mes "[Bill Thayer]";

-	mes "...I cannot do anything now.";

-	mes "In the past, I used to be a well-known weaponsmith";

-	mes "but now I am just a lonely old man who lost all of his sons.";

-	mes "Please leave me alone.";

-	close;

-

-LV4_27:

-LV4_28:

-LV4_36:

-LV4_37:

-LV4_45:

-LV4_46:

-LV4_54:

-LV4_55:

-	if(lv4_weapon == 27)

-{

-			set @LV4_Gem1Name$, "Peridot";

-			set @LV4_Gem2Name$, "Turquoise";

-			set @LV4_Gem3Name$, "Agate";

-}

-	if(lv4_weapon == 28)

-{

-			set @LV4_Gem1Name$, "Phlogopite";

-			set @LV4_Gem2Name$, "Pyroxene";

-			set @LV4_Gem3Name$, "Rose Quartz";

-}

-	if(lv4_weapon == 36)

-{

-			set @LV4_Gem1Name$, "Muscovite";

-			set @LV4_Gem2Name$, "Rose Quartz";

-			set @LV4_Gem3Name$, "Peridot";

-}

-	if(lv4_weapon == 37)

-{

-			set @LV4_Gem1Name$, "Biotite";

-			set @LV4_Gem2Name$, "Agate";

-			set @LV4_Gem3Name$, "Citrine";

-}

-	if(lv4_weapon == 45)

-{

-			set @LV4_Gem1Name$, "Turquoise";

-			set @LV4_Gem2Name$, "Biotite";

-			set @LV4_Gem3Name$, "Rose Quartz";

-}

-	if(lv4_weapon == 46)

-{

-			set @LV4_Gem1Name$, "Citrine";

-			set @LV4_Gem2Name$, "Pyroxene";

-			set @LV4_Gem3Name$, "Phlogopite";

-}

-	if(lv4_weapon == 54)

-{

-			set @LV4_Gem1Name$, "Muscovite";

-			set @LV4_Gem2Name$, "Agate";

-			set @LV4_Gem3Name$, "Citrine";

-}

-	if(lv4_weapon == 55)

-{

-			set @LV4_Gem1Name$, "Pyroxene";

-			set @LV4_Gem2Name$, "Turquoise";

-			set @LV4_Gem3Name$, "Phlogopite";

-}

-

-	mes "[Bill Thayer]";

-	mes "Hmm...it seems that you need 30 of";

-	mes @LV4_Gem1Name$ + ", " + @LV4_Gem2Name$ + ", and " + @LV4_Gem3Name$;

-	mes "I am sure that those are the materials...";

-	mes "but I cannot guarantee anything about the result...";

-	next;

-	mes "[Bill Thayer]";

-	mes "My sons passed away before we finished this research...";

-	mes "Hahaha...let's not talk about it.";

-	mes "I told you what you need anyway.";

-	close;

-

-

-LV4_26:

-LV4_35:

-LV4_44:

-LV4_53:

-	mes "[Bill Thayer]";

-	if(lv4_weapon == 26) mes "What, Kayron's research?";

-	if(lv4_weapon == 35) mes "What, Reyghema's research?";

-	if(lv4_weapon == 44) mes "What? Hein's research?";

-	if(lv4_weapon == 53) mes "What? Waltboughst's research?";	

-	mes "How do you know him?";

-	mes "Were you a friend of him when he was still alive?";

-	mes "Ah....there must an act of providence.";

-	next;

-	

-	set lv4_weapon, lv4_weapon + rand(1, 2);

-	

-	switch( lv4_weapon ) {

-		case 27:

-			set @LV4_Gem1Name$, "Peridot";

-			set LV4_Gem1, $@LV4_Olivine;

-			set @LV4_Gem2Name$, "Turquoise";

-			set LV4_Gem2, $@LV4_Turquoise;

-			set @LV4_Gem3Name$, "Agate";

-			set LV4_Gem3, $@LV4_Agate;

-			break;

-		case 28:

-			set @LV4_Gem1Name$, "Phlogopite";

-			set LV4_Gem1, $@LV4_Phlogopite;

-			set @LV4_Gem2Name$, "Pyroxene";

-			set LV4_Gem2, $@LV4_Pyroxene;

-			set @LV4_Gem3Name$, "Rose Quartz";

-			set LV4_Gem3, $@LV4_Rose_Quartz;

-			break;

-		case 36:

-			set @LV4_Gem1Name$, "Muscovite";

-			set LV4_Gem1, $@LV4_Muscovite;

-			set @LV4_Gem2Name$, "Rose Quartz";

-			set LV4_Gem2, $@LV4_Rose_Quartz ;

-			set @LV4_Gem3Name$, "Peridot";

-			set LV4_Gem3, $@LV4_Olivine;

-			break;

-		case 37:

-			set @LV4_Gem1Name$, "Biotite";

-			set LV4_Gem1, $@LV4_Biotite;

-			set @LV4_Gem2Name$, "Agate";

-			set LV4_Gem2, $@LV4_Agate;

-			set @LV4_Gem3Name$, "Citrine";

-			set LV4_Gem3, $@LV4_Citrine;

-			break;

-		case 45:

-			set @LV4_Gem1Name$, "Turquoise";

-			set LV4_Gem1, $@LV4_Turquoise;

-			set @LV4_Gem2Name$, "Biotite";

-			set LV4_Gem2, $@LV4_Biotite;

-			set @LV4_Gem3Name$, "Rose Quartz";

-			set LV4_Gem3, $@LV4_Rose_Quartz;

-			break;

-		case 46:

-			set @LV4_Gem1Name$, "Citrine";

-			set LV4_Gem1, $@LV4_Citrine;

-			set @LV4_Gem2Name$, "Pyroxene";

-			set LV4_Gem2, $@LV4_Pyroxene;

-			set @LV4_Gem3Name$, "Phlogopite";

-			set LV4_Gem3, $@LV4_Phlogopite;

-			break;

-		case 54:

-			set @LV4_Gem1Name$, "Muscovite";

-			set LV4_Gem1, $@LV4_Muscovite;

-			set @LV4_Gem2Name$, "Agate";

-			set LV4_Gem2, $@LV4_Agate;

-			set @LV4_Gem3Name$, "Citrine";

-			set LV4_Gem3, $@LV4_Citrine;

-			break;

-		case 55:

-			set @LV4_Gem1Name$, "Pyroxene";

-			set LV4_Gem1, $@LV4_Pyroxene;

-			set @LV4_Gem2Name$, "Turquoise";

-			set LV4_Gem2, $@LV4_Turquoise;

-			set @LV4_Gem3Name$, "Phlogopite";

-			set LV4_Gem3, $@LV4_Phlogopite;

-			break;

-	}

-	

-	mes "[Bill Thayer]";

-	mes "Hmm...it seems that you need 30 of";

-	mes @LV4_Gem1Name$ + ", " + @LV4_Gem2Name$ + ", and " + @LV4_Gem3Name$;

-	mes "I am sure that those are the materials...";

-	mes "but I cannot guarantee anything about the result...";

-	next;

-	mes "[Bill Thayer]";

-	mes "My sons passed away before we finished this research...";

-	mes "Hahaha...let's not talk about it.";

-	mes "I told you what you need anyway.";

-	close;	

-

-

-LV4_22:

-LV4_23:

-	mes "[Bill Thayer]";

-	mes "Oh well, I told you already";

-	mes "that there is nothing I can do for you...";

-	mes "since my sons are all gone...why are";

-	mes "you wasting my breath? ^4D4DFFYou are helpless.^000000";

-	set lv4_weapon, 23;

-	next;

-	mes "[Bill Thayer]";

-	mes "...you just made me";

-	mes "miss my sons again...";

-	mes "Please leave me alone.";

-	close;

-	

-

-LV4_31:

-LV4_32:

-	mes "[Bill Thayer]";

-	mes "All of my sons broke my heart by dying young...";

-	mes "...youth...what is youth?";

-	mes "^4D4DFFThat means that you never regret anything!^000000";

-	set lv4_weapon, 32;

-	next;

-	mes "[Bill Thayer]";

-	mes "That was what I used to tell to my sons.";

-	mes "Please remember that,";

-	mes "never regret anything that you have done.";

-	mes "However, in order to do that, you must";

-	mes "do everything right...that's all I can tell you for now.";

-	close;

-	

-		

-LV4_40:

-LV4_41:

-	mes "[Bill Thayer]";

-	mes "...no matter how much you are willing to pay me,";

-	mes "I am not going to forge any weapons.";

-	mes "Even when I was actively forging weapons,";

-	mes "I didn't accept money from my clients.";

-	mes "You know why?";

-	next;

-	mes "[Bill Thayer]";

-	mes "It brings me bad luck ^4D4DFFto^000000";

-	mes "^4D4DFFforge a good weapon.^000000";

-	mes "Therefore I didn't receive money from them.";

-	set lv4_weapon, 41;

-	next;

-	mes "[Bill Thayer]";

-	mes "Well, I am not going to do so";

-	mes "even if you offer me something else other than money";

-	mes "...unless all of my sons come back";

-	mes "alive....";

-	close;

-

-

-LV4_49:

-LV4_50:

-		mes "[Bill Thayer]";

-		mes "...do you not have anything to do?";

-		mes "I hope you stop bothering me";

-		mes "and trying your best for your work.";

-		mes "Ah...trying best does not always";

-		mes "result in a success though.";

-		next;

-		mes "[Bill Thayer]";

-		mes "However, ^4D4DFFall the successful men^000000";

-		mes "^4D4DFFin the history tried their best!^000000";

-		mes "I hope you will remember that.";

-		mes "I used to tell this to my sons when they were alive.";

-		mes "Hahaha...";

-		set lv4_weapon, 50;

-		close;

-}

-

-//--------------------------------------------------

-// Kayron, creates Longinus' Spear, Guillotine, Great Axe and Brionac

-//--------------------------------------------------

-

-niflheim.gat,240,193,3	script	Kayron	794, {

-	set @NowWeight, MaxWeight - Weight;

-	if (@NowWeight >= 3000) goto LV4_NOT_OW;

-	mes "- Wait a minute! -";

-	mes "- You are currently overweight. -";

-	mes "- Please lose some weight -";

-	mes "- and try again. -";

-	close;

-

-	

-LV4_NOT_OW:

-	if(BaseLevel >= 80) goto LV4_LEVEL_PASS;

-	mes "[Kayron]";

-	mes "Bah, I cannot believe";

-	mes "that such a weak man like you even came here.";

-	mes "You have an invisible sign on your forehead";

-	mes "that indicates you are a weakling. Be strong first.";

-	close;

-	

-

-LV4_LEVEL_PASS:

-	if(lv4_weapon == 0) goto LV4_0;

-	if(lv4_weapon < 22) goto LV4_21;

-	if(lv4_weapon == 22) goto LV4_22;

-	if(lv4_weapon == 23) goto LV4_23;

-	if(lv4_weapon == 24) goto LV4_24;

-	if(lv4_weapon == 25) goto LV4_25;

-	if(lv4_weapon == 26) goto LV4_26;

-	if(lv4_weapon == 27) goto LV4_27;

-	if(lv4_weapon == 28) goto LV4_28;

-	if(lv4_weapon == 29) goto LV4_29;

-	if(lv4_weapon == 30) goto LV4_30;

-	if(lv4_weapon > 30) goto LV4_31;

-	end; // shouldn't be here

-

-

-LV4_0:

-LV4_22:

-	mes "[Kayron]";

-	mes "I used to be called Kayron when I was alive.";

-	mes "But now I am nothing but";

-	mes "a ghost wandering this place.";

-	mes "I am worthless...I cannot do anything";

-	mes "without a body...";

-	next;

-	

-	if(lv4_weapon == 0) goto LV4_0_ASK;

-	

-	mes "[Kayron]";

-	mes "Ah...I cannot remember what I was going to say...";

-	mes "Waaahhh.....I cannot remember....";

-	mes "My memory is gone...!";

-	close;

-	

-LV4_0_ASK:

-	switch( select( "Show interest.", "Ignore him." ) ) {

-		case 1:

-			mes "[Kayron]";

-			mes "Ah...I cannot remember what I was going to say...";

-			mes "Waaahhh.....I cannot remember....";

-			mes "My memory is gone...!";

-			set lv4_weapon, 22;

-			close;

-			break;

-		case 2:

-			mes "- Because you decided to ignore him, -";

-			mes "- you are no longer able to hear him. -";

-			close;

-			break;

-	}

-	end;

-	

-

-LV4_21:

-LV4_31:

-	mes "[Kayron]";

-	mes "I feel something different about you.";

-	mes "Did you come here with a purpose?";

-	mes "I am envious of you...";

-	close;

-

-

-LV4_23:

-	mes "[Kayron]";

-	mes "I used to be called Kayron when I was alive.";

-	mes "But now I am nothing but";

-	mes "a ghost wandering this place.";

-	mes "I am worthless...I cannot do anything";

-	mes "without a body...";

-	next;

-	set @dap1$, "You are helpless.";

-	input @answer1$;

-	if(@answer1$ == @dap1$) goto LV4_23_CORRECT;

-	mes "[Kayron]";

-	mes "...? What did you just say?";

-	mes "I am sorry but I don't think I understood you.";

-	close;

-

-LV4_23_CORRECT:

-	mes "[Kayron]";

-	mes "Yes, You are helpless...?! Eh?";

-	mes "That was my father's favorite saying!";

-	mes "Whoa?! Ah...";

-	mes "Yes...I forgot that I am dead already.";

-	mes "Why did you make me recall something from my past?";

-	mes "It is no use now...";

-	next;

-	mes "[Kayron]";

-	mes "But I want to do something in return...";

-	mes "since you made me find a piece of my mind.";

-	mes "I used to be a weaponsmith in the past,";

-	mes "therefore I am going to forge a nice weapon for you.";

-	next;

-	mes "[Kayron]";

-	mes "But you have to gather the materials for me.";

-	mes "As you see, I do not have a body";

-	mes "that would allow me to touch other objects...";

-	mes "So you got to help me with that.";

-	next;

-	mes "[Kayron]";

-	mes "Luckily this place is filled with mysterious energy,";

-	mes "that makes my work easier!";

-	mes "Heh, even if I fail to forge one,";

-	mes "I don't have to worry about dying.";

-	mes "Because I am dead already! Muhahahaha!";

-	next;

-	mes "[Kayron]";

-	mes "I will talk to you in a while.";

-	mes "I am trying to think of the receipe...";

-	set lv4_weapon, 24;

-	close;

-	

-	

-LV4_25:

-	if(countitem($@LV4_Hammer_Of_Blacksmith) < 2) goto LV4_25_BASE_MAT;

-	if(countitem($@LV4_Emperium_Anvil) < 1) goto LV4_25_BASE_MAT;

-	if(countitem($@LV4_Illusion_Flower) < 1) goto LV4_25_BASE_MAT;

-	if(countitem($@LV4_Gold) < 20) goto LV4_25_BASE_MAT;

-	

-	mes "[Kayron]";

-	mes "Oh...you brought everything I need!";

-	mes "You are a reliable person unlike your appearance.";

-	mes "But here is the thing...";

-	mes "There are some more materials I need...";

-	mes "But I cannot think of any of them...my memory";

-	mes "is unclear...arrrrph...";

-	next;

-	mes "[Kayron]";

-	mes "I need to think about that a little longer.";

-	mes "I know that I really need those materials...awwww....";

-	mes "Do you have any idea to bring my memory back?";

-	mes "At the same time, rest assured that the materials";

-	mes "you brought will be used for my creation. So let me keep them for you.";

-	

-	if(countitem($@LV4_Hammer_Of_Blacksmith) < 2) goto LV4_HACK;

-	if(countitem($@LV4_Emperium_Anvil) < 1) goto LV4_HACK;

-	if(countitem($@LV4_Illusion_Flower) < 1) goto LV4_HACK;

-	if(countitem($@LV4_Gold) < 20) goto LV4_HACK;

-	delitem $@LV4_Hammer_Of_Blacksmith, 2;

-	delitem $@LV4_Emperium_Anvil, 1;

-	delitem $@LV4_Illusion_Flower, 1;

-	delitem $@LV4_Gold, 20;

-	set lv4_weapon, 26;

-	close;

-

-LV4_24:

-LV4_25_BASE_MAT:

-	switch( lv4_weapon ) {

-		case 24:

-			mes "[Kayron]";

-			mes "Oh, you came back at a right time.";

-			mes "I just finished my thoughts. Let me tell you one thing.";

-			mes "I cannot guarantee you which weapon will come out of this.";

-			mes "Also you must be willing to take a risk as well...";

-			mes "I guess that the result will be affected by the power";

-			mes "of Nifflheim at the time I make.";

-			next;

-			mes "[Kayron]";

-			mes "Let me give you the list of materials";

-			mes "I need. They are quite a lot,";

-			mes "so write them down if you need.";

-			break;

-		case 25:

-			mes "[Kayron]";

-			mes "I will tell you the list of materials I need again.";

-			mes "I think I need a lot of materials...so";

-			mes "write them down if you need.";

-			break;

-		}

-		next;

-		mes "[Kayron]";

-		mes "I need 2 Hammer of Blacksmith,";

-		mes "1 Emperium Anvil, 1 Illusion Flower and 20 Gold...";

-		next;

-		mes "[Kayron]";

-		mes "Bring these to me first. I am kind of worried";

-		mes "that I forgot something...but I will try to remember";

-		mes "while waiting for you to bring these items.";

-		next;

-		mes "[Kayron]";

-		mes "Have a safe travel.";

-		set lv4_weapon, 25;

-		close;

-		

-

-LV4_27:

-LV4_28:

-	if(countitem(LV4_Gem1) < 30) goto LV4_27_NOGEM;

-	if(countitem(LV4_Gem2) < 30) goto LV4_27_NOGEM;

-	if(countitem(LV4_Gem3) < 30) goto LV4_27_NOGEM;

-	mes "[Kayron]";

-	mes "...Um? The items that you brought to me seem";

-	mes "to be good materials for my creation...";

-	mes "Give them to me, I shall try first!";

-	next;

-	mes "[Kayron]";

-	mes "Oh...I was right! How did you";

-	mes "know these are materials I need?";

-	mes "Great, give me a moment!";

-	next;

-	mes "[Kayron]";

-	mes "...wait, I must test your luck first.";

-	mes "Since I am not sure about the result,";

-	mes "we should place trust in luck for the result of my creation.";

-	mes "You must have good luck...";

-	next;

-	mes "[Kayron]";

-	mes "We are going to play 'Rock, Paper, Scissors'.";

-	mes "You must win at least 2 out of 3 times.";

-	mes "If you fail, you must throw away a large amount";

-	mes "of one of the 3 kinds of ore that you have brought.";

-	mes "It is for driving away your bad luck.";

-	next;

-	mes "[Kayron]";

-	mes "I will give you a piece of paper.";

-	mes "You will write down one among 'Rock, Paper, or Scissors'.";

-	mes "I will do the same at the same time.";

-	mes "We will compare each other's paper after.";

-	next;

-	

-	set @shobu, 0;

-	

-	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {

-		if(@i == 2) mes "[Kayron]";

-		if(@i == 2) mes "Let's play the second one!";

-		if(@i == 3) mes "[Kayron]";

-		if(@i == 3) mes "This will be the last one!";

-		if(@i == 3) mes "Let's compare after this.";

-		set @npchand[@i], rand(1, 3);

-		switch( select( "Scissors", "Rock", "Paper" ) ) {

-			case 1:

-				set @myhand[@i], 1;

-				if(@npchand[@i] == 3) set @shobu, @shobu + 1;

-				break;

-			case 2:

-				set @myhand[@i], 2;

-				if(@npchand[@i] == 1) set @shobu, @shobu + 1;

-				break;

-			case 3:

-				set @myhand[@i], 3;

-				if(@npchand[@i] == 2) set @shobu, @shobu + 1;

-				break;

-		}

-	}

-		

-	if(countitem(LV4_Gem1) < 30) goto LV4_HACK;

-	if(countitem(LV4_Gem2) < 30) goto LV4_HACK;

-	if(countitem(LV4_Gem3) < 30) goto LV4_HACK;

-

-	if(@shobu > 1) goto LV4_27_WIN;

-

-	switch ( rand(1 ,3) ) {

-		case 1:

-			delitem LV4_Gem1, 30;

-			break;

-		case 2:

-			delitem LV4_Gem2, 30;

-			break;

-		case 3:

-			delitem LV4_Gem3, 30;

-			break;

-	}

-	goto LV4_27_RESULT;

-		

-LV4_27_WIN:

-	delitem LV4_Gem1, 30;

-	delitem LV4_Gem2, 30;

-	delitem LV4_Gem3, 30;

-	set lv4_weapon, lv4_weapon + 2;

-	goto LV4_27_RESULT;

-	

-LV4_27_RESULT:

-	mes "[Kayron]";

-	mes "Okay...I played in the order of...";

-	

-	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {

-		if(@npchand[@i] == 1) mes "Scissors";

-		if(@npchand[@i] == 2) mes "Rock";

-		if(@npchand[@i] == 3) mes "Paper";

-	}

-

-	next;

-	mes "[Kayron]";

-	mes "You did in the order of...";

-

-	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {

-		if(@myhand[@i] == 1) mes "Scissors";

-		if(@myhand[@i] == 2) mes "Rock";

-		if(@myhand[@i] == 3) mes "Paper";

-	}

-

-	next;

-

-	if(@shobu > 1) goto LV4_27_SAY_WIN;

-	

-	mes "[Kayron]";

-	mes "Well well well...you lost the game.";

-	mes "Ah~ you were close though...";

-	mes "We must drive away bad luck.";

-	next;

-	mes "[Kayron]";

-	mes "Okay, I will wait here,";

-	mes "go bring me the materials again...";

-	close;

-			

-LV4_27_SAY_WIN:

-	mes "[Kayron]";

-	mes "Let's see...";

-	mes "You won total " + @shobu + " times.";

-	mes "Ah~ you must be really good at game!";

-	mes "Yes, your luck is at its highest!";

-	next;

-	mes "[Kayron]";

-	mes "I am going to keep my promise.";

-	mes "But I need some time to prepare.";

-	mes "Give me the materials now and I will talk to you later.";

-	close;

-

-LV4_26:

-LV4_27_NOGEM:

-	mes "[Kayron]";

-	mes "Arph...it has not gotten into my memory yet.";

-	mes "Awww....this is a problem.";

-	mes "I used to often discuss the materials";

-	mes "with my family...now I cannot remember what they are...";

-	close;

-

-

-LV4_29:

-LV4_30:

-	mes "[Kayron]";

-	mes "Hahaha...you came back at the right time.";

-	mes "The result? Do you want to know about the result?...";

-	mes "Haha...okay...let's see...";

-	next;

-	mes "[Kayron]";

-	mes "...YES! It's a success!";

-	mes "I created the weapon that got me killed last time!";

-	mes "Look at this...haha! I died while making this!";

-	mes "... The name of the weapon is...";

-	

-	

-	switch( rand(1, 2) ) {

-		case 1:

-			if(lv4_weapon == 29) mes "Great Axe! Weee~ I made it!";

-			if(lv4_weapon == 29) getitem 1364 ,1; // 1364,Great_Axe

-			if(lv4_weapon == 30) mes "Longinus's Spear! Weee~ I made it!";

-			if(lv4_weapon == 30) getitem 1469, 1; // 1469,Longinus's_Spear

-			break;

-		case 2:

-			if(lv4_weapon == 29) mes "Guillotine! Weee~ I made it!";

-			if(lv4_weapon == 29) getitem 1369, 1; // 1369,Guillotine

-			if(lv4_weapon == 30) mes "Brionac! Weee~ I made it!";

-			if(lv4_weapon == 30) getitem 1470, 1; // 1470,Brionac

-	}

-	

-	set lv4_weapon, 0;

-	next;

-	mes "[Kayron]";

-	mes "I finally succeeded in the research...";

-	mes "I want to show this result to my father...";

-	mes "He will be really happy for this.";

-	next;

-	mes "[Kayron]";

-	mes "Ah~ I feel my memories are fading again...";

-	mes "If you see me next time...";

-	mes "please let me remember the memories again...";

-	mes "Thank you...";

-	close;

-	

-

-

-//--------------------------------------------------

-//Hack Attempt

-//--------------------------------------------------

-LV4_HACK:

-	mes "[Kayron]";

-	mes "Hmm. There seems to be a bit of problem.";

-	set lv4_weapon, 0;

-	logmes "[" +strcharinfo(0) + "] tried to hack LV4 quest.";

-	close;

-}

-

-//--------------------------------------------------

-// Reyghema, creates Berserk, Tjungkulleti, Rudra's Bow and Brocca(Skewer)

-//--------------------------------------------------

-

-niflheim.gat,99,268,5	script	Reyghema	794, {

-	set @NowWeight, MaxWeight - Weight;

-	if (@NowWeight >= 3000) goto LV4_NOT_OW;

-	mes "- Wait a minute! -";

-	mes "- You are currently overweight. -";

-	mes "- Please lose some weight -";

-	mes "- and try again. -";

-	close;

-

-	

-LV4_NOT_OW:

-	if(BaseLevel >= 80) goto LV4_LEVEL_PASS;

-	mes "[Reyghema]";

-	mes "Um? Do you have any business with me?";

-	mes "Sorry but I don't. I'm also not";

-	mes "speaking to a weak person like you.";

-	mes "Have a safe travel~";

-	close;

-	

-

-LV4_LEVEL_PASS:

-	if(lv4_weapon == 0) goto LV4_0;

-	if(lv4_weapon < 31) goto LV4_30;

-	if(lv4_weapon == 31) goto LV4_31;

-	if(lv4_weapon == 32) goto LV4_32;

-	if(lv4_weapon == 33) goto LV4_33;

-	if(lv4_weapon == 34) goto LV4_34;

-	if(lv4_weapon == 35) goto LV4_35;

-	if(lv4_weapon == 36) goto LV4_36;

-	if(lv4_weapon == 37) goto LV4_37;

-	if(lv4_weapon == 38) goto LV4_38;

-	if(lv4_weapon == 39) goto LV4_39;

-	if(lv4_weapon > 39) goto LV4_40;

-	end; // shouldn't be here

-

-

-LV4_0:

-LV4_31:

-	mes "[Reyghema]";

-	mes "Darn it...I didn't want to die!";

-	mes "Well...there is no living thing that wants to die but...";

-	mes "Especially me, I was too young to die!";

-	mes "Youth! ...Ah...I just remember the word.";

-	mes "Speaking of which...I think I usually said something related to that...";

-	next;

-	

-	if(lv4_weapon == 0) goto LV4_0_ASK;

-	

-	mes "[Reyghema]";

-	mes "Ah...I cannot remember what I was going to say...";

-	mes "Waaahhh.....I cannot remember....";

-	mes "My memory is gone...!";

-	close;

-	

-LV4_0_ASK:

-	switch( select( "Show interest.", "Igonore him." ) ) {

-		case 1:

-			mes "[Reyghema]";

-			mes "Ah...I cannot remember what I was going to say...";

-			mes "Waaahhh.....I cannot remember....";

-			mes "My memory is gone...!";

-			set lv4_weapon, 31;

-			close;

-			break;

-		case 2:

-			mes "- Because you decided to ignore him, -";

-			mes "- you are no longer able to hear him. -";

-			close;

-			break;

-	}

-	end;

-	

-

-LV4_30:

-LV4_40:

-	mes "[Reyghema]";

-	mes "I feel something different about you.";

-	mes "Did you come here with a purpose?";

-	mes "I am envious of you...";

-	close;

-

-

-LV4_32:

-	mes "[Reyghema]";

-	mes "I used to be called Reyghema when I was alive.";

-	mes "But now I am nothing but";

-	mes "a ghost wandering this place.";

-	mes "I am worthless...I cannot do anything";

-	mes "without a body...";

-	next;

-	set @dap2$, "That means that you never regret anything!";

-	input @answer2$;

-	if(@answer2$ == @dap2$) goto LV4_32_CORRECT;

-	mes "[Reyghema]";

-	mes "What? Do you want to play a game with me or what?";

-	mes "Unfortunately I have something to do...";

-	mes "wait...what was I going to do?";

-	close;

-

-LV4_32_CORRECT:

-	mes "[Reyghema]";

-	mes "...";

-	next;

-	mes "[Reyghema]";

-	mes "...";

-	mes "......";

-	next;

-	mes "[Reyghema]";

-	mes "...";

-	mes "......";

-	mes ".........";

-	next;

-	mes "[Reyghema]";

-	mes "That's right! I am Bill Thayer the Weaponsmith's";

-	mes "second son! And I must forge a weapon";

-	mes "in order to not regret my youth!";

-	mes "Even if I am dead, I cannot give it up!";

-	next;

-	mes "[Reyghema]";

-	mes "Hey you, thank you for letting me have my memory back!";

-	mes "You need to do me another favor!";

-	mes "Bring me some items, I need to forge a weapon.";

-	mes "Once I make one, I will give it to you in return for your favor.";

-	next;

-	mes "[Reyghema]";

-	mes "Reyghema, breathe deeply first...phew~.";

-	mes "Give me a second!";

-	set lv4_weapon, 33;

-	close;

-	

-	

-LV4_34:

-	if(countitem($@LV4_Hammer_Of_Blacksmith) < 2) goto LV4_34_BASE_MAT;

-	if(countitem($@LV4_Emperium_Anvil) < 1) goto LV4_34_BASE_MAT;

-	if(countitem($@LV4_Illusion_Flower) < 1) goto LV4_34_BASE_MAT;

-	if(countitem($@LV4_Gold) < 20) goto LV4_34_BASE_MAT;

-	

-	mes "[Reyghema]";

-	mes "Oh...you brought everything I need!";

-	mes "You are a reliable person unlike you appear.";

-	mes "But here is the thing...";

-	mes "There are some more materials I need...";

-	mes "But I cannot think of any of them...my memory";

-	mes "is unclear...arrrrph...";

-	next;

-	mes "[Reyghema]";

-	mes "I need to think about that a little longer.";

-	mes "I know that I really need those materials...awwww....";

-	mes "Do you have any idea to bring my memory back?";

-	mes "At the same time, rest assured that the materials";

-	mes "you brought will be used for my creation. So let me keep them for you.";

-	

-	if(countitem($@LV4_Hammer_Of_Blacksmith) < 2) goto LV4_HACK;

-	if(countitem($@LV4_Emperium_Anvil) < 1) goto LV4_HACK;

-	if(countitem($@LV4_Illusion_Flower) < 1) goto LV4_HACK;

-	if(countitem($@LV4_Gold) < 20) goto LV4_HACK;

-	delitem $@LV4_Hammer_Of_Blacksmith, 2;

-	delitem $@LV4_Emperium_Anvil, 1;

-	delitem $@LV4_Illusion_Flower, 1;

-	delitem $@LV4_Gold, 20;

-	set lv4_weapon, 35;

-	close;

-

-LV4_33:

-LV4_34_BASE_MAT:

-	switch( lv4_weapon ) {

-		case 33:

-			mes "[Reyghema]";

-			mes "Okay. You don't need any other explaination, do you?";

-			mes "I will tell you what I need";

-			mes "so please do not forget those materials.";

-			break;

-		case 34:

-			mes "[Reyghema]";

-			mes "I will tell you the list of materials I need again.";

-			mes "I think I need a lot of materials...so";

-			mes "write them down if you need.";

-			break;

-		}

-		next;

-		mes "[Reyghema]";

-		mes "I need 2 Hammer of Blacksmith,";

-		mes "1 Emperium Anvil, 1 Illusion Flower and 20 Gold...";

-		mes "...wait...are they all...or do I need more?!";

-		if(lv4_weapon == 33) next;

-		if(lv4_weapon == 33) mes "[Reyghema]";

-		if(lv4_weapon == 33) mes "Ah...I think need something more...it's very important...";

-		if(lv4_weapon == 33) mes "But I cannot remember what more I need....!";

-		if(lv4_weapon == 33) mes "Bah...this is so frustrating.";

-		set lv4_weapon, 34;

-		close;

-		

-

-LV4_36:

-LV4_37:

-	if(countitem(LV4_Gem1) < 30) goto LV4_36_NOGEM;

-	if(countitem(LV4_Gem2) < 30) goto LV4_36_NOGEM;

-	if(countitem(LV4_Gem3) < 30) goto LV4_36_NOGEM;

-	mes "[Reyghema]";

-	mes "...Um? The items that you brought to me seem";

-	mes "to be good materials for my creation...";

-	mes "Give them to me, I shall try first!";

-	next;

-	mes "[Reyghema]";

-	mes "Oh...I was right! How did you";

-	mes "know these are materials I need?";

-	mes "Great, give me a moment!";

-	next;

-	mes "[Reyghema]";

-	mes "...wait, I must test your luck first.";

-	mes "Since I am not sure about the result,";

-	mes "we should place trust in luck for the result of my creation.";

-	mes "You must have good luck...";

-	next;

-	mes "[Reyghema]";

-	mes "We are going to play 'Rock, Paper, Scissors'.";

-	mes "You must win at least 2 out of 3 times.";

-	mes "If you fail, you must leave a large amount";

-	mes "of one material you have brought.";

-	mes "It is for driving away your bad luck.";

-	next;

-	mes "[Reyghema]";

-	mes "I will give you a piece of paper.";

-	mes "You will write down one among 'Rock, Paper, or Scissors'.";

-	mes "I will do the same at the same time.";

-	mes "We will then compare each other's paper.";

-	next;

-	

-	set @shobu, 0;

-	

-	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {

-		if(@i == 2) mes "[Reyghema]";

-		if(@i == 2) mes "Let's play the second one!";

-		if(@i == 3) mes "[Reyghema]";

-		if(@i == 3) mes "This will be the last one!";

-		if(@i == 3) mes "Let's compare after this.";

-		set @npchand[@i], rand(1, 3);

-		switch( select( "Scissors", "Rock", "Paper" ) ) {

-			case 1:

-				set @myhand[@i], 1;

-				if(@npchand[@i] == 3) set @shobu, @shobu + 1;

-				break;

-			case 2:

-				set @myhand[@i], 2;

-				if(@npchand[@i] == 1) set @shobu, @shobu + 1;

-				break;

-			case 3:

-				set @myhand[@i], 3;

-				if(@npchand[@i] == 2) set @shobu, @shobu + 1;

-				break;

-		}

-	}

-		

-	if(countitem(LV4_Gem1) < 30) goto LV4_HACK;

-	if(countitem(LV4_Gem2) < 30) goto LV4_HACK;

-	if(countitem(LV4_Gem3) < 30) goto LV4_HACK;

-

-	if(@shobu > 1) goto LV4_36_WIN;

-

-	switch ( rand(1 ,3) ) {

-		case 1:

-			delitem LV4_Gem1, 30;

-			break;

-		case 2:

-			delitem LV4_Gem2, 30;

-			break;

-		case 3:

-			delitem LV4_Gem3, 30;

-			break;

-	}

-	goto LV4_36_RESULT;

-		

-LV4_36_WIN:

-	delitem LV4_Gem1, 30;

-	delitem LV4_Gem2, 30;

-	delitem LV4_Gem3, 30;

-	set lv4_weapon, lv4_weapon + 2;

-	goto LV4_36_RESULT;

-	

-LV4_36_RESULT:

-	mes "[Reyghema]";

-	mes "Okay...I played in the order of...";

-	

-	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {

-		if(@npchand[@i] == 1) mes "Scissors";

-		if(@npchand[@i] == 2) mes "Rock";

-		if(@npchand[@i] == 3) mes "Paper";

-	}

-

-	next;

-	mes "[Reyghema]";

-	mes "You did in the order of...";

-

-	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {

-		if(@myhand[@i] == 1) mes "Scissors";

-		if(@myhand[@i] == 2) mes "Rock";

-		if(@myhand[@i] == 3) mes "Paper";

-	}

-

-	next;

-

-	if(@shobu > 1) goto LV4_36_SAY_WIN;

-	

-	mes "[Reyghema]";

-	mes "Well well well...you lost the game.";

-	mes "Ah~ you were close though...";

-	mes "We must drive away bad luck.";

-	next;

-	mes "[Reyghema]";

-	mes "Okay, I will wait here,";

-	mes "go bring me the materials again...";

-	close;

-			

-LV4_36_SAY_WIN:

-	mes "[Reyghema]";

-	mes "Let's see...";

-	mes "You won total " + @shobu + " times.";

-	mes "Ah~ you must be really good at game!";

-	mes "Yes, your luck is at its highest!";

-	next;

-	mes "[Reyghema]";

-	mes "I am going to keep my promise.";

-	mes "But I need some time to prepare.";

-	mes "Give me the materials now and I will talk to you later.";

-	close;

-

-LV4_35:

-LV4_36_NOGEM:

-		mes "[Reyghema]";

-		mes "Not yet! I have not remembered it yet! Awwww...";

-		mes "This is killing me...";

-		mes "Oh, wait...I died already...";

-		mes "God damn it!";

-	close;

-

-

-LV4_38:

-LV4_39:

-	mes "[Reyghema]";

-	mes "..................";

-	next;

-	mes "[Reyghema]";

-	mes "...YES! It's a success!";

-	mes "I created the weapon that got me killed last time!";

-	mes "Look at this...haha! I died while making this!";

-	mes "... The name of the weapon is...";

-	

-	switch( rand(1, 2) ) {

-		case 1:

-			if(lv4_weapon == 38) mes "Berserk! Weee~ Weee~ I made it!";

-			if(lv4_weapon == 38) getitem 1814 ,1; // 1814,Berserk

-			if(lv4_weapon == 39) mes "Tjungkuletti! Weee~ I made it!";

-			if(lv4_weapon == 39) getitem 1416, 1; // 1416,Tjungkuletti

-			break;

-		case 2:

-			if(lv4_weapon == 38) mes "Rudra's Bow! Weee~ I made it!";

-			if(lv4_weapon == 38) getitem 1720, 1; // 1720,Bow_of_Rudra

-			if(lv4_weapon == 39) mes "Brocca!";

-			if(lv4_weapon == 39) getitem 1415, 1; // 1415,Skewer

-	}

-	

-	set lv4_weapon, 0;

-	next;

-	mes "[Reyghema]";

-	mes "...*sigh*.";

-	next;

-	mes "[Reyghema]";

-	mes "Happiness lasts too short...";

-	mes "As I am a dead man, I think I am not allowed";

-	mes "to keep the memory of past....";

-	mes "My memory is fading again...";

-	next;

-	mes "[Reyghema]";

-	mes "But thank you for letting me achieve";

-	mes "my long-cherished desire.";

-	mes "If we meet again, please let me";

-	mes "retrieve my memory of past again.";

-	mes "So I can try forging another weapon.";

-	next;

-	mes "[Reyghema]";

-	mes "Farewell, adventurer.";

-	close;

-	

-	

-

-//--------------------------------------------------

-//Hack Attempt

-//--------------------------------------------------

-LV4_HACK:

-	mes "[Reyghema]";

-	mes "Hmm. There seems to be a bit of problem.";

-	set lv4_weapon, 0;

-	logmes "[" +strcharinfo(0) + "] tried to hack LV4 quest.";

-	close;

-}

-

-//--------------------------------------------------

-// Hein, creates Excalibur, Schweisersabel, Dragon Slayer and Edge

-//--------------------------------------------------

-

-niflheim.gat,187,280,3	script	Hein	795, {

-	set @NowWeight, MaxWeight - Weight;

-	if (@NowWeight >= 3000) goto LV4_NOT_OW;

-	mes "- Wait a minute! -";

-	mes "- You are currently overweight. -";

-	mes "- Please lose some weight -";

-	mes "- and try again. -";

-	close;

-

-	

-LV4_NOT_OW:

-	if(BaseLevel >= 80) goto LV4_LEVEL_PASS;

-	mes "[Hein]";

-	mes "You should care about other people";

-	mes "more than yourself...";

-	mes "You are quite weak for an adventurer.";

-	close;

-	

-

-LV4_LEVEL_PASS:

-	if(lv4_weapon == 0) goto LV4_0;

-	if(lv4_weapon < 40) goto LV4_39;

-	if(lv4_weapon == 40) goto LV4_40;

-	if(lv4_weapon == 41) goto LV4_41;

-	if(lv4_weapon == 42) goto LV4_42;

-	if(lv4_weapon == 43) goto LV4_43;

-	if(lv4_weapon == 44) goto LV4_44;

-	if(lv4_weapon == 45) goto LV4_45;

-	if(lv4_weapon == 46) goto LV4_46;

-	if(lv4_weapon == 47) goto LV4_47;

-	if(lv4_weapon == 48) goto LV4_48;

-	if(lv4_weapon > 48) goto LV4_49;

-	end; // shouldn't be here

-

-

-LV4_0:

-LV4_40:

-	mes "[Hein]";

-	mes "Ah...are you going to ask me something?";

-	mes "However, I am not accepting money";

-	mes "from my client. Because.";

-	mes "It brings me bad luck to...";

-	mes "...whaat? What did I just say?";

-	mes "Awww....I am confused.";

-	next;

-	

-	if(lv4_weapon == 0) goto LV4_0_ASK;

-	

-	mes "[Hein]";

-	mes "Why did I speak of money?";

-	mes "I am a dead man and dead people";

-	mes "do not need money...arf!";

-	mes "My head is hurting...I guess that";

-	mes "a dead man can have a headache!";

-	close;

-	

-LV4_0_ASK:

-	switch( select( "Show interest.", "Igonore him." ) ) {

-		case 1:

-			mes "[Hein]";

-			mes "Why did I speak of money?";

-			mes "I am a dead man and dead people";

-			mes "do not need money...arf!";

-			mes "My head is hurting...I guess that";

-			mes "a dead man can have a headache!";

-			set lv4_weapon, 40;

-			close;

-			break;

-		case 2:

-			mes "- Because you decided to ignore him, -";

-			mes "- you are no longer able to hear him. -";

-			close;

-			break;

-	}

-	end;

-	

-

-LV4_39:

-LV4_49:

-	mes "[Hein]";

-	mes "I feel something different from you.";

-	mes "Did you come here with a purpose?";

-	mes "I am envious of you...";

-	close;

-

-

-LV4_41:

-	mes "[Hein]";

-	mes "Ah...are you going to ask me something?";

-	mes "However, I am not accepting money";

-	mes "from my client. Because.";

-	mes "It brings me bad luck to...";

-	next;

-	set @dap3$, "to forge a good weapon.";

-	input @answer3$;

-	if(@answer3$ == @dap3$) goto LV4_41_CORRECT;

-	mes "[Hein]";

-	mes "...? What are you talking about?";

-	mes "What was I going to say?";

-	mes "Arf....my head is hurting...!";

-	close;

-

-LV4_41_CORRECT:

-	mes "[Hein]";

-	mes "That's right! It's bad luck!";

-	mes "Creating weapons is betting! And I am...I am?";

-	mes "Oh right...I forgot that. Yes, I am dead.";

-	mes "Ahahahahaha.";

-	set lv4_weapon, 42;

-	next;

-	mes "[Hein]";

-	mes "Well, I must be a lucky dead man";

-	mes "for remembering my past!";

-	mes "Hahahahaha!";

-	next;

-	mes "[Hein]";

-	mes "Perhaps God wants me to";

-	mes "continue my research...?";

-	mes "wait, let me ask you a favor.";

-	next;

-	mes "[Hein]";

-	mes "Can you bring me some materials";

-	mes "that I need for my research?";

-	mes "If I succeed in the research,";

-	mes "I will give you the result in return.";

-	next;

-	mes "[Hein]";

-	mes "You can take your time to think of my offer.";

-	mes "Please talk to me later.";	

-	close;

-	

-	

-LV4_43:

-	if(countitem($@LV4_Hammer_Of_Blacksmith) < 2) goto LV4_43_BASE_MAT;

-	if(countitem($@LV4_Emperium_Anvil) < 1) goto LV4_43_BASE_MAT;

-	if(countitem($@LV4_Illusion_Flower) < 1) goto LV4_43_BASE_MAT;

-	if(countitem($@LV4_Gold) < 20) goto LV4_43_BASE_MAT;

-	

-	mes "[Hein]";

-	mes "Oh, you have brought the materials I asked.";

-	mes "Here's the thing. I cannot remember what I need other than those...";

-	mes "Aww....I need some more time to think of them...";

-	next;

-	mes "[Hein]";

-	mes "Please try to search what I need...if you can.";

-	mes "Of course, it will not be an easy job for you";

-	mes "to do so...but I know you have a body to move with your will...";

-	mes "It is still better than being a ghost like me...";

-	next;

-	mes "[Hein]";

-	mes "Please give me all the materials you have brought.";

-	mes "I will keep them for you.";

-	

-	if(countitem($@LV4_Hammer_Of_Blacksmith) < 2) goto LV4_HACK;

-	if(countitem($@LV4_Emperium_Anvil) < 1) goto LV4_HACK;

-	if(countitem($@LV4_Illusion_Flower) < 1) goto LV4_HACK;

-	if(countitem($@LV4_Gold) < 20) goto LV4_HACK;

-	delitem $@LV4_Hammer_Of_Blacksmith, 2;

-	delitem $@LV4_Emperium_Anvil, 1;

-	delitem $@LV4_Illusion_Flower, 1;

-	delitem $@LV4_Gold, 20;

-	set lv4_weapon, 44;

-	close;

-

-LV4_42:

-LV4_43_BASE_MAT:

-	switch( lv4_weapon ) {

-		case 42:

-			mes "[Hein]";

-			mes "I will take you speaking to me again";

-			mes "as the approval of my request.";

-			mes "Thank you so much.";

-			next;

-			mes "[Hein]";

-			mes "I need 2 Hammer of Blacksmith,";

-			mes "1 Emperium Anvil, 1 Illusion Flower and 20 Gold...";

-			mes "Most likely they are the ones I need.";

-			next;

-			mes "[Hein]";

-			mes "And I do need 3 more things...";

-			mes "but I have a hard time remembering what they are.";

-			mes "That means that my memory of the past is not";

-			mes "absolutely back.";

-			next;

-			mes "[Hein]";

-			mes "*sigh*...I am so sorry to ask of you this...";

-			mes "but please search for what those 3 things are.";

-			mes "In the meantime, I will try to remember them.";

-			mes "Thank you.";

-			set lv4_weapon, 43;

-			break;

-		case 43:

-			mes "[Hein]";

-			mes "I need 2 Hammer of Blacksmith,";

-			mes "1 Emperium Anvil, 1 Illusion Flower and 20 Gold...";

-			mes "Most likely they are the ones I need.";

-			break;

-		}

-		close;

-		

-

-LV4_45:

-LV4_46:

-	if(countitem(LV4_Gem1) < 30) goto LV4_45_NOGEM;

-	if(countitem(LV4_Gem2) < 30) goto LV4_45_NOGEM;

-	if(countitem(LV4_Gem3) < 30) goto LV4_45_NOGEM;

-	mes "[Hein]";

-	mes "...Um? The items that you brought to me seem";

-	mes "to be good materials for my creation...";

-	mes "Give them to me, I shall try first!";

-	next;

-	mes "[Hein]";

-	mes "Oh...I was right! How did you";

-	mes "know these are materials I need?";

-	mes "Great, give me a moment!";

-	next;

-	mes "[Hein]";

-	mes "...Wait, I must test your luck first.";

-	mes "Since I am not sure about the result,";

-	mes "we should trust to luck for the result of my creation.";

-	mes "You must have good luck...";

-	next;

-	mes "[Hein]";

-	mes "We are going to play 'Rock, Paper, Scissors'.";

-	mes "You must win at least 2 out of 3 times.";

-	mes "If you fail, you must leave a large amount";

-	mes "of one material you have brought.";

-	mes "It is for driving away your bad luck.";

-	next;

-	mes "[Hein]";

-	mes "I will give you a piece of paper.";

-	mes "You will write down one among 'Rock, Paper, or Scissors'.";

-	mes "I will do the same at the same time.";

-	mes "We will then compare each other's paper at the end.";

-	next;

-	

-	set @shobu, 0;

-	

-	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {

-		if(@i == 2) mes "[Hein]";

-		if(@i == 2) mes "Let's play the second one!";

-		if(@i == 3) mes "[Hein]";

-		if(@i == 3) mes "This will be the last one!";

-		if(@i == 3) mes "Let's compare after this.";

-		set @npchand[@i], rand(1, 3);

-		switch( select( "Scissors", "Rock", "Paper" ) ) {

-			case 1:

-				set @myhand[@i], 1;

-				if(@npchand[@i] == 3) set @shobu, @shobu + 1;

-				break;

-			case 2:

-				set @myhand[@i], 2;

-				if(@npchand[@i] == 1) set @shobu, @shobu + 1;

-				break;

-			case 3:

-				set @myhand[@i], 3;

-				if(@npchand[@i] == 2) set @shobu, @shobu + 1;

-				break;

-		}

-	}

-		

-	if(countitem(LV4_Gem1) < 30) goto LV4_HACK;

-	if(countitem(LV4_Gem2) < 30) goto LV4_HACK;

-	if(countitem(LV4_Gem3) < 30) goto LV4_HACK;

-

-	if(@shobu > 1) goto LV4_45_WIN;

-

-	switch ( rand(1 ,3) ) {

-		case 1:

-			delitem LV4_Gem1, 30;

-			break;

-		case 2:

-			delitem LV4_Gem2, 30;

-			break;

-		case 3:

-			delitem LV4_Gem3, 30;

-			break;

-	}

-	goto LV4_45_RESULT;

-		

-LV4_45_WIN:

-	delitem LV4_Gem1, 30;

-	delitem LV4_Gem2, 30;

-	delitem LV4_Gem3, 30;

-	set lv4_weapon, lv4_weapon + 2;

-	goto LV4_45_RESULT;

-	

-LV4_45_RESULT:

-	mes "[Hein]";

-	mes "Okay...I played in the order of...";

-	

-	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {

-		if(@npchand[@i] == 1) mes "Scissors";

-		if(@npchand[@i] == 2) mes "Rock";

-		if(@npchand[@i] == 3) mes "Paper";

-	}

-

-	next;

-	mes "[Hein]";

-	mes "You did in the order of...";

-

-	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {

-		if(@myhand[@i] == 1) mes "Scissors";

-		if(@myhand[@i] == 2) mes "Rock";

-		if(@myhand[@i] == 3) mes "Paper";

-	}

-

-	next;

-

-	if(@shobu > 1) goto LV4_45_SAY_WIN;

-	

-	mes "[Hein]";

-	mes "Well well well...you lost the game.";

-	mes "Ah~ you were close though...";

-	mes "We must drive away bad luck.";

-	next;

-	mes "[Hein]";

-	mes "Okay, I will wait here,";

-	mes "go bring me the materials again...";

-	close;

-			

-LV4_45_SAY_WIN:

-	mes "[Hein]";

-	mes "Let's see...";

-	mes "You won total " + @shobu + " times.";

-	mes "Ah~ you must be really good at game!";

-	mes "Yes, your luck is at its highest!";

-	next;

-	mes "[Hein]";

-	mes "I am going to keep my promise.";

-	mes "But I need some time to prepare.";

-	mes "Give me the materials now and I will talk to you later.";

-	close;

-

-LV4_44:

-LV4_45_NOGEM:

-		mes "[Hein]";

-		mes "I am sorry but please give me more time to remember the materials...";

-		mes "I had really good memory when I was alive...";

-		mes "So I could even recite them right after I woke up...";

-	close;

-

-

-LV4_47:

-LV4_48:

-	mes "[Hein]";

-	mes "Oh, yes. I just finished the work.";

-	mes "Do you want to know the result? Okay...";

-	mes "Breathe deeply...before we check.";

-	mes "The result is...";

-	next;

-	mes "[Hein]";

-	mes "a Big Success! This is great!";

-	mes "I have not labored in vain!";

-	mes "Let's see the weapon...it is...";

-	

-	switch( rand(1, 2) ) {

-		case 1:

-			if(lv4_weapon == 47) mes "Edge.";

-			if(lv4_weapon == 47) getitem 1132 ,1; // 1132,Edge

-			if(lv4_weapon == 48) mes "Dragon Slayer.";

-			if(lv4_weapon == 48) getitem 1166, 1; // 1166,Dragon_Slayer

-			break;

-		case 2:

-			if(lv4_weapon == 47) mes "Excalibur.";

-			if(lv4_weapon == 47) getitem 1137, 1; // 1137,Excalibur

-			if(lv4_weapon == 48) mes "Schweizersabel.";

-			if(lv4_weapon == 48) getitem 1167, 1; // 1167,Schweizersabel

-	}

-

-	set lv4_weapon, 0;	

-	next;

-	mes "[Hein]";

-	mes "Well...this is it.";

-	mes "I feel my memory is fading again...";

-	mes "Hahaha...being dead is not good.";

-	next;

-	mes "[Hein]";

-	mes "Thank you for your help. And if you have";

-	mes "a chance to visit Nifflheim again,";

-	mes "please come back and retrieve my memory once more...";

-	next;

-	mes "[Hein]";

-	mes "Aaahhhh! I don't think I will";

-	mes "remember you next time...";

-	mes "Take care, adventurer...father, I made it...";

-	close;

-	

-	

-

-//--------------------------------------------------

-//Hack Attempt

-//--------------------------------------------------

-LV4_HACK:

-	mes "[Hein]";

-	mes "Hmm. There seems to be a bit of problem.";

-	set lv4_weapon, 0;

-	logmes "[" +strcharinfo(0) + "] tried to hack LV4 quest.";

-	close;

-}

-

-//--------------------------------------------------

-// Waltboughst, creates Byeollungum, Exorciser(excercise), Combat Knife and Grand Cross

-//--------------------------------------------------

-

-niflheim.gat,331,72,3	script	Waltboughst	795,{

-	set @NowWeight, MaxWeight - Weight;

-	if (@NowWeight >= 3000) goto LV4_NOT_OW;

-	mes "- Wait a minute! -";

-	mes "- You are currently overweight. -";

-	mes "- Please lose some weight -";

-	mes "- and try again. -";

-	close;

-

-	

-LV4_NOT_OW:

-	if(BaseLevel >= 80) goto LV4_LEVEL_PASS;

-	mes "[Waltboughst]";

-	mes "...Hah!";

-	close;

-	

-

-LV4_LEVEL_PASS:

-	if(lv4_weapon == 0) goto LV4_0;

-	if(lv4_weapon < 49) goto LV4_48;

-	if(lv4_weapon == 49) goto LV4_49;

-	if(lv4_weapon == 50) goto LV4_50;

-	if(lv4_weapon == 51) goto LV4_51;

-	if(lv4_weapon == 52) goto LV4_52;

-	if(lv4_weapon == 53) goto LV4_53;

-	if(lv4_weapon == 54) goto LV4_54;

-	if(lv4_weapon == 55) goto LV4_55;

-	if(lv4_weapon == 56) goto LV4_56;

-	if(lv4_weapon == 57) goto LV4_57;

-	if(lv4_weapon > 57) goto LV4_58;

-	end; // shouldn't be here

-

-

-LV4_0:

-LV4_49:

-	mes "[Waltboughst]";

-	mes "Ah~ it is so frustrating to be a dead man.";

-	mes "Because I cannot do anything without a body.";

-	mes "You know what my father used to say?";

-	mes "Trying best does not always";

-	mes "result in a success.";

-	mes "However...errr?";

-	next;

-	

-	if(lv4_weapon == 0) goto LV4_0_ASK;

-	

-	mes "[Waltboughst]";

-	mes "...What was my father's";

-	mes "quote? Why am I stuck in";

-	mes "here after death? Hey, you";

-	mes "Do you know anything about";

-	mes "Waltboughst when he was";

-	mes "alive?";

-	close;

-	

-LV4_0_ASK:

-	switch( select( "Show interest.", "Igonore him." ) ) {

-		case 1:

-			mes "[Waltboughst]";

-			mes "...what did he say afterwards?";

-			mes "Speaking of which, why am I";

-			mes "so anxious to do something?";

-			mes "I am a dead man, and a dead man is not supposed to do anything!";

-			mes "Hey, do you know anything about me when I was alive?";

-			set lv4_weapon, 49;

-			close;

-			break;

-		case 2:

-			mes "- Because you decided to ignore him, -";

-			mes "- you are no longer able to hear him. -";

-			close;

-			break;

-	}

-	end;

-	

-

-LV4_48:

-LV4_58:

-	mes "[Waltboughst]";

-	mes "I feel something different about you.";

-	mes "Did you come here with a purpose?";

-	mes "I am envious of you...";

-	close;

-

-

-LV4_50:

-	mes "[Waltboughst]";

-	mes "Ah~ it is so frustrating to be a dead man.";

-	mes "Because I cannot do anything without a body.";

-	mes "You know what my father used to say?";

-	mes "Trying best does not always";

-	mes "result in a success.";

-	mes "However...";

-	next;

-	set @dap4$, "All the successful men in the history tried their best!";

-	input @answer4$;

-	if(@answer4$ == @dap4$) goto LV4_50_CORRECT;

-	mes "[Waltboughst]";

-	mes "...What? What did you just say?";

-	mes "Hmmm.";

-	close;

-

-LV4_50_CORRECT:

-	mes "[Waltboughst]";

-	mes "Yes! That was it!";

-	mes "Since I am dead, I cannot even try!";

-	mes "Eh...?! Ah!";

-	mes "I see, I see now.";

-	mes "I must have been killed by some kind of accident!";

-	set lv4_weapon, 51;

-	next;

-	mes "[Waltboughst]";

-	mes "Okay, I am not going to end this way.";

-	mes "Hey, you were meant to meet me!";

-	mes "You got to do me a favor, now!";

-	next;

-	mes "[Waltboughst]";

-	mes "I will give you the result of my research";

-	mes "in return! All I want is to compete my research,";

-	mes "not the result.";

-	next;

-	mes "[Waltboughst]";

-	mes "Well, give me some time to remember";

-	mes "what I need for my research.";

-	mes "I will talk to you later.";

-	close;

-	

-	

-LV4_52:

-	if(countitem($@LV4_Hammer_Of_Blacksmith) < 2) goto LV4_52_BASE_MAT;

-	if(countitem($@LV4_Emperium_Anvil) < 1) goto LV4_52_BASE_MAT;

-	if(countitem($@LV4_Illusion_Flower) < 1) goto LV4_52_BASE_MAT;

-	if(countitem($@LV4_Gold) < 20) goto LV4_52_BASE_MAT;

-	

-	mes "[Waltboughst]";

-	mes "Oh...you brought everything I need!";

-	mes "You were quick this time...I am still having";

-	mes "a hard time remembering what I need other than those.";

-	mes "This is not good, this is not good at all.";

-	next;

-	mes "[Waltboughst]";

-	mes "Anyways, I will keep those materials for you.";

-	mes "And give me some more times to";

-	mes "remember what I need...arph!";

-	

-	if(countitem($@LV4_Hammer_Of_Blacksmith) < 2) goto LV4_HACK;

-	if(countitem($@LV4_Emperium_Anvil) < 1) goto LV4_HACK;

-	if(countitem($@LV4_Illusion_Flower) < 1) goto LV4_HACK;

-	if(countitem($@LV4_Gold) < 20) goto LV4_HACK;

-	delitem $@LV4_Hammer_Of_Blacksmith, 2;

-	delitem $@LV4_Emperium_Anvil, 1;

-	delitem $@LV4_Illusion_Flower, 1;

-	delitem $@LV4_Gold, 20;

-	set lv4_weapon, 53;

-	close;

-

-LV4_51:

-LV4_52_BASE_MAT:

-	switch( lv4_weapon ) {

-		case 51:

-			mes "[Waltboughst]";

-			mes "Umm, you came back so early.";

-			mes "I just remembered the materials.";

-			next;

-			mes "[Waltboughst]";

-			mes "I need 2 Hammer of Blacksmith,";

-			mes "1 Emperium Anvil, 1 Illusion Flower and 20 Gold...";

-			next;

-			mes "[Waltboughst]";

-			mes "I do need some other items...but I need some time";

-			mes "to remember those. Oh well,";

-			mes "we have enough time, so let me think of them.";

-			set lv4_weapon, 52;

-			break;

-		case 52:

-			mes "[Waltboughst]";

-			mes "I need 2 Hammer of Blacksmith,";

-			mes "1 Emperium Anvil, 1 Illusion Flower and 20 Gold...";

-			mes "Most likey they will be the ones I need...";

-			break;

-		}

-		close;

-		

-

-LV4_54:

-LV4_55:

-	if(countitem(LV4_Gem1) < 30) goto LV4_54_NOGEM;

-	if(countitem(LV4_Gem2) < 30) goto LV4_54_NOGEM;

-	if(countitem(LV4_Gem3) < 30) goto LV4_54_NOGEM;

-	mes "[Waltboughst]";

-	mes "...Um? The items that you brought to me seem";

-	mes "to be good materials for my creation...";

-	mes "Give them to me, I shall try first!";

-	next;

-	mes "[Waltboughst]";

-	mes "Oh...I was right! How did you";

-	mes "know these are materials I need?";

-	mes "Great, give me a moment!";

-	next;

-	mes "[Waltboughst]";

-	mes "...wait, I must test your luck first.";

-	mes "Since I am not sure about the result,";

-	mes "we should trust to luck for the result of my creation.";

-	mes "You must have good luck...";

-	next;

-	mes "[Waltboughst]";

-	mes "We are going to play 'Rock, Paper, Scissors'.";

-	mes "You must win at least 2 out of 3 times.";

-	mes "If you fail, you must leave a large amount";

-	mes "of one material you have brought.";

-	mes "It is for driving away your bad luck.";

-	next;

-	mes "[Waltboughst]";

-	mes "I will give you a piece of paper.";

-	mes "You will write down one among 'Rock, Paper, or Scissors'.";

-	mes "I will do the same at the same time.";

-	mes "We will then compare each other's paper at the end.";

-	next;

-	

-	set @shobu, 0;

-	

-	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {

-		if(@i == 2) mes "[Waltboughst]";

-		if(@i == 2) mes "Let's play the second one!";

-		if(@i == 3) mes "[Waltboughst]";

-		if(@i == 3) mes "This will be the last one!";

-		if(@i == 3) mes "Let's compare after this.";

-		set @npchand[@i], rand(1, 3);

-		switch( select( "Scissors", "Rock", "Paper" ) ) {

-			case 1:

-				set @myhand[@i], 1;

-				if(@npchand[@i] == 3) set @shobu, @shobu + 1;

-				break;

-			case 2:

-				set @myhand[@i], 2;

-				if(@npchand[@i] == 1) set @shobu, @shobu + 1;

-				break;

-			case 3:

-				set @myhand[@i], 3;

-				if(@npchand[@i] == 2) set @shobu, @shobu + 1;

-				break;

-		}

-	}

-		

-	if(countitem(LV4_Gem1) < 30) goto LV4_HACK;

-	if(countitem(LV4_Gem2) < 30) goto LV4_HACK;

-	if(countitem(LV4_Gem3) < 30) goto LV4_HACK;

-

-	if(@shobu > 1) goto LV4_54_WIN;

-

-	switch ( rand(1 ,3) ) {

-		case 1:

-			delitem LV4_Gem1, 30;

-			break;

-		case 2:

-			delitem LV4_Gem2, 30;

-			break;

-		case 3:

-			delitem LV4_Gem3, 30;

-			break;

-	}

-	goto LV4_54_RESULT;

-		

-LV4_54_WIN:

-	delitem LV4_Gem1, 30;

-	delitem LV4_Gem2, 30;

-	delitem LV4_Gem3, 30;

-	set lv4_weapon, lv4_weapon + 2;

-	goto LV4_54_RESULT;

-	

-LV4_54_RESULT:

-	mes "[Waltboughst]";

-	mes "Okay...I played in the order of...";

-	

-	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {

-		if(@npchand[@i] == 1) mes "Scissors";

-		if(@npchand[@i] == 2) mes "Rock";

-		if(@npchand[@i] == 3) mes "Paper";

-	}

-

-	next;

-	mes "[Waltboughst]";

-	mes "You did in the order of...";

-

-	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {

-		if(@myhand[@i] == 1) mes "Scissors";

-		if(@myhand[@i] == 2) mes "Rock";

-		if(@myhand[@i] == 3) mes "Paper";

-	}

-

-	next;

-

-	if(@shobu > 1) goto LV4_54_SAY_WIN;

-	

-	mes "[Waltboughst]";

-	mes "Well well well...you lost the game.";

-	mes "Ah~ you were close though...";

-	mes "We must drive away bad luck.";

-	next;

-	mes "[Waltboughst]";

-	mes "Okay, I will wait here,";

-	mes "go bring me the materials again...";

-	close;

-			

-LV4_54_SAY_WIN:

-	mes "[Waltboughst]";

-	mes "Let's see...";

-	mes "You won total " + @shobu + " times.";

-	mes "Ah~ you must be really good at game!";

-	mes "Yes, your luck is at its highest!";

-	next;

-	mes "[Waltboughst]";

-	mes "I am going to keep my promise.";

-	mes "But I need some time to prepare.";

-	mes "Give me the materials now and I will talk to you later.";

-	close;

-

-LV4_53:

-LV4_54_NOGEM:

-	mes "[Waltboughst]";

-	mes "Arph...I haven't remembered them yet.";

-	mes "Awww....this is a problem.";

-	mes "I must think of them as soon as possible...";

-	close;

-

-

-LV4_56:

-LV4_57:

-	mes "[Waltboughst]";

-	mes "Hehe, I made something with the materials";

-	mes "in this short time! Wanna see?";

-	mes "Aren't you wondering about the result?";

-	mes "Hmmm....let's see...";

-	next;

-	mes "[Waltboughst]";

-	mes "Waltboughst never fails!";

-	mes "Besides you had good luck,";

-	mes "so it resulted in a perfect success!";

-	mes "You got a nice weapon here, it is...";

-	

-	switch( rand(1, 2) ) {

-		case 1:

-			if(lv4_weapon == 56) mes "Byeollungum!";

-			if(lv4_weapon == 56) getitem 1140 ,1; // 1140,Byeollungum

-			if(lv4_weapon == 57) mes "Exorciser!";

-			if(lv4_weapon == 57) getitem 1233, 1; // 1233,Exercise

-			break;

-		case 2:

-			if(lv4_weapon == 56) mes "Combat Knife!";

-			if(lv4_weapon == 56) getitem 1228, 1; // 1228,Combat_Knife

-			if(lv4_weapon == 57) mes "Grand Cross!!";

-			if(lv4_weapon == 57) getitem 1528, 1; // 1528,Grand_Cross

-	}

-	

-	set lv4_weapon, 0;

-	next;

-	mes "[Waltboughst]";

-	mes "I am genius! Hahahaha!";

-	mes "I made it when my brothers could not!";

-	mes "Muhahahahahaha!";

-	mes "Eh...err? Arrr...phhh?";

-	next;

-	mes "[Waltboughst]";

-	mes "Damn...I must try too hard.";

-	mes "My memory is fading again...";

-	mes "Oh well, somehow I proved";

-	mes "that I am a genius even after I died.";

-	next;

-	mes "[Waltboughst]";

-	mes "If you want me to display my genius again,";

-	mes "come retrieve my memory again.";

-	mes "And thank you!";

-	next;

-	mes "[Waltboughst]";

-	mes "Ah...my memory's dying again...";

-	mes "Farewell~ I don't think I will remember you";

-	mes "but I hope you will remember me as Waltboughst";

-	mes "the genius in the age!";

-	close;

-	

-	

-

-//--------------------------------------------------

-//Hack Attempt

-//--------------------------------------------------

-LV4_HACK:

-	mes "[Waltboughst]";

-	mes "Hmm. There seems to be a bit of problem.";

-	set lv4_weapon, 0;

-	logmes "[" +strcharinfo(0) + "] tried to hack LV4 quest.";

-	close;

-}

+//===== eAthena Script ======================================= 
+//= Grade A and Grade S weapon quests
+//===== By: ================================================== 
+//= Vicious_Pucca, Reddozen & MasterOfMuppets
+//===== Current Version: ===================================== 
+//= 1.21
+//===== Compatible With: ===================================== 
+//= eAthena SVN 3422+(Requires jA Script System)
+//===== Description: ========================================= 
+//= Grade A and Grade S weapon quests
+//===== Additional Comments: ================================= 
+//= 1.0 First Version, Credits goes to Vicious_Pucca for converting [MasterOfMuppets]
+//=     the quest from aegis format to eA format. Also thanks to 
+//=	reddozen for fixing bugs.
+//= 1.1 Many fixes to spelling, grammar, and sentence order. [Silent]
+//= 1.2 A small fix, thanks to vicious_pucca [MasterOfMuppets]
+//= 1.21 Fixing MoM's typos (Citrin -> Citrine) [erKURITA]
+//============================================================ 
+
+//---------------------------------------------------------------
+// Initialize the basic materials for easier reading/conversion 
+//---------------------------------------------------------------
+
+-	script	lv4_weapon_init	-1,{
+OnInit:
+	set $@LV4_Citrine, 7295; // 7295,Citrine
+	set $@LV4_Turquoise, 7294; // 7294,Turquoise
+	set $@LV4_Agate, 7291; // 7291,Agate
+	
+	set $@LV4_Muscovite, 7292; // 7292,Muscovite
+	set $@LV4_Biotite, 7297; // 7297,Biotite
+	set $@LV4_Pyroxene, 7296; // 7296,Pyroxene
+	
+	set $@LV4_Phlogopite, 7290; // 7290,Phlogopite
+	set $@LV4_Olivine, 7289; // 7289,Peridot
+	set $@LV4_Rose_Quartz, 7293; // 7293,Rose_Quartz	
+	
+	set $@LV4_Gold, 969; // 969,Gold
+	set $@LV4_Steel, 999; // 999,Steel
+	set $@LV4_Emperium, 714; // 714,Emperium
+	set $@LV4_Hammer_Of_Blacksmith, 1005; // 1005,Hammer_of_Blacksmith
+	set $@LV4_Emperium_Anvil, 989; // 989,Emperium_Anvil
+	set $@LV4_Illusion_Flower, 710; // 710,Illusion_Flower
+	end;		
+}
+
+//---------------------------------------------------------------
+// Bazo, creates Immaterial Sword, Quadrille and Slash
+//---------------------------------------------------------------
+
+umbala.gat,117,285,3	script	Bazo	85,{
+	set @NowWeight, MaxWeight - Weight;
+	if (@NowWeight >= 3000) goto LV4_NOT_OW;
+	mes "- Wait a minute! -";
+	mes "- Currently you are overweight. -";
+	mes "- Please lighten your weight -";
+	mes "- and try again. -";
+	close;
+
+	
+LV4_NOT_OW:
+	if(lv4_weapon == 0) goto LV4_0;
+	if(lv4_weapon == 1) goto LV4_1;
+	if(lv4_weapon == 2) goto LV4_2;
+	if(lv4_weapon == 3) goto LV4_2;
+	if(lv4_weapon == 4) goto LV4_2;
+	if(lv4_weapon == 5) goto LV4_5;
+	if(lv4_weapon == 6) goto LV4_5;
+	if(lv4_weapon == 7) goto LV4_5;
+	if(lv4_weapon > 7) goto LV4_7;	
+	end; // shouldn't be here
+
+	
+LV4_0:
+	mes "[Bazo]";
+	mes "Hello, you are from outside, huh?";
+	mes "I can tell by your appearance.";
+	mes "Pleased to meet you. My name is Bazo Heburiech.";
+	mes "I am also from outside.";
+	next;
+	mes "[Bazo]";
+	mes "We must have been meant to meet each other.";
+	mes "If you don't mind, let me explain about this place for a while.";
+	mes "Umbala is adjacent to Nifflheim, the city of the dead.";
+	mes "Even at a first sight, I knew that";
+	mes "there is something about this village.";
+	next;
+	mes "[Bazo]";
+	mes "Due to that geographical trait,";
+	mes "this village was filled with evil power";
+	mes "that was influenced by the city of the dead.";
+	next;
+	mes "[Bazo]";
+	mes "The local people have learned";
+	mes "to manipulate the evil power for";
+	mes "producing specialties.";
+	next;
+	mes "[Bazo]";
+	mes "While staying here, I also have learned";
+	mes "some recipes. If you bring me materials,";
+	mes "I am willing to show you my skills.";
+	mes "How does that sound?";
+	next;
+	
+	switch( select( "Sounds good.", "No, thanks." ) ) {
+		case 1:
+			if(BaseLevel >= 70) goto L4_0_1;
+			
+			mes "[Bazo]";
+			mes "Err...I don't think that you are powerful";
+			mes "enough to handle my products.";
+			mes "They are charged with evil power.";
+			next;
+			mes "That means if their owners are not powerful";
+			mes "and not experienced enough,";
+			mes "they will drive the owners insane.";
+			mes "And I cannot do that to my friend.";
+			next;
+			mes "[Bazo]";
+			mes "Therefore, I want you to go back and level up first.";
+			mes "I will gladly expect you to come back when you are ready.";
+			break;
+L4_0_1:
+			mes "[Bazo]";
+			mes "Excellent! Let me tell you";
+			mes "the materials I need. I hope you will write them down.";
+			mes "There is not that many though.";
+			next;
+			mes "[Bazo]";
+			mes "I need 10 Gold, 50 Steel and 10 Emperium";
+			mes "as basic materials...";
+			mes "and you can enchant the product with a certain trait.";
+			mes "For that, I need some rare ores...";
+			next;
+			mes "[Bazo]";
+			mes "Please bring me 30 of either Citrine, Turquoise or Agate.";
+			mes "Each one of them possess their own attribute";
+			mes "and following by the ore you have brought,";
+			mes "my product will possess a special trait.";
+			next;
+			mes "[Bazo]";
+			mes "I wish you good luck...";
+			mes "I will wait for you!";
+			
+			set lv4_weapon, 1;
+			break;
+		case 2:
+			mes "[Bazo]";
+			mes "Oh, okay. That is fine with me.";
+			mes "By the way, don't you want to know how evil the city of the dead will be?";
+			mes "I do since that city influences so much of this village";
+			mes "with it's mysterious power, you know.";
+			break;			
+	}	
+	close;
+	
+
+
+//--------------------------------------------------
+//Gold, Steel, Emp Check + Choosing the gem
+//--------------------------------------------------
+LV4_1:
+	if(countitem($@LV4_Gold) < 10) goto LV4_1_FAIL;
+	if(countitem($@LV4_Steel) < 50) goto LV4_1_FAIL;
+	if(countitem($@LV4_Emperium) < 10) goto LV4_1_FAIL;
+
+	mes "[Bazo]";
+	mes "Oh...you have brought all the basic materials.";
+	mes "Now let me check what kind of rare ores";
+	mes "you have brought...";
+	next;
+	
+	if (countitem($@LV4_Citrine) >= 30 && countitem($@LV4_Turquoise) >= 30 && countitem($@LV4_Agate) >= 30) goto LV4_1_CTA;
+	if (countitem($@LV4_Citrine) >= 30 && countitem($@LV4_Turquoise) >= 30) goto LV4_1_CT;
+	if (countitem($@LV4_Citrine) >= 30 && countitem($@LV4_Agate) >= 30) goto LV4_1_CA;
+	if (countitem($@LV4_Turquoise) >= 30 && countitem($@LV4_Agate) >= 30) goto LV4_1_TA;
+	if (countitem($@LV4_Citrine) >= 30) goto LV4_1_C;
+	if (countitem($@LV4_Turquoise) >= 30) goto LV4_1_T;
+	if (countitem($@LV4_Agate) >= 30) goto LV4_1_A;
+	goto LV4_1_NOGEM;
+	end;
+
+
+LV4_1_CTA:	
+	mes "[Bazo]";
+	mes "Hahaha, I asked you to bring one kind not all of them.";
+	mes "You can only use one kind of ore.";
+	mes "Which one would you like to use?";
+	next;
+	
+	switch( select( "Citrine", "Turquoise", "Agate" ) ) {
+		case 1:
+			mes "[Bazo]";
+			mes "Citrine...okay. Before we start,";
+			set @gem, $@LV4_Citrine;
+			set @gemstring$,"Citrine";
+			break;
+		case 2:
+			mes "[Bazo]";
+			mes "Turquoise...okay. Before we start,";
+			set @gem, $@LV4_Turquoise;
+			set @gemstring$,"Turquoise";
+			break;
+		case 3:
+			mes "[Bazo]";
+			mes "Agate....okay. Before we start,";
+			set @gem, $@LV4_Agate;
+			set @gemstring$,"Agate";
+			break;
+	}
+	
+	goto LV4_1_PICK;
+	end; // shouldn't be here
+	
+	
+LV4_1_CT:
+	mes "[Bazo]";
+	mes "Hahaha, I asked you to bring one kind not two.";
+	mes "You can only use one kind of ore.";
+	mes "Which one would you like to use?";
+	next;
+	
+	switch( select( "Citrine", "Turquoise" ) ) {
+		case 1:
+			mes "[Bazo]";
+			mes "Citrine...okay. Before we start,";
+			set @gem, $@LV4_Citrine;
+			set @gemstring$,"Citrine";
+			break;
+		case 2:
+			mes "[Bazo]";
+			mes "Turquoise...okay. Before we start,";
+			set @gem, $@LV4_Turquoise;
+			set @gemstring$,"Turquoise";
+			break;
+	}
+	
+	goto LV4_1_PICK;
+	end; // shouldn't be here
+	
+
+LV4_1_CA:	
+	mes "[Bazo]";
+	mes "Hahaha, I asked you to bring one kind not two.";
+	mes "You can only use one kind of ore.";
+	mes "Which one would you like to use?";
+	next;
+	
+	switch( select( "Citrine", "Agate" ) ) {
+		case 1:
+			mes "[Bazo]";
+			mes "Citrine...okay. Before we start,";
+			set @gem, $@LV4_Citrine;
+			set @gemstring$,"Citrine";
+			break;
+		case 2:
+			mes "[Bazo]";
+			mes "Agate....okay. Before we start,";
+			set @gem, $@LV4_Agate;
+			set @gemstring$,"Agate";
+			break;
+	}
+	
+	goto LV4_1_PICK;
+	end; // shouldn't be here
+	
+	
+LV4_1_TA:	
+	mes "[Bazo]";
+	mes "Hahaha, I asked you to bring one kind not two.";
+	mes "You can only use one kind of ore.";
+	mes "Which one would you like to use?";
+	next;
+	
+	switch( select( "Turquoise", "Agate" ) ) {
+			case 1:
+				mes "[Bazo]";
+				mes "Turquoise...okay. Before we start,";
+				set @gem, $@LV4_Turquoise;
+				set @gemstring$,"Turquoise";
+				break;
+			case 2:
+				mes "[Bazo]";
+				mes "Agate....okay. Before we start,";
+				set @gem, $@LV4_Agate;
+				set @gemstring$,"Agate";
+				break;
+	}
+	
+	goto LV4_1_PICK;
+	end; // shouldn't be here
+	
+	
+LV4_1_C:
+	mes "[Bazo]";
+	mes "Citrine...okay. Before we start,";
+	set @gem, $@LV4_Citrine;
+	set @gemstring$,"Citrine";
+	goto LV4_1_PICK;
+	end; // shouldn't be here
+		
+		
+LV4_1_T:
+	mes "[Bazo]";
+	mes "Turquoise...okay. Before we start,";
+	set @gem, $@LV4_Turquoise;
+	set @gemstring$,"Turquoise";
+	goto LV4_1_PICK;
+	end; // shouldn't be here
+	
+	
+LV4_1_A:
+	mes "[Bazo]";
+	mes "Agate....okay. Before we start,";
+	set @gem, $@LV4_Agate;
+	set @gemstring$,"Agate";
+	goto LV4_1_PICK;
+	end; // shouldn't be here
+	
+	
+LV4_1_PICK:
+	mes "we must do one thing first.";
+	mes "That is, testing your luck.";
+	mes "As you already know,";
+	mes "I cannot guarantee you that we will succeed";
+	mes "to make one right away.";
+	next;
+	mes "[Bazo]";
+	mes "If we can raise your luck before we start,";
+	mes "we will be able to succeed.";
+	next;
+	mes "[Bazo]";
+	mes "Now you must be wondering what we";
+	mes "will do in order to increase your luck.";
+	mes "It is simple, we will play a mind-reading game.";
+	mes "I am going to think of one monster among 4 of my favorite ones,";
+	mes "you will guess what the monster is.";
+	next;
+	mes "[Bazo]";
+	mes "You must answer correctly at least";
+	mes "1 out of 5 times. It shouldn't be that difficult.";
+	mes "And if you fail to answer, we must do something else";
+	mes "to drive away your bad luck.";
+	next;
+	mes "[Bazo]";
+	mes "I will take 10 of the special ore you chose.";
+	mes "Well, I understand that it does not sound tempting";
+	mes "but let's think of it this way.";
+	mes "It is much better than wasting 30 ore";
+	mes "by failing to create the item, isn't it?";
+	next;
+	mes "[Bazo]";
+	mes "Okay, now I need some time to prepare...";
+	mes "Talk to you later!";
+	
+	if(countitem($@LV4_Gold) < 10) goto LV4_HACK;
+	if(countitem($@LV4_Steel) < 50) goto LV4_HACK;
+	if(countitem($@LV4_Emperium) < 10) goto LV4_HACK;
+	delitem $@LV4_Gold, 10;
+	delitem $@LV4_Steel, 50;
+	delitem $@LV4_Emperium, 10;
+	if(@gem == $@LV4_Citrine) set lv4_weapon, 2;
+	if(@gem == $@LV4_Turquoise) set lv4_weapon, 3;
+	if(@gem == $@LV4_Agate) set lv4_weapon, 4;	
+	close;
+
+
+LV4_1_NOGEM:
+	mes "[Bazo]";
+	mes "I seem to recall that I asked you to bring";
+	mes "30 of a special ore, Citrine, Turquoise, or Agate...";
+	mes "And I don't see any of them.";
+	mes "You must have forgot them. Please go get them too.";
+	close;
+
+
+LV4_1_FAIL:
+	mes "[Bazo]";
+	mes "Please bring me 10 Gold, 50 Steel and 10 Emperium";
+	mes "as basic materials...";
+	mes "and you can enchant the product with a certain trait.";
+	mes "For that, I need some rare ores...";
+	next;
+	mes "[Bazo]";
+	mes "Please bring me 30 of either Citrine, Turquoise or Agate.";
+	mes "Each one of them possess their own attribute";
+	mes "and using the ore you have brought,";
+	mes "my product will possess a special trait.";
+	next;
+	mes "[Bazo]";
+	mes "I wish you good luck...";
+	mes "I will wait for you!";
+	close;
+
+
+
+//--------------------------------------------------
+//Guessing Game
+//--------------------------------------------------
+LV4_2:
+	if(lv4_weapon == 2) set @gem, $@LV4_Citrine;
+	if(lv4_weapon == 3) set @gem, $@LV4_Turquoise;
+	if(lv4_weapon == 4) set @gem, $@LV4_Agate;
+	if(countitem(@gem) < 30) goto LV4_2_NOGEM; 
+	
+	mes "[Bazo]";
+	mes "Ok, you seem to be ready.";
+	mes "Let's get started.";
+	mes "My favorite monsters are Poring,";
+	mes "Hode, Obeaune, and Minorous.";
+	next;
+
+	set @dap, 0;
+	set @correct[0],1;
+	for( set @i, 1; @i <= 5; set @i, @i + 1 ) {
+		mes "[Bazo]";
+		
+		if(@i == 1) mes "Here's the 1st question. Guess what monster";
+		if(@i != 1) mes "Alright. Now guess what monster";
+		
+		mes "I have in my mind at this moment.";
+		next;
+
+		set @mons, rand(1, 4);		
+
+		switch( select( "Poring", "Hode", "Obeaune", "Minorous" ) ) {
+				case 1:
+					set @correct[@i], 1;
+					if(@mons == 1) set @dap, @dap + 1;
+					break;
+
+				case 2:
+					set @correct[@i], 2;
+					if(@mons == 2) set @dap, @dap + 1;
+					break;
+
+				case 3:
+					set @correct[@i], 3;
+					if(@mons == 3) set @dap, @dap + 1;
+					break;
+
+				case 4:
+					set @correct[@i], 4;
+					if(@mons == 4) set @dap, @dap + 1;
+					break;
+		}
+	}
+
+	mes "[Bazo]";
+	mes "Okay, let me give you answers for the questions.";
+	mes "I was thinking of the monsters in the order of";
+	next;
+	mes "[Bazo]";
+
+	for( set @i, 1; @i <= 5; set @i, @i + 1 ) {
+		if(@correct[@i] == 1) mes "Poring";
+		if(@correct[@i] == 2) mes "Hode";
+		if(@correct[@i] == 3) mes "Obeaune";
+		if(@correct[@i] == 4) mes "Minorous";
+	}
+
+	if(@dap < 1) goto LV4_2_FAIL;
+	
+	next;
+	mes "[Bazo]";
+	mes "You answered " + @dap + " times!";
+	mes "I must say you're amazing!";
+	mes "As I promised, I will make an Umbala specialty for you.";
+	mes "Please give me some time to prepare.";
+	mes "Talk to you later.";
+	
+	if(countitem(@gem) < 30) goto LV4_HACK;
+	delitem @gem, 30;
+	set lv4_weapon, lv4_weapon + 3;
+	close;
+	
+	
+LV4_2_FAIL:
+	if(countitem(@gem) < 10) goto LV4_HACK;
+	delitem @gem, 10;
+	
+	next;
+	mes "[Bazo]";
+	mes "Errr... I don't think you are good at reading";
+	mes "other people's minds. Or you had bad luck, I guess.";
+	mes "We cannot do that again unless";
+	mes "we drive away the bad luck.";
+	mes "Give me 10 " + @gemstring$ + ", that will do the job.";
+	next;
+	mes "[Bazo]";
+	mes "Well...if you want to do this mind-reading game again,";
+	mes "please come back with the materials.";
+	mes "I will wait here for you.";
+	close;
+
+
+LV4_2_NOGEM:
+	mes "[Bazo]";
+	mes "Errr...something doesn't feel right. We lack something...";
+	mes "Will you check the materials that you have brought?";
+	close;
+	
+	
+	
+//--------------------------------------------------
+//Weapon Creation
+//--------------------------------------------------
+LV4_5:
+	mes "[Bazo]";
+	mes "Great... now, let's do it!";
+	mes "Wish me luck...ah, I forgot to tell you this.";
+	mes "I cannot tell you what kind of product it will be. It is so random.";
+	mes "Let's wish that a good thing will come out, okay?";
+	next;
+	mes "- You feel unknown power start gathering in -";
+	mes "- the materials. It seems the materials are -";
+	mes "- absorbing all the evil power in the air. -";
+	next;
+	mes "- Then, the materials start merging into one -";
+	mes "- even though Bazo didn't touch them at all. -";
+	next;
+	mes "[Bazo]";
+	mes "Can you feel that? The materials are gathering";
+	mes "power at their own will.";
+	mes "They are out of my hand now. Let's wait and hope.";
+	next;
+	mes "- After a while, the air becomes calm -";
+	mes "- and you check the result. -";
+	next;
+	mes "[Bazo]";
+	mes "Ooooooh! It is done!";
+	mes "We have succeeded! Ah, it's amazing!";
+	mes "Did I tell you that it is really rare to succeed right away?";
+	mes "Yes, God must have listened to our prayers.";
+	mes "Oh, it is a weapon! It will be very useful to you.";
+	mes "Let's take a closer look...";
+	next;
+
+	mes "[Bazo]";
+
+	switch( lv4_weapon ) {
+		case 5:
+			mes "Immaterial Sword!";
+			getitem 1141, 1; // 1141,Immaterial_Sword
+			break;
+		case 6:
+			mes "it is Slash!";
+			getitem 1526, 1; // 1526,Slash
+			break;
+		case 7:
+			mes "it is Quadrille!";
+			getitem 1527, 1; // 1527,Quadrille
+			break;
+	}
+
+	set lv4_weapon, 0;
+	mes "This sword was born to be yours!";
+	mes "Congratulations and hopefully it will have a good use for you.";
+	next;
+
+	mes "[Bazo]";
+	mes "I feel so gratified. If you wish to have";
+	mes "another one, please feel free to visit me anytime.";
+	mes "Have a good travel!";
+	close;
+
+
+
+//--------------------------------------------------
+//Other Quests
+//--------------------------------------------------
+LV4_7:
+	mes "[Bazo]";
+	mes "Hmm...I feel something strange from you.";
+	mes "I regret to say that there is nothing I can do for you.";
+	mes "I hope you have a safe travel.";
+	close;
+	
+	
+	
+//--------------------------------------------------
+//Hack Attempt
+//--------------------------------------------------
+LV4_HACK:
+	mes "[Bazo]";
+	mes "Hmm. There seems to be a bit of problem.";
+	set lv4_weapon, 0;
+	logmes "[" +strcharinfo(0) + "] tried to hack LV4 quest.";
+	close;
+}
+
+//---------------------------------------------------------------
+// Hibilaithan, creates Mailbreaker, Swordbreaker and Slaughter
+//---------------------------------------------------------------
+
+umbala.gat,163,257,3	script	Hibilaithan	785,{
+	if(event_umbala < 3) goto LumWord;
+	set @NowWeight, MaxWeight - Weight;
+	if (@NowWeight >= 3000) goto LV4_NOT_OW;
+	mes "- Wait a minute! -";
+	mes "- Currently you are overweight. -";
+	mes "- Please lighten your weight -";
+	mes "- and try again. -";
+	close;
+
+	
+LV4_NOT_OW:
+	if(lv4_weapon == 0) goto LV4_0;
+	if(lv4_weapon == 8) goto LV4_8;
+	if(lv4_weapon == 9) goto LV4_9;
+	if(lv4_weapon == 10) goto LV4_9;
+	if(lv4_weapon == 11) goto LV4_9;
+	if(lv4_weapon == 12) goto LV4_12;
+	if(lv4_weapon == 13) goto LV4_12;
+	if(lv4_weapon == 14) goto LV4_12;
+	if(lv4_weapon < 8) goto LV4_7;
+	if(lv4_weapon > 14) goto LV4_7;	
+	end; // shouldn't be here
+	
+
+LumWord:
+		mes "[Hibilaithan]";
+		mes "Umba! Umbaba...umum! Baumba!";
+		mes "Umumumbababaumumbabaumba!";
+		mes "Umbaumbaumbaumbaumhah!";
+		mes "Umumumumumbababababab!";
+	close;
+
+	
+LV4_0:
+	mes "[Hibilaithan]";
+	mes "Haha, yeah, I knew this day would come.";
+	mes "Finally people recognize my value";
+	mes "as the best artisan in Umbala!";
+	next;
+	mes "[Hibilaithan]";
+	mes "Okay, let's talk straight.";
+	mes "I, Hibilaithan shall craft something nice";
+	mes "if you bring me materials!";
+	mes "Hahahahahaha!";
+	next;
+	mes "[Hibilaithan]";
+	mes "Eh? What? You didn't come to see me?";
+	mes "Stop joking around...Don't play me for a fool!";
+	mes "People are too shy to tell the truth nowadays!";
+	mes "Let's be honest and tell me if you want it or not.";
+	next;
+	
+	switch( select( "...okay.", "...sorry, I don't need it!" ) ) {
+		case 1:
+			if(BaseLevel >= 70) goto L4_0_1;
+			
+			mes "[Hibilaithan]";
+			mes "...what a shame! I regret to tell you this,";
+			mes "but your spirit is too weak";
+			mes "to handle the power of my stuff!";
+			mes "This is not good, not good at all!";
+			mes "Go and train yourself first.";
+			mes "When you become strong, you may come back!";
+			break;
+L4_0_1:
+			mes "[Hibilaithan]";
+			mes "Great! I like your attitute! Great, great!";
+			mes "I am going to tell you what I need.";
+			mes "It is not much, so do not forget.";
+			next;
+			mes "[Hibilaithan]";
+			mes "Bring me 10 Gold, 50 Steel and 10 Emperium";
+			mes "... as basic materials.";
+			mes "And I need some rare ores to endow power...";
+			next;
+			mes "[Hibilaithan]";
+			mes "Bring me 30 of one ore among Muscovite, Biotite or Pyroxene.";
+			mes "Remember you are going to bring 30 of one ore.";
+			mes "I cannot pick one among those because I am";
+			mes "not sure what will come out. Heh.";
+			next;
+			mes "[Hibilaithan]";
+			mes "Okay, wish you good luck!";
+			mes "Meanwhile I am going to chill here.";
+			
+			set lv4_weapon, 8;
+			break;
+		case 2:
+			mes "[Hibilaithan]";
+			mes "Bah~ what are you afraid of?";
+			mes "I am just trying to do you a favor, you know?";
+			mes "Alright, it is your call.";
+			mes "But if you change your mind,";
+			mes "feel free to come back.";
+			break;			
+	}	
+	close;
+	
+
+
+//--------------------------------------------------
+//Gold, Steel, Emp Check + Choosing the gem
+//--------------------------------------------------
+LV4_8:
+	if(countitem($@LV4_Gold) < 10) goto LV4_8_FAIL;
+	if(countitem($@LV4_Steel) < 50) goto LV4_8_FAIL;
+	if(countitem($@LV4_Emperium) < 10) goto LV4_8_FAIL;
+
+	mes "[Hibilaithan]";
+	mes "Oh...you have brought all the basic materials.";
+	mes "Now let me check what kind of rare ores";
+	mes "you have brought...";
+	next;
+	
+	if (countitem($@LV4_Muscovite) >= 30 && countitem($@LV4_Biotite) >= 30 && countitem($@LV4_Pyroxene) >= 30) goto LV4_8_MBP;
+	if (countitem($@LV4_Muscovite) >= 30 && countitem($@LV4_Biotite) >= 30) goto LV4_8_MB;
+	if (countitem($@LV4_Muscovite) >= 30 && countitem($@LV4_Pyroxene) >= 30) goto LV4_8_MP;
+	if (countitem($@LV4_Biotite) >= 30 && countitem($@LV4_Pyroxene) >= 30) goto LV4_8_BP;
+	if (countitem($@LV4_Muscovite) >= 30) goto LV4_8_M;
+	if (countitem($@LV4_Biotite) >= 30) goto LV4_8_B;
+	if (countitem($@LV4_Pyroxene) >= 30) goto LV4_8_P;
+	goto LV4_8_NOGEM;
+	end;
+
+
+LV4_8_MBP:	
+	mes "[Hibilaithan]";
+	mes "Gosh, did you brought all three kinds?";
+	mes "Hahaha, it's fine.";
+	mes "But we cannot use all of them this time.";
+	mes "Pick one that you want to use.";
+	next;
+			
+	switch( select( "Muscovite", "Biotite", "Pyroxene" ) ) {
+		case 1:
+			mes "[Hibilaithan]";
+			mes "Muscovite...okay. Before we start,";
+			set @gem, $@LV4_Muscovite;
+			set @gemstring$,"Muscovite";
+			break;
+		case 2:
+			mes "[Hibilaithan]";
+			mes "Biotite...okay. Before we start,";
+			set @gem, $@LV4_Biotite;
+			set @gemstring$,"Biotite";
+			break;
+		case 3:
+			mes "[Hibilaithan]";
+			mes "Pyroxene....okay. Before we start,";
+			set @gem, $@LV4_Pyroxene;
+			set @gemstring$,"Pyroxene";
+			break;
+	}
+	
+	goto LV4_8_PICK;
+	end; // shouldn't be here
+	
+	
+LV4_8_MB:
+	mes "[Hibilaithan]";
+	mes "Hahaha, I asked you to bring one kind not two.";
+	mes "You can only use one kind of ore.";
+	mes "Which one would you like to use?";
+	next;
+	
+	switch( select( "Muscovite", "Biotite" ) ) {
+		case 1:
+			mes "[Hibilaithan]";
+			mes "Muscovite...okay. Before we start,";
+			set @gem, $@LV4_Muscovite;
+			set @gemstring$,"Muscovite";
+			break;
+		case 2:
+			mes "[Hibilaithan]";
+			mes "Biotite...okay. Before we start,";
+			set @gem, $@LV4_Biotite;
+			set @gemstring$,"Biotite";
+			break;
+	}
+	
+	goto LV4_8_PICK;
+	end; // shouldn't be here
+	
+
+LV4_8_MP:	
+	mes "[Hibilaithan]";
+	mes "Hahaha, I asked you to bring one kind not two.";
+	mes "You can only use one kind of ore.";
+	mes "Which one would you like to use?";
+	next;
+	
+	switch( select( "Muscovite", "Pyroxene" ) ) {
+		case 1:
+			mes "[Hibilaithan]";
+			mes "Muscovite...okay. Before we start,";
+			set @gem, $@LV4_Muscovite;
+			set @gemstring$,"Muscovite";
+			break;
+		case 2:
+			mes "[Hibilaithan]";
+			mes "Pyroxene....okay. Before we start,";
+			set @gem, $@LV4_Pyroxene;
+			set @gemstring$,"Pyroxene";
+			break;
+	}
+	
+	goto LV4_8_PICK;
+	end; // shouldn't be here
+	
+	
+LV4_8_BP:	
+	mes "[Hibilaithan]";
+	mes "Hahaha, I asked you to bring one kind not two.";
+	mes "You can only use one kind of ore.";
+	mes "Which one would you like to use?";
+	next;
+	
+	switch( select( "Biotite", "Pyroxene" ) ) {
+			case 1:
+				mes "[Hibilaithan]";
+				mes "Biotite...okay. Before we start,";
+				set @gem, $@LV4_Biotite;
+				set @gemstring$,"Biotite";
+				break;
+			case 2:
+				mes "[Hibilaithan]";
+				mes "Pyroxene....okay. Before we start,";
+				set @gem, $@LV4_Pyroxene;
+				set @gemstring$,"Pyroxene";
+				break;
+	}
+	
+	goto LV4_8_PICK;
+	end; // shouldn't be here
+	
+	
+LV4_8_M:
+	mes "[Hibilaithan]";
+	mes "Muscovite...okay. Before we start,";
+	set @gem, $@LV4_Muscovite;
+	set @gemstring$,"Muscovite";
+	goto LV4_8_PICK;
+	end; // shouldn't be here
+		
+		
+LV4_8_B:
+	mes "[Hibilaithan]";
+	mes "Biotite...okay. Before we start,";
+	set @gem, $@LV4_Biotite;
+	set @gemstring$,"Biotite";
+	goto LV4_8_PICK;
+	end; // shouldn't be here
+	
+	
+LV4_8_P:
+	mes "[Hibilaithan]";
+	mes "Pyroxene....okay. Before we start,";
+	set @gem, $@LV4_Pyroxene;
+	set @gemstring$,"Pyroxene";
+	goto LV4_8_PICK;
+	end; // shouldn't be here
+	
+	
+LV4_8_PICK:
+	mes "we must do one thing first.";
+	mes "That is, to test your luck.";
+	mes "As you already know,";
+	mes "I cannot guarantee you that we will succeed";
+	mes "to make one right away.";
+	next;
+	mes "[Hibilaithan]";
+	mes "If we can raise your luck before we start,";
+	mes "we will be able to succeed.";
+	next;
+	mes "[Hibilaithan]";
+	mes "Now you must be wondering what we";
+	mes "will do in order to increase your luck.";
+	mes "It is simple, we will play a mind-reading game.";
+	mes "I am going to think of one monster among 4 of my favorites,";
+	mes "you will guess what that monster is.";
+	next;
+	mes "[Hibilaithan]";
+	mes "You must answer correctly at least";
+	mes "1 out of 5 times. It should not be that difficult.";
+	mes "And if you fail to answer, we must do something else";
+	mes "to drive away your bad luck.";
+	next;
+	mes "[Hibilaithan]";
+	mes "I will take 10 of the special ore you have chose.";
+	mes "Well, I understand that it does not sound tempting";
+	mes "but let's think of it this way.";
+	mes "It is much better than wasting 30 ore";
+	mes "by failing to create the item, isn't it?";
+	next;
+	mes "[Hibilaithan]";
+	mes "Okay, now I need some time to prepare...";
+	mes "Talk to you later!";
+	
+	if(countitem($@LV4_Gold) < 10) goto LV4_HACK;
+	if(countitem($@LV4_Steel) < 50) goto LV4_HACK;
+	if(countitem($@LV4_Emperium) < 10) goto LV4_HACK;
+	delitem $@LV4_Gold, 10;
+	delitem $@LV4_Steel, 50;
+	delitem $@LV4_Emperium, 10;
+	if(@gem == $@LV4_Muscovite) set lv4_weapon, 9;
+	if(@gem == $@LV4_Biotite) set lv4_weapon, 10;
+	if(@gem == $@LV4_Pyroxene) set lv4_weapon, 11;	
+	close;
+
+
+LV4_8_NOGEM:
+	mes "[Hibilaithan]";
+	mes "I seem to recall that I asked you to bring";
+	mes "30 of a special ore among Muscovite, Biotite or Pyroxene...";
+	mes "And I don't see any of them.";
+	mes "You must have forgot that. Please go get them too.";
+	close;
+
+
+LV4_8_FAIL:
+	mes "[Hibilaithan]";
+	mes "Please bring me 10 Gold, 50 Steel and 10 Emperium";
+	mes "as basic materials...";
+	mes "and you can enchant the product with a certain trait.";
+	mes "For that, I need some rare ores...";
+	next;
+	mes "[Hibilaithan]";
+	mes "Please bring me 30 of an ore among Citrine, Biotite or Pyroxene.";
+	mes "Each one of them possess their own attributes";
+	mes "and by using the ore you have brought,";
+	mes "my product will possess a special trait.";
+	next;
+	mes "[Hibilaithan]";
+	mes "I wish you good luck...";
+	mes "I will wait for you!";
+	close;
+
+
+
+//--------------------------------------------------
+//Guessing Game
+//--------------------------------------------------
+LV4_9:
+	if(lv4_weapon == 9) set @gem, $@LV4_Muscovite;
+	if(lv4_weapon == 10) set @gem, $@LV4_Biotite;
+	if(lv4_weapon == 11) set @gem, $@LV4_Pyroxene;
+	if(countitem(@gem) < 30) goto LV4_9_NOGEM; 
+	
+	mes "[Hibilaithan]";
+	mes "Okay, let's get started!";
+	mes "It is simple. There are";
+	mes "4 monsters that I like. I am going to think";
+	mes "of a monster among the 4, you will guess what it is.";
+	mes "We will play this game 5 times and you must";
+	mes "answer correctly at least 1 out of 5 times. Doesn't that sound easy?";
+	next;
+	mes "[Hibilaithan]";
+	mes "This is a very good game for";
+	mes "increasing your luck!";
+	mes "Okay, you better be ready now.";
+	next;
+	
+	set @dap, 0;
+	set @correct[0],1;
+	for( set @i, 1; @i <= 5; set @i, @i + 1 ) {
+		mes "[Hibilaithan]";
+		
+		if(@i == 1) mes "I like Zealotus, Alice,";
+		if(@i == 1) mes "Munak, and Isis among all monsters.";
+		
+		mes "Now, guess which one";
+		mes "I am thinking of at this moment.";		
+		next;
+
+		set @mons, rand(1, 4);		
+
+		switch( select( "Zhertilsh", "Alice", "Munak", "Isis" ) ) {
+				case 1:
+					set @correct[@i], 1;
+					if(@mons == 1) set @dap, @dap + 1;
+					break;
+
+				case 2:
+					set @correct[@i], 2;
+					if(@mons == 2) set @dap, @dap + 1;
+					break;
+
+				case 3:
+					set @correct[@i], 3;
+					if(@mons == 3) set @dap, @dap + 1;
+					break;
+
+				case 4:
+					set @correct[@i], 4;
+					if(@mons == 4) set @dap, @dap + 1;
+					break;
+		}
+	}
+
+	mes "[Hibilaithan]";
+	mes "Okay, that's all! Now let me";
+	mes "check the answers. I was thinking";
+	mes "monsters in the order of...";
+	next;
+	mes "[Hibilaithan]";
+
+	for( set @i, 1; @i <= 5; set @i, @i + 1 ) {
+		if(@correct[@i] == 1) mes "Zhertilsh";
+		if(@correct[@i] == 2) mes "Alice";
+		if(@correct[@i] == 3) mes "Munak";
+		if(@correct[@i] == 4) mes "Isis";
+	}
+
+	if(@dap < 1) goto LV4_9_FAIL;
+	
+	next;
+	mes "[Hibilaithan]";
+	mes "Wow, are you a mind reader or what?";
+	mes "You answered " + @dap + " times correctly! Whoa...";
+	mes "I guess you are already a lucky one,";
+	mes "therefore we don't have any reason";
+	mes "to prolong the work now!";
+	mes "I need some time to prepare, talk to you later!";
+	
+	if(countitem(@gem) < 30) goto LV4_HACK;
+	delitem @gem, 30;
+	set lv4_weapon, lv4_weapon + 3;
+	close;
+	
+	
+LV4_9_FAIL:
+	if(countitem(@gem) < 10) goto LV4_HACK;
+	delitem @gem, 10;
+	
+	next;
+	mes "[Hibilaithan]";
+	mes "This is not good, not good at all!";
+	mes "You didn't even have a correct answer.";
+	mes "We cannot start the work with this kind of result.";
+	mes "Okay...we must drive away your bad luck first.";
+	mes "10 " + @gemstring$ + " will do it!";
+	next;
+	mes "[Hibilaithan]";
+	mes "Now, we need to play the game again.";
+	mes "If you don't anymore ore, go get some.";
+	mes "I am not going anywhere";
+	mes "so you don't need to be in hurry.";
+	mes "Take your time!";
+	close;
+
+
+LV4_9_NOGEM:
+	mes "[Hibilaithan]";
+	mes "Hum. You might lack of";
+	mes "materials? Check them again.";
+	mes "See. I knew it.";
+	close;
+	
+	
+	
+//--------------------------------------------------
+//Weapon Creation
+//--------------------------------------------------
+LV4_12:
+	mes "[Hibilaithan]";
+	mes "Ah, I can tell you are ready. Alright...";
+	mes "I will try to make an awsome item for you.";
+	mes "...and you are not going to look over my shoulder!";
+	mes "I don't want to share my secret recipe with anyone!";
+	next;
+	mes "- Hibilaithan picks up all the materials -";
+	mes "- and turns his back at you. -";
+	mes "- You see him busying himself with something. -";
+	mes "- Although the way he is doing it -";
+	mes "- looks very primitive and crude, -";
+	mes "- you feel that some strange energy has gathered around him. -";
+	next;
+	mes "[Hibilaithan]";
+	mes "Umm~ umm~ umm~";
+	mes "Aww~aww~ aww~";
+	mes "Phew~ phew~ phew~";
+	mes "Woo~ woo~ woo~";
+	mes "Ho~ ho~ ho~";
+	next;
+	mes "[Hibilaithan]";
+	mes " ";
+	mes " ";
+	mes "Haha, there it is! Phew, that was really hard...";
+	mes "You're anxious, aren't you? Ok, let's see...";
+	next;
+	
+	mes "[Hibilaithan]";
+	mes "It's a big success! Hahaha, sure, I made it...";
+	mes "Therefore, it should be a big success.";
+	mes "Oh, you got a weapon here...let's see,";
+	
+	switch( lv4_weapon ) {
+		case 12:
+			mes "it is a Mailbreaker!";
+			getitem 1225, 1; // 1225,Mail_Breaker
+			break;
+		case 13:
+			mes "it is a Swordbreaker!";
+			getitem 1224, 1; // 1224,Sword_Breaker
+			break;
+		case 14:
+			mes "it is a Slaughter!";
+			getitem 1367, 1; // 1367,Slaughter
+			break;
+	}
+
+	set lv4_weapon, 0;
+	mes "This was made competely because I am that skillful,";
+	mes "you got to be thankful for that!";
+	next;
+	
+	mes "[Hibilaithan]";
+	mes "Whenever you want to have a nice thing,";
+	mes "come back to me anytime!";
+	mes "I am a very generous genius, you know?";
+	mes "Always be thankful for the weapon that I made for you, okay?";
+	mes "See you!";
+	close;
+
+
+
+//--------------------------------------------------
+//Other Quests
+//--------------------------------------------------
+LV4_7:
+	mes "[Hibilaithan]";
+	mes "Hmm...I feel something strange from you.";
+	mes "I regret to say that there is nothing I can do for you.";
+	mes "I hope you have a safe travel.";
+	close;
+	
+	
+	
+//--------------------------------------------------
+//Hack Attempt
+//--------------------------------------------------
+LV4_HACK:
+	mes "[Hibilaithan]";
+	mes "Hmm. There seems to be a bit of problem.";
+	set lv4_weapon, 0;
+	logmes "[" +strcharinfo(0) + "] tried to hack LV4 quest.";
+	close;
+}
+
+//--------------------------------------------------
+// Tabezthan, creates Talefing, Sabbath and Caesar's Sword
+//--------------------------------------------------
+
+um_in.gat,156,77,5	script	Tabezthan	788,{
+	if(event_umbala < 3) goto LumWord;
+	set @NowWeight, MaxWeight - Weight;
+	if (@NowWeight >= 3000) goto LV4_NOT_OW;
+	mes "- Wait a minute! -";
+	mes "- You are currently overweight. -";
+	mes "- Please lose some weight -";
+	mes "- and try again. -";
+	close;
+
+	
+LV4_NOT_OW:
+	if(lv4_weapon == 0) goto LV4_0;
+	if(lv4_weapon == 15) goto LV4_15;
+	if(lv4_weapon == 16) goto LV4_16;
+	if(lv4_weapon == 17) goto LV4_16;
+	if(lv4_weapon == 18) goto LV4_16;
+	if(lv4_weapon == 19) goto LV4_19;
+	if(lv4_weapon == 20) goto LV4_19;
+	if(lv4_weapon == 21) goto LV4_19;
+	if(lv4_weapon < 15) goto LV4_14;
+	if(lv4_weapon > 21) goto LV4_14;	
+	end; // shouldn't be here
+	
+
+LumWord:
+		mes "[Tabezthan]";
+		mes "Umba! Umbaba...umum! Baumba!";
+		mes "Umumumbababaumumbabaumba!";
+		mes "Umbaumbaumbaumbaumhah!";
+		mes "Umumumumumbababababab!";
+	close;
+
+	
+LV4_0:
+	mes "[Tabezthan]";
+	mes "Hmm...I feel something different about you...";
+	mes "You are a stranger...aren't you?";
+	next;
+	mes "[Tabezthan]";
+	mes "Let me introduce myself.";
+	mes "I am Tabezthan,";
+	mes "the storage of the knowledge and the genius of Umbala...";
+	mes "Hahahaha.";
+	next;
+	mes "[Tabezthan]";
+	mes "I have two diciples. One is Hibilaithan the fool";
+	mes "and the other one is Bazo who is intelligent";
+	mes "and is from outside the same as you.";
+	next;
+	mes "[Tabezthan]";
+	mes "Of course both of them are talented and skillful";
+	mes "but I am worried about Hibilaithan, for he";
+	mes "makes many stupid mistakes and is shameless";
+	mes "for what he has done.";
+	next;
+	mes "[Tabezthan]";
+	mes "I have tought them how to manipulate";
+	mes "the mysterious energy existing in Umbala";
+	mes "for creating things with it..";
+	mes "I heard that there is a similar skill called Alchemy";
+	mes "in the outside world. Although I am not sure if I remember it correctly.";
+	next;
+	mes "[Tabezthan]";
+	mes "Anyways, would you like to see my skill?";
+	mes "If so, bring me materials I need,";
+	mes "I am more than willing to present my skill for you.";
+	next;
+	
+	switch( select( "Yes, please.", "No, thank you." ) ) {
+		case 1:
+			if(BaseLevel >= 70) goto L4_0_1;
+			
+			mes "[Tabezthan]";
+			mes "Sebelumnya saya harus menekankan ini";
+			mes "Barang spesial ini akan menjadi berbahaya jika kamu sendiri masih lemah";
+			mes "Kamu harus lebih berpengalaman lagi anak muda";
+			mes "Naikan level kamu terlebih dahulu";
+			mes "jika kamu sudah merasa kuat kembalilah kesini kembali";
+			mes "Sampai jumpa ~~";
+			break;
+L4_0_1:
+			mes "[Tabezthan]";
+			mes "One with curiousity...he is called the young adventurer...";
+			mes "Fine. Then let me inform you of";
+			mes "the matetrials I need. Please memorize them";
+			mes "or write them down.";
+			mes "It is not much however.";
+			next;
+			mes "[Tabezthan]";
+			mes "I need 10 Gold, 50 Steel and 10 Emperium";
+			mes "as basic materials...";
+			mes "and you can enchant the product with a certain trait.";
+			mes "For that, I need some rare ores...";
+			next;
+			mes "[Tabezthan]";
+			mes "Please bring me 30 of an ore among Phlogopite, Peridot or Rose Quartz.";
+			mes "Each one of them possess their own attribute";
+			mes "and by using the ore you have brought,";
+			mes "my product will possess a special trait.";
+			next;
+			mes "[Tabezthan]";
+			mes "However, please be aware that";
+			mes "I cannot guarantee what will come out as a result.";
+			mes "There are too many factors in the world of alchemy";
+			mes "where my knowledge is limited.";
+			mes "So you must be willing to accept the result as it is";
+			mes "even if it does not satisfy your expectations.";
+			next;
+			mes "[Tabezthan]";
+			mes "That means that you should place trust in luck.";
+			mes "Let's talk about it later...please go prepare the materials first.";
+			mes "Come back when you are ready.";
+			mes "I will wait here.";
+			
+			set lv4_weapon, 15;
+			break;
+		case 2:
+			mes "[Tabezthan]";
+			mes "Oh...I see. I was not forcing you anyhow.";
+			mes "However, it is a little bit dissappointing to hear that.";
+			mes "I was going to display my ability at full length.";
+			mes "When you change your mind, please come back.";
+			break;			
+	}	
+	close;
+	
+
+
+//--------------------------------------------------
+//Gold, Steel, Emp Check + Choosing the gem
+//--------------------------------------------------
+LV4_15:
+	if(countitem($@LV4_Gold) < 10) goto LV4_15_FAIL;
+	if(countitem($@LV4_Steel) < 50) goto LV4_15_FAIL;
+	if(countitem($@LV4_Emperium) < 10) goto LV4_15_FAIL;
+
+	mes "[Tabezthan]";
+	mes "Ah~ you came back ealier than I thought.";
+	mes "Let's see...you have all the basic materials...and";
+	mes "we need one more thing, remember?";
+	mes "Did you bring it as well?";
+	next;
+	
+	if (countitem($@LV4_Phlogopite) >= 30 && countitem($@LV4_Olivine) >= 30 && countitem($@LV4_Rose_Quartz) >= 30) goto LV4_15_POR;
+	if (countitem($@LV4_Phlogopite) >= 30 && countitem($@LV4_Olivine) >= 30) goto LV4_15_PO;
+	if (countitem($@LV4_Phlogopite) >= 30 && countitem($@LV4_Rose_Quartz) >= 30) goto LV4_15_PR;
+	if (countitem($@LV4_Olivine) >= 30 && countitem($@LV4_Rose_Quartz) >= 30) goto LV4_15_OR;
+	if (countitem($@LV4_Phlogopite) >= 30) goto LV4_15_P;
+	if (countitem($@LV4_Olivine) >= 30) goto LV4_15_O;
+	if (countitem($@LV4_Rose_Quartz) >= 30) goto LV4_15_R;
+	goto LV4_15_NOGEM;
+	end;
+
+
+LV4_15_POR:	
+	mes "[Tabezthan]";
+	mes "You made a great effort to bring all of them.";
+	mes "However, you can only use one kind at a time.";
+	mes "Please choose what you want to use this time.";
+	next;
+			
+	switch( select( "Phlogopite", "Peridot", "Rose Quartz" ) ) {
+		case 1:
+			mes "[Tabezthan]";
+			mes "Phlogopite...okay. Before we start,";
+			set @gem, $@LV4_Phlogopite;
+			set @gemstring$,"Phlogopite";
+			break;
+		case 2:
+			mes "[Tabezthan]";
+			mes "Peridot...okay. Before we start,";
+			set @gem, $@LV4_Olivine;
+			set @gemstring$,"Peridot";
+			break;
+		case 3:
+			mes "[Tabezthan]";
+			mes "Rose Quartz....okay. Before we start,";
+			set @gem, $@LV4_Rose_Quartz;
+			set @gemstring$,"Rose Quartz";
+			break;
+	}
+	
+	goto LV4_15_PICK;
+	end; // shouldn't be here
+	
+	
+LV4_15_PO:
+	mes "[Tabezthan]";
+	mes "Hahaha, I asked you to bring one kind not two.";
+	mes "You can only use one kind of ore.";
+	mes "Which one would you like to use?";
+	next;
+	
+	switch( select( "Phlogopite", "Peridot" ) ) {
+		case 1:
+			mes "[Tabezthan]";
+			mes "Phlogopite...okay. Before we start,";
+			set @gem, $@LV4_Phlogopite;
+			set @gemstring$,"Phlogopite";
+			break;
+		case 2:
+			mes "[Tabezthan]";
+			mes "Peridot...okay. Before we start,";
+			set @gem, $@LV4_Olivine;
+			set @gemstring$,"Peridot";
+			break;
+	}
+	
+	goto LV4_15_PICK;
+	end; // shouldn't be here
+	
+
+LV4_15_PR:	
+	mes "[Tabezthan]";
+	mes "Hahaha, I asked you to bring one kind not two.";
+	mes "You can only use one kind of ore.";
+	mes "Which one would you like to use?";
+	next;
+	
+	switch( select( "Phlogopite", "Rose Quartz" ) ) {
+		case 1:
+			mes "[Tabezthan]";
+			mes "Phlogopite...okay. Before we start,";
+			set @gem, $@LV4_Phlogopite;
+			set @gemstring$,"Phlogopite";
+			break;
+		case 2:
+			mes "[Tabezthan]";
+			mes "Rose Quartz....okay. Before we start,";
+			set @gem, $@LV4_Rose_Quartz;
+			set @gemstring$,"Rose Quartz";
+			break;
+	}
+	
+	goto LV4_15_PICK;
+	end; // shouldn't be here
+	
+	
+LV4_15_OR:	
+	mes "[Tabezthan]";
+	mes "Hahaha, I asked you to bring one kind not two.";
+	mes "You can only use one kind of ore.";
+	mes "Which one would you like to use?";
+	next;
+	
+	switch( select( "Peridot", "Rose Quartz" ) ) {
+			case 1:
+				mes "[Tabezthan]";
+				mes "Peridot...okay. Before we start,";
+				set @gem, $@LV4_Olivine;
+				set @gemstring$,"Peridot";
+				break;
+			case 2:
+				mes "[Tabezthan]";
+				mes "Rose Quartz....okay. Before we start,";
+				set @gem, $@LV4_Rose_Quartz;
+				set @gemstring$,"Rose Quartz";
+				break;
+	}
+	
+	goto LV4_15_PICK;
+	end; // shouldn't be here
+	
+	
+LV4_15_P:
+	mes "[Tabezthan]";
+	mes "Phlogopite...okay. Before we start,";
+	set @gem, $@LV4_Phlogopite;
+	set @gemstring$,"Phlogopite";
+	goto LV4_15_PICK;
+	end; // shouldn't be here
+		
+		
+LV4_15_O:
+	mes "[Tabezthan]";
+	mes "Peridot...okay. Before we start,";
+	set @gem, $@LV4_Olivine;
+	set @gemstring$,"Peridot";
+	goto LV4_15_PICK;
+	end; // shouldn't be here
+	
+	
+LV4_15_R:
+	mes "[Tabezthan]";
+	mes "Rose Quartz....okay. Before we start,";
+	set @gem, $@LV4_Rose_Quartz;
+	set @gemstring$,"Rose Quartz";
+	goto LV4_15_PICK;
+	end; // shouldn't be here
+	
+	
+LV4_15_PICK:
+	mes "we must do one thing first.";
+	mes "That is, to test your luck.";
+	mes "As you already know,";
+	mes "I cannot guarantee you that we will succeed";
+	mes "in makeing one right away.";
+	next;
+	mes "[Tabezthan]";
+	mes "If we can raise your luck before we start,";
+	mes "we will be able to succeed.";
+	next;
+	mes "[Tabezthan]";
+	mes "Now you must be wondering what we";
+	mes "will do in order to increase your luck.";
+	mes "It is simple, we will play a mind-reading game.";
+	mes "I am going to think of one monster among 4 of my favorites,";
+	mes "you will guess what the monster is.";
+	next;
+	mes "[Tabezthan]";
+	mes "You must answer correctly at least";
+	mes "1 out of 5 times. It should not be that difficult.";
+	mes "And if you fail to answer correctly, we must do something else";
+	mes "to drive away your bad luck.";
+	next;
+	mes "[Tabezthan]";
+	mes "I will take 10 of the special ore you chose.";
+	mes "Well, I understand that it does not sound tempting";
+	mes "but let's think of it this way.";
+	mes "It is much better than wasting 30 ore";
+	mes "by failing to create the item, isn't it?";
+	next;
+	mes "[Tabezthan]";
+	mes "Okay, now I need some time to prepare...";
+	mes "Talk to you later!";
+	
+	if(countitem($@LV4_Gold) < 10) goto LV4_HACK;
+	if(countitem($@LV4_Steel) < 50) goto LV4_HACK;
+	if(countitem($@LV4_Emperium) < 10) goto LV4_HACK;
+	delitem $@LV4_Gold, 10;
+	delitem $@LV4_Steel, 50;
+	delitem $@LV4_Emperium, 10;
+	if(@gem == $@LV4_Phlogopite) set lv4_weapon, 16;
+	if(@gem == $@LV4_Olivine) set lv4_weapon, 17;
+	if(@gem == $@LV4_Rose_Quartz) set lv4_weapon, 18; 
+	close;
+
+
+LV4_15_NOGEM:
+	mes "[Tabezthan]";
+	mes "Hmmm...I cannot find any rare ores in";
+	mes "the materials that you have brought...";
+	mes "Please bring me 30 of an ore among Phlogopite, Peridot";
+	mes "or Rose Quartz.";
+	close;
+
+
+LV4_15_FAIL:
+	mes "[Tabezthan]";
+	mes "I need 10 Gold, 50 Steel and 10 Emperium";
+	mes "as basic materials...";
+	mes "and you can enchant the product with a certain trait.";
+	mes "For that, I need some rare ores...";
+	next;
+	mes "[Tabezthan]";
+	mes "Please bring me 30 of an ore among Phlogopite, Peridot or Rose Quartz.";
+	mes "Each one of them possess their own attribute";
+	mes "and by using the ore you have brought,";
+	mes "my product will possess a special trait.";
+	close;
+
+
+
+//--------------------------------------------------
+//Guessing Game
+//--------------------------------------------------
+LV4_16:
+	if(lv4_weapon == 16) set @gem, $@LV4_Phlogopite;
+	if(lv4_weapon == 17) set @gem, $@LV4_Olivine;
+	if(lv4_weapon == 18) set @gem, $@LV4_Rose_Quartz;
+	if(countitem(@gem) < 30) goto LV4_2_NOGEM; 
+	
+	mes "[Tabezthan]";
+	mes "Okay, let's get started!";
+	mes "It is simple. There are";
+	mes "4 monsters that I like. I am going to think";
+	mes "of a monster among the 4, you will guess what it is.";
+	mes "We will play this game 5 times and you must";
+	mes "answer correctly at least 1 out of 5 times. Doesn't it sound easy?";
+	next;
+	mes "[Hibilaithan]";
+	mes "This is a very good game for";
+	mes "increasing your luck!";
+	mes "Okay, better be ready now.";
+	next;
+	
+	set @dap, 0;
+	set @correct[0],1;
+	for( set @i, 1; @i <= 5; set @i, @i + 1 ) {
+		mes "[Tabezthan]";
+		
+		if(@i == 1) mes "I like Baphomet, Dark Lord,";
+		if(@i == 1) mes "Bloody Knight, and Stormy Knight among all monsters.";
+		
+		mes "Now, guess which one";		
+		mes "I am thinking at this moment.";
+		next;
+
+		set @mons, rand(1, 4);		
+
+		switch( select( "Baphomet", "Dark Lord", "Bloody Knight", "Stormy Knight" ) ) {
+				case 1:
+					set @correct[@i], 1;
+					if(@mons == 1) set @dap, @dap + 1;
+					break;
+
+				case 2:
+					set @correct[@i], 2;
+					if(@mons == 2) set @dap, @dap + 1;
+					break;
+
+				case 3:
+					set @correct[@i], 3;
+					if(@mons == 3) set @dap, @dap + 1;
+					break;
+
+				case 4:
+					set @correct[@i], 4;
+					if(@mons == 4) set @dap, @dap + 1;
+					break;
+		}
+	}
+
+	mes "[Tabezthan]";
+	mes "Okay, that's all! Now let me check";
+	mes "the answers. I was thinking";
+	mes "of the monsters in the order of...";
+	next;
+	mes "[Tabezthan]";
+
+	for( set @i, 1; @i <= 5; set @i, @i + 1 ) {
+		if(@correct[@i] == 1) mes "Baphomet";
+		if(@correct[@i] == 2) mes "Dark Lord";
+		if(@correct[@i] == 3) mes "Bloody Knight";
+		if(@correct[@i] == 4) mes "Stormy Knight";
+	}
+
+	if(@dap < 1) goto LV4_16_FAIL;
+	
+	next;
+	mes "[Tabezthan]";
+	mes "You have answered " + @dap + " times correctly.";
+	mes "It seems that your luck is at its highest.";
+	mes "I need some time to prepare, talk to you later.";
+	
+	if(countitem(@gem) < 30) goto LV4_HACK;
+	delitem @gem, 30;
+	set lv4_weapon, lv4_weapon + 3;
+	close;
+	
+	
+LV4_16_FAIL:
+	if(countitem(@gem) < 10) goto LV4_HACK;
+	delitem @gem, 10;
+	
+	next;
+	mes "[Tabezthan]";
+	mes "Unfortunately you have failed...";
+	mes "When you have bad luck, you'd better";
+	mes "not expect a good result.";
+	mes "Okay, we must drive away your bad luck.";
+	mes "10 " + @gemstring$ + " will do it.";
+	next;
+	mes "[Tabezthan]";
+	mes "Do not be so dissappointed.";
+	mes "It is still better than wasting 30 of them";
+	mes "for trying to make a thing when you know";
+	mes "you would not make it. ";
+	next;
+	mes "[Tabezthan]";
+	mes "If you need something to prepare,";
+	mes "please do. I will wait for you here.";
+	close;
+
+
+LV4_16_NOGEM:
+	mes "[Tabezthan]";
+	mes "Umm...it seems you are lacking " + @gemstring$;
+	mes "Please count them and";
+	mes "if you don't have enough,";
+	mes "you can go gather more first.";
+	close;
+	
+	
+	
+//--------------------------------------------------
+//Weapon Creation
+//--------------------------------------------------
+LV4_19:
+	mes "[Tabezthan]";
+	mes "Great, I am also ready.";
+	mes "Shall we start now? Give me a minute.";
+	mes "I need to arrange these materials in a magic circle.";
+	next;
+	mes "- He arranges materials in a strange circle -";
+	mes "- and starts chanting in a strange language. -";
+	mes "- As he does that, suddenly the air surrounding him -";
+	mes "- seems to change and you feel something powerful-";
+	mes "- gathering around him and the materials. -";
+	next;
+	mes "[Tabezthan]";
+	mes "Please understand that the power is not from me.";
+	mes "I just used my ability to gather the power into these materials.";
+	mes "The power has come from the city of the dead.";
+	next;
+	mes "[Tabezthan]";
+	mes "The result is in God's hands.";
+	mes "Let's pray for a good result together.";
+	mes "Hmmmmm!";
+	next;
+	mes "- After a while...you find the materials -";
+	mes "- are gathering and combining into one new thing. -";
+	mes "- Does that mean that you have succeeded or failed?! -";
+	next;
+	mes "[Tabezthan]";
+	mes "?!...God must bless you!";
+	mes "I cannot believe that I created such a rare weapon!";
+	mes "Yes, my late father told me the name of this weapon.";
+	
+	switch( lv4_weapon ) {
+		case 19:
+			mes "That is Caesar's Sword.";
+			getitem 1134, 1; // 1134,Caesar's_Sword
+			break;
+		case 20:
+			mes "That is Talefing.";
+			getitem 1139, 1; // 1139,Talefing_
+			break;
+		case 21:
+			mes "That is Sabbath.";
+			getitem 1365, 1; // 1365,Sabbath
+			break;
+	}
+
+	set lv4_weapon, 0;
+	mes "[Tabezthan]";
+	mes "Now, since I made this with materials";
+	mes "that you have brought, this is yours now.";
+	mes "I only helped you to make it,";
+	mes "and I am glad to give this to you.";
+	next;
+	mes "[Tabezthan]";
+	mes "Well, feel free to come back";
+	mes "if you want to make a thing again...hahaha.";
+	mes "The weapon was made to be yours.";
+	close;
+
+
+
+//--------------------------------------------------
+//Other Quests
+//--------------------------------------------------
+LV4_14:
+	mes "[Tabezthan]";
+	mes "Umm...you don't have a business with me, do you?";
+	mes "Please do not think of me as an old fool.";
+	mes "When a man gets older, he can see through other people's minds.";
+	mes "Go ahead and do what you have been doing.";
+	mes "Do not let me intrrupt you any longer.";
+	close;
+	
+	
+	
+//--------------------------------------------------
+//Hack Attempt
+//--------------------------------------------------
+LV4_HACK:
+	mes "[Tabezthan]";
+	mes "Hmm. There seems to be a bit of problem.";
+	set lv4_weapon, 0;
+	logmes "[" +strcharinfo(0) + "] tried to hack LV4 quest.";
+	close;
+}
+
+//--------------------------------------------------
+// Bill Thayer, Gives hints for S grade weapons quests
+//--------------------------------------------------
+
+aldebaran.gat,178,239,3	script	Bill Thayer	712,{
+	// Explain Materials
+	if(lv4_weapon == 26) goto LV4_26;
+	if(lv4_weapon == 27) goto LV4_27;
+	if(lv4_weapon == 28) goto LV4_28;
+	
+	if(lv4_weapon == 35) goto LV4_35;
+	if(lv4_weapon == 36) goto LV4_36;
+	if(lv4_weapon == 37) goto LV4_37;
+
+	if(lv4_weapon == 44) goto LV4_44;
+	if(lv4_weapon == 45) goto LV4_45;
+	if(lv4_weapon == 46) goto LV4_46;
+	
+	if(lv4_weapon == 53) goto LV4_53;
+	if(lv4_weapon == 54) goto LV4_54;
+	if(lv4_weapon == 55) goto LV4_55;
+	
+	// Guide
+	if(lv4_weapon == 22) goto LV4_22;
+	if(lv4_weapon == 23) goto LV4_23;
+		
+	if(lv4_weapon == 31) goto LV4_31;
+	if(lv4_weapon == 32) goto LV4_32;
+	
+	if(lv4_weapon == 40) goto LV4_40;
+	if(lv4_weapon == 41) goto LV4_41;
+	
+	if(lv4_weapon == 49) goto LV4_49;
+	if(lv4_weapon == 50) goto LV4_50;
+	
+	mes "[Bill Thayer]";
+	mes "...I cannot do anything now.";
+	mes "In the past, I used to be a well-known weaponsmith";
+	mes "but now I am just a lonely old man who lost all of his sons.";
+	mes "Please leave me alone.";
+	close;
+
+LV4_27:
+LV4_28:
+LV4_36:
+LV4_37:
+LV4_45:
+LV4_46:
+LV4_54:
+LV4_55:
+	if(lv4_weapon == 27)
+{
+			set @LV4_Gem1Name$, "Peridot";
+			set @LV4_Gem2Name$, "Turquoise";
+			set @LV4_Gem3Name$, "Agate";
+}
+	if(lv4_weapon == 28)
+{
+			set @LV4_Gem1Name$, "Phlogopite";
+			set @LV4_Gem2Name$, "Pyroxene";
+			set @LV4_Gem3Name$, "Rose Quartz";
+}
+	if(lv4_weapon == 36)
+{
+			set @LV4_Gem1Name$, "Muscovite";
+			set @LV4_Gem2Name$, "Rose Quartz";
+			set @LV4_Gem3Name$, "Peridot";
+}
+	if(lv4_weapon == 37)
+{
+			set @LV4_Gem1Name$, "Biotite";
+			set @LV4_Gem2Name$, "Agate";
+			set @LV4_Gem3Name$, "Citrine";
+}
+	if(lv4_weapon == 45)
+{
+			set @LV4_Gem1Name$, "Turquoise";
+			set @LV4_Gem2Name$, "Biotite";
+			set @LV4_Gem3Name$, "Rose Quartz";
+}
+	if(lv4_weapon == 46)
+{
+			set @LV4_Gem1Name$, "Citrine";
+			set @LV4_Gem2Name$, "Pyroxene";
+			set @LV4_Gem3Name$, "Phlogopite";
+}
+	if(lv4_weapon == 54)
+{
+			set @LV4_Gem1Name$, "Muscovite";
+			set @LV4_Gem2Name$, "Agate";
+			set @LV4_Gem3Name$, "Citrine";
+}
+	if(lv4_weapon == 55)
+{
+			set @LV4_Gem1Name$, "Pyroxene";
+			set @LV4_Gem2Name$, "Turquoise";
+			set @LV4_Gem3Name$, "Phlogopite";
+}
+
+	mes "[Bill Thayer]";
+	mes "Hmm...it seems that you need 30 of";
+	mes @LV4_Gem1Name$ + ", " + @LV4_Gem2Name$ + ", and " + @LV4_Gem3Name$;
+	mes "I am sure that those are the materials...";
+	mes "but I cannot guarantee anything about the result...";
+	next;
+	mes "[Bill Thayer]";
+	mes "My sons passed away before we finished this research...";
+	mes "Hahaha...let's not talk about it.";
+	mes "I told you what you need anyway.";
+	close;
+
+
+LV4_26:
+LV4_35:
+LV4_44:
+LV4_53:
+	mes "[Bill Thayer]";
+	if(lv4_weapon == 26) mes "What, Kayron's research?";
+	if(lv4_weapon == 35) mes "What, Reyghema's research?";
+	if(lv4_weapon == 44) mes "What? Hein's research?";
+	if(lv4_weapon == 53) mes "What? Waltboughst's research?";	
+	mes "How do you know him?";
+	mes "Were you a friend of him when he was still alive?";
+	mes "Ah....there must an act of providence.";
+	next;
+	
+	set lv4_weapon, lv4_weapon + rand(1, 2);
+	
+	switch( lv4_weapon ) {
+		case 27:
+			set @LV4_Gem1Name$, "Peridot";
+			set LV4_Gem1, $@LV4_Olivine;
+			set @LV4_Gem2Name$, "Turquoise";
+			set LV4_Gem2, $@LV4_Turquoise;
+			set @LV4_Gem3Name$, "Agate";
+			set LV4_Gem3, $@LV4_Agate;
+			break;
+		case 28:
+			set @LV4_Gem1Name$, "Phlogopite";
+			set LV4_Gem1, $@LV4_Phlogopite;
+			set @LV4_Gem2Name$, "Pyroxene";
+			set LV4_Gem2, $@LV4_Pyroxene;
+			set @LV4_Gem3Name$, "Rose Quartz";
+			set LV4_Gem3, $@LV4_Rose_Quartz;
+			break;
+		case 36:
+			set @LV4_Gem1Name$, "Muscovite";
+			set LV4_Gem1, $@LV4_Muscovite;
+			set @LV4_Gem2Name$, "Rose Quartz";
+			set LV4_Gem2, $@LV4_Rose_Quartz ;
+			set @LV4_Gem3Name$, "Peridot";
+			set LV4_Gem3, $@LV4_Olivine;
+			break;
+		case 37:
+			set @LV4_Gem1Name$, "Biotite";
+			set LV4_Gem1, $@LV4_Biotite;
+			set @LV4_Gem2Name$, "Agate";
+			set LV4_Gem2, $@LV4_Agate;
+			set @LV4_Gem3Name$, "Citrine";
+			set LV4_Gem3, $@LV4_Citrine;
+			break;
+		case 45:
+			set @LV4_Gem1Name$, "Turquoise";
+			set LV4_Gem1, $@LV4_Turquoise;
+			set @LV4_Gem2Name$, "Biotite";
+			set LV4_Gem2, $@LV4_Biotite;
+			set @LV4_Gem3Name$, "Rose Quartz";
+			set LV4_Gem3, $@LV4_Rose_Quartz;
+			break;
+		case 46:
+			set @LV4_Gem1Name$, "Citrine";
+			set LV4_Gem1, $@LV4_Citrine;
+			set @LV4_Gem2Name$, "Pyroxene";
+			set LV4_Gem2, $@LV4_Pyroxene;
+			set @LV4_Gem3Name$, "Phlogopite";
+			set LV4_Gem3, $@LV4_Phlogopite;
+			break;
+		case 54:
+			set @LV4_Gem1Name$, "Muscovite";
+			set LV4_Gem1, $@LV4_Muscovite;
+			set @LV4_Gem2Name$, "Agate";
+			set LV4_Gem2, $@LV4_Agate;
+			set @LV4_Gem3Name$, "Citrine";
+			set LV4_Gem3, $@LV4_Citrine;
+			break;
+		case 55:
+			set @LV4_Gem1Name$, "Pyroxene";
+			set LV4_Gem1, $@LV4_Pyroxene;
+			set @LV4_Gem2Name$, "Turquoise";
+			set LV4_Gem2, $@LV4_Turquoise;
+			set @LV4_Gem3Name$, "Phlogopite";
+			set LV4_Gem3, $@LV4_Phlogopite;
+			break;
+	}
+	
+	mes "[Bill Thayer]";
+	mes "Hmm...it seems that you need 30 of";
+	mes @LV4_Gem1Name$ + ", " + @LV4_Gem2Name$ + ", and " + @LV4_Gem3Name$;
+	mes "I am sure that those are the materials...";
+	mes "but I cannot guarantee anything about the result...";
+	next;
+	mes "[Bill Thayer]";
+	mes "My sons passed away before we finished this research...";
+	mes "Hahaha...let's not talk about it.";
+	mes "I told you what you need anyway.";
+	close;	
+
+
+LV4_22:
+LV4_23:
+	mes "[Bill Thayer]";
+	mes "Oh well, I told you already";
+	mes "that there is nothing I can do for you...";
+	mes "since my sons are all gone...why are";
+	mes "you wasting my breath? ^4D4DFFYou are helpless.^000000";
+	set lv4_weapon, 23;
+	next;
+	mes "[Bill Thayer]";
+	mes "...you just made me";
+	mes "miss my sons again...";
+	mes "Please leave me alone.";
+	close;
+	
+
+LV4_31:
+LV4_32:
+	mes "[Bill Thayer]";
+	mes "All of my sons broke my heart by dying young...";
+	mes "...youth...what is youth?";
+	mes "^4D4DFFThat means that you never regret anything!^000000";
+	set lv4_weapon, 32;
+	next;
+	mes "[Bill Thayer]";
+	mes "That was what I used to tell to my sons.";
+	mes "Please remember that,";
+	mes "never regret anything that you have done.";
+	mes "However, in order to do that, you must";
+	mes "do everything right...that's all I can tell you for now.";
+	close;
+	
+		
+LV4_40:
+LV4_41:
+	mes "[Bill Thayer]";
+	mes "...no matter how much you are willing to pay me,";
+	mes "I am not going to forge any weapons.";
+	mes "Even when I was actively forging weapons,";
+	mes "I didn't accept money from my clients.";
+	mes "You know why?";
+	next;
+	mes "[Bill Thayer]";
+	mes "It brings me bad luck ^4D4DFFto^000000";
+	mes "^4D4DFFforge a good weapon.^000000";
+	mes "Therefore I didn't receive money from them.";
+	set lv4_weapon, 41;
+	next;
+	mes "[Bill Thayer]";
+	mes "Well, I am not going to do so";
+	mes "even if you offer me something else other than money";
+	mes "...unless all of my sons come back";
+	mes "alive....";
+	close;
+
+
+LV4_49:
+LV4_50:
+		mes "[Bill Thayer]";
+		mes "...do you not have anything to do?";
+		mes "I hope you stop bothering me";
+		mes "and trying your best for your work.";
+		mes "Ah...trying best does not always";
+		mes "result in a success though.";
+		next;
+		mes "[Bill Thayer]";
+		mes "However, ^4D4DFFall the successful men^000000";
+		mes "^4D4DFFin the history tried their best!^000000";
+		mes "I hope you will remember that.";
+		mes "I used to tell this to my sons when they were alive.";
+		mes "Hahaha...";
+		set lv4_weapon, 50;
+		close;
+}
+
+//--------------------------------------------------
+// Kayron, creates Longinus' Spear, Guillotine, Great Axe and Brionac
+//--------------------------------------------------
+
+niflheim.gat,240,193,3	script	Kayron	794, {
+	set @NowWeight, MaxWeight - Weight;
+	if (@NowWeight >= 3000) goto LV4_NOT_OW;
+	mes "- Wait a minute! -";
+	mes "- You are currently overweight. -";
+	mes "- Please lose some weight -";
+	mes "- and try again. -";
+	close;
+
+	
+LV4_NOT_OW:
+	if(BaseLevel >= 80) goto LV4_LEVEL_PASS;
+	mes "[Kayron]";
+	mes "Bah, I cannot believe";
+	mes "that such a weak man like you even came here.";
+	mes "You have an invisible sign on your forehead";
+	mes "that indicates you are a weakling. Be strong first.";
+	close;
+	
+
+LV4_LEVEL_PASS:
+	if(lv4_weapon == 0) goto LV4_0;
+	if(lv4_weapon < 22) goto LV4_21;
+	if(lv4_weapon == 22) goto LV4_22;
+	if(lv4_weapon == 23) goto LV4_23;
+	if(lv4_weapon == 24) goto LV4_24;
+	if(lv4_weapon == 25) goto LV4_25;
+	if(lv4_weapon == 26) goto LV4_26;
+	if(lv4_weapon == 27) goto LV4_27;
+	if(lv4_weapon == 28) goto LV4_28;
+	if(lv4_weapon == 29) goto LV4_29;
+	if(lv4_weapon == 30) goto LV4_30;
+	if(lv4_weapon > 30) goto LV4_31;
+	end; // shouldn't be here
+
+
+LV4_0:
+LV4_22:
+	mes "[Kayron]";
+	mes "I used to be called Kayron when I was alive.";
+	mes "But now I am nothing but";
+	mes "a ghost wandering this place.";
+	mes "I am worthless...I cannot do anything";
+	mes "without a body...";
+	next;
+	
+	if(lv4_weapon == 0) goto LV4_0_ASK;
+	
+	mes "[Kayron]";
+	mes "Ah...I cannot remember what I was going to say...";
+	mes "Waaahhh.....I cannot remember....";
+	mes "My memory is gone...!";
+	close;
+	
+LV4_0_ASK:
+	switch( select( "Show interest.", "Ignore him." ) ) {
+		case 1:
+			mes "[Kayron]";
+			mes "Ah...I cannot remember what I was going to say...";
+			mes "Waaahhh.....I cannot remember....";
+			mes "My memory is gone...!";
+			set lv4_weapon, 22;
+			close;
+			break;
+		case 2:
+			mes "- Because you decided to ignore him, -";
+			mes "- you are no longer able to hear him. -";
+			close;
+			break;
+	}
+	end;
+	
+
+LV4_21:
+LV4_31:
+	mes "[Kayron]";
+	mes "I feel something different about you.";
+	mes "Did you come here with a purpose?";
+	mes "I am envious of you...";
+	close;
+
+
+LV4_23:
+	mes "[Kayron]";
+	mes "I used to be called Kayron when I was alive.";
+	mes "But now I am nothing but";
+	mes "a ghost wandering this place.";
+	mes "I am worthless...I cannot do anything";
+	mes "without a body...";
+	next;
+	set @dap1$, "You are helpless.";
+	input @answer1$;
+	if(@answer1$ == @dap1$) goto LV4_23_CORRECT;
+	mes "[Kayron]";
+	mes "...? What did you just say?";
+	mes "I am sorry but I don't think I understood you.";
+	close;
+
+LV4_23_CORRECT:
+	mes "[Kayron]";
+	mes "Yes, You are helpless...?! Eh?";
+	mes "That was my father's favorite saying!";
+	mes "Whoa?! Ah...";
+	mes "Yes...I forgot that I am dead already.";
+	mes "Why did you make me recall something from my past?";
+	mes "It is no use now...";
+	next;
+	mes "[Kayron]";
+	mes "But I want to do something in return...";
+	mes "since you made me find a piece of my mind.";
+	mes "I used to be a weaponsmith in the past,";
+	mes "therefore I am going to forge a nice weapon for you.";
+	next;
+	mes "[Kayron]";
+	mes "But you have to gather the materials for me.";
+	mes "As you see, I do not have a body";
+	mes "that would allow me to touch other objects...";
+	mes "So you got to help me with that.";
+	next;
+	mes "[Kayron]";
+	mes "Luckily this place is filled with mysterious energy,";
+	mes "that makes my work easier!";
+	mes "Heh, even if I fail to forge one,";
+	mes "I don't have to worry about dying.";
+	mes "Because I am dead already! Muhahahaha!";
+	next;
+	mes "[Kayron]";
+	mes "I will talk to you in a while.";
+	mes "I am trying to think of the receipe...";
+	set lv4_weapon, 24;
+	close;
+	
+	
+LV4_25:
+	if(countitem($@LV4_Hammer_Of_Blacksmith) < 2) goto LV4_25_BASE_MAT;
+	if(countitem($@LV4_Emperium_Anvil) < 1) goto LV4_25_BASE_MAT;
+	if(countitem($@LV4_Illusion_Flower) < 1) goto LV4_25_BASE_MAT;
+	if(countitem($@LV4_Gold) < 20) goto LV4_25_BASE_MAT;
+	
+	mes "[Kayron]";
+	mes "Oh...you brought everything I need!";
+	mes "You are a reliable person unlike your appearance.";
+	mes "But here is the thing...";
+	mes "There are some more materials I need...";
+	mes "But I cannot think of any of them...my memory";
+	mes "is unclear...arrrrph...";
+	next;
+	mes "[Kayron]";
+	mes "I need to think about that a little longer.";
+	mes "I know that I really need those materials...awwww....";
+	mes "Do you have any idea to bring my memory back?";
+	mes "At the same time, rest assured that the materials";
+	mes "you brought will be used for my creation. So let me keep them for you.";
+	
+	if(countitem($@LV4_Hammer_Of_Blacksmith) < 2) goto LV4_HACK;
+	if(countitem($@LV4_Emperium_Anvil) < 1) goto LV4_HACK;
+	if(countitem($@LV4_Illusion_Flower) < 1) goto LV4_HACK;
+	if(countitem($@LV4_Gold) < 20) goto LV4_HACK;
+	delitem $@LV4_Hammer_Of_Blacksmith, 2;
+	delitem $@LV4_Emperium_Anvil, 1;
+	delitem $@LV4_Illusion_Flower, 1;
+	delitem $@LV4_Gold, 20;
+	set lv4_weapon, 26;
+	close;
+
+LV4_24:
+LV4_25_BASE_MAT:
+	switch( lv4_weapon ) {
+		case 24:
+			mes "[Kayron]";
+			mes "Oh, you came back at a right time.";
+			mes "I just finished my thoughts. Let me tell you one thing.";
+			mes "I cannot guarantee you which weapon will come out of this.";
+			mes "Also you must be willing to take a risk as well...";
+			mes "I guess that the result will be affected by the power";
+			mes "of Nifflheim at the time I make.";
+			next;
+			mes "[Kayron]";
+			mes "Let me give you the list of materials";
+			mes "I need. They are quite a lot,";
+			mes "so write them down if you need.";
+			break;
+		case 25:
+			mes "[Kayron]";
+			mes "I will tell you the list of materials I need again.";
+			mes "I think I need a lot of materials...so";
+			mes "write them down if you need.";
+			break;
+		}
+		next;
+		mes "[Kayron]";
+		mes "I need 2 Hammer of Blacksmith,";
+		mes "1 Emperium Anvil, 1 Illusion Flower and 20 Gold...";
+		next;
+		mes "[Kayron]";
+		mes "Bring these to me first. I am kind of worried";
+		mes "that I forgot something...but I will try to remember";
+		mes "while waiting for you to bring these items.";
+		next;
+		mes "[Kayron]";
+		mes "Have a safe travel.";
+		set lv4_weapon, 25;
+		close;
+		
+
+LV4_27:
+LV4_28:
+	if(countitem(LV4_Gem1) < 30) goto LV4_27_NOGEM;
+	if(countitem(LV4_Gem2) < 30) goto LV4_27_NOGEM;
+	if(countitem(LV4_Gem3) < 30) goto LV4_27_NOGEM;
+	mes "[Kayron]";
+	mes "...Um? The items that you brought to me seem";
+	mes "to be good materials for my creation...";
+	mes "Give them to me, I shall try first!";
+	next;
+	mes "[Kayron]";
+	mes "Oh...I was right! How did you";
+	mes "know these are materials I need?";
+	mes "Great, give me a moment!";
+	next;
+	mes "[Kayron]";
+	mes "...wait, I must test your luck first.";
+	mes "Since I am not sure about the result,";
+	mes "we should place trust in luck for the result of my creation.";
+	mes "You must have good luck...";
+	next;
+	mes "[Kayron]";
+	mes "We are going to play 'Rock, Paper, Scissors'.";
+	mes "You must win at least 2 out of 3 times.";
+	mes "If you fail, you must throw away a large amount";
+	mes "of one of the 3 kinds of ore that you have brought.";
+	mes "It is for driving away your bad luck.";
+	next;
+	mes "[Kayron]";
+	mes "I will give you a piece of paper.";
+	mes "You will write down one among 'Rock, Paper, or Scissors'.";
+	mes "I will do the same at the same time.";
+	mes "We will compare each other's paper after.";
+	next;
+	
+	set @shobu, 0;
+	
+	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {
+		if(@i == 2) mes "[Kayron]";
+		if(@i == 2) mes "Let's play the second one!";
+		if(@i == 3) mes "[Kayron]";
+		if(@i == 3) mes "This will be the last one!";
+		if(@i == 3) mes "Let's compare after this.";
+		set @npchand[@i], rand(1, 3);
+		switch( select( "Scissors", "Rock", "Paper" ) ) {
+			case 1:
+				set @myhand[@i], 1;
+				if(@npchand[@i] == 3) set @shobu, @shobu + 1;
+				break;
+			case 2:
+				set @myhand[@i], 2;
+				if(@npchand[@i] == 1) set @shobu, @shobu + 1;
+				break;
+			case 3:
+				set @myhand[@i], 3;
+				if(@npchand[@i] == 2) set @shobu, @shobu + 1;
+				break;
+		}
+	}
+		
+	if(countitem(LV4_Gem1) < 30) goto LV4_HACK;
+	if(countitem(LV4_Gem2) < 30) goto LV4_HACK;
+	if(countitem(LV4_Gem3) < 30) goto LV4_HACK;
+
+	if(@shobu > 1) goto LV4_27_WIN;
+
+	switch ( rand(1 ,3) ) {
+		case 1:
+			delitem LV4_Gem1, 30;
+			break;
+		case 2:
+			delitem LV4_Gem2, 30;
+			break;
+		case 3:
+			delitem LV4_Gem3, 30;
+			break;
+	}
+	goto LV4_27_RESULT;
+		
+LV4_27_WIN:
+	delitem LV4_Gem1, 30;
+	delitem LV4_Gem2, 30;
+	delitem LV4_Gem3, 30;
+	set lv4_weapon, lv4_weapon + 2;
+	goto LV4_27_RESULT;
+	
+LV4_27_RESULT:
+	mes "[Kayron]";
+	mes "Okay...I played in the order of...";
+	
+	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {
+		if(@npchand[@i] == 1) mes "Scissors";
+		if(@npchand[@i] == 2) mes "Rock";
+		if(@npchand[@i] == 3) mes "Paper";
+	}
+
+	next;
+	mes "[Kayron]";
+	mes "You did in the order of...";
+
+	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {
+		if(@myhand[@i] == 1) mes "Scissors";
+		if(@myhand[@i] == 2) mes "Rock";
+		if(@myhand[@i] == 3) mes "Paper";
+	}
+
+	next;
+
+	if(@shobu > 1) goto LV4_27_SAY_WIN;
+	
+	mes "[Kayron]";
+	mes "Well well well...you lost the game.";
+	mes "Ah~ you were close though...";
+	mes "We must drive away bad luck.";
+	next;
+	mes "[Kayron]";
+	mes "Okay, I will wait here,";
+	mes "go bring me the materials again...";
+	close;
+			
+LV4_27_SAY_WIN:
+	mes "[Kayron]";
+	mes "Let's see...";
+	mes "You won total " + @shobu + " times.";
+	mes "Ah~ you must be really good at game!";
+	mes "Yes, your luck is at its highest!";
+	next;
+	mes "[Kayron]";
+	mes "I am going to keep my promise.";
+	mes "But I need some time to prepare.";
+	mes "Give me the materials now and I will talk to you later.";
+	close;
+
+LV4_26:
+LV4_27_NOGEM:
+	mes "[Kayron]";
+	mes "Arph...it has not gotten into my memory yet.";
+	mes "Awww....this is a problem.";
+	mes "I used to often discuss the materials";
+	mes "with my family...now I cannot remember what they are...";
+	close;
+
+
+LV4_29:
+LV4_30:
+	mes "[Kayron]";
+	mes "Hahaha...you came back at the right time.";
+	mes "The result? Do you want to know about the result?...";
+	mes "Haha...okay...let's see...";
+	next;
+	mes "[Kayron]";
+	mes "...YES! It's a success!";
+	mes "I created the weapon that got me killed last time!";
+	mes "Look at this...haha! I died while making this!";
+	mes "... The name of the weapon is...";
+	
+	
+	switch( rand(1, 2) ) {
+		case 1:
+			if(lv4_weapon == 29) mes "Great Axe! Weee~ I made it!";
+			if(lv4_weapon == 29) getitem 1364 ,1; // 1364,Great_Axe
+			if(lv4_weapon == 30) mes "Longinus's Spear! Weee~ I made it!";
+			if(lv4_weapon == 30) getitem 1469, 1; // 1469,Longinus's_Spear
+			break;
+		case 2:
+			if(lv4_weapon == 29) mes "Guillotine! Weee~ I made it!";
+			if(lv4_weapon == 29) getitem 1369, 1; // 1369,Guillotine
+			if(lv4_weapon == 30) mes "Brionac! Weee~ I made it!";
+			if(lv4_weapon == 30) getitem 1470, 1; // 1470,Brionac
+	}
+	
+	set lv4_weapon, 0;
+	next;
+	mes "[Kayron]";
+	mes "I finally succeeded in the research...";
+	mes "I want to show this result to my father...";
+	mes "He will be really happy for this.";
+	next;
+	mes "[Kayron]";
+	mes "Ah~ I feel my memories are fading again...";
+	mes "If you see me next time...";
+	mes "please let me remember the memories again...";
+	mes "Thank you...";
+	close;
+	
+
+
+//--------------------------------------------------
+//Hack Attempt
+//--------------------------------------------------
+LV4_HACK:
+	mes "[Kayron]";
+	mes "Hmm. There seems to be a bit of problem.";
+	set lv4_weapon, 0;
+	logmes "[" +strcharinfo(0) + "] tried to hack LV4 quest.";
+	close;
+}
+
+//--------------------------------------------------
+// Reyghema, creates Berserk, Tjungkulleti, Rudra's Bow and Brocca(Skewer)
+//--------------------------------------------------
+
+niflheim.gat,99,268,5	script	Reyghema	794, {
+	set @NowWeight, MaxWeight - Weight;
+	if (@NowWeight >= 3000) goto LV4_NOT_OW;
+	mes "- Wait a minute! -";
+	mes "- You are currently overweight. -";
+	mes "- Please lose some weight -";
+	mes "- and try again. -";
+	close;
+
+	
+LV4_NOT_OW:
+	if(BaseLevel >= 80) goto LV4_LEVEL_PASS;
+	mes "[Reyghema]";
+	mes "Um? Do you have any business with me?";
+	mes "Sorry but I don't. I'm also not";
+	mes "speaking to a weak person like you.";
+	mes "Have a safe travel~";
+	close;
+	
+
+LV4_LEVEL_PASS:
+	if(lv4_weapon == 0) goto LV4_0;
+	if(lv4_weapon < 31) goto LV4_30;
+	if(lv4_weapon == 31) goto LV4_31;
+	if(lv4_weapon == 32) goto LV4_32;
+	if(lv4_weapon == 33) goto LV4_33;
+	if(lv4_weapon == 34) goto LV4_34;
+	if(lv4_weapon == 35) goto LV4_35;
+	if(lv4_weapon == 36) goto LV4_36;
+	if(lv4_weapon == 37) goto LV4_37;
+	if(lv4_weapon == 38) goto LV4_38;
+	if(lv4_weapon == 39) goto LV4_39;
+	if(lv4_weapon > 39) goto LV4_40;
+	end; // shouldn't be here
+
+
+LV4_0:
+LV4_31:
+	mes "[Reyghema]";
+	mes "Darn it...I didn't want to die!";
+	mes "Well...there is no living thing that wants to die but...";
+	mes "Especially me, I was too young to die!";
+	mes "Youth! ...Ah...I just remember the word.";
+	mes "Speaking of which...I think I usually said something related to that...";
+	next;
+	
+	if(lv4_weapon == 0) goto LV4_0_ASK;
+	
+	mes "[Reyghema]";
+	mes "Ah...I cannot remember what I was going to say...";
+	mes "Waaahhh.....I cannot remember....";
+	mes "My memory is gone...!";
+	close;
+	
+LV4_0_ASK:
+	switch( select( "Show interest.", "Igonore him." ) ) {
+		case 1:
+			mes "[Reyghema]";
+			mes "Ah...I cannot remember what I was going to say...";
+			mes "Waaahhh.....I cannot remember....";
+			mes "My memory is gone...!";
+			set lv4_weapon, 31;
+			close;
+			break;
+		case 2:
+			mes "- Because you decided to ignore him, -";
+			mes "- you are no longer able to hear him. -";
+			close;
+			break;
+	}
+	end;
+	
+
+LV4_30:
+LV4_40:
+	mes "[Reyghema]";
+	mes "I feel something different about you.";
+	mes "Did you come here with a purpose?";
+	mes "I am envious of you...";
+	close;
+
+
+LV4_32:
+	mes "[Reyghema]";
+	mes "I used to be called Reyghema when I was alive.";
+	mes "But now I am nothing but";
+	mes "a ghost wandering this place.";
+	mes "I am worthless...I cannot do anything";
+	mes "without a body...";
+	next;
+	set @dap2$, "That means that you never regret anything!";
+	input @answer2$;
+	if(@answer2$ == @dap2$) goto LV4_32_CORRECT;
+	mes "[Reyghema]";
+	mes "What? Do you want to play a game with me or what?";
+	mes "Unfortunately I have something to do...";
+	mes "wait...what was I going to do?";
+	close;
+
+LV4_32_CORRECT:
+	mes "[Reyghema]";
+	mes "...";
+	next;
+	mes "[Reyghema]";
+	mes "...";
+	mes "......";
+	next;
+	mes "[Reyghema]";
+	mes "...";
+	mes "......";
+	mes ".........";
+	next;
+	mes "[Reyghema]";
+	mes "That's right! I am Bill Thayer the Weaponsmith's";
+	mes "second son! And I must forge a weapon";
+	mes "in order to not regret my youth!";
+	mes "Even if I am dead, I cannot give it up!";
+	next;
+	mes "[Reyghema]";
+	mes "Hey you, thank you for letting me have my memory back!";
+	mes "You need to do me another favor!";
+	mes "Bring me some items, I need to forge a weapon.";
+	mes "Once I make one, I will give it to you in return for your favor.";
+	next;
+	mes "[Reyghema]";
+	mes "Reyghema, breathe deeply first...phew~.";
+	mes "Give me a second!";
+	set lv4_weapon, 33;
+	close;
+	
+	
+LV4_34:
+	if(countitem($@LV4_Hammer_Of_Blacksmith) < 2) goto LV4_34_BASE_MAT;
+	if(countitem($@LV4_Emperium_Anvil) < 1) goto LV4_34_BASE_MAT;
+	if(countitem($@LV4_Illusion_Flower) < 1) goto LV4_34_BASE_MAT;
+	if(countitem($@LV4_Gold) < 20) goto LV4_34_BASE_MAT;
+	
+	mes "[Reyghema]";
+	mes "Oh...you brought everything I need!";
+	mes "You are a reliable person unlike you appear.";
+	mes "But here is the thing...";
+	mes "There are some more materials I need...";
+	mes "But I cannot think of any of them...my memory";
+	mes "is unclear...arrrrph...";
+	next;
+	mes "[Reyghema]";
+	mes "I need to think about that a little longer.";
+	mes "I know that I really need those materials...awwww....";
+	mes "Do you have any idea to bring my memory back?";
+	mes "At the same time, rest assured that the materials";
+	mes "you brought will be used for my creation. So let me keep them for you.";
+	
+	if(countitem($@LV4_Hammer_Of_Blacksmith) < 2) goto LV4_HACK;
+	if(countitem($@LV4_Emperium_Anvil) < 1) goto LV4_HACK;
+	if(countitem($@LV4_Illusion_Flower) < 1) goto LV4_HACK;
+	if(countitem($@LV4_Gold) < 20) goto LV4_HACK;
+	delitem $@LV4_Hammer_Of_Blacksmith, 2;
+	delitem $@LV4_Emperium_Anvil, 1;
+	delitem $@LV4_Illusion_Flower, 1;
+	delitem $@LV4_Gold, 20;
+	set lv4_weapon, 35;
+	close;
+
+LV4_33:
+LV4_34_BASE_MAT:
+	switch( lv4_weapon ) {
+		case 33:
+			mes "[Reyghema]";
+			mes "Okay. You don't need any other explaination, do you?";
+			mes "I will tell you what I need";
+			mes "so please do not forget those materials.";
+			break;
+		case 34:
+			mes "[Reyghema]";
+			mes "I will tell you the list of materials I need again.";
+			mes "I think I need a lot of materials...so";
+			mes "write them down if you need.";
+			break;
+		}
+		next;
+		mes "[Reyghema]";
+		mes "I need 2 Hammer of Blacksmith,";
+		mes "1 Emperium Anvil, 1 Illusion Flower and 20 Gold...";
+		mes "...wait...are they all...or do I need more?!";
+		if(lv4_weapon == 33) next;
+		if(lv4_weapon == 33) mes "[Reyghema]";
+		if(lv4_weapon == 33) mes "Ah...I think need something more...it's very important...";
+		if(lv4_weapon == 33) mes "But I cannot remember what more I need....!";
+		if(lv4_weapon == 33) mes "Bah...this is so frustrating.";
+		set lv4_weapon, 34;
+		close;
+		
+
+LV4_36:
+LV4_37:
+	if(countitem(LV4_Gem1) < 30) goto LV4_36_NOGEM;
+	if(countitem(LV4_Gem2) < 30) goto LV4_36_NOGEM;
+	if(countitem(LV4_Gem3) < 30) goto LV4_36_NOGEM;
+	mes "[Reyghema]";
+	mes "...Um? The items that you brought to me seem";
+	mes "to be good materials for my creation...";
+	mes "Give them to me, I shall try first!";
+	next;
+	mes "[Reyghema]";
+	mes "Oh...I was right! How did you";
+	mes "know these are materials I need?";
+	mes "Great, give me a moment!";
+	next;
+	mes "[Reyghema]";
+	mes "...wait, I must test your luck first.";
+	mes "Since I am not sure about the result,";
+	mes "we should place trust in luck for the result of my creation.";
+	mes "You must have good luck...";
+	next;
+	mes "[Reyghema]";
+	mes "We are going to play 'Rock, Paper, Scissors'.";
+	mes "You must win at least 2 out of 3 times.";
+	mes "If you fail, you must leave a large amount";
+	mes "of one material you have brought.";
+	mes "It is for driving away your bad luck.";
+	next;
+	mes "[Reyghema]";
+	mes "I will give you a piece of paper.";
+	mes "You will write down one among 'Rock, Paper, or Scissors'.";
+	mes "I will do the same at the same time.";
+	mes "We will then compare each other's paper.";
+	next;
+	
+	set @shobu, 0;
+	
+	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {
+		if(@i == 2) mes "[Reyghema]";
+		if(@i == 2) mes "Let's play the second one!";
+		if(@i == 3) mes "[Reyghema]";
+		if(@i == 3) mes "This will be the last one!";
+		if(@i == 3) mes "Let's compare after this.";
+		set @npchand[@i], rand(1, 3);
+		switch( select( "Scissors", "Rock", "Paper" ) ) {
+			case 1:
+				set @myhand[@i], 1;
+				if(@npchand[@i] == 3) set @shobu, @shobu + 1;
+				break;
+			case 2:
+				set @myhand[@i], 2;
+				if(@npchand[@i] == 1) set @shobu, @shobu + 1;
+				break;
+			case 3:
+				set @myhand[@i], 3;
+				if(@npchand[@i] == 2) set @shobu, @shobu + 1;
+				break;
+		}
+	}
+		
+	if(countitem(LV4_Gem1) < 30) goto LV4_HACK;
+	if(countitem(LV4_Gem2) < 30) goto LV4_HACK;
+	if(countitem(LV4_Gem3) < 30) goto LV4_HACK;
+
+	if(@shobu > 1) goto LV4_36_WIN;
+
+	switch ( rand(1 ,3) ) {
+		case 1:
+			delitem LV4_Gem1, 30;
+			break;
+		case 2:
+			delitem LV4_Gem2, 30;
+			break;
+		case 3:
+			delitem LV4_Gem3, 30;
+			break;
+	}
+	goto LV4_36_RESULT;
+		
+LV4_36_WIN:
+	delitem LV4_Gem1, 30;
+	delitem LV4_Gem2, 30;
+	delitem LV4_Gem3, 30;
+	set lv4_weapon, lv4_weapon + 2;
+	goto LV4_36_RESULT;
+	
+LV4_36_RESULT:
+	mes "[Reyghema]";
+	mes "Okay...I played in the order of...";
+	
+	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {
+		if(@npchand[@i] == 1) mes "Scissors";
+		if(@npchand[@i] == 2) mes "Rock";
+		if(@npchand[@i] == 3) mes "Paper";
+	}
+
+	next;
+	mes "[Reyghema]";
+	mes "You did in the order of...";
+
+	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {
+		if(@myhand[@i] == 1) mes "Scissors";
+		if(@myhand[@i] == 2) mes "Rock";
+		if(@myhand[@i] == 3) mes "Paper";
+	}
+
+	next;
+
+	if(@shobu > 1) goto LV4_36_SAY_WIN;
+	
+	mes "[Reyghema]";
+	mes "Well well well...you lost the game.";
+	mes "Ah~ you were close though...";
+	mes "We must drive away bad luck.";
+	next;
+	mes "[Reyghema]";
+	mes "Okay, I will wait here,";
+	mes "go bring me the materials again...";
+	close;
+			
+LV4_36_SAY_WIN:
+	mes "[Reyghema]";
+	mes "Let's see...";
+	mes "You won total " + @shobu + " times.";
+	mes "Ah~ you must be really good at game!";
+	mes "Yes, your luck is at its highest!";
+	next;
+	mes "[Reyghema]";
+	mes "I am going to keep my promise.";
+	mes "But I need some time to prepare.";
+	mes "Give me the materials now and I will talk to you later.";
+	close;
+
+LV4_35:
+LV4_36_NOGEM:
+		mes "[Reyghema]";
+		mes "Not yet! I have not remembered it yet! Awwww...";
+		mes "This is killing me...";
+		mes "Oh, wait...I died already...";
+		mes "God damn it!";
+	close;
+
+
+LV4_38:
+LV4_39:
+	mes "[Reyghema]";
+	mes "..................";
+	next;
+	mes "[Reyghema]";
+	mes "...YES! It's a success!";
+	mes "I created the weapon that got me killed last time!";
+	mes "Look at this...haha! I died while making this!";
+	mes "... The name of the weapon is...";
+	
+	switch( rand(1, 2) ) {
+		case 1:
+			if(lv4_weapon == 38) mes "Berserk! Weee~ Weee~ I made it!";
+			if(lv4_weapon == 38) getitem 1814 ,1; // 1814,Berserk
+			if(lv4_weapon == 39) mes "Tjungkuletti! Weee~ I made it!";
+			if(lv4_weapon == 39) getitem 1416, 1; // 1416,Tjungkuletti
+			break;
+		case 2:
+			if(lv4_weapon == 38) mes "Rudra's Bow! Weee~ I made it!";
+			if(lv4_weapon == 38) getitem 1720, 1; // 1720,Bow_of_Rudra
+			if(lv4_weapon == 39) mes "Brocca!";
+			if(lv4_weapon == 39) getitem 1415, 1; // 1415,Skewer
+	}
+	
+	set lv4_weapon, 0;
+	next;
+	mes "[Reyghema]";
+	mes "...*sigh*.";
+	next;
+	mes "[Reyghema]";
+	mes "Happiness lasts too short...";
+	mes "As I am a dead man, I think I am not allowed";
+	mes "to keep the memory of past....";
+	mes "My memory is fading again...";
+	next;
+	mes "[Reyghema]";
+	mes "But thank you for letting me achieve";
+	mes "my long-cherished desire.";
+	mes "If we meet again, please let me";
+	mes "retrieve my memory of past again.";
+	mes "So I can try forging another weapon.";
+	next;
+	mes "[Reyghema]";
+	mes "Farewell, adventurer.";
+	close;
+	
+	
+
+//--------------------------------------------------
+//Hack Attempt
+//--------------------------------------------------
+LV4_HACK:
+	mes "[Reyghema]";
+	mes "Hmm. There seems to be a bit of problem.";
+	set lv4_weapon, 0;
+	logmes "[" +strcharinfo(0) + "] tried to hack LV4 quest.";
+	close;
+}
+
+//--------------------------------------------------
+// Hein, creates Excalibur, Schweisersabel, Dragon Slayer and Edge
+//--------------------------------------------------
+
+niflheim.gat,187,280,3	script	Hein	795, {
+	set @NowWeight, MaxWeight - Weight;
+	if (@NowWeight >= 3000) goto LV4_NOT_OW;
+	mes "- Wait a minute! -";
+	mes "- You are currently overweight. -";
+	mes "- Please lose some weight -";
+	mes "- and try again. -";
+	close;
+
+	
+LV4_NOT_OW:
+	if(BaseLevel >= 80) goto LV4_LEVEL_PASS;
+	mes "[Hein]";
+	mes "You should care about other people";
+	mes "more than yourself...";
+	mes "You are quite weak for an adventurer.";
+	close;
+	
+
+LV4_LEVEL_PASS:
+	if(lv4_weapon == 0) goto LV4_0;
+	if(lv4_weapon < 40) goto LV4_39;
+	if(lv4_weapon == 40) goto LV4_40;
+	if(lv4_weapon == 41) goto LV4_41;
+	if(lv4_weapon == 42) goto LV4_42;
+	if(lv4_weapon == 43) goto LV4_43;
+	if(lv4_weapon == 44) goto LV4_44;
+	if(lv4_weapon == 45) goto LV4_45;
+	if(lv4_weapon == 46) goto LV4_46;
+	if(lv4_weapon == 47) goto LV4_47;
+	if(lv4_weapon == 48) goto LV4_48;
+	if(lv4_weapon > 48) goto LV4_49;
+	end; // shouldn't be here
+
+
+LV4_0:
+LV4_40:
+	mes "[Hein]";
+	mes "Ah...are you going to ask me something?";
+	mes "However, I am not accepting money";
+	mes "from my client. Because.";
+	mes "It brings me bad luck to...";
+	mes "...whaat? What did I just say?";
+	mes "Awww....I am confused.";
+	next;
+	
+	if(lv4_weapon == 0) goto LV4_0_ASK;
+	
+	mes "[Hein]";
+	mes "Why did I speak of money?";
+	mes "I am a dead man and dead people";
+	mes "do not need money...arf!";
+	mes "My head is hurting...I guess that";
+	mes "a dead man can have a headache!";
+	close;
+	
+LV4_0_ASK:
+	switch( select( "Show interest.", "Igonore him." ) ) {
+		case 1:
+			mes "[Hein]";
+			mes "Why did I speak of money?";
+			mes "I am a dead man and dead people";
+			mes "do not need money...arf!";
+			mes "My head is hurting...I guess that";
+			mes "a dead man can have a headache!";
+			set lv4_weapon, 40;
+			close;
+			break;
+		case 2:
+			mes "- Because you decided to ignore him, -";
+			mes "- you are no longer able to hear him. -";
+			close;
+			break;
+	}
+	end;
+	
+
+LV4_39:
+LV4_49:
+	mes "[Hein]";
+	mes "I feel something different from you.";
+	mes "Did you come here with a purpose?";
+	mes "I am envious of you...";
+	close;
+
+
+LV4_41:
+	mes "[Hein]";
+	mes "Ah...are you going to ask me something?";
+	mes "However, I am not accepting money";
+	mes "from my client. Because.";
+	mes "It brings me bad luck to...";
+	next;
+	set @dap3$, "to forge a good weapon.";
+	input @answer3$;
+	if(@answer3$ == @dap3$) goto LV4_41_CORRECT;
+	mes "[Hein]";
+	mes "...? What are you talking about?";
+	mes "What was I going to say?";
+	mes "Arf....my head is hurting...!";
+	close;
+
+LV4_41_CORRECT:
+	mes "[Hein]";
+	mes "That's right! It's bad luck!";
+	mes "Creating weapons is betting! And I am...I am?";
+	mes "Oh right...I forgot that. Yes, I am dead.";
+	mes "Ahahahahaha.";
+	set lv4_weapon, 42;
+	next;
+	mes "[Hein]";
+	mes "Well, I must be a lucky dead man";
+	mes "for remembering my past!";
+	mes "Hahahahaha!";
+	next;
+	mes "[Hein]";
+	mes "Perhaps God wants me to";
+	mes "continue my research...?";
+	mes "wait, let me ask you a favor.";
+	next;
+	mes "[Hein]";
+	mes "Can you bring me some materials";
+	mes "that I need for my research?";
+	mes "If I succeed in the research,";
+	mes "I will give you the result in return.";
+	next;
+	mes "[Hein]";
+	mes "You can take your time to think of my offer.";
+	mes "Please talk to me later.";	
+	close;
+	
+	
+LV4_43:
+	if(countitem($@LV4_Hammer_Of_Blacksmith) < 2) goto LV4_43_BASE_MAT;
+	if(countitem($@LV4_Emperium_Anvil) < 1) goto LV4_43_BASE_MAT;
+	if(countitem($@LV4_Illusion_Flower) < 1) goto LV4_43_BASE_MAT;
+	if(countitem($@LV4_Gold) < 20) goto LV4_43_BASE_MAT;
+	
+	mes "[Hein]";
+	mes "Oh, you have brought the materials I asked.";
+	mes "Here's the thing. I cannot remember what I need other than those...";
+	mes "Aww....I need some more time to think of them...";
+	next;
+	mes "[Hein]";
+	mes "Please try to search what I need...if you can.";
+	mes "Of course, it will not be an easy job for you";
+	mes "to do so...but I know you have a body to move with your will...";
+	mes "It is still better than being a ghost like me...";
+	next;
+	mes "[Hein]";
+	mes "Please give me all the materials you have brought.";
+	mes "I will keep them for you.";
+	
+	if(countitem($@LV4_Hammer_Of_Blacksmith) < 2) goto LV4_HACK;
+	if(countitem($@LV4_Emperium_Anvil) < 1) goto LV4_HACK;
+	if(countitem($@LV4_Illusion_Flower) < 1) goto LV4_HACK;
+	if(countitem($@LV4_Gold) < 20) goto LV4_HACK;
+	delitem $@LV4_Hammer_Of_Blacksmith, 2;
+	delitem $@LV4_Emperium_Anvil, 1;
+	delitem $@LV4_Illusion_Flower, 1;
+	delitem $@LV4_Gold, 20;
+	set lv4_weapon, 44;
+	close;
+
+LV4_42:
+LV4_43_BASE_MAT:
+	switch( lv4_weapon ) {
+		case 42:
+			mes "[Hein]";
+			mes "I will take you speaking to me again";
+			mes "as the approval of my request.";
+			mes "Thank you so much.";
+			next;
+			mes "[Hein]";
+			mes "I need 2 Hammer of Blacksmith,";
+			mes "1 Emperium Anvil, 1 Illusion Flower and 20 Gold...";
+			mes "Most likely they are the ones I need.";
+			next;
+			mes "[Hein]";
+			mes "And I do need 3 more things...";
+			mes "but I have a hard time remembering what they are.";
+			mes "That means that my memory of the past is not";
+			mes "absolutely back.";
+			next;
+			mes "[Hein]";
+			mes "*sigh*...I am so sorry to ask of you this...";
+			mes "but please search for what those 3 things are.";
+			mes "In the meantime, I will try to remember them.";
+			mes "Thank you.";
+			set lv4_weapon, 43;
+			break;
+		case 43:
+			mes "[Hein]";
+			mes "I need 2 Hammer of Blacksmith,";
+			mes "1 Emperium Anvil, 1 Illusion Flower and 20 Gold...";
+			mes "Most likely they are the ones I need.";
+			break;
+		}
+		close;
+		
+
+LV4_45:
+LV4_46:
+	if(countitem(LV4_Gem1) < 30) goto LV4_45_NOGEM;
+	if(countitem(LV4_Gem2) < 30) goto LV4_45_NOGEM;
+	if(countitem(LV4_Gem3) < 30) goto LV4_45_NOGEM;
+	mes "[Hein]";
+	mes "...Um? The items that you brought to me seem";
+	mes "to be good materials for my creation...";
+	mes "Give them to me, I shall try first!";
+	next;
+	mes "[Hein]";
+	mes "Oh...I was right! How did you";
+	mes "know these are materials I need?";
+	mes "Great, give me a moment!";
+	next;
+	mes "[Hein]";
+	mes "...Wait, I must test your luck first.";
+	mes "Since I am not sure about the result,";
+	mes "we should trust to luck for the result of my creation.";
+	mes "You must have good luck...";
+	next;
+	mes "[Hein]";
+	mes "We are going to play 'Rock, Paper, Scissors'.";
+	mes "You must win at least 2 out of 3 times.";
+	mes "If you fail, you must leave a large amount";
+	mes "of one material you have brought.";
+	mes "It is for driving away your bad luck.";
+	next;
+	mes "[Hein]";
+	mes "I will give you a piece of paper.";
+	mes "You will write down one among 'Rock, Paper, or Scissors'.";
+	mes "I will do the same at the same time.";
+	mes "We will then compare each other's paper at the end.";
+	next;
+	
+	set @shobu, 0;
+	
+	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {
+		if(@i == 2) mes "[Hein]";
+		if(@i == 2) mes "Let's play the second one!";
+		if(@i == 3) mes "[Hein]";
+		if(@i == 3) mes "This will be the last one!";
+		if(@i == 3) mes "Let's compare after this.";
+		set @npchand[@i], rand(1, 3);
+		switch( select( "Scissors", "Rock", "Paper" ) ) {
+			case 1:
+				set @myhand[@i], 1;
+				if(@npchand[@i] == 3) set @shobu, @shobu + 1;
+				break;
+			case 2:
+				set @myhand[@i], 2;
+				if(@npchand[@i] == 1) set @shobu, @shobu + 1;
+				break;
+			case 3:
+				set @myhand[@i], 3;
+				if(@npchand[@i] == 2) set @shobu, @shobu + 1;
+				break;
+		}
+	}
+		
+	if(countitem(LV4_Gem1) < 30) goto LV4_HACK;
+	if(countitem(LV4_Gem2) < 30) goto LV4_HACK;
+	if(countitem(LV4_Gem3) < 30) goto LV4_HACK;
+
+	if(@shobu > 1) goto LV4_45_WIN;
+
+	switch ( rand(1 ,3) ) {
+		case 1:
+			delitem LV4_Gem1, 30;
+			break;
+		case 2:
+			delitem LV4_Gem2, 30;
+			break;
+		case 3:
+			delitem LV4_Gem3, 30;
+			break;
+	}
+	goto LV4_45_RESULT;
+		
+LV4_45_WIN:
+	delitem LV4_Gem1, 30;
+	delitem LV4_Gem2, 30;
+	delitem LV4_Gem3, 30;
+	set lv4_weapon, lv4_weapon + 2;
+	goto LV4_45_RESULT;
+	
+LV4_45_RESULT:
+	mes "[Hein]";
+	mes "Okay...I played in the order of...";
+	
+	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {
+		if(@npchand[@i] == 1) mes "Scissors";
+		if(@npchand[@i] == 2) mes "Rock";
+		if(@npchand[@i] == 3) mes "Paper";
+	}
+
+	next;
+	mes "[Hein]";
+	mes "You did in the order of...";
+
+	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {
+		if(@myhand[@i] == 1) mes "Scissors";
+		if(@myhand[@i] == 2) mes "Rock";
+		if(@myhand[@i] == 3) mes "Paper";
+	}
+
+	next;
+
+	if(@shobu > 1) goto LV4_45_SAY_WIN;
+	
+	mes "[Hein]";
+	mes "Well well well...you lost the game.";
+	mes "Ah~ you were close though...";
+	mes "We must drive away bad luck.";
+	next;
+	mes "[Hein]";
+	mes "Okay, I will wait here,";
+	mes "go bring me the materials again...";
+	close;
+			
+LV4_45_SAY_WIN:
+	mes "[Hein]";
+	mes "Let's see...";
+	mes "You won total " + @shobu + " times.";
+	mes "Ah~ you must be really good at game!";
+	mes "Yes, your luck is at its highest!";
+	next;
+	mes "[Hein]";
+	mes "I am going to keep my promise.";
+	mes "But I need some time to prepare.";
+	mes "Give me the materials now and I will talk to you later.";
+	close;
+
+LV4_44:
+LV4_45_NOGEM:
+		mes "[Hein]";
+		mes "I am sorry but please give me more time to remember the materials...";
+		mes "I had really good memory when I was alive...";
+		mes "So I could even recite them right after I woke up...";
+	close;
+
+
+LV4_47:
+LV4_48:
+	mes "[Hein]";
+	mes "Oh, yes. I just finished the work.";
+	mes "Do you want to know the result? Okay...";
+	mes "Breathe deeply...before we check.";
+	mes "The result is...";
+	next;
+	mes "[Hein]";
+	mes "a Big Success! This is great!";
+	mes "I have not labored in vain!";
+	mes "Let's see the weapon...it is...";
+	
+	switch( rand(1, 2) ) {
+		case 1:
+			if(lv4_weapon == 47) mes "Edge.";
+			if(lv4_weapon == 47) getitem 1132 ,1; // 1132,Edge
+			if(lv4_weapon == 48) mes "Dragon Slayer.";
+			if(lv4_weapon == 48) getitem 1166, 1; // 1166,Dragon_Slayer
+			break;
+		case 2:
+			if(lv4_weapon == 47) mes "Excalibur.";
+			if(lv4_weapon == 47) getitem 1137, 1; // 1137,Excalibur
+			if(lv4_weapon == 48) mes "Schweizersabel.";
+			if(lv4_weapon == 48) getitem 1167, 1; // 1167,Schweizersabel
+	}
+
+	set lv4_weapon, 0;	
+	next;
+	mes "[Hein]";
+	mes "Well...this is it.";
+	mes "I feel my memory is fading again...";
+	mes "Hahaha...being dead is not good.";
+	next;
+	mes "[Hein]";
+	mes "Thank you for your help. And if you have";
+	mes "a chance to visit Nifflheim again,";
+	mes "please come back and retrieve my memory once more...";
+	next;
+	mes "[Hein]";
+	mes "Aaahhhh! I don't think I will";
+	mes "remember you next time...";
+	mes "Take care, adventurer...father, I made it...";
+	close;
+	
+	
+
+//--------------------------------------------------
+//Hack Attempt
+//--------------------------------------------------
+LV4_HACK:
+	mes "[Hein]";
+	mes "Hmm. There seems to be a bit of problem.";
+	set lv4_weapon, 0;
+	logmes "[" +strcharinfo(0) + "] tried to hack LV4 quest.";
+	close;
+}
+
+//--------------------------------------------------
+// Waltboughst, creates Byeollungum, Exorciser(excercise), Combat Knife and Grand Cross
+//--------------------------------------------------
+
+niflheim.gat,331,72,3	script	Waltboughst	795,{
+	set @NowWeight, MaxWeight - Weight;
+	if (@NowWeight >= 3000) goto LV4_NOT_OW;
+	mes "- Wait a minute! -";
+	mes "- You are currently overweight. -";
+	mes "- Please lose some weight -";
+	mes "- and try again. -";
+	close;
+
+	
+LV4_NOT_OW:
+	if(BaseLevel >= 80) goto LV4_LEVEL_PASS;
+	mes "[Waltboughst]";
+	mes "...Hah!";
+	close;
+	
+
+LV4_LEVEL_PASS:
+	if(lv4_weapon == 0) goto LV4_0;
+	if(lv4_weapon < 49) goto LV4_48;
+	if(lv4_weapon == 49) goto LV4_49;
+	if(lv4_weapon == 50) goto LV4_50;
+	if(lv4_weapon == 51) goto LV4_51;
+	if(lv4_weapon == 52) goto LV4_52;
+	if(lv4_weapon == 53) goto LV4_53;
+	if(lv4_weapon == 54) goto LV4_54;
+	if(lv4_weapon == 55) goto LV4_55;
+	if(lv4_weapon == 56) goto LV4_56;
+	if(lv4_weapon == 57) goto LV4_57;
+	if(lv4_weapon > 57) goto LV4_58;
+	end; // shouldn't be here
+
+
+LV4_0:
+LV4_49:
+	mes "[Waltboughst]";
+	mes "Ah~ it is so frustrating to be a dead man.";
+	mes "Because I cannot do anything without a body.";
+	mes "You know what my father used to say?";
+	mes "Trying best does not always";
+	mes "result in a success.";
+	mes "However...errr?";
+	next;
+	
+	if(lv4_weapon == 0) goto LV4_0_ASK;
+	
+	mes "[Waltboughst]";
+	mes "...What was my father's";
+	mes "quote? Why am I stuck in";
+	mes "here after death? Hey, you";
+	mes "Do you know anything about";
+	mes "Waltboughst when he was";
+	mes "alive?";
+	close;
+	
+LV4_0_ASK:
+	switch( select( "Show interest.", "Igonore him." ) ) {
+		case 1:
+			mes "[Waltboughst]";
+			mes "...what did he say afterwards?";
+			mes "Speaking of which, why am I";
+			mes "so anxious to do something?";
+			mes "I am a dead man, and a dead man is not supposed to do anything!";
+			mes "Hey, do you know anything about me when I was alive?";
+			set lv4_weapon, 49;
+			close;
+			break;
+		case 2:
+			mes "- Because you decided to ignore him, -";
+			mes "- you are no longer able to hear him. -";
+			close;
+			break;
+	}
+	end;
+	
+
+LV4_48:
+LV4_58:
+	mes "[Waltboughst]";
+	mes "I feel something different about you.";
+	mes "Did you come here with a purpose?";
+	mes "I am envious of you...";
+	close;
+
+
+LV4_50:
+	mes "[Waltboughst]";
+	mes "Ah~ it is so frustrating to be a dead man.";
+	mes "Because I cannot do anything without a body.";
+	mes "You know what my father used to say?";
+	mes "Trying best does not always";
+	mes "result in a success.";
+	mes "However...";
+	next;
+	set @dap4$, "All the successful men in the history tried their best!";
+	input @answer4$;
+	if(@answer4$ == @dap4$) goto LV4_50_CORRECT;
+	mes "[Waltboughst]";
+	mes "...What? What did you just say?";
+	mes "Hmmm.";
+	close;
+
+LV4_50_CORRECT:
+	mes "[Waltboughst]";
+	mes "Yes! That was it!";
+	mes "Since I am dead, I cannot even try!";
+	mes "Eh...?! Ah!";
+	mes "I see, I see now.";
+	mes "I must have been killed by some kind of accident!";
+	set lv4_weapon, 51;
+	next;
+	mes "[Waltboughst]";
+	mes "Okay, I am not going to end this way.";
+	mes "Hey, you were meant to meet me!";
+	mes "You got to do me a favor, now!";
+	next;
+	mes "[Waltboughst]";
+	mes "I will give you the result of my research";
+	mes "in return! All I want is to compete my research,";
+	mes "not the result.";
+	next;
+	mes "[Waltboughst]";
+	mes "Well, give me some time to remember";
+	mes "what I need for my research.";
+	mes "I will talk to you later.";
+	close;
+	
+	
+LV4_52:
+	if(countitem($@LV4_Hammer_Of_Blacksmith) < 2) goto LV4_52_BASE_MAT;
+	if(countitem($@LV4_Emperium_Anvil) < 1) goto LV4_52_BASE_MAT;
+	if(countitem($@LV4_Illusion_Flower) < 1) goto LV4_52_BASE_MAT;
+	if(countitem($@LV4_Gold) < 20) goto LV4_52_BASE_MAT;
+	
+	mes "[Waltboughst]";
+	mes "Oh...you brought everything I need!";
+	mes "You were quick this time...I am still having";
+	mes "a hard time remembering what I need other than those.";
+	mes "This is not good, this is not good at all.";
+	next;
+	mes "[Waltboughst]";
+	mes "Anyways, I will keep those materials for you.";
+	mes "And give me some more times to";
+	mes "remember what I need...arph!";
+	
+	if(countitem($@LV4_Hammer_Of_Blacksmith) < 2) goto LV4_HACK;
+	if(countitem($@LV4_Emperium_Anvil) < 1) goto LV4_HACK;
+	if(countitem($@LV4_Illusion_Flower) < 1) goto LV4_HACK;
+	if(countitem($@LV4_Gold) < 20) goto LV4_HACK;
+	delitem $@LV4_Hammer_Of_Blacksmith, 2;
+	delitem $@LV4_Emperium_Anvil, 1;
+	delitem $@LV4_Illusion_Flower, 1;
+	delitem $@LV4_Gold, 20;
+	set lv4_weapon, 53;
+	close;
+
+LV4_51:
+LV4_52_BASE_MAT:
+	switch( lv4_weapon ) {
+		case 51:
+			mes "[Waltboughst]";
+			mes "Umm, you came back so early.";
+			mes "I just remembered the materials.";
+			next;
+			mes "[Waltboughst]";
+			mes "I need 2 Hammer of Blacksmith,";
+			mes "1 Emperium Anvil, 1 Illusion Flower and 20 Gold...";
+			next;
+			mes "[Waltboughst]";
+			mes "I do need some other items...but I need some time";
+			mes "to remember those. Oh well,";
+			mes "we have enough time, so let me think of them.";
+			set lv4_weapon, 52;
+			break;
+		case 52:
+			mes "[Waltboughst]";
+			mes "I need 2 Hammer of Blacksmith,";
+			mes "1 Emperium Anvil, 1 Illusion Flower and 20 Gold...";
+			mes "Most likey they will be the ones I need...";
+			break;
+		}
+		close;
+		
+
+LV4_54:
+LV4_55:
+	if(countitem(LV4_Gem1) < 30) goto LV4_54_NOGEM;
+	if(countitem(LV4_Gem2) < 30) goto LV4_54_NOGEM;
+	if(countitem(LV4_Gem3) < 30) goto LV4_54_NOGEM;
+	mes "[Waltboughst]";
+	mes "...Um? The items that you brought to me seem";
+	mes "to be good materials for my creation...";
+	mes "Give them to me, I shall try first!";
+	next;
+	mes "[Waltboughst]";
+	mes "Oh...I was right! How did you";
+	mes "know these are materials I need?";
+	mes "Great, give me a moment!";
+	next;
+	mes "[Waltboughst]";
+	mes "...wait, I must test your luck first.";
+	mes "Since I am not sure about the result,";
+	mes "we should trust to luck for the result of my creation.";
+	mes "You must have good luck...";
+	next;
+	mes "[Waltboughst]";
+	mes "We are going to play 'Rock, Paper, Scissors'.";
+	mes "You must win at least 2 out of 3 times.";
+	mes "If you fail, you must leave a large amount";
+	mes "of one material you have brought.";
+	mes "It is for driving away your bad luck.";
+	next;
+	mes "[Waltboughst]";
+	mes "I will give you a piece of paper.";
+	mes "You will write down one among 'Rock, Paper, or Scissors'.";
+	mes "I will do the same at the same time.";
+	mes "We will then compare each other's paper at the end.";
+	next;
+	
+	set @shobu, 0;
+	
+	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {
+		if(@i == 2) mes "[Waltboughst]";
+		if(@i == 2) mes "Let's play the second one!";
+		if(@i == 3) mes "[Waltboughst]";
+		if(@i == 3) mes "This will be the last one!";
+		if(@i == 3) mes "Let's compare after this.";
+		set @npchand[@i], rand(1, 3);
+		switch( select( "Scissors", "Rock", "Paper" ) ) {
+			case 1:
+				set @myhand[@i], 1;
+				if(@npchand[@i] == 3) set @shobu, @shobu + 1;
+				break;
+			case 2:
+				set @myhand[@i], 2;
+				if(@npchand[@i] == 1) set @shobu, @shobu + 1;
+				break;
+			case 3:
+				set @myhand[@i], 3;
+				if(@npchand[@i] == 2) set @shobu, @shobu + 1;
+				break;
+		}
+	}
+		
+	if(countitem(LV4_Gem1) < 30) goto LV4_HACK;
+	if(countitem(LV4_Gem2) < 30) goto LV4_HACK;
+	if(countitem(LV4_Gem3) < 30) goto LV4_HACK;
+
+	if(@shobu > 1) goto LV4_54_WIN;
+
+	switch ( rand(1 ,3) ) {
+		case 1:
+			delitem LV4_Gem1, 30;
+			break;
+		case 2:
+			delitem LV4_Gem2, 30;
+			break;
+		case 3:
+			delitem LV4_Gem3, 30;
+			break;
+	}
+	goto LV4_54_RESULT;
+		
+LV4_54_WIN:
+	delitem LV4_Gem1, 30;
+	delitem LV4_Gem2, 30;
+	delitem LV4_Gem3, 30;
+	set lv4_weapon, lv4_weapon + 2;
+	goto LV4_54_RESULT;
+	
+LV4_54_RESULT:
+	mes "[Waltboughst]";
+	mes "Okay...I played in the order of...";
+	
+	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {
+		if(@npchand[@i] == 1) mes "Scissors";
+		if(@npchand[@i] == 2) mes "Rock";
+		if(@npchand[@i] == 3) mes "Paper";
+	}
+
+	next;
+	mes "[Waltboughst]";
+	mes "You did in the order of...";
+
+	for( set @i, 1; @i <= 3; set @i, @i + 1 ) {
+		if(@myhand[@i] == 1) mes "Scissors";
+		if(@myhand[@i] == 2) mes "Rock";
+		if(@myhand[@i] == 3) mes "Paper";
+	}
+
+	next;
+
+	if(@shobu > 1) goto LV4_54_SAY_WIN;
+	
+	mes "[Waltboughst]";
+	mes "Well well well...you lost the game.";
+	mes "Ah~ you were close though...";
+	mes "We must drive away bad luck.";
+	next;
+	mes "[Waltboughst]";
+	mes "Okay, I will wait here,";
+	mes "go bring me the materials again...";
+	close;
+			
+LV4_54_SAY_WIN:
+	mes "[Waltboughst]";
+	mes "Let's see...";
+	mes "You won total " + @shobu + " times.";
+	mes "Ah~ you must be really good at game!";
+	mes "Yes, your luck is at its highest!";
+	next;
+	mes "[Waltboughst]";
+	mes "I am going to keep my promise.";
+	mes "But I need some time to prepare.";
+	mes "Give me the materials now and I will talk to you later.";
+	close;
+
+LV4_53:
+LV4_54_NOGEM:
+	mes "[Waltboughst]";
+	mes "Arph...I haven't remembered them yet.";
+	mes "Awww....this is a problem.";
+	mes "I must think of them as soon as possible...";
+	close;
+
+
+LV4_56:
+LV4_57:
+	mes "[Waltboughst]";
+	mes "Hehe, I made something with the materials";
+	mes "in this short time! Wanna see?";
+	mes "Aren't you wondering about the result?";
+	mes "Hmmm....let's see...";
+	next;
+	mes "[Waltboughst]";
+	mes "Waltboughst never fails!";
+	mes "Besides you had good luck,";
+	mes "so it resulted in a perfect success!";
+	mes "You got a nice weapon here, it is...";
+	
+	switch( rand(1, 2) ) {
+		case 1:
+			if(lv4_weapon == 56) mes "Byeollungum!";
+			if(lv4_weapon == 56) getitem 1140 ,1; // 1140,Byeollungum
+			if(lv4_weapon == 57) mes "Exorciser!";
+			if(lv4_weapon == 57) getitem 1233, 1; // 1233,Exercise
+			break;
+		case 2:
+			if(lv4_weapon == 56) mes "Combat Knife!";
+			if(lv4_weapon == 56) getitem 1228, 1; // 1228,Combat_Knife
+			if(lv4_weapon == 57) mes "Grand Cross!!";
+			if(lv4_weapon == 57) getitem 1528, 1; // 1528,Grand_Cross
+	}
+	
+	set lv4_weapon, 0;
+	next;
+	mes "[Waltboughst]";
+	mes "I am genius! Hahahaha!";
+	mes "I made it when my brothers could not!";
+	mes "Muhahahahahaha!";
+	mes "Eh...err? Arrr...phhh?";
+	next;
+	mes "[Waltboughst]";
+	mes "Damn...I must try too hard.";
+	mes "My memory is fading again...";
+	mes "Oh well, somehow I proved";
+	mes "that I am a genius even after I died.";
+	next;
+	mes "[Waltboughst]";
+	mes "If you want me to display my genius again,";
+	mes "come retrieve my memory again.";
+	mes "And thank you!";
+	next;
+	mes "[Waltboughst]";
+	mes "Ah...my memory's dying again...";
+	mes "Farewell~ I don't think I will remember you";
+	mes "but I hope you will remember me as Waltboughst";
+	mes "the genius in the age!";
+	close;
+	
+	
+
+//--------------------------------------------------
+//Hack Attempt
+//--------------------------------------------------
+LV4_HACK:
+	mes "[Waltboughst]";
+	mes "Hmm. There seems to be a bit of problem.";
+	set lv4_weapon, 0;
+	logmes "[" +strcharinfo(0) + "] tried to hack LV4 quest.";
+	close;
+}
diff --git a/npc/quests/WIP/4.txt b/npc/quests/WIP/4.txt
index bfe241c31..0f3a31f29 100644
--- a/npc/quests/WIP/4.txt
+++ b/npc/quests/WIP/4.txt
@@ -1,123 +1,123 @@
-airplane.gat,236,63,4    script    Hallen    55,{

-    if (fragmentauest>3) {

-	mes "[Hallen]";

-	mes "Nice weather, isnt it?";

-	close;

-	}

-	if (fragmentauest==2) {

-        if (girls==1) {

-	mes "[Hallen]";

-	mes "Have you finished that trip??";

-	close; 

-        }

-	mes "[Hallen]";

-        mes "Oh, thx hero!Do you like my girls? She's reallybeatiful. Maybe you";

-        mes "shall become her boyfriend?";

-        next;

-        mes "[Hallen]";

-        mes " Its a joke ^_- Never mind.";

-        mes "And you know, there is one thing im really ineterested in....";

-        next;

-	if (airshipquest != 5) {

-            mes "[Hallen]";

-            mes "You should better ask captain about the airship";

-            mes "You cant understand me if you dont do that...";

-            close;

-        };

-        mes "You see its about the airship works. Heart of Ymir...";

-        mes "Very interesting thing i think...";

-        getitem 501,1;

-        set girls,1;

-	next;

-        mes "[Hallen]";

-        mes "I really want to know something about it.. if somebody could help me...";

-        mes "pity I cant go to einbroch Laboratory...";

-        mes "never mind it just my feelings. Thanks for help..";

-        next;

-        if (select("I can do it for you:Sup, guy..") == 1) {

-            mes "[Hallen]";

-            mes "Really??? Thx. I will wait for you";

-        } else {

-            mes "Hallen";

-	    mes "Well, Thanks afterall.";

-        }

-        close;

-    }

-    if (fragmentauest==3) {

-        mes "[Hallen]";

-        mes "Thanks to you now i got it.. What is that Heart of Ymir..";

-        close2;

-        getexp 700,400;

-        set fragmentauest,4;

-        end;

-    }

-    mes "[Hallen]";

-    mes "Hello, "+strcharinfo(0)+". Nice to see you on ship.";

-    mes "Hows your trips? I suppose you have lots of to tell";

-    mes "your children about";

-    disablenpc "Ferlok";

-	next;

-	menu "Ye.. I have lots of tales..",-,"Nothing really interesting",l_inter,"Have any work for me?",l_work;

-        mes "[Hallen]";

-        mes "Ye.. I would like to listen to them too...";

-        mes "But not now. I have some work to do";

-        close;

-    l_inter:

-        mes "[Hallen]";

-        mes "You are really shy to tell us. ^_- It doesnt matter";

-        mes "we all know about your doings.";

-        mes "Glad to see such a hero i can say";

-        close;

-    l_work:

-        mes "[Hallen]";

-        mes "Hm.. let me see... Ye. Its not so important, but if you have some";

-        mes "free time, can you deliver the letter to my cousin Kaci?";

-        next;

-	if (select("yes, of course:no, sory") == 1) {

-            mes "[Hallen]";

-            mes "She can be found near gaming tables under deck. Thank you";

-            getitem 7148,1;

-            set fragmentauest,1;

-        } else {

-            mes "[Hallen]";

-            mes "Its a pity. Good luck in training";

-        }

-        close;

-}

-//=====================================================================

-ein_in01,261,37,4    script    #reader    111,4,4,{

-OnTouch:

-mes "[Code reader]";

-    mes "Enter a valid 3 dig code to get information";

-    mes "You can do it 3 times only. Be careful";

-    next;

-    set @number, rand(100,999);

-    set @count, 0;

-l_input:

-    input @input;

-    if (@input != @number) {

-        mes "[Code reader]";

-        mes "you enter not valid digital";

-        set @count,@count+1;

-        next;

-        if (@count < 3) goto l_input;

-        mes "[Code reader]";

-        mes "You have not enter code correct";

-        close;

-    }

-    mes "[Card reader]";

-    mes "It seems to you that you find the information. You try to learn it";

-    next;

-    enablenpc "Ferlok";

-    mes "[Hallen]";

-    mes "Please leave this plce. I will meet you on airplane";

-    set fragmentauset,3;

-    close;

-    }

-}

-//===========================================================================

-ein_in01,255,33,4    script    Ferlok    55,{

-    mes "[Hallen]";

-    mes "I have already told you to go to plane. Hurry!";

-    close;

+airplane.gat,236,63,4    script    Hallen    55,{
+    if (fragmentauest>3) {
+	mes "[Hallen]";
+	mes "Nice weather, isnt it?";
+	close;
+	}
+	if (fragmentauest==2) {
+        if (girls==1) {
+	mes "[Hallen]";
+	mes "Have you finished that trip??";
+	close; 
+        }
+	mes "[Hallen]";
+        mes "Oh, thx hero!Do you like my girls? She's reallybeatiful. Maybe you";
+        mes "shall become her boyfriend?";
+        next;
+        mes "[Hallen]";
+        mes " Its a joke ^_- Never mind.";
+        mes "And you know, there is one thing im really ineterested in....";
+        next;
+	if (airshipquest != 5) {
+            mes "[Hallen]";
+            mes "You should better ask captain about the airship";
+            mes "You cant understand me if you dont do that...";
+            close;
+        };
+        mes "You see its about the airship works. Heart of Ymir...";
+        mes "Very interesting thing i think...";
+        getitem 501,1;
+        set girls,1;
+	next;
+        mes "[Hallen]";
+        mes "I really want to know something about it.. if somebody could help me...";
+        mes "pity I cant go to einbroch Laboratory...";
+        mes "never mind it just my feelings. Thanks for help..";
+        next;
+        if (select("I can do it for you:Sup, guy..") == 1) {
+            mes "[Hallen]";
+            mes "Really??? Thx. I will wait for you";
+        } else {
+            mes "Hallen";
+	    mes "Well, Thanks afterall.";
+        }
+        close;
+    }
+    if (fragmentauest==3) {
+        mes "[Hallen]";
+        mes "Thanks to you now i got it.. What is that Heart of Ymir..";
+        close2;
+        getexp 700,400;
+        set fragmentauest,4;
+        end;
+    }
+    mes "[Hallen]";
+    mes "Hello, "+strcharinfo(0)+". Nice to see you on ship.";
+    mes "Hows your trips? I suppose you have lots of to tell";
+    mes "your children about";
+    disablenpc "Ferlok";
+	next;
+	menu "Ye.. I have lots of tales..",-,"Nothing really interesting",l_inter,"Have any work for me?",l_work;
+        mes "[Hallen]";
+        mes "Ye.. I would like to listen to them too...";
+        mes "But not now. I have some work to do";
+        close;
+    l_inter:
+        mes "[Hallen]";
+        mes "You are really shy to tell us. ^_- It doesnt matter";
+        mes "we all know about your doings.";
+        mes "Glad to see such a hero i can say";
+        close;
+    l_work:
+        mes "[Hallen]";
+        mes "Hm.. let me see... Ye. Its not so important, but if you have some";
+        mes "free time, can you deliver the letter to my cousin Kaci?";
+        next;
+	if (select("yes, of course:no, sory") == 1) {
+            mes "[Hallen]";
+            mes "She can be found near gaming tables under deck. Thank you";
+            getitem 7148,1;
+            set fragmentauest,1;
+        } else {
+            mes "[Hallen]";
+            mes "Its a pity. Good luck in training";
+        }
+        close;
+}
+//=====================================================================
+ein_in01,261,37,4    script    #reader    111,4,4,{
+OnTouch:
+mes "[Code reader]";
+    mes "Enter a valid 3 dig code to get information";
+    mes "You can do it 3 times only. Be careful";
+    next;
+    set @number, rand(100,999);
+    set @count, 0;
+l_input:
+    input @input;
+    if (@input != @number) {
+        mes "[Code reader]";
+        mes "you enter not valid digital";
+        set @count,@count+1;
+        next;
+        if (@count < 3) goto l_input;
+        mes "[Code reader]";
+        mes "You have not enter code correct";
+        close;
+    }
+    mes "[Card reader]";
+    mes "It seems to you that you find the information. You try to learn it";
+    next;
+    enablenpc "Ferlok";
+    mes "[Hallen]";
+    mes "Please leave this plce. I will meet you on airplane";
+    set fragmentauset,3;
+    close;
+    }
+}
+//===========================================================================
+ein_in01,255,33,4    script    Ferlok    55,{
+    mes "[Hallen]";
+    mes "I have already told you to go to plane. Hurry!";
+    close;
 s}
\ No newline at end of file
diff --git a/npc/quests/WIP/6.txt b/npc/quests/WIP/6.txt
index 46a856da2..c4954b6dc 100644
--- a/npc/quests/WIP/6.txt
+++ b/npc/quests/WIP/6.txt
@@ -1,127 +1,127 @@
 // by CallNix v.0.0
 
-//======================================Juno to Izlude  airship=====================================================================

-airplane_01.gat,238,154,4	script	Captain	854,{

-if (airshipquest==0) {

-mes "[Fayroll]";

-mes "I have nothing to say to you anymore";

-close;

-}

-

-if (airshipquest==3) {

-mes "[Fayroll]";

-mes "Oh, you have finished that work. Great. Now i shall read this letter.";

-mes "Dont interrupt me please";

-delitem 7276,1;

-set airshipquest,4;

-//addtimer 30000,"Captain::OnFinish";  Âîçìîæíî ñäåëàòü òàê. Íî òóò ïî òàéìåðó, à íå ïî êëèêàì íà ÍÏÖ

-close;

-}

-

-if (airshipquest==4) {

-set @k,rand(4);

-if (@k == 2) goto OnFinish;

-mes "[Fayroll]";

-mes "I had not finished the letter yet";

-close;

-}

-

-mes "[Fayroll]";

-mes "Hello, "+strcharinfo(0)+". Nice to see you";

-mes "Anything want from me?";

-next;

-if (select("yes,about airships:no, nothing") == 1) {

-	mes "[Fayroll]";

-	mes "So i think you want to know how airship works";

-	mes "This is the top secret that only a captain will know. Anyway, if you're willing ti help me, I will let you know.";

-	next;

-	menu "I will help you. But what must I do?",-,"No, sorry, I have no time for this.",L_SORRY;

-		mes "[Fayroll]";

-		mes " You see, I have a brother. He is also a captain of airplane in Juno to Lighthalzen airship.";

-		mes "As we are on different ships, i cant communicate with him. Yor is to deliver this letter to him.";

-		mes "If you will do this, I shall tell you the secret.";

-		getitem 7276,1;  //Tarloks letter. Íå íàøåë â áàçå

-		set airshipquest,1;

-} else {

-	mes "[Fayroll]";

-	mes "Then dont interrupt me. I have alot of work to do.";

-	mes "Go to the Casino on ship. And spen some time there";

-}

-close;

-

-L_SORRY:

-mes "[Fayroll]";

-mes "Ye this is bad, but i cant insist on it. Follow your way";

-mes "See you the other day.";

-close;

-

-OnFinish:

-mes "[Fayroll]";

-mes "Whoo... I finally got it.Now i shall tell you the secret.";

-next;

-mes "[Fayroll]";

-mes "The cocept of the flight of airship";

-mes "is the energy produced from the boiler wich push the propeller";

-mes "that moves the giant beauty. Do you understand now?";

-next;

-menu "Is That all???",-;

-mes "[Fayroll]";

-mes "You cant lift this thing up only with steam.";

-mes "thats why the machien ^5566FF'Enchancer'^000000 is used";

-mes "It is working on Heart of Ymir. Thats all the secret. Now go.";

-set airshipquest,0;

-getexp 200000,10000;

-close;

-}

-//=======================================Juno to Lighthalzen airship====================================================================

-airplane.gat,236,163,4	script	Aiplane Captain	855,{

-if (airshipquest == 1) goto L_QUEST;

-if (airshipquest == 2) goto L_FINISH;

-mes "[Dulu]";

-mes "Welcome on the board of ourship. Guess you will have lots of time here";

-close;

-

-L_QUEST:

-mes "[Dulu]";

-mes "Hello, stranger. I am the Airplane Captain of this ship.";

-mes "If you have any problems with our stuff you can simply tell me about this.";

-next;

-if (select("I have letter for you:hmm.. sorry") == 1) {

-	mes "[Dulu]";

-	mes "You have letter for me?? Really??";

-	delitem 7276,1;

-	mes "WOHHOOO! Its from my brother. Thx alot, stranger..";

-	mes "You see, he has borrowed something from me long ago. But unfortunatly he had lost it";

-	mes "and this reallly bed for you...";

-	next;

-	mes "*Dulu shows you a letter*";

-	mes "^5566FF'The one who send you the letter will find it for me. Don't reply to me if he refuses to do so'^000000";

-	next;

-	mes "[Dulu]";

-	mes "So when you accept that work you accept doing this me. Now i shall tell you your work";

-	next;

-	mes "[Dulu]";

-	mes "My brother had lost 2 Will of Darkness and 2 Prickly Fruits";

-	mes "They can simply be dropped on the deck of the ship. Monsters often atack ships. Get this items for me from them.";

-	mes "Now monster are going to atack Juno to Izlude airship. Go there and get what i need";

-	set airshipquest,2;

-	} else {

-	mes "[Dulu]";

-	mes "Well, you know where to find me. See you later";

-}

-close;

-

-L_FINISH:

-if (countitem(7340)<2 && countitem(576)<2) {

-mes "[Dulu]";

-mes "You havent geather items yet";

-close;

-}

-mes "[Dulu]";

-mes "Great work i can say";

-delitem 7340,2;

-delitem 576,2;

-getitem 7276,1;

-set airshipquest,3;

-close;

+//======================================Juno to Izlude  airship=====================================================================
+airplane_01.gat,238,154,4	script	Captain	854,{
+if (airshipquest==0) {
+mes "[Fayroll]";
+mes "I have nothing to say to you anymore";
+close;
+}
+
+if (airshipquest==3) {
+mes "[Fayroll]";
+mes "Oh, you have finished that work. Great. Now i shall read this letter.";
+mes "Dont interrupt me please";
+delitem 7276,1;
+set airshipquest,4;
+//addtimer 30000,"Captain::OnFinish";  Âîçìîæíî ñäåëàòü òàê. Íî òóò ïî òàéìåðó, à íå ïî êëèêàì íà ÍÏÖ
+close;
+}
+
+if (airshipquest==4) {
+set @k,rand(4);
+if (@k == 2) goto OnFinish;
+mes "[Fayroll]";
+mes "I had not finished the letter yet";
+close;
+}
+
+mes "[Fayroll]";
+mes "Hello, "+strcharinfo(0)+". Nice to see you";
+mes "Anything want from me?";
+next;
+if (select("yes,about airships:no, nothing") == 1) {
+	mes "[Fayroll]";
+	mes "So i think you want to know how airship works";
+	mes "This is the top secret that only a captain will know. Anyway, if you're willing ti help me, I will let you know.";
+	next;
+	menu "I will help you. But what must I do?",-,"No, sorry, I have no time for this.",L_SORRY;
+		mes "[Fayroll]";
+		mes " You see, I have a brother. He is also a captain of airplane in Juno to Lighthalzen airship.";
+		mes "As we are on different ships, i cant communicate with him. Yor is to deliver this letter to him.";
+		mes "If you will do this, I shall tell you the secret.";
+		getitem 7276,1;  //Tarloks letter. Íå íàøåë â áàçå
+		set airshipquest,1;
+} else {
+	mes "[Fayroll]";
+	mes "Then dont interrupt me. I have alot of work to do.";
+	mes "Go to the Casino on ship. And spen some time there";
+}
+close;
+
+L_SORRY:
+mes "[Fayroll]";
+mes "Ye this is bad, but i cant insist on it. Follow your way";
+mes "See you the other day.";
+close;
+
+OnFinish:
+mes "[Fayroll]";
+mes "Whoo... I finally got it.Now i shall tell you the secret.";
+next;
+mes "[Fayroll]";
+mes "The cocept of the flight of airship";
+mes "is the energy produced from the boiler wich push the propeller";
+mes "that moves the giant beauty. Do you understand now?";
+next;
+menu "Is That all???",-;
+mes "[Fayroll]";
+mes "You cant lift this thing up only with steam.";
+mes "thats why the machien ^5566FF'Enchancer'^000000 is used";
+mes "It is working on Heart of Ymir. Thats all the secret. Now go.";
+set airshipquest,0;
+getexp 200000,10000;
+close;
+}
+//=======================================Juno to Lighthalzen airship====================================================================
+airplane.gat,236,163,4	script	Aiplane Captain	855,{
+if (airshipquest == 1) goto L_QUEST;
+if (airshipquest == 2) goto L_FINISH;
+mes "[Dulu]";
+mes "Welcome on the board of ourship. Guess you will have lots of time here";
+close;
+
+L_QUEST:
+mes "[Dulu]";
+mes "Hello, stranger. I am the Airplane Captain of this ship.";
+mes "If you have any problems with our stuff you can simply tell me about this.";
+next;
+if (select("I have letter for you:hmm.. sorry") == 1) {
+	mes "[Dulu]";
+	mes "You have letter for me?? Really??";
+	delitem 7276,1;
+	mes "WOHHOOO! Its from my brother. Thx alot, stranger..";
+	mes "You see, he has borrowed something from me long ago. But unfortunatly he had lost it";
+	mes "and this reallly bed for you...";
+	next;
+	mes "*Dulu shows you a letter*";
+	mes "^5566FF'The one who send you the letter will find it for me. Don't reply to me if he refuses to do so'^000000";
+	next;
+	mes "[Dulu]";
+	mes "So when you accept that work you accept doing this me. Now i shall tell you your work";
+	next;
+	mes "[Dulu]";
+	mes "My brother had lost 2 Will of Darkness and 2 Prickly Fruits";
+	mes "They can simply be dropped on the deck of the ship. Monsters often atack ships. Get this items for me from them.";
+	mes "Now monster are going to atack Juno to Izlude airship. Go there and get what i need";
+	set airshipquest,2;
+	} else {
+	mes "[Dulu]";
+	mes "Well, you know where to find me. See you later";
+}
+close;
+
+L_FINISH:
+if (countitem(7340)<2 && countitem(576)<2) {
+mes "[Dulu]";
+mes "You havent geather items yet";
+close;
+}
+mes "[Dulu]";
+mes "Great work i can say";
+delitem 7340,2;
+delitem 576,2;
+getitem 7276,1;
+set airshipquest,3;
+close;
 }
\ No newline at end of file
diff --git a/npc/quests/WIP/airships.txt b/npc/quests/WIP/airships.txt
index b6284bcbd..60930f7d2 100644
--- a/npc/quests/WIP/airships.txt
+++ b/npc/quests/WIP/airships.txt
@@ -1,1138 +1,1138 @@
-//===== eAthena Script ======================================= 

-//= The Airship System Script

-//===== By: ================================================== 

-//= MasterOfMuppets

-//===== Current Version: ===================================== 

-//= 0.5c

-//===== Compatible With: ===================================== 

-//= eAthena SVN 3422+(Requires jA Script System)

-//===== Description: ========================================= 

-//= The Airship System used in the official servers, however this

-//= one is still about 25% custom and is missing some npcs.

-//===== Additional Comments: ================================= 

-//= 0.1 Added first version, it might be a little buggy [MasterOfMuppets]

-//= 0.1a Fixed the Airport Staff#Iz which was [MasterOfMuppets]

-//= 	 warping you to the same location as Airport Staff#Ein

-//= 0.2 Implemented some more airship NPCs, more are to come.

-//= 0.3 Implemented some more NPCs [MasterOfMuppets]

-//= 0.4 Implemented two mini games scripted by Dj-Yhn [MasterOfMuppets]

-//= 0.5 Removed Duplicates [Silent]

-//= 0.5aFixed a typo [Evera] 0.5b Fixed appledice bugs [Lupus]

-//============================================================ 

-

-//============================================================ 

-//= The Airship System (Yuno -> Hugel -> Einbroch -> Lighthalzen -> repeat)

-//============================================================ 

-

-airplane.gat,243,74,4	script	#AirshipWarp-1	45,2,2{

-OnTouch:

-	if($@airplanelocation == 1)warp "einbroch.gat",90,275;

-	if($@airplanelocation == 2)warp "yuno.gat",85,265;

-	if($@airplanelocation == 3)warp "lighthalzen.gat",302,75;

-	if($@airplanelocation == 4)warp "hugel.gat",182,150;

-	end;

-

-OnHide:

-	misceffect 16;

-	end;

-OnUnhide:

-	misceffect 215;

-	end;

-}

-

-airplane.gat,243,29,4	script	#AirshipWarp-2	45,2,2{

-OnTouch:

-	if($@airplanelocation == 1)warp "einbroch.gat",90,275;

-	if($@airplanelocation == 2)warp "yuno.gat",85,265;

-	if($@airplanelocation == 3)warp "lighthalzen.gat",302,75;

-	if($@airplanelocation == 4)warp "hugel.gat",182,150;

-	end;

-

-OnHide:

-	misceffect 16;

-	end;

-OnUnhide:

-	misceffect 215;

-	end;

-}

-

-airplane.gat,1,1,0	script	EinYuno_Airship	-1,{

-OnInit:

-while(1)

-{

-	initnpctimer;

-	setnpctimer 0;

-	set $@airplanelocation,0;

-	donpcevent "#AirshipWarp-1::OnHide";

-	donpcevent "#AirshipWarp-2::OnHide";

-	disablenpc "#AirshipWarp-1";

-	disablenpc "#AirshipWarp-2";

-	mapannounce "airplane.gat","The Airship is leaving the ground. Our next destination is Hugel.",1,0xBA55D3;

-	end;

-OnTimer15000:

-	mapannounce "airplane.gat","We are heading to Hugel.",1,0xBA55D3;

-	end;

-OnTimer30000:

-	mapannounce "airplane.gat","We will arrive in Hugel shortly.",1,0xBA55D3;

-	end;

-OnTimer45000:

-	set $@airplanelocation,4;

-	enablenpc "#AirshipWarp-1";

-	enablenpc "#AirshipWarp-2";

-	donpcevent "#AirshipWarp-1::OnUnhide";

-	donpcevent "#AirshipWarp-2::OnUnhide";	

-	mapannounce "airplane.gat","Welcome to Hugel. Have a safe trip.",1,0xBA55D3;

-	end;

-OnTimer55000:

-	mapannounce "airplane.gat","Currently, we are in Hugel. The Airship will leave shortly.",1,0xBA55D3;

-	end;

-OnTimer65000:

-	set $@airplanelocation,0;

-	donpcevent "#AirshipWarp-1::OnHide";

-	donpcevent "#AirshipWarp-2::OnHide";

-	disablenpc "#AirshipWarp-1";

-	disablenpc "#AirshipWarp-2";

-	mapannounce "airplane.gat","The Airship is leaving the ground. Our next destination is Einbroch.",1,0x00FF00;

-	end;

-OnTimer80000:

-	mapannounce "airplane.gat","We are heading to Einbroch.",1,0x00FF00;

-	end;

-OnTimer95000:

-	mapannounce "airplane.gat","We will arrive in Einbroch shortly.",1,0x00FF00;

-	end;

-OnTimer110000:

-	set $@airplanelocation,1;

-	enablenpc "#AirshipWarp-1";

-	enablenpc "#AirshipWarp-2";

-	donpcevent "#AirshipWarp-1::OnUnhide";

-	donpcevent "#AirshipWarp-2::OnUnhide";

-	mapannounce "airplane.gat","Welcome to Einbroch. Have a safe trip.",1,0x00FF00;

-	end;

-OnTimer120000:

-	mapannounce "airplane.gat","Currently, we are in Einbroch. The Airship will take off shortly.",1,0x00FF00;

-	end;

-OnTimer130000:

-	set $@airplanelocation,0;

-	donpcevent "#AirshipWarp-1::OnHide";

-	donpcevent "#AirshipWarp-2::OnHide";

-	disablenpc "#AirshipWarp-1";

-	disablenpc "#AirshipWarp-2";

-	mapannounce "airplane.gat","The Airship is leaving the ground. Our next destination is Lighthalzen.",1,0xFF8600;

-	end;

-OnTimer145000:

-	mapannounce "airplane.gat","We are heading to Lighthalzen.",1,0xFF8600;

-	end;

-OnTimer160000:

-	mapannounce "airplane.gat","We will arrive in Lighthalzen shortly.",1,0xFF8600;

-	end;

-OnTimer175000:

-	set $@airplanelocation,3;

-	enablenpc "#AirshipWarp-1";

-	enablenpc "#AirshipWarp-2";

-	donpcevent "#AirshipWarp-1::OnUnhide";

-	donpcevent "#AirshipWarp-2::OnUnhide";

-	mapannounce "airplane.gat","Welcome to Lighthalzen. Have a safe trip.",1,0xFF8600;

-	end;

-OnTimer185000:

-	mapannounce "airplane.gat","Currently, we are in Lighthalzen. The Airship will leave shortly.",1,0xFF8600;

-	end;

-OnTimer195000:

-	set $@airplanelocation,0;

-	donpcevent "#AirshipWarp-1::OnHide";

-	donpcevent "#AirshipWarp-2::OnHide";

-	disablenpc "#AirshipWarp-1";

-	disablenpc "#AirshipWarp-2";

-	mapannounce "airplane.gat","The Airship is now taking off. Our next destination is Yuno.",1,0x70DBDB;

-	end;

-OnTimer210000:

-	mapannounce "airplane.gat","We are heading to Yuno.",1,0x70DBDB;

-	end;

-OnTimer225000:

-	mapannounce "airplane.gat","We will arrive in Yuno shortly.",1,0x70DBDB;

-	end;

-OnTimer240000:

-	set $@airplanelocation,2;

-	enablenpc "#AirshipWarp-1";

-	enablenpc "#AirshipWarp-2";

-	donpcevent "#AirshipWarp-1::OnUnhide";

-	donpcevent "#AirshipWarp-2::OnUnhide";

-	mapannounce "airplane.gat","Welcome to Yuno. Have a safe trip.",1,0x70DBDB;

-	end;

-OnTimer250000:

-	mapannounce "airplane.gat","Currently, we are in Yuno. The Airship will leave shortly.",1,0x70DBDB;

-	end;

-OnTimer260000:

-	stoptimer;

-}

-}

-

-//C4644E

-

-//============================================================ 

-//= Some normal NPCS (airplane.gat)

-//============================================================ 

-

-airplane.gat,240,64,5	script	Exit#01::Exit2	857,{

-

-end;

-

-}

-

-airplane.gat,247,64,5	duplicate(Exit2)	Exit#02	857

-

-airplane.gat,240,39,1	duplicate(Exit2)	Exit#03	857

-

-airplane.gat,247,39,1	duplicate(Exit2)	Exit#04	857

-

-airplane.gat,100,69,2	script	Airship Crew#01::Airship Crew	852,{

-

-	mes "[Airship Crew]";

-	mes "If we've landed at";

-	mes "your destination and";

-	mes "you'd like to leave the";

-	mes "Airship, please use the";

-	mes "stairs up ahead. Thank";

-	mes "you for you patronage.";

-	close;

-

-}

-

-airplane.gat,250,59,3	script	Airship Staff::AirshipInfo	67,{

-

-	mes "[Airship Staff]";

-	mes "Welcome";

-	mes "to the Airship.";

-	mes "How may I help you?";

-	next;

-	menu "Using the Airship",s_Use,"Captain's Cabin",s_Capt,"Facilities",s_Faci,"Cancel",-;

-

-	mes "[Airship Staff]";

-	mes "Well, I hope you like";

-	mes "your flight aboard";

-	mes "our Airships. Thank";

-	mes "you and have a good day.";

-	close;

-

-s_Use:

-	mes "[Airship Staff]";

-	mes "When you see a broadcast";

-	mes "announcing that we have";

-	mes "arrived at your destination,";

-	mes "please use one of the exits";

-	mes "located at the north and";

-	mes "south ends of the Airship";

-	next;

-	mes "[Airship Staff]";

-	mes "If you happen to miss";

-	mes "your stop, don't worry.";

-	mes "The airship is constantly";

-	mes "on route and you'll get";

-	mes "another chance to arrive";

-	mes "to your intended destination.";

-	close;

-

-s_Capt:

-	mes "[Airship Staff]";

-	mes "The Captain's Cabin";

-	mes "is located at the front";

-	mes "of the Airship. There, you";

-	mes "can meet the captain and";

-	mes "the pilot of the Airship.";

-	close;

-

-s_Faci:

-	mes "[Airship Staff]";

-	mes "The Airship provides";

-	mes "various Mini Games for";

-	mes "the entertainment of all";

-	mes "our passengers. We invite";

-	mes "you to try your luck and skills";

-	mes "in the Airship's Mini Games~";

-	close;

-

-}

-

-airplane.gat,50,66,4	script	Meltz::AirshipApples	86,{

-

-	mes "[Meltz]";

-	mes "Welcome to Meltz's";

-	mes "Shop where you can";

-	mes "purchase Apples or grind";

-	mes "them to make Apple Juice.";

-	next;

-	menu "Buy Apples",s_Buy,"Make Apple Juice",s_Juice,"Cancel.",-;

-

-s_Cancel:

-	mes "[Meltz]";

-	mes "Thanks for stopping";

-	mes "by my shop. Farewell!";

-	mes "Come back anytime when";

-	mes "you feel like having an";

-	mes "Apple to snack on~";

-	close;

-

-s_Buy:

-	mes "[Meltz]";

-	mes "Please enter the amount";

-	mes "of Apples that you wish to";

-	mes "buy. Each Apple is 15 zeny";

-	mes "and you can buy a maximum";

-	mes "of 500 at a time. Please enter";

-	mes "\"0\" to cancel your order.";

-	next;

-	input @tempapple;

-	if(!@tempapple)goto s_Cancel;

-	if(@tempapple > 0 && @tempapple < 501)goto s_AppleBuy;

-	if(@tempapple < 0)close;

-	mes "[Meltz]";

-	mes "The maximum amount of apples";

-	mes "you can buy at the same time";

-	mes "is 500. " + @tempapple + " is clearly";

-	mes "over 500.";

-	close;

-

-s_AppleBuy:

-	mes "[Meltz]";

-	mes "A total of ^FF0000" + @tempapple + "^000000 Apples.";

-	mes "will cost you ^FF0000" + @tempapple * 15 + "^000000 zeny.";

-	mes "Would you like to continue?";

-	next;

-	menu "Yes",-,"No",s_Cancel;

-

-	if(zeny < (@tempapple * 15))goto s_NEnoughZeny;

-	mes "[Meltz]";

-	mes "Thanks for stopping by";

-	mes "my shop. I hope you enjoy";

-	mes "the flavor of these Apples~!";

-	getitem 512,@tempapple;

-	set zeny,zeny - (@tempapple * 15);

-	close;

-

-s_NEnoughZeny:

-	mes "[Meltz]";

-	mes "I'm sorry buy you don't";

-	mes "seem to have enough zeny.";

-	mes "Come back anytime when";

-	mes "you feel like having an";

-	mes "Apple to snack on~";

-	close;

-

-s_Juice:

-	mes "[Meltz]";

-	mes "Okay, I'll need";

-	mes "^FF00003 Apples and 1 Empty Bottle^000000";

-	mes "to make 1 Apple Juice for you.";

-	mes "Would you like to proceed?";

-	next;

-	menu "Yes",-,"No",s_Cancel;

-

-	if(countitem(512) < 3 || !countitem(713))goto s_Material;

-	mes "[Meltz]";

-	mes "Thank you,";

-	mes "please wait";

-	mes "just a moment.";

-	next;

-	mes "*Grind grind*";

-	mes "*Grind grind*";

-	mes "*Clang...!*";

-	next;

-	mes "[Meltz]";

-	mes "There you go~";

-	mes "I hope you enjoy!";

-	mes "Please feel free to";

-	mes "stop by for your Apple";

-	mes "and Apple Juice needs";

-	mes "at anytime, adventurer~";

-	delitem 512,3;

-	delitem 713,1;

-	getitem 531,1;

-	close;

-

-s_Material:

-	mes "[Meltz]";

-	mes "I'm sorry, but you don't";

-	mes "have enough materials to";

-	mes "create a bottle of Apple Juice.";

-	mes "Remember, I need 3 Apples";

-	mes "and 1 Empty Bottle to do it.";

-	close;

-

-}

-

-

-airplane.gat,33,69,4 script Kaci 73,{

-if fragmentauest==1 {

-mes "[Kaci]";

-mes "Oh.. Thx my dear";

-close2;

-emotion e_kis;

-delitem 7148,1;

-set fragmentauest,2;

-end;

-}

-        callfunc "applegamble","Kaci";

-	end;

-

-	OnLose:

-	emotion e_wah;

-	end;

-

-	OnWin:

-	emotion e_no1;

-	end;

-}

-

-airplane.gat,80,71,4	script	Zerta	834,{

-	mes "[Zerta]";

-	mes "Oh, hello adventurer.";

-	mes "I am currently on a";

-	mes "sacred journey, offering";

-	mes "prayer for the sake of the";

-	mes "Rune-Midgard continent.";

-	close;

-}

-

-airplane.gat,65,63,4	script	Maelin	714,{

-	mes "[Maelin]";

-	mes "Um, this Airship is";

-	mes "to Lutie, isn't it? I've";

-	mes "been waiting so long,";

-	mes "but I haven't heard any";

-	mes "broadcast about Lutie.";

-	close;

-}

-

-airplane.gat,32,61,4	script	Nils::TypingContest	49,{

-

-loopback:

-	mes "[Nils]";

-	mes "Welcome to the";

-	mes "^FF0000RO Typing Challenge^000000.";

-	mes "Would you like to play";

-	mes "a quick typing game?";

-	next;

-	menu "Play ^FF0000RO Typing Challenge^000000",s_Play,"Information",s_Info,"View Top Records",s_Record,"Cancel",-;

-

-	mes "[Nils]";

-	mes "Feel free to take on the";

-	mes "Ro Typing Challenge";

-	mes "anytime. I'll be here~";

-	close;

-

-s_Play:

-	mes "[Nils]";

-	mes "Okay, we have";

-	mes "a new challenger!";

-	mes "Enter the following";

-	mes "text as quickly as you";

-	mes "can without making any";

-	mes "mistakes! Let's start~!";

-	next;

-	//below arrays are for simplified entering of new lines ;P

-	//first lines array

-	setarray $textstringsa$[0],"^00FFFFthkelfkskeldmsiejdlsle^0000FFhfndkelsheidl",

- "^993366hfjdkeldjsieldjs^663366hfjdjeiskdlefvbd",

- "^00FFFFCoboman no chikara-yumei na",

- "^993366belief love luck grimace sweat rush",

- "^00FFFFcallipygian salacious lascivious",

- "^663366uNflAPPaBLe LoVaBLe SeCreTs AnD",

- "^00CCFFburrdingdingdilidingdingphoohudaamb",

- "^FF33CCbarapaphurarlandreamduranbatuhi^990066wooi",

- "^FF33CCLiGhTsPeEd RiGhT SPEed leFT TURn",

- "^00CCFFI'm the King of all Weirdos! Now",

- "^00CCFFBy the power of^000000",

- "^00CCFF...silence. quiet benevolence...";

-	//second lines array

-	setarray $textstringsb$[0],"skemd",

-	"",

-	"chikara-dalookii na chikara da ze!",

-	"folktale rodimus optimus bumblebee",

-	"licentious prurient concupiscent",

-	"BoWLiNg aGaINST tHe KarMA of YoUtH",

-	"andoora^0000FFbambarambambamburanbamding",

-	"kabamturubamdingding",

-	"RiGhT BuRn OrIGInAL GaNgSteR SmACk",

-	"you know of my true power. Obey~!",

-	"p-po-poi-po-poi-poin-poing",

-	"soul mate... wonder. enigma...";

-	//for the few 3-liners... =X

-	setarray $textstringsc$[0],"",

-	"",

-	"COBO ON!",

-	"",

-	"",

-	"",

-	"",

-	"",

-	"",

-	"",

-	"GOD-POING. I NEVER LOSE!",

- "cloud.";

-	//comparisation strings

-	setarray $compstring$[0],"thkelfkskeldmsiejdlslehfndkelsheidlskemd",

-	"hfjdkeldjsieldjshfjdjeiskdlefvbd",

-	"Coboman no chikara-yumei na chikara-dalookii na chikara da ze! COBO ON",

-	"belief love luck grimace sweat rush folktale rodimus optimus bumblebee",

-	"callipygian salacious lascivious licentious prurient concupiscent",

-	"uNflAPPaBLe LoVaBLe SeCreTs AnD BoWLiNg aGaINST tHe KarMA of YoUtH",

-	"burrdindingdilidingdingphoohudaambandoorabambarambambamburanbamding",

-	"barapaphurarlandreamduranbatuhiwooikabamturubamdingding",

-	"LiGhTsPeEd RiGhT SPEed leFT TURn RiGhT BuRn OrIGInAL GaNgSteR SmACk",

-	"I'm the King of all Weirdos! Now you know of my true power. Obey~!",

-	"By the power of p-po-poi-po-poi-poin-poing GOD-POING. I NEVER LOSE!",

-	"...silence. quiet benevolence... soul mate... wonder. enigma... cloud";

-	//lengths

-	setarray $lengths[0],20,32,73,73,65,66,67,55,67,66,67,69;

-	//	initnpctimer;

-	mes "[Nils]";

-	set @index,rand(1,getarraysize($textstringsa$))-1;

-	set @string1a$,$textstringsa$[@index];

-	set @string1b$,$textstringsb$[@index];

-	set @string1c$,$textstringsc$[@index];

-	set @typingstring1$,$compstring$[@index];

-	set @typingkeys,$lengths[@index];

-	set @index2,rand(1,getarraysize($textstringsa$))-1;

-	while (@index2 == @index) {

-		set @index2,rand(1,getarraysize($textstringsa$))-1;

-	}

-	set @string2a$,$textstringsa$[@index2];

-	set @string2b$,$textstringsb$[@index2];

-	set @string2c$,$textstringsc$[@index2];

-	set @typingstring2$,$compstring$[@index2];

-	set @typingkeys,@typingkeys+$lengths[@index2];

-	set @start,gettime(3)*60*60+gettime(2)*60+gettime(1);

- mes @string1a$;

-	if(@string1b$ != "")mes @string1b$;

-	if(@string1c$ != "")mes @string1c$;

-	input @comparisonvar$[1];

-	next;

-	mes "^000000[Nils]";

-	mes @string2a$;

-	if(@string2b$ != "")mes @string2b$;

-	if(@string2c$ != "")mes @string2c$;

-	input @comparisonvar$[2];

-	if(@comparisonvar$[1] == @typingstring1$ && @comparisonvar$[2] == @typingstring2$)set @typingcorrect,1;

-	next;

-	if(!@typingcorrect)goto s_Fail;

-	set @time,(gettime(3)*60*60+gettime(2)*60+gettime(1))-@start; //seconds taken

-	set @mypoints,(@typingkeys * 100) / @time;

-	mes "[Nils]";

-	mes "Your typing time";

-	mes "was ^FF0000" + @time + " seconds^000000";

-	mes "and your score is";

-	mes "^0000FF" + @mypoints + "^000000 points";

-	next;

-	if(@mypoints <= $TypingRecord)goto loopback;

-	mes "[Nils]";

-	mes "Congratulations!";

-	mes "It's a new record.";

-	mes "I'll put you on the high-";

-	mes "score list immediately.";

-	set $TypingRecord,@mypoints;

-	set $TypingRecord$,strcharinfo(0);

-	close;

-

-s_Fail:

-	mes "^000000[Nils]";

-	mes "I'm sorry you didn't type";

-	mes "all characters correctly.";

-	mes "But remember, practice makes";

-	mes "perfect!";

-	close;

-

-s_Info:

-	mes "[Nils]";

-	mes "The RO Typing Challenge";

-	mes "is a game where you enter";

-	mes "the given text as quickly as you";

-	mes "can. The name of the top player";

-	mes "is recorded for posterity. If you";

-	mes "want fame, here's your chance!";

-	next;

-	mes "[Nils]";

-	mes "I'd just like to let";

-	mes "you know that you type";

-	mes "all the text that you see";

-	mes "in the single input line that";

-	mes "you're given. So don't press";

-	mes "the enter key, just click 'OK'.";

-	close;

-

-s_Record:

-	mes "[Nils]";

-	mes "^0000FF" + $TypingRecord$ + "^000000";

-	mes "is the current";

-	mes "record holder with";

-	mes "a record of ^0000FF" + $TypingRecord + "^000000";

-	mes "points. Try to beat";

-	mes "that record next time~";

-	close;

-

-}

-

-//============================================================ 

-//= The Airship System (Yuno -> Izlude -> Repeat)

-//============================================================ 

-

-airplane_01.gat,243,74,4	script	#AirshipWarp-3	45,2,2{

-OnTouch:

-	if($@airplanelocation2 == 1)warp "izlude.gat",202,56;

-	if($@airplanelocation2 == 2)warp "yuno.gat",20,265;

-	end;

-

-OnHide:

-	misceffect 16;

-	end;

-OnUnhide:

-	misceffect 215;

-	end;

-}

-

-airplane_01.gat,243,29,4	script	#AirshipWarp-4	45,2,2{

-OnTouch:

-	if($@airplanelocation2 == 1)warp "izlude.gat",202,56;

-	if($@airplanelocation2 == 2)warp "yuno.gat",20,265;

-

-OnHide:

-	misceffect 16;

-	end;

-OnUnhide:

-	misceffect 215;

-	end;

-}

-

-airplane_01.gat,1,1,0	script	YunoIzl_Airship	-1,{

-OnInit:

-while(1)

-{

-	initnpctimer;

-	setnpctimer 0;

-	set $@airplanelocation2,0;

-	donpcevent "#AirshipWarp-3::OnHide";

-	donpcevent "#AirshipWarp-4::OnHide";

-	disablenpc "#AirshipWarp-3";

-	disablenpc "#AirshipWarp-4";

-	mapannounce "airplane_01.gat","The Airship is leaving the ground. Our next destination is Izlude.",1,0x00FF00;

-	end;

-OnTimer15000:

-	mapannounce "airplane_01.gat","We are heading to Izlude.",1,0x00FF00;

-	end;

-OnTimer30000:

-	mapannounce "airplane_01.gat","We will arrive in Izlude shortly.",1,0x00FF00;

-	end;

-OnTimer45000:

-	set $@airplanelocation2,1;

-	enablenpc "#AirshipWarp-3";

-	enablenpc "#AirshipWarp-4";

-	donpcevent "#AirshipWarp-3::OnUnhide";

-	donpcevent "#AirshipWarp-4::OnUnhide";	

-	mapannounce "airplane_01.gat","Welcome to Izlude. Have a safe trip.",1,0x00FF00;

-	end;

-OnTimer55000:

-	mapannounce "airplane_01.gat","Currently, we are in Izlude. The Airship will leave shortly.",1,0x00FF00;

-	end;

-OnTimer65000:

-	set $@airplanelocation2,0;

-	donpcevent "#AirshipWarp-3::OnHide";

-	donpcevent "#AirshipWarp-4::OnHide";

-	disablenpc "#AirshipWarp-3";

-	disablenpc "#AirshipWarp-4";

-	mapannounce "airplane_01.gat","The Airship is leaving the ground. Our next destination is Yuno.",1,0x70DBDB;

-	end;

-OnTimer80000:

-	mapannounce "airplane_01.gat","We are heading to Yuno.",1,0x70DBDB;

-	end;

-OnTimer95000:

-	mapannounce "airplane_01.gat","We will arrive in Yuno shortly.",1,0x70DBDB;

-	end;

-OnTimer110000:

-	set $@airplanelocation2,2;

-	enablenpc "#AirshipWarp-3";

-	enablenpc "#AirshipWarp-4";

-	donpcevent "#AirshipWarp-3::OnUnhide";

-	donpcevent "#AirshipWarp-4::OnUnhide";

-	mapannounce "airplane_01.gat","Welcome to Yuno. Have a safe trip.",1,0x70DBDB;

-	end;

-OnTimer120000:

-	mapannounce "airplane_01.gat","Currently, we are in Yuno. The Airship will take off shortly.",1,0x70DBDB;

-	end;

-OnTimer130000:

-	stoptimer;

-}

-}

-

-//============================================================ 

-//= Some normal NPCS (airplane_01.gat)

-//============================================================ 

-

-airplane_01.gat,240,64,5	duplicate(Exit2)	Exit#05	857

-

-airplane_01.gat,247,64,5	duplicate(Exit2)	Exit#06	857

-

-airplane_01.gat,240,39,1	duplicate(Exit2)	Exit#07	857

-

-airplane_01.gat,247,39,1	duplicate(Exit2)	Exit#08	857

-

-airplane_01.gat,100,69,2	duplicate(Airship Crew)	Airship Crew#02	852

-

-airplane_01.gat,250,59,3	duplicate(AirshipInfo)	Airship Staff#info	67

-

-airplane_01.gat,50,66,4	duplicate(AirshipApples)	Meltz	86

-

-airplane_01.gat,32,61,4	duplicate(TypingContest)	Nils	49	

-

-airplane_01.gat,83,61,2	script	Girl#10	72,{

-

-	mes "[Dianne]";

-	mes "It's so weird!";

-	mes "I went to visit the";

-	mes "Airship Captain and";

-	mes "all I saw was this";

-	mes "weird reindeer. Oh!";

-	mes "Do you think that...";

-	close;

-

-}

-

-airplane_01.gat,69,63,2	script	Old Man#06	55,{

-

-	mes "[Mendel]";

-	mes "As I expected, the";

-	mes "in-flight meals are";

-	mes "three star quality at best.";

-	mes "^111111*Harrrumph*^000000 I really should";

-	mes "have brought my chef so that";

-	mes "I could enjoy a real meal.";

-	close;

-

-}

-

-airplane_01.gat,33,68,4	script	Clarice	74,{

-	callfunc "applegamble","Clarice";

-	end;

-}

-

-//============================================================ 

-//= The Izlude Airship Staff

-//============================================================

-

-izlude.gat,201,54,3	script	Airship Staff#izl	91,{

-

-	mes "[Airship Staff]";

-	mes "Welcome to the Izlude Airship.";

-	mes "How may I help you?";

-	next;

-	menu "Board the Airship",-,"Cancel",L_Cancel;

-

-		mes "[Airship Staff]";

-		mes "The Airship boarding fee";

-		mes "is 1,200 zeny, but if you've";

-		mes "got a Free Ticket for Airship,"; 

-		mes "the fee will be waived. Will";

-		mes "you board the Airship?";

-		next;

-		menu "Yes",-,"No",L_Cancel;

-

-		if(countitem(7311) > 0) goto L_GotTicket;

-		if(Zeny < 1200) goto L_NoZeny;

-			set Zeny, Zeny - 1200;

-			warp "airplane_01.gat",224,64;

-			close;

-

-		L_GotTicket:

-			delitem 7311,1;

-			warp "airplane_01.gat",224,64;

-			close;

-

-	L_NoZeny:

-		mes "[Airship Staff]";

-		mes "You don't have enough zeny.";

-		close;

-

-	L_Cancel:

-		mes "[Airship Staff]";

-		mes "Thank you and";

-		mes "have a nice day.";

-		close;

-}

-

-//============================================================ 

-//= The Hugel Airship Staff

-//============================================================

-

-hugel.gat,182,150,3	script	Airship Staff#hu	91,{

-

-	mes "[Airship Staff]";

-	mes "Welcome to the Schwartzwald Republic's Airship.";

-	mes "How may I help you?";

-	next;

-	menu "Board the Airship",-,"Cancel",L_Cancel;

-

-		mes "[Airship Staff]";

-		mes "The Airship boarding fee";

-		mes "is 1,200 zeny, but if you've";

-		mes "got a Free Ticket for Airship,"; 

-		mes "the fee will be waived. Will";

-		mes "you board the Airship?";

-		next;

-		menu "Yes",-,"No",L_Cancel;

-

-		if(countitem(7311) > 0) goto L_GotTicket;

-		if(Zeny < 1200) goto L_NoZeny;

-			set Zeny, Zeny - 1200;

-			warp "airplane.gat",224,64;

-			close;

-

-		L_GotTicket:

-			delitem 7311,1;

-			warp "airplane.gat",224,64;

-			close;

-

-	L_NoZeny:

-		mes "[Airship Staff]";

-		mes "You don't have enough zeny.";

-		close;

-

-	L_Cancel:

-		mes "[Airship Staff]";

-		mes "Thank you and";

-		mes "have a nice day.";

-		close;

-}

-

-//============================================================ 

-//= Yuno Airport NPCs

-//============================================================

-

-y_airport.gat,144,63,4	script	Airport Staff#Ein	91,{

-

-	mes "[Airship Staff]";

-	mes "Good day!";

-	mes "Would you like to go";

-	mes "to ^FF0000Einbroch^000000,^FF0000Hugel^000000 or";

-	mes "^FF0000Lighthalzen^000000?";

-	next;

-	menu "Yes.",s_Warp,"No.",-;

-

-	mes "[Airship Staff]";

-	mes "Thank you and";

-	mes "have a nice day.";

-	close;

-

-s_Warp:

-	mes "[Airship Staff]";

-	mes "Thank you and";

-	mes "have a nice day.";

-	close2;

-	warp "yuno.gat",57,240;

-	end;

-

-}

-	

-y_airport.gat,141,63,4	script	Airport Staff#Izl	91,{

-

-	mes "[Airship Staff]";

-	mes "Good day!";

-	mes "Would you like to go";

-	mes "to ^FF0000Izlude^000000?";

-	next;

-	menu "Yes.",s_Warp,"No.",-;

-

-	mes "[Airship Staff]";

-	mes "Thank you and";

-	mes "have a nice day.";

-	close;

-

-s_Warp:

-	mes "[Airship Staff]";

-	mes "Thank you and";

-	mes "have a nice day.";

-	close2;

-	warp "yuno.gat",50,240;

-	end;

-

-}

-

-//============================================================ 

-//= Apple Gambling Function

-//============================================================

-

-function	script	applegamble	{

-	mes "["+getarg(0)+"]";

-	mes "Hi, I'm "+getarg(0)+"~";

-	mes "How would you like";

-	mes "to wager some Apples";

-	mes "in a friendly game of Dice?";

-	next;

-	switch(select("Play Dice Game:Learn Dice Game Rules:Cancel")){

-	case 3:

-		mes "["+getarg(0)+"]";

-		mes "I'm up for a game of";

-		mes "dice whenever you feel";

-		mes "like it. Just talk to me if";

-		mes "you ever get hit with the";

-		mes "sudden urge to gamle, kay?";

-		close;

-	case 2:

-		mes "["+getarg(0)+"]";

-		mes "The rules for the Dice game";

-		mes "are pretty simple. First, you";

-		mes "place a bet by wagering Apples.";

-		mes "You can bet a maximum of 50";

-		mes "Apples at a time. To keep things";

-		mes "legal, I can only accept Apples.";

-		next;

-		mes "["+getarg(0)+"]";

-		mes "But hey, if all that zeny";

-		mes "is burning a hole in your";

-		mes "pocket, head over to Fruitz";

-		mes "and you can buy as many";

-		mes "Apples as you want, playah~";

-		next;

-		mes "["+getarg(0)+"]";

-		mes "Now, we begin with me";

-		mes "rolling wto 6-sided dice.";

-		mes "When it's your turn, you'll";

-		mes "roll two 6-sided dice. After";

-		mes "that, both of us will have the";

-		mes "option of rolling a third die.";

-		next;

-		mes "["+getarg(0)+"]";

-		mes "Now here's the important";

-		mes "thing. If your total is higher";

-		mes "than 12, you'll bust, meaning";

-		mes "that you lose. Otherwise, the";

-		mes "person with the higher total";

-		mes "is the winner. Got it?";

-		next;

-		mes "["+getarg(0)+"]";

-		mes "Now, you'll be the first";

-		mes "to decide whether or not";

-		mes "you'll roll the third die. Then,";

-		mes "depending on your result, I'll";

-		mes "roll my third die... Or maybe not.";

-		next;

-		mes "["+getarg(0)+"]";

-		mes "When you win, you'll";

-		mes "receive twice as many";

-		mes "Apples as you wagered.";

-		mes "But if we happen to tie, you";

-		mes "get the Apples that you bet";

-		mes "returned to you. Fair, right?";

-		close;

-	case 1:

-		break;

-	}

-	mes "["+getarg(0)+"]";

-	mes "Ooh, so you'll play with";

-	mes "me? Great! How many";

-	mes "Apples would you like to bet?";

-	mes "Remember, you can wager";

-	mes "up to 50 Apples. If you'd like";

-	mes "to cancel, please enter '0'.";

-	next;

-L_Input:

-	input @amount;

-	if(@amount == 0) {

-		mes "["+getarg(0)+"]";

-		mes "Changed your mind?";

-		mes "I understand. Well then,";

-		mes "I hope we can play sometime.";

-		close;

-	}

-	if(@amount > 50) set @amount,50;

-	mes "["+getarg(0)+"]";

-	mes "So you'll be";

-	mes "betting ^FF0000"+@amount+"^000000 Apples.";

-	mes "Is that right?";

-	next;

-	if(select("Yes:No")==2){

-		mes "["+getarg(0)+"]";

-		mes "Mm, made a mistake?";

-		mes "Alright, please enter the";

-		mes "number of Apples you";

-		mes "wish to place in this bet";

-		next;

-		goto L_Input;

-	}

-	if(countitem(512)<@amount){

-		//more apples then in inventory

-		//-Improvised-

-		mes "["+getarg(0)+"]";

-		mes "Ooh...";

-		mes "You don't have that";

-		mes "much Apples with you,";

-		mes "now do you?";

-		close;

-	}

-	delitem 512,@amount;

-	mes "["+getarg(0)+"]";

-	mes "Good!";

-	mes "Now we can start";

-	mes "this game! I'll roll first~";

-	next;

-	mes "^0000FF*Rolling and rumbling*";

-	set @table1,rand(1,6);

-	set @table2,rand(1,6);

-	set @tablesub,@table1+@table2;

-	next;

-	mes "I rolled a "+@table1+" and a "+@table2+",";

-	mes "giving me a total of "+@tablesub+".";

-	mes "Now it's your turn,";

-	mes strcharinfo(0)+".";

-	next;

-	menu "Roll Dice.",-;

-

-	mes "^0000FF*Rolling and rumbling*";

-	set @player1,rand(1,6);

-	set @player2,rand(1,6);

-	set @playersub,@player1+@player2;

-	next;

-	mes "["+getarg(0)+"]";

-	mes strcharinfo(0)+",";

-	mes "you rolled a "+@player1+" and a "+@player2+",";

-	mes "giving you a total of ^FF0000"+@playersub+"^000000.";

-	next;

-	mes "["+getarg(0)+"]";

-	if(@playersub == @tablesub) {

-		mes "Well, well, well.";

-		mes "Both of us have a total";

-		mes "of "+@playersub+". Well, the ball's in";

-		mes "your court. Are you going";

-		mes "to roll your third die,";

-		mes strcharinfo(0)+"?";

-	} else if(@playersub > @tablesub) {

-		mes "Since my total is only ^0000FF"+@tablesub+"^000000,";

-		mes "you have the advantage for";

-		mes "now with your total of ^FF0000"+@playersub+"^000000. Do";

-		mes "you wanna roll one more die?";

-		mes "Remember, you'll bust if all three";

-		mes "of your dice total more than 12.";

-	} else if(@tablesub > @playersub) {

-		mes "Since my total is ^0000FF"+@tablesub+"^000000,";

-		mes "I have the advantage for";

-		mes "now with your total of ^FF0000"+@playersub+"^000000. Do";

-		mes "you wanna roll one more die?";

-		mes "Remember, you'll bust if all three";

-		mes "of your dice total more than 12.";

-	}

-	next;

-	if(select("Roll another dice.:Don't Roll.")==2){

-		mes "["+getarg(0)+"]";

-		mes "Not gonna roll, huh?";

-		if(@tablesub == @playersub) {

-			mes "You better hope I roll";

-			mes "too high and bust, or";

-			mes "I'll beat you for sure!";

-			mes "Okay, here goes nothing...";

-			next;

-			goto L_Table3;

-		} else if(@tablesub < @playersub) {

-			next;

-			mes "["+getarg(0)+"]";

-			mes "Alright, I see that you";

-			mes "don't want to risk rolling";

-			mes "higher than 12 and busting.";

-			mes "I'll go ahead and roll then.";

-			next;

-			goto L_Table3;

-		} else if(@tablesub > @playersub) {

-		//you have a lower sub total then table, and do not roll 3th -Improvised-

-			mes "["+getarg(0)+"]";

-			mes "Not gonna roll, huh?";

-			mes "Well, then I'm not";

-			mes "gonna roll either.";

-			next;

-			mes "["+getarg(0)+"]";

-			mes "That means that I";

-			mes "have a total of ^0000FF"+@tablesub+"^000000";

-			mes "wich beats your ^FF0000"+@playersub+"^000000.";

-			mes "I'm sorry, but you lose";

-			mes "this game, "+strcharinfo(0)+". Better";

-			mes "luck next time.";

-		}

-		close;

-	}

-	mes "^0000FF*Rolling and rumbling*";

-	set @player3,rand(1,6);

-	set @playersub,@playersub+@player3;

-	if(@playersub > 12) {

-	//player bust --Improvised--

-		next;

-		mes "["+getarg(0)+"]";

-		mes "Oh my... You rolled a ^FF000"+@player3+"^000000,";

-		mes "making your total ^FF0000"+@playersub+"^000000.";

-		mes "That's more then 12, meaning you bust.";

-		mes "Sorry, but you lose this";

-		mes "game, "+strcharinfo(0)+".";

-		close;

-	}

-	next;

-	mes "["+getarg(0)+"]";

-	mes "Oh hey! You rolled";

-	if(@playersub >= @tablesub) {

-		mes "a ^FF0000"+@player3+"^000000, giving you a total";

-		mes "of ^FF0000"+@playersub+"^000000. Now, if I don't";

-		mes "roll, I'll lose for sure!";

-		mes "I'm gonna go for it...";

-		next;

-		goto L_Table3;

-	} else if(@playersub < @tablesub) {

-		//player's sub together with 3th die is still too low

-		//--Improvised--

-		mes "a ^FF0000"+@player3+"^000000, giving";

-		mes "you a total of ^FF0000"+@playersub+"^000000.";

-		mes "Wich still isn't enough";

-		mes "to beat my ^0000FF"+@tablesub+"^000000.";

-		mes "Sorry, but you lose this";

-		mes "game, "+strcharinfo(0)+". Them's";

-		mes "the breaks, I suppose...";

-		close;

-	}

-L_Table3:

-	mes "^0000FF*Rolling and rumbling*";

-	set @table3,rand(1,6);

-	set @tablesub,@tablesub+@table3;

-	next;

-	if(@tablesub > 12) {

-		mes "["+getarg(0)+"]";

-		mes "Eh? I rolled a ^0000FF"+@table3+"^000000, making";

-		mes "my total ^0000FF"+@tablesub+"^000000. I hate to say";

-		mes "it, but I gambled and lost.";

-		mes "Take your winnings before";

-		mes "I cry, "+strcharinfo(0)+"~!";

-		close2;

-		getitem 512,@amount*2;

-		end;

-	}

-	mes "["+getarg(0)+"]";

-	if(@tablesub < @playersub) {

-		mes "I rolled a "+@table3+", which";

-		mes "gives me a total of ^0000FF"+@tablesub+"^000000.";

-		mes "But... It's still not enough";

-		mes "to beat your ^FF0000"+@playersub+"^000000. It looks";

-		mes "like I can't compete with";

-		mes "you, "+strcharinfo(0)+"...";

-		close2;

-		getitem 512,@amount*2;

-		end;

-	} else if(@tablesub > @playersub) {

-	mes "I rolled a ^0000FF"+@table3+"^000000, giving";

-	mes "me a total of ^0000FF"+@tablesub+"^000000 which";

-	mes "beats your total of ^FF0000"+@playersub+"^000000.";

-	mes "Sorry, but you lose this";

-	mes "game, "+strcharinfo(0)+". Them's";

-	mes "the breaks, I suppose...";

-	close;

-	} else if(@tablesub == @playersub) {

-		//Result = tie, --Improvised--

-		mes "I rolled a ^0000FF"+@table3+"^000000, giving";

-		mes "me a total of ^0000FF"+@tablesub+"^000000, which";

-		mes "is the same as your total.";

-		mes "Well, this game didn't have a";

-		mes "winner or loser, "+strcharinfo(0)+".";

-		close2;

-		getitem 512,@amount;

-		end;

-	}

-}

+//===== eAthena Script ======================================= 
+//= The Airship System Script
+//===== By: ================================================== 
+//= MasterOfMuppets
+//===== Current Version: ===================================== 
+//= 0.5c
+//===== Compatible With: ===================================== 
+//= eAthena SVN 3422+(Requires jA Script System)
+//===== Description: ========================================= 
+//= The Airship System used in the official servers, however this
+//= one is still about 25% custom and is missing some npcs.
+//===== Additional Comments: ================================= 
+//= 0.1 Added first version, it might be a little buggy [MasterOfMuppets]
+//= 0.1a Fixed the Airport Staff#Iz which was [MasterOfMuppets]
+//= 	 warping you to the same location as Airport Staff#Ein
+//= 0.2 Implemented some more airship NPCs, more are to come.
+//= 0.3 Implemented some more NPCs [MasterOfMuppets]
+//= 0.4 Implemented two mini games scripted by Dj-Yhn [MasterOfMuppets]
+//= 0.5 Removed Duplicates [Silent]
+//= 0.5aFixed a typo [Evera] 0.5b Fixed appledice bugs [Lupus]
+//============================================================ 
+
+//============================================================ 
+//= The Airship System (Yuno -> Hugel -> Einbroch -> Lighthalzen -> repeat)
+//============================================================ 
+
+airplane.gat,243,74,4	script	#AirshipWarp-1	45,2,2{
+OnTouch:
+	if($@airplanelocation == 1)warp "einbroch.gat",90,275;
+	if($@airplanelocation == 2)warp "yuno.gat",85,265;
+	if($@airplanelocation == 3)warp "lighthalzen.gat",302,75;
+	if($@airplanelocation == 4)warp "hugel.gat",182,150;
+	end;
+
+OnHide:
+	misceffect 16;
+	end;
+OnUnhide:
+	misceffect 215;
+	end;
+}
+
+airplane.gat,243,29,4	script	#AirshipWarp-2	45,2,2{
+OnTouch:
+	if($@airplanelocation == 1)warp "einbroch.gat",90,275;
+	if($@airplanelocation == 2)warp "yuno.gat",85,265;
+	if($@airplanelocation == 3)warp "lighthalzen.gat",302,75;
+	if($@airplanelocation == 4)warp "hugel.gat",182,150;
+	end;
+
+OnHide:
+	misceffect 16;
+	end;
+OnUnhide:
+	misceffect 215;
+	end;
+}
+
+airplane.gat,1,1,0	script	EinYuno_Airship	-1,{
+OnInit:
+while(1)
+{
+	initnpctimer;
+	setnpctimer 0;
+	set $@airplanelocation,0;
+	donpcevent "#AirshipWarp-1::OnHide";
+	donpcevent "#AirshipWarp-2::OnHide";
+	disablenpc "#AirshipWarp-1";
+	disablenpc "#AirshipWarp-2";
+	mapannounce "airplane.gat","The Airship is leaving the ground. Our next destination is Hugel.",1,0xBA55D3;
+	end;
+OnTimer15000:
+	mapannounce "airplane.gat","We are heading to Hugel.",1,0xBA55D3;
+	end;
+OnTimer30000:
+	mapannounce "airplane.gat","We will arrive in Hugel shortly.",1,0xBA55D3;
+	end;
+OnTimer45000:
+	set $@airplanelocation,4;
+	enablenpc "#AirshipWarp-1";
+	enablenpc "#AirshipWarp-2";
+	donpcevent "#AirshipWarp-1::OnUnhide";
+	donpcevent "#AirshipWarp-2::OnUnhide";	
+	mapannounce "airplane.gat","Welcome to Hugel. Have a safe trip.",1,0xBA55D3;
+	end;
+OnTimer55000:
+	mapannounce "airplane.gat","Currently, we are in Hugel. The Airship will leave shortly.",1,0xBA55D3;
+	end;
+OnTimer65000:
+	set $@airplanelocation,0;
+	donpcevent "#AirshipWarp-1::OnHide";
+	donpcevent "#AirshipWarp-2::OnHide";
+	disablenpc "#AirshipWarp-1";
+	disablenpc "#AirshipWarp-2";
+	mapannounce "airplane.gat","The Airship is leaving the ground. Our next destination is Einbroch.",1,0x00FF00;
+	end;
+OnTimer80000:
+	mapannounce "airplane.gat","We are heading to Einbroch.",1,0x00FF00;
+	end;
+OnTimer95000:
+	mapannounce "airplane.gat","We will arrive in Einbroch shortly.",1,0x00FF00;
+	end;
+OnTimer110000:
+	set $@airplanelocation,1;
+	enablenpc "#AirshipWarp-1";
+	enablenpc "#AirshipWarp-2";
+	donpcevent "#AirshipWarp-1::OnUnhide";
+	donpcevent "#AirshipWarp-2::OnUnhide";
+	mapannounce "airplane.gat","Welcome to Einbroch. Have a safe trip.",1,0x00FF00;
+	end;
+OnTimer120000:
+	mapannounce "airplane.gat","Currently, we are in Einbroch. The Airship will take off shortly.",1,0x00FF00;
+	end;
+OnTimer130000:
+	set $@airplanelocation,0;
+	donpcevent "#AirshipWarp-1::OnHide";
+	donpcevent "#AirshipWarp-2::OnHide";
+	disablenpc "#AirshipWarp-1";
+	disablenpc "#AirshipWarp-2";
+	mapannounce "airplane.gat","The Airship is leaving the ground. Our next destination is Lighthalzen.",1,0xFF8600;
+	end;
+OnTimer145000:
+	mapannounce "airplane.gat","We are heading to Lighthalzen.",1,0xFF8600;
+	end;
+OnTimer160000:
+	mapannounce "airplane.gat","We will arrive in Lighthalzen shortly.",1,0xFF8600;
+	end;
+OnTimer175000:
+	set $@airplanelocation,3;
+	enablenpc "#AirshipWarp-1";
+	enablenpc "#AirshipWarp-2";
+	donpcevent "#AirshipWarp-1::OnUnhide";
+	donpcevent "#AirshipWarp-2::OnUnhide";
+	mapannounce "airplane.gat","Welcome to Lighthalzen. Have a safe trip.",1,0xFF8600;
+	end;
+OnTimer185000:
+	mapannounce "airplane.gat","Currently, we are in Lighthalzen. The Airship will leave shortly.",1,0xFF8600;
+	end;
+OnTimer195000:
+	set $@airplanelocation,0;
+	donpcevent "#AirshipWarp-1::OnHide";
+	donpcevent "#AirshipWarp-2::OnHide";
+	disablenpc "#AirshipWarp-1";
+	disablenpc "#AirshipWarp-2";
+	mapannounce "airplane.gat","The Airship is now taking off. Our next destination is Yuno.",1,0x70DBDB;
+	end;
+OnTimer210000:
+	mapannounce "airplane.gat","We are heading to Yuno.",1,0x70DBDB;
+	end;
+OnTimer225000:
+	mapannounce "airplane.gat","We will arrive in Yuno shortly.",1,0x70DBDB;
+	end;
+OnTimer240000:
+	set $@airplanelocation,2;
+	enablenpc "#AirshipWarp-1";
+	enablenpc "#AirshipWarp-2";
+	donpcevent "#AirshipWarp-1::OnUnhide";
+	donpcevent "#AirshipWarp-2::OnUnhide";
+	mapannounce "airplane.gat","Welcome to Yuno. Have a safe trip.",1,0x70DBDB;
+	end;
+OnTimer250000:
+	mapannounce "airplane.gat","Currently, we are in Yuno. The Airship will leave shortly.",1,0x70DBDB;
+	end;
+OnTimer260000:
+	stoptimer;
+}
+}
+
+//C4644E
+
+//============================================================ 
+//= Some normal NPCS (airplane.gat)
+//============================================================ 
+
+airplane.gat,240,64,5	script	Exit#01::Exit2	857,{
+
+end;
+
+}
+
+airplane.gat,247,64,5	duplicate(Exit2)	Exit#02	857
+
+airplane.gat,240,39,1	duplicate(Exit2)	Exit#03	857
+
+airplane.gat,247,39,1	duplicate(Exit2)	Exit#04	857
+
+airplane.gat,100,69,2	script	Airship Crew#01::Airship Crew	852,{
+
+	mes "[Airship Crew]";
+	mes "If we've landed at";
+	mes "your destination and";
+	mes "you'd like to leave the";
+	mes "Airship, please use the";
+	mes "stairs up ahead. Thank";
+	mes "you for you patronage.";
+	close;
+
+}
+
+airplane.gat,250,59,3	script	Airship Staff::AirshipInfo	67,{
+
+	mes "[Airship Staff]";
+	mes "Welcome";
+	mes "to the Airship.";
+	mes "How may I help you?";
+	next;
+	menu "Using the Airship",s_Use,"Captain's Cabin",s_Capt,"Facilities",s_Faci,"Cancel",-;
+
+	mes "[Airship Staff]";
+	mes "Well, I hope you like";
+	mes "your flight aboard";
+	mes "our Airships. Thank";
+	mes "you and have a good day.";
+	close;
+
+s_Use:
+	mes "[Airship Staff]";
+	mes "When you see a broadcast";
+	mes "announcing that we have";
+	mes "arrived at your destination,";
+	mes "please use one of the exits";
+	mes "located at the north and";
+	mes "south ends of the Airship";
+	next;
+	mes "[Airship Staff]";
+	mes "If you happen to miss";
+	mes "your stop, don't worry.";
+	mes "The airship is constantly";
+	mes "on route and you'll get";
+	mes "another chance to arrive";
+	mes "to your intended destination.";
+	close;
+
+s_Capt:
+	mes "[Airship Staff]";
+	mes "The Captain's Cabin";
+	mes "is located at the front";
+	mes "of the Airship. There, you";
+	mes "can meet the captain and";
+	mes "the pilot of the Airship.";
+	close;
+
+s_Faci:
+	mes "[Airship Staff]";
+	mes "The Airship provides";
+	mes "various Mini Games for";
+	mes "the entertainment of all";
+	mes "our passengers. We invite";
+	mes "you to try your luck and skills";
+	mes "in the Airship's Mini Games~";
+	close;
+
+}
+
+airplane.gat,50,66,4	script	Meltz::AirshipApples	86,{
+
+	mes "[Meltz]";
+	mes "Welcome to Meltz's";
+	mes "Shop where you can";
+	mes "purchase Apples or grind";
+	mes "them to make Apple Juice.";
+	next;
+	menu "Buy Apples",s_Buy,"Make Apple Juice",s_Juice,"Cancel.",-;
+
+s_Cancel:
+	mes "[Meltz]";
+	mes "Thanks for stopping";
+	mes "by my shop. Farewell!";
+	mes "Come back anytime when";
+	mes "you feel like having an";
+	mes "Apple to snack on~";
+	close;
+
+s_Buy:
+	mes "[Meltz]";
+	mes "Please enter the amount";
+	mes "of Apples that you wish to";
+	mes "buy. Each Apple is 15 zeny";
+	mes "and you can buy a maximum";
+	mes "of 500 at a time. Please enter";
+	mes "\"0\" to cancel your order.";
+	next;
+	input @tempapple;
+	if(!@tempapple)goto s_Cancel;
+	if(@tempapple > 0 && @tempapple < 501)goto s_AppleBuy;
+	if(@tempapple < 0)close;
+	mes "[Meltz]";
+	mes "The maximum amount of apples";
+	mes "you can buy at the same time";
+	mes "is 500. " + @tempapple + " is clearly";
+	mes "over 500.";
+	close;
+
+s_AppleBuy:
+	mes "[Meltz]";
+	mes "A total of ^FF0000" + @tempapple + "^000000 Apples.";
+	mes "will cost you ^FF0000" + @tempapple * 15 + "^000000 zeny.";
+	mes "Would you like to continue?";
+	next;
+	menu "Yes",-,"No",s_Cancel;
+
+	if(zeny < (@tempapple * 15))goto s_NEnoughZeny;
+	mes "[Meltz]";
+	mes "Thanks for stopping by";
+	mes "my shop. I hope you enjoy";
+	mes "the flavor of these Apples~!";
+	getitem 512,@tempapple;
+	set zeny,zeny - (@tempapple * 15);
+	close;
+
+s_NEnoughZeny:
+	mes "[Meltz]";
+	mes "I'm sorry buy you don't";
+	mes "seem to have enough zeny.";
+	mes "Come back anytime when";
+	mes "you feel like having an";
+	mes "Apple to snack on~";
+	close;
+
+s_Juice:
+	mes "[Meltz]";
+	mes "Okay, I'll need";
+	mes "^FF00003 Apples and 1 Empty Bottle^000000";
+	mes "to make 1 Apple Juice for you.";
+	mes "Would you like to proceed?";
+	next;
+	menu "Yes",-,"No",s_Cancel;
+
+	if(countitem(512) < 3 || !countitem(713))goto s_Material;
+	mes "[Meltz]";
+	mes "Thank you,";
+	mes "please wait";
+	mes "just a moment.";
+	next;
+	mes "*Grind grind*";
+	mes "*Grind grind*";
+	mes "*Clang...!*";
+	next;
+	mes "[Meltz]";
+	mes "There you go~";
+	mes "I hope you enjoy!";
+	mes "Please feel free to";
+	mes "stop by for your Apple";
+	mes "and Apple Juice needs";
+	mes "at anytime, adventurer~";
+	delitem 512,3;
+	delitem 713,1;
+	getitem 531,1;
+	close;
+
+s_Material:
+	mes "[Meltz]";
+	mes "I'm sorry, but you don't";
+	mes "have enough materials to";
+	mes "create a bottle of Apple Juice.";
+	mes "Remember, I need 3 Apples";
+	mes "and 1 Empty Bottle to do it.";
+	close;
+
+}
+
+
+airplane.gat,33,69,4 script Kaci 73,{
+if fragmentauest==1 {
+mes "[Kaci]";
+mes "Oh.. Thx my dear";
+close2;
+emotion e_kis;
+delitem 7148,1;
+set fragmentauest,2;
+end;
+}
+        callfunc "applegamble","Kaci";
+	end;
+
+	OnLose:
+	emotion e_wah;
+	end;
+
+	OnWin:
+	emotion e_no1;
+	end;
+}
+
+airplane.gat,80,71,4	script	Zerta	834,{
+	mes "[Zerta]";
+	mes "Oh, hello adventurer.";
+	mes "I am currently on a";
+	mes "sacred journey, offering";
+	mes "prayer for the sake of the";
+	mes "Rune-Midgard continent.";
+	close;
+}
+
+airplane.gat,65,63,4	script	Maelin	714,{
+	mes "[Maelin]";
+	mes "Um, this Airship is";
+	mes "to Lutie, isn't it? I've";
+	mes "been waiting so long,";
+	mes "but I haven't heard any";
+	mes "broadcast about Lutie.";
+	close;
+}
+
+airplane.gat,32,61,4	script	Nils::TypingContest	49,{
+
+loopback:
+	mes "[Nils]";
+	mes "Welcome to the";
+	mes "^FF0000RO Typing Challenge^000000.";
+	mes "Would you like to play";
+	mes "a quick typing game?";
+	next;
+	menu "Play ^FF0000RO Typing Challenge^000000",s_Play,"Information",s_Info,"View Top Records",s_Record,"Cancel",-;
+
+	mes "[Nils]";
+	mes "Feel free to take on the";
+	mes "Ro Typing Challenge";
+	mes "anytime. I'll be here~";
+	close;
+
+s_Play:
+	mes "[Nils]";
+	mes "Okay, we have";
+	mes "a new challenger!";
+	mes "Enter the following";
+	mes "text as quickly as you";
+	mes "can without making any";
+	mes "mistakes! Let's start~!";
+	next;
+	//below arrays are for simplified entering of new lines ;P
+	//first lines array
+	setarray $textstringsa$[0],"^00FFFFthkelfkskeldmsiejdlsle^0000FFhfndkelsheidl",
+ "^993366hfjdkeldjsieldjs^663366hfjdjeiskdlefvbd",
+ "^00FFFFCoboman no chikara-yumei na",
+ "^993366belief love luck grimace sweat rush",
+ "^00FFFFcallipygian salacious lascivious",
+ "^663366uNflAPPaBLe LoVaBLe SeCreTs AnD",
+ "^00CCFFburrdingdingdilidingdingphoohudaamb",
+ "^FF33CCbarapaphurarlandreamduranbatuhi^990066wooi",
+ "^FF33CCLiGhTsPeEd RiGhT SPEed leFT TURn",
+ "^00CCFFI'm the King of all Weirdos! Now",
+ "^00CCFFBy the power of^000000",
+ "^00CCFF...silence. quiet benevolence...";
+	//second lines array
+	setarray $textstringsb$[0],"skemd",
+	"",
+	"chikara-dalookii na chikara da ze!",
+	"folktale rodimus optimus bumblebee",
+	"licentious prurient concupiscent",
+	"BoWLiNg aGaINST tHe KarMA of YoUtH",
+	"andoora^0000FFbambarambambamburanbamding",
+	"kabamturubamdingding",
+	"RiGhT BuRn OrIGInAL GaNgSteR SmACk",
+	"you know of my true power. Obey~!",
+	"p-po-poi-po-poi-poin-poing",
+	"soul mate... wonder. enigma...";
+	//for the few 3-liners... =X
+	setarray $textstringsc$[0],"",
+	"",
+	"COBO ON!",
+	"",
+	"",
+	"",
+	"",
+	"",
+	"",
+	"",
+	"GOD-POING. I NEVER LOSE!",
+ "cloud.";
+	//comparisation strings
+	setarray $compstring$[0],"thkelfkskeldmsiejdlslehfndkelsheidlskemd",
+	"hfjdkeldjsieldjshfjdjeiskdlefvbd",
+	"Coboman no chikara-yumei na chikara-dalookii na chikara da ze! COBO ON",
+	"belief love luck grimace sweat rush folktale rodimus optimus bumblebee",
+	"callipygian salacious lascivious licentious prurient concupiscent",
+	"uNflAPPaBLe LoVaBLe SeCreTs AnD BoWLiNg aGaINST tHe KarMA of YoUtH",
+	"burrdindingdilidingdingphoohudaambandoorabambarambambamburanbamding",
+	"barapaphurarlandreamduranbatuhiwooikabamturubamdingding",
+	"LiGhTsPeEd RiGhT SPEed leFT TURn RiGhT BuRn OrIGInAL GaNgSteR SmACk",
+	"I'm the King of all Weirdos! Now you know of my true power. Obey~!",
+	"By the power of p-po-poi-po-poi-poin-poing GOD-POING. I NEVER LOSE!",
+	"...silence. quiet benevolence... soul mate... wonder. enigma... cloud";
+	//lengths
+	setarray $lengths[0],20,32,73,73,65,66,67,55,67,66,67,69;
+	//	initnpctimer;
+	mes "[Nils]";
+	set @index,rand(1,getarraysize($textstringsa$))-1;
+	set @string1a$,$textstringsa$[@index];
+	set @string1b$,$textstringsb$[@index];
+	set @string1c$,$textstringsc$[@index];
+	set @typingstring1$,$compstring$[@index];
+	set @typingkeys,$lengths[@index];
+	set @index2,rand(1,getarraysize($textstringsa$))-1;
+	while (@index2 == @index) {
+		set @index2,rand(1,getarraysize($textstringsa$))-1;
+	}
+	set @string2a$,$textstringsa$[@index2];
+	set @string2b$,$textstringsb$[@index2];
+	set @string2c$,$textstringsc$[@index2];
+	set @typingstring2$,$compstring$[@index2];
+	set @typingkeys,@typingkeys+$lengths[@index2];
+	set @start,gettime(3)*60*60+gettime(2)*60+gettime(1);
+ mes @string1a$;
+	if(@string1b$ != "")mes @string1b$;
+	if(@string1c$ != "")mes @string1c$;
+	input @comparisonvar$[1];
+	next;
+	mes "^000000[Nils]";
+	mes @string2a$;
+	if(@string2b$ != "")mes @string2b$;
+	if(@string2c$ != "")mes @string2c$;
+	input @comparisonvar$[2];
+	if(@comparisonvar$[1] == @typingstring1$ && @comparisonvar$[2] == @typingstring2$)set @typingcorrect,1;
+	next;
+	if(!@typingcorrect)goto s_Fail;
+	set @time,(gettime(3)*60*60+gettime(2)*60+gettime(1))-@start; //seconds taken
+	set @mypoints,(@typingkeys * 100) / @time;
+	mes "[Nils]";
+	mes "Your typing time";
+	mes "was ^FF0000" + @time + " seconds^000000";
+	mes "and your score is";
+	mes "^0000FF" + @mypoints + "^000000 points";
+	next;
+	if(@mypoints <= $TypingRecord)goto loopback;
+	mes "[Nils]";
+	mes "Congratulations!";
+	mes "It's a new record.";
+	mes "I'll put you on the high-";
+	mes "score list immediately.";
+	set $TypingRecord,@mypoints;
+	set $TypingRecord$,strcharinfo(0);
+	close;
+
+s_Fail:
+	mes "^000000[Nils]";
+	mes "I'm sorry you didn't type";
+	mes "all characters correctly.";
+	mes "But remember, practice makes";
+	mes "perfect!";
+	close;
+
+s_Info:
+	mes "[Nils]";
+	mes "The RO Typing Challenge";
+	mes "is a game where you enter";
+	mes "the given text as quickly as you";
+	mes "can. The name of the top player";
+	mes "is recorded for posterity. If you";
+	mes "want fame, here's your chance!";
+	next;
+	mes "[Nils]";
+	mes "I'd just like to let";
+	mes "you know that you type";
+	mes "all the text that you see";
+	mes "in the single input line that";
+	mes "you're given. So don't press";
+	mes "the enter key, just click 'OK'.";
+	close;
+
+s_Record:
+	mes "[Nils]";
+	mes "^0000FF" + $TypingRecord$ + "^000000";
+	mes "is the current";
+	mes "record holder with";
+	mes "a record of ^0000FF" + $TypingRecord + "^000000";
+	mes "points. Try to beat";
+	mes "that record next time~";
+	close;
+
+}
+
+//============================================================ 
+//= The Airship System (Yuno -> Izlude -> Repeat)
+//============================================================ 
+
+airplane_01.gat,243,74,4	script	#AirshipWarp-3	45,2,2{
+OnTouch:
+	if($@airplanelocation2 == 1)warp "izlude.gat",202,56;
+	if($@airplanelocation2 == 2)warp "yuno.gat",20,265;
+	end;
+
+OnHide:
+	misceffect 16;
+	end;
+OnUnhide:
+	misceffect 215;
+	end;
+}
+
+airplane_01.gat,243,29,4	script	#AirshipWarp-4	45,2,2{
+OnTouch:
+	if($@airplanelocation2 == 1)warp "izlude.gat",202,56;
+	if($@airplanelocation2 == 2)warp "yuno.gat",20,265;
+
+OnHide:
+	misceffect 16;
+	end;
+OnUnhide:
+	misceffect 215;
+	end;
+}
+
+airplane_01.gat,1,1,0	script	YunoIzl_Airship	-1,{
+OnInit:
+while(1)
+{
+	initnpctimer;
+	setnpctimer 0;
+	set $@airplanelocation2,0;
+	donpcevent "#AirshipWarp-3::OnHide";
+	donpcevent "#AirshipWarp-4::OnHide";
+	disablenpc "#AirshipWarp-3";
+	disablenpc "#AirshipWarp-4";
+	mapannounce "airplane_01.gat","The Airship is leaving the ground. Our next destination is Izlude.",1,0x00FF00;
+	end;
+OnTimer15000:
+	mapannounce "airplane_01.gat","We are heading to Izlude.",1,0x00FF00;
+	end;
+OnTimer30000:
+	mapannounce "airplane_01.gat","We will arrive in Izlude shortly.",1,0x00FF00;
+	end;
+OnTimer45000:
+	set $@airplanelocation2,1;
+	enablenpc "#AirshipWarp-3";
+	enablenpc "#AirshipWarp-4";
+	donpcevent "#AirshipWarp-3::OnUnhide";
+	donpcevent "#AirshipWarp-4::OnUnhide";	
+	mapannounce "airplane_01.gat","Welcome to Izlude. Have a safe trip.",1,0x00FF00;
+	end;
+OnTimer55000:
+	mapannounce "airplane_01.gat","Currently, we are in Izlude. The Airship will leave shortly.",1,0x00FF00;
+	end;
+OnTimer65000:
+	set $@airplanelocation2,0;
+	donpcevent "#AirshipWarp-3::OnHide";
+	donpcevent "#AirshipWarp-4::OnHide";
+	disablenpc "#AirshipWarp-3";
+	disablenpc "#AirshipWarp-4";
+	mapannounce "airplane_01.gat","The Airship is leaving the ground. Our next destination is Yuno.",1,0x70DBDB;
+	end;
+OnTimer80000:
+	mapannounce "airplane_01.gat","We are heading to Yuno.",1,0x70DBDB;
+	end;
+OnTimer95000:
+	mapannounce "airplane_01.gat","We will arrive in Yuno shortly.",1,0x70DBDB;
+	end;
+OnTimer110000:
+	set $@airplanelocation2,2;
+	enablenpc "#AirshipWarp-3";
+	enablenpc "#AirshipWarp-4";
+	donpcevent "#AirshipWarp-3::OnUnhide";
+	donpcevent "#AirshipWarp-4::OnUnhide";
+	mapannounce "airplane_01.gat","Welcome to Yuno. Have a safe trip.",1,0x70DBDB;
+	end;
+OnTimer120000:
+	mapannounce "airplane_01.gat","Currently, we are in Yuno. The Airship will take off shortly.",1,0x70DBDB;
+	end;
+OnTimer130000:
+	stoptimer;
+}
+}
+
+//============================================================ 
+//= Some normal NPCS (airplane_01.gat)
+//============================================================ 
+
+airplane_01.gat,240,64,5	duplicate(Exit2)	Exit#05	857
+
+airplane_01.gat,247,64,5	duplicate(Exit2)	Exit#06	857
+
+airplane_01.gat,240,39,1	duplicate(Exit2)	Exit#07	857
+
+airplane_01.gat,247,39,1	duplicate(Exit2)	Exit#08	857
+
+airplane_01.gat,100,69,2	duplicate(Airship Crew)	Airship Crew#02	852
+
+airplane_01.gat,250,59,3	duplicate(AirshipInfo)	Airship Staff#info	67
+
+airplane_01.gat,50,66,4	duplicate(AirshipApples)	Meltz	86
+
+airplane_01.gat,32,61,4	duplicate(TypingContest)	Nils	49	
+
+airplane_01.gat,83,61,2	script	Girl#10	72,{
+
+	mes "[Dianne]";
+	mes "It's so weird!";
+	mes "I went to visit the";
+	mes "Airship Captain and";
+	mes "all I saw was this";
+	mes "weird reindeer. Oh!";
+	mes "Do you think that...";
+	close;
+
+}
+
+airplane_01.gat,69,63,2	script	Old Man#06	55,{
+
+	mes "[Mendel]";
+	mes "As I expected, the";
+	mes "in-flight meals are";
+	mes "three star quality at best.";
+	mes "^111111*Harrrumph*^000000 I really should";
+	mes "have brought my chef so that";
+	mes "I could enjoy a real meal.";
+	close;
+
+}
+
+airplane_01.gat,33,68,4	script	Clarice	74,{
+	callfunc "applegamble","Clarice";
+	end;
+}
+
+//============================================================ 
+//= The Izlude Airship Staff
+//============================================================
+
+izlude.gat,201,54,3	script	Airship Staff#izl	91,{
+
+	mes "[Airship Staff]";
+	mes "Welcome to the Izlude Airship.";
+	mes "How may I help you?";
+	next;
+	menu "Board the Airship",-,"Cancel",L_Cancel;
+
+		mes "[Airship Staff]";
+		mes "The Airship boarding fee";
+		mes "is 1,200 zeny, but if you've";
+		mes "got a Free Ticket for Airship,"; 
+		mes "the fee will be waived. Will";
+		mes "you board the Airship?";
+		next;
+		menu "Yes",-,"No",L_Cancel;
+
+		if(countitem(7311) > 0) goto L_GotTicket;
+		if(Zeny < 1200) goto L_NoZeny;
+			set Zeny, Zeny - 1200;
+			warp "airplane_01.gat",224,64;
+			close;
+
+		L_GotTicket:
+			delitem 7311,1;
+			warp "airplane_01.gat",224,64;
+			close;
+
+	L_NoZeny:
+		mes "[Airship Staff]";
+		mes "You don't have enough zeny.";
+		close;
+
+	L_Cancel:
+		mes "[Airship Staff]";
+		mes "Thank you and";
+		mes "have a nice day.";
+		close;
+}
+
+//============================================================ 
+//= The Hugel Airship Staff
+//============================================================
+
+hugel.gat,182,150,3	script	Airship Staff#hu	91,{
+
+	mes "[Airship Staff]";
+	mes "Welcome to the Schwartzwald Republic's Airship.";
+	mes "How may I help you?";
+	next;
+	menu "Board the Airship",-,"Cancel",L_Cancel;
+
+		mes "[Airship Staff]";
+		mes "The Airship boarding fee";
+		mes "is 1,200 zeny, but if you've";
+		mes "got a Free Ticket for Airship,"; 
+		mes "the fee will be waived. Will";
+		mes "you board the Airship?";
+		next;
+		menu "Yes",-,"No",L_Cancel;
+
+		if(countitem(7311) > 0) goto L_GotTicket;
+		if(Zeny < 1200) goto L_NoZeny;
+			set Zeny, Zeny - 1200;
+			warp "airplane.gat",224,64;
+			close;
+
+		L_GotTicket:
+			delitem 7311,1;
+			warp "airplane.gat",224,64;
+			close;
+
+	L_NoZeny:
+		mes "[Airship Staff]";
+		mes "You don't have enough zeny.";
+		close;
+
+	L_Cancel:
+		mes "[Airship Staff]";
+		mes "Thank you and";
+		mes "have a nice day.";
+		close;
+}
+
+//============================================================ 
+//= Yuno Airport NPCs
+//============================================================
+
+y_airport.gat,144,63,4	script	Airport Staff#Ein	91,{
+
+	mes "[Airship Staff]";
+	mes "Good day!";
+	mes "Would you like to go";
+	mes "to ^FF0000Einbroch^000000,^FF0000Hugel^000000 or";
+	mes "^FF0000Lighthalzen^000000?";
+	next;
+	menu "Yes.",s_Warp,"No.",-;
+
+	mes "[Airship Staff]";
+	mes "Thank you and";
+	mes "have a nice day.";
+	close;
+
+s_Warp:
+	mes "[Airship Staff]";
+	mes "Thank you and";
+	mes "have a nice day.";
+	close2;
+	warp "yuno.gat",57,240;
+	end;
+
+}
+	
+y_airport.gat,141,63,4	script	Airport Staff#Izl	91,{
+
+	mes "[Airship Staff]";
+	mes "Good day!";
+	mes "Would you like to go";
+	mes "to ^FF0000Izlude^000000?";
+	next;
+	menu "Yes.",s_Warp,"No.",-;
+
+	mes "[Airship Staff]";
+	mes "Thank you and";
+	mes "have a nice day.";
+	close;
+
+s_Warp:
+	mes "[Airship Staff]";
+	mes "Thank you and";
+	mes "have a nice day.";
+	close2;
+	warp "yuno.gat",50,240;
+	end;
+
+}
+
+//============================================================ 
+//= Apple Gambling Function
+//============================================================
+
+function	script	applegamble	{
+	mes "["+getarg(0)+"]";
+	mes "Hi, I'm "+getarg(0)+"~";
+	mes "How would you like";
+	mes "to wager some Apples";
+	mes "in a friendly game of Dice?";
+	next;
+	switch(select("Play Dice Game:Learn Dice Game Rules:Cancel")){
+	case 3:
+		mes "["+getarg(0)+"]";
+		mes "I'm up for a game of";
+		mes "dice whenever you feel";
+		mes "like it. Just talk to me if";
+		mes "you ever get hit with the";
+		mes "sudden urge to gamle, kay?";
+		close;
+	case 2:
+		mes "["+getarg(0)+"]";
+		mes "The rules for the Dice game";
+		mes "are pretty simple. First, you";
+		mes "place a bet by wagering Apples.";
+		mes "You can bet a maximum of 50";
+		mes "Apples at a time. To keep things";
+		mes "legal, I can only accept Apples.";
+		next;
+		mes "["+getarg(0)+"]";
+		mes "But hey, if all that zeny";
+		mes "is burning a hole in your";
+		mes "pocket, head over to Fruitz";
+		mes "and you can buy as many";
+		mes "Apples as you want, playah~";
+		next;
+		mes "["+getarg(0)+"]";
+		mes "Now, we begin with me";
+		mes "rolling wto 6-sided dice.";
+		mes "When it's your turn, you'll";
+		mes "roll two 6-sided dice. After";
+		mes "that, both of us will have the";
+		mes "option of rolling a third die.";
+		next;
+		mes "["+getarg(0)+"]";
+		mes "Now here's the important";
+		mes "thing. If your total is higher";
+		mes "than 12, you'll bust, meaning";
+		mes "that you lose. Otherwise, the";
+		mes "person with the higher total";
+		mes "is the winner. Got it?";
+		next;
+		mes "["+getarg(0)+"]";
+		mes "Now, you'll be the first";
+		mes "to decide whether or not";
+		mes "you'll roll the third die. Then,";
+		mes "depending on your result, I'll";
+		mes "roll my third die... Or maybe not.";
+		next;
+		mes "["+getarg(0)+"]";
+		mes "When you win, you'll";
+		mes "receive twice as many";
+		mes "Apples as you wagered.";
+		mes "But if we happen to tie, you";
+		mes "get the Apples that you bet";
+		mes "returned to you. Fair, right?";
+		close;
+	case 1:
+		break;
+	}
+	mes "["+getarg(0)+"]";
+	mes "Ooh, so you'll play with";
+	mes "me? Great! How many";
+	mes "Apples would you like to bet?";
+	mes "Remember, you can wager";
+	mes "up to 50 Apples. If you'd like";
+	mes "to cancel, please enter '0'.";
+	next;
+L_Input:
+	input @amount;
+	if(@amount == 0) {
+		mes "["+getarg(0)+"]";
+		mes "Changed your mind?";
+		mes "I understand. Well then,";
+		mes "I hope we can play sometime.";
+		close;
+	}
+	if(@amount > 50) set @amount,50;
+	mes "["+getarg(0)+"]";
+	mes "So you'll be";
+	mes "betting ^FF0000"+@amount+"^000000 Apples.";
+	mes "Is that right?";
+	next;
+	if(select("Yes:No")==2){
+		mes "["+getarg(0)+"]";
+		mes "Mm, made a mistake?";
+		mes "Alright, please enter the";
+		mes "number of Apples you";
+		mes "wish to place in this bet";
+		next;
+		goto L_Input;
+	}
+	if(countitem(512)<@amount){
+		//more apples then in inventory
+		//-Improvised-
+		mes "["+getarg(0)+"]";
+		mes "Ooh...";
+		mes "You don't have that";
+		mes "much Apples with you,";
+		mes "now do you?";
+		close;
+	}
+	delitem 512,@amount;
+	mes "["+getarg(0)+"]";
+	mes "Good!";
+	mes "Now we can start";
+	mes "this game! I'll roll first~";
+	next;
+	mes "^0000FF*Rolling and rumbling*";
+	set @table1,rand(1,6);
+	set @table2,rand(1,6);
+	set @tablesub,@table1+@table2;
+	next;
+	mes "I rolled a "+@table1+" and a "+@table2+",";
+	mes "giving me a total of "+@tablesub+".";
+	mes "Now it's your turn,";
+	mes strcharinfo(0)+".";
+	next;
+	menu "Roll Dice.",-;
+
+	mes "^0000FF*Rolling and rumbling*";
+	set @player1,rand(1,6);
+	set @player2,rand(1,6);
+	set @playersub,@player1+@player2;
+	next;
+	mes "["+getarg(0)+"]";
+	mes strcharinfo(0)+",";
+	mes "you rolled a "+@player1+" and a "+@player2+",";
+	mes "giving you a total of ^FF0000"+@playersub+"^000000.";
+	next;
+	mes "["+getarg(0)+"]";
+	if(@playersub == @tablesub) {
+		mes "Well, well, well.";
+		mes "Both of us have a total";
+		mes "of "+@playersub+". Well, the ball's in";
+		mes "your court. Are you going";
+		mes "to roll your third die,";
+		mes strcharinfo(0)+"?";
+	} else if(@playersub > @tablesub) {
+		mes "Since my total is only ^0000FF"+@tablesub+"^000000,";
+		mes "you have the advantage for";
+		mes "now with your total of ^FF0000"+@playersub+"^000000. Do";
+		mes "you wanna roll one more die?";
+		mes "Remember, you'll bust if all three";
+		mes "of your dice total more than 12.";
+	} else if(@tablesub > @playersub) {
+		mes "Since my total is ^0000FF"+@tablesub+"^000000,";
+		mes "I have the advantage for";
+		mes "now with your total of ^FF0000"+@playersub+"^000000. Do";
+		mes "you wanna roll one more die?";
+		mes "Remember, you'll bust if all three";
+		mes "of your dice total more than 12.";
+	}
+	next;
+	if(select("Roll another dice.:Don't Roll.")==2){
+		mes "["+getarg(0)+"]";
+		mes "Not gonna roll, huh?";
+		if(@tablesub == @playersub) {
+			mes "You better hope I roll";
+			mes "too high and bust, or";
+			mes "I'll beat you for sure!";
+			mes "Okay, here goes nothing...";
+			next;
+			goto L_Table3;
+		} else if(@tablesub < @playersub) {
+			next;
+			mes "["+getarg(0)+"]";
+			mes "Alright, I see that you";
+			mes "don't want to risk rolling";
+			mes "higher than 12 and busting.";
+			mes "I'll go ahead and roll then.";
+			next;
+			goto L_Table3;
+		} else if(@tablesub > @playersub) {
+		//you have a lower sub total then table, and do not roll 3th -Improvised-
+			mes "["+getarg(0)+"]";
+			mes "Not gonna roll, huh?";
+			mes "Well, then I'm not";
+			mes "gonna roll either.";
+			next;
+			mes "["+getarg(0)+"]";
+			mes "That means that I";
+			mes "have a total of ^0000FF"+@tablesub+"^000000";
+			mes "wich beats your ^FF0000"+@playersub+"^000000.";
+			mes "I'm sorry, but you lose";
+			mes "this game, "+strcharinfo(0)+". Better";
+			mes "luck next time.";
+		}
+		close;
+	}
+	mes "^0000FF*Rolling and rumbling*";
+	set @player3,rand(1,6);
+	set @playersub,@playersub+@player3;
+	if(@playersub > 12) {
+	//player bust --Improvised--
+		next;
+		mes "["+getarg(0)+"]";
+		mes "Oh my... You rolled a ^FF000"+@player3+"^000000,";
+		mes "making your total ^FF0000"+@playersub+"^000000.";
+		mes "That's more then 12, meaning you bust.";
+		mes "Sorry, but you lose this";
+		mes "game, "+strcharinfo(0)+".";
+		close;
+	}
+	next;
+	mes "["+getarg(0)+"]";
+	mes "Oh hey! You rolled";
+	if(@playersub >= @tablesub) {
+		mes "a ^FF0000"+@player3+"^000000, giving you a total";
+		mes "of ^FF0000"+@playersub+"^000000. Now, if I don't";
+		mes "roll, I'll lose for sure!";
+		mes "I'm gonna go for it...";
+		next;
+		goto L_Table3;
+	} else if(@playersub < @tablesub) {
+		//player's sub together with 3th die is still too low
+		//--Improvised--
+		mes "a ^FF0000"+@player3+"^000000, giving";
+		mes "you a total of ^FF0000"+@playersub+"^000000.";
+		mes "Wich still isn't enough";
+		mes "to beat my ^0000FF"+@tablesub+"^000000.";
+		mes "Sorry, but you lose this";
+		mes "game, "+strcharinfo(0)+". Them's";
+		mes "the breaks, I suppose...";
+		close;
+	}
+L_Table3:
+	mes "^0000FF*Rolling and rumbling*";
+	set @table3,rand(1,6);
+	set @tablesub,@tablesub+@table3;
+	next;
+	if(@tablesub > 12) {
+		mes "["+getarg(0)+"]";
+		mes "Eh? I rolled a ^0000FF"+@table3+"^000000, making";
+		mes "my total ^0000FF"+@tablesub+"^000000. I hate to say";
+		mes "it, but I gambled and lost.";
+		mes "Take your winnings before";
+		mes "I cry, "+strcharinfo(0)+"~!";
+		close2;
+		getitem 512,@amount*2;
+		end;
+	}
+	mes "["+getarg(0)+"]";
+	if(@tablesub < @playersub) {
+		mes "I rolled a "+@table3+", which";
+		mes "gives me a total of ^0000FF"+@tablesub+"^000000.";
+		mes "But... It's still not enough";
+		mes "to beat your ^FF0000"+@playersub+"^000000. It looks";
+		mes "like I can't compete with";
+		mes "you, "+strcharinfo(0)+"...";
+		close2;
+		getitem 512,@amount*2;
+		end;
+	} else if(@tablesub > @playersub) {
+	mes "I rolled a ^0000FF"+@table3+"^000000, giving";
+	mes "me a total of ^0000FF"+@tablesub+"^000000 which";
+	mes "beats your total of ^FF0000"+@playersub+"^000000.";
+	mes "Sorry, but you lose this";
+	mes "game, "+strcharinfo(0)+". Them's";
+	mes "the breaks, I suppose...";
+	close;
+	} else if(@tablesub == @playersub) {
+		//Result = tie, --Improvised--
+		mes "I rolled a ^0000FF"+@table3+"^000000, giving";
+		mes "me a total of ^0000FF"+@tablesub+"^000000, which";
+		mes "is the same as your total.";
+		mes "Well, this game didn't have a";
+		mes "winner or loser, "+strcharinfo(0)+".";
+		close2;
+		getitem 512,@amount;
+		end;
+	}
+}
diff --git a/npc/quests/WIP/schwalz.txt b/npc/quests/WIP/schwalz.txt
index 3ad7116c3..4d229a07f 100644
--- a/npc/quests/WIP/schwalz.txt
+++ b/npc/quests/WIP/schwalz.txt
@@ -1,1046 +1,1046 @@
-//===== eAthena Script =======================================

-//= Lighthalzen, Swaltzwalt Quest Part 1

-//= Lighthalzen, Swaltzwalt Quest Part 2

-//= Lighthalzen, Swaltzwalt Quest Part 3

-//===== By: ==================================================

-//= Gravity official script

-//= CallNix (Part 1)

-//= dunkle (Part 2 & 3)

-//===== Current Version: =====================================

-//= 1.0  working version

-//= 1.1  fixed bug with wrong valuable [dunkle]

-//=      added and deleted some checks [dunkle]

-//=      fixed warps (but they are wrong) [dunkle]

-//=      fixed enabling of A Fine Gentleman [dunkle]

-//=      fixed bug with reward [dunkle]

-//= 1.2  fixed bug in part with overflow timer (now you must wait untill next day, not 12 hours) [dunkle]

-//       changed some valuables [dunkle]

-//       fixed bugs in The broken Manufactoring [dunkle]

-//= 1.2b fixed timer Ordinary Man [dunkle]

-//= 1.3  fixed part1 bugs [dunkle]

-//===== Compatible With: =====================================

-//= eAthena SVN

-//===== Description: =========================================

-//= 

-//=

-//===== Additional Comments: =================================

-//In alchemist_skills.txt comment because I use this NPC in the script:

-//lhz_in01.gat,285,169,7	script	Researcher#2	865,{

-//Unknown Text

-//	mes "[Researcher]";

-//	mes "Hmm... I wonder...";

-//	close;

-//}

-//

-//============================================================

-

-

-yuno_pre.gat,79,69,0	warp	inside_pre01	1,1,yuno_pre.gat,97,68

-yuno_pre.gat,113,50,0	warp	inside_pre02	1,1,yuno_pre.gat,58,22

-yuno_pre.gat,54,22,0	warp	inside_pre03	1,1,yuno_pre.gat,113,55

-lhz_in01.gat,275,234,0	warp	inside_pre04	1,1,lhz_in01.gat,277,161 //Çäåñü ïîðòàëû ïîñòàâèë íàîáóì, â ìåñòå îêîëî  äâåðè,

-lhz_in01.gat,277,157,0	warp	inside_pre04	1,1,lhz_in01.gat,275,231 //ãäå íå áûëî äðóãîãî ïîðòàëà :

-

-//OnInit!

-prontera.gat,0,0,0	script	swarzwalt_trilogy	-1,1,1{

-OnInit:

-disablenpc "kurelle";

-disablenpc "President's Secretary#2";

-disablenpc "Security#2";

-disablenpc "area 1-5";

-disablenpc "Kurelle#1";

-set $SCHWALTZVALT_DOOR_FLAG,0;

-stopnpctimer "schwalt2timer";

-end;

-}

-

-

-//////////////////////////////////////////////////////////////////////////////////////////////////////////

-//Beginning. Lighthalzen, Swaltzwalt Quest Part 1/////////////////////////////////////////////////////////

-//////////////////////////////////////////////////////////////////////////////////////////////////////////

-lighthalzen.gat,179,170,4	script	Ordinary man	48,{

-if (SCHWALTZVALT_PART2==23) {

-							mes "[Ghalstein]";

-							mes "arrr...";

-							mes "is you....";

-							mes ".....";

-							mes "Now? verything finish...";

-							mes "dream...vision";

-							next;

-							mes "[Ghalstein]";

-							mes "arr..most forgot...";

-							mes "This is your...";

-							mes "...cure...";

-							mes "Take this pill,";

-							mes "You'll never have to take it";

-							mes "anymore...";

-							next;

-							mes "[Ghalstein]";

-							mes ".......";

-							mes "We'll never meet each other anymore..";

-							getitem  617,1; //Old Violet Box

-							getexp 1800000,0; //Exp 1800000

-							set dtseligible , 1; //Here is Voting Right (dts warper)

-							set SCHWALTZVALT_PART2, 24;

-							close;

-							}

-		

-

-if (questpass_swaltwaltp1==1) goto l_alreadydone;							

-if ( (SCHWALTZVALT_PART1==2) || (SCHWALTZVALT_PART1==3) ) goto Quest_enable;

-if  ( (SCHWALTZVALT_PART1==1) && (gettime(5)!=schwalzday) ) goto L_NEXTDAY;

-if  (SCHWALTZVALT_PART1==1) goto l_hadspoken;

-mes "[Ghalstein]";

-mes "Hello,";

-mes "is this a great city?";

-menu "Hello",-,"This is a great city indeed",L_GREAT,"is still ok",L_OK;

-next;

-mes "[Ghalstein]";

-mes " Yes, It a nice day. I wish you have good time in our city. See you later";

-close;

-

-L_OK:

-next;

-mes "[Ghalstein]";

-mes "I like such sunny days... In such beautiful town...";

-close;

-

-L_GREAT:

-next;

-mes "[Ghalstein]";

-mes "Well. This great city is only for really great people.";

-mes "I wish you have good time here. Enjoy.";

-close2;

-mes "[??????]";

-mes "is here";

-mes "......";

-mes "[??????]";

-mes "hurry before we let people discover";

-mes "us...";

-mes "heard a familiar sound";

-menu "Continue listen",l_listen,"do not listen",l_nolisten;

-

-l_listen:

-next;

-mes "[??????]";

-mes "Its all as we suposed to... Everything is similar to our plan";

-mes "[??????]";

-mes "Yes, thats really cool.";

-next;

-mes "[??????]";

-mes "PSSS. Be silent";

-mes "I think somebody else is here listening us. We will meet the other day.";

-mes "[??????]";

-mes "I agree";

-set SCHWALTZVALT_PART1,1;

-set schwalzday, gettime(5);

-close;

-end;

-

-l_nolisten:

-next;

-mes "["+strcharinfo(0)+"]";

-mes "I dont think this is interesting for me.";

-close;

-end;

-

-L_NEXTDAY:

-mes "[Ghalstein]";

-mes "hi, how are you,";

-mes "today weather is good?";

-menu "Yes",l_da,"but last night",-;

-next;

-mes "[Ghalstein]";

-mes "What was last night? I've heard nothing about it. Anything strange had happened?";

-menu "I've heard you speaking to somebody about strange things.",-,"Nothing, sorry",L_NOTHING;

-next;

-mes "[Ghalstein]";

-mes "I think you are mistaken guy. I dont know what are you talking about";

-menu "Dont make a fool from me.",-,"Ok, sory",L_NOTHING;

-next;

-mes "[Ghalstein]";

-mes "I say you, that i hadn't speak to anybody yesterday.Hey, Protector come here plese";

-next;

-mes "["+strcharinfo(0)+"]";

-mes "..........";

-mes "if really not him, he shouldn't";

-mes "denied it so strongly";

-mes "..........";

-next;

-mes "[Protector]";

-mes "I have no intention to";

-mes "interrogation you?";

-mes "just because...";

-menu "The matter that Mr.Ghalstein dealing with..",-,"i feel curious about it?",l_curious;

-next;

-mes "["+strcharinfo(0)+"]";

-mes "I clearly remember him talking to somebody about some strange plans. I think he is planning something restrickted...";

-next;

-mes "[Protector]";

-mes "Hm... Is that so mr. Ghalstein? Do you remember the constitution? Tell us the truth, or i shall arrest you";

-next;

-mes "[Ghalstein]";

-mes "oh.. Ok. I was speaking about our community. Nothing interesting...";

-next;

-mes "[Protector]";

-mes "Ok. Its about your Fishing clan? If so, i leave you. See you later";

-next;

-mes "[Ghalstein]";

-mes "Well, I will tell you the truth. Please give me sometime to consider....";

-mes "I belong to a secret group that antagonistic with another group and so we need some items";

-mes "to be protected. So we were going to organize a trip to Reagent Shaw Research Center.";

-next;

-mes "[Ghalstein]";

-mes "You can get there if you have passed BioLab quest. Its the second and third lvl.";

-mes "But we have no brave to go there. What about helping us?";

-menu "Ok, i shall help",-,"No,thanks",L_NOTHX;

-next;

-mes "[Ghalstein]";

-mes "well then.But you must take this pill to go this quest. This pill will add some status to you.";

-mes "when you shall finish quest - i will delete this status from your char.Is it OK with you?. I think It is.";

-if ( checkweight(7226,1) == 0 ) goto l_overweight;

-getitem (7226),1;

-next;

-mes "[Ghalstein]";

-mes "I want you to collect all related biological exhibit and no need big quantity plus the most important thing.";

-mes "You will simply recognize that things";

-mes "There are some strange mobs there. So be careful. And last...People who go there dissapear. Nobody was back from there...";

-next;

-mes "[Ghalstein]";

-mes "So you had to go to 2 and 3 lvl of BioLab. Be sure you have finish this quest. And bring me 10 Lab staff records, 10 Armlet of prisoner and 1 Pile of Imir heat";

-set SCHWALTZVALT_PART1,2;

-

-set schwalzday,0;

-close;

-

-l_curious:

-mes "[Ghalstein]";

-mes "even so i dont want to speak to smb who say such fool things. Cya.";

-close;

-

-L_NOTHX:

-mes "[Ghalstein]";

-mes "ye, its a pity i think. Have a nice day";

-close;

-

-L_NOTHING:

-mes "[Ghalstein]";

-mes "I've never think guy like you can think this way about me. I dont want to speak to you anymore";

-close;

-

-l_overweight:

-mes "["+strcharinfo(0)+"]";

-mes "sorry you can't take this item";

-close;

-

-

-Quest_enable:

-if (countitem (7345) >= 10) && (countitem(7347) >=10) && (countitem(7346) >=1) goto Quest_end;

-mes "[Ghalstein]";

-mes "You havent geather items yet. Come back when you should.";

-close;

-

-Quest_end:

-mes "[Ghalstein]";

-mes "Well done. You have finished my part of quest.";

-mes "Now, Visit Gushaar. He can be found sowhere around Yuno.";

-next;

-mes "[Ghalstein]";

-mes "Yes, i have forgotten....";

-mes "Now you are member of society Wind of Secret!";

-mes "congratulations!";

-delitem (7345),10;

-delitem (7347),10;

-delitem (7346),1;

-getitem (7226),1;

-getitem (7348),1;

-set questpass_swaltwaltp1,1;

-close;

-

-l_hadspoken:

-mes "[Ghalstein]";

-mes "Sorry, but i have nothing to say to you anymore. Buy.";

-close;

-

-l_da:

-mes "[Ghalstein]";

-mes "Im happy you have time to think so too. See you";

-close;

-

-l_alreadydone:

-mes "["+strcharinfo(0)+"]";

-mes "I have already done this quest. I dont want to go there once more time!";

-close;

-}

-//=======================================================================

-lhz_dun02.gat,268,287,4	script	The broken Manufactoring	111,{

-if SCHWALTZVALT_PART1!=2 goto l_end;

-mes "[The broken Manufactoring]";

-mes "You see something shining inside the spoiling machines.Open up the machinr and check it,detected a round shape";

-mes "object wich circulate with a mysterious shines.";

-menu "Its seems like an important object",-,"But it looks nothing musch",l_nottake;

-getitem(7346),1;

-set SCHWALTZVALT_PART1,3;

-mes "["+strcharinfo(0)+"]";

-mes "Well, Now i suppose everything will be ok.";

-close2;

-npctalk "Creeep... Creeeep-Creep...*pfu*.";

-mes "["+strcharinfo(0)+"]";

-mes "Oooops....I dont think this machien will work anymore... I'll go better from here";

-close;

-end;

-l_nottake:

-close;

-

-l_end:

-mes "You see nothing there...";

-close;

-}

-//////////////////////////////////////////////////////////////////////////////////////////////////////////

-//Ending. Lighthalzen, Swaltzwalt Quest Part 1/////////////////////////////////////////////////////////

-//////////////////////////////////////////////////////////////////////////////////////////////////////////

-

-//NPC01 - Dismal Guy

-yuno_fild04.gat,165,245,5	script	Dismal Guy	89,{

-if (SCHWALTZVALT_PART2>0) {

-					mes "[Dismal Guy]";

-					mes "Make your mission..we need you..";

-					close;

-					}

-mes "[Dismal Guy]";	

-mes "Maybe you have some thing to show me?";

-menu "Yeah, I have it",-,"I don't know what do you mean",DG_end01;

-if ((countitem(7348)==0) || (questpass_swaltwaltp1!=1))  { //Membership Card, Çäåñü ïðîâåðêà, ïðîéäåíà ëè ïåðâàÿ ÷àñòü êâåñòà

-					next; 

-					mes "[Dismal Guy]";

-					mes "You are trying to cheat me?";

-					mes "You don't have item which I am interesting in..";

-					mes "Bye! Come back, when you will have what I want.";

-					close;

-					 }

-//next;

-//mes "[Dismal Guy]";

-//mes "emm....";

-//mes "got red and blue pill,";

-//mes "which one you choose?";

-//menu "Red pill",-,"Blue pill",-; //Íàäî óçíàòü, ÷òî áóäåò åñëè âûáðàòü ñèíèþ ïèëþëþ (ïî èäåè â ïåðâîé ÷àñòè ÍÏÖ ìîæåò äàòü ëìáî ñèíþþ, ëèáî êðàñíóþ, íî ò.ê. îí äàåò ïðîñòî ïèëþëþ, òî çäåñü åñòåñíî ýòî íåíóæíî)

-//mes "Nowadays isn't the best time to live..";

-next;

-mes "[Dismal Guy]";

-mes "Schwaltzvalt is control by evil ^0000FFRekenber Enterprise^000000";

-mes "But we have organized a resistance called ^FF0000Wing Of Secret^000000 with the help of the President ^0000FFKarl Weierstrass^000000 to reform Schwaltzvalt Republic from the control of ^0000FFRekenber Enterprise^000000!";

-next;

-mes "[Dismal Guy]";

-mes "I have a task for you.";

-mes "You need to meet the candidate which won the president election ^0000FFKarl Weierstrass^000000";

-mes "He wants to reform Schwaltzvalt Republic from the control of ^0000FFRekenber Enterprise^000000";

-next;

-mes "[Dismal Guy]";

-mes "If you will unable to see ^0000FFKarl Weierstrass^000000, coordinate with his secrtary in Yuno at appointed time.";

-mes "The best time will be betwen 8pm to 11pm or betwen 11am to 2pm";

-set SCHWALTZVALT_PART2, 1; //Ïåðâûé ÍÏÖ ïðîéäåí, òåïåðü ìîæíî ê ñåêðåòàðþ.

-next;

-mes "[Dismal Guy]";

-mes "The fate of the whole Republic in your brave hands! Bye!";

-close;

-

-DG_end01:

-next;

-mes "[Dismal Guy]";

-mes "It'a a pity, I am finding you a good person..";

-close;

-}

-

-//NPC02 - President's Secretary

-yuno_pre.gat,69,20,5	script	President's Secretary::pre	862,{

-if (SCHWALTZVALT_PART2==4) {

-							mes "[Hes O'Neil]";

-							if(countitem(7342)==0) {mes "Where is documemt?";close;} //Çäåñü ÈÄ äîêóìåíòà, íàäî óçíàòü ó Ëóïóñà.

-							delitem 7342,1; //Çäåñü ÈÄ äîêóìåíòà, íàäî óçíàòü ó Ëóïóñà.

-							mes "Thanks a lot!";

-							set SCHWALTZVALT_PART2, 5; //Òåïåðü ñ ñåêðåòàðøåé âî âòîðîé ðàç âñå, èäåì ê Venice

-							close;

-							}

-if (SCHWALTZVALT_PART2>=2) {

-						mes "[Hes O'Neil]";

-						mes "I glad to see you again!";

-						close;	

-							}		

-									

-if ( (gettime(3)>23) && (gettime(3)<11) ) || ( (gettime(3)>14) && (gettime(3)<20) ) {

-																					mes "[Hes O'Neil]";

-																					mes "It isn't reception time.";

-																					mes "Come back betwen 8pm to 11pm or betwen 11am to 2pm.";

-																					close;

- 																					}

-

-

-mes "[Hes O'Neil]";

-mes "Who are you?";

-mes "How can I help?";

-menu "emm..",-,"Meet up with Mr.President",PS_meet,"Nothing",PS_end01;

-

-if (SCHWALTZVALT_PART2==1) {

-							next;

-							mes "[Hes O'Neil]";

-							mes "Heh, you don't know how to explain youself:)";

-							mes "But I know that Mr.President is waiting for you. Good Luck!";

-							set SCHWALTZVALT_PART2, 2; //Âòîðîé ÍÏÖ ïðîéäåí, äàëåå ê ñòðàæíèêó.

-							close;

-							}

-

-next;

-mes "[Hes O'Neil]";

-mes "What do you want?";

-mes "Don't waste my time please!";

-close;

-

-PS_meet:

-next;

-mes "[Hes O'Neil]";

-mes "Sorry, but Mr.President is very busy.";

-//emotion 14; //sry

-close;

-

-PS_end01:

-next;

-mes "[Hes O'Neil]";

-mes "Sorry, I did't help you:(";

-//emotion 14; //sry

-close;

-}

-

-yuno_pre.gat,75,71,3	duplicate(pre)	President's Secretary#2	862,0,0

-

-//NPC03 - Security

-yuno_pre.gat,95,71,5	script	Security::sec	899,5,5	{

-if (SCHWALTZVALT_PART2==4) {

-							mes "[Security]";

-							mes "Mr.President still meeting with other person.";

-							close;

-							}

-if  (SCHWALTZVALT_PART2>=3) {

-							mes "[Security]";

-							mes "Mr.Presideny is free now. You can come in.";

-							close2;

-							warp "yuno_pre.gat",75,70;

-							end;

-							}

-if  (SCHWALTZVALT_PART2!=2)  { 

-							mes "[Security]";

-							mes "Nobody has disposed to pass you!";

-							close;

-							}

-if (rand(9)!=0) {

-				mes "[Security]";

-				mes "Please hold on for a moment.";

-				mes "Mr.President still meeting with other person.";

-				close;

-				}

-enablenpc "kurelle";

-mes "[Keshnaar]";

-mes "Mr.President denied my petition about medical marihuana...";

-//emotion 25; //sob

-next;

-mes "[Keshnaar]";

-mes "I have collected 1000 signatures of the townspeople and nothing...";

-//emotion 25; //sob

-next;

-mes "[Keshnaar]";

-mes "Ok I must go and collect more signatures!";

-next;

-disablenpc "A Fine Gentleman";

-

-mes "[Security]";

-mes "Now Mr.President is free, you can pass.";

-G_menu:

-menu "Ok",S_warp,"Who is he?",-;

-next;

-mes "[Security]";

-mes "Are you talking about Mr.Keshnaar?";

-mes "Mr.Keshnaar works for Rekenber. He consulted with Mr.President.";

-next;

-goto G_menu;

-

-S_warp:

-set SCHWALTZVALT_PART2, 3; //Ó îõðàííèêà âñå, òåïåðü ê ïðåçèäåíòó.

-close2;

-warp "yuno_pre.gat",75,70;

-

-OnTouch:

-if (SCHWALTZVALT_PART2==4) { 

-							mes "...Suddenly your heard voices behind the door...";

-							mes "...but is too slighty, can't heard clearly...";

-							next;

-							mes "[?????]";

-							mes "...is true..";

-							mes "so........";

-							mes "......president...";

-							mes "[?????]";

-							mes "..their Investigation...";

-							mes ".........";

-							mes "....trap....";

-							mes "[?????]";

-							mes "...stop them....how?";

-							mes ".....,surely...";

-							mes "[?????]";

-							mes "next?...election...";

-							mes "....elected...";

-							next;

-							mes "...the sound became more slighty...";

-							mes "...can't heard anymore...";

-							close;

-							}

-}

-

-//NPC04 - A Fine Gentleman

-yuno_pre.gat,96,69,3	script	A Fine Gentleman::kurelle	82,{

-close;

-}

-//NPC - KURELLE

-yuno_pre.gat,69,74,0	duplicate(kurelle)	Kurelle#1	109,0,0

-

-//NPC - Security in presidents room

-yuno_pre.gat,76,72,8	duplicate(sec)	Security#2	899,0,0

-

-//NPC05 - President Karl

-yuno_pre.gat,69,79,5	script	President Karl	872,{

-cutin "lhz_karl",2;

-if (SCHWALTZVALT_PART2==22) {

-							mes "...after the story about traitor ^FF0000Kurelle^000000 president looks stunned...";

-							next;

-							mes "[President Karl]";

-							mes "CALL MY SECRETARY NOOOOOOW!!!";

-							next;

-							mes ".....";

-							next;

-							enablenpc "President's Secretary#2";

-							mes "...Secretary looks too afraid...";

-							next;

-							cutin "",255;

-							mes "[Hes O'Neil]";

-							mes "Yes sir! What is your oders?";

-							next;

-							cutin "lhz_karl",2;

-							mes "[President Karl]";

-							mes "INVITE THIS TRAITOR ^FF0000KURELLE^000000 NOOOOW!!!";

-							next;

-							disablenpc "President's Secretary#2";

-							mes ".....";

-							next;

-							enablenpc "Kurelle#1";

-							mes "[President Karl]";

-							mes "What happened? Why did you betray us?";

-							next;

-							cutin "",255;

-							mes "[Kurelle]";

-							mes "You are right. I did it. I report all of your actions to the enterprise...";

-							mes "I did it by myself.";

-							next;

-							mes "[Kurelle]";

-							mes "When I carry on my plan, I meet with Rekenber people who are monitoring you...ha-ha!";

-							next;

-							mes "[Kurelle]";

-							mes "Therefore I take those opportunity to propose them my plan,";

-							mes "I provide information t0 them, to force you step down, I WILL BE THE NEXT PRESIDENT!!! HA-HA-HA";

-							next;

-							mes "[Kurelle]";

-							mes "Although you'll not step down sp soon...but your team will lost seriously!";

-							next;

-							mes "[Kurelle]";

-							mes "Yeap, your era is gone...";

-							mes "Now you can't do anything, just waiting to step down then is enough...";

-							mes "Ha ha...";

-							next;

-							cutin "lhz_karl",2;

-							mes "[President Karl]";

-							mes "SECURITY!!!";

-							enablenpc "Security#2";

-							next;

-							next; 

-							mes "[President Karl]";

-							mes "He is crazy!! Jail him now!";

-							next;

-							cutin "",255;

-							mes "[Security]";

-							mes "Yes sir!";

-							disablenpc "Security#2";

-							disablenpc "Kurelle#1";	

-							next;

-							cutin "lhz_karl",2;

-							mes "[President Karl]";

-							mes "It is the end of our Rebublic..";

-							mes "Soon it will fall..";

-							next;	

-							mes "[President Karl]";

-							mes "Thank you brave man ..";	

-							mes "...go away. Now I must stay here and wait the END..";	

-							set SCHWALTZVALT_PART2, 23;

-							cutin "",255;

-							close;

-							}

-if (SCHWALTZVALT_PART2==20) {

-							mes "[President Karl]";

-							mes "Very interesting...";

-							mes "With this information can give enterprise a big hit.";

-							if(countitem(7343)==0) {mes "Where is documemt?";cutin "",255; close;} //Sealed documemt

-							delitem 7343,1; //Sealed documemt

-							next;

-							mes "[President Karl]";

-							mes "But I can't understand why should we withdraw our members?...";

-							mes "...can you go to Esuna and ask her for reasons?";

-							set SCHWALTZVALT_PART2, 21; //Îáðàòíî ê Åñóíå! (èçäåâàòåëüñòâî äëÿ èãðîêîâ:))))

-							cutin "",255;

-							close;

-							}

-if (SCHWALTZVALT_PART2==18) {

-							mes "[President Karl]";

-							mes "It can't be true! You broght me a file containing all details of the Shinokas case!! ";

-							if(countitem(7344)==0) {mes "Where is Shinokas documemt?";cutin "",255; close;} //Shinokas documemt

-							delitem 7344,1; //Shinokas documemt

-							set SCHWALTZVALT_PART2, 19; //Îáðàòíî ê Åñóíå!

-							next;

-							mes "...President Karl attentivly looking thought the papers...";

-							next;

-							mes "[President Karl]";

-							mes "The death of ^FF0000Shinokas^000000...";

-							mes "It is not important for us.."; 

-							mes "The most important thing is what they are going to do with ^0000FFYmir Heart Piece^000000 what is their main purpose."; 

-							next;

-							mes "[President Karl]";

-							mes "I heard that when you are on the way to me. ^FF0000Esuna^000000 gained new information.";

-							mes "Bye! I will be waiting for new information. ";

-							cutin "",255;

-							close;

-							}

-if (SCHWALTZVALT_PART2==9) {

-							mes "[President Karl]";

-							mes "Ohh! You brought me this secret document!? You are awesome!";

-							if(countitem(7343)==0) {mes "Where is documemt?";cutin "",255; close;} //Sealed Document

-							delitem 7343,1; //Sealed Document

-							mes "Let's see...";

-							next;

-							mes "[President Karl]";

-							mes "...";

-							next;

-							mes "[President Karl]";

-							mes "It is very-very interesting! One of ^0000FFRekenber Enterprise^000000 researcher is hiding in a secret place!";

-							mes "He knows some secret!!!!! His name is ^FF0000Shinokas^000000";

-							mes "...and the secret place is...";

-							next;

-							mes "[President Karl]";

-							mes "...^FF0000Einbroch^000000";

-							mes "So..your second mission is to find ^FF0000Shinokas^FF0000 in ^FF0000Einbroch^000000 and to know his secret!";

-							next;

-							mes "[President Karl]";

-							mes "Do you have any questions?";

-							next;

-							mes "["+strcharinfo(0)+"]";

-							mes "Yes...I hane one..";

-							mes "Shinikas is...";

-							next;

-							cutin "",255;

-							enablenpc "Security#2";

-							enablenpc "President's Secretary#2";

-							next;

-							mes "[Secutity]";

-							mes "Mr.President, Mrs.Hes O'Neil has urgent matter to see you. ";

-							next;

-							mes "...Mrs.Hes O'Neil brooght to the President a pack of documents...";

-							next;

-							cutin "lhz_karl",2;

-							mes "[President Karl]";

-							mes "Thanks to Mrs.Hes O'Neil we found a secret file! It is in the store room of ^0000FFReagent Belfa Headquater^000000";

-							next;

-							mes "[President Karl]";

-							mes "Ok. Go somewhere around ^FF0000Lighthalzen^000000, waiting for ^FF0000kafra service^000000 to contact with you.";

-							set SCHWALTZVALT_PART2, 10; //Âçÿëè âòîðóþ ìèññèþ ó Ïðåçèäåíòà, 

-							next;

-							disablenpc "Security#2";

-							disablenpc "President's Secretary#2";

-							cutin "",255;

-							close;

-							}

-if (SCHWALTZVALT_PART2>=4) {

-							mes "[President Karl]";

-							mes "See ya!";

-							cutin "",255;

-							close;

-}

-if (SCHWALTZVALT_PART2<3) {

-							mes "[President Karl]";

-							mes "Who are you doing here?!";

-							next;

-							mes "[President Karl]";

-							mes "Secutity!!!!";

-							cutin "",255;

-							close2;

-							warp "yuno.gat",153,313;

-							}

-mes "[President Karl]";

-mes "I believe, you have many questions but.. ";

-mes "...I am very busy, so the time I have is limited.";

-

-PK_menu01:

-menu "Objective of the ^FF0000Wing Of Secret^000000f",PK_obj01,"Objective of the ^0000FFRekenber Enterprise^000000",PK_obj02,"What is my Mission?",-;

-

-next;

-mes "[President Karl]";

-mes "The first mission is to go ^0000FF'Aldebaran Kafra Headquater'^000000 to meet a guy called ^FF0000 Venice^000000. Then he will let you know what to do." ;

-next;

-mes "[President Karl]";

-mes "One more thing...";

-mes "Please, bring this document to ^FF0000Hes O'Neil^000000. Then you can continue your mission.";

-getitem 7342,1; //File Folder

-set SCHWALTZVALT_PART2, 4; //Ñ Ïðåçèäåíòîì ïîêà âñå, èäåì ê ñåêðåòàðøå îïÿòü.

-cutin "",255;

-close;

-

-PK_obj01:

-next;

-mes "[President Karl]";

-mes "It is resistance organization which try to reform Schwaltzvalt Republic with my help.";

-mes "Before I was elected I was the member of this organization.";

-mes "We should not admit the control of authority by ^0000FFRekenber Enterprise^000000!!!";

-goto PK_menu01;

-

-PK_obj02:

-next;

-mes "[President Karl]";

-mes "^0000FFRekenber Enterprise^000000 - the worst organization in Rune Midgard!!";

-mes "They try to get power.";

-mes "To make the prices in shops is more expensive, to receive greater taxes from the townspeople, to start up development Rune Midgard on a way of fear and terror.";

-goto PK_menu01;

-}

-

-//NPC06 - Venice

-aldeba_in.gat,155,240,3	script	Kafra Employee	859,{

-if (SCHWALTZVALT_PART2==7) {

-							if(countitem(7343)==0) {mes "Where is documemt?";close;} //Çäåñü ÈÄ äîêóìåíòà

-							delitem 7343,1; //Sealed Document

-							mes "[Venice]";

-							mes "That is great!! You got this document!";

-							next;

-							mes "[Venice]";

-							mes "And how is Jargeah? Where is he?";

-							next;

-							mes "["+strcharinfo(0)+"]";

-							mes "He is....";

-							next;

-							mes "[Venice]";

-							mes "I see...";

-							mes "Here is document, give it to the President!";

-							getitem 7343,1; //Sealed Document

-							set SCHWALTZVALT_PART2, 9; //C Venice âî âòîðîé ðàç ïîêîí÷åíî, èäåì îòäàâàòü äîêóìåíò ê Ïðåçèäåíòó.

-							close;

-							}

-if (SCHWALTZVALT_PART2==6) {

-						mes "[Venice]";

-						mes "Find Jargeah please!";

-						close;

-							}

-mes "["+strcharinfo(0)+"]";

-mes "Can I know... are you Venice?";

-next;

-if (SCHWALTZVALT_PART2!=5) {

-							mes "[Kafra Employee]";

-							mes "May be yes and may be no!";

-							mes "I am thinking, go away!";

-							close;

-							}

-mes "[Venice]";

-mes "Yes, I am Venice.";

-mes "What can I do for you?";

-

-menu "Let her see the logo",-,"Nothing",V_end01;

-

-next;

-mes "[Venice]";

-mes "Now I think that I can trust you..";

-next;

-mes "[Venice]";

-mes "I am the member of ^FF0000Wing Of Secret^000000 organization.";

-mes "I got terrible news...";

-next;

-mes "[Venice]";

-mes "With our agent something happened on the half way between ^FF0000Lighthalzen^000000 and ^FF0000Einbroch^000000 in ^FF0000Grim Reaper's Valley^000000.";

-mes "He needs help, his name is ^FF0000Jargeah^000000. Hurry up please!";

-set SCHWALTZVALT_PART2, 6; //Ñ Venice â ïåðâûé ïîêîí÷åíî èäåì èñêàòü Jargeah

-close;

-

-

-V_end01:

-next;

-mes "[Venice]";

-mes "Ok, come back when you will ready.";

-close;

-						

-}

-

-//NPC07 - Jargeah

-lhz_fild02.gat,228,214,1	script	A Wounded Man	887,{

-mes "["+strcharinfo(0)+"]";

-mes "It looks like a dead man...";

-if (SCHWALTZVALT_PART2!=6) {

-							mes "["+strcharinfo(0)+"]";

-							mes "He is dead!!! I must go away from here...";

-							close;

-							}

-mes "Maybe I can try to find something in his clothes..";

-mes "...It isn't good, but I need to make it..";

-next;

-mes "...";

-next;

-mes "You found the Sealed Document!";

-next;

-getitem 7343,1; //Sealed Document

-set SCHWALTZVALT_PART2, 7;

-close;

-}

-

-//NPC08 - Esuna

-lhz_fild01.gat,66,219,3	script	A Mystery Woman	859,20,20{

-if (SCHWALTZVALT_PART2==21) {

-							mes "[Esuna]";

-							mes "..........";

-							mes "The traitor in the internal is the problem!";

-							mes "..........";

-							next;

-							mes "[Esuna]";

-							mes "Those who able to seal the secret information, and drain it to opponents, only the President ";

-							mes "or his trusted aide with his ability ^FF0000Kurelle^000000";

-							next;

-							mes "[Esuna]";

-							mes "According to this information, he often meets with the organaizer of enterprize, ";

-							mes "from here we can said that he is the most suspicious target.";

-							next;

-							mes "[Esuna]";

-							mes "After infiltrated his residence, we found a lot of information and evidences that related with him!";

-							next;

-							mes "[Esuna]";

-							mes "The headquater odered us to hold any actions correlated with the President,  ";

-							mes "and we determined that there is only disadvantage and it won't bring benefits anymore...";

-							next;

-							mes "[Esuna]";

-							mes "I think this is the last, good bye...";

-							set SCHWALTZVALT_PART2, 22; //Îïÿòü ê ïðåçèäåíòó! (óáåéñÿ îá ñòåíó åùå ðàç, è ïîìíè, òû ýòî äåëàåøü ðàäè 1.8êê îïûòà) 

-							close;

-							}

-if (SCHWALTZVALT_PART2==19) {

-							mes "[Esuna]";

-							mes "I am too nervous..I lost many people of my group!";

-							mes "So we should use plan B. We must withdraw our members from Schwaltsvalt!";

-							next;

-							mes "[Esuna]";

-							mes "I think that it will be the best thing which we can do for our people.";

-							mes "Here is documents, containing the plan of operation and some negative information about ^0000FFRekenber Enterprise^000000, go to the President he must look throught this documents.";

-							getitem 7343,1; //Sealed Document

-							set SCHWALTZVALT_PART2, 20; //Îïÿòü ê ïðåçèäåíòó! 

-							close;

-							}

-if (SCHWALTZVALT_PART2==17) {

-							mes "[Esuna]";

-							if(countitem(7344)==0) {mes "Where is Case of Xinucarse";close;} //Çäåñü ÈÄ äîêóìåíòà, 

-							mes "Haha!! You got these secret documents!! You are great!";

-							delitem 7344,1; //Case of Xinucarse

-							set SCHWALTZVALT_PART2, 18; //Ìèññèÿ âûïîëíåíà! part 2 finished

-							mes "[Esuna]";

-							mes "I addded some new docements to the file! ";

-							getitem 7344,1; //Case of Xinucarse

-							next;

-							mes "[Esuna]";

-							mes "Now go to the President with this documents! ";

-							close;

-							}

-if (SCHWALTZVALT_PART2==10) {

-mes "[Esuna]";

-mes "Due to emergency I'll give you a short brief, firstly the target of the mission is to infiltrate into the internal of enterpeise and steal the secret information.";

-next;

-mes "[Esuna]";

-mes "It's too difficult to ifiltrate into the iternal, but we have secret agent from our side.";

-mes "Go to ^0000FFpass^000000 and disarm the security system, and then bring out the information.";

-next;

-mes "[Esuna]";

-mes "To cheat the security system fo first to the ^FF0000L.T.G. Store^000000 and buy some stuff.";

-mes "After you entered, find a person called ^FF0000Lestin^000000";

-set SCHWALTZVALT_PART2, 11; //C êàôðî ñåðâèñîì âñå, èäåì èñêàòü Ëåñòèíà

-close;

-}

-mes "[Esuna]";

-mes "I try to find some mushrooms...bye!";

-close;

-OnTouch:

-if (SCHWALTZVALT_PART2==10) {

-mes "?????";

-mes "..here..plz...come over..";

-close;

-														}

-}

-

-//Òóò âîïðîñ ñ âàðïîì, äî Ëåñòèíà íå íàøåë êàê äîéòè, íàäî âàðï ê íåìó ïîñòàâèòü...âîò òóò lhz_in01 277 157

-//NPC09 - Lestin

-lhz_in01.gat,285,169,3	script	Researcher#2	865,{

-if (SCHWALTZVALT_PART2==16) {

-							mes "[Lestin]";

-							mes "My entry pass! Thank you.";

-							if(countitem(7349)==0) {mes "Where is my enty pass?";close;} //Card To Enter Document Room.

-							delitem 7349,1; //Card To Enter Document Room.

-							set SCHWALTZVALT_PART2, 17; //Òåïåðü ìîæíî îòäàòü äîêóìåíòû Åñóíå è çàêîí÷èòü âòîðóþ ÷àñòü êâåñòà.

-							next;

-							mes "[Lestin]";

-							mes "Now, go to Esuna with these documents. Bye!";

-							close;

-							}

-if (SCHWALTZVALT_PART2==11) {

-							mes "["+strcharinfo(0)+"]";

-							mes "Are you Lestin?";

-							next;

-							mes "[Lestin]";

-							mes "Yes, I am!";

-							mes "And you are a member of ^FF0000Wing Of Secret^000000 organization!";

-							mes "I can help you to steal secret documents!";

-							next;

-							mes "[Lestin]";

-							mes "Here is my ^0000FFpass^000000, but whis this ^0000FFpass^000000 you only can stay for ^FF00003 minutes^000000";

-							getitem 7349,1; //Card To Enter Document Room.

-							next;

-							mes "[Lestin]";

-							mes "The secret information is located at the right hand-side of the research room where I stayed just now. And this...!";

-							next;

-							mes "[Lestin]";

-							mes "...return me my ^0000FFpass^000000 when you will finish! Good Luck!";

-							set SCHWALTZVALT_PART2, 12; //Òåïåðü èäåì ïîõèùàòü äîêóìåíò!

-							}

-mes "[Researcher]";

-mes "Hmm... I wonder...";

-close;

-}

-

-//Ðàñïèøó ñèñòåìó äâåðåé:

-//Ó Ëåñòèíà ïîëó÷àåì ïåðåìåííóþ 12...

-//1. åñëè 12, 13 ,14 è ôëàã äâåðè 0(ò.å. åñòü ñòðàæíèêè) èäåì àêòèâèðîâàòü ãâàðäîâ

-//2. çàïóñêàåòñÿ òàéìåð, ñòðàæíèêè ïðîïàäàþò, ôëàã äâåðè = 1

-//3. ó íàñ åñòü 3 ìèíóòû, ÷òîáû ñäåëàòü âñå, ïîäõîäèì ê äâåðè, åñëè ïðàâèëüíî ââîäèì êîä, êàðòî÷êà îñòàåòñÿ â äâåðè, íàì ïðèñâàèâàþò ïåðåìåííóþ 13, âàðïàåò âíóòðü

-//4. íàæèìàåì íà ñèñòåìó ïîèñêà, ââîäèì Shinokas, òîãäà ïðèñâàèâàþò 14, àêòèâèðóåòñÿ àðåà1-5

-//5. òûðêàåì íà àðåà1-5, ïîëó÷àåì äîêóìåíòû, íàì ïðèñâàèâàåòñÿ 15, ìîæíî èäòè ê äâåðè

-//6. åñëè ó íàñ 15 è ôëàã äâåðè 1 (ò.å. åøå øâàðäîâ íåò), òî áëàãîïîëó÷íî ïîëó÷àåì êàðòî÷êó íàçàä è âûõîäèì, ïîëó÷àåì 16

-//Åñëè íå óñïåëè è ìû âíóòðè, çíà÷èò ó íàñ ïåðåìåííàÿ 13, 14 èëè 15, ôëàã äâåðè 0, ïðîïóñê èñ÷åçàåò è íàñ âûêèäûâàåò èç ëîêàöèè, ïðèäåòñÿ ñíîâà èäòè ê Ëåñòèíó çà ïðîïóñêîì 

-//Äîïóñòèì ó íàñ 15 î÷êîâ ìû âíóòðè, âðåìÿ èñòåêëî. Äâà âàðèàíòà - íàæàòü íà äâåðü, òîãäà ïðèäåòñÿ èäòè ê ëåñòèíó ñíîâà, ïåðåìåííàÿ 11 ñòàíîâèòñÿ. Ëèáî óìåðåòü è òîïàòü ê àêòèâàöèè ãâàðäîâ.

-//NPC10 - Door

-lhz_in01.gat,177,30,1	script	Door	111,{

-if ( (SCHWALTZVALT_PART2==15) && ($SCHWALTZVALT_DOOR_FLAG==1) ) {

-																mes "You take out enty key.";

-																next;

-																mes "["+strcharinfo(0)+"]";

-																mes "Hm....I need to bring this key to Lestin!";

-																getitem 7349,1; //Card To Enter Document Room. 

-																set SCHWALTZVALT_PART2, 16; //Ê Ëåñòèíó

-																menu "Go out!",-;

-																close2;

-																warp "lhz_in01.gat",177,27;	

-																end;

-																}

-																

-

-if ( (SCHWALTZVALT_PART2<15) && (SCHWALTZVALT_PART2>=13) && ($SCHWALTZVALT_DOOR_FLAG==0) ) {

-																menu "Go out!",-;

-																set SCHWALTZVALT_PART2,11; //íåóäà÷à, îïÿòü ê ëåñòèíó

-																mes "[Guards]";

-																mes "Intruder!!!";

-																close2;

-																warp "lighthalzen.gat",104,238;	

-																end;

-																			}

-if  (SCHWALTZVALT_PART2>15) { mes "I got all the documents I needed!";

-							close;

-							}				

-if ((SCHWALTZVALT_PART2<13) && $SCHWALTZVALT_DOOR_FLAG==0) {

- 								mes "Here is Guards, they can't let you infiltrate!";

- 								mes "You need to wait a little.";

- 								close;

-								}

-if ( (countitem(7349)>0) && (SCHWALTZVALT_PART2==12) && ($SCHWALTZVALT_DOOR_FLAG==1)) {//Card To Enter Document Room. ÈÄ ïðîïóñêà, ñïðîñèòü ó Ëóïóñà

-											mes "You have the entry pass. You can infiltrate now.";

-											menu "Infiltrate",-;

-											mes "Please, input code number!";

-											input @tmp_code;

-											if (@tmp_code != 738495) {next; mes "Incorrect code!"; close;} //Ýòî ÷èñëî â îïèñàíèè ïðîïóñêà äîëæíî áûòü

-											next;

-											delitem 7349,1; //Card To Enter Document Room

-											mes "Accepted.";

-											mes "You can stay in the documents room only for 3 minutes!.";

-											set SCHWALTZVALT_PART2, 13; //ïóñòèëè âíóòðü

-											close2;

-											warp "lhz_in01",178,33;

-											end;

-										}

-mes "....";

-close;

-

-}

-

-//NPC11 - Activate Guards

-lhz_in01.gat,187,30,4	script	Point of the review	111,1,0{

-close;

-OnTouch:

-if ( (SCHWALTZVALT_PART2<=15) && (SCHWALTZVALT_PART2>=12) && ($SCHWALTZVALT_DOOR_FLAG==0) ){

-							mes "...It seemed that guards gonna smoke...";

-							stopnpctimer;

-							initnpctimer "schwalt2timer";

-							set $SCHWALTZVALT_DOOR_FLAG,1;

-							close;

-						}

-mes "Nothing happened..";

-close;

-}

-

-//NPC12 - File Search Engine

-lhz_in01.gat,180,35,4	script	File Search Engine	111,1,0{

-close;

-OnTouch:

-if (SCHWALTZVALT_PART2==13) {

-							mes "-Activating the document seaching program-";

-							mes "-Please key in the information of the document...-";

-							mes "-..that you would like to search-";

-							input @tmp_phrase$;

-							if (@tmp_phrase$!="Shinokas") {next; mes "Nothing interesting was found!"; close;}

-							next;

-							mes "-relevant information of Shinokas-";

-							mes "-is being kept in area 1-5-";

-							enablenpc "area 1-5";

-							set SCHWALTZVALT_PART2, 14; //àêòèâèðîâàëè àðåà1-5

-							close;

-							}

-mes "Nothing happened..";

-close;

-}

-

-//NPC13 - area 1-5

-lhz_in01.gat,184,49,4	script	area 1-5	111,1,0{

-close;

-OnTouch:

-if (SCHWALTZVALT_PART2==14) {

-                             mes "It is interesting. Here is the secret indormation about the heart of Ymir. I must bring this case to Esuna.";

-                             getitem 7344,1; //Case of Xinucarse Èä ñïðîñèòü ó Ëóïóñà

-                             set SCHWALTZVALT_PART2, 15; //Çàáðàëè äîêóìåíò, òåïåðü ê äâåðè íàðóæó

-                             close;

-							}

-

-mes "["+strcharinfo(0)+"]";

-mes "I don't know what to find!";

-close;

-}

-//Timer

-lhz_in01.gat,1,1,0	script	schwalt2timer	-1,{

-	OnTimer2000:

-		disablenpc "LhzRekGuard";

-		disablenpc "Guard#03";

-		end;

-	OnTimer182000:

-		enablenpc "LhzRekGuard";

-		enablenpc "Guard#03";

-		disablenpc "area 1-5";

-		set $SCHWALTZVALT_DOOR_FLAG,0;

-		stopnpctimer "schwalt2timer";

-		end;

+//===== eAthena Script =======================================
+//= Lighthalzen, Swaltzwalt Quest Part 1
+//= Lighthalzen, Swaltzwalt Quest Part 2
+//= Lighthalzen, Swaltzwalt Quest Part 3
+//===== By: ==================================================
+//= Gravity official script
+//= CallNix (Part 1)
+//= dunkle (Part 2 & 3)
+//===== Current Version: =====================================
+//= 1.0  working version
+//= 1.1  fixed bug with wrong valuable [dunkle]
+//=      added and deleted some checks [dunkle]
+//=      fixed warps (but they are wrong) [dunkle]
+//=      fixed enabling of A Fine Gentleman [dunkle]
+//=      fixed bug with reward [dunkle]
+//= 1.2  fixed bug in part with overflow timer (now you must wait untill next day, not 12 hours) [dunkle]
+//       changed some valuables [dunkle]
+//       fixed bugs in The broken Manufactoring [dunkle]
+//= 1.2b fixed timer Ordinary Man [dunkle]
+//= 1.3  fixed part1 bugs [dunkle]
+//===== Compatible With: =====================================
+//= eAthena SVN
+//===== Description: =========================================
+//= 
+//=
+//===== Additional Comments: =================================
+//In alchemist_skills.txt comment because I use this NPC in the script:
+//lhz_in01.gat,285,169,7	script	Researcher#2	865,{
+//Unknown Text
+//	mes "[Researcher]";
+//	mes "Hmm... I wonder...";
+//	close;
+//}
+//
+//============================================================
+
+
+yuno_pre.gat,79,69,0	warp	inside_pre01	1,1,yuno_pre.gat,97,68
+yuno_pre.gat,113,50,0	warp	inside_pre02	1,1,yuno_pre.gat,58,22
+yuno_pre.gat,54,22,0	warp	inside_pre03	1,1,yuno_pre.gat,113,55
+lhz_in01.gat,275,234,0	warp	inside_pre04	1,1,lhz_in01.gat,277,161 //Çäåñü ïîðòàëû ïîñòàâèë íàîáóì, â ìåñòå îêîëî  äâåðè,
+lhz_in01.gat,277,157,0	warp	inside_pre04	1,1,lhz_in01.gat,275,231 //ãäå íå áûëî äðóãîãî ïîðòàëà :
+
+//OnInit!
+prontera.gat,0,0,0	script	swarzwalt_trilogy	-1,1,1{
+OnInit:
+disablenpc "kurelle";
+disablenpc "President's Secretary#2";
+disablenpc "Security#2";
+disablenpc "area 1-5";
+disablenpc "Kurelle#1";
+set $SCHWALTZVALT_DOOR_FLAG,0;
+stopnpctimer "schwalt2timer";
+end;
+}
+
+
+//////////////////////////////////////////////////////////////////////////////////////////////////////////
+//Beginning. Lighthalzen, Swaltzwalt Quest Part 1/////////////////////////////////////////////////////////
+//////////////////////////////////////////////////////////////////////////////////////////////////////////
+lighthalzen.gat,179,170,4	script	Ordinary man	48,{
+if (SCHWALTZVALT_PART2==23) {
+							mes "[Ghalstein]";
+							mes "arrr...";
+							mes "is you....";
+							mes ".....";
+							mes "Now? verything finish...";
+							mes "dream...vision";
+							next;
+							mes "[Ghalstein]";
+							mes "arr..most forgot...";
+							mes "This is your...";
+							mes "...cure...";
+							mes "Take this pill,";
+							mes "You'll never have to take it";
+							mes "anymore...";
+							next;
+							mes "[Ghalstein]";
+							mes ".......";
+							mes "We'll never meet each other anymore..";
+							getitem  617,1; //Old Violet Box
+							getexp 1800000,0; //Exp 1800000
+							set dtseligible , 1; //Here is Voting Right (dts warper)
+							set SCHWALTZVALT_PART2, 24;
+							close;
+							}
+		
+
+if (questpass_swaltwaltp1==1) goto l_alreadydone;							
+if ( (SCHWALTZVALT_PART1==2) || (SCHWALTZVALT_PART1==3) ) goto Quest_enable;
+if  ( (SCHWALTZVALT_PART1==1) && (gettime(5)!=schwalzday) ) goto L_NEXTDAY;
+if  (SCHWALTZVALT_PART1==1) goto l_hadspoken;
+mes "[Ghalstein]";
+mes "Hello,";
+mes "is this a great city?";
+menu "Hello",-,"This is a great city indeed",L_GREAT,"is still ok",L_OK;
+next;
+mes "[Ghalstein]";
+mes " Yes, It a nice day. I wish you have good time in our city. See you later";
+close;
+
+L_OK:
+next;
+mes "[Ghalstein]";
+mes "I like such sunny days... In such beautiful town...";
+close;
+
+L_GREAT:
+next;
+mes "[Ghalstein]";
+mes "Well. This great city is only for really great people.";
+mes "I wish you have good time here. Enjoy.";
+close2;
+mes "[??????]";
+mes "is here";
+mes "......";
+mes "[??????]";
+mes "hurry before we let people discover";
+mes "us...";
+mes "heard a familiar sound";
+menu "Continue listen",l_listen,"do not listen",l_nolisten;
+
+l_listen:
+next;
+mes "[??????]";
+mes "Its all as we suposed to... Everything is similar to our plan";
+mes "[??????]";
+mes "Yes, thats really cool.";
+next;
+mes "[??????]";
+mes "PSSS. Be silent";
+mes "I think somebody else is here listening us. We will meet the other day.";
+mes "[??????]";
+mes "I agree";
+set SCHWALTZVALT_PART1,1;
+set schwalzday, gettime(5);
+close;
+end;
+
+l_nolisten:
+next;
+mes "["+strcharinfo(0)+"]";
+mes "I dont think this is interesting for me.";
+close;
+end;
+
+L_NEXTDAY:
+mes "[Ghalstein]";
+mes "hi, how are you,";
+mes "today weather is good?";
+menu "Yes",l_da,"but last night",-;
+next;
+mes "[Ghalstein]";
+mes "What was last night? I've heard nothing about it. Anything strange had happened?";
+menu "I've heard you speaking to somebody about strange things.",-,"Nothing, sorry",L_NOTHING;
+next;
+mes "[Ghalstein]";
+mes "I think you are mistaken guy. I dont know what are you talking about";
+menu "Dont make a fool from me.",-,"Ok, sory",L_NOTHING;
+next;
+mes "[Ghalstein]";
+mes "I say you, that i hadn't speak to anybody yesterday.Hey, Protector come here plese";
+next;
+mes "["+strcharinfo(0)+"]";
+mes "..........";
+mes "if really not him, he shouldn't";
+mes "denied it so strongly";
+mes "..........";
+next;
+mes "[Protector]";
+mes "I have no intention to";
+mes "interrogation you?";
+mes "just because...";
+menu "The matter that Mr.Ghalstein dealing with..",-,"i feel curious about it?",l_curious;
+next;
+mes "["+strcharinfo(0)+"]";
+mes "I clearly remember him talking to somebody about some strange plans. I think he is planning something restrickted...";
+next;
+mes "[Protector]";
+mes "Hm... Is that so mr. Ghalstein? Do you remember the constitution? Tell us the truth, or i shall arrest you";
+next;
+mes "[Ghalstein]";
+mes "oh.. Ok. I was speaking about our community. Nothing interesting...";
+next;
+mes "[Protector]";
+mes "Ok. Its about your Fishing clan? If so, i leave you. See you later";
+next;
+mes "[Ghalstein]";
+mes "Well, I will tell you the truth. Please give me sometime to consider....";
+mes "I belong to a secret group that antagonistic with another group and so we need some items";
+mes "to be protected. So we were going to organize a trip to Reagent Shaw Research Center.";
+next;
+mes "[Ghalstein]";
+mes "You can get there if you have passed BioLab quest. Its the second and third lvl.";
+mes "But we have no brave to go there. What about helping us?";
+menu "Ok, i shall help",-,"No,thanks",L_NOTHX;
+next;
+mes "[Ghalstein]";
+mes "well then.But you must take this pill to go this quest. This pill will add some status to you.";
+mes "when you shall finish quest - i will delete this status from your char.Is it OK with you?. I think It is.";
+if ( checkweight(7226,1) == 0 ) goto l_overweight;
+getitem (7226),1;
+next;
+mes "[Ghalstein]";
+mes "I want you to collect all related biological exhibit and no need big quantity plus the most important thing.";
+mes "You will simply recognize that things";
+mes "There are some strange mobs there. So be careful. And last...People who go there dissapear. Nobody was back from there...";
+next;
+mes "[Ghalstein]";
+mes "So you had to go to 2 and 3 lvl of BioLab. Be sure you have finish this quest. And bring me 10 Lab staff records, 10 Armlet of prisoner and 1 Pile of Imir heat";
+set SCHWALTZVALT_PART1,2;
+
+set schwalzday,0;
+close;
+
+l_curious:
+mes "[Ghalstein]";
+mes "even so i dont want to speak to smb who say such fool things. Cya.";
+close;
+
+L_NOTHX:
+mes "[Ghalstein]";
+mes "ye, its a pity i think. Have a nice day";
+close;
+
+L_NOTHING:
+mes "[Ghalstein]";
+mes "I've never think guy like you can think this way about me. I dont want to speak to you anymore";
+close;
+
+l_overweight:
+mes "["+strcharinfo(0)+"]";
+mes "sorry you can't take this item";
+close;
+
+
+Quest_enable:
+if (countitem (7345) >= 10) && (countitem(7347) >=10) && (countitem(7346) >=1) goto Quest_end;
+mes "[Ghalstein]";
+mes "You havent geather items yet. Come back when you should.";
+close;
+
+Quest_end:
+mes "[Ghalstein]";
+mes "Well done. You have finished my part of quest.";
+mes "Now, Visit Gushaar. He can be found sowhere around Yuno.";
+next;
+mes "[Ghalstein]";
+mes "Yes, i have forgotten....";
+mes "Now you are member of society Wind of Secret!";
+mes "congratulations!";
+delitem (7345),10;
+delitem (7347),10;
+delitem (7346),1;
+getitem (7226),1;
+getitem (7348),1;
+set questpass_swaltwaltp1,1;
+close;
+
+l_hadspoken:
+mes "[Ghalstein]";
+mes "Sorry, but i have nothing to say to you anymore. Buy.";
+close;
+
+l_da:
+mes "[Ghalstein]";
+mes "Im happy you have time to think so too. See you";
+close;
+
+l_alreadydone:
+mes "["+strcharinfo(0)+"]";
+mes "I have already done this quest. I dont want to go there once more time!";
+close;
+}
+//=======================================================================
+lhz_dun02.gat,268,287,4	script	The broken Manufactoring	111,{
+if SCHWALTZVALT_PART1!=2 goto l_end;
+mes "[The broken Manufactoring]";
+mes "You see something shining inside the spoiling machines.Open up the machinr and check it,detected a round shape";
+mes "object wich circulate with a mysterious shines.";
+menu "Its seems like an important object",-,"But it looks nothing musch",l_nottake;
+getitem(7346),1;
+set SCHWALTZVALT_PART1,3;
+mes "["+strcharinfo(0)+"]";
+mes "Well, Now i suppose everything will be ok.";
+close2;
+npctalk "Creeep... Creeeep-Creep...*pfu*.";
+mes "["+strcharinfo(0)+"]";
+mes "Oooops....I dont think this machien will work anymore... I'll go better from here";
+close;
+end;
+l_nottake:
+close;
+
+l_end:
+mes "You see nothing there...";
+close;
+}
+//////////////////////////////////////////////////////////////////////////////////////////////////////////
+//Ending. Lighthalzen, Swaltzwalt Quest Part 1/////////////////////////////////////////////////////////
+//////////////////////////////////////////////////////////////////////////////////////////////////////////
+
+//NPC01 - Dismal Guy
+yuno_fild04.gat,165,245,5	script	Dismal Guy	89,{
+if (SCHWALTZVALT_PART2>0) {
+					mes "[Dismal Guy]";
+					mes "Make your mission..we need you..";
+					close;
+					}
+mes "[Dismal Guy]";	
+mes "Maybe you have some thing to show me?";
+menu "Yeah, I have it",-,"I don't know what do you mean",DG_end01;
+if ((countitem(7348)==0) || (questpass_swaltwaltp1!=1))  { //Membership Card, Çäåñü ïðîâåðêà, ïðîéäåíà ëè ïåðâàÿ ÷àñòü êâåñòà
+					next; 
+					mes "[Dismal Guy]";
+					mes "You are trying to cheat me?";
+					mes "You don't have item which I am interesting in..";
+					mes "Bye! Come back, when you will have what I want.";
+					close;
+					 }
+//next;
+//mes "[Dismal Guy]";
+//mes "emm....";
+//mes "got red and blue pill,";
+//mes "which one you choose?";
+//menu "Red pill",-,"Blue pill",-; //Íàäî óçíàòü, ÷òî áóäåò åñëè âûáðàòü ñèíèþ ïèëþëþ (ïî èäåè â ïåðâîé ÷àñòè ÍÏÖ ìîæåò äàòü ëìáî ñèíþþ, ëèáî êðàñíóþ, íî ò.ê. îí äàåò ïðîñòî ïèëþëþ, òî çäåñü åñòåñíî ýòî íåíóæíî)
+//mes "Nowadays isn't the best time to live..";
+next;
+mes "[Dismal Guy]";
+mes "Schwaltzvalt is control by evil ^0000FFRekenber Enterprise^000000";
+mes "But we have organized a resistance called ^FF0000Wing Of Secret^000000 with the help of the President ^0000FFKarl Weierstrass^000000 to reform Schwaltzvalt Republic from the control of ^0000FFRekenber Enterprise^000000!";
+next;
+mes "[Dismal Guy]";
+mes "I have a task for you.";
+mes "You need to meet the candidate which won the president election ^0000FFKarl Weierstrass^000000";
+mes "He wants to reform Schwaltzvalt Republic from the control of ^0000FFRekenber Enterprise^000000";
+next;
+mes "[Dismal Guy]";
+mes "If you will unable to see ^0000FFKarl Weierstrass^000000, coordinate with his secrtary in Yuno at appointed time.";
+mes "The best time will be betwen 8pm to 11pm or betwen 11am to 2pm";
+set SCHWALTZVALT_PART2, 1; //Ïåðâûé ÍÏÖ ïðîéäåí, òåïåðü ìîæíî ê ñåêðåòàðþ.
+next;
+mes "[Dismal Guy]";
+mes "The fate of the whole Republic in your brave hands! Bye!";
+close;
+
+DG_end01:
+next;
+mes "[Dismal Guy]";
+mes "It'a a pity, I am finding you a good person..";
+close;
+}
+
+//NPC02 - President's Secretary
+yuno_pre.gat,69,20,5	script	President's Secretary::pre	862,{
+if (SCHWALTZVALT_PART2==4) {
+							mes "[Hes O'Neil]";
+							if(countitem(7342)==0) {mes "Where is documemt?";close;} //Çäåñü ÈÄ äîêóìåíòà, íàäî óçíàòü ó Ëóïóñà.
+							delitem 7342,1; //Çäåñü ÈÄ äîêóìåíòà, íàäî óçíàòü ó Ëóïóñà.
+							mes "Thanks a lot!";
+							set SCHWALTZVALT_PART2, 5; //Òåïåðü ñ ñåêðåòàðøåé âî âòîðîé ðàç âñå, èäåì ê Venice
+							close;
+							}
+if (SCHWALTZVALT_PART2>=2) {
+						mes "[Hes O'Neil]";
+						mes "I glad to see you again!";
+						close;	
+							}		
+									
+if ( (gettime(3)>23) && (gettime(3)<11) ) || ( (gettime(3)>14) && (gettime(3)<20) ) {
+																					mes "[Hes O'Neil]";
+																					mes "It isn't reception time.";
+																					mes "Come back betwen 8pm to 11pm or betwen 11am to 2pm.";
+																					close;
+ 																					}
+
+
+mes "[Hes O'Neil]";
+mes "Who are you?";
+mes "How can I help?";
+menu "emm..",-,"Meet up with Mr.President",PS_meet,"Nothing",PS_end01;
+
+if (SCHWALTZVALT_PART2==1) {
+							next;
+							mes "[Hes O'Neil]";
+							mes "Heh, you don't know how to explain youself:)";
+							mes "But I know that Mr.President is waiting for you. Good Luck!";
+							set SCHWALTZVALT_PART2, 2; //Âòîðîé ÍÏÖ ïðîéäåí, äàëåå ê ñòðàæíèêó.
+							close;
+							}
+
+next;
+mes "[Hes O'Neil]";
+mes "What do you want?";
+mes "Don't waste my time please!";
+close;
+
+PS_meet:
+next;
+mes "[Hes O'Neil]";
+mes "Sorry, but Mr.President is very busy.";
+//emotion 14; //sry
+close;
+
+PS_end01:
+next;
+mes "[Hes O'Neil]";
+mes "Sorry, I did't help you:(";
+//emotion 14; //sry
+close;
+}
+
+yuno_pre.gat,75,71,3	duplicate(pre)	President's Secretary#2	862,0,0
+
+//NPC03 - Security
+yuno_pre.gat,95,71,5	script	Security::sec	899,5,5	{
+if (SCHWALTZVALT_PART2==4) {
+							mes "[Security]";
+							mes "Mr.President still meeting with other person.";
+							close;
+							}
+if  (SCHWALTZVALT_PART2>=3) {
+							mes "[Security]";
+							mes "Mr.Presideny is free now. You can come in.";
+							close2;
+							warp "yuno_pre.gat",75,70;
+							end;
+							}
+if  (SCHWALTZVALT_PART2!=2)  { 
+							mes "[Security]";
+							mes "Nobody has disposed to pass you!";
+							close;
+							}
+if (rand(9)!=0) {
+				mes "[Security]";
+				mes "Please hold on for a moment.";
+				mes "Mr.President still meeting with other person.";
+				close;
+				}
+enablenpc "kurelle";
+mes "[Keshnaar]";
+mes "Mr.President denied my petition about medical marihuana...";
+//emotion 25; //sob
+next;
+mes "[Keshnaar]";
+mes "I have collected 1000 signatures of the townspeople and nothing...";
+//emotion 25; //sob
+next;
+mes "[Keshnaar]";
+mes "Ok I must go and collect more signatures!";
+next;
+disablenpc "A Fine Gentleman";
+
+mes "[Security]";
+mes "Now Mr.President is free, you can pass.";
+G_menu:
+menu "Ok",S_warp,"Who is he?",-;
+next;
+mes "[Security]";
+mes "Are you talking about Mr.Keshnaar?";
+mes "Mr.Keshnaar works for Rekenber. He consulted with Mr.President.";
+next;
+goto G_menu;
+
+S_warp:
+set SCHWALTZVALT_PART2, 3; //Ó îõðàííèêà âñå, òåïåðü ê ïðåçèäåíòó.
+close2;
+warp "yuno_pre.gat",75,70;
+
+OnTouch:
+if (SCHWALTZVALT_PART2==4) { 
+							mes "...Suddenly your heard voices behind the door...";
+							mes "...but is too slighty, can't heard clearly...";
+							next;
+							mes "[?????]";
+							mes "...is true..";
+							mes "so........";
+							mes "......president...";
+							mes "[?????]";
+							mes "..their Investigation...";
+							mes ".........";
+							mes "....trap....";
+							mes "[?????]";
+							mes "...stop them....how?";
+							mes ".....,surely...";
+							mes "[?????]";
+							mes "next?...election...";
+							mes "....elected...";
+							next;
+							mes "...the sound became more slighty...";
+							mes "...can't heard anymore...";
+							close;
+							}
+}
+
+//NPC04 - A Fine Gentleman
+yuno_pre.gat,96,69,3	script	A Fine Gentleman::kurelle	82,{
+close;
+}
+//NPC - KURELLE
+yuno_pre.gat,69,74,0	duplicate(kurelle)	Kurelle#1	109,0,0
+
+//NPC - Security in presidents room
+yuno_pre.gat,76,72,8	duplicate(sec)	Security#2	899,0,0
+
+//NPC05 - President Karl
+yuno_pre.gat,69,79,5	script	President Karl	872,{
+cutin "lhz_karl",2;
+if (SCHWALTZVALT_PART2==22) {
+							mes "...after the story about traitor ^FF0000Kurelle^000000 president looks stunned...";
+							next;
+							mes "[President Karl]";
+							mes "CALL MY SECRETARY NOOOOOOW!!!";
+							next;
+							mes ".....";
+							next;
+							enablenpc "President's Secretary#2";
+							mes "...Secretary looks too afraid...";
+							next;
+							cutin "",255;
+							mes "[Hes O'Neil]";
+							mes "Yes sir! What is your oders?";
+							next;
+							cutin "lhz_karl",2;
+							mes "[President Karl]";
+							mes "INVITE THIS TRAITOR ^FF0000KURELLE^000000 NOOOOW!!!";
+							next;
+							disablenpc "President's Secretary#2";
+							mes ".....";
+							next;
+							enablenpc "Kurelle#1";
+							mes "[President Karl]";
+							mes "What happened? Why did you betray us?";
+							next;
+							cutin "",255;
+							mes "[Kurelle]";
+							mes "You are right. I did it. I report all of your actions to the enterprise...";
+							mes "I did it by myself.";
+							next;
+							mes "[Kurelle]";
+							mes "When I carry on my plan, I meet with Rekenber people who are monitoring you...ha-ha!";
+							next;
+							mes "[Kurelle]";
+							mes "Therefore I take those opportunity to propose them my plan,";
+							mes "I provide information t0 them, to force you step down, I WILL BE THE NEXT PRESIDENT!!! HA-HA-HA";
+							next;
+							mes "[Kurelle]";
+							mes "Although you'll not step down sp soon...but your team will lost seriously!";
+							next;
+							mes "[Kurelle]";
+							mes "Yeap, your era is gone...";
+							mes "Now you can't do anything, just waiting to step down then is enough...";
+							mes "Ha ha...";
+							next;
+							cutin "lhz_karl",2;
+							mes "[President Karl]";
+							mes "SECURITY!!!";
+							enablenpc "Security#2";
+							next;
+							next; 
+							mes "[President Karl]";
+							mes "He is crazy!! Jail him now!";
+							next;
+							cutin "",255;
+							mes "[Security]";
+							mes "Yes sir!";
+							disablenpc "Security#2";
+							disablenpc "Kurelle#1";	
+							next;
+							cutin "lhz_karl",2;
+							mes "[President Karl]";
+							mes "It is the end of our Rebublic..";
+							mes "Soon it will fall..";
+							next;	
+							mes "[President Karl]";
+							mes "Thank you brave man ..";	
+							mes "...go away. Now I must stay here and wait the END..";	
+							set SCHWALTZVALT_PART2, 23;
+							cutin "",255;
+							close;
+							}
+if (SCHWALTZVALT_PART2==20) {
+							mes "[President Karl]";
+							mes "Very interesting...";
+							mes "With this information can give enterprise a big hit.";
+							if(countitem(7343)==0) {mes "Where is documemt?";cutin "",255; close;} //Sealed documemt
+							delitem 7343,1; //Sealed documemt
+							next;
+							mes "[President Karl]";
+							mes "But I can't understand why should we withdraw our members?...";
+							mes "...can you go to Esuna and ask her for reasons?";
+							set SCHWALTZVALT_PART2, 21; //Îáðàòíî ê Åñóíå! (èçäåâàòåëüñòâî äëÿ èãðîêîâ:))))
+							cutin "",255;
+							close;
+							}
+if (SCHWALTZVALT_PART2==18) {
+							mes "[President Karl]";
+							mes "It can't be true! You broght me a file containing all details of the Shinokas case!! ";
+							if(countitem(7344)==0) {mes "Where is Shinokas documemt?";cutin "",255; close;} //Shinokas documemt
+							delitem 7344,1; //Shinokas documemt
+							set SCHWALTZVALT_PART2, 19; //Îáðàòíî ê Åñóíå!
+							next;
+							mes "...President Karl attentivly looking thought the papers...";
+							next;
+							mes "[President Karl]";
+							mes "The death of ^FF0000Shinokas^000000...";
+							mes "It is not important for us.."; 
+							mes "The most important thing is what they are going to do with ^0000FFYmir Heart Piece^000000 what is their main purpose."; 
+							next;
+							mes "[President Karl]";
+							mes "I heard that when you are on the way to me. ^FF0000Esuna^000000 gained new information.";
+							mes "Bye! I will be waiting for new information. ";
+							cutin "",255;
+							close;
+							}
+if (SCHWALTZVALT_PART2==9) {
+							mes "[President Karl]";
+							mes "Ohh! You brought me this secret document!? You are awesome!";
+							if(countitem(7343)==0) {mes "Where is documemt?";cutin "",255; close;} //Sealed Document
+							delitem 7343,1; //Sealed Document
+							mes "Let's see...";
+							next;
+							mes "[President Karl]";
+							mes "...";
+							next;
+							mes "[President Karl]";
+							mes "It is very-very interesting! One of ^0000FFRekenber Enterprise^000000 researcher is hiding in a secret place!";
+							mes "He knows some secret!!!!! His name is ^FF0000Shinokas^000000";
+							mes "...and the secret place is...";
+							next;
+							mes "[President Karl]";
+							mes "...^FF0000Einbroch^000000";
+							mes "So..your second mission is to find ^FF0000Shinokas^FF0000 in ^FF0000Einbroch^000000 and to know his secret!";
+							next;
+							mes "[President Karl]";
+							mes "Do you have any questions?";
+							next;
+							mes "["+strcharinfo(0)+"]";
+							mes "Yes...I hane one..";
+							mes "Shinikas is...";
+							next;
+							cutin "",255;
+							enablenpc "Security#2";
+							enablenpc "President's Secretary#2";
+							next;
+							mes "[Secutity]";
+							mes "Mr.President, Mrs.Hes O'Neil has urgent matter to see you. ";
+							next;
+							mes "...Mrs.Hes O'Neil brooght to the President a pack of documents...";
+							next;
+							cutin "lhz_karl",2;
+							mes "[President Karl]";
+							mes "Thanks to Mrs.Hes O'Neil we found a secret file! It is in the store room of ^0000FFReagent Belfa Headquater^000000";
+							next;
+							mes "[President Karl]";
+							mes "Ok. Go somewhere around ^FF0000Lighthalzen^000000, waiting for ^FF0000kafra service^000000 to contact with you.";
+							set SCHWALTZVALT_PART2, 10; //Âçÿëè âòîðóþ ìèññèþ ó Ïðåçèäåíòà, 
+							next;
+							disablenpc "Security#2";
+							disablenpc "President's Secretary#2";
+							cutin "",255;
+							close;
+							}
+if (SCHWALTZVALT_PART2>=4) {
+							mes "[President Karl]";
+							mes "See ya!";
+							cutin "",255;
+							close;
+}
+if (SCHWALTZVALT_PART2<3) {
+							mes "[President Karl]";
+							mes "Who are you doing here?!";
+							next;
+							mes "[President Karl]";
+							mes "Secutity!!!!";
+							cutin "",255;
+							close2;
+							warp "yuno.gat",153,313;
+							}
+mes "[President Karl]";
+mes "I believe, you have many questions but.. ";
+mes "...I am very busy, so the time I have is limited.";
+
+PK_menu01:
+menu "Objective of the ^FF0000Wing Of Secret^000000f",PK_obj01,"Objective of the ^0000FFRekenber Enterprise^000000",PK_obj02,"What is my Mission?",-;
+
+next;
+mes "[President Karl]";
+mes "The first mission is to go ^0000FF'Aldebaran Kafra Headquater'^000000 to meet a guy called ^FF0000 Venice^000000. Then he will let you know what to do." ;
+next;
+mes "[President Karl]";
+mes "One more thing...";
+mes "Please, bring this document to ^FF0000Hes O'Neil^000000. Then you can continue your mission.";
+getitem 7342,1; //File Folder
+set SCHWALTZVALT_PART2, 4; //Ñ Ïðåçèäåíòîì ïîêà âñå, èäåì ê ñåêðåòàðøå îïÿòü.
+cutin "",255;
+close;
+
+PK_obj01:
+next;
+mes "[President Karl]";
+mes "It is resistance organization which try to reform Schwaltzvalt Republic with my help.";
+mes "Before I was elected I was the member of this organization.";
+mes "We should not admit the control of authority by ^0000FFRekenber Enterprise^000000!!!";
+goto PK_menu01;
+
+PK_obj02:
+next;
+mes "[President Karl]";
+mes "^0000FFRekenber Enterprise^000000 - the worst organization in Rune Midgard!!";
+mes "They try to get power.";
+mes "To make the prices in shops is more expensive, to receive greater taxes from the townspeople, to start up development Rune Midgard on a way of fear and terror.";
+goto PK_menu01;
+}
+
+//NPC06 - Venice
+aldeba_in.gat,155,240,3	script	Kafra Employee	859,{
+if (SCHWALTZVALT_PART2==7) {
+							if(countitem(7343)==0) {mes "Where is documemt?";close;} //Çäåñü ÈÄ äîêóìåíòà
+							delitem 7343,1; //Sealed Document
+							mes "[Venice]";
+							mes "That is great!! You got this document!";
+							next;
+							mes "[Venice]";
+							mes "And how is Jargeah? Where is he?";
+							next;
+							mes "["+strcharinfo(0)+"]";
+							mes "He is....";
+							next;
+							mes "[Venice]";
+							mes "I see...";
+							mes "Here is document, give it to the President!";
+							getitem 7343,1; //Sealed Document
+							set SCHWALTZVALT_PART2, 9; //C Venice âî âòîðîé ðàç ïîêîí÷åíî, èäåì îòäàâàòü äîêóìåíò ê Ïðåçèäåíòó.
+							close;
+							}
+if (SCHWALTZVALT_PART2==6) {
+						mes "[Venice]";
+						mes "Find Jargeah please!";
+						close;
+							}
+mes "["+strcharinfo(0)+"]";
+mes "Can I know... are you Venice?";
+next;
+if (SCHWALTZVALT_PART2!=5) {
+							mes "[Kafra Employee]";
+							mes "May be yes and may be no!";
+							mes "I am thinking, go away!";
+							close;
+							}
+mes "[Venice]";
+mes "Yes, I am Venice.";
+mes "What can I do for you?";
+
+menu "Let her see the logo",-,"Nothing",V_end01;
+
+next;
+mes "[Venice]";
+mes "Now I think that I can trust you..";
+next;
+mes "[Venice]";
+mes "I am the member of ^FF0000Wing Of Secret^000000 organization.";
+mes "I got terrible news...";
+next;
+mes "[Venice]";
+mes "With our agent something happened on the half way between ^FF0000Lighthalzen^000000 and ^FF0000Einbroch^000000 in ^FF0000Grim Reaper's Valley^000000.";
+mes "He needs help, his name is ^FF0000Jargeah^000000. Hurry up please!";
+set SCHWALTZVALT_PART2, 6; //Ñ Venice â ïåðâûé ïîêîí÷åíî èäåì èñêàòü Jargeah
+close;
+
+
+V_end01:
+next;
+mes "[Venice]";
+mes "Ok, come back when you will ready.";
+close;
+						
+}
+
+//NPC07 - Jargeah
+lhz_fild02.gat,228,214,1	script	A Wounded Man	887,{
+mes "["+strcharinfo(0)+"]";
+mes "It looks like a dead man...";
+if (SCHWALTZVALT_PART2!=6) {
+							mes "["+strcharinfo(0)+"]";
+							mes "He is dead!!! I must go away from here...";
+							close;
+							}
+mes "Maybe I can try to find something in his clothes..";
+mes "...It isn't good, but I need to make it..";
+next;
+mes "...";
+next;
+mes "You found the Sealed Document!";
+next;
+getitem 7343,1; //Sealed Document
+set SCHWALTZVALT_PART2, 7;
+close;
+}
+
+//NPC08 - Esuna
+lhz_fild01.gat,66,219,3	script	A Mystery Woman	859,20,20{
+if (SCHWALTZVALT_PART2==21) {
+							mes "[Esuna]";
+							mes "..........";
+							mes "The traitor in the internal is the problem!";
+							mes "..........";
+							next;
+							mes "[Esuna]";
+							mes "Those who able to seal the secret information, and drain it to opponents, only the President ";
+							mes "or his trusted aide with his ability ^FF0000Kurelle^000000";
+							next;
+							mes "[Esuna]";
+							mes "According to this information, he often meets with the organaizer of enterprize, ";
+							mes "from here we can said that he is the most suspicious target.";
+							next;
+							mes "[Esuna]";
+							mes "After infiltrated his residence, we found a lot of information and evidences that related with him!";
+							next;
+							mes "[Esuna]";
+							mes "The headquater odered us to hold any actions correlated with the President,  ";
+							mes "and we determined that there is only disadvantage and it won't bring benefits anymore...";
+							next;
+							mes "[Esuna]";
+							mes "I think this is the last, good bye...";
+							set SCHWALTZVALT_PART2, 22; //Îïÿòü ê ïðåçèäåíòó! (óáåéñÿ îá ñòåíó åùå ðàç, è ïîìíè, òû ýòî äåëàåøü ðàäè 1.8êê îïûòà) 
+							close;
+							}
+if (SCHWALTZVALT_PART2==19) {
+							mes "[Esuna]";
+							mes "I am too nervous..I lost many people of my group!";
+							mes "So we should use plan B. We must withdraw our members from Schwaltsvalt!";
+							next;
+							mes "[Esuna]";
+							mes "I think that it will be the best thing which we can do for our people.";
+							mes "Here is documents, containing the plan of operation and some negative information about ^0000FFRekenber Enterprise^000000, go to the President he must look throught this documents.";
+							getitem 7343,1; //Sealed Document
+							set SCHWALTZVALT_PART2, 20; //Îïÿòü ê ïðåçèäåíòó! 
+							close;
+							}
+if (SCHWALTZVALT_PART2==17) {
+							mes "[Esuna]";
+							if(countitem(7344)==0) {mes "Where is Case of Xinucarse";close;} //Çäåñü ÈÄ äîêóìåíòà, 
+							mes "Haha!! You got these secret documents!! You are great!";
+							delitem 7344,1; //Case of Xinucarse
+							set SCHWALTZVALT_PART2, 18; //Ìèññèÿ âûïîëíåíà! part 2 finished
+							mes "[Esuna]";
+							mes "I addded some new docements to the file! ";
+							getitem 7344,1; //Case of Xinucarse
+							next;
+							mes "[Esuna]";
+							mes "Now go to the President with this documents! ";
+							close;
+							}
+if (SCHWALTZVALT_PART2==10) {
+mes "[Esuna]";
+mes "Due to emergency I'll give you a short brief, firstly the target of the mission is to infiltrate into the internal of enterpeise and steal the secret information.";
+next;
+mes "[Esuna]";
+mes "It's too difficult to ifiltrate into the iternal, but we have secret agent from our side.";
+mes "Go to ^0000FFpass^000000 and disarm the security system, and then bring out the information.";
+next;
+mes "[Esuna]";
+mes "To cheat the security system fo first to the ^FF0000L.T.G. Store^000000 and buy some stuff.";
+mes "After you entered, find a person called ^FF0000Lestin^000000";
+set SCHWALTZVALT_PART2, 11; //C êàôðî ñåðâèñîì âñå, èäåì èñêàòü Ëåñòèíà
+close;
+}
+mes "[Esuna]";
+mes "I try to find some mushrooms...bye!";
+close;
+OnTouch:
+if (SCHWALTZVALT_PART2==10) {
+mes "?????";
+mes "..here..plz...come over..";
+close;
+														}
+}
+
+//Òóò âîïðîñ ñ âàðïîì, äî Ëåñòèíà íå íàøåë êàê äîéòè, íàäî âàðï ê íåìó ïîñòàâèòü...âîò òóò lhz_in01 277 157
+//NPC09 - Lestin
+lhz_in01.gat,285,169,3	script	Researcher#2	865,{
+if (SCHWALTZVALT_PART2==16) {
+							mes "[Lestin]";
+							mes "My entry pass! Thank you.";
+							if(countitem(7349)==0) {mes "Where is my enty pass?";close;} //Card To Enter Document Room.
+							delitem 7349,1; //Card To Enter Document Room.
+							set SCHWALTZVALT_PART2, 17; //Òåïåðü ìîæíî îòäàòü äîêóìåíòû Åñóíå è çàêîí÷èòü âòîðóþ ÷àñòü êâåñòà.
+							next;
+							mes "[Lestin]";
+							mes "Now, go to Esuna with these documents. Bye!";
+							close;
+							}
+if (SCHWALTZVALT_PART2==11) {
+							mes "["+strcharinfo(0)+"]";
+							mes "Are you Lestin?";
+							next;
+							mes "[Lestin]";
+							mes "Yes, I am!";
+							mes "And you are a member of ^FF0000Wing Of Secret^000000 organization!";
+							mes "I can help you to steal secret documents!";
+							next;
+							mes "[Lestin]";
+							mes "Here is my ^0000FFpass^000000, but whis this ^0000FFpass^000000 you only can stay for ^FF00003 minutes^000000";
+							getitem 7349,1; //Card To Enter Document Room.
+							next;
+							mes "[Lestin]";
+							mes "The secret information is located at the right hand-side of the research room where I stayed just now. And this...!";
+							next;
+							mes "[Lestin]";
+							mes "...return me my ^0000FFpass^000000 when you will finish! Good Luck!";
+							set SCHWALTZVALT_PART2, 12; //Òåïåðü èäåì ïîõèùàòü äîêóìåíò!
+							}
+mes "[Researcher]";
+mes "Hmm... I wonder...";
+close;
+}
+
+//Ðàñïèøó ñèñòåìó äâåðåé:
+//Ó Ëåñòèíà ïîëó÷àåì ïåðåìåííóþ 12...
+//1. åñëè 12, 13 ,14 è ôëàã äâåðè 0(ò.å. åñòü ñòðàæíèêè) èäåì àêòèâèðîâàòü ãâàðäîâ
+//2. çàïóñêàåòñÿ òàéìåð, ñòðàæíèêè ïðîïàäàþò, ôëàã äâåðè = 1
+//3. ó íàñ åñòü 3 ìèíóòû, ÷òîáû ñäåëàòü âñå, ïîäõîäèì ê äâåðè, åñëè ïðàâèëüíî ââîäèì êîä, êàðòî÷êà îñòàåòñÿ â äâåðè, íàì ïðèñâàèâàþò ïåðåìåííóþ 13, âàðïàåò âíóòðü
+//4. íàæèìàåì íà ñèñòåìó ïîèñêà, ââîäèì Shinokas, òîãäà ïðèñâàèâàþò 14, àêòèâèðóåòñÿ àðåà1-5
+//5. òûðêàåì íà àðåà1-5, ïîëó÷àåì äîêóìåíòû, íàì ïðèñâàèâàåòñÿ 15, ìîæíî èäòè ê äâåðè
+//6. åñëè ó íàñ 15 è ôëàã äâåðè 1 (ò.å. åøå øâàðäîâ íåò), òî áëàãîïîëó÷íî ïîëó÷àåì êàðòî÷êó íàçàä è âûõîäèì, ïîëó÷àåì 16
+//Åñëè íå óñïåëè è ìû âíóòðè, çíà÷èò ó íàñ ïåðåìåííàÿ 13, 14 èëè 15, ôëàã äâåðè 0, ïðîïóñê èñ÷åçàåò è íàñ âûêèäûâàåò èç ëîêàöèè, ïðèäåòñÿ ñíîâà èäòè ê Ëåñòèíó çà ïðîïóñêîì 
+//Äîïóñòèì ó íàñ 15 î÷êîâ ìû âíóòðè, âðåìÿ èñòåêëî. Äâà âàðèàíòà - íàæàòü íà äâåðü, òîãäà ïðèäåòñÿ èäòè ê ëåñòèíó ñíîâà, ïåðåìåííàÿ 11 ñòàíîâèòñÿ. Ëèáî óìåðåòü è òîïàòü ê àêòèâàöèè ãâàðäîâ.
+//NPC10 - Door
+lhz_in01.gat,177,30,1	script	Door	111,{
+if ( (SCHWALTZVALT_PART2==15) && ($SCHWALTZVALT_DOOR_FLAG==1) ) {
+																mes "You take out enty key.";
+																next;
+																mes "["+strcharinfo(0)+"]";
+																mes "Hm....I need to bring this key to Lestin!";
+																getitem 7349,1; //Card To Enter Document Room. 
+																set SCHWALTZVALT_PART2, 16; //Ê Ëåñòèíó
+																menu "Go out!",-;
+																close2;
+																warp "lhz_in01.gat",177,27;	
+																end;
+																}
+																
+
+if ( (SCHWALTZVALT_PART2<15) && (SCHWALTZVALT_PART2>=13) && ($SCHWALTZVALT_DOOR_FLAG==0) ) {
+																menu "Go out!",-;
+																set SCHWALTZVALT_PART2,11; //íåóäà÷à, îïÿòü ê ëåñòèíó
+																mes "[Guards]";
+																mes "Intruder!!!";
+																close2;
+																warp "lighthalzen.gat",104,238;	
+																end;
+																			}
+if  (SCHWALTZVALT_PART2>15) { mes "I got all the documents I needed!";
+							close;
+							}				
+if ((SCHWALTZVALT_PART2<13) && $SCHWALTZVALT_DOOR_FLAG==0) {
+ 								mes "Here is Guards, they can't let you infiltrate!";
+ 								mes "You need to wait a little.";
+ 								close;
+								}
+if ( (countitem(7349)>0) && (SCHWALTZVALT_PART2==12) && ($SCHWALTZVALT_DOOR_FLAG==1)) {//Card To Enter Document Room. ÈÄ ïðîïóñêà, ñïðîñèòü ó Ëóïóñà
+											mes "You have the entry pass. You can infiltrate now.";
+											menu "Infiltrate",-;
+											mes "Please, input code number!";
+											input @tmp_code;
+											if (@tmp_code != 738495) {next; mes "Incorrect code!"; close;} //Ýòî ÷èñëî â îïèñàíèè ïðîïóñêà äîëæíî áûòü
+											next;
+											delitem 7349,1; //Card To Enter Document Room
+											mes "Accepted.";
+											mes "You can stay in the documents room only for 3 minutes!.";
+											set SCHWALTZVALT_PART2, 13; //ïóñòèëè âíóòðü
+											close2;
+											warp "lhz_in01",178,33;
+											end;
+										}
+mes "....";
+close;
+
+}
+
+//NPC11 - Activate Guards
+lhz_in01.gat,187,30,4	script	Point of the review	111,1,0{
+close;
+OnTouch:
+if ( (SCHWALTZVALT_PART2<=15) && (SCHWALTZVALT_PART2>=12) && ($SCHWALTZVALT_DOOR_FLAG==0) ){
+							mes "...It seemed that guards gonna smoke...";
+							stopnpctimer;
+							initnpctimer "schwalt2timer";
+							set $SCHWALTZVALT_DOOR_FLAG,1;
+							close;
+						}
+mes "Nothing happened..";
+close;
+}
+
+//NPC12 - File Search Engine
+lhz_in01.gat,180,35,4	script	File Search Engine	111,1,0{
+close;
+OnTouch:
+if (SCHWALTZVALT_PART2==13) {
+							mes "-Activating the document seaching program-";
+							mes "-Please key in the information of the document...-";
+							mes "-..that you would like to search-";
+							input @tmp_phrase$;
+							if (@tmp_phrase$!="Shinokas") {next; mes "Nothing interesting was found!"; close;}
+							next;
+							mes "-relevant information of Shinokas-";
+							mes "-is being kept in area 1-5-";
+							enablenpc "area 1-5";
+							set SCHWALTZVALT_PART2, 14; //àêòèâèðîâàëè àðåà1-5
+							close;
+							}
+mes "Nothing happened..";
+close;
+}
+
+//NPC13 - area 1-5
+lhz_in01.gat,184,49,4	script	area 1-5	111,1,0{
+close;
+OnTouch:
+if (SCHWALTZVALT_PART2==14) {
+                             mes "It is interesting. Here is the secret indormation about the heart of Ymir. I must bring this case to Esuna.";
+                             getitem 7344,1; //Case of Xinucarse Èä ñïðîñèòü ó Ëóïóñà
+                             set SCHWALTZVALT_PART2, 15; //Çàáðàëè äîêóìåíò, òåïåðü ê äâåðè íàðóæó
+                             close;
+							}
+
+mes "["+strcharinfo(0)+"]";
+mes "I don't know what to find!";
+close;
+}
+//Timer
+lhz_in01.gat,1,1,0	script	schwalt2timer	-1,{
+	OnTimer2000:
+		disablenpc "LhzRekGuard";
+		disablenpc "Guard#03";
+		end;
+	OnTimer182000:
+		enablenpc "LhzRekGuard";
+		enablenpc "Guard#03";
+		disablenpc "area 1-5";
+		set $SCHWALTZVALT_DOOR_FLAG,0;
+		stopnpctimer "schwalt2timer";
+		end;
 }
\ No newline at end of file
diff --git a/npc/quests/WIP/shadow_quest.txt b/npc/quests/WIP/shadow_quest.txt
index 726df6fd9..34ae2e0a3 100644
--- a/npc/quests/WIP/shadow_quest.txt
+++ b/npc/quests/WIP/shadow_quest.txt
@@ -1,416 +1,416 @@
-//===== eAthena Script ======================================= 

-//= Lighthalzen, Shadow quest

-//===== By: ================================================== 

-//= Gravity official script

-//= ColNix

-//===== Current Version: ===================================== 

-//= Fixed

-//===== Compatible With: ===================================== 

-//= eAthena SVN

-//===== Description: ========================================= 

-//= Lighthalzen 

-//===== Additional Comments: ================================= 

-//=

-//============================================================

-

-lighthalzen.gat,141,162,4	script	Old man	61,{

-readparam(baselevel);                         

-

-if (baselevel <= 70) {

-mes "["+strcharinfo(0)+"]";

-mes "It seems that i'm not as strong as i thought. Better i go to lvl.";

-close;

-} 

-	if (quest_shadow==1) {

-	mes "[Kamenasai]";

-	mes "Have you already spoken to Kazien? ooh...";

-	mes "Hurry up and find him. He must be in Lighthalzen Castle.";

-	close;

-	}

-		if (quest_shadow>1) {

-		mes "[Kamenasai]";

-		mes "I have nothing to say to you now.";

-		mes "Leave me alone";

-		close;

-		}

-

-mes "[Kamenasai]";

-mes "Hello, "+strcharinfo(0)+". Nice to see you.";

-mes "I've heard alot about you doings. And want to know, if you could help us.";

-next;	

-menu "Hm.. Interesting. Wat's the problem?",-,"No, I'm not interested",l_not;

-mes "[Kamenasai]";

-mes "I knew that you should help. So. My friend Kazien is busy due to a lack of workers,";

-mes "he has some work for you. Find him in Lighthalzen castle. Good luck";

-set quest_shadow,1;

-close;

-

-l_not:

-mes "[Kamenasai]";

-mes "It's a pity. But i cant make you change your mind. GL&HF guy. Cya";

-close;

-}

-

-//====================================================================================

-

-lhz_in01,174,258,4	script	Young man	59,{

-if (quest_shadow==1) goto l_accept;

-if (quest_shadow==3) goto l_nochance;

-if (quest_shadow==4) goto l_part1;

-if (quest_shadow==5) goto l_wtfisthat;

-if (quest_shadow==8) goto l_zadolbal;

-if (quest_shadow==10) goto l_nu;

-

-mes "[Kazien]";

-mes "What do you want? Don't you see that i'm busy now!. Leave me alone!";

-close;

-

-l_accept:

-mes "[Kazien]";

-mes "What do you want from me. Don't you see that i am busy?";

-next;

-menu "Well, i'm, from Kamenasai",-,"hm... Can i borow some money? ^_-",l_nothing;

-mes "[Kazien]";

-mes "Oh, sorry my friend. You come to help me, don't you.";

-mes "Thanks alot. I'm too busy here and cant go myself, so i let my frind to help me";

-mes "His choice is you... So. Can you keep a secret?";

-next;

-menu "Of course i can",-,"i'm not sure.",l_goaway;

-mes "[Kazien]";

-mes "Well then. Lets see. Go to Einbroch Research Facility and find Garins there.";

-set quest_shadow,2;

-close;

-

-l_nothing:

-mes "[Kazien]";

-mes "Then, please leave me alone. I dont have any wish to speak to you.";

-close;

-

-l_goaway:

-mes "[Kazien]";

-mes "Its a pity... I think my friend was wrong sending you to me. Buy.";

-close;

-

-l_part1:

-mes "[Kazien]";

-mes "I see. You dont tell That guard about your quest, so i can rely on you. It was your first task.";

-mes "Now i shall tell you all. I am trying to make some buisness. But i can't deliver goods by myself.";

-mes "So i need somebody. And this somebody is you, "+strcharinfo(0)+".";

-next;

-mes "[Kazien]";

-mes "Go and Find Lyozien near Airship. He will tell you more.";

-close;

-

-l_forget:

-mes "[Kazien]";

-mes "Oh my head. Who are you at last? Im very dull. Somebody tell the police about me";

-mes "I am so bored...So...";

-next;

-goto l_accept;

-close;

-

-l_nochance:

-if (rand(10)==9) goto l_forget;

-mes "[Kazien]";

-mes "You cant keep any secret! What do you want from me?";

-mes "I dont want to see you anymore! Go somewhere else and never come here!";

-close;

-

-l_wtfisthat:

-if (quest_shadow_misc==1) goto l_leftthis;

-mes "[Kazien]";

-mes "Hm... He is saying something interesting. I will give delivery scroll. Go to";

-mes "Lyozien and speak to him...He is at the top of all this.";

-getitem 1072,1;

-getexp 110000,0;

-set quest_shadow_mobs,1;

-set quest_shadow_misc,1;

-set quest_shadow,6;

-close;

-

-l_zadolbal:

-if (quest_shadow_misc==2) goto l_leftthis;

-mes "[Kazien]";

-mes "Hm... He dont answer...You know thats strange. Something is wrong..";

-mes "And this something can destroy our plans....";

-next;

-menu "Also bandits.. and goods",-,"In every way i'm leaving this",l_leftthis;

-mes "[Kazien]";

-mes "Hm.. So you dont still receive goods.. And you say that bandits atack you...";

-mes "Now i understand. Go to Lyozien and be careful!";

-monster "airplane_01.gat",96,48,"Rogue",1268,1,"Man::OnMyMobDeath";

-getexp 150000,0;

-set quest_shadow_misc,2;

-set quest_shadow,9;

-close;

-

-l_leftthis:

-mes "[Kazien]";

-mes "Ye.. Its a pity i think. But its your choice. Remember,if you tell somebody";

-mes "About this you shall be dead...See you later";

-close;

-

-l_nu:

-if (quest_shadow_finish==1) goto l_leftthis;

-mes "[Kazien]";

-mes "How is our work? What about goods?";

-next;

-menu "Everything was really cool. I have lots of fun",-,"It was the wersest thing.",-;

-mes "[Kazien]";

-mes "Well... in everycase.^_^ I think you were really a good comrad";

-mes "["+strcharinfo(0)+"]";

-mes "I dont think so about you. Because i work for you and i must know what ware the goods";

-next;

-mes "[Kazien]";

-mes "Don't you think that it was me who give you work, let me dicide what you must know";

-mes "Afterall thx. Without you, this work wasn't done. You help me alot. I waiting forward hearing about your greatest doings.";

-mes "See you,my hero";

-getexp 150000,0;

-set quest_shadow_finish,1;

-close;

-}

-//===================================================================================

-lhz_in01,156,248,4	script	#Kazien	-1,6,3{

-OnTouch:

-if (quest_shadow_finish==1) {

-mes "[Remindes]";

-mes "[Kazien]";

-mes "How is our work? What about goods?";

-mes "...................................";

-mes "[Kazien]";

-mes "Well... in everycase. I think you were really a good comrade";

-mes "["+strcharinfo(0)+"]";

-mes "I dont think so. Because i work for you and i must know what was there";

-next;

-mes "[Kazien]";

-mes "Don't you think that it was me who give you work, let me dicide what you must know";

-mes "Afterall thx. Without you, this work wasn't done. You help me alot. I waiting forward hearing about your greatest doings.";

-mes "See you,my hero";

-next;

-mes "["+strcharinfo(0)+"]";

-mes "Strange people are they... but i suppose that was really interesting journey...";

-set quest_shadow_finish,0;

-set quest_shadow,11;

-close;

-}

-close;

-}

-//===================================================================================

-airplane_01.gat,96,53,4	script	#maner	-1,6,3{

-OnTouch:

-if ((quest_shadow==6) && (quest_shadow_mobs==1)) {

-monster "airplane_01.gat",96,53,"Rogue",1268,5;

-set quest_shadow_mobs,0;

-}

-close;

-}

-//=======================================================================================

-airplane_01.gat,85,47,4	script	#maner01	-1,6,3{

-OnTouch:

-if ((quest_shadow==6) && (quest_shadow_mobs==1)) {

-monster "airplane_01.gat",85,47,"Rogue",1268,5;

-set quest_shadow_mobs,0;

-}

-close;

-}

-//=======================================================================================

-lhz_in01,175,234,4	script	#Kazien01	-1,6,3{

-OnTouch:

-if (quest_shadow_finish==1) {

-mes "[Remindes]";

-mes "[Kazien]";

-mes "How is our work? What about goods?";

-mes "...................................";

-mes "[Kazien]";

-mes "Well... in everycase. I think you were really a good comrade";

-mes "["+strcharinfo(0)+"]";

-mes "I dont think so. Because i work for you and i must know what was there";

-next;

-mes "[Kazien]";

-mes "Don't you think that it was me who give you work, let me dicide what you must know";

-mes "Afterall thx. Without you, this work wasn't done. You help me alot. I waiting forward hearing about your greatest doings.";

-mes "See you,my hero";

-next;

-mes "["+strcharinfo(0)+"]";

-mes "Strange people are they... but i suppose that was really interesting journey...";

-set quest_shadow_finish,0;

-set quest_shadow,11;

-close;

-}

-close;

-}

-//=======================================================================================

-

-einbroch.gat,54,52,4	script	Guard	734,{

-if (quest_shadow==2) goto l_done;

-

-mes "[Guard]";

-mes "This is restricted zone. Please leave this place.";

-close;

-

-l_done:

-mes "[Guard]";

-mes "Hey. Stop. What do you want here? Dont you know that this is restrickted zone?";

-mes "Tell me why are you here?";

-next;

-menu "Well...I'm leaving now. I dont know that",-,"Hm... Kazien asked me to find Garins.",l_garins;

-close2;

-set quest_shadow,4;

-end;

-

-l_garins:

-mes "[Guard]";

-mes "You say Kazien.. From Lighthalzen....";

-next;

-npctalk "*writing something to the notepad*";

-mes "[Guard]";

-mes "Find Garins.... Ok. Thanks. Now you are free. Go home.";

-set quest_shadow,3;

-close;

-}

-

-//========================================================================================

-

-airplane_01.gat,96,48,4	script	Man	810,{

-if (quest_shadow==4) goto l_allok;

-if (quest_shadow==5) goto l_strange;

-if (quest_shadow==6) goto l_next;

-if (quest_shadow==7) goto l_talked;

-if (quest_shadow==9) goto l_nuinah;

-if (quest_shadow==10) goto l_wazaputaus;

-

-mes "[Lyozien]";

-mes "Greeting to you. Nice weather,isn't it?";

-close;

-

-l_strange:

-mes "[Lyozien]";

-mes "Hm.. strange. Kazien tell me nothing about it. I suppose you will better go to him";

-mes "and ask about this";

-close;

-

-l_allok:

-mes "[Lyozien]";

-mes "Oki doki guy. You see, that this is restricted doing. But we must do it";

-mes "For future of our country. So. That goods are really needed to our goverment, but";

-mes "Some rogues want to robe it. We can't protect them ourselves because we are on kings work";

-next;

-mes "[Lyozien]";

-mes "So its you, who will make it";

-mes "Go to Izlude and found Ahman there. He will give you nececcery items";

-mes "Good luck";

-close;

-

-l_next:

-mes "[Lyozien]";

-mes "So. What he says??";

-next;

-mes "["+strcharinfo(0)+"]";

-mes "He say to come to you. Here is the Scroll of deliver that i must show you.";

-next;

-mes "[Lyozien]";

-mes "I suppose you should better go to Ahman and show this... In cas, i have no goods to give you.";

-close;

-

-l_talked:

-mes "[Lyozien]";

-mes "Well... You say He dont answer... I suppose You better go to Kazien and tell him this.";

-mes "It seemes to that it wasnt our plan.. i fear... Noway. Hurry up to Kazien";

-set quest_shadow,8;

-close;

-

-l_nuinah:

-if mobcount("airplane_01.gat","Man::OnMyMobDeath")==0 goto ondeath;

-mes "[Lyozien]";

-mes "Well.. I really dont know. But i will never tell you wat are the goods";

-mes "hey, Bandit is there! LOOK!!!";

-close;

-

-

-OnDeath:

-if looked==1 {

-mes "[Lyozien]";

-mes "I have already given you medicine. Hurry. Somebody";

-mes "wants to stop us!";

-close;

-}

-

-mes "[Lyozien]";

-mes "Whooo... I was so frightened... Here is potion for you. Hurry up. Go to Ahman";

-getitem 504,1;

-next;

-mes "Suddenly you see that some goods are broken...";

-mes "You decided to examine them";

-set looked,1;

-close;

-end;

-

-l_wazaputaus:

-Mes "[Lyozien]";

-mes "Well Ahmer was right. You are ill. Better have a rest.";

-mes "Go to Kazien. He will help you."; 

-close;

-}

-

-//========================================================================================

-

-izlude.gat,186,57,4	script	Scamp	85,{

-if quest_shadow==4 goto l_gocheck;

-if quest_shadow==6 goto l_done;

-if quest_shadow==9 goto l_nah;

-

-mes "[Ahman]";

-mes "Ahmaaa... Ahnaaa... Ahmaaan....";

-next;

-mes "["+strcharinfo(0)+"]";

-mes "????????";

-next;

-mes "[Ahman]";

-mes "Ahmaaa... Ahnaaa... Ahmaaan....";

-close;

-

-l_gocheck:

-mes "[Ahman]";

-mes "Hello there. What do you want?";

-menu "i want to deliver goods.",-,"nothing",l_close;

-next;

-mes "[Ahman]";

-mes "what goods. What are you talking about? I know nothing about this.";

-next;

-mes "["+strcharinfo(0)+"]";

-mes "Im here from Kazien, who send me to Lyozien who send me to you....";

-next;

-mes "[Ahman]";

-mes "Even so. Goods are already delivered. Go back to Lyozien";

-set quest_shadow,5;

-close;

-

-l_close:

-mes "[Ahman]";

-mes "You are very strange guy..";

-close;

-

-l_done:

-mes "["+strcharinfo(0)+"]";

-mes "hey!...";

-next;

-mes "You stay about 1 hour trying to speak to him. No answer";

-next;

-mes ".........";

-mes "["+strcharinfo(0)+"]";

-mes "Go i better to Lyozien. he is dead i think...";

-set quest_shadow,7;

-close;

-

-l_nah:

-mes "[Ahmar]";

-mes "You look very ill. You know?";

-next;

-mes "["+strcharinfo(0)+"]";

-mes "I dunno. Dont you know about atack on your goods? Some of them were broken. And i examine them..";

-next;

-mes "[Ahmer]";

-mes "What?? You look at them?? Its bad. go to Lyozine. Hurry!";

-set quest_shadow,10;

-close;

+//===== eAthena Script ======================================= 
+//= Lighthalzen, Shadow quest
+//===== By: ================================================== 
+//= Gravity official script
+//= ColNix
+//===== Current Version: ===================================== 
+//= Fixed
+//===== Compatible With: ===================================== 
+//= eAthena SVN
+//===== Description: ========================================= 
+//= Lighthalzen 
+//===== Additional Comments: ================================= 
+//=
+//============================================================
+
+lighthalzen.gat,141,162,4	script	Old man	61,{
+readparam(baselevel);                         
+
+if (baselevel <= 70) {
+mes "["+strcharinfo(0)+"]";
+mes "It seems that i'm not as strong as i thought. Better i go to lvl.";
+close;
+} 
+	if (quest_shadow==1) {
+	mes "[Kamenasai]";
+	mes "Have you already spoken to Kazien? ooh...";
+	mes "Hurry up and find him. He must be in Lighthalzen Castle.";
+	close;
+	}
+		if (quest_shadow>1) {
+		mes "[Kamenasai]";
+		mes "I have nothing to say to you now.";
+		mes "Leave me alone";
+		close;
+		}
+
+mes "[Kamenasai]";
+mes "Hello, "+strcharinfo(0)+". Nice to see you.";
+mes "I've heard alot about you doings. And want to know, if you could help us.";
+next;	
+menu "Hm.. Interesting. Wat's the problem?",-,"No, I'm not interested",l_not;
+mes "[Kamenasai]";
+mes "I knew that you should help. So. My friend Kazien is busy due to a lack of workers,";
+mes "he has some work for you. Find him in Lighthalzen castle. Good luck";
+set quest_shadow,1;
+close;
+
+l_not:
+mes "[Kamenasai]";
+mes "It's a pity. But i cant make you change your mind. GL&HF guy. Cya";
+close;
+}
+
+//====================================================================================
+
+lhz_in01,174,258,4	script	Young man	59,{
+if (quest_shadow==1) goto l_accept;
+if (quest_shadow==3) goto l_nochance;
+if (quest_shadow==4) goto l_part1;
+if (quest_shadow==5) goto l_wtfisthat;
+if (quest_shadow==8) goto l_zadolbal;
+if (quest_shadow==10) goto l_nu;
+
+mes "[Kazien]";
+mes "What do you want? Don't you see that i'm busy now!. Leave me alone!";
+close;
+
+l_accept:
+mes "[Kazien]";
+mes "What do you want from me. Don't you see that i am busy?";
+next;
+menu "Well, i'm, from Kamenasai",-,"hm... Can i borow some money? ^_-",l_nothing;
+mes "[Kazien]";
+mes "Oh, sorry my friend. You come to help me, don't you.";
+mes "Thanks alot. I'm too busy here and cant go myself, so i let my frind to help me";
+mes "His choice is you... So. Can you keep a secret?";
+next;
+menu "Of course i can",-,"i'm not sure.",l_goaway;
+mes "[Kazien]";
+mes "Well then. Lets see. Go to Einbroch Research Facility and find Garins there.";
+set quest_shadow,2;
+close;
+
+l_nothing:
+mes "[Kazien]";
+mes "Then, please leave me alone. I dont have any wish to speak to you.";
+close;
+
+l_goaway:
+mes "[Kazien]";
+mes "Its a pity... I think my friend was wrong sending you to me. Buy.";
+close;
+
+l_part1:
+mes "[Kazien]";
+mes "I see. You dont tell That guard about your quest, so i can rely on you. It was your first task.";
+mes "Now i shall tell you all. I am trying to make some buisness. But i can't deliver goods by myself.";
+mes "So i need somebody. And this somebody is you, "+strcharinfo(0)+".";
+next;
+mes "[Kazien]";
+mes "Go and Find Lyozien near Airship. He will tell you more.";
+close;
+
+l_forget:
+mes "[Kazien]";
+mes "Oh my head. Who are you at last? Im very dull. Somebody tell the police about me";
+mes "I am so bored...So...";
+next;
+goto l_accept;
+close;
+
+l_nochance:
+if (rand(10)==9) goto l_forget;
+mes "[Kazien]";
+mes "You cant keep any secret! What do you want from me?";
+mes "I dont want to see you anymore! Go somewhere else and never come here!";
+close;
+
+l_wtfisthat:
+if (quest_shadow_misc==1) goto l_leftthis;
+mes "[Kazien]";
+mes "Hm... He is saying something interesting. I will give delivery scroll. Go to";
+mes "Lyozien and speak to him...He is at the top of all this.";
+getitem 1072,1;
+getexp 110000,0;
+set quest_shadow_mobs,1;
+set quest_shadow_misc,1;
+set quest_shadow,6;
+close;
+
+l_zadolbal:
+if (quest_shadow_misc==2) goto l_leftthis;
+mes "[Kazien]";
+mes "Hm... He dont answer...You know thats strange. Something is wrong..";
+mes "And this something can destroy our plans....";
+next;
+menu "Also bandits.. and goods",-,"In every way i'm leaving this",l_leftthis;
+mes "[Kazien]";
+mes "Hm.. So you dont still receive goods.. And you say that bandits atack you...";
+mes "Now i understand. Go to Lyozien and be careful!";
+monster "airplane_01.gat",96,48,"Rogue",1268,1,"Man::OnMyMobDeath";
+getexp 150000,0;
+set quest_shadow_misc,2;
+set quest_shadow,9;
+close;
+
+l_leftthis:
+mes "[Kazien]";
+mes "Ye.. Its a pity i think. But its your choice. Remember,if you tell somebody";
+mes "About this you shall be dead...See you later";
+close;
+
+l_nu:
+if (quest_shadow_finish==1) goto l_leftthis;
+mes "[Kazien]";
+mes "How is our work? What about goods?";
+next;
+menu "Everything was really cool. I have lots of fun",-,"It was the wersest thing.",-;
+mes "[Kazien]";
+mes "Well... in everycase.^_^ I think you were really a good comrad";
+mes "["+strcharinfo(0)+"]";
+mes "I dont think so about you. Because i work for you and i must know what ware the goods";
+next;
+mes "[Kazien]";
+mes "Don't you think that it was me who give you work, let me dicide what you must know";
+mes "Afterall thx. Without you, this work wasn't done. You help me alot. I waiting forward hearing about your greatest doings.";
+mes "See you,my hero";
+getexp 150000,0;
+set quest_shadow_finish,1;
+close;
+}
+//===================================================================================
+lhz_in01,156,248,4	script	#Kazien	-1,6,3{
+OnTouch:
+if (quest_shadow_finish==1) {
+mes "[Remindes]";
+mes "[Kazien]";
+mes "How is our work? What about goods?";
+mes "...................................";
+mes "[Kazien]";
+mes "Well... in everycase. I think you were really a good comrade";
+mes "["+strcharinfo(0)+"]";
+mes "I dont think so. Because i work for you and i must know what was there";
+next;
+mes "[Kazien]";
+mes "Don't you think that it was me who give you work, let me dicide what you must know";
+mes "Afterall thx. Without you, this work wasn't done. You help me alot. I waiting forward hearing about your greatest doings.";
+mes "See you,my hero";
+next;
+mes "["+strcharinfo(0)+"]";
+mes "Strange people are they... but i suppose that was really interesting journey...";
+set quest_shadow_finish,0;
+set quest_shadow,11;
+close;
+}
+close;
+}
+//===================================================================================
+airplane_01.gat,96,53,4	script	#maner	-1,6,3{
+OnTouch:
+if ((quest_shadow==6) && (quest_shadow_mobs==1)) {
+monster "airplane_01.gat",96,53,"Rogue",1268,5;
+set quest_shadow_mobs,0;
+}
+close;
+}
+//=======================================================================================
+airplane_01.gat,85,47,4	script	#maner01	-1,6,3{
+OnTouch:
+if ((quest_shadow==6) && (quest_shadow_mobs==1)) {
+monster "airplane_01.gat",85,47,"Rogue",1268,5;
+set quest_shadow_mobs,0;
+}
+close;
+}
+//=======================================================================================
+lhz_in01,175,234,4	script	#Kazien01	-1,6,3{
+OnTouch:
+if (quest_shadow_finish==1) {
+mes "[Remindes]";
+mes "[Kazien]";
+mes "How is our work? What about goods?";
+mes "...................................";
+mes "[Kazien]";
+mes "Well... in everycase. I think you were really a good comrade";
+mes "["+strcharinfo(0)+"]";
+mes "I dont think so. Because i work for you and i must know what was there";
+next;
+mes "[Kazien]";
+mes "Don't you think that it was me who give you work, let me dicide what you must know";
+mes "Afterall thx. Without you, this work wasn't done. You help me alot. I waiting forward hearing about your greatest doings.";
+mes "See you,my hero";
+next;
+mes "["+strcharinfo(0)+"]";
+mes "Strange people are they... but i suppose that was really interesting journey...";
+set quest_shadow_finish,0;
+set quest_shadow,11;
+close;
+}
+close;
+}
+//=======================================================================================
+
+einbroch.gat,54,52,4	script	Guard	734,{
+if (quest_shadow==2) goto l_done;
+
+mes "[Guard]";
+mes "This is restricted zone. Please leave this place.";
+close;
+
+l_done:
+mes "[Guard]";
+mes "Hey. Stop. What do you want here? Dont you know that this is restrickted zone?";
+mes "Tell me why are you here?";
+next;
+menu "Well...I'm leaving now. I dont know that",-,"Hm... Kazien asked me to find Garins.",l_garins;
+close2;
+set quest_shadow,4;
+end;
+
+l_garins:
+mes "[Guard]";
+mes "You say Kazien.. From Lighthalzen....";
+next;
+npctalk "*writing something to the notepad*";
+mes "[Guard]";
+mes "Find Garins.... Ok. Thanks. Now you are free. Go home.";
+set quest_shadow,3;
+close;
+}
+
+//========================================================================================
+
+airplane_01.gat,96,48,4	script	Man	810,{
+if (quest_shadow==4) goto l_allok;
+if (quest_shadow==5) goto l_strange;
+if (quest_shadow==6) goto l_next;
+if (quest_shadow==7) goto l_talked;
+if (quest_shadow==9) goto l_nuinah;
+if (quest_shadow==10) goto l_wazaputaus;
+
+mes "[Lyozien]";
+mes "Greeting to you. Nice weather,isn't it?";
+close;
+
+l_strange:
+mes "[Lyozien]";
+mes "Hm.. strange. Kazien tell me nothing about it. I suppose you will better go to him";
+mes "and ask about this";
+close;
+
+l_allok:
+mes "[Lyozien]";
+mes "Oki doki guy. You see, that this is restricted doing. But we must do it";
+mes "For future of our country. So. That goods are really needed to our goverment, but";
+mes "Some rogues want to robe it. We can't protect them ourselves because we are on kings work";
+next;
+mes "[Lyozien]";
+mes "So its you, who will make it";
+mes "Go to Izlude and found Ahman there. He will give you nececcery items";
+mes "Good luck";
+close;
+
+l_next:
+mes "[Lyozien]";
+mes "So. What he says??";
+next;
+mes "["+strcharinfo(0)+"]";
+mes "He say to come to you. Here is the Scroll of deliver that i must show you.";
+next;
+mes "[Lyozien]";
+mes "I suppose you should better go to Ahman and show this... In cas, i have no goods to give you.";
+close;
+
+l_talked:
+mes "[Lyozien]";
+mes "Well... You say He dont answer... I suppose You better go to Kazien and tell him this.";
+mes "It seemes to that it wasnt our plan.. i fear... Noway. Hurry up to Kazien";
+set quest_shadow,8;
+close;
+
+l_nuinah:
+if mobcount("airplane_01.gat","Man::OnMyMobDeath")==0 goto ondeath;
+mes "[Lyozien]";
+mes "Well.. I really dont know. But i will never tell you wat are the goods";
+mes "hey, Bandit is there! LOOK!!!";
+close;
+
+
+OnDeath:
+if looked==1 {
+mes "[Lyozien]";
+mes "I have already given you medicine. Hurry. Somebody";
+mes "wants to stop us!";
+close;
+}
+
+mes "[Lyozien]";
+mes "Whooo... I was so frightened... Here is potion for you. Hurry up. Go to Ahman";
+getitem 504,1;
+next;
+mes "Suddenly you see that some goods are broken...";
+mes "You decided to examine them";
+set looked,1;
+close;
+end;
+
+l_wazaputaus:
+Mes "[Lyozien]";
+mes "Well Ahmer was right. You are ill. Better have a rest.";
+mes "Go to Kazien. He will help you."; 
+close;
+}
+
+//========================================================================================
+
+izlude.gat,186,57,4	script	Scamp	85,{
+if quest_shadow==4 goto l_gocheck;
+if quest_shadow==6 goto l_done;
+if quest_shadow==9 goto l_nah;
+
+mes "[Ahman]";
+mes "Ahmaaa... Ahnaaa... Ahmaaan....";
+next;
+mes "["+strcharinfo(0)+"]";
+mes "????????";
+next;
+mes "[Ahman]";
+mes "Ahmaaa... Ahnaaa... Ahmaaan....";
+close;
+
+l_gocheck:
+mes "[Ahman]";
+mes "Hello there. What do you want?";
+menu "i want to deliver goods.",-,"nothing",l_close;
+next;
+mes "[Ahman]";
+mes "what goods. What are you talking about? I know nothing about this.";
+next;
+mes "["+strcharinfo(0)+"]";
+mes "Im here from Kazien, who send me to Lyozien who send me to you....";
+next;
+mes "[Ahman]";
+mes "Even so. Goods are already delivered. Go back to Lyozien";
+set quest_shadow,5;
+close;
+
+l_close:
+mes "[Ahman]";
+mes "You are very strange guy..";
+close;
+
+l_done:
+mes "["+strcharinfo(0)+"]";
+mes "hey!...";
+next;
+mes "You stay about 1 hour trying to speak to him. No answer";
+next;
+mes ".........";
+mes "["+strcharinfo(0)+"]";
+mes "Go i better to Lyozien. he is dead i think...";
+set quest_shadow,7;
+close;
+
+l_nah:
+mes "[Ahmar]";
+mes "You look very ill. You know?";
+next;
+mes "["+strcharinfo(0)+"]";
+mes "I dunno. Dont you know about atack on your goods? Some of them were broken. And i examine them..";
+next;
+mes "[Ahmer]";
+mes "What?? You look at them?? Its bad. go to Lyozine. Hurry!";
+set quest_shadow,10;
+close;
 }
\ No newline at end of file
diff --git a/npc/quests/bongunsword.txt b/npc/quests/bongunsword.txt
index 175f32957..861fc425a 100644
--- a/npc/quests/bongunsword.txt
+++ b/npc/quests/bongunsword.txt
@@ -1,157 +1,157 @@
-//===== eAthena Script ======================================= 

-//= Munak and Bongun accessory / Taming items Quest

-//===== By: ================================================== 

-//= eAthena Team

-//===== Current Version: ===================================== 

-//= 1.2

-//===== Compatible With: ===================================== 

-//= eAthena 1.0

-//===== Description: ========================================= 

-//= Quest itms:Sword o'Chinese Exorcist,No Recipient,Her Heart

-//===== Additional Comments: ================================= 

-//= 1.0. merged 3 sep. files, fixed exploits [Lupus]

-//= 1.1	Added missing next;'s [Evera]

-//= 1.2 Added another missing next; [Evera]

-//============================================================ 

-

-

-comodo.gat,135,227,5	script	Sherri	93,{

-	mes "[Sherri]";

-	mes " ";

-	mes "*sighs*";

-	next;

-	mes "[Sherri]";

-	mes "Oh? Whats the matter? ...Well, I have finally managed to encase the soul of a handsome boy ...";

-	next;

-	mes "[Sherri]";

-	mes "...so why am I sad?";

-	mes " ";

-	mes "It's because I don't even know how his personality is... say, if you can find me a 'Girl's Diary' about him, I'll give you his diary!";

-	next;

-	mes "[Sherri]";

-	mes "Can you please help me?";

-	next;

-

-	menu "What do I need again?",-,"Here! I got what you need!",ExCreate,"Sorry, I can't help you.",ExEnd;

-

-	mes "[Sherri]";

-	mes "What I desire is...";

-	mes " ";

-	mes "A 'Girl's Diary' about him...";

-	close;

-

-ExCreate:

-	mes "[Sherri]";

-	mes "Really!! You'll help me!";

-	next;

-

-	if(countitem(1558)<1) goto L_NoItem;//Items: Girl's_Diary,

-	delitem 1558,1;//Items: Girl's_Diary,

-	getitem 659,1;//Items: Her_Heart,

-	mes "[Sherri]";

-	mes "YES! I am forever in your debt!";

-	mes " ";

-	mes "Here is his diary as promised! Again - Thank you!";

-	next;

-	mes "[Sherri]";

-	mes "Wait! Here's his sword, I found it next to him. But it's broken... I know of a old man just west of Geffen who can fix such a sword!";

-	getitem 7110,1;//Items: Broken_Sword,

-	close;

-

-L_NoItem:

-	mes "[Sherri]";

-	mes "Waahhhh, stop playing with my feelings!";

-	mes " ";

-	mes "Go away!";

-	close;

-ExEnd:

-	mes "[Sherri]";

-	mes "*sighs*";

-	close;    

-}

-

-izlude_in.gat,115,76,5	script	Evan	47,{

-	mes "[Evan]";

-	mes " ";

-	mes "*sighs*";

-	next;

-	mes "[Evan]";

-	mes "Oh? Whats the matter? ...Well, I have finally managed to encase the soul of a pretty girl ...";

-	next;

-	mes "[Evan]";

-	mes "...so why am I sad?";

-	mes " ";

-	mes "It's because I don't even know how she looks like...say, if you can find me and 'Old Portrait' of her, I'll give you her lover's lost letter!";

-	next;

-	mes "[Evan]";

-	mes "Whaddaya say? ..pal?";

-	next;

-

-	menu "What do I need again?",-,"Here! I got what you need!",ExCreate,"Sorry, I can't help you.",ExEnd;

-

-	mes "[Evan]";

-	mes "A picture of her lovely face...";

-	mes " ";

-	mes "An 'Old Portrait' preferrably...";

-	close;

-

-ExCreate:

-	mes "[Evan]";

-	mes "Really!! You'll help me!";

-	next;

-	if(countitem(7014)<1) goto L_NoItem;//Items: Old_Portrait,

-	delitem 7014,1;//Items: Old_Portrait,

-	getitem 636,1;//Items: No_Recipient,

-	mes "[Evan]";

-	mes "YES! I am forever in your debt!";

-	mes " ";

-	mes "Here is lover's lost letter as promised! Again - Thank you!";

-	close;

-

-L_NoItem:

-	mes "[Evan]";

-	mes "Waahhhh, stop playing with my feelings!";

-	mes " ";

-	mes "Go away!";

-	close;

-

-ExEnd:

-	mes "[Evan]";

-	mes "*sighs*";

-	close;

-}

-

-gef_fild07.gat,183,239,5	script	Old Smith	120,{

-	mes "[Old Smith]";

-	mes "Ah, isn't it peaceful up here - I used to be one of the legendary Blacksmiths of midgard...sadly my skills have faded.";

-	next;

-	if(countitem(7110)<1) goto L_NoItemS;//Items: Broken_Sword,

-	mes "[Old Smith]";

-	mes "Hmm, it seems as if you need something. What would that be?";

-	next;

-	menu "Can you fix this broken sword?",-,"Nothing really...",ExEnd;

-

-	mes "[Old Smith]";

-	mes "Ahhh, this is a very old sword and yes I can fix it, I'll need an 'Oridecon' to mend the breaks though.";

-	next;

-	if(countitem(7110)<1 || countitem(984)<1) goto L_NoItem;//Items: Broken_Sword, Oridecon,

-	delitem 7110,1;//Items: Broken_Sword,

-	delitem 984,1;//Items: Oridecon,

-	getitem 10020,1;//Items: Sword_of_Chinese_Exorcist,

-	mes "[Old Smith]";

-	mes "Ah yes here we go!";

-	mes " ";

-	mes "Haha! Gramps still has that old magic touch, Here you go!";

-	close;

-

-L_NoItem:

-	mes "[Old Smith]";

-	mes "Hmm, you seem to be missing something... probably that 'Oridecon'.";

-	close;

-

-L_NoItemS:

-ExEnd:

-	mes "[Old Smith]";

-	mes "...ah well, go out and live life young one. Time never stops!";

-	close;

-}

+//===== eAthena Script ======================================= 
+//= Munak and Bongun accessory / Taming items Quest
+//===== By: ================================================== 
+//= eAthena Team
+//===== Current Version: ===================================== 
+//= 1.2
+//===== Compatible With: ===================================== 
+//= eAthena 1.0
+//===== Description: ========================================= 
+//= Quest itms:Sword o'Chinese Exorcist,No Recipient,Her Heart
+//===== Additional Comments: ================================= 
+//= 1.0. merged 3 sep. files, fixed exploits [Lupus]
+//= 1.1	Added missing next;'s [Evera]
+//= 1.2 Added another missing next; [Evera]
+//============================================================ 
+
+
+comodo.gat,135,227,5	script	Sherri	93,{
+	mes "[Sherri]";
+	mes " ";
+	mes "*sighs*";
+	next;
+	mes "[Sherri]";
+	mes "Oh? Whats the matter? ...Well, I have finally managed to encase the soul of a handsome boy ...";
+	next;
+	mes "[Sherri]";
+	mes "...so why am I sad?";
+	mes " ";
+	mes "It's because I don't even know how his personality is... say, if you can find me a 'Girl's Diary' about him, I'll give you his diary!";
+	next;
+	mes "[Sherri]";
+	mes "Can you please help me?";
+	next;
+
+	menu "What do I need again?",-,"Here! I got what you need!",ExCreate,"Sorry, I can't help you.",ExEnd;
+
+	mes "[Sherri]";
+	mes "What I desire is...";
+	mes " ";
+	mes "A 'Girl's Diary' about him...";
+	close;
+
+ExCreate:
+	mes "[Sherri]";
+	mes "Really!! You'll help me!";
+	next;
+
+	if(countitem(1558)<1) goto L_NoItem;//Items: Girl's_Diary,
+	delitem 1558,1;//Items: Girl's_Diary,
+	getitem 659,1;//Items: Her_Heart,
+	mes "[Sherri]";
+	mes "YES! I am forever in your debt!";
+	mes " ";
+	mes "Here is his diary as promised! Again - Thank you!";
+	next;
+	mes "[Sherri]";
+	mes "Wait! Here's his sword, I found it next to him. But it's broken... I know of a old man just west of Geffen who can fix such a sword!";
+	getitem 7110,1;//Items: Broken_Sword,
+	close;
+
+L_NoItem:
+	mes "[Sherri]";
+	mes "Waahhhh, stop playing with my feelings!";
+	mes " ";
+	mes "Go away!";
+	close;
+ExEnd:
+	mes "[Sherri]";
+	mes "*sighs*";
+	close;    
+}
+
+izlude_in.gat,115,76,5	script	Evan	47,{
+	mes "[Evan]";
+	mes " ";
+	mes "*sighs*";
+	next;
+	mes "[Evan]";
+	mes "Oh? Whats the matter? ...Well, I have finally managed to encase the soul of a pretty girl ...";
+	next;
+	mes "[Evan]";
+	mes "...so why am I sad?";
+	mes " ";
+	mes "It's because I don't even know how she looks like...say, if you can find me and 'Old Portrait' of her, I'll give you her lover's lost letter!";
+	next;
+	mes "[Evan]";
+	mes "Whaddaya say? ..pal?";
+	next;
+
+	menu "What do I need again?",-,"Here! I got what you need!",ExCreate,"Sorry, I can't help you.",ExEnd;
+
+	mes "[Evan]";
+	mes "A picture of her lovely face...";
+	mes " ";
+	mes "An 'Old Portrait' preferrably...";
+	close;
+
+ExCreate:
+	mes "[Evan]";
+	mes "Really!! You'll help me!";
+	next;
+	if(countitem(7014)<1) goto L_NoItem;//Items: Old_Portrait,
+	delitem 7014,1;//Items: Old_Portrait,
+	getitem 636,1;//Items: No_Recipient,
+	mes "[Evan]";
+	mes "YES! I am forever in your debt!";
+	mes " ";
+	mes "Here is lover's lost letter as promised! Again - Thank you!";
+	close;
+
+L_NoItem:
+	mes "[Evan]";
+	mes "Waahhhh, stop playing with my feelings!";
+	mes " ";
+	mes "Go away!";
+	close;
+
+ExEnd:
+	mes "[Evan]";
+	mes "*sighs*";
+	close;
+}
+
+gef_fild07.gat,183,239,5	script	Old Smith	120,{
+	mes "[Old Smith]";
+	mes "Ah, isn't it peaceful up here - I used to be one of the legendary Blacksmiths of midgard...sadly my skills have faded.";
+	next;
+	if(countitem(7110)<1) goto L_NoItemS;//Items: Broken_Sword,
+	mes "[Old Smith]";
+	mes "Hmm, it seems as if you need something. What would that be?";
+	next;
+	menu "Can you fix this broken sword?",-,"Nothing really...",ExEnd;
+
+	mes "[Old Smith]";
+	mes "Ahhh, this is a very old sword and yes I can fix it, I'll need an 'Oridecon' to mend the breaks though.";
+	next;
+	if(countitem(7110)<1 || countitem(984)<1) goto L_NoItem;//Items: Broken_Sword, Oridecon,
+	delitem 7110,1;//Items: Broken_Sword,
+	delitem 984,1;//Items: Oridecon,
+	getitem 10020,1;//Items: Sword_of_Chinese_Exorcist,
+	mes "[Old Smith]";
+	mes "Ah yes here we go!";
+	mes " ";
+	mes "Haha! Gramps still has that old magic touch, Here you go!";
+	close;
+
+L_NoItem:
+	mes "[Old Smith]";
+	mes "Hmm, you seem to be missing something... probably that 'Oridecon'.";
+	close;
+
+L_NoItemS:
+ExEnd:
+	mes "[Old Smith]";
+	mes "...ah well, go out and live life young one. Time never stops!";
+	close;
+}
diff --git a/npc/quests/bunnyband.txt b/npc/quests/bunnyband.txt
index 3f9cbd3bf..2ec20afa7 100644
--- a/npc/quests/bunnyband.txt
+++ b/npc/quests/bunnyband.txt
@@ -1,98 +1,98 @@
-//===== eAthena Script ======================================= 

-//= Bunny Band Quest

-//===== By: ================================================== 

-//= eAthena Dev Team

-//===== Current Version: ===================================== 

-//= v1.4

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//=

-//===== Additional Comments: ================================= 

-//= 1.1 using duplicate command

-//= 1.2 Fixed NPC location, removed NPC dupes [Lupus]

-//= 1.3 RE-Fixed exploit V_V, also cleared used VAR [Lupus]

-//= 1.4 replaced BUNYBND with @BUNYBND [Lupus]

-//============================================================ 

-

-

-// Alberta ------------------------------------------------------------------------------------------------------------------------------------------

-alberta.gat,23,232,1	script	Kafra Corp. Rep.#1::KCRep	83,{

-	mes "[Kafra Corp. Rep.]";

-	if (@BUNYBND) goto L_Check;

-	mes "^529DFFSpecial Event, ^FF0000Bunny Band ^529DFFQuest!!^000000";

-	next;

-	menu "Information",-, "Join",M_Join, "Cancel",M_End;

-

-		mes "[Kafra Corp. Rep.]";

-		mes "To thank our customers for using the Kafra Corp. services, we have prepapred a small event for them...";

-		next;

-		mes "[Kafra Corp. Rep.]";

-		mes "The ^FF0000Bunny Band ^529DFFquest!!!^000000. (Sponsered by: The Alberta Merchant Association.)";

-		mes "This quest allows players to obtain the ultra-rare ^FF0000Bunny Band^000000!";

-		next;

-		mes "[Kafra Corp. Rep.]";

-		mes "All you have to do is collect a number of items and bring them to a Kafra Corp. representative such as myself.";

-		mes "We will then carefully handmake a Bunny Band for you on the spot!";

-		next;

-		mes "[Kafra Corp. Rep.]";

-		mes "Here are the items that you will need for the Bunny Band.";

-		mes "^5555FF100 Feather^000000,";

-		mes "^5555FF1 Four Leaf Clover^000000,";

-		mes "^5555FF1 Pearl^000000,";

-		mes "^5555FF1 Kitty Band^000000.";

-		next;

-		mes "[Kafra Corp. Rep.]";

-		mes "When you've collected all of the items, just speak with any Kafra Corp. representative like myself.";

-		mes "We can be found in every town across Rune Midgard.";

-		close;

-

-	M_Join:

-

-		mes "[Kafra Corp. Rep.]";

-		mes "Thank you for participating in the event. Please come back when you have gathered all of the items.";

-		set @BUNYBND, 1;

-		close;

-

-	M_End:

-		mes "[Kafra Corp. Rep.]";

-		mes "Have a nice day.";

-		close;

-

-	L_Check:

-		if(countitem(949)<100 || countitem(706)<1 || countitem(722)<1 || countitem(2213)<1) goto sL_NoItems;

-		delitem 949,100;

-		delitem 706,1;

-		delitem 722,1;

-		delitem 2213,1;

-		mes "Wow! Well-done, well-done! You've got every single item! I will make the Bunny Band for you right away...";

-		emotion e_no1;

-		next;

-		mes "[Kafra Corp. Rep.]";

-		mes "Tah dah!!! Here is your ^FF0000Bunny Band^000000... Please take it!";

-		getitem 2214,1;

-		set @BUNYBND,0;

-		next;

-		mes "[Kafra Corp. Rep.]";

-		mes "We appreciate your participation in this special event. Thank you and enjoy your Bunny Band!";

-		close;

-

-		sL_NoItems:

-			mes "Here are the items that you will need for the Bunny Band.";

-			mes "^5555FF100 Feather^000000,";

-			mes "^5555FF1 Four Leaf Clover^000000,";

-			mes "^5555FF1 Pearl^000000,";

-			mes "^5555FF1 Kitty Band^000000.";

-			close;

-

-}

-

-

-// Geffen ------------------------------------------------------------------------------------------------------------------------------------------

-//geffen.gat,116,62,2	duplicate(KCRep)	Kafra Corp. Rep.#2	83,

-// Morroc ------------------------------------------------------------------------------------------------------------------------------------------

-//morocc.gat,154,97,4	duplicate(KCRep)	Kafra Corp. Rep.#3	83,

-// Payon ------------------------------------------------------------------------------------------------------------------------------------------

-//payon.gat,184,104,4	duplicate(KCRep)	Kafra Corp. Rep.#4	83,

-// Prontera ------------------------------------------------------------------------------------------------------------------------------------------

-//prontera.gat,146,87,6	duplicate(KCRep)	Kafra Corp. Rep.#5	83,

+//===== eAthena Script ======================================= 
+//= Bunny Band Quest
+//===== By: ================================================== 
+//= eAthena Dev Team
+//===== Current Version: ===================================== 
+//= v1.4
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//=
+//===== Additional Comments: ================================= 
+//= 1.1 using duplicate command
+//= 1.2 Fixed NPC location, removed NPC dupes [Lupus]
+//= 1.3 RE-Fixed exploit V_V, also cleared used VAR [Lupus]
+//= 1.4 replaced BUNYBND with @BUNYBND [Lupus]
+//============================================================ 
+
+
+// Alberta ------------------------------------------------------------------------------------------------------------------------------------------
+alberta.gat,23,232,1	script	Kafra Corp. Rep.#1::KCRep	83,{
+	mes "[Kafra Corp. Rep.]";
+	if (@BUNYBND) goto L_Check;
+	mes "^529DFFSpecial Event, ^FF0000Bunny Band ^529DFFQuest!!^000000";
+	next;
+	menu "Information",-, "Join",M_Join, "Cancel",M_End;
+
+		mes "[Kafra Corp. Rep.]";
+		mes "To thank our customers for using the Kafra Corp. services, we have prepapred a small event for them...";
+		next;
+		mes "[Kafra Corp. Rep.]";
+		mes "The ^FF0000Bunny Band ^529DFFquest!!!^000000. (Sponsered by: The Alberta Merchant Association.)";
+		mes "This quest allows players to obtain the ultra-rare ^FF0000Bunny Band^000000!";
+		next;
+		mes "[Kafra Corp. Rep.]";
+		mes "All you have to do is collect a number of items and bring them to a Kafra Corp. representative such as myself.";
+		mes "We will then carefully handmake a Bunny Band for you on the spot!";
+		next;
+		mes "[Kafra Corp. Rep.]";
+		mes "Here are the items that you will need for the Bunny Band.";
+		mes "^5555FF100 Feather^000000,";
+		mes "^5555FF1 Four Leaf Clover^000000,";
+		mes "^5555FF1 Pearl^000000,";
+		mes "^5555FF1 Kitty Band^000000.";
+		next;
+		mes "[Kafra Corp. Rep.]";
+		mes "When you've collected all of the items, just speak with any Kafra Corp. representative like myself.";
+		mes "We can be found in every town across Rune Midgard.";
+		close;
+
+	M_Join:
+
+		mes "[Kafra Corp. Rep.]";
+		mes "Thank you for participating in the event. Please come back when you have gathered all of the items.";
+		set @BUNYBND, 1;
+		close;
+
+	M_End:
+		mes "[Kafra Corp. Rep.]";
+		mes "Have a nice day.";
+		close;
+
+	L_Check:
+		if(countitem(949)<100 || countitem(706)<1 || countitem(722)<1 || countitem(2213)<1) goto sL_NoItems;
+		delitem 949,100;
+		delitem 706,1;
+		delitem 722,1;
+		delitem 2213,1;
+		mes "Wow! Well-done, well-done! You've got every single item! I will make the Bunny Band for you right away...";
+		emotion e_no1;
+		next;
+		mes "[Kafra Corp. Rep.]";
+		mes "Tah dah!!! Here is your ^FF0000Bunny Band^000000... Please take it!";
+		getitem 2214,1;
+		set @BUNYBND,0;
+		next;
+		mes "[Kafra Corp. Rep.]";
+		mes "We appreciate your participation in this special event. Thank you and enjoy your Bunny Band!";
+		close;
+
+		sL_NoItems:
+			mes "Here are the items that you will need for the Bunny Band.";
+			mes "^5555FF100 Feather^000000,";
+			mes "^5555FF1 Four Leaf Clover^000000,";
+			mes "^5555FF1 Pearl^000000,";
+			mes "^5555FF1 Kitty Band^000000.";
+			close;
+
+}
+
+
+// Geffen ------------------------------------------------------------------------------------------------------------------------------------------
+//geffen.gat,116,62,2	duplicate(KCRep)	Kafra Corp. Rep.#2	83,
+// Morroc ------------------------------------------------------------------------------------------------------------------------------------------
+//morocc.gat,154,97,4	duplicate(KCRep)	Kafra Corp. Rep.#3	83,
+// Payon ------------------------------------------------------------------------------------------------------------------------------------------
+//payon.gat,184,104,4	duplicate(KCRep)	Kafra Corp. Rep.#4	83,
+// Prontera ------------------------------------------------------------------------------------------------------------------------------------------
+//prontera.gat,146,87,6	duplicate(KCRep)	Kafra Corp. Rep.#5	83,
diff --git a/npc/quests/cooking_quest.txt b/npc/quests/cooking_quest.txt
index d6ae0cec5..38c6bed98 100644
--- a/npc/quests/cooking_quest.txt
+++ b/npc/quests/cooking_quest.txt
@@ -1,600 +1,600 @@
-//===== eAthena Script ======================================= 

-//= Cooking Quest

-//===== By: ================================================== 

-//= Reddozen

-//===== Current Version: ===================================== 

-//= 1.5a

-//===== Compatible With: ===================================== 

-//= eAthena 1.0+

-//===== Description: ========================================= 

-//= Official Cooking Quest

-//===== Additional Comments: ================================= 

-//= 1.1 Fixed wrong item ID, added missing ";, optimized [Lupus]

-//= 1.1a minor bugfix, thx 2 Irmin [Lupus]

-//= 1.2 Fixed exploit, some typos [Lupus]

-//= 1.3 Fixed wrong label [Lupus] 1.3a updated to Reddozen's changes

-//= 1.3b Fixed wrong id, fixed Puch quest, added more Pouch Quest

-//= dialogues [Lupus]

-//= 1.4 Fixed spelling, added some dialoguesm optimized

-//= fixed bugs. Tested, fully working [Lupus]

-//= 1.5 More fixes [Lupus]

-//============================================================ 

-

-prt_castle.gat,43,30,6	script	Chef Apprentice	878,{

-

-	mes "[Chef's Apprentice]";

-

-	if(cooking == 1) goto L_Remind;

-

-	if(cooking == 2){

-		mes "I see you passed the test.";

-		mes "Good job!";

-		next;

-		mes "[Chef's Apprentice]";

-		mes "This book would be quite helpful for a novice chef.";

-		getitem 7472, 1;//Items: Lv1 Cookbook,

-		set cook_book, 7472;

-		set cooking, 3;

-		close;

-	}

-

-	if(cooking == 3){

-		mes "Hi there. Is there something";

-		mes "that I can help you with?";

-		next;

-		menu "Buy Supplies",M_BuySupply, "Talk about cooking",L_Cook_Talk, "Leave",L_No_Talk;		

-

-		M_BuySupply:

-			mes "[Chef's Apprentice]";

-			mes "Outdoor Cooking Set - 500z each";

-			mes " How many?";

-			input @amount;

-			if(@amount < 1) goto ER_Invalid;

-			if(@amount > 100) goto ER_TooMuch;

-			if(@amount*500 > Zeny) goto ER_Zeny;

-			set Zeny, Zeny-(@amount*500);

-			getitem 12125, @amount;//Items: Outdoor Cooker,

-			next;

-			mes "[Chef's Apprentice]";

-			mes "Enjoy!";

-			close;

-

-		L_Cook_Talk:

-			mes "[Chef's Apprentice]";

-			mes "You passed the test,";

-			mes "but were your results";

-			mes "worth while?";

-			next;

-			menu "Taste my food",-, "No, it was horrible",L_Taste_End;

-

-			mes "[Chef's Apprentice]";

-			mes "I don't know about that.";

-			mes "It may not be safe...";

-			next;

-			menu "Please taste it",-, "You're probably right",L_Taste_End;

-

-			mes "[Chef's Apprentice]";

-			mes "Why would I want to try";

-			mes "the food of a novice chef?";

-			next;

-			menu "Please try",-, "Yeah, I'm too new at this",L_Taste_End;

-

-			mes "[Chef's Apprentice]";

-			mes "I'll make a deal with you.";

-			mes "if you cook me one of every";

-			mes "Lv 1 food, then I'll try";

-			mes "your Cooking...";

-			next;

-			menu "Agree",-, "Refuse",L_Taste_End;

-

-			mes "[Chef's Apprentice]";

-			mes "You'll need to make all";

-			mes "six foods. Let me know";

-			mes "when you're finished.";

-			set cooking, 4;

-			close;

-

-		L_Taste_End:

-			mes "[Chef's Apprentice]";

-			mes "Come back when you feel";

-			mes "more confident.";

-			close;

-

-		L_No_Talk:

-			mes "[Chef's Apprentice]";

-			mes "Come back to vist anytime!";

-			mes "Have a good day.";

-			close;

-	}

-

-	if(cooking == 4){

-		if(countitem(12056)

-			&& countitem(12061)

-			&& countitem(12046)

-			&& countitem(12066)

-			&& countitem(12041)

-			&& countitem(12051)) {//Items: Frog Spawn Soup, Grape Juice with Honey, Grape Juice and Tea, Fried Monkey Tail, Boiled Locust, Steamed Crab Pincer,

-

-			delitem 12056, 1;//Items: Frog Spawn Soup,

-			delitem 12061, 1;//Items: Grape Juice with Honey,

-			delitem 12046, 1;//Items: Grape Juice and Tea,

-			delitem 12066, 1;//Items: Fried Monkey Tail,

-			delitem 12041, 1;//Items: Boiled Locust,

-			delitem 12051, 1;//Items: Steamed Crab Pincer,

-

-			mes "What!? Through already?";

-			mes "Let me see what you've made";

-			next;

-

-			mes "[Chef's Apprentice]";

-			mes "Great job, but there's";

-			mes "still one thing that I need";

-			mes "you to do. Talk to a friend";

-			mes "of mine in Payon. We used";

-			mes "to study together.";

-			next;

-			mes "[Chef's Apprentice]";

-			mes "Take him this ^000080Leather Pouch^000000,";

-			mes "and I'll put in a good word";

-			mes "for you with my teacher.";

-

-			getitem 7432, 1;//Items: Leather Pouch,

-			set cooking, 5;

-		} else {

-			mes "Please come back when you've cooked";

-			mes "all the Lv 1 foods.";

-			next;

-			menu "Buy Supplies",M_BuySupply, "Leave",L_No_Talk;		

-		}

-		close;

-	}

-

-	if(cooking == 5){

-		mes "Please, don't forget to";

-		mes "hand my ^000080Leather Pouch^000000";

-		mes "to my friend in Payon.";

-		next;

-		mes "[Chef's Apprentice]";

-		mes "Well... Is there something";

-		mes "that I can help you with?";

-		next;

-		menu "Buy Supplies",-, "Leave",L_No_Talk2;

-

-			mes "[Chef's Apprentice]";

-			mes "Outdoor Cooking Set - 500z each.";

-			mes " How many?";

-			input @amount;

-			if(@amount < 1) goto ER_Invalid;

-			if(@amount > 100) goto ER_TooMuch;

-			if(@amount*500 > Zeny) goto ER_Zeny;

-			set Zeny, Zeny-(@amount*500);

-			getitem 12125, @amount;//Items: Outdoor Cooker,

-

-			next;

-			mes "[Chef's Apprentice]";

-			mes "Enjoy!";

-			close;

-

-		L_No_Talk2:

-			mes "[Chef's Apprentice]";

-			mes "Come back to vist anytime!";

-			mes "Have a good day.";

-			close;

-	}

-

-	if(cooking == 6){

-		mes "Thank you for taking that";

-		mes "pouch to my friend! Take";

-		mes "this as a gift.";

-		set cooking, 7;

-		getitem 12126, 10;//Items: Home Cooking Set,

-		next;

-		mes "[Chef's Apprentice]";

-		mes "Come back later if you";

-		mes "need anything else!";

-		close;

-	}

-

-	if(cooking == 7){

-		mes "Welcome back. What";

-		mes "would you like to do?";

-		next;

-		menu "Buy Supplies",-, "Just visiting",L_Leave3;

-

-				mes "[Chef's Apprentice]";

-				mes "What would you like?";

-				next;

-				menu "Outdoor Cooking Set - 500z each",-, "Home Cooking Set - 1,000z",L_HomeCooking, "Never Mind",L_Leave3;

-

-				set @price, 500;

-				set @tool, 12125;

-				goto L_Cooking_Tools4;

-

-			L_HomeCooking:

-				set @price, 1000;

-				set @tool, 12126;

-

-		L_Cooking_Tools4:

-			mes "[Chef's Apprentice]";

-			mes " How many?";

-			input @amount;

-			if(@amount < 1) goto ER_Invalid;

-			if(@amount > 100) goto ER_TooMuch;

-			if(@amount*@price > Zeny) goto ER_Zeny;

-			set Zeny, Zeny-(@amount*@price);

-			getitem @tool, @amount;

-

-			next;

-			mes "[Chef's Apprentice]";

-			mes "Enjoy!";

-			close;		

-

-		L_Leave3:

-			mes "[Chef's Apprentice]";

-			mes "Come back to vist anytime!";

-			mes "Have a good day.";

-			close;

-	}			

-			

-	mes "Hi there. What can I";

-	mes "do for you?";

-	next;

-	menu "Just looking around",-, "I want to learn to cook",ap_2;

-

-		mes "[Chef's Apprentice]";

-		mes "Feel free to look around";

-		mes "as much as you like.";

-		mes "Just don't disturb my";

-		mes "teacher.";

-		close;

-

-	ap_2:

-		if(baseLevel < 50){

-			mes "[Chef's Apprentice]";

-			mes "You should train a little";

-			mes "more before trying something";

-			mes "as hard as cooking";

-			close;

-		}

-

-		set cooking, 1;

-		mes "[Chef's Apprentice]";

-	L_Remind:

-		mes "So you want to learn to";

-		mes "cook huh? Well, if you";

-		mes "think you can handle it,";

-		mes "just talk to my teacher.";

-		next;

-		mes "[Chef's Apprentice]";

-		mes "Just don't forget your";

-		mes "^000080Chef's Hat^000000 or Sharle";

-		mes "will yell at you.";

-		close;

-

-	ER_Zeny:

-		next;

-		mes "[Chef's Apprentice]";

-		mes "You don't have enough zeny.";

-		close;

-

-	ER_TooMuch:

-		next;

-		mes "[Chef's Apprentice]";

-		mes "You can't by that much at a time!.";

-		mes "You don't have to buy it all at once.";

-		close;

-	ER_Invalid:

-		next;

-		mes "[Chef's Apprentice]";

-		mes "You can't buy negative amounts of cooking";

-		mes "equipment. Please buy a valid amount.";

-		close;

-}

-

-

-payon.gat,209,127,4	script	Cooking Friend	88,{

-	mes "[Cooking Friend]";

-	if(cooking == 5){

-		if(countitem(7432)) {

-			delitem 7432, 1;//Items: Leather Pouch,

-			mes "I see my friend sent you";

-			mes "to give me something.";

-			set cooking, 6;

-			emotion e_thx;

-		} else {

-			mes "What? My friend sent you";

-			mes "just to say Hello?";

-			emotion e_hmm;

-		}

-		mes "Thank you for your";

-		mes "trouble. Tell him I said,";

-		mes "Hello.";

-		close;

-	}

-	mes "Hello, how are you?";

-	close;

-}

-

-

-prt_castle.gat,45,35,4	script	Sharle	886,{

-	mes "[Sharle]";

-	if(cooking && getequipid(1) != 5026) goto L_No_Uniform; //Item: Chef's Hat

-	if(cooking == 7)goto L_Cooking_7;

-	if(first_cooking)goto L_First_Cooking;

-

-	if(cooking == 1){

-		mes "So you want to learn how to cook?";

-		next;

-		menu "Yes",M_GetQuest, "No",M_End;

-	}

-

-	mes "What a great day to bake some";

-	mes "wonderfull treats!";

-	close;

-

-	M_GetQuest:

-		mes "[Sharle]";

-		mes "Ok. Let's try to cook something together.";

-		set first_cooking,rand(1,6);

-

-	L_First_Cooking:

-		mes "I'm lack of special ingredients,";

-		mes "bring me:";

-		if(first_cooking == 1){

-			set @item1, 577;

-			set @item1a, 1;

-			set @item2, 908;

-			set @item2a, 10;

-			set @item3, 1024;

-			set @item3a, 1;

-			set @food1, 12056;

-

-			mes "1 Grain, 10 Spawn, and";

-			mes "1 Squid Ink.";

-		}

-

-		if(first_cooking == 2){

-			set @item1, 518;

-			set @item1a, 1;

-			set @item2, 514;

-			set @item2a, 2;

-			set @item3, 501;

-			set @item3a, 1;

-			set @food1, 12061;

-

-			mes "1 Honey, 2 Grapes, and";

-			mes "1 Red Potion.";

-		}

-

-		if(first_cooking == 3){

-			set @item1, 514;

-			set @item1a, 3;

-			set @item2, 501;

-			set @item2a, 2;

-			set @item3, 0;

-			set @item3a, 0;

-			set @food1, 12046;

-

-			mes "3 Grapes and 2 Red Potions.";

-		}

-

-		if(first_cooking == 4){

-			set @item1, 942;

-			set @item1a, 5;

-			set @item2, 7031;

-			set @item2a, 1;

-			set @item3, 7457;

-			set @item3a, 1;

-			set @food1, 12066;

-

-			mes "5 Yoyo Tails, 1 Old Frying Pan, and";

-			mes "1 Cooking Oil.";

-		}

-

-		if(first_cooking == 5){

-			set @item1, 940;

-			set @item1a, 5;

-			set @item2, 7031;

-			set @item2a, 1;

-			set @item3, 7457;

-			set @item3a, 1;

-			set @food1, 12041;

-

-			mes "5 Grasshopper Legs, 1 Old Frying Pan, and";

-			mes "1 Cooking Oil.";

-		}

-

-		if(first_cooking == 6){

-			set @item1, 960;

-			set @item1a, 10;

-			set @item2, 511;

-			set @item2a, 10;

-			set @item3, 503;

-			set @item3a, 1;

-			set @food1, 12051;

-

-			mes "10 Nippers, 10 Green Herbs, and";

-			mes "1 Yellow Potion.";

-		}

-

-		if(countitem(@item1) < @item1a || countitem(@item2) < @item2a || countitem(@item3) < @item3a) close;

-

-		delitem @item1, @item1a;

-		delitem @item2, @item2a;

-		delitem @item3, @item3a;

-		next;

-		set cooking, 2;

-

-		mes "[Sharle]";

-		mes "Great Job!";

-		mes "You can now purchase";

-		mes "Outdoor Cooking Sets.";

-		getitem @food1, 1;

-		set first_cooking, 0;

-		close;

-

-	L_Cooking_7:

-		mes "Would you like to check";

-		mes "out my ^800000Cookbooks^000000?";

-		next;

-		menu "Yes",-, "No", M_End2, "Return Book", M_ReturnBook;

-

-		mes "[Sharle]";

-		if(cook_book){

-			mes "You'll have to give me back the";

-			mes "first book I loaned you if you";

-			mes "would like to check out a new book.";

-			mes "Would you like to trade books?";

-			next;

-			menu "Yes",-, "No",M_End2;

-

-			if(countitem(cook_book)==0){

-				mes "What? You don't have the book I loaned you?";

-				mes "It was a ^800000"+getitemname(cook_book)+"^000000.";

-				emotion e_sry;

-				close;

-			} 

-		}

-		mes "[Sharle]";

-		mes "Which book would you like?";

-		next;

-		menu "^800000Lv 1 Cookbook",b_1, "Lv 2 Cookbook",b_2, "Lv 3 Cookbook",b_3, "Lv 4 Cookbook",b_4, "Lv 5 Cookbook",b_5, "^000000Leave",M_End2;

-

-	b_1:

-		mes "[Sharle]";

-		mes "You will need:";

-		mes "10 Pumpkins";

-		next;

-		if(countitem(535) < 10) goto L_No_Items;//Items: Pumpkin,

-		delitem 535, 10;//Items: Pumpkin,

-		set @checkout, 7472;

-		mes "And I see you have";

-		mes "what you need!";

-		next;

-		goto b_trade;

-

-	b_2:

-		mes "[Sharle]";

-		mes "You will need:";

-		mes "5 well-baked cookies";

-		next;

-		if(countitem(538) < 5) goto L_No_Items;//Items: Well-baked Cookie,

-		delitem 538, 5;//Items: Well-baked Cookie,

-		set @checkout, 7473;

-		mes "And I see you have";

-		mes "what you need!";

-		next;

-		goto b_trade;

-

-	b_3:

-		mes "[Sharle]";

-		mes "You will need:";

-		mes "5 Sushi";

-		next;

-		if(countitem(551) < 5) goto L_No_Items;//Items: Sushi,

-		delitem 551, 5;//Items: Sushi,

-		set @checkout, 7474;

-		mes "And I see you have";

-		mes "what you need!";

-		next;

-		goto b_trade;

-

-	b_4:

-		mes "[Sharle]";

-		mes "You will need:";

-		mes "5 Baos";

-		next;

-		if(countitem(553) < 5) goto L_No_Items;//Items: Bao,

-		delitem 553, 5;//Items: Bao,

-		set @checkout, 7475;

-		mes "And I see you have";

-		mes "what you need!";

-		next;

-		goto b_trade;

-

-	b_5:

-		mes "[Sharle]";

-		mes "You will need:";

-		mes "10 shoots";

-		next;

-		if(countitem(711) < 10) goto L_No_Items;//Items: Shoot,

-		delitem 711, 10;//Items: Shoot,

-		set @checkout, 7476;

-		mes "And I see you have";

-		mes "what you need!";

-		next;

-		goto b_trade;

-

-	b_trade:

-		mes "[Sharle]";

-		mes "If you find you need a new book,";

-		mes "you're welcome to come back and";

-		mes "trade.";

-

-		if(cook_book){

-			if(countitem(cook_book)==0){

-				mes "What? You don't have the book I loaned you?";

-				mes "It was a ^800000"+getitemname(cook_book)+"^000000.";

-				emotion e_sry;

-				close;

-			} 

-			delitem cook_book,1;

-			mes "Have fun, and good luck!";

-		} else {

-			mes "Good luck! I hope you learn a lot!";

-		}

-		getitem @checkout,1;

-		set cook_book, @checkout;

-		close;

-

-	M_End:

-		mes "[Sharle]";

-		mes "That's fine with me, come back";

-		mes "when you want to cook.";

-		close;

-

-	M_End2:

-		mes "[Sharle]";

-		mes "Well, I'm here whenever you'd like";

-		mes "to learn. Just make sure you're";

-		mes "ready.";

-		close;

-

-	M_ReturnBook:

-		if(cook_book == 0){

-			mes "[Sharle]";

-			mes "You haven't borrowed any books.";

-			emotion e_hmm;

-			close;

-		}

-

-		if(countitem(cook_book)==0){

-			mes "What? You don't have the book I loaned you?";

-			mes "It was a ^800000"+getitemname(cook_book)+"^000000.";

-			emotion e_sry;

-			close;

-		} 

-		delitem cook_book,1;

-		set cook_book, 0;

-		mes "[Sharle]";

-		mes "Returning the book already?";

-		mes "did you learn what you wanted";

-		mes "to know?";

-		emotion e_what;

-		close;

-

-	L_No_Items:

-		mes "[Sharle]";

-		mes "So come back when";

-		mes "you have the items";

-		mes "that you need.";

-		close;

-

-	L_No_Uniform:

-		mes "How dare you disrespect me";

-		mes "by showing up out of uniform.";

-		mes "Come back when you have your";

-		mes "uniform on.";

-		emotion e_bzz;

-		close;	

-}

+//===== eAthena Script ======================================= 
+//= Cooking Quest
+//===== By: ================================================== 
+//= Reddozen
+//===== Current Version: ===================================== 
+//= 1.5a
+//===== Compatible With: ===================================== 
+//= eAthena 1.0+
+//===== Description: ========================================= 
+//= Official Cooking Quest
+//===== Additional Comments: ================================= 
+//= 1.1 Fixed wrong item ID, added missing ";, optimized [Lupus]
+//= 1.1a minor bugfix, thx 2 Irmin [Lupus]
+//= 1.2 Fixed exploit, some typos [Lupus]
+//= 1.3 Fixed wrong label [Lupus] 1.3a updated to Reddozen's changes
+//= 1.3b Fixed wrong id, fixed Puch quest, added more Pouch Quest
+//= dialogues [Lupus]
+//= 1.4 Fixed spelling, added some dialoguesm optimized
+//= fixed bugs. Tested, fully working [Lupus]
+//= 1.5 More fixes [Lupus]
+//============================================================ 
+
+prt_castle.gat,43,30,6	script	Chef Apprentice	878,{
+
+	mes "[Chef's Apprentice]";
+
+	if(cooking == 1) goto L_Remind;
+
+	if(cooking == 2){
+		mes "I see you passed the test.";
+		mes "Good job!";
+		next;
+		mes "[Chef's Apprentice]";
+		mes "This book would be quite helpful for a novice chef.";
+		getitem 7472, 1;//Items: Lv1 Cookbook,
+		set cook_book, 7472;
+		set cooking, 3;
+		close;
+	}
+
+	if(cooking == 3){
+		mes "Hi there. Is there something";
+		mes "that I can help you with?";
+		next;
+		menu "Buy Supplies",M_BuySupply, "Talk about cooking",L_Cook_Talk, "Leave",L_No_Talk;		
+
+		M_BuySupply:
+			mes "[Chef's Apprentice]";
+			mes "Outdoor Cooking Set - 500z each";
+			mes " How many?";
+			input @amount;
+			if(@amount < 1) goto ER_Invalid;
+			if(@amount > 100) goto ER_TooMuch;
+			if(@amount*500 > Zeny) goto ER_Zeny;
+			set Zeny, Zeny-(@amount*500);
+			getitem 12125, @amount;//Items: Outdoor Cooker,
+			next;
+			mes "[Chef's Apprentice]";
+			mes "Enjoy!";
+			close;
+
+		L_Cook_Talk:
+			mes "[Chef's Apprentice]";
+			mes "You passed the test,";
+			mes "but were your results";
+			mes "worth while?";
+			next;
+			menu "Taste my food",-, "No, it was horrible",L_Taste_End;
+
+			mes "[Chef's Apprentice]";
+			mes "I don't know about that.";
+			mes "It may not be safe...";
+			next;
+			menu "Please taste it",-, "You're probably right",L_Taste_End;
+
+			mes "[Chef's Apprentice]";
+			mes "Why would I want to try";
+			mes "the food of a novice chef?";
+			next;
+			menu "Please try",-, "Yeah, I'm too new at this",L_Taste_End;
+
+			mes "[Chef's Apprentice]";
+			mes "I'll make a deal with you.";
+			mes "if you cook me one of every";
+			mes "Lv 1 food, then I'll try";
+			mes "your Cooking...";
+			next;
+			menu "Agree",-, "Refuse",L_Taste_End;
+
+			mes "[Chef's Apprentice]";
+			mes "You'll need to make all";
+			mes "six foods. Let me know";
+			mes "when you're finished.";
+			set cooking, 4;
+			close;
+
+		L_Taste_End:
+			mes "[Chef's Apprentice]";
+			mes "Come back when you feel";
+			mes "more confident.";
+			close;
+
+		L_No_Talk:
+			mes "[Chef's Apprentice]";
+			mes "Come back to vist anytime!";
+			mes "Have a good day.";
+			close;
+	}
+
+	if(cooking == 4){
+		if(countitem(12056)
+			&& countitem(12061)
+			&& countitem(12046)
+			&& countitem(12066)
+			&& countitem(12041)
+			&& countitem(12051)) {//Items: Frog Spawn Soup, Grape Juice with Honey, Grape Juice and Tea, Fried Monkey Tail, Boiled Locust, Steamed Crab Pincer,
+
+			delitem 12056, 1;//Items: Frog Spawn Soup,
+			delitem 12061, 1;//Items: Grape Juice with Honey,
+			delitem 12046, 1;//Items: Grape Juice and Tea,
+			delitem 12066, 1;//Items: Fried Monkey Tail,
+			delitem 12041, 1;//Items: Boiled Locust,
+			delitem 12051, 1;//Items: Steamed Crab Pincer,
+
+			mes "What!? Through already?";
+			mes "Let me see what you've made";
+			next;
+
+			mes "[Chef's Apprentice]";
+			mes "Great job, but there's";
+			mes "still one thing that I need";
+			mes "you to do. Talk to a friend";
+			mes "of mine in Payon. We used";
+			mes "to study together.";
+			next;
+			mes "[Chef's Apprentice]";
+			mes "Take him this ^000080Leather Pouch^000000,";
+			mes "and I'll put in a good word";
+			mes "for you with my teacher.";
+
+			getitem 7432, 1;//Items: Leather Pouch,
+			set cooking, 5;
+		} else {
+			mes "Please come back when you've cooked";
+			mes "all the Lv 1 foods.";
+			next;
+			menu "Buy Supplies",M_BuySupply, "Leave",L_No_Talk;		
+		}
+		close;
+	}
+
+	if(cooking == 5){
+		mes "Please, don't forget to";
+		mes "hand my ^000080Leather Pouch^000000";
+		mes "to my friend in Payon.";
+		next;
+		mes "[Chef's Apprentice]";
+		mes "Well... Is there something";
+		mes "that I can help you with?";
+		next;
+		menu "Buy Supplies",-, "Leave",L_No_Talk2;
+
+			mes "[Chef's Apprentice]";
+			mes "Outdoor Cooking Set - 500z each.";
+			mes " How many?";
+			input @amount;
+			if(@amount < 1) goto ER_Invalid;
+			if(@amount > 100) goto ER_TooMuch;
+			if(@amount*500 > Zeny) goto ER_Zeny;
+			set Zeny, Zeny-(@amount*500);
+			getitem 12125, @amount;//Items: Outdoor Cooker,
+
+			next;
+			mes "[Chef's Apprentice]";
+			mes "Enjoy!";
+			close;
+
+		L_No_Talk2:
+			mes "[Chef's Apprentice]";
+			mes "Come back to vist anytime!";
+			mes "Have a good day.";
+			close;
+	}
+
+	if(cooking == 6){
+		mes "Thank you for taking that";
+		mes "pouch to my friend! Take";
+		mes "this as a gift.";
+		set cooking, 7;
+		getitem 12126, 10;//Items: Home Cooking Set,
+		next;
+		mes "[Chef's Apprentice]";
+		mes "Come back later if you";
+		mes "need anything else!";
+		close;
+	}
+
+	if(cooking == 7){
+		mes "Welcome back. What";
+		mes "would you like to do?";
+		next;
+		menu "Buy Supplies",-, "Just visiting",L_Leave3;
+
+				mes "[Chef's Apprentice]";
+				mes "What would you like?";
+				next;
+				menu "Outdoor Cooking Set - 500z each",-, "Home Cooking Set - 1,000z",L_HomeCooking, "Never Mind",L_Leave3;
+
+				set @price, 500;
+				set @tool, 12125;
+				goto L_Cooking_Tools4;
+
+			L_HomeCooking:
+				set @price, 1000;
+				set @tool, 12126;
+
+		L_Cooking_Tools4:
+			mes "[Chef's Apprentice]";
+			mes " How many?";
+			input @amount;
+			if(@amount < 1) goto ER_Invalid;
+			if(@amount > 100) goto ER_TooMuch;
+			if(@amount*@price > Zeny) goto ER_Zeny;
+			set Zeny, Zeny-(@amount*@price);
+			getitem @tool, @amount;
+
+			next;
+			mes "[Chef's Apprentice]";
+			mes "Enjoy!";
+			close;		
+
+		L_Leave3:
+			mes "[Chef's Apprentice]";
+			mes "Come back to vist anytime!";
+			mes "Have a good day.";
+			close;
+	}			
+			
+	mes "Hi there. What can I";
+	mes "do for you?";
+	next;
+	menu "Just looking around",-, "I want to learn to cook",ap_2;
+
+		mes "[Chef's Apprentice]";
+		mes "Feel free to look around";
+		mes "as much as you like.";
+		mes "Just don't disturb my";
+		mes "teacher.";
+		close;
+
+	ap_2:
+		if(baseLevel < 50){
+			mes "[Chef's Apprentice]";
+			mes "You should train a little";
+			mes "more before trying something";
+			mes "as hard as cooking";
+			close;
+		}
+
+		set cooking, 1;
+		mes "[Chef's Apprentice]";
+	L_Remind:
+		mes "So you want to learn to";
+		mes "cook huh? Well, if you";
+		mes "think you can handle it,";
+		mes "just talk to my teacher.";
+		next;
+		mes "[Chef's Apprentice]";
+		mes "Just don't forget your";
+		mes "^000080Chef's Hat^000000 or Sharle";
+		mes "will yell at you.";
+		close;
+
+	ER_Zeny:
+		next;
+		mes "[Chef's Apprentice]";
+		mes "You don't have enough zeny.";
+		close;
+
+	ER_TooMuch:
+		next;
+		mes "[Chef's Apprentice]";
+		mes "You can't by that much at a time!.";
+		mes "You don't have to buy it all at once.";
+		close;
+	ER_Invalid:
+		next;
+		mes "[Chef's Apprentice]";
+		mes "You can't buy negative amounts of cooking";
+		mes "equipment. Please buy a valid amount.";
+		close;
+}
+
+
+payon.gat,209,127,4	script	Cooking Friend	88,{
+	mes "[Cooking Friend]";
+	if(cooking == 5){
+		if(countitem(7432)) {
+			delitem 7432, 1;//Items: Leather Pouch,
+			mes "I see my friend sent you";
+			mes "to give me something.";
+			set cooking, 6;
+			emotion e_thx;
+		} else {
+			mes "What? My friend sent you";
+			mes "just to say Hello?";
+			emotion e_hmm;
+		}
+		mes "Thank you for your";
+		mes "trouble. Tell him I said,";
+		mes "Hello.";
+		close;
+	}
+	mes "Hello, how are you?";
+	close;
+}
+
+
+prt_castle.gat,45,35,4	script	Sharle	886,{
+	mes "[Sharle]";
+	if(cooking && getequipid(1) != 5026) goto L_No_Uniform; //Item: Chef's Hat
+	if(cooking == 7)goto L_Cooking_7;
+	if(first_cooking)goto L_First_Cooking;
+
+	if(cooking == 1){
+		mes "So you want to learn how to cook?";
+		next;
+		menu "Yes",M_GetQuest, "No",M_End;
+	}
+
+	mes "What a great day to bake some";
+	mes "wonderfull treats!";
+	close;
+
+	M_GetQuest:
+		mes "[Sharle]";
+		mes "Ok. Let's try to cook something together.";
+		set first_cooking,rand(1,6);
+
+	L_First_Cooking:
+		mes "I'm lack of special ingredients,";
+		mes "bring me:";
+		if(first_cooking == 1){
+			set @item1, 577;
+			set @item1a, 1;
+			set @item2, 908;
+			set @item2a, 10;
+			set @item3, 1024;
+			set @item3a, 1;
+			set @food1, 12056;
+
+			mes "1 Grain, 10 Spawn, and";
+			mes "1 Squid Ink.";
+		}
+
+		if(first_cooking == 2){
+			set @item1, 518;
+			set @item1a, 1;
+			set @item2, 514;
+			set @item2a, 2;
+			set @item3, 501;
+			set @item3a, 1;
+			set @food1, 12061;
+
+			mes "1 Honey, 2 Grapes, and";
+			mes "1 Red Potion.";
+		}
+
+		if(first_cooking == 3){
+			set @item1, 514;
+			set @item1a, 3;
+			set @item2, 501;
+			set @item2a, 2;
+			set @item3, 0;
+			set @item3a, 0;
+			set @food1, 12046;
+
+			mes "3 Grapes and 2 Red Potions.";
+		}
+
+		if(first_cooking == 4){
+			set @item1, 942;
+			set @item1a, 5;
+			set @item2, 7031;
+			set @item2a, 1;
+			set @item3, 7457;
+			set @item3a, 1;
+			set @food1, 12066;
+
+			mes "5 Yoyo Tails, 1 Old Frying Pan, and";
+			mes "1 Cooking Oil.";
+		}
+
+		if(first_cooking == 5){
+			set @item1, 940;
+			set @item1a, 5;
+			set @item2, 7031;
+			set @item2a, 1;
+			set @item3, 7457;
+			set @item3a, 1;
+			set @food1, 12041;
+
+			mes "5 Grasshopper Legs, 1 Old Frying Pan, and";
+			mes "1 Cooking Oil.";
+		}
+
+		if(first_cooking == 6){
+			set @item1, 960;
+			set @item1a, 10;
+			set @item2, 511;
+			set @item2a, 10;
+			set @item3, 503;
+			set @item3a, 1;
+			set @food1, 12051;
+
+			mes "10 Nippers, 10 Green Herbs, and";
+			mes "1 Yellow Potion.";
+		}
+
+		if(countitem(@item1) < @item1a || countitem(@item2) < @item2a || countitem(@item3) < @item3a) close;
+
+		delitem @item1, @item1a;
+		delitem @item2, @item2a;
+		delitem @item3, @item3a;
+		next;
+		set cooking, 2;
+
+		mes "[Sharle]";
+		mes "Great Job!";
+		mes "You can now purchase";
+		mes "Outdoor Cooking Sets.";
+		getitem @food1, 1;
+		set first_cooking, 0;
+		close;
+
+	L_Cooking_7:
+		mes "Would you like to check";
+		mes "out my ^800000Cookbooks^000000?";
+		next;
+		menu "Yes",-, "No", M_End2, "Return Book", M_ReturnBook;
+
+		mes "[Sharle]";
+		if(cook_book){
+			mes "You'll have to give me back the";
+			mes "first book I loaned you if you";
+			mes "would like to check out a new book.";
+			mes "Would you like to trade books?";
+			next;
+			menu "Yes",-, "No",M_End2;
+
+			if(countitem(cook_book)==0){
+				mes "What? You don't have the book I loaned you?";
+				mes "It was a ^800000"+getitemname(cook_book)+"^000000.";
+				emotion e_sry;
+				close;
+			} 
+		}
+		mes "[Sharle]";
+		mes "Which book would you like?";
+		next;
+		menu "^800000Lv 1 Cookbook",b_1, "Lv 2 Cookbook",b_2, "Lv 3 Cookbook",b_3, "Lv 4 Cookbook",b_4, "Lv 5 Cookbook",b_5, "^000000Leave",M_End2;
+
+	b_1:
+		mes "[Sharle]";
+		mes "You will need:";
+		mes "10 Pumpkins";
+		next;
+		if(countitem(535) < 10) goto L_No_Items;//Items: Pumpkin,
+		delitem 535, 10;//Items: Pumpkin,
+		set @checkout, 7472;
+		mes "And I see you have";
+		mes "what you need!";
+		next;
+		goto b_trade;
+
+	b_2:
+		mes "[Sharle]";
+		mes "You will need:";
+		mes "5 well-baked cookies";
+		next;
+		if(countitem(538) < 5) goto L_No_Items;//Items: Well-baked Cookie,
+		delitem 538, 5;//Items: Well-baked Cookie,
+		set @checkout, 7473;
+		mes "And I see you have";
+		mes "what you need!";
+		next;
+		goto b_trade;
+
+	b_3:
+		mes "[Sharle]";
+		mes "You will need:";
+		mes "5 Sushi";
+		next;
+		if(countitem(551) < 5) goto L_No_Items;//Items: Sushi,
+		delitem 551, 5;//Items: Sushi,
+		set @checkout, 7474;
+		mes "And I see you have";
+		mes "what you need!";
+		next;
+		goto b_trade;
+
+	b_4:
+		mes "[Sharle]";
+		mes "You will need:";
+		mes "5 Baos";
+		next;
+		if(countitem(553) < 5) goto L_No_Items;//Items: Bao,
+		delitem 553, 5;//Items: Bao,
+		set @checkout, 7475;
+		mes "And I see you have";
+		mes "what you need!";
+		next;
+		goto b_trade;
+
+	b_5:
+		mes "[Sharle]";
+		mes "You will need:";
+		mes "10 shoots";
+		next;
+		if(countitem(711) < 10) goto L_No_Items;//Items: Shoot,
+		delitem 711, 10;//Items: Shoot,
+		set @checkout, 7476;
+		mes "And I see you have";
+		mes "what you need!";
+		next;
+		goto b_trade;
+
+	b_trade:
+		mes "[Sharle]";
+		mes "If you find you need a new book,";
+		mes "you're welcome to come back and";
+		mes "trade.";
+
+		if(cook_book){
+			if(countitem(cook_book)==0){
+				mes "What? You don't have the book I loaned you?";
+				mes "It was a ^800000"+getitemname(cook_book)+"^000000.";
+				emotion e_sry;
+				close;
+			} 
+			delitem cook_book,1;
+			mes "Have fun, and good luck!";
+		} else {
+			mes "Good luck! I hope you learn a lot!";
+		}
+		getitem @checkout,1;
+		set cook_book, @checkout;
+		close;
+
+	M_End:
+		mes "[Sharle]";
+		mes "That's fine with me, come back";
+		mes "when you want to cook.";
+		close;
+
+	M_End2:
+		mes "[Sharle]";
+		mes "Well, I'm here whenever you'd like";
+		mes "to learn. Just make sure you're";
+		mes "ready.";
+		close;
+
+	M_ReturnBook:
+		if(cook_book == 0){
+			mes "[Sharle]";
+			mes "You haven't borrowed any books.";
+			emotion e_hmm;
+			close;
+		}
+
+		if(countitem(cook_book)==0){
+			mes "What? You don't have the book I loaned you?";
+			mes "It was a ^800000"+getitemname(cook_book)+"^000000.";
+			emotion e_sry;
+			close;
+		} 
+		delitem cook_book,1;
+		set cook_book, 0;
+		mes "[Sharle]";
+		mes "Returning the book already?";
+		mes "did you learn what you wanted";
+		mes "to know?";
+		emotion e_what;
+		close;
+
+	L_No_Items:
+		mes "[Sharle]";
+		mes "So come back when";
+		mes "you have the items";
+		mes "that you need.";
+		close;
+
+	L_No_Uniform:
+		mes "How dare you disrespect me";
+		mes "by showing up out of uniform.";
+		mes "Come back when you have your";
+		mes "uniform on.";
+		emotion e_bzz;
+		close;	
+}
diff --git a/npc/quests/counteragent_mixture.txt b/npc/quests/counteragent_mixture.txt
index 019030992..ec2f0a0b9 100644
--- a/npc/quests/counteragent_mixture.txt
+++ b/npc/quests/counteragent_mixture.txt
@@ -1,268 +1,268 @@
-//===== eAthena Script ======================================= 

-//= Counteragent and Mixture Quest(Morgenstein)

-//===== By: ================================================== 

-//= kobra_k88

-//= added some dialogs for Morgenstein by Komurka

-//===== Current Version: ===================================== 

-//= 2.1

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//= Counteragent and Mixtures for making dyes & Alchemist Job Quest

-//===== Additional Comments: ================================= 

-//= Fully working

-//= Update for Alchemist Quest.

-//= 1.2 added check for Empty Bottle [Lupus]

-//= Fixed some lil thingys [Darkchild]

-//= More li'l thing, added comments for items IDs [Lupus]

-//= 1.5 Fixed Spelling mistakes. [Nexon]

-//= 1.6 Fixed some bugs, also related to Alch Job quest [Lupus]

-//= 1,7 Fixed exploit 1.8 Got rid of 'al_morgen' var [Lupus]

-//= 2.1 now uses (MISC_QUEST & 4) bit instead of al_morgen [Lupus]

-//============================================================ 

-

-

-// Merchant Louitz -----------------------------------------------------------

-alberta_in.gat,130,54,2	script	Merchant Louitz	84,{

-	mes "[Louitz]";

-	mes "What's going on?";

-	if(countitem(970) && countitem(971) && countitem(972)) goto M_Menu2;//Items: Alcohol, Detrimindexta, Karvodailnirol,

-M_Menu:

-	next;

-	menu "Talk",M_Talk,"Cancel",M_Cancel;

-M_Menu2:

-	next;

-	menu "Talk",M_Talk,"More about solutions",M_Solut,"Cancel",M_Cancel;

-	

-	M_Talk:

-		mes "[Merchant Louitz]";

-		mes "I was in Geffen for a while trying to find magic tools when I heard some rumors about a Mad Scientist.";

-		mes "I became very interested in the man and tried to meet with him on several occasions.";

-		next;

-		mes "[Merchant Louitz]";

-		mes "After many attempts, I finally got to meet him.  Unfortunately he was too immersed in his work and didn't even take notice of me.";

-		next;

-		mes "[Merchant Louitz]";

-		mes "He kept on mumbling to himself ^0000FF'Karvodainirol... Detrimindexta... Alcohol^000000...'";

-		next;

-		mes "[Merchant Louitz]";

-		mes "I had know idea what he was talking about at first, but I later learned that those were names for some unique and rare solutions.";

-		if(countitem(970) && countitem(971) && countitem(972)) goto M_Menu2;//Items: Alcohol, Detrimindexta, Karvodailnirol,

-		mes "I wish ^0000FFI could see them^000000 with my own eyes...";

-		emotion e_slur;

-		goto M_Menu;

-

-	M_Solut:

-		if((MISC_QUEST & 4)==0 && MORGEN==0)set MORGEN,1;

-		mes "[Merchant Louitz]";

-		mes "Apparently that scientist uses those solutions to make other agents and mixtures.";

-		mes "You should speak with ^0000ddAure Dupon^000000 in Geffen to find out more about it. ";

-		next;

-		mes "[Merchant Louitz]";

-		mes "You can find him near the ^0000ddEast end^000000 of town.  Ask him about ^0000ddMorgenstein^000000.  That's the mad scientists' name.";

-		goto M_Menu2;

-

-	M_Cancel:

-		mes "[Louitz]";

-		mes "Um... Now I've seen everything.";

-		close;

-}

-

-// Aure Dupon ------------------------------------------------------------------------

-geffen.gat,181,114,4	script	Aure Dupon	55,{

-	mes "[Aure Dupon]";

-	mes "TIME never WAITS for you!! Even MAGIC cannot SLOW it down!  I can feel it passing me by even as we speak!!....";

-	emotion e_gasp;

-	next;

-	mes "[Aure Dupon]";

-	mes "So... why did you stop me??";

-	emotion e_hmm;

-	if((MISC_QUEST & 4) || MORGEN) goto M_Menu2;

-M_Menu:

-	next;

-	menu "Talk",M_Talk,"Cancel",M_Cancel;

-M_Menu2:

-	next;

-	menu "Talk",M_Talk,"More about Morgenstein",M_Morgen,"Cancel",M_Cancel;

-	

-	M_Talk:

-		mes "[Aure Dupon]";

-		mes "It's true that I'm a little eccentric because of my quest to gain the power of magic, but I assure that there are others out there that are even stranger than myself.";

-		next;

-		mes "[Aure Dupon]";

-		mes "Like that mad scientist ^0000ddMorgenstein^000000.  Anyway, if it were up to you, would you be able to devote your ENTIRE life to one single purpose?";

-		next;

-		mes "[Aure Dupon]";

-		mes "Would you be able to give up everything else in your life to achieve that goal? Even if it meant risking insanity??";

-		if((MISC_QUEST & 4) || MORGEN) goto M_Menu2;

-		goto M_Menu;

-

-	M_Morgen:

-		if(MORGEN==1) set MORGEN,2;

-		mes "[Aure Dupon]";

-		mes "Morgenstein? Now that man definatley has a few screws loose.  He's always in the ^0000ddBlasksmith Guild Building^000000 making crazy potions.";

-		mes "He calls them ^ff0000Mixtures^000000 and ^ff0000Counteragents^000000.  I'm not sure what there used for though.";

-		next;

-		mes "[Aure Dupon]";

-		mes "You should go speak with him if your that curious about his work.";

-		goto M_Menu2;

-

-	M_Cancel:

-		mes "[Aure Dupon]";

-		mes "Human beings are just a small part of Nature.... therefore the human will is that of Natures will.....";

-		close;

-}

-

-// Chemist Morgenstein -----------------------------------------------------------

-geffen_in.gat,141,140,2	script	Morgenstein	121,{

-	if(MORGEN >= 2) goto L_0;

-	if(MISC_QUEST & 4) goto L_1;

-

-	mes "[Chemist Morgenstein]";

-	mes "Heheheheheh... Sniff Sniff... I can smell something appetizing here.";

-	mes "It is a Human Being... living one... umm yummy... Heheheheheh";

-	emotion e_awsm;

-	close;

-

-L_0:

-	mes "[Chemist Morgenstein]";

-	mes "So you've been asking about me huh? What is it that you want to know?";

-M_Menu:

-	next;

-	menu "Ask about research",M_Rsrch,"Nothing",M_End;

-	

-	M_Rsrch:

-		mes "[Chemist Morgenstein]";

-		mes "Heheheheheh... You probably already heard about what I do ...";

-		mes "Okay.. I will tell you everything... there is nothing left for me to hide.... Heheheheheh...";

-		emotion e_gg;

-		next;

-		mes "[Chemist Morgenstein]";

-		mes "As far as I'm concerned my research has already been completed.....";

-		mes "I am a genius you know, and I can make anything!! Heheheheh... it's only a matter how long it will take...";

-		next;

-		mes "[Chemist Morgenstein]";

-		mes "You know what I mean..... time?.... Hehehehehehehya....";

-		emotion e_gg;

-		next;

-		mes "[Chemist Morgenstein]";

-		mes "Um.... did you say you want to know about my Research?... Oh it's all very simple.... I'm just trying to find ways to combine different materials...";

-		next;

-		mes "[Chemist Morgenstein]";

-		mes "Isn't it interesting? I'm perfecting a method that melts materials, such as iron and stone, and then mixes them into a new substance!!!";

-		mes "Once it is perfected, I will be able to turn anything in the word into a new substance.....";

-		next;

-		mes "[Chemist Morgenstein]";

-		mes "~~~~ !! Hehe!!!...Heheheheheh!!!...squash squash!!!..Kekekekekelll!!!!";

-		emotion e_slur;

-		next;

-		mes "[Chemist Morgenstein]";

-		mes "Ack!~cough~cough~ Ahem.... Though it is not yet possible, I did figure out something else incredible.";

-		mes "Through my research I found out how to make different types of liquids.  I call them ^5533FF'counteragents and mixtures'^000000.";

-		next;

-		mes "[Chemist Morgenstein]";

-		mes "I can make one for you right now,if you want?? Ahhh... Talking about my experiments and research makes me.... 'excited'.......";

-		mes "You too can feel my 'excitement' if you wish..... Ahhhhh.... I can make you feel...";

-		set MISC_QUEST,MISC_QUEST | 4;

-		set MORGEN,0;

-		close;

-

-L_1:

-	mes "[Chemist Morgenstein]";

-	mes "What do you want now?";

-M_Menu2:

-	next;

-	menu "Ask about research",M_Rsrch,"Make a new one",-, "Nothing",M_End;

-	

-		mes "[Chemist Morgenstein]";

-		mes "Heheheheheheh.... So I see you are interested in my creations?..... Who woudn't.... Kekekekekekeke!!!";

-		mes "So what do you want me to make for you?? Huh? Heheheheheh.............";

-		emotion e_gg;

-		next;

-		menu "-Counteragent",-, "-Mixture",sM_Mixture, "-Forget it",M_End;

-		

-			mes "[Chemist Morgenstein]";

-			mes "Oh... You said Counteragent... Kekekekekekeke... Let's see.... I'll need some items.......";

-			mes "... Let me check... Oh... Oh...... Ahhhh..... Hmmm.....";

-			next;

-			mes "[Chemist Morgenstein]";

-			mes "Oh.... As I recall I need....:";

-			mes "^5533FF1 Alcohol";

-			mes "1 Detrimindexta^000000......";

-			mes "and ^5533FF1 Empty Bottle^000000....";

-			next;

-			mes "[Chemist Morgenstein]";

-			mes "With these 3 things I'll be able to make you a counter agent.  It won't be a big deal to make..... Kekekekekekeke....";

-			mes "Oh, and there will be a fee of ^5533FF3000 zeny^000000 okay? Heheheheheh..... Oh, surely you don't think it's rip-off?...";

-			next;

-			mes "[Chemist Morgenstein]";

-			mes "Alright?....";

-			next;

-			menu "Make",-,"Cancel",M_End;

-

-				mes "[Chemist Morgenstein]";

-				if(countitem(970) && countitem(971) && countitem(713) && Zeny>=3000) goto sl_GetCounter;//Items: Alcohol, Detrimindexta, Empty Bottle,

-					mes "I'm sorry but you need 1 Empty Bottle, 1 Alcohol, 1 Detrimindexta, and 3000 Zeny for me to make a Counteragent.";

-					emotion e_sry;

-					close;

-	

-				sl_GetCounter:

-					delitem 970,1;//Items: Alcohol,

-					delitem 713,1;//Items: Empty Bottle,

-					delitem 971,1;//Items: Detrimindexta,

-					set Zeny, Zeny-3000;

-					mes "OhOhOhOh...... Heheheheheh...... Fine... Like this..... Fine... Keep... More........ Heheheheheh";

-					mes ".... Ahhhh.... ..... OhOh.... OhOh!..... OhOhOhOhOhOh!!!...!!!!!!";

-					next;

-					getitem 973,1;//Items: Counteragent,

-					mes "[Chemist Morgenstein]";

-					mes ".... Hmmm......";

-					emotion e_hmm;

-					close;

-

-		sM_Mixture:

-			mes "[Chemist Morgenstein]";

-			mes "Oh... You said Mixture?... Kekekekekekeke... Let's see... I'll need some items.......";

-			mes "... Let me check... Oh... Oh...... Ahhhh..... Hmmm.....";

-			next;

-			mes "[Chemist Morgenstein]";

-			mes "Oh.... As I recall I need....:";

-			mes "^5533FF1 Alcohol";

-			mes "1 Karvodailnirol^000000.....";

-			mes "and ^5533FF1 Empty Bottle^000000...........";

-			next;

-			mes "[Chemist Morgenstein]";

-			mes "With these 3 things I'll be able to make you a mixture.  It won't be a big deal to make..... Kekekekekekeke....";

-			mes "Oh, and there will be a fee of ^5533FF4000 zeny^000000 okay? Heheheheheh..... Oh, surely you don't think it's rip-off?...";

-			next;

-			mes "[Chemist Morgenstein]";

-			mes "Alright??...";

-			next;

-			menu "Make",-,"Cancel",M_End;

-

-				mes "[Chemist Morgenstein]";

-				if(countitem(970) && countitem(972) && countitem(713) && Zeny>=4000) goto sl_GetMix;//Items: Alcohol, Karvodailnirol, Empty Bottle,

-					mes "I'm sorry but you need 1 Empty Bottle, 1 Alcohol, 1 Karvodainirol, and 4000 Zeny for me to make a Mixture.";

-					emotion e_sry;

-					close;

-			

-				sl_GetMix:

-					delitem 970,1;//Items: Alcohol,

-					delitem 713,1;//Items: Empty Bottle,

-					delitem 972,1;//Items: Karvodailnirol,

-					set Zeny, Zeny-4000;

-					mes "OhOhOhOh...... Heheheheheh...... Fine... Like this..... Fine... Keep... More........ Heheheheheh";

-					mes ".... Ahhhh.... ..... OhOh.... OhOh!..... OhOhOhOhOhOh!!!...!!!!!!";

-					next;

-					getitem 974,1;//Items: Mixture,

-					mes "[Chemist Morgenstein]";

-					mes ".... Hmmm......";

-					emotion e_hmm;

-					close;

-

-	M_End:

-		mes "[Chemist Morgenstein]";

-		mes "... Kekekekekekeke....";

-		emotion e_heh;

-		close;

+//===== eAthena Script ======================================= 
+//= Counteragent and Mixture Quest(Morgenstein)
+//===== By: ================================================== 
+//= kobra_k88
+//= added some dialogs for Morgenstein by Komurka
+//===== Current Version: ===================================== 
+//= 2.1
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//= Counteragent and Mixtures for making dyes & Alchemist Job Quest
+//===== Additional Comments: ================================= 
+//= Fully working
+//= Update for Alchemist Quest.
+//= 1.2 added check for Empty Bottle [Lupus]
+//= Fixed some lil thingys [Darkchild]
+//= More li'l thing, added comments for items IDs [Lupus]
+//= 1.5 Fixed Spelling mistakes. [Nexon]
+//= 1.6 Fixed some bugs, also related to Alch Job quest [Lupus]
+//= 1,7 Fixed exploit 1.8 Got rid of 'al_morgen' var [Lupus]
+//= 2.1 now uses (MISC_QUEST & 4) bit instead of al_morgen [Lupus]
+//============================================================ 
+
+
+// Merchant Louitz -----------------------------------------------------------
+alberta_in.gat,130,54,2	script	Merchant Louitz	84,{
+	mes "[Louitz]";
+	mes "What's going on?";
+	if(countitem(970) && countitem(971) && countitem(972)) goto M_Menu2;//Items: Alcohol, Detrimindexta, Karvodailnirol,
+M_Menu:
+	next;
+	menu "Talk",M_Talk,"Cancel",M_Cancel;
+M_Menu2:
+	next;
+	menu "Talk",M_Talk,"More about solutions",M_Solut,"Cancel",M_Cancel;
+	
+	M_Talk:
+		mes "[Merchant Louitz]";
+		mes "I was in Geffen for a while trying to find magic tools when I heard some rumors about a Mad Scientist.";
+		mes "I became very interested in the man and tried to meet with him on several occasions.";
+		next;
+		mes "[Merchant Louitz]";
+		mes "After many attempts, I finally got to meet him.  Unfortunately he was too immersed in his work and didn't even take notice of me.";
+		next;
+		mes "[Merchant Louitz]";
+		mes "He kept on mumbling to himself ^0000FF'Karvodainirol... Detrimindexta... Alcohol^000000...'";
+		next;
+		mes "[Merchant Louitz]";
+		mes "I had know idea what he was talking about at first, but I later learned that those were names for some unique and rare solutions.";
+		if(countitem(970) && countitem(971) && countitem(972)) goto M_Menu2;//Items: Alcohol, Detrimindexta, Karvodailnirol,
+		mes "I wish ^0000FFI could see them^000000 with my own eyes...";
+		emotion e_slur;
+		goto M_Menu;
+
+	M_Solut:
+		if((MISC_QUEST & 4)==0 && MORGEN==0)set MORGEN,1;
+		mes "[Merchant Louitz]";
+		mes "Apparently that scientist uses those solutions to make other agents and mixtures.";
+		mes "You should speak with ^0000ddAure Dupon^000000 in Geffen to find out more about it. ";
+		next;
+		mes "[Merchant Louitz]";
+		mes "You can find him near the ^0000ddEast end^000000 of town.  Ask him about ^0000ddMorgenstein^000000.  That's the mad scientists' name.";
+		goto M_Menu2;
+
+	M_Cancel:
+		mes "[Louitz]";
+		mes "Um... Now I've seen everything.";
+		close;
+}
+
+// Aure Dupon ------------------------------------------------------------------------
+geffen.gat,181,114,4	script	Aure Dupon	55,{
+	mes "[Aure Dupon]";
+	mes "TIME never WAITS for you!! Even MAGIC cannot SLOW it down!  I can feel it passing me by even as we speak!!....";
+	emotion e_gasp;
+	next;
+	mes "[Aure Dupon]";
+	mes "So... why did you stop me??";
+	emotion e_hmm;
+	if((MISC_QUEST & 4) || MORGEN) goto M_Menu2;
+M_Menu:
+	next;
+	menu "Talk",M_Talk,"Cancel",M_Cancel;
+M_Menu2:
+	next;
+	menu "Talk",M_Talk,"More about Morgenstein",M_Morgen,"Cancel",M_Cancel;
+	
+	M_Talk:
+		mes "[Aure Dupon]";
+		mes "It's true that I'm a little eccentric because of my quest to gain the power of magic, but I assure that there are others out there that are even stranger than myself.";
+		next;
+		mes "[Aure Dupon]";
+		mes "Like that mad scientist ^0000ddMorgenstein^000000.  Anyway, if it were up to you, would you be able to devote your ENTIRE life to one single purpose?";
+		next;
+		mes "[Aure Dupon]";
+		mes "Would you be able to give up everything else in your life to achieve that goal? Even if it meant risking insanity??";
+		if((MISC_QUEST & 4) || MORGEN) goto M_Menu2;
+		goto M_Menu;
+
+	M_Morgen:
+		if(MORGEN==1) set MORGEN,2;
+		mes "[Aure Dupon]";
+		mes "Morgenstein? Now that man definatley has a few screws loose.  He's always in the ^0000ddBlasksmith Guild Building^000000 making crazy potions.";
+		mes "He calls them ^ff0000Mixtures^000000 and ^ff0000Counteragents^000000.  I'm not sure what there used for though.";
+		next;
+		mes "[Aure Dupon]";
+		mes "You should go speak with him if your that curious about his work.";
+		goto M_Menu2;
+
+	M_Cancel:
+		mes "[Aure Dupon]";
+		mes "Human beings are just a small part of Nature.... therefore the human will is that of Natures will.....";
+		close;
+}
+
+// Chemist Morgenstein -----------------------------------------------------------
+geffen_in.gat,141,140,2	script	Morgenstein	121,{
+	if(MORGEN >= 2) goto L_0;
+	if(MISC_QUEST & 4) goto L_1;
+
+	mes "[Chemist Morgenstein]";
+	mes "Heheheheheh... Sniff Sniff... I can smell something appetizing here.";
+	mes "It is a Human Being... living one... umm yummy... Heheheheheh";
+	emotion e_awsm;
+	close;
+
+L_0:
+	mes "[Chemist Morgenstein]";
+	mes "So you've been asking about me huh? What is it that you want to know?";
+M_Menu:
+	next;
+	menu "Ask about research",M_Rsrch,"Nothing",M_End;
+	
+	M_Rsrch:
+		mes "[Chemist Morgenstein]";
+		mes "Heheheheheh... You probably already heard about what I do ...";
+		mes "Okay.. I will tell you everything... there is nothing left for me to hide.... Heheheheheh...";
+		emotion e_gg;
+		next;
+		mes "[Chemist Morgenstein]";
+		mes "As far as I'm concerned my research has already been completed.....";
+		mes "I am a genius you know, and I can make anything!! Heheheheh... it's only a matter how long it will take...";
+		next;
+		mes "[Chemist Morgenstein]";
+		mes "You know what I mean..... time?.... Hehehehehehehya....";
+		emotion e_gg;
+		next;
+		mes "[Chemist Morgenstein]";
+		mes "Um.... did you say you want to know about my Research?... Oh it's all very simple.... I'm just trying to find ways to combine different materials...";
+		next;
+		mes "[Chemist Morgenstein]";
+		mes "Isn't it interesting? I'm perfecting a method that melts materials, such as iron and stone, and then mixes them into a new substance!!!";
+		mes "Once it is perfected, I will be able to turn anything in the word into a new substance.....";
+		next;
+		mes "[Chemist Morgenstein]";
+		mes "~~~~ !! Hehe!!!...Heheheheheh!!!...squash squash!!!..Kekekekekelll!!!!";
+		emotion e_slur;
+		next;
+		mes "[Chemist Morgenstein]";
+		mes "Ack!~cough~cough~ Ahem.... Though it is not yet possible, I did figure out something else incredible.";
+		mes "Through my research I found out how to make different types of liquids.  I call them ^5533FF'counteragents and mixtures'^000000.";
+		next;
+		mes "[Chemist Morgenstein]";
+		mes "I can make one for you right now,if you want?? Ahhh... Talking about my experiments and research makes me.... 'excited'.......";
+		mes "You too can feel my 'excitement' if you wish..... Ahhhhh.... I can make you feel...";
+		set MISC_QUEST,MISC_QUEST | 4;
+		set MORGEN,0;
+		close;
+
+L_1:
+	mes "[Chemist Morgenstein]";
+	mes "What do you want now?";
+M_Menu2:
+	next;
+	menu "Ask about research",M_Rsrch,"Make a new one",-, "Nothing",M_End;
+	
+		mes "[Chemist Morgenstein]";
+		mes "Heheheheheheh.... So I see you are interested in my creations?..... Who woudn't.... Kekekekekekeke!!!";
+		mes "So what do you want me to make for you?? Huh? Heheheheheh.............";
+		emotion e_gg;
+		next;
+		menu "-Counteragent",-, "-Mixture",sM_Mixture, "-Forget it",M_End;
+		
+			mes "[Chemist Morgenstein]";
+			mes "Oh... You said Counteragent... Kekekekekekeke... Let's see.... I'll need some items.......";
+			mes "... Let me check... Oh... Oh...... Ahhhh..... Hmmm.....";
+			next;
+			mes "[Chemist Morgenstein]";
+			mes "Oh.... As I recall I need....:";
+			mes "^5533FF1 Alcohol";
+			mes "1 Detrimindexta^000000......";
+			mes "and ^5533FF1 Empty Bottle^000000....";
+			next;
+			mes "[Chemist Morgenstein]";
+			mes "With these 3 things I'll be able to make you a counter agent.  It won't be a big deal to make..... Kekekekekekeke....";
+			mes "Oh, and there will be a fee of ^5533FF3000 zeny^000000 okay? Heheheheheh..... Oh, surely you don't think it's rip-off?...";
+			next;
+			mes "[Chemist Morgenstein]";
+			mes "Alright?....";
+			next;
+			menu "Make",-,"Cancel",M_End;
+
+				mes "[Chemist Morgenstein]";
+				if(countitem(970) && countitem(971) && countitem(713) && Zeny>=3000) goto sl_GetCounter;//Items: Alcohol, Detrimindexta, Empty Bottle,
+					mes "I'm sorry but you need 1 Empty Bottle, 1 Alcohol, 1 Detrimindexta, and 3000 Zeny for me to make a Counteragent.";
+					emotion e_sry;
+					close;
+	
+				sl_GetCounter:
+					delitem 970,1;//Items: Alcohol,
+					delitem 713,1;//Items: Empty Bottle,
+					delitem 971,1;//Items: Detrimindexta,
+					set Zeny, Zeny-3000;
+					mes "OhOhOhOh...... Heheheheheh...... Fine... Like this..... Fine... Keep... More........ Heheheheheh";
+					mes ".... Ahhhh.... ..... OhOh.... OhOh!..... OhOhOhOhOhOh!!!...!!!!!!";
+					next;
+					getitem 973,1;//Items: Counteragent,
+					mes "[Chemist Morgenstein]";
+					mes ".... Hmmm......";
+					emotion e_hmm;
+					close;
+
+		sM_Mixture:
+			mes "[Chemist Morgenstein]";
+			mes "Oh... You said Mixture?... Kekekekekekeke... Let's see... I'll need some items.......";
+			mes "... Let me check... Oh... Oh...... Ahhhh..... Hmmm.....";
+			next;
+			mes "[Chemist Morgenstein]";
+			mes "Oh.... As I recall I need....:";
+			mes "^5533FF1 Alcohol";
+			mes "1 Karvodailnirol^000000.....";
+			mes "and ^5533FF1 Empty Bottle^000000...........";
+			next;
+			mes "[Chemist Morgenstein]";
+			mes "With these 3 things I'll be able to make you a mixture.  It won't be a big deal to make..... Kekekekekekeke....";
+			mes "Oh, and there will be a fee of ^5533FF4000 zeny^000000 okay? Heheheheheh..... Oh, surely you don't think it's rip-off?...";
+			next;
+			mes "[Chemist Morgenstein]";
+			mes "Alright??...";
+			next;
+			menu "Make",-,"Cancel",M_End;
+
+				mes "[Chemist Morgenstein]";
+				if(countitem(970) && countitem(972) && countitem(713) && Zeny>=4000) goto sl_GetMix;//Items: Alcohol, Karvodailnirol, Empty Bottle,
+					mes "I'm sorry but you need 1 Empty Bottle, 1 Alcohol, 1 Karvodainirol, and 4000 Zeny for me to make a Mixture.";
+					emotion e_sry;
+					close;
+			
+				sl_GetMix:
+					delitem 970,1;//Items: Alcohol,
+					delitem 713,1;//Items: Empty Bottle,
+					delitem 972,1;//Items: Karvodailnirol,
+					set Zeny, Zeny-4000;
+					mes "OhOhOhOh...... Heheheheheh...... Fine... Like this..... Fine... Keep... More........ Heheheheheh";
+					mes ".... Ahhhh.... ..... OhOh.... OhOh!..... OhOhOhOhOhOh!!!...!!!!!!";
+					next;
+					getitem 974,1;//Items: Mixture,
+					mes "[Chemist Morgenstein]";
+					mes ".... Hmmm......";
+					emotion e_hmm;
+					close;
+
+	M_End:
+		mes "[Chemist Morgenstein]";
+		mes "... Kekekekekekeke....";
+		emotion e_heh;
+		close;
 }
\ No newline at end of file
diff --git a/npc/quests/doomed_swords.txt b/npc/quests/doomed_swords.txt
index de03dee9d..594158bcc 100644
--- a/npc/quests/doomed_swords.txt
+++ b/npc/quests/doomed_swords.txt
@@ -1,682 +1,682 @@
-//===== eAthena Script =======================================

-//= Doomed Swords Quest

-//===== By: ==================================================

-//= kobra_k88

-//===== Current Version: =====================================

-//= 1.3

-//===== Compatible With: =====================================

-//= eAthena 7.15 +

-//===== Description: =========================================

-//= Quest for Doomed Swords, Grimtooth, Mysteltain, Executioner.

-//= Based off mRO version. Part 1 and 2 of the quest can be

-//= found in cities\comodo.txt.  Message text for Part 6 and 7

-//= is made up.

-//===== Additional Comments: =================================

-//=95% done

-//= 1.1 Fixed items count check. For all 3 swords... [Lupus]

-//= 1.3 Fixed exploit [Lupus]

-//============================================================

-

-

-//=============================================================================

-//			Doomed Swords Part 3

-//=============================================================================

-// Moet Leng Good: Tablet Of Power

-aldebaran.gat,44,53,4	script	Wizard in Training	64,{

-	if(dmdswrd_Q == 15) goto L_1;

-	if(dmdswrd_Q == 16) goto L_2;

-	if(dmdswrd_Q == 17) goto L_3;

-	if(dmdswrd_Q == 18) goto L_4;

-	mes "[Moet Leng Good]";

-	mes "Did you know that some people signed contract in shadows with the Dark Lord with the";

-	mes "^3355FF`Tablet of Power'^000000?!";

-	next;

-	mes "[Moet Leng Good]";

-	mes "As a result of their greed for power, it brought disasters for the entire world.";

-	mes "So please, be happy with what you already have and do not give in to the dark side.";

-	close;

-

-L_1:

-	mes "[Moet Leng Good]";

-	mes "I guess you are the possessor of the 'Stone of Awakening' and also the one seeking for the 'Tablet of Power'.";

-	next;

-	mes "[Moet Leng Good]";

-	mes "Very well then, I will help you to make a 'Tablet of Power'.";

-	mes "However, it is not a simple task, I will need a number of materials in order to succeed.";

-	next;

-	mes "[Moet Leng Good]";

-	mes "I will need one of these stones, gems, and ores.";

-	mes "^3355FF`Blue Gemstone'^000000";

-	mes "^3355FF`Sapphire'^000000";

-	mes "^3355FF`Aquarmarine'^000000";

-	mes "^3355FF`Shining Stone'^000000";

-	mes "and ^3355FF`Rough Elunium'^000000";

-	next;

-	mes "[Moet Leng Good]";

-	mes "In other words, the 'Tablet of Power' is very valuable, and might take you a while to gather the resources for it.";

-	set dmdswrd_Q,16;

-	close;

-L_2:

-	if((countitem(717) < 1) || (countitem(726) < 1) || (countitem(720) < 1) || (countitem(640) < 1) || (countitem(757) < 1)) goto L_1; 

-	mes "[Moet Leng Good]";

-	mes ". . . . . ! !";

-	mes "I can hardly believe that you actually gathered all the resources for the 'Tablet of Power'";

-	mes "Because you have worked so hard, let me make the tablet for you now.";

-	next;

-	delitem 717,1;

-	delitem 726,1;

-	delitem 720,1;

-	delitem 640,1;

-	delitem 757,1;

-	mes "^3355FF- Gives him all the stones -^000000";

-	set dmdswrd_Q,17;

-	next;

-	mes "[Moet Leng Good]";

-	mes "Now, I'll just need you to gather a few ingredients for the fininshing touch of the tablet.";

-	next;

-	mes "[Moet Leng Good]";

-	mes "I will need just one ^3355FF`Cobweb'^000000";

-	mes "You could easily obtain them through argos in Mt. Mjolnir";

-	next;

-	mes "^3355FF- Moet Leng Good's-^000000";

-	mes "^3355FF- working hard on the tablet -^000000";

-	close;

-L_3:

-	if(countitem(1025) > 0) goto sL_3;

-	mes "[Moet Leng Good]";

-	mes "The tablet will be done when I finish!";

-	mes "Please do not bother me for now, I need to concentrate";

-	next;

-	mes "[Moet Leng Good]";

-	mes "Meanwhile, please go find a cobweb so I could use it to provide some finishing touches to the tablet, thanks.";

-	close;

-

-	sL_3:

-		mes "[Moet Leng Good]";

-		mes "Ah, very good, you got a cobweb, please just leave it over there.";

-		next;

-		mes "^3355FF- Gives cobweb to him-^000000";

-		delitem 1025,1;

-		next;

-		mes "[Moet Leng Good]";

-		mes "Alright, here we go !!";

-		next;

-		mes "^3355FF- Clang ! Clang ! Clunk ! -^000000";

-		mes "^3355FF- Boom ! ! -^000000";

-		next;

-		mes "^3355FF- `Tablet of Power'-^000000";

-		mes "^3355FF- is forged -^000000";

-		next;

-		mes "^3355FF- Received 'Tablet of Power'-^000000";

-		set dmdswrd_Q,18;

-		next;

-		mes "[Moet Leng Good]";

-		mes "Even though you possess the 'Tablet of Power' now, the tablet would not be effective without";

-		mes "the ^3355FF` Book of the Tiresome Sheep'^000000??";

-		next;

-		mes "[Moet Leng Good]";

-		mes "^3355FF`Book of the Tiresome Sheep'^000000";

-		mes "was originally crafted by demons located in the desert and now the crafting skill have been passed down to a few wanderers near Morroc.";

-		next;

-		mes "[Moet Leng Good]";

-		mes "So if you wish to obatin the 'Book of the Tiresome Sheep', Morroc would be a smart place to look";

-		close;

-L_4:

-	mes "[Moet Leng Good]";

-	mes "Head to Morroc then! There's someone there that will tell you about";

-	mes "the 'Book of the Tiresome Sheep'.  I do not remember his name, but";

-	mes "now that you have the 'Tablet of Power', I'm sure you'll find him.";

-	close;

-}

-

-

-//=============================================================================

-//			Doomed Swords Part 4

-//=============================================================================

-// Zaka: Book of Tiresome Sheep

-morocc.gat,202,33,4	script	ZAKA	99,{

-	if(dmdswrd_Q == 18) goto L_1;

-	if(dmdswrd_Q == 19) goto L_2;

-	if(dmdswrd_Q == 20) goto L_3;

-	if(dmdswrd_Q == 21) goto L_4;

-	if(dmdswrd_Q == 22) goto L_5;

-	if(dmdswrd_Q == 23) goto L_6;

-

-	mes "[ZAKA]";

-	mes "...... The sun sets over another day.  The moon rises to take it's nightly place.";

-	mes "As darkness creeps across the desert, the people of Morroc huddle together.";

-	mes "The never ending well is the life blood of the wandering nomads..... This is Morroc....";

-	next;

-	mes "[ZAKA]";

-	mes "Eh hem.... Say... Have you ever heard of the ^FF4444Doomed Swords^000000, or ^5555FFSwords of Power^000000?";

-	mes "It is believed that these swords are so powerful that whoever weilds them could rule the world!";

-	next;

-	mes "[ZAKA]";

-	mes "The three swords I speak of are the ^5555FFMysteltainn, Ogre Tooth, and Executioner^000000.";

-	next;

-	mes "[ZAKA]";

-	mes "These swords are hidden somewhere in this world.... have you seen any?";

-	close;

-

-L_1:

-	mes "[ZAKA]";

-	mes ". . . . .";

-	next;

-	mes "[ZAKA]";

-	mes "! ! ! ! ! ! !";

-	next;

-	mes "[ZAKA]";

-	mes "Isn't that ?! That tablet?!";

-	mes "^3355FF`Tablet of Power'^000000";

-	mes "Right?! Wha ! !";

-	next;

-	mes "[ZAKA]";

-	mes "Who are you? Why do you possess the 'Tablet of Power'?";

-	mes "Bah, nevermind, it doesn't matter who you are.";

-	mes "Whoever possesses the 'Tablet of Power' is a natural-born leader.";

-	next;

-	mes "[ZAKA]";

-	mes "Well, we are one of the wanderers of Morroc.";

-	mes "It is tradition and duty to make the possessor of^3355FF` Tablet of Power '^000000";

-	mes "a ^3355FF`Book of the Tiresome Sheep'^000000";

-	next;

-	mes "[ZAKA]";

-	mes "I will craft you a 'Book of the Tiresome Sheep', only for your personal use.";

-	mes "As you might have expected, I will need various ingredients to make you the book.";

-	next;

-	mes "[ZAKA]";

-	mes "The first thing will need are two ^3355FF`Snake Scale'^000000 , please bring them to me.";

-	set dmdswrd_Q,19;

-	close;

-L_2:

-	if(countitem(926) > 1) goto sL_2;

-	mes "[ZAKA]";

-	mes "If you want the 'Book of the Tiresome Sheep', I will need^3355FF 2 'Snake Scales'^000000.";

-	close;

-

-	sL_2:		

-		mes "Gives Zaka two^3355FF'Snake Scales'^000000";

-		delitem 926,2;

-		set dmdswrd_Q,20;

-		next;

-		mes "[ZAKA]";

-		mes "Now I can construct the basic layout of the book witht the snake scales, but I now need 1 piece of";

-		mes "^3355FF'Scale Shell'^000000 in order to block only negative energies from the book.";

-		close;

-L_3:

-	if(countitem(936) > 0) goto sL_3;

-	mes "[ZAKA]";

-	mes "Please bring me the next ingredient needed for the 'Book of the Tiresome Sheep', I will need one";

-	mes "^3355FF'Scale Shell'^000000 ??";

-	mes ". . . . .";

-	close;

-

-	sL_3:

-		mes "Gives^3355FF'Scale Shell^000000";

-		mes "to Zaka";

-		delitem 936,1;

-		set dmdswrd_Q,21;

-		next;

-		mes "[ZAKA]";

-		mes "Alright, good.";

-		mes "Next, I will need one piece of ^3355FF'Shining Scale'^000000 in order to distribute the magical power equally throughout the book.";

-		next;

-		mes "[ZAKA]";

-		mes "While you are getting the scale, I will continue to the next phase of crafting, good luck.";

-		close;

-L_4:

-	if(countitem(954) > 0) goto sL_4;

-	mes "[ZAKA]";

-	mes "In order to finish crafting the 'Book of the Tiresome Sheep', I will need you to gather me one piece of ^3355FF'Shining Scale'^000000, okay?";

-	close;

-

-	sL_4:

-		mes "Gives^3355FF'Shining Scale'^000000";

-		mes "to Zaka";

-		delitem 954,1;

-		set dmdswrd_Q,22;

-		next;

-		mes "[ZAKA]";

-		mes "Great job!";

-		mes "Finally, the last ingredient I need is one ^3355FF'Stinky Scale'^000000 to complete the book, please bring it to me";

-		close;

-L_5:

-	if(countitem(959) > 0) goto sL_5;

-	mes "[ZAKA]";

-	mes "All I need to craft the 'Book of the Tiresome Sheep' is one piece of ^3355FF'Stinky Scale'^000000 now, please bring one to me.";

-	close;

-

-	sL_5:

-		mes "Gives^3355FF'Stinky Scale'^000000";

-		mes "to Zaka";

-		delitem 959,1;

-		next;

-		mes "[ZAKA]";

-		mes "Ooo. this is all I need to finish up the book, thank you.";

-		next;

-		mes "^3355FF-Zaka is working hard in-^000000";

-		mes "^3355FF-finalizing the book-^000000";

-		next;

-		mes "^3355FF- You receive the Book of-^000000";

-		mes "^3355FF- the Tiresome Sheep from Zaka-^000000";

-		set dmdswrd_Q,23;

-		next;

-		mes "[ZAKA]";

-		mes "There, that's for you..";

-		mes "I guess you have the required items to summon and use the Doomed Swords.";

-		mes "But if you are really going to use the Doomed Swords please go talk to ^5533FFWon^000000, a wandering swordsman, he might have some important advice.";

-		next;

-		mes "[ZAKA]";

-		mes "Legend has it that Won's sword fighting skills is already at god-like level, and he is also one of the ten most influential people in the world.";

-		next;

-		mes "[Zaka]";

-		mes "Right now, he might be training inside Comodo Town, so you might be able to find him there.";

-		close;

-L_6:

-	mes "[ZAKA]";

-	mes "The wandering swordsman ^3355FF`Won'^000000";

-	mes "should be training somwhere in Comodo, look for him very carefully.";

-	close;

-}

-

-

-//=============================================================================

-//			Doomed Swords Part 5

-//=============================================================================

-// Won: Voucher of Power

-comodo.gat,232,87,4	script	Wandering Swordsman WON	106,{

-	if(dmdswrd_Q == 23) goto L_1;

-	if(dmdswrd_Q == 24) goto L_2;

-	if(dmdswrd_Q == 25) goto L_3;

-

-	mes "[WON]";

-	mes "My name is ^3355FF'Won'^000000.  I have searched far and wide, across the oceans and the mountains, to find one who is worthy.......";

-	next;

-	mes "[WON]";

-	mes "It has been many years since the Evil Witch was defeated in that legendary battle..... It is now a story of the past.......";

-	mes "Still, the quest must continue!  This is what the heavens desire of me.....";

-	next;

-	mes "[Won]";

-	mes "I must stay here in Comodo..... It is my fate.... I must stay here and wait.........";

-	mes ". . . . . . . . . . . . . . . . . . . .";

-	mes ". . . . . . . . . . . . . . .";

-	mes ". . . . . . . . . .";

-	mes ". . . . .";

-	close;

-		

-L_1:

-	mes "^3355FF- The swordsman examines you -^000000";

-	mes "^3355FF- for a few seconds -^000000";

-	next;

-	mes "[Swordsman]";

-	mes "Heh, you're just a normal fella.";

-	mes "I am a wandering swordsman,";

-	mes "^3355FF`WON'^000000";

-	next;

-	mes "[WON]";

-	mes "What? You say you are gonna summon the Doomed Swords?";

-	mes "Psh, I don't care what you say, I will be the judge on whether or not you are worthy.";

-	mes "Let me explain...";

-	next;

-	mes "[WON]";

-	mes "Even though you do have all the required materials to summon the Doomed Swords but that does not mean that you could withstand the energy drained during one summoning.";

-	next;

-	mes "[WON]";

-	mes "Without careful control of energy transfer from the normal world to the Dark World, many disasters could arise upon the world or even unforeseen consequences.";

-	next;

-	mes "[WON]";

-	mes "I am sure that you have heard that the three different Doomed Swords are:";

-	mes "^3355FF` Mysteltain '^000000";

-	mes "^3355FF` Grimtooth '^000000";

-	mes "and ^3355FF` Executioner '^000000.";

-	mes "Each of them with very distinct specialties.";

-	next;

-	mes "[WON]";

-	mes "Now that you understand these, let us start the summoning then.";

-	next;

-	mes "- `Won'-";

-	mes "- draws his sword -";

-	mes "- and starts to swing it around -";

-	next;

-	mes "- You notice something -";

-	mes "- a blue light descending -";

-	mes "- from the sky -";

-	next;

-	mes "^3355FF-You got-^000000";

-	mes "^3355FF-Voucher of Power-^000000";

-	set dmdswrd_Q,24;

-	next;

-	mes "[WON]";

-	mes ". . . . .";

-	next;

-L_2:

-	mes "[WON]";

-	mes "Hmm, it seems like the Dark World is not ready to give you the Doomed Sword just yet...even though you have what it takes to be the master of the swords.";

-	next;

-	mes "[WON]";

-	mes "However, when the day is as long as the night, when the sunlight is as bright as solar sword.";

-	mes "Only during that time, you will have the opportunity to receive the Doomed Swords.";

-	next;

-	mes "[WON]";

-	mes "Head to Morocc and look for a man by the name of ^5533FFCetsu^000000.  He has information about one of the swords.";

-//	mes "When that time comes, visit the East for a quiet city name Payon, and you shall find yourself in a new journey for the Doomed Swords.";

-	close;

-L_3:

-	mes "123456789101112131415";

-	close;

-}

-

-

-//==============================================================================

-//			Doomed Swords Part 6

-//==============================================================================

-

-// Cetsu --------------------------------------------

-morocc.gat,281,178,8	script	Cetsu	97,{

-	if(dmdswrd_Q == 25) goto M_Yes;

-	if(dmdswrd_Q > 25) goto L_1;

-

-	mes "[Cetsu]";

-	mes "It is rumored that there was once a dagger made out of the tooth of an ogre.  This made the dagger much stronger than those made out of steel.";

-	next;

-	mes "[Cetsu]";

-	mes "It became known as the ^ff0000Grimtooth^000000.  What made the Grimtooth truly special was the fact that it was enchanted with a magic spell.";

-	next;

-	mes "[Cetsu]";

-	mes "Many have tried to re-create the Grimtooth but have faild.  Only one blacksmith, who once lived in Prontera, knows how to do this.";

-	next;

-	mes "[Cetsu]";

-	mes "Unfortunalety he left Prontera long ago and has not been seen since...";

-	if(dmdswrd_Q == 24) goto L_0;

-	close;

-

-L_0:

-	next;

-	mes"[Cetsu]";

-	mes "Say,.... are you really interested in this dagger?";

-	next;

-	menu "Yes",M_Yes,"Not really",M_No;

-	

-	M_Yes:

-		mes "[Cetsu]";

-		mes "You should speak with ^5533FFVeeyop^000000 then.  He seems to know alot about the ^00aa00Legendary Blacksmith^000000.";

-		mes "You can find him in Prontera.  With his help you may even be able to track down the Legendary Blacksmith.  Good luck.";

-		set dmdswrd_Q, 25;

-		close;

-	M_No:

-		mes "[Cetsu]";

-		mes "Oh, I see.";

-		close;

-

-L_1:

-	mes "[Cetsu]";

-	mes "Wow! So you're gonna try to re-create the legendary, doomed dagger Grimtooth? You should becarefull though, that's one powerfull dagger.";

-	close;

-}

-

-// Veeyop --------------------------------------------------

-prontera.gat,197,188,4	script	Veeyop	50,{

-	if(dmdswrd_Q == 26) goto M_Yes;

-	if(dmdswrd_Q > 26) goto L_1;

-

-	mes "[Veeyop]";

-	mes "Have you ever heard of a doomed sword, ^ff0000Mysteltain^000000? It's named after ^0000bba legendary Young Twig^000000 that was used to murder Balder, the God of Light...";

-	next;

-	mes "[Veeyop]";

-	mes "According to the legend, it was a weak, little twig. Other than that I know nothing more of the sword.";

-	next;

-	mes "[Veeyop]";

-	mes "Whatever the legend may be, people say there is a way to re-construct the legendary sword.";

-	mes "I've heard that there was once a Blacksmith who had the knowledge to re-create the legendary sword living in Prontera.";

-	next;

-	mes "[Veeyop]";

-	mes "Unfortunately he's disapeared from this town.  Anywho its just heresay.";

-	if(dmdswrd_Q == 25) goto L_0;

-	close;

-

-L_0:

-	next;

-	mes"[Veeyop]";

-	mes "Say,.... are you really interested in this sword?";

-	next;

-	menu "Yes",M_Yes,"Not really",M_No;

-	

-	M_Yes:

-		mes "[Veeyop]";

-		mes "You should speak with ^FF5533Nain^000000 then.  She seems to know alot about the ^00aa00Legendary Blacksmith^000000.";

-		mes "You can find her in Izlude.  With her help you may even be able to track down the Legendary Blacksmith.  Good luck.";

-		set dmdswrd_Q, 26;

-		close;

-	M_No:

-		mes "[Veeyop]";

-		mes "Oh, I see.";

-		close;

-

-L_1:

-	mes "[Veeyop]";

-	mes "Wow! So you're gonna try to re-create the legendary, doomed sword Mysteltain? You should becarefull though, that's one powerfull sword.";

-	close;

-}

-

-// Nain  -------------------------------------------------------------

-izlude_in.gat,173,88,2	script	Nain	102,{

-	if(dmdswrd_Q == 27) goto M_Yes;

-	if(dmdswrd_Q > 27) goto L_1;

-

-	mes "[Nain]";

-	mes "I was once told a legend about a powerfull sword that was used only for executions.";

-	next;

-	mes "[Nain]";

-	mes "For years and years, this mighty sword was used to be-head heinous criminals, but it also took the lives of great warriors as well.";

-	mes "It is said that the overtime the government became corrupt and hence innocent lives fell victim to the sword.";

-	next;

-	mes "[Nain]";

-	mes "This caused the sword to become corrupted with an emense evil power making it almost impossible to weild.";

-	mes "Those who did try to weild it became possed with an dark aura that drove them to blood lust.";

-	next;

-	mes "[Nain]";

-	mes "This ancient civilization eventually collapsed and faded away.  The powerfull sword also vanished.";

-	mes "The sword would later be named the ^ff0000Executioner^000000.  An appropriate name considering its history.";

-	next;

-	mes "[Nain]";

-	mes "Recently there have been rumors of a Legendary Blacksmith that has the skill to re-create the lost sword.";

-	next;

-	mes "[Nain]";

-	mes "Just thinking about it sends shivers down my spine.";

-	mes "No matter how powerfull a sword it is, to think that it is possessed with thousands and thousands of angry ghosts...";

-	mes "I would rather see the Doomed sword stay lost to history.";

-	if(dmdswrd_Q == 26) goto L_0;

-	close;

-

-L_0:

-	next;

-	mes"[Nain]";

-	mes "Say,.... are you really interested in this sword?";

-	next;

-	menu "Yes",M_Yes,"Not really",M_No;

-	

-	M_Yes:

-		mes "[Nain]";

-		mes "You should speak with ^aa00aaRupeto^000000 then.  He seems to know alot about the ^00aa00Legendary Blacksmith^000000.";

-		mes "You can find him inside the Pub in Prontera.  With his help you may even be able to track down the Legendary Blacksmith.  Good luck.";

-		set dmdswrd_Q, 27;

-		close;

-	

-	M_No:

-		mes "[Nain]";

-		mes "Oh, I see.";

-		close;

-

-L_1:

-	mes "[Nain]";

-	mes "Wow! So you're gonna try to re-create the legendary, doomed sword Executioner? You should becarefull though, that's one powerfull sword.";

-	close;

-}

-

-// Rupeto ---------------------------------------------------------

-prt_in.gat,169,16,3	script	Rupeto	86,{

-	if(dmdswrd_Q == 27) goto L_0;

-	mes "[Rupeto]";

-	mes "Hello.";

-	close;

-

-L_0:

-	mes "[Rupeto]";

-	mes "Looking for the Legendary Blacksmith? Go to the payon field just east of the town of Payon.";

-	mes "It's said that the field looks alot like an Elder Willow....";

-	close;

-}

-

-

-//=============================================================================

-//		Doomed Swords Final Part

-//=============================================================================

-

-// Legendary Blacksmith ----------------------------------------------

-pay_fild08.gat,217,273,4	script	Legendary Blacksmith	63,{

-

-	if(dmdswrd_Q == 27) goto L_Start;

-	if(dmdswrd_Q == 28) goto L_Forge;

-	mes "[Legendary Blacksmith]";

-	mes "I wonder what's going on in ^ff0000Prontera^000000?  It's been so long since I've been there.";

-	close;

-

-L_Start:

-	mes "[Legendary Blacksmith]";

-	mes "Hmm... what's this about Doomed Swords?? I have no idea what you're";

-	mes "talking about.....";

-	next;

-	mes "[Legendary Blacksmith]";

-	mes "..... I see... so you've spoken to everyone who was involved with in";

-	mes "the war with the witch... you've also gathered all of the items of";

-	mes "power......";

-	next;

-	mes "[Legendary Blacksmith]";

-	mes "I never thought the day would come when I would make one of these";

-	mes "dreadfull swords again... but you have proven yourself so I can not";

-	mes "turn you down.";

-	next;

-	L_Forge:

-	mes "[Legendary Blacksmith]";

-	mes "What sword do you want me to forge?";

-	set dmdswrd_Q, 28;

-	next;

-	menu "Executioner",M_Exec, "Grimtooth",M_Grim, "Mysteltain",M_Myst;

-

-	M_Exec:	//1169

-		if(countitem(7017)>=2 && countitem(7024)>=10 && countitem(1008)>=3 && countitem(609)>=50 && countitem(714)>=1) goto L_GetExec;

-		mes "[Legendary Blacksmith]";

-		mes "So you're interested in making the legendary Executioner Sword heh?.....";

-		next;

-		mes "[Legendary Blacksmith]";

-		mes "It's been sometime since I've forged any weapons,... but since it";

-		mes "is a special challenge for me to make this sword.....";

-		next;

-		mes "[Legendary Blacksmith]";

-		mes "I'll do it! I will re-create the Executioner Sword! I must warn you";

-		mes "however, this is a very powerfull and dangerous sword.  Be carefull.";

-		next;

-		mes "[Legendary Blacksmith]";

-		mes "For the Executioner Sword I will need the following items:";

-		mes "- ^0000ff2 Executioners Mitten^000000";		//7017

-		mes "- ^0000ff10 Bloody Edge^000000";		//7024

-		mes "- ^0000ff3 Necklace of Oblivion^000000";		//1008

-		mes "- ^0000ff50 Amulet^000000";			//609

-		mes "- and ^0000ff1 Emperium^000000";		//714

-		close;

-

-		L_GetExec:

-			delitem 7017,2;

-			delitem 7024,10;

-			delitem 1008,3;

-			delitem 609,50;

-			delitem 714,1;

-			mes "[Legendary Blacksmith]";

-			mes "Good! You have brought me all the necessary items.";

-			mes "Please wait a moment while I forge the Executioner Sword.";

-			next;

-			mes "(cling-clang!~ klonk!~ klank!~ cling-clang!)";

-			next;

-			mes "[Legendary Blacksmith]";

-			mes "Phew! Once again a perfect sword! Hahaha! Here you are my friend, enjoy.";

-			getitem 1169,1;

-			close;

-

-	M_Grim:	//1237

-		if(countitem(7023)>=10 && countitem(724)>=5 && countitem(7002)>=100 && countitem(7022)>=1 && countitem(714)>=1) goto L_GetGrim;

-		mes "[Legendary Blacksmith]";

-		mes "So you're interested in making the legendary Grimtooth Dagger heh?.....";

-		next;

-		mes "[Legendary Blacksmith]";

-		mes "It's been sometime since I've forged any weapons,... but since it";

-		mes "is a special challenge for me to make this dagger.....";

-		next;

-		mes "[Legendary Blacksmith]";

-		mes "I'll do it! I will re-create the Grimtooth Dagger! I must warn you";

-		mes "however, this is a very powerfull and dangerous dagger.  Be carefull.";

-		next;

-		mes "[Legendary Blacksmith]";

-		mes "For the Grimtooth Dagger I will need the following items:";

-		mes "- ^0000ff10 Blade Lost in Darkness^000000";		//7023

-		mes "- ^0000ff5 Cursed Ruby^000000";			//724

-		mes "- ^0000ff100 Ogre Tooth^000000";			//7002

-		mes "- ^0000ff1 Old Hilt^000000";				//7022

-		mes "- and ^0000ff1 Emperium^000000";

-		close;

-

-		L_GetGrim:

-			delitem 7023,10;

-			delitem 724,5;

-			delitem 7002,100;

-			delitem 7022,1;

-			delitem 714,1;

-			mes "[Legendary Blacksmith]";

-			mes "Good! You have brought me all the necessary items.";

-			mes "Please wait a moment while I forge the Grimtooth Dagger.";

-			next;

-			mes "(cling-clang!~ klonk!~ klank!~ cling-clang!)";

-			next;

-			mes "[Legendary Blacksmith]";

-			mes "Phew! Once again a perfect dagger! Hahaha! Here you are my friend, enjoy.";

-			getitem 1237,1;

-			close;

-

-	M_Myst:	//1138

-		if(countitem(7021)>=1 && countitem(7019)>=1 && countitem(7020)>=1 && countitem(7018)>=1 && countitem(714)>=1) goto L_GetMyst;

-		mes "[Legendary Blacksmith]";

-		mes "So you're interested in making the legendary Mysteltain Sword heh?.....";

-		next;

-		mes "[Legendary Blacksmith]";

-		mes "It's been sometime since I've forged any weapons,... but since it";

-		mes "is a special challenge for me to make this sword.....";

-		next;

-		mes "[Legendary Blacksmith]";

-		mes "I'll do it! I will re-create the Mysteltain Sword! I must warn you";

-		mes "however, this is a very powerfull and dangerous sword.  Be carefull.";

-		next;

-		mes "[Legendary Blacksmith]";

-		mes "For the Mysteltain Sword I will need the following items:";

-		mes "- ^0000ff1 Foolishness of the Blind^000000";		//7021

-		mes "- ^0000ff1 Loki's Whispers^000000";			//7019

-		mes "- ^0000ff1 Mother's Nightmare^000000";			//7020

-		mes "- ^0000ff1 Young Twig^000000";			//7018

-		mes "- and ^0000ff1 Emperium^000000";

-		close;

-	

-		L_GetMyst:

-			delitem 7021,1;

-			delitem 7019,1;

-			delitem 7020,1;

-			delitem 7018,1;

-			delitem 714,1;

-			mes "[Legendary Blacksmith]";

-			mes "Good! You have brought me all the necessary items.";

-			mes " Please wait a moment while I forge the Mysteltain Sword.";

-			next;

-			mes "(cling-clang!~ klonk!~ klank!~ cling-clang!)";

-			next;

-			mes "[Legendary Blacksmith]";

-			mes "Phew! Once again a perfect sword! Hahaha! Here you are my friend, enjoy.";

-			getitem 1138,1;

-			close;

-}

+//===== eAthena Script =======================================
+//= Doomed Swords Quest
+//===== By: ==================================================
+//= kobra_k88
+//===== Current Version: =====================================
+//= 1.3
+//===== Compatible With: =====================================
+//= eAthena 7.15 +
+//===== Description: =========================================
+//= Quest for Doomed Swords, Grimtooth, Mysteltain, Executioner.
+//= Based off mRO version. Part 1 and 2 of the quest can be
+//= found in cities\comodo.txt.  Message text for Part 6 and 7
+//= is made up.
+//===== Additional Comments: =================================
+//=95% done
+//= 1.1 Fixed items count check. For all 3 swords... [Lupus]
+//= 1.3 Fixed exploit [Lupus]
+//============================================================
+
+
+//=============================================================================
+//			Doomed Swords Part 3
+//=============================================================================
+// Moet Leng Good: Tablet Of Power
+aldebaran.gat,44,53,4	script	Wizard in Training	64,{
+	if(dmdswrd_Q == 15) goto L_1;
+	if(dmdswrd_Q == 16) goto L_2;
+	if(dmdswrd_Q == 17) goto L_3;
+	if(dmdswrd_Q == 18) goto L_4;
+	mes "[Moet Leng Good]";
+	mes "Did you know that some people signed contract in shadows with the Dark Lord with the";
+	mes "^3355FF`Tablet of Power'^000000?!";
+	next;
+	mes "[Moet Leng Good]";
+	mes "As a result of their greed for power, it brought disasters for the entire world.";
+	mes "So please, be happy with what you already have and do not give in to the dark side.";
+	close;
+
+L_1:
+	mes "[Moet Leng Good]";
+	mes "I guess you are the possessor of the 'Stone of Awakening' and also the one seeking for the 'Tablet of Power'.";
+	next;
+	mes "[Moet Leng Good]";
+	mes "Very well then, I will help you to make a 'Tablet of Power'.";
+	mes "However, it is not a simple task, I will need a number of materials in order to succeed.";
+	next;
+	mes "[Moet Leng Good]";
+	mes "I will need one of these stones, gems, and ores.";
+	mes "^3355FF`Blue Gemstone'^000000";
+	mes "^3355FF`Sapphire'^000000";
+	mes "^3355FF`Aquarmarine'^000000";
+	mes "^3355FF`Shining Stone'^000000";
+	mes "and ^3355FF`Rough Elunium'^000000";
+	next;
+	mes "[Moet Leng Good]";
+	mes "In other words, the 'Tablet of Power' is very valuable, and might take you a while to gather the resources for it.";
+	set dmdswrd_Q,16;
+	close;
+L_2:
+	if((countitem(717) < 1) || (countitem(726) < 1) || (countitem(720) < 1) || (countitem(640) < 1) || (countitem(757) < 1)) goto L_1; 
+	mes "[Moet Leng Good]";
+	mes ". . . . . ! !";
+	mes "I can hardly believe that you actually gathered all the resources for the 'Tablet of Power'";
+	mes "Because you have worked so hard, let me make the tablet for you now.";
+	next;
+	delitem 717,1;
+	delitem 726,1;
+	delitem 720,1;
+	delitem 640,1;
+	delitem 757,1;
+	mes "^3355FF- Gives him all the stones -^000000";
+	set dmdswrd_Q,17;
+	next;
+	mes "[Moet Leng Good]";
+	mes "Now, I'll just need you to gather a few ingredients for the fininshing touch of the tablet.";
+	next;
+	mes "[Moet Leng Good]";
+	mes "I will need just one ^3355FF`Cobweb'^000000";
+	mes "You could easily obtain them through argos in Mt. Mjolnir";
+	next;
+	mes "^3355FF- Moet Leng Good's-^000000";
+	mes "^3355FF- working hard on the tablet -^000000";
+	close;
+L_3:
+	if(countitem(1025) > 0) goto sL_3;
+	mes "[Moet Leng Good]";
+	mes "The tablet will be done when I finish!";
+	mes "Please do not bother me for now, I need to concentrate";
+	next;
+	mes "[Moet Leng Good]";
+	mes "Meanwhile, please go find a cobweb so I could use it to provide some finishing touches to the tablet, thanks.";
+	close;
+
+	sL_3:
+		mes "[Moet Leng Good]";
+		mes "Ah, very good, you got a cobweb, please just leave it over there.";
+		next;
+		mes "^3355FF- Gives cobweb to him-^000000";
+		delitem 1025,1;
+		next;
+		mes "[Moet Leng Good]";
+		mes "Alright, here we go !!";
+		next;
+		mes "^3355FF- Clang ! Clang ! Clunk ! -^000000";
+		mes "^3355FF- Boom ! ! -^000000";
+		next;
+		mes "^3355FF- `Tablet of Power'-^000000";
+		mes "^3355FF- is forged -^000000";
+		next;
+		mes "^3355FF- Received 'Tablet of Power'-^000000";
+		set dmdswrd_Q,18;
+		next;
+		mes "[Moet Leng Good]";
+		mes "Even though you possess the 'Tablet of Power' now, the tablet would not be effective without";
+		mes "the ^3355FF` Book of the Tiresome Sheep'^000000??";
+		next;
+		mes "[Moet Leng Good]";
+		mes "^3355FF`Book of the Tiresome Sheep'^000000";
+		mes "was originally crafted by demons located in the desert and now the crafting skill have been passed down to a few wanderers near Morroc.";
+		next;
+		mes "[Moet Leng Good]";
+		mes "So if you wish to obatin the 'Book of the Tiresome Sheep', Morroc would be a smart place to look";
+		close;
+L_4:
+	mes "[Moet Leng Good]";
+	mes "Head to Morroc then! There's someone there that will tell you about";
+	mes "the 'Book of the Tiresome Sheep'.  I do not remember his name, but";
+	mes "now that you have the 'Tablet of Power', I'm sure you'll find him.";
+	close;
+}
+
+
+//=============================================================================
+//			Doomed Swords Part 4
+//=============================================================================
+// Zaka: Book of Tiresome Sheep
+morocc.gat,202,33,4	script	ZAKA	99,{
+	if(dmdswrd_Q == 18) goto L_1;
+	if(dmdswrd_Q == 19) goto L_2;
+	if(dmdswrd_Q == 20) goto L_3;
+	if(dmdswrd_Q == 21) goto L_4;
+	if(dmdswrd_Q == 22) goto L_5;
+	if(dmdswrd_Q == 23) goto L_6;
+
+	mes "[ZAKA]";
+	mes "...... The sun sets over another day.  The moon rises to take it's nightly place.";
+	mes "As darkness creeps across the desert, the people of Morroc huddle together.";
+	mes "The never ending well is the life blood of the wandering nomads..... This is Morroc....";
+	next;
+	mes "[ZAKA]";
+	mes "Eh hem.... Say... Have you ever heard of the ^FF4444Doomed Swords^000000, or ^5555FFSwords of Power^000000?";
+	mes "It is believed that these swords are so powerful that whoever weilds them could rule the world!";
+	next;
+	mes "[ZAKA]";
+	mes "The three swords I speak of are the ^5555FFMysteltainn, Ogre Tooth, and Executioner^000000.";
+	next;
+	mes "[ZAKA]";
+	mes "These swords are hidden somewhere in this world.... have you seen any?";
+	close;
+
+L_1:
+	mes "[ZAKA]";
+	mes ". . . . .";
+	next;
+	mes "[ZAKA]";
+	mes "! ! ! ! ! ! !";
+	next;
+	mes "[ZAKA]";
+	mes "Isn't that ?! That tablet?!";
+	mes "^3355FF`Tablet of Power'^000000";
+	mes "Right?! Wha ! !";
+	next;
+	mes "[ZAKA]";
+	mes "Who are you? Why do you possess the 'Tablet of Power'?";
+	mes "Bah, nevermind, it doesn't matter who you are.";
+	mes "Whoever possesses the 'Tablet of Power' is a natural-born leader.";
+	next;
+	mes "[ZAKA]";
+	mes "Well, we are one of the wanderers of Morroc.";
+	mes "It is tradition and duty to make the possessor of^3355FF` Tablet of Power '^000000";
+	mes "a ^3355FF`Book of the Tiresome Sheep'^000000";
+	next;
+	mes "[ZAKA]";
+	mes "I will craft you a 'Book of the Tiresome Sheep', only for your personal use.";
+	mes "As you might have expected, I will need various ingredients to make you the book.";
+	next;
+	mes "[ZAKA]";
+	mes "The first thing will need are two ^3355FF`Snake Scale'^000000 , please bring them to me.";
+	set dmdswrd_Q,19;
+	close;
+L_2:
+	if(countitem(926) > 1) goto sL_2;
+	mes "[ZAKA]";
+	mes "If you want the 'Book of the Tiresome Sheep', I will need^3355FF 2 'Snake Scales'^000000.";
+	close;
+
+	sL_2:		
+		mes "Gives Zaka two^3355FF'Snake Scales'^000000";
+		delitem 926,2;
+		set dmdswrd_Q,20;
+		next;
+		mes "[ZAKA]";
+		mes "Now I can construct the basic layout of the book witht the snake scales, but I now need 1 piece of";
+		mes "^3355FF'Scale Shell'^000000 in order to block only negative energies from the book.";
+		close;
+L_3:
+	if(countitem(936) > 0) goto sL_3;
+	mes "[ZAKA]";
+	mes "Please bring me the next ingredient needed for the 'Book of the Tiresome Sheep', I will need one";
+	mes "^3355FF'Scale Shell'^000000 ??";
+	mes ". . . . .";
+	close;
+
+	sL_3:
+		mes "Gives^3355FF'Scale Shell^000000";
+		mes "to Zaka";
+		delitem 936,1;
+		set dmdswrd_Q,21;
+		next;
+		mes "[ZAKA]";
+		mes "Alright, good.";
+		mes "Next, I will need one piece of ^3355FF'Shining Scale'^000000 in order to distribute the magical power equally throughout the book.";
+		next;
+		mes "[ZAKA]";
+		mes "While you are getting the scale, I will continue to the next phase of crafting, good luck.";
+		close;
+L_4:
+	if(countitem(954) > 0) goto sL_4;
+	mes "[ZAKA]";
+	mes "In order to finish crafting the 'Book of the Tiresome Sheep', I will need you to gather me one piece of ^3355FF'Shining Scale'^000000, okay?";
+	close;
+
+	sL_4:
+		mes "Gives^3355FF'Shining Scale'^000000";
+		mes "to Zaka";
+		delitem 954,1;
+		set dmdswrd_Q,22;
+		next;
+		mes "[ZAKA]";
+		mes "Great job!";
+		mes "Finally, the last ingredient I need is one ^3355FF'Stinky Scale'^000000 to complete the book, please bring it to me";
+		close;
+L_5:
+	if(countitem(959) > 0) goto sL_5;
+	mes "[ZAKA]";
+	mes "All I need to craft the 'Book of the Tiresome Sheep' is one piece of ^3355FF'Stinky Scale'^000000 now, please bring one to me.";
+	close;
+
+	sL_5:
+		mes "Gives^3355FF'Stinky Scale'^000000";
+		mes "to Zaka";
+		delitem 959,1;
+		next;
+		mes "[ZAKA]";
+		mes "Ooo. this is all I need to finish up the book, thank you.";
+		next;
+		mes "^3355FF-Zaka is working hard in-^000000";
+		mes "^3355FF-finalizing the book-^000000";
+		next;
+		mes "^3355FF- You receive the Book of-^000000";
+		mes "^3355FF- the Tiresome Sheep from Zaka-^000000";
+		set dmdswrd_Q,23;
+		next;
+		mes "[ZAKA]";
+		mes "There, that's for you..";
+		mes "I guess you have the required items to summon and use the Doomed Swords.";
+		mes "But if you are really going to use the Doomed Swords please go talk to ^5533FFWon^000000, a wandering swordsman, he might have some important advice.";
+		next;
+		mes "[ZAKA]";
+		mes "Legend has it that Won's sword fighting skills is already at god-like level, and he is also one of the ten most influential people in the world.";
+		next;
+		mes "[Zaka]";
+		mes "Right now, he might be training inside Comodo Town, so you might be able to find him there.";
+		close;
+L_6:
+	mes "[ZAKA]";
+	mes "The wandering swordsman ^3355FF`Won'^000000";
+	mes "should be training somwhere in Comodo, look for him very carefully.";
+	close;
+}
+
+
+//=============================================================================
+//			Doomed Swords Part 5
+//=============================================================================
+// Won: Voucher of Power
+comodo.gat,232,87,4	script	Wandering Swordsman WON	106,{
+	if(dmdswrd_Q == 23) goto L_1;
+	if(dmdswrd_Q == 24) goto L_2;
+	if(dmdswrd_Q == 25) goto L_3;
+
+	mes "[WON]";
+	mes "My name is ^3355FF'Won'^000000.  I have searched far and wide, across the oceans and the mountains, to find one who is worthy.......";
+	next;
+	mes "[WON]";
+	mes "It has been many years since the Evil Witch was defeated in that legendary battle..... It is now a story of the past.......";
+	mes "Still, the quest must continue!  This is what the heavens desire of me.....";
+	next;
+	mes "[Won]";
+	mes "I must stay here in Comodo..... It is my fate.... I must stay here and wait.........";
+	mes ". . . . . . . . . . . . . . . . . . . .";
+	mes ". . . . . . . . . . . . . . .";
+	mes ". . . . . . . . . .";
+	mes ". . . . .";
+	close;
+		
+L_1:
+	mes "^3355FF- The swordsman examines you -^000000";
+	mes "^3355FF- for a few seconds -^000000";
+	next;
+	mes "[Swordsman]";
+	mes "Heh, you're just a normal fella.";
+	mes "I am a wandering swordsman,";
+	mes "^3355FF`WON'^000000";
+	next;
+	mes "[WON]";
+	mes "What? You say you are gonna summon the Doomed Swords?";
+	mes "Psh, I don't care what you say, I will be the judge on whether or not you are worthy.";
+	mes "Let me explain...";
+	next;
+	mes "[WON]";
+	mes "Even though you do have all the required materials to summon the Doomed Swords but that does not mean that you could withstand the energy drained during one summoning.";
+	next;
+	mes "[WON]";
+	mes "Without careful control of energy transfer from the normal world to the Dark World, many disasters could arise upon the world or even unforeseen consequences.";
+	next;
+	mes "[WON]";
+	mes "I am sure that you have heard that the three different Doomed Swords are:";
+	mes "^3355FF` Mysteltain '^000000";
+	mes "^3355FF` Grimtooth '^000000";
+	mes "and ^3355FF` Executioner '^000000.";
+	mes "Each of them with very distinct specialties.";
+	next;
+	mes "[WON]";
+	mes "Now that you understand these, let us start the summoning then.";
+	next;
+	mes "- `Won'-";
+	mes "- draws his sword -";
+	mes "- and starts to swing it around -";
+	next;
+	mes "- You notice something -";
+	mes "- a blue light descending -";
+	mes "- from the sky -";
+	next;
+	mes "^3355FF-You got-^000000";
+	mes "^3355FF-Voucher of Power-^000000";
+	set dmdswrd_Q,24;
+	next;
+	mes "[WON]";
+	mes ". . . . .";
+	next;
+L_2:
+	mes "[WON]";
+	mes "Hmm, it seems like the Dark World is not ready to give you the Doomed Sword just yet...even though you have what it takes to be the master of the swords.";
+	next;
+	mes "[WON]";
+	mes "However, when the day is as long as the night, when the sunlight is as bright as solar sword.";
+	mes "Only during that time, you will have the opportunity to receive the Doomed Swords.";
+	next;
+	mes "[WON]";
+	mes "Head to Morocc and look for a man by the name of ^5533FFCetsu^000000.  He has information about one of the swords.";
+//	mes "When that time comes, visit the East for a quiet city name Payon, and you shall find yourself in a new journey for the Doomed Swords.";
+	close;
+L_3:
+	mes "123456789101112131415";
+	close;
+}
+
+
+//==============================================================================
+//			Doomed Swords Part 6
+//==============================================================================
+
+// Cetsu --------------------------------------------
+morocc.gat,281,178,8	script	Cetsu	97,{
+	if(dmdswrd_Q == 25) goto M_Yes;
+	if(dmdswrd_Q > 25) goto L_1;
+
+	mes "[Cetsu]";
+	mes "It is rumored that there was once a dagger made out of the tooth of an ogre.  This made the dagger much stronger than those made out of steel.";
+	next;
+	mes "[Cetsu]";
+	mes "It became known as the ^ff0000Grimtooth^000000.  What made the Grimtooth truly special was the fact that it was enchanted with a magic spell.";
+	next;
+	mes "[Cetsu]";
+	mes "Many have tried to re-create the Grimtooth but have faild.  Only one blacksmith, who once lived in Prontera, knows how to do this.";
+	next;
+	mes "[Cetsu]";
+	mes "Unfortunalety he left Prontera long ago and has not been seen since...";
+	if(dmdswrd_Q == 24) goto L_0;
+	close;
+
+L_0:
+	next;
+	mes"[Cetsu]";
+	mes "Say,.... are you really interested in this dagger?";
+	next;
+	menu "Yes",M_Yes,"Not really",M_No;
+	
+	M_Yes:
+		mes "[Cetsu]";
+		mes "You should speak with ^5533FFVeeyop^000000 then.  He seems to know alot about the ^00aa00Legendary Blacksmith^000000.";
+		mes "You can find him in Prontera.  With his help you may even be able to track down the Legendary Blacksmith.  Good luck.";
+		set dmdswrd_Q, 25;
+		close;
+	M_No:
+		mes "[Cetsu]";
+		mes "Oh, I see.";
+		close;
+
+L_1:
+	mes "[Cetsu]";
+	mes "Wow! So you're gonna try to re-create the legendary, doomed dagger Grimtooth? You should becarefull though, that's one powerfull dagger.";
+	close;
+}
+
+// Veeyop --------------------------------------------------
+prontera.gat,197,188,4	script	Veeyop	50,{
+	if(dmdswrd_Q == 26) goto M_Yes;
+	if(dmdswrd_Q > 26) goto L_1;
+
+	mes "[Veeyop]";
+	mes "Have you ever heard of a doomed sword, ^ff0000Mysteltain^000000? It's named after ^0000bba legendary Young Twig^000000 that was used to murder Balder, the God of Light...";
+	next;
+	mes "[Veeyop]";
+	mes "According to the legend, it was a weak, little twig. Other than that I know nothing more of the sword.";
+	next;
+	mes "[Veeyop]";
+	mes "Whatever the legend may be, people say there is a way to re-construct the legendary sword.";
+	mes "I've heard that there was once a Blacksmith who had the knowledge to re-create the legendary sword living in Prontera.";
+	next;
+	mes "[Veeyop]";
+	mes "Unfortunately he's disapeared from this town.  Anywho its just heresay.";
+	if(dmdswrd_Q == 25) goto L_0;
+	close;
+
+L_0:
+	next;
+	mes"[Veeyop]";
+	mes "Say,.... are you really interested in this sword?";
+	next;
+	menu "Yes",M_Yes,"Not really",M_No;
+	
+	M_Yes:
+		mes "[Veeyop]";
+		mes "You should speak with ^FF5533Nain^000000 then.  She seems to know alot about the ^00aa00Legendary Blacksmith^000000.";
+		mes "You can find her in Izlude.  With her help you may even be able to track down the Legendary Blacksmith.  Good luck.";
+		set dmdswrd_Q, 26;
+		close;
+	M_No:
+		mes "[Veeyop]";
+		mes "Oh, I see.";
+		close;
+
+L_1:
+	mes "[Veeyop]";
+	mes "Wow! So you're gonna try to re-create the legendary, doomed sword Mysteltain? You should becarefull though, that's one powerfull sword.";
+	close;
+}
+
+// Nain  -------------------------------------------------------------
+izlude_in.gat,173,88,2	script	Nain	102,{
+	if(dmdswrd_Q == 27) goto M_Yes;
+	if(dmdswrd_Q > 27) goto L_1;
+
+	mes "[Nain]";
+	mes "I was once told a legend about a powerfull sword that was used only for executions.";
+	next;
+	mes "[Nain]";
+	mes "For years and years, this mighty sword was used to be-head heinous criminals, but it also took the lives of great warriors as well.";
+	mes "It is said that the overtime the government became corrupt and hence innocent lives fell victim to the sword.";
+	next;
+	mes "[Nain]";
+	mes "This caused the sword to become corrupted with an emense evil power making it almost impossible to weild.";
+	mes "Those who did try to weild it became possed with an dark aura that drove them to blood lust.";
+	next;
+	mes "[Nain]";
+	mes "This ancient civilization eventually collapsed and faded away.  The powerfull sword also vanished.";
+	mes "The sword would later be named the ^ff0000Executioner^000000.  An appropriate name considering its history.";
+	next;
+	mes "[Nain]";
+	mes "Recently there have been rumors of a Legendary Blacksmith that has the skill to re-create the lost sword.";
+	next;
+	mes "[Nain]";
+	mes "Just thinking about it sends shivers down my spine.";
+	mes "No matter how powerfull a sword it is, to think that it is possessed with thousands and thousands of angry ghosts...";
+	mes "I would rather see the Doomed sword stay lost to history.";
+	if(dmdswrd_Q == 26) goto L_0;
+	close;
+
+L_0:
+	next;
+	mes"[Nain]";
+	mes "Say,.... are you really interested in this sword?";
+	next;
+	menu "Yes",M_Yes,"Not really",M_No;
+	
+	M_Yes:
+		mes "[Nain]";
+		mes "You should speak with ^aa00aaRupeto^000000 then.  He seems to know alot about the ^00aa00Legendary Blacksmith^000000.";
+		mes "You can find him inside the Pub in Prontera.  With his help you may even be able to track down the Legendary Blacksmith.  Good luck.";
+		set dmdswrd_Q, 27;
+		close;
+	
+	M_No:
+		mes "[Nain]";
+		mes "Oh, I see.";
+		close;
+
+L_1:
+	mes "[Nain]";
+	mes "Wow! So you're gonna try to re-create the legendary, doomed sword Executioner? You should becarefull though, that's one powerfull sword.";
+	close;
+}
+
+// Rupeto ---------------------------------------------------------
+prt_in.gat,169,16,3	script	Rupeto	86,{
+	if(dmdswrd_Q == 27) goto L_0;
+	mes "[Rupeto]";
+	mes "Hello.";
+	close;
+
+L_0:
+	mes "[Rupeto]";
+	mes "Looking for the Legendary Blacksmith? Go to the payon field just east of the town of Payon.";
+	mes "It's said that the field looks alot like an Elder Willow....";
+	close;
+}
+
+
+//=============================================================================
+//		Doomed Swords Final Part
+//=============================================================================
+
+// Legendary Blacksmith ----------------------------------------------
+pay_fild08.gat,217,273,4	script	Legendary Blacksmith	63,{
+
+	if(dmdswrd_Q == 27) goto L_Start;
+	if(dmdswrd_Q == 28) goto L_Forge;
+	mes "[Legendary Blacksmith]";
+	mes "I wonder what's going on in ^ff0000Prontera^000000?  It's been so long since I've been there.";
+	close;
+
+L_Start:
+	mes "[Legendary Blacksmith]";
+	mes "Hmm... what's this about Doomed Swords?? I have no idea what you're";
+	mes "talking about.....";
+	next;
+	mes "[Legendary Blacksmith]";
+	mes "..... I see... so you've spoken to everyone who was involved with in";
+	mes "the war with the witch... you've also gathered all of the items of";
+	mes "power......";
+	next;
+	mes "[Legendary Blacksmith]";
+	mes "I never thought the day would come when I would make one of these";
+	mes "dreadfull swords again... but you have proven yourself so I can not";
+	mes "turn you down.";
+	next;
+	L_Forge:
+	mes "[Legendary Blacksmith]";
+	mes "What sword do you want me to forge?";
+	set dmdswrd_Q, 28;
+	next;
+	menu "Executioner",M_Exec, "Grimtooth",M_Grim, "Mysteltain",M_Myst;
+
+	M_Exec:	//1169
+		if(countitem(7017)>=2 && countitem(7024)>=10 && countitem(1008)>=3 && countitem(609)>=50 && countitem(714)>=1) goto L_GetExec;
+		mes "[Legendary Blacksmith]";
+		mes "So you're interested in making the legendary Executioner Sword heh?.....";
+		next;
+		mes "[Legendary Blacksmith]";
+		mes "It's been sometime since I've forged any weapons,... but since it";
+		mes "is a special challenge for me to make this sword.....";
+		next;
+		mes "[Legendary Blacksmith]";
+		mes "I'll do it! I will re-create the Executioner Sword! I must warn you";
+		mes "however, this is a very powerfull and dangerous sword.  Be carefull.";
+		next;
+		mes "[Legendary Blacksmith]";
+		mes "For the Executioner Sword I will need the following items:";
+		mes "- ^0000ff2 Executioners Mitten^000000";		//7017
+		mes "- ^0000ff10 Bloody Edge^000000";		//7024
+		mes "- ^0000ff3 Necklace of Oblivion^000000";		//1008
+		mes "- ^0000ff50 Amulet^000000";			//609
+		mes "- and ^0000ff1 Emperium^000000";		//714
+		close;
+
+		L_GetExec:
+			delitem 7017,2;
+			delitem 7024,10;
+			delitem 1008,3;
+			delitem 609,50;
+			delitem 714,1;
+			mes "[Legendary Blacksmith]";
+			mes "Good! You have brought me all the necessary items.";
+			mes "Please wait a moment while I forge the Executioner Sword.";
+			next;
+			mes "(cling-clang!~ klonk!~ klank!~ cling-clang!)";
+			next;
+			mes "[Legendary Blacksmith]";
+			mes "Phew! Once again a perfect sword! Hahaha! Here you are my friend, enjoy.";
+			getitem 1169,1;
+			close;
+
+	M_Grim:	//1237
+		if(countitem(7023)>=10 && countitem(724)>=5 && countitem(7002)>=100 && countitem(7022)>=1 && countitem(714)>=1) goto L_GetGrim;
+		mes "[Legendary Blacksmith]";
+		mes "So you're interested in making the legendary Grimtooth Dagger heh?.....";
+		next;
+		mes "[Legendary Blacksmith]";
+		mes "It's been sometime since I've forged any weapons,... but since it";
+		mes "is a special challenge for me to make this dagger.....";
+		next;
+		mes "[Legendary Blacksmith]";
+		mes "I'll do it! I will re-create the Grimtooth Dagger! I must warn you";
+		mes "however, this is a very powerfull and dangerous dagger.  Be carefull.";
+		next;
+		mes "[Legendary Blacksmith]";
+		mes "For the Grimtooth Dagger I will need the following items:";
+		mes "- ^0000ff10 Blade Lost in Darkness^000000";		//7023
+		mes "- ^0000ff5 Cursed Ruby^000000";			//724
+		mes "- ^0000ff100 Ogre Tooth^000000";			//7002
+		mes "- ^0000ff1 Old Hilt^000000";				//7022
+		mes "- and ^0000ff1 Emperium^000000";
+		close;
+
+		L_GetGrim:
+			delitem 7023,10;
+			delitem 724,5;
+			delitem 7002,100;
+			delitem 7022,1;
+			delitem 714,1;
+			mes "[Legendary Blacksmith]";
+			mes "Good! You have brought me all the necessary items.";
+			mes "Please wait a moment while I forge the Grimtooth Dagger.";
+			next;
+			mes "(cling-clang!~ klonk!~ klank!~ cling-clang!)";
+			next;
+			mes "[Legendary Blacksmith]";
+			mes "Phew! Once again a perfect dagger! Hahaha! Here you are my friend, enjoy.";
+			getitem 1237,1;
+			close;
+
+	M_Myst:	//1138
+		if(countitem(7021)>=1 && countitem(7019)>=1 && countitem(7020)>=1 && countitem(7018)>=1 && countitem(714)>=1) goto L_GetMyst;
+		mes "[Legendary Blacksmith]";
+		mes "So you're interested in making the legendary Mysteltain Sword heh?.....";
+		next;
+		mes "[Legendary Blacksmith]";
+		mes "It's been sometime since I've forged any weapons,... but since it";
+		mes "is a special challenge for me to make this sword.....";
+		next;
+		mes "[Legendary Blacksmith]";
+		mes "I'll do it! I will re-create the Mysteltain Sword! I must warn you";
+		mes "however, this is a very powerfull and dangerous sword.  Be carefull.";
+		next;
+		mes "[Legendary Blacksmith]";
+		mes "For the Mysteltain Sword I will need the following items:";
+		mes "- ^0000ff1 Foolishness of the Blind^000000";		//7021
+		mes "- ^0000ff1 Loki's Whispers^000000";			//7019
+		mes "- ^0000ff1 Mother's Nightmare^000000";			//7020
+		mes "- ^0000ff1 Young Twig^000000";			//7018
+		mes "- and ^0000ff1 Emperium^000000";
+		close;
+	
+		L_GetMyst:
+			delitem 7021,1;
+			delitem 7019,1;
+			delitem 7020,1;
+			delitem 7018,1;
+			delitem 714,1;
+			mes "[Legendary Blacksmith]";
+			mes "Good! You have brought me all the necessary items.";
+			mes " Please wait a moment while I forge the Mysteltain Sword.";
+			next;
+			mes "(cling-clang!~ klonk!~ klank!~ cling-clang!)";
+			next;
+			mes "[Legendary Blacksmith]";
+			mes "Phew! Once again a perfect sword! Hahaha! Here you are my friend, enjoy.";
+			getitem 1138,1;
+			close;
+}
diff --git a/npc/quests/eye_of_hellion.txt b/npc/quests/eye_of_hellion.txt
index 9bee124d7..f90cf3714 100644
--- a/npc/quests/eye_of_hellion.txt
+++ b/npc/quests/eye_of_hellion.txt
@@ -1,2147 +1,2147 @@
-//===== eAthena Script =======================================

-//= The Eye of Hellion Quest.

-//===== By: ==================================================

-//= MasterOfMuppets

-//===== Current Version: =====================================

-//= 1.0

-//===== Compatible With: =====================================

-//= eAthena SVN 3422+(Requires jA Script System)

-//===== Description: =========================================

-//= Quest for getting a Nile Rose

-//===== Comments: ============================================

-//=

-//===== Additional Comments: =================================

-//= 1.0 First version [MasterOfMuppets]

-//============================================================

-

-geffen.gat,110,200,3	script	Sage Welshyun	754,2,2,{

-

-	if(HELLIONQ > 25)goto s_Last;

-	if(HELLIONQ > 18)goto s_Switches;

-	mes "[Welshyun]";

-	mes "Hm? Oh, pardon me.";

-	mes "I didn't notice you. I was";

-	mes "far too occupied thinking";

-	mes "deep important thoughts";

-	mes "that your puny little mind";

-	mes "couldn't possible fathom.";

-	close;

-

-s_Last:

-	mes "[Welshyun]";

-	mes "So, were you able";

-	mes "to deliver the tablet";

-	mes "and the Hellion's gem to";

-	mes "Chilias safely? Ah, and";

-	mes "how has my friend been?";

-	close;

-

-s_Switches:

-	switch(HELLIONQ)

-	{

-

-	case 19:

-		if(HELLIONQ3)goto s_Thirsty;

-		specialeffect 313;

-		specialeffect2 313;

-		mes "[Welshyun]";

-		mes "That...";

-		mes "That eerie glow...";

-		next;

-		mes "[Welshyun]";

-		mes "You! Identify yourself";

-		mes "and explain how you came";

-		mes "about to get those tablet";

-		mes "pieces! Now answer me!";

-		next;

-		mes "[Welshyun]";

-		mes "Ah, forgive me. You're";

-		mes "helping Chilias, are you?";

-		mes "I see. So you must be here";

-		mes "to seek my help in finding";

-		mes "the final piece, am I correct?";

-		next;

-		menu "Shut up, I know you have it, so give it!",s_Shut,"Yes, please help me.",-;

-

-		mes "[Welshyun]";

-		mes "Ah, yes... I shall help";

-		mes "you get the final tablet";

-		mes "piece, but first you'll have";

-		mes "to do a favor for me.";

-		next;

-		mes "[Welshyun]";

-		mes "My student in the Geffen";

-		mes "Tower has not reported back to";

-		mes "about his research project,";

-		mes "so I would like for you to find";

-		mes "him and retrieve the report";

-		mes "for me. Not a big deal, right?";

-		next;

-		mes "[Welshyun]";

-		mes "The title of his report";

-		mes "should be, \"^7151FFMonster Life";

-		mes "in the Geffen Area^000000\", so";

-		mes "please remember that.";

-		mes "Ah, and my student's";

-		mes "name is Enoz.";

-		set HELLIONQ,20;

-		close;

-

-	s_Shut:

-		mes "[Welshyun]";

-		mes "Such insolence!";

-		mes "Huh. I suppose Chilias";

-		mes "may have misjudged you";

-		mes "when he entrusted you with";

-		mes "this important mission. Huh.";

-		mes "A reevaluation is in order...";

-		set HELLIONQ3,1;

-		close;

-

-	s_Thirsty:

-		if(countitem(504))goto s_Thirsty2;

-		mes "[Welshyun]";

-		mes "^111111*Ahem*^000000 Oh dear me...";

-		mes "I'm unfathombly thirsty...";

-		mes "There's no way I can do any";

-		mes "serious thinking with such";

-		mes "a dry, parched throat...";

-		close;

-

-	s_Thirsty2:

-		mes "[Welshyun]";

-		mes "Oh, a White Potion?";

-		mes "Yes, may I please have";

-		mes "one? Ahh, most refreshing~";

-		mes "You may not be such a bad";

-		mes "person after all! Now";

-		mes "Shall I help you find";

-		mes "that tablet piece?";

-		next;

-		mes "[Welshyun]";

-		mes "Of course, in the";

-		mes "interest of mankind,";

-		mes "I shall help you. But first,";

-		mes "I have a favor to ask of you.";

-		next;

-		mes "[Welshyun]";

-		mes "My student in the Geffen";

-		mes "Tower has not reported back to";

-		mes "about his research project,";

-		mes "so I would like for you to find";

-		mes "him and retrieve the report";

-		mes "for me. Not a big deal, right?";

-		next;

-		mes "[Welshyun]";

-		mes "The title of his report";

-		mes "should be, \"^7151FFMonster Life";

-		mes "in the Geffen Area^000000\", so";

-		mes "please remember that.";

-		mes "Ah, and my student's";

-		mes "name is Enoz.";

-		delitem 504,1; //White potion

-		set HELLIONQ3,0;

-		set HELLIONQ,20;

-		close;

-	break;

-

-	case 20:

-		mes "[Welshyun]";

-		mes "Please bring me the";

-		mes "report entitled, \"^7151FFMonster Life";

-		mes "in the Geffen Area^000000\",";

-		mes "from my student Enoz in";

-		mes "the Geffen Tower. Thank";

-		mes "you, I appreciate your help.";

-		close;

-	break;

-

-	case 21:

-		mes "[Welshyun]";

-		mes "Hm? What's that strange";

-		mes "expression on your face?";

-		mes "Prank? Oh please. Such";

-		mes "chicanery is beneath me...";

-		mes "But even if I did play a";

-		mes "joke, believe me. It";

-		mes "builds character.";

-		next;

-		mes "[Welshyun]";

-		mes "First and foremost,";

-		mes "I want yo test you to see";

-		mes "if you are worthy of this";

-		mes "tablet piece. I want to see";

-		mes "for myself if you are a person";

-		mes "of honor. Someone of character.";

-		next;

-		mes "[Welshyun]";

-		mes "Oh yes, I accidentally";

-		mes "took this Master Science";

-		mes "Reference Book from Enoz,";

-		mes "so would you please return it";

-		mes "to him for me? Oh, and please";

-		mes "bring back 1 Blue Gemstone.";

-		next;

-		mes "^3151FFYou received the";

-		mes "incredibly heavy tome,";

-		mes "the the Master Science";

-		mes "Reference Book.";

-		set HELLIONQ,22;

-		close;

-	break;

-

-	case 22:

-		mes "[Welshyun]";

-		mes "Please deliver the Master";

-		mes "Science Reference Book to";

-		mes "Enoz, and come back to me";

-		mes "with 1 Blue Gemstone.";

-		close;

-	break;

-

-	case 23:

-		if(!countitem(717))goto s_NoGem;

-		mes "[Welshyun]";

-		mes "Thank you. You've";

-		mes "brought the book to Enoz";

-		mes "and delivered a Gemstone";

-		mes "to me as I've asked. Now,";

-		mes "there is one final test...";

-		next;

-		mes "[Welshyun]";

-		mes "Answer this question.";

-		mes "Where is the abode of the";

-		mes "departed souls with a shining";

-		mes "silver roof that is mentioned";

-		mes "in the third part of the ballad";

-		mes "of Grimnir? Well, adventurer?";

-		next;

-		input @str$;

-		if(@str$ != "Valaskjalf")goto s_WrongStr;

-		mes "[Welshyun]";

-		mes "Ah, well met, well met.";

-		mes "You are as well learned as";

-		mes "you are brave. As promised,";

-		mes "you may have this piece of";

-		mes "the tablet, which I've";

-		mes "already found. The clues";

-		mes "were too simple...";

-		set HELLIONQ,24;

-		delitem 717,1; //Blue gemstone

-		getitem 7336,1, //Geffen Tablet

-		next;

-		mes "[Welshyun]";

-		mes "Please send my regards";

-		mes "to my dear friend, Chilias,";

-		mes "who has dedicated his life";

-		mes "to sealing the evil within";

-		mes "the Hellion's gem.";

-		close;

-

-	s_WrongStr:

-		mes "[Welshyun]";

-		mes "Bwahahaah! Only";

-		mes " a superior mind could";

-		mes "know the answer to such";

-		mes "a question! Go forth and";

-		mes "learn the answer, else";

-		mes "I cannot help you, adventurer~";

-		close;

-

-	s_NoGem:

-		mes "[Welshyun]";

-		mes "Ah, I've heard that";

-		mes "Enoz received the Master";

-		mes "Science Reference Book";

-		mes "from you. But did you remember";

-		mes "to bring me a Blue Gemstone?";

-		close;

-	break;

-

-	case 24:

-		mes "[Welshyun]";

-		mes "Hm. You should visit";

-		mes "Chilias and determine";

-		mes "your next course of action,";

-		mes "now that you have all four";

-		mes "of the pieces of the tablet.";

-		close;

-	break;

-

-	case 25:

-		mes "[Welshyun]";

-		mes "Hm? Did you need";

-		mes "me to combine all four";

-		mes "pieces of the tabled and";

-		mes "make it whole again? Oh.";

-		mes "All this time I thought you";

-		mes "knew how to do it. Alright.";

-		next;

-		mes "[Welshyun]";

-		mes "As a matter of fact,";

-		mes "I was planning on using";

-		mes "the Blue Gemstone you gave";

-		mes "me to do this. But since you";

-		mes "never really asked... In any";

-		mes "case, let me concentrate.";

-		next;

-		specialeffect 54;

-		mes "[Welshyun]";

-		mes "Shadows remembered by time.";

-		mes "Help me retrieve the forgotten";

-		mes "stories that have been";

-		mes "scattered in the wind.";

-		mes "Right here. Right now.";

-		next;

-		specialeffect 72;

-		mes "[Welshyun]";

-		mes "...";

-		mes "Okay...";

-		mes "That was tough.";

-		next;

-		mes "[Welshyun]";

-		mes "Here's the";

-		mes "complete tablet.";

-		mes "Please bring this";

-		mes "safely back to Chilias.";

-		getitem 7332,1; //Complete Tablet

-		delitem 7333,1; //Prontera Tablet

-		delitem 7334,1; //Payon Tablet

-		delitem 7335,1; //Morroc Tablet

-		delitem 7336,1; //Geffen Tablet

-		set HELLIONQ,26;

-		next;

-		mes "[Welshyun]";

-		mes "Wait, take a look!";

-		mes "There's a map on the back";

-		mes "of the tablet. Although the gem";

-		mes "is already embedded within the";

-		mes "tablet, who knows where this";

-		mes "map may lead? Perhaps";

-		mes "Hellion Revenant?";

-		next;

-		mes "[Welshyun]";

-		mes "I don't know if Chilias";

-		mes "told you, but the name of";

-		mes "the monster that guards and";

-		mes "follows this gem is Hellion";

-		mes "Revenant. But why mark its";

-		mes "location on this tablet?";

-		next;

-		mes "[Welshyun]";

-		mes "Well, it will be dangerous, but";

-		mes "I'm sure that you're strong enough";

-		mes "to confront this monster. I";

-		mes "believe it was the wish of this";

-		mes "tablet's creator for someone";

-		mes "to defeat the Hellion Revenant.";

-		next;

-		menu "Alright I'll do it!",s_DoIt,"I better get this tablet to Chilias...",-;

-

-		mes "[Welshyun]";

-		mes "Yes, that's true.";

-		mes "Chilias has been waiting";

-		mes "his whole life to seal this";

-		mes "gem. Plus, who knows what";

-		mes "may happen while it is in";

-		mes "your possession?";

-		set HELLIONQ,26;

-		close;

-

-	s_DoIt:

-		mes "[Welshyun]";

-		mes "Well, I'm almost certain";

-		mes "this map will lead you to";

-		mes "Hellion Revenant. Let me";

-		mes "warp you to the location";

-		mes "marked on the tablet's map...";

-		close2;

-		warp "gef_fild09.gat",368,88;

-		set HELLIONQ,26;

-		end;

-	break;

-

-	}

-

-OnTouch:

-	if(HELLIONQ != 19)end;

-	specialeffect 313;

-	specialeffect2 313;

-	mes "^3151FFThe piece of tablet";

-	mes "that you have is shining";

-	mes "with light as if in response";

-	mes "to something in the area.";

-	close;

-

-}

-

-prontera.gat,269,326,3	script	Clanux Heffron	50,{

-

-	if(HELLIONQ > 7)goto s_Last;

-	if(HELLIONQ)goto s_Switches;

-	mes "[Clanux Heffron]";

-	mes "What's wrong with";

-	mes "this map?! I can't";

-	mes "find a blasted thing";

-	mes "on it! How can finding";

-	mes "something be so hard?";

-	close;

-

-s_Last:

-	mes "[Clanux Heffron]";

-	mes "Oh hey, it's you.";

-	mes "Listen I got this number";

-	mes "pad to pop out of that old";

-	mes "machine in the Tool Shop,";

-	mes "I still don't know what the";

-	mes "password for it might be.";

-	next;

-	mes "[Clanux Heffron]";

-	mes "If I couldn't figure";

-	mes "it out, and I understand";

-	mes "if you couldn't figure this";

-	mes "out, then this puzzle must";

-	mes "be freakin' impossible!";

-	close;

-

-s_Switches:

-	switch(HELLIONQ)

-	{

-

-	case 1:

-		if(HELLIONQ2)goto s_Bother;

-		mes "[" + strcharinfo(0) + "]";

-		mes "Excuse me, but are";

-		mes "you Clanux Heffron?";

-		next;

-		mes "[Clanux Heffron]";

-		mes "Why, who are you";

-		mes "and what the heck";

-		mes "do you want? Oh...";

-		mes "Sent by Chilias, eh?";

-		mes "What does he want?";

-		next;

-		menu "He wants me to help you",s_You,"He wants you to help me.",-;

-

-		mes "[Clanux Heffron]";

-		mes "Help you...? What, with";

-		mes "clues to the location of";

-		mes "the Hellion's gem? Screw";

-		mes "that, pal! Why should I help";

-		mes "you if we're gonna compete";

-		mes "for the same prize?!";

-		set HELLIONQ2,1;

-		close;

-

-	s_Bother:

-		mes "[Clanux Heffron]";

-		mes "Hey, why do you keep";

-		mes "botherin' me?! Go and";

-		mes "find your own clues for the";

-		mes "Hellion's gem on your own,";

-		mes "jerkface! Now getouttahere!";

-		next;

-		menu "W-what! Let's work together!",s_Work,"Fine. I don't need your help!",-;

-

-		mes "[" + strcharinfo(0) + "]";

-		mes "Fine.";

-		mes "I don't need";

-		mes "your help!";

-		next;

-		mes "[Clanux Heffron]";

-		mes "Yeah right!";

-		mes "You'll be back!";

-		mes "...They always";

-		mes "come back.";

-		close;

-

-	s_Work:

-		mes "[Clanux Heffron]";

-		mes "Work together, eh? You";

-		mes "know, normally I'd tell you";

-		mes "to make like a moonwalker";

-		mes "and just beat it, but I gotta";

-		mes "admit that I ain't doin' so";

-		mes "good on my own on this...";

-		next;

-		mes "[Clanux Heffron]";

-		mes "Alright, fine.";

-		mes "First, look through the";

-		mes "old Swordman Training";

-		mes "Grounds here in Prontera.";

-		mes "There might be some clues";

-		mes "left over there for you to";

-		mes "find.";

-		set HELLIONQ2,0;

-		set HELLIONQ,2;

-		close;

-

-	s_You:

-		mes "[Clanux Heffron]";

-		mes "So he sent me an";

-		mes "assistant, huh? Well...";

-		mes "Seeing as he gave me this";

-		mes "clue and I've taken so long";

-		mes "and still don't have anything";

-		mes "to show for it, I don't blame him.";

-		next;

-		mes "[Clanux Heffron]";

-		mes "Well, if he sent you to";

-		mes "help me out, I guess I can";

-		mes "tell you everything. For the";

-		mes "clues he had me look for,";

-		mes "I've only found two so far.";

-		mes "But I can't figure them out...";

-		next;

-		mes "[Clanux Heffron]";

-		mes "Let's see, there's this";

-		mes "broken sword and this";

-		mes "strange lookin' cogwheel.";

-		mes "What do these clues mean?!";

-		mes "Did the old man give you";

-		mes "any hints to help me out?";

-		next;

-		menu "Where did you find these?",-,"No I'm sorry.",s_Sorry;

-		//Custom dialog

-		mes "[Clanux Heffron]";

-		mes "I found them next to a";

-		mes "broken training dummy";

-		mes "in the old Swordman";

-		mes "Training Grounds here";

-		mes "in Prontera.";

-		next;

-		mes "[Clanux Heffron]";

-		mes "Why don't you go search";

-		mes "the old Swordman Training";

-		mes "Grounds for clues? I might";

-		mes "have missed something...";

-		mes "Not that I think so, but";

-		mes "just in case!";

-		set HELLIONQ,2;

-		close;

-

-s_Sorry:

-		mes "[Clanux Heffron]";

-		mes "Wha--? Then why are";

-		mes "you even here to help";

-		mes "me then? Huh. That old";

-		mes "coot must not trust me";

-		mes "enough, but I can't exactly";

-		mes "blame him. Alright then...";

-		next;

-		mes "[Clanux Heffron]";

-		mes "If you're gonna help me,";

-		mes "go search the old Swordman";

-		mes "Training Grounds over here in";

-		mes "Prontera. I doubt it, but there's";

-		mes "a chance I mighta missed";

-		mes "something there. Get to it!";

-		set HELLIONQ,2;

-		close;

-	break;

-

-	case 2:

-		mes "[Clanux Heffron]";

-		mes "Look pal, I found this broken";

-		mes "sword, a bonafide clue if I";

-		mes "ever saw one, in the old";

-		mes "Swordman Training Grounds in";

-		mes "Prontera. You should be able to";

-		mes "find something else there, maybe.";

-		close;

-	break;

-

-	case 3:

-		mes "[Clanux Heffron]";

-		mes "Hey, you're done";

-		mes "searching? Were you";

-		mes "able to find anything?";

-		next;

-		menu "Nothing...",s_Nothing,"In fact, I found this.",-;

-

-		mes "[Clanux Heffron]";

-		mes "Wha--? I had no idea";

-		mes "that sort of thing could";

-		mes "be hidden in that training";

-		mes "ground. I missed it. Oh,";

-		mes "so the Veggie Lady gave you a";

-		mes "password and all?";

-		next;

-		mes "[Clanux Heffron]";

-		mes "Huh, I can't make heads";

-		mes "or tails of that password.";

-		mes "I guess I have no choice but";

-		mes "to give you this, the";

-		mes "cogwheel clue I found";

-		mes "from the Tool Shop.";

-		next;

-		mes "[Clanux Heffron]";

-		mes "I mean, you've been lucky";

-		mes "enough till now, so you'll";

-		mes "probably be able to stumble";

-		mes "upon the answer behind this";

-		mes "weird, weird riddle. But you";

-		mes "gotta tell me the answer too!";

-		next;

-		mes "[Clanux Heffron]";

-		mes "Alright, now take your";

-		mes "cogwheel and get outta";

-		mes "here. The sooner you get";

-		mes "that clue, the sooner I'll";

-		mes "get that Hellion's gem.";

-		set HELLIONQ,4;

-		getitem 7093,1; //Cogwheel

-		close;

-

-	s_Nothing:

-		mes "[" + strcharinfo(0) + "]";

-		mes "^111111(This guy's a real punk!";

-		mes "I better not share any new";

-		mes "information I've found, just";

-		mes "in case he doesn't already";

-		mes "know about it.)";

-		next;

-		mes "[" + strcharinfo(0) + "]";

-		mes "I... I wasn't able to";

-		mes "find anything that looked";

-		mes "like a clue. I'm sorry, but";

-		mes "I let you down big time...";

-		next;

-		mes "[Clanux Heffron]";

-		mes "Aw nuts! Alright, if you";

-		mes "go back to the old man, let";

-		mes "him know that I found a broken";

-		mes "sword from the old Swordman";

-		mes "Training Grounds and this";

-		mes "cogwheel from the Tool Shop.";

-		next;

-		mes "[Clanux Heffron]";

-		mes "The clues I've found so";

-		mes "far don't make any sense!";

-		mes "So if you can, convince him to";

-		mes "drop me a couple more hints.";

-		mes "And give this to the old guy";

-		mes "to prove I found it, will you?";

-		next;

-		mes "[Clanux Heffron]";

-		mes "That's all I know.";

-		mes "At this point you're";

-		mes "probably better off";

-		mes "searching for these";

-		mes "clues on your own...";

-		getitem 7093,1; //Cogwheel

-		set HELLIONQ,4;

-		close;

-	break;

-

-	case 4:

-	case 5:

-	case 6:

-		mes "[Clanux Heffron]";

-		mes "Hey... Didn't I tell";

-		mes "you to check out the";

-		mes "Tool Shop in case there";

-		mes "was anything I missed?";

-		mes "Now go! That's an order!";

-		close;

-	break;

-

-	case 7:

-		mes "[Clanux Heffron]";

-		mes "Hey, so you have";

-		mes "anything new to report?";

-		mes "Oh, and did you learn";

-		mes "anything from that weird";

-		mes "maching in the Tool Shop?";

-		next;

-		menu "Tell him just a little bit.",s_Bit,"Don't tell him",-;

-

-	s_Bit:

-		mes "[" + strcharinfo(0) + "]";

-		mes "Well, I put that cogwheel";

-		mes "into that weird machine in";

-		mes "the Tool Shop and some kind";

-		mes "of number pad came out. Then...";

-		next;

-		mes "[" + strcharinfo(0) + "]";

-		mes "^111111(Wait, I can't trust this";

-		mes "guy!)^000000 I put in every single";

-		mes "password that I could think";

-		mes "of, but nothing happened!";

-		mes "I think I'm stuck...";

-		next;

-		mes "[Clanux Heffron]";

-		mes "Oh yeah? Hah! Well, now";

-		mes "that the easy part is";

-		mes "done, I'll just figure out";

-		mes "that secret password";

-		mes "myself! Hahahah! That Hellion's";

-		mes "gem is as good as mine!";

-		set HELLIONQ,8;

-		close;

-	break;

-

-	}

-

-}

-

-prontera.gat,224,84,1	script	Training Dummy#HellionDummy	111,{

-

-	if(HELLIONQ == 2)goto s_Hellion;

-	mes "^3151FFIt's a training dummy";

-	mes "that was used to hone the";

-	mes "skills of new Swordmen...";

-	mes "But the Swordman Training";

-	mes "Grounds have moved to Izlude.";

-	close;

-

-s_Hellion:

-	mes "^3151FFIt's a training dummy";

-	mes "with a gash in its body";

-	mes "that looks like it was made";

-	mes "by the thrust of a sharp sword.";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Didn't Clanux mention that he";

-	mes "found a broken sword around";

-	mes "here? Maybe this was exactly";

-	mes "where he found it. Let's see...";

-	next;

-	menu "Inspect the dummy's gash",-;

-

-	mes "^3151FFInside of the dummy's body is";

-	mes "a steel bearing with a roughly";

-	mes "etched message that reads:";

-	mes "^7151FF\"Veggie Lady N9 W3 BINGO.\"";

-	next;

-

-	mes "[" + strcharinfo(0) + "]";

-	mes "What the heck does this";

-	mes "even mean? A Veggie Lady?";

-	mes "Does Clanux know anything";

-	mes "at all about this clue...?";

-	set HELLIONQ,3;

-	close;

-

-}

-

-prt_in.gat,128,79,0	script	Unknown Machine#HellionMchn	111,{

-	if(HELLIONQ == 6)goto s_Input2;

-	if(HELLIONQ == 5)goto s_Input;

-	mes "^3151FFIt's some sort of";

-	mes "strange looking machine";

-	mes "with a mysterious purpose.";

-	close;

-

-s_Input:

-	mes "^3151FFIt's a weird looking";

-	mes "machine that looks like";

-	mes "it hasn't been used in a";

-	mes "while. It looks like the";

-	mes "cogwheel that you have";

-	mes "would fit perfectly in it...";

-	next;

-	menu "Insert Cogwheel",s_Insert,"Ignore it.",-;

-

-	mes "[" + strcharinfo(0) + "]";

-	mes "Eh...";

-	mes "Forget it.";

-	close;

-

-s_Insert:

-	if(!countitem(7093))goto s_NoCog;

-	mes "[" + strcharinfo(0) + "]";

-	mes "I just know this";

-	mes "cogwheel will fit";

-	mes "into this machine!";

-	mes "What I don't know is";

-	mes "what will happen once";

-	mes "this machine works...";

-	next;

-	mes "^3151FF*Click...!*";

-	mes "Once the cogwheel is";

-	mes "fit into the machine and";

-	mes "turned, the device hums";

-	mes "to life and a panel opens,";

-	mes "revealing a numeric keypad.";

-	delitem 7093,1; //Cogwheel

-	set HELLIONQ,6;

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "I guess that I've got";

-	mes "to input some kind of";

-	mes "numeric password...";

-	mes "Ah, right, the numbers";

-	mes "that Veggie Lady gave me!";

-	next;

-	input @temp;

-	if(@temp != 16754213)goto s_FailInp;

-s_CorrectInput:

-	mes "^3151FFThe machine responds to";

-	mes "the password with a pleasant";

-	mes "chime, confirming that you've";

-	mes "input the correct numbers.";

-	mes "The keypad slides open to";

-	mes "reveal a piece of a tablet.";

-	getitem 7333,1; //Prontera Tablet

-	set HELLIONQ,7;

-	next;

-	mes "^3151FFThe message engraved on";

-	mes "this table reads: \"This is for";

-	mes "Christopher, my dear friend who";

-	mes "I met in Prontera. To the one";

-	mes "who finds this, please seek";

-	mes "out the next piece of this tablet";

-	mes "in the city of thickest forest.\"";

-	next;

-	mes "^3151FFThe message is signed";

-	mes "by someone named Tyus.";

-	mes "It would be best to bring";

-	mes "this back to Sir Chilia'Tyus";

-	mes "and confirm that this was";

-	mes "made by his grandfater...";

-	close;

-

-s_Input2:

-	mes "[" + strcharinfo(0) + "]";

-	mes "Okay, let me see";

-	mes "if I can enter the";

-	mes "right number this time...";

-	next;

-	input @temp;

-	if(@temp == 16754213)goto s_CorrectInput;

-

-s_FailInp:

-	mes "^3151FFThe machine responds to";

-	mes "the passwords with an abrupt,";

-	mes "screeching beep and the entire";

-	mes "machine shuts down. You'll";

-	mes "have to try entering the";

-	mes "password again.";

-	close;

-

-s_NoCog:

-	mes "[" + strcharinfo(0) + "]";

-	mes "Hmm, I can't find the";

-	mes "cogwheel, now where did";

-	mes "I put it?";

-	close;

-

-}

-

-prontera.gat,45,67,1	script	#HellionActivator	139,0,0,{

-OnTouch:

-	if(HELLIONQ != 4)end;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Well, according to the";

-	mes "message in that old training";

-	mes "dummy, this is where I'm";

-	mes "supposed to go. Nine steps";

-	mes "north, 3 steps west. And now...";

-	mes "Veggie Lady. Okay, okay...";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Huh. That's creepy.";

-	mes "There's one right there";

-	mes "staring at me. But after";

-	mes "the words \"Veggie Lady\"";

-	mes "all the message says is, um,";

-	mes "what was that last word again?";

-	next;

-	input @tempstr$;

-	if(@tempstr$ != "BINGO")goto s_Failstr;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Of course!";

-	mes "\"BINGO!\" But";

-	mes "I don't see a hall";

-	mes "full of old people";

-	mes "around here, I--";

-	next;

-	mes "[Veggie Lady]";

-	mes "Finall, you say it.";

-	mes "Yessh, I thought I was";

-	mes "going to wait forever for";

-	mes "somebody to say that";

-	mes "password. Okay, here's";

-	mes "the code number you want...";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "C-code number?";

-	mes "Wait, wh-what...?";

-	next;

-	mes "[Veggie Lady]";

-	mes "Awww...I don't know!";

-	mes "I'm only gonna say it";

-	mes "now: ^7151FF16754213^000000. One";

-	mes "more time, in case you";

-	mes "didn't get it: ^7151FF16754213^000000.";

-	mes "Don't forget it, adventurer.";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Wait... What does";

-	mes "this all mean? Won't";

-	mes "you tell me more?";

-	next;

-	mes "[Veggie Lady]";

-	mes "No. I've been given";

-	mes "explicit instructions";

-	mes "to not tell you more.";

-	mes "In face, I hate talking.";

-	mes "That's why I sell vegetables.";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Holy cow...";

-	mes "This is all";

-	mes "really cloak and";

-	mes "dagger type stuff!"; 

-	set HELLIONQ,5;

-	close;

-

-s_Failstr:

-	mes "[" + strcharinfo(0) + "]";

-	mes @tempstr$;

-	mes "Hmmm. No, no that couldn't";

-	mes "be it. What in the world was";

-	mes "that word and why can't I";

-	mes "remember it when I seemingly";

-	mes "need it most?";

-	close;

-

-}

-

-payon.gat,182,132,3	script	Grout'he Tuccok	48,{

-

-	if(HELLIONQ > 17)goto s_Final;

-	if(HELLIONQ > 8)goto s_Switches;

-	mes "[Grout'he]";

-	mes "Hey...";

-	mes "Hey you!";

-	mes "What are you";

-	mes "looking at?!";

-	mes "Get outta my";

-	mes "face, ya jerkward.";

-	close;

-

-s_Final:

-	mes "[Grout'he]";

-	mes "Hey, this is great!";

-	mes "you actually found the";

-	mes "next piece of the tablet!";

-	mes "You better take this back";

-	mes "to Chilias'Tyus right now~";

-	next;

-	mes "[Grout'he]";

-	mes "Oh. And um, thanks";

-	mes "for being willing to pay";

-	mes "me in cash for all those";

-	mes "little bitty clues. I won't";

-	mes "forget your help, pal~";

-	close;

-

-s_Switches:

-	switch(HELLIONQ)

-	{

-

-	case 9:

-		mes "[Grout'he]";

-		mes "What...?";

-		mes "You got something";

-		mes "to tell me or are you";

-		mes "just bein' a rude prick";

-		mes "and starting at me like";

-		mes "this is your turf?!";

-		next;

-		mes "[" + strcharinfo(0) + "]";

-		mes "I'm sorry, but well...";

-		mes "Chilias'Tyus told me that";

-		mes "you might know something";

-		mes "about a piece of a table--";

-		next;

-		mes "[Grout'he]";

-		mes "What? Oh, so Chilias'Tyus";

-		mes "is lookin for the gem too eh?";

-		mes "Ooh, that's right. He wants to";

-		mes "seal its evil or something.";

-		mes "Yeah, yeah. That's a good";

-		mes "cause. Real noble and all...";

-		next;

-		mes "[Grout'he]";

-		mes "I'll tell you what. The only reason";

-		mes "I want that gem is to sell it";

-		mes "so I can pay off ally my debts.";

-		mes "But if I sell you the clues I found,";

-		mes "I'll get the zeny I need and the";

-		mes "gem will be in good hands too.";

-		next;

-		mes "[Grout'he]";

-		mes "So what do you say?";

-		mes "It's not a bad deal if";

-		mes "you think about it and";

-		mes "we might as well kill";

-		mes "two birds with one stone...";

-		next;

-		menu "Alright, I'll buy your clues.",s_Buy,"Why the hell should I pay you?!",-;

-

-		mes "[Grout'he]";

-		mes "Why the hell should you";

-		mes "pay me?! Hey, aren't you";

-		mes "looking for the gem to help";

-		mes "the world? Well, I happen to";

-		mes "be a little part of this world,";

-		mes "so why don't you help me first?";

-		next;

-		mes "[Grout'he]";

-		mes "Man, you might not";

-		mes "know it, but the money";

-		mes "you give me will save";

-		mes "a life. My own! Dude, how";

-		mes "can you be so insensitive?";

-		close;

-

-	s_Buy:

-		mes "[Grout'he]";

-		mes "Oh man, thanks a lot.";

-		mes "Alright, all I'm asking";

-		mes "for is 10,000 zeny. You get";

-		mes "my clues and I'll let you know";

-		mes "where I found 'em, in case";

-		mes "you can find something new.";

-		next;

-		if(Zeny < 10000)goto s_NoZeny;

-		set Zeny,Zeny-10000;

-		mes "[Grout'he]";

-		mes "There you go!";

-		mes "Thanks for the cash~";

-		mes "(Know I won't have to";

-		mes "get my knees all broken!)";

-		mes "Oh, and let me makr your";

-		mes "Mini-Map for you real quick...";

-		next;

-		mes "[Grout'he]";

-		mes "You see this here?";

-		mes "It's where I found the";

-		mes "Skirt of Virgin I'm about";

-		mes "to give you. So check that";

-		mes "spot out and see if you find";

-		mes "anything new and interesting.";

-		viewpoint 1,101,191,10,0xFF00FF;

-		next;

-		mes "[Grout'he]";

-		mes "Here you go, pal...";

-		mes "A Stone Heart, Green Herb,";

-		mes "some Grape Juice and one";

-		mes "clean and pure Skirt of Virgin.";

-		mes "If you got any more questions,";

-		mes "I guess you can ask me later~";

-		getitem 953,1;

-		getitem 511,1;

-		getitem 533,1;

-		getitem 1049,1;

-		set HELLIONQ,10;

-		close;

-

-	s_NoZeny:

-		mes "[Grout'he]";

-		mes "Oh hey...";

-		mes "You don't got the zeny.";

-		mes "Sorry pal, but I've really got";

-		mes "to pay my debts somehow.";

-		mes "I don't know if I'm allowed";

-		mes "to reall talk about it...";

-		mes "^111111*Sob*";

-		close;

-	break;

-

-	case 10:

-		mes "[Grout'he]";

-		mes "You see this here?";

-		mes "It's where I found the";

-		mes "Skirt of Virgin I'm about";

-		mes "to give you. So check that";

-		mes "spot out and see if you find";

-		mes "anything new and interesting.";

-		viewpoint 1,101,191,10,0xFF00FF;

-		close;

-	break;

-

-	case 11:

-		mes "[Grout'he]";

-		mes "You've been to the";

-		mes "first location? Good.";

-		mes "Okay, now look over here.";

-		mes "Check your Mini-Map to";

-		mes "see where I found that";

-		mes "Stone Heart, got it?";

-		viewpoint 1,82,109,11,0xFF00FF;

-		close;

-	break;

-

-	case 12:

-		mes "[Grout'he]";

-		mes "Alright, here's where";

-		mes "I found that Green Herb.";

-		mes "You know you can use that";

-		mes "to counter poison, right?";

-		mes "Check that place to see if";

-		mes "there's anything I missed.";

-		viewpoint 1,239,56,12,0xFF00FF;

-		close;

-	break;

-

-	case 13:

-		mes "[Grout'he]";

-		mes "Okay, here's the last";

-		mes "place you should double";

-		mes "check, the place where";

-		mes "I nabbed that Grape";

-		mes "Juice. Good luck~";

-		viewpoint 1,240,161,13,0xFF00FF;

-		close;

-	break;

-

-	case 14:

-		mes "[Grout'he]";

-		mes "Oh, you need some help";

-		mes "with figuring out the clues?";

-		mes "Heh. Alright, let's see.";

-		mes "You want me to help";

-		mes "you in making sense of";

-		mes "this weird riddle?";

-		next;

-		menu "Yes, please!",s_YesP,"No thanks~",-;

-

-		mes "[Grout'he]";

-		mes "Oh yeah?";

-		mes "Well listen, I dunno,";

-		mes "but this looks to be one";

-		mes "of those situations where";

-		mes "two heads are better than one.";

-		mes "I think we oughta team up~";

-		close;

-

-	s_YesP:

-		mes "[Grout'he]";

-		mes "Alright now. All those";

-		mes "messages said stuff about";

-		mes "one sized clothing, dried";

-		mes "fish and green herbs, wine...";

-		mes "Huh. It doesn't make sense.";

-		next;

-		mes "[" + strcharinfo(0) + "]";

-		mes "What...?";

-		mes "I could have";

-		mes "told you that!";

-		next;

-		mes "[Grout'he]";

-		mes "Wait, wait.";

-		mes "Let's mark all the";

-		mes "clue locations again";

-		mes "on your Mini-Map.";

-		mes "Okay, we've got four";

-		mes "dots around Payon.";

-		viewpoint 1,101,191,10,0xFF00FF;

-		viewpoint 1,82,109,11,0xFF00FF;

-		viewpoint 1,239,56,12,0xFF00FF;

-		viewpoint 1,240,161,13,0xFF00FF;

-		next;

-		mes "[Grout'he]";

-		mes "Alright, now if";

-		mes "I connect and interesect";

-		mes "all the lines, there's";

-		mes "a point in the middle.";

-		mes "Why don't you check";

-		mes "this middle point, eh?";

-		viewpoint 1,159,130,14,0xFF00FF;		

-		next;

-		mes "[Grout'he]";

-		mes "Now, this location";

-		mes "is a house, and I know";

-		mes "it's pretty random, but";

-		mes "it's all we got. Heck,";

-		mes "all these clues make";

-		mes "less sense than this!";

-		set HELLIONQ,15;

-		close;

-	break;

-

-	case 15:

-		mes "[Grout'he]";

-		mes "Hey, how's it goin'";

-		mes "looking for that one";

-		mes "piece of the tablet?";

-		mes "It's a lot of trouble,";

-		mes "but I guess that's the";

-		mes "case with all treasures.";

-		viewpoint 1,159,130,14,0xFF00FF;

-		close;

-	break;

-

-	case 16:

-		mes "[Grout'he]";

-		mes "Oh, so all of those";

-		mes "items came in handy?";

-		mes "I don't believe it! So";

-		mes "this puzzle actually";

-		mes "makes sense?! So";

-		mes "what'd the slab say?";

-		next;

-		mes "[Grout'he]";

-		mes "\"Compassionate one?\"";

-		mes "Oh hey, there's a giant";

-		mes "stone statue over in the";

-		mes "Archer Village that fits";

-		mes "the description perfectly!";

-		mes "You should check it out.";

-		set HELLIONQ,17;

-		close;

-	break;

-

-	case 17:

-		mes "[Grout'he]";

-		mes "Hey, you really ought";

-		mes "to check out the huge";

-		mes "stone statue over in the";

-		mes "Archer Village. Now that";

-		mes "I think about it, it's the";

-		mes "perfect hiding place!";

-		close;

-	break;

-

-	}

-

-}

-

-payon.gat,101,191,1	script	#HellionStepAct	139,1,1,{

-	if(HELLIONQ != 10)end;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Well, this is where";

-	mes "Grout'he told me to look.";

-	mes "Ooh, there's something";

-	mes "written on the ceiling. Um,";

-	mes "let's see... \"This garment";

-	mes "is one size fits all.\"";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "That's it...?";

-	mes "Hopefully this will";

-	mes "make more sense once";

-	mes "I find more clues. I hope.";

-	set HELLIONQ,11;

-	close;

-

-}

-

-payon.gat,82,109,1	script	Pile of Stones#HellionStones	111,{

-	if(HELLIONQ != 11)end;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Well, this is the place";

-	mes "that Grout'he told me about.";

-	mes "Let's see, there's an engraving";

-	mes "here that says, \"I used to";

-	mes "pray for peaceful days";

-	mes "here.\" Okay.";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Man...";

-	mes "This better not be";

-	mes "one of those puzzles";

-	mes "that looks easy once";

-	mes "I get the answer. Well,";

-	mes "if I ever get it, that is.";

-	set HELLIONQ,12;

-	close;

-

-}

-

-payon.gat,239,56,1	script	Dried Fish#HellionFish	111,{

-	if(HELLIONQ != 12)end;

-	mes "[" + strcharinfo(0) + "]";

-	mes "So... Dried fish all";

-	mes "around me. This is getting";

-	mes "to be nonsense. Let's see,";

-	mes "this message says, \"Green";

-	mes "Herbs are very useful for";

-	mes "getting rid of fish smells.\"";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "I got it...!";

-	mes "Whoever made up";

-	mes "these clues must be";

-	mes "some sort of crazy man!";

-	mes "It's the only explanation!";

-	set HELLIONQ,13;

-	close;

-

-}

-

-payon.gat,240,161,1	script	Vat#HellionVat	111,{

-	if(HELLIONQ != 13)end;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Alright, the last";

-	mes "place I have to check.";

-	mes "It's a big old vat with a";

-	mes "message here too. No";

-	mes "Let me see, there should";

-	mes "be a message here too. Ah--!";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "This says, \"What will it be?";

-	mes "Wine or Grape Juice? Oh,";

-	mes "but I much prefer wine.\" Okay,";

-	mes "what does this have to do with";

-	mes "that Hellion's gem? Weird...";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Am I missing something?";

-	mes "I think I really need help in";

-	mes "figuring this out. Hmm...";

-	set HELLIONQ,14;

-	close;

-

-}

-

-payon.gat,159,130,1	script	Wooden Floor#HellionFloor	111,{

-	if(HELLIONQ > 15)goto s_Slab;

-	if(HELLIONQ != 15)end;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Hey, the floor around";

-	mes "here doesn't seem very";

-	mes "solid. Maybe there's";

-	mes "something underneath?";

-	next;

-	menu "Just check the floor.",-,"Dig through the dust.",s_Dig;

-

-	mes "^3151FFYou examine the floor,";

-	mes "but are unable to find";

-	mes "anything that resembles";

-	mes "a clue to the location";

-	mes "of the Hellion's gem";

-	mes "or a tablet piece.";

-	close;

-

-s_Dig:

-	mes "[" + strcharinfo(0) + "]";

-	mes "Oh man, there's";

-	mes "so much dust! What";

-	mes "can I do about all of";

-	mes "this nasty dirt in the air?";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Well, there are all these";

-	mes "clues Gout'he found. I sucks";

-	mes "but I'll use this Grape Juice";

-	mes "to sort of keep this dust from";

-	mes "kicking up. And if I put my";

-	mes "morals on hold, I'll cover";

-	mes "my face...";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "...With this Skirt of Virgin.";

-	mes "Oh, and I can use this Stone";

-	mes "Heart to prop any floor boards";

-	mes "I tilt while I look undernearth";

-	mes "this floor. Oh hey! I found it!";

-	mes "It's... It's another clue!";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Wait, wait...";

-	mes "I can't read the";

-	mes "engraving on this";

-	mes "stone slab, it's way";

-	mes "too old. Let's see...";

-	next;

-	mes "^3151FFYou cover the surface";

-	mes "of the slab and begin";

-	mes "to rub a Green Herb over";

-	mes "it. Fortunately, the juice from";

-	mes "the Green Herb makes the";

-	mes "engraving appear more clearly.";

-	next;

-	mes "[Stone Engraving]";

-	mes "^7151FF\"This has been entrusted to";

-	mes "the care of the compassionate";

-	mes "one so that my friends may";

-	mes "find peace. To he who finds";

-	mes "this, remember that avarice";

-	mes "knows no bounds. --Tyus.\"";

-	set HELLIONQ,16;

-	close;

-

-s_Slab:

-	mes "[Stone Engraving]";

-	mes "^7151FF\"This has been entrusted to";

-	mes "the care of the compassionate";

-	mes "one so that my friends may";

-	mes "find peace. To he who finds";

-	mes "this, remember that avarice";

-	mes "knows no bounds. --Tyus.\"";

-	close;

-

-}

-

-pay_arche.gat,141,29,1	script	Buddha Statue#HellionStat	111,3,3,{

-	if(HELLIONQ != 17)end;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Hey, there's a huge";

-	mes "stone statue. This";

-	mes "must be what Gout'he";

-	mes "was telling me about.";

-	next;

-	mes "[Echoing Voice]";

-	mes "^7151FFYou must...";

-	mes "You must be...";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "What the--?";

-	mes "There's a voice";

-	mes "inside my head!";

-	mes "and it's not even mine!";

-	next;

-	mes "[Echoing Voice]";

-	mes "You who have come";

-	mes "for the Tablet Piece,";

-	mes "I shall judge whether";

-	mes "or not you are worthy.";

-	mes "Answer this one question.";

-	next;

-	mes "[Echoing Voice]";

-	mes "You are in a situation";

-	mes "in which you will die,";

-	mes "but if you cause the death";

-	mes "of another person, you will";

-	mes "surely save yourself. So...";

-	mes "What do you do?";

-	next;

-	menu "I will kill to survive",s_Kill,"I have no choice, but to die.",s_Die,"I won't kill, but I'll find a way to live!",-,"I'll ask that person if it's okay to kill him.",s_Ask;

-

-	mes "[Echoing Voice]";

-	mes "Yes. Love for all life,";

-	mes "including your own, is";

-	mes "a trait all true heroes";

-	mes "must have. You have chosen...";

-	mes "Wisely. Please, take this into";

-	mes "your capable hands, adventurer.";

-	next;

-	mes "^3151FFA stone slab at the foot";

-	mes "of the statue slides open,";

-	mes "revealing a piece of the";

-	mes "tablet that will lead you";

-	mes "to the Hellion's gem.";

-	getitem 7334,1; //Payon Tablet

-	set HELLIONQ,18;

-	close;

-

-s_Kill:

-	mes "[Echoing Voice]";

-	mes "there is a primal truth";

-	mes "to your answer. However...";

-	mes "You have chosen poorly.";

-	close2;

-	percentheal -100,0;

-	end;

-

-s_Die:

-	mes "[Echoing Voice]";

-	mes "There is a kindness and";

-	mes "compassion in your answer";

-	mes "that is indeed rare. However,";

-	mes "where is the respect for your";

-	mes "own life? If you are that";

-	mes "willing to throw it away, you";

-	mes "are no hero.";

-	close2;

-	percentheal -100,0;

-	end;

-

-s_Ask:

-	mes "[Echoing Voice]";

-	mes "The veneer of honesty in";

-	mes "your answer is surpassed by";

-	mes "your own cowardice. You have";

-	mes "chosen extremely poorly...";

-	close2;

-	percentheal -100,0;

-	end;

-

-OnTouch:

-	if(HELLIONQ != 17)end;

-	specialeffect 313;

-	specialeffect2 313;

-	mes "^3151FFThe piece of tablet";

-	mes "that you have is shining";

-	mes "with light as if in repsonse";

-	mes "to something in the area.";

-	close;

-

-}

-

-morocc_in.gat,116,101,2	script	Old Scholar Tyus	735,2,2,{

-

-	if(HELLIONQ == 27)goto s_Last;

-	if(countitem(7332))goto s_Tablet;

-	if(HELLIONQ == 25)goto s_Completion;

-	if(HELLIONQ == 24)goto s_Four;

-	if(HELLIONQ > 18)goto s_Welshyun;

-	if(HELLIONQ == 18)goto s_Morroc;

-	if(HELLIONQ > 8)goto s_Grout;

-	if(HELLIONQ == 8)goto s_Payon;

-	if(HELLIONQ == 4)goto s_Veggie;

-	if(HELLIONQ > 0)goto s_Seek;

-	if(hellion_consideration)goto s_Consider;

-	mes "[Sir Chilias'Tyus]";

-	mes "Greetings...";

-	mes "My name is Sir Chilias'Tyus.";

-	mes "I've lived a long time here in";

-	mes "Rune-Midgard and I've come";

-	mes "to see and know a lot of things.";

-	mes "Power, jealousy, hardship...";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Sp what exactly";

-	mes "brings you here to";

-	mes "the middle of Morroc?";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "This land has grown corrupt";

-	mes "with the disease of greed";

-	mes "and selfishness. Everywhere";

-	mes "you go, people are heartless,";

-	mes "but I still believe that I'll find";

-	mes "the one worth enough to help";

-	mes "me...";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "There is no shortage of";

-	mes "brave and strong warriors";

-	mes "in these dangerous times.";

-	mes "But for the thing I seek,";

-	mes "I must have the help of one";

-	mes "who is truly pure of heart...";

-	next;

-	menu "What are you looking for?",s_Looking,"Pure of heart? Hah! Good luck!",-;

-

-	mes "[Sir Chilias'Tyus]";

-	mes "Times are bad when";

-	mes "even the youth have";

-	mes "been jaded. But I refuse";

-	mes "to believe that hope is";

-	mes "truly lost in this age...";

-	close;

-

-s_Glimmer:

-	mes "[Sir Chilias'Tyus]";

-	mes "Heh heh~ I see you eyes";

-	mes "glimmer with enthusiasm,";

-	mes "but it seems this task might";

-	mes "be a little too much for you.";

-	mes "I'm sorry, but that's the";

-	mes "reality I can't ignore...";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "Go out in to the world,";

-	mes "and grow in strength.";

-	mes "Perhaps after you become";

-	mes "more capable, I'll find that";

-	mes "I can rely on your help.";

-	close;

-

-s_Looking:

-	if(BaseLevel < 75)goto s_Glimmer;

-	mes "[Sir Chilias'Tyus]";

-	mes "I suppose I should tell you";

-	mes "first about my grandfather,";

-	mes "who was once a young and";

-	mes "fearless adventurer, much";

-	mes "like yourself. Yes, he";

-	mes "traveled the world with his";

-	mes "three friends...";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "The four of them went on";

-	mes "many expeditions together";

-	mes "and earned themselves a";

-	mes "reputation as a courageous";

-	mes "team that worked especially";

-	mes "well together after many years.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "Then, on what was supposed";

-	mes "to be a typical journey, they found";

-	mes "an uncharted cave. Curious, and";

-	mes "in need of rest, the four ventured";

-	mes "inside. There, they encountered";

-	mes "that most horrible creature...";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "It was a ferocious beast";

-	mes "with horns as large and as";

-	mes "sharp as their weapons, with";

-	mes "eyes that blazed with hellfire.";

-	mes "My grandfather could tell that";

-	mes "it was thirsty for blood.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "They ran from the beast";

-	mes "as quickly as they could,";

-	mes "but the four were separated";

-	mes "in the cave's darkness. It was";

-	mes "all they could do to hide in";

-	mes "the darkness of the cave...";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "From his hiding place, my";

-	mes "grandfather heard the screams";

-	mes "of his friends as the monster";

-	mes "slaughtered them, one by one.";

-	mes "The screams and the monster's";

-	mes "growls were getting closer...";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "Unable to endure the";

-	mes "suffering of his trusted";

-	mes "comrades, my grandfather";

-	mes "jumped out hiding and tried";

-	mes "to save his friends. The beast";

-	mes "found him and they battled.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "It was no use. The beast";

-	mes "was too powerful and my";

-	mes "grandfather was knocked out.";

-	mes "When he came to, his friends";

-	mes "were all dead and a shining";

-	mes "gem lay in a pool of blood.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "My grandfather buried";

-	mes "his friends that day. He";

-	mes "took that gem as a memento";

-	mes "of their final expedition, but";

-	mes "wondered why the beast";

-	mes "had decided to spare him.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "It wasn't long before he";

-	mes "experienced the gem's curse";

-	mes "firsthand. The gem inexplicably";

-	mes "drew people to it, taking the";

-	mes "greed in their hearts and";

-	mes "twisting their minds...";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "Grandfather believed the";

-	mes "beast let him live so that";

-	mes "the gem would be set loose";

-	mes "upon the outside world, free";

-	mes "to pollute it with its evil.";

-	mes "He had to do something...";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "However, the gem proved";

-	mes "to be formed out of pure evil";

-	mes "and could not be destroyed";

-	mes "by human means. In the end,";

-	mes "my grandfather hid the gem";

-	mes "someplace safe...";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "However, the threat of the";

-	mes "gem still exists. Grandfather";

-	mes "and my father worked for";

-	mes "years to find a way to seal";

-	mes "its darkness. Only now have I";

-	mes "been able to create a bracelet to";

-	mes "seal its evil power.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "For my grandfather and his";

-	mes "friends to truly rest in peace,";

-	mes "I must find an adventurer of";

-	mes "pure heart who can find the";

-	mes "gem and bring it to me so that";

-	mes "I can finally seal its power.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "I think... I think you";

-	mes "might be the hero that";

-	mes "I've been waiting for. Will";

-	mes "you help an old man for the";

-	mes "sake of all that is good?";

-	next;

-	menu "Of course, I will.",s_Will,"I'm sorry, but I can't.",-;

-s_AskMuch:

-	mes "[Sir Chilias'Tyus]";

-	mes "I understand...";

-	mes "I know I am asking much";

-	mes "of you, and this task is not";

-	mes "one to take lightly. However,";

-	mes "I believe that you are wholly";

-	mes "capable of accomplishing this.";

-	set hellion_consideration,1;

-	close;

-

-s_Consider:

-	mes "[Sir Chilias'Tyus]";

-	mes "So have you considered";

-	mes "my proposal? I believe that";

-	mes "you may be the one who will";

-	mes "help me in sealing away the";

-	mes "Hellion gem's evil forever.";

-	next;

-	menu "I will help you.",-,"...Sorry about that.",s_AskMuch;

-

-	set hellion_consideration,0;

-s_Will: 

-	mes "[Sir Chilias'Tyus]";

-	mes "Good good, but first";

-	mes "I must test to see if you";

-	mes "are worthy of holding the";

-	mes "Hellion's gem. I can't tell";

-	mes "you exacrlt where it is, but";

-	mes "I will give you some clues.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "First, speak to Clanux";

-	mes "Heffron in Prontera. He";

-	mes "has offered to help me find";

-	mes "the gem, but I do not know if";

-	mes "I can trust him. Please help";

-	mes "me protect this world from the gem...";

-	set HELLIONQ,1;

-	close;

-

-s_Seek:

-	mes "[Sir Chilias'Tyus]";

-	mes "Please seek out";

-	mes "Clanux Heffron in";

-	mes "Prontera. He may have";

-	mes "information regarding a";

-	mes "clue leading to the Hellion";

-	mes "gem. Good luck to you.";

-	close;

-

-s_Veggie:

-	mes "^3151FFAs you told Chilias about";

-	mes "the strange message you";

-	mes "found inside the training";

-	mes "dummy he starts to mumble";

-	mes "something nobody could";

-	mes "possibly understand.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "Ok, I think I know what";

-	mes "this clue means. Go find";

-	mes "this Veggie Lady, wherever";

-	mes "she might be. Then take";

-	mes "9 steps North and then";

-	mes "3 steps to the west.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "I'm still clueless";

-	mes "about the \"BINGO\" part.";

-	mes "I'm sorry but I can't help";

-	mes "you with that, you'll have";

-	mes "to figure it out on your own.";

-	close;

-

-s_Payon:

-	mes "[Sir Chilias'Tyus]";

-	mes "Ah, yes! This is one piece";

-	mes "of the table that will lead";

-	mes "you to the Hellion's gem!";

-	mes "This engraving was definitely";

-	mes "made by my grandfather, and";

-	mes "Christopher was one of his friends.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "I suppose he hid these pieces";

-	mes "in the places that reminded him";

-	mes "of his friends. Now according";

-	mes "to the tablet's message, you";

-	mes "should find the next piece";

-	mes "in \"the city of thickest forest\"";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "I'm sure that the";

-	mes "next tablet piece is";

-	mes "in Payon, so go there";

-	mes "and see if you can find";

-	mes "it. Good luck to you,";

-	mes "kind adventurer.";

-	set HELLIONQ,9;

-	close;

-

-s_Grout:

-	mes "[Sir Chilias'Tyus]";

-	mes "Now that I think about";

-	mes "it, there's a guy in Payon";

-	mes "that I know named Grout'the";

-	mes "Tuccok who knew my grandfather.";

-	mes "He might know something, but";

-	mes "he's a little, well... Hmm...";

-	close;

-

-s_Morroc:

-	mes "[Sir Chilias'Tyus]";

-	mes "While you were gone,";

-	mes "I felt a little bad that you";

-	mes "were searching for the";

-	mes "tablet pieces on your own,";

-	mes "so I managed to find this";

-	mes "piece here in Morroc. But...";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	specialeffect 313;

-	specialeffect2 313;

-	mes "Why are they glowing like";

-	mes "this? In any case, we have";

-	mes "this piece I found here in";

-	mes "Morroc, and the pieces you";

-	mes "found in Prontera and Payon.";

-	mes "There's one more left in Geffen.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "Anyway, on the last tablet";

-	mes "piece that I found, it";

-	mes "says \"Hakim loved magic,";

-	mes "and always enjoyed its";

-	mes "wondrous city\", so I'm sure";

-	mes "the last piece is in Geffen.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "Please take this third";

-	mes "tablet piece and find the";

-	mes "final piece so that we can";

-	mes "fulfill my dear grandfather's";

-	mes "greatest wish and forever";

-	mes "seal away the Hellion's gem.";

-	getitem 7335,1; //Morroc Tablet

-	set HELLIONQ,19;

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "When you get back to Geffen,";

-	mes "please speak to Welshyun,";

-	mes "who's been helping me in";

-	mes "creating a device to seal the";

-	mes "gem's darkness. He is";

-	mes "worthy of trust and";

-	mes "will surely help us.";

-	close;

-

-s_Welshyun:

-	mes "[Sir Chilias'Tyus]";

-	mes "Please visit the";

-	mes "sage named Welshyun";

-	mes "in Geffen. We are good";

-	mes "friends, so I am sure";

-	mes "that you can trust him.";

-	close;

-

-s_Four:

-	mes "[Sir Chilias'Tyus]";

-	mes "You have all four";

-	mes "pieces of the tablet?";

-	mes "That's great news! Ah,";

-	mes "and the gem is embedded";

-	mes "in each of the tablet pieces.";

-	mes "We're so close to finishing!";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "Ah, would you go back";

-	mes "to Welshyun? I know it's";

-	mes "a hassle, but he is probably";

-	mes "the only one who can combine";

-	mes "the tablet pieces into their";

-	mes "complete form. Thank you...";

-	set HELLIONQ,25;

-	close;

-

-s_Completion:

-	mes "[Sir Chilias'Tyus]";

-	mes "Ah, would you go back";

-	mes "to Welshyun? I know it's";

-	mes "a hassle, but he is probably";

-	mes "the only one who can combine";

-	mes "the tablet pieces into their";

-	mes "complete form. Thank you...";

-	close;

-

-s_Tablet:

-	mes "[Sir Chilias'Tyus]";

-	mes "At long last. We have";

-	mes "everything. The Tablet";

-	mes "and the Hellion's gem.";

-	mes "Now I can finally use";

-	mes "this bracelet to seal";

-	mes "its power forever...";

-	next;

-	if(countitem(7337))goto s_HellionEye;

-	specialeffect 12;

-	mes "[Sir Chilias'Tyus]";

-	mes "Darkness that writhes,";

-	mes "souls lost in the inferno,";

-	mes "I offer you comfort, I offer";

-	mes "you peace. To the despairing";

-	mes "ones, to the shameless ones,";

-	mes "I give guidance to heaven...";

-	next;

-	specialeffect 58;

-	mes "[Sir Chilias'Tyus]";

-	mes "Instead of sadness,";

-	mes "let there be joy. Instead";

-	mes "of anger, let there be";

-	mes "love. Souls that are";

-	mes "lost will now find";

-	mes "their way...";

-	next;

-	specialeffect 83;

-	mes "[Sir Chilias'Tyus]";

-	mes "Light and hope...";

-	mes "Heaven and earth...";

-	mes "Cast away the darkness.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "I did it.";

-	mes "After all these";

-	mes "long years I finally did";

-	mes "it. Thanks to you help.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "Please take this";

-	mes "Nile Rose, which will";

-	mes "keep the power of the gem";

-	mes "in check. I trust that you will";

-	mes "keep its secret and protect it";

-	mes "from those motivated by greed.";

-	delitem 7332,1; //Complete Tablet

-	getitem 2658,1; //Nile Rose

-	set BaseExp,BaseExp+1000000;

-	set HELLIONQ,27;

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "Thank you, kind";

-	mes "adventurer, for bringing";

-	mes "peace to my grandfather's";

-	mes "soul and for working to";

-	mes "protect peace in our world.";

-	mes "You are the truest of heroes.";

-	close;

-

-s_HellionEye:

-	mes "[Sir Chilias'Tyus]";

-	mes "But your eyes...";

-	mes "They seem so tired";

-	mes "and I can sense some";

-	mes "sort of pain from them.";

-	mes "Did something happen?";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "I learned the secret of";

-	mes "the Hellion's gem. It...";

-	mes "It turns people into";

-	mes "Hellion Revenants.";

-	mes "it's what happened";

-	mes "to your grandfather...";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "What...";

-	mes "What did you just say?";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "The tablet had a map that";

-	mes "let me to the chamber where";

-	mes "your grandfather locked himself";

-	mes "up before he completed turning";

-	mes "into the Hellion Revenant.";

-	mes "It was horrible...";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "At the entrance, he";

-	mes "left a message that said";

-	mes "that he wanted to be killed.";

-	mes "So that he could finally join";

-	mes "his friends instead of living";

-	mes "as a monster. So I... So I...";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "It's okay. I know you";

-	mes "did the right thing. It's";

-	mes "what my grandfather";

-	mes "would have wanted most.";

-	mes "Thank you for finally freeing";

-	mes "his soul and giving him peace.";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Here, I think you";

-	mes "should have this Eye";

-	mes "of Hellion, in case you";

-	mes "wanted a memento of";

-	mes "your dear grandfather.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "I'd appreciate that.";

-	mes "Grandfather's eye...";

-	mes "It's full of the painful";

-	mes "experiences of the people";

-	mes "who were turned into Hellion";

-	mes "Revenants against their will.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "But... Now is not the";

-	mes "time for sentiment. For";

-	mes "sake of my grandfather,";

-	mes "I must seal the power of";

-	mes "the Hellion's gem now!";

-	next;

-	specialeffect 12;

-	mes "[Sir Chilias'Tyus]";

-	mes "Darkness that writhes,";

-	mes "souls lost in the inferno,";

-	mes "I offer you comfort, I offer";

-	mes "you peace. To the despairing";

-	mes "ones, to the shameless ones,";

-	mes "I give guidance to heaven...";

-	next;

-	specialeffect 58;

-	mes "[Sir Chilias'Tyus]";

-	mes "Instead of sadness,";

-	mes "let there be joy. Instead";

-	mes "of anger, let there be";

-	mes "love. Souls that are";

-	mes "lost will now find";

-	mes "their way...";

-	next;

-	specialeffect 83;

-	mes "[Sir Chilias'Tyus]";

-	mes "Light and hope...";

-	mes "Heaven and earth...";

-	mes "Cast away the darkness.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "I did it.";

-	mes "After all these";

-	mes "long years I finally did";

-	mes "it. Thanks to you help.";

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "Please take this";

-	mes "Nile Rose, which will";

-	mes "keep the power of the gem";

-	mes "in check. I trust that you will";

-	mes "keep its secret and protect it";

-	mes "from those motivated by greed.";

-	delitem 7332,1; //Complete Tablet

-	delitem 7337,1; //Eye of Hellion

-	getitem 2658,1; //Nile Rose

-	getitem 603,1; //Old Blue Box

-	set BaseExp,BaseExp+1200000;

-	set HELLIONQ,27;

-	next;

-	mes "[Sir Chilias'Tyus]";

-	mes "Thank you, kind";

-	mes "adventurer, for bringing";

-	mes "peace to my grandfather's";

-	mes "soul and for working to";

-	mes "protect peace in our world.";

-	mes "You are the truest of heroes.";

-	next;

-	mes "^3151FFYou have received the";

-	mes "Nile Rose in which the";

-	mes "Hellion's gem is sealed.";

-	mes "The Eye of the Hellion has";

-	mes "granted you some experience";

-	mes "through its strange powers.";

-	close;

-

-s_Last:

-	mes "[Sir Chilias'Tyus]";

-	mes "Long time no see. So, are you doing";

-	mes "well to keep the promise with me?";

-	mes "Please handle it with care";

-	mes "to prevent the evil power within";

-	mes "from being released.";

-	close;

-

-OnTouch:

-	if(HELLIONQ != 18)end;

-	specialeffect 313;

-	specialeffect2 313;

-	mes "^3151FFOne of the Table Pieces";

-	mes "that you have is beginning to";

-	mes "shine with light, as if it were";

-	mes "responding to something...";

-	close;

-

-}

-

-gef_fild09.gat,296,59,1	script	Hidden Cave#HellionCave	111,{

-

-	if(!countitem(7332))goto s_NoTablet;

-	mes "^3151FFAmongst the wild bushes";

-	mes "and overgrown grass, you";

-	mes "see a large rock slab that";

-	mes "resembles a door. As you";

-	mes "come closer, you can see a";

-	mes "groove on the rock's surface.";

-	next;

-	menu "Insert the Tablet.",s_Insert,"Ignore",-;

-

-	mes "^3151FFYou do nothing.";

-	mes "And nothing happens.";

-	close;

-

-s_Insert:

-	mes "^3151FFYou insert the tablet into";

-	mes "the rock's groove and the";

-	mes "Hellion's gem begins to hum";

-	mes "and glow. The rock slides open,";

-	mes "revealing an engraved message";

-	mes "on the ground for you to read.";

-	next;

-	mes "^7151FF\"To you who have found this";

-	mes "place, I reveal the truth about";

-	mes "the Hellion Revenant. It was";

-	mes "never a devil, like we";

-	mes "believed, but a human being";

-	mes "slowly corrupted by the";

-	mes "darkness of the Hellion's";

-	mes "gem.\"";

-	next;

-	mes "^7151FF\"I learned this horrible";

-	mes "truth too late. Already,";

-	mes "I can feel the darkness";

-	mes "welling up within me.";

-	mes "It is all I can do to trap";

-	mes "myself in this chamber";

-	mes "before I lose all reason.\"";

-	next;

-	mes "^7151FF\"I failed an it's too";

-	mes "late for me, but I hope";

-	mes "someone in the future";

-	mes "can seal the Hellion gem's";

-	mes "dark power. And I hope that";

-	mes "someone will grant me the";

-	mes "sweet release I crave...\"";

-	next;

-	mes "^7151FF\"Brave hero, I beg of";

-	mes "you. Please kill me and";

-	mes "bring salvation to my soul.";

-	mes "Please release me so that";

-	mes "I can finally join my friends.\"";

-	mes " ";

-	mes "                       -Tyus";

-	close2;

-	warp "gef_dun03.gat",140,119;

-	end;

-

-s_NoTablet:

-	mes "^3151FFAmongst the wild bushes";

-	mes "and overgrown grass, you";

-	mes "see a large rock slab that";

-	mes "resembles a door. But it";

-	mes "seems it is sealed by a";

-	mes "strong force so you're";

-	mes "unable to open it.";

-	close;

-

-}

+//===== eAthena Script =======================================
+//= The Eye of Hellion Quest.
+//===== By: ==================================================
+//= MasterOfMuppets
+//===== Current Version: =====================================
+//= 1.0
+//===== Compatible With: =====================================
+//= eAthena SVN 3422+(Requires jA Script System)
+//===== Description: =========================================
+//= Quest for getting a Nile Rose
+//===== Comments: ============================================
+//=
+//===== Additional Comments: =================================
+//= 1.0 First version [MasterOfMuppets]
+//============================================================
+
+geffen.gat,110,200,3	script	Sage Welshyun	754,2,2,{
+
+	if(HELLIONQ > 25)goto s_Last;
+	if(HELLIONQ > 18)goto s_Switches;
+	mes "[Welshyun]";
+	mes "Hm? Oh, pardon me.";
+	mes "I didn't notice you. I was";
+	mes "far too occupied thinking";
+	mes "deep important thoughts";
+	mes "that your puny little mind";
+	mes "couldn't possible fathom.";
+	close;
+
+s_Last:
+	mes "[Welshyun]";
+	mes "So, were you able";
+	mes "to deliver the tablet";
+	mes "and the Hellion's gem to";
+	mes "Chilias safely? Ah, and";
+	mes "how has my friend been?";
+	close;
+
+s_Switches:
+	switch(HELLIONQ)
+	{
+
+	case 19:
+		if(HELLIONQ3)goto s_Thirsty;
+		specialeffect 313;
+		specialeffect2 313;
+		mes "[Welshyun]";
+		mes "That...";
+		mes "That eerie glow...";
+		next;
+		mes "[Welshyun]";
+		mes "You! Identify yourself";
+		mes "and explain how you came";
+		mes "about to get those tablet";
+		mes "pieces! Now answer me!";
+		next;
+		mes "[Welshyun]";
+		mes "Ah, forgive me. You're";
+		mes "helping Chilias, are you?";
+		mes "I see. So you must be here";
+		mes "to seek my help in finding";
+		mes "the final piece, am I correct?";
+		next;
+		menu "Shut up, I know you have it, so give it!",s_Shut,"Yes, please help me.",-;
+
+		mes "[Welshyun]";
+		mes "Ah, yes... I shall help";
+		mes "you get the final tablet";
+		mes "piece, but first you'll have";
+		mes "to do a favor for me.";
+		next;
+		mes "[Welshyun]";
+		mes "My student in the Geffen";
+		mes "Tower has not reported back to";
+		mes "about his research project,";
+		mes "so I would like for you to find";
+		mes "him and retrieve the report";
+		mes "for me. Not a big deal, right?";
+		next;
+		mes "[Welshyun]";
+		mes "The title of his report";
+		mes "should be, \"^7151FFMonster Life";
+		mes "in the Geffen Area^000000\", so";
+		mes "please remember that.";
+		mes "Ah, and my student's";
+		mes "name is Enoz.";
+		set HELLIONQ,20;
+		close;
+
+	s_Shut:
+		mes "[Welshyun]";
+		mes "Such insolence!";
+		mes "Huh. I suppose Chilias";
+		mes "may have misjudged you";
+		mes "when he entrusted you with";
+		mes "this important mission. Huh.";
+		mes "A reevaluation is in order...";
+		set HELLIONQ3,1;
+		close;
+
+	s_Thirsty:
+		if(countitem(504))goto s_Thirsty2;
+		mes "[Welshyun]";
+		mes "^111111*Ahem*^000000 Oh dear me...";
+		mes "I'm unfathombly thirsty...";
+		mes "There's no way I can do any";
+		mes "serious thinking with such";
+		mes "a dry, parched throat...";
+		close;
+
+	s_Thirsty2:
+		mes "[Welshyun]";
+		mes "Oh, a White Potion?";
+		mes "Yes, may I please have";
+		mes "one? Ahh, most refreshing~";
+		mes "You may not be such a bad";
+		mes "person after all! Now";
+		mes "Shall I help you find";
+		mes "that tablet piece?";
+		next;
+		mes "[Welshyun]";
+		mes "Of course, in the";
+		mes "interest of mankind,";
+		mes "I shall help you. But first,";
+		mes "I have a favor to ask of you.";
+		next;
+		mes "[Welshyun]";
+		mes "My student in the Geffen";
+		mes "Tower has not reported back to";
+		mes "about his research project,";
+		mes "so I would like for you to find";
+		mes "him and retrieve the report";
+		mes "for me. Not a big deal, right?";
+		next;
+		mes "[Welshyun]";
+		mes "The title of his report";
+		mes "should be, \"^7151FFMonster Life";
+		mes "in the Geffen Area^000000\", so";
+		mes "please remember that.";
+		mes "Ah, and my student's";
+		mes "name is Enoz.";
+		delitem 504,1; //White potion
+		set HELLIONQ3,0;
+		set HELLIONQ,20;
+		close;
+	break;
+
+	case 20:
+		mes "[Welshyun]";
+		mes "Please bring me the";
+		mes "report entitled, \"^7151FFMonster Life";
+		mes "in the Geffen Area^000000\",";
+		mes "from my student Enoz in";
+		mes "the Geffen Tower. Thank";
+		mes "you, I appreciate your help.";
+		close;
+	break;
+
+	case 21:
+		mes "[Welshyun]";
+		mes "Hm? What's that strange";
+		mes "expression on your face?";
+		mes "Prank? Oh please. Such";
+		mes "chicanery is beneath me...";
+		mes "But even if I did play a";
+		mes "joke, believe me. It";
+		mes "builds character.";
+		next;
+		mes "[Welshyun]";
+		mes "First and foremost,";
+		mes "I want yo test you to see";
+		mes "if you are worthy of this";
+		mes "tablet piece. I want to see";
+		mes "for myself if you are a person";
+		mes "of honor. Someone of character.";
+		next;
+		mes "[Welshyun]";
+		mes "Oh yes, I accidentally";
+		mes "took this Master Science";
+		mes "Reference Book from Enoz,";
+		mes "so would you please return it";
+		mes "to him for me? Oh, and please";
+		mes "bring back 1 Blue Gemstone.";
+		next;
+		mes "^3151FFYou received the";
+		mes "incredibly heavy tome,";
+		mes "the the Master Science";
+		mes "Reference Book.";
+		set HELLIONQ,22;
+		close;
+	break;
+
+	case 22:
+		mes "[Welshyun]";
+		mes "Please deliver the Master";
+		mes "Science Reference Book to";
+		mes "Enoz, and come back to me";
+		mes "with 1 Blue Gemstone.";
+		close;
+	break;
+
+	case 23:
+		if(!countitem(717))goto s_NoGem;
+		mes "[Welshyun]";
+		mes "Thank you. You've";
+		mes "brought the book to Enoz";
+		mes "and delivered a Gemstone";
+		mes "to me as I've asked. Now,";
+		mes "there is one final test...";
+		next;
+		mes "[Welshyun]";
+		mes "Answer this question.";
+		mes "Where is the abode of the";
+		mes "departed souls with a shining";
+		mes "silver roof that is mentioned";
+		mes "in the third part of the ballad";
+		mes "of Grimnir? Well, adventurer?";
+		next;
+		input @str$;
+		if(@str$ != "Valaskjalf")goto s_WrongStr;
+		mes "[Welshyun]";
+		mes "Ah, well met, well met.";
+		mes "You are as well learned as";
+		mes "you are brave. As promised,";
+		mes "you may have this piece of";
+		mes "the tablet, which I've";
+		mes "already found. The clues";
+		mes "were too simple...";
+		set HELLIONQ,24;
+		delitem 717,1; //Blue gemstone
+		getitem 7336,1, //Geffen Tablet
+		next;
+		mes "[Welshyun]";
+		mes "Please send my regards";
+		mes "to my dear friend, Chilias,";
+		mes "who has dedicated his life";
+		mes "to sealing the evil within";
+		mes "the Hellion's gem.";
+		close;
+
+	s_WrongStr:
+		mes "[Welshyun]";
+		mes "Bwahahaah! Only";
+		mes " a superior mind could";
+		mes "know the answer to such";
+		mes "a question! Go forth and";
+		mes "learn the answer, else";
+		mes "I cannot help you, adventurer~";
+		close;
+
+	s_NoGem:
+		mes "[Welshyun]";
+		mes "Ah, I've heard that";
+		mes "Enoz received the Master";
+		mes "Science Reference Book";
+		mes "from you. But did you remember";
+		mes "to bring me a Blue Gemstone?";
+		close;
+	break;
+
+	case 24:
+		mes "[Welshyun]";
+		mes "Hm. You should visit";
+		mes "Chilias and determine";
+		mes "your next course of action,";
+		mes "now that you have all four";
+		mes "of the pieces of the tablet.";
+		close;
+	break;
+
+	case 25:
+		mes "[Welshyun]";
+		mes "Hm? Did you need";
+		mes "me to combine all four";
+		mes "pieces of the tabled and";
+		mes "make it whole again? Oh.";
+		mes "All this time I thought you";
+		mes "knew how to do it. Alright.";
+		next;
+		mes "[Welshyun]";
+		mes "As a matter of fact,";
+		mes "I was planning on using";
+		mes "the Blue Gemstone you gave";
+		mes "me to do this. But since you";
+		mes "never really asked... In any";
+		mes "case, let me concentrate.";
+		next;
+		specialeffect 54;
+		mes "[Welshyun]";
+		mes "Shadows remembered by time.";
+		mes "Help me retrieve the forgotten";
+		mes "stories that have been";
+		mes "scattered in the wind.";
+		mes "Right here. Right now.";
+		next;
+		specialeffect 72;
+		mes "[Welshyun]";
+		mes "...";
+		mes "Okay...";
+		mes "That was tough.";
+		next;
+		mes "[Welshyun]";
+		mes "Here's the";
+		mes "complete tablet.";
+		mes "Please bring this";
+		mes "safely back to Chilias.";
+		getitem 7332,1; //Complete Tablet
+		delitem 7333,1; //Prontera Tablet
+		delitem 7334,1; //Payon Tablet
+		delitem 7335,1; //Morroc Tablet
+		delitem 7336,1; //Geffen Tablet
+		set HELLIONQ,26;
+		next;
+		mes "[Welshyun]";
+		mes "Wait, take a look!";
+		mes "There's a map on the back";
+		mes "of the tablet. Although the gem";
+		mes "is already embedded within the";
+		mes "tablet, who knows where this";
+		mes "map may lead? Perhaps";
+		mes "Hellion Revenant?";
+		next;
+		mes "[Welshyun]";
+		mes "I don't know if Chilias";
+		mes "told you, but the name of";
+		mes "the monster that guards and";
+		mes "follows this gem is Hellion";
+		mes "Revenant. But why mark its";
+		mes "location on this tablet?";
+		next;
+		mes "[Welshyun]";
+		mes "Well, it will be dangerous, but";
+		mes "I'm sure that you're strong enough";
+		mes "to confront this monster. I";
+		mes "believe it was the wish of this";
+		mes "tablet's creator for someone";
+		mes "to defeat the Hellion Revenant.";
+		next;
+		menu "Alright I'll do it!",s_DoIt,"I better get this tablet to Chilias...",-;
+
+		mes "[Welshyun]";
+		mes "Yes, that's true.";
+		mes "Chilias has been waiting";
+		mes "his whole life to seal this";
+		mes "gem. Plus, who knows what";
+		mes "may happen while it is in";
+		mes "your possession?";
+		set HELLIONQ,26;
+		close;
+
+	s_DoIt:
+		mes "[Welshyun]";
+		mes "Well, I'm almost certain";
+		mes "this map will lead you to";
+		mes "Hellion Revenant. Let me";
+		mes "warp you to the location";
+		mes "marked on the tablet's map...";
+		close2;
+		warp "gef_fild09.gat",368,88;
+		set HELLIONQ,26;
+		end;
+	break;
+
+	}
+
+OnTouch:
+	if(HELLIONQ != 19)end;
+	specialeffect 313;
+	specialeffect2 313;
+	mes "^3151FFThe piece of tablet";
+	mes "that you have is shining";
+	mes "with light as if in response";
+	mes "to something in the area.";
+	close;
+
+}
+
+prontera.gat,269,326,3	script	Clanux Heffron	50,{
+
+	if(HELLIONQ > 7)goto s_Last;
+	if(HELLIONQ)goto s_Switches;
+	mes "[Clanux Heffron]";
+	mes "What's wrong with";
+	mes "this map?! I can't";
+	mes "find a blasted thing";
+	mes "on it! How can finding";
+	mes "something be so hard?";
+	close;
+
+s_Last:
+	mes "[Clanux Heffron]";
+	mes "Oh hey, it's you.";
+	mes "Listen I got this number";
+	mes "pad to pop out of that old";
+	mes "machine in the Tool Shop,";
+	mes "I still don't know what the";
+	mes "password for it might be.";
+	next;
+	mes "[Clanux Heffron]";
+	mes "If I couldn't figure";
+	mes "it out, and I understand";
+	mes "if you couldn't figure this";
+	mes "out, then this puzzle must";
+	mes "be freakin' impossible!";
+	close;
+
+s_Switches:
+	switch(HELLIONQ)
+	{
+
+	case 1:
+		if(HELLIONQ2)goto s_Bother;
+		mes "[" + strcharinfo(0) + "]";
+		mes "Excuse me, but are";
+		mes "you Clanux Heffron?";
+		next;
+		mes "[Clanux Heffron]";
+		mes "Why, who are you";
+		mes "and what the heck";
+		mes "do you want? Oh...";
+		mes "Sent by Chilias, eh?";
+		mes "What does he want?";
+		next;
+		menu "He wants me to help you",s_You,"He wants you to help me.",-;
+
+		mes "[Clanux Heffron]";
+		mes "Help you...? What, with";
+		mes "clues to the location of";
+		mes "the Hellion's gem? Screw";
+		mes "that, pal! Why should I help";
+		mes "you if we're gonna compete";
+		mes "for the same prize?!";
+		set HELLIONQ2,1;
+		close;
+
+	s_Bother:
+		mes "[Clanux Heffron]";
+		mes "Hey, why do you keep";
+		mes "botherin' me?! Go and";
+		mes "find your own clues for the";
+		mes "Hellion's gem on your own,";
+		mes "jerkface! Now getouttahere!";
+		next;
+		menu "W-what! Let's work together!",s_Work,"Fine. I don't need your help!",-;
+
+		mes "[" + strcharinfo(0) + "]";
+		mes "Fine.";
+		mes "I don't need";
+		mes "your help!";
+		next;
+		mes "[Clanux Heffron]";
+		mes "Yeah right!";
+		mes "You'll be back!";
+		mes "...They always";
+		mes "come back.";
+		close;
+
+	s_Work:
+		mes "[Clanux Heffron]";
+		mes "Work together, eh? You";
+		mes "know, normally I'd tell you";
+		mes "to make like a moonwalker";
+		mes "and just beat it, but I gotta";
+		mes "admit that I ain't doin' so";
+		mes "good on my own on this...";
+		next;
+		mes "[Clanux Heffron]";
+		mes "Alright, fine.";
+		mes "First, look through the";
+		mes "old Swordman Training";
+		mes "Grounds here in Prontera.";
+		mes "There might be some clues";
+		mes "left over there for you to";
+		mes "find.";
+		set HELLIONQ2,0;
+		set HELLIONQ,2;
+		close;
+
+	s_You:
+		mes "[Clanux Heffron]";
+		mes "So he sent me an";
+		mes "assistant, huh? Well...";
+		mes "Seeing as he gave me this";
+		mes "clue and I've taken so long";
+		mes "and still don't have anything";
+		mes "to show for it, I don't blame him.";
+		next;
+		mes "[Clanux Heffron]";
+		mes "Well, if he sent you to";
+		mes "help me out, I guess I can";
+		mes "tell you everything. For the";
+		mes "clues he had me look for,";
+		mes "I've only found two so far.";
+		mes "But I can't figure them out...";
+		next;
+		mes "[Clanux Heffron]";
+		mes "Let's see, there's this";
+		mes "broken sword and this";
+		mes "strange lookin' cogwheel.";
+		mes "What do these clues mean?!";
+		mes "Did the old man give you";
+		mes "any hints to help me out?";
+		next;
+		menu "Where did you find these?",-,"No I'm sorry.",s_Sorry;
+		//Custom dialog
+		mes "[Clanux Heffron]";
+		mes "I found them next to a";
+		mes "broken training dummy";
+		mes "in the old Swordman";
+		mes "Training Grounds here";
+		mes "in Prontera.";
+		next;
+		mes "[Clanux Heffron]";
+		mes "Why don't you go search";
+		mes "the old Swordman Training";
+		mes "Grounds for clues? I might";
+		mes "have missed something...";
+		mes "Not that I think so, but";
+		mes "just in case!";
+		set HELLIONQ,2;
+		close;
+
+s_Sorry:
+		mes "[Clanux Heffron]";
+		mes "Wha--? Then why are";
+		mes "you even here to help";
+		mes "me then? Huh. That old";
+		mes "coot must not trust me";
+		mes "enough, but I can't exactly";
+		mes "blame him. Alright then...";
+		next;
+		mes "[Clanux Heffron]";
+		mes "If you're gonna help me,";
+		mes "go search the old Swordman";
+		mes "Training Grounds over here in";
+		mes "Prontera. I doubt it, but there's";
+		mes "a chance I mighta missed";
+		mes "something there. Get to it!";
+		set HELLIONQ,2;
+		close;
+	break;
+
+	case 2:
+		mes "[Clanux Heffron]";
+		mes "Look pal, I found this broken";
+		mes "sword, a bonafide clue if I";
+		mes "ever saw one, in the old";
+		mes "Swordman Training Grounds in";
+		mes "Prontera. You should be able to";
+		mes "find something else there, maybe.";
+		close;
+	break;
+
+	case 3:
+		mes "[Clanux Heffron]";
+		mes "Hey, you're done";
+		mes "searching? Were you";
+		mes "able to find anything?";
+		next;
+		menu "Nothing...",s_Nothing,"In fact, I found this.",-;
+
+		mes "[Clanux Heffron]";
+		mes "Wha--? I had no idea";
+		mes "that sort of thing could";
+		mes "be hidden in that training";
+		mes "ground. I missed it. Oh,";
+		mes "so the Veggie Lady gave you a";
+		mes "password and all?";
+		next;
+		mes "[Clanux Heffron]";
+		mes "Huh, I can't make heads";
+		mes "or tails of that password.";
+		mes "I guess I have no choice but";
+		mes "to give you this, the";
+		mes "cogwheel clue I found";
+		mes "from the Tool Shop.";
+		next;
+		mes "[Clanux Heffron]";
+		mes "I mean, you've been lucky";
+		mes "enough till now, so you'll";
+		mes "probably be able to stumble";
+		mes "upon the answer behind this";
+		mes "weird, weird riddle. But you";
+		mes "gotta tell me the answer too!";
+		next;
+		mes "[Clanux Heffron]";
+		mes "Alright, now take your";
+		mes "cogwheel and get outta";
+		mes "here. The sooner you get";
+		mes "that clue, the sooner I'll";
+		mes "get that Hellion's gem.";
+		set HELLIONQ,4;
+		getitem 7093,1; //Cogwheel
+		close;
+
+	s_Nothing:
+		mes "[" + strcharinfo(0) + "]";
+		mes "^111111(This guy's a real punk!";
+		mes "I better not share any new";
+		mes "information I've found, just";
+		mes "in case he doesn't already";
+		mes "know about it.)";
+		next;
+		mes "[" + strcharinfo(0) + "]";
+		mes "I... I wasn't able to";
+		mes "find anything that looked";
+		mes "like a clue. I'm sorry, but";
+		mes "I let you down big time...";
+		next;
+		mes "[Clanux Heffron]";
+		mes "Aw nuts! Alright, if you";
+		mes "go back to the old man, let";
+		mes "him know that I found a broken";
+		mes "sword from the old Swordman";
+		mes "Training Grounds and this";
+		mes "cogwheel from the Tool Shop.";
+		next;
+		mes "[Clanux Heffron]";
+		mes "The clues I've found so";
+		mes "far don't make any sense!";
+		mes "So if you can, convince him to";
+		mes "drop me a couple more hints.";
+		mes "And give this to the old guy";
+		mes "to prove I found it, will you?";
+		next;
+		mes "[Clanux Heffron]";
+		mes "That's all I know.";
+		mes "At this point you're";
+		mes "probably better off";
+		mes "searching for these";
+		mes "clues on your own...";
+		getitem 7093,1; //Cogwheel
+		set HELLIONQ,4;
+		close;
+	break;
+
+	case 4:
+	case 5:
+	case 6:
+		mes "[Clanux Heffron]";
+		mes "Hey... Didn't I tell";
+		mes "you to check out the";
+		mes "Tool Shop in case there";
+		mes "was anything I missed?";
+		mes "Now go! That's an order!";
+		close;
+	break;
+
+	case 7:
+		mes "[Clanux Heffron]";
+		mes "Hey, so you have";
+		mes "anything new to report?";
+		mes "Oh, and did you learn";
+		mes "anything from that weird";
+		mes "maching in the Tool Shop?";
+		next;
+		menu "Tell him just a little bit.",s_Bit,"Don't tell him",-;
+
+	s_Bit:
+		mes "[" + strcharinfo(0) + "]";
+		mes "Well, I put that cogwheel";
+		mes "into that weird machine in";
+		mes "the Tool Shop and some kind";
+		mes "of number pad came out. Then...";
+		next;
+		mes "[" + strcharinfo(0) + "]";
+		mes "^111111(Wait, I can't trust this";
+		mes "guy!)^000000 I put in every single";
+		mes "password that I could think";
+		mes "of, but nothing happened!";
+		mes "I think I'm stuck...";
+		next;
+		mes "[Clanux Heffron]";
+		mes "Oh yeah? Hah! Well, now";
+		mes "that the easy part is";
+		mes "done, I'll just figure out";
+		mes "that secret password";
+		mes "myself! Hahahah! That Hellion's";
+		mes "gem is as good as mine!";
+		set HELLIONQ,8;
+		close;
+	break;
+
+	}
+
+}
+
+prontera.gat,224,84,1	script	Training Dummy#HellionDummy	111,{
+
+	if(HELLIONQ == 2)goto s_Hellion;
+	mes "^3151FFIt's a training dummy";
+	mes "that was used to hone the";
+	mes "skills of new Swordmen...";
+	mes "But the Swordman Training";
+	mes "Grounds have moved to Izlude.";
+	close;
+
+s_Hellion:
+	mes "^3151FFIt's a training dummy";
+	mes "with a gash in its body";
+	mes "that looks like it was made";
+	mes "by the thrust of a sharp sword.";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Didn't Clanux mention that he";
+	mes "found a broken sword around";
+	mes "here? Maybe this was exactly";
+	mes "where he found it. Let's see...";
+	next;
+	menu "Inspect the dummy's gash",-;
+
+	mes "^3151FFInside of the dummy's body is";
+	mes "a steel bearing with a roughly";
+	mes "etched message that reads:";
+	mes "^7151FF\"Veggie Lady N9 W3 BINGO.\"";
+	next;
+
+	mes "[" + strcharinfo(0) + "]";
+	mes "What the heck does this";
+	mes "even mean? A Veggie Lady?";
+	mes "Does Clanux know anything";
+	mes "at all about this clue...?";
+	set HELLIONQ,3;
+	close;
+
+}
+
+prt_in.gat,128,79,0	script	Unknown Machine#HellionMchn	111,{
+	if(HELLIONQ == 6)goto s_Input2;
+	if(HELLIONQ == 5)goto s_Input;
+	mes "^3151FFIt's some sort of";
+	mes "strange looking machine";
+	mes "with a mysterious purpose.";
+	close;
+
+s_Input:
+	mes "^3151FFIt's a weird looking";
+	mes "machine that looks like";
+	mes "it hasn't been used in a";
+	mes "while. It looks like the";
+	mes "cogwheel that you have";
+	mes "would fit perfectly in it...";
+	next;
+	menu "Insert Cogwheel",s_Insert,"Ignore it.",-;
+
+	mes "[" + strcharinfo(0) + "]";
+	mes "Eh...";
+	mes "Forget it.";
+	close;
+
+s_Insert:
+	if(!countitem(7093))goto s_NoCog;
+	mes "[" + strcharinfo(0) + "]";
+	mes "I just know this";
+	mes "cogwheel will fit";
+	mes "into this machine!";
+	mes "What I don't know is";
+	mes "what will happen once";
+	mes "this machine works...";
+	next;
+	mes "^3151FF*Click...!*";
+	mes "Once the cogwheel is";
+	mes "fit into the machine and";
+	mes "turned, the device hums";
+	mes "to life and a panel opens,";
+	mes "revealing a numeric keypad.";
+	delitem 7093,1; //Cogwheel
+	set HELLIONQ,6;
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "I guess that I've got";
+	mes "to input some kind of";
+	mes "numeric password...";
+	mes "Ah, right, the numbers";
+	mes "that Veggie Lady gave me!";
+	next;
+	input @temp;
+	if(@temp != 16754213)goto s_FailInp;
+s_CorrectInput:
+	mes "^3151FFThe machine responds to";
+	mes "the password with a pleasant";
+	mes "chime, confirming that you've";
+	mes "input the correct numbers.";
+	mes "The keypad slides open to";
+	mes "reveal a piece of a tablet.";
+	getitem 7333,1; //Prontera Tablet
+	set HELLIONQ,7;
+	next;
+	mes "^3151FFThe message engraved on";
+	mes "this table reads: \"This is for";
+	mes "Christopher, my dear friend who";
+	mes "I met in Prontera. To the one";
+	mes "who finds this, please seek";
+	mes "out the next piece of this tablet";
+	mes "in the city of thickest forest.\"";
+	next;
+	mes "^3151FFThe message is signed";
+	mes "by someone named Tyus.";
+	mes "It would be best to bring";
+	mes "this back to Sir Chilia'Tyus";
+	mes "and confirm that this was";
+	mes "made by his grandfater...";
+	close;
+
+s_Input2:
+	mes "[" + strcharinfo(0) + "]";
+	mes "Okay, let me see";
+	mes "if I can enter the";
+	mes "right number this time...";
+	next;
+	input @temp;
+	if(@temp == 16754213)goto s_CorrectInput;
+
+s_FailInp:
+	mes "^3151FFThe machine responds to";
+	mes "the passwords with an abrupt,";
+	mes "screeching beep and the entire";
+	mes "machine shuts down. You'll";
+	mes "have to try entering the";
+	mes "password again.";
+	close;
+
+s_NoCog:
+	mes "[" + strcharinfo(0) + "]";
+	mes "Hmm, I can't find the";
+	mes "cogwheel, now where did";
+	mes "I put it?";
+	close;
+
+}
+
+prontera.gat,45,67,1	script	#HellionActivator	139,0,0,{
+OnTouch:
+	if(HELLIONQ != 4)end;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Well, according to the";
+	mes "message in that old training";
+	mes "dummy, this is where I'm";
+	mes "supposed to go. Nine steps";
+	mes "north, 3 steps west. And now...";
+	mes "Veggie Lady. Okay, okay...";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Huh. That's creepy.";
+	mes "There's one right there";
+	mes "staring at me. But after";
+	mes "the words \"Veggie Lady\"";
+	mes "all the message says is, um,";
+	mes "what was that last word again?";
+	next;
+	input @tempstr$;
+	if(@tempstr$ != "BINGO")goto s_Failstr;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Of course!";
+	mes "\"BINGO!\" But";
+	mes "I don't see a hall";
+	mes "full of old people";
+	mes "around here, I--";
+	next;
+	mes "[Veggie Lady]";
+	mes "Finall, you say it.";
+	mes "Yessh, I thought I was";
+	mes "going to wait forever for";
+	mes "somebody to say that";
+	mes "password. Okay, here's";
+	mes "the code number you want...";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "C-code number?";
+	mes "Wait, wh-what...?";
+	next;
+	mes "[Veggie Lady]";
+	mes "Awww...I don't know!";
+	mes "I'm only gonna say it";
+	mes "now: ^7151FF16754213^000000. One";
+	mes "more time, in case you";
+	mes "didn't get it: ^7151FF16754213^000000.";
+	mes "Don't forget it, adventurer.";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Wait... What does";
+	mes "this all mean? Won't";
+	mes "you tell me more?";
+	next;
+	mes "[Veggie Lady]";
+	mes "No. I've been given";
+	mes "explicit instructions";
+	mes "to not tell you more.";
+	mes "In face, I hate talking.";
+	mes "That's why I sell vegetables.";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Holy cow...";
+	mes "This is all";
+	mes "really cloak and";
+	mes "dagger type stuff!"; 
+	set HELLIONQ,5;
+	close;
+
+s_Failstr:
+	mes "[" + strcharinfo(0) + "]";
+	mes @tempstr$;
+	mes "Hmmm. No, no that couldn't";
+	mes "be it. What in the world was";
+	mes "that word and why can't I";
+	mes "remember it when I seemingly";
+	mes "need it most?";
+	close;
+
+}
+
+payon.gat,182,132,3	script	Grout'he Tuccok	48,{
+
+	if(HELLIONQ > 17)goto s_Final;
+	if(HELLIONQ > 8)goto s_Switches;
+	mes "[Grout'he]";
+	mes "Hey...";
+	mes "Hey you!";
+	mes "What are you";
+	mes "looking at?!";
+	mes "Get outta my";
+	mes "face, ya jerkward.";
+	close;
+
+s_Final:
+	mes "[Grout'he]";
+	mes "Hey, this is great!";
+	mes "you actually found the";
+	mes "next piece of the tablet!";
+	mes "You better take this back";
+	mes "to Chilias'Tyus right now~";
+	next;
+	mes "[Grout'he]";
+	mes "Oh. And um, thanks";
+	mes "for being willing to pay";
+	mes "me in cash for all those";
+	mes "little bitty clues. I won't";
+	mes "forget your help, pal~";
+	close;
+
+s_Switches:
+	switch(HELLIONQ)
+	{
+
+	case 9:
+		mes "[Grout'he]";
+		mes "What...?";
+		mes "You got something";
+		mes "to tell me or are you";
+		mes "just bein' a rude prick";
+		mes "and starting at me like";
+		mes "this is your turf?!";
+		next;
+		mes "[" + strcharinfo(0) + "]";
+		mes "I'm sorry, but well...";
+		mes "Chilias'Tyus told me that";
+		mes "you might know something";
+		mes "about a piece of a table--";
+		next;
+		mes "[Grout'he]";
+		mes "What? Oh, so Chilias'Tyus";
+		mes "is lookin for the gem too eh?";
+		mes "Ooh, that's right. He wants to";
+		mes "seal its evil or something.";
+		mes "Yeah, yeah. That's a good";
+		mes "cause. Real noble and all...";
+		next;
+		mes "[Grout'he]";
+		mes "I'll tell you what. The only reason";
+		mes "I want that gem is to sell it";
+		mes "so I can pay off ally my debts.";
+		mes "But if I sell you the clues I found,";
+		mes "I'll get the zeny I need and the";
+		mes "gem will be in good hands too.";
+		next;
+		mes "[Grout'he]";
+		mes "So what do you say?";
+		mes "It's not a bad deal if";
+		mes "you think about it and";
+		mes "we might as well kill";
+		mes "two birds with one stone...";
+		next;
+		menu "Alright, I'll buy your clues.",s_Buy,"Why the hell should I pay you?!",-;
+
+		mes "[Grout'he]";
+		mes "Why the hell should you";
+		mes "pay me?! Hey, aren't you";
+		mes "looking for the gem to help";
+		mes "the world? Well, I happen to";
+		mes "be a little part of this world,";
+		mes "so why don't you help me first?";
+		next;
+		mes "[Grout'he]";
+		mes "Man, you might not";
+		mes "know it, but the money";
+		mes "you give me will save";
+		mes "a life. My own! Dude, how";
+		mes "can you be so insensitive?";
+		close;
+
+	s_Buy:
+		mes "[Grout'he]";
+		mes "Oh man, thanks a lot.";
+		mes "Alright, all I'm asking";
+		mes "for is 10,000 zeny. You get";
+		mes "my clues and I'll let you know";
+		mes "where I found 'em, in case";
+		mes "you can find something new.";
+		next;
+		if(Zeny < 10000)goto s_NoZeny;
+		set Zeny,Zeny-10000;
+		mes "[Grout'he]";
+		mes "There you go!";
+		mes "Thanks for the cash~";
+		mes "(Know I won't have to";
+		mes "get my knees all broken!)";
+		mes "Oh, and let me makr your";
+		mes "Mini-Map for you real quick...";
+		next;
+		mes "[Grout'he]";
+		mes "You see this here?";
+		mes "It's where I found the";
+		mes "Skirt of Virgin I'm about";
+		mes "to give you. So check that";
+		mes "spot out and see if you find";
+		mes "anything new and interesting.";
+		viewpoint 1,101,191,10,0xFF00FF;
+		next;
+		mes "[Grout'he]";
+		mes "Here you go, pal...";
+		mes "A Stone Heart, Green Herb,";
+		mes "some Grape Juice and one";
+		mes "clean and pure Skirt of Virgin.";
+		mes "If you got any more questions,";
+		mes "I guess you can ask me later~";
+		getitem 953,1;
+		getitem 511,1;
+		getitem 533,1;
+		getitem 1049,1;
+		set HELLIONQ,10;
+		close;
+
+	s_NoZeny:
+		mes "[Grout'he]";
+		mes "Oh hey...";
+		mes "You don't got the zeny.";
+		mes "Sorry pal, but I've really got";
+		mes "to pay my debts somehow.";
+		mes "I don't know if I'm allowed";
+		mes "to reall talk about it...";
+		mes "^111111*Sob*";
+		close;
+	break;
+
+	case 10:
+		mes "[Grout'he]";
+		mes "You see this here?";
+		mes "It's where I found the";
+		mes "Skirt of Virgin I'm about";
+		mes "to give you. So check that";
+		mes "spot out and see if you find";
+		mes "anything new and interesting.";
+		viewpoint 1,101,191,10,0xFF00FF;
+		close;
+	break;
+
+	case 11:
+		mes "[Grout'he]";
+		mes "You've been to the";
+		mes "first location? Good.";
+		mes "Okay, now look over here.";
+		mes "Check your Mini-Map to";
+		mes "see where I found that";
+		mes "Stone Heart, got it?";
+		viewpoint 1,82,109,11,0xFF00FF;
+		close;
+	break;
+
+	case 12:
+		mes "[Grout'he]";
+		mes "Alright, here's where";
+		mes "I found that Green Herb.";
+		mes "You know you can use that";
+		mes "to counter poison, right?";
+		mes "Check that place to see if";
+		mes "there's anything I missed.";
+		viewpoint 1,239,56,12,0xFF00FF;
+		close;
+	break;
+
+	case 13:
+		mes "[Grout'he]";
+		mes "Okay, here's the last";
+		mes "place you should double";
+		mes "check, the place where";
+		mes "I nabbed that Grape";
+		mes "Juice. Good luck~";
+		viewpoint 1,240,161,13,0xFF00FF;
+		close;
+	break;
+
+	case 14:
+		mes "[Grout'he]";
+		mes "Oh, you need some help";
+		mes "with figuring out the clues?";
+		mes "Heh. Alright, let's see.";
+		mes "You want me to help";
+		mes "you in making sense of";
+		mes "this weird riddle?";
+		next;
+		menu "Yes, please!",s_YesP,"No thanks~",-;
+
+		mes "[Grout'he]";
+		mes "Oh yeah?";
+		mes "Well listen, I dunno,";
+		mes "but this looks to be one";
+		mes "of those situations where";
+		mes "two heads are better than one.";
+		mes "I think we oughta team up~";
+		close;
+
+	s_YesP:
+		mes "[Grout'he]";
+		mes "Alright now. All those";
+		mes "messages said stuff about";
+		mes "one sized clothing, dried";
+		mes "fish and green herbs, wine...";
+		mes "Huh. It doesn't make sense.";
+		next;
+		mes "[" + strcharinfo(0) + "]";
+		mes "What...?";
+		mes "I could have";
+		mes "told you that!";
+		next;
+		mes "[Grout'he]";
+		mes "Wait, wait.";
+		mes "Let's mark all the";
+		mes "clue locations again";
+		mes "on your Mini-Map.";
+		mes "Okay, we've got four";
+		mes "dots around Payon.";
+		viewpoint 1,101,191,10,0xFF00FF;
+		viewpoint 1,82,109,11,0xFF00FF;
+		viewpoint 1,239,56,12,0xFF00FF;
+		viewpoint 1,240,161,13,0xFF00FF;
+		next;
+		mes "[Grout'he]";
+		mes "Alright, now if";
+		mes "I connect and interesect";
+		mes "all the lines, there's";
+		mes "a point in the middle.";
+		mes "Why don't you check";
+		mes "this middle point, eh?";
+		viewpoint 1,159,130,14,0xFF00FF;		
+		next;
+		mes "[Grout'he]";
+		mes "Now, this location";
+		mes "is a house, and I know";
+		mes "it's pretty random, but";
+		mes "it's all we got. Heck,";
+		mes "all these clues make";
+		mes "less sense than this!";
+		set HELLIONQ,15;
+		close;
+	break;
+
+	case 15:
+		mes "[Grout'he]";
+		mes "Hey, how's it goin'";
+		mes "looking for that one";
+		mes "piece of the tablet?";
+		mes "It's a lot of trouble,";
+		mes "but I guess that's the";
+		mes "case with all treasures.";
+		viewpoint 1,159,130,14,0xFF00FF;
+		close;
+	break;
+
+	case 16:
+		mes "[Grout'he]";
+		mes "Oh, so all of those";
+		mes "items came in handy?";
+		mes "I don't believe it! So";
+		mes "this puzzle actually";
+		mes "makes sense?! So";
+		mes "what'd the slab say?";
+		next;
+		mes "[Grout'he]";
+		mes "\"Compassionate one?\"";
+		mes "Oh hey, there's a giant";
+		mes "stone statue over in the";
+		mes "Archer Village that fits";
+		mes "the description perfectly!";
+		mes "You should check it out.";
+		set HELLIONQ,17;
+		close;
+	break;
+
+	case 17:
+		mes "[Grout'he]";
+		mes "Hey, you really ought";
+		mes "to check out the huge";
+		mes "stone statue over in the";
+		mes "Archer Village. Now that";
+		mes "I think about it, it's the";
+		mes "perfect hiding place!";
+		close;
+	break;
+
+	}
+
+}
+
+payon.gat,101,191,1	script	#HellionStepAct	139,1,1,{
+	if(HELLIONQ != 10)end;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Well, this is where";
+	mes "Grout'he told me to look.";
+	mes "Ooh, there's something";
+	mes "written on the ceiling. Um,";
+	mes "let's see... \"This garment";
+	mes "is one size fits all.\"";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "That's it...?";
+	mes "Hopefully this will";
+	mes "make more sense once";
+	mes "I find more clues. I hope.";
+	set HELLIONQ,11;
+	close;
+
+}
+
+payon.gat,82,109,1	script	Pile of Stones#HellionStones	111,{
+	if(HELLIONQ != 11)end;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Well, this is the place";
+	mes "that Grout'he told me about.";
+	mes "Let's see, there's an engraving";
+	mes "here that says, \"I used to";
+	mes "pray for peaceful days";
+	mes "here.\" Okay.";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Man...";
+	mes "This better not be";
+	mes "one of those puzzles";
+	mes "that looks easy once";
+	mes "I get the answer. Well,";
+	mes "if I ever get it, that is.";
+	set HELLIONQ,12;
+	close;
+
+}
+
+payon.gat,239,56,1	script	Dried Fish#HellionFish	111,{
+	if(HELLIONQ != 12)end;
+	mes "[" + strcharinfo(0) + "]";
+	mes "So... Dried fish all";
+	mes "around me. This is getting";
+	mes "to be nonsense. Let's see,";
+	mes "this message says, \"Green";
+	mes "Herbs are very useful for";
+	mes "getting rid of fish smells.\"";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "I got it...!";
+	mes "Whoever made up";
+	mes "these clues must be";
+	mes "some sort of crazy man!";
+	mes "It's the only explanation!";
+	set HELLIONQ,13;
+	close;
+
+}
+
+payon.gat,240,161,1	script	Vat#HellionVat	111,{
+	if(HELLIONQ != 13)end;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Alright, the last";
+	mes "place I have to check.";
+	mes "It's a big old vat with a";
+	mes "message here too. No";
+	mes "Let me see, there should";
+	mes "be a message here too. Ah--!";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "This says, \"What will it be?";
+	mes "Wine or Grape Juice? Oh,";
+	mes "but I much prefer wine.\" Okay,";
+	mes "what does this have to do with";
+	mes "that Hellion's gem? Weird...";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Am I missing something?";
+	mes "I think I really need help in";
+	mes "figuring this out. Hmm...";
+	set HELLIONQ,14;
+	close;
+
+}
+
+payon.gat,159,130,1	script	Wooden Floor#HellionFloor	111,{
+	if(HELLIONQ > 15)goto s_Slab;
+	if(HELLIONQ != 15)end;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Hey, the floor around";
+	mes "here doesn't seem very";
+	mes "solid. Maybe there's";
+	mes "something underneath?";
+	next;
+	menu "Just check the floor.",-,"Dig through the dust.",s_Dig;
+
+	mes "^3151FFYou examine the floor,";
+	mes "but are unable to find";
+	mes "anything that resembles";
+	mes "a clue to the location";
+	mes "of the Hellion's gem";
+	mes "or a tablet piece.";
+	close;
+
+s_Dig:
+	mes "[" + strcharinfo(0) + "]";
+	mes "Oh man, there's";
+	mes "so much dust! What";
+	mes "can I do about all of";
+	mes "this nasty dirt in the air?";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Well, there are all these";
+	mes "clues Gout'he found. I sucks";
+	mes "but I'll use this Grape Juice";
+	mes "to sort of keep this dust from";
+	mes "kicking up. And if I put my";
+	mes "morals on hold, I'll cover";
+	mes "my face...";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "...With this Skirt of Virgin.";
+	mes "Oh, and I can use this Stone";
+	mes "Heart to prop any floor boards";
+	mes "I tilt while I look undernearth";
+	mes "this floor. Oh hey! I found it!";
+	mes "It's... It's another clue!";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Wait, wait...";
+	mes "I can't read the";
+	mes "engraving on this";
+	mes "stone slab, it's way";
+	mes "too old. Let's see...";
+	next;
+	mes "^3151FFYou cover the surface";
+	mes "of the slab and begin";
+	mes "to rub a Green Herb over";
+	mes "it. Fortunately, the juice from";
+	mes "the Green Herb makes the";
+	mes "engraving appear more clearly.";
+	next;
+	mes "[Stone Engraving]";
+	mes "^7151FF\"This has been entrusted to";
+	mes "the care of the compassionate";
+	mes "one so that my friends may";
+	mes "find peace. To he who finds";
+	mes "this, remember that avarice";
+	mes "knows no bounds. --Tyus.\"";
+	set HELLIONQ,16;
+	close;
+
+s_Slab:
+	mes "[Stone Engraving]";
+	mes "^7151FF\"This has been entrusted to";
+	mes "the care of the compassionate";
+	mes "one so that my friends may";
+	mes "find peace. To he who finds";
+	mes "this, remember that avarice";
+	mes "knows no bounds. --Tyus.\"";
+	close;
+
+}
+
+pay_arche.gat,141,29,1	script	Buddha Statue#HellionStat	111,3,3,{
+	if(HELLIONQ != 17)end;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Hey, there's a huge";
+	mes "stone statue. This";
+	mes "must be what Gout'he";
+	mes "was telling me about.";
+	next;
+	mes "[Echoing Voice]";
+	mes "^7151FFYou must...";
+	mes "You must be...";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "What the--?";
+	mes "There's a voice";
+	mes "inside my head!";
+	mes "and it's not even mine!";
+	next;
+	mes "[Echoing Voice]";
+	mes "You who have come";
+	mes "for the Tablet Piece,";
+	mes "I shall judge whether";
+	mes "or not you are worthy.";
+	mes "Answer this one question.";
+	next;
+	mes "[Echoing Voice]";
+	mes "You are in a situation";
+	mes "in which you will die,";
+	mes "but if you cause the death";
+	mes "of another person, you will";
+	mes "surely save yourself. So...";
+	mes "What do you do?";
+	next;
+	menu "I will kill to survive",s_Kill,"I have no choice, but to die.",s_Die,"I won't kill, but I'll find a way to live!",-,"I'll ask that person if it's okay to kill him.",s_Ask;
+
+	mes "[Echoing Voice]";
+	mes "Yes. Love for all life,";
+	mes "including your own, is";
+	mes "a trait all true heroes";
+	mes "must have. You have chosen...";
+	mes "Wisely. Please, take this into";
+	mes "your capable hands, adventurer.";
+	next;
+	mes "^3151FFA stone slab at the foot";
+	mes "of the statue slides open,";
+	mes "revealing a piece of the";
+	mes "tablet that will lead you";
+	mes "to the Hellion's gem.";
+	getitem 7334,1; //Payon Tablet
+	set HELLIONQ,18;
+	close;
+
+s_Kill:
+	mes "[Echoing Voice]";
+	mes "there is a primal truth";
+	mes "to your answer. However...";
+	mes "You have chosen poorly.";
+	close2;
+	percentheal -100,0;
+	end;
+
+s_Die:
+	mes "[Echoing Voice]";
+	mes "There is a kindness and";
+	mes "compassion in your answer";
+	mes "that is indeed rare. However,";
+	mes "where is the respect for your";
+	mes "own life? If you are that";
+	mes "willing to throw it away, you";
+	mes "are no hero.";
+	close2;
+	percentheal -100,0;
+	end;
+
+s_Ask:
+	mes "[Echoing Voice]";
+	mes "The veneer of honesty in";
+	mes "your answer is surpassed by";
+	mes "your own cowardice. You have";
+	mes "chosen extremely poorly...";
+	close2;
+	percentheal -100,0;
+	end;
+
+OnTouch:
+	if(HELLIONQ != 17)end;
+	specialeffect 313;
+	specialeffect2 313;
+	mes "^3151FFThe piece of tablet";
+	mes "that you have is shining";
+	mes "with light as if in repsonse";
+	mes "to something in the area.";
+	close;
+
+}
+
+morocc_in.gat,116,101,2	script	Old Scholar Tyus	735,2,2,{
+
+	if(HELLIONQ == 27)goto s_Last;
+	if(countitem(7332))goto s_Tablet;
+	if(HELLIONQ == 25)goto s_Completion;
+	if(HELLIONQ == 24)goto s_Four;
+	if(HELLIONQ > 18)goto s_Welshyun;
+	if(HELLIONQ == 18)goto s_Morroc;
+	if(HELLIONQ > 8)goto s_Grout;
+	if(HELLIONQ == 8)goto s_Payon;
+	if(HELLIONQ == 4)goto s_Veggie;
+	if(HELLIONQ > 0)goto s_Seek;
+	if(hellion_consideration)goto s_Consider;
+	mes "[Sir Chilias'Tyus]";
+	mes "Greetings...";
+	mes "My name is Sir Chilias'Tyus.";
+	mes "I've lived a long time here in";
+	mes "Rune-Midgard and I've come";
+	mes "to see and know a lot of things.";
+	mes "Power, jealousy, hardship...";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Sp what exactly";
+	mes "brings you here to";
+	mes "the middle of Morroc?";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "This land has grown corrupt";
+	mes "with the disease of greed";
+	mes "and selfishness. Everywhere";
+	mes "you go, people are heartless,";
+	mes "but I still believe that I'll find";
+	mes "the one worth enough to help";
+	mes "me...";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "There is no shortage of";
+	mes "brave and strong warriors";
+	mes "in these dangerous times.";
+	mes "But for the thing I seek,";
+	mes "I must have the help of one";
+	mes "who is truly pure of heart...";
+	next;
+	menu "What are you looking for?",s_Looking,"Pure of heart? Hah! Good luck!",-;
+
+	mes "[Sir Chilias'Tyus]";
+	mes "Times are bad when";
+	mes "even the youth have";
+	mes "been jaded. But I refuse";
+	mes "to believe that hope is";
+	mes "truly lost in this age...";
+	close;
+
+s_Glimmer:
+	mes "[Sir Chilias'Tyus]";
+	mes "Heh heh~ I see you eyes";
+	mes "glimmer with enthusiasm,";
+	mes "but it seems this task might";
+	mes "be a little too much for you.";
+	mes "I'm sorry, but that's the";
+	mes "reality I can't ignore...";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "Go out in to the world,";
+	mes "and grow in strength.";
+	mes "Perhaps after you become";
+	mes "more capable, I'll find that";
+	mes "I can rely on your help.";
+	close;
+
+s_Looking:
+	if(BaseLevel < 75)goto s_Glimmer;
+	mes "[Sir Chilias'Tyus]";
+	mes "I suppose I should tell you";
+	mes "first about my grandfather,";
+	mes "who was once a young and";
+	mes "fearless adventurer, much";
+	mes "like yourself. Yes, he";
+	mes "traveled the world with his";
+	mes "three friends...";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "The four of them went on";
+	mes "many expeditions together";
+	mes "and earned themselves a";
+	mes "reputation as a courageous";
+	mes "team that worked especially";
+	mes "well together after many years.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "Then, on what was supposed";
+	mes "to be a typical journey, they found";
+	mes "an uncharted cave. Curious, and";
+	mes "in need of rest, the four ventured";
+	mes "inside. There, they encountered";
+	mes "that most horrible creature...";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "It was a ferocious beast";
+	mes "with horns as large and as";
+	mes "sharp as their weapons, with";
+	mes "eyes that blazed with hellfire.";
+	mes "My grandfather could tell that";
+	mes "it was thirsty for blood.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "They ran from the beast";
+	mes "as quickly as they could,";
+	mes "but the four were separated";
+	mes "in the cave's darkness. It was";
+	mes "all they could do to hide in";
+	mes "the darkness of the cave...";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "From his hiding place, my";
+	mes "grandfather heard the screams";
+	mes "of his friends as the monster";
+	mes "slaughtered them, one by one.";
+	mes "The screams and the monster's";
+	mes "growls were getting closer...";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "Unable to endure the";
+	mes "suffering of his trusted";
+	mes "comrades, my grandfather";
+	mes "jumped out hiding and tried";
+	mes "to save his friends. The beast";
+	mes "found him and they battled.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "It was no use. The beast";
+	mes "was too powerful and my";
+	mes "grandfather was knocked out.";
+	mes "When he came to, his friends";
+	mes "were all dead and a shining";
+	mes "gem lay in a pool of blood.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "My grandfather buried";
+	mes "his friends that day. He";
+	mes "took that gem as a memento";
+	mes "of their final expedition, but";
+	mes "wondered why the beast";
+	mes "had decided to spare him.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "It wasn't long before he";
+	mes "experienced the gem's curse";
+	mes "firsthand. The gem inexplicably";
+	mes "drew people to it, taking the";
+	mes "greed in their hearts and";
+	mes "twisting their minds...";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "Grandfather believed the";
+	mes "beast let him live so that";
+	mes "the gem would be set loose";
+	mes "upon the outside world, free";
+	mes "to pollute it with its evil.";
+	mes "He had to do something...";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "However, the gem proved";
+	mes "to be formed out of pure evil";
+	mes "and could not be destroyed";
+	mes "by human means. In the end,";
+	mes "my grandfather hid the gem";
+	mes "someplace safe...";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "However, the threat of the";
+	mes "gem still exists. Grandfather";
+	mes "and my father worked for";
+	mes "years to find a way to seal";
+	mes "its darkness. Only now have I";
+	mes "been able to create a bracelet to";
+	mes "seal its evil power.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "For my grandfather and his";
+	mes "friends to truly rest in peace,";
+	mes "I must find an adventurer of";
+	mes "pure heart who can find the";
+	mes "gem and bring it to me so that";
+	mes "I can finally seal its power.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "I think... I think you";
+	mes "might be the hero that";
+	mes "I've been waiting for. Will";
+	mes "you help an old man for the";
+	mes "sake of all that is good?";
+	next;
+	menu "Of course, I will.",s_Will,"I'm sorry, but I can't.",-;
+s_AskMuch:
+	mes "[Sir Chilias'Tyus]";
+	mes "I understand...";
+	mes "I know I am asking much";
+	mes "of you, and this task is not";
+	mes "one to take lightly. However,";
+	mes "I believe that you are wholly";
+	mes "capable of accomplishing this.";
+	set hellion_consideration,1;
+	close;
+
+s_Consider:
+	mes "[Sir Chilias'Tyus]";
+	mes "So have you considered";
+	mes "my proposal? I believe that";
+	mes "you may be the one who will";
+	mes "help me in sealing away the";
+	mes "Hellion gem's evil forever.";
+	next;
+	menu "I will help you.",-,"...Sorry about that.",s_AskMuch;
+
+	set hellion_consideration,0;
+s_Will: 
+	mes "[Sir Chilias'Tyus]";
+	mes "Good good, but first";
+	mes "I must test to see if you";
+	mes "are worthy of holding the";
+	mes "Hellion's gem. I can't tell";
+	mes "you exacrlt where it is, but";
+	mes "I will give you some clues.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "First, speak to Clanux";
+	mes "Heffron in Prontera. He";
+	mes "has offered to help me find";
+	mes "the gem, but I do not know if";
+	mes "I can trust him. Please help";
+	mes "me protect this world from the gem...";
+	set HELLIONQ,1;
+	close;
+
+s_Seek:
+	mes "[Sir Chilias'Tyus]";
+	mes "Please seek out";
+	mes "Clanux Heffron in";
+	mes "Prontera. He may have";
+	mes "information regarding a";
+	mes "clue leading to the Hellion";
+	mes "gem. Good luck to you.";
+	close;
+
+s_Veggie:
+	mes "^3151FFAs you told Chilias about";
+	mes "the strange message you";
+	mes "found inside the training";
+	mes "dummy he starts to mumble";
+	mes "something nobody could";
+	mes "possibly understand.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "Ok, I think I know what";
+	mes "this clue means. Go find";
+	mes "this Veggie Lady, wherever";
+	mes "she might be. Then take";
+	mes "9 steps North and then";
+	mes "3 steps to the west.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "I'm still clueless";
+	mes "about the \"BINGO\" part.";
+	mes "I'm sorry but I can't help";
+	mes "you with that, you'll have";
+	mes "to figure it out on your own.";
+	close;
+
+s_Payon:
+	mes "[Sir Chilias'Tyus]";
+	mes "Ah, yes! This is one piece";
+	mes "of the table that will lead";
+	mes "you to the Hellion's gem!";
+	mes "This engraving was definitely";
+	mes "made by my grandfather, and";
+	mes "Christopher was one of his friends.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "I suppose he hid these pieces";
+	mes "in the places that reminded him";
+	mes "of his friends. Now according";
+	mes "to the tablet's message, you";
+	mes "should find the next piece";
+	mes "in \"the city of thickest forest\"";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "I'm sure that the";
+	mes "next tablet piece is";
+	mes "in Payon, so go there";
+	mes "and see if you can find";
+	mes "it. Good luck to you,";
+	mes "kind adventurer.";
+	set HELLIONQ,9;
+	close;
+
+s_Grout:
+	mes "[Sir Chilias'Tyus]";
+	mes "Now that I think about";
+	mes "it, there's a guy in Payon";
+	mes "that I know named Grout'the";
+	mes "Tuccok who knew my grandfather.";
+	mes "He might know something, but";
+	mes "he's a little, well... Hmm...";
+	close;
+
+s_Morroc:
+	mes "[Sir Chilias'Tyus]";
+	mes "While you were gone,";
+	mes "I felt a little bad that you";
+	mes "were searching for the";
+	mes "tablet pieces on your own,";
+	mes "so I managed to find this";
+	mes "piece here in Morroc. But...";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	specialeffect 313;
+	specialeffect2 313;
+	mes "Why are they glowing like";
+	mes "this? In any case, we have";
+	mes "this piece I found here in";
+	mes "Morroc, and the pieces you";
+	mes "found in Prontera and Payon.";
+	mes "There's one more left in Geffen.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "Anyway, on the last tablet";
+	mes "piece that I found, it";
+	mes "says \"Hakim loved magic,";
+	mes "and always enjoyed its";
+	mes "wondrous city\", so I'm sure";
+	mes "the last piece is in Geffen.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "Please take this third";
+	mes "tablet piece and find the";
+	mes "final piece so that we can";
+	mes "fulfill my dear grandfather's";
+	mes "greatest wish and forever";
+	mes "seal away the Hellion's gem.";
+	getitem 7335,1; //Morroc Tablet
+	set HELLIONQ,19;
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "When you get back to Geffen,";
+	mes "please speak to Welshyun,";
+	mes "who's been helping me in";
+	mes "creating a device to seal the";
+	mes "gem's darkness. He is";
+	mes "worthy of trust and";
+	mes "will surely help us.";
+	close;
+
+s_Welshyun:
+	mes "[Sir Chilias'Tyus]";
+	mes "Please visit the";
+	mes "sage named Welshyun";
+	mes "in Geffen. We are good";
+	mes "friends, so I am sure";
+	mes "that you can trust him.";
+	close;
+
+s_Four:
+	mes "[Sir Chilias'Tyus]";
+	mes "You have all four";
+	mes "pieces of the tablet?";
+	mes "That's great news! Ah,";
+	mes "and the gem is embedded";
+	mes "in each of the tablet pieces.";
+	mes "We're so close to finishing!";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "Ah, would you go back";
+	mes "to Welshyun? I know it's";
+	mes "a hassle, but he is probably";
+	mes "the only one who can combine";
+	mes "the tablet pieces into their";
+	mes "complete form. Thank you...";
+	set HELLIONQ,25;
+	close;
+
+s_Completion:
+	mes "[Sir Chilias'Tyus]";
+	mes "Ah, would you go back";
+	mes "to Welshyun? I know it's";
+	mes "a hassle, but he is probably";
+	mes "the only one who can combine";
+	mes "the tablet pieces into their";
+	mes "complete form. Thank you...";
+	close;
+
+s_Tablet:
+	mes "[Sir Chilias'Tyus]";
+	mes "At long last. We have";
+	mes "everything. The Tablet";
+	mes "and the Hellion's gem.";
+	mes "Now I can finally use";
+	mes "this bracelet to seal";
+	mes "its power forever...";
+	next;
+	if(countitem(7337))goto s_HellionEye;
+	specialeffect 12;
+	mes "[Sir Chilias'Tyus]";
+	mes "Darkness that writhes,";
+	mes "souls lost in the inferno,";
+	mes "I offer you comfort, I offer";
+	mes "you peace. To the despairing";
+	mes "ones, to the shameless ones,";
+	mes "I give guidance to heaven...";
+	next;
+	specialeffect 58;
+	mes "[Sir Chilias'Tyus]";
+	mes "Instead of sadness,";
+	mes "let there be joy. Instead";
+	mes "of anger, let there be";
+	mes "love. Souls that are";
+	mes "lost will now find";
+	mes "their way...";
+	next;
+	specialeffect 83;
+	mes "[Sir Chilias'Tyus]";
+	mes "Light and hope...";
+	mes "Heaven and earth...";
+	mes "Cast away the darkness.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "I did it.";
+	mes "After all these";
+	mes "long years I finally did";
+	mes "it. Thanks to you help.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "Please take this";
+	mes "Nile Rose, which will";
+	mes "keep the power of the gem";
+	mes "in check. I trust that you will";
+	mes "keep its secret and protect it";
+	mes "from those motivated by greed.";
+	delitem 7332,1; //Complete Tablet
+	getitem 2658,1; //Nile Rose
+	set BaseExp,BaseExp+1000000;
+	set HELLIONQ,27;
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "Thank you, kind";
+	mes "adventurer, for bringing";
+	mes "peace to my grandfather's";
+	mes "soul and for working to";
+	mes "protect peace in our world.";
+	mes "You are the truest of heroes.";
+	close;
+
+s_HellionEye:
+	mes "[Sir Chilias'Tyus]";
+	mes "But your eyes...";
+	mes "They seem so tired";
+	mes "and I can sense some";
+	mes "sort of pain from them.";
+	mes "Did something happen?";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "I learned the secret of";
+	mes "the Hellion's gem. It...";
+	mes "It turns people into";
+	mes "Hellion Revenants.";
+	mes "it's what happened";
+	mes "to your grandfather...";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "What...";
+	mes "What did you just say?";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "The tablet had a map that";
+	mes "let me to the chamber where";
+	mes "your grandfather locked himself";
+	mes "up before he completed turning";
+	mes "into the Hellion Revenant.";
+	mes "It was horrible...";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "At the entrance, he";
+	mes "left a message that said";
+	mes "that he wanted to be killed.";
+	mes "So that he could finally join";
+	mes "his friends instead of living";
+	mes "as a monster. So I... So I...";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "It's okay. I know you";
+	mes "did the right thing. It's";
+	mes "what my grandfather";
+	mes "would have wanted most.";
+	mes "Thank you for finally freeing";
+	mes "his soul and giving him peace.";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Here, I think you";
+	mes "should have this Eye";
+	mes "of Hellion, in case you";
+	mes "wanted a memento of";
+	mes "your dear grandfather.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "I'd appreciate that.";
+	mes "Grandfather's eye...";
+	mes "It's full of the painful";
+	mes "experiences of the people";
+	mes "who were turned into Hellion";
+	mes "Revenants against their will.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "But... Now is not the";
+	mes "time for sentiment. For";
+	mes "sake of my grandfather,";
+	mes "I must seal the power of";
+	mes "the Hellion's gem now!";
+	next;
+	specialeffect 12;
+	mes "[Sir Chilias'Tyus]";
+	mes "Darkness that writhes,";
+	mes "souls lost in the inferno,";
+	mes "I offer you comfort, I offer";
+	mes "you peace. To the despairing";
+	mes "ones, to the shameless ones,";
+	mes "I give guidance to heaven...";
+	next;
+	specialeffect 58;
+	mes "[Sir Chilias'Tyus]";
+	mes "Instead of sadness,";
+	mes "let there be joy. Instead";
+	mes "of anger, let there be";
+	mes "love. Souls that are";
+	mes "lost will now find";
+	mes "their way...";
+	next;
+	specialeffect 83;
+	mes "[Sir Chilias'Tyus]";
+	mes "Light and hope...";
+	mes "Heaven and earth...";
+	mes "Cast away the darkness.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "I did it.";
+	mes "After all these";
+	mes "long years I finally did";
+	mes "it. Thanks to you help.";
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "Please take this";
+	mes "Nile Rose, which will";
+	mes "keep the power of the gem";
+	mes "in check. I trust that you will";
+	mes "keep its secret and protect it";
+	mes "from those motivated by greed.";
+	delitem 7332,1; //Complete Tablet
+	delitem 7337,1; //Eye of Hellion
+	getitem 2658,1; //Nile Rose
+	getitem 603,1; //Old Blue Box
+	set BaseExp,BaseExp+1200000;
+	set HELLIONQ,27;
+	next;
+	mes "[Sir Chilias'Tyus]";
+	mes "Thank you, kind";
+	mes "adventurer, for bringing";
+	mes "peace to my grandfather's";
+	mes "soul and for working to";
+	mes "protect peace in our world.";
+	mes "You are the truest of heroes.";
+	next;
+	mes "^3151FFYou have received the";
+	mes "Nile Rose in which the";
+	mes "Hellion's gem is sealed.";
+	mes "The Eye of the Hellion has";
+	mes "granted you some experience";
+	mes "through its strange powers.";
+	close;
+
+s_Last:
+	mes "[Sir Chilias'Tyus]";
+	mes "Long time no see. So, are you doing";
+	mes "well to keep the promise with me?";
+	mes "Please handle it with care";
+	mes "to prevent the evil power within";
+	mes "from being released.";
+	close;
+
+OnTouch:
+	if(HELLIONQ != 18)end;
+	specialeffect 313;
+	specialeffect2 313;
+	mes "^3151FFOne of the Table Pieces";
+	mes "that you have is beginning to";
+	mes "shine with light, as if it were";
+	mes "responding to something...";
+	close;
+
+}
+
+gef_fild09.gat,296,59,1	script	Hidden Cave#HellionCave	111,{
+
+	if(!countitem(7332))goto s_NoTablet;
+	mes "^3151FFAmongst the wild bushes";
+	mes "and overgrown grass, you";
+	mes "see a large rock slab that";
+	mes "resembles a door. As you";
+	mes "come closer, you can see a";
+	mes "groove on the rock's surface.";
+	next;
+	menu "Insert the Tablet.",s_Insert,"Ignore",-;
+
+	mes "^3151FFYou do nothing.";
+	mes "And nothing happens.";
+	close;
+
+s_Insert:
+	mes "^3151FFYou insert the tablet into";
+	mes "the rock's groove and the";
+	mes "Hellion's gem begins to hum";
+	mes "and glow. The rock slides open,";
+	mes "revealing an engraved message";
+	mes "on the ground for you to read.";
+	next;
+	mes "^7151FF\"To you who have found this";
+	mes "place, I reveal the truth about";
+	mes "the Hellion Revenant. It was";
+	mes "never a devil, like we";
+	mes "believed, but a human being";
+	mes "slowly corrupted by the";
+	mes "darkness of the Hellion's";
+	mes "gem.\"";
+	next;
+	mes "^7151FF\"I learned this horrible";
+	mes "truth too late. Already,";
+	mes "I can feel the darkness";
+	mes "welling up within me.";
+	mes "It is all I can do to trap";
+	mes "myself in this chamber";
+	mes "before I lose all reason.\"";
+	next;
+	mes "^7151FF\"I failed an it's too";
+	mes "late for me, but I hope";
+	mes "someone in the future";
+	mes "can seal the Hellion gem's";
+	mes "dark power. And I hope that";
+	mes "someone will grant me the";
+	mes "sweet release I crave...\"";
+	next;
+	mes "^7151FF\"Brave hero, I beg of";
+	mes "you. Please kill me and";
+	mes "bring salvation to my soul.";
+	mes "Please release me so that";
+	mes "I can finally join my friends.\"";
+	mes " ";
+	mes "                       -Tyus";
+	close2;
+	warp "gef_dun03.gat",140,119;
+	end;
+
+s_NoTablet:
+	mes "^3151FFAmongst the wild bushes";
+	mes "and overgrown grass, you";
+	mes "see a large rock slab that";
+	mes "resembles a door. But it";
+	mes "seems it is sealed by a";
+	mes "strong force so you're";
+	mes "unable to open it.";
+	close;
+
+}
diff --git a/npc/quests/gunslinger_quests.txt b/npc/quests/gunslinger_quests.txt
index cb2823a88..c939035b6 100644
--- a/npc/quests/gunslinger_quests.txt
+++ b/npc/quests/gunslinger_quests.txt
@@ -1,405 +1,405 @@
-//===== By: ==================================================

-//= Playtester

-//===== Current Version: =====================================

-//= 1.2

-//===== Compatible With: =====================================

-//= SVN eA

-//===== Description: =========================================

-//= Gunslinger guns and bullet quests

-//===== Additional Comments: =================================

-//= 1.0 Only Garrison Gun done yet [Playtester]

-//= 1.1 Added Garrison[2] [Playtester]

-//= 1.2 Added Drifter, Destroyer and Inferno [Playtester]

-//============================================================

-

-

-//===================== Garrison =====================================================

-

-que_ng.gat,182,85,3	script	Mr.Garrison	109,{

-	set @npcname$,"[Mr.Garrison]";

-

-	mes @npcname$;

-	if(countitem(13105)>0) goto L_Already;

-	if(countitem(13104)>0) goto L_Slot;

-	mes "I have invented a new Revolver!";

-	mes "I think I call it... Garrison.";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "Very innovative name really.";

-	next;

-	if(BaseJob != Job_Gunslinger || BaseLevel < 55){

-		mes @npcname$;

-		mes "I don't think you have enough";

-		mes "knowledge of guns to see its";

-		mes "true beauty.";

-		close;

-	}

-	mes @npcname$;

-	mes "You look like you're an expert";

-	mes "in guns, aren't you?";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "Yeah you could say so.";

-	next;

-	mes @npcname$;

-	mes "So, do you want me to make a";

-	mes "^0000FFGarrison^000000 for you?";

-	next;

-

-	switch(select("Yes, please.","Nah, I'll stick with my gun."))

-	{

-

-		case 1:

-			mes @npcname$;

-			mes "Great! But first you need to";

-			mes "bring me the materials I need";

-			mes "to create one.";

-			next;

-			mes @npcname$;

-			mes "This is what I need:";

-			mes "^FF000050 Steels^000000,";

-			mes "^FF00003 Eluniums^000000,";

-			mes "^FF00001 Oridecon^000000,";

-			mes "^FF000050 Coals^000000,";

-			mes "^FF000020 Rusty Screws^000000 and";

-			mes "^FF000030000 Zeny^000000.";

-			next;

-			mes @npcname$;

-			if ( (countitem(999)<50) || (countitem(985)<3) || (countitem(984)<1) || (countitem(1003)<50) || (countitem(7317)<20) || (Zeny < 30000) ) {

-				mes "Come back when you have the materials.";

-				close;

-			}

-			delitem 999,50;

-			delitem 985,3;

-			delitem 984,1;

-			delitem 1003,50;

-			delitem 7317,20;

-			set Zeny,Zeny-30000;

-			mes "I see you came prepared.";

-			mes "Let me take those material.";

-			next;

-			mes @npcname$;

-			mes "Give me just a minute...";

-			mes "...";

-			mes "...";

-			next;

-			getitem 13104,1;

-			mes @npcname$;

-			mes "It's done. Here, take this";

-			mes "wonderful gun!";

-			close;

-

-		case 2:

-			mes @npcname$;

-			mes "Well, guess a true Gunslinger";

-			mes "will never part from his";

-			mes "favorite gun, heh.";

-			close;

-	}

-

-L_Slot:

-	mes "Oh, I see you have one of";

-	mes "my high-quality guns.";

-	next;

-	mes @npcname$;

-	mes "Now that I look at it, I";

-	mes "think I could improve it";

-	mes "some more.";

-	next;

-	mes @npcname$;

-	mes "How about I add a ^0000FFslot^000000";

-	mes "to it? Be careful, though.";

-	mes "If you put a card into it";

-	mes "already, it will be lost";

-	mes "in the process.";

-	next;

-	switch(select("Yes, please add a slot.","Nah, I keep it as it is now."))

-	{

-

-		case 1:

-			mes @npcname$;

-			mes "Great! But first you need to";

-			mes "bring me the materials I need";

-			mes "to improve it.";

-			next;

-			mes @npcname$;

-			mes "This is what I need:";

-			mes "^FF000010 Steels^000000,";

-			mes "^FF00001 Eluniums^000000,";

-			mes "^FF000010 Emveretarcon^000000,";

-			mes "^FF000030 Coals^000000,";

-			mes "^FF000010 Rusty Screws^000000 and";

-			mes "of course your ^FF0000Garrison^000000.";

-			next;

-			mes @npcname$;

-			if ( (countitem(999)<10) || (countitem(985)<1) || (countitem(1011)<10) ||(countitem(1003)<30) || (countitem(7317)<10) || (countitem(13104)<1) ) {

-				mes "Come back when you have the materials.";

-				close;

-			}

-			delitem 999,10;

-			delitem 985,1;

-			delitem 1011,10;

-			delitem 1003,30;

-			delitem 7317,10;

-			delitem 13104,1;

-			mes "I see you came prepared.";

-			mes "Let me take those materials.";

-			next;

-			mes @npcname$;

-			mes "Give me just a minute...";

-			mes "...";

-			mes "...";

-			next;

-			getitem 13105,1;

-			mes @npcname$;

-			mes "It's done. Now it is";

-			mes "even better than before.";

-			mes "Put it to good use.";

-			close;

-

-		case 2:

-			mes @npcname$;

-			mes "Okay, come back when you";

-			mes "changed your mind.";

-			close;

-	}

-

-L_Already:

-	mes "So how do you like";

-	mes "my gun?";

-	close;

-}

-

-que_ng.gat,187,163,3	script	Ingrid	744,{

-	set @npcname$,"[Ingrid]";

-

-	mes @npcname$;

-	mes "I can make the strongest of";

-	mes "all weapons. The ultimate";

-	mes "grenade launcher.";

-	mes "It's called ^0000FFInferno^000000.";

-	next;

-	if(BaseJob != Job_Gunslinger || BaseLevel < 65){

-		mes @npcname$;

-		mes "But I don't think you are";

-		mes "experienced enough to use it.";

-		next;

-		mes @npcname$;

-		mes "You'll probably kill yourself.";

-		mes "It's just too powerful to use";

-		mes "for a beginner. I refuse to";

-		mes "make one for you.";

-		close;

-	}

-	mes @npcname$;

-	mes "You look experienced.";

-	mes "I think I could make one";

-	mes "for you.";

-	next;

-	mes @npcname$;

-	mes "So, do you want me to make an";

-	mes "^0000FFInferno^000000 for you?";

-	next;

-

-	switch(select("Yes, please.","No thanks."))

-	{

-

-		case 1:

-			mes @npcname$;

-			mes "Okay, but first you need to";

-			mes "bring me the materials I need";

-			mes "to create one.";

-			next;

-			mes @npcname$;

-			mes "This is what I need:";

-			mes "^FF0000100 Used Iron Plates^000000,";

-			mes "^FF000010 Oridecons^000000,";

-			mes "^FF000050 Rusty Screws^000000,";

-			mes "^FF0000100 Burning Hearts^000000 and";

-			mes "^FF0000200000 Zeny^000000.";

-			next;

-			mes @npcname$;

-			if ( (countitem(7319)<100) || (countitem(984)<10) || (countitem(7317)<50) || (countitem(7097)<100) || (Zeny < 200000) ) {

-				mes "Come back when you have the materials.";

-				close;

-			}

-			delitem 7319,100;

-			delitem 984,10;

-			delitem 7317,50;

-			delitem 7097,100;

-			set Zeny,Zeny-200000;

-			mes "Oh, you already have the materials.";

-			mes "Let me have them.";

-			next;

-			mes @npcname$;

-			mes "I need to be careful...";

-			mes "...";

-			mes "...";

-			next;

-			getitem 13162,1;

-			mes @npcname$;

-			mes "It's done.";

-			mes "Be careful with it.";

-			close;

-

-		case 2:

-			mes @npcname$;

-			mes "Probably a good choice.";

-			mes "It's really dangerous.";

-			close;

-	}

-}

-

-que_ng.gat,185,180,3	script	Vanessa	726,{

-	set @npcname$,"[Vanessa]";

-

-	mes @npcname$;

-	mes "I can make a grenade launcher";

-	mes "that can destroy armors.";

-	mes "It's called ^0000FFDestroyer^000000.";

-	next;

-	if(BaseJob != Job_Gunslinger || BaseLevel < 52){

-		mes @npcname$;

-		mes "But I don't think you are";

-		mes "experienced enough to use it.";

-		next;

-		mes @npcname$;

-		mes "Come back when you think";

-		mes "you are worthy to use this";

-		mes "weapon.";

-		close;

-	}

-	mes @npcname$;

-	mes "You look experienced.";

-	mes "I think I could make one";

-	mes "for you.";

-	next;

-	mes @npcname$;

-	mes "So, do you want me to make a";

-	mes "^0000FFDestroyer^000000 for you?";

-	next;

-

-	switch(select("Yes, please.","No thanks."))

-	{

-

-		case 1:

-			mes @npcname$;

-			mes "Okay, but first you need to";

-			mes "bring me the materials I need";

-			mes "to create one.";

-			next;

-			mes @npcname$;

-			mes "This is what I need:";

-			mes "^FF000050 Used Iron Plates^000000,";

-			mes "^FF00005 Oridecons^000000,";

-			mes "^FF000070 Rusty Screws^000000 and";

-			mes "^FF0000100000 Zeny^000000.";

-			next;

-			mes @npcname$;

-			if ( (countitem(7319)<50) || (countitem(984)<5) || (countitem(7317)<70) || (Zeny < 100000) ) {

-				mes "Come back when you have the materials.";

-				close;

-			}

-			delitem 7319,50;

-			delitem 984,5;

-			delitem 7317,70;

-			set Zeny,Zeny-100000;

-			mes "Oh, you already have the materials.";

-			mes "Let me have them.";

-			next;

-			mes @npcname$;

-			mes "I'll make it in a minute...";

-			mes "...";

-			mes "...";

-			next;

-			getitem 13160,1;

-			mes @npcname$;

-			mes "It's done.";

-			mes "Be careful with it.";

-			close;

-

-		case 2:

-			mes @npcname$;

-			mes "Oh well, your loss.";

-			close;

-	}

-}

-

-que_ng.gat,149,178,5	script	N.A	744,{

-	set @npcname$,"[N.A]";

-

-	mes @npcname$;

-	mes "If you like gatling guns, I'm the";

-	mes "right person to talk to.";

-	mes "I can make a ^0000FFDrifter^000000.";

-	next;

-	if(BaseJob != Job_Gunslinger || BaseLevel < 55){

-		mes @npcname$;

-		mes "But I don't think you are";

-		mes "experienced enough to use it.";

-		next;

-		mes @npcname$;

-		mes "Come back when you think";

-		mes "you are worthy to use this";

-		mes "weapon.";

-		close;

-	}

-	mes @npcname$;

-	mes "You look experienced.";

-	mes "I think I could make one";

-	mes "for you.";

-	next;

-	mes @npcname$;

-	mes "So, do you want me to make a";

-	mes "^0000FFDrifter^000000 for you?";

-	next;

-

-	switch(select("Yes, please.","No thanks."))

-	{

-

-		case 1:

-			mes @npcname$;

-			mes "Okay, but first you need to";

-			mes "bring me the materials I need";

-			mes "to create one.";

-			next;

-			mes @npcname$;

-			mes "This is what I need:";

-			mes "^FF000070 Steels^000000,";

-			mes "^FF00005 Eluniums^000000,";

-			mes "^FF00003 Oridecons^000000,";

-			mes "^FF000070 Coals^000000,";

-			mes "^FF000050 Rusty Screws^000000 and";

-			mes "^FF000050000 Zeny^000000.";

-			next;

-			mes @npcname$;

-			if ( (countitem(999)<70) || (countitem(985)<5) || (countitem(984)<3) || (countitem(1003)<70) || (countitem(7317)<50) || (Zeny < 50000) ) {

-				mes "Come back when you have the materials.";

-				close;

-			}

-			delitem 999,70;

-			delitem 985,5;

-			delitem 984,3;

-			delitem 1003,70;

-			delitem 7317,50;

-			set Zeny,Zeny-50000;

-			mes "I see you came prepared.";

-			mes "Let me take those materials.";

-			next;

-			mes @npcname$;

-			mes "Alright, you won't regret it...";

-			mes "...";

-			mes "...";

-			next;

-			getitem 13157,1;

-			mes @npcname$;

-			mes "It's done. Now shoot the";

-			mes "enemies with no mercy!";

-			close;

-

-		case 2:

-			mes @npcname$;

-			mes "Oh well, your loss.";

-			close;

-	}

+//===== By: ==================================================
+//= Playtester
+//===== Current Version: =====================================
+//= 1.2
+//===== Compatible With: =====================================
+//= SVN eA
+//===== Description: =========================================
+//= Gunslinger guns and bullet quests
+//===== Additional Comments: =================================
+//= 1.0 Only Garrison Gun done yet [Playtester]
+//= 1.1 Added Garrison[2] [Playtester]
+//= 1.2 Added Drifter, Destroyer and Inferno [Playtester]
+//============================================================
+
+
+//===================== Garrison =====================================================
+
+que_ng.gat,182,85,3	script	Mr.Garrison	109,{
+	set @npcname$,"[Mr.Garrison]";
+
+	mes @npcname$;
+	if(countitem(13105)>0) goto L_Already;
+	if(countitem(13104)>0) goto L_Slot;
+	mes "I have invented a new Revolver!";
+	mes "I think I call it... Garrison.";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "Very innovative name really.";
+	next;
+	if(BaseJob != Job_Gunslinger || BaseLevel < 55){
+		mes @npcname$;
+		mes "I don't think you have enough";
+		mes "knowledge of guns to see its";
+		mes "true beauty.";
+		close;
+	}
+	mes @npcname$;
+	mes "You look like you're an expert";
+	mes "in guns, aren't you?";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "Yeah you could say so.";
+	next;
+	mes @npcname$;
+	mes "So, do you want me to make a";
+	mes "^0000FFGarrison^000000 for you?";
+	next;
+
+	switch(select("Yes, please.","Nah, I'll stick with my gun."))
+	{
+
+		case 1:
+			mes @npcname$;
+			mes "Great! But first you need to";
+			mes "bring me the materials I need";
+			mes "to create one.";
+			next;
+			mes @npcname$;
+			mes "This is what I need:";
+			mes "^FF000050 Steels^000000,";
+			mes "^FF00003 Eluniums^000000,";
+			mes "^FF00001 Oridecon^000000,";
+			mes "^FF000050 Coals^000000,";
+			mes "^FF000020 Rusty Screws^000000 and";
+			mes "^FF000030000 Zeny^000000.";
+			next;
+			mes @npcname$;
+			if ( (countitem(999)<50) || (countitem(985)<3) || (countitem(984)<1) || (countitem(1003)<50) || (countitem(7317)<20) || (Zeny < 30000) ) {
+				mes "Come back when you have the materials.";
+				close;
+			}
+			delitem 999,50;
+			delitem 985,3;
+			delitem 984,1;
+			delitem 1003,50;
+			delitem 7317,20;
+			set Zeny,Zeny-30000;
+			mes "I see you came prepared.";
+			mes "Let me take those material.";
+			next;
+			mes @npcname$;
+			mes "Give me just a minute...";
+			mes "...";
+			mes "...";
+			next;
+			getitem 13104,1;
+			mes @npcname$;
+			mes "It's done. Here, take this";
+			mes "wonderful gun!";
+			close;
+
+		case 2:
+			mes @npcname$;
+			mes "Well, guess a true Gunslinger";
+			mes "will never part from his";
+			mes "favorite gun, heh.";
+			close;
+	}
+
+L_Slot:
+	mes "Oh, I see you have one of";
+	mes "my high-quality guns.";
+	next;
+	mes @npcname$;
+	mes "Now that I look at it, I";
+	mes "think I could improve it";
+	mes "some more.";
+	next;
+	mes @npcname$;
+	mes "How about I add a ^0000FFslot^000000";
+	mes "to it? Be careful, though.";
+	mes "If you put a card into it";
+	mes "already, it will be lost";
+	mes "in the process.";
+	next;
+	switch(select("Yes, please add a slot.","Nah, I keep it as it is now."))
+	{
+
+		case 1:
+			mes @npcname$;
+			mes "Great! But first you need to";
+			mes "bring me the materials I need";
+			mes "to improve it.";
+			next;
+			mes @npcname$;
+			mes "This is what I need:";
+			mes "^FF000010 Steels^000000,";
+			mes "^FF00001 Eluniums^000000,";
+			mes "^FF000010 Emveretarcon^000000,";
+			mes "^FF000030 Coals^000000,";
+			mes "^FF000010 Rusty Screws^000000 and";
+			mes "of course your ^FF0000Garrison^000000.";
+			next;
+			mes @npcname$;
+			if ( (countitem(999)<10) || (countitem(985)<1) || (countitem(1011)<10) ||(countitem(1003)<30) || (countitem(7317)<10) || (countitem(13104)<1) ) {
+				mes "Come back when you have the materials.";
+				close;
+			}
+			delitem 999,10;
+			delitem 985,1;
+			delitem 1011,10;
+			delitem 1003,30;
+			delitem 7317,10;
+			delitem 13104,1;
+			mes "I see you came prepared.";
+			mes "Let me take those materials.";
+			next;
+			mes @npcname$;
+			mes "Give me just a minute...";
+			mes "...";
+			mes "...";
+			next;
+			getitem 13105,1;
+			mes @npcname$;
+			mes "It's done. Now it is";
+			mes "even better than before.";
+			mes "Put it to good use.";
+			close;
+
+		case 2:
+			mes @npcname$;
+			mes "Okay, come back when you";
+			mes "changed your mind.";
+			close;
+	}
+
+L_Already:
+	mes "So how do you like";
+	mes "my gun?";
+	close;
+}
+
+que_ng.gat,187,163,3	script	Ingrid	744,{
+	set @npcname$,"[Ingrid]";
+
+	mes @npcname$;
+	mes "I can make the strongest of";
+	mes "all weapons. The ultimate";
+	mes "grenade launcher.";
+	mes "It's called ^0000FFInferno^000000.";
+	next;
+	if(BaseJob != Job_Gunslinger || BaseLevel < 65){
+		mes @npcname$;
+		mes "But I don't think you are";
+		mes "experienced enough to use it.";
+		next;
+		mes @npcname$;
+		mes "You'll probably kill yourself.";
+		mes "It's just too powerful to use";
+		mes "for a beginner. I refuse to";
+		mes "make one for you.";
+		close;
+	}
+	mes @npcname$;
+	mes "You look experienced.";
+	mes "I think I could make one";
+	mes "for you.";
+	next;
+	mes @npcname$;
+	mes "So, do you want me to make an";
+	mes "^0000FFInferno^000000 for you?";
+	next;
+
+	switch(select("Yes, please.","No thanks."))
+	{
+
+		case 1:
+			mes @npcname$;
+			mes "Okay, but first you need to";
+			mes "bring me the materials I need";
+			mes "to create one.";
+			next;
+			mes @npcname$;
+			mes "This is what I need:";
+			mes "^FF0000100 Used Iron Plates^000000,";
+			mes "^FF000010 Oridecons^000000,";
+			mes "^FF000050 Rusty Screws^000000,";
+			mes "^FF0000100 Burning Hearts^000000 and";
+			mes "^FF0000200000 Zeny^000000.";
+			next;
+			mes @npcname$;
+			if ( (countitem(7319)<100) || (countitem(984)<10) || (countitem(7317)<50) || (countitem(7097)<100) || (Zeny < 200000) ) {
+				mes "Come back when you have the materials.";
+				close;
+			}
+			delitem 7319,100;
+			delitem 984,10;
+			delitem 7317,50;
+			delitem 7097,100;
+			set Zeny,Zeny-200000;
+			mes "Oh, you already have the materials.";
+			mes "Let me have them.";
+			next;
+			mes @npcname$;
+			mes "I need to be careful...";
+			mes "...";
+			mes "...";
+			next;
+			getitem 13162,1;
+			mes @npcname$;
+			mes "It's done.";
+			mes "Be careful with it.";
+			close;
+
+		case 2:
+			mes @npcname$;
+			mes "Probably a good choice.";
+			mes "It's really dangerous.";
+			close;
+	}
+}
+
+que_ng.gat,185,180,3	script	Vanessa	726,{
+	set @npcname$,"[Vanessa]";
+
+	mes @npcname$;
+	mes "I can make a grenade launcher";
+	mes "that can destroy armors.";
+	mes "It's called ^0000FFDestroyer^000000.";
+	next;
+	if(BaseJob != Job_Gunslinger || BaseLevel < 52){
+		mes @npcname$;
+		mes "But I don't think you are";
+		mes "experienced enough to use it.";
+		next;
+		mes @npcname$;
+		mes "Come back when you think";
+		mes "you are worthy to use this";
+		mes "weapon.";
+		close;
+	}
+	mes @npcname$;
+	mes "You look experienced.";
+	mes "I think I could make one";
+	mes "for you.";
+	next;
+	mes @npcname$;
+	mes "So, do you want me to make a";
+	mes "^0000FFDestroyer^000000 for you?";
+	next;
+
+	switch(select("Yes, please.","No thanks."))
+	{
+
+		case 1:
+			mes @npcname$;
+			mes "Okay, but first you need to";
+			mes "bring me the materials I need";
+			mes "to create one.";
+			next;
+			mes @npcname$;
+			mes "This is what I need:";
+			mes "^FF000050 Used Iron Plates^000000,";
+			mes "^FF00005 Oridecons^000000,";
+			mes "^FF000070 Rusty Screws^000000 and";
+			mes "^FF0000100000 Zeny^000000.";
+			next;
+			mes @npcname$;
+			if ( (countitem(7319)<50) || (countitem(984)<5) || (countitem(7317)<70) || (Zeny < 100000) ) {
+				mes "Come back when you have the materials.";
+				close;
+			}
+			delitem 7319,50;
+			delitem 984,5;
+			delitem 7317,70;
+			set Zeny,Zeny-100000;
+			mes "Oh, you already have the materials.";
+			mes "Let me have them.";
+			next;
+			mes @npcname$;
+			mes "I'll make it in a minute...";
+			mes "...";
+			mes "...";
+			next;
+			getitem 13160,1;
+			mes @npcname$;
+			mes "It's done.";
+			mes "Be careful with it.";
+			close;
+
+		case 2:
+			mes @npcname$;
+			mes "Oh well, your loss.";
+			close;
+	}
+}
+
+que_ng.gat,149,178,5	script	N.A	744,{
+	set @npcname$,"[N.A]";
+
+	mes @npcname$;
+	mes "If you like gatling guns, I'm the";
+	mes "right person to talk to.";
+	mes "I can make a ^0000FFDrifter^000000.";
+	next;
+	if(BaseJob != Job_Gunslinger || BaseLevel < 55){
+		mes @npcname$;
+		mes "But I don't think you are";
+		mes "experienced enough to use it.";
+		next;
+		mes @npcname$;
+		mes "Come back when you think";
+		mes "you are worthy to use this";
+		mes "weapon.";
+		close;
+	}
+	mes @npcname$;
+	mes "You look experienced.";
+	mes "I think I could make one";
+	mes "for you.";
+	next;
+	mes @npcname$;
+	mes "So, do you want me to make a";
+	mes "^0000FFDrifter^000000 for you?";
+	next;
+
+	switch(select("Yes, please.","No thanks."))
+	{
+
+		case 1:
+			mes @npcname$;
+			mes "Okay, but first you need to";
+			mes "bring me the materials I need";
+			mes "to create one.";
+			next;
+			mes @npcname$;
+			mes "This is what I need:";
+			mes "^FF000070 Steels^000000,";
+			mes "^FF00005 Eluniums^000000,";
+			mes "^FF00003 Oridecons^000000,";
+			mes "^FF000070 Coals^000000,";
+			mes "^FF000050 Rusty Screws^000000 and";
+			mes "^FF000050000 Zeny^000000.";
+			next;
+			mes @npcname$;
+			if ( (countitem(999)<70) || (countitem(985)<5) || (countitem(984)<3) || (countitem(1003)<70) || (countitem(7317)<50) || (Zeny < 50000) ) {
+				mes "Come back when you have the materials.";
+				close;
+			}
+			delitem 999,70;
+			delitem 985,5;
+			delitem 984,3;
+			delitem 1003,70;
+			delitem 7317,50;
+			set Zeny,Zeny-50000;
+			mes "I see you came prepared.";
+			mes "Let me take those materials.";
+			next;
+			mes @npcname$;
+			mes "Alright, you won't regret it...";
+			mes "...";
+			mes "...";
+			next;
+			getitem 13157,1;
+			mes @npcname$;
+			mes "It's done. Now shoot the";
+			mes "enemies with no mercy!";
+			close;
+
+		case 2:
+			mes @npcname$;
+			mes "Oh well, your loss.";
+			close;
+	}
 }
\ No newline at end of file
diff --git a/npc/quests/juice_maker.txt b/npc/quests/juice_maker.txt
index 3661408d4..7a1e315c0 100644
--- a/npc/quests/juice_maker.txt
+++ b/npc/quests/juice_maker.txt
@@ -1,307 +1,307 @@
-//===== eAthena Script =======================================

-//= Juice Maker Quest

-//===== By: ==================================================

-//= kobra_k88

-//===== Current Version: =====================================

-//= 1.8

-//===== Compatible With: =====================================

-//= eAthena 7.15 +

-//===== Description: =========================================

-//= 

-//===== Additional Comments: =================================

-//= Condition if done: (MISC_QUEST & 1)

-//= 

-//= 1.1 fixed input number check [Lupus]

-//= 1.2 fixed misplaced Grape<->Carrot juices [Lupus]

-//= 1.3 added a loopless menu 'as many as possible' [Lupus]

-//= 1.3a Turned the juice making part of the Juicer npc into a

-//= subfunc.  Changed fruit amount needed to 1.[kobra_k88]

-//= Fixed exploits [Lupus]

-//= 1.6 fixed typo (where did @ipnut came from?) [Lance]

-//= 1.8 got rid of vars: 'MEAT',"MARIANNE","MORRISON"

-//= 	From now, all common quests start using bits of the

-//=	same variable MISC_QUEST [Lupus]

-//============================================================

-

-

-// Morrison ------------------------------------------------

-prt_in.gat,47,173,2	script	Morrison	97,{

-	mes "[Little Morrison]";

-	if(MISC_QUEST&1 || @MORRISON > 10) goto L_GoAway;

-	if(@MORRISON == 10) goto L_Candy;

-

-	mes "Wahhhhh!!! Wahh... NO more! NO more!";

-	mes "I won't... eat anymore stupid ^0000ffFruit^000000 things!!";

-	emotion e_sob;

-	next;

-	menu "Talk",M_Talk,"Cancel",M_End;

-

-	M_Talk:

-		if(countitem(517)) goto L_Meat; //Meat

-

-		mes "[Little Morrison]";

-		mes "Arhhggg!! I'VE HAD ENOUGH!!! I can't eat anymore ^0000ffFruits^000000! They";

-		mes "taste so SOUR..... I have to PEEL them before I can eat them.....";

-		mes "they feel sticky and squishy...... it's really ANNOYING!!!!";

-		emotion e_wah;

-		next;

-		mes "[LIttle Morrison]";

-		mes "I just HATE FRUIT! I can't even get full off of the stuff.(~sigh~)";

-		mes "Give me something more edible..... give me some...... ^ff0000MEAT^000000!!!";

-		close;

-

-		L_Meat:

-		mes "[Little Morrison]";

-		mes "...(sniff)....(sniff)(sniff).... Oh! Is that ^ff0000Meat^000000???";

-		emotion e_ic;

-		next;

-		mes "[Little Morrison]";

-		mes "Do you have some ^ff0000Meat^000000?!!!~(drools)~";

-		mes "Umm... that yummy smell is making me SOOO HUNGRYYYY!!!l";

-		emotion e_rice;

-		next;

-		mes "[Little Morrison]";

-		mes "... Umm... excuse me..... could you give me some of that meat PLEEAASSSE?";

-		emotion e_sob;

-		next;

-		menu "Give him some",sM_Give,"Ignore him",sM_Ignore;

-		

-		sM_Give:

-			if(countitem(517) == 0) goto L_GoAway; //Meat

-			delitem 517,1;	//Meat

-			set @MORRISON,@MORRISON+1;

-			mes "[Little Morrison]";

-			mes "Whoah~!!! It's real Meat, Meat!";

-			mes "Mmmm! It makes my mouth water.";

-			mes "Oh thank you. Now I feel happy. Yum Yum...";

-			emotion e_awsm;

-			close;

-

-		sM_Ignore:

-			set @MORRISON,11;

-			mes "[Little Morrison]";

-			mes "Boo...";

-			mes "Boo... Fine... Alright, Alright~!!! Selfish meanie!";

-			emotion e_bzz;

-			close;

-	M_End:

-		mes "[Little Morrison]";

-		mes "Wahhhh!!! No matter how hard I try, I just can't eat Vegetables";

-		mes "or ^0000ffFruit^000000! They're plain disgusting!!";

-		emotion e_sob;

-		close;

-

-L_GoAway:

-	mes "Pffff... Leave me alone! You DON'T CARE about me! I'm gonna DIE";

-	mes "because of these stupid Veggies and Fuits so MIND your own business!";

-	emotion e_pif;

-	close;

-

-L_Candy:

-	mes "Ah..I am full now. You don't have to feed me any more. I think I";

-	mes "am gonna BURST if I keep eating more.";

-	next;

-	mes "[Little Morrison]";

-	mes "And... um... Take this.";

-	next;

-	getitem 529,3;

-	getitem 530,1;

-	set @MORRISON,0;

-	mes "[Little Morrison]";

-	mes "It is from my secret stash of Candy that I hide from my Mom.  Since";

-	mes "you gave me some Meat, I will give you some candy." ;

-	close;

-

-}

-

-// Housewife Marianne ---------------------------------------------------

-prt_in.gat,49,172,2	script	Housewife Marianne	53,{

-	mes "[Housewife Marianne]";

-	if(MISC_QUEST&1 || @MORRISON > 10) goto L_Juice;

-	if(@MORRISON) goto L_GaveMeat;

-

-	mes "Morrison!! Please eat some fruit will ya? Fruit~!";

-	mes "*Sob*~!! Like father like son...";

-	emotion e_sob;

-	next;

-	menu "Talk",M_Talk,"Cancel",M_Cancel;

-	close;	

-

-	M_Talk:

-		mes "[Housewife Marianne]";

-		mes "(~Sigh~)...This is Morrison... My one and only son. He's going";

-		mes "through some kinda faze and doesn't want to eat any ^0000ffFruits^000000 or";

-		mes "vegetables.";

-		emotion e_shy;

-		next;

-		mes "[Housewife Marianne]";

-		mes "Look at his face..., it turns sour just hearing about ^0000ffFruit^000000...";

-		next;

-		mes "[Housewife Marianne]";

-		mes "All he wants to eat is but ^ff0000Meat^000000... (sigh)...he needs";

-		mes "^0000ffFruits^000000 and vegetables for a proper diet.";

-		next;

-

-	M_Cancel:

-		mes "[Housewife Marianne]";

-		mes "Morrison!! I will get mad at you if you keep doing this!";

-		emotion e_bzz;

-		close;

-	

-L_GaveMeat:

-	set @MORRISON,0;

-	mes "Oh MY GOD!!... Oh lord...";

-	emotion e_omg;

-	next;

-	mes "[Housewife Marianne]";

-	mes "WHAT ARE YOU DOING!! HOW DARE YOU feed my son!! And ^ff0000MEAT^000000 of all things!!!";

-	next;

-	mes "[Housewife Marianne]";

-	mes "Arrrgh~~!! Get Lost right now!!!!!!";

-	emotion e_pif;

-	close;

-

-L_Juice:

-	mes "Thank you for not giving my son any meat.  I'm trying to feed him";

-	mes "^0000ffFruits^000000 and vegetables, but this child doesn't want to eat";

-	mes "anything except Meat...";

-	next;

-	mes "[Housewife Marianne]";

-	mes "What if I could turn ^0000ffFruits^000000 into a ^0000ffJuice^000000... for example...Orange";

-	mes "juice... Would my child like it?";

-	emotion e_hmm;

-	next;

-	mes "[Housewife Marianne]";

-	mes "Ah! Now I remember..There is a town where you can get a variety of";

-	mes "^0000ffFruit^000000 turned into ^0000ffFruit Juices^000000.";

-	emotion e_ic;

-	next;

-	mes "[Housewife Marianne]";

-	mes "... Was is it...^ff0000Payon^000000...or ^ff0000Morroc^000000...?";

-	emotion e_hmm;

-	set @MORRISON,0;

-	set MISC_QUEST,MISC_QUEST | 1;

-	close;

-}

-

-// Juicer Marx Hansen ---------------------------------------------------------

-payon_in03.gat,188,146,5	script	Juicer Marx Hansen	86,{

-	mes "[Juicer Marx Hansen]";

-	if(MISC_QUEST&1) goto L_Juice;

-	mes "Welcome to my shop. What brings you here?";

-	next;

-	menu "Conversation",-,"I am just looking around",M_End;

-		

-		mes "[Juicer Marx Hansen]";

-		mes "In the earliest years of humanity, fruits were the only substanace availble for people to eat.";

-		mes "Fruits were vital for survival and without them people faced certain death.";

-		mes "During that time Mother Nature was worshiped for her generous offerering.";

-		next;

-		mes "[Juicer Marx Hansen]";

-		mes "Nowadays food is plentifull and it comes in a variety of flavors and forms.";

-		mes "With so many other things to eat, fruits aren't consumed as much as they used to be.";

-		mes "This is especially true among kids who'd rather eat pizza and candy.";

-		next;

-		mes "[Juicer Marx Hansen]";

-		mes "Because of this I wanted to find a way to make young people realize the importance of fuit.";

-		mes "I found that when fruits were turned into juices, they became more digestive and even tasty enough for kids.";

-		close;

-	M_End:

-		mes "[Juicer Marx Hansen]";

-		mes "Ok then.";

-		close;

-

-//--------------

-L_Juice:

-//---------

-	mes "Welcome to my shop. Are you here to process Fruits like everyone else?";

-	next;

-	menu "Yes, I am.",M_1a, "How do you make fruit juice?",M_1b, "Nope.",M_1End;

-		

-	M_1a:

-		mes "[Juicer Marx Hansen]";

-		mes "So what kind of fruit juice would you like to process?";

-		next;

-		menu "Apple Juice",sM_1a,"Banana Juice",sM_1b,"Grape Juice",sM_1c,"Carrot Juice",sM_1d,"None.",M_1End;

-

-		sM_1a:

-			callsub sF_Make, 512, "apples", 531;

-			goto M_1a;

-		sM_1b:

-			callsub sF_Make, 513, "bananas", 532;

-			goto M_1a;

-		sM_1c:

-			callsub sF_Make, 514, "grapes", 533;

-			goto M_1a;

-		sM_1d:

-			callsub sF_Make, 515, "carrots", 534;

-			goto M_1a;

-	M_1b:

-		mes "[Juicer Marx Hansen]";

-		mes "# Fruit Juice Info #";

-		mes "- ^FF3355Apple^000000 Juice - Apple x 1 ea, Empty Bottle x 1 ea, 3 zeny.";

-		mes "- ^D5A500Banana^000000 Juice - Banana x 1 ea, Empty Bottle x 1 ea, 3 zeny.";

-		mes "- ^FF8800Carrot^000000 Juice - Carrot x 1 ea, Empty Bottle x 1 ea, 3 zeny.";

-		mes "- ^AA00AAGrape^000000 Juice - Grape x 1 ea, Empty Bottle x 1 ea, 3 zeny.";

-		close;

-	M_1End:

-		mes "[Juicer Marx Hansen]";

-		mes "Oh well... see you next time.";

-		close;

-

-// Subfunction for making juice

-//----------------------------------

-sF_Make:

-	mes "[Juicer Marx Hansen]";

-	mes "How many bottles would you like?";

-	next;

-	menu "I'll tell you.",M_Tell, "As many as possible",-, "I've changed my mind.",M_1End;

-

-		set @amount,1000;		//max possible amount of Juice

-		//calc max possible # juices

-		if(Zeny/3 < @amount) set @amount, Zeny/3;

-		if(countitem(getarg(0)) < @amount) set @amount, countitem(getarg(0));

-		if(countitem(713) < @amount) set @amount, countitem(713);

-		if(@amount > 0) goto L_Make;

-		mes "[Juicer Marx Hansen]";

-		mes "Doh! You don't have enough ingredients for a single bottle of juice.";

-		emotion e_gasp;

-		close;

-

-	M_Tell:

-		mes "[Juicer Marx Hansen]";

-		mes "Very well then. Enter 0 if you don't want any. Also you cannot";

-		mes "buy more than 1000 at a time.";

-		next;

-		input @amount;

-		if(@amount < 1 || @amount > 1000) return;

-		if(countitem(getarg(0)) < @amount) goto sL_NoFruits;

-		if(countitem(713) <  @amount) goto sL_NoBottles;

-		if(Zeny < @amount * 3) goto sL_NoZeny;

-

-	L_Make:

-		delitem getarg(0), @amount;	//del Fruit

-		delitem 713, @amount;		//del Empty Bottle

-		set Zeny, Zeny - @amount * 3;

-		getitem getarg(2), @amount;	//get Juice

-		mes "[Juicer Marx Hansen]";

-		mes "Here you are. Take it.";

-		close;

-

-		sL_NoFruits:

-			mes "[Juicer Marx Hansen]";

-			mes "You don't have enough fruit.";

-			mes "You need " +@amount+ " " +getarg(1)+ " to make that much juice.";

-			next;

-			return;

-		sL_NoBottles:

-			mes "[Juicer Marx Hansen]";

-			mes "You don't have enough bottles.  You need "+@amount+" empty bottle(s) to make that many juice drinks.";

-			next;

-			return;

-		sL_NoZeny:

-			mes "[Juicer Marx Hansen]";

-			mes "You don't have enough zeny.  You need " +(@amount*3)+ " zeny, to make that many juice drinks.";

-			next;

-			return;

-}

+//===== eAthena Script =======================================
+//= Juice Maker Quest
+//===== By: ==================================================
+//= kobra_k88
+//===== Current Version: =====================================
+//= 1.8
+//===== Compatible With: =====================================
+//= eAthena 7.15 +
+//===== Description: =========================================
+//= 
+//===== Additional Comments: =================================
+//= Condition if done: (MISC_QUEST & 1)
+//= 
+//= 1.1 fixed input number check [Lupus]
+//= 1.2 fixed misplaced Grape<->Carrot juices [Lupus]
+//= 1.3 added a loopless menu 'as many as possible' [Lupus]
+//= 1.3a Turned the juice making part of the Juicer npc into a
+//= subfunc.  Changed fruit amount needed to 1.[kobra_k88]
+//= Fixed exploits [Lupus]
+//= 1.6 fixed typo (where did @ipnut came from?) [Lance]
+//= 1.8 got rid of vars: 'MEAT',"MARIANNE","MORRISON"
+//= 	From now, all common quests start using bits of the
+//=	same variable MISC_QUEST [Lupus]
+//============================================================
+
+
+// Morrison ------------------------------------------------
+prt_in.gat,47,173,2	script	Morrison	97,{
+	mes "[Little Morrison]";
+	if(MISC_QUEST&1 || @MORRISON > 10) goto L_GoAway;
+	if(@MORRISON == 10) goto L_Candy;
+
+	mes "Wahhhhh!!! Wahh... NO more! NO more!";
+	mes "I won't... eat anymore stupid ^0000ffFruit^000000 things!!";
+	emotion e_sob;
+	next;
+	menu "Talk",M_Talk,"Cancel",M_End;
+
+	M_Talk:
+		if(countitem(517)) goto L_Meat; //Meat
+
+		mes "[Little Morrison]";
+		mes "Arhhggg!! I'VE HAD ENOUGH!!! I can't eat anymore ^0000ffFruits^000000! They";
+		mes "taste so SOUR..... I have to PEEL them before I can eat them.....";
+		mes "they feel sticky and squishy...... it's really ANNOYING!!!!";
+		emotion e_wah;
+		next;
+		mes "[LIttle Morrison]";
+		mes "I just HATE FRUIT! I can't even get full off of the stuff.(~sigh~)";
+		mes "Give me something more edible..... give me some...... ^ff0000MEAT^000000!!!";
+		close;
+
+		L_Meat:
+		mes "[Little Morrison]";
+		mes "...(sniff)....(sniff)(sniff).... Oh! Is that ^ff0000Meat^000000???";
+		emotion e_ic;
+		next;
+		mes "[Little Morrison]";
+		mes "Do you have some ^ff0000Meat^000000?!!!~(drools)~";
+		mes "Umm... that yummy smell is making me SOOO HUNGRYYYY!!!l";
+		emotion e_rice;
+		next;
+		mes "[Little Morrison]";
+		mes "... Umm... excuse me..... could you give me some of that meat PLEEAASSSE?";
+		emotion e_sob;
+		next;
+		menu "Give him some",sM_Give,"Ignore him",sM_Ignore;
+		
+		sM_Give:
+			if(countitem(517) == 0) goto L_GoAway; //Meat
+			delitem 517,1;	//Meat
+			set @MORRISON,@MORRISON+1;
+			mes "[Little Morrison]";
+			mes "Whoah~!!! It's real Meat, Meat!";
+			mes "Mmmm! It makes my mouth water.";
+			mes "Oh thank you. Now I feel happy. Yum Yum...";
+			emotion e_awsm;
+			close;
+
+		sM_Ignore:
+			set @MORRISON,11;
+			mes "[Little Morrison]";
+			mes "Boo...";
+			mes "Boo... Fine... Alright, Alright~!!! Selfish meanie!";
+			emotion e_bzz;
+			close;
+	M_End:
+		mes "[Little Morrison]";
+		mes "Wahhhh!!! No matter how hard I try, I just can't eat Vegetables";
+		mes "or ^0000ffFruit^000000! They're plain disgusting!!";
+		emotion e_sob;
+		close;
+
+L_GoAway:
+	mes "Pffff... Leave me alone! You DON'T CARE about me! I'm gonna DIE";
+	mes "because of these stupid Veggies and Fuits so MIND your own business!";
+	emotion e_pif;
+	close;
+
+L_Candy:
+	mes "Ah..I am full now. You don't have to feed me any more. I think I";
+	mes "am gonna BURST if I keep eating more.";
+	next;
+	mes "[Little Morrison]";
+	mes "And... um... Take this.";
+	next;
+	getitem 529,3;
+	getitem 530,1;
+	set @MORRISON,0;
+	mes "[Little Morrison]";
+	mes "It is from my secret stash of Candy that I hide from my Mom.  Since";
+	mes "you gave me some Meat, I will give you some candy." ;
+	close;
+
+}
+
+// Housewife Marianne ---------------------------------------------------
+prt_in.gat,49,172,2	script	Housewife Marianne	53,{
+	mes "[Housewife Marianne]";
+	if(MISC_QUEST&1 || @MORRISON > 10) goto L_Juice;
+	if(@MORRISON) goto L_GaveMeat;
+
+	mes "Morrison!! Please eat some fruit will ya? Fruit~!";
+	mes "*Sob*~!! Like father like son...";
+	emotion e_sob;
+	next;
+	menu "Talk",M_Talk,"Cancel",M_Cancel;
+	close;	
+
+	M_Talk:
+		mes "[Housewife Marianne]";
+		mes "(~Sigh~)...This is Morrison... My one and only son. He's going";
+		mes "through some kinda faze and doesn't want to eat any ^0000ffFruits^000000 or";
+		mes "vegetables.";
+		emotion e_shy;
+		next;
+		mes "[Housewife Marianne]";
+		mes "Look at his face..., it turns sour just hearing about ^0000ffFruit^000000...";
+		next;
+		mes "[Housewife Marianne]";
+		mes "All he wants to eat is but ^ff0000Meat^000000... (sigh)...he needs";
+		mes "^0000ffFruits^000000 and vegetables for a proper diet.";
+		next;
+
+	M_Cancel:
+		mes "[Housewife Marianne]";
+		mes "Morrison!! I will get mad at you if you keep doing this!";
+		emotion e_bzz;
+		close;
+	
+L_GaveMeat:
+	set @MORRISON,0;
+	mes "Oh MY GOD!!... Oh lord...";
+	emotion e_omg;
+	next;
+	mes "[Housewife Marianne]";
+	mes "WHAT ARE YOU DOING!! HOW DARE YOU feed my son!! And ^ff0000MEAT^000000 of all things!!!";
+	next;
+	mes "[Housewife Marianne]";
+	mes "Arrrgh~~!! Get Lost right now!!!!!!";
+	emotion e_pif;
+	close;
+
+L_Juice:
+	mes "Thank you for not giving my son any meat.  I'm trying to feed him";
+	mes "^0000ffFruits^000000 and vegetables, but this child doesn't want to eat";
+	mes "anything except Meat...";
+	next;
+	mes "[Housewife Marianne]";
+	mes "What if I could turn ^0000ffFruits^000000 into a ^0000ffJuice^000000... for example...Orange";
+	mes "juice... Would my child like it?";
+	emotion e_hmm;
+	next;
+	mes "[Housewife Marianne]";
+	mes "Ah! Now I remember..There is a town where you can get a variety of";
+	mes "^0000ffFruit^000000 turned into ^0000ffFruit Juices^000000.";
+	emotion e_ic;
+	next;
+	mes "[Housewife Marianne]";
+	mes "... Was is it...^ff0000Payon^000000...or ^ff0000Morroc^000000...?";
+	emotion e_hmm;
+	set @MORRISON,0;
+	set MISC_QUEST,MISC_QUEST | 1;
+	close;
+}
+
+// Juicer Marx Hansen ---------------------------------------------------------
+payon_in03.gat,188,146,5	script	Juicer Marx Hansen	86,{
+	mes "[Juicer Marx Hansen]";
+	if(MISC_QUEST&1) goto L_Juice;
+	mes "Welcome to my shop. What brings you here?";
+	next;
+	menu "Conversation",-,"I am just looking around",M_End;
+		
+		mes "[Juicer Marx Hansen]";
+		mes "In the earliest years of humanity, fruits were the only substanace availble for people to eat.";
+		mes "Fruits were vital for survival and without them people faced certain death.";
+		mes "During that time Mother Nature was worshiped for her generous offerering.";
+		next;
+		mes "[Juicer Marx Hansen]";
+		mes "Nowadays food is plentifull and it comes in a variety of flavors and forms.";
+		mes "With so many other things to eat, fruits aren't consumed as much as they used to be.";
+		mes "This is especially true among kids who'd rather eat pizza and candy.";
+		next;
+		mes "[Juicer Marx Hansen]";
+		mes "Because of this I wanted to find a way to make young people realize the importance of fuit.";
+		mes "I found that when fruits were turned into juices, they became more digestive and even tasty enough for kids.";
+		close;
+	M_End:
+		mes "[Juicer Marx Hansen]";
+		mes "Ok then.";
+		close;
+
+//--------------
+L_Juice:
+//---------
+	mes "Welcome to my shop. Are you here to process Fruits like everyone else?";
+	next;
+	menu "Yes, I am.",M_1a, "How do you make fruit juice?",M_1b, "Nope.",M_1End;
+		
+	M_1a:
+		mes "[Juicer Marx Hansen]";
+		mes "So what kind of fruit juice would you like to process?";
+		next;
+		menu "Apple Juice",sM_1a,"Banana Juice",sM_1b,"Grape Juice",sM_1c,"Carrot Juice",sM_1d,"None.",M_1End;
+
+		sM_1a:
+			callsub sF_Make, 512, "apples", 531;
+			goto M_1a;
+		sM_1b:
+			callsub sF_Make, 513, "bananas", 532;
+			goto M_1a;
+		sM_1c:
+			callsub sF_Make, 514, "grapes", 533;
+			goto M_1a;
+		sM_1d:
+			callsub sF_Make, 515, "carrots", 534;
+			goto M_1a;
+	M_1b:
+		mes "[Juicer Marx Hansen]";
+		mes "# Fruit Juice Info #";
+		mes "- ^FF3355Apple^000000 Juice - Apple x 1 ea, Empty Bottle x 1 ea, 3 zeny.";
+		mes "- ^D5A500Banana^000000 Juice - Banana x 1 ea, Empty Bottle x 1 ea, 3 zeny.";
+		mes "- ^FF8800Carrot^000000 Juice - Carrot x 1 ea, Empty Bottle x 1 ea, 3 zeny.";
+		mes "- ^AA00AAGrape^000000 Juice - Grape x 1 ea, Empty Bottle x 1 ea, 3 zeny.";
+		close;
+	M_1End:
+		mes "[Juicer Marx Hansen]";
+		mes "Oh well... see you next time.";
+		close;
+
+// Subfunction for making juice
+//----------------------------------
+sF_Make:
+	mes "[Juicer Marx Hansen]";
+	mes "How many bottles would you like?";
+	next;
+	menu "I'll tell you.",M_Tell, "As many as possible",-, "I've changed my mind.",M_1End;
+
+		set @amount,1000;		//max possible amount of Juice
+		//calc max possible # juices
+		if(Zeny/3 < @amount) set @amount, Zeny/3;
+		if(countitem(getarg(0)) < @amount) set @amount, countitem(getarg(0));
+		if(countitem(713) < @amount) set @amount, countitem(713);
+		if(@amount > 0) goto L_Make;
+		mes "[Juicer Marx Hansen]";
+		mes "Doh! You don't have enough ingredients for a single bottle of juice.";
+		emotion e_gasp;
+		close;
+
+	M_Tell:
+		mes "[Juicer Marx Hansen]";
+		mes "Very well then. Enter 0 if you don't want any. Also you cannot";
+		mes "buy more than 1000 at a time.";
+		next;
+		input @amount;
+		if(@amount < 1 || @amount > 1000) return;
+		if(countitem(getarg(0)) < @amount) goto sL_NoFruits;
+		if(countitem(713) <  @amount) goto sL_NoBottles;
+		if(Zeny < @amount * 3) goto sL_NoZeny;
+
+	L_Make:
+		delitem getarg(0), @amount;	//del Fruit
+		delitem 713, @amount;		//del Empty Bottle
+		set Zeny, Zeny - @amount * 3;
+		getitem getarg(2), @amount;	//get Juice
+		mes "[Juicer Marx Hansen]";
+		mes "Here you are. Take it.";
+		close;
+
+		sL_NoFruits:
+			mes "[Juicer Marx Hansen]";
+			mes "You don't have enough fruit.";
+			mes "You need " +@amount+ " " +getarg(1)+ " to make that much juice.";
+			next;
+			return;
+		sL_NoBottles:
+			mes "[Juicer Marx Hansen]";
+			mes "You don't have enough bottles.  You need "+@amount+" empty bottle(s) to make that many juice drinks.";
+			next;
+			return;
+		sL_NoZeny:
+			mes "[Juicer Marx Hansen]";
+			mes "You don't have enough zeny.  You need " +(@amount*3)+ " zeny, to make that many juice drinks.";
+			next;
+			return;
+}
diff --git a/npc/quests/juperos.txt b/npc/quests/juperos.txt
index 6e189c0e3..9ba600aef 100644
--- a/npc/quests/juperos.txt
+++ b/npc/quests/juperos.txt
@@ -1,132 +1,132 @@
-//===== Athena Script =====================================

-//= Juperos Dungeon Quests

-//===== By ================================================

-//= MasterOfMuppets

-//===== Version ===========================================

-//= 1.0

-//===== Compatible With ===================================

-//= eAthena 1.0

-//===== Description =======================================

-//= 

-//===== Comments ==========================================

-//= 1.0 First version, partly implemented [MasterOfMuppets]

-//=========================================================

-

-juperos_01.gat,79,91,1	script	Sculpture#Juperos1	111,{

-

-	mes "^3131FFIt's a sculpture that";

-	mes "looks familiar to you.";

-	close;

-

-}

-

-juperos_01.gat,100,71,1	script	Bronze Statue#Juperos2	111,{

-

-	mes "^3131FFIt's an elaborate";

-	mes "bronze statue that";

-	mes "is twice the height of";

-	mes "a normal human being.";

-	close;

-

-}

-

-juperos_01.gat,124,92,1	script	Stone Statue#Juperos3	111,{

-

-	mes "^3131FFIt's an old";

-	mes "statue sculpted";

-	mes "out of stone.";

-	close;

-

-}

-

-//Quest related?

-//juperos_01.gat,x,y,1	script	Bronze Statue#Juperos4	111,{

-//

-//	mes "^3131FFThere's a peculiar";

-//	mes "engraving on the";

-//	mes "Bronze Statue's rod.";

-//	next;

-//	menu "Investigate",s_Invest,"Ignore it",-;

-//

-//	close;

-//

-//s_Invest:

-//

-//	mes "^3131FFIt's an inscription that's";

-//	mes "written in an old language";

-//	mes "that you can't understand,";

-//	mes "but have no problem reading";

-//	mes "and making out the sounds";

-//	mes "for some weird reason.";

-//	next;

-//	mes "[" + strcharinfo(0) + "]";

-//	mes "This is creepy!";

-//	mes "I know that I'm not";

-//	mes "supposed to be able";

-//	mes "to read this, but here";

-//	mes "I am. I know what sounds";

-//	mes "all of these letters make...";

-//	next;

-//	mes "[" + strcharinfo(0) + "]";

-//	mes "Huh. Only a scholar,";

-//	mes "maybe someone even in";

-//	mes "Juno, could make sense";

-//	mes "of what this stuff says.";

-//	close;

-//

-//}

-

-juperos_02.gat,1,1,1	script	JuperosLvl2QuestInit	-1,{

-OnInit:

-while(1)

-	{

-

-		monster "juperos_02.gat",24,276,"1st Gate Switch",1674,1,"JuperosLvl2QuestInit::OnGate1Dead";

-		monster "juperos_02.gat",240,29,"2nd Gate Switch",1674,1,"JuperosLvl2QuestInit::OnGate2Dead";

-		monster "juperos_02.gat",282,183,"3rd Gate Switch",1674,1,"JuperosLvl2QuestInit::OnGate3Dead";

-		end;

-

-OnGate1Dead:

-

-	mapannounce "juperos_02.gat","Have you come seeking Juperos?! It no longer exists...",1,0xFF0000;

-	set $JupeGate1,1;

-	if($JupeGate1 && $JupeGate2 && $JupeGate3)goto s_WarpOpen;

-	end;

-

-OnGate2Dead:

-

-	mapannounce "juperos_02.gat","Who are you to come here?",1,0xFF0000;

-	set $JupeGate2,1;

-	if($JupeGate1 && $JupeGate2 && $JupeGate3)goto s_WarpOpen;

-	end;

-

-OnGate3Dead:

-

-	mapannounce "juperos_02.gat","Have you come to see me? Fine! Find me first!",1,0xFF0000;

-	set $JupeGate3,1;

-	if($JupeGate1 && $JupeGate2 && $JupeGate3)goto s_WarpOpen;

-	end;

-

-s_WarpOpen:

-	attachnpctimer;

-	initnpctimer;

-		end;

-	OnTimer3000:

-		mapannounce "juperos_02.gat","Vroom! Vroom!",1,0xBA55D3;

-		end;

-	OnTimer6000:

-		mapannounce "juperos_02.gat","Attention, visitors.",1,0xBA55D3;

-		end;

-	OnTimer9000:

-		mapannounce "juperos_02.gat","You are allowed to enter the next zone for a short period of time. Please use the portal in the center of the map.",1,0xBA55D3;

-		enablenpc "JupeWarp2";

-		end;

-	OnTimer309000:

-		mapannounce "juperos_02.gat","The portal has now closed.",1,0xBA55D3;

-		disablenpc "JupeWarp2";

-		set $JupeGate1,0;

-		set $JupeGate2,0;

-		set $JupeGate3,0;

-	stopnpctimer;

-	}

-}

+//===== Athena Script =====================================
+//= Juperos Dungeon Quests
+//===== By ================================================
+//= MasterOfMuppets
+//===== Version ===========================================
+//= 1.0
+//===== Compatible With ===================================
+//= eAthena 1.0
+//===== Description =======================================
+//= 
+//===== Comments ==========================================
+//= 1.0 First version, partly implemented [MasterOfMuppets]
+//=========================================================
+
+juperos_01.gat,79,91,1	script	Sculpture#Juperos1	111,{
+
+	mes "^3131FFIt's a sculpture that";
+	mes "looks familiar to you.";
+	close;
+
+}
+
+juperos_01.gat,100,71,1	script	Bronze Statue#Juperos2	111,{
+
+	mes "^3131FFIt's an elaborate";
+	mes "bronze statue that";
+	mes "is twice the height of";
+	mes "a normal human being.";
+	close;
+
+}
+
+juperos_01.gat,124,92,1	script	Stone Statue#Juperos3	111,{
+
+	mes "^3131FFIt's an old";
+	mes "statue sculpted";
+	mes "out of stone.";
+	close;
+
+}
+
+//Quest related?
+//juperos_01.gat,x,y,1	script	Bronze Statue#Juperos4	111,{
+//
+//	mes "^3131FFThere's a peculiar";
+//	mes "engraving on the";
+//	mes "Bronze Statue's rod.";
+//	next;
+//	menu "Investigate",s_Invest,"Ignore it",-;
+//
+//	close;
+//
+//s_Invest:
+//
+//	mes "^3131FFIt's an inscription that's";
+//	mes "written in an old language";
+//	mes "that you can't understand,";
+//	mes "but have no problem reading";
+//	mes "and making out the sounds";
+//	mes "for some weird reason.";
+//	next;
+//	mes "[" + strcharinfo(0) + "]";
+//	mes "This is creepy!";
+//	mes "I know that I'm not";
+//	mes "supposed to be able";
+//	mes "to read this, but here";
+//	mes "I am. I know what sounds";
+//	mes "all of these letters make...";
+//	next;
+//	mes "[" + strcharinfo(0) + "]";
+//	mes "Huh. Only a scholar,";
+//	mes "maybe someone even in";
+//	mes "Juno, could make sense";
+//	mes "of what this stuff says.";
+//	close;
+//
+//}
+
+juperos_02.gat,1,1,1	script	JuperosLvl2QuestInit	-1,{
+OnInit:
+while(1)
+	{
+
+		monster "juperos_02.gat",24,276,"1st Gate Switch",1674,1,"JuperosLvl2QuestInit::OnGate1Dead";
+		monster "juperos_02.gat",240,29,"2nd Gate Switch",1674,1,"JuperosLvl2QuestInit::OnGate2Dead";
+		monster "juperos_02.gat",282,183,"3rd Gate Switch",1674,1,"JuperosLvl2QuestInit::OnGate3Dead";
+		end;
+
+OnGate1Dead:
+
+	mapannounce "juperos_02.gat","Have you come seeking Juperos?! It no longer exists...",1,0xFF0000;
+	set $JupeGate1,1;
+	if($JupeGate1 && $JupeGate2 && $JupeGate3)goto s_WarpOpen;
+	end;
+
+OnGate2Dead:
+
+	mapannounce "juperos_02.gat","Who are you to come here?",1,0xFF0000;
+	set $JupeGate2,1;
+	if($JupeGate1 && $JupeGate2 && $JupeGate3)goto s_WarpOpen;
+	end;
+
+OnGate3Dead:
+
+	mapannounce "juperos_02.gat","Have you come to see me? Fine! Find me first!",1,0xFF0000;
+	set $JupeGate3,1;
+	if($JupeGate1 && $JupeGate2 && $JupeGate3)goto s_WarpOpen;
+	end;
+
+s_WarpOpen:
+	attachnpctimer;
+	initnpctimer;
+		end;
+	OnTimer3000:
+		mapannounce "juperos_02.gat","Vroom! Vroom!",1,0xBA55D3;
+		end;
+	OnTimer6000:
+		mapannounce "juperos_02.gat","Attention, visitors.",1,0xBA55D3;
+		end;
+	OnTimer9000:
+		mapannounce "juperos_02.gat","You are allowed to enter the next zone for a short period of time. Please use the portal in the center of the map.",1,0xBA55D3;
+		enablenpc "JupeWarp2";
+		end;
+	OnTimer309000:
+		mapannounce "juperos_02.gat","The portal has now closed.",1,0xBA55D3;
+		disablenpc "JupeWarp2";
+		set $JupeGate1,0;
+		set $JupeGate2,0;
+		set $JupeGate3,0;
+	stopnpctimer;
+	}
+}
diff --git a/npc/quests/metto_quest.txt b/npc/quests/metto_quest.txt
index fd4a678e5..d1e2244a8 100644
--- a/npc/quests/metto_quest.txt
+++ b/npc/quests/metto_quest.txt
@@ -1,336 +1,336 @@
-//===== eAthena Script ======================================= 

-//= Metto Quest

-//===== By: ================================================== 

-//= I have no idea.

-//===== Current Version: ===================================== 

-//= 1.1

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//= Metto Quest

-//===== Additional Comments: ================================= 

-//= Separated from cities/yuno.txt

-//============================================================ 

-

-

-yuno_in03.gat,25,39,3	script	Metto	709,{

-	mes "[Metto]";

-	if(metto_q == 2 || metto_q == 4 || metto_q == 6) goto L_Check;

-	if(metto_q == 1) goto L_Stang;

-	if(metto_q == 3) goto L_Kato;

-	if(metto_q == 5) goto L_Cici;

-	if(metto_q == 7) goto L_Ruined;

-	if(metto_q > 7) goto L_Done;

-	mes "Whether it be today, tomorrow, or the next day, I spend every moment I have on my research.";

-	mes "My whole life has been dedicated to making............";

-	next;

-	mes "[Metto]";

-	mes "NEW YUNO, my own kingdom.  In order to do that I must research how this city floats in the air.";

-	mes "If I'm able to do so..... my goals will no longer be a mere dream, but a reality!!";

-	next;

-	mes "[Metto]";

-	mes "That ^5544FFWagan^000000 thinks my research means nothing......";

-	mes "But he doesn't realize that my ideas have been blessed by the Gods themselves!";

-	close;

-

-L_Stang:

-	mes "I'm going to ask my colleague ^5533FFStangckle^000000 to help me.  I am sure he will be more than willing to help out an old friend.";

-	next;

-	mes "[Metto]";

-	mes "Hmmm.... If I had that fellow's help, this would be much easier.... Pray! Pray to whatever God you believe in that we will succeed!";

-	set metto_q, 2;

-	close;

-L_Kato:

-	mes "What??!! That fool Stangckle said he doesn't want to help me?? This is not good...... My research will slow down considerably.";

-	mes "......... What will I do now?!?!?";

-	emotion e_swt2;

-	next;

-	mes "[Metto]";

-	mes "Luckily I have a backup plan.  I'm certain that my friend and colleague ^5533FFKato^000000 will lend me a hand.";

-	next;

-	mes "[Metto]";

-	mes "If I could only get a chance to study his super robot, the 'Great Z', I could continue my research.......";

-	next;

-	mes "[Metto]";

-	mes "That Stangckle can have it his way for all I care.  Even if he doesn't help me, my research will still go on.... it must!";

-	next;

-	mes "[Metto]";

-	mes "Expect great things from me young friend..... MUHAHAHAHAH!!!!";

-	set metto_q, 4;

-	emotion e_gg;

-	close;

-L_Cici:

-	mes "WHAT!?!? You're telling me that the very thing I need to continue my research with... the Great Z.... has been DESTROYED!?!?";

-	emotion e_wah;

-	next;

-	mes "[Metto]";

-	mes "NOOOOOOO!!! Why?? How?? Why would he do that? Are the Gods cursing me?!?";

-	emotion e_an;

-	next;

-	mes "[Metto]";

-	mes "Wait.... I need to calm down...";

-	mes "If I can just get the help of professor ^5533FFCiCi^000000 with his 'Riding Engine Theory', I may be able to finish my research.......";

-	next;

-	mes "[Metto]";

-	mes "*sigggghhhh* I still have hope...... YES I DO!! HAHAHA!!!";

-	set metto_q, 6;

-	emotion e_gg;

-	close;

-L_Check:

-	mes "I better get going so I can check this new thing out..... What are you still doing here?";

-	mes "I'll be leaving in a bit.  I need to get ready so why don't you go ahead and just take off.......";

-	close;

-L_Ruined:

-	mes "............................";

-	next;

-	mes "[Metto]";

-	mes "How could something like this happen?? All 3 of my colleagues abandoning me all at once?!?!";

-	mes "It's true....... the Gods HAVE forsaken me..... I'm ruined...... RUINED!!!";

-	emotion e_sob;

-	next;

-	mes "[Metto]";

-	mes "What else can I do now? Has the time really come for me to let go of all of my research?....";

-	mes "Those many, many years of research?........";

-	emotion e_sob;

-	next;

-	mes "[Metto]";

-	mes "You must be disappointed...... but please, forget about all of this... forget about me........";

-	mes "Who would do this to me? What kind of malicious person would shatter a man's dreams??";

-	next;

-	mes "[Metto]";

-	mes "I suddenly feel tired now....... It's time for me to give up....... It's all over.  Please don't be too disappointed.......";

-	set metto_q, 8;

-	close;

-L_Done:

-	mes "Maybe I should look into getting a job change.  I hear it's a popular thing to do these days.  I wonder what profession I should go into?";

-	mes "All I know for sure is that I don't want to be a scientist anymore.";

-	next;

-	mes "[Metto]";

-	mes "I'm done with research forever.............";

-	close;

-}

-

-//=====================================================================

-yuno_in01.gat,18,95,5	script	Stangckle	99,{

-	mes "[Stangckle]";

-	if(metto_q > 2) goto L_Done;

-	if(metto_q == 2) goto L_Start;

-	mes "I am one of the scientists in this city.  My name is ^5533FFStangckle^000000.";

-	mes "Remember my name for it may be useful to you in the future.  Who knows, I may just invent something incredible.";

-	close;

-L_Start:

-	mes "What can I do for you? My colleague Metto is coming here soon, so I don't have much time.";

-	mes "So what did you say you needed??";

-	next;

-	menu "I need to talk to you about Metto!!",-, "Actually I don't need anything.",M_End;

-

-		mes "[Stangckle]";

-		mes "......................";

-		next;

-		mes "[Stangckle]";

-		mes "..................................";

-		next;

-		mes "[Stangckle]";

-		mes "Is this true?? Metto doesn't think of me as a colleague, and is only USING me?";

-		mes "He sees me as a lowly assistant and is going to STEAL all the CREDIT for our discoveries?!!";

-		emotion e_omg;

-		next;

-		mes "[Stangckle]";

-		mes "I can't believe I trusted him..... the rumors were true.... he IS a selfish mad man!!!.......";

-		mes "And to think I respected a scumbag like that!!";

-		emotion e_pif;

-		next;

-		mes "[Stangckle]";

-		mes "I don't think I can even bear to see his disgusting face anymore.....";

-		next;

-		mes "[Stangckle]";

-		mes "I'm glad that an honest and trustworthy person such as yourself had the guts to tell me the ugly truth about Metto.";

-		mes "Thank you for sharing that information with me.";

-		next;

-		mes "[Stangckle]";

-		mes "Now if you'll excuse me, I have some work to do.";

-		set metto_q, 3;

-		close;

-	M_End:

-		mes "[Stangckle]";

-		mes "What are you doing here then? Stop wasting my time.";

-		emotion e_swt;

-		close;

-L_Done:

-	mes "So Metto was truly a mad scientist after all...... I guess he will be the one who will ultimately pay for that choice.......";

-	close;

-}

-

-//===================================================================

-yuno_in01.gat,19,182,3	script	Kato	55,{

-	mes "[Kato]";

-	if(metto_q > 4) goto L_Done;

-	if(metto_q == 4) goto L_Start;

-	mes "I am a scientist that specializes in ^5533FFArtificial Intelligence and Robotics^000000.";

-	mes "Although I'm not working on a specific project at this moment, my latest creation the 'Great Z' is truly a work of sheer genius!";

-	close;

-

-L_Start:

-	mes "As a scientist I research many different things.... of course this research is private.  What can I do for you?";

-	next;

-	menu "I have news from Metto!",-, "Just wanted to say hello.",M_End;

-

-		mes "[Kato]";

-		mes "WHAT!!?? Metto said my Great Z is INFERIOR to Stangckles research!!??";

-		mes "He.... he said I should rename it to 'LAME Z'??.......";

-		emotion e_omg;

-		next;

-		mes "[Kato]";

-		mes "*Sniff* I... I don't believe it.... *sob* how could he say that?..... If... if my invention is no good.....";

-		mes "Then I guess I should destroy it.... my Great Z.... *sigh*";

-		emotion e_sob;

-		next;

-		mes "[Kato]";

-		mes "How could that Metto be such a heartless bastard?? Thank you for letting me know Metto's TRUE feelings about my work.";

-		set metto_q, 5;

-		close;

-	M_End:

-		mes "[Kato]";

-		mes "........... Okay.... Um.... Hey........";

-		close;

-

-L_Done:

-	mes "I am interested in researching artificial intelligence.  You know, like robots.";

-	mes "I know that it is something very difficult to accomplish, but where there's a will, there's a way.";

-	next;

-	mes "[Kato]";

-	mes "If you ever see something amazing that is similar to what I described, you'll know that it's my handwork.";

-	close;

-}

-

-//===================================================================

-yuno_in03.gat,179,43,5	script	CiCi	121,{

-	mes "[CiCi]";

-	if(metto_q > 6) goto L_Done;

-	mes "My name is ^5533FFCiCi^000000.  I am one of the ^5533FF3 great scientists^000000 that live in this city.";

-	mes "Although there are many great scientists in this town, being one of the top 3 is a true honor don't you think??";

-	if(metto_q == 6) goto L_Start;

-	close;

-

-L_Start:

-	next;

-	mes "[CiCi]";

-	mes "Heh, I guess I was being a little to egoistical there.... anyways what can I do for you?";

-	next;

-	menu "Metto wanted me to tell you this......",-, "Nothing, just saying hey.",M_End;

-

-		mes "[CiCi]";

-		mes "Hmm?? Metto said that he doesn't need my Riding Engine Theory?? Hmphf! How dare he!!!";

-		emotion e_pif;

-		next;

-		mes "[CiCi]";

-		mes "I have half a mind to teach him a little something about TRUE science and INTELLIGENT research!!";

-		emotion e_ag;

-		next;

-		mes "[CiCi]";

-		mes "... Whatever.... I don't have the necessary equipment to help him anyways.";

-		mes "I guess, either way, he didn't have a chance.";

-		next;

-		mes "[CiCi]";

-		mes "Let him know that I didn't really want to be a part of what he was doing in the first place.";

-		mes "He isn't even doing the type of research that could be publicized.........";

-		set metto_q, 7;

-		close;

-

-	M_End:

-		mes "[CiCi]";

-		mes "What? That's it? You just wanted to waste some time?...........";

-		emotion e_swt;

-		close;

-

-L_Done:

-	mes "Hmm... I want to improve the Riding Engine but I lack the necessary parts.  What a headache....";

-	mes "Metto never offered me any help at all.  This is not going to be easy.......";

-	close;

-}

-

-//===================================================================

-yuno_in01.gat,18,30,3	script	Wagan	85,{

-	mes "[Wagan]";

-	if(metto_q > 0) goto L_Check;

-	mes "I'm sure you know that our village has been able to prosper for many years because of the brilliant research done here.";

-	mes "We owe a great deal to those who have dedicated their lives to research and study.";

-	next;

-	mes "[Wagan]";

-	mes "It is because of them that we can enjoy such a wonderful quality of life here.";

-	mes "They have been able to work together and support each other which is great to see.";

-	next;

-	mes "[Wagan]";

-	mes "Unfortunately there are a few 'bad apples' that cause problems within this solid community of researchers.";

-	next;

-	mes "[Wagan]";

-	mes "These people just drive me crazy!";

-	emotion e_an;

-	next;

-	mes "[Wagan]";

-	mes "They think only of themselves and their crazy actions make it much more difficult for everyone else.";

-	mes "Out of those few selfish mad men, ^FF3333'Metto'^000000 must be the worst by far.";

-	next;

-	mes "[Wagan]";

-	mes "This disturbed individual does nothing but destroy public facilities, create harmful pollutants, disrupt other peoples lives......";

-	next;

-	mes "[Wagan]";

-	mes "..... the list goes on and on.  What's worse..... He tries to justify his dreadful actions by calling it 'research'!!!!";

-	mes "He has definitely lost his sanity and has gone too far!!";

-	emotion e_ag;

-	next;

-	mes "[Wagan]";

-	mes "If only there was a way to stop this mad man from destroying our community......";

-	mes "I just wish there was someone capable and brave enough to put an end to ^FF3333Metto's^000000 insanity.......";

-	next;

-	menu "Leave it to me.",-, "I wish your city the best of luck...",M_End;

-

-		mes "[Wagan]";

-		mes "Oh?? Are you really going to help us stop Metto? Our city would be very grateful if you could do this.......";

-		mes "But how exactly do you plan on accomplishing this rather difficult task?";

-		emotion e_what;

-		next;

-		menu "Yeah it's pretty hard....",M_End, "Well, I guess I need to think of a plan now.....",-;

-

-			mes "[Wagan]";

-			mes "Yes a solid plan will be necessary to put a stop to Metto.  You will need to trick him into quitting his evil experiments somehow......";

-			mes "It will have to be something subtle like....... hmm........";

-			next;

-			mes "[Wagan]";

-			mes "... Sabotaging his experiments in a way that makes it look like he was destined to fail.";

-			mes "He is talkative so you may be able to get him to tell you everything you need to know about his work.";

-			next;

-			mes "[Wagan]";

-			mes "To be honest.... I have been thinking about this plan for a while.........";

-			set metto_q, 1;

-			close;

-	M_End:

-		mes "[Wagan]";

-		mes "We will have to hope that fate will be on our side as we wait for things to unfold......";

-		mes "Come to think of it.... Metto is a strong believer in fate..... If we could only use that to your advantage somehow....";

-		close;

-L_Check:

-	if(metto_q == 8) goto L_Thank;

-	if(metto_q == 9) goto L_Done;

-	mes "How goes your work on sabotaging Metto's experiments?  Hopefully the plan is going well.";

-	mes "I'm sorry to involve you in our city's problems, but we really do appreciate you efforts.";

-	close;

-L_Thank:

-	mes "Is this true? You were able to shut down Metto's research? Thank you sooo much for your help.";

-	mes "Without Metto causing trouble we have a lot less to worry about.";

-	emotion e_ic;

-	next;

-	mes "[Wagan]";

-	mes "The people of this city are grateful to you.  Here is a little token of our appreciation......";

-	next;

-	mes "[Wagan]";

-	mes "Thank you once again for your assistance! I wish you the best of luck in all of your future endeavors!!!";

-	getitem 715,10;

-	emotion e_thx;

-	set metto_q, 9;

-	close;

-L_Done:

-	mes "Things have been much more peaceful around here now that Metto has been shut down.  Thank you once again for your help.";

-	emotion e_thx;

-	close;

+//===== eAthena Script ======================================= 
+//= Metto Quest
+//===== By: ================================================== 
+//= I have no idea.
+//===== Current Version: ===================================== 
+//= 1.1
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//= Metto Quest
+//===== Additional Comments: ================================= 
+//= Separated from cities/yuno.txt
+//============================================================ 
+
+
+yuno_in03.gat,25,39,3	script	Metto	709,{
+	mes "[Metto]";
+	if(metto_q == 2 || metto_q == 4 || metto_q == 6) goto L_Check;
+	if(metto_q == 1) goto L_Stang;
+	if(metto_q == 3) goto L_Kato;
+	if(metto_q == 5) goto L_Cici;
+	if(metto_q == 7) goto L_Ruined;
+	if(metto_q > 7) goto L_Done;
+	mes "Whether it be today, tomorrow, or the next day, I spend every moment I have on my research.";
+	mes "My whole life has been dedicated to making............";
+	next;
+	mes "[Metto]";
+	mes "NEW YUNO, my own kingdom.  In order to do that I must research how this city floats in the air.";
+	mes "If I'm able to do so..... my goals will no longer be a mere dream, but a reality!!";
+	next;
+	mes "[Metto]";
+	mes "That ^5544FFWagan^000000 thinks my research means nothing......";
+	mes "But he doesn't realize that my ideas have been blessed by the Gods themselves!";
+	close;
+
+L_Stang:
+	mes "I'm going to ask my colleague ^5533FFStangckle^000000 to help me.  I am sure he will be more than willing to help out an old friend.";
+	next;
+	mes "[Metto]";
+	mes "Hmmm.... If I had that fellow's help, this would be much easier.... Pray! Pray to whatever God you believe in that we will succeed!";
+	set metto_q, 2;
+	close;
+L_Kato:
+	mes "What??!! That fool Stangckle said he doesn't want to help me?? This is not good...... My research will slow down considerably.";
+	mes "......... What will I do now?!?!?";
+	emotion e_swt2;
+	next;
+	mes "[Metto]";
+	mes "Luckily I have a backup plan.  I'm certain that my friend and colleague ^5533FFKato^000000 will lend me a hand.";
+	next;
+	mes "[Metto]";
+	mes "If I could only get a chance to study his super robot, the 'Great Z', I could continue my research.......";
+	next;
+	mes "[Metto]";
+	mes "That Stangckle can have it his way for all I care.  Even if he doesn't help me, my research will still go on.... it must!";
+	next;
+	mes "[Metto]";
+	mes "Expect great things from me young friend..... MUHAHAHAHAH!!!!";
+	set metto_q, 4;
+	emotion e_gg;
+	close;
+L_Cici:
+	mes "WHAT!?!? You're telling me that the very thing I need to continue my research with... the Great Z.... has been DESTROYED!?!?";
+	emotion e_wah;
+	next;
+	mes "[Metto]";
+	mes "NOOOOOOO!!! Why?? How?? Why would he do that? Are the Gods cursing me?!?";
+	emotion e_an;
+	next;
+	mes "[Metto]";
+	mes "Wait.... I need to calm down...";
+	mes "If I can just get the help of professor ^5533FFCiCi^000000 with his 'Riding Engine Theory', I may be able to finish my research.......";
+	next;
+	mes "[Metto]";
+	mes "*sigggghhhh* I still have hope...... YES I DO!! HAHAHA!!!";
+	set metto_q, 6;
+	emotion e_gg;
+	close;
+L_Check:
+	mes "I better get going so I can check this new thing out..... What are you still doing here?";
+	mes "I'll be leaving in a bit.  I need to get ready so why don't you go ahead and just take off.......";
+	close;
+L_Ruined:
+	mes "............................";
+	next;
+	mes "[Metto]";
+	mes "How could something like this happen?? All 3 of my colleagues abandoning me all at once?!?!";
+	mes "It's true....... the Gods HAVE forsaken me..... I'm ruined...... RUINED!!!";
+	emotion e_sob;
+	next;
+	mes "[Metto]";
+	mes "What else can I do now? Has the time really come for me to let go of all of my research?....";
+	mes "Those many, many years of research?........";
+	emotion e_sob;
+	next;
+	mes "[Metto]";
+	mes "You must be disappointed...... but please, forget about all of this... forget about me........";
+	mes "Who would do this to me? What kind of malicious person would shatter a man's dreams??";
+	next;
+	mes "[Metto]";
+	mes "I suddenly feel tired now....... It's time for me to give up....... It's all over.  Please don't be too disappointed.......";
+	set metto_q, 8;
+	close;
+L_Done:
+	mes "Maybe I should look into getting a job change.  I hear it's a popular thing to do these days.  I wonder what profession I should go into?";
+	mes "All I know for sure is that I don't want to be a scientist anymore.";
+	next;
+	mes "[Metto]";
+	mes "I'm done with research forever.............";
+	close;
+}
+
+//=====================================================================
+yuno_in01.gat,18,95,5	script	Stangckle	99,{
+	mes "[Stangckle]";
+	if(metto_q > 2) goto L_Done;
+	if(metto_q == 2) goto L_Start;
+	mes "I am one of the scientists in this city.  My name is ^5533FFStangckle^000000.";
+	mes "Remember my name for it may be useful to you in the future.  Who knows, I may just invent something incredible.";
+	close;
+L_Start:
+	mes "What can I do for you? My colleague Metto is coming here soon, so I don't have much time.";
+	mes "So what did you say you needed??";
+	next;
+	menu "I need to talk to you about Metto!!",-, "Actually I don't need anything.",M_End;
+
+		mes "[Stangckle]";
+		mes "......................";
+		next;
+		mes "[Stangckle]";
+		mes "..................................";
+		next;
+		mes "[Stangckle]";
+		mes "Is this true?? Metto doesn't think of me as a colleague, and is only USING me?";
+		mes "He sees me as a lowly assistant and is going to STEAL all the CREDIT for our discoveries?!!";
+		emotion e_omg;
+		next;
+		mes "[Stangckle]";
+		mes "I can't believe I trusted him..... the rumors were true.... he IS a selfish mad man!!!.......";
+		mes "And to think I respected a scumbag like that!!";
+		emotion e_pif;
+		next;
+		mes "[Stangckle]";
+		mes "I don't think I can even bear to see his disgusting face anymore.....";
+		next;
+		mes "[Stangckle]";
+		mes "I'm glad that an honest and trustworthy person such as yourself had the guts to tell me the ugly truth about Metto.";
+		mes "Thank you for sharing that information with me.";
+		next;
+		mes "[Stangckle]";
+		mes "Now if you'll excuse me, I have some work to do.";
+		set metto_q, 3;
+		close;
+	M_End:
+		mes "[Stangckle]";
+		mes "What are you doing here then? Stop wasting my time.";
+		emotion e_swt;
+		close;
+L_Done:
+	mes "So Metto was truly a mad scientist after all...... I guess he will be the one who will ultimately pay for that choice.......";
+	close;
+}
+
+//===================================================================
+yuno_in01.gat,19,182,3	script	Kato	55,{
+	mes "[Kato]";
+	if(metto_q > 4) goto L_Done;
+	if(metto_q == 4) goto L_Start;
+	mes "I am a scientist that specializes in ^5533FFArtificial Intelligence and Robotics^000000.";
+	mes "Although I'm not working on a specific project at this moment, my latest creation the 'Great Z' is truly a work of sheer genius!";
+	close;
+
+L_Start:
+	mes "As a scientist I research many different things.... of course this research is private.  What can I do for you?";
+	next;
+	menu "I have news from Metto!",-, "Just wanted to say hello.",M_End;
+
+		mes "[Kato]";
+		mes "WHAT!!?? Metto said my Great Z is INFERIOR to Stangckles research!!??";
+		mes "He.... he said I should rename it to 'LAME Z'??.......";
+		emotion e_omg;
+		next;
+		mes "[Kato]";
+		mes "*Sniff* I... I don't believe it.... *sob* how could he say that?..... If... if my invention is no good.....";
+		mes "Then I guess I should destroy it.... my Great Z.... *sigh*";
+		emotion e_sob;
+		next;
+		mes "[Kato]";
+		mes "How could that Metto be such a heartless bastard?? Thank you for letting me know Metto's TRUE feelings about my work.";
+		set metto_q, 5;
+		close;
+	M_End:
+		mes "[Kato]";
+		mes "........... Okay.... Um.... Hey........";
+		close;
+
+L_Done:
+	mes "I am interested in researching artificial intelligence.  You know, like robots.";
+	mes "I know that it is something very difficult to accomplish, but where there's a will, there's a way.";
+	next;
+	mes "[Kato]";
+	mes "If you ever see something amazing that is similar to what I described, you'll know that it's my handwork.";
+	close;
+}
+
+//===================================================================
+yuno_in03.gat,179,43,5	script	CiCi	121,{
+	mes "[CiCi]";
+	if(metto_q > 6) goto L_Done;
+	mes "My name is ^5533FFCiCi^000000.  I am one of the ^5533FF3 great scientists^000000 that live in this city.";
+	mes "Although there are many great scientists in this town, being one of the top 3 is a true honor don't you think??";
+	if(metto_q == 6) goto L_Start;
+	close;
+
+L_Start:
+	next;
+	mes "[CiCi]";
+	mes "Heh, I guess I was being a little to egoistical there.... anyways what can I do for you?";
+	next;
+	menu "Metto wanted me to tell you this......",-, "Nothing, just saying hey.",M_End;
+
+		mes "[CiCi]";
+		mes "Hmm?? Metto said that he doesn't need my Riding Engine Theory?? Hmphf! How dare he!!!";
+		emotion e_pif;
+		next;
+		mes "[CiCi]";
+		mes "I have half a mind to teach him a little something about TRUE science and INTELLIGENT research!!";
+		emotion e_ag;
+		next;
+		mes "[CiCi]";
+		mes "... Whatever.... I don't have the necessary equipment to help him anyways.";
+		mes "I guess, either way, he didn't have a chance.";
+		next;
+		mes "[CiCi]";
+		mes "Let him know that I didn't really want to be a part of what he was doing in the first place.";
+		mes "He isn't even doing the type of research that could be publicized.........";
+		set metto_q, 7;
+		close;
+
+	M_End:
+		mes "[CiCi]";
+		mes "What? That's it? You just wanted to waste some time?...........";
+		emotion e_swt;
+		close;
+
+L_Done:
+	mes "Hmm... I want to improve the Riding Engine but I lack the necessary parts.  What a headache....";
+	mes "Metto never offered me any help at all.  This is not going to be easy.......";
+	close;
+}
+
+//===================================================================
+yuno_in01.gat,18,30,3	script	Wagan	85,{
+	mes "[Wagan]";
+	if(metto_q > 0) goto L_Check;
+	mes "I'm sure you know that our village has been able to prosper for many years because of the brilliant research done here.";
+	mes "We owe a great deal to those who have dedicated their lives to research and study.";
+	next;
+	mes "[Wagan]";
+	mes "It is because of them that we can enjoy such a wonderful quality of life here.";
+	mes "They have been able to work together and support each other which is great to see.";
+	next;
+	mes "[Wagan]";
+	mes "Unfortunately there are a few 'bad apples' that cause problems within this solid community of researchers.";
+	next;
+	mes "[Wagan]";
+	mes "These people just drive me crazy!";
+	emotion e_an;
+	next;
+	mes "[Wagan]";
+	mes "They think only of themselves and their crazy actions make it much more difficult for everyone else.";
+	mes "Out of those few selfish mad men, ^FF3333'Metto'^000000 must be the worst by far.";
+	next;
+	mes "[Wagan]";
+	mes "This disturbed individual does nothing but destroy public facilities, create harmful pollutants, disrupt other peoples lives......";
+	next;
+	mes "[Wagan]";
+	mes "..... the list goes on and on.  What's worse..... He tries to justify his dreadful actions by calling it 'research'!!!!";
+	mes "He has definitely lost his sanity and has gone too far!!";
+	emotion e_ag;
+	next;
+	mes "[Wagan]";
+	mes "If only there was a way to stop this mad man from destroying our community......";
+	mes "I just wish there was someone capable and brave enough to put an end to ^FF3333Metto's^000000 insanity.......";
+	next;
+	menu "Leave it to me.",-, "I wish your city the best of luck...",M_End;
+
+		mes "[Wagan]";
+		mes "Oh?? Are you really going to help us stop Metto? Our city would be very grateful if you could do this.......";
+		mes "But how exactly do you plan on accomplishing this rather difficult task?";
+		emotion e_what;
+		next;
+		menu "Yeah it's pretty hard....",M_End, "Well, I guess I need to think of a plan now.....",-;
+
+			mes "[Wagan]";
+			mes "Yes a solid plan will be necessary to put a stop to Metto.  You will need to trick him into quitting his evil experiments somehow......";
+			mes "It will have to be something subtle like....... hmm........";
+			next;
+			mes "[Wagan]";
+			mes "... Sabotaging his experiments in a way that makes it look like he was destined to fail.";
+			mes "He is talkative so you may be able to get him to tell you everything you need to know about his work.";
+			next;
+			mes "[Wagan]";
+			mes "To be honest.... I have been thinking about this plan for a while.........";
+			set metto_q, 1;
+			close;
+	M_End:
+		mes "[Wagan]";
+		mes "We will have to hope that fate will be on our side as we wait for things to unfold......";
+		mes "Come to think of it.... Metto is a strong believer in fate..... If we could only use that to your advantage somehow....";
+		close;
+L_Check:
+	if(metto_q == 8) goto L_Thank;
+	if(metto_q == 9) goto L_Done;
+	mes "How goes your work on sabotaging Metto's experiments?  Hopefully the plan is going well.";
+	mes "I'm sorry to involve you in our city's problems, but we really do appreciate you efforts.";
+	close;
+L_Thank:
+	mes "Is this true? You were able to shut down Metto's research? Thank you sooo much for your help.";
+	mes "Without Metto causing trouble we have a lot less to worry about.";
+	emotion e_ic;
+	next;
+	mes "[Wagan]";
+	mes "The people of this city are grateful to you.  Here is a little token of our appreciation......";
+	next;
+	mes "[Wagan]";
+	mes "Thank you once again for your assistance! I wish you the best of luck in all of your future endeavors!!!";
+	getitem 715,10;
+	emotion e_thx;
+	set metto_q, 9;
+	close;
+L_Done:
+	mes "Things have been much more peaceful around here now that Metto has been shut down.  Thank you once again for your help.";
+	emotion e_thx;
+	close;
 }
\ No newline at end of file
diff --git a/npc/quests/monstertamers.txt b/npc/quests/monstertamers.txt
index c965a7c99..b3ef8c297 100644
--- a/npc/quests/monstertamers.txt
+++ b/npc/quests/monstertamers.txt
@@ -1,440 +1,440 @@
-//===== eAthena Script =======================================

-//= Monster Tamers

-//===== By: ==================================================

-//= kobra_k88, Darkchild, x[tsk]

-//===== Current Version: =====================================

-//= 1.2

-//===== Compatible With: =====================================

-//= eAthena 1.0

-//===== Description: =========================================

-//= Cute pet quest items

-//===== Additional Comments: =================================

-//= May not have all of the Monster Tamers, but the ones here are fully working.

-//= 1.1 Fixed exploits [Lupus]

-//= 1.2 Removed Duplicates [Silent]

-//============================================================

-

-

-//<================================================= Alberta ===============================================>\\

-alberta_in.gat,173,77,3	script	Monster Tamer#01	125,{

-	mes "[Monster Tamer Iwado]";

-	mes "Monster taming has never been more popular than it is now! Why not join in on all of the excitement?....";

-M_Menu:

-	next;

-	menu 	"^5555FFMonster Taming^000000",M_0,

-		"^5555FF'Monster Juice'^000000",M_1,

-		"^5555FF'Singing Flower'^000000",M_2,

-		"^5555FF'Wild Flower'^000000",M_3,

-		"Please make one for me",M_Make,

-		"Cancel",M_End;

-	M_0:

-		mes "[Monster Tamer Iwado]";

-		mes "Monster Taming is the way in which players can get certain monsters to become their pets.";

-		mes "By using a ^5555FF'Taming Item'^000000 a player can lure a monster into becoming a pet.";

-		next;

-		mes "[Monster Tamer Iwado]";

-		mes "These Taming Items are very hard to come by, but Monster Tamer Guild members such as myself can get them to you without any hassle.";

-		next;

-		mes "[Monster Tamer Iwado]";

-		mes "Here the Taming Items that I offer:";

-		mes "^5555FF'Monster Juice'^000000";

-		mes "^5555FF'Singing Flower'^000000";

-		mes "^5555FF'Wild Flower'^000000";

-		next;

-		mes "[Monster Tamer Iwado]";

-		mes "These are fantastic items! You should really give them a try!";

-		goto M_Menu;

-	M_1:

-		mes "[Monster Tamer Iwado]";

-		mes "It is a drink made from animal blood.  It's nothing a person would want to drink, but for the monster '^FF5555'Hunter Fly'^000000, it's a delicacy.";

-		next;

-		mes "[Monster Tamer Iwado]";

-		mes "I can give you a ^5555FF'Monster Juice'^000000 in exchange for:";

-		mes "-^FF5555'1 Animal Gore'";

-		mes "-'2 Apples'^000000";

-		next;

-		mes "[Monster Tamer Iwado]";

-		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

-		goto M_Menu;

-	M_2:

-		mes "[Monster Tamer Iwado]";

-		mes "The flower of a Singing Plant.  It is a very unique and unusual item that seems to attract ^FF5555'Rockers'^000000.";

-		next;

-		mes "[Monster Tamer Iwado]";

-		mes "I can give you a ^5555FF'Singing Flower'^000000 in exchange for:";

-		mes "-^FF5555'1 Singing Plant'^000000";

-		next;

-		mes "[Monster Tamer Iwado]";

-		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

-		goto M_Menu;

-	M_3:

-		mes "[Monster Tamer Iwado]";

-		mes "This flower blooms naturally here in Rune-Midgard.  It can be used as armor for your ^FF5555Orc Warrior^000000 pet.";

-		mes "I can give you a ^5555FF'Wild Flower'^000000 in exchange for:";

-		mes "-^FF5555'1 Fancy Flower'";

-		mes "-'1 Clover'^000000";

-		next;

-		mes "[Monster Tamer Iwado]";

-		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

-		goto M_Menu;

-	M_Make:

-		mes "[Monster Tamer Iwado]";

-		mes "Which Taming Item would you like?";

-		next;

-		menu "^5555FF'Monster Juice'^000000",sM_1, "^5555FF'Singing Flower'^000000",sM_2, "^5555FF'Wild Flower'^000000",sM_3, "Cancel",M_End;

-

-		sM_1:

-			if(countitem(702)<1 || countitem(512)<2) goto sL_NoItems;

-			delitem 702,1;

-			delitem 512,2;

-			mes "[Monster Tamer Iwado]";

-			mes "Alright, just a minute while I prepare the tame......";

-			next;

-			mes "[Monster Tamer Iwado]";

-			mes "Here you are! A Monster Juice! Enjoy and feel free to come back anytime.";

-			getitem 626,1;

-			close;

-		sM_2:

-			if(countitem(707)<1) goto sL_NoItems;

-			delitem 707,1;

-			mes "[Monster Tamer Iwado]";

-			mes "Alright, just a minute while I prepare the tame......";

-			next;

-			mes "[Monster Tamer Iwado]";

-			mes "Here you are! A Singing Flower! Enjoy and feel free to come back anytime.";

-			getitem 629,1;

-			close;

-		sM_3:

-			if(countitem(2207)<1 || countitem(705)<1) goto sL_NoItems;

-			delitem 2207,1;

-			delitem 705,1;

-			mes "[Monster Tamer Iwado]";

-			mes "Alright, just a minute while I prepare the tame......";

-			next;

-			mes "[Monster Tamer Iwado]";

-			mes "Here you are! A Wild Flower! Enjoy and feel free to come back anytime.";

-			getitem 10009,1;

-			close;

-

-			sL_NoItems:

-				mes "[Monster Tamer Iwado]";

-				mes "It looks like you don't have enough items to exchange for this tame.  Please come back when you do.";

-				close;

-	M_End:

-		mes "[Monster Tamer Iwado]";

-		mes "Oh... I see.  You probably haven't decided on what monster to raise as a pet yet.  It's a very important decision, so please, take your time.";

-		close;

-

-}

-

-

-//<================================================= Al De Baran ===============================================>\\

-aldeba_in.gat,167,177,3	script	Monster Tamer#02	125,{

-	mes "[Monster Tamer YuU]";

-	mes "You must be looking for some Taming Items.... When it comes to making Taming Items there is no one better than me here in Rune Midgard.";

-M_Menu:

-	next;

-	menu 	"^5555FF'Monster Taming'^000000",M_0,

-		"^5555FF'Skull Helm'^000000",M_1,

-		"^5555FF'Monster Oxygen Mask'^000000",M_2,

-		"^5555FF'Silk Ribbon'^000000",M_3,

-		"^5555FF'Stellar Hairpin'^000000",M_4,

-		"^5555FF'Tiny Egg Shell'^000000",M_5,

-		"^5555FF'Rocker Glasses'^000000",M_6,

-		"Please make one for me",M_Make,

-		"Cancel",M_End;

-	M_0:

-		mes "[Monster Tamer YuU]";

-		mes "Monster Taming is the way in which players can get certain monsters to become their pets.";

-		mes "By using a ^5555FF'Taming Item'^000000 a player can lure a monster into becoming a pet.";

-		next;

-		mes "[Monster Tamer YuU]";

-		mes "Once you obtain a pet, you must show it love and appreciation.  This is the most important part of monster taming.";

-		next;

-		mes "[Monster Tamer YuU]";

-		mes "The best way to show your new pet you care, is to get it an 'Accessory' to make it stand out from the rest of the monsters in Rune Midgard.";

-		next;

-		mes "[Monster Tamer YuU]";

-		mes "These ^5555FF'Cute Pet Accessories'^000000 are very hard to come by, but Monster Tamer Guild members such as myself can get them to you without any hassle.";

-		next;

-		mes "[Monster Tamer YuU]";

-		mes "Here the Taming Items that I offer:";

-		mes "^5555FF'Skull Helm'";

-		mes "'Monster Oxygen Mask'";

-		mes "'Silk Ribbon'";

-		mes "'Stellar Hairpin'";

-		mes "'Tiny Egg Shell'";

-		mes "'Rocker Glasses'^000000";

-		next;

-		mes "[Monster Tamer YuU]";

-		mes "These are fantastic items! You should really give them a try!";

-		goto M_Menu;

-	M_1:

-		mes "[Monster Tamer YuU]";

-		mes "It may be disgusting, but it has a mysterious power that has the potential to make its wearer go crazy!";

-		mes "This item will look great on your '^FF5555'Baphomet Jr.'^000000 pet.";

-		next;

-		mes "[Monster Tamer YuU]";

-		mes "I can give you a ^5555FF'Skull Helm'^000000 in exchange for:";

-		mes "-^FF5555'1 Bone Helm'^000000";

-		next;

-		mes "[Monster Tamer YuU]";

-		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

-		goto M_Menu;

-	M_2:

-		mes "[Monster Tamer YuU]";

-		mes "Once worn it makes it difficult to tell whether or not the wearer is a monster or a human.";

-		mes "A great gift for your ^FF5555'Choncon', 'Steel Choncon', or 'Hunter Fly'^000000.";

-		next;

-		mes "[Monster Tamer YuU]";

-		mes "I can give you a ^5555FF'Monster Oxygen Mask'^000000 in exchange for:";

-		mes "-^FF5555'1 Oxygen Mask'^000000";

-		next;

-		mes "[Monster Tamer YuU]";

-		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

-		goto M_Menu;

-	M_3:

-		mes "[Monster Tamer YuU]";

-		mes "It's a high quality ribbon knitted out of smooth silk.  It will make your pet ^FF5555'Lunatic'^000000 look even cuter!.";

-		next;

-		mes "[Monster Tamer YuU]";

-		mes "I can give you a ^5555FF'Silk Ribbon'^000000 in exchange for:";

-		mes "-^FF5555'1 Ribbon (0 Slotts)'^000000";

-		next;

-		mes "[Monster Tamer YuU]";

-		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

-		goto M_Menu;

-	M_4:

-		mes "[Monster Tamer YuU]";

-		mes "It is extremely sharp and possesses a mysterious power that makes monsters want to wear it.";

-		mes "Your ^FF5555'Green Petite'^000000 will love wearing this!";

-		next;

-		mes "[Monster Tamer YuU]";

-		mes "I can give you a ^5555FF'Stellar Hairpin'^000000 in exchange for:";

-		mes "-^FF5555'1 Stellar'^000000";

-		next;

-		mes "[Monster Tamer YuU]";

-		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

-		goto M_Menu;

-	M_5:

-		mes "[Monster Tamer YuU]";

-		mes "This seems to have a peculiar scent and a magnificent shine! It can be used as armor for your ^FF5555'Picky'^000000.";

-		mes "I can give you a ^5555FF'Tiny Egg Shell'^000000 in exchange for:";

-		mes "-^FF5555'1 Egg Shell'^000000";

-		next;

-		mes "[Monster Tamer YuU]";

-		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

-		goto M_Menu;

-	M_6:

-		mes "[Monster Tamer YuU]";

-		mes "Mysterious pair of eye glasses which make its wearer look like a geek.  It's perfect for your ^FF5555Rocker^000000 pet.";

-		next;

-		mes "[Monster Tamer YuU]";

-		mes "I can give you a pair of ^5555FF'Rocker Glasses'^000000 in exchange for:";

-		mes "-^FF5555'1 Ribbon (0 Slotts)'";

-		mes "-'2 Zargon'";

-		mes "-'400 Zeny'^000000";

-		next;

-		mes "[Monster Tamer YuU]";

-		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

-		goto M_Menu;

-	M_Make:

-		mes "[Monster Tamer YuU]";

-		mes "Which Taming Item would you like?";

-		next;

-		menu 	"^5555FF'Skull Helm'^000000",sM_1,

-			"^5555FF'Monster Oxygen Mask'^000000",sM_2,

-			"^5555FF'Silk Ribbon'^000000",sM_3,

-			"^5555FF'Stellar Hairpin'^000000",sM_4,

-			"^5555FF'Tiny Egg Shell'^000000",sM_5,

-			"^5555FF'Rocker Glasses'^000000",sM_6,

-			"Cancel",M_End;

-

-		sM_1:

-			if(countitem(5017)<1) goto sL_NoItems;

-			delitem 5017,1;

-			mes "[Monster Tamer YuU]";

-			mes "Alright, just a minute while I prepare the tame......";

-			next;

-			mes "[Monster Tamer YuU]";

-			mes "Here you are! A Skull Helm! Enjoy and feel free to come back anytime.";

-			getitem 10001,1;

-			close;

-		sM_2:

-			if(countitem(5004)<1) goto sL_NoItems;

-			delitem 5004,1;

-			mes "[Monster Tamer YuU]";

-			mes "Alright, just a minute while I prepare the tame......";

-			next;

-			mes "[Monster Tamer YuU]";

-			mes "Here you are! A Monster Oxygen Mask! Enjoy and feel free to come back anytime.";

-			getitem 10002,1;

-			close;

-		sM_3:

-			if(countitem(2208)<1) goto sL_NoItems;

-			delitem 2208,1;

-			mes "[Monster Tamer YuU]";

-			mes "Alright, just a minute while I prepare the tame......";

-			next;

-			mes "[Monster Tamer YuU]";

-			mes "Here you are! A Silk Ribbon! Enjoy and feel free to come back anytime.";

-			getitem 10007,1;

-			close;

-		sM_4:

-			if(countitem(2294)<1) goto sL_NoItems;

-			delitem 2294,1;

-			mes "[Monster Tamer YuU]";

-			mes "Alright, just a minute while I prepare the tame......";

-			next;

-			mes "[Monster Tamer YuU]";

-			mes "Here you are! Stellar Hairpin! Enjoy and feel free to come back anytime.";

-			getitem 10011,1;

-			close;

-		sM_5:

-			if(countitem(5015)<1) goto sL_NoItems;

-			delitem 5015,1;

-			mes "[Monster Tamer YuU]";

-			mes "Alright, just a minute while I prepare the tame......";

-			next;

-			mes "[Monster Tamer YuU]";

-			mes "Here you are! A Tiny Egg Shell! Enjoy and feel free to come back anytime.";

-			getitem 10012,1;

-			close;

-		sM_6:

-			if(countitem(2208)<1 || countitem(912)<2 || Zeny<400) goto sL_NoItems;

-			delitem 2208,1;

-			delitem 912,2;

-			set Zeny, Zeny-400;

-			mes "[Monster Tamer YuU]";

-			mes "Alright, just a minute while I prepare the tame......";

-			next;

-			mes "[Monster Tamer YuU]";

-			mes "Here you are! A pair of Rocker Glasses! Enjoy and feel free to come back anytime.";

-			getitem 10014,1;

-			close;

-

-			sL_NoItems:

-				mes "[Monster Tamer YuU]";

-				mes "It looks like you don't have enough items to exchange for this tame.  Please come back when you do.";

-				close;

-	M_End:

-		mes "[Monster Tamer YuU]";

-		mes "Oh... I see.  You probably haven't decided on what monster to raise as a pet yet.  It's a very important decision, so please, take your time.";

-		close;

-

-}

-

-

-//<================================================= Izlude ===============================================>\\

-izlude_in.gat,128,64,3	script	Monster Tamer#03	125,{

-	mes "[Monster Tamer Shogo]";

-	mes "Are you pre-occupied with gathering items for your cute pets, and want a break? Then let us find those items for you.....";

-M_Menu:

-	next;

-	menu 	"^5555FFMonster Taming^000000",M_0,

-		"^5555FF'Book of Devil'^000000",M_1,

-		"^5555FF'No Recipient'^000000",M_2,

-		"^5555FF'Horror of Tribe'^000000",M_3,

-		"Please make one for me",M_Make,

-		"Cancel",M_End;

-	M_0:

-		mes "[Monster Tamer Shogo]";

-		mes "Monster Taming is the way in which players can get certain monsters to become their pets.";

-		mes "By using a ^5555FF'Taming Item'^000000 a player can lure a monster into becoming a pet.";

-		next;

-		mes "[Monster Tamer Shogo]";

-		mes "These Taming Items are very hard to come by, but Monster Tamer Guild members such as myself can get them to you without any hassle.";

-		next;

-		mes "[Monster Tamer Shogo]";

-		mes "Here the Taming Items that I offer:";

-		mes "^5555FF'Book of Devil'^000000,";

-		mes "^5555FF'No Recipient'^000000,";

-		mes "^5555FF'Horror of Tribe'^000000.";

-		next;

-		mes "[Monster Tamer Shogo]";

-		mes "These are fantastic items! You should really give them a try!";

-		goto M_Menu;

-	M_1:

-		mes "[Monster Tamer Shogo]";

-		mes "This book is far too powerfull for any mere mortal to read and contains the secret method of summoning a devil!";

-		mes "Use it to lure the monster ^FF5555'Baphomet Jr.'^000000.";

-		next;

-		mes "[Monster Tamer Shogo]";

-		mes "I can give you a ^5555FF'Book of Devil'^000000 in exchange for:";

-		mes "-^FF5555'1 Old Magic Book'";

-		mes "-'2 Horrendous Mouth'^000000";

-		next;

-		mes "[Monster Tamer Shogo]";

-		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

-		goto M_Menu;

-	M_2:

-		mes "[Monster Tamer Shogo]";

-		mes "An old letter which wasn't delivered because of an unkown recipient.";

-		mes "It has no meaning to any living human, but ^FF5555'Munaks'^000000 seem to be very fond of it.";

-		next;

-		mes "[Monster Tamer Shogo]";

-		mes "I can give you a ^5555FF'No Recipient'^000000 in exchange for:";

-		mes "-^FF5555'1 Old Portrait'^000000";

-		next;

-		mes "[Monster Tamer Shogo]";

-		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

-		goto M_Menu;

-	M_3:

-		mes "[Monster Tamer Shogo]";

-		mes "This trophy is an ^FF5555'Orc Warrior's'^000000 favorite item.";

-		mes "I can give you a ^5555FF'Horror of Tribe'^000000 in exchange for:";

-		mes "-^FF5555'1 Chivalry Emblem'";

-		mes "-'1 Scorpion Tail'^000000";

-		next;

-		mes "[Monster Tamer Shogo]";

-		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

-		goto M_Menu;

-	M_Make:

-		mes "[Monster Tamer Shogo]";

-		mes "Which Taming Item would you like?";

-		next;

-		menu "^5555FF'Book of Devil'^000000",sM_1, "^5555FF'No Recipient'^000000",sM_2, "^5555FF'Horror of Tribe'^000000",sM_3, "Cancel",M_End;

-

-		sM_1:

-			if(countitem(1006)<1 || countitem(958)<2) goto sL_NoItems;

-			delitem 1006,1;

-			delitem 958,2;

-			mes "[Monster Tamer Shogo]";

-			mes "Alright, just a minute while I prepare the tame......";

-			next;

-			mes "[Monster Tamer Shogo]";

-			mes "Here you are! A Book of Devil! Enjoy and feel free to come back anytime.";

-			getitem 642,1;

-			close;

-		sM_2:

-			if(countitem(7014)<1) goto sL_NoItems;

-			delitem 7014,1;

-			mes "[Monster Tamer Shogo]";

-			mes "Alright, just a minute while I prepare the tame......";

-			next;

-			mes "[Monster Tamer Shogo]";

-			mes "Here you are! A No Recipient! Enjoy and feel free to come back anytime.";

-			getitem 636,1;

-			close;

-		sM_3:

-			if(countitem(1004)<1 || countitem(904)<1) goto sL_NoItems;

-			delitem 1004,1;

-			delitem 904,1;

-			mes "[Monster Tamer Shogo]";

-			mes "Alright, just a minute while I prepare the tame......";

-			next;

-			mes "[Monster Tamer Shogo]";

-			mes "Here you are! A Horror of Tribe! Enjoy and feel free to come back anytime.";

-			getitem 635,1;

-			close;

-

-			sL_NoItems:

-				mes "[Monster Tamer Shogo]";

-				mes "It looks like you don't have enough items to exchange for this tame.  Please come back when you do.";

-				close;

-	M_End:

-		mes "[Monster Tamer Shogo]";

-		mes "Oh... I see.  You probably haven't decided on what monster to raise as a pet yet.  It's a very important decision, so please, take your time.";

-		close;

-

-}

+//===== eAthena Script =======================================
+//= Monster Tamers
+//===== By: ==================================================
+//= kobra_k88, Darkchild, x[tsk]
+//===== Current Version: =====================================
+//= 1.2
+//===== Compatible With: =====================================
+//= eAthena 1.0
+//===== Description: =========================================
+//= Cute pet quest items
+//===== Additional Comments: =================================
+//= May not have all of the Monster Tamers, but the ones here are fully working.
+//= 1.1 Fixed exploits [Lupus]
+//= 1.2 Removed Duplicates [Silent]
+//============================================================
+
+
+//<================================================= Alberta ===============================================>\\
+alberta_in.gat,173,77,3	script	Monster Tamer#01	125,{
+	mes "[Monster Tamer Iwado]";
+	mes "Monster taming has never been more popular than it is now! Why not join in on all of the excitement?....";
+M_Menu:
+	next;
+	menu 	"^5555FFMonster Taming^000000",M_0,
+		"^5555FF'Monster Juice'^000000",M_1,
+		"^5555FF'Singing Flower'^000000",M_2,
+		"^5555FF'Wild Flower'^000000",M_3,
+		"Please make one for me",M_Make,
+		"Cancel",M_End;
+	M_0:
+		mes "[Monster Tamer Iwado]";
+		mes "Monster Taming is the way in which players can get certain monsters to become their pets.";
+		mes "By using a ^5555FF'Taming Item'^000000 a player can lure a monster into becoming a pet.";
+		next;
+		mes "[Monster Tamer Iwado]";
+		mes "These Taming Items are very hard to come by, but Monster Tamer Guild members such as myself can get them to you without any hassle.";
+		next;
+		mes "[Monster Tamer Iwado]";
+		mes "Here the Taming Items that I offer:";
+		mes "^5555FF'Monster Juice'^000000";
+		mes "^5555FF'Singing Flower'^000000";
+		mes "^5555FF'Wild Flower'^000000";
+		next;
+		mes "[Monster Tamer Iwado]";
+		mes "These are fantastic items! You should really give them a try!";
+		goto M_Menu;
+	M_1:
+		mes "[Monster Tamer Iwado]";
+		mes "It is a drink made from animal blood.  It's nothing a person would want to drink, but for the monster '^FF5555'Hunter Fly'^000000, it's a delicacy.";
+		next;
+		mes "[Monster Tamer Iwado]";
+		mes "I can give you a ^5555FF'Monster Juice'^000000 in exchange for:";
+		mes "-^FF5555'1 Animal Gore'";
+		mes "-'2 Apples'^000000";
+		next;
+		mes "[Monster Tamer Iwado]";
+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
+		goto M_Menu;
+	M_2:
+		mes "[Monster Tamer Iwado]";
+		mes "The flower of a Singing Plant.  It is a very unique and unusual item that seems to attract ^FF5555'Rockers'^000000.";
+		next;
+		mes "[Monster Tamer Iwado]";
+		mes "I can give you a ^5555FF'Singing Flower'^000000 in exchange for:";
+		mes "-^FF5555'1 Singing Plant'^000000";
+		next;
+		mes "[Monster Tamer Iwado]";
+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
+		goto M_Menu;
+	M_3:
+		mes "[Monster Tamer Iwado]";
+		mes "This flower blooms naturally here in Rune-Midgard.  It can be used as armor for your ^FF5555Orc Warrior^000000 pet.";
+		mes "I can give you a ^5555FF'Wild Flower'^000000 in exchange for:";
+		mes "-^FF5555'1 Fancy Flower'";
+		mes "-'1 Clover'^000000";
+		next;
+		mes "[Monster Tamer Iwado]";
+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
+		goto M_Menu;
+	M_Make:
+		mes "[Monster Tamer Iwado]";
+		mes "Which Taming Item would you like?";
+		next;
+		menu "^5555FF'Monster Juice'^000000",sM_1, "^5555FF'Singing Flower'^000000",sM_2, "^5555FF'Wild Flower'^000000",sM_3, "Cancel",M_End;
+
+		sM_1:
+			if(countitem(702)<1 || countitem(512)<2) goto sL_NoItems;
+			delitem 702,1;
+			delitem 512,2;
+			mes "[Monster Tamer Iwado]";
+			mes "Alright, just a minute while I prepare the tame......";
+			next;
+			mes "[Monster Tamer Iwado]";
+			mes "Here you are! A Monster Juice! Enjoy and feel free to come back anytime.";
+			getitem 626,1;
+			close;
+		sM_2:
+			if(countitem(707)<1) goto sL_NoItems;
+			delitem 707,1;
+			mes "[Monster Tamer Iwado]";
+			mes "Alright, just a minute while I prepare the tame......";
+			next;
+			mes "[Monster Tamer Iwado]";
+			mes "Here you are! A Singing Flower! Enjoy and feel free to come back anytime.";
+			getitem 629,1;
+			close;
+		sM_3:
+			if(countitem(2207)<1 || countitem(705)<1) goto sL_NoItems;
+			delitem 2207,1;
+			delitem 705,1;
+			mes "[Monster Tamer Iwado]";
+			mes "Alright, just a minute while I prepare the tame......";
+			next;
+			mes "[Monster Tamer Iwado]";
+			mes "Here you are! A Wild Flower! Enjoy and feel free to come back anytime.";
+			getitem 10009,1;
+			close;
+
+			sL_NoItems:
+				mes "[Monster Tamer Iwado]";
+				mes "It looks like you don't have enough items to exchange for this tame.  Please come back when you do.";
+				close;
+	M_End:
+		mes "[Monster Tamer Iwado]";
+		mes "Oh... I see.  You probably haven't decided on what monster to raise as a pet yet.  It's a very important decision, so please, take your time.";
+		close;
+
+}
+
+
+//<================================================= Al De Baran ===============================================>\\
+aldeba_in.gat,167,177,3	script	Monster Tamer#02	125,{
+	mes "[Monster Tamer YuU]";
+	mes "You must be looking for some Taming Items.... When it comes to making Taming Items there is no one better than me here in Rune Midgard.";
+M_Menu:
+	next;
+	menu 	"^5555FF'Monster Taming'^000000",M_0,
+		"^5555FF'Skull Helm'^000000",M_1,
+		"^5555FF'Monster Oxygen Mask'^000000",M_2,
+		"^5555FF'Silk Ribbon'^000000",M_3,
+		"^5555FF'Stellar Hairpin'^000000",M_4,
+		"^5555FF'Tiny Egg Shell'^000000",M_5,
+		"^5555FF'Rocker Glasses'^000000",M_6,
+		"Please make one for me",M_Make,
+		"Cancel",M_End;
+	M_0:
+		mes "[Monster Tamer YuU]";
+		mes "Monster Taming is the way in which players can get certain monsters to become their pets.";
+		mes "By using a ^5555FF'Taming Item'^000000 a player can lure a monster into becoming a pet.";
+		next;
+		mes "[Monster Tamer YuU]";
+		mes "Once you obtain a pet, you must show it love and appreciation.  This is the most important part of monster taming.";
+		next;
+		mes "[Monster Tamer YuU]";
+		mes "The best way to show your new pet you care, is to get it an 'Accessory' to make it stand out from the rest of the monsters in Rune Midgard.";
+		next;
+		mes "[Monster Tamer YuU]";
+		mes "These ^5555FF'Cute Pet Accessories'^000000 are very hard to come by, but Monster Tamer Guild members such as myself can get them to you without any hassle.";
+		next;
+		mes "[Monster Tamer YuU]";
+		mes "Here the Taming Items that I offer:";
+		mes "^5555FF'Skull Helm'";
+		mes "'Monster Oxygen Mask'";
+		mes "'Silk Ribbon'";
+		mes "'Stellar Hairpin'";
+		mes "'Tiny Egg Shell'";
+		mes "'Rocker Glasses'^000000";
+		next;
+		mes "[Monster Tamer YuU]";
+		mes "These are fantastic items! You should really give them a try!";
+		goto M_Menu;
+	M_1:
+		mes "[Monster Tamer YuU]";
+		mes "It may be disgusting, but it has a mysterious power that has the potential to make its wearer go crazy!";
+		mes "This item will look great on your '^FF5555'Baphomet Jr.'^000000 pet.";
+		next;
+		mes "[Monster Tamer YuU]";
+		mes "I can give you a ^5555FF'Skull Helm'^000000 in exchange for:";
+		mes "-^FF5555'1 Bone Helm'^000000";
+		next;
+		mes "[Monster Tamer YuU]";
+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
+		goto M_Menu;
+	M_2:
+		mes "[Monster Tamer YuU]";
+		mes "Once worn it makes it difficult to tell whether or not the wearer is a monster or a human.";
+		mes "A great gift for your ^FF5555'Choncon', 'Steel Choncon', or 'Hunter Fly'^000000.";
+		next;
+		mes "[Monster Tamer YuU]";
+		mes "I can give you a ^5555FF'Monster Oxygen Mask'^000000 in exchange for:";
+		mes "-^FF5555'1 Oxygen Mask'^000000";
+		next;
+		mes "[Monster Tamer YuU]";
+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
+		goto M_Menu;
+	M_3:
+		mes "[Monster Tamer YuU]";
+		mes "It's a high quality ribbon knitted out of smooth silk.  It will make your pet ^FF5555'Lunatic'^000000 look even cuter!.";
+		next;
+		mes "[Monster Tamer YuU]";
+		mes "I can give you a ^5555FF'Silk Ribbon'^000000 in exchange for:";
+		mes "-^FF5555'1 Ribbon (0 Slotts)'^000000";
+		next;
+		mes "[Monster Tamer YuU]";
+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
+		goto M_Menu;
+	M_4:
+		mes "[Monster Tamer YuU]";
+		mes "It is extremely sharp and possesses a mysterious power that makes monsters want to wear it.";
+		mes "Your ^FF5555'Green Petite'^000000 will love wearing this!";
+		next;
+		mes "[Monster Tamer YuU]";
+		mes "I can give you a ^5555FF'Stellar Hairpin'^000000 in exchange for:";
+		mes "-^FF5555'1 Stellar'^000000";
+		next;
+		mes "[Monster Tamer YuU]";
+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
+		goto M_Menu;
+	M_5:
+		mes "[Monster Tamer YuU]";
+		mes "This seems to have a peculiar scent and a magnificent shine! It can be used as armor for your ^FF5555'Picky'^000000.";
+		mes "I can give you a ^5555FF'Tiny Egg Shell'^000000 in exchange for:";
+		mes "-^FF5555'1 Egg Shell'^000000";
+		next;
+		mes "[Monster Tamer YuU]";
+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
+		goto M_Menu;
+	M_6:
+		mes "[Monster Tamer YuU]";
+		mes "Mysterious pair of eye glasses which make its wearer look like a geek.  It's perfect for your ^FF5555Rocker^000000 pet.";
+		next;
+		mes "[Monster Tamer YuU]";
+		mes "I can give you a pair of ^5555FF'Rocker Glasses'^000000 in exchange for:";
+		mes "-^FF5555'1 Ribbon (0 Slotts)'";
+		mes "-'2 Zargon'";
+		mes "-'400 Zeny'^000000";
+		next;
+		mes "[Monster Tamer YuU]";
+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
+		goto M_Menu;
+	M_Make:
+		mes "[Monster Tamer YuU]";
+		mes "Which Taming Item would you like?";
+		next;
+		menu 	"^5555FF'Skull Helm'^000000",sM_1,
+			"^5555FF'Monster Oxygen Mask'^000000",sM_2,
+			"^5555FF'Silk Ribbon'^000000",sM_3,
+			"^5555FF'Stellar Hairpin'^000000",sM_4,
+			"^5555FF'Tiny Egg Shell'^000000",sM_5,
+			"^5555FF'Rocker Glasses'^000000",sM_6,
+			"Cancel",M_End;
+
+		sM_1:
+			if(countitem(5017)<1) goto sL_NoItems;
+			delitem 5017,1;
+			mes "[Monster Tamer YuU]";
+			mes "Alright, just a minute while I prepare the tame......";
+			next;
+			mes "[Monster Tamer YuU]";
+			mes "Here you are! A Skull Helm! Enjoy and feel free to come back anytime.";
+			getitem 10001,1;
+			close;
+		sM_2:
+			if(countitem(5004)<1) goto sL_NoItems;
+			delitem 5004,1;
+			mes "[Monster Tamer YuU]";
+			mes "Alright, just a minute while I prepare the tame......";
+			next;
+			mes "[Monster Tamer YuU]";
+			mes "Here you are! A Monster Oxygen Mask! Enjoy and feel free to come back anytime.";
+			getitem 10002,1;
+			close;
+		sM_3:
+			if(countitem(2208)<1) goto sL_NoItems;
+			delitem 2208,1;
+			mes "[Monster Tamer YuU]";
+			mes "Alright, just a minute while I prepare the tame......";
+			next;
+			mes "[Monster Tamer YuU]";
+			mes "Here you are! A Silk Ribbon! Enjoy and feel free to come back anytime.";
+			getitem 10007,1;
+			close;
+		sM_4:
+			if(countitem(2294)<1) goto sL_NoItems;
+			delitem 2294,1;
+			mes "[Monster Tamer YuU]";
+			mes "Alright, just a minute while I prepare the tame......";
+			next;
+			mes "[Monster Tamer YuU]";
+			mes "Here you are! Stellar Hairpin! Enjoy and feel free to come back anytime.";
+			getitem 10011,1;
+			close;
+		sM_5:
+			if(countitem(5015)<1) goto sL_NoItems;
+			delitem 5015,1;
+			mes "[Monster Tamer YuU]";
+			mes "Alright, just a minute while I prepare the tame......";
+			next;
+			mes "[Monster Tamer YuU]";
+			mes "Here you are! A Tiny Egg Shell! Enjoy and feel free to come back anytime.";
+			getitem 10012,1;
+			close;
+		sM_6:
+			if(countitem(2208)<1 || countitem(912)<2 || Zeny<400) goto sL_NoItems;
+			delitem 2208,1;
+			delitem 912,2;
+			set Zeny, Zeny-400;
+			mes "[Monster Tamer YuU]";
+			mes "Alright, just a minute while I prepare the tame......";
+			next;
+			mes "[Monster Tamer YuU]";
+			mes "Here you are! A pair of Rocker Glasses! Enjoy and feel free to come back anytime.";
+			getitem 10014,1;
+			close;
+
+			sL_NoItems:
+				mes "[Monster Tamer YuU]";
+				mes "It looks like you don't have enough items to exchange for this tame.  Please come back when you do.";
+				close;
+	M_End:
+		mes "[Monster Tamer YuU]";
+		mes "Oh... I see.  You probably haven't decided on what monster to raise as a pet yet.  It's a very important decision, so please, take your time.";
+		close;
+
+}
+
+
+//<================================================= Izlude ===============================================>\\
+izlude_in.gat,128,64,3	script	Monster Tamer#03	125,{
+	mes "[Monster Tamer Shogo]";
+	mes "Are you pre-occupied with gathering items for your cute pets, and want a break? Then let us find those items for you.....";
+M_Menu:
+	next;
+	menu 	"^5555FFMonster Taming^000000",M_0,
+		"^5555FF'Book of Devil'^000000",M_1,
+		"^5555FF'No Recipient'^000000",M_2,
+		"^5555FF'Horror of Tribe'^000000",M_3,
+		"Please make one for me",M_Make,
+		"Cancel",M_End;
+	M_0:
+		mes "[Monster Tamer Shogo]";
+		mes "Monster Taming is the way in which players can get certain monsters to become their pets.";
+		mes "By using a ^5555FF'Taming Item'^000000 a player can lure a monster into becoming a pet.";
+		next;
+		mes "[Monster Tamer Shogo]";
+		mes "These Taming Items are very hard to come by, but Monster Tamer Guild members such as myself can get them to you without any hassle.";
+		next;
+		mes "[Monster Tamer Shogo]";
+		mes "Here the Taming Items that I offer:";
+		mes "^5555FF'Book of Devil'^000000,";
+		mes "^5555FF'No Recipient'^000000,";
+		mes "^5555FF'Horror of Tribe'^000000.";
+		next;
+		mes "[Monster Tamer Shogo]";
+		mes "These are fantastic items! You should really give them a try!";
+		goto M_Menu;
+	M_1:
+		mes "[Monster Tamer Shogo]";
+		mes "This book is far too powerfull for any mere mortal to read and contains the secret method of summoning a devil!";
+		mes "Use it to lure the monster ^FF5555'Baphomet Jr.'^000000.";
+		next;
+		mes "[Monster Tamer Shogo]";
+		mes "I can give you a ^5555FF'Book of Devil'^000000 in exchange for:";
+		mes "-^FF5555'1 Old Magic Book'";
+		mes "-'2 Horrendous Mouth'^000000";
+		next;
+		mes "[Monster Tamer Shogo]";
+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
+		goto M_Menu;
+	M_2:
+		mes "[Monster Tamer Shogo]";
+		mes "An old letter which wasn't delivered because of an unkown recipient.";
+		mes "It has no meaning to any living human, but ^FF5555'Munaks'^000000 seem to be very fond of it.";
+		next;
+		mes "[Monster Tamer Shogo]";
+		mes "I can give you a ^5555FF'No Recipient'^000000 in exchange for:";
+		mes "-^FF5555'1 Old Portrait'^000000";
+		next;
+		mes "[Monster Tamer Shogo]";
+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
+		goto M_Menu;
+	M_3:
+		mes "[Monster Tamer Shogo]";
+		mes "This trophy is an ^FF5555'Orc Warrior's'^000000 favorite item.";
+		mes "I can give you a ^5555FF'Horror of Tribe'^000000 in exchange for:";
+		mes "-^FF5555'1 Chivalry Emblem'";
+		mes "-'1 Scorpion Tail'^000000";
+		next;
+		mes "[Monster Tamer Shogo]";
+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";
+		goto M_Menu;
+	M_Make:
+		mes "[Monster Tamer Shogo]";
+		mes "Which Taming Item would you like?";
+		next;
+		menu "^5555FF'Book of Devil'^000000",sM_1, "^5555FF'No Recipient'^000000",sM_2, "^5555FF'Horror of Tribe'^000000",sM_3, "Cancel",M_End;
+
+		sM_1:
+			if(countitem(1006)<1 || countitem(958)<2) goto sL_NoItems;
+			delitem 1006,1;
+			delitem 958,2;
+			mes "[Monster Tamer Shogo]";
+			mes "Alright, just a minute while I prepare the tame......";
+			next;
+			mes "[Monster Tamer Shogo]";
+			mes "Here you are! A Book of Devil! Enjoy and feel free to come back anytime.";
+			getitem 642,1;
+			close;
+		sM_2:
+			if(countitem(7014)<1) goto sL_NoItems;
+			delitem 7014,1;
+			mes "[Monster Tamer Shogo]";
+			mes "Alright, just a minute while I prepare the tame......";
+			next;
+			mes "[Monster Tamer Shogo]";
+			mes "Here you are! A No Recipient! Enjoy and feel free to come back anytime.";
+			getitem 636,1;
+			close;
+		sM_3:
+			if(countitem(1004)<1 || countitem(904)<1) goto sL_NoItems;
+			delitem 1004,1;
+			delitem 904,1;
+			mes "[Monster Tamer Shogo]";
+			mes "Alright, just a minute while I prepare the tame......";
+			next;
+			mes "[Monster Tamer Shogo]";
+			mes "Here you are! A Horror of Tribe! Enjoy and feel free to come back anytime.";
+			getitem 635,1;
+			close;
+
+			sL_NoItems:
+				mes "[Monster Tamer Shogo]";
+				mes "It looks like you don't have enough items to exchange for this tame.  Please come back when you do.";
+				close;
+	M_End:
+		mes "[Monster Tamer Shogo]";
+		mes "Oh... I see.  You probably haven't decided on what monster to raise as a pet yet.  It's a very important decision, so please, take your time.";
+		close;
+
+}
diff --git a/npc/quests/mrsmile.txt b/npc/quests/mrsmile.txt
index 1672ff57e..f59f3469a 100644
--- a/npc/quests/mrsmile.txt
+++ b/npc/quests/mrsmile.txt
@@ -1,92 +1,92 @@
-//===== eAthena Script ======================================= 

-//= Mr. Smile Quest

-//===== By: ================================================== 

-//= kobra_k88, Akaru

-//===== Current Version: ===================================== 

-//= 1.3

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//= 

-//===== Additional Comments: ================================= 

-//= Fully working. 1.1 Optimized

-//= 1.2 updated Payon coords [Lupus]

-//= 1.3 fixed exploit [Lupus]

-//============================================================ 

-

-

-

-// Alberta ------------------------------------------------------------------------------------------

-alberta.gat,113,53,3	script	Smile Assistance::SmileAT	92,{

-	mes "[Smile Assistant]";

-	mes "Hi, I'm a Smile Assistance.  How may I help you?";

-	next;

-	menu "^0099FFMr. Smile^000000?",M_0, "Construct a ^0099FFMr. Smile^000000",M_1, "Quit",M_End;

-	

-	M_0:

-		mes "[Smile Assistant]";

-		mes "Oh, the Mr. Smile Event is a nationwide event that is being sponsered by ^0099FFHis Majesty Tristram the 3rd^000000.";

-		mes "The goal of the event is to get the citizens of Rune Midgard to put on happy looking Mr. Smile masks.";

-		next;

-		mes "[Smile Assistance]";

-		mes "By having this event, His Majesty wishes to encourage the people of Rune Midgard to have more fun and enjoy themselves!";

-		mes "As you may have guessed, the Mr. Smile mask is simply a smiley face.";

-		next;

-		mes "[Smile Assistance]";

-		mes "Although it may be simple, no one can argue the power of a smile! And if everybody in the kingdom were to wear one....";

-		mes "just imagine how much joy and cheer the world would see!";

-		next;

-		mes "[Smile Assistant]";

-		mes "As a Smile Assistant, it is my job to make a Mr. Smile mask for all of those who want one.";

-		mes "All I need to make the mask are some little items, namely:";

-		mes "^5555FF10 Jellopy^000000";

-		mes "^5555FF10 Fluff^000000";

-		mes "^5555FF10 Clover^000000";

-		next;

-		mes "[Smile Girl]";

-		mes "The world could use more smiles so get those items and come back soon.  I'll be waiting right here.";

-		close;

-	M_1:

-		mes "[Smile Assistant]";

-		if(countitem(705) < 10 || countitem(909) < 10 || countitem(914) < 10) goto sL_NoItems;

-		delitem 705,10;

-		delitem 909,10;

-		delitem 914,10;

-		mes "Oh, great! You've brought back all of the items needed.  Wait just a sec while I get your Mr. Smile ready.....";

-		next;

-		mes "~!shook!~!shook!~!clack!~!clack!~!tok!~!tok!~";

-		next;

-		mes "[Smile Assistant]";

-		mes "Here ya go, your very own Mr. Smile!";

-		getitem 2278,1;

-		next;

-		mes "[Smile Assistant]";

-		mes "The Mr. Smile Event is just one of the many ways His Majesty Tristam the 3rd is trying to make life more enjoyable here in Rune Midgard.";

-		next;

-		mes "[Smile Assistant]";

-		mes "Hopefully you will be reminded of that fact everytime you put on your Mr. Smile.";

-		close;

-	

-		sL_NoItems:

-			mes "Oh... Unfortunately you don't have enough items for a Mr. Smile.  What you need are:";

-			mes "^5555FF10 Jellopy^000000,";

-			mes "^5555FF10 Fluff^000000,";

-			mes "^5555FF10 Clover^000000,";

-			mes "I'll be waiting here so hurry back.";

-			close;

-	M_End:

-		close;

-}

-

-// Aldebaran --------------------------------------------------------------------------------

-aldebaran.gat,136,135,4	duplicate(SmileAT)	Smile Assistance#2	92

-// Geffen -----------------------------------------------------------------------------------

-geffen.gat,119,107,4	duplicate(SmileAT)	Smile Assistance#3	92

-// Izlude -----------------------------------------------------------------------------------

-izlude.gat,129,118,4	duplicate(SmileAT)	Smile Assistance#4	92

-// Morroc -----------------------------------------------------------------------------------

-morocc.gat,158,97,4	duplicate(SmileAT)	Smile Assistance#5	92

-// Payon ------------------------------------------------------------------------------------

-payon.gat,168,225,4	duplicate(SmileAT)	Smile Assistance#6	92

-// Prontera ---------------------------------------------------------------------------------

-prontera.gat,157,187,4	duplicate(SmileAT)	Smile Assistance#7	92

+//===== eAthena Script ======================================= 
+//= Mr. Smile Quest
+//===== By: ================================================== 
+//= kobra_k88, Akaru
+//===== Current Version: ===================================== 
+//= 1.3
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//= 
+//===== Additional Comments: ================================= 
+//= Fully working. 1.1 Optimized
+//= 1.2 updated Payon coords [Lupus]
+//= 1.3 fixed exploit [Lupus]
+//============================================================ 
+
+
+
+// Alberta ------------------------------------------------------------------------------------------
+alberta.gat,113,53,3	script	Smile Assistance::SmileAT	92,{
+	mes "[Smile Assistant]";
+	mes "Hi, I'm a Smile Assistance.  How may I help you?";
+	next;
+	menu "^0099FFMr. Smile^000000?",M_0, "Construct a ^0099FFMr. Smile^000000",M_1, "Quit",M_End;
+	
+	M_0:
+		mes "[Smile Assistant]";
+		mes "Oh, the Mr. Smile Event is a nationwide event that is being sponsered by ^0099FFHis Majesty Tristram the 3rd^000000.";
+		mes "The goal of the event is to get the citizens of Rune Midgard to put on happy looking Mr. Smile masks.";
+		next;
+		mes "[Smile Assistance]";
+		mes "By having this event, His Majesty wishes to encourage the people of Rune Midgard to have more fun and enjoy themselves!";
+		mes "As you may have guessed, the Mr. Smile mask is simply a smiley face.";
+		next;
+		mes "[Smile Assistance]";
+		mes "Although it may be simple, no one can argue the power of a smile! And if everybody in the kingdom were to wear one....";
+		mes "just imagine how much joy and cheer the world would see!";
+		next;
+		mes "[Smile Assistant]";
+		mes "As a Smile Assistant, it is my job to make a Mr. Smile mask for all of those who want one.";
+		mes "All I need to make the mask are some little items, namely:";
+		mes "^5555FF10 Jellopy^000000";
+		mes "^5555FF10 Fluff^000000";
+		mes "^5555FF10 Clover^000000";
+		next;
+		mes "[Smile Girl]";
+		mes "The world could use more smiles so get those items and come back soon.  I'll be waiting right here.";
+		close;
+	M_1:
+		mes "[Smile Assistant]";
+		if(countitem(705) < 10 || countitem(909) < 10 || countitem(914) < 10) goto sL_NoItems;
+		delitem 705,10;
+		delitem 909,10;
+		delitem 914,10;
+		mes "Oh, great! You've brought back all of the items needed.  Wait just a sec while I get your Mr. Smile ready.....";
+		next;
+		mes "~!shook!~!shook!~!clack!~!clack!~!tok!~!tok!~";
+		next;
+		mes "[Smile Assistant]";
+		mes "Here ya go, your very own Mr. Smile!";
+		getitem 2278,1;
+		next;
+		mes "[Smile Assistant]";
+		mes "The Mr. Smile Event is just one of the many ways His Majesty Tristam the 3rd is trying to make life more enjoyable here in Rune Midgard.";
+		next;
+		mes "[Smile Assistant]";
+		mes "Hopefully you will be reminded of that fact everytime you put on your Mr. Smile.";
+		close;
+	
+		sL_NoItems:
+			mes "Oh... Unfortunately you don't have enough items for a Mr. Smile.  What you need are:";
+			mes "^5555FF10 Jellopy^000000,";
+			mes "^5555FF10 Fluff^000000,";
+			mes "^5555FF10 Clover^000000,";
+			mes "I'll be waiting here so hurry back.";
+			close;
+	M_End:
+		close;
+}
+
+// Aldebaran --------------------------------------------------------------------------------
+aldebaran.gat,136,135,4	duplicate(SmileAT)	Smile Assistance#2	92
+// Geffen -----------------------------------------------------------------------------------
+geffen.gat,119,107,4	duplicate(SmileAT)	Smile Assistance#3	92
+// Izlude -----------------------------------------------------------------------------------
+izlude.gat,129,118,4	duplicate(SmileAT)	Smile Assistance#4	92
+// Morroc -----------------------------------------------------------------------------------
+morocc.gat,158,97,4	duplicate(SmileAT)	Smile Assistance#5	92
+// Payon ------------------------------------------------------------------------------------
+payon.gat,168,225,4	duplicate(SmileAT)	Smile Assistance#6	92
+// Prontera ---------------------------------------------------------------------------------
+prontera.gat,157,187,4	duplicate(SmileAT)	Smile Assistance#7	92
diff --git a/npc/quests/newgears/2004_headgears.txt b/npc/quests/newgears/2004_headgears.txt
index cb0933369..7c2cfdf54 100644
--- a/npc/quests/newgears/2004_headgears.txt
+++ b/npc/quests/newgears/2004_headgears.txt
@@ -1,3362 +1,3362 @@
-//===== eAthena Script ======================================= 

-//= 2004 Headgear Quests

-//===== By: ================================================== 

-//= Dj-Yhn

-//===== Current Version: ===================================== 

-//= 1.2

-//===== Compatible With: ===================================== 

-//= eAthena

-//===== Description: ========================================= 

-//= 2004 New Headgears. Official Quests

-//===== Additional Comments: =================================

-//= names with asterisk(*) are iRO names...

-//= names done: 1,3,6,8,9,12,14,15,16,17

-//= needed: 2,4,5,7,10,11,13 (7/17)

-//= ==Information For NPC's inside File==

-//= 1) Black Cat Ears [NekoNeko*] {Payon}

-//=   o payon.gat 115 131

-//= 2) Crossed Hair Band, Plaster and Flower Hairpin [Arjen] {Geffen}

-//=   o geffen.gat 129 148

-//= 3) Hot-blooded-headband [Zhenbolt*] {Yuno}

-//=   o yuno.gat 300 188

-//= 4) Red Tailed Ribbon [Netpia] {Prontera}

-//=   o prontera.gat 165 232

-//= 5) Indian Headband [Merunte] {Comodo}

-//=   o comodo.gat 237 217

-//= 6) Mushroom headband [Ipore*] {Geffen}

-//=   o geffen.gat 67 87

-//= 7) Ears of angel wing &

-//=     Ears of devil wing [Old Blacksmith] {Yuno}

-//=   o yuno.gat 241 52

-//= 8) Sea Otter Cap [Pretty Lindsay*] {Lutie}

-//=   o xmas.gat 183 267

-//= 9) Brown Bear Cap [Fuzzy Fuzz*] {Lutie}

-//=   o xmas.gat 175 156

-//=10) Cap of Concentration [Nan Hyang] {Payon}

-//=   o payon_in03.gat 8 193

-//=11) Tulip Haipin [Ses] {Geffen}

-//=   o geffen.gat 83 189

-//=12) Party Hat, Straw Hat, Cowboy Hat, Sombrero

-//=	and Fur hat [Headgear Merchant (Mike)*] {Lutie}

-//=   o xmas_in.gat 35 30

-//=13) Big Golden Bell, Headgear of Queen

-//=     and Crown of Mistress [Neris] {Yuno}

-//=   o yuno_in03.gat 20 18

-//=14) Alarm Mask [Muscle Man*]{Aldebaran}

-//=   o alde_alche.gat 88 180

-//=15) Drooping Kitty, Smokie Leaf, Lazy Smokie

-//= 	and Blue Fish [Traveler*] {Morroc}

-//=   o morocc.gat 273 79

-//=16) Fox Mask [Nine Tail*] {Payon Dungeon}

-//=   o pay_dun03 48 84

-//=17) Orc Hero Helm [Orc Warrior*] {Orc Village}

-//=   o in_orcs01 31 93 & 162 33

-//============================================================

-//= 1.01 Fixed items names iRO->kRO, fixed some bugs [Qwadrat]

-//=	Fixed possible item exploits, fixed Straw Hat

-//= 	Added missing checks [Lupus]

-//= 1.1	Fixed a bug in Giant-band-aid that didn't counting rotten bandages

-//=	Fixed a bug in Fur Hat that didn't count yarn [Evera]

-//= 1.2 Syntax fixes for parenthesis, reformatting [KarLaeda]

-//============================================================

-

-//Payon /=Black cat ears=/

-payon.gat,115,131,3	script	NekoNeko	725,{

-	if (countitem(2213) > 0 && countitem(983) > 0 && countitem(914) > 199 && Zeny > 9999) {

-		delitem 2213,1;

-		delitem 983,1;

-		delitem 914,200;

-		set Zeny,Zeny-10000;

-		mes "[NekoNeko]";

-		mes "Hihi? So you have collected all materials.";

-		mes "According to our agreement,";

-		mes "I will make it for you~ please";

-		mes "wait for a while!";

-		next;

-		mes "[NekoNeko]";

-		mes "Zomulazhumudazowuwudududu";

-		mes "DidiSusuohwuzaowududaduda";

-		next;

-		getitem 5057,1;

-		mes "[NekoNeko]";

-		mes "Thank youfor using!";

-		mes "If you need it again in future,";

-		mes "come and fine me anytime!";

-		close;

-	} else {

-		mes "[NekoNeko]";

-		mes "How are you? Yes, I know.";

-		mes "I know why you're trying to talk to me.";

-		mes "That's because the Ears of Black Cat";

-		mes "that I am wearing is too cute... right? Hahaha";

-		next;

-		mes "[NekoNeko]";

-		mes "Honestly, I made this hairband";

-		mes "with my skill of craftmanship.";

-		mes "Therefore, not much people know,";

-		mes "about this adorable head gear.";

-		mes "Isn't that a pity that I use it myself?";

-		next;

-		mes "[NekoNeko]";

-		mes "So, you better ask me to make that.";

-		mes "I will make it";

-		mes "with a pay of course.";

-		mes "Fill your pockets with coints....";

-		mes "That's my thinking, hehehehe";

-		next;

-		mes "[NekoNeko]";

-		mes "^FF0000Kitty Band^000000 x1";

-		mes "^FF0000Black Dyestuffs^000000 x1";

-		mes "^FF0000Fluff^000000 x200";

-		mes "and lastly, it requires at least ^FF000010000zeny^000000!";

-		mes "If you want it, gather them and bring it to me~";

-		next;

-		mes "[NekoNeko]";

-		mes "^FF0000Ah! Please keep this in mind.";

-		mes "If you slot a card in your equipment,";

-		mes "and you want to change it to the item now,";

-		mes "you will lose the card and refined level.";

-		close;

-	}

-}

-//Geffen /=Crossed Hair Ban, Plaster and Flower Hairpin=/

-geffen.gat,129,148,3	script	Arjen	779,{

-	mes "[Arjen]";

-	mes "Ahhh~So boring~ So very boring~";

-	mes "There's noone I need to see, and the weather is so good - ! !";

-	mes "It's so boring that I have nothing to do.";

-	emotion e_gasp; //not sure if this is ET_SCRATCH

-	next;

-	mes "[Arjen]";

-	mes "Oh yes, hey there, you!!";

-	mes "Do you want to have a cute and fine hair clip?";

-	mes "For a person as skillful as I am, there's nothing I can't make!! Wa haha!";

-	mes "Clap ! It will be ready just like that!";

-	emotion e_omg; //ET_SURPRISE?

-	next;

-	mes "[Arjen]";

-	mes "Lucky I am freerightnow. So, just bring me the materials and I will whoosh! make it for you!";

-	mes "So, any idea of what accessory you would like to have?";

-	emotion e_heh; //ET_SMILE

-	next;

-	switch(select("^3131FFX Hairpin:Giant Band Aid:Flower Hairpin^000000:End conversation.")) {

-	case 1:

-		if (countitem(2294) > 0 && countitem(7220) > 399) {

-			mes "[Arjen]";

-			mes "X Hairpin!";

-			mes "That's very good !!";

-			next;

-			mes "[Arjen]";

-			mes "Oh yes!";

-			mes "The Stellar.."; //star dust? that's not refinable, now is it? =X

-			mes "^CE3100During the production, the refine level will disappear, is that ok with you?^000000";

-			next;

-			switch(select("It's ok, just make it for me!:I will come next time.")) {

-			case 1:

-				mes "[Arjen]";

-				mes "Oh well- Then,";

-				mes "it's time to show my skill after all this time !?";

-				next;

-				mes "^3131FF - Sha Sha !! - ^000000";

-				mes "^3131FF - Cha Sha Haa !! - ^000000";

-				next;

-				if (countitem(2294) > 0 && countitem(7220) > 399) {

-					delitem 2294,1;

-					delitem 7220,400;

-					getitem 5079,1; //X-Hairping == crossed hair band?

-				}

-				mes "[Arjen]";

-				mes " OK - !!";

-				mes "I still have my touch! Wa ha ha!!";

-				mes "How about that? Do you like it?";

-				next;

-				mes "[Arjen]";

-				mes "If you have any need, come and find me here anytime!";

-				mes "So, good bye. Good Bye!";

-				close;

-			case 2:

-				mes "[Arjen]";

-				mes "Fine, fine, come back after you've made up your mind!";

-				close;

-			}

-		} else {

-			mes "[Arjen]";

-			mes "Right - the ^3131FF X Hairpin!^000000";

-			mes "That's simple!";

-			next;

-			mes "[Arjen]";

-			mes "^FF0000Stellar x1^000000";

-			mes "^FF0000Ectoplasm x400^000000";

-			mes "If you've prepared all of this, I will help to make it for you!";

-			close;

-		}

-	case 2:

-		if (countitem(970) > 0 && countitem(930) > 499) {

-			mes "[Arjen]";

-			mes "Giant Band Aid??..";

-			mes "Oh well- Then,";

-			mes "it's time to show my skill after all this time !?";

-			next;

-			mes "^3131FF - Sha Sha !! - ^000000";

-			mes "^3131FF - Cha Sha Haa !! - ^000000";

-			next;

-			if (countitem(970) > 0 && countitem(930) > 499) {

-				delitem 970,1;

-				delitem 930,500;

-				getitem 5063,1; //another one in wich I love gravity for changing names =X

-			}

-			mes "[Arjen]";

-			mes " OK - !!";

-			mes "I still have my touch! Wa ha ha!!";

-			mes "How about that? Do you like it?";

-			next;

-			mes "[Arjen]";

-			mes "If you have any need, come and find me here anytime!";

-			mes "So, good bye. Good Bye!";

-			close;

-		} else {

-			mes "[Arjen]";

-			mes "Hoho - ^3131FF Plaster !^000000";

-			mes "If anyone asked where this is the Plaster that is used when someone is hurt?";

-			mes "Tell them it is the real Plaster for injured people.";

-			mes "Hmm, isn't that easy?";

-			next;

-			mes "[Arjen]";

-			mes "^FF0000Alcohol x1^000000";

-			mes "^FF0000Rotten Bandage x500^000000";

-			mes "If you have prepared all the items, I will help to make it for you now?";

-			close;

-		}

-	case 3:

-		if (countitem(2269) > 0 && countitem(999) > 9 && Zeny > 19999) {

-			mes "[Arjen]";

-			mes "Great !! Flower Hairpin ~";

-			mes "it's time to show my skill after all this time !?";

-			next;

-			mes "^3131FF - Sha Sha !! - ^000000";

-			mes "^3131FF - Cha Sha Haa !! - ^000000";

-			next;

-			if (countitem(2269) > 0 && countitem(999) > 9 && Zeny > 19999) {

-				delitem 2269,1;

-				delitem 999,10;

-				set Zeny,Zeny-20000;

-				getitem 5061,1; //finally a non-changed name =X

-			}

-			mes "[Arjen]";

-			mes " OK - !!";

-			mes "I still have my touch! Wa ha ha!!";

-			mes "How about it? Do you like it? Here is the stem left from the production. Take it as a souvenir. Haha.";

-			next;

-			mes "[Arjen]";

-			mes "If you have any need, come and find me here anytime!";

-			mes "So, good bye. Good Bye!";

-			close;

-		} else {

-			mes "[Arjen]";

-			mes "Yes - ^3131FF Flower Hairpin !^000000";

-			mes "Sometimes, I see some strange girls with bare legs and a flower in their mouths.";

-			mes "Looking at them, I get an idea!";

-			next;

-			mes "[Arjen]";

-			mes "That is ^3131FFFlower^000000, ^3131FFFlower^000000 !";

-			mes "Wa ha ha, isn't that a perfect match?";

-			mes "Some even equip it on the Orc Warrior, you should be proud of it, right?";

-			mes "Really ~  ~  ~";

-			next;

-			mes "[Arjen]";

-			mes "But the process takes a little more effort,";

-			mes "I need to take some process fee.";

-			next;

-			mes "[Arjen]";

-			mes "You should know that,";

-			mes "stabilizing a fragile flower on the head";

-			mes "takes a lot of concentration and";

-			mes "very high level of skills!";

-			next;

-			mes "[Arjen]";

-			mes "So, please bring,";

-			mes "^FF0000Romantic Flower x1^000000";

-			mes "^FF0000Steel x10^000000";

-			mes "together with ^3131FF 20,000 zeny^000000 !";

-			mes "If you have prepared all of these, I will make it for you right away!";

-			mes "Do you understand that?";

-			close;

-		}

-	case 4:

-		mes "[Arjen]";

-		mes "Ha, what? You don't want it?";

-		mes "Rumblerumblerumble";

-		close;

-	}

-}

-//Yuno /=Headband of power=/ <-- Ok, WTF? Thanks again bitches ;_;

-//Yuno /=Hot-blooded headband=/ [5070]

-yuno.gat,300,188,5	script	Zhenbolt	753,{

-	if(countitem(7216) > 299 && countitem(7097) > 299 && countitem(2211) > 0 && countitem(982) > 0) {

-		delitem 7216,300;

-		delitem 7097,300;

-		delitem 2211,1;

-		delitem 982,1;

-		mes "[Zhenbolt]";

-		mes "Uh oh...Have you collected all the items?";

-		mes "Good.";

-		mes "According to out agreement,";

-		mes "I will create it for you, whole hearedly.";

-		next;

-		mes "[Zhenbolt]";

-		mes "........................";

-		next;

-		mes "[Zhenbolt]";

-		mes "........................";

-		next;

-		mes "[Zhenbolt]";

-		mes "..................-work harder!-";

-		next;

-		mes "[Zhenbolt]";

-		mes "Uh oh... It's finished.";

-		mes "If you wear it,";

-		mes "you will feel some warmth,";

-		mes "in this cold world.";

-		mes "A great item has been born in this world.";

-		mes "Ladies and gentleman, this is ^FF0000Hot-blooded Headband^000000!!";

-		getitem 5070,1;

-		next;

-		mes "[Zhenbolt]";

-		mes "With this, I will be able";

-		mes "to get back to the person I miss soon.";

-		mes "My name is";

-		mes "Zhenbolt";

-		mes "Main distributor of hear warming sensation!";

-		close;

-	} else {

-		mes "[Zhenbolt]";

-		mes "My name is Zhenbolt,";

-		mes "a simple practioner that travels around the world,";

-		mes "to spead the warmth of heart around the world.";

-		next;

-		mes "[Zhenbolt]";

-		mes "You won't understand the meaning";

-		mes "of a burning spirit and heat of passion through mere explaining.";

-		mes "So do you want to accept this?";

-		mes "I will create an item";

-		mes "that stores my heart for you.";

-		next;

-		mes "[Zhenbolt]";

-		mes "However,";

-		mes "I cannot leave this place,";

-		mes "because I need to pass the message to others...";

-		mes "So,";

-		mes "I will have to trouble you";

-		mes "to gather the materials.";

-		next;

-		mes "[Zhenbolt]";

-		mes "^FF0000Red Muffler^000000 300 unit";

-		mes "^FF0000Burning Heart^000000 300 unit";

-		mes "^FF0000Bandana^000000 1unit ^FF0000White Dyestuffs^000000 1 unit...";

-		mes "To produce the item,";

-		mes "you'll need this materials.";

-		mes "Come to find me again after you've collected all the materials required.";

-		next;

-		mes "[Zhenbolt]";

-		mes "^FF0000Besides that,";

-		mes "Ah! Please keep this in mind.";

-		mes "If you slot a card in your equipment,";

-		mes "and you want to change it to the item now,";

-		mes "you will lose the card and refined level.";

-		close;

-	}

-}

-//Prontera /=Red Tailed Ribbon=/ [5083](Red Ribbon)//

-prontera.gat,165,232,3	script	Netpia	744,{

-	if(countitem(2244) > 0 && countitem(2209) > 0 && countitem(10007) > 0) {

-		delitem 2244,1;

-		delitem 2209,1;

-		delitem 10007,1;

-		mes "[Netpia]";

-		mes "Wow... You've brought all of it.";

-		mes "You've must have done a lot.";

-		mes "I will make the item according to our agreement.";

-		mes "Please wait for a while.";

-		next;

-		mes "[Netpia]";

-		mes "...........................";

-		next;

-		mes "[Netpia]";

-		mes "...........................";

-		next;

-		mes "[Netpia]";

-		mes ".....................-Work Hard-";

-		next;

-		mes "[Netpia]";

-		mes "Here it is.";

-		mes "It's all yours now.";

-		mes "Remember to always wear it.";

-		getitem 5083,1;

-		next;

-		mes "[Netpia]";

-		mes "Use this,";

-		mes "to pass my intention to him...";

-		mes "He left me for a while,";

-		mes "with the hope to warm the heart of the world.";

-		mes "The one who chases that dream...";

-		mes "Where is he now?";

-		next;

-		mes "[Netpia]";

-		mes "When you see the Red Ribbon,";

-		mes "will you think of me,";

-		mes "and continue to work harder?";

-		mes "May you be blessed with luck on your journey.";

-		close;

-	} else {

-		mes "[Netpia]";

-		mes "Hello?";

-		mes "Do you want to wear a Red Ribbon?";

-		mes "It's a really beautiful head accesory.";

-		mes "I am not trying to trick you,";

-		mes "what do you think?";

-		next;

-		mes "[Netpia]";

-		mes "^FF0000Big Ribbon^000000 x1.";

-		mes "^FF0000Ribbon with one slot^000000 x1.";

-		mes "^FF0000Silk Ribbon^000000 x1...";

-		mes "I'll make it for you,";

-		mes "if you bring the above items.";

-		next;

-		mes "[Netpia]";

-		mes "Remember to bring it to me.";

-		mes "I'll be more then glad,";

-		mes "if you wear the Red Ribbon.";

-		mes "Then see you soon.";

-		next;

-		mes "[Netpia]";

-		mes "^FF0000Ah... let me tell you about this,";

-		mes "Ah! Please keep this in mind.";

-		mes "If you slot a card in you equipment,";

-		mes "and you want to change it to the item now,";

-		mes "you will lose the card and refined level.";

-		close;

-	}

-}

-//Comodo /=Indian Headband=/ [5071]

-comodo.gat,237,217,5	script	Merunte	732,{

-	if (countitem(5010) > 0 && countitem(5049) > 0 && countitem(7101) > 9 && Zeny > 9999) {

-		delitem 5010,1;

-		delitem 5049,1;

-		delitem 7101,10;

-		set Zeny,Zeny-10000;

-		mes "[Merunte]";

-		mes "Oh oh! You have brought it like you've promised!";

-		mes "Then we shall pay our end of our bargain,";

-		mes "just like the Indians!";

-		next;

-		mes "[Merunte]";

-		mes "Now let me have";

-		mes "the materials that you have brought first.";

-		mes "I will use it well to make the headband.";

-		getitem 5071,1;

-		next;

-		mes "[Merunte]";

-		mes "Ah Wuwuwuwuwuwuwuwuwuwuwu~";

-		close;

-	} else {

-		mes "[Merunte]";

-		mes "Ah Wuwuwuwuwuwuwuwuwuwuwu~";

-		mes " ";

-		mes "Let the spirit of Indian stay glorious forever!";

-		mes "With the honor of Comodo Indian,";

-		mes "raise the glory of Indian!";

-		next;

-		mes "[Merunte]";

-		mes "For this reason,";

-		mes "do you want to try wearing,";

-		mes "an Indian Headband? Bring ^FF0000Indian Fillet^000000 x1";

-		mes "^FF0000Striped Hairband^000000 x1";

-		mes "^FF0000Peco Peco Feather^000000 x10";

-		mes "and together with ^FF000010000zeny^000000!";

-		next;

-		mes "[Merunte]";

-		mes "And Indiantakes a promise,";

-		mes "more importantly than his life.";

-		mes "As long as you bring it, I will make that for you anytime!";

-		mes " ";

-		mes "Ah Wuwuwuwuwuwuwuwuwuwuwu~";

-		next;

-		mes "[Merunte]";

-		mes "^FF0000Ah! Please keep this in mind";

-		mes "If you slot a card in your equipment,";

-		mes "and you want to change it to the item now,";

-		mes "you will lose the card and refined level.";

-		close;

-	}

-}

-//Geffen /=Mushroom Band=/ [5082]

-geffen.gat,67,87,3	script	Ipore	700,{

-	if (countitem(921) > 299) {

-		delitem 921,300;

-		mes "[Ipore]";

-		mes "Oh Wow. You really have brought the Mushroom Spore x 300?";

-		mes "You much have been tired.";

-		mes "Then, I shall use these,";

-		mes "to perform a magic show for you!";

-		mes "Please wait for a while.";

-		next;

-		mes "- Sha Ka Sha Ka Sha Ka Sha Ka Sha Ka Sha Ka -";

-		mes "- Iporeput all the Mushroom Spores-";

-		mes "- onto my head. -";

-		next;

-		mes "[Ipore]";

-		mes "Kineisihayituoohyilaahahsaiyi";

-		mes "Chahulisitawutehayisikenbiah";

-		mes "BiwuBiwuBiwu....Keahahah!!";

-		next;

-		mes "[Ipore]";

-		mes ".......................";

-		mes "Shoosh... Anyway,";

-		mes "The spore has grown on your head.";

-		mes "It looks odd just like that.";

-		mes "Let me help you to make it into a headband.";

-		next;

-		mes "[Ipore]";

-		mes "So...How about that? Feeling any better?";

-		mes "Making a headband,";

-		mes "using the spore that grows from your head...";

-		mes "Isn't that romantic? Hehe.";

-		next;

-		mes "[Ipore]";

-		mes "Anyway, you've done a lot.";

-		mes "So, take this headban with you to show off somewhere.";

-		mes "If you want to make another one,";

-		mes "just come and find me!";

-		getitem 5082,1;

-		close;

-	} else {

-		mes "[Ipore]";

-		mes "Huhuhu...";

-		mes "I fount it at last!";

-		mes "I have discovered a magic";

-		mes "that will make the spore grows on your head.";

-		next;

-		mes "[Ipore]";

-		mes "Of course, it might be inconvenient,";

-		mes "with a headfull of mushroom spore...";

-		mes "That's why I pick it up";

-		mes "and make it into a hairband for you.";

-		next;

-		mes "[Ipore]";

-		mes "Aiyo! No point listening and do not see it for yourself!";

-		mes "Just bring 300 ^FF0000Mushroom Spore^000000,";

-		mes "and I will let you experience it!";

-		mes "I am confident that if you experience such magic,";

-		mes "you're surely be thankful to me, won't you?";

-		close;

-	}

-}

-//Yuno /=Ears of Angel's Wing & Ears of Devil's Wing=/ [5074]&[5068]

-yuno.gat,241,52,3	script	Old Blacksmith	813,{

-	mes "[A seemingly skillful craftman]";

-	mes "Uh Oh, since you've come to this place,";

-	mes "you must have known how to enjoy the scenary.";

-	mes "Since you're a Blacksmith, why not do your forging?";

-	mes "What's the point staring at the sky?";

-	mes "My name is Habir Moah!";

-	mes "A wandering Blacksmith with my hammer as my companion.";

-	next;

-	if (countitem(2254) && countitem(2286) && Zeny>19999) {

-		mes "[Habir Moah]";

-		mes "Hmm? You do have really good items, don't you?";

-		mes "Hmm... however,";

-		mes "do you have the insufficientfeeling?";

-		mes "If you are willing, take out your";

-		mes "^4d4dffAngel Wing^000000 and ^4d4dffElven Ears^000000";

-		mes "to create a unusual item.";

-		next;

-		mes "[Habir Moah]";

-		mes "How about that, do you ever though of that?";

-		mes "Don't suspect my capability!";

-		mes "As a Blacksmith";

-		mes "I am considered as one of the most skillful one, if not the most skillful!";

-		mes "Through the skill of blacksmith,";

-		mes "an ore will become a great steel, that's the rule.";

-		next;

-		switch(select("Hmm... I'll think about it.:Can you help me make it?:Can I craft Evil headband...?")) {

-		case 1:

-			mes "[Habir Moah]";

-			mes "Hmm, what a pity!";

-			mes "I thought I can show my skill again.";

-			mes "Oh well.";

-			mes "... ... ...";

-			mes "Beautiful sky... So blue.";

-			close;

-		case 2:

-			mes "[Habir Moah]";

-			mes "Aha, thank you!";

-			mes "Let's see the material first, shall we?";

-			mes "Angel Wing and Elven Ears,";

-			mes "other miscellaneous stuffs and 20000 zeny.";

-			mes "All these items really cost something.";

-			mes "I will help you make one fine accesory.";

-			next;

-			mes "[Habir Moah]";

-			mes "Before I produce the item, let me remind you.";

-			mes "I don't care about";

-			mes "the level of refining for the item.";

-			mes "If you have worries,";

-			mes "I guess you better tidy up your items.";

-			next;

-			mes "[Habir Moah]";

-			mes "^4d4dffPlease Reserve the items,";

-			mes "that is required for making the headgear^000000";

-			mes "I do not hope that you will blame me,";

-			mes "if I fail to make that item.";

-			next;

-			switch(select("It's ok, just do it.:Hmm, I need to think about it.")) {

-			case 1:

-				mes "[Habir Moah]";

-				mes "So, let's do it!";

-				next;

-				misceffect 154; //Success Hammer ;P

-				mes "[Habit Moah]";

-				mes "With my skills,";

-				mes "the great creation of me, Habir Moah,";

-				mes "is completed!";

-				mes "Here it is,";

-				mes "the Angel Wing Ears.";

-				if (countitem(2254) && countitem(2286) && Zeny>19999) {

-					delitem 2254,1;

-					delitem 2286,1;

-					set Zeny,Zeny-20000;

-					getitem 5074,1;

-				}

-				next;

-				mes "[Habir Moah]";

-				mes "From now on,";

-				mes "everyone will you.";

-				close;

-			case 2:

-				mes "[Habir Moah]";

-				mes "If you're interested in it in future,";

-				mes "do come and find me.";

-				mes " ";

-				mes "Ah, what a soothing breeze.";

-				close;

-			}

-		case 3:

-			mes "[Habir Moah]";

-			mes "Hoho, of couse I can craft";

-			mes "Evil Wing!";

-			mes "I'll make it into Devil Wing Ears!";

-			next;

-			mes "[Habir Moah]";

-			mes "Let's see the materials required, shall we?";

-			mes "Evil Wing and Elven Ears,";

-			mes "in addition to that, 20,000 zeny.";

-			mes "All these items really cost something.";

-			mes "I will help you make one fine accesory.";

-			next;

-			mes "[Habir Moah]";

-			mes "Before I produce the item, let me remind you.";

-			mes "I don't care about";

-			mes "the level of refining for the item.";

-			mes "If you have worries,";

-			mes "I guess you better tidy up your items.";

-			next;

-			mes "[Habir Moah]";

-			mes "^4d4dffPlease reserve the items,";

-			mes "this is required for making the headgear.^000000";

-			mes "I do not hope that you will blame me,";

-			mes "if I fail to make that item.";

-			next;

-			switch(select("It's ok. Let's do it.:I need to tidy up first.")) {

-			case 1:

-				if (countitem(2255) && countitem(2286) && Zeny > 19999) {

-					mes "[Habir Moah]";

-					mes "So, let's do it!";

-					next;

-					misceffect 154;

-					mes "[Habir Moah]";

-					mes "With my skills,";

-					mes "the great creation of me, Habir Moah,";

-					mes "is completed!";

-					mes "Here it is,";

-					mes "Devil Wing Ears";

-					if (countitem(2255) && countitem(2286) && Zeny > 19999) {

-						delitem 2255,1;

-						delitem 2286,1;

-						set Zeny,Zeny-20000;

-						getitem 5068,1;

-					}

-					next;

-					mes "[Habir Moah]";

-					mes "Fromnow on,";

-					mes "everyone will you.";

-					close;

-				} else {

-					mes "[Habir Moah]";

-					mes "I'm sorry. If you have not prepared all the materials,";

-					mes "I won't do that for you.";

-					mes "I'll need Evil Wing, Elven Ears and";

-					mes "20000 zeny.";

-					mes "Can you please confirm that you have all of those?";

-					close;

-				}

-			case 2:

-				mes "[Habir Moah]";

-				mes "If you're interested in it in future,";

-				mes "do come and find me.";

-				mes " ";

-				mes "Ah, what a soothing breeze.";

-				close;

-			}

-		}

-	} else if (countitem(2255) && countitem(2286) && Zeny>19999) {

-		mes "[Habir Moah]";

-		mes "Hmm? You do have really good items, don't you?";

-		mes "Hmm... however,";

-		mes "do you have the insufficientfeeling?";

-		mes "If you are willing, take out your";

-		mes "^4d4dffEvil Wing^000000 and ^4d4dffElven Ears^000000";

-		mes "to create a unusual item.";

-		next;

-		mes "[Habir Moah]";

-		mes "How about that, do you ever though of that?";

-		mes "Don't suspect my capability!";

-		mes "As a Blacksmith";

-		mes "I am considered as one of the most skillful one, if not the most skillful!";

-		mes "Through the skill of blacksmith,";

-		mes "an ore will become a great steel, that's the rule.";

-		next;

-		switch(select("Hmm... I'll think about it.:Can you help me make it?:Can I craft Angel Wing...?")) {

-		case 1:

-			mes "[Habir Moah]";

-			mes "Hmm, what a pity!";

-			mes "I thought I can show my skill again.";

-			mes "Oh well.";

-			mes "... ... ...";

-			mes "Beautiful sky... So blue.";

-			close;

-		case 2:

-			mes "[Habir Moah]";

-			mes "Aha, thank you!";

-			mes "Let's see the material first, shall we?";

-			mes "Evil Wing and Elven Ear,";

-			mes "other miscellaneous stuffs and 20000 zeny.";

-			mes "All these items really cost something.";

-			mes "I will help you make one fine accesory.";

-			next;

-			mes "[Habir Moah]";

-			mes "Before I produce the item, let me remind you.";

-			mes "I don't care about";

-			mes "the level of refining for the item.";

-			mes "If you have worries,";

-			mes "I guess you better tidy up your items.";

-			next;

-			mes "[Habir Moah]";

-			mes "^4d4dffPlease Reserve the items,";

-			mes "that is required for making the headgear^000000";

-			mes "I do not hope that you will blame me,";

-			mes "if I fail to make that item.";

-			next;

-			switch(select("It's ok, just do it.:Hmm, I need to think about it.")) {

-				case 1:

-					mes "[Habir Moah]";

-					mes "So, let's do it!";

-					next;

-					misceffect 154; //Success Hammer ;P

-					mes "[Habit Moah]";

-					mes "With my skills,";

-					mes "the great creation of me, Habir Moah,";

-					mes "is completed!";

-					mes "Here it is,";

-					mes "the Angel Wing Ears.";

-					if (countitem(2255) && countitem(2286) && Zeny>19999) {

-						delitem 2255,1;

-						delitem 2286,1;

-						set Zeny,Zeny-20000;

-						getitem 5068,1;

-					}

-					next;

-					mes "[Habir Moah]";

-					mes "From now on,";

-					mes "everyone will you.";

-					close;

-				case 2:

-					mes "[Habir Moah]";

-					mes "If you're interested in it in future,";

-					mes "do come and find me.";

-					mes " ";

-					mes "Ah, what a soothing breeze.";

-					close;

-				}

-		case 3:

-			mes "[Habir Moah]";

-			mes "Hoho, of course I can craft";

-			mes "Angel Wing!";

-			mes "I'll make it into Angel Wing Ears!";

-			next;

-			mes "[Habir Moah]";

-			mes "Let's see the materials required, shall we?";

-			mes "Angel Wing and Elven Ears,";

-			mes "in addition to that, 20,000 zeny.";

-			mes "All these items really cost something.";

-			mes "I will help you make one fine accesory.";

-			next;

-			mes "[Habir Moah]";

-			mes "Before I produce the item, let me remind you.";

-			mes "I don't care about";

-			mes "the level of refining for the item.";

-			mes "If you have worries,";

-			mes "I guess you better tidy up your items.";

-			next;

-			mes "[Habir Moah]";

-			mes "^4d4dffPlease reserve the items,";

-			mes "this is required for making the headgear.^000000";

-			mes "I do not hope that you will blame me,";

-			mes "if I fail to make that item.";

-			next;

-			switch(select("It's ok. Let's do it.:I need to tidy up first.")) {

-			case 1:

-				if (countitem(2254) && countitem(2286) && Zeny > 19999) {

-					delitem 2254,1;

-					delitem 2286,1;

-					set Zeny,Zeny-20000;

-					mes "[Habir Moah]";

-					mes "So, let's do it!";

-					next;

-					misceffect 154;

-					mes "[Habir Moah]";

-					mes "With my skills,";

-					mes "the great creation of me, Habir Moah,";

-					mes "is completed!";

-					mes "Here it is,";

-					mes "Angel Wing Ears";

-					getitem 5074,1;

-					next;

-					mes "[Habir Moah]";

-					mes "Fromnow on,";

-					mes "everyone will you.";

-					close;

-				} else {

-					mes "[Habir Moah]";

-					mes "I'm sorry. If you have not prepared all the materials,";

-					mes "I won't do that for you.";

-					mes "I'll need Angel Wing, Elven Ears and";

-					mes "20000 zeny.";

-					mes "Can you please confirm that you have all of those?";

-					close;

-				}

-			case 2:

-				mes "[Habir Moah]";

-				mes "If you're interested in it in future,";

-				mes "do come and find me.";

-				mes " ";

-				mes "Ah, what a soothing breeze.";

-				close;

-			}

-		}

-	} else {

-		mes "[Habir Moah]";

-		mes "I am not sure how I have followed the wind,";

-		mes "that leads me to Juno...";

-		mes "Altough I don't really feel comfortable on a high place like this, the view here is really breath taking.";

-		mes "I never knew the sky could be so beautiful,";

-		mes "when I was travelling on the land.";

-		next;

-		mes "[Habir Moah]";

-		mes "Anyway, I am a craftman in nature...";

-		mes "I feel uneasy if I do not craft anything.";

-		mes "And it's been a while since my last creation.";

-		mes "If there're materials,";

-		mes "I'll surely create the best creation of my life.";

-		mes "Unfortunately, there weren't any. ...Hehe...";

-		next;

-		mes "[Habir Moah]";

-		mes "May I ask, do you have either Angel Wing,";

-		mes "Evil Wing or Elven Ear?";

-		mes "If you do, can you bring it to me?";

-		mes "I will help you to make a beautiful";

-		mes "Ears of Angel's Wing and Ears of Devil's Wing.";

-		next;

-		switch(select("Can you tell me about the details?:I'll consider about it.")) {

-		case 1:

-			mes "[Habir Moah]";

-			mes "Oh yes,";

-			mes "I need to tell you the details about the materials.";

-			mes "Angel Wing Ears requires ^4d4dffAngel Wings^000000 and";

-			mes "^4d4dffElven Ears^000000 &#1038;Aand the cost for other materials is";

-			mes "approximatedly ^4d4dff20000 zeny^000000";

-			next;

-			mes "[Habir Moah]";

-			mes "Devil Wing Ears requires ^4d4dffEvil Wing^000000 and";

-			mes "^4d4dffElven Ears^000000 &#1038;Awhile the cost for other materials is";

-			mes "approximately ^4d4dff20000 zeny";

-			next;

-			mes "[Habir Moah]";

-			mes "Please come to me after you have got all the materials.";

-			mes "I will make the joy of Angel and terror of Devil";

-			mes "as a present for you.";

-			close;

-		case 2:

-			mes "[Habit Moah]";

-			mes "I always look at thge sky at this location...";

-			mes "So if you need me, you know where to find me.";

-			close;

-		}

-	}

-}

-//Lutie /=Sea Otter Cap=/

-xmas.gat,183,267,3	script	Pretty Lindsay	793,{

-	if (countitem(5033) && countitem(5064)) {

-		delitem 5033,1;

-		delitem 5064,1;

-		mes "[Pretty Lindsay]";

-		mes "Wow~ you really have brought all the items here.";

-		mes "Hang on for a while~";

-		mes "Lindsay will make that for you right now.";

-		next;

-		mes "[Pretty Lindsay]";

-		mes "Just like what my mom taught me,";

-		mes "first, place this on the ground...";

-		mes "Preparation complete. . . .";

-		mes "Haya, yah!";

-		next;

-		misceffect 261;

-		mes "^FF0000Lindsay put the RaccoonHat on the ground,";

-		mes "and place the Smokie Leaf on top of it.";

-		mes "Then she say something that none could understand its meaning.";

-		mes "There's a bright glitter,";

-		mes "and the fur of the RaccoonHat slowly turns into blue color.";

-		mes "And finally, the shape of Smokie turns into Otter.";

-		next;

-		mes "[Pretty Lindsay]";

-		mes "Pheww! It's done!";

-		mes "It's so tiring I am feeling weak right now!";

-		mes "Here~ Take it~";

-		getitem 5078,1;

-		next;

-		mes "[Pretty Lindsay]";

-		mes "This is.. This is the best creation of Lindsay.";

-		mes "Remember to put it on always~";

-		mes "Farewell~";

-		close;

-	} else {

-		mes "[Pretty Lindsay]";

-		mes "Hi~ Wassup?";

-		if (sex) {

-			mes "Handsome boy.";

-		} else {

-			mes "Beautiful?";

-		}

-		next;

-		mes "[Pretty Lindsay]";

-		mes "Do you want to get a cute headgear?";

-		mes "Pretty Lindsay is going to create";

-		mes "a cap that looks like a Sea Otter this time.";

-		mes "How about that? It should be cute, ya?";

-		emotion e_heh; //ET_SMILE

-		next;

-		mes "[Pretty Lindsay]";

-		mes "Imagina that~ If you get to wear that hat,";

-		mes "you will have the feeling,";

-		mes "that you're like an Sea Otter.";

-		mes "If you can be like an Sea Otter.. Woah!";

-		mes "I am getting excited just by imagining it.";

-		next;

-		mes "[Pretty Lindsay]";

-		mes "However, production of ^4D4DFFSea-Otter Hat^000000 requires,";

-		mes "^0000FFRaccoonHat^000000 x1 ^0000FFSmokie Leaf^000000 x1";

-		mes "So, if you want to get a Sea-Otter Hat, brother,";

-		mes "just bring along the materials,";

-		mes "and Lindsay will make it for you immediately.";

-		next;

-		switch(select("I will come again when I have collected them.:Yo..why RaccoonHat?")) {

-		case 1:

-			mes "[Pretty Lindsay]";

-			mes "Hmm~ Come back soon~";

-			emotion e_heh; //ET_SMILE

-			close;

-		case 2:

-			mes "[Pretty Lindsay]";

-			mes "Ah..why Sea-Otter Hat production";

-			mes "requires Smokie Hat?";

-			mes "Hmm. .That's because. . . secrets.. .";

-			next;

-			mes "[Pretty Lindsay]";

-			mes "When you place Smokie Leaf with RaccoonHat,";

-			mes "and say the spell,";

-			mes "according to what my mom had taught, the RaccoonHat will";

-			mes "^003063Bang!!^000000 and turn into Sea-Otter Hat.";

-			next;

-			mes "[Pretty Lindsay]";

-			mes "But I don't know why it can be like that.";

-			mes "Mom never tell me the reason.";

-			next;

-			mes "["+strcharinfo(0)+"]";

-			mes ". . . . . . . . . . . . . . . . .";

-			next;

-			mes "["+strcharinfo(0)+"]";

-			mes "Ok..Ok, I will come again when I have collected all the items.";

-			close;

-		}

-	}

-}

-//Lutie /=Brown Bear Cap=/ [5059]

-xmas.gat,175,156,3	script	Fuzzy Fuzz	712,{

-	if (countitem(5030) && countitem(7213) > 99 && countitem(7217) > 99 && countitem(7161) > 299) {

-		delitem 5030,1;

-		delitem 7213,100;

-		delitem 7217,100;

-		delitem 7161,300;

-		mes "[Fuzzy Fuzz]";

-		mes "Good! You've brought it!";

-		mes "The production might take some time.";

-		mes "There's a lot of amendment to be done.";

-		mes "So, please wait for a while.";

-		next;

-		mes "[Fuzzy Fuzz]";

-		mes ". . . TutaTusa. . .";

-		mes "Pluck this off. . . .";

-		mes "Wuha!~ Sew it happily..";

-		mes "Wait a little longer.";

-		next;

-		mes "[Fuzzy Fuzz]";

-		mes "Didn't they say people who wait will be more lucky?";

-		mes "It's almost done. So wait for a little while.";

-		mes "Rub your hands if you feel cold.";

-		next;

-		mes "[Fuzzy Fuzz]";

-		mes "It is done!";

-		mes "I've made a cap that is suitable for you!";

-		mes "I know I made it, but it really looks nice.";

-		mes "I used a lot of efforts,";

-		mes "so please take good care of it.";

-		mes "Here~ Please take it with you~";

-		getitem 5059,1;

-		close;

-	} else {

-		mes "[Fuzzy Fuzz]";

-		if (sex) {

-			mes "Hey you, hold it right there!";

-		} else {

-			mes "Yoh miss, hold it right there.";

-		}

-		mes "You who look like a slow and dumb bear,";

-		mes "I have a cap that fits you,";

-		mes "how about that? do you want it?";

-		emotion e_omg; //ET_SURPRISE?

-		next;

-		mes "[Fuzzy Fuzz]";

-		mes "Haha.. Looks like you're not happy";

-		mes "because I said you look dumb, right?";

-		mes "How sensitive . . .";

-		mes "What I mean is, you're honest and easy to be tricked.";

-		mes "OkOk.. don't look at me like that.";

-		emotion e_sry; //ET_SORRY

-		next;

-		mes "[Fuzzy Fuzz]";

-		mes "I can't make the cap now because I do not have the materials.";

-		mes "Can you please.";

-		mes "find the materials for me?";

-		mes "I will help to make the 'Teddybear Hat' for you.";

-		next;

-		mes "[Fuzzy Fuzz]";

-		mes "Come, let me tell you about the required materials.";

-		mes "You won't need very much materials here.";

-		mes "^0000FFPanda Hat^000000 x1 ^0000FFNeedle Packet^000000 x100";

-		mes "^0000FFSpool^000000 x100 ^0000FFBlack Bear's Skin^000000 x300";

-		mes "That's all,";

-		mes "isn't that easy to be found?";

-		next;

-		mes "[Fuzzy Fuzz]";

-		mes "I will be waiting for you!";

-		emotion e_heh; //ET_SMILE

-		close;

-	}

-}

-//payon /=Cap of Concentration=/ [5073]

-payon_in03.gat,8,193,4	script	Nan Hyang	75,{

-	if (countitem(2285) && countitem(1550)) {

-		mes "[Nan Hyang]";

-		mes "Sigh, give that to me.";

-		mes "Before I start,";

-		mes "take note of this,";

-		mes "In the process of production ^FF0000'Model Training Hat'^000000,";

-		mes "If ^FF0000the 'Book' is slotted with card,";

-		mes "or possesses refined level^000000,";

-		emotion e_heh; //ET_SMILE

-		next;

-		mes "[Nan Hyang]";

-		mes "^FF0000the effect will dissappear,";

-		mes "Of course, the same goes to the 'Apple of Archer' too^000000.";

-		mes "So do you want me to make it now?";

-		next;

-		switch(select("Start making it:Wait, don't.")) {

-		case 1:

-			mes "[Nan Hyang]";

-			mes "Request accepted,";

-			mes "I will start it right now.";

-			mes "Please have a seat,";

-			mes "and wait for me, will you?";

-			mes "This is to make sure that you have the correct posture.";

-			mes "Don't worry, it's for free.";

-			emotion e_ok; //ET_OK

-			next;

-			mes "[Nan Hyang]";

-			mes "Please be patient!";

-			next;

-			mes ". . . . . . . . . . . . . . . . . .";

-			mes " . . . . . . . . . . . . . . . . . ";

-			mes ". . . . . . . . . . . . . . . . . .";

-			mes " . . . . . . . . . . . . . . . . . ";

-			next;

-			mes "[Nan Hyang]";

-			mes "This is not a hard task,";

-			mes "so it's going to be completed right away..";

-			mes "Please wear this hat,";

-			mes "to keep a correct posture.";

-			mes "Thank you!";

-			next;

-			mes "[Nan Hyang]";

-			mes "An apple is placed on the book,";

-			mes "keep it balanced and don't let is fall.";

-			mes "This is the reason to put on the 'Model Training Hat',";

-			mes "to keep the balance in order to keep the correct posture.";

-			emotion e_oh; //ET_AHA? =X

-			next;

-			mes "[Nan Hyang]";

-			mes "You might feel unconfortable and pain on your neck at the beginning.";

-			mes "But as you use it,";

-			mes "you will slowly found your posture going better.";

-			if (countitem(2285) && countitem(1550)) {

-				delitem 2285,1;

-				delitem 1550,1;

-				getitem 5073,1;

-			}

-			next;

-			mes "[Nan Hyang]";

-			mes "Here it is.";

-			mes "Please take it.";

-			mes "Ah.. Before I forget,";

-			mes "This is the Arrow taken from the Apple of Archer.";

-			mes "Please take it.";

-			getitem 1750,1;

-			next;

-			mes "[Nan Hyang]";

-			mes "Farewell then.";

-			mes "Have a balanced day.";

-			close;

-		case 2:

-			mes "[Nan Hyang]";

-			mes "Ah.. isn't this an item that requires a lot of equipments?";

-			mes "If you've fully prepared, come and find me.";

-			emotion e_hmm; //ET_THINK?

-			close;

-		}

-	} else {

-		mes "[Nan Hyang]";

-		mes "Good day.";

-		mes "This place teaches manners and posture.";

-		mes "May I know,";

-		mes "how can I help you here?";

-		emotion e_omg; //ET_SURPRISE?

-		next;

-		switch(select("I want to learn too . .:I'm sorry. I think I came to a wrong place.")) {

-		case 1:

-			mes "[Nan Hyang]";

-			mes "Oh, I see.";

-			mes "But how do I say this?";

-			mes "I'm really sorry,";

-			mes "we are not having any intake currently.";

-			next;

-			mes "[Nan Hyang]";

-			mes "And since the president is going outstation,";

-			mes "and we're not sure,";

-			mes "when he'll return,";

-			mes "(Phew..how long are you going to";

-			mes "stay in the in. . . .)";

-			next;

-			mes "[Nan Hyang]";

-			mes "Hmm, beofre you take the course of manners,";

-			mes "we have to correct";

-			mes "your unbalance posture first.";

-			mes "This means that,";

-			mes "a correct posture is a polite action.";

-			mes "That's what I think.";

-			next;

-			mes "[Nan Hyang]";

-			mes "Since it is quite impossible to correct your posture now,";

-			mes "I will let you correct it yourself.";

-			mes "The method is";

-			mes "to create a 'Model Training Hat',";

-			mes "for you.";

-			next;

-			mes "[Nan Hyang]";

-			mes "Do you want me to make this for you?";

-			mes "If you want it,";

-			mes "please take the materials required here.";

-			mes "Generally I can give it to you for free.";

-			mes "But there's no stock in the storage anymore.";

-			emotion e_hmm; //ET_QUESTION?

-			next;

-			mes "[Nan Hyang]";

-			mes "If you bring ^0000FFApple of Archer^000000 x1 and ^0000FFBook^000000 x1,";

-			mes "I will produce it,";

-			mes "and give the product to you.";

-			next;

-			mes "[Nan Hyang]";

-			mes "After you've get these items,";

-			mes "come and find me.";

-			mes "Farewell then.";

-			close;

-		case 2:

-			mes "[Nan Hyang]";

-			mes "Oh, I see.";

-			mes "This place should be kept silent.";

-			mes "If you do not have any important matters,";

-			mes "can you please go out? Thank you.";

-			mes "Good byethen. . .";

-			close;

-		}

-	}

-}

-//geffen /=Tulip Hairpin=/

-geffen.gat,83,189,5	script	Ses	716,{

-	mes "[Ses]";

-	mes "My name is Ses.";

-	mes "Ses like to fold paper.";

-	mes "I used a big colorful paper to make a huge boat for mummy yesterday.";

-	mes "She thank me and touch my head, hehe.";

-	emotion e_heh; //ET_SMILE

-	next;

-	mes "[Ses]";

-	mes "Today, the teacher teaches us the method to make beautiful flower!!!";

-	mes "Altough it's a little bit hard~ it's very interesting~";

-	mes"The flower is beautiful when you put it on your head. Everyone tell me so, and I'm so happy!";

-	emotion e_heh; //ET_THROB?=X

-	next;

-	if (countitem(2278) && countitem(975)) {

-		mes "[Ses]";

-		mes "Hehe- Mr. Smile!! Scarlet Dyestuffs!!!";

-		mes "WuYeaghhhhh---";

-		mes "Come, let me";

-		mes "help you make a beautiful flower !!";

-		emotion e_swt; //ET_SWEAT

-		next;

-		mes "[Ses]";

-		mes "Let me make it for you, ok? Ok????";

-		emotion e_swt;

-		next;

-		switch(select("Allow you to do so:I reject")) {

-		case 1:

-			mes "[Ses]";

-			mes "Wahahahaha~";

-			emotion e_heh;

-			next;

-			mes "[Ses]";

-			mes "Take this Mr Smile,";

-			mes "cut here a little, cut there some~~";

-			mes "and a little there, and here....";

-			mes "yiyik...";

-			emotion e_ho; //ET_DELIGHT?

-			next;

-			mes "[Ses]";

-			mes "Ha- !! It's done!!!!";

-			if (countitem(2278) && countitem(975)) {

-				delitem 2278,1;

-				delitem 975,1;

-				getitem 5077,1;

-			}

-			next;

-			mes "[Ses]";

-			mes "Hehe, it's done,";

-			mes "How about it? Cute, isn't it? Right?";

-			next;

-			mes "[Ses]";

-			mes "Am I good?";

-			mes "Hehe, I am making one for my bother too.";

-			mes "You need one, brother.";

-			mes "come and find me again if you want me to make a beautiful flower again.";

-			mes "Good bye then~";

-			close;

-		case 2:

-			mes "[Ses]";

-			mes "Yiyee~~ I don't need to help you do it again then!!";

-			close;

-		}

-	} else {

-		mes "[Ses]";

-		mes "Do you want to make on too, big brother?";

-		mes "I will teach you... hehehe";

-		next;

-		mes "[Ses]";

-		mes "However, you need to prepare some items,";

-		mes "because I don't have anything now.";

-		mes "Can you bring it to me, big brother?";

-		next;

-		switch(select("Sure:No")) {

-		case 1:

-			mes "[Ses]";

-			mes "So please bring,";

-			mes "^3131FFMr. Smile x1";

-			mes "Scarlet Dyestuffs x1^000000";

-			mes "I will make a beautiful red flower for you.";

-			next;

-			mes "[Ses]";

-			mes "I will wait for you here. Remember to come, ok!?";

-			close;

-		case 2:

-			mes "[Ses]";

-			mes "Hooyeahyeahyeah~~~~~";

-			emotion e_sob;

-			close;

-		}

-	}

-}

-//Lutie /=Party Hat, Straw Hat, Cowboy Hat, Sombrero and Fur hat=/

-xmas_in.gat,35,30,3	script	Headgear Merchant	797,{

-	mes "[Mike]";

-	mes "I like hats...";

-	mes "I like hats more than any other thing in this world!!";

-	mes "Even if you compared hats with eating,";

-	mes "wearing a new hat is far more important";

-	next;

-	mes "[Mike]";

-	mes "Hat, Cap, Holy Bonnet,";

-	mes "Turban, Iron Helm,";

-	mes "Hemmed Sallet, Munak Turban...";

-	mes "I like them all!!";

-	mes "(Wuhoo! Wuhoohoo!!)";

-	next;

-	mes "[Mike]";

-	mes "I have learned the way to modified a hat,";

-	mes "and I am researching";

-	mes "to design the most fashionable hat.";

-	next;

-	switch(select("Party Hat:Straw Hat:Cowboy Hat:Sombrero:Fur Hat")) {

-	case 1: //Party hat [5060]

-		if(countitem(2236) && countitem(7151) > 99 && countitem(7111) > 99) {

-			mes "[Mike]";

-			mes "Party Hat! It is made according to the Santa's Hat,";

-			mes "decorated with some papers.";

-			mes "This is the best Party Hat!! Do you want it?";

-			mes "(Ohhhh, beautiful! So beautiful!)";

-			next;

-			mes "[Mike]";

-			mes "Wait, before I start the production, let's confirm this.";

-			mes "I will use items regarless of whether,";

-			mes "it had been refined or slotted with cards.";

-			mes "So you better just prepare the items required,";

-			mes "and put the others in the storage.";

-			next;

-			mes "[Mike]";

-			mes "You've brought all the materials...";

-			mes "Great! The one who wants a Party Hat,";

-			mes "do you want me to make it for you right now?";

-			next;

-			switch(select("No:Yes")) {

-			case 1:

-				mes "[Mike]";

-				mes "Hmm, is that so...";

-				mes "Let keep wearing your Santa's Hat then.";

-				mes "Hmmmhmmmhmmm....";

-				close;

-			case 2:

-				mes "^3355FFDeteDete ChebenCheben";

-				mes "PotterPotter MeganMegan";

-				mes "PosongPosong ShahaShaha";

-				next;

-				if(countitem(2236) && countitem(7151) > 99 && countitem(7111) > 99) {

-					delitem 2236,1;

-					delitem 7151,100;

-					delitem 7111,100;

-					getitem 5060,1;

-				}

-				mes "[Mike]";

-				mes "Very Good!";

-				mes "Force the birthday fellow to put this on,";

-				mes "then you can play tricks on him. That should be fun...";

-				mes "Please come again too next time~";

-				next;

-				mes "[Mike]";

-				mes "And, this is what's left after the process.";

-				mes "Here, take it!";

-				mes "Maybe it might be useful to you... (Hehehehe)";

-				getitem 949,10;

-				close;

-			}

-		} else {

-			mes "[Mike]";

-			mes "Party Hat! It's a necessity,";

-			mes "for anyone who throws a birthday party.";

-			mes "No matter how serious looking one is,";

-			mes "the hat will make him look cute and funny!";

-			next;

-			mes "[Mike]";

-			mes "In my opinion, it is suitable not only for birthday,";

-			mes "but as well as entertaining event!";

-			mes "This beautiful hat is just suitable for fun.";

-			mes "(...How about organizing a party for adventure?!?)";

-			next;

-			mes "[Mike]";

-			mes "Anyway, the material required are";

-			mes "^3355FFSanta's Hat^000000 x1";

-			mes "^3355FFOil Paper^000000 x100";

-			mes "^3355FFSlick Paper^000000 x100";

-			next;

-			mes "[Mike]";

-			mes "These are what I need.";

-			mes "So don't forget to collect the material, ok?";

-			mes "I will always be around....";

-			mes "So come back only after you have collected them!";

-			close;

-		}

-	case 2: //Straw Hat [5062]

-		if(countitem(2280) && countitem(7197) > 299 && countitem(7150) > 299) {

-			mes "[Mike]";

-			mes "Straw Hat! This hat is based on Sahkkat,";

-			mes "that is make of bamboo and rattan.";

-			mes "Wearing it makes you think that you're going to have a good harvesting year!";

-			mes "(Look, power of farmer!!)";

-			next;

-			mes "[Mike]";

-			mes "Wait, before I start the production, let's confirm this.";

-			mes "I will use items regardless of whether";

-			mes "it had been refined or slotted with cards.";

-			mes "So you better just prepare the items required,";

-			mes "and put the others in the storage.";

-			next;

-			mes "[Mike]";

-			mes "You've brought all the materials...";

-			mes "Great! The one who wants a Straw Hat,";

-			mes "do you want me to make it for you right now?";

-			next;

-			switch(select("No, thanks:Sure")) {

-			case 1:

-				mes "[Mike]";

-				mes "Hmm, is that so...";

-				mes "Let keep wearing your Sahkkat then.";

-				mes "Hmmmhmmmhmmm....";

-				close;

-			case 2:

-				mes "^3355FFSakaSaka WakaWaka";

-				mes "JekaJeka HuyiHuyi";

-				mes "PokaPoka TewuTewu^000000";

-				next;

-				if(countitem(2280) && countitem(7197) > 299 && countitem(7150) > 299) {

-					delitem 2280,1;

-					delitem 7197,300;

-					delitem 7150,300;

-					getitem 5062,1;

-				}

-				mes "[Mike]";

-				mes "HmmHmm! It feels that the harvest of this year shall be good!";

-				mes "I hope next year will be the same too...";

-				mes "Ahahaha, what am I talking about...";

-				mes "Please come again if you want more~";

-				close;

-			}

-		} else {

-			mes "[Mike]";

-			mes "Staw Hat! It gives you energy to work,";

-			mes "even under the heat of the sun";

-			mes "as well as providing shades that give you a cool feeling.";

-			mes "This hat will make you hope for a good harvest this year too!";

-			next;

-			mes "[Mike]";

-			mes "This hat is suitable for the farmers,";

-			mes "who want to plant or cultivate their crops.";

-			mes "You have the feel of a villager when you wear it!";

-			mes "(For your info, I am a city kid!)";

-			next;

-			mes "[Mike]";

-			mes "Anyway, the materials required for production are";

-			mes "^3355FFSakkat^000000 x1";

-			mes "^3355FFTough Vines^000000 x300";

-			mes "^3355FFPiece of Bamboo^000000 x300";

-			next;

-			mes "[Mike]";

-			mes "These are what I need.";

-			mes "So don't forget to collect all the material, ok?";

-			mes "I will always be around....";

-			mes "So come back only after you have collected them!";

-			close;

-		}

-	case 3: //Cowboy Hat [5075]

-		if (countitem(2248) && countitem(7030) > 107 && countitem(7194) > 107 && countitem(7120) > 3) {

-			mes "[Mike]";

-			mes "Cowboy Hat! A hat of western feel,";

-			mes "but looks toughet than Western Grace,";

-			mes "That is suitable for the western's males!";

-			mes "(Qiang... Yeehahaa~...)";

-			next;

-			mes "[Mike]";

-			mes "Wait, before I start the production, let's confirm this.";

-			mes "I will use item regardless of wether";

-			mes "It had been refined or slotted with cards.";

-			mes "So you better just prepare the items required,";

-			mes "and put the others in the storage.";

-			next;

-			mes "[Mike]";

-			mes "You've brought all the materials...";

-			mes "Great! The one who wants a Cowboy Hat,";

-			mes "do you want me to make it for you right now?";

-			switch(select("No:Yes")) {

-			case 1:

-				mes "[Mike]";

-				mes "Hmm,is that so...";

-				mes "Let keep wearing your typical Western Grace then.";

-				mes "Hmmmhmmmhmmm....";

-				close;

-			case 2:

-				mes "^3355FFDudududu bangbangbangbang";

-				mes "TadamTadam BiyongBiyong";

-				mes "Wuuuuu Ahwuwuwuwuw^000000";

-				next;

-				if (countitem(2248) && countitem(7030) > 107 && countitem(7194) > 107 && countitem(7120) > 3) {

-					delitem 2248,1;

-					delitem 7030,108;

-					delitem 7194,108;

-					delitem 7120,4;

-					getitem 5075,1;

-				}

-				mes "[Mike]";

-				mes "HeeeHaH! With that";

-				mes "you can tame even the wildest stiallion!";

-				mes "Please come again if you need more~";

-				close;

-			}

-		} else {

-			mes "[Mike]";

-			mes "Cowboy Hat!A hat of western feel,";

-			mes "where you seem to found the boiling blood of the cowboys...";

-			mes "It's as if you are going to draw something out,";

-			mes "and start shooting!";

-			next;

-			mes "[Mike]";

-			mes "The Cowboy Hat with thefeel of opening a barren land...";

-			mes "It makes guys look cool!";

-			mes "and it makes gals look prettier";

-			mes "(Is tought the new concept of beauty...?)";

-			next;

-			mes "[Mike]";

-			mes "Anyway, the materials required for production are";

-			mes "^3355FFWestern Grace^000000 x1";

-			mes "^3355FFClaw of Desert Wolf^000000 x108";

-			mes "^3355FFSoft Blade of Grass^000000 x108";

-			mes "^3355FFBurning Horseshoe^000000 x4";

-			next;

-			mes "[Mike]";

-			mes "These are what I need.";

-			mes "So don't forget to collect the material, ok?";

-			mes "I will always be around....";

-			mes "So come back only after you have collected them!";

-			close;

-		}

-	case 4: //Sombrero [5067]

-		if (countitem(5062) && countitem(952) > 49 && countitem(1907)) {

-			mes "[Mike]";

-			mes "SipoleiyeahhhhhhWoohohoh!!";

-			mes "Amigo! Adios Amigo!";

-			mes "If you like the sun and happy melody,";

-			mes "this is the right hat for you!!";

-			next;

-			mes "[Mike]";

-			mes "Wait, before I start the production, let's confirm this.";

-			mes "I will use items regardless of wether";

-			mes "it had been refined or slotted with cards.";

-			mes "So you better just prepare the items required";

-			mes "and put the others in the storage";

-			next;

-			mes "[Mike]";

-			mes "You've brought all the materials...";

-			mes "Great! The one who wants a Sombrero,";

-			mes "so you want me to make if for you right now?";

-			switch(select("No:Yes")) {

-			case 1:

-				mes "[Mike]";

-				mes "Hmmm, is that so...";

-				mes "Let keep wearing your shady Straw Hat then.";

-				mes "Hmmmhmmmhmmm....";

-				close;

-			case 2:

-				mes "^3355FFQingkaQinka KiangggQiangkiang";

-				mes "Diringringling kaciangkaciang";

-				mes "Adios Mamamiya^000000";

-				next;

-				if (countitem(5062) && countitem(952) > 49 && countitem(1907)) {

-					delitem 5062,1;

-					delitem 952,50;

-					delitem 1907,1;

-					getitem 5067,1;

-				}

-				mes "[Mike]";

-				mes "If you wear this to the desert,";

-				mes "you'll be Muka's friend too!! Full with joyous tempo and heat!!";

-				mes "Please come again if you want more~";

-				close;

-			}

-		} else {

-			mes "[Mike]";

-			mes "Yibayiba, andeleh andeleh!!";

-			mes "Amigo! Adios, Amigo!";

-			mes "Come again, Morocc!";

-			mes "Astalacista Baby!";

-			next;

-			mes "[Mike]";

-			mes "For you who like the sun and loud music!!";

-			mes "I present you with";

-			mes "the tri-level hat, Sombrero!!";

-			mes "(From Yggdrasil tree trill here!?)";

-			next;

-			mes "[Mike]";

-			mes "Anyway, the materials required for production are";

-			mes "^3355FFStraw Hat^000000 x1,";

-			mes "^3355FFCactus Needle^000000 x50,";

-			mes "^3355FFGuitar^000000 x1";

-			next;

-			mes "[Mike]";

-			mes "These are what I need";

-			mes "So don't forget to collect the material, ok?";

-			mes "I will always be around....";

-			mes "So come back only after you have collected them!";

-			close;

-		}

-	case 5: //fur hat [5076]

-		if (countitem(2226) && countitem(7038) > 499) {

-			mes "[Mike]";

-			mes "Fur Hat! Yo, Man! Check it out!";

-			mes "It's good for keeping warm! But it's fashionable too!";

-			mes "Even if you went to places as cold as Lutie,";

-			mes "you will be ok with this Beanie!!";

-			next;

-			mes "[Mike]";

-			mes "Wait, before I start the productions, let's confirm this.";

-			mes "I will use items regardless of wether";

-			mes "it had been refined or slotted with cards.";

-			mes "So you better just prepare the items required,";

-			mes "and put the others in the storage.";

-			next;

-			mes "[Mike]";

-			mes "You've brought all the materials...";

-			mes "Great! The one who wants a Beanie,";

-			mes "do you want me to make it for you right now?";

-			next;

-			switch(select("No:Yes")) {

-			case 1:

-				mes "[Mike]";

-				mes "Hmm, is that so...";

-				mes "Let keep wearing your Cap that is produce in bundles then.";

-				mes "Hmmmhmmmhmmm....";

-				close;

-			case 2:

-				mes "^3355FFKafokapo Kafokapo";

-				mes "poterpote poterpote";

-				mes "PosongPosong PosongPosong";

-				next;

-				if (countitem(2226) && countitem(7038) > 499) {

-					delitem 2226,1;

-					delitem 7038,500;

-					getitem 5076,1;

-				}

-				mes "[Mike]";

-				mes "Complete! The nicely knitted,";

-				mes "cute white hat! Yeat! Go Go!";

-				mes "Please come again if you need more~";

-				close;

-			}

-		} else {

-			mes "[Mike]";

-			mes "Beanie! Gimme a chocolate!! Right!";

-			mes "No matter who wears it,";

-			mes "you will feel the snowy winter!! Event if you are from Morocc,";

-			mes "you will look more like a traveller from Lutie if you put that on!";

-			next;

-			mes "[Mike]";

-			mes "There was a rumor";

-			mes "people wearing it will pull out his hard and shout Yo without knowing it-";

-			mes "I think we better change a topic...";

-			mes "(Hot weather, the head can't stand the heat?!?)";

-			next;

-			mes "[Mike]";

-			mes "Anyway, the material required for production are";

-			mes "^3355FFCap^000000 x1,";

-			mes "^3355FFYarn^000000 x500.";

-			next;

-			mes "[Mike]";

-			mes "These are what I need.";

-			mes "So don't forget to collect the material, ok?";

-			mes "I will always be around....";

-			mes "So come back only after you have collected them!";

-			close;

-		}

-	}

-}

-//Yuno /=Big Golden Bell, Headgear of Queen and Mistress Crown=/

-yuno_in03.gat,20,18,6	script	Neris	726,{

-	mes "[Neris]";

-	mes "This time,";

-	mes "as a gratitude of everyone's support to the Museum,";

-	mes "we have prepared a special item,";

-	mes "That is ...!";

-	next;

-	mes "[Neris]";

-	mes "If an accessoiries for monsters is reconstructed, it can be equipped by human too!";

-	next;

-	mes "[Neris]";

-	mes "We are in the experimenting stage currently,";

-	mes "and there're only 3 type of monster's accesories that can be equipped.";

-	mes "Maybe there're more to come in the future.";

-	mes "However,";

-	mes "we cannot provide these accessories to everyone without limit.";

-	mes "We would like to ask for the materials and production fee,";

-	mes "before we can provide the accessories to you.";

-	next;

-	mes "[Neris]";

-	mes "Please select an accessoiries that you are curious of, or wich us to produce for you.";

-	next;

-	switch(select("Decorative Golden Bell:Crown of Ancient Queen:Crown of Mistress")) {

-	case 1: //Big golden bell [5091]

-		mes "[Neris]";

-		mes "The Decorative Golden Bell is";

-		mes "the accessory equipped by the monster 'Sohee'.";

-		mes "It's very suitable and looks good on female players.";

-		mes "Altough it might be a little big, I'm sure you'll like it.";

-		next;

-		if (countitem(10016) && countitem(714) && countitem(969) > 2 && Zeny > 19999) {

-			delitem 10016,1;

-			delitem 714,1;

-			delitem 969,3;

-			set Zeny,Zeny-20000;

-			mes "[Neris]";

-			mes "So you have brought all the required materials.";

-			mes "Please wait for a while.";

-			next;

-			mes "^3355FF- Dang Dang! Qing Yi Qing Yi! Ding Ding Dang Dang! -^000000";

-			getitem 5091,1;

-			next;

-			mes "[Neris]";

-			mes "EEyaah~ The elegant golden bell is complete.";

-			mes "Walk around with it.";

-			mes "Altough it won't make the ding dong sounds,";

-			mes "it sure is beautiful.";

-			next;

-			mes "[Neris]";

-			mes "Don't you feel that you look like a Sohee now?";

-			mes "But don't commit suicide like her.";

-			mes "If you want to make anymore of it,";

-			mes "do come and find me again.";

-			mes "Finally, please come to visit the Monster Museum frequently.";

-			close;

-		} else {

-			mes "[Neris]";

-			mes "The material required for the production of this item are,";

-			mes "^3355FFGolden Bell x1, Emperium x1, Gold x3^000000 and";

-			mes "20,000 zeny";

-			next;

-			mes "[Neris]";

-			mes "As long as you are prepared,";

-			mes "with the materials and zeny required for the production,";

-			mes "I will make it for you anytime.";

-			close;

-		}

-	case 2: //Headgear of Queen [5080] (Crown of ancient queen)

-		mes "[Neris]";

-		mes "The Crown of Ancient Queen is the equipment of";

-		mes "monster 'Isis'.";

-		mes "When you wear it,";

-		mes "you will feel like a queen.";

-		next;

-		if (countitem(10006) && countitem(714) && countitem(969)>2 && Zeny>19999) {

-			delitem 10006,1;

-			delitem 714,1;

-			delitem 969,3;

-			set Zeny,Zeny-20000;

-			mes "[Neris]";

-			mes "So you have brought all the required materials.";

-			mes "Please wait for a while.";

-			next;

-			mes "^3355FF- Dang Dang! Qing Yi Qing Yi! Ding Ding Dang Dang! -";

-			getitem 5080,1;

-			next;

-			mes "[Neris]";

-			mes "Here it is! The Crown of Ancient Queen!";

-			mes "Altough you won't become a real queen after wearing it,";

-			mes "you will surely";

-			mes "have a different feeling.";

-			next;

-			mes "[Neris]";

-			mes "After you wear this,";

-			mes "I think you should really have a good figure,";

-			mes "because that will be more meaningful.";

-			mes "If you need to make it again,";

-			mes "do come find me again.";

-			mes "Finally, please come to visit the Monster Museum frequently.";

-			close;

-		} else {

-			mes "[Neris]";

-			mes "The materials required for the production are";

-			mes "^3355FFQueen's Hair Ornament x1, Emperium x1, Gold x3^000000 and";

-			mes "20,000 zeny.";

-			next;

-			mes "[Neris]";

-			mes "As long as you are prepared";

-			mes "with the materials and zeny required for the production";

-			mes "I will make it for you anytime.";

-			close;

-		}

-	case 3: //crown of mistress [5081]

-		mes "[Neris]";

-		mes "Crown of Mistress is";

-		mes "brought by monster 'Mistress'."; //Maya? riiiight!

-		mes "You can feel the precence of Mistress from it.";

-		next;

-		if (countitem(2249) && countitem(714) && countitem(969)>2 && Zeny>39999) {

-			mes "[Neris]";

-			mes "So you have brought everything.";

-			mes "^FF0000However, during the process of production,";

-			mes "no matter how many times";

-			mes "the coronet is refined,";

-			mes "it does not have effect to the product.";

-			next;

-			mes "[Neris]";

-			mes "^FF0000So,";

-			mes "please bring along only the Coronet x 1 that is required for the production.";

-			mes "If anything is missing,";

-			mes "we will not take responsible of it.^000000";

-			mes "So, are you ready?";

-			next;

-			switch(select("Yes, I am.:Hold on, please")) {

-			case 1:

-				mes "[Neris]";

-				mes "Please wait for a while.";

-				next;

-				mes "^3355FF- Dang Dang! Qing Yi Qing Yi! Ding Ding Dang Dang! -";

-				if (countitem(2249) && countitem(714) && countitem(969)>2 && Zeny>39999) {

-					delitem 2249,1;

-					delitem 714,1;

-					delitem 969,3;

-					set Zeny,Zeny-40000;

-					getitem 5081,1;

-				}

-				next;

-				mes "[Neris]";

-				mes "Woohoo!";

-				mes "The beautiful Crown of Mistress is completed.";

-				mes "Altough you won't have any servants,";

-				mes "after you've worn it,";

-				mes "I am sure you're having a different feeling.";

-				next;

-				mes "[Neris]";

-				mes "If you wear this crown,";

-				mes "and takea photo with Mistress,";

-				mes "it will be very interesting.";

-				mes "If you want to make anymore of it,";

-				mes "do come find me again.";

-				mes "Finally, please come to visit the Monster Museum frequently.";

-				close;

-			case 2:

-				mes "[Neris]";

-				mes "Please confirm it first";

-				mes "before you come to me~";

-				close;

-			}

-		} else {

-			mes "[Neris]";

-			mes "The materials required for production are";

-			mes "^3355FFCoronet x1, Emperium x1, Gold x3^000000 together with";

-			mes "40,000 zeny.";

-			next;

-			mes "[Neris]";

-			mes "As long as you are prepaired";

-			mes "with the materials and zeny required for the production,";

-			mes "I will make it for you anytime.";

-			close;

-		}

-	}

-}

-//Aldebaran /=Alarm Mask=/

-//Effects: EF_BLASTMINE: 106

-//EF_FLASHER:99

-alde_alche.gat,88,180,1	script	Muscle Man#Alarm	1193,{

-end;

-}

-alde_alche.gat,88,180,1	script	Muscle Man#Masked Alarm	748,{

-	mes "[Muscle Man]";

-	mes "Muscle, muscle. I like it. Hehe!!";

-	mes "What a beautiful robotic muscle!";

-	misceffect 99;

-	disablenpc "Muscle Man#Masked Alarm";

-	enablenpc "Muscle Man#Alarm";

-	enablenpc "#Masked Alarm1";

-	enablenpc "#Masked Alarm2";

-	enablenpc "#Masked Alarm3";

-	enablenpc "#Masked Alarm4";

-	donpcevent "#Masked Alarm1::OnBlast";

-	donpcevent "#Masked Alarm2::OnBlast";

-	donpcevent "#Masked Alarm3::OnBlast";

-	donpcevent "#Masked Alarm4::OnBlast";

-	next;

-	disablenpc "Muscle Man#Alarm";

-	enablenpc "Muscle Man#Masked Alarm";

-	if (countitem(2288) && countitem(1095) > 2999) {

-		switch(select("Give him the item:End")) {

-		case 1:

-			mes "You found... You found it. You really found it!";

-			mes "That's great! That's so great!";

-			next;

-			mes "[Muscle Man]";

-			mes "Yes... From today onwards, the Clock Hand and Mr. Scream are mine! My Precious!";

-			next;

-			mes "[Muscle Man]";

-			mes "And this, this shall be your precious.";

-			if (countitem(2288) && countitem(1095) > 2999) {

-				delitem 1095,3000;

-				delitem 2288,1;

-				getitem 5086,1;

-			}

-			next;

-			mes "[Muscle Man]";

-			mes "Good... Good bye! If you find more, remember to bring it here!!";

-			donpcevent "#Masked Alarm1::OnBlast";

-			donpcevent "#Masked Alarm2::OnBlast";

-			donpcevent "#Masked Alarm3::OnBlast";

-			donpcevent "#Masked Alarm4::OnBlast";

-			disablenpc "#Masked Alarm1";

-			disablenpc "#Masked Alarm2";

-			disablenpc "#Masked Alarm3";

-			disablenpc "#Masked Alarm4";

-			close;

-		case 2:

-			mes "[Muscle Man]";

-			mes "Hmm? Do you have anything to say to me?";

-			mes "I smell something. Isn't that the nice smell of the grease from Mr. Alarm that I sense now?";

-			donpcevent "#Masked Alarm1::OnBlast";

-			donpcevent "#Masked Alarm2::OnBlast";

-			donpcevent "#Masked Alarm3::OnBlast";

-			donpcevent "#Masked Alarm4::OnBlast";

-			disablenpc "#Masked Alarm1";

-			disablenpc "#Masked Alarm2";

-			disablenpc "#Masked Alarm3";

-			disablenpc "#Masked Alarm4";

-			close;

-		}

-	} else {

-		mes "[Muscle Man]";

-		mes "This is the item created by 'Loui Meato' that is attached to the arms and legs of Alarm.";

-		mes "This is the ancient technique that can be found in the Clock Tower.";

-		next;

-		mes "[Muscle Man]";

-		mes "If there's any skill to shrink this thing, 'Loui Meato' can be used by everyone soon!";

-		next;

-		mes "[Muscle Man]";

-		mes "Although I've lost my arm and legs in an alchemy accident, but if I can make this technique for public, it will benefit a lot of people!";

-		next;

-		mes "[Muscle Man]";

-		mes "Therfore... I want to ask you";

-		mes "Do you have the will to help my in this research?";

-		next;

-		mes "[Muscle Man]";

-		mes "The material is not enough. I want the Alarm's ^0000FFClock Hand^000000 and that strange ^0000FFMr. Scream^000000 that is said to look like the mask of Alarm.";

-		mes "It will help a lot if you have those things.";

-		next;

-		mes "[Muscle Man]";

-		mes "However, when I saw the Alarm in the Clock Tower, I will be fascinated by the great work on the creature's mechanical parts that is so brilliantly designed and manifactured.";

-		mes "I've forgotten everything, including the materials required for the research.";

-		next;

-		mes "[Muscle Man]";

-		mes "I am telling you this, to give you the opportunity to help me.";

-		mes "So how about that? Do you wish to help me? The price is the Mask of Alarm that looks really good! It's a very important thing, you know?";

-		next;

-		donpcevent "#Masked Alarm1::OnBlast";

-		donpcevent "#Masked Alarm2::OnBlast";

-		donpcevent "#Masked Alarm3::OnBlast";

-		donpcevent "#Masked Alarm4::OnBlast";

-		disablenpc "#Masked Alarm1";

-		disablenpc "#Masked Alarm2";

-		disablenpc "#Masked Alarm3";

-		disablenpc "#Masked Alarm4";

-		switch(select("I will help you:............")) {

-		case 1:

-		case 2:

-			mes "[Muscle Man]";

-			mes "Ohohoh! You agree that Mr. Alarm is beautiful too!";

-			mes "Good, good!";

-			next;

-			mes "[Muscle Man]";

-			mes "What I want is, ^0000FFClock Hand x3000^000000 and";

-			mes "^0000FFMr. Scream x1 ^000000";

-			mes "With these items, I will be able to reasearch the fascinating parts of Mr. Alarm.";

-			next;

-			mes "[Muscle Man]";

-			mes "I have said before. If you're able to find these things, I will give you Mr. Alarm's Mask.";

-			mes "You will have the chance to wear ^0000FFAlarm's Mask^000000!";

-			next;

-			mes "[Muscle Man]";

-			mes "Go! Go and find them now!";

-			mes "Follower of Mr Alarm.";

-			mes "The researcher of 'Loui Meato'.";

-			mes "He who wants to be Mr. Alarm!";

-			close;

-		}

-	}

-OnInit:

-	disablenpc "#Masked Alarm1";

-	disablenpc "#Masked Alarm2";

-	disablenpc "#Masked Alarm3";

-	disablenpc "#Masked Alarm4";

-	disablenpc "Muscle Man#Alarm";

-	end;

-}

-alde_alche.gat,86,184,3	script	#Masked Alarm1	1193,{

-end;

-OnBlast:

-misceffect 106;

-end; }

-alde_alche.gat,89,184,3	script	#Masked Alarm2	1193,{

-end;

-OnBlast:

-misceffect 106;

-end; }

-alde_alche.gat,92,184,3	script	#Masked Alarm3	1193,{

-end;

-OnBlast:

-misceffect 106;

-end; }

-alde_alche.gat,95,184,3	script	#Masked Alarm4	1193,{

-end;

-OnBlast:

-misceffect 106;

-end; }

-//Morocc /= Drooping Kitty, Huge Leaf, Lazy Smokie and Blue Fish =/

-morocc.gat,273,79,4	script	Traveler	99,{

-	function creation_lines {

-	 	mes "[Human]";

-		mes "Ah....So do you have all of it?";

-		mes "Haha";

-		mes "What an opportunity for me to show my skill.";

-		mes "Please wait for a moment.";

-		mes "....";

-		next;

-		next;

-		mes "SiwuSiwu...";

-		next;

-		mes "SiwuSiwu...";

-		mes "DudaTeda...";

-		next;

-		mes "SiwuSiwu...";

-		mes "DudaTeda...";

-		mes "ChepoChepo....";

-		next;

-		mes "SiwuSiwu...";

-		mes "DudaTeda...";

-		mes "ChepoChepo....";

-		mes "HuizheHuizhe.....";

-		mes "I think I heard some strange noises.";

-		next;

-		mes "[Human]";

-		mes "Uhoh, can you wait for a while?";

-		mes "It's almost done.";

-		mes "............";

-		next;

-		mes "HeniHeniHeni...";

-		mes "............";

-		next;

-		mes "HeniHeniHeni...";

-		mes "KodeKode...";

-		mes "............";

-		next;

-		mes "[Human]";

-		mes "Ah, finally it is done.";

-		mes "I have not done this too long.";

-		mes "So it takes a little longer then I expect.";

-		mes "Haha";

-		next;

-		mes "[Human]";

-		mes "Now, here it is.";

-		mes "I rarely feel this happy.";

-		mes "Ah, I will take the claw too.";

-		mes "Just think of it as ... some process fee.";

-		mes "Haha....";

-		return;

-	}

-

-	if(countitem(7030)) {

-		mes "[Human]";

-		mes "Ah....";

-		mes "Claw of the Desert Wolf...";

-		mes "You have this...";

-		mes "This is the true symbol of Desert.";

-		mes "Haha...";

-		mes "It's been a while since I saw this last time.";

-		mes "It really makes me feel reenergized!";

-		next;

-		mes "[Human]";

-		mes "Haha... You have let me see a great thing.";

-		mes "And I am going to pay you back!";

-		mes "I have traveled to a lot of places,";

-		mes "and learn to create a lot of things.";

-		mes "May I know what do you wnat?";

-		next;

-		mes "[Human]";

-		mes "Oh yes..."; //here we go again =3

-		mes "If your equipment has been refined";

-		mes "or slotted with cards,";

-		mes "^FF0000the level of refines and cards will dissapear too.^000000";

-		mes "So please confirm the item you require.";

-		next;

-		switch(select("Drooping Cat:Smokie Leaf:Lazy Smokie:Blue Fish:There's nothing that I like.")) {

-		case 1:

-			if (countitem(2233) && countitem(983) && countitem(7206) > 299 && countitem(7030)) {

-				delitem 2233,1;

-				delitem 983,1;

-				delitem 7206,300;

-				delitem 7030,1;

-				creation_lines;

-				getitem 5058,1;

-				close;

-			} else {

-				mes "[Human]";

-				mes "Ah, you want the Drooping Cat.";

-				mes "Well,";

-				mes "I can make that for you,";

-				mes "but you will have to gather the required materials by yourself.";

-				mes "I heard that it is not easy to find the materials.";

-				next;

-				mes "[Human]";

-				mes "They are..";

-				mes "^FF0000One slot circlet^000000 and";

-				mes "^FF0000Black Dyestuff x1^000000";

-				mes "plus ^FF0000Black Cat Doll x 300^000000.";

-				mes "This is all you need.";

-				mes "If you bring them to me, I will make the Cat for you.";

-				close;

-			}

-		case 2: //Smokie Leaf [5064]

-			if (countitem(945) > 599 && countitem(7030)) {

-				delitem 945,600;

-				delitem 7030,1;

-				creation_lines;

-				getitem 5064,1;

-				close;

-			} else {

-				mes "[Human]";

-				mes "Ah, so you want the Smokie Leaf.";

-				mes "Well,";

-				mes "I can make that for you,";

-				mes "but you will have to";

-				mes "gather the required materials by yourself.";

-				mes "I heard that it is not easy to find the materials.";

-				next;

-				mes "[Human]";

-				mes "This item ..";

-				mes "requires ^FF0000Raccoon Leaf x600^000000 ";

-				mes "It might be a lot, but I'm sure you can get it, can't you?";

-				mes "If you bring it to me, I will make the headgear for you.";

-				close;

-			}

-		case 3: //Lazy Smokie [5084]

-			if (countitem(1026)>999 && countitem(7065)>99 && countitem(945)>9 && countitem(7030)) {

-				delitem 1026,1000;

-				delitem 7065,100;

-				delitem 945,10;

-				delitem 7030,1;

-				creation_lines;

-				getitem 5084,1;

-				close;

-			} else {

-				mes "[Human]";

-				mes "Ah, so you want the Lazy Smokie.";

-				mes "Well,";

-				mes "I can make that for you,";

-				mes "but you will have to";

-				mes "gather the required materials by yourself.";

-				mes "I heard that it is not easy to find the materials.";

-				next;

-				mes "[Human]";

-				mes "The materials are..";

-				mes "^FF0000Acorn x1000^000000 and";

-				mes "^FF0000Sea-Otter Fur x100^000000, as well as ^FF0000Raccoon Leaf x10^000000";

-				mes "That's all you need.";

-				mes "If you bring it to me, I will make the headgear for you.";

-				close;

-			}

-		case 4: //Blue Fish [5065]

-			if (countitem(624) && countitem(959)>299 && countitem(544)>49 && countitem(1023) && countitem(938)>99 && countitem(7030)) {

-				delitem 624,1;

-				delitem 959,300;

-				delitem 544,50;

-				delitem 1023,1;

-				delitem 938,100;

-				delitem 7030,1;

-				creation_lines;

-				getitem 5065,1;

-			} else {

-				mes "[Human]";

-				mes "Ah, so you want the Fish.";

-				mes "Well,";

-				mes "I can make that for you,";

-				mes "but you will have to gather the required materials by yourself.";

-				mes "I heard that it is not easy to find the materials.";

-				next;

-				mes "[Human]";

-				mes "The materials are..";

-				mes "^FF0000Rotten Fish x1";

-				mes "Stinky Scale x300, Raw Fish x50,";

-				mes "Fish Tail x1^000000 and lastly, it requires at least ^FF0000Sticky Mucus x100^000000";

-				mes "That's all you need.";

-				mes "If you bring it to me, I will make the headgear for you.";

-				close;

-			}

-		case 5: //cancel

-			mes "[Human]";

-			mes "Oh.. is that so?";

-			mes "Haha...";

-			mes "I thought I have the chance to do it again.";

-			mes "Oh well,";

-			mes "enjoy your journey then.";

-			close;

-		}

-	} else {

-		mes "[Human]";

-		mes "Hello there.";

-		mes "a good day isn't it?";

-		mes "Hmm... If you don't mind,";

-		mes "can I tell you a little about myself?";

-		mes "I know you're kind of unwilling to do so,";

-		mes "but please, do listen for a while, will you?";

-		next;

-		mes "[Human]";

-		mes "Hmm...";

-		mes "The city of desert, Morocc";

-		mes "has this special attraction.";

-		mes "The wind of flame blows during the heat of the day,";

-		mes "but the sunsets dye the hills of sand into a violet screne.";

-		mes "Besides that, the freezing chill of night never stops until morning.";

-		next;

-		mes "[Human]";

-		mes "All these are the pride of Morocc.";

-		mes "However,";

-		mes "These are not enough to feed the greed of human.";

-		mes "Thay want to take everything";

-		mes "except the desert";

-		mes "as their belongings.";

-		next;

-		mes "[Human]";

-		mes "So, I started to travel,";

-		mes "going around this world to experience the adventure.";

-		mes "Some view that can only be found in certain places,";

-		mes "at their origin habitat.";

-		next;

-		mes "[Human]";

-		mes "Therefore,";

-		mes "I have decided to create items,";

-		mes "that possesses the special characteristecs of the places.";

-		mes "I have gained a few successes,";

-		mes "but the materials required are too hard to be found.";

-		mes "Therefore, I can't produce too many items.";

-		next;

-		mes "[Human]";

-		mes "Oh! Uh Oh...";

-		mes "I have spoken too much.";

-		mes "Sorry for taking your time.";

-		mes "There's nothing to do recently...";

-		mes "I just hope to see";

-		mes "some item that is related to the desert....";

-		next;

-		mes "[Human]";

-		mes "Hmmph...Anyway,";

-		mes "thank you for listening to me.";

-		mes "Enjoy your journey...";

-		mes "Think of the desert, you think of wolves... hahaha.";

-		close;

-	}

-}

-//Payon /=Fox Mask=/ //==Lets hope this works as it's supposed==//

-pay_dun03.gat,48,84,4	script	Nine Tail#1	1180,1,1{

-	mes "[Nine Tail]";

-	mes "Kee! KeeKee!";

-	mes "KeeKeeKee! KeeKee! KeeKee!";

-	next;

-	switch(select("Shaking your head:Nodding")) {

-	case 1:

-		mes "[Nine Tail]";

-		mes "KeeKee! Ke! Kee!";

-		close2;

-		donpcevent "Nine Tail#1::OnReset";

-		end;

-	case 2:

-		emotion e_hmm;

-		close2;

-		disablenpc "Nine Tail#1";

-		enablenpc "Nine Tail#2";

-		end;

-	}

-

-OnInit:

-	disablenpc "Nine Tail#1";

-	disablenpc "Nine Tail#2";

-	monster "pay_dun03.gat",48,84,"Nine Tail",1180,1,"NT::OnMobDead";

-	end;

-

-OnReset:

-	killmonster "pay_dun03.gat","NT::OnMobDead";

-	disablenpc "Nine Tail#1";

-	disablenpc "Nine Tail#2";

-	initnpctimer;

-	end;

-

-OnTimer300000:

-OnSpawn:

-	stopnpctimer;

-	killmonster "pay_dun03.gat","Nine Tail#1::OnMobDead";

-	monster "pay_dun03.gat",48,84,"Nine Tail",1180,1,"NT::OnMobDead";

-	end;

-}

-pay_dun03.gat,48,84,1	script	NT	-1,{

-OnMobDead:

-	enablenpc "Nine Tail#1";

-	end;

-}

-pay_dun03.gat,48,84,4	script	Nine Tail#2	1180,{

-	if(countitem(1022)>998) {

-		mes "[Nine Tail]";

-		mes "Uh Oh!! You've brought it, human.";

-		mes "Good...I think you can save yourself with these.";

-		next;

-		switch(select("Give it to him:Do not give it to him")) {

-		case 1:

-			mes "[Nine Tail]";

-			mes "Go now. You have got what you wanted, human. Now leave!";

-			if(countitem(1022)>998) {

-				delitem 1022,999;

-				getitem 5069,1;

-			}

-			close2;

-			disablenpc "Nine Tail#2";

-			donpcevent "Nine Tail#1::OnReset";

-			end;		

-		case 2:

-			close2;

-			disablenpc "Nine Tail#2";

-			donpcevent "Nine Tail#1::OnReset";

-			end;

-		}

-	}

-	else {

-		mes "[Nine Tail]";

-		mes "......Aiyo? Isn't this the appearance of a human boy?";

-		mes "Has my transfiguration skill gone wrong again... oh... oh well.";

-		next;

-		mes "[Nine Tail]";

-		mes "Do you know how it feels to be chased everyday? How tough that is? Huh?";

-		mes "I just want to live a quiet life with my husband!";

-		next;

-		mes "[Nine Tail]";

-		mes "But one day, someone intruded into our habitat and tried to catch us.";

-		next;

-		mes "[Nine Tail]";

-		mes "Do you know how much that Sohee that lives besides me likes to complain to me everyday? Someone will pull a disgusting face and say 'Haha, Miss Sohee~' and they will chase to rip off her clothes. They are making her crazy!";

-		next;

-		mes "[Nine Tail]";

-		mes "It is just a flawless body as fine as pine, and as beautiful as the flower. Why can't anyone understand that?";

-		next;

-		mes "[Nine Tail]";

-		mes "Hmmm...let me calm down first.";

-		mes "I just want to save my husband and bring him back.";

-		mes "I hope you can help me.";

-		next;

-		mes "[Nine Tail]";

-		mes "To save my husband,";

-		mes "please bring along ^FF0000999 ^0000FFNine Tails^000000!";

-		mes "What? You said that's too much?";

-		next;

-		mes "[Nine Tail]";

-		mes "Hmmph, it really makes me angry to think of what you've done to us...";

-		mes "I understand. You human won't do anything without a reward...";

-		next;

-		mes "[Nine Tail]";

-		mes "Hmm, ok. What do you think of the mask I'm wearing? The ^0000FFKitsune Mask^000000. Gather the item I want, and I will give you this.";

-		mes "You must gather ^FF0000999 ^0000FFNine Tails^000000!";

-		close2;

-		disablenpc "Nine Tail#2";

-		donpcevent "Nine Tail#1::OnReset";

-		end;

-	}

-}

-//Orc Village /=Orc Hero Helm=/

-in_orcs01.gat,31,93,1	script	Orc Warrior#1	1023,2,2{

-	if (orcs_hero_hat == 1) {

-		if (countitem(909)>999) {

-			delitem 909,1000;

-			mes "[Orc Warrior]";

-			mes "Good, you have collected it all, haven't you?";

-			mes "So you really want to have a talk, hahahahaha!!";

-			mes "Ok, I will talk to you then";

-			next;

-			mes "[Orc Warrior]";

-			mes "I don't like humans.";

-			mes "All of the Orcish Tribe dislike humans.";

-			mes "Do you know that?";

-			mes "I really hate it when you come to find us.";

-			set orcs_hero_hat,2;

-			next;

-			mes "[Orc Warrior]";

-			mes "So if you want to hear more. Prepare another ^FF0000Jellopy x1000^000000";

-			mes "This means, get out of my sight...!";

-			mes "Humans...";

-			close;

-		}

-	} else if (orcs_hero_hat == 2) {

-		if (countitem(909) > 999) {

-			delitem 909,1000;

-			mes "[Orc Warrior]";

-			mes "Good, you have collected it all, haven't you?";

-			mes "So you really want to have a talk, hahahahahaha!!";

-			mes "Ok, I will talk to you then";

-			next;

-			mes "[Orc Warrior]";

-			mes "Do you want to know why we hate humans?";

-			mes "That's because,";

-			mes "out village is living a quiet life,";

-			mes "before the rude intrusion of you human.";

-			next;

-			mes "[Orc Warrior]";

-			mes "Can you just build your city";

-			mes "and live there quietly?";

-			mes "Why do you create chaos everywhere...";

-			mes "I can't understand";

-			set orcs_hero_hat,3;

-			next;

-			mes "[Orc Warrior]";

-			mes "Go, if you want another conversation, prepare ^FF0000Jellopy x1000^000000 again,";

-			mes "If you're statisfied with such kind of converstaion.";

-			mes "Hahahahaha";

-			close;

-		} else {

-			mes "[Orc Warrior]";

-			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000...";

-			mes "If you want to talk to me,";

-			mes "show your will, humans.";

-			mes "I don't care, just brought 1000 Jellopy.";

-			close;

-		}

-	} else if (orcs_hero_hat == 3) {

-		if (countitem(909)>999) {

-			delitem 909,1000;

-			mes "[Orc Warrior]";

-			mes "Good, you have collect it all, haven't you? ";

-			mes "So you really want to have a talk, hahahahaha!!";

-			mes "Ok, I will talk to you until you're fed up then.";

-			next;

-			mes "[Orc Warrior]";

-			mes "If you compare the achievement, ";

-			mes "we won't lose to you humans.";

-			mes "The same goes to the Goblin in the jungle,";

-			mes "and the Kobold, who are the master of the grassland...";

-			next;

-			mes "[Orc Warrior]";

-			mes "Before you human build cities, ";

-			mes "we orc warriors has developed sophisticated tunnel in caves,";

-			mes "as well as water way.";

-			mes "We use the things we found in the wild,";

-			mes "to create the things we wanted.";

-			next;

-			mes "[Orc Warrior]";

-			mes "Then we build high tower.";

-			mes "However, the evil forces ";

-			mes "have made the master of the tower betray our tribe...";

-			mes " And those who fail to escape there,";

-			mes "they're still suffering,";

-			mes "at that place.";

-			next;

-			mes "[Orc Warrior]";

-			mes "...Hmm, this,";

-			mes "Why do I tell this to you humans?";

-			mes "The conversation ends here today.";

-			set orcs_hero_hat,4;

-			next;

-			mes "[Orc Warrior]";

-			mes "So, if you want to hear more,";

-			mes "prepare ^FF0000Jellopy x 1000 again^000000";

-			close;

-		} else {

-			mes "[Orc Warrior]";

-			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000...";

-			mes "If you want to talk to me";

-			mes "Show your will, human.";

-			mes "I don't care, just brought 2000 Jellopy.";

-			close;

-		}

-	} else if (orcs_hero_hat == 4) {

-		if (countitem(909)>999) {

-			delitem 909,1000;

-			mes "[Orc Warrior]";

-			mes "Good, you have collect it all, haven't you? ";

-			mes "So you really want to have a talk, hahahahaha!!";

-			mes "Ok, I will talk to you until you're fed up then.";

-			next;

-			mes "[Orc Warrior]";

-			mes "Yes, until that time,";

-			mes "human and the orc warriors";

-			mes "do lead a peaceful life.";

-			mes "But as time goes by, the misunderstanding,";

-			mes "has accumulated and cannot be broken.";

-			next;

-			mes "[Orc Warrior]";

-			mes "The powerless human only wants fame and wealth.";

-			mes "A true warrior,";

-			mes "will only emphasize on glory and honor...";

-			mes "Those who do not care what method they use to achieve their goal,";

-			mes "will be lead to the path of perdition easily.";

-			next;

-			mes "[Orc Warrior]";

-			mes "They only care about their safety,";

-			mes "and ignore about others.";

-			mes "They will not let anthing that";

-			mes "pose a threat to them to live... ";

-			mes "No matter it's other tribe,";

-			mes "or unknown creature, they will kill";

-			mes "even their closest companion if they had to.";

-			next;

-			mes "[Orc Warrior]";

-			mes "...I have talked too much, and there's nothing more to talk about.";

-			mes "The conversation ends here.";

-			set orcs_hero_hat,5;

-			next;

-			mes "[Orc Warrior]";

-			mes "So, if you want to hear more,";

-			mes "prepare ^FF0000Jellopy x 1000 again^000000";

-			close;

-		} else {

-			mes "[Orc Warrior]";

-			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";

-			mes "If you want to talk to me,";

-			mes "show you will, humans.";

-			mes "I don't care, just brought 3000 Jellopy.";

-			close;

-		}

-	} else if (orcs_hero_hat == 5) {

-		if (countitem(909)>999) {

-			delitem 909,1000;

-			mes "[Orc Warrior]";

-			mes "You reall have the patience to collect these things.";

-			mes "You really want to talk to me, don't you?... ";

-			mes "If that's so, I will talk about other things.";

-			next;

-			mes "[Orc Warrior]";

-			mes "The Orc Warriors think that the best things are";

-			mes "battle and victory.";

-			mes "It is the greatest honor,";

-			mes "to fight and beat the enemies face to face.";

-			next;

-			mes "[Orc Warrior]";

-			mes "The spirit to win will not stop even for death.";

-			mes "However, some tribesmate that die of trickery,";

-			mes "will get up from the grave,";

-			mes "wandering to look for a target to fight.";

-			next;

-			mes "[Orc Warrior]";

-			mes "During the battle,";

-			mes "we are different from you.";

-			mes "We don't use tricks, and we don't run away!";

-			mes "We will fight till then end, till we are out of energy.";

-			mes "Even when we're lost in the end, we will still make our last attempt to counter.";

-			next;

-			mes "[Orc Warrior]";

-			mes "Besides that, we don't rely of potions.";

-			mes "You human are too weak.";

-			mes "That's why you use potions and herbs.";

-			mes "Without potion, you will quit immediately, don't you?";

-			mes "Hmm, I'm not sure whether you are like that too.";

-			set orcs_hero_hat,6;

-			next;

-			mes "[Orc Warrior]";

-			mes "So, if you want to hear more,";

-			mes "prepare ^FF0000Jellopy x 1000 again^000000";

-			close;

-		} else {

-			mes "[Orc Warrior]";

-			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";

-			mes "If you want to talk to me,";

-			mes "show you will, humans.";

-			mes "I don't care, just brought 4000 Jellopy.";

-			close;

-		}

-	} else if (orcs_hero_hat == 6) {

-		if (countitem(909)>999) {

-			delitem 909,1000;

-			mes "[Orc Warrior]";

-			mes "You reall have the patience to collect these things.";

-			mes "You really want to talk to me, don't you?... ";

-			mes "If that's so, I will talk about other things.";

-			next;

-			mes "[Orc Warrior]";

-			mes "The warriors of the tribe,";

-			mes "are selected among the strongest.";

-			mes "When they grow up, we'll send them into the jungle,";

-			mes "to test their qualification to be a real warrior.";

-			next;

-			mes "[Orc Warrior]";

-			mes "We will recognize";

-			mes "the tribesman who come back alive as a warrior.";

-			mes "These strong warriors are known as Orc Warriors.";

-			mes "For the females that has fighting ability,";

-			mes "they are known as Orc Lady.";

-			next;

-			mes "[Orc Warrior]";

-			mes "And for those with a dexterous hand and";

-			mes "possess good eyesight,";

-			mes "we'll give them bow and arrow,";

-			mes "and called them Orc Archer.";

-			mes "They will learn and grow in the countless battles.";

-			next;

-			mes "[Orc Warrior]";

-			mes "And there is another trial of fire.";

-			mes "Those who pass the trial,";

-			mes "will be protected by fire";

-			mes "and gain greater ability and endurance.";

-			mes "We called this warriors as High Orc.";

-			next;

-			mes "[Orc Warrior]";

-			mes "Hmm, when human looks at us,";

-			mes "you'll think that we look alike... ";

-			mes "But for use Orc, we can distinguish it easily.";

-			mes "So, when you look at me, ";

-			mes "you will feel that I look like";

-			mes "no different that the orc warrior outside, isn't it?";

-			set orcs_hero_hat,7;

-			next;

-			mes "[Orc Warrior]";

-			mes "So, if you want to hear more,";

-			mes "prepare ^FF0000Jellopy x 1000 again^000000";

-			close;

-		} else {

-			mes "[Orc Warrior]";

-			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";

-			mes "If you want to talk to me,";

-			mes "show you will, humans.";

-			mes "I don't care, just brought 5000 Jellopy.";

-			close;

-		}

-	} else if (orcs_hero_hat == 7) {

-		if (countitem(909)>999) {

-			delitem 909,1000;

-			mes "[Orc Warrior]";

-			mes "I can feel you are getting tired and want to quit now.";

-			mes "But you have keep the promise this time.";

-			mes "So a promise is a promise, I shall continue to talk to you.";

-			next;

-			mes "[Orc Warrior]";

-			mes "We are talking about the Orc Warrior last time...";

-			mes "Yes, in the orcish fighters,";

-			mes "there are dexterous one with abilities,";

-			mes "that has not pass the trial of fire.";

-			mes "They are the warriors that can take care of";

-			mes "other orc warriors....";

-			next;

-			mes "[Orc Warrior]";

-			mes "Such kind of warriors are the true hero.";

-			mes "We call them Orc Heroes.";

-			mes "They had strength and stamin greater than other orcs.";

-			mes "They possess ability to lead too.";

-			mes "This is the true hero of Orc Warriors.";

-			next;

-			mes "[Orc Warrior]";

-			mes "They get the Voucher of Orcish Hero,";

-			mes "and is able to wield the sword only a hero can use.";

-			mes "When the Orc Hero wields the sword,";

-			mes "the earth shakes...";

-			next;

-			mes "[Orc Warrior]";

-			mes "Orc Hero has his own special headgear too.";

-			mes "It is a symbol of";

-			mes "the fame and strength of an Orc Hero... Just like you humans.";

-			mes "If you want to see it,  you can only feel its power in the battle.";

-			set orcs_hero_hat,8;

-			next;

-			mes "[Orc Warrior]";

-			mes "So, if you want to hear more,";

-			mes "prepare ^FF0000Jellopy x 1000 again^000000";

-			close;

-		} else {

-			mes "[Orc Warrior]";

-			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";

-			mes "If you want to talk to me,";

-			mes "show you will, humans.";

-			mes "I don't care, just brought 6000 Jellopy.";

-			close;

-		}

-	} else if (orcs_hero_hat == 8) {

-		if (countitem(909)>999) {

-			delitem 909,1000;

-			mes "[Orc Warrior]";

-			mes "I can feel you are getting tired and want to quit now.";

-			mes "But you have keep the promise this time.";

-			mes "So a promise is a promise, I shall continue to talk to you.";

-			next;

-			mes "[Orc Warrior]";

-			mes "We talk about the Orc Hero just now.";

-			mes "Some orc does not born with an ability,";

-			mes "like the Orc Heroes do.";

-			mes "It took them a long time to go through numerous battle to be a warrior.";

-			next;

-			mes "[Orc Warrior]";

-			mes "To a Orc Warrior,";

-			mes "age does not means coward.";

-			mes "In fact is represents experience and skills,";

-			mes "that makes him more valiant.";

-			next;

-			mes "[Orc Warrior]";

-			mes "They can perform great battle skill,";

-			mes "even without weapons.";

-			mes "They can fight for days even without their axe.";

-			mes "If they reach that state,";

-			mes "weapon are just useless burdens...";

-			next;

-			mes "[Orc Warrior]";

-			mes "Among such experience elders,";

-			mes "we called the most experienced one as ";

-			mes "Orc Lord. And we honor them,";

-			mes "They wear a 3 horn iron helm";

-			mes "that represents the leadership of Orcish tribe.";

-			set orcs_hero_hat,9;

-			next;

-			mes "[Orc Warrior]";

-			mes "So, if you want to hear more,";

-			mes "prepare ^FF0000Jellopy x 1000 again^000000";

-			close;

-		} else {

-			mes "[Orc Warrior]";

-			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";

-			mes "If you want to talk to me,";

-			mes "show you will, humans.";

-			mes "I don't care, just brought 7000 Jellopy.";

-			close;

-	  }

-	} else if (orcs_hero_hat == 9) {

-		if (countitem(909)>999) {

-			delitem 909,1000;

-			mes "[Orc Warrior]";

-			mes "I've never seen,";

-			mes "a human that won't quit like you... So I'll keep my promise";

-			mes "to tell you about our tribe today.";

-			next;

-			mes "[Orc Warrior]";

-			mes "Sometimes, there will be those treacherous ones";

-			mes "who run away from the battle.";

-			mes "We have such kind in out tribe too.";

-			mes "Although it is a disgrace, they are Orcs too.";

-			mes "They only differ in their level of existance.";

-			next;

-			mes "[Orc Warrior]";

-			mes "Such kind will be cursed.";

-			mes "Their body shrinks and the teeth grows.";

-			mes "And finally, they lose the heart to fight.";

-			mes "Since they don't want to be found by others, ";

-			mes "they hide themselves.";

-			next;

-			mes "[Orc Warrior]";

-			mes "They are originally us.";

-			mes "But their alteration rise suspicions.";

-			mes "Such kind with greed,";

-			mes "and hatred to us are called...";

-			mes "Zenorc.";

-			next;

-			mes "[Orc Warrior]";

-			mes "Unlike us,";

-			mes "human do not change even their hearts have changed.";

-			mes "Therefore, we need to be more careful.";

-			mes "Because we can tell from the appearances,";

-			mes "how treacherous humans are....";

-			set orcs_hero_hat,10;

-			next;

-			mes "[Orc Warrior]";

-			mes "So, if you want to hear more,";

-			mes "prepare ^FF0000Jellopy x 1000 again^000000";

-			close;

-		} else {

-			mes "[Orc Warrior]";

-			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";

-			mes "If you want to talk to me,";

-			mes "show you will, humans.";

-			mes "I don't care, just brought 8000 Jellopy.";

-			close;

-	  }

-	} else if (orcs_hero_hat == 10) {

-		if (countitem(909)>999) {

-			delitem 909,1000;

-			mes "[Orc Warrior]";

-			mes "Really? Have you really gathered 10,000 Jellopy?";

-			mes "Good, that's enough now.";

-			mes "You've shown your sincerity.";

-			mes "I will treat you honestly.";

-			next;

-			mes "[Orc Warrior]";

-			mes "It is enough for";

-			mes "the stories about our tribe.";

-			mes "However, there are difference,";

-			mes "from what you've heard and what you'll experience.";

-			next;

-			mes "[Orc Warrior]";

-			mes "I advise that you gather more experience";

-			mes "through the battle with us to understand our tribe.";

-			mes "The most direct way,";

-			mes "is through combat.";

-			set orcs_hero_hat,11;

-			next;

-			mes "[Orc Warrior]";

-			mes "I shall stop here.";

-			mes "As the token of appreciation to your sincerity,";

-			mes "this is the axe that has accompanied me in my pass battles.";

-			mes "Take good care of it, thank you.";

-			getitem 1304,1;

-			next;

-			mes "[Orc Warrior]";

-			mes "It must be hard for you after all these time.";

-			mes "If you want to understand more about Orcs,";

-			mes "come and find me again.";

-			close;

-		} else {

-			mes "[Orc Warrior]";

-			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";

-			mes "If you want to talk to me,";

-			mes "show you will, humans.";

-			mes "I don't care, just brought 9000 Jellopy.";

-			close;

-	  }

-	} else if (orcs_hero_hat == 11 || orcs_hero_hat == 12) {

-		if (countitem(1304)) {

-			mes "[Orc Warrior]";

-			mes "If must be hard for you after all these time.";

-			mes "If you want to understand more about Orcs,";

-			mes "come and find me again.";

-			close;

-		} else {

-			set orc_hero_quest,rand(1,10);

-			if (orc_hero_quest > 9) {

-				if (orcs_hero_hat == 12 && countitem(931)>99) {

-					mes "[Orc Warrior]";

-					mes "Uhoh, that is really great.";

-					mes "After all these battles, I am not sure how much you understand.";

-					mes "However, the voucher of Orc warrior";

-					mes "is given to a true Orc Warrior.";

-					next;

-					mes "[Orc Warrior]";

-					mes "We use 1000 thousand victories";

-					mes "as a qualification to recognize one asa true Orc Warrior.";

-					mes "However, you are a human...";

-					mes "It is hard to cross the line between two different kinds.";

-					next;

-					mes "[Orc Warrior]";

-					mes "Ok, come again after you've won 10 thousand victories.";

-					mes "By that time, we will recognized you as the true warrior.";

-					mes "However,";

-					mes "you will have to walk a lonely path for such fame.";

-					mes "The choise is up to you...";

-					next;

-					mes "[Orc Warrior]";

-					mes "All you get is just fame...";

-					mes "But for a human,";

-					mes "you get a chance to proof and test your capability...";

-					mes "So what do you want to choose?";

-					next;

-					switch(select("I think I don't need it.:I want to take the 10,000 challenge.")) {

-					case 1:

-						mes "[Orc Warrior]";

-						mes "Alright, I won't force you to choose.";

-						mes "Now, please return";

-						mes "to your human city slowly.";

-						mes "Your friends are waiting for you.";

-						close;

-					case 2:

-						mes "[Orc Warrior]";

-						mes "You have chosen a hard path";

-						mes "A path of eternal battles is waiting ahead of you.";

-						mes "You will have to face";

-						mes "thousands,if not ten thousands of warriors.";

-						next;

-						mes "[Orc Warrior]";

-						mes "Then, before you reach your 10,000th victories,";

-						mes "Bring me the voucher of orc warrior.";

-						mes "Once, ten times, or even hundreds";

-						mes "please leave your record of victories.";

-						if (countitem(931)>99) {

-							delitem 931,100;

-							set orcs_hero_hat,13;

-							set orcs_hero_hat2,100;

-						}

-						next;

-						mes "[Orc Warrior]";

-						mes "If I take the voucher of Orc Warrior,";

-						mes "I will record it a 100 victories.";

-						mes "Please make sure you defeat 10,000 orc warrior...";

-						mes "Please continue your battle, don't stop.";

-						close;

-					}

-				}

-				mes "[Orc Warrior]";

-				mes "The best way to understand Orcs,";

-				mes "is through battle.";

-				mes "Thrugh collisions of strength and skills,";

-				mes "improve your understanding between each other.";

-				next;

-				mes "[Orc Warrior]";

-				mes "So, go out there and fight.";

-				mes "conversation with my is just an acceptance of concepts.";

-				mes "One day,";

-				mes "You shall be recognized as a true warrior.";

-				set orcs_hero_hat,12;

-				close;

-			} else {

-				mes "[Orc Warrior]";

-				mes "I feel that you are not statisfied?";

-				mes "Do you have any doubts about us?";

-				mes "You are a human.";

-				mes "Your concern to other tribers,";

-				mes "will not benefit you.";

-				close;

-			}

-		}

-	} else if (orcs_hero_hat == 13) {

-		if (countitem(931)) {

-			mes "[Orc Warrior]";

-			mes "Stay alive before you grab the victory...";

-			mes "Rest here for a while before you leave.";

-			mes "Until now, you have achieved "+orcs_hero_hat2+" times of victories.";

-			next;

-			mes "[Orc Warrior]";

-			mes "Do you want to add the record of your current victory";

-			mes "into this record? You have won "+countitem(931)+" times this time.";

-			next;

-			switch(select("Add the record:Add it later")) {

-			case 1:

-				set orcs_hero_hat2,orcs_hero_hat2+countitem(931);

-				delitem 931,countitem(931);

-				if (orcs_hero_hat2>9999) {

-					mes "[Orc Warrior]";

-					mes "And this, achieving more than 10,000 victories";

-					mes "is an extraordinary achievement to human...";

-					mes "You have completed an unusual task.";

-					mes "Through the current battle,";

-					mes "You must have learned a lot about the Orcish Tribe.";

-					next;

-					mes "[Orc Warrior]";

-					mes "Although you're a human, you have walked the path of a true warrior....";

-					mes "We have recognized you.";

-					mes "You are a true warrior!!";

-					mes "You are... Orc Lady!!";

-					getitem 2299,1;

-					set orcs_hero_hat,14;

-					next;

-					mes "[Orc Warrior]";

-					mes "This is your present.";

-					mes "I wonder if it fits your head.";

-					mes "Wear it well.";

-					mes "If you do not want to wear it, take it along with you.";

-					getitem 931,1;

-					next;

-					mes "[Orc Warrior]";

-					mes "And, you have been recognized as a warrior...";

-					mes "This voucher is for you.";

-					mes "Although it has no difference compared to others,";

-					mes "keep it well.";

-					mes "You will only be recognized as a Orc Warrior,";

-					mes "with this voucher.";

-					next;

-					mes "[Orc Warrior]";

-					mes "So, you may go back now...";

-					mes "If you ever think of us,";

-					mes "come and look for us.";

-					mes "A true self of a person can only be shown through endless battles.";

-					mes "Return to the land now.";

-					close;

-				}

-				mes "[Orc Warrior]";

-				mes "You have worked hard.";

-				mes "I hope your futue better will shine with the light of victories.";

-				mes "If you ever lost,";

-				mes "I hope to see you stand up again.";

-				next;

-				mes "[Orc Warrior]";

-				mes "There are "+(10000-orcs_hero_hat2)+" of battles left.";

-				mes "Although it is a though road ahead,";

-				mes "I hope that you will pull yourself together and achieve the final victory.";

-				close;

-			case 2:

-				mes "[Orc Warrior]";

-				mes "Hmm, as you like it.";

-				mes "I will be dissapointed again,";

-				mes "If you give up in the middle.";

-				close;

-			}

-		} else {

-			mes "[Orc Warrior]";

-			mes "Rest here for a while before you leave.";

-			mes "Until now, you have achieved "+orcs_hero_hat2+" times of victories.";

-			close;

-		}

-	} else if(orcs_hero_hat == 14) {

-		if (countitem(1304)) {

-			mes "[Orc Warrior]";

-			mes "Hmm? Don't tell me that you assume that";

-			mes "you won't be able to get back to the human villages";

-			mes "if you are recognized as a Orc Warrior. Hahahaha!";

-			mes "You better leave then.";

-			close;

-		} else {

-			set @orc_hero_quest,rand(1,10);

-			if (@orc_hero_quest > 9) {

-				mes "[Orc Warrior]";

-				mes "That? Is that thirst...?";

-				mes "Although you're recognized as a warrior,";

-				mes "that eyes of yours show you seek more powerful enemies...";

-				mes "Maybe you are not statisfied with the current situation.";

-				next;

-				mes "[Orc Warrior]";

-				mes "Alright, do you want to take another trial?";

-				mes "Maybe all you accumulated belongings";

-				mes "shall become but a dream...";

-				mes "This path,";

-				mes "is a process feared,";

-				mes "by even the most skullful warrior.";

-				next;

-				mes "[Orc Warrior]";

-				mes "a recognized Orc Warrior, maybe you can defeat them...";

-				mes "What is your choise?";

-				next;

-				switch(select("I am statisfied with the current condition:...I will challenge the trial")){

-				case 1:

-					mes "[Orc Warrior]";

-					mes "Yes, it is useful";

-					mes "if you are statisfied with yourself sometimes.";

-					mes "It takes greater courage,";

-					mes "to admit that you can't overcome a greater obstacle.";

-					close;

-				case 2:

-					mes "[Orc Warrior]";

-					mes "Good, I praise your honorable spirit.";

-					mes "This is an opportunity";

-					mes "for a warrior who've won 10,000 victories.";

-					mes "You will face";

-					mes "the greatest warrior of the Orcish tribe...!";

-					next;

-					mes "[Orc Warrior]";

-					mes "Fight the best warrior of the Orc Warrior.";

-					mes "Obtain 100 victories from the Orc Heroes,";

-					mes "and bring me the voucher.";

-					mes "Although you're a great warrior, this is a ardous task";

-					mes "espectially when you have to face it alone....!";

-					next;

-					mes "[Orc Warrior]";

-					mes "Come, go now! Since you can beat 10,000 Orc warrior,";

-					mes "there's some possibilities that";

-					mes "you can take down 100 Orc Heroes!";

-					mes "If that's so, we will recognize you as";

-					mes "the Orc Hero...!";

-					set orcs_hero_hat,15;

-					close;

-				}

-			} else {

-				mes "[Orc Warrior]";

-				mes "Oh warrior, continue to shine in the victories of your battles.";

-				mes "Stand up again even if you've lost.";

-				mes "Show your unshaken spirit.";

-				mes "You are the human that is reconized as an Orc Warrior!";

-				close;

-			}

-		}

-	} else if(orcs_hero_hat == 15) {

-		if (countitem(968)>99) {

-			mes "[Orc Warrior]";

-			mes "Finally... You have achive the goal.";

-			mes "Those who've lost to you have admitted that";

-			mes "you have shown yourself as a Hero";

-			mes "by crossing the barrier of kinds as a human...";

-			mes "I, on behalf of our tribe,";

-			mes "pay our greatest respect to you.";

-			next;

-			mes "[Orc Warrior]";

-			mes "Now I ask you to make you final selection,";

-			mes "what will you do with the vouchers you've taken?";

-			mes "It means nothing to humands,";

-			mes "but to the orcs,";

-			mes "Heroic Emblem is a belonging";

-			mes "of a true hero.";

-			next;

-			mes "[Orc Warrior]";

-			mes "You've obtained this through you hardship.";

-			mes "You can take it with you,";

-			mes "or give them back to the Orc Heroes.";

-			mes "The meaning of giving them back the voucher,";

-			mes "is to battle them again...";

-			next;

-			mes "[Orc Warrion]";

-			mes "So, heroic emblem,";

-			mes "what will you do with it?";

-			next;

-			switch(select("I will take it back as token of victories:I'll give them back to Orc Heroes")) {

-			case 1:

-				mes "[Ork Warrior]";

-				mes "Well, that is a good choise.";

-				mes "Nobody can change your right to make that decision.";

-				mes "Please take good care of";

-				mes "these tokens of victory.";

-				close;

-			case 2:

-				mes "[Orc Warrior]";

-				mes "This is the true spirit of a warrior...!";

-				mes "Respecting your oppenent even after you've won,";

-				mes "such deeds";

-				mes "should be learned by we Orcs...!";

-				if (countitem(968)<100) close;

-				delitem 968,100;

-				set orcs_hero_hat,16;

-				next;

-				mes "[Orc Warrior]";

-				mes "The one who have defeated 100 Orc Hero...";

-				mes "Altough you're a human";

-				mes "we know you as the best warrior of the Orcs.";

-				mes "You are now... Orc hero!";

-				getitem 1124,1;

-				next;

-				mes "[Orc Warrior]";

-				mes "This is the sword given only to the Heroes.";

-				mes "Iam not sure wether you can use it.";

-				mes "But as a Orc Hero,";

-				mes "you should have it.";

-				getitem 968,1;

-				next;

-				mes "[Orc Warrior]";

-				mes "And since you're a Orc Hero now...";

-				mes "This is the Heroic Emblem for you.";

-				mes "Although it has no difference compared to others,";

-				mes "keep it well.";

-				mes "You will only be recognized as a Orc Hero,";

-				mes "with this voucher.";

-				next;

-				mes "[Orc Warrior]";

-				mes "So, you can leave now...";

-				mes "A person from human tribe that can understand us,";

-				mes "is the one who crosses the boundaries of tribe.";

-				mes "Show the tough spirit of you,";

-				mes "and set for you new destiny....";

-				close;

-			}

-		} else {

-			mes "[Orc Warrior]";

-			mes "Tired...? Orc Hero is";

-			mes "the best warrior among our warriors.";

-			mes "They are known for their capability.";

-			mes "It might be to hard for";

-			mes "a human to pick on them.";

-			next;

-			mes "[Orc Warrior]";

-			mes "However, this trial is the patch you've chosen.";

-			mes "Maybe you want to know you true limit,";

-			mes "so you keep your promise to walk this path...!";

-			mes "Don't rush for the answer,";

-			mes "it might lies beneath the records of your countless battles.";

-			close;

-		}

-	} else if (orcs_hero_hat > 15) {

-		if (countitem(968)) {

-			mes "[Orc Warrior]";

-			mes "Warrior of the Orc Warrior, the greatest Hero";

-			mes "You are... Orc Hero!!";

-			mes "May the valiant warrior be blessed with light!!";

-			close;

-		} else {

-			mes "[Orc Warrior]";

-			mes "Oh Hero, where have you put your voucher...?";

-			mes "Without the Heroic Emblem,";

-			mes "you shall not be knows as a Orc Hero.";

-			mes "Please retrieve it and keep it with you.";

-			close;

-		}

-	} else if (orcs_hero_hat == 0 || orcs_hero_hat ==1) {

-		mes "[Orc Warrior]";

-		if (sex == 1) {

-			mes "What does the son of a human have to do here?";

-		} else {

-			mes "What does the daughter of a human have to do here?";

-		}

-		mes "Shouldn't you have nothing to do with us, the Orc Warriors?";

-		mes "Or are you tired of the endless war";

-		mes "and hope for a truce? That should be good!";

-		next;

-		mes "[Orc Warrior]";

-		mes "We, the Orc Warriors don't simple speak to men.";

-		mes "I praise your courage";

-		mes "to dare to come and try to talk to me.";

-		mes "But we have no intention of hearing what you want to say.";

-		next;

-		mes "[Orc Warrior]";

-		mes "Sit there quietly and leave without making any noises.";

-		mes "If you want to rest before you depart,";

-		mes "watch your manners, at least to the host, me.";

-		if (rand(1,10)>9) {

-			next;

-			switch(select(".....","I want a conversation with you.")) {

-			case 1:

-				close;

-			case 2:

-				mes "[Orc Warrior]";

-				mes "Converstation...? Conversation you say?Hahahaha!! ";

-				mes "You are really an interesting human.";

-				mes "Talk to a Orc Warrior? ";

-				mes "This is the first time I see human talk without sword and shield...!";

-				next;

-				mes "[Orc Warrior]";

-				mes "However, I won't be kind to anyone.";

-				mes "If you want to talk to me,";

-				mes "you'll need to show some respect! Do you understand that?";

-				mes "Ok... this is my little suggestion.";

-				next;

-				mes "[Orc Warrior]";

-				mes "Show me the will of a human,";

-				mes "who wants to talk to me.";

-				mes "To talk to me, gather^FF0000Jellopy x 1000 ^000000 ";

-				mes "Bring it to me when you come to talk next time";

-				next;

-				mes "[Orc Warrior]";

-				mes "And, don't question me.";

-				mes "I won't give you the rights to question my opinion.";

-				mes "And dont you dream that,";

-				mes "I will give you anything.";

-				mes "Do you still want to talk under these circumstances?";

-				mes "Decendent of human?";

-				next;

-				switch(select("Let's battle, Orc Warrior!!:I will show you my faith")) {

-				case 1:

-					mes "[Orc Warrior]";

-					mes "Yeahyeahyee, what a noisy fella!!";

-					mes "If you like to fight, go outside!";

-					mes "I really hate to see humans!!";

-					close;

-				case 2:

-					mes "[Orc Warrior]";

-					mes "Ok, keep your promise!";

-					mes "I want to see how you keep that.";

-					mes "You will quit eventually.";

-					mes "Hahahahaha!!";

-					set orcs_hero_hat,1;

-					close;

-				}

-			}

-		} else {

-			close;

-		}

-	}

-}

-in_orcs01.gat,162,33,1	script	Hero of Orc#1	1087,2,2{

-	if (orcs_hero_hat < 16) {

-		mes "[Orc Hero]";

-		mes ".....Go away, don't interrupt me!";

-		mes "If you want to fight me,";

-		mes "wait for me at the west forest.";

-		mes "I am not in the mood to fight human now.";

-		close;

-	} else if (orcs_hero_hat == 17) {

-		mes "[Orc Hero]";

-		mes "Hahaha, interesting, really interesting.";

-		mes "You are the most interesting human";

-		mes "that I have seen...";

-		mes "I like it, interesting...";

-		close;

-	} else if (orcs_hero_hat == 16) {

-		if (countitem(968) && countitem(2299) && countitem(1124) && countitem(931)) {

-			if(rand(1,20)>19) {

-				mes "[Orc Hero]";

-				mes "Hmm, a human that is knows as Hero?";

-				mes "DO you know the meaning of returning a Heroic Emblem?...";

-				mes "When I am free later,";

-				mes "I'll fight with you.";

-				next;

-				mes "[Orc Hero]";

-				mes ".....HmmHmmm...? This iron helm...?";

-				mes "It belongs to Orc Warrior...?";

-				next;

-				mes "[Orc Hero]";

-				mes "Wait... You're still using this?";

-				mes "Uhoh....";

-				mes "Such an interesting human! Hahaha";

-				mes "Good, really good...";

-				next;

-				mes "[Orc Hero]";

-				mes "You seem not to be aware of the story behind this viking helm.";

-				mes "In the battle between Orc Lord and the humands,";

-				mes "he lost it in his defeat...";

-				mes "The horn in the center was broken";

-				mes "and this helm is created...!";

-				next;

-				mes "[Orc Hero]";

-				mes "Rumors said that if it is given to a human,";

-				mes "the human will be recognized as a Hero...";

-				mes "Hahaha, interesting.";

-				mes "And there're still people who";

-				mes "continue to use it...!!";

-				next;

-				mes "[Orc Hero]";

-				mes "So that's the belonging of the Orc Lord!";

-				mes "And you are not qualified to have it.";

-				mes "So if you don't mind,";

-				mes "can you return it to its origional owner?";

-				mes "Oh 'Human' Orc Warrior?";

-				next;

-				switch(select("I refuse to do so:I agree")) {

-				case 1:

-					mes "[Orc Hero]";

-					mes "Hmm, how stubborn.";

-					mes "If you think it's important, wear it well.";

-					mes "The history of the battle is still kept";

-					mes "on this headgear of a warrior.";

-					close;

-				case 2:

-					mes "[Orc Hero]";

-					mes "Good, that's more like it.";

-					mes "This Viking Helm,";

-					mes "I'll give it to him, hahahaha...";

-					mes "I never imagined to see this thing here.";

-					next;

-					mes "[Orc Hero]";

-					mes "I'll give you a useful item though!";

-					mes "Although you're human,";

-					mes "you're recognizedas a Orc Hero before.";

-					mes "You should at least have a suitable headgear...";

-					next;

-					mes "[Orc Hero]";

-					mes "Here you can have this.";

-					mes "I have nade a special sign on it...";

-					mes "So continue to use this in the future,";

-					mes "understand? 'Human' Orc Warrior?";

-					if (countitem(2299)) {

-						delitem 2299,1;

-						getitem 5094,1;

-						set orcs_hero_hat,17;

-					}

-					close;

-				}

-			} else {

-				mes "[Orc Hero]";

-				mes "Hmm, a human that is recognized a warrior?";

-				mes "Do you know the meaning of returning a Heroic Emblem?...";

-				mes "When I am free later,";

-				mes "I'll fight with you.";

-				close;

-			}

-		} else {

-			mes "[Orc Hero]";

-			mes "Hmm, a human that is recognized a warrior?";

-			mes "You don't look like one though.";

-			mes "Is he really going to return the Heroic Emblem?";

-			mes "I can't believe it.";

-			next;

-			mes "[Orc Hero]";

-			mes "I won't recognize you as a Hero.";

-			mes "He forgets even the most basic things.";

-			mes "How can he be called warrior... Humans!!";

-			mes "Go to the west forest now.";

-			mes "I want you to pass the trial again...!";

-			close;

-		}

-	}

-}

+//===== eAthena Script ======================================= 
+//= 2004 Headgear Quests
+//===== By: ================================================== 
+//= Dj-Yhn
+//===== Current Version: ===================================== 
+//= 1.2
+//===== Compatible With: ===================================== 
+//= eAthena
+//===== Description: ========================================= 
+//= 2004 New Headgears. Official Quests
+//===== Additional Comments: =================================
+//= names with asterisk(*) are iRO names...
+//= names done: 1,3,6,8,9,12,14,15,16,17
+//= needed: 2,4,5,7,10,11,13 (7/17)
+//= ==Information For NPC's inside File==
+//= 1) Black Cat Ears [NekoNeko*] {Payon}
+//=   o payon.gat 115 131
+//= 2) Crossed Hair Band, Plaster and Flower Hairpin [Arjen] {Geffen}
+//=   o geffen.gat 129 148
+//= 3) Hot-blooded-headband [Zhenbolt*] {Yuno}
+//=   o yuno.gat 300 188
+//= 4) Red Tailed Ribbon [Netpia] {Prontera}
+//=   o prontera.gat 165 232
+//= 5) Indian Headband [Merunte] {Comodo}
+//=   o comodo.gat 237 217
+//= 6) Mushroom headband [Ipore*] {Geffen}
+//=   o geffen.gat 67 87
+//= 7) Ears of angel wing &
+//=     Ears of devil wing [Old Blacksmith] {Yuno}
+//=   o yuno.gat 241 52
+//= 8) Sea Otter Cap [Pretty Lindsay*] {Lutie}
+//=   o xmas.gat 183 267
+//= 9) Brown Bear Cap [Fuzzy Fuzz*] {Lutie}
+//=   o xmas.gat 175 156
+//=10) Cap of Concentration [Nan Hyang] {Payon}
+//=   o payon_in03.gat 8 193
+//=11) Tulip Haipin [Ses] {Geffen}
+//=   o geffen.gat 83 189
+//=12) Party Hat, Straw Hat, Cowboy Hat, Sombrero
+//=	and Fur hat [Headgear Merchant (Mike)*] {Lutie}
+//=   o xmas_in.gat 35 30
+//=13) Big Golden Bell, Headgear of Queen
+//=     and Crown of Mistress [Neris] {Yuno}
+//=   o yuno_in03.gat 20 18
+//=14) Alarm Mask [Muscle Man*]{Aldebaran}
+//=   o alde_alche.gat 88 180
+//=15) Drooping Kitty, Smokie Leaf, Lazy Smokie
+//= 	and Blue Fish [Traveler*] {Morroc}
+//=   o morocc.gat 273 79
+//=16) Fox Mask [Nine Tail*] {Payon Dungeon}
+//=   o pay_dun03 48 84
+//=17) Orc Hero Helm [Orc Warrior*] {Orc Village}
+//=   o in_orcs01 31 93 & 162 33
+//============================================================
+//= 1.01 Fixed items names iRO->kRO, fixed some bugs [Qwadrat]
+//=	Fixed possible item exploits, fixed Straw Hat
+//= 	Added missing checks [Lupus]
+//= 1.1	Fixed a bug in Giant-band-aid that didn't counting rotten bandages
+//=	Fixed a bug in Fur Hat that didn't count yarn [Evera]
+//= 1.2 Syntax fixes for parenthesis, reformatting [KarLaeda]
+//============================================================
+
+//Payon /=Black cat ears=/
+payon.gat,115,131,3	script	NekoNeko	725,{
+	if (countitem(2213) > 0 && countitem(983) > 0 && countitem(914) > 199 && Zeny > 9999) {
+		delitem 2213,1;
+		delitem 983,1;
+		delitem 914,200;
+		set Zeny,Zeny-10000;
+		mes "[NekoNeko]";
+		mes "Hihi? So you have collected all materials.";
+		mes "According to our agreement,";
+		mes "I will make it for you~ please";
+		mes "wait for a while!";
+		next;
+		mes "[NekoNeko]";
+		mes "Zomulazhumudazowuwudududu";
+		mes "DidiSusuohwuzaowududaduda";
+		next;
+		getitem 5057,1;
+		mes "[NekoNeko]";
+		mes "Thank youfor using!";
+		mes "If you need it again in future,";
+		mes "come and fine me anytime!";
+		close;
+	} else {
+		mes "[NekoNeko]";
+		mes "How are you? Yes, I know.";
+		mes "I know why you're trying to talk to me.";
+		mes "That's because the Ears of Black Cat";
+		mes "that I am wearing is too cute... right? Hahaha";
+		next;
+		mes "[NekoNeko]";
+		mes "Honestly, I made this hairband";
+		mes "with my skill of craftmanship.";
+		mes "Therefore, not much people know,";
+		mes "about this adorable head gear.";
+		mes "Isn't that a pity that I use it myself?";
+		next;
+		mes "[NekoNeko]";
+		mes "So, you better ask me to make that.";
+		mes "I will make it";
+		mes "with a pay of course.";
+		mes "Fill your pockets with coints....";
+		mes "That's my thinking, hehehehe";
+		next;
+		mes "[NekoNeko]";
+		mes "^FF0000Kitty Band^000000 x1";
+		mes "^FF0000Black Dyestuffs^000000 x1";
+		mes "^FF0000Fluff^000000 x200";
+		mes "and lastly, it requires at least ^FF000010000zeny^000000!";
+		mes "If you want it, gather them and bring it to me~";
+		next;
+		mes "[NekoNeko]";
+		mes "^FF0000Ah! Please keep this in mind.";
+		mes "If you slot a card in your equipment,";
+		mes "and you want to change it to the item now,";
+		mes "you will lose the card and refined level.";
+		close;
+	}
+}
+//Geffen /=Crossed Hair Ban, Plaster and Flower Hairpin=/
+geffen.gat,129,148,3	script	Arjen	779,{
+	mes "[Arjen]";
+	mes "Ahhh~So boring~ So very boring~";
+	mes "There's noone I need to see, and the weather is so good - ! !";
+	mes "It's so boring that I have nothing to do.";
+	emotion e_gasp; //not sure if this is ET_SCRATCH
+	next;
+	mes "[Arjen]";
+	mes "Oh yes, hey there, you!!";
+	mes "Do you want to have a cute and fine hair clip?";
+	mes "For a person as skillful as I am, there's nothing I can't make!! Wa haha!";
+	mes "Clap ! It will be ready just like that!";
+	emotion e_omg; //ET_SURPRISE?
+	next;
+	mes "[Arjen]";
+	mes "Lucky I am freerightnow. So, just bring me the materials and I will whoosh! make it for you!";
+	mes "So, any idea of what accessory you would like to have?";
+	emotion e_heh; //ET_SMILE
+	next;
+	switch(select("^3131FFX Hairpin:Giant Band Aid:Flower Hairpin^000000:End conversation.")) {
+	case 1:
+		if (countitem(2294) > 0 && countitem(7220) > 399) {
+			mes "[Arjen]";
+			mes "X Hairpin!";
+			mes "That's very good !!";
+			next;
+			mes "[Arjen]";
+			mes "Oh yes!";
+			mes "The Stellar.."; //star dust? that's not refinable, now is it? =X
+			mes "^CE3100During the production, the refine level will disappear, is that ok with you?^000000";
+			next;
+			switch(select("It's ok, just make it for me!:I will come next time.")) {
+			case 1:
+				mes "[Arjen]";
+				mes "Oh well- Then,";
+				mes "it's time to show my skill after all this time !?";
+				next;
+				mes "^3131FF - Sha Sha !! - ^000000";
+				mes "^3131FF - Cha Sha Haa !! - ^000000";
+				next;
+				if (countitem(2294) > 0 && countitem(7220) > 399) {
+					delitem 2294,1;
+					delitem 7220,400;
+					getitem 5079,1; //X-Hairping == crossed hair band?
+				}
+				mes "[Arjen]";
+				mes " OK - !!";
+				mes "I still have my touch! Wa ha ha!!";
+				mes "How about that? Do you like it?";
+				next;
+				mes "[Arjen]";
+				mes "If you have any need, come and find me here anytime!";
+				mes "So, good bye. Good Bye!";
+				close;
+			case 2:
+				mes "[Arjen]";
+				mes "Fine, fine, come back after you've made up your mind!";
+				close;
+			}
+		} else {
+			mes "[Arjen]";
+			mes "Right - the ^3131FF X Hairpin!^000000";
+			mes "That's simple!";
+			next;
+			mes "[Arjen]";
+			mes "^FF0000Stellar x1^000000";
+			mes "^FF0000Ectoplasm x400^000000";
+			mes "If you've prepared all of this, I will help to make it for you!";
+			close;
+		}
+	case 2:
+		if (countitem(970) > 0 && countitem(930) > 499) {
+			mes "[Arjen]";
+			mes "Giant Band Aid??..";
+			mes "Oh well- Then,";
+			mes "it's time to show my skill after all this time !?";
+			next;
+			mes "^3131FF - Sha Sha !! - ^000000";
+			mes "^3131FF - Cha Sha Haa !! - ^000000";
+			next;
+			if (countitem(970) > 0 && countitem(930) > 499) {
+				delitem 970,1;
+				delitem 930,500;
+				getitem 5063,1; //another one in wich I love gravity for changing names =X
+			}
+			mes "[Arjen]";
+			mes " OK - !!";
+			mes "I still have my touch! Wa ha ha!!";
+			mes "How about that? Do you like it?";
+			next;
+			mes "[Arjen]";
+			mes "If you have any need, come and find me here anytime!";
+			mes "So, good bye. Good Bye!";
+			close;
+		} else {
+			mes "[Arjen]";
+			mes "Hoho - ^3131FF Plaster !^000000";
+			mes "If anyone asked where this is the Plaster that is used when someone is hurt?";
+			mes "Tell them it is the real Plaster for injured people.";
+			mes "Hmm, isn't that easy?";
+			next;
+			mes "[Arjen]";
+			mes "^FF0000Alcohol x1^000000";
+			mes "^FF0000Rotten Bandage x500^000000";
+			mes "If you have prepared all the items, I will help to make it for you now?";
+			close;
+		}
+	case 3:
+		if (countitem(2269) > 0 && countitem(999) > 9 && Zeny > 19999) {
+			mes "[Arjen]";
+			mes "Great !! Flower Hairpin ~";
+			mes "it's time to show my skill after all this time !?";
+			next;
+			mes "^3131FF - Sha Sha !! - ^000000";
+			mes "^3131FF - Cha Sha Haa !! - ^000000";
+			next;
+			if (countitem(2269) > 0 && countitem(999) > 9 && Zeny > 19999) {
+				delitem 2269,1;
+				delitem 999,10;
+				set Zeny,Zeny-20000;
+				getitem 5061,1; //finally a non-changed name =X
+			}
+			mes "[Arjen]";
+			mes " OK - !!";
+			mes "I still have my touch! Wa ha ha!!";
+			mes "How about it? Do you like it? Here is the stem left from the production. Take it as a souvenir. Haha.";
+			next;
+			mes "[Arjen]";
+			mes "If you have any need, come and find me here anytime!";
+			mes "So, good bye. Good Bye!";
+			close;
+		} else {
+			mes "[Arjen]";
+			mes "Yes - ^3131FF Flower Hairpin !^000000";
+			mes "Sometimes, I see some strange girls with bare legs and a flower in their mouths.";
+			mes "Looking at them, I get an idea!";
+			next;
+			mes "[Arjen]";
+			mes "That is ^3131FFFlower^000000, ^3131FFFlower^000000 !";
+			mes "Wa ha ha, isn't that a perfect match?";
+			mes "Some even equip it on the Orc Warrior, you should be proud of it, right?";
+			mes "Really ~  ~  ~";
+			next;
+			mes "[Arjen]";
+			mes "But the process takes a little more effort,";
+			mes "I need to take some process fee.";
+			next;
+			mes "[Arjen]";
+			mes "You should know that,";
+			mes "stabilizing a fragile flower on the head";
+			mes "takes a lot of concentration and";
+			mes "very high level of skills!";
+			next;
+			mes "[Arjen]";
+			mes "So, please bring,";
+			mes "^FF0000Romantic Flower x1^000000";
+			mes "^FF0000Steel x10^000000";
+			mes "together with ^3131FF 20,000 zeny^000000 !";
+			mes "If you have prepared all of these, I will make it for you right away!";
+			mes "Do you understand that?";
+			close;
+		}
+	case 4:
+		mes "[Arjen]";
+		mes "Ha, what? You don't want it?";
+		mes "Rumblerumblerumble";
+		close;
+	}
+}
+//Yuno /=Headband of power=/ <-- Ok, WTF? Thanks again bitches ;_;
+//Yuno /=Hot-blooded headband=/ [5070]
+yuno.gat,300,188,5	script	Zhenbolt	753,{
+	if(countitem(7216) > 299 && countitem(7097) > 299 && countitem(2211) > 0 && countitem(982) > 0) {
+		delitem 7216,300;
+		delitem 7097,300;
+		delitem 2211,1;
+		delitem 982,1;
+		mes "[Zhenbolt]";
+		mes "Uh oh...Have you collected all the items?";
+		mes "Good.";
+		mes "According to out agreement,";
+		mes "I will create it for you, whole hearedly.";
+		next;
+		mes "[Zhenbolt]";
+		mes "........................";
+		next;
+		mes "[Zhenbolt]";
+		mes "........................";
+		next;
+		mes "[Zhenbolt]";
+		mes "..................-work harder!-";
+		next;
+		mes "[Zhenbolt]";
+		mes "Uh oh... It's finished.";
+		mes "If you wear it,";
+		mes "you will feel some warmth,";
+		mes "in this cold world.";
+		mes "A great item has been born in this world.";
+		mes "Ladies and gentleman, this is ^FF0000Hot-blooded Headband^000000!!";
+		getitem 5070,1;
+		next;
+		mes "[Zhenbolt]";
+		mes "With this, I will be able";
+		mes "to get back to the person I miss soon.";
+		mes "My name is";
+		mes "Zhenbolt";
+		mes "Main distributor of hear warming sensation!";
+		close;
+	} else {
+		mes "[Zhenbolt]";
+		mes "My name is Zhenbolt,";
+		mes "a simple practioner that travels around the world,";
+		mes "to spead the warmth of heart around the world.";
+		next;
+		mes "[Zhenbolt]";
+		mes "You won't understand the meaning";
+		mes "of a burning spirit and heat of passion through mere explaining.";
+		mes "So do you want to accept this?";
+		mes "I will create an item";
+		mes "that stores my heart for you.";
+		next;
+		mes "[Zhenbolt]";
+		mes "However,";
+		mes "I cannot leave this place,";
+		mes "because I need to pass the message to others...";
+		mes "So,";
+		mes "I will have to trouble you";
+		mes "to gather the materials.";
+		next;
+		mes "[Zhenbolt]";
+		mes "^FF0000Red Muffler^000000 300 unit";
+		mes "^FF0000Burning Heart^000000 300 unit";
+		mes "^FF0000Bandana^000000 1unit ^FF0000White Dyestuffs^000000 1 unit...";
+		mes "To produce the item,";
+		mes "you'll need this materials.";
+		mes "Come to find me again after you've collected all the materials required.";
+		next;
+		mes "[Zhenbolt]";
+		mes "^FF0000Besides that,";
+		mes "Ah! Please keep this in mind.";
+		mes "If you slot a card in your equipment,";
+		mes "and you want to change it to the item now,";
+		mes "you will lose the card and refined level.";
+		close;
+	}
+}
+//Prontera /=Red Tailed Ribbon=/ [5083](Red Ribbon)//
+prontera.gat,165,232,3	script	Netpia	744,{
+	if(countitem(2244) > 0 && countitem(2209) > 0 && countitem(10007) > 0) {
+		delitem 2244,1;
+		delitem 2209,1;
+		delitem 10007,1;
+		mes "[Netpia]";
+		mes "Wow... You've brought all of it.";
+		mes "You've must have done a lot.";
+		mes "I will make the item according to our agreement.";
+		mes "Please wait for a while.";
+		next;
+		mes "[Netpia]";
+		mes "...........................";
+		next;
+		mes "[Netpia]";
+		mes "...........................";
+		next;
+		mes "[Netpia]";
+		mes ".....................-Work Hard-";
+		next;
+		mes "[Netpia]";
+		mes "Here it is.";
+		mes "It's all yours now.";
+		mes "Remember to always wear it.";
+		getitem 5083,1;
+		next;
+		mes "[Netpia]";
+		mes "Use this,";
+		mes "to pass my intention to him...";
+		mes "He left me for a while,";
+		mes "with the hope to warm the heart of the world.";
+		mes "The one who chases that dream...";
+		mes "Where is he now?";
+		next;
+		mes "[Netpia]";
+		mes "When you see the Red Ribbon,";
+		mes "will you think of me,";
+		mes "and continue to work harder?";
+		mes "May you be blessed with luck on your journey.";
+		close;
+	} else {
+		mes "[Netpia]";
+		mes "Hello?";
+		mes "Do you want to wear a Red Ribbon?";
+		mes "It's a really beautiful head accesory.";
+		mes "I am not trying to trick you,";
+		mes "what do you think?";
+		next;
+		mes "[Netpia]";
+		mes "^FF0000Big Ribbon^000000 x1.";
+		mes "^FF0000Ribbon with one slot^000000 x1.";
+		mes "^FF0000Silk Ribbon^000000 x1...";
+		mes "I'll make it for you,";
+		mes "if you bring the above items.";
+		next;
+		mes "[Netpia]";
+		mes "Remember to bring it to me.";
+		mes "I'll be more then glad,";
+		mes "if you wear the Red Ribbon.";
+		mes "Then see you soon.";
+		next;
+		mes "[Netpia]";
+		mes "^FF0000Ah... let me tell you about this,";
+		mes "Ah! Please keep this in mind.";
+		mes "If you slot a card in you equipment,";
+		mes "and you want to change it to the item now,";
+		mes "you will lose the card and refined level.";
+		close;
+	}
+}
+//Comodo /=Indian Headband=/ [5071]
+comodo.gat,237,217,5	script	Merunte	732,{
+	if (countitem(5010) > 0 && countitem(5049) > 0 && countitem(7101) > 9 && Zeny > 9999) {
+		delitem 5010,1;
+		delitem 5049,1;
+		delitem 7101,10;
+		set Zeny,Zeny-10000;
+		mes "[Merunte]";
+		mes "Oh oh! You have brought it like you've promised!";
+		mes "Then we shall pay our end of our bargain,";
+		mes "just like the Indians!";
+		next;
+		mes "[Merunte]";
+		mes "Now let me have";
+		mes "the materials that you have brought first.";
+		mes "I will use it well to make the headband.";
+		getitem 5071,1;
+		next;
+		mes "[Merunte]";
+		mes "Ah Wuwuwuwuwuwuwuwuwuwuwu~";
+		close;
+	} else {
+		mes "[Merunte]";
+		mes "Ah Wuwuwuwuwuwuwuwuwuwuwu~";
+		mes " ";
+		mes "Let the spirit of Indian stay glorious forever!";
+		mes "With the honor of Comodo Indian,";
+		mes "raise the glory of Indian!";
+		next;
+		mes "[Merunte]";
+		mes "For this reason,";
+		mes "do you want to try wearing,";
+		mes "an Indian Headband? Bring ^FF0000Indian Fillet^000000 x1";
+		mes "^FF0000Striped Hairband^000000 x1";
+		mes "^FF0000Peco Peco Feather^000000 x10";
+		mes "and together with ^FF000010000zeny^000000!";
+		next;
+		mes "[Merunte]";
+		mes "And Indiantakes a promise,";
+		mes "more importantly than his life.";
+		mes "As long as you bring it, I will make that for you anytime!";
+		mes " ";
+		mes "Ah Wuwuwuwuwuwuwuwuwuwuwu~";
+		next;
+		mes "[Merunte]";
+		mes "^FF0000Ah! Please keep this in mind";
+		mes "If you slot a card in your equipment,";
+		mes "and you want to change it to the item now,";
+		mes "you will lose the card and refined level.";
+		close;
+	}
+}
+//Geffen /=Mushroom Band=/ [5082]
+geffen.gat,67,87,3	script	Ipore	700,{
+	if (countitem(921) > 299) {
+		delitem 921,300;
+		mes "[Ipore]";
+		mes "Oh Wow. You really have brought the Mushroom Spore x 300?";
+		mes "You much have been tired.";
+		mes "Then, I shall use these,";
+		mes "to perform a magic show for you!";
+		mes "Please wait for a while.";
+		next;
+		mes "- Sha Ka Sha Ka Sha Ka Sha Ka Sha Ka Sha Ka -";
+		mes "- Iporeput all the Mushroom Spores-";
+		mes "- onto my head. -";
+		next;
+		mes "[Ipore]";
+		mes "Kineisihayituoohyilaahahsaiyi";
+		mes "Chahulisitawutehayisikenbiah";
+		mes "BiwuBiwuBiwu....Keahahah!!";
+		next;
+		mes "[Ipore]";
+		mes ".......................";
+		mes "Shoosh... Anyway,";
+		mes "The spore has grown on your head.";
+		mes "It looks odd just like that.";
+		mes "Let me help you to make it into a headband.";
+		next;
+		mes "[Ipore]";
+		mes "So...How about that? Feeling any better?";
+		mes "Making a headband,";
+		mes "using the spore that grows from your head...";
+		mes "Isn't that romantic? Hehe.";
+		next;
+		mes "[Ipore]";
+		mes "Anyway, you've done a lot.";
+		mes "So, take this headban with you to show off somewhere.";
+		mes "If you want to make another one,";
+		mes "just come and find me!";
+		getitem 5082,1;
+		close;
+	} else {
+		mes "[Ipore]";
+		mes "Huhuhu...";
+		mes "I fount it at last!";
+		mes "I have discovered a magic";
+		mes "that will make the spore grows on your head.";
+		next;
+		mes "[Ipore]";
+		mes "Of course, it might be inconvenient,";
+		mes "with a headfull of mushroom spore...";
+		mes "That's why I pick it up";
+		mes "and make it into a hairband for you.";
+		next;
+		mes "[Ipore]";
+		mes "Aiyo! No point listening and do not see it for yourself!";
+		mes "Just bring 300 ^FF0000Mushroom Spore^000000,";
+		mes "and I will let you experience it!";
+		mes "I am confident that if you experience such magic,";
+		mes "you're surely be thankful to me, won't you?";
+		close;
+	}
+}
+//Yuno /=Ears of Angel's Wing & Ears of Devil's Wing=/ [5074]&[5068]
+yuno.gat,241,52,3	script	Old Blacksmith	813,{
+	mes "[A seemingly skillful craftman]";
+	mes "Uh Oh, since you've come to this place,";
+	mes "you must have known how to enjoy the scenary.";
+	mes "Since you're a Blacksmith, why not do your forging?";
+	mes "What's the point staring at the sky?";
+	mes "My name is Habir Moah!";
+	mes "A wandering Blacksmith with my hammer as my companion.";
+	next;
+	if (countitem(2254) && countitem(2286) && Zeny>19999) {
+		mes "[Habir Moah]";
+		mes "Hmm? You do have really good items, don't you?";
+		mes "Hmm... however,";
+		mes "do you have the insufficientfeeling?";
+		mes "If you are willing, take out your";
+		mes "^4d4dffAngel Wing^000000 and ^4d4dffElven Ears^000000";
+		mes "to create a unusual item.";
+		next;
+		mes "[Habir Moah]";
+		mes "How about that, do you ever though of that?";
+		mes "Don't suspect my capability!";
+		mes "As a Blacksmith";
+		mes "I am considered as one of the most skillful one, if not the most skillful!";
+		mes "Through the skill of blacksmith,";
+		mes "an ore will become a great steel, that's the rule.";
+		next;
+		switch(select("Hmm... I'll think about it.:Can you help me make it?:Can I craft Evil headband...?")) {
+		case 1:
+			mes "[Habir Moah]";
+			mes "Hmm, what a pity!";
+			mes "I thought I can show my skill again.";
+			mes "Oh well.";
+			mes "... ... ...";
+			mes "Beautiful sky... So blue.";
+			close;
+		case 2:
+			mes "[Habir Moah]";
+			mes "Aha, thank you!";
+			mes "Let's see the material first, shall we?";
+			mes "Angel Wing and Elven Ears,";
+			mes "other miscellaneous stuffs and 20000 zeny.";
+			mes "All these items really cost something.";
+			mes "I will help you make one fine accesory.";
+			next;
+			mes "[Habir Moah]";
+			mes "Before I produce the item, let me remind you.";
+			mes "I don't care about";
+			mes "the level of refining for the item.";
+			mes "If you have worries,";
+			mes "I guess you better tidy up your items.";
+			next;
+			mes "[Habir Moah]";
+			mes "^4d4dffPlease Reserve the items,";
+			mes "that is required for making the headgear^000000";
+			mes "I do not hope that you will blame me,";
+			mes "if I fail to make that item.";
+			next;
+			switch(select("It's ok, just do it.:Hmm, I need to think about it.")) {
+			case 1:
+				mes "[Habir Moah]";
+				mes "So, let's do it!";
+				next;
+				misceffect 154; //Success Hammer ;P
+				mes "[Habit Moah]";
+				mes "With my skills,";
+				mes "the great creation of me, Habir Moah,";
+				mes "is completed!";
+				mes "Here it is,";
+				mes "the Angel Wing Ears.";
+				if (countitem(2254) && countitem(2286) && Zeny>19999) {
+					delitem 2254,1;
+					delitem 2286,1;
+					set Zeny,Zeny-20000;
+					getitem 5074,1;
+				}
+				next;
+				mes "[Habir Moah]";
+				mes "From now on,";
+				mes "everyone will you.";
+				close;
+			case 2:
+				mes "[Habir Moah]";
+				mes "If you're interested in it in future,";
+				mes "do come and find me.";
+				mes " ";
+				mes "Ah, what a soothing breeze.";
+				close;
+			}
+		case 3:
+			mes "[Habir Moah]";
+			mes "Hoho, of couse I can craft";
+			mes "Evil Wing!";
+			mes "I'll make it into Devil Wing Ears!";
+			next;
+			mes "[Habir Moah]";
+			mes "Let's see the materials required, shall we?";
+			mes "Evil Wing and Elven Ears,";
+			mes "in addition to that, 20,000 zeny.";
+			mes "All these items really cost something.";
+			mes "I will help you make one fine accesory.";
+			next;
+			mes "[Habir Moah]";
+			mes "Before I produce the item, let me remind you.";
+			mes "I don't care about";
+			mes "the level of refining for the item.";
+			mes "If you have worries,";
+			mes "I guess you better tidy up your items.";
+			next;
+			mes "[Habir Moah]";
+			mes "^4d4dffPlease reserve the items,";
+			mes "this is required for making the headgear.^000000";
+			mes "I do not hope that you will blame me,";
+			mes "if I fail to make that item.";
+			next;
+			switch(select("It's ok. Let's do it.:I need to tidy up first.")) {
+			case 1:
+				if (countitem(2255) && countitem(2286) && Zeny > 19999) {
+					mes "[Habir Moah]";
+					mes "So, let's do it!";
+					next;
+					misceffect 154;
+					mes "[Habir Moah]";
+					mes "With my skills,";
+					mes "the great creation of me, Habir Moah,";
+					mes "is completed!";
+					mes "Here it is,";
+					mes "Devil Wing Ears";
+					if (countitem(2255) && countitem(2286) && Zeny > 19999) {
+						delitem 2255,1;
+						delitem 2286,1;
+						set Zeny,Zeny-20000;
+						getitem 5068,1;
+					}
+					next;
+					mes "[Habir Moah]";
+					mes "Fromnow on,";
+					mes "everyone will you.";
+					close;
+				} else {
+					mes "[Habir Moah]";
+					mes "I'm sorry. If you have not prepared all the materials,";
+					mes "I won't do that for you.";
+					mes "I'll need Evil Wing, Elven Ears and";
+					mes "20000 zeny.";
+					mes "Can you please confirm that you have all of those?";
+					close;
+				}
+			case 2:
+				mes "[Habir Moah]";
+				mes "If you're interested in it in future,";
+				mes "do come and find me.";
+				mes " ";
+				mes "Ah, what a soothing breeze.";
+				close;
+			}
+		}
+	} else if (countitem(2255) && countitem(2286) && Zeny>19999) {
+		mes "[Habir Moah]";
+		mes "Hmm? You do have really good items, don't you?";
+		mes "Hmm... however,";
+		mes "do you have the insufficientfeeling?";
+		mes "If you are willing, take out your";
+		mes "^4d4dffEvil Wing^000000 and ^4d4dffElven Ears^000000";
+		mes "to create a unusual item.";
+		next;
+		mes "[Habir Moah]";
+		mes "How about that, do you ever though of that?";
+		mes "Don't suspect my capability!";
+		mes "As a Blacksmith";
+		mes "I am considered as one of the most skillful one, if not the most skillful!";
+		mes "Through the skill of blacksmith,";
+		mes "an ore will become a great steel, that's the rule.";
+		next;
+		switch(select("Hmm... I'll think about it.:Can you help me make it?:Can I craft Angel Wing...?")) {
+		case 1:
+			mes "[Habir Moah]";
+			mes "Hmm, what a pity!";
+			mes "I thought I can show my skill again.";
+			mes "Oh well.";
+			mes "... ... ...";
+			mes "Beautiful sky... So blue.";
+			close;
+		case 2:
+			mes "[Habir Moah]";
+			mes "Aha, thank you!";
+			mes "Let's see the material first, shall we?";
+			mes "Evil Wing and Elven Ear,";
+			mes "other miscellaneous stuffs and 20000 zeny.";
+			mes "All these items really cost something.";
+			mes "I will help you make one fine accesory.";
+			next;
+			mes "[Habir Moah]";
+			mes "Before I produce the item, let me remind you.";
+			mes "I don't care about";
+			mes "the level of refining for the item.";
+			mes "If you have worries,";
+			mes "I guess you better tidy up your items.";
+			next;
+			mes "[Habir Moah]";
+			mes "^4d4dffPlease Reserve the items,";
+			mes "that is required for making the headgear^000000";
+			mes "I do not hope that you will blame me,";
+			mes "if I fail to make that item.";
+			next;
+			switch(select("It's ok, just do it.:Hmm, I need to think about it.")) {
+				case 1:
+					mes "[Habir Moah]";
+					mes "So, let's do it!";
+					next;
+					misceffect 154; //Success Hammer ;P
+					mes "[Habit Moah]";
+					mes "With my skills,";
+					mes "the great creation of me, Habir Moah,";
+					mes "is completed!";
+					mes "Here it is,";
+					mes "the Angel Wing Ears.";
+					if (countitem(2255) && countitem(2286) && Zeny>19999) {
+						delitem 2255,1;
+						delitem 2286,1;
+						set Zeny,Zeny-20000;
+						getitem 5068,1;
+					}
+					next;
+					mes "[Habir Moah]";
+					mes "From now on,";
+					mes "everyone will you.";
+					close;
+				case 2:
+					mes "[Habir Moah]";
+					mes "If you're interested in it in future,";
+					mes "do come and find me.";
+					mes " ";
+					mes "Ah, what a soothing breeze.";
+					close;
+				}
+		case 3:
+			mes "[Habir Moah]";
+			mes "Hoho, of course I can craft";
+			mes "Angel Wing!";
+			mes "I'll make it into Angel Wing Ears!";
+			next;
+			mes "[Habir Moah]";
+			mes "Let's see the materials required, shall we?";
+			mes "Angel Wing and Elven Ears,";
+			mes "in addition to that, 20,000 zeny.";
+			mes "All these items really cost something.";
+			mes "I will help you make one fine accesory.";
+			next;
+			mes "[Habir Moah]";
+			mes "Before I produce the item, let me remind you.";
+			mes "I don't care about";
+			mes "the level of refining for the item.";
+			mes "If you have worries,";
+			mes "I guess you better tidy up your items.";
+			next;
+			mes "[Habir Moah]";
+			mes "^4d4dffPlease reserve the items,";
+			mes "this is required for making the headgear.^000000";
+			mes "I do not hope that you will blame me,";
+			mes "if I fail to make that item.";
+			next;
+			switch(select("It's ok. Let's do it.:I need to tidy up first.")) {
+			case 1:
+				if (countitem(2254) && countitem(2286) && Zeny > 19999) {
+					delitem 2254,1;
+					delitem 2286,1;
+					set Zeny,Zeny-20000;
+					mes "[Habir Moah]";
+					mes "So, let's do it!";
+					next;
+					misceffect 154;
+					mes "[Habir Moah]";
+					mes "With my skills,";
+					mes "the great creation of me, Habir Moah,";
+					mes "is completed!";
+					mes "Here it is,";
+					mes "Angel Wing Ears";
+					getitem 5074,1;
+					next;
+					mes "[Habir Moah]";
+					mes "Fromnow on,";
+					mes "everyone will you.";
+					close;
+				} else {
+					mes "[Habir Moah]";
+					mes "I'm sorry. If you have not prepared all the materials,";
+					mes "I won't do that for you.";
+					mes "I'll need Angel Wing, Elven Ears and";
+					mes "20000 zeny.";
+					mes "Can you please confirm that you have all of those?";
+					close;
+				}
+			case 2:
+				mes "[Habir Moah]";
+				mes "If you're interested in it in future,";
+				mes "do come and find me.";
+				mes " ";
+				mes "Ah, what a soothing breeze.";
+				close;
+			}
+		}
+	} else {
+		mes "[Habir Moah]";
+		mes "I am not sure how I have followed the wind,";
+		mes "that leads me to Juno...";
+		mes "Altough I don't really feel comfortable on a high place like this, the view here is really breath taking.";
+		mes "I never knew the sky could be so beautiful,";
+		mes "when I was travelling on the land.";
+		next;
+		mes "[Habir Moah]";
+		mes "Anyway, I am a craftman in nature...";
+		mes "I feel uneasy if I do not craft anything.";
+		mes "And it's been a while since my last creation.";
+		mes "If there're materials,";
+		mes "I'll surely create the best creation of my life.";
+		mes "Unfortunately, there weren't any. ...Hehe...";
+		next;
+		mes "[Habir Moah]";
+		mes "May I ask, do you have either Angel Wing,";
+		mes "Evil Wing or Elven Ear?";
+		mes "If you do, can you bring it to me?";
+		mes "I will help you to make a beautiful";
+		mes "Ears of Angel's Wing and Ears of Devil's Wing.";
+		next;
+		switch(select("Can you tell me about the details?:I'll consider about it.")) {
+		case 1:
+			mes "[Habir Moah]";
+			mes "Oh yes,";
+			mes "I need to tell you the details about the materials.";
+			mes "Angel Wing Ears requires ^4d4dffAngel Wings^000000 and";
+			mes "^4d4dffElven Ears^000000 &#1038;Aand the cost for other materials is";
+			mes "approximatedly ^4d4dff20000 zeny^000000";
+			next;
+			mes "[Habir Moah]";
+			mes "Devil Wing Ears requires ^4d4dffEvil Wing^000000 and";
+			mes "^4d4dffElven Ears^000000 &#1038;Awhile the cost for other materials is";
+			mes "approximately ^4d4dff20000 zeny";
+			next;
+			mes "[Habir Moah]";
+			mes "Please come to me after you have got all the materials.";
+			mes "I will make the joy of Angel and terror of Devil";
+			mes "as a present for you.";
+			close;
+		case 2:
+			mes "[Habit Moah]";
+			mes "I always look at thge sky at this location...";
+			mes "So if you need me, you know where to find me.";
+			close;
+		}
+	}
+}
+//Lutie /=Sea Otter Cap=/
+xmas.gat,183,267,3	script	Pretty Lindsay	793,{
+	if (countitem(5033) && countitem(5064)) {
+		delitem 5033,1;
+		delitem 5064,1;
+		mes "[Pretty Lindsay]";
+		mes "Wow~ you really have brought all the items here.";
+		mes "Hang on for a while~";
+		mes "Lindsay will make that for you right now.";
+		next;
+		mes "[Pretty Lindsay]";
+		mes "Just like what my mom taught me,";
+		mes "first, place this on the ground...";
+		mes "Preparation complete. . . .";
+		mes "Haya, yah!";
+		next;
+		misceffect 261;
+		mes "^FF0000Lindsay put the RaccoonHat on the ground,";
+		mes "and place the Smokie Leaf on top of it.";
+		mes "Then she say something that none could understand its meaning.";
+		mes "There's a bright glitter,";
+		mes "and the fur of the RaccoonHat slowly turns into blue color.";
+		mes "And finally, the shape of Smokie turns into Otter.";
+		next;
+		mes "[Pretty Lindsay]";
+		mes "Pheww! It's done!";
+		mes "It's so tiring I am feeling weak right now!";
+		mes "Here~ Take it~";
+		getitem 5078,1;
+		next;
+		mes "[Pretty Lindsay]";
+		mes "This is.. This is the best creation of Lindsay.";
+		mes "Remember to put it on always~";
+		mes "Farewell~";
+		close;
+	} else {
+		mes "[Pretty Lindsay]";
+		mes "Hi~ Wassup?";
+		if (sex) {
+			mes "Handsome boy.";
+		} else {
+			mes "Beautiful?";
+		}
+		next;
+		mes "[Pretty Lindsay]";
+		mes "Do you want to get a cute headgear?";
+		mes "Pretty Lindsay is going to create";
+		mes "a cap that looks like a Sea Otter this time.";
+		mes "How about that? It should be cute, ya?";
+		emotion e_heh; //ET_SMILE
+		next;
+		mes "[Pretty Lindsay]";
+		mes "Imagina that~ If you get to wear that hat,";
+		mes "you will have the feeling,";
+		mes "that you're like an Sea Otter.";
+		mes "If you can be like an Sea Otter.. Woah!";
+		mes "I am getting excited just by imagining it.";
+		next;
+		mes "[Pretty Lindsay]";
+		mes "However, production of ^4D4DFFSea-Otter Hat^000000 requires,";
+		mes "^0000FFRaccoonHat^000000 x1 ^0000FFSmokie Leaf^000000 x1";
+		mes "So, if you want to get a Sea-Otter Hat, brother,";
+		mes "just bring along the materials,";
+		mes "and Lindsay will make it for you immediately.";
+		next;
+		switch(select("I will come again when I have collected them.:Yo..why RaccoonHat?")) {
+		case 1:
+			mes "[Pretty Lindsay]";
+			mes "Hmm~ Come back soon~";
+			emotion e_heh; //ET_SMILE
+			close;
+		case 2:
+			mes "[Pretty Lindsay]";
+			mes "Ah..why Sea-Otter Hat production";
+			mes "requires Smokie Hat?";
+			mes "Hmm. .That's because. . . secrets.. .";
+			next;
+			mes "[Pretty Lindsay]";
+			mes "When you place Smokie Leaf with RaccoonHat,";
+			mes "and say the spell,";
+			mes "according to what my mom had taught, the RaccoonHat will";
+			mes "^003063Bang!!^000000 and turn into Sea-Otter Hat.";
+			next;
+			mes "[Pretty Lindsay]";
+			mes "But I don't know why it can be like that.";
+			mes "Mom never tell me the reason.";
+			next;
+			mes "["+strcharinfo(0)+"]";
+			mes ". . . . . . . . . . . . . . . . .";
+			next;
+			mes "["+strcharinfo(0)+"]";
+			mes "Ok..Ok, I will come again when I have collected all the items.";
+			close;
+		}
+	}
+}
+//Lutie /=Brown Bear Cap=/ [5059]
+xmas.gat,175,156,3	script	Fuzzy Fuzz	712,{
+	if (countitem(5030) && countitem(7213) > 99 && countitem(7217) > 99 && countitem(7161) > 299) {
+		delitem 5030,1;
+		delitem 7213,100;
+		delitem 7217,100;
+		delitem 7161,300;
+		mes "[Fuzzy Fuzz]";
+		mes "Good! You've brought it!";
+		mes "The production might take some time.";
+		mes "There's a lot of amendment to be done.";
+		mes "So, please wait for a while.";
+		next;
+		mes "[Fuzzy Fuzz]";
+		mes ". . . TutaTusa. . .";
+		mes "Pluck this off. . . .";
+		mes "Wuha!~ Sew it happily..";
+		mes "Wait a little longer.";
+		next;
+		mes "[Fuzzy Fuzz]";
+		mes "Didn't they say people who wait will be more lucky?";
+		mes "It's almost done. So wait for a little while.";
+		mes "Rub your hands if you feel cold.";
+		next;
+		mes "[Fuzzy Fuzz]";
+		mes "It is done!";
+		mes "I've made a cap that is suitable for you!";
+		mes "I know I made it, but it really looks nice.";
+		mes "I used a lot of efforts,";
+		mes "so please take good care of it.";
+		mes "Here~ Please take it with you~";
+		getitem 5059,1;
+		close;
+	} else {
+		mes "[Fuzzy Fuzz]";
+		if (sex) {
+			mes "Hey you, hold it right there!";
+		} else {
+			mes "Yoh miss, hold it right there.";
+		}
+		mes "You who look like a slow and dumb bear,";
+		mes "I have a cap that fits you,";
+		mes "how about that? do you want it?";
+		emotion e_omg; //ET_SURPRISE?
+		next;
+		mes "[Fuzzy Fuzz]";
+		mes "Haha.. Looks like you're not happy";
+		mes "because I said you look dumb, right?";
+		mes "How sensitive . . .";
+		mes "What I mean is, you're honest and easy to be tricked.";
+		mes "OkOk.. don't look at me like that.";
+		emotion e_sry; //ET_SORRY
+		next;
+		mes "[Fuzzy Fuzz]";
+		mes "I can't make the cap now because I do not have the materials.";
+		mes "Can you please.";
+		mes "find the materials for me?";
+		mes "I will help to make the 'Teddybear Hat' for you.";
+		next;
+		mes "[Fuzzy Fuzz]";
+		mes "Come, let me tell you about the required materials.";
+		mes "You won't need very much materials here.";
+		mes "^0000FFPanda Hat^000000 x1 ^0000FFNeedle Packet^000000 x100";
+		mes "^0000FFSpool^000000 x100 ^0000FFBlack Bear's Skin^000000 x300";
+		mes "That's all,";
+		mes "isn't that easy to be found?";
+		next;
+		mes "[Fuzzy Fuzz]";
+		mes "I will be waiting for you!";
+		emotion e_heh; //ET_SMILE
+		close;
+	}
+}
+//payon /=Cap of Concentration=/ [5073]
+payon_in03.gat,8,193,4	script	Nan Hyang	75,{
+	if (countitem(2285) && countitem(1550)) {
+		mes "[Nan Hyang]";
+		mes "Sigh, give that to me.";
+		mes "Before I start,";
+		mes "take note of this,";
+		mes "In the process of production ^FF0000'Model Training Hat'^000000,";
+		mes "If ^FF0000the 'Book' is slotted with card,";
+		mes "or possesses refined level^000000,";
+		emotion e_heh; //ET_SMILE
+		next;
+		mes "[Nan Hyang]";
+		mes "^FF0000the effect will dissappear,";
+		mes "Of course, the same goes to the 'Apple of Archer' too^000000.";
+		mes "So do you want me to make it now?";
+		next;
+		switch(select("Start making it:Wait, don't.")) {
+		case 1:
+			mes "[Nan Hyang]";
+			mes "Request accepted,";
+			mes "I will start it right now.";
+			mes "Please have a seat,";
+			mes "and wait for me, will you?";
+			mes "This is to make sure that you have the correct posture.";
+			mes "Don't worry, it's for free.";
+			emotion e_ok; //ET_OK
+			next;
+			mes "[Nan Hyang]";
+			mes "Please be patient!";
+			next;
+			mes ". . . . . . . . . . . . . . . . . .";
+			mes " . . . . . . . . . . . . . . . . . ";
+			mes ". . . . . . . . . . . . . . . . . .";
+			mes " . . . . . . . . . . . . . . . . . ";
+			next;
+			mes "[Nan Hyang]";
+			mes "This is not a hard task,";
+			mes "so it's going to be completed right away..";
+			mes "Please wear this hat,";
+			mes "to keep a correct posture.";
+			mes "Thank you!";
+			next;
+			mes "[Nan Hyang]";
+			mes "An apple is placed on the book,";
+			mes "keep it balanced and don't let is fall.";
+			mes "This is the reason to put on the 'Model Training Hat',";
+			mes "to keep the balance in order to keep the correct posture.";
+			emotion e_oh; //ET_AHA? =X
+			next;
+			mes "[Nan Hyang]";
+			mes "You might feel unconfortable and pain on your neck at the beginning.";
+			mes "But as you use it,";
+			mes "you will slowly found your posture going better.";
+			if (countitem(2285) && countitem(1550)) {
+				delitem 2285,1;
+				delitem 1550,1;
+				getitem 5073,1;
+			}
+			next;
+			mes "[Nan Hyang]";
+			mes "Here it is.";
+			mes "Please take it.";
+			mes "Ah.. Before I forget,";
+			mes "This is the Arrow taken from the Apple of Archer.";
+			mes "Please take it.";
+			getitem 1750,1;
+			next;
+			mes "[Nan Hyang]";
+			mes "Farewell then.";
+			mes "Have a balanced day.";
+			close;
+		case 2:
+			mes "[Nan Hyang]";
+			mes "Ah.. isn't this an item that requires a lot of equipments?";
+			mes "If you've fully prepared, come and find me.";
+			emotion e_hmm; //ET_THINK?
+			close;
+		}
+	} else {
+		mes "[Nan Hyang]";
+		mes "Good day.";
+		mes "This place teaches manners and posture.";
+		mes "May I know,";
+		mes "how can I help you here?";
+		emotion e_omg; //ET_SURPRISE?
+		next;
+		switch(select("I want to learn too . .:I'm sorry. I think I came to a wrong place.")) {
+		case 1:
+			mes "[Nan Hyang]";
+			mes "Oh, I see.";
+			mes "But how do I say this?";
+			mes "I'm really sorry,";
+			mes "we are not having any intake currently.";
+			next;
+			mes "[Nan Hyang]";
+			mes "And since the president is going outstation,";
+			mes "and we're not sure,";
+			mes "when he'll return,";
+			mes "(Phew..how long are you going to";
+			mes "stay in the in. . . .)";
+			next;
+			mes "[Nan Hyang]";
+			mes "Hmm, beofre you take the course of manners,";
+			mes "we have to correct";
+			mes "your unbalance posture first.";
+			mes "This means that,";
+			mes "a correct posture is a polite action.";
+			mes "That's what I think.";
+			next;
+			mes "[Nan Hyang]";
+			mes "Since it is quite impossible to correct your posture now,";
+			mes "I will let you correct it yourself.";
+			mes "The method is";
+			mes "to create a 'Model Training Hat',";
+			mes "for you.";
+			next;
+			mes "[Nan Hyang]";
+			mes "Do you want me to make this for you?";
+			mes "If you want it,";
+			mes "please take the materials required here.";
+			mes "Generally I can give it to you for free.";
+			mes "But there's no stock in the storage anymore.";
+			emotion e_hmm; //ET_QUESTION?
+			next;
+			mes "[Nan Hyang]";
+			mes "If you bring ^0000FFApple of Archer^000000 x1 and ^0000FFBook^000000 x1,";
+			mes "I will produce it,";
+			mes "and give the product to you.";
+			next;
+			mes "[Nan Hyang]";
+			mes "After you've get these items,";
+			mes "come and find me.";
+			mes "Farewell then.";
+			close;
+		case 2:
+			mes "[Nan Hyang]";
+			mes "Oh, I see.";
+			mes "This place should be kept silent.";
+			mes "If you do not have any important matters,";
+			mes "can you please go out? Thank you.";
+			mes "Good byethen. . .";
+			close;
+		}
+	}
+}
+//geffen /=Tulip Hairpin=/
+geffen.gat,83,189,5	script	Ses	716,{
+	mes "[Ses]";
+	mes "My name is Ses.";
+	mes "Ses like to fold paper.";
+	mes "I used a big colorful paper to make a huge boat for mummy yesterday.";
+	mes "She thank me and touch my head, hehe.";
+	emotion e_heh; //ET_SMILE
+	next;
+	mes "[Ses]";
+	mes "Today, the teacher teaches us the method to make beautiful flower!!!";
+	mes "Altough it's a little bit hard~ it's very interesting~";
+	mes"The flower is beautiful when you put it on your head. Everyone tell me so, and I'm so happy!";
+	emotion e_heh; //ET_THROB?=X
+	next;
+	if (countitem(2278) && countitem(975)) {
+		mes "[Ses]";
+		mes "Hehe- Mr. Smile!! Scarlet Dyestuffs!!!";
+		mes "WuYeaghhhhh---";
+		mes "Come, let me";
+		mes "help you make a beautiful flower !!";
+		emotion e_swt; //ET_SWEAT
+		next;
+		mes "[Ses]";
+		mes "Let me make it for you, ok? Ok????";
+		emotion e_swt;
+		next;
+		switch(select("Allow you to do so:I reject")) {
+		case 1:
+			mes "[Ses]";
+			mes "Wahahahaha~";
+			emotion e_heh;
+			next;
+			mes "[Ses]";
+			mes "Take this Mr Smile,";
+			mes "cut here a little, cut there some~~";
+			mes "and a little there, and here....";
+			mes "yiyik...";
+			emotion e_ho; //ET_DELIGHT?
+			next;
+			mes "[Ses]";
+			mes "Ha- !! It's done!!!!";
+			if (countitem(2278) && countitem(975)) {
+				delitem 2278,1;
+				delitem 975,1;
+				getitem 5077,1;
+			}
+			next;
+			mes "[Ses]";
+			mes "Hehe, it's done,";
+			mes "How about it? Cute, isn't it? Right?";
+			next;
+			mes "[Ses]";
+			mes "Am I good?";
+			mes "Hehe, I am making one for my bother too.";
+			mes "You need one, brother.";
+			mes "come and find me again if you want me to make a beautiful flower again.";
+			mes "Good bye then~";
+			close;
+		case 2:
+			mes "[Ses]";
+			mes "Yiyee~~ I don't need to help you do it again then!!";
+			close;
+		}
+	} else {
+		mes "[Ses]";
+		mes "Do you want to make on too, big brother?";
+		mes "I will teach you... hehehe";
+		next;
+		mes "[Ses]";
+		mes "However, you need to prepare some items,";
+		mes "because I don't have anything now.";
+		mes "Can you bring it to me, big brother?";
+		next;
+		switch(select("Sure:No")) {
+		case 1:
+			mes "[Ses]";
+			mes "So please bring,";
+			mes "^3131FFMr. Smile x1";
+			mes "Scarlet Dyestuffs x1^000000";
+			mes "I will make a beautiful red flower for you.";
+			next;
+			mes "[Ses]";
+			mes "I will wait for you here. Remember to come, ok!?";
+			close;
+		case 2:
+			mes "[Ses]";
+			mes "Hooyeahyeahyeah~~~~~";
+			emotion e_sob;
+			close;
+		}
+	}
+}
+//Lutie /=Party Hat, Straw Hat, Cowboy Hat, Sombrero and Fur hat=/
+xmas_in.gat,35,30,3	script	Headgear Merchant	797,{
+	mes "[Mike]";
+	mes "I like hats...";
+	mes "I like hats more than any other thing in this world!!";
+	mes "Even if you compared hats with eating,";
+	mes "wearing a new hat is far more important";
+	next;
+	mes "[Mike]";
+	mes "Hat, Cap, Holy Bonnet,";
+	mes "Turban, Iron Helm,";
+	mes "Hemmed Sallet, Munak Turban...";
+	mes "I like them all!!";
+	mes "(Wuhoo! Wuhoohoo!!)";
+	next;
+	mes "[Mike]";
+	mes "I have learned the way to modified a hat,";
+	mes "and I am researching";
+	mes "to design the most fashionable hat.";
+	next;
+	switch(select("Party Hat:Straw Hat:Cowboy Hat:Sombrero:Fur Hat")) {
+	case 1: //Party hat [5060]
+		if(countitem(2236) && countitem(7151) > 99 && countitem(7111) > 99) {
+			mes "[Mike]";
+			mes "Party Hat! It is made according to the Santa's Hat,";
+			mes "decorated with some papers.";
+			mes "This is the best Party Hat!! Do you want it?";
+			mes "(Ohhhh, beautiful! So beautiful!)";
+			next;
+			mes "[Mike]";
+			mes "Wait, before I start the production, let's confirm this.";
+			mes "I will use items regarless of whether,";
+			mes "it had been refined or slotted with cards.";
+			mes "So you better just prepare the items required,";
+			mes "and put the others in the storage.";
+			next;
+			mes "[Mike]";
+			mes "You've brought all the materials...";
+			mes "Great! The one who wants a Party Hat,";
+			mes "do you want me to make it for you right now?";
+			next;
+			switch(select("No:Yes")) {
+			case 1:
+				mes "[Mike]";
+				mes "Hmm, is that so...";
+				mes "Let keep wearing your Santa's Hat then.";
+				mes "Hmmmhmmmhmmm....";
+				close;
+			case 2:
+				mes "^3355FFDeteDete ChebenCheben";
+				mes "PotterPotter MeganMegan";
+				mes "PosongPosong ShahaShaha";
+				next;
+				if(countitem(2236) && countitem(7151) > 99 && countitem(7111) > 99) {
+					delitem 2236,1;
+					delitem 7151,100;
+					delitem 7111,100;
+					getitem 5060,1;
+				}
+				mes "[Mike]";
+				mes "Very Good!";
+				mes "Force the birthday fellow to put this on,";
+				mes "then you can play tricks on him. That should be fun...";
+				mes "Please come again too next time~";
+				next;
+				mes "[Mike]";
+				mes "And, this is what's left after the process.";
+				mes "Here, take it!";
+				mes "Maybe it might be useful to you... (Hehehehe)";
+				getitem 949,10;
+				close;
+			}
+		} else {
+			mes "[Mike]";
+			mes "Party Hat! It's a necessity,";
+			mes "for anyone who throws a birthday party.";
+			mes "No matter how serious looking one is,";
+			mes "the hat will make him look cute and funny!";
+			next;
+			mes "[Mike]";
+			mes "In my opinion, it is suitable not only for birthday,";
+			mes "but as well as entertaining event!";
+			mes "This beautiful hat is just suitable for fun.";
+			mes "(...How about organizing a party for adventure?!?)";
+			next;
+			mes "[Mike]";
+			mes "Anyway, the material required are";
+			mes "^3355FFSanta's Hat^000000 x1";
+			mes "^3355FFOil Paper^000000 x100";
+			mes "^3355FFSlick Paper^000000 x100";
+			next;
+			mes "[Mike]";
+			mes "These are what I need.";
+			mes "So don't forget to collect the material, ok?";
+			mes "I will always be around....";
+			mes "So come back only after you have collected them!";
+			close;
+		}
+	case 2: //Straw Hat [5062]
+		if(countitem(2280) && countitem(7197) > 299 && countitem(7150) > 299) {
+			mes "[Mike]";
+			mes "Straw Hat! This hat is based on Sahkkat,";
+			mes "that is make of bamboo and rattan.";
+			mes "Wearing it makes you think that you're going to have a good harvesting year!";
+			mes "(Look, power of farmer!!)";
+			next;
+			mes "[Mike]";
+			mes "Wait, before I start the production, let's confirm this.";
+			mes "I will use items regardless of whether";
+			mes "it had been refined or slotted with cards.";
+			mes "So you better just prepare the items required,";
+			mes "and put the others in the storage.";
+			next;
+			mes "[Mike]";
+			mes "You've brought all the materials...";
+			mes "Great! The one who wants a Straw Hat,";
+			mes "do you want me to make it for you right now?";
+			next;
+			switch(select("No, thanks:Sure")) {
+			case 1:
+				mes "[Mike]";
+				mes "Hmm, is that so...";
+				mes "Let keep wearing your Sahkkat then.";
+				mes "Hmmmhmmmhmmm....";
+				close;
+			case 2:
+				mes "^3355FFSakaSaka WakaWaka";
+				mes "JekaJeka HuyiHuyi";
+				mes "PokaPoka TewuTewu^000000";
+				next;
+				if(countitem(2280) && countitem(7197) > 299 && countitem(7150) > 299) {
+					delitem 2280,1;
+					delitem 7197,300;
+					delitem 7150,300;
+					getitem 5062,1;
+				}
+				mes "[Mike]";
+				mes "HmmHmm! It feels that the harvest of this year shall be good!";
+				mes "I hope next year will be the same too...";
+				mes "Ahahaha, what am I talking about...";
+				mes "Please come again if you want more~";
+				close;
+			}
+		} else {
+			mes "[Mike]";
+			mes "Staw Hat! It gives you energy to work,";
+			mes "even under the heat of the sun";
+			mes "as well as providing shades that give you a cool feeling.";
+			mes "This hat will make you hope for a good harvest this year too!";
+			next;
+			mes "[Mike]";
+			mes "This hat is suitable for the farmers,";
+			mes "who want to plant or cultivate their crops.";
+			mes "You have the feel of a villager when you wear it!";
+			mes "(For your info, I am a city kid!)";
+			next;
+			mes "[Mike]";
+			mes "Anyway, the materials required for production are";
+			mes "^3355FFSakkat^000000 x1";
+			mes "^3355FFTough Vines^000000 x300";
+			mes "^3355FFPiece of Bamboo^000000 x300";
+			next;
+			mes "[Mike]";
+			mes "These are what I need.";
+			mes "So don't forget to collect all the material, ok?";
+			mes "I will always be around....";
+			mes "So come back only after you have collected them!";
+			close;
+		}
+	case 3: //Cowboy Hat [5075]
+		if (countitem(2248) && countitem(7030) > 107 && countitem(7194) > 107 && countitem(7120) > 3) {
+			mes "[Mike]";
+			mes "Cowboy Hat! A hat of western feel,";
+			mes "but looks toughet than Western Grace,";
+			mes "That is suitable for the western's males!";
+			mes "(Qiang... Yeehahaa~...)";
+			next;
+			mes "[Mike]";
+			mes "Wait, before I start the production, let's confirm this.";
+			mes "I will use item regardless of wether";
+			mes "It had been refined or slotted with cards.";
+			mes "So you better just prepare the items required,";
+			mes "and put the others in the storage.";
+			next;
+			mes "[Mike]";
+			mes "You've brought all the materials...";
+			mes "Great! The one who wants a Cowboy Hat,";
+			mes "do you want me to make it for you right now?";
+			switch(select("No:Yes")) {
+			case 1:
+				mes "[Mike]";
+				mes "Hmm,is that so...";
+				mes "Let keep wearing your typical Western Grace then.";
+				mes "Hmmmhmmmhmmm....";
+				close;
+			case 2:
+				mes "^3355FFDudududu bangbangbangbang";
+				mes "TadamTadam BiyongBiyong";
+				mes "Wuuuuu Ahwuwuwuwuw^000000";
+				next;
+				if (countitem(2248) && countitem(7030) > 107 && countitem(7194) > 107 && countitem(7120) > 3) {
+					delitem 2248,1;
+					delitem 7030,108;
+					delitem 7194,108;
+					delitem 7120,4;
+					getitem 5075,1;
+				}
+				mes "[Mike]";
+				mes "HeeeHaH! With that";
+				mes "you can tame even the wildest stiallion!";
+				mes "Please come again if you need more~";
+				close;
+			}
+		} else {
+			mes "[Mike]";
+			mes "Cowboy Hat!A hat of western feel,";
+			mes "where you seem to found the boiling blood of the cowboys...";
+			mes "It's as if you are going to draw something out,";
+			mes "and start shooting!";
+			next;
+			mes "[Mike]";
+			mes "The Cowboy Hat with thefeel of opening a barren land...";
+			mes "It makes guys look cool!";
+			mes "and it makes gals look prettier";
+			mes "(Is tought the new concept of beauty...?)";
+			next;
+			mes "[Mike]";
+			mes "Anyway, the materials required for production are";
+			mes "^3355FFWestern Grace^000000 x1";
+			mes "^3355FFClaw of Desert Wolf^000000 x108";
+			mes "^3355FFSoft Blade of Grass^000000 x108";
+			mes "^3355FFBurning Horseshoe^000000 x4";
+			next;
+			mes "[Mike]";
+			mes "These are what I need.";
+			mes "So don't forget to collect the material, ok?";
+			mes "I will always be around....";
+			mes "So come back only after you have collected them!";
+			close;
+		}
+	case 4: //Sombrero [5067]
+		if (countitem(5062) && countitem(952) > 49 && countitem(1907)) {
+			mes "[Mike]";
+			mes "SipoleiyeahhhhhhWoohohoh!!";
+			mes "Amigo! Adios Amigo!";
+			mes "If you like the sun and happy melody,";
+			mes "this is the right hat for you!!";
+			next;
+			mes "[Mike]";
+			mes "Wait, before I start the production, let's confirm this.";
+			mes "I will use items regardless of wether";
+			mes "it had been refined or slotted with cards.";
+			mes "So you better just prepare the items required";
+			mes "and put the others in the storage";
+			next;
+			mes "[Mike]";
+			mes "You've brought all the materials...";
+			mes "Great! The one who wants a Sombrero,";
+			mes "so you want me to make if for you right now?";
+			switch(select("No:Yes")) {
+			case 1:
+				mes "[Mike]";
+				mes "Hmmm, is that so...";
+				mes "Let keep wearing your shady Straw Hat then.";
+				mes "Hmmmhmmmhmmm....";
+				close;
+			case 2:
+				mes "^3355FFQingkaQinka KiangggQiangkiang";
+				mes "Diringringling kaciangkaciang";
+				mes "Adios Mamamiya^000000";
+				next;
+				if (countitem(5062) && countitem(952) > 49 && countitem(1907)) {
+					delitem 5062,1;
+					delitem 952,50;
+					delitem 1907,1;
+					getitem 5067,1;
+				}
+				mes "[Mike]";
+				mes "If you wear this to the desert,";
+				mes "you'll be Muka's friend too!! Full with joyous tempo and heat!!";
+				mes "Please come again if you want more~";
+				close;
+			}
+		} else {
+			mes "[Mike]";
+			mes "Yibayiba, andeleh andeleh!!";
+			mes "Amigo! Adios, Amigo!";
+			mes "Come again, Morocc!";
+			mes "Astalacista Baby!";
+			next;
+			mes "[Mike]";
+			mes "For you who like the sun and loud music!!";
+			mes "I present you with";
+			mes "the tri-level hat, Sombrero!!";
+			mes "(From Yggdrasil tree trill here!?)";
+			next;
+			mes "[Mike]";
+			mes "Anyway, the materials required for production are";
+			mes "^3355FFStraw Hat^000000 x1,";
+			mes "^3355FFCactus Needle^000000 x50,";
+			mes "^3355FFGuitar^000000 x1";
+			next;
+			mes "[Mike]";
+			mes "These are what I need";
+			mes "So don't forget to collect the material, ok?";
+			mes "I will always be around....";
+			mes "So come back only after you have collected them!";
+			close;
+		}
+	case 5: //fur hat [5076]
+		if (countitem(2226) && countitem(7038) > 499) {
+			mes "[Mike]";
+			mes "Fur Hat! Yo, Man! Check it out!";
+			mes "It's good for keeping warm! But it's fashionable too!";
+			mes "Even if you went to places as cold as Lutie,";
+			mes "you will be ok with this Beanie!!";
+			next;
+			mes "[Mike]";
+			mes "Wait, before I start the productions, let's confirm this.";
+			mes "I will use items regardless of wether";
+			mes "it had been refined or slotted with cards.";
+			mes "So you better just prepare the items required,";
+			mes "and put the others in the storage.";
+			next;
+			mes "[Mike]";
+			mes "You've brought all the materials...";
+			mes "Great! The one who wants a Beanie,";
+			mes "do you want me to make it for you right now?";
+			next;
+			switch(select("No:Yes")) {
+			case 1:
+				mes "[Mike]";
+				mes "Hmm, is that so...";
+				mes "Let keep wearing your Cap that is produce in bundles then.";
+				mes "Hmmmhmmmhmmm....";
+				close;
+			case 2:
+				mes "^3355FFKafokapo Kafokapo";
+				mes "poterpote poterpote";
+				mes "PosongPosong PosongPosong";
+				next;
+				if (countitem(2226) && countitem(7038) > 499) {
+					delitem 2226,1;
+					delitem 7038,500;
+					getitem 5076,1;
+				}
+				mes "[Mike]";
+				mes "Complete! The nicely knitted,";
+				mes "cute white hat! Yeat! Go Go!";
+				mes "Please come again if you need more~";
+				close;
+			}
+		} else {
+			mes "[Mike]";
+			mes "Beanie! Gimme a chocolate!! Right!";
+			mes "No matter who wears it,";
+			mes "you will feel the snowy winter!! Event if you are from Morocc,";
+			mes "you will look more like a traveller from Lutie if you put that on!";
+			next;
+			mes "[Mike]";
+			mes "There was a rumor";
+			mes "people wearing it will pull out his hard and shout Yo without knowing it-";
+			mes "I think we better change a topic...";
+			mes "(Hot weather, the head can't stand the heat?!?)";
+			next;
+			mes "[Mike]";
+			mes "Anyway, the material required for production are";
+			mes "^3355FFCap^000000 x1,";
+			mes "^3355FFYarn^000000 x500.";
+			next;
+			mes "[Mike]";
+			mes "These are what I need.";
+			mes "So don't forget to collect the material, ok?";
+			mes "I will always be around....";
+			mes "So come back only after you have collected them!";
+			close;
+		}
+	}
+}
+//Yuno /=Big Golden Bell, Headgear of Queen and Mistress Crown=/
+yuno_in03.gat,20,18,6	script	Neris	726,{
+	mes "[Neris]";
+	mes "This time,";
+	mes "as a gratitude of everyone's support to the Museum,";
+	mes "we have prepared a special item,";
+	mes "That is ...!";
+	next;
+	mes "[Neris]";
+	mes "If an accessoiries for monsters is reconstructed, it can be equipped by human too!";
+	next;
+	mes "[Neris]";
+	mes "We are in the experimenting stage currently,";
+	mes "and there're only 3 type of monster's accesories that can be equipped.";
+	mes "Maybe there're more to come in the future.";
+	mes "However,";
+	mes "we cannot provide these accessories to everyone without limit.";
+	mes "We would like to ask for the materials and production fee,";
+	mes "before we can provide the accessories to you.";
+	next;
+	mes "[Neris]";
+	mes "Please select an accessoiries that you are curious of, or wich us to produce for you.";
+	next;
+	switch(select("Decorative Golden Bell:Crown of Ancient Queen:Crown of Mistress")) {
+	case 1: //Big golden bell [5091]
+		mes "[Neris]";
+		mes "The Decorative Golden Bell is";
+		mes "the accessory equipped by the monster 'Sohee'.";
+		mes "It's very suitable and looks good on female players.";
+		mes "Altough it might be a little big, I'm sure you'll like it.";
+		next;
+		if (countitem(10016) && countitem(714) && countitem(969) > 2 && Zeny > 19999) {
+			delitem 10016,1;
+			delitem 714,1;
+			delitem 969,3;
+			set Zeny,Zeny-20000;
+			mes "[Neris]";
+			mes "So you have brought all the required materials.";
+			mes "Please wait for a while.";
+			next;
+			mes "^3355FF- Dang Dang! Qing Yi Qing Yi! Ding Ding Dang Dang! -^000000";
+			getitem 5091,1;
+			next;
+			mes "[Neris]";
+			mes "EEyaah~ The elegant golden bell is complete.";
+			mes "Walk around with it.";
+			mes "Altough it won't make the ding dong sounds,";
+			mes "it sure is beautiful.";
+			next;
+			mes "[Neris]";
+			mes "Don't you feel that you look like a Sohee now?";
+			mes "But don't commit suicide like her.";
+			mes "If you want to make anymore of it,";
+			mes "do come and find me again.";
+			mes "Finally, please come to visit the Monster Museum frequently.";
+			close;
+		} else {
+			mes "[Neris]";
+			mes "The material required for the production of this item are,";
+			mes "^3355FFGolden Bell x1, Emperium x1, Gold x3^000000 and";
+			mes "20,000 zeny";
+			next;
+			mes "[Neris]";
+			mes "As long as you are prepared,";
+			mes "with the materials and zeny required for the production,";
+			mes "I will make it for you anytime.";
+			close;
+		}
+	case 2: //Headgear of Queen [5080] (Crown of ancient queen)
+		mes "[Neris]";
+		mes "The Crown of Ancient Queen is the equipment of";
+		mes "monster 'Isis'.";
+		mes "When you wear it,";
+		mes "you will feel like a queen.";
+		next;
+		if (countitem(10006) && countitem(714) && countitem(969)>2 && Zeny>19999) {
+			delitem 10006,1;
+			delitem 714,1;
+			delitem 969,3;
+			set Zeny,Zeny-20000;
+			mes "[Neris]";
+			mes "So you have brought all the required materials.";
+			mes "Please wait for a while.";
+			next;
+			mes "^3355FF- Dang Dang! Qing Yi Qing Yi! Ding Ding Dang Dang! -";
+			getitem 5080,1;
+			next;
+			mes "[Neris]";
+			mes "Here it is! The Crown of Ancient Queen!";
+			mes "Altough you won't become a real queen after wearing it,";
+			mes "you will surely";
+			mes "have a different feeling.";
+			next;
+			mes "[Neris]";
+			mes "After you wear this,";
+			mes "I think you should really have a good figure,";
+			mes "because that will be more meaningful.";
+			mes "If you need to make it again,";
+			mes "do come find me again.";
+			mes "Finally, please come to visit the Monster Museum frequently.";
+			close;
+		} else {
+			mes "[Neris]";
+			mes "The materials required for the production are";
+			mes "^3355FFQueen's Hair Ornament x1, Emperium x1, Gold x3^000000 and";
+			mes "20,000 zeny.";
+			next;
+			mes "[Neris]";
+			mes "As long as you are prepared";
+			mes "with the materials and zeny required for the production";
+			mes "I will make it for you anytime.";
+			close;
+		}
+	case 3: //crown of mistress [5081]
+		mes "[Neris]";
+		mes "Crown of Mistress is";
+		mes "brought by monster 'Mistress'."; //Maya? riiiight!
+		mes "You can feel the precence of Mistress from it.";
+		next;
+		if (countitem(2249) && countitem(714) && countitem(969)>2 && Zeny>39999) {
+			mes "[Neris]";
+			mes "So you have brought everything.";
+			mes "^FF0000However, during the process of production,";
+			mes "no matter how many times";
+			mes "the coronet is refined,";
+			mes "it does not have effect to the product.";
+			next;
+			mes "[Neris]";
+			mes "^FF0000So,";
+			mes "please bring along only the Coronet x 1 that is required for the production.";
+			mes "If anything is missing,";
+			mes "we will not take responsible of it.^000000";
+			mes "So, are you ready?";
+			next;
+			switch(select("Yes, I am.:Hold on, please")) {
+			case 1:
+				mes "[Neris]";
+				mes "Please wait for a while.";
+				next;
+				mes "^3355FF- Dang Dang! Qing Yi Qing Yi! Ding Ding Dang Dang! -";
+				if (countitem(2249) && countitem(714) && countitem(969)>2 && Zeny>39999) {
+					delitem 2249,1;
+					delitem 714,1;
+					delitem 969,3;
+					set Zeny,Zeny-40000;
+					getitem 5081,1;
+				}
+				next;
+				mes "[Neris]";
+				mes "Woohoo!";
+				mes "The beautiful Crown of Mistress is completed.";
+				mes "Altough you won't have any servants,";
+				mes "after you've worn it,";
+				mes "I am sure you're having a different feeling.";
+				next;
+				mes "[Neris]";
+				mes "If you wear this crown,";
+				mes "and takea photo with Mistress,";
+				mes "it will be very interesting.";
+				mes "If you want to make anymore of it,";
+				mes "do come find me again.";
+				mes "Finally, please come to visit the Monster Museum frequently.";
+				close;
+			case 2:
+				mes "[Neris]";
+				mes "Please confirm it first";
+				mes "before you come to me~";
+				close;
+			}
+		} else {
+			mes "[Neris]";
+			mes "The materials required for production are";
+			mes "^3355FFCoronet x1, Emperium x1, Gold x3^000000 together with";
+			mes "40,000 zeny.";
+			next;
+			mes "[Neris]";
+			mes "As long as you are prepaired";
+			mes "with the materials and zeny required for the production,";
+			mes "I will make it for you anytime.";
+			close;
+		}
+	}
+}
+//Aldebaran /=Alarm Mask=/
+//Effects: EF_BLASTMINE: 106
+//EF_FLASHER:99
+alde_alche.gat,88,180,1	script	Muscle Man#Alarm	1193,{
+end;
+}
+alde_alche.gat,88,180,1	script	Muscle Man#Masked Alarm	748,{
+	mes "[Muscle Man]";
+	mes "Muscle, muscle. I like it. Hehe!!";
+	mes "What a beautiful robotic muscle!";
+	misceffect 99;
+	disablenpc "Muscle Man#Masked Alarm";
+	enablenpc "Muscle Man#Alarm";
+	enablenpc "#Masked Alarm1";
+	enablenpc "#Masked Alarm2";
+	enablenpc "#Masked Alarm3";
+	enablenpc "#Masked Alarm4";
+	donpcevent "#Masked Alarm1::OnBlast";
+	donpcevent "#Masked Alarm2::OnBlast";
+	donpcevent "#Masked Alarm3::OnBlast";
+	donpcevent "#Masked Alarm4::OnBlast";
+	next;
+	disablenpc "Muscle Man#Alarm";
+	enablenpc "Muscle Man#Masked Alarm";
+	if (countitem(2288) && countitem(1095) > 2999) {
+		switch(select("Give him the item:End")) {
+		case 1:
+			mes "You found... You found it. You really found it!";
+			mes "That's great! That's so great!";
+			next;
+			mes "[Muscle Man]";
+			mes "Yes... From today onwards, the Clock Hand and Mr. Scream are mine! My Precious!";
+			next;
+			mes "[Muscle Man]";
+			mes "And this, this shall be your precious.";
+			if (countitem(2288) && countitem(1095) > 2999) {
+				delitem 1095,3000;
+				delitem 2288,1;
+				getitem 5086,1;
+			}
+			next;
+			mes "[Muscle Man]";
+			mes "Good... Good bye! If you find more, remember to bring it here!!";
+			donpcevent "#Masked Alarm1::OnBlast";
+			donpcevent "#Masked Alarm2::OnBlast";
+			donpcevent "#Masked Alarm3::OnBlast";
+			donpcevent "#Masked Alarm4::OnBlast";
+			disablenpc "#Masked Alarm1";
+			disablenpc "#Masked Alarm2";
+			disablenpc "#Masked Alarm3";
+			disablenpc "#Masked Alarm4";
+			close;
+		case 2:
+			mes "[Muscle Man]";
+			mes "Hmm? Do you have anything to say to me?";
+			mes "I smell something. Isn't that the nice smell of the grease from Mr. Alarm that I sense now?";
+			donpcevent "#Masked Alarm1::OnBlast";
+			donpcevent "#Masked Alarm2::OnBlast";
+			donpcevent "#Masked Alarm3::OnBlast";
+			donpcevent "#Masked Alarm4::OnBlast";
+			disablenpc "#Masked Alarm1";
+			disablenpc "#Masked Alarm2";
+			disablenpc "#Masked Alarm3";
+			disablenpc "#Masked Alarm4";
+			close;
+		}
+	} else {
+		mes "[Muscle Man]";
+		mes "This is the item created by 'Loui Meato' that is attached to the arms and legs of Alarm.";
+		mes "This is the ancient technique that can be found in the Clock Tower.";
+		next;
+		mes "[Muscle Man]";
+		mes "If there's any skill to shrink this thing, 'Loui Meato' can be used by everyone soon!";
+		next;
+		mes "[Muscle Man]";
+		mes "Although I've lost my arm and legs in an alchemy accident, but if I can make this technique for public, it will benefit a lot of people!";
+		next;
+		mes "[Muscle Man]";
+		mes "Therfore... I want to ask you";
+		mes "Do you have the will to help my in this research?";
+		next;
+		mes "[Muscle Man]";
+		mes "The material is not enough. I want the Alarm's ^0000FFClock Hand^000000 and that strange ^0000FFMr. Scream^000000 that is said to look like the mask of Alarm.";
+		mes "It will help a lot if you have those things.";
+		next;
+		mes "[Muscle Man]";
+		mes "However, when I saw the Alarm in the Clock Tower, I will be fascinated by the great work on the creature's mechanical parts that is so brilliantly designed and manifactured.";
+		mes "I've forgotten everything, including the materials required for the research.";
+		next;
+		mes "[Muscle Man]";
+		mes "I am telling you this, to give you the opportunity to help me.";
+		mes "So how about that? Do you wish to help me? The price is the Mask of Alarm that looks really good! It's a very important thing, you know?";
+		next;
+		donpcevent "#Masked Alarm1::OnBlast";
+		donpcevent "#Masked Alarm2::OnBlast";
+		donpcevent "#Masked Alarm3::OnBlast";
+		donpcevent "#Masked Alarm4::OnBlast";
+		disablenpc "#Masked Alarm1";
+		disablenpc "#Masked Alarm2";
+		disablenpc "#Masked Alarm3";
+		disablenpc "#Masked Alarm4";
+		switch(select("I will help you:............")) {
+		case 1:
+		case 2:
+			mes "[Muscle Man]";
+			mes "Ohohoh! You agree that Mr. Alarm is beautiful too!";
+			mes "Good, good!";
+			next;
+			mes "[Muscle Man]";
+			mes "What I want is, ^0000FFClock Hand x3000^000000 and";
+			mes "^0000FFMr. Scream x1 ^000000";
+			mes "With these items, I will be able to reasearch the fascinating parts of Mr. Alarm.";
+			next;
+			mes "[Muscle Man]";
+			mes "I have said before. If you're able to find these things, I will give you Mr. Alarm's Mask.";
+			mes "You will have the chance to wear ^0000FFAlarm's Mask^000000!";
+			next;
+			mes "[Muscle Man]";
+			mes "Go! Go and find them now!";
+			mes "Follower of Mr Alarm.";
+			mes "The researcher of 'Loui Meato'.";
+			mes "He who wants to be Mr. Alarm!";
+			close;
+		}
+	}
+OnInit:
+	disablenpc "#Masked Alarm1";
+	disablenpc "#Masked Alarm2";
+	disablenpc "#Masked Alarm3";
+	disablenpc "#Masked Alarm4";
+	disablenpc "Muscle Man#Alarm";
+	end;
+}
+alde_alche.gat,86,184,3	script	#Masked Alarm1	1193,{
+end;
+OnBlast:
+misceffect 106;
+end; }
+alde_alche.gat,89,184,3	script	#Masked Alarm2	1193,{
+end;
+OnBlast:
+misceffect 106;
+end; }
+alde_alche.gat,92,184,3	script	#Masked Alarm3	1193,{
+end;
+OnBlast:
+misceffect 106;
+end; }
+alde_alche.gat,95,184,3	script	#Masked Alarm4	1193,{
+end;
+OnBlast:
+misceffect 106;
+end; }
+//Morocc /= Drooping Kitty, Huge Leaf, Lazy Smokie and Blue Fish =/
+morocc.gat,273,79,4	script	Traveler	99,{
+	function creation_lines {
+	 	mes "[Human]";
+		mes "Ah....So do you have all of it?";
+		mes "Haha";
+		mes "What an opportunity for me to show my skill.";
+		mes "Please wait for a moment.";
+		mes "....";
+		next;
+		next;
+		mes "SiwuSiwu...";
+		next;
+		mes "SiwuSiwu...";
+		mes "DudaTeda...";
+		next;
+		mes "SiwuSiwu...";
+		mes "DudaTeda...";
+		mes "ChepoChepo....";
+		next;
+		mes "SiwuSiwu...";
+		mes "DudaTeda...";
+		mes "ChepoChepo....";
+		mes "HuizheHuizhe.....";
+		mes "I think I heard some strange noises.";
+		next;
+		mes "[Human]";
+		mes "Uhoh, can you wait for a while?";
+		mes "It's almost done.";
+		mes "............";
+		next;
+		mes "HeniHeniHeni...";
+		mes "............";
+		next;
+		mes "HeniHeniHeni...";
+		mes "KodeKode...";
+		mes "............";
+		next;
+		mes "[Human]";
+		mes "Ah, finally it is done.";
+		mes "I have not done this too long.";
+		mes "So it takes a little longer then I expect.";
+		mes "Haha";
+		next;
+		mes "[Human]";
+		mes "Now, here it is.";
+		mes "I rarely feel this happy.";
+		mes "Ah, I will take the claw too.";
+		mes "Just think of it as ... some process fee.";
+		mes "Haha....";
+		return;
+	}
+
+	if(countitem(7030)) {
+		mes "[Human]";
+		mes "Ah....";
+		mes "Claw of the Desert Wolf...";
+		mes "You have this...";
+		mes "This is the true symbol of Desert.";
+		mes "Haha...";
+		mes "It's been a while since I saw this last time.";
+		mes "It really makes me feel reenergized!";
+		next;
+		mes "[Human]";
+		mes "Haha... You have let me see a great thing.";
+		mes "And I am going to pay you back!";
+		mes "I have traveled to a lot of places,";
+		mes "and learn to create a lot of things.";
+		mes "May I know what do you wnat?";
+		next;
+		mes "[Human]";
+		mes "Oh yes..."; //here we go again =3
+		mes "If your equipment has been refined";
+		mes "or slotted with cards,";
+		mes "^FF0000the level of refines and cards will dissapear too.^000000";
+		mes "So please confirm the item you require.";
+		next;
+		switch(select("Drooping Cat:Smokie Leaf:Lazy Smokie:Blue Fish:There's nothing that I like.")) {
+		case 1:
+			if (countitem(2233) && countitem(983) && countitem(7206) > 299 && countitem(7030)) {
+				delitem 2233,1;
+				delitem 983,1;
+				delitem 7206,300;
+				delitem 7030,1;
+				creation_lines;
+				getitem 5058,1;
+				close;
+			} else {
+				mes "[Human]";
+				mes "Ah, you want the Drooping Cat.";
+				mes "Well,";
+				mes "I can make that for you,";
+				mes "but you will have to gather the required materials by yourself.";
+				mes "I heard that it is not easy to find the materials.";
+				next;
+				mes "[Human]";
+				mes "They are..";
+				mes "^FF0000One slot circlet^000000 and";
+				mes "^FF0000Black Dyestuff x1^000000";
+				mes "plus ^FF0000Black Cat Doll x 300^000000.";
+				mes "This is all you need.";
+				mes "If you bring them to me, I will make the Cat for you.";
+				close;
+			}
+		case 2: //Smokie Leaf [5064]
+			if (countitem(945) > 599 && countitem(7030)) {
+				delitem 945,600;
+				delitem 7030,1;
+				creation_lines;
+				getitem 5064,1;
+				close;
+			} else {
+				mes "[Human]";
+				mes "Ah, so you want the Smokie Leaf.";
+				mes "Well,";
+				mes "I can make that for you,";
+				mes "but you will have to";
+				mes "gather the required materials by yourself.";
+				mes "I heard that it is not easy to find the materials.";
+				next;
+				mes "[Human]";
+				mes "This item ..";
+				mes "requires ^FF0000Raccoon Leaf x600^000000 ";
+				mes "It might be a lot, but I'm sure you can get it, can't you?";
+				mes "If you bring it to me, I will make the headgear for you.";
+				close;
+			}
+		case 3: //Lazy Smokie [5084]
+			if (countitem(1026)>999 && countitem(7065)>99 && countitem(945)>9 && countitem(7030)) {
+				delitem 1026,1000;
+				delitem 7065,100;
+				delitem 945,10;
+				delitem 7030,1;
+				creation_lines;
+				getitem 5084,1;
+				close;
+			} else {
+				mes "[Human]";
+				mes "Ah, so you want the Lazy Smokie.";
+				mes "Well,";
+				mes "I can make that for you,";
+				mes "but you will have to";
+				mes "gather the required materials by yourself.";
+				mes "I heard that it is not easy to find the materials.";
+				next;
+				mes "[Human]";
+				mes "The materials are..";
+				mes "^FF0000Acorn x1000^000000 and";
+				mes "^FF0000Sea-Otter Fur x100^000000, as well as ^FF0000Raccoon Leaf x10^000000";
+				mes "That's all you need.";
+				mes "If you bring it to me, I will make the headgear for you.";
+				close;
+			}
+		case 4: //Blue Fish [5065]
+			if (countitem(624) && countitem(959)>299 && countitem(544)>49 && countitem(1023) && countitem(938)>99 && countitem(7030)) {
+				delitem 624,1;
+				delitem 959,300;
+				delitem 544,50;
+				delitem 1023,1;
+				delitem 938,100;
+				delitem 7030,1;
+				creation_lines;
+				getitem 5065,1;
+			} else {
+				mes "[Human]";
+				mes "Ah, so you want the Fish.";
+				mes "Well,";
+				mes "I can make that for you,";
+				mes "but you will have to gather the required materials by yourself.";
+				mes "I heard that it is not easy to find the materials.";
+				next;
+				mes "[Human]";
+				mes "The materials are..";
+				mes "^FF0000Rotten Fish x1";
+				mes "Stinky Scale x300, Raw Fish x50,";
+				mes "Fish Tail x1^000000 and lastly, it requires at least ^FF0000Sticky Mucus x100^000000";
+				mes "That's all you need.";
+				mes "If you bring it to me, I will make the headgear for you.";
+				close;
+			}
+		case 5: //cancel
+			mes "[Human]";
+			mes "Oh.. is that so?";
+			mes "Haha...";
+			mes "I thought I have the chance to do it again.";
+			mes "Oh well,";
+			mes "enjoy your journey then.";
+			close;
+		}
+	} else {
+		mes "[Human]";
+		mes "Hello there.";
+		mes "a good day isn't it?";
+		mes "Hmm... If you don't mind,";
+		mes "can I tell you a little about myself?";
+		mes "I know you're kind of unwilling to do so,";
+		mes "but please, do listen for a while, will you?";
+		next;
+		mes "[Human]";
+		mes "Hmm...";
+		mes "The city of desert, Morocc";
+		mes "has this special attraction.";
+		mes "The wind of flame blows during the heat of the day,";
+		mes "but the sunsets dye the hills of sand into a violet screne.";
+		mes "Besides that, the freezing chill of night never stops until morning.";
+		next;
+		mes "[Human]";
+		mes "All these are the pride of Morocc.";
+		mes "However,";
+		mes "These are not enough to feed the greed of human.";
+		mes "Thay want to take everything";
+		mes "except the desert";
+		mes "as their belongings.";
+		next;
+		mes "[Human]";
+		mes "So, I started to travel,";
+		mes "going around this world to experience the adventure.";
+		mes "Some view that can only be found in certain places,";
+		mes "at their origin habitat.";
+		next;
+		mes "[Human]";
+		mes "Therefore,";
+		mes "I have decided to create items,";
+		mes "that possesses the special characteristecs of the places.";
+		mes "I have gained a few successes,";
+		mes "but the materials required are too hard to be found.";
+		mes "Therefore, I can't produce too many items.";
+		next;
+		mes "[Human]";
+		mes "Oh! Uh Oh...";
+		mes "I have spoken too much.";
+		mes "Sorry for taking your time.";
+		mes "There's nothing to do recently...";
+		mes "I just hope to see";
+		mes "some item that is related to the desert....";
+		next;
+		mes "[Human]";
+		mes "Hmmph...Anyway,";
+		mes "thank you for listening to me.";
+		mes "Enjoy your journey...";
+		mes "Think of the desert, you think of wolves... hahaha.";
+		close;
+	}
+}
+//Payon /=Fox Mask=/ //==Lets hope this works as it's supposed==//
+pay_dun03.gat,48,84,4	script	Nine Tail#1	1180,1,1{
+	mes "[Nine Tail]";
+	mes "Kee! KeeKee!";
+	mes "KeeKeeKee! KeeKee! KeeKee!";
+	next;
+	switch(select("Shaking your head:Nodding")) {
+	case 1:
+		mes "[Nine Tail]";
+		mes "KeeKee! Ke! Kee!";
+		close2;
+		donpcevent "Nine Tail#1::OnReset";
+		end;
+	case 2:
+		emotion e_hmm;
+		close2;
+		disablenpc "Nine Tail#1";
+		enablenpc "Nine Tail#2";
+		end;
+	}
+
+OnInit:
+	disablenpc "Nine Tail#1";
+	disablenpc "Nine Tail#2";
+	monster "pay_dun03.gat",48,84,"Nine Tail",1180,1,"NT::OnMobDead";
+	end;
+
+OnReset:
+	killmonster "pay_dun03.gat","NT::OnMobDead";
+	disablenpc "Nine Tail#1";
+	disablenpc "Nine Tail#2";
+	initnpctimer;
+	end;
+
+OnTimer300000:
+OnSpawn:
+	stopnpctimer;
+	killmonster "pay_dun03.gat","Nine Tail#1::OnMobDead";
+	monster "pay_dun03.gat",48,84,"Nine Tail",1180,1,"NT::OnMobDead";
+	end;
+}
+pay_dun03.gat,48,84,1	script	NT	-1,{
+OnMobDead:
+	enablenpc "Nine Tail#1";
+	end;
+}
+pay_dun03.gat,48,84,4	script	Nine Tail#2	1180,{
+	if(countitem(1022)>998) {
+		mes "[Nine Tail]";
+		mes "Uh Oh!! You've brought it, human.";
+		mes "Good...I think you can save yourself with these.";
+		next;
+		switch(select("Give it to him:Do not give it to him")) {
+		case 1:
+			mes "[Nine Tail]";
+			mes "Go now. You have got what you wanted, human. Now leave!";
+			if(countitem(1022)>998) {
+				delitem 1022,999;
+				getitem 5069,1;
+			}
+			close2;
+			disablenpc "Nine Tail#2";
+			donpcevent "Nine Tail#1::OnReset";
+			end;		
+		case 2:
+			close2;
+			disablenpc "Nine Tail#2";
+			donpcevent "Nine Tail#1::OnReset";
+			end;
+		}
+	}
+	else {
+		mes "[Nine Tail]";
+		mes "......Aiyo? Isn't this the appearance of a human boy?";
+		mes "Has my transfiguration skill gone wrong again... oh... oh well.";
+		next;
+		mes "[Nine Tail]";
+		mes "Do you know how it feels to be chased everyday? How tough that is? Huh?";
+		mes "I just want to live a quiet life with my husband!";
+		next;
+		mes "[Nine Tail]";
+		mes "But one day, someone intruded into our habitat and tried to catch us.";
+		next;
+		mes "[Nine Tail]";
+		mes "Do you know how much that Sohee that lives besides me likes to complain to me everyday? Someone will pull a disgusting face and say 'Haha, Miss Sohee~' and they will chase to rip off her clothes. They are making her crazy!";
+		next;
+		mes "[Nine Tail]";
+		mes "It is just a flawless body as fine as pine, and as beautiful as the flower. Why can't anyone understand that?";
+		next;
+		mes "[Nine Tail]";
+		mes "Hmmm...let me calm down first.";
+		mes "I just want to save my husband and bring him back.";
+		mes "I hope you can help me.";
+		next;
+		mes "[Nine Tail]";
+		mes "To save my husband,";
+		mes "please bring along ^FF0000999 ^0000FFNine Tails^000000!";
+		mes "What? You said that's too much?";
+		next;
+		mes "[Nine Tail]";
+		mes "Hmmph, it really makes me angry to think of what you've done to us...";
+		mes "I understand. You human won't do anything without a reward...";
+		next;
+		mes "[Nine Tail]";
+		mes "Hmm, ok. What do you think of the mask I'm wearing? The ^0000FFKitsune Mask^000000. Gather the item I want, and I will give you this.";
+		mes "You must gather ^FF0000999 ^0000FFNine Tails^000000!";
+		close2;
+		disablenpc "Nine Tail#2";
+		donpcevent "Nine Tail#1::OnReset";
+		end;
+	}
+}
+//Orc Village /=Orc Hero Helm=/
+in_orcs01.gat,31,93,1	script	Orc Warrior#1	1023,2,2{
+	if (orcs_hero_hat == 1) {
+		if (countitem(909)>999) {
+			delitem 909,1000;
+			mes "[Orc Warrior]";
+			mes "Good, you have collected it all, haven't you?";
+			mes "So you really want to have a talk, hahahahaha!!";
+			mes "Ok, I will talk to you then";
+			next;
+			mes "[Orc Warrior]";
+			mes "I don't like humans.";
+			mes "All of the Orcish Tribe dislike humans.";
+			mes "Do you know that?";
+			mes "I really hate it when you come to find us.";
+			set orcs_hero_hat,2;
+			next;
+			mes "[Orc Warrior]";
+			mes "So if you want to hear more. Prepare another ^FF0000Jellopy x1000^000000";
+			mes "This means, get out of my sight...!";
+			mes "Humans...";
+			close;
+		}
+	} else if (orcs_hero_hat == 2) {
+		if (countitem(909) > 999) {
+			delitem 909,1000;
+			mes "[Orc Warrior]";
+			mes "Good, you have collected it all, haven't you?";
+			mes "So you really want to have a talk, hahahahahaha!!";
+			mes "Ok, I will talk to you then";
+			next;
+			mes "[Orc Warrior]";
+			mes "Do you want to know why we hate humans?";
+			mes "That's because,";
+			mes "out village is living a quiet life,";
+			mes "before the rude intrusion of you human.";
+			next;
+			mes "[Orc Warrior]";
+			mes "Can you just build your city";
+			mes "and live there quietly?";
+			mes "Why do you create chaos everywhere...";
+			mes "I can't understand";
+			set orcs_hero_hat,3;
+			next;
+			mes "[Orc Warrior]";
+			mes "Go, if you want another conversation, prepare ^FF0000Jellopy x1000^000000 again,";
+			mes "If you're statisfied with such kind of converstaion.";
+			mes "Hahahahaha";
+			close;
+		} else {
+			mes "[Orc Warrior]";
+			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000...";
+			mes "If you want to talk to me,";
+			mes "show your will, humans.";
+			mes "I don't care, just brought 1000 Jellopy.";
+			close;
+		}
+	} else if (orcs_hero_hat == 3) {
+		if (countitem(909)>999) {
+			delitem 909,1000;
+			mes "[Orc Warrior]";
+			mes "Good, you have collect it all, haven't you? ";
+			mes "So you really want to have a talk, hahahahaha!!";
+			mes "Ok, I will talk to you until you're fed up then.";
+			next;
+			mes "[Orc Warrior]";
+			mes "If you compare the achievement, ";
+			mes "we won't lose to you humans.";
+			mes "The same goes to the Goblin in the jungle,";
+			mes "and the Kobold, who are the master of the grassland...";
+			next;
+			mes "[Orc Warrior]";
+			mes "Before you human build cities, ";
+			mes "we orc warriors has developed sophisticated tunnel in caves,";
+			mes "as well as water way.";
+			mes "We use the things we found in the wild,";
+			mes "to create the things we wanted.";
+			next;
+			mes "[Orc Warrior]";
+			mes "Then we build high tower.";
+			mes "However, the evil forces ";
+			mes "have made the master of the tower betray our tribe...";
+			mes " And those who fail to escape there,";
+			mes "they're still suffering,";
+			mes "at that place.";
+			next;
+			mes "[Orc Warrior]";
+			mes "...Hmm, this,";
+			mes "Why do I tell this to you humans?";
+			mes "The conversation ends here today.";
+			set orcs_hero_hat,4;
+			next;
+			mes "[Orc Warrior]";
+			mes "So, if you want to hear more,";
+			mes "prepare ^FF0000Jellopy x 1000 again^000000";
+			close;
+		} else {
+			mes "[Orc Warrior]";
+			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000...";
+			mes "If you want to talk to me";
+			mes "Show your will, human.";
+			mes "I don't care, just brought 2000 Jellopy.";
+			close;
+		}
+	} else if (orcs_hero_hat == 4) {
+		if (countitem(909)>999) {
+			delitem 909,1000;
+			mes "[Orc Warrior]";
+			mes "Good, you have collect it all, haven't you? ";
+			mes "So you really want to have a talk, hahahahaha!!";
+			mes "Ok, I will talk to you until you're fed up then.";
+			next;
+			mes "[Orc Warrior]";
+			mes "Yes, until that time,";
+			mes "human and the orc warriors";
+			mes "do lead a peaceful life.";
+			mes "But as time goes by, the misunderstanding,";
+			mes "has accumulated and cannot be broken.";
+			next;
+			mes "[Orc Warrior]";
+			mes "The powerless human only wants fame and wealth.";
+			mes "A true warrior,";
+			mes "will only emphasize on glory and honor...";
+			mes "Those who do not care what method they use to achieve their goal,";
+			mes "will be lead to the path of perdition easily.";
+			next;
+			mes "[Orc Warrior]";
+			mes "They only care about their safety,";
+			mes "and ignore about others.";
+			mes "They will not let anthing that";
+			mes "pose a threat to them to live... ";
+			mes "No matter it's other tribe,";
+			mes "or unknown creature, they will kill";
+			mes "even their closest companion if they had to.";
+			next;
+			mes "[Orc Warrior]";
+			mes "...I have talked too much, and there's nothing more to talk about.";
+			mes "The conversation ends here.";
+			set orcs_hero_hat,5;
+			next;
+			mes "[Orc Warrior]";
+			mes "So, if you want to hear more,";
+			mes "prepare ^FF0000Jellopy x 1000 again^000000";
+			close;
+		} else {
+			mes "[Orc Warrior]";
+			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";
+			mes "If you want to talk to me,";
+			mes "show you will, humans.";
+			mes "I don't care, just brought 3000 Jellopy.";
+			close;
+		}
+	} else if (orcs_hero_hat == 5) {
+		if (countitem(909)>999) {
+			delitem 909,1000;
+			mes "[Orc Warrior]";
+			mes "You reall have the patience to collect these things.";
+			mes "You really want to talk to me, don't you?... ";
+			mes "If that's so, I will talk about other things.";
+			next;
+			mes "[Orc Warrior]";
+			mes "The Orc Warriors think that the best things are";
+			mes "battle and victory.";
+			mes "It is the greatest honor,";
+			mes "to fight and beat the enemies face to face.";
+			next;
+			mes "[Orc Warrior]";
+			mes "The spirit to win will not stop even for death.";
+			mes "However, some tribesmate that die of trickery,";
+			mes "will get up from the grave,";
+			mes "wandering to look for a target to fight.";
+			next;
+			mes "[Orc Warrior]";
+			mes "During the battle,";
+			mes "we are different from you.";
+			mes "We don't use tricks, and we don't run away!";
+			mes "We will fight till then end, till we are out of energy.";
+			mes "Even when we're lost in the end, we will still make our last attempt to counter.";
+			next;
+			mes "[Orc Warrior]";
+			mes "Besides that, we don't rely of potions.";
+			mes "You human are too weak.";
+			mes "That's why you use potions and herbs.";
+			mes "Without potion, you will quit immediately, don't you?";
+			mes "Hmm, I'm not sure whether you are like that too.";
+			set orcs_hero_hat,6;
+			next;
+			mes "[Orc Warrior]";
+			mes "So, if you want to hear more,";
+			mes "prepare ^FF0000Jellopy x 1000 again^000000";
+			close;
+		} else {
+			mes "[Orc Warrior]";
+			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";
+			mes "If you want to talk to me,";
+			mes "show you will, humans.";
+			mes "I don't care, just brought 4000 Jellopy.";
+			close;
+		}
+	} else if (orcs_hero_hat == 6) {
+		if (countitem(909)>999) {
+			delitem 909,1000;
+			mes "[Orc Warrior]";
+			mes "You reall have the patience to collect these things.";
+			mes "You really want to talk to me, don't you?... ";
+			mes "If that's so, I will talk about other things.";
+			next;
+			mes "[Orc Warrior]";
+			mes "The warriors of the tribe,";
+			mes "are selected among the strongest.";
+			mes "When they grow up, we'll send them into the jungle,";
+			mes "to test their qualification to be a real warrior.";
+			next;
+			mes "[Orc Warrior]";
+			mes "We will recognize";
+			mes "the tribesman who come back alive as a warrior.";
+			mes "These strong warriors are known as Orc Warriors.";
+			mes "For the females that has fighting ability,";
+			mes "they are known as Orc Lady.";
+			next;
+			mes "[Orc Warrior]";
+			mes "And for those with a dexterous hand and";
+			mes "possess good eyesight,";
+			mes "we'll give them bow and arrow,";
+			mes "and called them Orc Archer.";
+			mes "They will learn and grow in the countless battles.";
+			next;
+			mes "[Orc Warrior]";
+			mes "And there is another trial of fire.";
+			mes "Those who pass the trial,";
+			mes "will be protected by fire";
+			mes "and gain greater ability and endurance.";
+			mes "We called this warriors as High Orc.";
+			next;
+			mes "[Orc Warrior]";
+			mes "Hmm, when human looks at us,";
+			mes "you'll think that we look alike... ";
+			mes "But for use Orc, we can distinguish it easily.";
+			mes "So, when you look at me, ";
+			mes "you will feel that I look like";
+			mes "no different that the orc warrior outside, isn't it?";
+			set orcs_hero_hat,7;
+			next;
+			mes "[Orc Warrior]";
+			mes "So, if you want to hear more,";
+			mes "prepare ^FF0000Jellopy x 1000 again^000000";
+			close;
+		} else {
+			mes "[Orc Warrior]";
+			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";
+			mes "If you want to talk to me,";
+			mes "show you will, humans.";
+			mes "I don't care, just brought 5000 Jellopy.";
+			close;
+		}
+	} else if (orcs_hero_hat == 7) {
+		if (countitem(909)>999) {
+			delitem 909,1000;
+			mes "[Orc Warrior]";
+			mes "I can feel you are getting tired and want to quit now.";
+			mes "But you have keep the promise this time.";
+			mes "So a promise is a promise, I shall continue to talk to you.";
+			next;
+			mes "[Orc Warrior]";
+			mes "We are talking about the Orc Warrior last time...";
+			mes "Yes, in the orcish fighters,";
+			mes "there are dexterous one with abilities,";
+			mes "that has not pass the trial of fire.";
+			mes "They are the warriors that can take care of";
+			mes "other orc warriors....";
+			next;
+			mes "[Orc Warrior]";
+			mes "Such kind of warriors are the true hero.";
+			mes "We call them Orc Heroes.";
+			mes "They had strength and stamin greater than other orcs.";
+			mes "They possess ability to lead too.";
+			mes "This is the true hero of Orc Warriors.";
+			next;
+			mes "[Orc Warrior]";
+			mes "They get the Voucher of Orcish Hero,";
+			mes "and is able to wield the sword only a hero can use.";
+			mes "When the Orc Hero wields the sword,";
+			mes "the earth shakes...";
+			next;
+			mes "[Orc Warrior]";
+			mes "Orc Hero has his own special headgear too.";
+			mes "It is a symbol of";
+			mes "the fame and strength of an Orc Hero... Just like you humans.";
+			mes "If you want to see it,  you can only feel its power in the battle.";
+			set orcs_hero_hat,8;
+			next;
+			mes "[Orc Warrior]";
+			mes "So, if you want to hear more,";
+			mes "prepare ^FF0000Jellopy x 1000 again^000000";
+			close;
+		} else {
+			mes "[Orc Warrior]";
+			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";
+			mes "If you want to talk to me,";
+			mes "show you will, humans.";
+			mes "I don't care, just brought 6000 Jellopy.";
+			close;
+		}
+	} else if (orcs_hero_hat == 8) {
+		if (countitem(909)>999) {
+			delitem 909,1000;
+			mes "[Orc Warrior]";
+			mes "I can feel you are getting tired and want to quit now.";
+			mes "But you have keep the promise this time.";
+			mes "So a promise is a promise, I shall continue to talk to you.";
+			next;
+			mes "[Orc Warrior]";
+			mes "We talk about the Orc Hero just now.";
+			mes "Some orc does not born with an ability,";
+			mes "like the Orc Heroes do.";
+			mes "It took them a long time to go through numerous battle to be a warrior.";
+			next;
+			mes "[Orc Warrior]";
+			mes "To a Orc Warrior,";
+			mes "age does not means coward.";
+			mes "In fact is represents experience and skills,";
+			mes "that makes him more valiant.";
+			next;
+			mes "[Orc Warrior]";
+			mes "They can perform great battle skill,";
+			mes "even without weapons.";
+			mes "They can fight for days even without their axe.";
+			mes "If they reach that state,";
+			mes "weapon are just useless burdens...";
+			next;
+			mes "[Orc Warrior]";
+			mes "Among such experience elders,";
+			mes "we called the most experienced one as ";
+			mes "Orc Lord. And we honor them,";
+			mes "They wear a 3 horn iron helm";
+			mes "that represents the leadership of Orcish tribe.";
+			set orcs_hero_hat,9;
+			next;
+			mes "[Orc Warrior]";
+			mes "So, if you want to hear more,";
+			mes "prepare ^FF0000Jellopy x 1000 again^000000";
+			close;
+		} else {
+			mes "[Orc Warrior]";
+			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";
+			mes "If you want to talk to me,";
+			mes "show you will, humans.";
+			mes "I don't care, just brought 7000 Jellopy.";
+			close;
+	  }
+	} else if (orcs_hero_hat == 9) {
+		if (countitem(909)>999) {
+			delitem 909,1000;
+			mes "[Orc Warrior]";
+			mes "I've never seen,";
+			mes "a human that won't quit like you... So I'll keep my promise";
+			mes "to tell you about our tribe today.";
+			next;
+			mes "[Orc Warrior]";
+			mes "Sometimes, there will be those treacherous ones";
+			mes "who run away from the battle.";
+			mes "We have such kind in out tribe too.";
+			mes "Although it is a disgrace, they are Orcs too.";
+			mes "They only differ in their level of existance.";
+			next;
+			mes "[Orc Warrior]";
+			mes "Such kind will be cursed.";
+			mes "Their body shrinks and the teeth grows.";
+			mes "And finally, they lose the heart to fight.";
+			mes "Since they don't want to be found by others, ";
+			mes "they hide themselves.";
+			next;
+			mes "[Orc Warrior]";
+			mes "They are originally us.";
+			mes "But their alteration rise suspicions.";
+			mes "Such kind with greed,";
+			mes "and hatred to us are called...";
+			mes "Zenorc.";
+			next;
+			mes "[Orc Warrior]";
+			mes "Unlike us,";
+			mes "human do not change even their hearts have changed.";
+			mes "Therefore, we need to be more careful.";
+			mes "Because we can tell from the appearances,";
+			mes "how treacherous humans are....";
+			set orcs_hero_hat,10;
+			next;
+			mes "[Orc Warrior]";
+			mes "So, if you want to hear more,";
+			mes "prepare ^FF0000Jellopy x 1000 again^000000";
+			close;
+		} else {
+			mes "[Orc Warrior]";
+			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";
+			mes "If you want to talk to me,";
+			mes "show you will, humans.";
+			mes "I don't care, just brought 8000 Jellopy.";
+			close;
+	  }
+	} else if (orcs_hero_hat == 10) {
+		if (countitem(909)>999) {
+			delitem 909,1000;
+			mes "[Orc Warrior]";
+			mes "Really? Have you really gathered 10,000 Jellopy?";
+			mes "Good, that's enough now.";
+			mes "You've shown your sincerity.";
+			mes "I will treat you honestly.";
+			next;
+			mes "[Orc Warrior]";
+			mes "It is enough for";
+			mes "the stories about our tribe.";
+			mes "However, there are difference,";
+			mes "from what you've heard and what you'll experience.";
+			next;
+			mes "[Orc Warrior]";
+			mes "I advise that you gather more experience";
+			mes "through the battle with us to understand our tribe.";
+			mes "The most direct way,";
+			mes "is through combat.";
+			set orcs_hero_hat,11;
+			next;
+			mes "[Orc Warrior]";
+			mes "I shall stop here.";
+			mes "As the token of appreciation to your sincerity,";
+			mes "this is the axe that has accompanied me in my pass battles.";
+			mes "Take good care of it, thank you.";
+			getitem 1304,1;
+			next;
+			mes "[Orc Warrior]";
+			mes "It must be hard for you after all these time.";
+			mes "If you want to understand more about Orcs,";
+			mes "come and find me again.";
+			close;
+		} else {
+			mes "[Orc Warrior]";
+			mes "Haven't I mentioned? Find ^FF0000Jellopy x1000^000000... ";
+			mes "If you want to talk to me,";
+			mes "show you will, humans.";
+			mes "I don't care, just brought 9000 Jellopy.";
+			close;
+	  }
+	} else if (orcs_hero_hat == 11 || orcs_hero_hat == 12) {
+		if (countitem(1304)) {
+			mes "[Orc Warrior]";
+			mes "If must be hard for you after all these time.";
+			mes "If you want to understand more about Orcs,";
+			mes "come and find me again.";
+			close;
+		} else {
+			set orc_hero_quest,rand(1,10);
+			if (orc_hero_quest > 9) {
+				if (orcs_hero_hat == 12 && countitem(931)>99) {
+					mes "[Orc Warrior]";
+					mes "Uhoh, that is really great.";
+					mes "After all these battles, I am not sure how much you understand.";
+					mes "However, the voucher of Orc warrior";
+					mes "is given to a true Orc Warrior.";
+					next;
+					mes "[Orc Warrior]";
+					mes "We use 1000 thousand victories";
+					mes "as a qualification to recognize one asa true Orc Warrior.";
+					mes "However, you are a human...";
+					mes "It is hard to cross the line between two different kinds.";
+					next;
+					mes "[Orc Warrior]";
+					mes "Ok, come again after you've won 10 thousand victories.";
+					mes "By that time, we will recognized you as the true warrior.";
+					mes "However,";
+					mes "you will have to walk a lonely path for such fame.";
+					mes "The choise is up to you...";
+					next;
+					mes "[Orc Warrior]";
+					mes "All you get is just fame...";
+					mes "But for a human,";
+					mes "you get a chance to proof and test your capability...";
+					mes "So what do you want to choose?";
+					next;
+					switch(select("I think I don't need it.:I want to take the 10,000 challenge.")) {
+					case 1:
+						mes "[Orc Warrior]";
+						mes "Alright, I won't force you to choose.";
+						mes "Now, please return";
+						mes "to your human city slowly.";
+						mes "Your friends are waiting for you.";
+						close;
+					case 2:
+						mes "[Orc Warrior]";
+						mes "You have chosen a hard path";
+						mes "A path of eternal battles is waiting ahead of you.";
+						mes "You will have to face";
+						mes "thousands,if not ten thousands of warriors.";
+						next;
+						mes "[Orc Warrior]";
+						mes "Then, before you reach your 10,000th victories,";
+						mes "Bring me the voucher of orc warrior.";
+						mes "Once, ten times, or even hundreds";
+						mes "please leave your record of victories.";
+						if (countitem(931)>99) {
+							delitem 931,100;
+							set orcs_hero_hat,13;
+							set orcs_hero_hat2,100;
+						}
+						next;
+						mes "[Orc Warrior]";
+						mes "If I take the voucher of Orc Warrior,";
+						mes "I will record it a 100 victories.";
+						mes "Please make sure you defeat 10,000 orc warrior...";
+						mes "Please continue your battle, don't stop.";
+						close;
+					}
+				}
+				mes "[Orc Warrior]";
+				mes "The best way to understand Orcs,";
+				mes "is through battle.";
+				mes "Thrugh collisions of strength and skills,";
+				mes "improve your understanding between each other.";
+				next;
+				mes "[Orc Warrior]";
+				mes "So, go out there and fight.";
+				mes "conversation with my is just an acceptance of concepts.";
+				mes "One day,";
+				mes "You shall be recognized as a true warrior.";
+				set orcs_hero_hat,12;
+				close;
+			} else {
+				mes "[Orc Warrior]";
+				mes "I feel that you are not statisfied?";
+				mes "Do you have any doubts about us?";
+				mes "You are a human.";
+				mes "Your concern to other tribers,";
+				mes "will not benefit you.";
+				close;
+			}
+		}
+	} else if (orcs_hero_hat == 13) {
+		if (countitem(931)) {
+			mes "[Orc Warrior]";
+			mes "Stay alive before you grab the victory...";
+			mes "Rest here for a while before you leave.";
+			mes "Until now, you have achieved "+orcs_hero_hat2+" times of victories.";
+			next;
+			mes "[Orc Warrior]";
+			mes "Do you want to add the record of your current victory";
+			mes "into this record? You have won "+countitem(931)+" times this time.";
+			next;
+			switch(select("Add the record:Add it later")) {
+			case 1:
+				set orcs_hero_hat2,orcs_hero_hat2+countitem(931);
+				delitem 931,countitem(931);
+				if (orcs_hero_hat2>9999) {
+					mes "[Orc Warrior]";
+					mes "And this, achieving more than 10,000 victories";
+					mes "is an extraordinary achievement to human...";
+					mes "You have completed an unusual task.";
+					mes "Through the current battle,";
+					mes "You must have learned a lot about the Orcish Tribe.";
+					next;
+					mes "[Orc Warrior]";
+					mes "Although you're a human, you have walked the path of a true warrior....";
+					mes "We have recognized you.";
+					mes "You are a true warrior!!";
+					mes "You are... Orc Lady!!";
+					getitem 2299,1;
+					set orcs_hero_hat,14;
+					next;
+					mes "[Orc Warrior]";
+					mes "This is your present.";
+					mes "I wonder if it fits your head.";
+					mes "Wear it well.";
+					mes "If you do not want to wear it, take it along with you.";
+					getitem 931,1;
+					next;
+					mes "[Orc Warrior]";
+					mes "And, you have been recognized as a warrior...";
+					mes "This voucher is for you.";
+					mes "Although it has no difference compared to others,";
+					mes "keep it well.";
+					mes "You will only be recognized as a Orc Warrior,";
+					mes "with this voucher.";
+					next;
+					mes "[Orc Warrior]";
+					mes "So, you may go back now...";
+					mes "If you ever think of us,";
+					mes "come and look for us.";
+					mes "A true self of a person can only be shown through endless battles.";
+					mes "Return to the land now.";
+					close;
+				}
+				mes "[Orc Warrior]";
+				mes "You have worked hard.";
+				mes "I hope your futue better will shine with the light of victories.";
+				mes "If you ever lost,";
+				mes "I hope to see you stand up again.";
+				next;
+				mes "[Orc Warrior]";
+				mes "There are "+(10000-orcs_hero_hat2)+" of battles left.";
+				mes "Although it is a though road ahead,";
+				mes "I hope that you will pull yourself together and achieve the final victory.";
+				close;
+			case 2:
+				mes "[Orc Warrior]";
+				mes "Hmm, as you like it.";
+				mes "I will be dissapointed again,";
+				mes "If you give up in the middle.";
+				close;
+			}
+		} else {
+			mes "[Orc Warrior]";
+			mes "Rest here for a while before you leave.";
+			mes "Until now, you have achieved "+orcs_hero_hat2+" times of victories.";
+			close;
+		}
+	} else if(orcs_hero_hat == 14) {
+		if (countitem(1304)) {
+			mes "[Orc Warrior]";
+			mes "Hmm? Don't tell me that you assume that";
+			mes "you won't be able to get back to the human villages";
+			mes "if you are recognized as a Orc Warrior. Hahahaha!";
+			mes "You better leave then.";
+			close;
+		} else {
+			set @orc_hero_quest,rand(1,10);
+			if (@orc_hero_quest > 9) {
+				mes "[Orc Warrior]";
+				mes "That? Is that thirst...?";
+				mes "Although you're recognized as a warrior,";
+				mes "that eyes of yours show you seek more powerful enemies...";
+				mes "Maybe you are not statisfied with the current situation.";
+				next;
+				mes "[Orc Warrior]";
+				mes "Alright, do you want to take another trial?";
+				mes "Maybe all you accumulated belongings";
+				mes "shall become but a dream...";
+				mes "This path,";
+				mes "is a process feared,";
+				mes "by even the most skullful warrior.";
+				next;
+				mes "[Orc Warrior]";
+				mes "a recognized Orc Warrior, maybe you can defeat them...";
+				mes "What is your choise?";
+				next;
+				switch(select("I am statisfied with the current condition:...I will challenge the trial")){
+				case 1:
+					mes "[Orc Warrior]";
+					mes "Yes, it is useful";
+					mes "if you are statisfied with yourself sometimes.";
+					mes "It takes greater courage,";
+					mes "to admit that you can't overcome a greater obstacle.";
+					close;
+				case 2:
+					mes "[Orc Warrior]";
+					mes "Good, I praise your honorable spirit.";
+					mes "This is an opportunity";
+					mes "for a warrior who've won 10,000 victories.";
+					mes "You will face";
+					mes "the greatest warrior of the Orcish tribe...!";
+					next;
+					mes "[Orc Warrior]";
+					mes "Fight the best warrior of the Orc Warrior.";
+					mes "Obtain 100 victories from the Orc Heroes,";
+					mes "and bring me the voucher.";
+					mes "Although you're a great warrior, this is a ardous task";
+					mes "espectially when you have to face it alone....!";
+					next;
+					mes "[Orc Warrior]";
+					mes "Come, go now! Since you can beat 10,000 Orc warrior,";
+					mes "there's some possibilities that";
+					mes "you can take down 100 Orc Heroes!";
+					mes "If that's so, we will recognize you as";
+					mes "the Orc Hero...!";
+					set orcs_hero_hat,15;
+					close;
+				}
+			} else {
+				mes "[Orc Warrior]";
+				mes "Oh warrior, continue to shine in the victories of your battles.";
+				mes "Stand up again even if you've lost.";
+				mes "Show your unshaken spirit.";
+				mes "You are the human that is reconized as an Orc Warrior!";
+				close;
+			}
+		}
+	} else if(orcs_hero_hat == 15) {
+		if (countitem(968)>99) {
+			mes "[Orc Warrior]";
+			mes "Finally... You have achive the goal.";
+			mes "Those who've lost to you have admitted that";
+			mes "you have shown yourself as a Hero";
+			mes "by crossing the barrier of kinds as a human...";
+			mes "I, on behalf of our tribe,";
+			mes "pay our greatest respect to you.";
+			next;
+			mes "[Orc Warrior]";
+			mes "Now I ask you to make you final selection,";
+			mes "what will you do with the vouchers you've taken?";
+			mes "It means nothing to humands,";
+			mes "but to the orcs,";
+			mes "Heroic Emblem is a belonging";
+			mes "of a true hero.";
+			next;
+			mes "[Orc Warrior]";
+			mes "You've obtained this through you hardship.";
+			mes "You can take it with you,";
+			mes "or give them back to the Orc Heroes.";
+			mes "The meaning of giving them back the voucher,";
+			mes "is to battle them again...";
+			next;
+			mes "[Orc Warrion]";
+			mes "So, heroic emblem,";
+			mes "what will you do with it?";
+			next;
+			switch(select("I will take it back as token of victories:I'll give them back to Orc Heroes")) {
+			case 1:
+				mes "[Ork Warrior]";
+				mes "Well, that is a good choise.";
+				mes "Nobody can change your right to make that decision.";
+				mes "Please take good care of";
+				mes "these tokens of victory.";
+				close;
+			case 2:
+				mes "[Orc Warrior]";
+				mes "This is the true spirit of a warrior...!";
+				mes "Respecting your oppenent even after you've won,";
+				mes "such deeds";
+				mes "should be learned by we Orcs...!";
+				if (countitem(968)<100) close;
+				delitem 968,100;
+				set orcs_hero_hat,16;
+				next;
+				mes "[Orc Warrior]";
+				mes "The one who have defeated 100 Orc Hero...";
+				mes "Altough you're a human";
+				mes "we know you as the best warrior of the Orcs.";
+				mes "You are now... Orc hero!";
+				getitem 1124,1;
+				next;
+				mes "[Orc Warrior]";
+				mes "This is the sword given only to the Heroes.";
+				mes "Iam not sure wether you can use it.";
+				mes "But as a Orc Hero,";
+				mes "you should have it.";
+				getitem 968,1;
+				next;
+				mes "[Orc Warrior]";
+				mes "And since you're a Orc Hero now...";
+				mes "This is the Heroic Emblem for you.";
+				mes "Although it has no difference compared to others,";
+				mes "keep it well.";
+				mes "You will only be recognized as a Orc Hero,";
+				mes "with this voucher.";
+				next;
+				mes "[Orc Warrior]";
+				mes "So, you can leave now...";
+				mes "A person from human tribe that can understand us,";
+				mes "is the one who crosses the boundaries of tribe.";
+				mes "Show the tough spirit of you,";
+				mes "and set for you new destiny....";
+				close;
+			}
+		} else {
+			mes "[Orc Warrior]";
+			mes "Tired...? Orc Hero is";
+			mes "the best warrior among our warriors.";
+			mes "They are known for their capability.";
+			mes "It might be to hard for";
+			mes "a human to pick on them.";
+			next;
+			mes "[Orc Warrior]";
+			mes "However, this trial is the patch you've chosen.";
+			mes "Maybe you want to know you true limit,";
+			mes "so you keep your promise to walk this path...!";
+			mes "Don't rush for the answer,";
+			mes "it might lies beneath the records of your countless battles.";
+			close;
+		}
+	} else if (orcs_hero_hat > 15) {
+		if (countitem(968)) {
+			mes "[Orc Warrior]";
+			mes "Warrior of the Orc Warrior, the greatest Hero";
+			mes "You are... Orc Hero!!";
+			mes "May the valiant warrior be blessed with light!!";
+			close;
+		} else {
+			mes "[Orc Warrior]";
+			mes "Oh Hero, where have you put your voucher...?";
+			mes "Without the Heroic Emblem,";
+			mes "you shall not be knows as a Orc Hero.";
+			mes "Please retrieve it and keep it with you.";
+			close;
+		}
+	} else if (orcs_hero_hat == 0 || orcs_hero_hat ==1) {
+		mes "[Orc Warrior]";
+		if (sex == 1) {
+			mes "What does the son of a human have to do here?";
+		} else {
+			mes "What does the daughter of a human have to do here?";
+		}
+		mes "Shouldn't you have nothing to do with us, the Orc Warriors?";
+		mes "Or are you tired of the endless war";
+		mes "and hope for a truce? That should be good!";
+		next;
+		mes "[Orc Warrior]";
+		mes "We, the Orc Warriors don't simple speak to men.";
+		mes "I praise your courage";
+		mes "to dare to come and try to talk to me.";
+		mes "But we have no intention of hearing what you want to say.";
+		next;
+		mes "[Orc Warrior]";
+		mes "Sit there quietly and leave without making any noises.";
+		mes "If you want to rest before you depart,";
+		mes "watch your manners, at least to the host, me.";
+		if (rand(1,10)>9) {
+			next;
+			switch(select(".....","I want a conversation with you.")) {
+			case 1:
+				close;
+			case 2:
+				mes "[Orc Warrior]";
+				mes "Converstation...? Conversation you say?Hahahaha!! ";
+				mes "You are really an interesting human.";
+				mes "Talk to a Orc Warrior? ";
+				mes "This is the first time I see human talk without sword and shield...!";
+				next;
+				mes "[Orc Warrior]";
+				mes "However, I won't be kind to anyone.";
+				mes "If you want to talk to me,";
+				mes "you'll need to show some respect! Do you understand that?";
+				mes "Ok... this is my little suggestion.";
+				next;
+				mes "[Orc Warrior]";
+				mes "Show me the will of a human,";
+				mes "who wants to talk to me.";
+				mes "To talk to me, gather^FF0000Jellopy x 1000 ^000000 ";
+				mes "Bring it to me when you come to talk next time";
+				next;
+				mes "[Orc Warrior]";
+				mes "And, don't question me.";
+				mes "I won't give you the rights to question my opinion.";
+				mes "And dont you dream that,";
+				mes "I will give you anything.";
+				mes "Do you still want to talk under these circumstances?";
+				mes "Decendent of human?";
+				next;
+				switch(select("Let's battle, Orc Warrior!!:I will show you my faith")) {
+				case 1:
+					mes "[Orc Warrior]";
+					mes "Yeahyeahyee, what a noisy fella!!";
+					mes "If you like to fight, go outside!";
+					mes "I really hate to see humans!!";
+					close;
+				case 2:
+					mes "[Orc Warrior]";
+					mes "Ok, keep your promise!";
+					mes "I want to see how you keep that.";
+					mes "You will quit eventually.";
+					mes "Hahahahaha!!";
+					set orcs_hero_hat,1;
+					close;
+				}
+			}
+		} else {
+			close;
+		}
+	}
+}
+in_orcs01.gat,162,33,1	script	Hero of Orc#1	1087,2,2{
+	if (orcs_hero_hat < 16) {
+		mes "[Orc Hero]";
+		mes ".....Go away, don't interrupt me!";
+		mes "If you want to fight me,";
+		mes "wait for me at the west forest.";
+		mes "I am not in the mood to fight human now.";
+		close;
+	} else if (orcs_hero_hat == 17) {
+		mes "[Orc Hero]";
+		mes "Hahaha, interesting, really interesting.";
+		mes "You are the most interesting human";
+		mes "that I have seen...";
+		mes "I like it, interesting...";
+		close;
+	} else if (orcs_hero_hat == 16) {
+		if (countitem(968) && countitem(2299) && countitem(1124) && countitem(931)) {
+			if(rand(1,20)>19) {
+				mes "[Orc Hero]";
+				mes "Hmm, a human that is knows as Hero?";
+				mes "DO you know the meaning of returning a Heroic Emblem?...";
+				mes "When I am free later,";
+				mes "I'll fight with you.";
+				next;
+				mes "[Orc Hero]";
+				mes ".....HmmHmmm...? This iron helm...?";
+				mes "It belongs to Orc Warrior...?";
+				next;
+				mes "[Orc Hero]";
+				mes "Wait... You're still using this?";
+				mes "Uhoh....";
+				mes "Such an interesting human! Hahaha";
+				mes "Good, really good...";
+				next;
+				mes "[Orc Hero]";
+				mes "You seem not to be aware of the story behind this viking helm.";
+				mes "In the battle between Orc Lord and the humands,";
+				mes "he lost it in his defeat...";
+				mes "The horn in the center was broken";
+				mes "and this helm is created...!";
+				next;
+				mes "[Orc Hero]";
+				mes "Rumors said that if it is given to a human,";
+				mes "the human will be recognized as a Hero...";
+				mes "Hahaha, interesting.";
+				mes "And there're still people who";
+				mes "continue to use it...!!";
+				next;
+				mes "[Orc Hero]";
+				mes "So that's the belonging of the Orc Lord!";
+				mes "And you are not qualified to have it.";
+				mes "So if you don't mind,";
+				mes "can you return it to its origional owner?";
+				mes "Oh 'Human' Orc Warrior?";
+				next;
+				switch(select("I refuse to do so:I agree")) {
+				case 1:
+					mes "[Orc Hero]";
+					mes "Hmm, how stubborn.";
+					mes "If you think it's important, wear it well.";
+					mes "The history of the battle is still kept";
+					mes "on this headgear of a warrior.";
+					close;
+				case 2:
+					mes "[Orc Hero]";
+					mes "Good, that's more like it.";
+					mes "This Viking Helm,";
+					mes "I'll give it to him, hahahaha...";
+					mes "I never imagined to see this thing here.";
+					next;
+					mes "[Orc Hero]";
+					mes "I'll give you a useful item though!";
+					mes "Although you're human,";
+					mes "you're recognizedas a Orc Hero before.";
+					mes "You should at least have a suitable headgear...";
+					next;
+					mes "[Orc Hero]";
+					mes "Here you can have this.";
+					mes "I have nade a special sign on it...";
+					mes "So continue to use this in the future,";
+					mes "understand? 'Human' Orc Warrior?";
+					if (countitem(2299)) {
+						delitem 2299,1;
+						getitem 5094,1;
+						set orcs_hero_hat,17;
+					}
+					close;
+				}
+			} else {
+				mes "[Orc Hero]";
+				mes "Hmm, a human that is recognized a warrior?";
+				mes "Do you know the meaning of returning a Heroic Emblem?...";
+				mes "When I am free later,";
+				mes "I'll fight with you.";
+				close;
+			}
+		} else {
+			mes "[Orc Hero]";
+			mes "Hmm, a human that is recognized a warrior?";
+			mes "You don't look like one though.";
+			mes "Is he really going to return the Heroic Emblem?";
+			mes "I can't believe it.";
+			next;
+			mes "[Orc Hero]";
+			mes "I won't recognize you as a Hero.";
+			mes "He forgets even the most basic things.";
+			mes "How can he be called warrior... Humans!!";
+			mes "Go to the west forest now.";
+			mes "I want you to pass the trial again...!";
+			close;
+		}
+	}
+}
diff --git a/npc/quests/newgears/2005_headgears.txt b/npc/quests/newgears/2005_headgears.txt
index a57807661..1582d8e2b 100644
--- a/npc/quests/newgears/2005_headgears.txt
+++ b/npc/quests/newgears/2005_headgears.txt
@@ -1,2255 +1,2255 @@
-//===== eAthena Script ======================================= 

-//= 2005 Headgear Quests

-//===== By: ================================================== 

-//= MasterOfMuppets

-//===== Current Version: ===================================== 

-//= 1.0

-//===== Compatible With: ===================================== 

-//= eAthena

-//===== Description: ========================================= 

-//= 2005 Headgears Official Quest.

-//===== Additional Comments: =================================

-// 1.0 First version, converted from the official aegis script. [MasterOfMuppets]

-//============================================================ 

-

-yuno.gat,222,116,3	script	Kasis#LhzHat	851,{

-

-	if(countitem(519) > 49 && countitem(7031) > 49 && countitem(548) > 49 && countitem(539) > 49)

-	{

-		mes "[Kasis]";

-		mes "Milk, Cheese,";

-		mes "Old Frying Pans,";

-		mes "Pieces of Cake...";

-		mes "Th-that's everything";

-		mes "I need to make lunch for";

-		mes "my friends in the Factory!";

-		next;

-		switch( select( "Well, I did promise to help you.", "What are you talking about?" ) )

-		{

-		case 1:

-			mes "[Kasis]";

-			mes "Finally, I can treat my";

-			mes "buddies to a wonderful";

-			mes "feast! They'll be so pleased!";

-			mes "Oh, I'd really like to repay you";

-			mes "somehow, but I'm not sure";

-			mes "what I could possibly give...";

-			next;

-			mes "[Kasis]";

-			mes "Of course! Why don't";

-			mes "you treat yourself to";

-			mes "my specialty, Kasis's";

-			mes "Crunch Toast? It looks";

-			mes "simple, but it actually";

-			mes "requires great skill to make.";

-			next;

-			mes "[Kasis]";

-			mes "Here you are!";

-			mes "Please enjoy this and always";

-			mes "remember that breakfast is the";

-			mes "most important meal of the day!";

-			mes "Now, I better prepare those";

-			mes "lunches. Goodbye, my friend~";

-			delitem 519,50;

-			delitem 7031,50;

-			delitem 548,50;

-			delitem 539,50;

-			getitem 5107,1;

-			close;

-		break;

-

-		case 2:

-			mes "[Kasis]";

-			mes "Oh...";

-			mes "Oh, I'm so sorry.";

-			mes "I must have confused";

-			mes "you with someone else.";

-			next;

-			mes "[Kasis]";

-			mes "You see, I've been asking";

-			mes "adventurers that have been";

-			mes "passing through to provide";

-			mes "me with food supplies so that";

-			mes "I can make lunch for my friends";

-			mes "that are working in Einbroch.";

-			next;

-			mes "[Kasis]";

-			mes "Yes...";

-			mes "So...";

-			mes "Sorry...";

-			mes "To... Bother you.";

-			next;

-			mes "^3355FFAs if entranced,";

-			mes "Kasis continues to";

-			mes "stare at the Milk, Cheese";

-			mes "Old Frying Pans and Pieces";

-			mes "of Cake that you are carrying.^000000";

-			next;

-			switch( select( "You can have these if you want.", "Um, why are you staring?" ) )

-			{

-			case 1:		

-				mes "[Kasis]";

-				mes "Really? Is it alright";

-				mes "with you for me to have";

-				mes "all of this Milk, Cheese,";

-				mes "Pieces of Cake and these";

-				mes "Old Frying Pans? Oh, bless";

-				mes "your kind heart, adventurer~";

-				next;

-				mes "[Kasis]";

-				mes "Finally, I can treat my";

-				mes "buddies to a wonderful";

-				mes "feast! They'll be so pleased!";

-				mes "Oh, I'd really like to repay you";

-				mes "somehow, but I'm not sure";

-				mes "what I could possibly give...";

-				next;

-				mes "[Kasis]";

-				mes "Of course! Why don't";

-				mes "you treat yourself to";

-				mes "my specialty, Kasis's";

-				mes "Crunch Toast? It looks";

-				mes "simple, but it actually";

-				mes "requires great skill to make.";

-				next;

-				mes "[Kasis]";

-				mes "Here you are!";

-				mes "Please enjoy this and always";

-				mes "remember that breakfast is the";

-				mes "most important meal of the day!";

-				mes "Now, I better prepare those";

-				mes "lunches. Goodbye, my friend~";

-				delitem 519,50;

-				delitem 7031,50;

-				delitem 548,50;

-				delitem 539,50;

-				getitem 5107,1;

-				close;

-			break;

-

-			case 2:

-				mes "[Kasis]";

-				mes "Oh, let me apologize";

-				mes "again. But I can't help";

-				mes "but admire the quality of";

-				mes "your goods. Er, you know,";

-				mes "the food you're carrying. I'm";

-				mes "a chef by trade, after all.";

-				close;

-			break;

-			}

-		break;

-		}

-	}

-	mes "[Kasis]";

-	mes "I'm sorry, but we're closed";

-	mes "right now. Unfortunately, we";

-	mes "don't have any more bread";

-	mes "in stock. ^333333*Siiiiiiiiigh...*^000000";

-	next;

-	switch( select( "Is something wrong?", "End Conversation." ) )

-	{

-	case 1:

-		mes "[Kasis]";

-		mes "Well, my current contract";

-		mes "with the company that's been";

-		mes "providing me with ingredients";

-		mes "has expired. Of course, it's";

-		mes "bad enough that I don't have";

-		mes "the food to run this business.";

-		next;

-		mes "[Kasis]";

-		mes "But I also feel like I'm";

-		mes "letting my friends down.";

-		mes "You see, I've been sending";

-		mes "them lunch every day since";

-		mes "they've been working in the";

-		mes "Factory over in Einbroch.";

-		next;

-		mes "[Kasis]";

-		mes "I'm unable to make";

-		mes "lunch for them at the";

-		mes "moment, but I really want to";

-		mes "help my buddies, especially";

-		mes "since their financial situation";

-		mes "seems pretty bad right now.";

-		next;

-		switch( select( "Do you want me to help you?", "I'm so sorry to hear that." ) )

-		{

-		case 1:

-			mes "[Kasis]";

-			mes "Sure, I'm willing to accept";

-			mes "help from wherever I can find";

-			mes "it. If you would, I'd like you to bring me some food supplies";

-			mes "that I can use to make lunches";

-			mes "for my friends at the Factory.";

-			next;

-			mes "[Kasis]";

-			mes "Would you";

-			mes "please get me";

-			mes "^4D4DFF50 Milk^000000,";

-			mes "^4D4DFF50 Cheese^000000,";

-			mes "^4D4DFF50 Pieces of Cake^000000 and";

-			mes "^4D4DFF50 Old Frying Pans^000000?";

-			next;

-			mes "[Kasis]";

-			mes "I'd really appreciate";

-			mes "your help. My friends seem";

-			mes "so depressed to be working";

-			mes "in the Factory and I want to";

-			mes "do all I can to cheer them up.";

-			mes "Thanks for your kind offer~";

-			close;

-		break;

-

-		case 2:

-			mes "[Kasis]";

-			mes "I'm trying to renew";

-			mes "my contract with the";

-			mes "company that's been";

-			mes "providing me with food";

-			mes "supplies, but it hasn't";

-			mes "been working out so far...";

-			next;

-			mes "[Kasis]";

-			mes "I don't know what's";

-			mes "happening, but hopefully";

-			mes "I can find a new supplier";

-			mes "soon. There are my friends";

-			mes "to worry about, as well as";

-			mes "the sake of my business.";

-			close;

-		break;

-		}

-	break;

-

-	case 2:

-		mes "[Kasis]";

-		mes "Anyway, please come";

-		mes "again. Hopefully, we'll";

-		mes "have some good bread";

-		mes "in stock next time, okay?";

-		close;

-	break;

-	}

-

-}

-

-lighthalzen.gat,143,68,0	script	Strange Guy#LhzHat	47,{

-

-	if(DTHATQ == 0)

-	{

-		mes "[Strange Guy]";

-		mes "Wait! Don't say";

-		mes "anything! You must be";

-		mes "an adventurer from the";

-		mes "Rune-Midgarts Kingdom!";

-		mes "So... I'm right, aren't I?";

-		next;

-		switch( select( "Who are you?", "How did you know?", "Ignore him." ) )

-		{

-		case 1:

-			mes "[Morris]";

-			mes "Allow me to";

-			mes "introduce myself.";

-			mes "My name is Morris Poe,";

-			mes "detective of great acclaim";

-			mes "and world wide fame.";

-			next;

-			switch( select( "I've never heard of you.", "You're kidding me.", "I'm outta here." ) )

-			{

-			case 1:

-				mes "[Morris]";

-				mes "Morris Poe?";

-				mes "Renown detective?";

-				mes "Advocate for justice in";

-				mes "the Schwaltzvalt Republic?";

-				mes "Surely you recognize one";

-				mes "of my esteemed titles.";

-				next;

-				switch( select( "Nope, I don't know you.", "You're Morris Poe?!" ) )

-				{

-				case 1:

-					mes "[Morris]";

-					mes "You don't...?";

-					mes "But I'm a famous hero.";

-					mes "Children look up to me";

-					mes "and wish they'd grow";

-					mes "up to be as smart as me.";

-					next;

-					mes "[Morris]";

-					mes "I don't get it.";

-					mes "I'm famouser than";

-					mes "that. A household name";

-					mes "even. I've got a sterling";

-					mes "public image, how could";

-					mes "you never have heard of me...?";

-					close;

-				break;

-

-				case 2:

-				break;

-				}

-			break;

-

-			case 2:

-				mes "[Morris]";

-				mes "Kidding? Ha ha!";

-				mes "Look at these keen,";

-				mes "deductive and deeply";

-				mes "analytical eyes and";

-				mes "tell me I'm joking.";

-				next;

-				switch( select( "Whoa, those ARE keen eyes.", "Okay. You're joking." ) )

-				{

-				case 1:

-					mes "[Morris]";

-					mes "Yes, this sharp,";

-					mes "penetrating, yet";

-					mes "highly intelligent gaze";

-					mes "belongs to the world";

-					mes "detective and crime";

-					mes "fighter, Morris Poe!";

-					next;

-					switch( select( "I've never heard of you.", "Golly, Morris Poe?!" ) )

-					{

-					case 1:

-						mes "[Morris]";

-						mes "Never heard of...?";

-						mes "Impossible! If there are";

-						mes "two things I hate more";

-						mes "than crime, they would be";

-						mes "dishonesty... And rejection";

-						mes "from beautiful women.";

-						next;

-						mes "[Morris]";

-						mes "When you get over your";

-						mes "sense of pride and gain";

-						mes "a little maturity, then we";

-						mes "might share an actual";

-						mes "conversation. Until then,";

-						mes "you'll just have to grow up.";

-						close;

-					break;

-

-					case 2:

-					break;

-					}

-				break;

-

-				case 2:

-					mes "[Morris]";

-					mes "Hahahahahaah--Huh.";

-					mes "If there are two things";

-					mes "I hate more than criminals,";

-					mes "they would be sarcasm...";

-					mes "And receiving fake phone";

-					mes "numbers from really cute girls.";

-					next;

-					switch( select( "Yeah, you're no Don Juan.", "I'm... I'm sorry." ) )

-					{

-					case 1:

-						mes "[Morris]";

-						mes "Wah...!";

-						mes "Did you just--?!";

-						mes "Ugh, you're the worst";

-						mes "type of person, you know that?";

-						emotion e_omg;

-						close;

-					break;

-

-					case 2:

-						mes "[Morris]";

-						mes "I think it's too late to";

-						mes "apologize. Why would you";

-						mes "treat someone of my stature";

-						mes "with such caustic sarcasm?!";

-						mes "What excuse could possibly";

-						mes "exonerate your behavior?!";

-						next;

-						switch( select( "I... I was intimidated...", "It's how I treat all losers." ) )

-						{

-						case 1:

-							mes "[Morris]";

-							mes "Of course: intense feelings";

-							mes "of awe and fear of my vast";

-							mes "intellect would result in that";

-							mes "kind of deviant behavior. I'll";

-							mes "have to forgive you, I suppose.";

-							next;

-						break;

-

-						case 2:

-							mes "[Morris]";

-							mes "What...?!";

-							mes "Morris Poe, a loser?";

-							mes "Such defamatory remarks";

-							mes "cannot be forgiven, no";

-							mes "matter how unfounded";

-							mes "and groundless they are!";

-							emotion e_omg;

-							close;

-						break;

-						}

-					break;

-					}

-				break;

-				}	

-			break;

-

-			case 3:

-				mes "[Morris]";

-				mes "Hahaha, oh, that's";

-				mes "funny. Wait. You're...";

-				mes "You're really leaving.";

-				mes "N-no, come baaaack!";

-				close;

-			break;

-			}

-		break;

-

-		case 2:

-			mes "[Strange Guy]";

-			mes "How did I know?";

-			mes "Elementary, my friend.";

-			mes "There was an abundance";

-			mes "of clues for me to make";

-			mes "that sort of simple deduction.";

-			close;

-		break;

-

-		case 3:

-			mes "[Strange Guy]";

-			mes "Hello...?";

-			mes "...............";

-			mes "Oh, this is embarassing.";

-			mes "I can't believe I'm getting";

-			mes "the silent treatment...";

-			close;

-		break;

-		}

-

-		mes "[Morris]";

-		mes "Yes, I know it's";

-		mes "difficult to believe that";

-		mes "you would be fortunate";

-		mes "enough to stand in the";

-		mes "presence of genius. Now,";

-		mes "you must be wondering...";

-		next;

-		menu "Um, wondering what?",-;

-			mes "[Morris]";

-			mes "You're wondering,";

-			mes "\"How in the world";

-			mes "can I be as brilliant";

-			mes "as Morris Poe, the";

-			mes "genius detective?\"";

-			next;

-			mes "[Morris]";

-			mes "First, I think it's fair";

-			mes "to let you know that it's";

-			mes "an impossible dream. Men like";

-			mes "myself only arise in this world";

-			mes "perhaps once every generation.";

-			mes "I'm sorry, but don't give up!";

-			next;

-			mes "[Morris]";

-			mes "Now, you can try to reach";

-			mes "a level of intelligence that";

-			mes "is comparable to my own by";

-			mes "joining the Young Detective's";

-			mes "Club. To become a member, you just need one essential article.";

-			next;

-			mes "[Morris]";

-			mes "Yes, you will need the";

-			mes "^0000FFRenown Detective's Cap^000000!";

-			mes "Luckily, I'm giving them";

-			mes "away for a relatively small";

-			mes "material cost, but you must";

-			mes "hurry while supplies last.";

-			next;

-			mes "[Morris]";

-			mes "Simply bring me";

-			mes "^0000FF10 Magnifiers^000000,";

-			mes "^0000FF1887 Tassels^000000,";

-			mes "^0000FF1 Slotted Bucket Hat^000000";

-			mes "and ^0000FF1,887 zeny^000000. That's all!";

-			next;

-			mes "[Morris]";

-			mes "But first, let me warn you";

-			mes "not to bring a ^FF0000slotted Bucket";

-			mes "Hat with a card compounded to";

-			mes "it, or any upgraded Bucket Hats. I'm not responsible for any";

-			mes "loss resulting from that.";

-			next;

-			mes "[Morris]";

-			mes "Hurry and bring me";

-			mes "those items! There are";

-			mes "only 20,000,000 Renown";

-			mes "Detective Caps left!";

-			mes "Once they're gone,";

-			mes "they'll be extinct!";

-			set DTHATQ,1;

-			close;

-	}

-	else if(DTHATQ == 1)

-	{

-		mes "[Morris]";

-		mes "So, did you want to";

-		mes "buy, er, receive this";

-		mes "Renown Detective's Cap";

-		mes "and become an honored";

-		mes "member of the Young";

-		mes "Detective's Club?";

-		next;

-		mes "[Morris]";

-		mes "Remember, make sure";

-		mes "that you don't bring any";

-		mes "^FF0000slotted Bucket Hats that";

-		mes "have been upgraded or have";

-		mes "cards compounded to them, or";

-		mes "you'll lose those enhancements^000000.";

-		next;

-		mes "[Morris]";

-		mes "Now, if you have only";

-		mes "1 Bucket Hat, we can begin.";

-		mes "Young Detective's Club... Salute! ";

-		next;

-		switch( select( "Salute.", "Whatever..." ) )

-		{

-		case 1:

-			mes "[Morris]";

-			mes "Great, done like a pro!";

-			mes "Now, I need to check your";

-			mes "fee--I mean qualifications.";

-			mes "Let's see now, I need to";

-			mes "look through your Inventory...";

-			next;

-			set @lhzhatfailed,0;

-			if(countitem(611) < 10)

-			{

-				mes "[Morris]";

-				mes "Wait. You don't have";

-				mes "enough Magnifiers. You";

-				mes "do want to join this club,";

-				mes "don't you? Did you need to";

-				mes "hear the requirements again?";

-				set @lhzhatfailed,1;

-				next;

-			}

-			if(countitem(7301) < 1887 && @lhzhatfailed == 0)

-			{

-				mes "[Morris]";

-				mes "Magnifiers. Check.";

-				mes "Not enough Tassels? Check.";

-				set @lhzhatfailed,1;

-				next;

-			}

-			if(countitem(5120) < 1 && @lhzhatfailed == 0)

-			{

-				mes "[Morris]";

-				mes "Magnifiers. Check.";

-				mes "Tassels... Check.";

-				mes "Hm. You're missing";

-				mes "the slotted Bucket Hat.";

-				mes "You were so close...";

-				set @lhzhatfailed,1;

-				next;

-			}

-			if(Zeny < 1887 && failed == 0)

-			{

-				mes "[Morris]";

-				mes "Magnifiers. Check.";

-				mes "Tassels... Check.";

-				mes "Slotted Bucket Hat. Got it.";

-				mes "Hey. Where's the zeny?!";

-				mes "That's the most important,";

-				mes "er, qualification of all!";

-				set @lhzhatfailed,1;

-				next;

-			}

-			

-			if(@lhzhatfailed == 1)

-			{

-				mes "[Morris]";

-				mes "^333333*Sigh*^000000 You need";

-				mes "^0000FF10 Magnifiers^000000,";

-				mes "^0000FF1887 Tassels^000000,";

-				mes "^0000FF1 Slotted Bucket Hat^000000";

-				mes "and ^0000FF1,887 zeny^000000. That's all!";

-				emotion e_an;

-				next;

-				mes "[Morris]";

-				mes "Now, remember everything";

-				mes "that you need this time, okay?";

-				mes "I'll be next;ing to welcome";

-				mes "you into the elite ranks of ";

-				mes "the Young Detective's Club.";

-				close;

-			}

-			mes "[Morris]";

-			mes "Magnifiers. Check.";

-			mes "Tassels... Check.";

-			mes "Slotted Bucket Hat. Got it.";

-			mes "Aaaand zeny. Heh heh. Perfect.";

-			next;

-			mes "[Morris]";

-			mes "Great, that's everything!";

-			mes "Welcome to the club! Here's";

-			mes "your Renown Detective's Cap,";

-			mes "so wear it with pride as you";

-			mes "take an active part in our club's";

-			mes "activities and promotion!";

-			delitem 7301,1887;

-			delitem 5120,1;

-			delitem 611,10;

-			set Zeny, Zeny - 1887;

-			set DTHATQ,2;

-			getitem 5108,1;

-			next;

-			switch( select( "Wait, promotion?", "Hooray!" ) )

-			{

-			case 1:

-				mes "[Morris]";

-				mes "Of course, isn't it obvious?";

-				mes "As a member, one of your duties";

-				mes "will be to sing accolades of this club so that more members";

-				mes "will join and earn their own";

-				mes "Renown Detective's Caps.";

-				next;

-				mes "[Morris]";

-				mes "Alright, scurry off";

-				mes "now and proudly display";

-				mes "your new, rakishly stylish";

-				mes "Renown Detective's Cap";

-				mes "to all of your friends!";

-				close;

-			break;

-

-			case 2:

-				mes "[Morris]";

-				mes "Alright, scurry off";

-				mes "now and proudly display";

-				mes "your new, rakishly stylish";

-				mes "Renown Detective's Cap";

-				mes "to all of your friends!";

-				close;

-			break;

-			}

-		break;

-

-		case 2:

-			mes "[Morris]";

-			mes "Huh. You just failed";

-			mes "the \"Test of Respect.\"";

-			mes "You don't deserve the";

-			mes "honor of wearing the";

-			mes "Renowned Detective's Cap!";

-			close;

-		break;

-		}

-	}

-	else if(DTHATQ == 2)

-	{

-		mes "[Morris]";

-		mes "Have you come to me";

-		mes "in order to obtain another";

-		mes "Renown Detective's Cap?";

-		mes "I realize that such a stylish";

-		mes "headgear is in high demand.";

-		next;

-		mes "[Morris]";

-		mes "Remember, make sure";

-		mes "that you don't bring any";

-		mes "^FF0000slotted Bucket Hats that";

-		mes "have been upgraded or have";

-		mes "cards compounded to them, or";

-		mes "you'll lose those enhancements^000000.";

-		next;

-		mes "[Morris]";

-		mes "As a proud member of";

-		mes "the Young Detective's Club,";

-		mes "did you bring everything";

-		mes "you need in order to earn";

-		mes "a Renown Detective's Cap?";

-		next;

-		switch( select( "I'm not sure~", "Sure!" ) )

-		{

-		case 1:

-			mes "[Morris]";

-			mes "What...?! Every good";

-			mes "detective must have a";

-			mes "photographic memory";

-			mes "and be able to recall";

-			mes "minute details in order";

-			mes "to crack the case.";

-			emotion e_sob;

-			next;

-			mes "[Morris]";

-			mes "Remember...";

-			mes "^0000FF10 Magnifiers^000000,";

-			mes "^0000FF1887 Tassels^000000,";

-			mes "^0000FF1 Slotted Bucket Hat^000000";

-			mes "and ^0000FF1,887 zeny^000000. Okay?";

-			close;

-		break;

-

-		case 2:	

-			mes "[Morris]";

-			mes "Great!";

-			mes "Now let me just";

-			mes "check to see if you";

-			mes "brought everything...";

-			next;

-			set @lhzhatfailed,0;

-			if(countitem(611) < 10)

-			{

-				mes "[Morris]";

-				mes "Hmm, you don't have";

-				mes "enough Magnifiers? But";

-				mes "those are essential tools";

-				mes "for sleuthing. Come now,";

-				mes "hurry back with them!";

-				set @lhzhatfailed,1;

-				next;

-			}

-			if(countitem(7301) < 1887 && @lhzhatfailed == 0)

-			{

-				mes "[Morris]";

-				mes "Magnifiers. Check.";

-				mes "Not enough Tassels? Check.";

-				set @lhzhatfailed,1;

-				next;

-			}

-			if(countitem(5120) < 1 && @lhzhatfailed == 0)

-			{

-				mes "[Morris]";

-				mes "Magnifiers. Check.";

-				mes "Tassels... Check.";

-				mes "Hm. You're missing";

-				mes "the slotted Bucket Hat.";

-				mes "You were so close...";

-				set @lhzhatfailed,1;

-				next;

-			}

-			if(Zeny < 1887 && failed == 0)

-			{

-				mes "[Morris]";

-				mes "Magnifiers. Check.";

-				mes "Tassels... Check.";

-				mes "Slotted Bucket Hat. Got it.";

-				mes "Hey. Where's the zeny?!";

-				mes "That's the most important,";

-				mes "er, qualification of all!";

-				set @lhzhatfailed,1;

-				next;

-			}

-

-			if(@lhzhatfailed == 1)

-			{

-				mes "[Morris]";

-				mes "Remember...";

-				mes "^0000FF10 Magnifiers^000000,";

-				mes "^0000FF1887 Tassels^000000,";

-				mes "^0000FF1 Slotted Bucket Hat^000000";

-				mes "and ^0000FF1,887 zeny^000000. Okay?";

-				emotion e_an;

-				close;

-			}			set @lhzhatfailed,0;

-			if(countitem(611) < 10)

-			{

-				mes "[Morris]";

-				mes "Hmm, you don't have";

-				mes "enough Magnifiers? But";

-				mes "those are essential tools";

-				mes "for sleuthing. Come now,";

-				mes "hurry back with them!";

-				set @lhzhatfailed,1;

-				next;

-			}

-			if(countitem(7301) < 1887 && @lhzhatfailed == 0)

-			{

-				mes "[Morris]";

-				mes "Magnifiers. Check.";

-				mes "Not enough Tassels? Check.";

-				set @lhzhatfailed,1;

-				next;

-			}

-			if(countitem(5120) < 1 && @lhzhatfailed == 0)

-			{

-				mes "[Morris]";

-				mes "Magnifiers. Check.";

-				mes "Tassels... Check.";

-				mes "Hm. You're missing";

-				mes "the slotted Bucket Hat.";

-				mes "You were so close...";

-				set @lhzhatfailed,1;

-				next;

-			}

-			if(Zeny < 1887 && failed == 0)

-			{

-				mes "[Morris]";

-				mes "Magnifiers. Check.";

-				mes "Tassels... Check.";

-				mes "Slotted Bucket Hat. Got it.";

-				mes "Hey. Where's the zeny?!";

-				mes "That's the most important,";

-				mes "er, qualification of all!";

-				set @lhzhatfailed,1;

-				next;

-			}

-

-			if(@lhzhatfailed == 1)

-			{

-				mes "[Morris]";

-				mes "Remember...";

-				mes "^0000FF10 Magnifiers^000000,";

-				mes "^0000FF1887 Tassels^000000,";

-				mes "^0000FF1 Slotted Bucket Hat^000000";

-				mes "and ^0000FF1,887 zeny^000000. Okay?";

-				emotion e_an;

-				close;

-			}

-			mes "[Morris]";

-			mes "Magnifiers. Check.";

-			mes "Tassels... Check.";

-			mes "Slotted Bucket Hat. Got it.";

-			mes "Aaaand zeny. Heh heh. Perfect.";

-			next;

-			mes "[Morris]";

-			mes "Great! You've just qualified";

-			mes "to own yet another Renowned";

-			mes "Detective's Cap. Congratulations! Now, let me collect all of these";

-			mes "goods and zeny from you...";

-			delitem 7301,1887;

-			delitem 5120,1;

-			delitem 611,10;

-			set Zeny, Zeny - 1887;

-			set DTHATQ,2;

-			getitem 5108,1;

-			next;

-			mes "[Morris]";

-			mes "Hahaha! It's what";

-			mes "I expect from one of";

-			mes "our Junior Gold Members!";

-			mes "How does it feel like to be";

-			mes "the cream of the cream of";

-			mes "the crop? Great, isn't it?";

-			close;

-		break;

-		}

-	}

-

-}

-

-lighthalzen.gat,360,313,3	script	Boy#LhzHat	706,{

-

-	mes "[Boy]";

-	mes "Hello, mister!";

-	mes "Um, would you do";

-	mes "me a favor, please?";

-	next;

-	if(countitem(526) && countitem(7270) && countitem(941) && countitem(10004))

-	{

-		mes "[Boy]";

-		mes "Oh! You brought me";

-		mes "some Royal Jelly to";

-		mes "eat, as well as everything";

-		mes "I need to make a Baby Pacifier.";

-		mes "Okay, let me get started on that right away. Just a moment...";

-		next;

-		mes "...";

-		mes "......";

-		next;

-		mes "[Boy]";

-		mes "Damn.";

-		mes "That Royal Jelly";

-		mes "was frickin' delicious!";

-		mes "Now I can make your";

-		mes "Baby Pacifier. Let's see";

-		mes "here. Ah, here we go...";

-		delitem 526,1;

-		next;

-		mes "[Boy]";

-		mes "It's done!";

-		mes "Now, you're the";

-		mes "proud owner of your";

-		mes "very own Baby Pacifier!";

-		mes "I hope you're happy with";

-		mes "yourself. Travel safe, okay?";

-		delitem 7270,1;

-		delitem 941,1;

-		delitem 10004,1;

-		getitem 5110,1;

-		close;

-	}

-	switch( select( "What do you need?", "Sorry, kid..." ) )

-	{

-	case 1:

-		mes "[Boy]";

-		mes "Well, my mom has been";

-		mes "sick recently, so both of";

-		mes "us haven't been able to eat";

-		mes "for the past few days. But";

-		mes "if she doesn't eat, how does";

-		mes "she expect to get better?";

-		emotion e_sob;

-		next;

-		mes "[Boy]";

-		mes "So I guess what I'm";

-		mes "asking is, would you be";

-		mes "able to spare some food?";

-		next;

-		switch( select( "Help him.", "Refuse to help." ) )

-		{

-		case 1:

-			if(!countitem(526))

-			{

-				mes "[Boy]";

-				mes "If you would, do you think";

-				mes "you can get some Royal Jelly";

-				mes "that I can give to my mom? The old lady next door says that it's";

-				mes "really nutritious and helps you get better faster if you're sick.";

-				next;

-				mes "[Boy]";

-				mes "My mom would be mad";

-				mes "at me if she found out";

-				mes "I was begging for it, but";

-				mes "Royal Jelly is too expensive";

-				mes "for me to get without any help!";

-				close;

-			}

-			mes "[Boy]";

-			mes "Oh, would it be alright";

-			mes "if I have this Royal Jelly?";

-			mes "It would really help my mom";

-			mes "feel better. Thanks so much~";

-			delitem 526,1;

-			next;

-			mes "[Boy]";

-			mes "Hey, to pay you back, why";

-			mes "don't I make a Baby Pacifier";

-			mes "for you? I learned how to make";

-			mes "one when my baby brother was";

-			mes "born. But first, I'll need some";

-			mes "materials to put it together...";

-			next;

-			mes "[Boy]";

-			mes "Would you";

-			mes "please bring";

-			mes "^3131FF1 Nursing Bottle^000000,";

-			mes "^3131FF1 Nose Ring^000000 and";

-			mes "^3131FF1 Pacifier^000000? Oh, and one";

-			mes "more ^3131FFRoyal Jelly^000000 for me~";

-			close;

-		break;

-

-		case 2:

-			mes "[Boy]";

-			mes "Oh... Um, that's";

-			mes "alright. Maybe I was";

-			mes "asking too much from";

-			mes "you. I mean, it's true";

-			mes "that you barely know me...";

-			emotion e_sob;

-			close;

-		break;

-		}

-	break;

-

-	case 2:

-		mes "[Boy]";

-		mes "Th-that's okay.";

-		mes "I guess you must";

-		mes "be so busy that you";

-		mes "don't even have the";

-		mes "time to listen to some";

-		mes "little boy's problems...";

-		emotion e_sob;

-		close;

-	break;

-	}

-

-}

-

-einbech.gat,70,222,5	script	Mater#LhzHat	91,{

-

-	if(countitem(983) && countitem(7267) > 998 && countitem(749) && Zeny > 49999)

-	{

-		mes "[Mater]";

-		mes "Oh, hello, what's this?";

-		mes "You're carrying 1 Black";

-		mes "Dyestuffs, 1 Frozen Rose,";

-		mes "999 Tiger Panties and even";

-		mes "50,000 zeny with you. That's";

-		mes "enough to make a Winter Hat...";

-		next;

-		mes "[Mater]";

-		mes "Um, would you mind letting";

-		mes "me have those items so that";

-		mes "I can make a Winter Hat?";

-		mes "I'd never be able to gather";

-		mes "those things on my own...";

-		next;

-		switch( select( "Let her have the items.", "Don't give her the items." ) )

-		{

-		case 1:

-			mes "[Mater]";

-			mes "Oh, thank you so much!";

-			mes "I've always wanted to make";

-			mes "this hat and try it on, even";

-			mes "if it's just once. But don't";

-			mes "worry, I'll give it to you~";

-			mes "Now please next; a moment...";

-			next;

-			mes "[Mater]";

-			mes "Let's see...";

-			mes "I've got to fold";

-			mes "the rose like this...";

-			mes "Be careful with the dye...";

-			mes "Where did I put all those";

-			mes "pan--Oh, here we are.";

-			next;

-			mes "[Mater]";

-			mes "^333333*Whew!*^000000";

-			mes "Finally, it's done!";

-			mes "Now, if you don't mind,";

-			mes "let me try this hat on";

-			mes "for just a little while.";

-			delitem 983,1;

-			delitem 7267,999;

-			delitem 749,1;

-			set Zeny,Zeny - 50000;

-			getitem 5115,1;

-			next;

-			mes "...";

-			mes "......";

-			next;

-			mes "[Mater]";

-			mes "Ahhhhhh~";

-			mes "It just feels...";

-			mes "I felt so free~";

-			mes "It was everything";

-			mes "I imagined it to be.";

-			next;

-			mes "[Mater]";

-			mes "Here, please take";

-			mes "this Winter Hat. I really";

-			mes "hope that you'll enjoy it";

-			mes "as much as I do. Well then,";

-			mes "be safe in your travels, okay?";

-			close;

-		break;

-

-		case 2:

-			mes "[Mater]";

-			mes "I'm sorry, I know that";

-			mes "I was asking a pretty big";

-			mes "favor from someone I just";

-			mes "met. I hope you understand";

-			mes "how much I really want to";

-			mes "make that Winter Hat...";

-			close;

-		break;

-		}

-	}

-	mes "[Mater]";

-	mes "Look at that blue";

-	mes "sky. Don't you wish";

-	mes "you could just soar";

-	mes "through the heavens";

-	mes "with your own wings?";

-	next;

-	mes "[Mater]";

-	mes "Of course, it's an";

-	mes "impossible dream,";

-	mes "but with this Winter Hat,";

-	mes "you can at least enjoy the";

-	mes "sensation of freedom that";

-	mes "a bird in flight must feel.";

-	next;

-	mes "[Mater]";

-	mes "If you would like";

-	mes "a hat like this, I would";

-	mes "need to have some items";

-	mes "that I don't think I can ever";

-	mes "obtain on my very own.";

-	next;

-	mes "[Mater]";

-	mes "^FF00001 Black Dyestuffs^000000,";

-	mes "^FF0000999 Tiger Panties^000000,";

-	mes "^FF00001 Frozen Rose^000000 and";

-	mes "^FF000050,000 zeny^000000. If you can";

-	mes "bring those to me, I shall";

-	mes "make you a Winter Hat.";

-	close;

-

-}

-

-lhz_in02.gat,91,38,5	script	Margaret Mary#LhzHat	90,{

-

-	mes "[Margaret Mary]";

-	mes "The white rose, in its";

-	mes "purity and simplicity, is";

-	mes "like a woman who doesn't";

-	mes "need jewels or fancy dresses";

-	mes "to look noble and beautiful. It's the perfect gift for a lady.";

-	next;

-	switch( select( "Make a Mystic Rose.", "End Conversation." ) )

-	{

-	case 1:

-		if(countitem(731) > 9 && countitem(748) > 1 && countitem(982) && Zeny > 49999)

-		{

-			mes "[Margaret Mary]";

-			mes "Ah, I see that you've brought";

-			mes "what I need to bleach the blood";

-			mes "red hue from these Witherless";

-			mes "Roses and adorn these flowers";

-			mes "with eternal elegance. May I use these items to make a Mystic Rose?";

-			next;

-			switch( select( "Yes", "No" ) )

-			{

-			case 1:

-				mes "[Margaret Mary]";

-				mes "Thank you. Please";

-				mes "next; a moment while";

-				mes "I concentrate in order to";

-				mes "preserve the natural beauty";

-				mes "of these gorgeous flowers...";

-				next;

-				mes "[Margaret Mary]";

-				mes "The rose truly is the";

-				mes "undisputed queen of all";

-				mes "flowers. All other flora must";

-				mes "humbly bow to its regal beauty.";

-				next;

-				mes "...";

-				mes "......";

-				next;

-				mes "...";

-				mes "......";

-				mes ".........";

-				next;

-				mes "[Margaret Mary]";

-				mes "There, it is finished.";

-				mes "Please remember to wear";

-				mes "your hair in an elegant and";

-				mes "refined manner when wearing";

-				mes "the Mystic Rose so as not to disgrace these beautiful flowers.";

-				delitem 731,10;

-				delitem 748,2;

-				delitem 982,1;

-				set Zeny,Zeny - 50000;

-				getitem 5117,1;

-				close;

-			break;

-

-			case 2:

-				mes "[Margaret Mary]";

-				mes "White roses with thorns";

-				mes "makes my heart beat with";

-				mes "unceasing trepidation. What";

-				mes "if I prick my finger and shed";

-				mes "blood on its snow white petals?";

-				close;

-			break;

-			}

-		}

-		mes "[Margaret Mary]";

-		mes "I love roses, but it makes";

-		mes "me sad that their beauty";

-		mes "fades far too soon. And so,";

-		mes "I've found a way to preserve";

-		mes "the beauty of the roses, so";

-		mes "that it lasts for all eternity.";

-		next;

-		mes "[Margaret Mary]";

-		mes "Do you love roses as well?";

-		mes "If you like, I can make a";

-		mes "^3131FFMystic Rose^000000 that you can wear";

-		mes "upon your crown. It's not easy";

-		mes "for me to create, but I believe that you would enjoy it greatly.";

-		next;

-		mes "[Margaret Mary]";

-		mes "Please bring me";

-		mes "^3131FF10 2 Carat Diamonds^000000,";

-		mes "^3131FF3 Witherless Roses^000000,";

-		mes "^3131FF1 White Dyestuffs^000000 and";

-		mes "^3131FF50,000 zeny^000000 if you would";

-		mes "like to have a Mystic Rose.";

-		close;

-	break;

-

-	case 2:

-		mes "[Margaret Mary]";

-		mes "White roses with thorns";

-		mes "makes my heart beat with";

-		mes "unceasing trepidation. What";

-		mes "if I prick my finger and shed";

-		mes "blood on its snow white petals?";

-		close;

-	break;

-	}

-

-}

-

-lighthalzen.gat,182,89,0	script	Rich Girl#LhzHat	91,{

-

-	if(LHZBTQ == 0)

-	{

-		mes "[Rich Girl]";

-		mes "Hmmm...?";

-		mes "What? Did you";

-		mes "need something?";

-		next;

-		switch( select( "N-Nothing.", "Um, you look so relaxed." ) )

-		{

-		case 1:

-			mes "[Rich Girl]";

-			mes "Huh.";

-			mes "Alright then.";

-			mes "Well, try not to stare";

-			mes "at people so much.";

-			close;

-		break;

-

-		case 2:

-			mes "[Rich Girl]";

-			mes "Really? You are probably";

-			mes "the twentieth person to";

-			mes "tell me that today. Mmm.";

-			mes "That's strange, isn't it?";

-			next;

-			menu "I guess.",-,"It's not strange at all.",-;

-			mes "[Rich Girl]";

-			mes "Oh yeah.";

-			mes "What's your name?";

-			mes "That is, if you don't";

-			mes "mind me asking you.";

-			next;

-			mes "[" + strcharinfo(0) + "]";

-			mes "My name is " + strcharinfo(0) + "";

-			mes "and I'm an adventurer~";

-			next;

-			mes "[Achiha]";

-			mes "Oh, one of those?";

-			mes "My name is Achiha, nice";

-			mes "to meet you. I don't really";

-			mes "do much of anything.";

-			mes "Just sit. Relax.";

-			set LHZBTQ,1;

-			emotion e_heh;

-			next;

-			mes "[Achiha]";

-			mes "I do have a hobby,";

-			mes "though. Once in a while,";

-			mes "I'll sew a hat. Do you think";

-			mes "an adventurer like you would";

-			mes "want to have a hat I made?";

-			next;

-			switch( select( "Er, I dunno.", "Sure." ) )

-			{

-			case 1:

-				mes "[Achiha]";

-				mes "Mm. I mean, the";

-				mes "Red Bonnets I make";

-				mes "might not be sturdy";

-				mes "enough for battles.";

-				mes "But what about those";

-				mes "fish and cake hats?";

-				next;

-				mes "[Achiha]";

-				mes "Hats...?";

-				mes "That look like";

-				mes "fish or cake? Mm.";

-				mes "Haha. I just got it.";

-				mes "That's, that's funny.";

-				close;

-			break;

-

-			case 2:

-				mes "[Achiha]";

-				mes "Really? Well, I can sew";

-				mes "together a ^0000FFRed Bonnet^000000.";

-				mes "It reminds most people";

-				mes "of a baby's bonnet, but";

-				mes "it does look good on";

-				mes "most people I know.";

-				next;

-				mes "[Achiha]";

-				mes "Um, did you want me";

-				mes "to make you one? I can";

-				mes "go ahead and do it if you";

-				mes "bring me some materials.";

-				mes "Since it's just for fun,";

-				mes "I won't ask for too much.";

-				next;

-				mes "[Achiha]";

-				mes "Just bring";

-				mes "^0000FF1 Green Lace^000000,";

-				mes "^0000FF1 Silk Ribbon^000000,";

-				mes "^0000FF1 Scarlet Dyestuffs^000000,";

-				mes "^0000FF1 Sunday Hat^000000 and";

-				mes "^0000FF50,000 zeny^000000.";

-				next;

-				mes "[Achiha]";

-				mes "I think I'm going";

-				mes "to just sit and relax";

-				mes "a little bit longer. But";

-				mes "if you want me to make";

-				mes "a hat for you, come back";

-				mes "with those materials, okay?";

-				set LHZBTQ,2;

-				close;

-			break;

-			}

-		break;

-		}

-	}

-	else if(LHZBTQ == 1)

-	{

-		mes "[Achiha]";

-		mes "Oh, hello.";

-		mes "Isn't it such a nice,";

-		mes "quiet, pleasant day?";

-		next;

-		switch( select( "Indeed.", "Would you please make a hat for me?" ) )

-		{

-		case 1:

-			mes "[Achiha]";

-			mes "Yeah. Today would";

-			mes "be a nice day for a";

-			mes "picnic or a long stroll.";

-			mes "But all I want to do is";

-			mes "just sit and relax...";

-			close;

-		break;

-

-		case 2:

-			mes "[Achiha]";

-			mes "What are you talking";

-			mes "about? Oh, you mean the";

-			mes "Red Bonnet? Well, I guess";

-			mes "I can make one. But I think";

-			mes "I need some materials first.";

-			next;

-			mes "[Achiha]";

-			mes "^0000FF1 Green Lace^000000,";

-			mes "^0000FF1 Silk Ribbon^000000,";

-			mes "^0000FF1 Scarlet Dyestuffs^000000,";

-			mes "^0000FF1 Sunday Hat^000000 and";

-			mes "^0000FF50,000 zeny^000000.";

-			mes "That's what I need.";

-			next;

-			mes "[Achiha]";

-			mes "Oh, but I don't";

-			mes "feel like making it";

-			mes "right now. I'm soooo";

-			mes "tired. Let me just sit,";

-			mes "relax, even if it's just";

-			mes "a little while longer...";

-			set LHZBTQ,2;

-			close;

-		break;

-		}

-	}

-	else if(LHZBTQ == 2)

-	{

-		mes "[Achiha]";

-		mes "Oh, good, you're here.";

-		mes "I've been next;ing for you.";

-		mes "Did you bring everything that";

-		mes "you need to make a ^0000FFRed Bonnet^000000?";

-		next;

-		switch( select( "Yes.", "I forgot what I need." ) )

-		{

-		case 1:

-			if(countitem(10015) < 1 || countitem(10007) < 1 || countitem(975) < 1 || countitem(5032) < 1 || Zeny < 50000)

-			{

-				mes "[Achiha]";

-				mes "Uh oh.";

-				mes "You forgot";

-				mes "a couple things.";

-				mes "Would you like me";

-				mes "to remind you what";

-				mes "you need to bring?";

-				next;

-				mes "[Achiha]";

-				mes "^0000FF1 Green Lace^000000,";

-				mes "^0000FF1 Silk Ribbon^000000,";

-				mes "^0000FF1 Scarlet Dyestuffs^000000,";

-				mes "^0000FF1 Sunday Hat^000000 and";

-				mes "^0000FF50,000 zeny^000000. Come back";

-				mes "when you're ready, okay?";

-				close;

-			}

-			mes "[Achiha]";

-			mes "Oh, you brought";

-			mes "everything. That's";

-			mes "good. Okay, just give";

-			mes "it to me. Um, let's see.";

-			next;

-			mes "[Achiha]";

-			mes "Well, I'm finished.";

-			mes "^333333*Yawn*^000000 And now I'm";

-			mes "even more tired. Here,";

-			mes "take this Red Bonnet.";

-			mes "I hope you like it~";

-			mes "I think I'll relax now...";

-			delitem 10015,1;

-			delitem 10007,1;

-			delitem 975,1;

-			delitem 5032,1;

-			set Zeny,Zeny - 50000;

-			getitem 5109,1;

-			set LHZBTQ,3;

-			next;

-			mes "[Achiha]";

-			mes "I hope you will enjoy the hat~";

-			close;

-		break;

-

-		case 2:

-			mes "[Achiha]";

-			mes "Oh, you really";

-			mes "forgot? Oh dear,";

-			mes "let me try to remember.";

-			mes "I didn't forget too, did I?";

-			mes "Oh next;, I remember now...";

-			next;

-			mes "[Achiha]";

-			mes "^0000FF1 Green Lace^000000,";

-			mes "^0000FF1 Silk Ribbon^000000,";

-			mes "^0000FF1 Scarlet Dyestuffs^000000,";

-			mes "^0000FF1 Sunday Hat^000000 and";

-			mes "^0000FF50,000 zeny^000000. Come back";

-			mes "when you're ready, okay?";

-			close;

-		break;

-		}

-	}

-	else if(LHZBTQ == 3)

-	{

-		mes "[Achiha]";

-		mes "Oh, I remember you.";

-		mes "You're the adventurer";

-		mes "who likes my Red Bonnets";

-		mes "so much. Did you want me";

-		mes "to make another one for you?";

-		next;

-		switch( select( "Yes.", "I forgot what I need." ) )

-		{

-		case 1:

-			if(countitem(10015) < 1 || countitem(10007) < 1 || countitem(975) < 1 || countitem(5032) < 1 || Zeny < 50000)

-			{

-				mes "[Achiha]";

-				mes "Uh oh.";

-				mes "You forgot";

-				mes "a couple things.";

-				mes "Would you like me";

-				mes "to remind you what";

-				mes "you need to bring?";

-				next;

-				mes "[Achiha]";

-				mes "^0000FF1 Green Lace^000000,";

-				mes "^0000FF1 Silk Ribbon^000000,";

-				mes "^0000FF1 Scarlet Dyestuffs^000000,";

-				mes "^0000FF1 Sunday Hat^000000 and";

-				mes "^0000FF50,000 zeny^000000. Come back";

-				mes "when you're ready, okay?";

-				close;

-			}

-			mes "[Achiha]";

-			mes "Oh, you brought";

-			mes "everything. That's";

-			mes "good. Okay, just give";

-			mes "it to me. Um, let's see.";

-			next;

-			mes "[Achiha]";

-			mes "Well, I'm finished.";

-			mes "^333333*Yawn*^000000 And now I'm";

-			mes "even more tired. Here,";

-			mes "take this Red Bonnet.";

-			mes "I hope you like it~";

-			mes "I think I'll relax now...";

-			delitem 10015,1;

-			delitem 10007,1;

-			delitem 975,1;

-			delitem 5032,1;

-			set Zeny,Zeny - 50000;

-			getitem 5109,1;

-			next;

-			mes "[Achiha]";

-			mes "I hope you will enjoy the hat~";

-			close;

-		break;

-

-		case 2:

-			mes "[Achiha]";

-			mes "Oh, you really";

-			mes "forgot? Oh dear,";

-			mes "let me try to remember.";

-			mes "I didn't forget too, did I?";

-			mes "Oh next;, I remember now...";

-			next;

-			mes "[Achiha]";

-			mes "^0000FF1 Green Lace^000000,";

-			mes "^0000FF1 Silk Ribbon^000000,";

-			mes "^0000FF1 Scarlet Dyestuffs^000000,";

-			mes "^0000FF1 Sunday Hat^000000 and";

-			mes "^0000FF50,000 zeny^000000. Come back";

-			mes "when you're ready, okay?";

-			close;

-		break;

-		}

-	}

-

-}

-

-gl_prison1.gat,137,138,5	script	Zealotus#LhzHat	1200,{

-

-	if(ZLMASKQ == 0)

-	{

-		mes "[Zealotus]";

-		mes "Kneel, worm!";

-		mes "As ruler of this";

-		mes "Underground Prison,";

-		mes "I command all who step";

-		mes "into my private realm!";

-		next;

-		mes "[Zealotus]";

-		mes "Resist, and you shall be";

-		mes "punished! Grovel and kiss";

-		mes "my feet, and perhaps you";

-		mes "might be spared. Hohohohoho!";

-		next;

-		switch( select(  "Oh, your highness!", "Whatever." ) )

-		{

-		case 1:

-			mes "[Zealotus]";

-			mes "The submissive woman is";

-			mes "nothing but an ideal dream";

-			mes "for the arrogant male! A true";

-			mes "woman revels in her power to";

-			mes "have her man do her bidding!";

-			next;

-			switch( select( "Yes, it's so true!", "Boooo!" ) )

-			{

-			case 1:

-				mes "[Zealotus]";

-				mes "However, in my lust for power, I may have inadventently crushed";

-				mes "the spirits of my beloved a little too harshly. His pride crumbled,";

-				mes "my man even cowers in front of the humans! It pains me to see it.";

-				next;

-				mes "[Zealotus]";

-				mes "It is beneath me to ask";

-				mes "this of you, but it will take";

-				mes "a human like you to make";

-				mes "him remember who he truly is,";

-				mes "a proud creature of darkness";

-				mes "who should fear only me!";

-				next;

-				mes "[Zealotus]";

-				mes "Human. I offer you a small";

-				mes "share of my power if you can";

-				mes "take the pathetic, weeping lump";

-				mes "of monster crying in the corner";

-				mes "of this prison and make him";

-				mes "realize his true nature.";

-				set ZLMASKQ,1;

-				close;

-			break;

-

-			case 2:

-				mes "[Zealotus]";

-				mes "You dirty, dirty human...";

-				mes "How dare you have an ";

-				mes "opinion different than mine!";

-				mes "No matter. The day will come";

-				mes "when all of your race shall";

-				mes "address me only as \"queen.\"";

-				close;

-			break;

-			}

-		break;

-

-		case 2:

-			mes "[Zealotus]";

-			mes "Mortal simpleton!";

-			mes "Bah! The mocking of";

-			mes "a boorish cur is worthless";

-			mes "to me. I have all the time in";

-			mes "the world to grind your pride";

-			mes "to dust beneath my heels.";

-			close;

-		break;

-		}

-	}

-	else if(ZLMASKQ > 0 && ZLMASKQ < 6)

-	{

-		mes "[Zealotus]";

-		mes "Hm. If my beloved is";

-		mes "acting stubborn or refuses";

-		mes "to listen, feel free to take";

-		mes "drastic measures. Just think";

-		mes "of what I would do in your";

-		mes "place. Ohohohohoho~!";

-		close;

-	}

-	else if(ZLMASKQ == 6)

-	{

-		mes "[Zealotus]";

-		mes "Ooh, you're back.";

-		mes "Phendark is certainly";

-		mes "back to his old self again,";

-		mes "thanks to your efforts, human.";

-		mes "Yes, his anger, his courage";

-		mes "and passion are all restored~";

-		next;

-		mes "[Zealotus]";

-		mes "As I promised, I shall";

-		mes "grant you a share of my";

-		mes "power. However, I will need";

-		mes "some items to form this minor";

-		mes "contract between you and me.";

-		next;

-		mes "[Zealotus]";

-		mes "I will need";

-		mes "^3131FF1 Cat's Eye^000000,";

-		mes "^3131FF1 Forbidden Red Candle^000000 and";

-		mes "^3131FF30 Worn-Out Magic Scrolls^000000.";

-		mes "Then, I can grant you a measure";

-		mes "of my power as I've promised.";

-		set ZLMASKQ,7;

-		close;

-	}

-	else if(ZLMASKQ == 7)

-	{

-		if(countitem(7263) && countitem(660) && countitem(7099) > 29)

-		{

-			mes "[Zealotus]";

-			mes "I see that you have";

-			mes "brought what I need to";

-			mes "complete the contract";

-			mes "between you and me,";

-			mes "human. Let's begin...";

-			next;

-			mes "^3355FFZealotus takes the red";

-			mes "candle you've given her and";

-			mes "drips the wax into her open";

-			mes "palm. The Cat's Eye begins";

-			mes "to glow with an eerie light.^000000";

-			next;

-			mes "[Zealotus]";

-			mes "Now, place your index";

-			mes "finger into my palm so";

-			mes "that we may complete the";

-			mes "final step of this contract...";

-			next;

-			switch( select( "Don't complete the contract.", "Complete the contract." ) )

-			{

-			case 1:

-				mes "[Zealotus]";

-				mes "Hm? What are you";

-				mes "afraid of? This is a";

-				mes "minor contract, so";

-				mes "you are not selling me";

-				mes "your soul, or anything";

-				mes "else for that matter.";

-				close;

-			break;

-

-			case 2:

-				mes "[Zealotus]";

-				mes "I, Zealotus, as ruler";

-				mes "of this realm, seal this";

-				mes "eternal contract with this";

-				mes "Forbidden Red Candle.";

-				next;

-				mes "[Zealotus]";

-				mes "" + strcharinfo(0) + " will";

-				mes "forever have a share";

-				mes "in my power. Those that";

-				mes "bow to me must also bow";

-				mes "to " + strcharinfo(0) + ". It shall be done.";

-				specialeffect 196; //Curse? EF_DEVIL

-				specialeffect 192; //Poison attack? EF_POISONHIT

-				next;

-				mes "[Zealotus]";

-				mes "Human, take this";

-				mes "mask with you as an";

-				mes "everlasting token of our";

-				mes "contract. So long as you";

-				mes "carry this, I will be at your";

-				mes "side. So says Zealotus!";

-				delitem 7263,1;

-				delitem 660,1;

-				delitem 7099,30;

-				getitem2 5121,1,1,0,0,254,0,getcharid(0)&0xffff,(getcharid(0)>>16)&0xffff;

-				set ZLMASKQ,8;

-				close;

-			break;

-			}

-		}

-		mes "[Zealotus]";

-		mes "I will need";

-		mes "^3131FF1 Cat's Eye^000000,";

-		mes "^3131FF1 Forbidden Red Candle^000000 and";

-		mes "^3131FF30 Worn-Out Magic Scrolls^000000.";

-		mes "Then, I can grant you a measure";

-		mes "of my power as I've promised.";

-		close;

-	}

-	else if(ZLMASKQ == 8)

-	{

-		mes "[Zealotus]";

-		mes "Ah, I greet you in";

-		mes "peace, human. Behold,";

-		mes "the splendor of our realm!";

-		mes "Though, I do not blame you";

-		mes "if you have no interest in";

-		mes "commanding these Injustices...";

-		next;

-		mes "[Zealotus]";

-		mes "Thanks to your help,";

-		mes "my Phendark has returned";

-		mes "to his old, monstrously";

-		mes "passionate ways. Now I can";

-		mes "show him the stinging love";

-		mes "of my whip! Hohohohohoho!";

-		emotion e_kis;

-		close;

-	}

-

-}

-

-gl_prison1.gat,97,104,1	script	Phendark#LhzHat	1202,{

-

-	if(ZLMASKQ == 0)

-	{

-		mes "[Phendark]";

-		mes "Huh? Oh no!";

-		mes "Another h-human?!";

-		mes "P-please! S-stay away,";

-		mes "don't come near me!";

-		close;

-	}

-	else if(ZLMASKQ == 1)

-	{

-		if(countitem(1164) || isequipped(1164))set @whipcount,@whipcount+1;

-		if(countitem(1165) || isequipped(1165))set @whipcount,@whipcount+1;

-		if(countitem(1166) || isequipped(1166))set @whipcount,@whipcount+1;

-		if(countitem(1167) || isequipped(1167))set @whipcount,@whipcount+1;

-		if(countitem(1168) || isequipped(1168))set @whipcount,@whipcount+1;

-		if(countitem(1169) || isequipped(1169))set @whipcount,@whipcount+1;

-		if(countitem(1170) || isequipped(1170))set @whipcount,@whipcount+1;

-		if(countitem(1261) || isequipped(1261))set @whipcount,@whipcount+1;

-		if(countitem(1363) || isequipped(1363))set @whipcount,@whipcount+1;

-		mes "[Phendark]";

-		mes "Huh? Oh no!";

-		mes "Another h-human?!";

-		mes "P-please! S-stay away,";

-		mes "don't come near me!";

-		next;

-		mes "[Phendark]";

-		mes "I... I swear!";

-		mes "I'm not carrying any";

-		mes "rare items or stuff you";

-		mes "can wear, so please don't";

-		mes "beat me! I... Oh my god, you";

-		mes "don't believe me, don't you?";

-		next;

-		mes "[Phendark]";

-		mes "You humans never leave";

-		mes "me alone! Why do you have";

-		mes "to bully me like this?! I'm";

-		mes "honestly not carrying anything";

-		mes "of value! Z-Zealotus, please!";

-		mes "Zealotus, heeeeeelp me~!";

-		emotion e_sob;

-		if(!@whipcount)close;

-		next;

-		mes "[" + strcharinfo(0) + "]";

-		mes "You're pathetic!";

-		mes "Aren't you supposed";

-		mes "to be a monster? You know";

-		mes "what Zealotus would do if";

-		mes "she were actually here?";

-		next;

-		mes "[Phendark]";

-		mes "^333333*Sniff...*^000000";

-		mes "P-probably...";

-		mes "Probably whip me.";

-		next;

-		mes "^3355FFYou nonchalantly^000000";

-		mes "^3355FFbrandish your Whip.^000000";

-		next;

-		mes "[" + strcharinfo(0) + "]";

-		mes "That's right.";

-		next;

-		mes "^3355FF*Snap!*";

-		mes "*Snap!*";

-		mes "*Crack crack crack!*";

-		mes "*Snap snap snap crack!*^000000";

-		next;

-		mes "[Phendark]";

-		mes "Oh! That stinging pain";

-		mes "that burns with bloodlust!";

-		mes "It's almost as good as";

-		mes "Zealtos's whip of love!";

-		next;

-		mes "[Phendark]";

-		mes "Zealotus...";

-		mes "She must be pissed";

-		mes "at me, but I just can't";

-		mes "stop being afraid of all";

-		mes "you humans! Damn it all!";

-		set ZLMASKQ,2;

-		close;

-	}

-	else if(ZLMASKQ == 2 || ZLMASKQ == 3)

-	{

-		if(countitem(7315) > 368 && ZLMASKQ == 3)

-		{	

-			mes "[Phendark]";

-			mes "Y-you again!";

-			mes "Why do you hound me?!";

-			mes "Th-there's nothing I can";

-			mes "give you, so please don't";

-			mes "hurt me! Oh, oh p-please...!";

-			emotion e_swt2;

-			next;

-			switch( select( "Feed him Dark Crystal Fragment.", "Threaten him." ) )

-			{

-			case 1:

-				mes "[Phendark]";

-				mes "What...? You want";

-				mes "me to eat these?";

-				mes "It doesn't seem natural,";

-				mes "but if Rybio says I should,";

-				mes "it might not be that bad.";

-				next;

-				mes "...";

-				mes "......";

-				next;

-				mes "[Phendark]";

-				mes "What's supposed to";

-				mes "happen now? My inner";

-				mes "demon is supposed to";

-				mes "awaken by eating these?";

-				mes "That sounds ridiculous!";

-				mes "Though, I did just eat crystal.";

-				next;

-				mes "[Phendark]";

-				mes "Wh-whoa. Ugh!";

-				mes "My chest! Something's";

-				mes "burning inside! I c-can't--!";

-				mes "Can't think straight... I'm...";

-				mes "Slowly... Losing my humanity!";

-				next;

-				mes "[Phendark]";

-				mes "Huh... Huuurg--!";

-				mes "Huk-huk! Heeeeh!";

-				mes "Heeeeeh! Waaoooooh!";

-				next;

-				mes "[Phendark]";

-				mes "...";

-				mes "Grrrrr...!";

-				next;

-				mes "[Phendark]";

-				mes "^333333*Pant pant*^000000";

-				mes "What... just...";

-				mes "What happened?";

-				set ZLMASKQ,4;

-				delitem 7315,369;

-				close;

-			break;

-

-			case 2:

-				mes "[" + strcharinfo(0) + "]";

-				mes "So what happens";

-				mes "if I don't decide not";

-				mes "to hurt you? Whatcha";

-				mes "gonna do then, huh?";

-				next;

-				mes "...";

-				mes "......";

-				next;

-				mes "[Phendark]";

-				mes "S-stop it!";

-				mes "Just--Just stop it!";

-				close;

-			break;

-			}

-		}

-		mes "[Phendark]";

-		mes "Humans...";

-		mes "They're everywhere!";

-		mes "You guys--I can't...";

-		mes "You're torturing me!";

-		emotion e_sob;

-		close;

-	}

-	else if(ZLMASKQ == 4)

-	{

-		mes "[Phendark]";

-		mes "My chest was on fire,";

-		mes "like I was, I dunno,";

-		mes "burning with anger or";

-		mes "something. It's gone";

-		mes "now, but what were";

-		mes "those crystals?";

-		close;

-	}

-	else if(ZLMASKQ == 5)

-	{

-		mes "[Phendark]";

-		mes "You again? Oh no,";

-		mes "you're not going to hurt";

-		mes "me or make me eat those";

-		mes "weird crystals again, are you?";

-		next;

-		mes "^3131FF[" + strcharinfo(0) + "]^000000";

-		switch( select( "Rybio", "Injustice", "Zealotus" ) )

-		{

-		case 1:

-			mes "Rybio";

-			set @temp1,1;

-		break;

-

-		case 2:

-			mes "Injustice";

-			set @temp1,2;

-		break;

-

-		case 3:

-			mes "Zealotus";

-			set @temp1,3;

-		break;

-		}

-		switch( select( "hates", "likes" ) )

-		{

-		case 1:

-			mes "hates";

-			set @temp2,1;

-		break;

-

-		case 2:

-			mes "likes";

-			set @temp2,2;

-		break;

-		}

-		switch( select( "Rybio.", "Injustice.", "Phendark.", "Zealotus." ) )

-		{

-		case 1:

-			mes "Rybio.";

-		break;

-

-		case 2:

-			mes "Injustice.";

-		break;

-

-		case 3:

-			if((@temp1 == 1 || @temp1  == 2) && @temp2 == 1)

-			{

-				mes "[Phendark]";

-				mes "I can't believe";

-				mes "something like that!";

-				mes "Oh, that doesn't matter.";

-				mes "Zealotus is too good for me.";

-				mes "I'm not even worthy of tasting";

-				mes "the sting of her Love Whip.";

-				emotion e_sob;

-				close;

-			}

-			else if(@temp1 == 3 && @temp2 == 1)

-			{

-				mes "[Phendark]";

-				mes "...";

-				mes "......";

-				mes "Hates me?";

-				mes "N-no, that can't--";

-				mes "I didn't, that doesn't--";

-				next;

-				mes "[Phendark]";

-				mes "Huh...?";

-				mes "What is that";

-				mes "supposed to mean?";

-				close;

-			}

-			else if(@temp1 == 3 && @temp2 == 2)

-			{

-				mes "[Phendark]";

-				mes "I can't believe";

-				mes "something like that!";

-				mes "Oh, that doesn't matter.";

-				mes "Zealotus is too good for me.";

-				mes "I'm not even worthy of tasting";

-				mes "the sting of her Love Whip.";

-				emotion e_sob;

-				close;

-			}

-		break;

-

-		case 4:

-			mes "Zealotus.";

-		break;

-		}

-		switch( select( "Insult him.", "Apologize." ) )

-		{

-		case 1:

-			mes "[" + strcharinfo(0) + "]";

-			mes "First of all,";

-			mes "what exactly sets";

-			mes "you apart from all the";

-			mes "other eligible monsters";

-			mes "that she can choose from?";

-			mes "Not like you're much better...";

-			next;

-			mes "[Phendark]";

-			mes "...";

-			mes "......";

-			next;

-			switch( select( "Break his pride.", "Tell him you were joking." ) )

-			{

-			case 1:

-				mes "^3131FF[" + strcharinfo(0) + "]^000000";

-				mes "I mean, there are guys";

-				mes "like Bloody Murderer out";

-				mes "there who are more evil";

-				mes "than you, and best of all,";

-				mes "not afraid of humans!";

-				next;

-				switch( select( "Go for the low blow.", "Try to salvage his confidence." ) )

-				{

-				case 1:

-					mes "[" + strcharinfo(0) + "]";

-					mes "You know, me and Zealotus";

-					mes "were actually talking about";

-					mes "you recently. She told me that";

-					mes "the sight of you makes her";

-					mes "feel sick! I mean, what kind";

-					mes "of monster is afraid of humans?";

-					next;

-					mes "[" + strcharinfo(0) + "]";

-					mes "Now you've reached the";

-					mes "point where even Injustice";

-					mes "is manlier than you now,";

-					mes "if you know what I mean!";

-					mes "Hahahahahahahahaha!";

-					next;

-					mes "[Phendark]";

-					mes "...";

-					mes "......";

-					next;

-					mes "[Phendark]";

-					mes "...";

-					mes "......";

-					mes ".........";

-					next;

-					mes "[Phendark]";

-					mes "...";

-					mes "......";

-					mes ".........";

-					mes "............";

-					next;

-					mes "[Phendark]";

-					mes "GRRRRRR!";

-					mes "THAT'S ENOUGH!";

-					emotion e_ag;

-					next;

-					mes "[Phendark]";

-					mes "I don't care who the";

-					mes "hell she is, I'm going";

-					mes "to see Zealotus and give";

-					mes "that tramp a piece of my";

-					mes "mind! Grrrr! She'll be sorry!";

-					set ZLMASKQ,6;

-					emotion e_an;

-					close;

-				break;

-

-				case 2:

-					mes "^3131FF[" + strcharinfo(0) + "]^000000";

-					mes "But know that I think";

-					mes "about it, maybe you look";

-					mes "much tougher than that";

-					mes "Bloody Murderer guy.";

-					next;

-					mes "[Phendark]";

-					mes "*Sniff sniff*";

-					mes "You really think so?";

-					next;

-					mes "...";

-					mes "......";

-					next;

-					mes "[" + strcharinfo(0) + "]";

-					mes "...Yeeeeeah.";

-					close;

-				break;

-				}

-			break;

-

-			case 2:

-				mes "[" + strcharinfo(0) + "]";

-				mes "But now that I think";

-				mes "about it, you actually";

-				mes "are much better than all";

-				mes "those other monsters.";

-				mes "That stuff I said before?";

-				mes "I was just kidding you.";

-				next;

-				mes "[Phendark]";

-				mes "^333333*Sniff!*^000000";

-				mes "You're...";

-				mes "Not helping!";

-				close;

-			break;

-			}

-		break;

-

-		case 2:

-			mes "[" + strcharinfo(0) + "]";

-			mes "I...";

-			mes "I was just kidding!";

-			mes "How could she hate";

-			mes "somebody like you?";

-			next;

-			mes "[Phendark]";

-			mes "No... No.";

-			mes "You're right.";

-			mes "I don't deserve love.";

-			mes "Not from Zealotus or";

-			mes "from anybody else...";

-			close;

-		break;

-		}

-	}

-	else if(ZLMASKQ > 5)

-	{

-		mes "[Phendark]";

-		mes "Zealotus! How dare";

-		mes "she say those things";

-		mes "against me! Less manly";

-		mes "than Injustice?! I'll just";

-		mes "have to prove her wrong!";

-		mes "Out the way, pithy human!";

-		close;

-	}

-

-}

-

-gl_prison1.gat,100,48,5	script	Rybio#LhzHat	1201,{

-

-	if(ZLMASKQ == 2)

-	{

-		mes "[Rybio]";

-		mes "You know, I usually just";

-		mes "run up and slash like crazy";

-		mes "once I see you humans, but";

-		mes "my heart's not in it today, so";

-		mes "I'm gonna give you just one";

-		mes "chance to run for your life.";

-		next;

-		switch( select( "Talk about Phendark.", "Run for your life." ) )

-		{

-		case 1:

-			mes "[Rybio]";

-			mes "What th--? You know the";

-			mes "same Phendark I know?";

-			mes "Dayam, that's weird. But";

-			mes "yeah, him and Zealotus have";

-			mes "some kind of... I dunno what";

-			mes "it is, actually. Um, love?";

-			next;

-			mes "[Rybio]";

-			mes "Anyway, Phendark has";

-			mes "been acting really weird";

-			mes "lately. I guess Zealotus";

-			mes "loved him to the point that";

-			mes "she abused him to the point";

-			mes "that he's scared of humans now.";

-			next;

-			mes "[Rybio]";

-			mes "Huh. You know what'd help?";

-			mes "Dark Crystal Fragments. It's";

-			mes "worthless to humans, but if";

-			mes "creatures of darkness eat it,";

-			mes "it brings out more of their";

-			mes "inner demon. Scary, huh?";

-			next;

-			mes "[Rybio]";

-			mes "Since Phendark's pretty big, and he's acting like a total wuss, you";

-			mes "you should probably get him to eat ^3131FF369 Dark Crystal Fragments^000000. Don't";

-			mes "worry, you should be able to find those all over Rune-Midgard.";

-			next;

-			mes "[Rybio]";

-			mes "I dunno why a human";

-			mes "like you would want to";

-			mes "help one of us out, though.";

-			mes "What's in it for you, exactly?";

-			set ZLMASKQ,3;

-			close;

-		break;

-

-		case 2:

-			mes "[Rybio]";

-			mes "That's right!";

-			mes "Run, get outta here!";

-			mes "If you're not fast enough,";

-			mes "I might eat you, human!";

-			mes "...Well... Probably not.";

-			close;

-		break;

-		}

-	}

-	else if(ZLMASKQ == 3)

-	{

-		mes "[Rybio]";

-		mes "I don't get why someone";

-		mes "like you, a seemingly heroic";

-		mes "adventurer, would want to help";

-		mes "out Phendark? Did Zealotus";

-		mes "blackmail you or something?";

-		next;

-		mes "[Rybio]";

-		mes "Well, you could";

-		mes "probably help him";

-		mes "by getting him to eat";

-		mes "^3131FF369 Dark Crystal Fragments^000000";

-		mes "to sort of stir up the demon";

-		mes "that sleeping within, you know?";

-		close;

-	}

-	else if(ZLMASKQ == 4)

-	{

-		mes "[Rybio]";

-		mes "Feeding him all of those";

-		mes "Dark Crystal Fragments didn't";

-		mes "work? But that was supposed";

-		mes "to be foolproof! Dayam, what";

-		mes "the hell happened to Phendark's";

-		mes "inner demon?! Man oh man...";

-		next;

-		mes "[Rybio]";

-		mes "Well, I don't know what";

-		mes "else you could try. I mean,";

-		mes "maybe you could try motivating";

-		mes "him. Reverse psychology?";

-		mes "It's weird talking about this";

-		mes "with a human. Hahahaha~";

-		set ZLMASKQ,5;

-		close;

-	}

-	else if(ZLMASKQ == 5)

-	{

-		mes "[Rybio]";

-		mes "Phendark sure looks";

-		mes "tough, but I guess even";

-		mes "he isn't totally evil. Yeah.";

-		mes "We monsters aren't all";

-		mes "bad... Just mostly bad.";

-		close;

-	}

-

-}

+//===== eAthena Script ======================================= 
+//= 2005 Headgear Quests
+//===== By: ================================================== 
+//= MasterOfMuppets
+//===== Current Version: ===================================== 
+//= 1.0
+//===== Compatible With: ===================================== 
+//= eAthena
+//===== Description: ========================================= 
+//= 2005 Headgears Official Quest.
+//===== Additional Comments: =================================
+// 1.0 First version, converted from the official aegis script. [MasterOfMuppets]
+//============================================================ 
+
+yuno.gat,222,116,3	script	Kasis#LhzHat	851,{
+
+	if(countitem(519) > 49 && countitem(7031) > 49 && countitem(548) > 49 && countitem(539) > 49)
+	{
+		mes "[Kasis]";
+		mes "Milk, Cheese,";
+		mes "Old Frying Pans,";
+		mes "Pieces of Cake...";
+		mes "Th-that's everything";
+		mes "I need to make lunch for";
+		mes "my friends in the Factory!";
+		next;
+		switch( select( "Well, I did promise to help you.", "What are you talking about?" ) )
+		{
+		case 1:
+			mes "[Kasis]";
+			mes "Finally, I can treat my";
+			mes "buddies to a wonderful";
+			mes "feast! They'll be so pleased!";
+			mes "Oh, I'd really like to repay you";
+			mes "somehow, but I'm not sure";
+			mes "what I could possibly give...";
+			next;
+			mes "[Kasis]";
+			mes "Of course! Why don't";
+			mes "you treat yourself to";
+			mes "my specialty, Kasis's";
+			mes "Crunch Toast? It looks";
+			mes "simple, but it actually";
+			mes "requires great skill to make.";
+			next;
+			mes "[Kasis]";
+			mes "Here you are!";
+			mes "Please enjoy this and always";
+			mes "remember that breakfast is the";
+			mes "most important meal of the day!";
+			mes "Now, I better prepare those";
+			mes "lunches. Goodbye, my friend~";
+			delitem 519,50;
+			delitem 7031,50;
+			delitem 548,50;
+			delitem 539,50;
+			getitem 5107,1;
+			close;
+		break;
+
+		case 2:
+			mes "[Kasis]";
+			mes "Oh...";
+			mes "Oh, I'm so sorry.";
+			mes "I must have confused";
+			mes "you with someone else.";
+			next;
+			mes "[Kasis]";
+			mes "You see, I've been asking";
+			mes "adventurers that have been";
+			mes "passing through to provide";
+			mes "me with food supplies so that";
+			mes "I can make lunch for my friends";
+			mes "that are working in Einbroch.";
+			next;
+			mes "[Kasis]";
+			mes "Yes...";
+			mes "So...";
+			mes "Sorry...";
+			mes "To... Bother you.";
+			next;
+			mes "^3355FFAs if entranced,";
+			mes "Kasis continues to";
+			mes "stare at the Milk, Cheese";
+			mes "Old Frying Pans and Pieces";
+			mes "of Cake that you are carrying.^000000";
+			next;
+			switch( select( "You can have these if you want.", "Um, why are you staring?" ) )
+			{
+			case 1:		
+				mes "[Kasis]";
+				mes "Really? Is it alright";
+				mes "with you for me to have";
+				mes "all of this Milk, Cheese,";
+				mes "Pieces of Cake and these";
+				mes "Old Frying Pans? Oh, bless";
+				mes "your kind heart, adventurer~";
+				next;
+				mes "[Kasis]";
+				mes "Finally, I can treat my";
+				mes "buddies to a wonderful";
+				mes "feast! They'll be so pleased!";
+				mes "Oh, I'd really like to repay you";
+				mes "somehow, but I'm not sure";
+				mes "what I could possibly give...";
+				next;
+				mes "[Kasis]";
+				mes "Of course! Why don't";
+				mes "you treat yourself to";
+				mes "my specialty, Kasis's";
+				mes "Crunch Toast? It looks";
+				mes "simple, but it actually";
+				mes "requires great skill to make.";
+				next;
+				mes "[Kasis]";
+				mes "Here you are!";
+				mes "Please enjoy this and always";
+				mes "remember that breakfast is the";
+				mes "most important meal of the day!";
+				mes "Now, I better prepare those";
+				mes "lunches. Goodbye, my friend~";
+				delitem 519,50;
+				delitem 7031,50;
+				delitem 548,50;
+				delitem 539,50;
+				getitem 5107,1;
+				close;
+			break;
+
+			case 2:
+				mes "[Kasis]";
+				mes "Oh, let me apologize";
+				mes "again. But I can't help";
+				mes "but admire the quality of";
+				mes "your goods. Er, you know,";
+				mes "the food you're carrying. I'm";
+				mes "a chef by trade, after all.";
+				close;
+			break;
+			}
+		break;
+		}
+	}
+	mes "[Kasis]";
+	mes "I'm sorry, but we're closed";
+	mes "right now. Unfortunately, we";
+	mes "don't have any more bread";
+	mes "in stock. ^333333*Siiiiiiiiigh...*^000000";
+	next;
+	switch( select( "Is something wrong?", "End Conversation." ) )
+	{
+	case 1:
+		mes "[Kasis]";
+		mes "Well, my current contract";
+		mes "with the company that's been";
+		mes "providing me with ingredients";
+		mes "has expired. Of course, it's";
+		mes "bad enough that I don't have";
+		mes "the food to run this business.";
+		next;
+		mes "[Kasis]";
+		mes "But I also feel like I'm";
+		mes "letting my friends down.";
+		mes "You see, I've been sending";
+		mes "them lunch every day since";
+		mes "they've been working in the";
+		mes "Factory over in Einbroch.";
+		next;
+		mes "[Kasis]";
+		mes "I'm unable to make";
+		mes "lunch for them at the";
+		mes "moment, but I really want to";
+		mes "help my buddies, especially";
+		mes "since their financial situation";
+		mes "seems pretty bad right now.";
+		next;
+		switch( select( "Do you want me to help you?", "I'm so sorry to hear that." ) )
+		{
+		case 1:
+			mes "[Kasis]";
+			mes "Sure, I'm willing to accept";
+			mes "help from wherever I can find";
+			mes "it. If you would, I'd like you to bring me some food supplies";
+			mes "that I can use to make lunches";
+			mes "for my friends at the Factory.";
+			next;
+			mes "[Kasis]";
+			mes "Would you";
+			mes "please get me";
+			mes "^4D4DFF50 Milk^000000,";
+			mes "^4D4DFF50 Cheese^000000,";
+			mes "^4D4DFF50 Pieces of Cake^000000 and";
+			mes "^4D4DFF50 Old Frying Pans^000000?";
+			next;
+			mes "[Kasis]";
+			mes "I'd really appreciate";
+			mes "your help. My friends seem";
+			mes "so depressed to be working";
+			mes "in the Factory and I want to";
+			mes "do all I can to cheer them up.";
+			mes "Thanks for your kind offer~";
+			close;
+		break;
+
+		case 2:
+			mes "[Kasis]";
+			mes "I'm trying to renew";
+			mes "my contract with the";
+			mes "company that's been";
+			mes "providing me with food";
+			mes "supplies, but it hasn't";
+			mes "been working out so far...";
+			next;
+			mes "[Kasis]";
+			mes "I don't know what's";
+			mes "happening, but hopefully";
+			mes "I can find a new supplier";
+			mes "soon. There are my friends";
+			mes "to worry about, as well as";
+			mes "the sake of my business.";
+			close;
+		break;
+		}
+	break;
+
+	case 2:
+		mes "[Kasis]";
+		mes "Anyway, please come";
+		mes "again. Hopefully, we'll";
+		mes "have some good bread";
+		mes "in stock next time, okay?";
+		close;
+	break;
+	}
+
+}
+
+lighthalzen.gat,143,68,0	script	Strange Guy#LhzHat	47,{
+
+	if(DTHATQ == 0)
+	{
+		mes "[Strange Guy]";
+		mes "Wait! Don't say";
+		mes "anything! You must be";
+		mes "an adventurer from the";
+		mes "Rune-Midgarts Kingdom!";
+		mes "So... I'm right, aren't I?";
+		next;
+		switch( select( "Who are you?", "How did you know?", "Ignore him." ) )
+		{
+		case 1:
+			mes "[Morris]";
+			mes "Allow me to";
+			mes "introduce myself.";
+			mes "My name is Morris Poe,";
+			mes "detective of great acclaim";
+			mes "and world wide fame.";
+			next;
+			switch( select( "I've never heard of you.", "You're kidding me.", "I'm outta here." ) )
+			{
+			case 1:
+				mes "[Morris]";
+				mes "Morris Poe?";
+				mes "Renown detective?";
+				mes "Advocate for justice in";
+				mes "the Schwaltzvalt Republic?";
+				mes "Surely you recognize one";
+				mes "of my esteemed titles.";
+				next;
+				switch( select( "Nope, I don't know you.", "You're Morris Poe?!" ) )
+				{
+				case 1:
+					mes "[Morris]";
+					mes "You don't...?";
+					mes "But I'm a famous hero.";
+					mes "Children look up to me";
+					mes "and wish they'd grow";
+					mes "up to be as smart as me.";
+					next;
+					mes "[Morris]";
+					mes "I don't get it.";
+					mes "I'm famouser than";
+					mes "that. A household name";
+					mes "even. I've got a sterling";
+					mes "public image, how could";
+					mes "you never have heard of me...?";
+					close;
+				break;
+
+				case 2:
+				break;
+				}
+			break;
+
+			case 2:
+				mes "[Morris]";
+				mes "Kidding? Ha ha!";
+				mes "Look at these keen,";
+				mes "deductive and deeply";
+				mes "analytical eyes and";
+				mes "tell me I'm joking.";
+				next;
+				switch( select( "Whoa, those ARE keen eyes.", "Okay. You're joking." ) )
+				{
+				case 1:
+					mes "[Morris]";
+					mes "Yes, this sharp,";
+					mes "penetrating, yet";
+					mes "highly intelligent gaze";
+					mes "belongs to the world";
+					mes "detective and crime";
+					mes "fighter, Morris Poe!";
+					next;
+					switch( select( "I've never heard of you.", "Golly, Morris Poe?!" ) )
+					{
+					case 1:
+						mes "[Morris]";
+						mes "Never heard of...?";
+						mes "Impossible! If there are";
+						mes "two things I hate more";
+						mes "than crime, they would be";
+						mes "dishonesty... And rejection";
+						mes "from beautiful women.";
+						next;
+						mes "[Morris]";
+						mes "When you get over your";
+						mes "sense of pride and gain";
+						mes "a little maturity, then we";
+						mes "might share an actual";
+						mes "conversation. Until then,";
+						mes "you'll just have to grow up.";
+						close;
+					break;
+
+					case 2:
+					break;
+					}
+				break;
+
+				case 2:
+					mes "[Morris]";
+					mes "Hahahahahaah--Huh.";
+					mes "If there are two things";
+					mes "I hate more than criminals,";
+					mes "they would be sarcasm...";
+					mes "And receiving fake phone";
+					mes "numbers from really cute girls.";
+					next;
+					switch( select( "Yeah, you're no Don Juan.", "I'm... I'm sorry." ) )
+					{
+					case 1:
+						mes "[Morris]";
+						mes "Wah...!";
+						mes "Did you just--?!";
+						mes "Ugh, you're the worst";
+						mes "type of person, you know that?";
+						emotion e_omg;
+						close;
+					break;
+
+					case 2:
+						mes "[Morris]";
+						mes "I think it's too late to";
+						mes "apologize. Why would you";
+						mes "treat someone of my stature";
+						mes "with such caustic sarcasm?!";
+						mes "What excuse could possibly";
+						mes "exonerate your behavior?!";
+						next;
+						switch( select( "I... I was intimidated...", "It's how I treat all losers." ) )
+						{
+						case 1:
+							mes "[Morris]";
+							mes "Of course: intense feelings";
+							mes "of awe and fear of my vast";
+							mes "intellect would result in that";
+							mes "kind of deviant behavior. I'll";
+							mes "have to forgive you, I suppose.";
+							next;
+						break;
+
+						case 2:
+							mes "[Morris]";
+							mes "What...?!";
+							mes "Morris Poe, a loser?";
+							mes "Such defamatory remarks";
+							mes "cannot be forgiven, no";
+							mes "matter how unfounded";
+							mes "and groundless they are!";
+							emotion e_omg;
+							close;
+						break;
+						}
+					break;
+					}
+				break;
+				}	
+			break;
+
+			case 3:
+				mes "[Morris]";
+				mes "Hahaha, oh, that's";
+				mes "funny. Wait. You're...";
+				mes "You're really leaving.";
+				mes "N-no, come baaaack!";
+				close;
+			break;
+			}
+		break;
+
+		case 2:
+			mes "[Strange Guy]";
+			mes "How did I know?";
+			mes "Elementary, my friend.";
+			mes "There was an abundance";
+			mes "of clues for me to make";
+			mes "that sort of simple deduction.";
+			close;
+		break;
+
+		case 3:
+			mes "[Strange Guy]";
+			mes "Hello...?";
+			mes "...............";
+			mes "Oh, this is embarassing.";
+			mes "I can't believe I'm getting";
+			mes "the silent treatment...";
+			close;
+		break;
+		}
+
+		mes "[Morris]";
+		mes "Yes, I know it's";
+		mes "difficult to believe that";
+		mes "you would be fortunate";
+		mes "enough to stand in the";
+		mes "presence of genius. Now,";
+		mes "you must be wondering...";
+		next;
+		menu "Um, wondering what?",-;
+			mes "[Morris]";
+			mes "You're wondering,";
+			mes "\"How in the world";
+			mes "can I be as brilliant";
+			mes "as Morris Poe, the";
+			mes "genius detective?\"";
+			next;
+			mes "[Morris]";
+			mes "First, I think it's fair";
+			mes "to let you know that it's";
+			mes "an impossible dream. Men like";
+			mes "myself only arise in this world";
+			mes "perhaps once every generation.";
+			mes "I'm sorry, but don't give up!";
+			next;
+			mes "[Morris]";
+			mes "Now, you can try to reach";
+			mes "a level of intelligence that";
+			mes "is comparable to my own by";
+			mes "joining the Young Detective's";
+			mes "Club. To become a member, you just need one essential article.";
+			next;
+			mes "[Morris]";
+			mes "Yes, you will need the";
+			mes "^0000FFRenown Detective's Cap^000000!";
+			mes "Luckily, I'm giving them";
+			mes "away for a relatively small";
+			mes "material cost, but you must";
+			mes "hurry while supplies last.";
+			next;
+			mes "[Morris]";
+			mes "Simply bring me";
+			mes "^0000FF10 Magnifiers^000000,";
+			mes "^0000FF1887 Tassels^000000,";
+			mes "^0000FF1 Slotted Bucket Hat^000000";
+			mes "and ^0000FF1,887 zeny^000000. That's all!";
+			next;
+			mes "[Morris]";
+			mes "But first, let me warn you";
+			mes "not to bring a ^FF0000slotted Bucket";
+			mes "Hat with a card compounded to";
+			mes "it, or any upgraded Bucket Hats. I'm not responsible for any";
+			mes "loss resulting from that.";
+			next;
+			mes "[Morris]";
+			mes "Hurry and bring me";
+			mes "those items! There are";
+			mes "only 20,000,000 Renown";
+			mes "Detective Caps left!";
+			mes "Once they're gone,";
+			mes "they'll be extinct!";
+			set DTHATQ,1;
+			close;
+	}
+	else if(DTHATQ == 1)
+	{
+		mes "[Morris]";
+		mes "So, did you want to";
+		mes "buy, er, receive this";
+		mes "Renown Detective's Cap";
+		mes "and become an honored";
+		mes "member of the Young";
+		mes "Detective's Club?";
+		next;
+		mes "[Morris]";
+		mes "Remember, make sure";
+		mes "that you don't bring any";
+		mes "^FF0000slotted Bucket Hats that";
+		mes "have been upgraded or have";
+		mes "cards compounded to them, or";
+		mes "you'll lose those enhancements^000000.";
+		next;
+		mes "[Morris]";
+		mes "Now, if you have only";
+		mes "1 Bucket Hat, we can begin.";
+		mes "Young Detective's Club... Salute! ";
+		next;
+		switch( select( "Salute.", "Whatever..." ) )
+		{
+		case 1:
+			mes "[Morris]";
+			mes "Great, done like a pro!";
+			mes "Now, I need to check your";
+			mes "fee--I mean qualifications.";
+			mes "Let's see now, I need to";
+			mes "look through your Inventory...";
+			next;
+			set @lhzhatfailed,0;
+			if(countitem(611) < 10)
+			{
+				mes "[Morris]";
+				mes "Wait. You don't have";
+				mes "enough Magnifiers. You";
+				mes "do want to join this club,";
+				mes "don't you? Did you need to";
+				mes "hear the requirements again?";
+				set @lhzhatfailed,1;
+				next;
+			}
+			if(countitem(7301) < 1887 && @lhzhatfailed == 0)
+			{
+				mes "[Morris]";
+				mes "Magnifiers. Check.";
+				mes "Not enough Tassels? Check.";
+				set @lhzhatfailed,1;
+				next;
+			}
+			if(countitem(5120) < 1 && @lhzhatfailed == 0)
+			{
+				mes "[Morris]";
+				mes "Magnifiers. Check.";
+				mes "Tassels... Check.";
+				mes "Hm. You're missing";
+				mes "the slotted Bucket Hat.";
+				mes "You were so close...";
+				set @lhzhatfailed,1;
+				next;
+			}
+			if(Zeny < 1887 && failed == 0)
+			{
+				mes "[Morris]";
+				mes "Magnifiers. Check.";
+				mes "Tassels... Check.";
+				mes "Slotted Bucket Hat. Got it.";
+				mes "Hey. Where's the zeny?!";
+				mes "That's the most important,";
+				mes "er, qualification of all!";
+				set @lhzhatfailed,1;
+				next;
+			}
+			
+			if(@lhzhatfailed == 1)
+			{
+				mes "[Morris]";
+				mes "^333333*Sigh*^000000 You need";
+				mes "^0000FF10 Magnifiers^000000,";
+				mes "^0000FF1887 Tassels^000000,";
+				mes "^0000FF1 Slotted Bucket Hat^000000";
+				mes "and ^0000FF1,887 zeny^000000. That's all!";
+				emotion e_an;
+				next;
+				mes "[Morris]";
+				mes "Now, remember everything";
+				mes "that you need this time, okay?";
+				mes "I'll be next;ing to welcome";
+				mes "you into the elite ranks of ";
+				mes "the Young Detective's Club.";
+				close;
+			}
+			mes "[Morris]";
+			mes "Magnifiers. Check.";
+			mes "Tassels... Check.";
+			mes "Slotted Bucket Hat. Got it.";
+			mes "Aaaand zeny. Heh heh. Perfect.";
+			next;
+			mes "[Morris]";
+			mes "Great, that's everything!";
+			mes "Welcome to the club! Here's";
+			mes "your Renown Detective's Cap,";
+			mes "so wear it with pride as you";
+			mes "take an active part in our club's";
+			mes "activities and promotion!";
+			delitem 7301,1887;
+			delitem 5120,1;
+			delitem 611,10;
+			set Zeny, Zeny - 1887;
+			set DTHATQ,2;
+			getitem 5108,1;
+			next;
+			switch( select( "Wait, promotion?", "Hooray!" ) )
+			{
+			case 1:
+				mes "[Morris]";
+				mes "Of course, isn't it obvious?";
+				mes "As a member, one of your duties";
+				mes "will be to sing accolades of this club so that more members";
+				mes "will join and earn their own";
+				mes "Renown Detective's Caps.";
+				next;
+				mes "[Morris]";
+				mes "Alright, scurry off";
+				mes "now and proudly display";
+				mes "your new, rakishly stylish";
+				mes "Renown Detective's Cap";
+				mes "to all of your friends!";
+				close;
+			break;
+
+			case 2:
+				mes "[Morris]";
+				mes "Alright, scurry off";
+				mes "now and proudly display";
+				mes "your new, rakishly stylish";
+				mes "Renown Detective's Cap";
+				mes "to all of your friends!";
+				close;
+			break;
+			}
+		break;
+
+		case 2:
+			mes "[Morris]";
+			mes "Huh. You just failed";
+			mes "the \"Test of Respect.\"";
+			mes "You don't deserve the";
+			mes "honor of wearing the";
+			mes "Renowned Detective's Cap!";
+			close;
+		break;
+		}
+	}
+	else if(DTHATQ == 2)
+	{
+		mes "[Morris]";
+		mes "Have you come to me";
+		mes "in order to obtain another";
+		mes "Renown Detective's Cap?";
+		mes "I realize that such a stylish";
+		mes "headgear is in high demand.";
+		next;
+		mes "[Morris]";
+		mes "Remember, make sure";
+		mes "that you don't bring any";
+		mes "^FF0000slotted Bucket Hats that";
+		mes "have been upgraded or have";
+		mes "cards compounded to them, or";
+		mes "you'll lose those enhancements^000000.";
+		next;
+		mes "[Morris]";
+		mes "As a proud member of";
+		mes "the Young Detective's Club,";
+		mes "did you bring everything";
+		mes "you need in order to earn";
+		mes "a Renown Detective's Cap?";
+		next;
+		switch( select( "I'm not sure~", "Sure!" ) )
+		{
+		case 1:
+			mes "[Morris]";
+			mes "What...?! Every good";
+			mes "detective must have a";
+			mes "photographic memory";
+			mes "and be able to recall";
+			mes "minute details in order";
+			mes "to crack the case.";
+			emotion e_sob;
+			next;
+			mes "[Morris]";
+			mes "Remember...";
+			mes "^0000FF10 Magnifiers^000000,";
+			mes "^0000FF1887 Tassels^000000,";
+			mes "^0000FF1 Slotted Bucket Hat^000000";
+			mes "and ^0000FF1,887 zeny^000000. Okay?";
+			close;
+		break;
+
+		case 2:	
+			mes "[Morris]";
+			mes "Great!";
+			mes "Now let me just";
+			mes "check to see if you";
+			mes "brought everything...";
+			next;
+			set @lhzhatfailed,0;
+			if(countitem(611) < 10)
+			{
+				mes "[Morris]";
+				mes "Hmm, you don't have";
+				mes "enough Magnifiers? But";
+				mes "those are essential tools";
+				mes "for sleuthing. Come now,";
+				mes "hurry back with them!";
+				set @lhzhatfailed,1;
+				next;
+			}
+			if(countitem(7301) < 1887 && @lhzhatfailed == 0)
+			{
+				mes "[Morris]";
+				mes "Magnifiers. Check.";
+				mes "Not enough Tassels? Check.";
+				set @lhzhatfailed,1;
+				next;
+			}
+			if(countitem(5120) < 1 && @lhzhatfailed == 0)
+			{
+				mes "[Morris]";
+				mes "Magnifiers. Check.";
+				mes "Tassels... Check.";
+				mes "Hm. You're missing";
+				mes "the slotted Bucket Hat.";
+				mes "You were so close...";
+				set @lhzhatfailed,1;
+				next;
+			}
+			if(Zeny < 1887 && failed == 0)
+			{
+				mes "[Morris]";
+				mes "Magnifiers. Check.";
+				mes "Tassels... Check.";
+				mes "Slotted Bucket Hat. Got it.";
+				mes "Hey. Where's the zeny?!";
+				mes "That's the most important,";
+				mes "er, qualification of all!";
+				set @lhzhatfailed,1;
+				next;
+			}
+
+			if(@lhzhatfailed == 1)
+			{
+				mes "[Morris]";
+				mes "Remember...";
+				mes "^0000FF10 Magnifiers^000000,";
+				mes "^0000FF1887 Tassels^000000,";
+				mes "^0000FF1 Slotted Bucket Hat^000000";
+				mes "and ^0000FF1,887 zeny^000000. Okay?";
+				emotion e_an;
+				close;
+			}			set @lhzhatfailed,0;
+			if(countitem(611) < 10)
+			{
+				mes "[Morris]";
+				mes "Hmm, you don't have";
+				mes "enough Magnifiers? But";
+				mes "those are essential tools";
+				mes "for sleuthing. Come now,";
+				mes "hurry back with them!";
+				set @lhzhatfailed,1;
+				next;
+			}
+			if(countitem(7301) < 1887 && @lhzhatfailed == 0)
+			{
+				mes "[Morris]";
+				mes "Magnifiers. Check.";
+				mes "Not enough Tassels? Check.";
+				set @lhzhatfailed,1;
+				next;
+			}
+			if(countitem(5120) < 1 && @lhzhatfailed == 0)
+			{
+				mes "[Morris]";
+				mes "Magnifiers. Check.";
+				mes "Tassels... Check.";
+				mes "Hm. You're missing";
+				mes "the slotted Bucket Hat.";
+				mes "You were so close...";
+				set @lhzhatfailed,1;
+				next;
+			}
+			if(Zeny < 1887 && failed == 0)
+			{
+				mes "[Morris]";
+				mes "Magnifiers. Check.";
+				mes "Tassels... Check.";
+				mes "Slotted Bucket Hat. Got it.";
+				mes "Hey. Where's the zeny?!";
+				mes "That's the most important,";
+				mes "er, qualification of all!";
+				set @lhzhatfailed,1;
+				next;
+			}
+
+			if(@lhzhatfailed == 1)
+			{
+				mes "[Morris]";
+				mes "Remember...";
+				mes "^0000FF10 Magnifiers^000000,";
+				mes "^0000FF1887 Tassels^000000,";
+				mes "^0000FF1 Slotted Bucket Hat^000000";
+				mes "and ^0000FF1,887 zeny^000000. Okay?";
+				emotion e_an;
+				close;
+			}
+			mes "[Morris]";
+			mes "Magnifiers. Check.";
+			mes "Tassels... Check.";
+			mes "Slotted Bucket Hat. Got it.";
+			mes "Aaaand zeny. Heh heh. Perfect.";
+			next;
+			mes "[Morris]";
+			mes "Great! You've just qualified";
+			mes "to own yet another Renowned";
+			mes "Detective's Cap. Congratulations! Now, let me collect all of these";
+			mes "goods and zeny from you...";
+			delitem 7301,1887;
+			delitem 5120,1;
+			delitem 611,10;
+			set Zeny, Zeny - 1887;
+			set DTHATQ,2;
+			getitem 5108,1;
+			next;
+			mes "[Morris]";
+			mes "Hahaha! It's what";
+			mes "I expect from one of";
+			mes "our Junior Gold Members!";
+			mes "How does it feel like to be";
+			mes "the cream of the cream of";
+			mes "the crop? Great, isn't it?";
+			close;
+		break;
+		}
+	}
+
+}
+
+lighthalzen.gat,360,313,3	script	Boy#LhzHat	706,{
+
+	mes "[Boy]";
+	mes "Hello, mister!";
+	mes "Um, would you do";
+	mes "me a favor, please?";
+	next;
+	if(countitem(526) && countitem(7270) && countitem(941) && countitem(10004))
+	{
+		mes "[Boy]";
+		mes "Oh! You brought me";
+		mes "some Royal Jelly to";
+		mes "eat, as well as everything";
+		mes "I need to make a Baby Pacifier.";
+		mes "Okay, let me get started on that right away. Just a moment...";
+		next;
+		mes "...";
+		mes "......";
+		next;
+		mes "[Boy]";
+		mes "Damn.";
+		mes "That Royal Jelly";
+		mes "was frickin' delicious!";
+		mes "Now I can make your";
+		mes "Baby Pacifier. Let's see";
+		mes "here. Ah, here we go...";
+		delitem 526,1;
+		next;
+		mes "[Boy]";
+		mes "It's done!";
+		mes "Now, you're the";
+		mes "proud owner of your";
+		mes "very own Baby Pacifier!";
+		mes "I hope you're happy with";
+		mes "yourself. Travel safe, okay?";
+		delitem 7270,1;
+		delitem 941,1;
+		delitem 10004,1;
+		getitem 5110,1;
+		close;
+	}
+	switch( select( "What do you need?", "Sorry, kid..." ) )
+	{
+	case 1:
+		mes "[Boy]";
+		mes "Well, my mom has been";
+		mes "sick recently, so both of";
+		mes "us haven't been able to eat";
+		mes "for the past few days. But";
+		mes "if she doesn't eat, how does";
+		mes "she expect to get better?";
+		emotion e_sob;
+		next;
+		mes "[Boy]";
+		mes "So I guess what I'm";
+		mes "asking is, would you be";
+		mes "able to spare some food?";
+		next;
+		switch( select( "Help him.", "Refuse to help." ) )
+		{
+		case 1:
+			if(!countitem(526))
+			{
+				mes "[Boy]";
+				mes "If you would, do you think";
+				mes "you can get some Royal Jelly";
+				mes "that I can give to my mom? The old lady next door says that it's";
+				mes "really nutritious and helps you get better faster if you're sick.";
+				next;
+				mes "[Boy]";
+				mes "My mom would be mad";
+				mes "at me if she found out";
+				mes "I was begging for it, but";
+				mes "Royal Jelly is too expensive";
+				mes "for me to get without any help!";
+				close;
+			}
+			mes "[Boy]";
+			mes "Oh, would it be alright";
+			mes "if I have this Royal Jelly?";
+			mes "It would really help my mom";
+			mes "feel better. Thanks so much~";
+			delitem 526,1;
+			next;
+			mes "[Boy]";
+			mes "Hey, to pay you back, why";
+			mes "don't I make a Baby Pacifier";
+			mes "for you? I learned how to make";
+			mes "one when my baby brother was";
+			mes "born. But first, I'll need some";
+			mes "materials to put it together...";
+			next;
+			mes "[Boy]";
+			mes "Would you";
+			mes "please bring";
+			mes "^3131FF1 Nursing Bottle^000000,";
+			mes "^3131FF1 Nose Ring^000000 and";
+			mes "^3131FF1 Pacifier^000000? Oh, and one";
+			mes "more ^3131FFRoyal Jelly^000000 for me~";
+			close;
+		break;
+
+		case 2:
+			mes "[Boy]";
+			mes "Oh... Um, that's";
+			mes "alright. Maybe I was";
+			mes "asking too much from";
+			mes "you. I mean, it's true";
+			mes "that you barely know me...";
+			emotion e_sob;
+			close;
+		break;
+		}
+	break;
+
+	case 2:
+		mes "[Boy]";
+		mes "Th-that's okay.";
+		mes "I guess you must";
+		mes "be so busy that you";
+		mes "don't even have the";
+		mes "time to listen to some";
+		mes "little boy's problems...";
+		emotion e_sob;
+		close;
+	break;
+	}
+
+}
+
+einbech.gat,70,222,5	script	Mater#LhzHat	91,{
+
+	if(countitem(983) && countitem(7267) > 998 && countitem(749) && Zeny > 49999)
+	{
+		mes "[Mater]";
+		mes "Oh, hello, what's this?";
+		mes "You're carrying 1 Black";
+		mes "Dyestuffs, 1 Frozen Rose,";
+		mes "999 Tiger Panties and even";
+		mes "50,000 zeny with you. That's";
+		mes "enough to make a Winter Hat...";
+		next;
+		mes "[Mater]";
+		mes "Um, would you mind letting";
+		mes "me have those items so that";
+		mes "I can make a Winter Hat?";
+		mes "I'd never be able to gather";
+		mes "those things on my own...";
+		next;
+		switch( select( "Let her have the items.", "Don't give her the items." ) )
+		{
+		case 1:
+			mes "[Mater]";
+			mes "Oh, thank you so much!";
+			mes "I've always wanted to make";
+			mes "this hat and try it on, even";
+			mes "if it's just once. But don't";
+			mes "worry, I'll give it to you~";
+			mes "Now please next; a moment...";
+			next;
+			mes "[Mater]";
+			mes "Let's see...";
+			mes "I've got to fold";
+			mes "the rose like this...";
+			mes "Be careful with the dye...";
+			mes "Where did I put all those";
+			mes "pan--Oh, here we are.";
+			next;
+			mes "[Mater]";
+			mes "^333333*Whew!*^000000";
+			mes "Finally, it's done!";
+			mes "Now, if you don't mind,";
+			mes "let me try this hat on";
+			mes "for just a little while.";
+			delitem 983,1;
+			delitem 7267,999;
+			delitem 749,1;
+			set Zeny,Zeny - 50000;
+			getitem 5115,1;
+			next;
+			mes "...";
+			mes "......";
+			next;
+			mes "[Mater]";
+			mes "Ahhhhhh~";
+			mes "It just feels...";
+			mes "I felt so free~";
+			mes "It was everything";
+			mes "I imagined it to be.";
+			next;
+			mes "[Mater]";
+			mes "Here, please take";
+			mes "this Winter Hat. I really";
+			mes "hope that you'll enjoy it";
+			mes "as much as I do. Well then,";
+			mes "be safe in your travels, okay?";
+			close;
+		break;
+
+		case 2:
+			mes "[Mater]";
+			mes "I'm sorry, I know that";
+			mes "I was asking a pretty big";
+			mes "favor from someone I just";
+			mes "met. I hope you understand";
+			mes "how much I really want to";
+			mes "make that Winter Hat...";
+			close;
+		break;
+		}
+	}
+	mes "[Mater]";
+	mes "Look at that blue";
+	mes "sky. Don't you wish";
+	mes "you could just soar";
+	mes "through the heavens";
+	mes "with your own wings?";
+	next;
+	mes "[Mater]";
+	mes "Of course, it's an";
+	mes "impossible dream,";
+	mes "but with this Winter Hat,";
+	mes "you can at least enjoy the";
+	mes "sensation of freedom that";
+	mes "a bird in flight must feel.";
+	next;
+	mes "[Mater]";
+	mes "If you would like";
+	mes "a hat like this, I would";
+	mes "need to have some items";
+	mes "that I don't think I can ever";
+	mes "obtain on my very own.";
+	next;
+	mes "[Mater]";
+	mes "^FF00001 Black Dyestuffs^000000,";
+	mes "^FF0000999 Tiger Panties^000000,";
+	mes "^FF00001 Frozen Rose^000000 and";
+	mes "^FF000050,000 zeny^000000. If you can";
+	mes "bring those to me, I shall";
+	mes "make you a Winter Hat.";
+	close;
+
+}
+
+lhz_in02.gat,91,38,5	script	Margaret Mary#LhzHat	90,{
+
+	mes "[Margaret Mary]";
+	mes "The white rose, in its";
+	mes "purity and simplicity, is";
+	mes "like a woman who doesn't";
+	mes "need jewels or fancy dresses";
+	mes "to look noble and beautiful. It's the perfect gift for a lady.";
+	next;
+	switch( select( "Make a Mystic Rose.", "End Conversation." ) )
+	{
+	case 1:
+		if(countitem(731) > 9 && countitem(748) > 1 && countitem(982) && Zeny > 49999)
+		{
+			mes "[Margaret Mary]";
+			mes "Ah, I see that you've brought";
+			mes "what I need to bleach the blood";
+			mes "red hue from these Witherless";
+			mes "Roses and adorn these flowers";
+			mes "with eternal elegance. May I use these items to make a Mystic Rose?";
+			next;
+			switch( select( "Yes", "No" ) )
+			{
+			case 1:
+				mes "[Margaret Mary]";
+				mes "Thank you. Please";
+				mes "next; a moment while";
+				mes "I concentrate in order to";
+				mes "preserve the natural beauty";
+				mes "of these gorgeous flowers...";
+				next;
+				mes "[Margaret Mary]";
+				mes "The rose truly is the";
+				mes "undisputed queen of all";
+				mes "flowers. All other flora must";
+				mes "humbly bow to its regal beauty.";
+				next;
+				mes "...";
+				mes "......";
+				next;
+				mes "...";
+				mes "......";
+				mes ".........";
+				next;
+				mes "[Margaret Mary]";
+				mes "There, it is finished.";
+				mes "Please remember to wear";
+				mes "your hair in an elegant and";
+				mes "refined manner when wearing";
+				mes "the Mystic Rose so as not to disgrace these beautiful flowers.";
+				delitem 731,10;
+				delitem 748,2;
+				delitem 982,1;
+				set Zeny,Zeny - 50000;
+				getitem 5117,1;
+				close;
+			break;
+
+			case 2:
+				mes "[Margaret Mary]";
+				mes "White roses with thorns";
+				mes "makes my heart beat with";
+				mes "unceasing trepidation. What";
+				mes "if I prick my finger and shed";
+				mes "blood on its snow white petals?";
+				close;
+			break;
+			}
+		}
+		mes "[Margaret Mary]";
+		mes "I love roses, but it makes";
+		mes "me sad that their beauty";
+		mes "fades far too soon. And so,";
+		mes "I've found a way to preserve";
+		mes "the beauty of the roses, so";
+		mes "that it lasts for all eternity.";
+		next;
+		mes "[Margaret Mary]";
+		mes "Do you love roses as well?";
+		mes "If you like, I can make a";
+		mes "^3131FFMystic Rose^000000 that you can wear";
+		mes "upon your crown. It's not easy";
+		mes "for me to create, but I believe that you would enjoy it greatly.";
+		next;
+		mes "[Margaret Mary]";
+		mes "Please bring me";
+		mes "^3131FF10 2 Carat Diamonds^000000,";
+		mes "^3131FF3 Witherless Roses^000000,";
+		mes "^3131FF1 White Dyestuffs^000000 and";
+		mes "^3131FF50,000 zeny^000000 if you would";
+		mes "like to have a Mystic Rose.";
+		close;
+	break;
+
+	case 2:
+		mes "[Margaret Mary]";
+		mes "White roses with thorns";
+		mes "makes my heart beat with";
+		mes "unceasing trepidation. What";
+		mes "if I prick my finger and shed";
+		mes "blood on its snow white petals?";
+		close;
+	break;
+	}
+
+}
+
+lighthalzen.gat,182,89,0	script	Rich Girl#LhzHat	91,{
+
+	if(LHZBTQ == 0)
+	{
+		mes "[Rich Girl]";
+		mes "Hmmm...?";
+		mes "What? Did you";
+		mes "need something?";
+		next;
+		switch( select( "N-Nothing.", "Um, you look so relaxed." ) )
+		{
+		case 1:
+			mes "[Rich Girl]";
+			mes "Huh.";
+			mes "Alright then.";
+			mes "Well, try not to stare";
+			mes "at people so much.";
+			close;
+		break;
+
+		case 2:
+			mes "[Rich Girl]";
+			mes "Really? You are probably";
+			mes "the twentieth person to";
+			mes "tell me that today. Mmm.";
+			mes "That's strange, isn't it?";
+			next;
+			menu "I guess.",-,"It's not strange at all.",-;
+			mes "[Rich Girl]";
+			mes "Oh yeah.";
+			mes "What's your name?";
+			mes "That is, if you don't";
+			mes "mind me asking you.";
+			next;
+			mes "[" + strcharinfo(0) + "]";
+			mes "My name is " + strcharinfo(0) + "";
+			mes "and I'm an adventurer~";
+			next;
+			mes "[Achiha]";
+			mes "Oh, one of those?";
+			mes "My name is Achiha, nice";
+			mes "to meet you. I don't really";
+			mes "do much of anything.";
+			mes "Just sit. Relax.";
+			set LHZBTQ,1;
+			emotion e_heh;
+			next;
+			mes "[Achiha]";
+			mes "I do have a hobby,";
+			mes "though. Once in a while,";
+			mes "I'll sew a hat. Do you think";
+			mes "an adventurer like you would";
+			mes "want to have a hat I made?";
+			next;
+			switch( select( "Er, I dunno.", "Sure." ) )
+			{
+			case 1:
+				mes "[Achiha]";
+				mes "Mm. I mean, the";
+				mes "Red Bonnets I make";
+				mes "might not be sturdy";
+				mes "enough for battles.";
+				mes "But what about those";
+				mes "fish and cake hats?";
+				next;
+				mes "[Achiha]";
+				mes "Hats...?";
+				mes "That look like";
+				mes "fish or cake? Mm.";
+				mes "Haha. I just got it.";
+				mes "That's, that's funny.";
+				close;
+			break;
+
+			case 2:
+				mes "[Achiha]";
+				mes "Really? Well, I can sew";
+				mes "together a ^0000FFRed Bonnet^000000.";
+				mes "It reminds most people";
+				mes "of a baby's bonnet, but";
+				mes "it does look good on";
+				mes "most people I know.";
+				next;
+				mes "[Achiha]";
+				mes "Um, did you want me";
+				mes "to make you one? I can";
+				mes "go ahead and do it if you";
+				mes "bring me some materials.";
+				mes "Since it's just for fun,";
+				mes "I won't ask for too much.";
+				next;
+				mes "[Achiha]";
+				mes "Just bring";
+				mes "^0000FF1 Green Lace^000000,";
+				mes "^0000FF1 Silk Ribbon^000000,";
+				mes "^0000FF1 Scarlet Dyestuffs^000000,";
+				mes "^0000FF1 Sunday Hat^000000 and";
+				mes "^0000FF50,000 zeny^000000.";
+				next;
+				mes "[Achiha]";
+				mes "I think I'm going";
+				mes "to just sit and relax";
+				mes "a little bit longer. But";
+				mes "if you want me to make";
+				mes "a hat for you, come back";
+				mes "with those materials, okay?";
+				set LHZBTQ,2;
+				close;
+			break;
+			}
+		break;
+		}
+	}
+	else if(LHZBTQ == 1)
+	{
+		mes "[Achiha]";
+		mes "Oh, hello.";
+		mes "Isn't it such a nice,";
+		mes "quiet, pleasant day?";
+		next;
+		switch( select( "Indeed.", "Would you please make a hat for me?" ) )
+		{
+		case 1:
+			mes "[Achiha]";
+			mes "Yeah. Today would";
+			mes "be a nice day for a";
+			mes "picnic or a long stroll.";
+			mes "But all I want to do is";
+			mes "just sit and relax...";
+			close;
+		break;
+
+		case 2:
+			mes "[Achiha]";
+			mes "What are you talking";
+			mes "about? Oh, you mean the";
+			mes "Red Bonnet? Well, I guess";
+			mes "I can make one. But I think";
+			mes "I need some materials first.";
+			next;
+			mes "[Achiha]";
+			mes "^0000FF1 Green Lace^000000,";
+			mes "^0000FF1 Silk Ribbon^000000,";
+			mes "^0000FF1 Scarlet Dyestuffs^000000,";
+			mes "^0000FF1 Sunday Hat^000000 and";
+			mes "^0000FF50,000 zeny^000000.";
+			mes "That's what I need.";
+			next;
+			mes "[Achiha]";
+			mes "Oh, but I don't";
+			mes "feel like making it";
+			mes "right now. I'm soooo";
+			mes "tired. Let me just sit,";
+			mes "relax, even if it's just";
+			mes "a little while longer...";
+			set LHZBTQ,2;
+			close;
+		break;
+		}
+	}
+	else if(LHZBTQ == 2)
+	{
+		mes "[Achiha]";
+		mes "Oh, good, you're here.";
+		mes "I've been next;ing for you.";
+		mes "Did you bring everything that";
+		mes "you need to make a ^0000FFRed Bonnet^000000?";
+		next;
+		switch( select( "Yes.", "I forgot what I need." ) )
+		{
+		case 1:
+			if(countitem(10015) < 1 || countitem(10007) < 1 || countitem(975) < 1 || countitem(5032) < 1 || Zeny < 50000)
+			{
+				mes "[Achiha]";
+				mes "Uh oh.";
+				mes "You forgot";
+				mes "a couple things.";
+				mes "Would you like me";
+				mes "to remind you what";
+				mes "you need to bring?";
+				next;
+				mes "[Achiha]";
+				mes "^0000FF1 Green Lace^000000,";
+				mes "^0000FF1 Silk Ribbon^000000,";
+				mes "^0000FF1 Scarlet Dyestuffs^000000,";
+				mes "^0000FF1 Sunday Hat^000000 and";
+				mes "^0000FF50,000 zeny^000000. Come back";
+				mes "when you're ready, okay?";
+				close;
+			}
+			mes "[Achiha]";
+			mes "Oh, you brought";
+			mes "everything. That's";
+			mes "good. Okay, just give";
+			mes "it to me. Um, let's see.";
+			next;
+			mes "[Achiha]";
+			mes "Well, I'm finished.";
+			mes "^333333*Yawn*^000000 And now I'm";
+			mes "even more tired. Here,";
+			mes "take this Red Bonnet.";
+			mes "I hope you like it~";
+			mes "I think I'll relax now...";
+			delitem 10015,1;
+			delitem 10007,1;
+			delitem 975,1;
+			delitem 5032,1;
+			set Zeny,Zeny - 50000;
+			getitem 5109,1;
+			set LHZBTQ,3;
+			next;
+			mes "[Achiha]";
+			mes "I hope you will enjoy the hat~";
+			close;
+		break;
+
+		case 2:
+			mes "[Achiha]";
+			mes "Oh, you really";
+			mes "forgot? Oh dear,";
+			mes "let me try to remember.";
+			mes "I didn't forget too, did I?";
+			mes "Oh next;, I remember now...";
+			next;
+			mes "[Achiha]";
+			mes "^0000FF1 Green Lace^000000,";
+			mes "^0000FF1 Silk Ribbon^000000,";
+			mes "^0000FF1 Scarlet Dyestuffs^000000,";
+			mes "^0000FF1 Sunday Hat^000000 and";
+			mes "^0000FF50,000 zeny^000000. Come back";
+			mes "when you're ready, okay?";
+			close;
+		break;
+		}
+	}
+	else if(LHZBTQ == 3)
+	{
+		mes "[Achiha]";
+		mes "Oh, I remember you.";
+		mes "You're the adventurer";
+		mes "who likes my Red Bonnets";
+		mes "so much. Did you want me";
+		mes "to make another one for you?";
+		next;
+		switch( select( "Yes.", "I forgot what I need." ) )
+		{
+		case 1:
+			if(countitem(10015) < 1 || countitem(10007) < 1 || countitem(975) < 1 || countitem(5032) < 1 || Zeny < 50000)
+			{
+				mes "[Achiha]";
+				mes "Uh oh.";
+				mes "You forgot";
+				mes "a couple things.";
+				mes "Would you like me";
+				mes "to remind you what";
+				mes "you need to bring?";
+				next;
+				mes "[Achiha]";
+				mes "^0000FF1 Green Lace^000000,";
+				mes "^0000FF1 Silk Ribbon^000000,";
+				mes "^0000FF1 Scarlet Dyestuffs^000000,";
+				mes "^0000FF1 Sunday Hat^000000 and";
+				mes "^0000FF50,000 zeny^000000. Come back";
+				mes "when you're ready, okay?";
+				close;
+			}
+			mes "[Achiha]";
+			mes "Oh, you brought";
+			mes "everything. That's";
+			mes "good. Okay, just give";
+			mes "it to me. Um, let's see.";
+			next;
+			mes "[Achiha]";
+			mes "Well, I'm finished.";
+			mes "^333333*Yawn*^000000 And now I'm";
+			mes "even more tired. Here,";
+			mes "take this Red Bonnet.";
+			mes "I hope you like it~";
+			mes "I think I'll relax now...";
+			delitem 10015,1;
+			delitem 10007,1;
+			delitem 975,1;
+			delitem 5032,1;
+			set Zeny,Zeny - 50000;
+			getitem 5109,1;
+			next;
+			mes "[Achiha]";
+			mes "I hope you will enjoy the hat~";
+			close;
+		break;
+
+		case 2:
+			mes "[Achiha]";
+			mes "Oh, you really";
+			mes "forgot? Oh dear,";
+			mes "let me try to remember.";
+			mes "I didn't forget too, did I?";
+			mes "Oh next;, I remember now...";
+			next;
+			mes "[Achiha]";
+			mes "^0000FF1 Green Lace^000000,";
+			mes "^0000FF1 Silk Ribbon^000000,";
+			mes "^0000FF1 Scarlet Dyestuffs^000000,";
+			mes "^0000FF1 Sunday Hat^000000 and";
+			mes "^0000FF50,000 zeny^000000. Come back";
+			mes "when you're ready, okay?";
+			close;
+		break;
+		}
+	}
+
+}
+
+gl_prison1.gat,137,138,5	script	Zealotus#LhzHat	1200,{
+
+	if(ZLMASKQ == 0)
+	{
+		mes "[Zealotus]";
+		mes "Kneel, worm!";
+		mes "As ruler of this";
+		mes "Underground Prison,";
+		mes "I command all who step";
+		mes "into my private realm!";
+		next;
+		mes "[Zealotus]";
+		mes "Resist, and you shall be";
+		mes "punished! Grovel and kiss";
+		mes "my feet, and perhaps you";
+		mes "might be spared. Hohohohoho!";
+		next;
+		switch( select(  "Oh, your highness!", "Whatever." ) )
+		{
+		case 1:
+			mes "[Zealotus]";
+			mes "The submissive woman is";
+			mes "nothing but an ideal dream";
+			mes "for the arrogant male! A true";
+			mes "woman revels in her power to";
+			mes "have her man do her bidding!";
+			next;
+			switch( select( "Yes, it's so true!", "Boooo!" ) )
+			{
+			case 1:
+				mes "[Zealotus]";
+				mes "However, in my lust for power, I may have inadventently crushed";
+				mes "the spirits of my beloved a little too harshly. His pride crumbled,";
+				mes "my man even cowers in front of the humans! It pains me to see it.";
+				next;
+				mes "[Zealotus]";
+				mes "It is beneath me to ask";
+				mes "this of you, but it will take";
+				mes "a human like you to make";
+				mes "him remember who he truly is,";
+				mes "a proud creature of darkness";
+				mes "who should fear only me!";
+				next;
+				mes "[Zealotus]";
+				mes "Human. I offer you a small";
+				mes "share of my power if you can";
+				mes "take the pathetic, weeping lump";
+				mes "of monster crying in the corner";
+				mes "of this prison and make him";
+				mes "realize his true nature.";
+				set ZLMASKQ,1;
+				close;
+			break;
+
+			case 2:
+				mes "[Zealotus]";
+				mes "You dirty, dirty human...";
+				mes "How dare you have an ";
+				mes "opinion different than mine!";
+				mes "No matter. The day will come";
+				mes "when all of your race shall";
+				mes "address me only as \"queen.\"";
+				close;
+			break;
+			}
+		break;
+
+		case 2:
+			mes "[Zealotus]";
+			mes "Mortal simpleton!";
+			mes "Bah! The mocking of";
+			mes "a boorish cur is worthless";
+			mes "to me. I have all the time in";
+			mes "the world to grind your pride";
+			mes "to dust beneath my heels.";
+			close;
+		break;
+		}
+	}
+	else if(ZLMASKQ > 0 && ZLMASKQ < 6)
+	{
+		mes "[Zealotus]";
+		mes "Hm. If my beloved is";
+		mes "acting stubborn or refuses";
+		mes "to listen, feel free to take";
+		mes "drastic measures. Just think";
+		mes "of what I would do in your";
+		mes "place. Ohohohohoho~!";
+		close;
+	}
+	else if(ZLMASKQ == 6)
+	{
+		mes "[Zealotus]";
+		mes "Ooh, you're back.";
+		mes "Phendark is certainly";
+		mes "back to his old self again,";
+		mes "thanks to your efforts, human.";
+		mes "Yes, his anger, his courage";
+		mes "and passion are all restored~";
+		next;
+		mes "[Zealotus]";
+		mes "As I promised, I shall";
+		mes "grant you a share of my";
+		mes "power. However, I will need";
+		mes "some items to form this minor";
+		mes "contract between you and me.";
+		next;
+		mes "[Zealotus]";
+		mes "I will need";
+		mes "^3131FF1 Cat's Eye^000000,";
+		mes "^3131FF1 Forbidden Red Candle^000000 and";
+		mes "^3131FF30 Worn-Out Magic Scrolls^000000.";
+		mes "Then, I can grant you a measure";
+		mes "of my power as I've promised.";
+		set ZLMASKQ,7;
+		close;
+	}
+	else if(ZLMASKQ == 7)
+	{
+		if(countitem(7263) && countitem(660) && countitem(7099) > 29)
+		{
+			mes "[Zealotus]";
+			mes "I see that you have";
+			mes "brought what I need to";
+			mes "complete the contract";
+			mes "between you and me,";
+			mes "human. Let's begin...";
+			next;
+			mes "^3355FFZealotus takes the red";
+			mes "candle you've given her and";
+			mes "drips the wax into her open";
+			mes "palm. The Cat's Eye begins";
+			mes "to glow with an eerie light.^000000";
+			next;
+			mes "[Zealotus]";
+			mes "Now, place your index";
+			mes "finger into my palm so";
+			mes "that we may complete the";
+			mes "final step of this contract...";
+			next;
+			switch( select( "Don't complete the contract.", "Complete the contract." ) )
+			{
+			case 1:
+				mes "[Zealotus]";
+				mes "Hm? What are you";
+				mes "afraid of? This is a";
+				mes "minor contract, so";
+				mes "you are not selling me";
+				mes "your soul, or anything";
+				mes "else for that matter.";
+				close;
+			break;
+
+			case 2:
+				mes "[Zealotus]";
+				mes "I, Zealotus, as ruler";
+				mes "of this realm, seal this";
+				mes "eternal contract with this";
+				mes "Forbidden Red Candle.";
+				next;
+				mes "[Zealotus]";
+				mes "" + strcharinfo(0) + " will";
+				mes "forever have a share";
+				mes "in my power. Those that";
+				mes "bow to me must also bow";
+				mes "to " + strcharinfo(0) + ". It shall be done.";
+				specialeffect 196; //Curse? EF_DEVIL
+				specialeffect 192; //Poison attack? EF_POISONHIT
+				next;
+				mes "[Zealotus]";
+				mes "Human, take this";
+				mes "mask with you as an";
+				mes "everlasting token of our";
+				mes "contract. So long as you";
+				mes "carry this, I will be at your";
+				mes "side. So says Zealotus!";
+				delitem 7263,1;
+				delitem 660,1;
+				delitem 7099,30;
+				getitem2 5121,1,1,0,0,254,0,getcharid(0)&0xffff,(getcharid(0)>>16)&0xffff;
+				set ZLMASKQ,8;
+				close;
+			break;
+			}
+		}
+		mes "[Zealotus]";
+		mes "I will need";
+		mes "^3131FF1 Cat's Eye^000000,";
+		mes "^3131FF1 Forbidden Red Candle^000000 and";
+		mes "^3131FF30 Worn-Out Magic Scrolls^000000.";
+		mes "Then, I can grant you a measure";
+		mes "of my power as I've promised.";
+		close;
+	}
+	else if(ZLMASKQ == 8)
+	{
+		mes "[Zealotus]";
+		mes "Ah, I greet you in";
+		mes "peace, human. Behold,";
+		mes "the splendor of our realm!";
+		mes "Though, I do not blame you";
+		mes "if you have no interest in";
+		mes "commanding these Injustices...";
+		next;
+		mes "[Zealotus]";
+		mes "Thanks to your help,";
+		mes "my Phendark has returned";
+		mes "to his old, monstrously";
+		mes "passionate ways. Now I can";
+		mes "show him the stinging love";
+		mes "of my whip! Hohohohohoho!";
+		emotion e_kis;
+		close;
+	}
+
+}
+
+gl_prison1.gat,97,104,1	script	Phendark#LhzHat	1202,{
+
+	if(ZLMASKQ == 0)
+	{
+		mes "[Phendark]";
+		mes "Huh? Oh no!";
+		mes "Another h-human?!";
+		mes "P-please! S-stay away,";
+		mes "don't come near me!";
+		close;
+	}
+	else if(ZLMASKQ == 1)
+	{
+		if(countitem(1164) || isequipped(1164))set @whipcount,@whipcount+1;
+		if(countitem(1165) || isequipped(1165))set @whipcount,@whipcount+1;
+		if(countitem(1166) || isequipped(1166))set @whipcount,@whipcount+1;
+		if(countitem(1167) || isequipped(1167))set @whipcount,@whipcount+1;
+		if(countitem(1168) || isequipped(1168))set @whipcount,@whipcount+1;
+		if(countitem(1169) || isequipped(1169))set @whipcount,@whipcount+1;
+		if(countitem(1170) || isequipped(1170))set @whipcount,@whipcount+1;
+		if(countitem(1261) || isequipped(1261))set @whipcount,@whipcount+1;
+		if(countitem(1363) || isequipped(1363))set @whipcount,@whipcount+1;
+		mes "[Phendark]";
+		mes "Huh? Oh no!";
+		mes "Another h-human?!";
+		mes "P-please! S-stay away,";
+		mes "don't come near me!";
+		next;
+		mes "[Phendark]";
+		mes "I... I swear!";
+		mes "I'm not carrying any";
+		mes "rare items or stuff you";
+		mes "can wear, so please don't";
+		mes "beat me! I... Oh my god, you";
+		mes "don't believe me, don't you?";
+		next;
+		mes "[Phendark]";
+		mes "You humans never leave";
+		mes "me alone! Why do you have";
+		mes "to bully me like this?! I'm";
+		mes "honestly not carrying anything";
+		mes "of value! Z-Zealotus, please!";
+		mes "Zealotus, heeeeeelp me~!";
+		emotion e_sob;
+		if(!@whipcount)close;
+		next;
+		mes "[" + strcharinfo(0) + "]";
+		mes "You're pathetic!";
+		mes "Aren't you supposed";
+		mes "to be a monster? You know";
+		mes "what Zealotus would do if";
+		mes "she were actually here?";
+		next;
+		mes "[Phendark]";
+		mes "^333333*Sniff...*^000000";
+		mes "P-probably...";
+		mes "Probably whip me.";
+		next;
+		mes "^3355FFYou nonchalantly^000000";
+		mes "^3355FFbrandish your Whip.^000000";
+		next;
+		mes "[" + strcharinfo(0) + "]";
+		mes "That's right.";
+		next;
+		mes "^3355FF*Snap!*";
+		mes "*Snap!*";
+		mes "*Crack crack crack!*";
+		mes "*Snap snap snap crack!*^000000";
+		next;
+		mes "[Phendark]";
+		mes "Oh! That stinging pain";
+		mes "that burns with bloodlust!";
+		mes "It's almost as good as";
+		mes "Zealtos's whip of love!";
+		next;
+		mes "[Phendark]";
+		mes "Zealotus...";
+		mes "She must be pissed";
+		mes "at me, but I just can't";
+		mes "stop being afraid of all";
+		mes "you humans! Damn it all!";
+		set ZLMASKQ,2;
+		close;
+	}
+	else if(ZLMASKQ == 2 || ZLMASKQ == 3)
+	{
+		if(countitem(7315) > 368 && ZLMASKQ == 3)
+		{	
+			mes "[Phendark]";
+			mes "Y-you again!";
+			mes "Why do you hound me?!";
+			mes "Th-there's nothing I can";
+			mes "give you, so please don't";
+			mes "hurt me! Oh, oh p-please...!";
+			emotion e_swt2;
+			next;
+			switch( select( "Feed him Dark Crystal Fragment.", "Threaten him." ) )
+			{
+			case 1:
+				mes "[Phendark]";
+				mes "What...? You want";
+				mes "me to eat these?";
+				mes "It doesn't seem natural,";
+				mes "but if Rybio says I should,";
+				mes "it might not be that bad.";
+				next;
+				mes "...";
+				mes "......";
+				next;
+				mes "[Phendark]";
+				mes "What's supposed to";
+				mes "happen now? My inner";
+				mes "demon is supposed to";
+				mes "awaken by eating these?";
+				mes "That sounds ridiculous!";
+				mes "Though, I did just eat crystal.";
+				next;
+				mes "[Phendark]";
+				mes "Wh-whoa. Ugh!";
+				mes "My chest! Something's";
+				mes "burning inside! I c-can't--!";
+				mes "Can't think straight... I'm...";
+				mes "Slowly... Losing my humanity!";
+				next;
+				mes "[Phendark]";
+				mes "Huh... Huuurg--!";
+				mes "Huk-huk! Heeeeh!";
+				mes "Heeeeeh! Waaoooooh!";
+				next;
+				mes "[Phendark]";
+				mes "...";
+				mes "Grrrrr...!";
+				next;
+				mes "[Phendark]";
+				mes "^333333*Pant pant*^000000";
+				mes "What... just...";
+				mes "What happened?";
+				set ZLMASKQ,4;
+				delitem 7315,369;
+				close;
+			break;
+
+			case 2:
+				mes "[" + strcharinfo(0) + "]";
+				mes "So what happens";
+				mes "if I don't decide not";
+				mes "to hurt you? Whatcha";
+				mes "gonna do then, huh?";
+				next;
+				mes "...";
+				mes "......";
+				next;
+				mes "[Phendark]";
+				mes "S-stop it!";
+				mes "Just--Just stop it!";
+				close;
+			break;
+			}
+		}
+		mes "[Phendark]";
+		mes "Humans...";
+		mes "They're everywhere!";
+		mes "You guys--I can't...";
+		mes "You're torturing me!";
+		emotion e_sob;
+		close;
+	}
+	else if(ZLMASKQ == 4)
+	{
+		mes "[Phendark]";
+		mes "My chest was on fire,";
+		mes "like I was, I dunno,";
+		mes "burning with anger or";
+		mes "something. It's gone";
+		mes "now, but what were";
+		mes "those crystals?";
+		close;
+	}
+	else if(ZLMASKQ == 5)
+	{
+		mes "[Phendark]";
+		mes "You again? Oh no,";
+		mes "you're not going to hurt";
+		mes "me or make me eat those";
+		mes "weird crystals again, are you?";
+		next;
+		mes "^3131FF[" + strcharinfo(0) + "]^000000";
+		switch( select( "Rybio", "Injustice", "Zealotus" ) )
+		{
+		case 1:
+			mes "Rybio";
+			set @temp1,1;
+		break;
+
+		case 2:
+			mes "Injustice";
+			set @temp1,2;
+		break;
+
+		case 3:
+			mes "Zealotus";
+			set @temp1,3;
+		break;
+		}
+		switch( select( "hates", "likes" ) )
+		{
+		case 1:
+			mes "hates";
+			set @temp2,1;
+		break;
+
+		case 2:
+			mes "likes";
+			set @temp2,2;
+		break;
+		}
+		switch( select( "Rybio.", "Injustice.", "Phendark.", "Zealotus." ) )
+		{
+		case 1:
+			mes "Rybio.";
+		break;
+
+		case 2:
+			mes "Injustice.";
+		break;
+
+		case 3:
+			if((@temp1 == 1 || @temp1  == 2) && @temp2 == 1)
+			{
+				mes "[Phendark]";
+				mes "I can't believe";
+				mes "something like that!";
+				mes "Oh, that doesn't matter.";
+				mes "Zealotus is too good for me.";
+				mes "I'm not even worthy of tasting";
+				mes "the sting of her Love Whip.";
+				emotion e_sob;
+				close;
+			}
+			else if(@temp1 == 3 && @temp2 == 1)
+			{
+				mes "[Phendark]";
+				mes "...";
+				mes "......";
+				mes "Hates me?";
+				mes "N-no, that can't--";
+				mes "I didn't, that doesn't--";
+				next;
+				mes "[Phendark]";
+				mes "Huh...?";
+				mes "What is that";
+				mes "supposed to mean?";
+				close;
+			}
+			else if(@temp1 == 3 && @temp2 == 2)
+			{
+				mes "[Phendark]";
+				mes "I can't believe";
+				mes "something like that!";
+				mes "Oh, that doesn't matter.";
+				mes "Zealotus is too good for me.";
+				mes "I'm not even worthy of tasting";
+				mes "the sting of her Love Whip.";
+				emotion e_sob;
+				close;
+			}
+		break;
+
+		case 4:
+			mes "Zealotus.";
+		break;
+		}
+		switch( select( "Insult him.", "Apologize." ) )
+		{
+		case 1:
+			mes "[" + strcharinfo(0) + "]";
+			mes "First of all,";
+			mes "what exactly sets";
+			mes "you apart from all the";
+			mes "other eligible monsters";
+			mes "that she can choose from?";
+			mes "Not like you're much better...";
+			next;
+			mes "[Phendark]";
+			mes "...";
+			mes "......";
+			next;
+			switch( select( "Break his pride.", "Tell him you were joking." ) )
+			{
+			case 1:
+				mes "^3131FF[" + strcharinfo(0) + "]^000000";
+				mes "I mean, there are guys";
+				mes "like Bloody Murderer out";
+				mes "there who are more evil";
+				mes "than you, and best of all,";
+				mes "not afraid of humans!";
+				next;
+				switch( select( "Go for the low blow.", "Try to salvage his confidence." ) )
+				{
+				case 1:
+					mes "[" + strcharinfo(0) + "]";
+					mes "You know, me and Zealotus";
+					mes "were actually talking about";
+					mes "you recently. She told me that";
+					mes "the sight of you makes her";
+					mes "feel sick! I mean, what kind";
+					mes "of monster is afraid of humans?";
+					next;
+					mes "[" + strcharinfo(0) + "]";
+					mes "Now you've reached the";
+					mes "point where even Injustice";
+					mes "is manlier than you now,";
+					mes "if you know what I mean!";
+					mes "Hahahahahahahahaha!";
+					next;
+					mes "[Phendark]";
+					mes "...";
+					mes "......";
+					next;
+					mes "[Phendark]";
+					mes "...";
+					mes "......";
+					mes ".........";
+					next;
+					mes "[Phendark]";
+					mes "...";
+					mes "......";
+					mes ".........";
+					mes "............";
+					next;
+					mes "[Phendark]";
+					mes "GRRRRRR!";
+					mes "THAT'S ENOUGH!";
+					emotion e_ag;
+					next;
+					mes "[Phendark]";
+					mes "I don't care who the";
+					mes "hell she is, I'm going";
+					mes "to see Zealotus and give";
+					mes "that tramp a piece of my";
+					mes "mind! Grrrr! She'll be sorry!";
+					set ZLMASKQ,6;
+					emotion e_an;
+					close;
+				break;
+
+				case 2:
+					mes "^3131FF[" + strcharinfo(0) + "]^000000";
+					mes "But know that I think";
+					mes "about it, maybe you look";
+					mes "much tougher than that";
+					mes "Bloody Murderer guy.";
+					next;
+					mes "[Phendark]";
+					mes "*Sniff sniff*";
+					mes "You really think so?";
+					next;
+					mes "...";
+					mes "......";
+					next;
+					mes "[" + strcharinfo(0) + "]";
+					mes "...Yeeeeeah.";
+					close;
+				break;
+				}
+			break;
+
+			case 2:
+				mes "[" + strcharinfo(0) + "]";
+				mes "But now that I think";
+				mes "about it, you actually";
+				mes "are much better than all";
+				mes "those other monsters.";
+				mes "That stuff I said before?";
+				mes "I was just kidding you.";
+				next;
+				mes "[Phendark]";
+				mes "^333333*Sniff!*^000000";
+				mes "You're...";
+				mes "Not helping!";
+				close;
+			break;
+			}
+		break;
+
+		case 2:
+			mes "[" + strcharinfo(0) + "]";
+			mes "I...";
+			mes "I was just kidding!";
+			mes "How could she hate";
+			mes "somebody like you?";
+			next;
+			mes "[Phendark]";
+			mes "No... No.";
+			mes "You're right.";
+			mes "I don't deserve love.";
+			mes "Not from Zealotus or";
+			mes "from anybody else...";
+			close;
+		break;
+		}
+	}
+	else if(ZLMASKQ > 5)
+	{
+		mes "[Phendark]";
+		mes "Zealotus! How dare";
+		mes "she say those things";
+		mes "against me! Less manly";
+		mes "than Injustice?! I'll just";
+		mes "have to prove her wrong!";
+		mes "Out the way, pithy human!";
+		close;
+	}
+
+}
+
+gl_prison1.gat,100,48,5	script	Rybio#LhzHat	1201,{
+
+	if(ZLMASKQ == 2)
+	{
+		mes "[Rybio]";
+		mes "You know, I usually just";
+		mes "run up and slash like crazy";
+		mes "once I see you humans, but";
+		mes "my heart's not in it today, so";
+		mes "I'm gonna give you just one";
+		mes "chance to run for your life.";
+		next;
+		switch( select( "Talk about Phendark.", "Run for your life." ) )
+		{
+		case 1:
+			mes "[Rybio]";
+			mes "What th--? You know the";
+			mes "same Phendark I know?";
+			mes "Dayam, that's weird. But";
+			mes "yeah, him and Zealotus have";
+			mes "some kind of... I dunno what";
+			mes "it is, actually. Um, love?";
+			next;
+			mes "[Rybio]";
+			mes "Anyway, Phendark has";
+			mes "been acting really weird";
+			mes "lately. I guess Zealotus";
+			mes "loved him to the point that";
+			mes "she abused him to the point";
+			mes "that he's scared of humans now.";
+			next;
+			mes "[Rybio]";
+			mes "Huh. You know what'd help?";
+			mes "Dark Crystal Fragments. It's";
+			mes "worthless to humans, but if";
+			mes "creatures of darkness eat it,";
+			mes "it brings out more of their";
+			mes "inner demon. Scary, huh?";
+			next;
+			mes "[Rybio]";
+			mes "Since Phendark's pretty big, and he's acting like a total wuss, you";
+			mes "you should probably get him to eat ^3131FF369 Dark Crystal Fragments^000000. Don't";
+			mes "worry, you should be able to find those all over Rune-Midgard.";
+			next;
+			mes "[Rybio]";
+			mes "I dunno why a human";
+			mes "like you would want to";
+			mes "help one of us out, though.";
+			mes "What's in it for you, exactly?";
+			set ZLMASKQ,3;
+			close;
+		break;
+
+		case 2:
+			mes "[Rybio]";
+			mes "That's right!";
+			mes "Run, get outta here!";
+			mes "If you're not fast enough,";
+			mes "I might eat you, human!";
+			mes "...Well... Probably not.";
+			close;
+		break;
+		}
+	}
+	else if(ZLMASKQ == 3)
+	{
+		mes "[Rybio]";
+		mes "I don't get why someone";
+		mes "like you, a seemingly heroic";
+		mes "adventurer, would want to help";
+		mes "out Phendark? Did Zealotus";
+		mes "blackmail you or something?";
+		next;
+		mes "[Rybio]";
+		mes "Well, you could";
+		mes "probably help him";
+		mes "by getting him to eat";
+		mes "^3131FF369 Dark Crystal Fragments^000000";
+		mes "to sort of stir up the demon";
+		mes "that sleeping within, you know?";
+		close;
+	}
+	else if(ZLMASKQ == 4)
+	{
+		mes "[Rybio]";
+		mes "Feeding him all of those";
+		mes "Dark Crystal Fragments didn't";
+		mes "work? But that was supposed";
+		mes "to be foolproof! Dayam, what";
+		mes "the hell happened to Phendark's";
+		mes "inner demon?! Man oh man...";
+		next;
+		mes "[Rybio]";
+		mes "Well, I don't know what";
+		mes "else you could try. I mean,";
+		mes "maybe you could try motivating";
+		mes "him. Reverse psychology?";
+		mes "It's weird talking about this";
+		mes "with a human. Hahahaha~";
+		set ZLMASKQ,5;
+		close;
+	}
+	else if(ZLMASKQ == 5)
+	{
+		mes "[Rybio]";
+		mes "Phendark sure looks";
+		mes "tough, but I guess even";
+		mes "he isn't totally evil. Yeah.";
+		mes "We monsters aren't all";
+		mes "bad... Just mostly bad.";
+		close;
+	}
+
+}
diff --git a/npc/quests/newgears/2006_headgear.txt b/npc/quests/newgears/2006_headgear.txt
index c59e383e6..a7445e6a5 100644
--- a/npc/quests/newgears/2006_headgear.txt
+++ b/npc/quests/newgears/2006_headgear.txt
@@ -1,489 +1,489 @@
-//===== eAthena Script =======================================

-//= 2006 Headgear

-//===== By: ==================================================

-//= DiviniaRO members, cleaned by reddozen

-//===== Current Version: =====================================

-//= 1.0c

-//===== Compatible With: =====================================

-//= SVN eA

-//===== Description: =========================================

-//= Anonymous Mask, Feather Beret, Valk. Helm, Smiling Mask,

-//= Lion Masquerade, Bride Mask, Judge Hat and A-Yam Hat

-//===== Additional Comments: =================================

-//= NPC id's and dialog are custom, please replace

-//= 1.0a fixed typos, added missing names, more cleaned and

-//= standartized stuff a bit [Lupus]

-//= 1.0b fixed Helm of Valkyries ingredients

-//= 1.0c corrected item names according to item_db [Lupus]

-//============================================================

-

-

-//===================== Anonymous Mask =====================================================

-

-rachel.gat,91,273,4	script	Masked Man	880,{

-	set @npcname$,"[Masked Man]";

-

-	mes @npcname$;

-	mes "Psssst....";

-	next;

-	mes @npcname$;

-	mes "Shhhh...";

-	mes "Come here, but keep quiet";

-	next;

-	mes @npcname$;

-	mes "I have something that might interest you";

-	next;

-

-	switch(select("I think you know what I want...","Huh? Sorry, I'm Just looking around."))

-	{

-

-		case 1:

-			mes @npcname$;

-			mes "I only need a few things in return";

-			mes "100 Slick Paper,";

-			mes "99 Sticky Mucus,";

-			mes "1 Black Dysetuff and";

-			mes "100,000 Zeny.";

-			next;

-			mes @npcname$;

-			if ( (countitem(983)<1) || (countitem(7111)<100) || (countitem(938)<99) || (Zeny < 100000) ) {

-				mes "Come back when you have what I need...";

-				close;

-			}

-

-			mes "I see you came prepared.";

-			delitem 7111,100;

-			delitem 938,99;

-			delitem 983,1;

-			set Zeny, Zeny-100000;

-			next;

-			getitem 5175,1;

-			mes @npcname$;

-			mes "You didnt get this from me by the way...";

-			close;

-

-

-		case 2:

-			mes @npcname$;

-			mes "Yeah... I knew that.";

-			close;

-	}

-

-}

-

-

-

-//======================== Feather Beret ================================================

-

-rachel.gat,135,121,4	script	Sakyul	933,{

-	set @npcname$,"[Sakyul]";

-

-	mes @npcname$;

-	mes "Mumble mumble..";

-	mes "Stupid Arunafelz Military!";

-	mes "I lost the use of my legs during the Rune-Midgard!";

-	mes "I was in a special unit.. we even had our own beret!";

-	mes "Wingmen, they called us..";

-	next;

-	mes @npcname$;

-	mes "If you really want one, I can make a replica for you.";

-	next;

-

-	switch(select("Of course I do!","No way man, you creep me out!"))

-	{

-

-		case 1:

-			mes @npcname$;

-			mes "Alright then, I just need a few things:";

-			mes "1 Beret,";

-			mes "100 Soft Feathers and";

-			mes "1 White Dyestuff.";

-			next;

-			mes @npcname$;

-			if ( (countitem(5172)<1) || (countitem(982)<1) || (countitem(7063)<100) ) {

-				mes "Eh.. I'm old, not Senile.. Bring me the rest of the stuff I asked for!";

-				close;

-			}

-

-			mes "Nice to see a well prepared youngster!";

-			delitem 5172,1;

-			delitem 7063,100;

-			delitem 982,1;

-			next;

-			getitem 5170,1;

-			mes @npcname$;

-			mes "Here.. This takes me back.. Have fun with it!";

-			close;

-

-

-		case 2:

-			mes @npcname$;

-			mes "Fine then! Leave an old man at peace! Git! Go!";

-			close;

-	}

-

-}

-

-

-

-//============================ Valkyrie Helm =====================================================

-

-hugel.gat,146,105,4	script	Genirhimin	897,{

-	set @npcname$,"[Genirhimin]";

-

-	mes @npcname$;

-	mes "Eh?";

-	if (Zeny < 10000000) goto L_POOR;

-	next;

-	mes @npcname$;

-	mes "In days long past us mortals were permitted";

-	mes "to serve Odin and the Valkyries in battle..";

-	mes "So that maybe we would have the cahnce to die";

-	mes "honorably in battle and return to Val Halla";

-	next;

-	mes @npcname$;

-	mes "The bravest of Warriors were rewarded with";

-	mes "the Valkyrie Helm";

-	mes "But.. those days are long since passed..";

-	mes "I suppose I could make you one, if you can";

-	mes "gather what I need.";

-	next;

-

-	switch(select("Really? I'd love one.","I'm not one for fairy tales old man."))

-	{

-

-		case 1:

-			mes @npcname$;

-			mes "Here is what I need:";

-			mes "1 Sageworm Card,";

-			mes "1 Argiope Card,";

-			mes "1 Dryad Card,";

-			mes "1 Wooden Golem Card,";

-			mes "1 Bongun Card,";

-			mes "1 Pirate Skel Card,";

-			mes "1 Marduk Card and...";

-			next;

-			mes @npcname$;

-			mes "1 Hode Card,";

-			mes "1 Elder Card,";

-			mes "1 Nightmare Terror Card,";

-			mes "1000 Darkness Runes and";

-			mes "1000 Bloody Runes.";

-			next;

-			mes @npcname$;

-			if ( (countitem(4219)<1) || (countitem(4114)<1) || (countitem(4177)<1) || (countitem(4259)<1) || (countitem(4212)<1) || (countitem(4073)<1) || (countitem(4112)<1) || (countitem(4081)<1) || (countitem(4251)<1) || (countitem(4166)<1) || (countitem(7511)<1000) || (countitem(7563)<1000) ) {

-				mes "I'm sorry, but I need more to make the helm.";

-				close;

-			}

-

-			mes "Give me a minute and I'll work my magic...";

-			delitem 4219,1;

-			delitem 4114,1;

-			delitem 4177,1;

-			delitem 4259,1;

-			delitem 4212,1;

-			delitem 4073,1;

-			delitem 4112,1;

-			delitem 4081,1;

-			delitem 4251,1;

-			delitem 4166,1;

-			delitem 7511,1000;

-			delitem 7563,1000;

-			next;

-			getitem 5171,1;

-			mes @npcname$;

-			mes "This is a serious honour... You have proven yourself a brave and honorable Warrior, Wear this with Pride.";

-			close;

-

-		case 2:

-			mes @npcname$;

-			mes "So be it, suit yourself..";

-			close;

-	}

-

-	L_POOR:

-		mes "My time is worth more than the fortunes of Rune-Midgard and Arunafelz combined...";

-		close;

-

-}

-

-

-

-//======================= Smiling Mask / Lion Masquerade / Bride Mask ===============================

-

-payon.gat,135,231,5	script	Chung-Wol-Mang	907,{

-	set @npcname$,"[Chung-Wol-Mang]";

-

-	mes @npcname$;

-	mes "Hey, I can make you three rare masks if you bring me all of the items needed to make them.";

-	next;

-	mes @npcname$;

-	mes "So, which one will it be?";

-	next;

-	switch(select("Smiling Mask","Lion Masquerade","Bride Mask","I changed my mind."))

-	{

-

-		case 1:

-			mes @npcname$;

-			mes "Okay, for the Smiling Mask I need:";

-			mes "1 Four-Leaf Clover,";

-			mes "500 Trunks,";

-			mes "10 Elastic Bands,";

-			mes "20 Memory Bookmarks,";

-			mes "1 Cigarette,";

-			mes "100 Cactus Needles and";

-			mes "100 Manes.";

-			next;

-

-			if ( (countitem(706) < 1) || (countitem(1019) < 500) || (countitem(7200) < 10) || (countitem(7015) < 20) || (countitem(2267) < 1) || (countitem(952) < 100) || (countitem(1028) < 100) || (countitem(1028) < 100) ){

-				mes @npcname$;

-				mes "Come back and talk to me when you've gathered all the items.";

-				close;

-			}

-

-			mes @npcname$;

-			mes "You brought all the items, thanks. Here give them to me.";

-			delitem 706,1;

-			delitem 1019,500;

-			delitem 7200,10;

-			delitem 7015,20;

-			delitem 2267,1;

-			delitem 952,100;

-			delitem 1028,100;

-			next;

-			getitem 5176,1;

-			mes @npcname$;

-			mes "Thanks, you can have your mask now.";

-			close;

-

-		case 2:

-			mes @npcname$;

-			mes "Okay, for the Lion Masquerade I need:";

-			mes "1 Four-Leaf Clover,";

-			mes "500 Trunks,";

-			mes "10 Elastic Bands,";

-			mes "500 Horrendous Hairs,";

-			mes "2 Ancient Teeth and";

-			mes "1 Orange Dyestuff.";

-			next;

-

-			if ( (countitem(706) < 1) || (countitem(1019) < 500) || (countitem(7200) < 10) || (countitem(1048) < 500) || (countitem(1053) < 2) || (countitem(980) < 1) ) {

-				mes @npcname$;

-				mes "Come back and talk to me when you've gathered all the items.";

-				close;

-			}

-

-			mes @npcname$;

-			mes "You brought all the items, thanks. Here give them to me.";

-			delitem 706,1;

-			delitem 1019,500;

-			delitem 7200,10;

-			delitem 1048,500;

-			delitem 1053,2;

-			delitem 980,1;

-			next;

-			getitem 5177,1;

-			mes @npcname$;

-			mes "Thanks, you can have your mask now.";

-			close;

-

-

-		case 3:

-			mes @npcname$;

-			mes "Okay, for the Bride Mask I need:";

-			mes "1 Four-Leaf Clover,";

-			mes "500 Trunks,";

-			mes "10 Elastic Bands,";

-			mes "20 Skirts of Virgin,";

-			mes "500 Transparent Celestial Robes,";

-			mes "2 Ancient Lips and";

-			mes "100 Squid Inks.";

-			next;

-

-			if ( (countitem(706) < 1) || (countitem(1019) < 500) || (countitem(7200) < 10) || (countitem(1049) < 20) || (countitem(7165) < 500) || (countitem(1054) < 2) || (countitem(1024) < 100) ) {

-				mes @npcname$;

-				mes "Come back and talk to me when you've gathered all the items.";

-				close;

-			}

-

-			mes @npcname$;

-			mes "You brought all the items, thanks. Here give them to me.";

-			delitem 706,1;

-			delitem 1019,500;

-			delitem 7200,10;

-			delitem 1049,20;

-			delitem 7165,500;

-			delitem 1054,2;

-			delitem 1024,100;

-			next;

-			getitem 5169,1;

-			mes @npcname$;

-			mes "Thanks, you can have your mask now.";

-			close;

-

-

-		case 4:

-			mes @npcname$;

-			mes "Okay, come back if you feel up to it later.";

-			close;

-

-	}

-

-}

-

-

-

-//====================== Judge Hat / A-Yam Hat =============================================

-

-payon.gat,137,123,5	script	Hangaram	740,{

-	set @npcname$,"[Hangaram]";

-

-	mes @npcname$;

-	mes "Hello adventurer!";

-	mes "Our life is complicated.";

-	next;

-	

-	mes @npcname$;

-	mes "But if you want I can help you by making 2 Hats.";

-	next;

- 

-	mes @npcname$;

-	mes "My creations are the Judge Hat and the A-Yam Hat.";

-	mes "Which Hat do you want?";

-	next;

-		

-	switch(select("Judge Hat","A-Yam Hat","No thanks"))

-	{

-

-		case 1:

-			mes @npcname$;

-			mes "^3355FFJudge Hat^000000";

-			mes "7 Red Bijou,";

-			mes "7 Blue Bijou,";

-			mes "7 Yellow Bijou,";

-			mes "7 Green Bijou,";

-			mes "300 Shining Scales,";

-			next;

-			mes "1 Black Dyestuff,";

-			mes "5 Cracked Diamond and";

-			mes "1 Slotted Hat.";

-			next;

-			mes @npcname$;

-			if( (countitem(7445)<7) || (countitem(7446)<7) || (countitem(7447)<7) || (countitem(7448)<7) || (countitem(954)<300) || (countitem(983)<1) || (countitem(733)<5) || (countitem(2221)<1) ){

-				mes "Please, return when you have everything I need.";

-				close;

-			}

-			delitem 7445,7;

-			delitem 7446,7;

-			delitem 7447,7;

-			delitem 7448,7;

-			delitem 954,300;

-			delitem 983,1;

-			delitem 733,5;

-			delitem 2221,1;

-

-			mes "Ok you seem to have all the items.";

-			next;

-

-			mes @npcname$;

-			mes "Hmmm.. We now make this... Mmm.";

-			emotion 9; 	

-			next;

-	

-			mes @npcname$;

-			mes "Now we use the Dyestuff like this.";

-			emotion 23;	

-			next;

-

-			mes @npcname$;

-			mes "OMG!!! this isn't meant to be like this.";

-			emotion 28;	

-			next;

-

-			mes @npcname$;

-			mes "....";

-			next;

-

-			mes @npcname$;

-			mes "Sorry, it didn't work.";

-			next;

-

-			mes @npcname$;

-			mes "Well that's the way life is.";

-			next;

-

-			mes @npcname$;

-			mes "JAJAJAJA... I was just kidding here is your item !!";

-			emotion 29;

-			next;

-

-			getitem 5173,1;

-

-			mes @npcname$;

-			mes "Good Work.";

-			close;

-

-		case 2:

-			mes @npcname$;

-			mes "^3355FFA-Yam Hat^000000";

-			mes "7 Red Bijou,";

-			mes "7 Blue Bijou,";

-			mes "7 Yellow Bijou,";

-			mes "7 Green Bijou,";

-			mes "300 Shining Scales,";

-			next;

-			mes "1 Scarlet Dyestuff,";

-			mes "5 Cracked Diamonds and";

-			mes "50 Soft Silks.";

-			next;

-			mes @npcname$;

-			if( (countitem(7445)<7) || (countitem(7446)<7) || (countitem(7447)<7) || (countitem(7448)<7) || (countitem(954)<300) || (countitem(975)<1) || (countitem(733)<5) || (countitem(7166)<50) ){

-				mes "Please return when you have everything I need.";

-				close;

-			}

-			delitem 7445,7;

-			delitem 7446,7;

-			delitem 7447,7;

-			delitem 7448,7;

-			delitem 954,300;

-			delitem 975,1;

-			delitem 733,5;

-			delitem 7166,50;

-

-			mes "Well, you have everything.";

-			next;

-

-			mes @npcname$;

-			mes "Mmm now we just split this part...";

-			emotion 9; 	

-			next;

-	

-			mes @npcname$;

-			mes "We throw this... Mmm..";

-			emotion 23;	

-			next;

-

-			mes @npcname$;

-			mes "This isn't meant to be like this..";

-			emotion 28;	

-			next;

-

-			mes @npcname$;

-			mes "... ready!!!";

-			emotion 21;	

-			next;

-		

-			getitem 5174,1;

-

-			mes @npcname$;

-			mes "Here you have my young fella !";

-			close;

-

-	

-		case 3:

-			mes @npcname$;

-			mes "Goodbye then.";

-        		close;

-

-	}

+//===== eAthena Script =======================================
+//= 2006 Headgear
+//===== By: ==================================================
+//= DiviniaRO members, cleaned by reddozen
+//===== Current Version: =====================================
+//= 1.0c
+//===== Compatible With: =====================================
+//= SVN eA
+//===== Description: =========================================
+//= Anonymous Mask, Feather Beret, Valk. Helm, Smiling Mask,
+//= Lion Masquerade, Bride Mask, Judge Hat and A-Yam Hat
+//===== Additional Comments: =================================
+//= NPC id's and dialog are custom, please replace
+//= 1.0a fixed typos, added missing names, more cleaned and
+//= standartized stuff a bit [Lupus]
+//= 1.0b fixed Helm of Valkyries ingredients
+//= 1.0c corrected item names according to item_db [Lupus]
+//============================================================
+
+
+//===================== Anonymous Mask =====================================================
+
+rachel.gat,91,273,4	script	Masked Man	880,{
+	set @npcname$,"[Masked Man]";
+
+	mes @npcname$;
+	mes "Psssst....";
+	next;
+	mes @npcname$;
+	mes "Shhhh...";
+	mes "Come here, but keep quiet";
+	next;
+	mes @npcname$;
+	mes "I have something that might interest you";
+	next;
+
+	switch(select("I think you know what I want...","Huh? Sorry, I'm Just looking around."))
+	{
+
+		case 1:
+			mes @npcname$;
+			mes "I only need a few things in return";
+			mes "100 Slick Paper,";
+			mes "99 Sticky Mucus,";
+			mes "1 Black Dysetuff and";
+			mes "100,000 Zeny.";
+			next;
+			mes @npcname$;
+			if ( (countitem(983)<1) || (countitem(7111)<100) || (countitem(938)<99) || (Zeny < 100000) ) {
+				mes "Come back when you have what I need...";
+				close;
+			}
+
+			mes "I see you came prepared.";
+			delitem 7111,100;
+			delitem 938,99;
+			delitem 983,1;
+			set Zeny, Zeny-100000;
+			next;
+			getitem 5175,1;
+			mes @npcname$;
+			mes "You didnt get this from me by the way...";
+			close;
+
+
+		case 2:
+			mes @npcname$;
+			mes "Yeah... I knew that.";
+			close;
+	}
+
+}
+
+
+
+//======================== Feather Beret ================================================
+
+rachel.gat,135,121,4	script	Sakyul	933,{
+	set @npcname$,"[Sakyul]";
+
+	mes @npcname$;
+	mes "Mumble mumble..";
+	mes "Stupid Arunafelz Military!";
+	mes "I lost the use of my legs during the Rune-Midgard!";
+	mes "I was in a special unit.. we even had our own beret!";
+	mes "Wingmen, they called us..";
+	next;
+	mes @npcname$;
+	mes "If you really want one, I can make a replica for you.";
+	next;
+
+	switch(select("Of course I do!","No way man, you creep me out!"))
+	{
+
+		case 1:
+			mes @npcname$;
+			mes "Alright then, I just need a few things:";
+			mes "1 Beret,";
+			mes "100 Soft Feathers and";
+			mes "1 White Dyestuff.";
+			next;
+			mes @npcname$;
+			if ( (countitem(5172)<1) || (countitem(982)<1) || (countitem(7063)<100) ) {
+				mes "Eh.. I'm old, not Senile.. Bring me the rest of the stuff I asked for!";
+				close;
+			}
+
+			mes "Nice to see a well prepared youngster!";
+			delitem 5172,1;
+			delitem 7063,100;
+			delitem 982,1;
+			next;
+			getitem 5170,1;
+			mes @npcname$;
+			mes "Here.. This takes me back.. Have fun with it!";
+			close;
+
+
+		case 2:
+			mes @npcname$;
+			mes "Fine then! Leave an old man at peace! Git! Go!";
+			close;
+	}
+
+}
+
+
+
+//============================ Valkyrie Helm =====================================================
+
+hugel.gat,146,105,4	script	Genirhimin	897,{
+	set @npcname$,"[Genirhimin]";
+
+	mes @npcname$;
+	mes "Eh?";
+	if (Zeny < 10000000) goto L_POOR;
+	next;
+	mes @npcname$;
+	mes "In days long past us mortals were permitted";
+	mes "to serve Odin and the Valkyries in battle..";
+	mes "So that maybe we would have the cahnce to die";
+	mes "honorably in battle and return to Val Halla";
+	next;
+	mes @npcname$;
+	mes "The bravest of Warriors were rewarded with";
+	mes "the Valkyrie Helm";
+	mes "But.. those days are long since passed..";
+	mes "I suppose I could make you one, if you can";
+	mes "gather what I need.";
+	next;
+
+	switch(select("Really? I'd love one.","I'm not one for fairy tales old man."))
+	{
+
+		case 1:
+			mes @npcname$;
+			mes "Here is what I need:";
+			mes "1 Sageworm Card,";
+			mes "1 Argiope Card,";
+			mes "1 Dryad Card,";
+			mes "1 Wooden Golem Card,";
+			mes "1 Bongun Card,";
+			mes "1 Pirate Skel Card,";
+			mes "1 Marduk Card and...";
+			next;
+			mes @npcname$;
+			mes "1 Hode Card,";
+			mes "1 Elder Card,";
+			mes "1 Nightmare Terror Card,";
+			mes "1000 Darkness Runes and";
+			mes "1000 Bloody Runes.";
+			next;
+			mes @npcname$;
+			if ( (countitem(4219)<1) || (countitem(4114)<1) || (countitem(4177)<1) || (countitem(4259)<1) || (countitem(4212)<1) || (countitem(4073)<1) || (countitem(4112)<1) || (countitem(4081)<1) || (countitem(4251)<1) || (countitem(4166)<1) || (countitem(7511)<1000) || (countitem(7563)<1000) ) {
+				mes "I'm sorry, but I need more to make the helm.";
+				close;
+			}
+
+			mes "Give me a minute and I'll work my magic...";
+			delitem 4219,1;
+			delitem 4114,1;
+			delitem 4177,1;
+			delitem 4259,1;
+			delitem 4212,1;
+			delitem 4073,1;
+			delitem 4112,1;
+			delitem 4081,1;
+			delitem 4251,1;
+			delitem 4166,1;
+			delitem 7511,1000;
+			delitem 7563,1000;
+			next;
+			getitem 5171,1;
+			mes @npcname$;
+			mes "This is a serious honour... You have proven yourself a brave and honorable Warrior, Wear this with Pride.";
+			close;
+
+		case 2:
+			mes @npcname$;
+			mes "So be it, suit yourself..";
+			close;
+	}
+
+	L_POOR:
+		mes "My time is worth more than the fortunes of Rune-Midgard and Arunafelz combined...";
+		close;
+
+}
+
+
+
+//======================= Smiling Mask / Lion Masquerade / Bride Mask ===============================
+
+payon.gat,135,231,5	script	Chung-Wol-Mang	907,{
+	set @npcname$,"[Chung-Wol-Mang]";
+
+	mes @npcname$;
+	mes "Hey, I can make you three rare masks if you bring me all of the items needed to make them.";
+	next;
+	mes @npcname$;
+	mes "So, which one will it be?";
+	next;
+	switch(select("Smiling Mask","Lion Masquerade","Bride Mask","I changed my mind."))
+	{
+
+		case 1:
+			mes @npcname$;
+			mes "Okay, for the Smiling Mask I need:";
+			mes "1 Four-Leaf Clover,";
+			mes "500 Trunks,";
+			mes "10 Elastic Bands,";
+			mes "20 Memory Bookmarks,";
+			mes "1 Cigarette,";
+			mes "100 Cactus Needles and";
+			mes "100 Manes.";
+			next;
+
+			if ( (countitem(706) < 1) || (countitem(1019) < 500) || (countitem(7200) < 10) || (countitem(7015) < 20) || (countitem(2267) < 1) || (countitem(952) < 100) || (countitem(1028) < 100) || (countitem(1028) < 100) ){
+				mes @npcname$;
+				mes "Come back and talk to me when you've gathered all the items.";
+				close;
+			}
+
+			mes @npcname$;
+			mes "You brought all the items, thanks. Here give them to me.";
+			delitem 706,1;
+			delitem 1019,500;
+			delitem 7200,10;
+			delitem 7015,20;
+			delitem 2267,1;
+			delitem 952,100;
+			delitem 1028,100;
+			next;
+			getitem 5176,1;
+			mes @npcname$;
+			mes "Thanks, you can have your mask now.";
+			close;
+
+		case 2:
+			mes @npcname$;
+			mes "Okay, for the Lion Masquerade I need:";
+			mes "1 Four-Leaf Clover,";
+			mes "500 Trunks,";
+			mes "10 Elastic Bands,";
+			mes "500 Horrendous Hairs,";
+			mes "2 Ancient Teeth and";
+			mes "1 Orange Dyestuff.";
+			next;
+
+			if ( (countitem(706) < 1) || (countitem(1019) < 500) || (countitem(7200) < 10) || (countitem(1048) < 500) || (countitem(1053) < 2) || (countitem(980) < 1) ) {
+				mes @npcname$;
+				mes "Come back and talk to me when you've gathered all the items.";
+				close;
+			}
+
+			mes @npcname$;
+			mes "You brought all the items, thanks. Here give them to me.";
+			delitem 706,1;
+			delitem 1019,500;
+			delitem 7200,10;
+			delitem 1048,500;
+			delitem 1053,2;
+			delitem 980,1;
+			next;
+			getitem 5177,1;
+			mes @npcname$;
+			mes "Thanks, you can have your mask now.";
+			close;
+
+
+		case 3:
+			mes @npcname$;
+			mes "Okay, for the Bride Mask I need:";
+			mes "1 Four-Leaf Clover,";
+			mes "500 Trunks,";
+			mes "10 Elastic Bands,";
+			mes "20 Skirts of Virgin,";
+			mes "500 Transparent Celestial Robes,";
+			mes "2 Ancient Lips and";
+			mes "100 Squid Inks.";
+			next;
+
+			if ( (countitem(706) < 1) || (countitem(1019) < 500) || (countitem(7200) < 10) || (countitem(1049) < 20) || (countitem(7165) < 500) || (countitem(1054) < 2) || (countitem(1024) < 100) ) {
+				mes @npcname$;
+				mes "Come back and talk to me when you've gathered all the items.";
+				close;
+			}
+
+			mes @npcname$;
+			mes "You brought all the items, thanks. Here give them to me.";
+			delitem 706,1;
+			delitem 1019,500;
+			delitem 7200,10;
+			delitem 1049,20;
+			delitem 7165,500;
+			delitem 1054,2;
+			delitem 1024,100;
+			next;
+			getitem 5169,1;
+			mes @npcname$;
+			mes "Thanks, you can have your mask now.";
+			close;
+
+
+		case 4:
+			mes @npcname$;
+			mes "Okay, come back if you feel up to it later.";
+			close;
+
+	}
+
+}
+
+
+
+//====================== Judge Hat / A-Yam Hat =============================================
+
+payon.gat,137,123,5	script	Hangaram	740,{
+	set @npcname$,"[Hangaram]";
+
+	mes @npcname$;
+	mes "Hello adventurer!";
+	mes "Our life is complicated.";
+	next;
+	
+	mes @npcname$;
+	mes "But if you want I can help you by making 2 Hats.";
+	next;
+ 
+	mes @npcname$;
+	mes "My creations are the Judge Hat and the A-Yam Hat.";
+	mes "Which Hat do you want?";
+	next;
+		
+	switch(select("Judge Hat","A-Yam Hat","No thanks"))
+	{
+
+		case 1:
+			mes @npcname$;
+			mes "^3355FFJudge Hat^000000";
+			mes "7 Red Bijou,";
+			mes "7 Blue Bijou,";
+			mes "7 Yellow Bijou,";
+			mes "7 Green Bijou,";
+			mes "300 Shining Scales,";
+			next;
+			mes "1 Black Dyestuff,";
+			mes "5 Cracked Diamond and";
+			mes "1 Slotted Hat.";
+			next;
+			mes @npcname$;
+			if( (countitem(7445)<7) || (countitem(7446)<7) || (countitem(7447)<7) || (countitem(7448)<7) || (countitem(954)<300) || (countitem(983)<1) || (countitem(733)<5) || (countitem(2221)<1) ){
+				mes "Please, return when you have everything I need.";
+				close;
+			}
+			delitem 7445,7;
+			delitem 7446,7;
+			delitem 7447,7;
+			delitem 7448,7;
+			delitem 954,300;
+			delitem 983,1;
+			delitem 733,5;
+			delitem 2221,1;
+
+			mes "Ok you seem to have all the items.";
+			next;
+
+			mes @npcname$;
+			mes "Hmmm.. We now make this... Mmm.";
+			emotion 9; 	
+			next;
+	
+			mes @npcname$;
+			mes "Now we use the Dyestuff like this.";
+			emotion 23;	
+			next;
+
+			mes @npcname$;
+			mes "OMG!!! this isn't meant to be like this.";
+			emotion 28;	
+			next;
+
+			mes @npcname$;
+			mes "....";
+			next;
+
+			mes @npcname$;
+			mes "Sorry, it didn't work.";
+			next;
+
+			mes @npcname$;
+			mes "Well that's the way life is.";
+			next;
+
+			mes @npcname$;
+			mes "JAJAJAJA... I was just kidding here is your item !!";
+			emotion 29;
+			next;
+
+			getitem 5173,1;
+
+			mes @npcname$;
+			mes "Good Work.";
+			close;
+
+		case 2:
+			mes @npcname$;
+			mes "^3355FFA-Yam Hat^000000";
+			mes "7 Red Bijou,";
+			mes "7 Blue Bijou,";
+			mes "7 Yellow Bijou,";
+			mes "7 Green Bijou,";
+			mes "300 Shining Scales,";
+			next;
+			mes "1 Scarlet Dyestuff,";
+			mes "5 Cracked Diamonds and";
+			mes "50 Soft Silks.";
+			next;
+			mes @npcname$;
+			if( (countitem(7445)<7) || (countitem(7446)<7) || (countitem(7447)<7) || (countitem(7448)<7) || (countitem(954)<300) || (countitem(975)<1) || (countitem(733)<5) || (countitem(7166)<50) ){
+				mes "Please return when you have everything I need.";
+				close;
+			}
+			delitem 7445,7;
+			delitem 7446,7;
+			delitem 7447,7;
+			delitem 7448,7;
+			delitem 954,300;
+			delitem 975,1;
+			delitem 733,5;
+			delitem 7166,50;
+
+			mes "Well, you have everything.";
+			next;
+
+			mes @npcname$;
+			mes "Mmm now we just split this part...";
+			emotion 9; 	
+			next;
+	
+			mes @npcname$;
+			mes "We throw this... Mmm..";
+			emotion 23;	
+			next;
+
+			mes @npcname$;
+			mes "This isn't meant to be like this..";
+			emotion 28;	
+			next;
+
+			mes @npcname$;
+			mes "... ready!!!";
+			emotion 21;	
+			next;
+		
+			getitem 5174,1;
+
+			mes @npcname$;
+			mes "Here you have my young fella !";
+			close;
+
+	
+		case 3:
+			mes @npcname$;
+			mes "Goodbye then.";
+        		close;
+
+	}
 }
\ No newline at end of file
diff --git a/npc/quests/obb_quest.txt b/npc/quests/obb_quest.txt
index 76aa2517b..b134c1db6 100644
--- a/npc/quests/obb_quest.txt
+++ b/npc/quests/obb_quest.txt
@@ -1,197 +1,197 @@
-//===== Athena Script =======================================

-//= Old Blue Box Quest

-//===== By ================================================

-//= Celesta, Lupus

-//===== Version ===========================================

-//= 1.6a

-//===== Compatible With ===================================

-//= SVN3000+

-//===== Description =======================================

-//= Official OBB Quest. You can pass it any times you want.

-//= 1.6 Updated, fixed, optimized and translated into English [Lupus]

-//= 1.6a Halved the required items to make an obb, thanks to marquis007 [MasterOfMuppets]

-//===== Description =======================================

-

-alberta.gat,115,204,5	script	Tourist	97,{

-	mes "[Tourist]";

-	if(obb_quest == 1 ) goto L_YES;

-	if(obb_quest == 2 ) goto L_DONE;  

-

-	mes "Hello, stranger!";

-	mes "Could you help me with kinda problem... Then I'd tell you something valuable.";

-	next;

-	mes "[Tourist]";

-	mes "I'm starving. I haven't had an apple since the morning...";

-	mes "Feed me and I'll tell you a secret.";

-	next;

-

-L_MENU:

-	menu "What do you like?",-,"I've got food.",L_FOOD, "See you later.", L_END;

-

-	mes "[Tourist]";

-	mes "Me.. I.. Today I'd like:";

-	mes "20 ^0000FFMeat^000000";

-	mes "20 ^0000FFWell-Baked Cookie^000000";

-	next;

-	goto L_MENU;

-

-L_NO_MEAT:

-	delitem 517,20;//Items: Meat,

-	mes "You know, you're lack of meat...";

-	mes "Please, bring me more...";

-	close;

-

-L_NO_COOK:

-	delitem 538,20;//Items: Well-baked_Cookie,

-	mes "Awww... I just wanna more sweeties!";

-	mes "Please, get me more cookies...";

-	close;

-

-L_FOOD:

-	mes "[Tourist]";

-	mes "Wha?! You brought all the food?";

-	mes "At last!";

-	next;

-	mes "[Tourist]";

-	if(countitem(517)<20) goto L_NO_MEAT;//Items: Meat,

-	delitem 517,20;//Items: Meat,

-	if(countitem(538)<20) goto L_NO_COOK;//Items: Well-baked_Cookie,

-	delitem 538,20;//Items: Well-baked_Cookie,

-	if(rand(10)<7) goto L_HUNGRY;

-	mes "Well... I'm sorta full.";

-	mes "Now listen to me. It's important.";

-	next;

-	mes "[Tourist]";

-	mes "A friend of mine who lives in Morroc, know one old man from Comodo...";

-	next;

-	mes "[Tourist]";

-	mes "That old man might know a secret of strange ancient blue boxes.";

-	set obb_quest, 1;

-	close;

-

-L_HUNGRY:

-	mes "I'm still hungry!";

-	mes "Is it all you got?";

-	close;

-

-L_YES:

-	mes "OK, go to Morroc and find my old pal Jacob,";

-	mes "he'll help you to trace an old man, who might keep a knowledge how to make some blue boxes...";

-	next;

-	mes "[Tourist]";

-	mes "Good luck, my friend.";

-	close;

-

-L_DONE:

-	mes "Have you made any Blue Boxes yet?";

-	next;

-	mes "[Tourist]";

-	mes "Oh... yeah, you've met that Old Greek from Comodo...";

-	close;

-

-L_END:

-	mes "[Tourist]";

-	mes "Well... farewell then.";

-	close;

-}

-

-//second part Jacob

-morocc.gat,267,142,5	script	Jacob	807,{

-	mes "[Jacob]";

-	if(obb_quest == 1 ) goto L_YES;

-	if(obb_quest == 2 ) goto L_DONE;

-	mes "Get off! I'm busy!";

-	if(rand(2))mes "And it's none of your business!";

-	if(rand(2))mes "What Alberta? Huh?! Have I said it aloud? Forget it.";

-	close;

-

-L_YES:

-	mes "Aha! You say you know my old friend from Alberta?";

-	next;

-	mes "[Jacob]";

-	mes "Well, I'm gladly tell you about that weird old man if you bring me";

-	mes "2 ^0000FFNo Recipient^000000";

-	next;

-	menu "Here you are!",-,"I've changed my plans.",L_END;

-

-	mes "[Jacob]";

-	mes "Let me see...";

-	if(countitem(636)<2) goto L_NOITM;//Items: No_Recipient,

-	delitem 636,2;//Items: No_Recipient,

-	mes "Thank you, that's all I need.";

-	emotion e_thx;

-	next;

-	mes "[Jacob]";

-	set obb_quest, 2;

-L_DONE:

-	mes "Go to Comodo. Somewhere on the beach you'll find Old Greek.";

-	mes "Tell me that you know me and he'll help you.";

-	close;

-

-L_NOITM:

-	mes "Pardon, but I do really need these two ^0000FFNo Recipients^000000.";

-	emotion e_hmm;

-	close;

-

-L_END:

-	mes "[Jacob]";

-	mes "Well, good luck.";

-	close;

-}

-

-//third part

-comodo.gat,41,209,5	script	Old Greek	120,{

-	mes "[Old Greek]";

-	if(obb_quest == 2 ) goto L_YES;

-	if(obb_quest < 2 ) goto  L_LOST;

-

-L_LOST:

-	mes "The KNOWLEDGE! That's the key, my child...";

-	if(rand(2))mes "Wealth doesn't matter.";

-	close;

-

-L_YES:

-	mes "Huh? Jacob send you?";

-	mes "OK, OK... It's true, I still can use old blue prints to make";

-	mes "an ^0000FF Old Blue Box^000000";

-	next;

-

-L_MENU:

-	menu "Make me one.",L_CREATE,"What do you need?",-,"Gooodbye.",L_END;

-

-	mes "[Old Greek]";

-	mes "For an Old Blue Box I need:";

-	mes "50 ^0000FFCyfars^000000";

-	mes "10 ^0000FFBrigans^000000";

-	mes "10 ^0000FFClam Shells^000000";

-	mes "15 ^0000FFCrab Shells^000000";

-	next;

-	goto L_MENU;

-

-L_CREATE:

-	mes "[Old Greek]";

-	mes "Let's see... What have you got...";

-	next;

-L_CREATE2:

-	if(countitem(7053)<50 || countitem(7054)<10 || countitem(965)<10 || countitem(964)<15) goto L_NO;//Items: Cyfar, Brigan, Clam_Shell, Crab_Shell,

-	delitem 7053,50;//Items: Cyfar,

-	delitem 7054,10;//Items: Brigan,

-	delitem 965,10;//Items: Clam_Shell,

-	delitem 964,15;//Items: Crab_Shell,

-	getitem 603,1;//Items: Old_Blue_Box,

-	mes "[Old Greek]";

-	mes "Here's your Box!";

-	emotion e_no1;

-	next;

-	menu "Make another!",L_CREATE2, "It's enough.",-;

-

-L_END:

-	mes "[Old Greek]";

-	mes "I wish you happy journey, my child.";

-	close;

-

-L_NO:

-	mes "[Old Greek]";

-	mes "Alas, my child. You haven't brought enough materials...";

-	close;

-}

+//===== Athena Script =======================================
+//= Old Blue Box Quest
+//===== By ================================================
+//= Celesta, Lupus
+//===== Version ===========================================
+//= 1.6a
+//===== Compatible With ===================================
+//= SVN3000+
+//===== Description =======================================
+//= Official OBB Quest. You can pass it any times you want.
+//= 1.6 Updated, fixed, optimized and translated into English [Lupus]
+//= 1.6a Halved the required items to make an obb, thanks to marquis007 [MasterOfMuppets]
+//===== Description =======================================
+
+alberta.gat,115,204,5	script	Tourist	97,{
+	mes "[Tourist]";
+	if(obb_quest == 1 ) goto L_YES;
+	if(obb_quest == 2 ) goto L_DONE;  
+
+	mes "Hello, stranger!";
+	mes "Could you help me with kinda problem... Then I'd tell you something valuable.";
+	next;
+	mes "[Tourist]";
+	mes "I'm starving. I haven't had an apple since the morning...";
+	mes "Feed me and I'll tell you a secret.";
+	next;
+
+L_MENU:
+	menu "What do you like?",-,"I've got food.",L_FOOD, "See you later.", L_END;
+
+	mes "[Tourist]";
+	mes "Me.. I.. Today I'd like:";
+	mes "20 ^0000FFMeat^000000";
+	mes "20 ^0000FFWell-Baked Cookie^000000";
+	next;
+	goto L_MENU;
+
+L_NO_MEAT:
+	delitem 517,20;//Items: Meat,
+	mes "You know, you're lack of meat...";
+	mes "Please, bring me more...";
+	close;
+
+L_NO_COOK:
+	delitem 538,20;//Items: Well-baked_Cookie,
+	mes "Awww... I just wanna more sweeties!";
+	mes "Please, get me more cookies...";
+	close;
+
+L_FOOD:
+	mes "[Tourist]";
+	mes "Wha?! You brought all the food?";
+	mes "At last!";
+	next;
+	mes "[Tourist]";
+	if(countitem(517)<20) goto L_NO_MEAT;//Items: Meat,
+	delitem 517,20;//Items: Meat,
+	if(countitem(538)<20) goto L_NO_COOK;//Items: Well-baked_Cookie,
+	delitem 538,20;//Items: Well-baked_Cookie,
+	if(rand(10)<7) goto L_HUNGRY;
+	mes "Well... I'm sorta full.";
+	mes "Now listen to me. It's important.";
+	next;
+	mes "[Tourist]";
+	mes "A friend of mine who lives in Morroc, know one old man from Comodo...";
+	next;
+	mes "[Tourist]";
+	mes "That old man might know a secret of strange ancient blue boxes.";
+	set obb_quest, 1;
+	close;
+
+L_HUNGRY:
+	mes "I'm still hungry!";
+	mes "Is it all you got?";
+	close;
+
+L_YES:
+	mes "OK, go to Morroc and find my old pal Jacob,";
+	mes "he'll help you to trace an old man, who might keep a knowledge how to make some blue boxes...";
+	next;
+	mes "[Tourist]";
+	mes "Good luck, my friend.";
+	close;
+
+L_DONE:
+	mes "Have you made any Blue Boxes yet?";
+	next;
+	mes "[Tourist]";
+	mes "Oh... yeah, you've met that Old Greek from Comodo...";
+	close;
+
+L_END:
+	mes "[Tourist]";
+	mes "Well... farewell then.";
+	close;
+}
+
+//second part Jacob
+morocc.gat,267,142,5	script	Jacob	807,{
+	mes "[Jacob]";
+	if(obb_quest == 1 ) goto L_YES;
+	if(obb_quest == 2 ) goto L_DONE;
+	mes "Get off! I'm busy!";
+	if(rand(2))mes "And it's none of your business!";
+	if(rand(2))mes "What Alberta? Huh?! Have I said it aloud? Forget it.";
+	close;
+
+L_YES:
+	mes "Aha! You say you know my old friend from Alberta?";
+	next;
+	mes "[Jacob]";
+	mes "Well, I'm gladly tell you about that weird old man if you bring me";
+	mes "2 ^0000FFNo Recipient^000000";
+	next;
+	menu "Here you are!",-,"I've changed my plans.",L_END;
+
+	mes "[Jacob]";
+	mes "Let me see...";
+	if(countitem(636)<2) goto L_NOITM;//Items: No_Recipient,
+	delitem 636,2;//Items: No_Recipient,
+	mes "Thank you, that's all I need.";
+	emotion e_thx;
+	next;
+	mes "[Jacob]";
+	set obb_quest, 2;
+L_DONE:
+	mes "Go to Comodo. Somewhere on the beach you'll find Old Greek.";
+	mes "Tell me that you know me and he'll help you.";
+	close;
+
+L_NOITM:
+	mes "Pardon, but I do really need these two ^0000FFNo Recipients^000000.";
+	emotion e_hmm;
+	close;
+
+L_END:
+	mes "[Jacob]";
+	mes "Well, good luck.";
+	close;
+}
+
+//third part
+comodo.gat,41,209,5	script	Old Greek	120,{
+	mes "[Old Greek]";
+	if(obb_quest == 2 ) goto L_YES;
+	if(obb_quest < 2 ) goto  L_LOST;
+
+L_LOST:
+	mes "The KNOWLEDGE! That's the key, my child...";
+	if(rand(2))mes "Wealth doesn't matter.";
+	close;
+
+L_YES:
+	mes "Huh? Jacob send you?";
+	mes "OK, OK... It's true, I still can use old blue prints to make";
+	mes "an ^0000FF Old Blue Box^000000";
+	next;
+
+L_MENU:
+	menu "Make me one.",L_CREATE,"What do you need?",-,"Gooodbye.",L_END;
+
+	mes "[Old Greek]";
+	mes "For an Old Blue Box I need:";
+	mes "50 ^0000FFCyfars^000000";
+	mes "10 ^0000FFBrigans^000000";
+	mes "10 ^0000FFClam Shells^000000";
+	mes "15 ^0000FFCrab Shells^000000";
+	next;
+	goto L_MENU;
+
+L_CREATE:
+	mes "[Old Greek]";
+	mes "Let's see... What have you got...";
+	next;
+L_CREATE2:
+	if(countitem(7053)<50 || countitem(7054)<10 || countitem(965)<10 || countitem(964)<15) goto L_NO;//Items: Cyfar, Brigan, Clam_Shell, Crab_Shell,
+	delitem 7053,50;//Items: Cyfar,
+	delitem 7054,10;//Items: Brigan,
+	delitem 965,10;//Items: Clam_Shell,
+	delitem 964,15;//Items: Crab_Shell,
+	getitem 603,1;//Items: Old_Blue_Box,
+	mes "[Old Greek]";
+	mes "Here's your Box!";
+	emotion e_no1;
+	next;
+	menu "Make another!",L_CREATE2, "It's enough.",-;
+
+L_END:
+	mes "[Old Greek]";
+	mes "I wish you happy journey, my child.";
+	close;
+
+L_NO:
+	mes "[Old Greek]";
+	mes "Alas, my child. You haven't brought enough materials...";
+	close;
+}
diff --git a/npc/quests/quests_alberta.txt b/npc/quests/quests_alberta.txt
index 511875537..819358092 100644
--- a/npc/quests/quests_alberta.txt
+++ b/npc/quests/quests_alberta.txt
@@ -1,1193 +1,1193 @@
-//===== eAthena Script ======================================= 

-//= Quest NPCs related to Alberta

-//===== By: ================================================== 

-//= kobra_k88

-//===== Current Version: ===================================== 

-//= 1.7

-//===== Compatible With: ===================================== 

-//= eAthena 1.0

-//===== Description: ========================================= 

-//= Dolls Quest

-//= Boy's Cap Quest

-//= Antlers Quest

-//= Bao Bao, Cresent Hairpin, Fashionbale Glasses, Heart Hairpin Quests

-//= Hat of Sun God, Sunday Hat, Mage Hat, Magician Hat Quests

-//= Turtle Island Quests

-//===== Additional Comments: ================================= 

-//= Fully working

-//= 1.1 Fixed Spore Doll exploit, Gramp's Tiger skin label bug

-//= 1.3 Fixed item ID 7031 -> 7013

-//= 1.4 Fixed a bug, Fixed Exploits, Optimized [Lupus]

-//= 1.6 TEMPESTRA quest uses common quests variable MISC_QUEST 

-//=	Condition if done: (MISC_QUEST & 2) [Lupus]

-//= 1.7 Moved quest from cities/albera.txt [Evera]

-//============================================================ 

-

-

-

-//=======================================================================================================//

-//						Doll Quest

-//=======================================================================================================//

-alberta.gat,117,134,8	script	Elin	96,{

-	mes "[Elin]";

-	if(Sex){

-		mes "Hello, mister. Hmm, since you're a boy, you don't like dolls, do you?";

-	}else{

-		mes "Hello, miss. Since you're a girl, you must like dolls, don't you?";

-	}

-	next;

-	mes "[Elin]";

-	mes "I LOVE dolls!!";

-	emotion e_lv2;

-	next;

-	mes "[Elin]";

-	mes "Ya know..... I REALLY, REALLY, want a new doll.  I hope daddy is going to buy me one for my birthday.....";

-	next;

-	menu "Aww, you must be happy...",-,"How about I give you one now?",M_2;

-

-		mes "[Elin]";

-		mes "Yeah, this time I'm hoping for a Yoyo doll.  Hehe, they're so cute! They're my FAVORITE!";

-		emotion e_ok;

-		close;

-	M_2:

-		mes "[Elin]";

-		mes "Oh my goodness! Really?? You're such a sweetie.... gimme, gimme!!";

-		mes "What kinda doll are you going to give me? Are you really gonna give me one?";

-		emotion e_gasp;

-		next;

-		menu "Puppet",-,"Poring doll",sM_2,"Chonchon doll",sM_3,"Rocker doll",sM_4, "Spore doll",sM_5,

-		           "Osiris doll",sM_6,"Baphomet doll",sM_7,"Racoon doll",sM_8,"Yoyo doll",sM_9, "I am as adorable as a doll!",sM_10;

-		

-			if(countitem(740) < 1) goto L_Liar;

-			delitem 740,1;

-			mes "[Elin]";

-			mes "Wow--! It's a rabbit! It's SOOOO cute!! Thank you SOOO much!";

-			emotion e_lv2;

-			next;

-			mes "[Elin]";

-			mes "It's SOOO fluffy... Oh yeah! Let me give you a present too!";

-			next;

-			mes "(diggs around in her pockets)";

-			next;

-			mes "[Elin]";

-			mes "Ummm ... found it! Here take this!";

-			next;

-			getitem 530,1;

-			mes "[Elin]";

-			mes "I got this from Santa. It's a candy cane~";

-			next;

-			mes "[Elin]";

-			mes "Thanks again for the rabbit doll! I'm gonna HUG this to sleep EVERY night~";

-			emotion e_thx;

-			close;

-

-		sM_2:

-			if(countitem(741) < 1) goto L_Liar;

-			delitem 741,1;

-			mes "[Elin]";

-			mes "Yay! It's a poring doll! It's SOOOO cute! Since you gave me a doll I'll give you this....";

-			emotion e_lv2;

-			next;

-			getitem 529,1;

-			mes "[Elin]";

-			mes "Thank you for the doll!";

-			emotion e_thx;

-			close;

-

-		sM_3:

-			if(countitem(742) < 1) goto L_Liar;

-			delitem 742,1;

-			mes "[Elin]";

-			mes "Ew whats this?.... a Chonchon ... doll? ...";

-			emotion e_wah;

-			next;

-			mes "[Elin]";

-			mes "Oh well, since you're giving it to me, I guess it's ok ....";

-			next;

-			mes "[Elin]";

-			mes "Well here's a little something for giving me the doll.  Don't eat too much or you'll get cavities.";

-			getitem 530,1;

-			next;

-			mes "[Elin]";

-			mes ".... chonchon.... (~grumble, grumble~)";

-			emotion e_ag;

-			close;

-

-		sM_4:

-			if(countitem(752) < 1) goto L_Liar;

-			delitem 752,1;

-			mes "[Elin]";

-			mes "Oh! a Rocker doll.  I hate hopping things but this doll's kinda cute.";

-			next;

-			mes "[Elin]";

-			mes "Thank you.  Let me give you something too.";

-			next;

-			mes "[Elin]";

-			mes "Hmm, didn't I get some stuff from my uncle ...";

-			next;

-			mes "[Elin]";

-			mes "Here it is.  We've got tons of it at home so I'll share some with you~";

-			getitem 532,7;

-			next;

-			mes "[Elin]";

-			mes "Thanks again for the doll!";

-			emotion e_thx;

-			close;

-

-		sM_5:

-			if(countitem(743) < 1) goto L_Liar;

-			delitem 743,1;

-			mes "[Elin]";

-			mes "Blehh .... It's a mushroom... Mom's always scolding me for not eating mushrooms ...";

-			emotion e_swt;

-			next;

-			mes "[Elin]";

-			mes "I'll take it anyway, since the doll looks cute.  But I still won't eat mushrooms though ...";

-			next;

-			mes "[Elin]";

-			mes "Hmm, I'll need to give you a present too.";

-			next;

-			mes "[Elin]";

-			mes "My mom made this so please take it.";

-			getitem 538,5;

-			next;

-			mes "[Litte Kid]";

-			mes "Thank you for the doll~";

-			emotion e_thx;

-			close;

-

-		sM_6:

-			if(countitem(751) < 1) goto L_Liar;

-			delitem 751,1;

-			mes "[Elin]";

-			mes "Yay! It's an Osiris doll!";

-			next;

-			mes "[Elin]";

-			mes "Here's something for you too.";

-			getitem 522,2;

-			mes "[Elin]";

-			mes "Thank you for the doll!";

-			close;

-

-		sM_7:

-			if(countitem(750) < 1) goto L_Liar;

-			delitem 750,1;

-			mes "[Elin]";

-			mes "Yay! It's a Baphomet doll!";

-			next;

-			mes "[Elin]";

-			mes "Here's something for you too.";

-			getitem 525,5;

-			mes "[Elin]";

-			mes "Thank you for the doll!";

-			emotion e_thx;

-			close;

-

-		sM_8:

-			if(countitem(754) < 1) goto L_Liar;

-			delitem 754,1;

-			mes "[Elin]";

-			mes "Ah, it's a Smokie doll.  I hate Smokies, but the doll's really cute! Thank you!";

-			emotion e_ok;

-			next;

-			mes "[Elin]";

-			mes "Let me give you some of Grandma's home-made cake!";

-			getitem 539,3;

-			next;

-			mes "[Elin]";

-			mes "They're really good so make sure you eat them ok.";

-			next;

-			mes "[Elin]";

-			mes "Thanks again for this cute doll!";

-			emotion e_thx;

-			close;

-

-		sM_9:

-			if(countitem(753) < 1) goto L_Liar;

-			delitem 753,1;

-			mes "[Elin]";

-			mes "WOW--!!! OH MY GOSH! It's a Yoyo doll! This is what I REALLY wanted!! It's SOOOO cute......";

-			emotion e_lv2;

-			next;

-			mes "[Elin]";

-			mes "As a thank you, I'll give you this.";

-			getitem 608,1;

-			next;

-			mes "[Elin]";

-			mes "Dad picked them up during his travels.  It's a seed of some kind.";

-			mes "We tried planting them at home, but it doesn't seem to grow.";

-			next;

-			mes "[Elin]";

-			mes "Anyway, thank you SOOO MUCH for the Yoyo doll!!!!";

-			emotion e_thx;

-			close;

-

-		sM_10:

-			mes "[Elin]";

-			mes "BLAAAAAAAAHHH!! Don't make fun of me cuz I'm young!";

-			emotion e_pif;

-			next;

-			mes "[Elin]";

-			mes "(mumbles) .....'stupid'.....";

-			close;

-

-		L_Liar:

-			mes "[Elin]";

-			mes "HEY!! You don't have any dolls... I can't believe you would lie to a little kid!!!";

-			emotion e_gasp;

-			next;

-			mes "[Elin]";

-			mes "You're a MEANIE!! I HATE YOU!!!..... sniff... sniff.... Waaaaaaaaaaaaaaaaaaaahhhhhh!!";

-			emotion e_sob;

-			close;

-}

-

-

-//=======================================================================================================//

-//						Boy's Cap' Quest

-//=======================================================================================================//

-alberta_in.gat,28,145,4	script	Grampa	120,{

-	mes "[Grampa]";

-	mes "Gasp ..Gasp";

-	next;

-	mes "[Grampa]";

-	mes "When I look back on my younger days... I regret not making better use of my time...";

-	next;

-	mes "[Grampa]";

-	mes "Even so I STILL feel young at heart..... unfortunately my body is very old and is in poor condtion...... Cough !! Cough .. !!";

-	next;

-	if(countitem(1030) >= 10) menu "Talk.",M_Talk, "Show him Tiger's Footskin.",M_Show, "Cancel.",M_End;

-	menu "Talk",M_Talk, "Cancel",M_End;

-	

-	M_Talk:

-		mes "[Grampa]";

-		mes "Listen to me..... You must take care of your body as best you can....";

-		mes "If you aren't serious about staying healthy now..... you will surely regret it as you get older.";

-		next;

-		mes "[Grampa]";

-		mes "I've tried to restore my body to its youthful, healthy state with all of the best herbs and medicines that money can buy....";

-		next;

-		mes "[Grampa]";

-		mes "Not only have none of them worked, but their emense cost have made me bankurpt!";

-		next;

-		mes "[Grampa]";

-		mes "I have all but given up on trying to restore my youth.... there IS still one last thing I have not yet tried.....";

-		next;

-		mes "[Grampa]";

-		mes "It is the ^3355FFTiger's Footskin^000000, the legendary king of rejuvination!!"; 

-		emotion e_gasp;

-		next;

-		mes "[Grampa]";

-		mes "Have you heard of the Tiger's Footskin???.....";

-		emotion e_what;

-		next;

-		mes "[Grampa]";

-		mes "Just by LOOKING at it, your white hair turns Black again! By SMELLING it, your reflexes become 10x faster!";

-		mes "And just a single TASTE can turn and 80 year old man.... INTO AN 18 BOY!!!!";

-		next;

-		mes "[Grampa]";

-		mes "It truely is amazing! Ah, if I could only get my hands on some Tiger's Footskin.... my wishes would at last come true.....";

-		next;

-		mes "[Grampa]";

-		mes "For whoever brings me ^5555FF10 Tiger's Footskins^000000, I would gladly give that person my precious ^3355FFBoys Cap^000000.";

-		close;

-

-	M_Show:

-		mes "[Grampa]";

-		mes "Ohhh !! Th-This is the... this is the legendary.... TIGERS FOOTSKIN!!";

-		next;

-		mes "[Grampa]";

-		mes "Just by LOOKING at it, your white hair turns Black again! By SMELLING it, your reflexes become 10x faster!";

-		mes "And just a single TASTE can turn and 80 year old man.... INTO AN 18 BOY!!!!";

-		next;

-		mes "[Grampa]";

-		mes "It is the real Tiger's Footskin !! In my wildest dreams I never thought...... P-P-Please.... I beg you.... let me have it.....";

-		next;

-		menu "-Give him the Tiger's Footskin.",-, "Walk away.", sM_End;

-

-			mes "[Grampa]";

-			if(countitem(1030) < 10) goto L_NoItems;

-			delitem 1030,10;

-			getitem 5016,1;

-			mes "T-Thank YOU!! Thank you SO VERY MUCH!!";

-			emotion e_thx;

-			next;

-			mes "[Grampa]";

-			mes "Now my body can be reinvigorated!!! I will eat it right away!";

-			close;

-

-		L_NoItems:

-			mes "Get off damn cheater!!!";

-			emotion e_bzz;

-			close;

-

-		sM_End:

-			mes "[Grampa]";

-			mes "H-He-Hey!! Young one!! W-Wa-it! Please.... come back... I beg you.... come... back.... ooohh... foot.... sk... i... n....";

-			close;

-

-	M_End:

-		mes "[Grampa]";

-		mes "Cough Cough !! .. Tiger ....Tiger's ..... Foot ..... skin .....Cough Cough !!";

-		close;

-

-

-}

-

-

-//=======================================================================================================//

-//						Antlers Quest 

-//=======================================================================================================//

-alberta_in.gat,122,53,4	script	Cherokee	47,{

-	mes "[Cherokee]";

-	mes "Hey there, I am a Horn Collector.  Sounds great, huh?";

-	next;

-	mes "[Cherokee]";

-	mes "What do you think about Animal horns? I think they are very valuable and are well worth collecting.";

-	mes "You can wear them on your head, or even decorate your house with them.";

-	next;

-	mes "[Cherokee]";

-	mes "You know.... there has been a particular horn that I have not been able to find.  It is the ^5555FF'Evil Horn '^000000..";

-	next;

-	mes "[Cherokee]";

-	mes "Some say that an Evil Horn is really not an animal's horn, but one that comes from a Devil!";

-	mes "Even so, I really wish I could get my hands on one.";

-	next;

-	mes "[Cherokee]";

-	mes "Say.... do you have any ^5555FF'Evil Horns'^000000?";

-	mes "If you offer me ^5533FF20 Evil Horns^000000, I will give you my precious and famed, ^FF3355'Antlers'^000000.  Is it a deal?";

-	next;

-	menu "You got it!",-, "Shut up Dumbo.",M_End;

-

-		mes "[Cherokee]";

-		if(countitem(923) < 20) goto L_NotEnuf;

-		delitem 923,20;

-		mes "Whoah~! This is the first time I've ever seen a real ^3355FF'Evil Horn'^000000!!";

-		emotion e_ic;

-		next;

-		mes "[Cherokee]";

-		mes "Thank you! Here are the Antlers just as I promised you!";

-		emotion e_thx;

-		getitem 2284,1;

-		next;

-		mes "[Cherokee]";

-		mes "With your great help I was finally able to realize my long time dream.  I appreciate what you have done! God Bless You ..";

-		close;

-

-		L_NotEnuf:

-			mes "Hmm.... like I said, I need ^FF5533'20 Evil Horns'^000000.";

-			close;

-

-	M_End:

-		mes "[Cherokee]";

-		mes "Well aren't you a rude person.... I will forgive you however, seeing as we will meet again, I'm sure....";

-		close;

-}

-

-

-//=======================================================================================================//

-//			Bao Bao, Cresent Hairpin, Fashionbale Glasses, Heart Hairpin

-//=======================================================================================================//

-alberta.gat,120,53,3	script	Zic	51,{

-	mes "[Zic]";

-	mes "Yay! A cool breeze! That's why I love the sea!!";

-	emotion e_ho;

-	next;

-	mes "[Zic]";

-	mes "Huh?... Do you have any business with me? You came to me because I'm a merchant right?";

-	emotion e_hmm;

-	next;

-	mes "[Zic]";

-	mes "~Sigh!~ I get tired of my reputation.... I can't get any peace or quite around here.....";

-	next;

-	mes "[Zic]";

-	mes "So what do you wanna get? Tell me, tell me! It's so easy to guess what you want.....";

-	next;

-	menu "-Bao Bao",-, "-Cresent Hairpin",M_1, "-Fashionable Glasses",M_2, "-Heart Hairpin",M_3;

-

-		mes "[Zic]";

-		mes "To make a Bao Bao I will need:";	//5042

-		mes "- ^5555FF1 Silk Ribbon^000000,";	//10007

-		mes "- ^5555FF50 Herioc Emblems^000000.";	//968

-		next;

-		mes "[Zic]";

-		mes "Would you like me to make you one?";

-		next;

-		menu "Sure.",-, "No thanks.",M_End;

-

-			if (countitem(10007)<1 || countitem(968)<50) goto sL_NotEnuf;

-			delitem 10007, 1;

-			delitem 968, 50;

-			mes "[Zic]";

-			mes "Please wait while I make your Bao Bao......";

-			next;

-			mes "[Zic]";

-			mes "There you are, one Bao Bao.  Enjoy.";

-			getitem 5042, 1;

-			close;

-	M_1:

-		mes "[Zic]";

-		mes "To make a Cresent Hairpin I will need:";	//5048

-		mes "- ^5555FF1 Heart Hair Pin^000000,";	//5041

-		mes "- ^5555FF10 Steel^000000.";	//999

-		next;

-		mes "[Zic]";

-		mes "Would you like me to make you one?";

-		next;

-		menu "Sure.",-, "No thanks.",M_End;

-

-			if (countitem(5041)<1 || countitem(999)<10) goto sL_NotEnuf;

-			delitem 5041, 1;

-			delitem 999, 10;

-			mes "[Zic]";

-			mes "Please wait while I make your Cresent Hairpin......";

-			next;

-			mes "[Zic]";

-			mes "There you are, one Cresent Hairpin.  Enjoy.";

-			getitem 5048, 1;

-			close;

-	M_2:

-		mes "[Zic]";

-		mes "To make a pair of Fashionable Glasses I will need:";	//5047

-		mes "- ^5555FF1 Jack a Dandy^000000,";	//2271

-		mes "- ^5555FF1 Scarlet Dyestuffs^000000.";	//975

-		next;

-		mes "[Zic]";

-		mes "Would you like me to make you one?";

-		next;

-		menu "Sure.",-, "No thanks.",M_End;

-

-			if (countitem(2271)<1 || countitem(975)<1) goto sL_NotEnuf;

-			delitem 2271, 1;

-			delitem 975, 1;

-			mes "[Zic]";

-			mes "Please wait while I make your Fashionable Glasses......";

-			next;

-			mes "[Zic]";

-			mes "There you are, one Fashionable Glasses.  Enjoy.";

-			getitem 5047, 1;

-			close;

-	M_3:

-		mes "[Zic]";

-		mes "Are you sure you want a simple item like this? Oh well... To make a Heart Hairpin I will need:";	//5041

-		mes "- ^5555FF1200 Coral Reefs^000000.";	//7013

-		emotion e_hmm;

-		next;

-		mes "[Zic]";

-		mes "Would you like me to make you one?";

-		next;

-		menu "Sure.",-, "No thanks.",M_End;

-

-			if (countitem(7013)<1200) goto sL_NotEnuf;

-			delitem 7013, 1200;

-			mes "[Zic]";

-			mes "Please wait while I make your Hear Hairpin......";

-			next;

-			mes "[Zic]";

-			mes "There you are, one Heart Hairpin.  Enjoy.";

-			getitem 5041, 1;

-			close;

-

-		sL_NotEnuf:

-			mes "[Zic]";

-			mes "Hmm.... you don't have enough items for me to make it.  Come back some other time.";

-			close;

-

-	M_End:

-		mes "[Zic]";

-		mes "See ya around.";

-		close;

-}

-

-

-//=======================================================================================================//

-//				Hat of Sun God, Sunday Hat, Mage Hat, Magician Hat

-//=======================================================================================================//

-alberta.gat,135,79,3	script	Tempestra	71,{

-	mes "[Tempestra]";

-	mes "Ah...... Such a cool breeze.  It's good to be next to the sea.  I think it was the right choice for me to take a break from my business and come here.";

-	emotion e_ho;

-	if(MISC_QUEST & 2) goto sM_Menu;

-	next;

-	mes "[Tempestra]";

-	mes "Oh the sun is so bright today.  I'm glad I brought my hat.  If my skin is exposed to the sun like this everyday, I'm sure to get a sunburn.";

-	next;

-	mes "[Tempestra]";

-	mes "Boy, the heat is making me thirsty.  Nothing would be better right now, than sipping on a perfectly chilled yellow potion.....";

-	next;

-	menu "Here you go, my treat.",-, "Then go get one, sheesh....",M_1;

-

-		if(countitem(503) < 1) goto L_NoPot;

-		delitem 503, 1;

-		set MISC_QUEST,MISC_QUEST | 2;

-		mes "[Tempestra]";

-		mes "Oooh! Thank you so much.  I'm so glad to meet such a friendly person here....";

-		emotion e_thx;

-		next;

-		mes "[Tempestra]";

-		mes "(~gulp~gulp~)";

-		next;

-		mes "[Tempestra]";

-		mes "Hyaaaaaaa!! It's sooo cold!! Thank you.";

-	sM_Menu:

-		next;

-		menu "The weather is really hot, isn't it...",-, "You should wear a hat.",sM_1;

-

-			mes "[Tempestra]";

-			mes "Yes, it's very hot indeed.....";

-			next;

-			mes "[Tempestra]";

-			mes "Luckly I brought a lot of hats along.  I have";

-			mes "a ^5555FF'Sunday Hat'^000000,";

-			mes "a ^5555FF'Mage Hat'^000000,";

-			mes "a ^5555FF'Magician Hat'^000000, and more in my room...";

-			next;

-			mes "[Tempestra]";

-			mes "I brought these hats with me so that I could sell them and use the money I made for my vacation expenses....";

-			mes "but now it looks like I'll have to wear one.....";

-		ssM_Menu:

-			next;

-			menu "Sunday Hat?",-, "Mage Hat?",ssM_0b, "Magician Hat?",ssM_0c, "End Conversation.",ssM_End;

-

-				mes "[Tempestra]";

-				mes "A Sunday Hat is made up of:";

-				mes "- ^5555FF250 Fabric^000000,";

-				mes "- ^5555FF1 Slotted Hat^000000,";

-				mes "- ^5555FF1 Slotted Cap^000000,";

-				mes "- ^5555FF600 Soft Feathers^000000.";

-				mes "If you want, I can make one for you.  Just bring me all of those items.";

-				next;

-				menu "Make one for me.",-, "Cancel",ssM_End;

-

-					if (countitem(1059)<250 || countitem(2221)<1 || countitem(2227)<1 || countitem(7063)<600) goto ssM_Menu;

-					delitem 1059, 250;

-					delitem 2221, 1;

-					delitem 2227, 1;

-					delitem 7063, 600;

-					mes "[Tempestra]";

-					mes "Please wait just a moment while I make it........";

-					next;

-					getitem 5032, 1;

-					mes "[Tempestra]";

-					mes "All done... one Sunday Hat just for you.  Thank you and come back any time.";

-					emotion e_thx;

-					close;

-			ssM_0b:

-				mes "[Tempestra]";

-				mes "A Mage Hat is made up of:";

-				mes "- ^5555FF1 Wizard Hat^000000,";

-				mes "- ^5555FF400 Dragon Scales^000000,";

-				mes "- ^5555FF50 Mould Powder^000000,";

-				mes "- ^5555FF1 Elder Wilow Card^000000.";

-				mes "If you want, I can make one for you.  Just bring me all of those items.";

-				next;

-				menu "Make one for me.",-, "Cancel",ssM_End;

-

-					if (countitem(2252)<1 || countitem(1036)<400 || countitem(7001)<50 || countitem(4052)<1) goto ssM_Menu;

-					delitem 2252, 1;

-					delitem 1036, 400;

-					delitem 7001, 50;

-					delitem 4052, 1;

-					mes "[Tempestra]";

-					mes "Please wait just a moment while I make it........";

-					next;

-					getitem 5027, 1;

-					mes "[Tempestra]";

-					mes "All done... one Mage Hat just for you.  Thank you and come back any time.";

-					emotion e_thx;

-					close;

-			ssM_0c:

-				mes "[Tempestra]";

-				mes "A Magician Hat is made up of:";

-				mes "- ^5555FF1 Wizard Hat^000000,";

-				mes "- ^5555FF450 Ancient Lips^000000,";

-				mes "- ^5555FF1200 Solid Shells^000000,";

-				mes "If you want, I can make one for you.  Just bring me all of those items.";

-				next;

-				menu "Make one for me.",-, "Cancel",ssM_End;

-

-					if (countitem(2252)<1 || countitem(1054)<450 || countitem(943)<1200) goto ssM_Menu;

-					delitem 2252, 1;

-					delitem 1054, 450;

-					delitem 943, 1200;

-					mes "[Tempestra]";

-					mes "Please wait just a moment while I make it........";

-					next;

-					getitem 5045, 1;

-					mes "[Tempestra]";

-					mes "All done... one Magician just for you.  Thank you and come back any time.";

-					emotion e_thx;

-					close;

-			ssM_End:

-				close;

-

-		sM_1:

-			mes "[Tempestra]";

-			mes "Oh but the hats I have are for sale.... if I use them for myself I won't be able to sell them to my customers.";

-			next;

-			mes "[Tempestra]";

-			mes "Because you gave me the potion, I would like to make something for you.  Unfortuately I don't have any materials right now.";

-			next;

-			mes "[Tempestra]";

-			mes "Hmm... If you have:";

-			mes "^5555FF1 Emblem of the Sun God";

-			mes "10 Gold";

-			mes "40 Steel";

-			mes "50 Coal";

-			mes "and 2 Oridecon^000000..........";

-			next;

-			mes "[Tempestra]";

-			mes "I can make you a ^5555FF'Hat of the Sun God'^000000!! It's a fantastic piece of work! How's that sound?";

-			next;

-			menu "Alright.",-, "Not right now thanks.",ssM_1b;

-

-				if(countitem(7086)<1 || countitem(969)<10 || countitem(999)<40 || countitem(1003)<50 || countitem(984)<2) goto ssL_NotEnuf;

-				delitem 7086, 1;

-				delitem 969, 10;

-				delitem 999, 40;

-				delitem 1003, 50;

-				delitem 984, 2;

-				mes "[Tempestra]";

-				mes "Please wait just a moment while I make it........";

-				next;

-				getitem 5022, 1;

-				mes "[Tempestra]";

-				mes "All done... one Hat of the Sun God just for you.  Thank you again for the potion, and please come back any time.";

-				emotion e_thx;

-				close;

-

-				ssL_NotEnuf:

-					mes "[Tempestra]";

-					mes "Um.... where are those items exactly???";

-					emotion e_hmm;

-					close;

-			ssM_1b:

-				mes "[Tempestra]";

-				mes "Come back anytime when you've changed your mind.";

-				close;

-

-		L_NoPot:

-			mes "[Tempestra]";

-			mes "Umm... excuse me but.... where is the potion??";

-			emotion e_hmm;

-			close;

-

-	M_1:

-		mes "[Tempestra]";

-		mes "..... How RUDE!!";

-		emotion e_gasp;

-		close;

-}

-

-//=======================================================================================================//

-//						Turtle Quest

-//=======================================================================================================//

-// Gotanblue --------------------------------------------------------------------------

-alberta.gat,247,123,5	script	Gotanblue	709,{

-	if(TURTLE) goto L_Turtle;

-	mes "[Gotanblue]";

-	mes "Ha ha! The sea seems endless!! We cannot begin to grasp its size merely by gazing at it from land....";

-	next;

-	mes "[Gotanblue]";

-	mes "Do you know what I mean?.....";

-	close;

-

-L_Turtle:

-	mes "[Gotanblue]";

-	mes "Oh! Your eyes.... they tell me everything!! You must have been sent by that drunken old man!";

-M_Menu:

-	next;

-	menu "-Tell me about Turtle Island.",-, "-How Can I get there?",M_2, "-End Conversation",M_End;

-

-		mes "[Gotanblue]";

-		mes "So you wanna know about Turtle Island?... You think it's a great place?... Do you like it that much?...";

-		next;

-		mes "[Gotanblue]";

-		mes "Well let me tell you something....";

-		next;

-		mes "[Gotanblue]";

-		mes "TURTLE ISLAND TOOK THE LIVES OF MY CLOSEST FRIENDS!!";

-		emotion e_gasp;

-		next;

-		mes "[Gotanblue]";

-		mes "Can you POSSIBLY understand??.........";

-		next;

-		mes "[Gotanblue]";

-		mes "It all happened a few decades ago....";

-		next;

-		mes "[Gotanblue]";

-		mes "^5555FFJornadan Niliria^000000 and our comrades set off on a journey to find out if the legends about the island were true.";

-		next;

-		mes "[Gotanblue]";

-		mes "It was summer when I was approached to become a member of Jornadan's team.";

-		mes "I was only 20 then, and it was a huge honor for me to be a part of such a well respected group of men.";

-		next;

-		mes "[Gotanblue]";

-		mes "Jornadan Niliria was a great treasure hunter, I was the best seaman of the bunch, and the others were all the very best at what they did.";

-		next;

-		mes "[Gotanblue]";

-		mes "We decided to start our great adventure here, in Alberta.  This was because of a clue we found that put the location of Turtle Island near Alberta.";

-		next;

-		mes "[Gotanblue]";

-		mes "We were all very exited and full of hope! We left everything behind and set sail to seek Turtle Island!";

-		mes "We sailed all day and all night.  We eventually ran adrift, and could do nothing but sit and wait as the days passed.....";

-		next;

-		mes "[Gotanblue]";

-		mes "Then one day... without warning... we were surrounded by a tremendously thick blanket of fog!!";

-		mes "It was impossible to see anything past the length of your own arm!";

-		next;

-		mes "[Gotanblue]";

-		mes "We could not tell which way was East and which way was West.  But it didn't matter... for we were all exhausted at that point.";

-		next;

-		mes "[Gotanblue]";

-		mes "Then what we feared most happened.  A huge rock formation pierced through the fog right in front of us!";

-		mes "There was no way to avoid it and we crashed violently into it, severely damaging our ship!!";

-		emotion e_gasp;

-		next;

-		mes "[Gotanblue]";

-		mes "Amazingly, the ship held together and we were able to continue on.";

-		next;

-		mes "[Gotanblue]";

-		mes "Then like a beam of energy descending down from the heavens, the first ray of sunlight we had seen in weeks pierced through the fog onto our battered ship.";

-		next;

-		mes "[Gotanblue]";

-		mes "And like magic the fog lifted to reveal what we had been searching so long and hard for.... that legendary place.... TURTLE ISLAND!!!!";

-		next;

-		mes "[Gotanblue]";

-		mes "We set up camp immediately and rested our weary bodies.  A few days later we began to extensively search the island.";

-		mes "What we found was shocking! Apparently someone had found the island before us.  He left a very well kept journal of his expedition.";

-		next;

-		mes "[Gotanblue]";

-		mes "According to his journal, the man had come by himself to find the island.  Unfortunately, we couldn't find him.";

-		next;

-		mes "[Gotanblue]";

-		mes "Even though someone had beaten us to Turtle Island, we still felt that it was an accomplishment to have made it to the island.";

-		mes "We continued to explore the island and find out as much about it as we could.";

-		next;

-		mes "[Gotanblue]";

-		mes "A particular artifact caught our interest.  It was mentioned in that man's journal....";

-		mes "Oh, now I remember his name... ^5555FF'Won'^000000... apparently a great sword master....";

-		next;

-		mes "[Gotanblue]";

-		mes "Anyway, he wrote about a '^FF5555Jewel Fragment'^000000 of some kind.  He described it as 'the most beautiful thing in the world'.";

-		next;

-		mes "[Gotanblue]";

-		mes "We became intent on finding that jewel no matter what.  Day after day we searched for it.  Months passed.";

-		mes "But even with Won's journal records, we were not able to find the jewel fragment.  We had no choice but to give up.";

-		next;

-		mes "[Gotanblue]";

-		mes "So we packed up our belongings and headed home.  Again we passed through the horrible dense fog.";

-		mes "After a month of sailing our journey was near its end... or so we thought.";

-		next;

-		mes "[Gotanblue]";

-		mes "We spotted land and I breathed a sigh of relief... unfortunately that feeling of relief turned into bewilderment as I realized that..... that....";

-		next;

-		mes "[Gotanblue]";

-		mes "IT WAS TURTLE ISLAND!!! We had landed on the other side of the island! We had no idea how it happened but we immediately cast off once again.";

-		emotion e_gasp;

-		next;

-		mes "[Gotanblue]";

-		mes "And as if some foul curse and been placed on our group, we again found ourselves on the shores of Turtle Island.";

-		mes "Time after time we attempted to flee the island only to find ourselves back on it.  A whole year passed and still, we were trapped!";

-		next;

-		mes "[Gotanblue]";

-		mes "It was beyond reason.... We had tried every possible path.... Our spirits were broken, our hopes were crushed....";

-		mes "And one by one, my comrades fell, no longer having the strength to find a way home....";

-		next;

-		mes "[Gotanblue]";

-		mes "CURSED ISLAND!!!!!";

-		emotion e_omg;

-		next;

-		mes "[Gotanblue]";

-		mes "As you can see only I and Jornadan were able to make it out alive.  By pure luck, we made back to Alberta....";

-		next;

-		mes "[Gotanblue]";

-		mes "(~sob~sob~sob)... I apologize. I'm still very emotional about it after all these years... Well, that's all I have to say about Turtle Island.";

-		emotion e_sob;

-		goto M_Menu;

-	M_2:

-		mes "[Gotanblue]";

-		mes "What's this? After my terrifying story about Turtle Island, you still want to go there? You're not at all scared??";

-		emotion e_what;

-		next;

-		mes "[Gotanblue]";

-		mes "So be it... but you will need me as your guide and that will cost 10,000 zeny!";

-		next;

-		menu "Turtle Island -> 10000 zeny",-, "Cancel",sM_End;

-

-			if(Zeny < 10000) goto sL_Zeny;

-			mes "[Gotanblue]";

-			mes "Alright!! You've made your choice! With my experience we will get to Turtle Island without any problems.";

-			mes "I admire your fighting spirit.  Carry it with you always!";

-			next;

-			mes "^5555FF(You and Gotanblue climb on board his little steamboat)^000000";

-			next;

-			mes "[Gotanblue]";

-			mes "We are now heading towards Turtle Island.  Let us go without fear!!";

-			next;

-			mes "^5555FF(~choo~choooo~)^000000";

-			next;

-			if(Zeny < 10000) goto sL_Zeny;

-			set Zeny, Zeny - 10000;

-			warp "tur_dun01.gat",154,39;

-			close;

-		sL_Zeny:

-			mes "[Gotanblue]";

-			mes "What's this? I said 10,000 zeny.  I will not guide you for less.  Good day!";

-			emotion e_what;

-			close;

-		sM_End:

-			mes "[Gotanblue]";

-			mes "A very good choice!! Turtle Island is a DREADFULL and EVIL place!";

-			mes "When I take people there, I feel as if I'm leading them to their DEATHS!";

-			close;

-	M_End:

-		mes "[Gotanblue]";

-		mes "To this day, Turtle Island is shrouded in mystery.  It is extremely hard to find, and almost impossible to escape from.";

-		mes "If you do not want to suffer great despair, then leave the truth behind Turtle Island as it is.... unknown....";

-		close; 

-}

-

-//Go back to Alberta

-tur_dun01.gat,166,29,1	script	Gotanblue#2	709,{

-	mes "[Gotanblue]";

-	mes "Going back to Alberta?";

-	next;

-	menu "Yep.",-, "Cancel",M_End;

-

-	mes "^5555FF(You and Gotanblue climb on board his little steamboat)^000000";

-	next;

-	warp "alberta.gat",244,123;

-	close;

-

-M_End:

-	mes "[Gotanblue]";

-	mes "A very good choice!!";

-	close;

-}

-

-// Turtle Grandpa -------------------------------------------------------------------

-alberta_in.gat,23,104,2	script	Turtle Grandpa	120,{

-	mes "[Turtle Grandpa]";

-	mes "~Buuurrrpp!!!~ Oops...";

-	emotion e_swt;

-	next;

-	mes "[Turtle Grandpa]";

-	mes "It's beyond me why people seem to think that Alberta is the center of world trade.";

-	mes "I mean, this place doesn't even have a decent bar for crying out loud!!";

-	emotion e_an;

-	next;

-	mes "[Turtle Grandpa]";

-	mes "Why is it that I have to resort to drinking in a place like this??";

-	emotion e_what;

-	next;

-	menu "-Tell me about Turtle Island.",-, "-How can I get there?",M_1, "-End conversation.",M_End;

-

-		mes "[Turtle Grandpa]";

-		mes "There is an enormous stash of treasure hidden on Turtle Island.";

-		mes "There is also a special potion that can increase a person's lifespan on that island......";

-		next;

-		mes "[Turtle Grandpa]";

-		mes "There are so many myths and legends about the island, that no one even knows for sure if Turtle Island exist.";

-		next;

-		mes "[Turtle Grandpa]";

-		mes "I for one believe it does.... It HAS TO!!......";

-		emotion e_gasp;

-		next;

-		mes "[Turtle Grandpa]";

-		mes "If you are any sort of seaman, if you have a spirit for adventure, and if you have the heart to become a great treasure hunter....";

-		mes "Then you may be worthy of the information I have to offer...";

-		next;

-		menu "-(~eyes twinkle~)",-, "-Heck Ya! Gimme that information.",sM_1;

-

-			mes "[Turtle Grandpa]";

-			mes "His name was ^5555FFJornadan Niliria^000000.  Jornadan and his ten comrades set off on a journey to find the legendary Turtle Island.";

-			next;

-			mes "[Turtle Grandpa]";

-			mes "At first they had no idea where the island was.  They were ambitious and worked extremely hard to gather clues on the whereabouts of the island.";

-			next;

-			mes "[Turtle Grandpa]";

-			mes "These men were very strong, especially Jornadan.  He was so strong in fact, that his simple kicks were as powerful as a level 10 bash!!!";

-			next;

-			mes "[Turtle Grandpa]";

-			mes "He could catch an arrow in one hand while healing a comrade with the other, all during the middle of a battle!";

-			next;

-			mes "[Turtle Grandpa]";

-			mes "Heh heh.  Well, it's just a rumor so take it for what it's worth.  As I was saying....";

-			next;

-			mes "[Turtle Grandpa]";

-			mes "After searching tirelessly Jornadan and his crew eventually found the famed Turtle Island.";

-			next;

-			mes "[Turtle Grandpa]";

-			mes "But for reasons unknown, the crew became stranded on the island forever!!";

-			mes "Although I do not know why or how it happened, there IS one person that does.";

-			next;

-			mes "[Turtle Grandpa]";

-			mes "Go the docks on the east end of town.  Look for a scholar named.... ^FF3333Jornadan^000000... ^FF3333Niliria^000000...";

-			mes "Speak to him.  He should be able to tell you more..... ";

-			next;

-			mes "[Turtle Grandpa]";

-			mes "Oh! One more thing... look for his '^5555FFjournal^000000'.  He usually has it close by.  It's definitely an interesting read.";

-			if(TURTLE==0) set TURTLE, 1;

-			close;

-		sM_1:

-			mes "[Turtle Grandpa]";

-			mes "No way! I have no interest in speaking with someone with greed in his/her heart!";

-			emotion e_gasp;

-			next;

-			mes "[Turtle Grandpa]";

-			mes "Get OUT of my sight!!! GO HOME!";

-			emotion e_an;

-			next;

-			mes "[Turtle Grandpa]";

-			mes "What's this?? You're still here?..... GO! GO AWAY!!............";

-			emotion e_go;

-			close;

-	M_1:

-		mes "[Turtle Grandpa]";

-		mes "It's is extremely hard to find, and even more difficult to reach.  The likelihood of returning home is slim at best....";

-		next;

-		mes "[Turtle Grandpa]";

-		mes "Actually..... IT'S IMPOSSIBLE!!!!";

-		emotion e_gasp;

-		next;

-		mes "[Turtle Grandpa]";

-		mes "Yet you still want to go there??";

-		emotion e_what;

-		next;

-		mes "[Turtle Grandpa]";

-		mes "I want to warn you about the dangers of going there.... but.... I feel so dizzy..... wooah..... it must be the Vodka....";

-		next;

-		mes "[Turtle Grandpa]";

-		mes "Any who, if you go the docks you'll find a fat, old, sailor.  His name is ^5555FFGotanblue^000000.";

-		mes "Tell him I sent you and maybe he'll tell you how to get to Turtle Island.  Well, good luck.";

-		close;

-	M_End:

-		mes "[Turtle Grandpa]";

-		mes "Whooops......";

-		next;

-		mes "!!KA-PLOP!!(collapses on the floor)";

-		next;

-		mes "[Turtle Grandpa]";

-		mes "He he he.... look at me.... I'm a fish... I'm drunk like a fish..... enough for today..... ~ZZZZZzzzz~";

-		close;

-}

-

-// Letter of an explorer (on Turtle Grandpa's desk)------------------------------------------------------------------

-alberta_in.gat,17,101,1	script	Letter of an explorer	111,{

-	mes "~ The letter reads... ~";

-	mes "- O/X/XOVX -";

-	mes "If you find this letter, it means that our expedition to Turtle Island has failed.  Please inform the others...";

-	next;

-	mes "~ continued...~";

-	mes "As of now, only half the number of our crew members are left.  Our food supply will only last for ten more days.  It is a grave situation we are facing....";

-	next;

-	mes "~ continued...~";

-	mes "- V/O/XOVX -";

-	mes "It seems my letters did not make it to the outside world, and have instead come back to me.... This damn island is CURSED!! Oh God.....";

-	next;

-	mes "~ continued...~";

-	mes "GOD FORSAKEN ISLAND!! There is nothing left to eat..... help... me... please.... HELP ME!!";

-	next;

-	mes "~ continued...~";

-	mes "- V/X/XOVX -";

-	mes "^5555FF- This section is severely crumpled and tattered. -^000000";

-	mes "^5555FF- You are unable to read it. -^000000";

-	close;

-}

-

-// Jornadan Niliria ------------------------------------------------------------------------

-alberta.gat,248,90,1	script	Jornadan Niliria	121,{

-	mes "[Jornadan Niliria]";

-	mes "Sometimes I think that the world around me is ever changing.";

-	mes "When I view the land it seems different, when I look up at the sky it too seems different....";

-	next;

-	mes "[Jornadan Niliria]";

-	mes "The way that Alberta and Turtle Island are different.  Hah hah hah....";

-	next;

-	menu "-About Turtle Island.",-, "-Um, did you get confused with Al De Baran?",M_1, "-End Conversation.",M_End;

-

-		mes "[Jornadan Niliria]";

-		mes "Ah yes..... Turtle Island.... Do you know why it's named, 'Turtle' Island? Would you like to know? Haha......";

-		next;

-		mes "[Jornadan Niliria]";

-		mes "The reason behind the name is actually very easy to figure out and you might even feel a little foolish about not getting it in the first place.";

-		next;

-		mes "[Jornadan Niliria]";

-		mes "It's called 'Turtle' Island, because of the fact that it is shaped like an actual turtle.  Haha.  That's all there is to it.";

-		next;

-		mes "[Jornadan Niliria]";

-		mes "There is an unusually dense area of fog that surrounds the island.";

-		mes "At first we tried to figure what causes it but with no luck.  We figured that it was just a natural phenomenon.";

-		next;

-		mes "[Jornadan Niliria]";

-		mes "Then we found a cave along the coastline of the island.  Inside we were amazed to see a HUGE waterfall.";

-		mes "It turns out that this waterfall is what creates that extremely thick area of fog around that island.";

-		next;

-		mes "[Jornadan Niliria]";

-		mes "The reason is so simple and yet there are people who still try to find a deeper meaning behind it....";

-		next;

-		mes "[Jornadan Niliria]";

-		mes "I believe that people continue to probe into the matter because they do not want to feel that their efforts have been in vain.";

-		mes "Maybe they are afraid of the truth..... I for one was once afraid.... afraid of Turtle Island....";

-		next;

-		mes "[Jornadan Niliria]";

-		mes "But now that I truly understand all of the myths about Turtle Island, I feel at ease and at peace with the island.";

-		mes "There is still one lingering question about the island for me though..... it is the existence of the unknown ^FF5555'Jewel Fragment'^000000.";

-		next;

-		mes "[Jornadan Niliria]";

-		mes "I am still not certain about what it really is.  In the mean time I will continue to pursue the matter until I discover the truth! Hahaha!!";

-		close;

-	M_1:

-		mes "[Jornadan Niliria]";

-		mes "Whoops ! Oh that's right !! Confused !.... Yipe !..... WOOOOO !!!";		//have NO idea what this means.....

-		close;

-	M_End:

-		mes "[Jornadan Niliria]";

-		mes "When you're searching for the truth, make sure to keep trying.  Someday you will find the answers you seek...";

-		next;

-		mes "[Jornadan Niliria]";

-		mes "Hmmm.... by the way.... I feel hungry.  Why doesn't Alberta have a store or restaurant for some good Dim Sum??";

-		close;

-}

-

-// Jornadan's Voyage Log -------------------------------------------------

-alberta.gat,247,93,1	script	A Voyage Log	111,{

-	if(TURTLE == 1) goto L_Treasure;

-	mes "[A Voyage Log]";

-	mes "= 03:20 am =";

-	mes "The moon was dark and I couldn't even see 100m in front of me.  I had a bad feeling about the situation..... I was not the only one...";

-	next;

-	mes "[A Voyage Log]";

-	mes "I could tell by the looks on my comrade's faces, that they too were worried.  No one could sleep that night.  I hope we will see the sunrise soon....";

-	next;

-	mes "[A Voyage Log]";

-	mes "= 04:10 =";

-	mes "5 minutes ago one of our comrades, Cooker, died.  While he walking on deck, the flagpole suddenly broke and fell on his head....";

-	next;

-	mes "[A Voyage Log]";

-	mes "He died at approximately 04:07.  The flagpole had been damaged when our ship hit a reef.";

-	mes "The ship sustained serious damage along the left side of the deck.  I called on the chief to repair it.";

-	next;

-	mes "[A Voyage Log]";

-	mes "= 04:45 =";

-	mes "While two of our workers were fixing the bottom of the deck, monsters attacked them without warning.";

-	mes "Apparently they had gotten in through some openings in the deck.";

-	next;

-	mes "[A Voyage Log]";

-	mes "Two more men had been lost.  Fortunately the ship has yet to sink and seems to be holding up.  Still, we must find land soon.";

-	next;

-	mes "[A Voyage Log]";

-	mes "During the collision with the reef we lost about 30% of our supplies.  In particular we lost food... a great deal of food....";

-	next;

-	mes "[A Voyage Log]";

-	mes "= 05:23 =";

-	mes "We've been noticing an increase in the amount of reefs and they are getting larger as well.";

-	mes "I wonder when we will find land.... I wonder if we can....";

-	next;

-	mes "[A Voyage Log]";

-	mes "- Written by -";

-	mes "- captain Jornadan Niliria -";

-	next;

-	mes "^5555FF- Closed the voyage log -^000000";

-	close;

-

-L_Treasure:

-	mes "^5555FF- The paper is torn -";

-	mes "- Seaweed and mold have -";

-	mes "- mixed with the paper -";

-	mes "- It looks to be in very poor";

-	mes "condition. -^000000";

-	next;

-	mes "^5555FF- Between some pages -";

-	mes "- Is a Banana leaf -";

-	mes "- this is written. -^000000";

-	next;

-	mes "[A Voyage Log]";

-	mes "= O/X date =";

-	mes "Just after we arrived to Turtle Island, we searched for some food to eat.  I am so skinny now...";

-	next;

-	mes "[A Voyage Log]";

-	mes "When I looked at myself in the mirror, it was horrible.  I was disturbed by what I saw...";

-	next;

-	mes "[A Voyage Log]";

-	mes "= X/X date =";

-	mes "We found some kind of fruit! It has a yellow color and a long shape.  It looks just like a banana!";

-	next;

-	mes "[A Voyage Log]";

-	mes "= XO/X date =";

-	mes "Although very similar, the fruit we found was not a banana.  We believe it is a relative of the banana.";

-	mes "It smells and tastes exactly like a banana.";

-	next;

-	mes "[A Voyage Log]";

-	mes "We were starving so we just referred to the fruit as bananas and gathered it for food.";

-	mes "Although there were a limited amount of trees, there was enough for our survival.";

-	next;

-	mes "[A Voyage Log]";

-	mes "It has become the answer to our lack of food and has become precious to us.";

-	mes "~ WE LOVE YOU BANANA!! ~";

-	next;

-	mes "[A Voyage Log]";

-	mes "= O/O date =";

-	mes "In the middle of the night, one of our comrades reported that he felt sick from something he ate.";

-	next;

-	mes "[A Voyage Log]";

-	mes "= OO/O date =";

-	mes "Another comrade fell ill.  He had the strongest digestive system among us.";

-	mes "He went by the name, 'Berot Berot', and he played a vital role in our group.";

-	next;

-	mes "[A Voyage Log]";

-	mes "The fact that he got sick from something he ate, made it very clear that there was something poisoning us.";

-	next;

-	mes "[A Voyage Log]";

-	mes "= XO/O date =";

-	mes "A third person became sick today while we were out exploring.  The first person to become ill has passed away.... We are all very worried.";

-	next;

-	mes "[A Voyage Log]";

-	mes "We tried very hard to find the cause of the illness.  Then by observing the animals one day, we found it.";

-	mes "It was the very thing we thought to be our salvation and yet not one animal on the island would even touch it.....";

-	next;

-	mes "[A Voyage Log]";

-	mes "What was killing us was..... our beloved BANANA!!";

-	next;

-	mes "[A Voyage Log]";

-	mes "We decided to get rid of all of the bananas.  But for some reason they didn't seem to be decomposing.";

-	mes "Even when the skin was peeled off, the fruits remained the same.";

-	next;

-	mes "[A Voyage Log]";

-	mes "I think that the poison or some other agent within the fruit is allowing it to survive.";

-	mes "We may be able to use it for medicinal purposes later, but for now it is of no use to us.";

-	mes "Until we get back to Alberta, we have to decided to bury what is left of the fruit.";

-	next;

-	mes "[A Voyage Log]";

-	mes "This is the location where it's buried in case we forget:";

-	mes "^FF8888- tur_dun01 -";

-	mes "- X: 160, Y: 81 -^000000";

-	next;

-	mes "^5555FF- There is a thin Key -";

-	mes "- with a skull mark on it -";

-	mes "- You've gained -";

-	mes "- a 'Skull Key' -^000000";

-	set TURTLE, 2;

-	close;

-}

-

-// Burried treasure --------------------------------------------------------------------

-tur_dun01.gat,160,80,1	script	Skull Stone	111,{

-	if(TURTLE == 2) goto L_OpenBox;

-	mes "^5555FF(It's a frightening stone tomb with horrible skull on it.)^000000";

-	close;

-

-L_OpenBox:

-	mes "^5555FF(Under the stone is a tiny key hole with a skull mark.  You used the 'Skull Key' to open the box.)^000000";

-	next;

-	mes "^5555FF(~click!~click!~)^000000";

-	next;

-	mes "^5555FF(Suddenly the top of the stone opens with many things coming out!)^000000";

-	set TURTLE, 3;

-	next;

-	mes "^5555FF(You got 5 Tropical Bananas and 5 Banana Juices.)^000000";

-	getitem 634, 5;

-	getitem 532, 5;

-	close;

+//===== eAthena Script ======================================= 
+//= Quest NPCs related to Alberta
+//===== By: ================================================== 
+//= kobra_k88
+//===== Current Version: ===================================== 
+//= 1.7
+//===== Compatible With: ===================================== 
+//= eAthena 1.0
+//===== Description: ========================================= 
+//= Dolls Quest
+//= Boy's Cap Quest
+//= Antlers Quest
+//= Bao Bao, Cresent Hairpin, Fashionbale Glasses, Heart Hairpin Quests
+//= Hat of Sun God, Sunday Hat, Mage Hat, Magician Hat Quests
+//= Turtle Island Quests
+//===== Additional Comments: ================================= 
+//= Fully working
+//= 1.1 Fixed Spore Doll exploit, Gramp's Tiger skin label bug
+//= 1.3 Fixed item ID 7031 -> 7013
+//= 1.4 Fixed a bug, Fixed Exploits, Optimized [Lupus]
+//= 1.6 TEMPESTRA quest uses common quests variable MISC_QUEST 
+//=	Condition if done: (MISC_QUEST & 2) [Lupus]
+//= 1.7 Moved quest from cities/albera.txt [Evera]
+//============================================================ 
+
+
+
+//=======================================================================================================//
+//						Doll Quest
+//=======================================================================================================//
+alberta.gat,117,134,8	script	Elin	96,{
+	mes "[Elin]";
+	if(Sex){
+		mes "Hello, mister. Hmm, since you're a boy, you don't like dolls, do you?";
+	}else{
+		mes "Hello, miss. Since you're a girl, you must like dolls, don't you?";
+	}
+	next;
+	mes "[Elin]";
+	mes "I LOVE dolls!!";
+	emotion e_lv2;
+	next;
+	mes "[Elin]";
+	mes "Ya know..... I REALLY, REALLY, want a new doll.  I hope daddy is going to buy me one for my birthday.....";
+	next;
+	menu "Aww, you must be happy...",-,"How about I give you one now?",M_2;
+
+		mes "[Elin]";
+		mes "Yeah, this time I'm hoping for a Yoyo doll.  Hehe, they're so cute! They're my FAVORITE!";
+		emotion e_ok;
+		close;
+	M_2:
+		mes "[Elin]";
+		mes "Oh my goodness! Really?? You're such a sweetie.... gimme, gimme!!";
+		mes "What kinda doll are you going to give me? Are you really gonna give me one?";
+		emotion e_gasp;
+		next;
+		menu "Puppet",-,"Poring doll",sM_2,"Chonchon doll",sM_3,"Rocker doll",sM_4, "Spore doll",sM_5,
+		           "Osiris doll",sM_6,"Baphomet doll",sM_7,"Racoon doll",sM_8,"Yoyo doll",sM_9, "I am as adorable as a doll!",sM_10;
+		
+			if(countitem(740) < 1) goto L_Liar;
+			delitem 740,1;
+			mes "[Elin]";
+			mes "Wow--! It's a rabbit! It's SOOOO cute!! Thank you SOOO much!";
+			emotion e_lv2;
+			next;
+			mes "[Elin]";
+			mes "It's SOOO fluffy... Oh yeah! Let me give you a present too!";
+			next;
+			mes "(diggs around in her pockets)";
+			next;
+			mes "[Elin]";
+			mes "Ummm ... found it! Here take this!";
+			next;
+			getitem 530,1;
+			mes "[Elin]";
+			mes "I got this from Santa. It's a candy cane~";
+			next;
+			mes "[Elin]";
+			mes "Thanks again for the rabbit doll! I'm gonna HUG this to sleep EVERY night~";
+			emotion e_thx;
+			close;
+
+		sM_2:
+			if(countitem(741) < 1) goto L_Liar;
+			delitem 741,1;
+			mes "[Elin]";
+			mes "Yay! It's a poring doll! It's SOOOO cute! Since you gave me a doll I'll give you this....";
+			emotion e_lv2;
+			next;
+			getitem 529,1;
+			mes "[Elin]";
+			mes "Thank you for the doll!";
+			emotion e_thx;
+			close;
+
+		sM_3:
+			if(countitem(742) < 1) goto L_Liar;
+			delitem 742,1;
+			mes "[Elin]";
+			mes "Ew whats this?.... a Chonchon ... doll? ...";
+			emotion e_wah;
+			next;
+			mes "[Elin]";
+			mes "Oh well, since you're giving it to me, I guess it's ok ....";
+			next;
+			mes "[Elin]";
+			mes "Well here's a little something for giving me the doll.  Don't eat too much or you'll get cavities.";
+			getitem 530,1;
+			next;
+			mes "[Elin]";
+			mes ".... chonchon.... (~grumble, grumble~)";
+			emotion e_ag;
+			close;
+
+		sM_4:
+			if(countitem(752) < 1) goto L_Liar;
+			delitem 752,1;
+			mes "[Elin]";
+			mes "Oh! a Rocker doll.  I hate hopping things but this doll's kinda cute.";
+			next;
+			mes "[Elin]";
+			mes "Thank you.  Let me give you something too.";
+			next;
+			mes "[Elin]";
+			mes "Hmm, didn't I get some stuff from my uncle ...";
+			next;
+			mes "[Elin]";
+			mes "Here it is.  We've got tons of it at home so I'll share some with you~";
+			getitem 532,7;
+			next;
+			mes "[Elin]";
+			mes "Thanks again for the doll!";
+			emotion e_thx;
+			close;
+
+		sM_5:
+			if(countitem(743) < 1) goto L_Liar;
+			delitem 743,1;
+			mes "[Elin]";
+			mes "Blehh .... It's a mushroom... Mom's always scolding me for not eating mushrooms ...";
+			emotion e_swt;
+			next;
+			mes "[Elin]";
+			mes "I'll take it anyway, since the doll looks cute.  But I still won't eat mushrooms though ...";
+			next;
+			mes "[Elin]";
+			mes "Hmm, I'll need to give you a present too.";
+			next;
+			mes "[Elin]";
+			mes "My mom made this so please take it.";
+			getitem 538,5;
+			next;
+			mes "[Litte Kid]";
+			mes "Thank you for the doll~";
+			emotion e_thx;
+			close;
+
+		sM_6:
+			if(countitem(751) < 1) goto L_Liar;
+			delitem 751,1;
+			mes "[Elin]";
+			mes "Yay! It's an Osiris doll!";
+			next;
+			mes "[Elin]";
+			mes "Here's something for you too.";
+			getitem 522,2;
+			mes "[Elin]";
+			mes "Thank you for the doll!";
+			close;
+
+		sM_7:
+			if(countitem(750) < 1) goto L_Liar;
+			delitem 750,1;
+			mes "[Elin]";
+			mes "Yay! It's a Baphomet doll!";
+			next;
+			mes "[Elin]";
+			mes "Here's something for you too.";
+			getitem 525,5;
+			mes "[Elin]";
+			mes "Thank you for the doll!";
+			emotion e_thx;
+			close;
+
+		sM_8:
+			if(countitem(754) < 1) goto L_Liar;
+			delitem 754,1;
+			mes "[Elin]";
+			mes "Ah, it's a Smokie doll.  I hate Smokies, but the doll's really cute! Thank you!";
+			emotion e_ok;
+			next;
+			mes "[Elin]";
+			mes "Let me give you some of Grandma's home-made cake!";
+			getitem 539,3;
+			next;
+			mes "[Elin]";
+			mes "They're really good so make sure you eat them ok.";
+			next;
+			mes "[Elin]";
+			mes "Thanks again for this cute doll!";
+			emotion e_thx;
+			close;
+
+		sM_9:
+			if(countitem(753) < 1) goto L_Liar;
+			delitem 753,1;
+			mes "[Elin]";
+			mes "WOW--!!! OH MY GOSH! It's a Yoyo doll! This is what I REALLY wanted!! It's SOOOO cute......";
+			emotion e_lv2;
+			next;
+			mes "[Elin]";
+			mes "As a thank you, I'll give you this.";
+			getitem 608,1;
+			next;
+			mes "[Elin]";
+			mes "Dad picked them up during his travels.  It's a seed of some kind.";
+			mes "We tried planting them at home, but it doesn't seem to grow.";
+			next;
+			mes "[Elin]";
+			mes "Anyway, thank you SOOO MUCH for the Yoyo doll!!!!";
+			emotion e_thx;
+			close;
+
+		sM_10:
+			mes "[Elin]";
+			mes "BLAAAAAAAAHHH!! Don't make fun of me cuz I'm young!";
+			emotion e_pif;
+			next;
+			mes "[Elin]";
+			mes "(mumbles) .....'stupid'.....";
+			close;
+
+		L_Liar:
+			mes "[Elin]";
+			mes "HEY!! You don't have any dolls... I can't believe you would lie to a little kid!!!";
+			emotion e_gasp;
+			next;
+			mes "[Elin]";
+			mes "You're a MEANIE!! I HATE YOU!!!..... sniff... sniff.... Waaaaaaaaaaaaaaaaaaaahhhhhh!!";
+			emotion e_sob;
+			close;
+}
+
+
+//=======================================================================================================//
+//						Boy's Cap' Quest
+//=======================================================================================================//
+alberta_in.gat,28,145,4	script	Grampa	120,{
+	mes "[Grampa]";
+	mes "Gasp ..Gasp";
+	next;
+	mes "[Grampa]";
+	mes "When I look back on my younger days... I regret not making better use of my time...";
+	next;
+	mes "[Grampa]";
+	mes "Even so I STILL feel young at heart..... unfortunately my body is very old and is in poor condtion...... Cough !! Cough .. !!";
+	next;
+	if(countitem(1030) >= 10) menu "Talk.",M_Talk, "Show him Tiger's Footskin.",M_Show, "Cancel.",M_End;
+	menu "Talk",M_Talk, "Cancel",M_End;
+	
+	M_Talk:
+		mes "[Grampa]";
+		mes "Listen to me..... You must take care of your body as best you can....";
+		mes "If you aren't serious about staying healthy now..... you will surely regret it as you get older.";
+		next;
+		mes "[Grampa]";
+		mes "I've tried to restore my body to its youthful, healthy state with all of the best herbs and medicines that money can buy....";
+		next;
+		mes "[Grampa]";
+		mes "Not only have none of them worked, but their emense cost have made me bankurpt!";
+		next;
+		mes "[Grampa]";
+		mes "I have all but given up on trying to restore my youth.... there IS still one last thing I have not yet tried.....";
+		next;
+		mes "[Grampa]";
+		mes "It is the ^3355FFTiger's Footskin^000000, the legendary king of rejuvination!!"; 
+		emotion e_gasp;
+		next;
+		mes "[Grampa]";
+		mes "Have you heard of the Tiger's Footskin???.....";
+		emotion e_what;
+		next;
+		mes "[Grampa]";
+		mes "Just by LOOKING at it, your white hair turns Black again! By SMELLING it, your reflexes become 10x faster!";
+		mes "And just a single TASTE can turn and 80 year old man.... INTO AN 18 BOY!!!!";
+		next;
+		mes "[Grampa]";
+		mes "It truely is amazing! Ah, if I could only get my hands on some Tiger's Footskin.... my wishes would at last come true.....";
+		next;
+		mes "[Grampa]";
+		mes "For whoever brings me ^5555FF10 Tiger's Footskins^000000, I would gladly give that person my precious ^3355FFBoys Cap^000000.";
+		close;
+
+	M_Show:
+		mes "[Grampa]";
+		mes "Ohhh !! Th-This is the... this is the legendary.... TIGERS FOOTSKIN!!";
+		next;
+		mes "[Grampa]";
+		mes "Just by LOOKING at it, your white hair turns Black again! By SMELLING it, your reflexes become 10x faster!";
+		mes "And just a single TASTE can turn and 80 year old man.... INTO AN 18 BOY!!!!";
+		next;
+		mes "[Grampa]";
+		mes "It is the real Tiger's Footskin !! In my wildest dreams I never thought...... P-P-Please.... I beg you.... let me have it.....";
+		next;
+		menu "-Give him the Tiger's Footskin.",-, "Walk away.", sM_End;
+
+			mes "[Grampa]";
+			if(countitem(1030) < 10) goto L_NoItems;
+			delitem 1030,10;
+			getitem 5016,1;
+			mes "T-Thank YOU!! Thank you SO VERY MUCH!!";
+			emotion e_thx;
+			next;
+			mes "[Grampa]";
+			mes "Now my body can be reinvigorated!!! I will eat it right away!";
+			close;
+
+		L_NoItems:
+			mes "Get off damn cheater!!!";
+			emotion e_bzz;
+			close;
+
+		sM_End:
+			mes "[Grampa]";
+			mes "H-He-Hey!! Young one!! W-Wa-it! Please.... come back... I beg you.... come... back.... ooohh... foot.... sk... i... n....";
+			close;
+
+	M_End:
+		mes "[Grampa]";
+		mes "Cough Cough !! .. Tiger ....Tiger's ..... Foot ..... skin .....Cough Cough !!";
+		close;
+
+
+}
+
+
+//=======================================================================================================//
+//						Antlers Quest 
+//=======================================================================================================//
+alberta_in.gat,122,53,4	script	Cherokee	47,{
+	mes "[Cherokee]";
+	mes "Hey there, I am a Horn Collector.  Sounds great, huh?";
+	next;
+	mes "[Cherokee]";
+	mes "What do you think about Animal horns? I think they are very valuable and are well worth collecting.";
+	mes "You can wear them on your head, or even decorate your house with them.";
+	next;
+	mes "[Cherokee]";
+	mes "You know.... there has been a particular horn that I have not been able to find.  It is the ^5555FF'Evil Horn '^000000..";
+	next;
+	mes "[Cherokee]";
+	mes "Some say that an Evil Horn is really not an animal's horn, but one that comes from a Devil!";
+	mes "Even so, I really wish I could get my hands on one.";
+	next;
+	mes "[Cherokee]";
+	mes "Say.... do you have any ^5555FF'Evil Horns'^000000?";
+	mes "If you offer me ^5533FF20 Evil Horns^000000, I will give you my precious and famed, ^FF3355'Antlers'^000000.  Is it a deal?";
+	next;
+	menu "You got it!",-, "Shut up Dumbo.",M_End;
+
+		mes "[Cherokee]";
+		if(countitem(923) < 20) goto L_NotEnuf;
+		delitem 923,20;
+		mes "Whoah~! This is the first time I've ever seen a real ^3355FF'Evil Horn'^000000!!";
+		emotion e_ic;
+		next;
+		mes "[Cherokee]";
+		mes "Thank you! Here are the Antlers just as I promised you!";
+		emotion e_thx;
+		getitem 2284,1;
+		next;
+		mes "[Cherokee]";
+		mes "With your great help I was finally able to realize my long time dream.  I appreciate what you have done! God Bless You ..";
+		close;
+
+		L_NotEnuf:
+			mes "Hmm.... like I said, I need ^FF5533'20 Evil Horns'^000000.";
+			close;
+
+	M_End:
+		mes "[Cherokee]";
+		mes "Well aren't you a rude person.... I will forgive you however, seeing as we will meet again, I'm sure....";
+		close;
+}
+
+
+//=======================================================================================================//
+//			Bao Bao, Cresent Hairpin, Fashionbale Glasses, Heart Hairpin
+//=======================================================================================================//
+alberta.gat,120,53,3	script	Zic	51,{
+	mes "[Zic]";
+	mes "Yay! A cool breeze! That's why I love the sea!!";
+	emotion e_ho;
+	next;
+	mes "[Zic]";
+	mes "Huh?... Do you have any business with me? You came to me because I'm a merchant right?";
+	emotion e_hmm;
+	next;
+	mes "[Zic]";
+	mes "~Sigh!~ I get tired of my reputation.... I can't get any peace or quite around here.....";
+	next;
+	mes "[Zic]";
+	mes "So what do you wanna get? Tell me, tell me! It's so easy to guess what you want.....";
+	next;
+	menu "-Bao Bao",-, "-Cresent Hairpin",M_1, "-Fashionable Glasses",M_2, "-Heart Hairpin",M_3;
+
+		mes "[Zic]";
+		mes "To make a Bao Bao I will need:";	//5042
+		mes "- ^5555FF1 Silk Ribbon^000000,";	//10007
+		mes "- ^5555FF50 Herioc Emblems^000000.";	//968
+		next;
+		mes "[Zic]";
+		mes "Would you like me to make you one?";
+		next;
+		menu "Sure.",-, "No thanks.",M_End;
+
+			if (countitem(10007)<1 || countitem(968)<50) goto sL_NotEnuf;
+			delitem 10007, 1;
+			delitem 968, 50;
+			mes "[Zic]";
+			mes "Please wait while I make your Bao Bao......";
+			next;
+			mes "[Zic]";
+			mes "There you are, one Bao Bao.  Enjoy.";
+			getitem 5042, 1;
+			close;
+	M_1:
+		mes "[Zic]";
+		mes "To make a Cresent Hairpin I will need:";	//5048
+		mes "- ^5555FF1 Heart Hair Pin^000000,";	//5041
+		mes "- ^5555FF10 Steel^000000.";	//999
+		next;
+		mes "[Zic]";
+		mes "Would you like me to make you one?";
+		next;
+		menu "Sure.",-, "No thanks.",M_End;
+
+			if (countitem(5041)<1 || countitem(999)<10) goto sL_NotEnuf;
+			delitem 5041, 1;
+			delitem 999, 10;
+			mes "[Zic]";
+			mes "Please wait while I make your Cresent Hairpin......";
+			next;
+			mes "[Zic]";
+			mes "There you are, one Cresent Hairpin.  Enjoy.";
+			getitem 5048, 1;
+			close;
+	M_2:
+		mes "[Zic]";
+		mes "To make a pair of Fashionable Glasses I will need:";	//5047
+		mes "- ^5555FF1 Jack a Dandy^000000,";	//2271
+		mes "- ^5555FF1 Scarlet Dyestuffs^000000.";	//975
+		next;
+		mes "[Zic]";
+		mes "Would you like me to make you one?";
+		next;
+		menu "Sure.",-, "No thanks.",M_End;
+
+			if (countitem(2271)<1 || countitem(975)<1) goto sL_NotEnuf;
+			delitem 2271, 1;
+			delitem 975, 1;
+			mes "[Zic]";
+			mes "Please wait while I make your Fashionable Glasses......";
+			next;
+			mes "[Zic]";
+			mes "There you are, one Fashionable Glasses.  Enjoy.";
+			getitem 5047, 1;
+			close;
+	M_3:
+		mes "[Zic]";
+		mes "Are you sure you want a simple item like this? Oh well... To make a Heart Hairpin I will need:";	//5041
+		mes "- ^5555FF1200 Coral Reefs^000000.";	//7013
+		emotion e_hmm;
+		next;
+		mes "[Zic]";
+		mes "Would you like me to make you one?";
+		next;
+		menu "Sure.",-, "No thanks.",M_End;
+
+			if (countitem(7013)<1200) goto sL_NotEnuf;
+			delitem 7013, 1200;
+			mes "[Zic]";
+			mes "Please wait while I make your Hear Hairpin......";
+			next;
+			mes "[Zic]";
+			mes "There you are, one Heart Hairpin.  Enjoy.";
+			getitem 5041, 1;
+			close;
+
+		sL_NotEnuf:
+			mes "[Zic]";
+			mes "Hmm.... you don't have enough items for me to make it.  Come back some other time.";
+			close;
+
+	M_End:
+		mes "[Zic]";
+		mes "See ya around.";
+		close;
+}
+
+
+//=======================================================================================================//
+//				Hat of Sun God, Sunday Hat, Mage Hat, Magician Hat
+//=======================================================================================================//
+alberta.gat,135,79,3	script	Tempestra	71,{
+	mes "[Tempestra]";
+	mes "Ah...... Such a cool breeze.  It's good to be next to the sea.  I think it was the right choice for me to take a break from my business and come here.";
+	emotion e_ho;
+	if(MISC_QUEST & 2) goto sM_Menu;
+	next;
+	mes "[Tempestra]";
+	mes "Oh the sun is so bright today.  I'm glad I brought my hat.  If my skin is exposed to the sun like this everyday, I'm sure to get a sunburn.";
+	next;
+	mes "[Tempestra]";
+	mes "Boy, the heat is making me thirsty.  Nothing would be better right now, than sipping on a perfectly chilled yellow potion.....";
+	next;
+	menu "Here you go, my treat.",-, "Then go get one, sheesh....",M_1;
+
+		if(countitem(503) < 1) goto L_NoPot;
+		delitem 503, 1;
+		set MISC_QUEST,MISC_QUEST | 2;
+		mes "[Tempestra]";
+		mes "Oooh! Thank you so much.  I'm so glad to meet such a friendly person here....";
+		emotion e_thx;
+		next;
+		mes "[Tempestra]";
+		mes "(~gulp~gulp~)";
+		next;
+		mes "[Tempestra]";
+		mes "Hyaaaaaaa!! It's sooo cold!! Thank you.";
+	sM_Menu:
+		next;
+		menu "The weather is really hot, isn't it...",-, "You should wear a hat.",sM_1;
+
+			mes "[Tempestra]";
+			mes "Yes, it's very hot indeed.....";
+			next;
+			mes "[Tempestra]";
+			mes "Luckly I brought a lot of hats along.  I have";
+			mes "a ^5555FF'Sunday Hat'^000000,";
+			mes "a ^5555FF'Mage Hat'^000000,";
+			mes "a ^5555FF'Magician Hat'^000000, and more in my room...";
+			next;
+			mes "[Tempestra]";
+			mes "I brought these hats with me so that I could sell them and use the money I made for my vacation expenses....";
+			mes "but now it looks like I'll have to wear one.....";
+		ssM_Menu:
+			next;
+			menu "Sunday Hat?",-, "Mage Hat?",ssM_0b, "Magician Hat?",ssM_0c, "End Conversation.",ssM_End;
+
+				mes "[Tempestra]";
+				mes "A Sunday Hat is made up of:";
+				mes "- ^5555FF250 Fabric^000000,";
+				mes "- ^5555FF1 Slotted Hat^000000,";
+				mes "- ^5555FF1 Slotted Cap^000000,";
+				mes "- ^5555FF600 Soft Feathers^000000.";
+				mes "If you want, I can make one for you.  Just bring me all of those items.";
+				next;
+				menu "Make one for me.",-, "Cancel",ssM_End;
+
+					if (countitem(1059)<250 || countitem(2221)<1 || countitem(2227)<1 || countitem(7063)<600) goto ssM_Menu;
+					delitem 1059, 250;
+					delitem 2221, 1;
+					delitem 2227, 1;
+					delitem 7063, 600;
+					mes "[Tempestra]";
+					mes "Please wait just a moment while I make it........";
+					next;
+					getitem 5032, 1;
+					mes "[Tempestra]";
+					mes "All done... one Sunday Hat just for you.  Thank you and come back any time.";
+					emotion e_thx;
+					close;
+			ssM_0b:
+				mes "[Tempestra]";
+				mes "A Mage Hat is made up of:";
+				mes "- ^5555FF1 Wizard Hat^000000,";
+				mes "- ^5555FF400 Dragon Scales^000000,";
+				mes "- ^5555FF50 Mould Powder^000000,";
+				mes "- ^5555FF1 Elder Wilow Card^000000.";
+				mes "If you want, I can make one for you.  Just bring me all of those items.";
+				next;
+				menu "Make one for me.",-, "Cancel",ssM_End;
+
+					if (countitem(2252)<1 || countitem(1036)<400 || countitem(7001)<50 || countitem(4052)<1) goto ssM_Menu;
+					delitem 2252, 1;
+					delitem 1036, 400;
+					delitem 7001, 50;
+					delitem 4052, 1;
+					mes "[Tempestra]";
+					mes "Please wait just a moment while I make it........";
+					next;
+					getitem 5027, 1;
+					mes "[Tempestra]";
+					mes "All done... one Mage Hat just for you.  Thank you and come back any time.";
+					emotion e_thx;
+					close;
+			ssM_0c:
+				mes "[Tempestra]";
+				mes "A Magician Hat is made up of:";
+				mes "- ^5555FF1 Wizard Hat^000000,";
+				mes "- ^5555FF450 Ancient Lips^000000,";
+				mes "- ^5555FF1200 Solid Shells^000000,";
+				mes "If you want, I can make one for you.  Just bring me all of those items.";
+				next;
+				menu "Make one for me.",-, "Cancel",ssM_End;
+
+					if (countitem(2252)<1 || countitem(1054)<450 || countitem(943)<1200) goto ssM_Menu;
+					delitem 2252, 1;
+					delitem 1054, 450;
+					delitem 943, 1200;
+					mes "[Tempestra]";
+					mes "Please wait just a moment while I make it........";
+					next;
+					getitem 5045, 1;
+					mes "[Tempestra]";
+					mes "All done... one Magician just for you.  Thank you and come back any time.";
+					emotion e_thx;
+					close;
+			ssM_End:
+				close;
+
+		sM_1:
+			mes "[Tempestra]";
+			mes "Oh but the hats I have are for sale.... if I use them for myself I won't be able to sell them to my customers.";
+			next;
+			mes "[Tempestra]";
+			mes "Because you gave me the potion, I would like to make something for you.  Unfortuately I don't have any materials right now.";
+			next;
+			mes "[Tempestra]";
+			mes "Hmm... If you have:";
+			mes "^5555FF1 Emblem of the Sun God";
+			mes "10 Gold";
+			mes "40 Steel";
+			mes "50 Coal";
+			mes "and 2 Oridecon^000000..........";
+			next;
+			mes "[Tempestra]";
+			mes "I can make you a ^5555FF'Hat of the Sun God'^000000!! It's a fantastic piece of work! How's that sound?";
+			next;
+			menu "Alright.",-, "Not right now thanks.",ssM_1b;
+
+				if(countitem(7086)<1 || countitem(969)<10 || countitem(999)<40 || countitem(1003)<50 || countitem(984)<2) goto ssL_NotEnuf;
+				delitem 7086, 1;
+				delitem 969, 10;
+				delitem 999, 40;
+				delitem 1003, 50;
+				delitem 984, 2;
+				mes "[Tempestra]";
+				mes "Please wait just a moment while I make it........";
+				next;
+				getitem 5022, 1;
+				mes "[Tempestra]";
+				mes "All done... one Hat of the Sun God just for you.  Thank you again for the potion, and please come back any time.";
+				emotion e_thx;
+				close;
+
+				ssL_NotEnuf:
+					mes "[Tempestra]";
+					mes "Um.... where are those items exactly???";
+					emotion e_hmm;
+					close;
+			ssM_1b:
+				mes "[Tempestra]";
+				mes "Come back anytime when you've changed your mind.";
+				close;
+
+		L_NoPot:
+			mes "[Tempestra]";
+			mes "Umm... excuse me but.... where is the potion??";
+			emotion e_hmm;
+			close;
+
+	M_1:
+		mes "[Tempestra]";
+		mes "..... How RUDE!!";
+		emotion e_gasp;
+		close;
+}
+
+//=======================================================================================================//
+//						Turtle Quest
+//=======================================================================================================//
+// Gotanblue --------------------------------------------------------------------------
+alberta.gat,247,123,5	script	Gotanblue	709,{
+	if(TURTLE) goto L_Turtle;
+	mes "[Gotanblue]";
+	mes "Ha ha! The sea seems endless!! We cannot begin to grasp its size merely by gazing at it from land....";
+	next;
+	mes "[Gotanblue]";
+	mes "Do you know what I mean?.....";
+	close;
+
+L_Turtle:
+	mes "[Gotanblue]";
+	mes "Oh! Your eyes.... they tell me everything!! You must have been sent by that drunken old man!";
+M_Menu:
+	next;
+	menu "-Tell me about Turtle Island.",-, "-How Can I get there?",M_2, "-End Conversation",M_End;
+
+		mes "[Gotanblue]";
+		mes "So you wanna know about Turtle Island?... You think it's a great place?... Do you like it that much?...";
+		next;
+		mes "[Gotanblue]";
+		mes "Well let me tell you something....";
+		next;
+		mes "[Gotanblue]";
+		mes "TURTLE ISLAND TOOK THE LIVES OF MY CLOSEST FRIENDS!!";
+		emotion e_gasp;
+		next;
+		mes "[Gotanblue]";
+		mes "Can you POSSIBLY understand??.........";
+		next;
+		mes "[Gotanblue]";
+		mes "It all happened a few decades ago....";
+		next;
+		mes "[Gotanblue]";
+		mes "^5555FFJornadan Niliria^000000 and our comrades set off on a journey to find out if the legends about the island were true.";
+		next;
+		mes "[Gotanblue]";
+		mes "It was summer when I was approached to become a member of Jornadan's team.";
+		mes "I was only 20 then, and it was a huge honor for me to be a part of such a well respected group of men.";
+		next;
+		mes "[Gotanblue]";
+		mes "Jornadan Niliria was a great treasure hunter, I was the best seaman of the bunch, and the others were all the very best at what they did.";
+		next;
+		mes "[Gotanblue]";
+		mes "We decided to start our great adventure here, in Alberta.  This was because of a clue we found that put the location of Turtle Island near Alberta.";
+		next;
+		mes "[Gotanblue]";
+		mes "We were all very exited and full of hope! We left everything behind and set sail to seek Turtle Island!";
+		mes "We sailed all day and all night.  We eventually ran adrift, and could do nothing but sit and wait as the days passed.....";
+		next;
+		mes "[Gotanblue]";
+		mes "Then one day... without warning... we were surrounded by a tremendously thick blanket of fog!!";
+		mes "It was impossible to see anything past the length of your own arm!";
+		next;
+		mes "[Gotanblue]";
+		mes "We could not tell which way was East and which way was West.  But it didn't matter... for we were all exhausted at that point.";
+		next;
+		mes "[Gotanblue]";
+		mes "Then what we feared most happened.  A huge rock formation pierced through the fog right in front of us!";
+		mes "There was no way to avoid it and we crashed violently into it, severely damaging our ship!!";
+		emotion e_gasp;
+		next;
+		mes "[Gotanblue]";
+		mes "Amazingly, the ship held together and we were able to continue on.";
+		next;
+		mes "[Gotanblue]";
+		mes "Then like a beam of energy descending down from the heavens, the first ray of sunlight we had seen in weeks pierced through the fog onto our battered ship.";
+		next;
+		mes "[Gotanblue]";
+		mes "And like magic the fog lifted to reveal what we had been searching so long and hard for.... that legendary place.... TURTLE ISLAND!!!!";
+		next;
+		mes "[Gotanblue]";
+		mes "We set up camp immediately and rested our weary bodies.  A few days later we began to extensively search the island.";
+		mes "What we found was shocking! Apparently someone had found the island before us.  He left a very well kept journal of his expedition.";
+		next;
+		mes "[Gotanblue]";
+		mes "According to his journal, the man had come by himself to find the island.  Unfortunately, we couldn't find him.";
+		next;
+		mes "[Gotanblue]";
+		mes "Even though someone had beaten us to Turtle Island, we still felt that it was an accomplishment to have made it to the island.";
+		mes "We continued to explore the island and find out as much about it as we could.";
+		next;
+		mes "[Gotanblue]";
+		mes "A particular artifact caught our interest.  It was mentioned in that man's journal....";
+		mes "Oh, now I remember his name... ^5555FF'Won'^000000... apparently a great sword master....";
+		next;
+		mes "[Gotanblue]";
+		mes "Anyway, he wrote about a '^FF5555Jewel Fragment'^000000 of some kind.  He described it as 'the most beautiful thing in the world'.";
+		next;
+		mes "[Gotanblue]";
+		mes "We became intent on finding that jewel no matter what.  Day after day we searched for it.  Months passed.";
+		mes "But even with Won's journal records, we were not able to find the jewel fragment.  We had no choice but to give up.";
+		next;
+		mes "[Gotanblue]";
+		mes "So we packed up our belongings and headed home.  Again we passed through the horrible dense fog.";
+		mes "After a month of sailing our journey was near its end... or so we thought.";
+		next;
+		mes "[Gotanblue]";
+		mes "We spotted land and I breathed a sigh of relief... unfortunately that feeling of relief turned into bewilderment as I realized that..... that....";
+		next;
+		mes "[Gotanblue]";
+		mes "IT WAS TURTLE ISLAND!!! We had landed on the other side of the island! We had no idea how it happened but we immediately cast off once again.";
+		emotion e_gasp;
+		next;
+		mes "[Gotanblue]";
+		mes "And as if some foul curse and been placed on our group, we again found ourselves on the shores of Turtle Island.";
+		mes "Time after time we attempted to flee the island only to find ourselves back on it.  A whole year passed and still, we were trapped!";
+		next;
+		mes "[Gotanblue]";
+		mes "It was beyond reason.... We had tried every possible path.... Our spirits were broken, our hopes were crushed....";
+		mes "And one by one, my comrades fell, no longer having the strength to find a way home....";
+		next;
+		mes "[Gotanblue]";
+		mes "CURSED ISLAND!!!!!";
+		emotion e_omg;
+		next;
+		mes "[Gotanblue]";
+		mes "As you can see only I and Jornadan were able to make it out alive.  By pure luck, we made back to Alberta....";
+		next;
+		mes "[Gotanblue]";
+		mes "(~sob~sob~sob)... I apologize. I'm still very emotional about it after all these years... Well, that's all I have to say about Turtle Island.";
+		emotion e_sob;
+		goto M_Menu;
+	M_2:
+		mes "[Gotanblue]";
+		mes "What's this? After my terrifying story about Turtle Island, you still want to go there? You're not at all scared??";
+		emotion e_what;
+		next;
+		mes "[Gotanblue]";
+		mes "So be it... but you will need me as your guide and that will cost 10,000 zeny!";
+		next;
+		menu "Turtle Island -> 10000 zeny",-, "Cancel",sM_End;
+
+			if(Zeny < 10000) goto sL_Zeny;
+			mes "[Gotanblue]";
+			mes "Alright!! You've made your choice! With my experience we will get to Turtle Island without any problems.";
+			mes "I admire your fighting spirit.  Carry it with you always!";
+			next;
+			mes "^5555FF(You and Gotanblue climb on board his little steamboat)^000000";
+			next;
+			mes "[Gotanblue]";
+			mes "We are now heading towards Turtle Island.  Let us go without fear!!";
+			next;
+			mes "^5555FF(~choo~choooo~)^000000";
+			next;
+			if(Zeny < 10000) goto sL_Zeny;
+			set Zeny, Zeny - 10000;
+			warp "tur_dun01.gat",154,39;
+			close;
+		sL_Zeny:
+			mes "[Gotanblue]";
+			mes "What's this? I said 10,000 zeny.  I will not guide you for less.  Good day!";
+			emotion e_what;
+			close;
+		sM_End:
+			mes "[Gotanblue]";
+			mes "A very good choice!! Turtle Island is a DREADFULL and EVIL place!";
+			mes "When I take people there, I feel as if I'm leading them to their DEATHS!";
+			close;
+	M_End:
+		mes "[Gotanblue]";
+		mes "To this day, Turtle Island is shrouded in mystery.  It is extremely hard to find, and almost impossible to escape from.";
+		mes "If you do not want to suffer great despair, then leave the truth behind Turtle Island as it is.... unknown....";
+		close; 
+}
+
+//Go back to Alberta
+tur_dun01.gat,166,29,1	script	Gotanblue#2	709,{
+	mes "[Gotanblue]";
+	mes "Going back to Alberta?";
+	next;
+	menu "Yep.",-, "Cancel",M_End;
+
+	mes "^5555FF(You and Gotanblue climb on board his little steamboat)^000000";
+	next;
+	warp "alberta.gat",244,123;
+	close;
+
+M_End:
+	mes "[Gotanblue]";
+	mes "A very good choice!!";
+	close;
+}
+
+// Turtle Grandpa -------------------------------------------------------------------
+alberta_in.gat,23,104,2	script	Turtle Grandpa	120,{
+	mes "[Turtle Grandpa]";
+	mes "~Buuurrrpp!!!~ Oops...";
+	emotion e_swt;
+	next;
+	mes "[Turtle Grandpa]";
+	mes "It's beyond me why people seem to think that Alberta is the center of world trade.";
+	mes "I mean, this place doesn't even have a decent bar for crying out loud!!";
+	emotion e_an;
+	next;
+	mes "[Turtle Grandpa]";
+	mes "Why is it that I have to resort to drinking in a place like this??";
+	emotion e_what;
+	next;
+	menu "-Tell me about Turtle Island.",-, "-How can I get there?",M_1, "-End conversation.",M_End;
+
+		mes "[Turtle Grandpa]";
+		mes "There is an enormous stash of treasure hidden on Turtle Island.";
+		mes "There is also a special potion that can increase a person's lifespan on that island......";
+		next;
+		mes "[Turtle Grandpa]";
+		mes "There are so many myths and legends about the island, that no one even knows for sure if Turtle Island exist.";
+		next;
+		mes "[Turtle Grandpa]";
+		mes "I for one believe it does.... It HAS TO!!......";
+		emotion e_gasp;
+		next;
+		mes "[Turtle Grandpa]";
+		mes "If you are any sort of seaman, if you have a spirit for adventure, and if you have the heart to become a great treasure hunter....";
+		mes "Then you may be worthy of the information I have to offer...";
+		next;
+		menu "-(~eyes twinkle~)",-, "-Heck Ya! Gimme that information.",sM_1;
+
+			mes "[Turtle Grandpa]";
+			mes "His name was ^5555FFJornadan Niliria^000000.  Jornadan and his ten comrades set off on a journey to find the legendary Turtle Island.";
+			next;
+			mes "[Turtle Grandpa]";
+			mes "At first they had no idea where the island was.  They were ambitious and worked extremely hard to gather clues on the whereabouts of the island.";
+			next;
+			mes "[Turtle Grandpa]";
+			mes "These men were very strong, especially Jornadan.  He was so strong in fact, that his simple kicks were as powerful as a level 10 bash!!!";
+			next;
+			mes "[Turtle Grandpa]";
+			mes "He could catch an arrow in one hand while healing a comrade with the other, all during the middle of a battle!";
+			next;
+			mes "[Turtle Grandpa]";
+			mes "Heh heh.  Well, it's just a rumor so take it for what it's worth.  As I was saying....";
+			next;
+			mes "[Turtle Grandpa]";
+			mes "After searching tirelessly Jornadan and his crew eventually found the famed Turtle Island.";
+			next;
+			mes "[Turtle Grandpa]";
+			mes "But for reasons unknown, the crew became stranded on the island forever!!";
+			mes "Although I do not know why or how it happened, there IS one person that does.";
+			next;
+			mes "[Turtle Grandpa]";
+			mes "Go the docks on the east end of town.  Look for a scholar named.... ^FF3333Jornadan^000000... ^FF3333Niliria^000000...";
+			mes "Speak to him.  He should be able to tell you more..... ";
+			next;
+			mes "[Turtle Grandpa]";
+			mes "Oh! One more thing... look for his '^5555FFjournal^000000'.  He usually has it close by.  It's definitely an interesting read.";
+			if(TURTLE==0) set TURTLE, 1;
+			close;
+		sM_1:
+			mes "[Turtle Grandpa]";
+			mes "No way! I have no interest in speaking with someone with greed in his/her heart!";
+			emotion e_gasp;
+			next;
+			mes "[Turtle Grandpa]";
+			mes "Get OUT of my sight!!! GO HOME!";
+			emotion e_an;
+			next;
+			mes "[Turtle Grandpa]";
+			mes "What's this?? You're still here?..... GO! GO AWAY!!............";
+			emotion e_go;
+			close;
+	M_1:
+		mes "[Turtle Grandpa]";
+		mes "It's is extremely hard to find, and even more difficult to reach.  The likelihood of returning home is slim at best....";
+		next;
+		mes "[Turtle Grandpa]";
+		mes "Actually..... IT'S IMPOSSIBLE!!!!";
+		emotion e_gasp;
+		next;
+		mes "[Turtle Grandpa]";
+		mes "Yet you still want to go there??";
+		emotion e_what;
+		next;
+		mes "[Turtle Grandpa]";
+		mes "I want to warn you about the dangers of going there.... but.... I feel so dizzy..... wooah..... it must be the Vodka....";
+		next;
+		mes "[Turtle Grandpa]";
+		mes "Any who, if you go the docks you'll find a fat, old, sailor.  His name is ^5555FFGotanblue^000000.";
+		mes "Tell him I sent you and maybe he'll tell you how to get to Turtle Island.  Well, good luck.";
+		close;
+	M_End:
+		mes "[Turtle Grandpa]";
+		mes "Whooops......";
+		next;
+		mes "!!KA-PLOP!!(collapses on the floor)";
+		next;
+		mes "[Turtle Grandpa]";
+		mes "He he he.... look at me.... I'm a fish... I'm drunk like a fish..... enough for today..... ~ZZZZZzzzz~";
+		close;
+}
+
+// Letter of an explorer (on Turtle Grandpa's desk)------------------------------------------------------------------
+alberta_in.gat,17,101,1	script	Letter of an explorer	111,{
+	mes "~ The letter reads... ~";
+	mes "- O/X/XOVX -";
+	mes "If you find this letter, it means that our expedition to Turtle Island has failed.  Please inform the others...";
+	next;
+	mes "~ continued...~";
+	mes "As of now, only half the number of our crew members are left.  Our food supply will only last for ten more days.  It is a grave situation we are facing....";
+	next;
+	mes "~ continued...~";
+	mes "- V/O/XOVX -";
+	mes "It seems my letters did not make it to the outside world, and have instead come back to me.... This damn island is CURSED!! Oh God.....";
+	next;
+	mes "~ continued...~";
+	mes "GOD FORSAKEN ISLAND!! There is nothing left to eat..... help... me... please.... HELP ME!!";
+	next;
+	mes "~ continued...~";
+	mes "- V/X/XOVX -";
+	mes "^5555FF- This section is severely crumpled and tattered. -^000000";
+	mes "^5555FF- You are unable to read it. -^000000";
+	close;
+}
+
+// Jornadan Niliria ------------------------------------------------------------------------
+alberta.gat,248,90,1	script	Jornadan Niliria	121,{
+	mes "[Jornadan Niliria]";
+	mes "Sometimes I think that the world around me is ever changing.";
+	mes "When I view the land it seems different, when I look up at the sky it too seems different....";
+	next;
+	mes "[Jornadan Niliria]";
+	mes "The way that Alberta and Turtle Island are different.  Hah hah hah....";
+	next;
+	menu "-About Turtle Island.",-, "-Um, did you get confused with Al De Baran?",M_1, "-End Conversation.",M_End;
+
+		mes "[Jornadan Niliria]";
+		mes "Ah yes..... Turtle Island.... Do you know why it's named, 'Turtle' Island? Would you like to know? Haha......";
+		next;
+		mes "[Jornadan Niliria]";
+		mes "The reason behind the name is actually very easy to figure out and you might even feel a little foolish about not getting it in the first place.";
+		next;
+		mes "[Jornadan Niliria]";
+		mes "It's called 'Turtle' Island, because of the fact that it is shaped like an actual turtle.  Haha.  That's all there is to it.";
+		next;
+		mes "[Jornadan Niliria]";
+		mes "There is an unusually dense area of fog that surrounds the island.";
+		mes "At first we tried to figure what causes it but with no luck.  We figured that it was just a natural phenomenon.";
+		next;
+		mes "[Jornadan Niliria]";
+		mes "Then we found a cave along the coastline of the island.  Inside we were amazed to see a HUGE waterfall.";
+		mes "It turns out that this waterfall is what creates that extremely thick area of fog around that island.";
+		next;
+		mes "[Jornadan Niliria]";
+		mes "The reason is so simple and yet there are people who still try to find a deeper meaning behind it....";
+		next;
+		mes "[Jornadan Niliria]";
+		mes "I believe that people continue to probe into the matter because they do not want to feel that their efforts have been in vain.";
+		mes "Maybe they are afraid of the truth..... I for one was once afraid.... afraid of Turtle Island....";
+		next;
+		mes "[Jornadan Niliria]";
+		mes "But now that I truly understand all of the myths about Turtle Island, I feel at ease and at peace with the island.";
+		mes "There is still one lingering question about the island for me though..... it is the existence of the unknown ^FF5555'Jewel Fragment'^000000.";
+		next;
+		mes "[Jornadan Niliria]";
+		mes "I am still not certain about what it really is.  In the mean time I will continue to pursue the matter until I discover the truth! Hahaha!!";
+		close;
+	M_1:
+		mes "[Jornadan Niliria]";
+		mes "Whoops ! Oh that's right !! Confused !.... Yipe !..... WOOOOO !!!";		//have NO idea what this means.....
+		close;
+	M_End:
+		mes "[Jornadan Niliria]";
+		mes "When you're searching for the truth, make sure to keep trying.  Someday you will find the answers you seek...";
+		next;
+		mes "[Jornadan Niliria]";
+		mes "Hmmm.... by the way.... I feel hungry.  Why doesn't Alberta have a store or restaurant for some good Dim Sum??";
+		close;
+}
+
+// Jornadan's Voyage Log -------------------------------------------------
+alberta.gat,247,93,1	script	A Voyage Log	111,{
+	if(TURTLE == 1) goto L_Treasure;
+	mes "[A Voyage Log]";
+	mes "= 03:20 am =";
+	mes "The moon was dark and I couldn't even see 100m in front of me.  I had a bad feeling about the situation..... I was not the only one...";
+	next;
+	mes "[A Voyage Log]";
+	mes "I could tell by the looks on my comrade's faces, that they too were worried.  No one could sleep that night.  I hope we will see the sunrise soon....";
+	next;
+	mes "[A Voyage Log]";
+	mes "= 04:10 =";
+	mes "5 minutes ago one of our comrades, Cooker, died.  While he walking on deck, the flagpole suddenly broke and fell on his head....";
+	next;
+	mes "[A Voyage Log]";
+	mes "He died at approximately 04:07.  The flagpole had been damaged when our ship hit a reef.";
+	mes "The ship sustained serious damage along the left side of the deck.  I called on the chief to repair it.";
+	next;
+	mes "[A Voyage Log]";
+	mes "= 04:45 =";
+	mes "While two of our workers were fixing the bottom of the deck, monsters attacked them without warning.";
+	mes "Apparently they had gotten in through some openings in the deck.";
+	next;
+	mes "[A Voyage Log]";
+	mes "Two more men had been lost.  Fortunately the ship has yet to sink and seems to be holding up.  Still, we must find land soon.";
+	next;
+	mes "[A Voyage Log]";
+	mes "During the collision with the reef we lost about 30% of our supplies.  In particular we lost food... a great deal of food....";
+	next;
+	mes "[A Voyage Log]";
+	mes "= 05:23 =";
+	mes "We've been noticing an increase in the amount of reefs and they are getting larger as well.";
+	mes "I wonder when we will find land.... I wonder if we can....";
+	next;
+	mes "[A Voyage Log]";
+	mes "- Written by -";
+	mes "- captain Jornadan Niliria -";
+	next;
+	mes "^5555FF- Closed the voyage log -^000000";
+	close;
+
+L_Treasure:
+	mes "^5555FF- The paper is torn -";
+	mes "- Seaweed and mold have -";
+	mes "- mixed with the paper -";
+	mes "- It looks to be in very poor";
+	mes "condition. -^000000";
+	next;
+	mes "^5555FF- Between some pages -";
+	mes "- Is a Banana leaf -";
+	mes "- this is written. -^000000";
+	next;
+	mes "[A Voyage Log]";
+	mes "= O/X date =";
+	mes "Just after we arrived to Turtle Island, we searched for some food to eat.  I am so skinny now...";
+	next;
+	mes "[A Voyage Log]";
+	mes "When I looked at myself in the mirror, it was horrible.  I was disturbed by what I saw...";
+	next;
+	mes "[A Voyage Log]";
+	mes "= X/X date =";
+	mes "We found some kind of fruit! It has a yellow color and a long shape.  It looks just like a banana!";
+	next;
+	mes "[A Voyage Log]";
+	mes "= XO/X date =";
+	mes "Although very similar, the fruit we found was not a banana.  We believe it is a relative of the banana.";
+	mes "It smells and tastes exactly like a banana.";
+	next;
+	mes "[A Voyage Log]";
+	mes "We were starving so we just referred to the fruit as bananas and gathered it for food.";
+	mes "Although there were a limited amount of trees, there was enough for our survival.";
+	next;
+	mes "[A Voyage Log]";
+	mes "It has become the answer to our lack of food and has become precious to us.";
+	mes "~ WE LOVE YOU BANANA!! ~";
+	next;
+	mes "[A Voyage Log]";
+	mes "= O/O date =";
+	mes "In the middle of the night, one of our comrades reported that he felt sick from something he ate.";
+	next;
+	mes "[A Voyage Log]";
+	mes "= OO/O date =";
+	mes "Another comrade fell ill.  He had the strongest digestive system among us.";
+	mes "He went by the name, 'Berot Berot', and he played a vital role in our group.";
+	next;
+	mes "[A Voyage Log]";
+	mes "The fact that he got sick from something he ate, made it very clear that there was something poisoning us.";
+	next;
+	mes "[A Voyage Log]";
+	mes "= XO/O date =";
+	mes "A third person became sick today while we were out exploring.  The first person to become ill has passed away.... We are all very worried.";
+	next;
+	mes "[A Voyage Log]";
+	mes "We tried very hard to find the cause of the illness.  Then by observing the animals one day, we found it.";
+	mes "It was the very thing we thought to be our salvation and yet not one animal on the island would even touch it.....";
+	next;
+	mes "[A Voyage Log]";
+	mes "What was killing us was..... our beloved BANANA!!";
+	next;
+	mes "[A Voyage Log]";
+	mes "We decided to get rid of all of the bananas.  But for some reason they didn't seem to be decomposing.";
+	mes "Even when the skin was peeled off, the fruits remained the same.";
+	next;
+	mes "[A Voyage Log]";
+	mes "I think that the poison or some other agent within the fruit is allowing it to survive.";
+	mes "We may be able to use it for medicinal purposes later, but for now it is of no use to us.";
+	mes "Until we get back to Alberta, we have to decided to bury what is left of the fruit.";
+	next;
+	mes "[A Voyage Log]";
+	mes "This is the location where it's buried in case we forget:";
+	mes "^FF8888- tur_dun01 -";
+	mes "- X: 160, Y: 81 -^000000";
+	next;
+	mes "^5555FF- There is a thin Key -";
+	mes "- with a skull mark on it -";
+	mes "- You've gained -";
+	mes "- a 'Skull Key' -^000000";
+	set TURTLE, 2;
+	close;
+}
+
+// Burried treasure --------------------------------------------------------------------
+tur_dun01.gat,160,80,1	script	Skull Stone	111,{
+	if(TURTLE == 2) goto L_OpenBox;
+	mes "^5555FF(It's a frightening stone tomb with horrible skull on it.)^000000";
+	close;
+
+L_OpenBox:
+	mes "^5555FF(Under the stone is a tiny key hole with a skull mark.  You used the 'Skull Key' to open the box.)^000000";
+	next;
+	mes "^5555FF(~click!~click!~)^000000";
+	next;
+	mes "^5555FF(Suddenly the top of the stone opens with many things coming out!)^000000";
+	set TURTLE, 3;
+	next;
+	mes "^5555FF(You got 5 Tropical Bananas and 5 Banana Juices.)^000000";
+	getitem 634, 5;
+	getitem 532, 5;
+	close;
 }
\ No newline at end of file
diff --git a/npc/quests/quests_aldebaran.txt b/npc/quests/quests_aldebaran.txt
index 167acf736..609f5a985 100644
--- a/npc/quests/quests_aldebaran.txt
+++ b/npc/quests/quests_aldebaran.txt
@@ -1,93 +1,93 @@
-//===== eAthena Script ======================================= 

-//= Quest NPCs related to Aldebaran 

-//===== By: ================================================== 

-//= eAthena Dev Team

-//===== Current Version: ===================================== 

-//= 1.2

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//= 'Doctor Band', 'Feather Bonnet', 'Opera Masque', 'Sakkat Hat' Quests.

-//===== Additional Comments: ================================= 

-//= Fully working

-//= 1.1 Fixed Doctor Band items [Lupus]

-//= 1.2 Removed Duplicates [Silent]

-//============================================================ 

-

-

-//=======================================================================================================//

-//			'Doctor Band', 'Feather Bonnet', 'Opera Masque', 'Sakkat Hat' Quest

-//=======================================================================================================//

-aldeba_in.gat,152,166,4	script	Trader#01	86,{

-	mes "[Trader]";

-	mes "Muhahaha! I am the Very Famous Enigmatic Dealer! I am always hustling and bustling in and out of Rune Midgard!";

-	mes "Take a look at my RARE and UNIQUE items from ALL OVER the WORLD!!";

-	next;

-	mes "(1) · ^3355FFDoctor Band^000000 :";

-	mes "^FF55331 Red Bandana + 50 Iron + 1 Cracked Diamond + 3500 Zeny^000000.";

-	mes "(2) · ^3355FFFeather Bonnet^000000 :";

-	mes "^FF55331 Romantic Gent + 300 Feather of Birds + 500 Zeny^000000.";

-	mes "(3) · ^3355FFOpera Masque^000000 :";

-	mes "^FF553320 Iron + 1 Singing Plant + 5000 Zeny^000000.";

-	mes "(4) · ^3355FFSakkat Hat^000000 :";

-	mes "^FF5533120 Trunk + 10000 Zeny^000000.";

-	next;

-	menu "Doctor Band",-, "Feather Bonnet",M_1, "Opera Masque",M_2, "Sakkat",M_3;

-		

-		mes "[Trader]";

-		if(countitem(2275) == 0 || countitem(998) < 50 || countitem(733) == 0 || Zeny < 3500) goto L_CantMake;

-		delitem 2275,1;//Items: Red Bandana,

-		delitem 998,50;//Items: Iron,

-		delitem 733,1;//Items: Cracked deamond

-		set Zeny,Zeny - 3500;

-		mes "Hmm.... Do you have a.... MEDICAL LICENSE?!";

-		emotion e_what;

-		next;

-		mes "[Trader]";

-		mes "I've heard about a well-known unlicensed physician 'Cuwaki'... I hope you don't get caught....";

-		mes "Anyways it's your own buisness what you do... Take this.";

-		getitem 2273,1;//Items: Doctor Band,

-		close;

-	M_1:

-		mes "[Trader]";

-		if(countitem(2247) == 0 || countitem(916) < 300 || Zeny < 500) goto L_CantMake;//Items: Romantic Gent, Feather of Birds,

-		delitem 2247,1;//Items: Romantic Gent,

-		delitem 916,300;//Items: Feather of Birds,

-		set Zeny,Zeny - 500;

-		mes "Umhahaha. You have good fashion sense.  I know you had a hard time collecting these items, but this bonnet is definately worth it.  Take it.";

-		emotion e_heh;

-		getitem 5018,1;//Items: Feather Bonnet,

-		close;

-	M_2:

-		mes "[Trader]";

-		if(countitem(998) < 20 || countitem(707) == 0 || Zeny < 5000) goto L_CantMake;//Items: Iron, Singing Plant,

-		delitem 998,20;//Items: Iron,

-		delitem 707,1;//Items: Singing Plant,

-		set Zeny,Zeny - 5000;

-		mes "This is a pretty nice item.  A little bit creepy looking though.... I think it gives off some kinda weird vibe.  What do you think?";

-		next;

-		mes "[Trader]";

-		mes ".. You like it ..Alright.. Take it!";

-		getitem 2281,1;//Items: Opera Masque,

-		close;

-	M_3:

-		mes "[Trader]";

-		if(countitem(1019) < 120 || Zeny < 10000) goto L_CantMake;//Items: Trunk,

-		delitem 1019,120;//Items: Trunk,

-		set Zeny,Zeny - 10000;

-		mes "If you have a chance to visit the Village of Payon, please go meet the Sakkat Craftsman.";

-		mes "He's never sold a Sakkat to any other dealer but to me.";

-		next;

-		mes "[Trader]";

-		mes "Because only I can recognize a Sakkat hats' quality.  Due to the fact that it's so rare, the Sakkat Hat has become a very popular item!";

-		next;

-		mes "[Trader]";

-		mes "OK! Take it!";

-		getitem 2280,1;//Items: Sakkat,

-		close;

-

-	L_CantMake:

-		mes "You, fool! Check the requirements again..... you're not some kinda idiot are you? C'mon..... give me a break.";

-		emotion e_an;

-		close;

-}

+//===== eAthena Script ======================================= 
+//= Quest NPCs related to Aldebaran 
+//===== By: ================================================== 
+//= eAthena Dev Team
+//===== Current Version: ===================================== 
+//= 1.2
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//= 'Doctor Band', 'Feather Bonnet', 'Opera Masque', 'Sakkat Hat' Quests.
+//===== Additional Comments: ================================= 
+//= Fully working
+//= 1.1 Fixed Doctor Band items [Lupus]
+//= 1.2 Removed Duplicates [Silent]
+//============================================================ 
+
+
+//=======================================================================================================//
+//			'Doctor Band', 'Feather Bonnet', 'Opera Masque', 'Sakkat Hat' Quest
+//=======================================================================================================//
+aldeba_in.gat,152,166,4	script	Trader#01	86,{
+	mes "[Trader]";
+	mes "Muhahaha! I am the Very Famous Enigmatic Dealer! I am always hustling and bustling in and out of Rune Midgard!";
+	mes "Take a look at my RARE and UNIQUE items from ALL OVER the WORLD!!";
+	next;
+	mes "(1) · ^3355FFDoctor Band^000000 :";
+	mes "^FF55331 Red Bandana + 50 Iron + 1 Cracked Diamond + 3500 Zeny^000000.";
+	mes "(2) · ^3355FFFeather Bonnet^000000 :";
+	mes "^FF55331 Romantic Gent + 300 Feather of Birds + 500 Zeny^000000.";
+	mes "(3) · ^3355FFOpera Masque^000000 :";
+	mes "^FF553320 Iron + 1 Singing Plant + 5000 Zeny^000000.";
+	mes "(4) · ^3355FFSakkat Hat^000000 :";
+	mes "^FF5533120 Trunk + 10000 Zeny^000000.";
+	next;
+	menu "Doctor Band",-, "Feather Bonnet",M_1, "Opera Masque",M_2, "Sakkat",M_3;
+		
+		mes "[Trader]";
+		if(countitem(2275) == 0 || countitem(998) < 50 || countitem(733) == 0 || Zeny < 3500) goto L_CantMake;
+		delitem 2275,1;//Items: Red Bandana,
+		delitem 998,50;//Items: Iron,
+		delitem 733,1;//Items: Cracked deamond
+		set Zeny,Zeny - 3500;
+		mes "Hmm.... Do you have a.... MEDICAL LICENSE?!";
+		emotion e_what;
+		next;
+		mes "[Trader]";
+		mes "I've heard about a well-known unlicensed physician 'Cuwaki'... I hope you don't get caught....";
+		mes "Anyways it's your own buisness what you do... Take this.";
+		getitem 2273,1;//Items: Doctor Band,
+		close;
+	M_1:
+		mes "[Trader]";
+		if(countitem(2247) == 0 || countitem(916) < 300 || Zeny < 500) goto L_CantMake;//Items: Romantic Gent, Feather of Birds,
+		delitem 2247,1;//Items: Romantic Gent,
+		delitem 916,300;//Items: Feather of Birds,
+		set Zeny,Zeny - 500;
+		mes "Umhahaha. You have good fashion sense.  I know you had a hard time collecting these items, but this bonnet is definately worth it.  Take it.";
+		emotion e_heh;
+		getitem 5018,1;//Items: Feather Bonnet,
+		close;
+	M_2:
+		mes "[Trader]";
+		if(countitem(998) < 20 || countitem(707) == 0 || Zeny < 5000) goto L_CantMake;//Items: Iron, Singing Plant,
+		delitem 998,20;//Items: Iron,
+		delitem 707,1;//Items: Singing Plant,
+		set Zeny,Zeny - 5000;
+		mes "This is a pretty nice item.  A little bit creepy looking though.... I think it gives off some kinda weird vibe.  What do you think?";
+		next;
+		mes "[Trader]";
+		mes ".. You like it ..Alright.. Take it!";
+		getitem 2281,1;//Items: Opera Masque,
+		close;
+	M_3:
+		mes "[Trader]";
+		if(countitem(1019) < 120 || Zeny < 10000) goto L_CantMake;//Items: Trunk,
+		delitem 1019,120;//Items: Trunk,
+		set Zeny,Zeny - 10000;
+		mes "If you have a chance to visit the Village of Payon, please go meet the Sakkat Craftsman.";
+		mes "He's never sold a Sakkat to any other dealer but to me.";
+		next;
+		mes "[Trader]";
+		mes "Because only I can recognize a Sakkat hats' quality.  Due to the fact that it's so rare, the Sakkat Hat has become a very popular item!";
+		next;
+		mes "[Trader]";
+		mes "OK! Take it!";
+		getitem 2280,1;//Items: Sakkat,
+		close;
+
+	L_CantMake:
+		mes "You, fool! Check the requirements again..... you're not some kinda idiot are you? C'mon..... give me a break.";
+		emotion e_an;
+		close;
+}
diff --git a/npc/quests/quests_amatsu.txt b/npc/quests/quests_amatsu.txt
index c64740466..4e0a60308 100644
--- a/npc/quests/quests_amatsu.txt
+++ b/npc/quests/quests_amatsu.txt
@@ -1,1528 +1,1528 @@
-//===== eAthena Script ======================================= 

-//= Quest NPCs related to Amatsu

-//===== By: ================================================== 

-//= eAthena team & others? & MasterOfMuppets

-//===== Current Version: ===================================== 

-//= 1.2

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//= Momotaro event, Sushi Quest, Amatsu Event

-//===== Additional Comments: ================================= 

-//= 1.0 Rewrote parts of other/momotaro.txt to make it work.

-//=	I'm sorry for the mess, I couldn't do much better with

-//=	the current code I had.

-//= 1.1 Added Sushi Quest and Amatsu Event from cities/ [Evera]

-//= 1.2 Fixed Momotaro Quest, thanks to .~Abism0~. [Lupus]

-//============================================================ 

-

-amatsu.gat,223,235,4	script	Publisher	763,{

-	if (event_momo > 4) goto Lfin;

-	if ((event_momo >= 1) && (event_momo <= 4)) goto Lget;

-	mes "[Publisher]";

-	mes "Hello~~!!";

-	mes "Our ^00B6FFScroll Publishing Company^000000";

-	mes "is professionally publishing";

-	mes "tales.";

-	next;

-	mes "[Publisher]";

-	mes "We established";

-	mes "^3366FFMomotaro Field Trip^000000";

-	mes "to celebrate ^00B6FF<Momotaro Story>^000000";

-	mes "selling over a million copies.";

-	next;

-	mes "[Publisher]";

-	mes "Become Momotaro and eliminate";

-	mes "Dokebis, just like in the story!";

-	mes "There will also be rewards.";

-	next;

-	menu "What is Momotaro Story?!",-,"I want to try!",L1,"I'm busy right now...",L2;

-		mes "[Publisher]";

-		mes "Eh~!? How can you not know about";

-		mes "Momotaro? Don't they have this";

-		mes "tale in Rune-Midgard?? Well...";

-		mes "Let me tell you the story.";

-		next;

-		mes "[Publisher]";

-		mes "Long ago, there lived an old";

-		mes "married couple. They were happy,";

-		mes "but didn't have any children.";

-		next;

-		mes "[Publisher]";

-		mes "One day, while old lady was doing";

-		mes "the laundry, she found a humongous";

-		mes "peach. She cut it in half and...";

-		mes "'Poof!' There was a baby inside!";

-		next;

-		mes "[Publisher]";

-		mes "The old man and lady were shocked.";

-		mes "They decided to adopt that baby,";

-		mes "and give him their love...";

-		next;

-		mes "[Publisher]";

-		mes "That baby grew so fast, like that";

-		mes "beanstalk from 'Jack and";

-		mes "Beanstalk' and became a strong boy";

-		mes "in only a few days.";

-		next;

-		mes "[Publisher]";

-		mes "That's boy's name was...";

-		mes "<Momotaro>!!!";

-		mes "Momotaro traveled to eliminate";

-		mes "dokebis that were harassing";

-		mes "the towners.";

-		next;

-		mes "[Publisher]";

-		mes "He became friends with";

-		mes "^3151FFYoyo, Picky, and Desert Wolf^000000";

-		mes "and eliminated all of the Dokebis.";

-		mes "then he lived happily ever after";

-		mes "with the old couple.";

-		next;

-		mes "[Publisher]";

-		mes "How was it?";

-		mes "Great, right?";

-		mes "I mean, this story sold a million";

-		mes "copies!";

-		close;

-L1:

-		mes "[Publisher]";

-		mes "Yay-! You look excited!";

-		mes "You'll be ready to go soon.";

-		mes "Please fill out this registration";

-		mes "card.";

-		next;

-		mes "[Publisher]";

-		mes ".................";

-		mes "......Mm.....Let's see.....";

-		mes ".............Good!";

-		mes "Alright, then!";

-		mes "Let it begin~~~!!!!!!!!!";

-		mes "<Momotaro Field Trip>~!";

-		close2;

-		warp "ama_test",52,35;

-		end;

-L2:

-		mes "[Publisher]";

-		mes "Eh?";

-		mes "...But there are sweet rewards";

-		mes "waiting...";

-		close;

-Lget:

-	mes "[Publisher]";

-	mes "How was it? Did you enjoy the event?";

-	mes "I hope the arrangements at the event hall allowed you to spend an enjoyable time there.";

-	next;

-	if (event_momo > 1 && event_momo < 4)

-	{

-	switch(rand(1,24))

-		{

-

-	case 1:

-		getitem 627,1; //sweet milk

-	break;

-

-	case 2:

-		getitem 629,1; //singing flower

-	break;

-

-	case 3:

-		getitem 625,1; //rusty iron

-	break;

-

-	case 4:

-		getitem 619,1; //unripe apple

-	break;

-

-	case 5:

-		getitem 620,1; //orange juice

-	break;

-

-	case 6:

-		getitem 621,1; //bitter herb

-	break;

-

-	case 7:

-		getitem 622,1; //rainbow carrot

-	break;

-

-	case 8:

-		getitem 623,1; //earthworm the dude

-	break;

-

-	case 9:

-		getitem 624,1; //rotten fish

-	break;

-

-	case 10:

-		getitem 626,1; //monster juice

-	break;

-

-	case 11:

-		getitem 628,1; //well-dried bone

-	break;

-

-	case 12:

-		getitem 630,1; //dew laden moss

-	break;

-

-	case 13:

-		getitem 631,1; //deadly noxious herb

-	break;

-

-	case 14:

-		getitem 632,1; //fatty chubby earthworm

-	break;

-

-	case 15:

-		getitem 633,1; //sweet potato

-	break;

-

-	case 16:

-		getitem 634,1; //tropical banana

-	break;

-

-	case 17:

-		getitem 635,1; //orc trophy

-	break;

-

-	case 18:

-		getitem 636,1; //no recipient

-	break;

-

-	case 19:

-		getitem 637,1; //old broom

-	break;

-

-	case 20:

-		getitem 638,1; //silver knife of chastity

-	break;

-

-	case 21:

-		getitem 639,1; //armlet of obedience

-	break;

-

-	case 22:

-		getitem 640,1; //shining stone

-	break;

-

-	case 23:

-		getitem 641,1; //contract in shadow

-	break;

-

-	case 24:

-		getitem 642,1; //book of the devil

-	break;

-

-		}

-	}

-//Am Mut successful finish unknown

-	if (event_momo == 4)

-	{

-	while(@i != 3)

-	{

-	switch(rand(1,24))

-		{

-

-	case 1:

-		getitem 627,1; //sweet milk

-	break;

-

-	case 2:

-		getitem 629,1; //singing flower

-	break;

-

-	case 3:

-		getitem 625,1; //rusty iron

-	break;

-

-	case 4:

-		getitem 619,1; //unripe apple

-	break;

-

-	case 5:

-		getitem 620,1; //orange juice

-	break;

-

-	case 6:

-		getitem 621,1; //bitter herb

-	break;

-

-	case 7:

-		getitem 622,1; //rainbow carrot

-	break;

-

-	case 8:

-		getitem 623,1; //earthworm the dude

-	break;

-

-	case 9:

-		getitem 624,1; //rotten fish

-	break;

-

-	case 10:

-		getitem 626,1; //monster juice

-	break;

-

-	case 11:

-		getitem 628,1; //well-dried bone

-	break;

-

-	case 12:

-		getitem 630,1; //dew laden moss

-	break;

-

-	case 13:

-		getitem 631,1; //deadly noxious herb

-	break;

-

-	case 14:

-		getitem 632,1; //fatty chubby earthworm

-	break;

-

-	case 15:

-		getitem 633,1; //sweet potato

-	break;

-

-	case 16:

-		getitem 634,1; //tropical banana

-	break;

-

-	case 17:

-		getitem 635,1; //orc trophy

-	break;

-

-	case 18:

-		getitem 636,1; //no recipient

-	break;

-

-	case 19:

-		getitem 637,1; //old broom

-	break;

-

-	case 20:

-		getitem 638,1; //silver knife of chastity

-	break;

-

-	case 21:

-		getitem 639,1; //armlet of obedience

-	break;

-

-	case 22:

-		getitem 640,1; //shining stone

-	break;

-

-	case 23:

-		getitem 641,1; //contract in shadow

-	break;

-

-	case 24:

-		getitem 642,1; //book of the devil

-	break;

-

-		}

-	set @i,@i+1;

-	}

-	}

-	set event_momo,5;

-	mes "[Publisher]";

-	mes "Well then, I will give you a small present which I have prepared.";

-	mes "May the legend be widely loved also in the future......";

-	close;

-Lfin:

-	mes "[Publisher]";

-	mes "We have a nice weather today, don't we...... It is a perfect day to dry the futon.";

-	close;

-}

-//=====================================================================

-ama_test.gat,50,44,4	script	Event Hall Staff	109,{

-	mes "[Satoshi]";

-	mes "Welcome to <Momotaro Field Trip>";

-	next;

-	mes "[Satoshi]";

-	mes "I'm Satoshi who is in charge of the";

-	mes "waiting room in <Momotaro Field";

-	mes "Trip>.";

-	next;

-	mes "[Satoshi]";

-	mes "Originally, I was working for the";

-	mes "publishing company, but we lacked";

-	mes "workers for the Field Trip...";

-	mes "But working here is much better!";

-	mes "Now I just watch people trying to";

-	mes "accomplish the mission. Heh hehe~";

-	next;

-	mes "[Satoshi]";

-	mes "..............";

-	mes "Just kidding";

-	mes "^111111*Wipes away sweat*^000000";

-	next;

-	mes "[Satoshi]";

-	mes "Well, let me explain";

-	mes "about the rules in the Field Trip";

-	next;

-	mes "[Satoshi]";

-	mes "First of all...Did you hear";

-	mes "about the story from the";

-	mes "publisher?";

-	next;

-	menu "Yes",L1,"No",-;

-		mes "[Satoshi]";

-		mes "Eh? You can't just";

-		mes "skip the story";

-		mes "when you enter the field";

-		mes "trip! I can't allow you to";

-		mes "do that as a Momotaro's";

-		mes "fan!!!";

-		next;

-		mes "[Satoshi]";

-		mes "Please listen to the story";

-		mes "from the publisher.";

-		mes "Thank you.";

-		mes "Bye~~";

-		close2;

-		warp "amatsu.gat",223,230;

-		end;

-L1:

-		mes "[Satoshi]";

-		mes "Hehe...Good.";

-		mes "Momotoro's Story is our";

-		mes "pride. It's the best story EVER.";

-		mes "Hahaha!!!";

-		next;

-		mes "[Satoshi]";

-		mes "...Hmmhmm.";

-		next;

-		mes "[Satoshi]";

-		mes "The Field Trip is simple.";

-		mes "Go inside and eliminate";

-		mes "Dokebis bravely!!!";

-		mes "Just like Momotaro!!!";

-		mes "Understand? Bravely!!!";

-		next;

-		mes "[Satoshi]";

-		mes "In addition, there are three";

-		mes "things you need to know.";

-		next;

-		mes "[Satoshi]";

-		mes "First....";

-		mes "You can't come back once you clear";

-		mes "the field trip. Keep that in mind.";

-		next;

-		mes "[Satoshi]";

-		mes "Secondly...";

-		mes "Q-pet is prohibited";

-		mes "inside of the field trip.";

-		mes "if you are with a pet,";

-		mes "please change it to egg status.";

-		next;

-		mes "[Satoshi]";

-		mes "And finally...";

-		mes "One person can be on the";

-		mes "field trip for 6 minutes.";

-		next;

-		mes "[Satoshi]";

-		mes "Well then, Please";

-		mes "wait for you turn";

-		mes "in the waitiSng room.";

-		mes "Good luck in fighting!!";

-		close;

-OnInit:

-	waitingroom "Event Hall Waiting Room",1,"Event Hall Staff::OnMax";

-OnInitCopy:

-	enablewaitingroomevent "Event Hall Staff";

-	areawarp "ama_test.gat",30,78,68,120,"amatsu.gat",223,230;

-	disablenpc "Manager#Momotaro";

-	enablenpc "Grandpa#Momotaro";

-	enablenpc "Grandma#Momotaro";

-	donpcevent "#MomotaroTimer::OnStopTimer";

-	killmonsterall "ama_test.gat";

-	end;

-OnMax:

-	warpwaitingpc "ama_test.gat",51,85;

-	disablewaitingroomevent "Event Hall Staff";

-	disablenpc "Manager#Momotaro";

-	enablenpc "Grandpa#Momotaro";

-	enablenpc "Grandma#Momotaro";

-	donpcevent "#MomotaroActivator::OnMomoInit";

-	end;

-}

-

-ama_test.gat,1,1,0	script	#MomotaroTimer	-1,{

-OnStartTimer:

-	initnpctimer;

-	end;

-OnTimer180000:

-	if(!isloggedin($MomotaroRID))goto s_Cleanup;

-	mapannounce "ama_test.gat","Timer: 3 Minutes left.",8;

-	end;

-OnTimer300000:

-	if(!isloggedin($MomotaroRID))goto s_Cleanup;

-	mapannounce "ama_test.gat","Timer: 1 Minute left.",8;

-	end;

-OnTimer360000:

-	if(!isloggedin($MomotaroRID))goto s_Cleanup;

-	mapannounce "ama_test.gat","Timer: Beep- Beep- Beep- Time's up.",8;

-OnTimer362500:

-	areawarp "ama_test.gat",30,78,68,120,"amatsu.gat",223,230;

-	goto s_Cleanup;

-

-

-OnTimer20000:

-OnTimer40000:

-OnTimer60000:

-OnTimer80000:

-OnTimer100000:

-OnTimer120000:

-OnTimer140000:

-OnTimer160000:

-OnTimer200000:

-OnTimer220000:

-OnTimer240000:

-OnTimer260000:

-OnTimer280000:

-OnTimer320000:

-OnTimer340000:

-	if(!isloggedin($MomotaroRID))goto s_Cleanup;

-	end;

-

-OnCleanUp:

-s_Cleanup:

-	stopnpctimer;

-	set $Momotaro,0;

-	set $MomoDokebi,0;

-	set $MomoDokebi2,0;

-	set $MomotaroRID,0;

-	mapannounce "ama_test.gat","The current player has exited. The waiting room will now open again.",8;

-	disablenpc "Manager#Momotaro";

-	donpcevent "Event Hall Staff::OnInitCopy";

-	end;

-

-OnStopTimer:

-	stopnpctimer;

-	end;

-

-}

-

-ama_test.gat,51,85,0	script	#MomotaroActivator	139,1,1,{

-	if($Momotaro)end;

-	set $Momotaro,1;

-	set $MomotaroRID,getcharid(3);

-	areaannounce "ama_test.gat",30,78,68,120,"Timer: The Timer has been activated. You have 6 minutes. Annihilate the monsters in time!",8;

-	donpcevent "#MomotaroTimer::OnStartTimer";

-	mes "[Grandpa]";

-	mes "Arrrk!!!";

-	next;

-	mes "[Grandma]";

-	mes "Honey!! Someone hacked my account";

-	mes "and stole my equipment!!";

-	next;

-	mes "[Grandpa]";

-	mes "Hmm. The Chief said the Dokebi";

-	mes "earned 20 million zeny by hacking";

-	mes "other's accounts...";

-	next;

-	mes "[Grandma]";

-	mes "Dohhhhhhh!!!!";

-	next;

-	mes "[Grandpa]";

-	mes "...Huh I've heard that somewhere";

-	mes "before....";

-	next;

-	mes "[Grandpa]";

-	mes "Anyway, Momotaro...";

-	next;

-	mes "[Grandpa]";

-	mes "As you know, since we towners spends";

-	mes "our time sitting and chatting,";

-	mes "we can't kill Dokebis because we're";

-	mes "low levels, so...Please do it for";

-	mes "us.";

-	next;

-	mes "[Grandma]";

-	mes "Momotaro...";

-	mes "I really wanted to give you";

-	mes "a handmade ^3151FFYummiest Red Poiton in";

-	mes "the whole world^000000 ...but...";

-	mes ".....I failed to make them ....";

-	next;

-	mes "[Grandma]";

-	mes "...I'm sorry. I should have been";

-	mes "leveling up before...^111111*Sob*";

-	next;

-	mes "[Grandma & Grandpa]";

-	mes "So...Do me this favor, kid~";

-	close2;

-	initnpctimer;

-	end;

-

-OnTimer5000:

-	stopnpctimer;

-	set $MomoDokebi,0;

-	set $MomoDokebi2,0;

-	disablenpc "Grandpa#Momotaro";

-	disablenpc "Grandma#Momotaro";

-	monster "ama_test.gat",47,101,"Dokebi",1110,1,"mobcount#momotaro::OnMobDead";

-	monster "ama_test.gat",51,101,"Dokebi",1110,1,"mobcount#momotaro::OnMobDead";

-	monster "ama_test.gat",55,101,"Dokebi",1110,1,"mobcount#momotaro::OnMobDead";

-	monster "ama_test.gat",55,97,"Dokebi",1110,1,"mobcount#momotaro::OnMobDead";

-	monster "ama_test.gat",55,93,"Dokebi",1110,1,"mobcount#momotaro::OnMobDead";

-	monster "ama_test.gat",53,91,"Dokebi",1110,1,"mobcount#momotaro::OnMobDead";

-	monster "ama_test.gat",49,91,"Dokebi",1110,1,"mobcount#momotaro::OnMobDead";

-	monster "ama_test.gat",45,96,"Dokebi",1110,1,"mobcount#momotaro::OnMobDead";

-	monster "ama_test.gat",45,99,"Dokebi",1110,1,"mobcount#momotaro::OnMobDead";

-	end;

-

-OnInit:

-	set $Momotaro,0;

-	set $MomoDokebi,0;

-	set $MomoDokebi2,0;

-	set $MomotaroRID,0;

-	end;

-

-}

-

-ama_test.gat,49,95,4	script	Grandpa#Momotaro	766,{

-

-	mes "[Grandpa]";

-	mes "Zzzzzz......";

-	close;

-}

-

-ama_test.gat,51,95,4	script	Grandma#Momotaro	761,{

-

-	mes "[Grandma]";

-	mes "Oh....!?";

-	close;

-

-}

-

-ama_test.gat,50,100,4	script	Manager#Momotaro	762,{

-

-	if (event_momo >= 4) goto LSecondFin;

-	mes "[Manager]";

-	mes "Hoho, you did it...... I'm the manager here...... You are not an ordinary person, right? You did very well.";

-	next;

-	mes "[Manager]";

-	mes "The Momotaro from the legend appears in this world!";

-	mes "Hohohohoho!";

-	next;

-	menu "Is there some extra?",L1,"Thanks for nothing......",L2;

-L1:

-	mes "[Manager]";

-	mes "Hohoho......";

-	mes "This is maybe not really recomending......";

-	mes "I think in your current condition the small demons can twirl you lightly around their fingers.";

-	mes "......Hohoho......";

-	next;

-	mes "[Manager]";

-	mes "......";

-	mes "Just a joke.";

-	next;

-	mes "[Manager]";

-	mes "Well then, you enjoyed the Momotaro Event Hall?";

-	mes "Talk to the staff member, that you have met first, about our premium presents. He will give you some.";

-	next;

-	mes "[Manager]";

-	mes "Whatever you encounter, never loose that strong spirit!";

-	close2;

-	set $Momotaro,0;

-	set $MomoDokebi,0;

-	set $MomoDokebi2,0;

-	set $MomotaroRID,0;

-	set event_momo,1;

-	donpcevent "Event Hall Staff::OnInitCopy";

-	warp "amatsu.gat",223,230;

-	disablenpc "Manager#Momotaro";

-	end;

-L2:

-	mes "[Manager]";

-	mes "!!!!!";

-	mes "......Ho...Hohoho......";

-	mes "You are an amusing fellow......";

-	mes "Well...... One little suggestion from me to you.";

-	next;

-	mes "[Manager]";

-	mes "Normally I would just kick you out, but...... I would like to see your true capabilities... Hohoho.";

-	mes "As if I would look at my own young self. Hohohoho.";

-	next;

-	mes "[Manager]";

-	mes "What do you think? I will give this one nonrecurring chance. It is the challenge of ^3355ffSecond Grade^000000 which is not officially available......";

-	mes "But I warn you, this one will be difficult.";

-	next;

-	menu "Na, it is enough",L2_1,"I take the challenge",L2_2;

-L2_1:

-	mes "[Manager]";

-	mes "Hoho......";

-	mes "You got tired from the last fight?";

-	mes "Well, ok...... Did you enjoy the Momotaro Event Hall? Talk to the staff member, that you have met first, about our premium presents. She will give you some.";

-	next;

-	mes "[Manager]";

-	mes "Whatever you encounter, never loose that strong spirit!";

-	next;

-	set event_momo,2;

-	goto LWarpOut;

-L2_2:

-	mes "[Manager]";

-	mes "Hohoho, You like it more and more, right? This will be the last decisive battle. Show your power without regrets!";

-	initnpctimer;

-	close;

-OnTimer5000:

-	stopnpctimer;

-	if(!isloggedin($MomotaroRID)){ donpcevent "#MomotaroTimer::OnCleanUp"; end; }

-	attachrid($MomotaroRID);

-	monster "ama_test.gat",35,103,"Am Mut",1301,1,"mobcount2#momotaro::OnMobDead";

-	monster "ama_test.gat",56,111,"Am Mut",1301,1,"mobcount2#momotaro::OnMobDead";

-	monster "ama_test.gat",40,91,"Am Mut",1301,1,"mobcount2#momotaro::OnMobDead";

-	misceffect 16;

-	set event_momo,3;

-	disablenpc "Manager#Momotaro";

-	end;

-LSecondFin:

-	mes "[Manager]";

-	mes "You are really strong... Wasn't it thrilling? Momotaro Event Hall can be really enjoyable, right?";

-	mes "Ok now, talk to the staff member, that you have met first, about our premium presents. She will give you some.";

-	close2;	

-	set event_momo,4;

-LWarpOut:

-	mes "[Manager]";

-	mes "Whatever you encounter, never loose that strong spirit!";

-	close2;

-	set $Momotaro,0;

-	set $MomoDokebi,0;

-	set $MomoDokebi2,0;

-	set $MomotaroRID,0;

-	warp "amatsu.gat",223,230;

-	donpcevent "Event Hall Staff::OnInitCopy";

-	disablenpc "Manager#Momotaro";

-	end;

-OnStart:

-	misceffect 215;

-	if(!isloggedin($MomotaroRID)){ donpcevent "#MomotaroTimer::OnCleanUp"; end; }

-	attachrid($MomotaroRID);

-	mes "[Manager]";

-	mes "Hohoho......";

-	close;

-

-}

-//=======================================MobCount===============================-

-ama_test.gat,0,1,0	script	mobcount#momotaro	-1,{

-OnMobDead:

-	if ($MomoDokebi >= 8){

-		areaannounce "ama_test.gat",30,78,68,120,"Dokebi: I will be baaack~~~~!!!",8;

-		attachrid($MomotaroRID);

-		initnpctimer;

-		end;

-	}

-	set $MomoDokebi,$MomoDokebi+1;

-	set @mobrand,rand(4);

-	if (@mobrand == 1) goto Lrand1;

-	if (@mobrand == 2) goto Lrand2;

-	if (@mobrand == 3) goto Lrand3;

-

-	areaannounce "ama_test.gat",30,78,68,120,"Dokebi: I'm sorry~~! Waaaaah~~",8;

-	end;

-Lrand1:

-	areaannounce "ama_test.gat",30,78,68,120,"Dokebi: !! IT'S A RAID!!!! RUN!!",8;

-	end;

-Lrand2:

-	areaannounce "ama_test.gat",30,78,68,120,"Dokebi: But I didn't even do anything baaaaad~!",8;

-	end;

-Lrand3:

-	areaannounce "ama_test.gat",30,78,68,120,"Dokebi: Ow, Ouch!!!",8;

-	end;

-OnTimer5000:

-	donpcevent "mobcount2#momotaro::OnTimer5000";

-	end;

-}

-//=======================================MobCount2==============================-

-ama_test.gat,50,101,0	script	mobcount2#momotaro	-1,{

-OnMobDead:

-	if ($MomoDokebi2 == 2) goto Lfin;

-	set $MomoDokebi2,$MomoDokebi2+1;

-	areaannounce "ama_test.gat",30,78,68,120,"Am Mut: Ow, Ouch!!!",8;end;

-Lfin:

-	areaannounce "ama_test.gat",30,78,68,120,"Am Mut: I'm sorry~~! Waaaaah~~",8;

-	set event_momo,4;

-	initnpctimer;

-	end;

-OnTimer5000:

-	stopnpctimer;

-	enablenpc "Manager#Momotaro";

-	donpcevent "Manager#Momotaro::OnStart";

-	end;

-

-}

-

-//============================================================

-//====================================================== Sushi

-//====================================================== Quest

-ama_in01.gat,162,17,0	script	Iron Chef	765,{

-	if (ama_sushi == 1) goto LStart2;

-	mes "[ShabuShabu]";

-	mes "*Sighs* This is getting worse..";

-	mes "Everyday more customers come,";

-	mes "but I can never get";

-	mes "enough material, even today.";

-	mes "A lot of customers surely will be hungry?";

-	next;

-	mes "[ShabuShabu]";

-	mes "*Sigh*, a customer. Welcome.";

-	mes "As always, my homemade sashimi";

-	mes "focuses on the freshness. What do you need?";

-	next;

-	menu "I want to buy shrimp sushi",L1,"I want to buy sashimi",L2,"Need some help!",L3,"Keep up the good work",-;

-		mes "[ShabuShabu]";

-		mes "Alright then, my sashimi";

-		mes "are famous throughout the world! Their taste relies on its freshness, and no one else can make them.";

-		mes "If you have a chance, come try a little sashimi!";

-		close;

-	L1:

-		mes "[ShabuShabu]";

-		mes "Alright! How much do you want?";

-		mes "Unit price 700 zeny, but if you only want a taste,";

-		mes "I'll give you a discount of 74 zeny,";

-		mes "If you like the taste come back and find me later.";

-		next;

-		menu "I want the 700 zeny piece!",L1_1,"I want the 74 zeny sample!",L1_2,"I'll come eat next time",-;

-			mes "[ShabuShabu]";

-			mes "Alright then, my shrimp sushi";

-			mes "are famous throughout the world! Their taste relies on its freshness, and no one else can make them.";

-			mes "If you have a chance, come try a little sashimi!";

-			close;

-		L1_1:

-			if (Zeny < 700) goto Lzeny;

-			set Zeny,Zeny-700;

-			getitem 551,10;

-			mes "[If you have a chance, come try a little sashimi!]";

-			mes "Thank you very much";

-			close;

-		L1_2:

-			if (Zeny < 74) goto Lzeny;

-			set Zeny,Zeny-74;

-			getitem 551,1;

-			mes "[If you have a chance, come try a little sashimi!]";

-			mes "Thank you very much";

-			close;

-	L2:

-		mes "[ShabuShabu]";

-		mes "Alright! How much do you want?";

-		mes "Unit price 350 zeny, but if you only want a taste,";

-		mes "I'll just give you a discount of 37 zeny.";

-		mes "If you like the taste come back and find me later";

-		next;

-		menu "I want the 350 zeny piece!",L2_1,"I want the 37 zeny sample",L2_2,"I'll come eat next time",-;

-			mes "[ShabuShabu]";

-			mes "Alright then, my sashimi";

-			mes "are famous throughout the world! Their taste relies on its freshness, and no one else can make them.";

-			mes "[If you have a chance, come try a little sashimi!]";

-			close;

-		L2_1:

-			if (Zeny < 350) goto Lzeny;

-			set Zeny,Zeny-350;

-			getitem 544,10;

-			mes "[ShabuShabu]";

-			mes "Thank you very much";

-			close;

-		L2_2:

-			if (Zeny < 37) goto Lzeny;

-			set Zeny,Zeny-37;

-			getitem 544,1;

-			mes "[ShabuShabu]";

-			mes "Thank you very much";

-			close;

-		Lzeny:

-			mes "[ShabuShabu]";

-			mes "You don't have enough zeny with you";

-			close;

-L3:

-		mes "[ShabuShabu]";

-		mes "Oh, any help is welcomed!!";

-		mes "I was just worrying about not having enough material everyday.";

-		mes "Do you want to hear my request?";

-		mes "Of course I will pay you to help me.";

-		next;

-

-		set ama_sushi,1;

-		mes "[ShabuShabu]";

-		mes "Crab Shell.";

-		mes "They are all out. I need them right now.";

-		mes "So please find ^0000FF10Crab shells^000000.";

-		mes "I can never find it when I need it.";

-		mes "I'll be counting on you.";

-		next;

-		mes "[ShabuShabu]";

-		mes "Then, please hurry! I'll be here";

-		mes "waiting for you, please don't forget my request!";

-		close;

-LStart2:

-	if (countitem(964)>=10) goto Lok;

-	mes "[ShabuShabu]";

-	mes "Man, don't have my materials ready?";

-	mes "Oh no, you didn't forget it did you?";

-	next;

-	mes "[ShabuShabu]";

-	mes "^0000FF10Crab shells^000000";

-	mes "Don't forget again.";

-	mes "You must help me find them!";

-	close;

-Lok:

-	delitem 964,10;

-	getitem 551,20;

-	mes "[ShabuShabu]";

-	mes "Hmm! Thank you so much";

-	next;

-	mes "[ShabuShabu]";

-	mes "Here is my thanks, take it!";

-	set ama_sushi,0;

-	close;

-

-}

-

-//============================================================

-//===================================================== Amatsu

-//====================================================== Event

-amatsu.gat,189,166,4	script	Kouji	764,{

-	mes "[Kuruchi]";

-	mes "Lalala Lalala Lalalalalala..";

-	mes "Lalala Lalala Lalalalalala..";

-	next;

-	if (event_amatsu == 2) goto L1;

-	if ((event_amatsu == 3) || (event_amatsu == 4)) goto L2;

-	if (event_amatsu == 5) goto L3;

-	if (event_amatsu == 6) goto L4;

-L0:

-	mes "[Kuruchi]";

-	mes "Hanging Under the Blue Sky's Blue Roof";

-	mes "Shining on Blue Wall's Reflection on the Blue Lake";

-	mes "Blue Hearting Containing a Blue Desire";

-	mes "Blue, Blue Every thing's Blue";

-	next;

-	goto LEnd;

-L1:

-	mes "[Kuruchi]";

-	mes "Monk, Monk, the fox is following me";

-	mes "Because I have its favourite food";

-	mes "Ramen noodle, my favourite too";

-	mes "I can eat it three times a day";

-	set event_amatsu,3;

-	goto LEnd;

-L2:

-	mes "[Kuruchi]";

-	mes "Monk, Monk, The Fox Is Following Me";

-	mes "Shout At Him To Scare It Off!";

-	mes "Voice Too Small So It Didn't Run Off";

-	mes "Followed All The Way To North Side's Shrine!";

-	set event_amatsu,4;

-	goto LEnd;

-L3:

-	mes "[Kuruchi]";

-	mes "Monk, Monk, The Fox Is Following Me";

-	mes "Ramen noodles My Favorite";

-	mes "But Now I am No Longer Afraid?";

-	mes "I Shouted Loudly To Scare It Off!";

-	goto LEnd;

-L4:

-	mes "[Kuruchi]";

-	mes "The Town's Dock Has An Abandoned Boat!";

-	mes "Everyone Forget That In The Ship";

-	mes "Is Full Of Treasure And Gold";

-	mes "A Boat That Is Feared By Everyone";

-	goto LEnd;

-

-LEnd:

-	next;

-	mes "[Kuruchi]";

-	mes "Lalala Lalala Lalalalalala..";

-	mes "Lalala Lalala Lalalalalala..";

-	close;

-}

-//=====================================================================

-amatsu.gat,171,174,4	script	Guard Soldier#01	767,{

-	if ((event_amatsu == 0) || (event_amatsu == 1)) goto L0;

-	if (event_amatsu == 6) goto L1;

-	if (event_amatsu == 7) goto L2;

-	mes "[Guard Soldier]";

-	mes "This area is where";

-	mes "the Master's mother";

-	mes "Is here for her treatment.";

-	next;

-	mes "[Guard Soldier]";

-	mes "Although it's not much to talk about...";

-	mes "She has been sick here for several months";

-	mes "and started to live here";

-	close;

-L0:

-	mes "[Guard Soldier]";

-	mes "This is where the Master's mother stays at.";

-	mes "Please keep quiet, we are also";

-	mes "very worried watching this everyday";

-	next;

-	mes "[Guard Soldier]";

-	mes "Why does this happen";

-	mes "to our benign and wise Master...";

-	mes "I don't understand, *sobs*...";

-	close;

-L1:

-	mes "[Guard Soldier]";

-	mes "What? Seems like something";

-	mes "flew by...  Didn't you see? Oh...";

-	mes "And I heard a loud noise... Scared the shit out of me";

-	close;

-L2:

-	mes "[Guard Soldier]";

-	mes "Our master should be alright now.";

-	mes "We are also greatly relieved.";

-	mes "You have no idea how worried we were... Phew.";

-	close;

-}

-//=====================================================================

-amatsu.gat,164,174,4	script	Guard Soldier#02	767,{

-	if (event_amatsu == 0) goto LOnce;

-	if ((event_amatsu >= 2) && (event_amatsu <= 5)) goto L2;

-	if (event_amatsu == 6) goto L3;

-	if (event_amatsu == 7) goto L4;

-	mes "[Guard Soldier]";

-	mes "Hopefully she will return healthy soon...";

-	mes "The Master has spent a lot of time";

-	mes "taking care and worrying about her.";

-	close;

-LOnce:

-	mes "[Guard Soldier]";

-	mes "Do not enter here.";

-	mes "This is where the master's mother is";

-	mes "recuperating.";

-	next;

-	mes "[Guard Soldier]";

-	mes "Although it's not much to talk about.";

-	mes "But she has been sick here for several months";

-	mes "and started to live here.";

-	set event_amatsu,1;

-	close;

-L2:

-	mes "[Guard Soldier]";

-	mes "If you are invited by the Master...";

-	mes "Please do come in.";

-	mes "Up till today, many doctors came to diagnose but";

-	mes "all their efforts seem futile.";

-	close;

-L3:

-	mes "[Guard Soldier]";

-	mes" Hey!";

-	mes" What's that sound!?";

-	mes" Where did it come from!?";

-	close;

-L4:

-	mes "[Guard Soldier]";

-	mes "The master's mother still";

-	mes "hasn't fully recovered.. ";

-	mes "Although, it seems to have turned for the better.";

-	mes "But then again..";

-	close;

-}

-

-//=====================================================================

-ama_in01.gat,22,111,0	script	Old Lady#01	761,{

-	if (event_amatsu == 5) goto LStart2;

-	if (event_amatsu == 6) goto LStart3;

-	if (event_amatsu == 7) goto LStart4;

-	mes "[...]";

-	mes "^FF6060Clang Clannng! Clang Clannng!  Stupid humans again!";

-	mes "Clang Clannng, Clang Clannng. Who is it? Is it human!?";

-	mes "What do you need here! Hurry up";

-	mes "Get out... Clang Clannng! Clang Clannng!^000000";

-	next;

-	mes "[...]";

-	mes "^FF6060I have decided to live here till";

-	mes "the Ishida Family line ends!";

-	mes "Stop bothering me and get out! Clang Clannng!^000000";

-	next;

-	warp "amatsu",167,197;

-	end;

-LStart2:

-	mes "[...]";

-	mes "^FF0066Clang Clannng! Clang Clannng! Here comes another one!";

-	mes "Stupid Humans! What do you want now";

-	mes "Throw me out of here!?^000000";

-	next;

-	mes "[...]";

-	mes "^FF0066Seems like you learned something somewhere,";

-	mes "That's about all you can do";

-	mes "You can't do anything to me!! Clang Clannng!^000000";

-	next;

-	menu "HAAAA!!",-;

-	set @which,rand(2);

-	if (@which == 1) goto Lfail;

-	mes "[...]";

-	mes "^FF0066Clang Clannng! Clang Clannng! Clang Clannng! This Bastard!";

-	mes "He threw me out like this!";

-	mes "Sick! Not fair!!^000000";

-	next;

-	mes "[...]";

-	mes "^FF0066That god-damned Ishida that rendered me to this.";

-	mes "I'll curse them forever! FOREVER!";

-	mes "Human, you better be careful too!^000000";

-	next;

-	monster "ama_in01.gat",22,112,"Fox",1180,1;

-	killmonsterall "ama_in01.gat";

-	getitem 1022,1;

-	mes "[...]";

-	mes "^FF0066Everything that Paul Shinaku did";

-	mes "will sooner or later";

-	mes "Bring about my downfall...^000000";

-	mes "^CC3300Clangggggggggggg!!^000000";

-	set event_amatsu,6;

-	close;

-Lfail:

-	mes "[...]";

-	mes "^FF0066Clang Clannng! Haha! Clang Clannng! Hahahaha!";

-	mes "How dare you, wanting to throw me out!";

-	mes "Get out of here!! Clang Clannng!^000000";

-	next;

-	warp "amatsu",167,197;

-	end;

-LStart3:

-	mes "[Ishida Sauk]";

-	mes "...*Sigh* Where from young man...?";

-	mes "Did you get rid of the fox?";

-	mes "Somehow I feel so tired, *sigh*...";

-	next;

-	mes "[Ishida Sauk]";

-	mes "Thank you. Coming from another place";

-	mes "and still has to endure through this.";

-	mes "Very sorry... Sorry...";

-	next;

-	mes "[Ishida Sauk]";

-	mes "I need to find my son.";

-	mes "Tell him that I got rid of the fox...";

-	mes "Thank you.";

-	next;

-	mes "[Ishida Sauk]";

-	mes "Now I am getting very tired.";

-	mes "I need to rest now, young man.....";

-	mes "Go find my son...";

-	close;

-LStart4:

-	mes "[Ishida Sauk]";

-	mes "Oh, You are the you man who";

-	mes "got rid of the fox... welcome.";

-	mes "Sit here a while if you can...";

-	next;

-	mes "[Ishida Sauk]";

-	mes "To be possessed by that fox...";

-	mes "It is all my own fault...";

-	mes "I didn't teach my child properly... *sigh*";

-	mes "He was a good kid when he was small.";

-	mes "It's all because I wasn't strict enough...";

-	next;

-	mes "[Ishida Sauk]";

-	mes "Originally this town was small.";

-	mes "Without a castle of this size either.";

-	mes "But, my son got some zeny somehow";

-	mes "and just start bringing them to me.";

-	mes "Don't know what he did to get this zeny.";

-	mes "And has to hide the truth from even me...";

-	next;

-	mes "[Ishida Sauk]";

-	mes "Then starting building on the castle and town,";

-	mes "and treated the townspeople fairly and nicely...";

-	mes "If that was all, then there will be no problem.";

-	mes "The problem came after he did some strange things...";

-	next;

-	mes "[Ishida Sauk]";

-	mes "Yea, he angered the gods";

-	mes "learning some weird spells somewhere.";

-	mes "And started doing experimenting,";

-	mes "Capturing the monsters,";

-	mes "Doing bad things...";

-	next;

-	mes "[Ishida Sauk]";

-	mes "And now, the monsters";

-	mes "started to live in Amatsu...";

-	mes "The gods became so angry even ";

-	mes "the monks from the shrine";

-	mes "don't know what to do.....";

-	next;

-	mes "[Ishida Sauk]";

-	mes "They punished me as well...";

-	mes "and sent a fox here, ";

-	mes "hoping to give a warning,";

-	mes "but my son didn't stop.";

-	next;

-	mes "[Ishida Sauk]";

-	mes "If possible please stop my son.";

-	mes "I am old and almost dead.";

-	mes "I don't know what to do either...";

-	mes "Please guard this peaceful town.";

-	mes "I don't know what my son is smoking";

-	mes "doing that kind of stuff...";

-	close;

-}

-//=====================================================================

-ama_in02.gat,170,62,4	script	Soldier#02	767,{

-	mes "[Kyro]";

-	mes "My name is Kyro. In this town";

-	mes "I handle all the administrative work.";

-	mes "What type of service do you need?";

-	next;

-	menu "Please give me a pass",-,"I want to live here",L2,"Nothing",L3;

-

-	if (event_amatsu == 7) goto L1_1;

-		mes "[Kyro]";

-		mes "The master said that the guests from the continent";

-		mes "can move about freely,";

-		mes "Without any";

-		mes "permits or passes.";

-		close;

-L1_1:

-	if (countitem(7160) == 0) goto L1_2;

-		mes "[Kyro]";

-		mes "I have already given you a pass.";

-		close;

-L1_2:

-		mes "[Kyro]";

-		mes "Did you lose the pass?";

-		mes "If you want another pass";

-		mes "you need to pay 10,000 zeny for registration fees.";

-		next;

-		menu "Get the pass",L1_2_1,"Maybe next time",-;

-			mes "No problem!";

-			mes "If you need anything please come talk to me again!";

-			close;

-L1_2_1:

-		if (Zeny < 10000) goto LError;

-		set Zeny,Zeny-10000;

-		getitem 7160,1;

-		mes "[Kyro]";

-		mes "Come, this is it.";

-		mes "Please be careful and don't lose it again.";

-		close;

-LError:

-		mes "[Kyro]";

-		mes "You don't have enough zeny!";

-		close;

-L2:

-		mes "[Kyro]";

-		mes "This will be difficult, you can";

-		mes "freely move around, but the master";

-		mes "hasn't considered anything about immigration.";

-		mes "But, you can stay as long as you want";

-		close;

-L3:

-		mes "[Kyro]";

-		mes "Then that's it for now...";

-		mes "If there's anything else just tell me.";

-		close;

-

-}

-

-//=====================================================================

-ama_in02.gat,115,177,7	script	Juro	767,{

-	mes "[Juro]";

-	mes "What are you here for?";

-	mes "There is nothing much over here.";

-	next;

-	menu "Oh, really",-,"Please open the door for me",L2;

-

-		mes "[Juro]";

-		mes "The town has much more stuff.";

-		mes "Have a wonderful time...";

-		close;

-L2:

-	if (event_amatsu != 7) goto Lnoflag;

-	if (countitem(7160) < 1) goto Llost;

-		mes "[Juro]";

-		mes "You already got the pass...";

-		mes "Do you want to go in directly? Or";

-		mes "Do you want me to explain first...?";

-		next;

-		menu "Direct access",-,"Listen to explanation",L2_2;

-

-			mes "[Juro]";

-			mes "Then, I will open the door for you.";

-			mes "Please take care...";

-			next;

-			warp "ama_dun01.gat",229,10;

-			end;

-L2_2:

-			mes "[Juro]";

-			mes "The inner space seems to be ";

-			mes "protected by special spells.";

-			mes "Those who wander in carelessly,";

-			mes "become lost and will be assaulted";

-			mes "mysteriously and die.";

-			next;

-			mes "[Juro]";

-			mes "What I can tell you";

-			mes "isn't all that much.";

-			mes "I have not been inside.";

-			mes "It's a mysterious place, its only proof is";

-			mes "of existence is from the";

-			mes "survivors that ventured inside";

-			next;

-			mes "[Juro]";

-			mes "First of all.....";

-			mes "'Don't believe in what you see.'";

-			next;

-			mes "[Juro]";

-			mes "Second of all.....";

-			mes "About the spells, they have their own rules.";

-			mes "Everything has its own purpose,";

-			mes "including the spells.";

-			mes "Will you find some";

-			mes "answers?";

-			next;

-			mes "[Juro]";

-			mes "Then, I'll open the door for you.";

-			mes "Please be careful...";

-			next;

-			warp "ama_dun01.gat",229,10;

-			end;

-Llost:

-		mes "[Juro]";

-		mes "You don't have the pass";

-		mes "so I cannot open the gate for you.";

-		mes "Please understand.";

-		close;

-Lnoflag:

-		mes "[Juro]";

-		mes "What door are you talking about?";

-		mes "In a place like this there won't";

-		mes "be any doors as far as I know.";

-		mes "You might have been mistaken.";

-		next;

-		mes "[Juro]";

-		mes "There are more to see in town.";

-		mes "I hope you have a good time...";

-		close;

-}

-ama_dun01.gat,229,7,0	script	Soldier#08	767,{

-	mes "[Juro]";

-	mes "Ready to leave?";

-	next;

-	menu "Leave",-,"Wait a little more",L1;

-		mes "[Juro]";

-		mes "Gogo!!";

-		next;

-		warp "ama_in02.gat",119,181;

-		end;

-L1:

-		mes "[Juro]";

-		mes "Take care of yourself!";

-		close;

-}

-

-//=====================================================================

-ama_in02.gat,200,176,4	script	Castle Owner	768,{

-	if (event_amatsu == 1) goto LStart2;

-	if ((event_amatsu >= 2) && (event_amatsu <=5)) goto LStart3;

-	if (event_amatsu == 6) goto LStart4;

-	if (event_amatsu == 7) goto LStart5;

-	mes "[Ishida Yoshinake]";

-	mes "What! An outsider?";

-	mes "What do you need me for?? If it's nothing important";

-	mes "Talk to you later...!";

-	next;

-	mes "[Ishida Yoshinake]";

-	mes "Please leave! No matter who you are!!";

-	mes "Right now I am in a VERY bad mood!";

-	close;

-LStart2:

-	mes "[Ishida Yoshinaku]";

-	mes "What! A visitor...? Oh, sorry";

-	mes "But today I am not in the mood";

-	mes "of seeing a visitor!";

-	next;

-	menu "I heard your mother is sick...",L1,"What a beautiful castle",L2,"Who are you?",L3;

-L1:

-	mes "[Ishida Yoshinaku]";

-	mes "Oh... You are an expert pathologist?";

-	mes "Oh yea, if you are a foreign expert";

-	mes "I should be able to trust you...";

-	mes "I guess...";

-	next;

-	mes "[Ishida Yoshinaku]";

-	mes "Welcome, as you know";

-	mes "I am the owner of the East Lake Castle";

-	mes "My name is Ishida Yoshinaku,";

-	mes "Nice to meet you.";

-	next;

-	mes "[Ishida Yoshinaku]";

-	mes "To put it simple: my mother";

-	mes "is not very healthy,";

-	mes "of course you are here because of it";

-	mes "Can you cure my ailing mother??";

-	next;

-	mes "[Ishida Yoshinaku]";

-	mes "So many famous and talented";

-	mes "Doctors has visited her already,";

-	mes "But not only did they not cure her!!";

-	mes "They worsened her condition!!";

-	mes "so I kept feeling disappointed";

-	next;

-	mes "[Ishida Yoshinaku]";

-	mes "You, being a foreign expert,";

-	mes "may cure my mother's sickness!";

-	mes "if you do, I will give you lots of zeny and rewards...";

-	next;

-	mes "[Ishida Yoshinaku]";

-	mes "Please help her,";

-	mes "my mother lives in the mansion outside of the castle,";

-	mes "After you cure her";

-	mes "Come see me again";

-	set event_amatsu,2;

-	close;

-L2:

-	mes "[Ishida Yoshinaku]";

-	mes "Yes! Beautiful indeed! So what";

-	mes "Do you want to do! Leave when you get";

-	mes "bored of it! Man!";

-	next;

-	mes "[Ishida Yoshinaku]";

-	mes "At a pressing time like this... *Sobs*...";

-	mes "Leave when you become satisfied or bored!";

-	close;

-L3:

-	mes "[Ishida Yoshinaku]";

-	mes "...Talking about me? You don't know? Eh?";

-	mes "I am this castle's master!";

-	mes "Go ask around the soldiers outside";

-	mes "If you are not sure!";

-	next;

-	mes "[if you are not sure]";

-	mes "At a pressing time like this... *Sobs*...";

-	mes "Leave when you become satisfied or bored!";

-	close;

-LStart3:

-	mes "[Ishida Yushinaku]";

-	mes "How is my mother?";

-	mes "If you know the name of the sickness....";

-	mes "Please tell me immediately...";

-	mes "Argh... So worried!";

-	mes "I can't sleep at night any longer!";

-	next;

-	mes "[Ishida Yushinaku]";

-	mes "You are from the other continents,";

-	mes "so you must know....";

-	mes "now you are the only one I can trust";

-	close;

-LStart4:

-	mes "[Ishida Yushinaku]";

-	mes "WoW, you are great, I heard";

-	mes "My mother is getting better already,";

-	mes "Anyway, what sickness was it?";

-	next;

-	mes "[Ishida Yushinaku]";

-	mes "Fox? The fox is the reason? ho...";

-	mes "So it's not a sickness after all...!!";

-	mes "Why didn't I think of it earlier!!!";

-	next;

-	mes "[Ishida Yushinaku]";

-	mes "Damn fox, after it ran away,";

-	mes "it tried to revenge like this...";

-	mes "But now there is no other";

-	mes "Way... hahaha! Hahahaha!";

-	next;

-	mes "[Ishida Yushinaku]";

-	mes "Um, hmm, umm...";

-	next;

-	mes "[Ishida Yushinaku]";

-	mes "Anyway, Thanks for your help!";

-	mes "I think my mother will return to normal now...";

-	mes "I want to show you my gratitude...";

-	mes "What to do...";

-	next;

-	mes "[Ishida Yushinaku]";

-	mes "Alright, I will give you this pass.";

-	mes "As long as you have this pass,";

-	mes "you can get into ANYWHERE";

-	mes "In this town";

-	next;

-	set event_amatsu,7;

-	getitem 7160,1;

-	mes "[Ishida Yushinaku]";

-	mes "Although it's not such a great gift, but";

-	mes "I believe you will have use for it someday...";

-	mes "talk to 'Juro' For the details";

-	close;

-LStart5:

-	mes "[Ishida Yushinaku]";

-	mes "Hey... I hope you have a";

-	mes "good time in Amatsu.....";

-	mes "We always welcome the foreigners!";

-	close;

-}

-

-ama_in01.gat,180,173,2	script	Fox Mask	762,{

-	if (event_amatsu == 4) goto LStart2;

-	if (event_amatsu == 5) goto LStart3;

-	mes "[Takikuwi]";

-	mes "Hiya, outsider, this";

-	mes "Shrine is left by a monk a long time ago.";

-	mes "Sometimes I come here to play";

-	mes "along with my friend Tokari";

-	next;

-	mes "[Takikuwi]";

-	mes "If you are here to hide from the monsters,";

-	mes "please do come in, no monsters";

-	mes "can ever come in here!";

-	mes "You can always take a short rest in here!";

-	close;

-LStart2:

-	mes "[Takikuwi]";

-	mes "Hiya, outsider, here to find me?";

-	mes "Because of the fox bothering you?";

-	mes "From your expression You seem to";

-	mes "have had quite a bit of trouble";

-	next;

-	mes "[Takikuwi]";

-	mes "Although usually the head monk";

-	mes "should come to help himself, this shrine";

-	mes "Has been deserted for a long time";

-	next;

-	mes "[Takikuwi]";

-	mes "It is very hard to get rid of a fox in a person's body";

-	mes "If there's alcohol and ramen noodle,";

-	mes "It might be a little easier,";

-	mes "But they are hard to find!";

-	next;

-	mes "[Takikuwi]";

-	mes "Good thing I know quite a bit";

-	mes "about the fox, I'll tell you";

-	mes "some words of advice, although foxes";

-	mes "are very tricky, and although they like to";

-	mes "make fun of humans... but it is seldom";

-	mes "for a fox to display hatred!";

-	next;

-	mes "[Takikuwi]";

-	mes "In another word, if there is hatred";

-	mes "human also did something wrong!!";

-	mes "Which will hurt self,";

-	mes "And sometimes unlucky things happen";

-	mes "and to friend and family as well!";

-	next;

-	mes "[Takikuwi]";

-	mes "Anyway, I've heard that when";

-	mes "there's a strong animal then a fox will chased,";

-	mes "away from the human.";

-	mes "So try hard, and try summoning the animal spirit!";

-	next;

-	menu "Haaaa!!",-;

-	mes "[Takikuwi]";

-	mes "Very good, just repeating it will";

-	mes "show the fox a strong spirit,";

-	mes "and show results, but the best thing is";

-	mes "to find out why the fox will enter the";

-	mes "person's body, but if you do this";

-	mes "it should help, more or less";

-	set event_amatsu,5;

-	close;

-LStart3:

-	mes "[Takikuwi]";

-	mes "Don't forget, when you try summoning";

-	mes "you must think about!";

-	mes "A monster that is stronger than a fox";

-	mes "or it would just be a futile effort!";

-	mes "Remember....... Stronger than a fox....";

-	close;

-}

+//===== eAthena Script ======================================= 
+//= Quest NPCs related to Amatsu
+//===== By: ================================================== 
+//= eAthena team & others? & MasterOfMuppets
+//===== Current Version: ===================================== 
+//= 1.2
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//= Momotaro event, Sushi Quest, Amatsu Event
+//===== Additional Comments: ================================= 
+//= 1.0 Rewrote parts of other/momotaro.txt to make it work.
+//=	I'm sorry for the mess, I couldn't do much better with
+//=	the current code I had.
+//= 1.1 Added Sushi Quest and Amatsu Event from cities/ [Evera]
+//= 1.2 Fixed Momotaro Quest, thanks to .~Abism0~. [Lupus]
+//============================================================ 
+
+amatsu.gat,223,235,4	script	Publisher	763,{
+	if (event_momo > 4) goto Lfin;
+	if ((event_momo >= 1) && (event_momo <= 4)) goto Lget;
+	mes "[Publisher]";
+	mes "Hello~~!!";
+	mes "Our ^00B6FFScroll Publishing Company^000000";
+	mes "is professionally publishing";
+	mes "tales.";
+	next;
+	mes "[Publisher]";
+	mes "We established";
+	mes "^3366FFMomotaro Field Trip^000000";
+	mes "to celebrate ^00B6FF<Momotaro Story>^000000";
+	mes "selling over a million copies.";
+	next;
+	mes "[Publisher]";
+	mes "Become Momotaro and eliminate";
+	mes "Dokebis, just like in the story!";
+	mes "There will also be rewards.";
+	next;
+	menu "What is Momotaro Story?!",-,"I want to try!",L1,"I'm busy right now...",L2;
+		mes "[Publisher]";
+		mes "Eh~!? How can you not know about";
+		mes "Momotaro? Don't they have this";
+		mes "tale in Rune-Midgard?? Well...";
+		mes "Let me tell you the story.";
+		next;
+		mes "[Publisher]";
+		mes "Long ago, there lived an old";
+		mes "married couple. They were happy,";
+		mes "but didn't have any children.";
+		next;
+		mes "[Publisher]";
+		mes "One day, while old lady was doing";
+		mes "the laundry, she found a humongous";
+		mes "peach. She cut it in half and...";
+		mes "'Poof!' There was a baby inside!";
+		next;
+		mes "[Publisher]";
+		mes "The old man and lady were shocked.";
+		mes "They decided to adopt that baby,";
+		mes "and give him their love...";
+		next;
+		mes "[Publisher]";
+		mes "That baby grew so fast, like that";
+		mes "beanstalk from 'Jack and";
+		mes "Beanstalk' and became a strong boy";
+		mes "in only a few days.";
+		next;
+		mes "[Publisher]";
+		mes "That's boy's name was...";
+		mes "<Momotaro>!!!";
+		mes "Momotaro traveled to eliminate";
+		mes "dokebis that were harassing";
+		mes "the towners.";
+		next;
+		mes "[Publisher]";
+		mes "He became friends with";
+		mes "^3151FFYoyo, Picky, and Desert Wolf^000000";
+		mes "and eliminated all of the Dokebis.";
+		mes "then he lived happily ever after";
+		mes "with the old couple.";
+		next;
+		mes "[Publisher]";
+		mes "How was it?";
+		mes "Great, right?";
+		mes "I mean, this story sold a million";
+		mes "copies!";
+		close;
+L1:
+		mes "[Publisher]";
+		mes "Yay-! You look excited!";
+		mes "You'll be ready to go soon.";
+		mes "Please fill out this registration";
+		mes "card.";
+		next;
+		mes "[Publisher]";
+		mes ".................";
+		mes "......Mm.....Let's see.....";
+		mes ".............Good!";
+		mes "Alright, then!";
+		mes "Let it begin~~~!!!!!!!!!";
+		mes "<Momotaro Field Trip>~!";
+		close2;
+		warp "ama_test",52,35;
+		end;
+L2:
+		mes "[Publisher]";
+		mes "Eh?";
+		mes "...But there are sweet rewards";
+		mes "waiting...";
+		close;
+Lget:
+	mes "[Publisher]";
+	mes "How was it? Did you enjoy the event?";
+	mes "I hope the arrangements at the event hall allowed you to spend an enjoyable time there.";
+	next;
+	if (event_momo > 1 && event_momo < 4)
+	{
+	switch(rand(1,24))
+		{
+
+	case 1:
+		getitem 627,1; //sweet milk
+	break;
+
+	case 2:
+		getitem 629,1; //singing flower
+	break;
+
+	case 3:
+		getitem 625,1; //rusty iron
+	break;
+
+	case 4:
+		getitem 619,1; //unripe apple
+	break;
+
+	case 5:
+		getitem 620,1; //orange juice
+	break;
+
+	case 6:
+		getitem 621,1; //bitter herb
+	break;
+
+	case 7:
+		getitem 622,1; //rainbow carrot
+	break;
+
+	case 8:
+		getitem 623,1; //earthworm the dude
+	break;
+
+	case 9:
+		getitem 624,1; //rotten fish
+	break;
+
+	case 10:
+		getitem 626,1; //monster juice
+	break;
+
+	case 11:
+		getitem 628,1; //well-dried bone
+	break;
+
+	case 12:
+		getitem 630,1; //dew laden moss
+	break;
+
+	case 13:
+		getitem 631,1; //deadly noxious herb
+	break;
+
+	case 14:
+		getitem 632,1; //fatty chubby earthworm
+	break;
+
+	case 15:
+		getitem 633,1; //sweet potato
+	break;
+
+	case 16:
+		getitem 634,1; //tropical banana
+	break;
+
+	case 17:
+		getitem 635,1; //orc trophy
+	break;
+
+	case 18:
+		getitem 636,1; //no recipient
+	break;
+
+	case 19:
+		getitem 637,1; //old broom
+	break;
+
+	case 20:
+		getitem 638,1; //silver knife of chastity
+	break;
+
+	case 21:
+		getitem 639,1; //armlet of obedience
+	break;
+
+	case 22:
+		getitem 640,1; //shining stone
+	break;
+
+	case 23:
+		getitem 641,1; //contract in shadow
+	break;
+
+	case 24:
+		getitem 642,1; //book of the devil
+	break;
+
+		}
+	}
+//Am Mut successful finish unknown
+	if (event_momo == 4)
+	{
+	while(@i != 3)
+	{
+	switch(rand(1,24))
+		{
+
+	case 1:
+		getitem 627,1; //sweet milk
+	break;
+
+	case 2:
+		getitem 629,1; //singing flower
+	break;
+
+	case 3:
+		getitem 625,1; //rusty iron
+	break;
+
+	case 4:
+		getitem 619,1; //unripe apple
+	break;
+
+	case 5:
+		getitem 620,1; //orange juice
+	break;
+
+	case 6:
+		getitem 621,1; //bitter herb
+	break;
+
+	case 7:
+		getitem 622,1; //rainbow carrot
+	break;
+
+	case 8:
+		getitem 623,1; //earthworm the dude
+	break;
+
+	case 9:
+		getitem 624,1; //rotten fish
+	break;
+
+	case 10:
+		getitem 626,1; //monster juice
+	break;
+
+	case 11:
+		getitem 628,1; //well-dried bone
+	break;
+
+	case 12:
+		getitem 630,1; //dew laden moss
+	break;
+
+	case 13:
+		getitem 631,1; //deadly noxious herb
+	break;
+
+	case 14:
+		getitem 632,1; //fatty chubby earthworm
+	break;
+
+	case 15:
+		getitem 633,1; //sweet potato
+	break;
+
+	case 16:
+		getitem 634,1; //tropical banana
+	break;
+
+	case 17:
+		getitem 635,1; //orc trophy
+	break;
+
+	case 18:
+		getitem 636,1; //no recipient
+	break;
+
+	case 19:
+		getitem 637,1; //old broom
+	break;
+
+	case 20:
+		getitem 638,1; //silver knife of chastity
+	break;
+
+	case 21:
+		getitem 639,1; //armlet of obedience
+	break;
+
+	case 22:
+		getitem 640,1; //shining stone
+	break;
+
+	case 23:
+		getitem 641,1; //contract in shadow
+	break;
+
+	case 24:
+		getitem 642,1; //book of the devil
+	break;
+
+		}
+	set @i,@i+1;
+	}
+	}
+	set event_momo,5;
+	mes "[Publisher]";
+	mes "Well then, I will give you a small present which I have prepared.";
+	mes "May the legend be widely loved also in the future......";
+	close;
+Lfin:
+	mes "[Publisher]";
+	mes "We have a nice weather today, don't we...... It is a perfect day to dry the futon.";
+	close;
+}
+//=====================================================================
+ama_test.gat,50,44,4	script	Event Hall Staff	109,{
+	mes "[Satoshi]";
+	mes "Welcome to <Momotaro Field Trip>";
+	next;
+	mes "[Satoshi]";
+	mes "I'm Satoshi who is in charge of the";
+	mes "waiting room in <Momotaro Field";
+	mes "Trip>.";
+	next;
+	mes "[Satoshi]";
+	mes "Originally, I was working for the";
+	mes "publishing company, but we lacked";
+	mes "workers for the Field Trip...";
+	mes "But working here is much better!";
+	mes "Now I just watch people trying to";
+	mes "accomplish the mission. Heh hehe~";
+	next;
+	mes "[Satoshi]";
+	mes "..............";
+	mes "Just kidding";
+	mes "^111111*Wipes away sweat*^000000";
+	next;
+	mes "[Satoshi]";
+	mes "Well, let me explain";
+	mes "about the rules in the Field Trip";
+	next;
+	mes "[Satoshi]";
+	mes "First of all...Did you hear";
+	mes "about the story from the";
+	mes "publisher?";
+	next;
+	menu "Yes",L1,"No",-;
+		mes "[Satoshi]";
+		mes "Eh? You can't just";
+		mes "skip the story";
+		mes "when you enter the field";
+		mes "trip! I can't allow you to";
+		mes "do that as a Momotaro's";
+		mes "fan!!!";
+		next;
+		mes "[Satoshi]";
+		mes "Please listen to the story";
+		mes "from the publisher.";
+		mes "Thank you.";
+		mes "Bye~~";
+		close2;
+		warp "amatsu.gat",223,230;
+		end;
+L1:
+		mes "[Satoshi]";
+		mes "Hehe...Good.";
+		mes "Momotoro's Story is our";
+		mes "pride. It's the best story EVER.";
+		mes "Hahaha!!!";
+		next;
+		mes "[Satoshi]";
+		mes "...Hmmhmm.";
+		next;
+		mes "[Satoshi]";
+		mes "The Field Trip is simple.";
+		mes "Go inside and eliminate";
+		mes "Dokebis bravely!!!";
+		mes "Just like Momotaro!!!";
+		mes "Understand? Bravely!!!";
+		next;
+		mes "[Satoshi]";
+		mes "In addition, there are three";
+		mes "things you need to know.";
+		next;
+		mes "[Satoshi]";
+		mes "First....";
+		mes "You can't come back once you clear";
+		mes "the field trip. Keep that in mind.";
+		next;
+		mes "[Satoshi]";
+		mes "Secondly...";
+		mes "Q-pet is prohibited";
+		mes "inside of the field trip.";
+		mes "if you are with a pet,";
+		mes "please change it to egg status.";
+		next;
+		mes "[Satoshi]";
+		mes "And finally...";
+		mes "One person can be on the";
+		mes "field trip for 6 minutes.";
+		next;
+		mes "[Satoshi]";
+		mes "Well then, Please";
+		mes "wait for you turn";
+		mes "in the waitiSng room.";
+		mes "Good luck in fighting!!";
+		close;
+OnInit:
+	waitingroom "Event Hall Waiting Room",1,"Event Hall Staff::OnMax";
+OnInitCopy:
+	enablewaitingroomevent "Event Hall Staff";
+	areawarp "ama_test.gat",30,78,68,120,"amatsu.gat",223,230;
+	disablenpc "Manager#Momotaro";
+	enablenpc "Grandpa#Momotaro";
+	enablenpc "Grandma#Momotaro";
+	donpcevent "#MomotaroTimer::OnStopTimer";
+	killmonsterall "ama_test.gat";
+	end;
+OnMax:
+	warpwaitingpc "ama_test.gat",51,85;
+	disablewaitingroomevent "Event Hall Staff";
+	disablenpc "Manager#Momotaro";
+	enablenpc "Grandpa#Momotaro";
+	enablenpc "Grandma#Momotaro";
+	donpcevent "#MomotaroActivator::OnMomoInit";
+	end;
+}
+
+ama_test.gat,1,1,0	script	#MomotaroTimer	-1,{
+OnStartTimer:
+	initnpctimer;
+	end;
+OnTimer180000:
+	if(!isloggedin($MomotaroRID))goto s_Cleanup;
+	mapannounce "ama_test.gat","Timer: 3 Minutes left.",8;
+	end;
+OnTimer300000:
+	if(!isloggedin($MomotaroRID))goto s_Cleanup;
+	mapannounce "ama_test.gat","Timer: 1 Minute left.",8;
+	end;
+OnTimer360000:
+	if(!isloggedin($MomotaroRID))goto s_Cleanup;
+	mapannounce "ama_test.gat","Timer: Beep- Beep- Beep- Time's up.",8;
+OnTimer362500:
+	areawarp "ama_test.gat",30,78,68,120,"amatsu.gat",223,230;
+	goto s_Cleanup;
+
+
+OnTimer20000:
+OnTimer40000:
+OnTimer60000:
+OnTimer80000:
+OnTimer100000:
+OnTimer120000:
+OnTimer140000:
+OnTimer160000:
+OnTimer200000:
+OnTimer220000:
+OnTimer240000:
+OnTimer260000:
+OnTimer280000:
+OnTimer320000:
+OnTimer340000:
+	if(!isloggedin($MomotaroRID))goto s_Cleanup;
+	end;
+
+OnCleanUp:
+s_Cleanup:
+	stopnpctimer;
+	set $Momotaro,0;
+	set $MomoDokebi,0;
+	set $MomoDokebi2,0;
+	set $MomotaroRID,0;
+	mapannounce "ama_test.gat","The current player has exited. The waiting room will now open again.",8;
+	disablenpc "Manager#Momotaro";
+	donpcevent "Event Hall Staff::OnInitCopy";
+	end;
+
+OnStopTimer:
+	stopnpctimer;
+	end;
+
+}
+
+ama_test.gat,51,85,0	script	#MomotaroActivator	139,1,1,{
+	if($Momotaro)end;
+	set $Momotaro,1;
+	set $MomotaroRID,getcharid(3);
+	areaannounce "ama_test.gat",30,78,68,120,"Timer: The Timer has been activated. You have 6 minutes. Annihilate the monsters in time!",8;
+	donpcevent "#MomotaroTimer::OnStartTimer";
+	mes "[Grandpa]";
+	mes "Arrrk!!!";
+	next;
+	mes "[Grandma]";
+	mes "Honey!! Someone hacked my account";
+	mes "and stole my equipment!!";
+	next;
+	mes "[Grandpa]";
+	mes "Hmm. The Chief said the Dokebi";
+	mes "earned 20 million zeny by hacking";
+	mes "other's accounts...";
+	next;
+	mes "[Grandma]";
+	mes "Dohhhhhhh!!!!";
+	next;
+	mes "[Grandpa]";
+	mes "...Huh I've heard that somewhere";
+	mes "before....";
+	next;
+	mes "[Grandpa]";
+	mes "Anyway, Momotaro...";
+	next;
+	mes "[Grandpa]";
+	mes "As you know, since we towners spends";
+	mes "our time sitting and chatting,";
+	mes "we can't kill Dokebis because we're";
+	mes "low levels, so...Please do it for";
+	mes "us.";
+	next;
+	mes "[Grandma]";
+	mes "Momotaro...";
+	mes "I really wanted to give you";
+	mes "a handmade ^3151FFYummiest Red Poiton in";
+	mes "the whole world^000000 ...but...";
+	mes ".....I failed to make them ....";
+	next;
+	mes "[Grandma]";
+	mes "...I'm sorry. I should have been";
+	mes "leveling up before...^111111*Sob*";
+	next;
+	mes "[Grandma & Grandpa]";
+	mes "So...Do me this favor, kid~";
+	close2;
+	initnpctimer;
+	end;
+
+OnTimer5000:
+	stopnpctimer;
+	set $MomoDokebi,0;
+	set $MomoDokebi2,0;
+	disablenpc "Grandpa#Momotaro";
+	disablenpc "Grandma#Momotaro";
+	monster "ama_test.gat",47,101,"Dokebi",1110,1,"mobcount#momotaro::OnMobDead";
+	monster "ama_test.gat",51,101,"Dokebi",1110,1,"mobcount#momotaro::OnMobDead";
+	monster "ama_test.gat",55,101,"Dokebi",1110,1,"mobcount#momotaro::OnMobDead";
+	monster "ama_test.gat",55,97,"Dokebi",1110,1,"mobcount#momotaro::OnMobDead";
+	monster "ama_test.gat",55,93,"Dokebi",1110,1,"mobcount#momotaro::OnMobDead";
+	monster "ama_test.gat",53,91,"Dokebi",1110,1,"mobcount#momotaro::OnMobDead";
+	monster "ama_test.gat",49,91,"Dokebi",1110,1,"mobcount#momotaro::OnMobDead";
+	monster "ama_test.gat",45,96,"Dokebi",1110,1,"mobcount#momotaro::OnMobDead";
+	monster "ama_test.gat",45,99,"Dokebi",1110,1,"mobcount#momotaro::OnMobDead";
+	end;
+
+OnInit:
+	set $Momotaro,0;
+	set $MomoDokebi,0;
+	set $MomoDokebi2,0;
+	set $MomotaroRID,0;
+	end;
+
+}
+
+ama_test.gat,49,95,4	script	Grandpa#Momotaro	766,{
+
+	mes "[Grandpa]";
+	mes "Zzzzzz......";
+	close;
+}
+
+ama_test.gat,51,95,4	script	Grandma#Momotaro	761,{
+
+	mes "[Grandma]";
+	mes "Oh....!?";
+	close;
+
+}
+
+ama_test.gat,50,100,4	script	Manager#Momotaro	762,{
+
+	if (event_momo >= 4) goto LSecondFin;
+	mes "[Manager]";
+	mes "Hoho, you did it...... I'm the manager here...... You are not an ordinary person, right? You did very well.";
+	next;
+	mes "[Manager]";
+	mes "The Momotaro from the legend appears in this world!";
+	mes "Hohohohoho!";
+	next;
+	menu "Is there some extra?",L1,"Thanks for nothing......",L2;
+L1:
+	mes "[Manager]";
+	mes "Hohoho......";
+	mes "This is maybe not really recomending......";
+	mes "I think in your current condition the small demons can twirl you lightly around their fingers.";
+	mes "......Hohoho......";
+	next;
+	mes "[Manager]";
+	mes "......";
+	mes "Just a joke.";
+	next;
+	mes "[Manager]";
+	mes "Well then, you enjoyed the Momotaro Event Hall?";
+	mes "Talk to the staff member, that you have met first, about our premium presents. He will give you some.";
+	next;
+	mes "[Manager]";
+	mes "Whatever you encounter, never loose that strong spirit!";
+	close2;
+	set $Momotaro,0;
+	set $MomoDokebi,0;
+	set $MomoDokebi2,0;
+	set $MomotaroRID,0;
+	set event_momo,1;
+	donpcevent "Event Hall Staff::OnInitCopy";
+	warp "amatsu.gat",223,230;
+	disablenpc "Manager#Momotaro";
+	end;
+L2:
+	mes "[Manager]";
+	mes "!!!!!";
+	mes "......Ho...Hohoho......";
+	mes "You are an amusing fellow......";
+	mes "Well...... One little suggestion from me to you.";
+	next;
+	mes "[Manager]";
+	mes "Normally I would just kick you out, but...... I would like to see your true capabilities... Hohoho.";
+	mes "As if I would look at my own young self. Hohohoho.";
+	next;
+	mes "[Manager]";
+	mes "What do you think? I will give this one nonrecurring chance. It is the challenge of ^3355ffSecond Grade^000000 which is not officially available......";
+	mes "But I warn you, this one will be difficult.";
+	next;
+	menu "Na, it is enough",L2_1,"I take the challenge",L2_2;
+L2_1:
+	mes "[Manager]";
+	mes "Hoho......";
+	mes "You got tired from the last fight?";
+	mes "Well, ok...... Did you enjoy the Momotaro Event Hall? Talk to the staff member, that you have met first, about our premium presents. She will give you some.";
+	next;
+	mes "[Manager]";
+	mes "Whatever you encounter, never loose that strong spirit!";
+	next;
+	set event_momo,2;
+	goto LWarpOut;
+L2_2:
+	mes "[Manager]";
+	mes "Hohoho, You like it more and more, right? This will be the last decisive battle. Show your power without regrets!";
+	initnpctimer;
+	close;
+OnTimer5000:
+	stopnpctimer;
+	if(!isloggedin($MomotaroRID)){ donpcevent "#MomotaroTimer::OnCleanUp"; end; }
+	attachrid($MomotaroRID);
+	monster "ama_test.gat",35,103,"Am Mut",1301,1,"mobcount2#momotaro::OnMobDead";
+	monster "ama_test.gat",56,111,"Am Mut",1301,1,"mobcount2#momotaro::OnMobDead";
+	monster "ama_test.gat",40,91,"Am Mut",1301,1,"mobcount2#momotaro::OnMobDead";
+	misceffect 16;
+	set event_momo,3;
+	disablenpc "Manager#Momotaro";
+	end;
+LSecondFin:
+	mes "[Manager]";
+	mes "You are really strong... Wasn't it thrilling? Momotaro Event Hall can be really enjoyable, right?";
+	mes "Ok now, talk to the staff member, that you have met first, about our premium presents. She will give you some.";
+	close2;	
+	set event_momo,4;
+LWarpOut:
+	mes "[Manager]";
+	mes "Whatever you encounter, never loose that strong spirit!";
+	close2;
+	set $Momotaro,0;
+	set $MomoDokebi,0;
+	set $MomoDokebi2,0;
+	set $MomotaroRID,0;
+	warp "amatsu.gat",223,230;
+	donpcevent "Event Hall Staff::OnInitCopy";
+	disablenpc "Manager#Momotaro";
+	end;
+OnStart:
+	misceffect 215;
+	if(!isloggedin($MomotaroRID)){ donpcevent "#MomotaroTimer::OnCleanUp"; end; }
+	attachrid($MomotaroRID);
+	mes "[Manager]";
+	mes "Hohoho......";
+	close;
+
+}
+//=======================================MobCount===============================-
+ama_test.gat,0,1,0	script	mobcount#momotaro	-1,{
+OnMobDead:
+	if ($MomoDokebi >= 8){
+		areaannounce "ama_test.gat",30,78,68,120,"Dokebi: I will be baaack~~~~!!!",8;
+		attachrid($MomotaroRID);
+		initnpctimer;
+		end;
+	}
+	set $MomoDokebi,$MomoDokebi+1;
+	set @mobrand,rand(4);
+	if (@mobrand == 1) goto Lrand1;
+	if (@mobrand == 2) goto Lrand2;
+	if (@mobrand == 3) goto Lrand3;
+
+	areaannounce "ama_test.gat",30,78,68,120,"Dokebi: I'm sorry~~! Waaaaah~~",8;
+	end;
+Lrand1:
+	areaannounce "ama_test.gat",30,78,68,120,"Dokebi: !! IT'S A RAID!!!! RUN!!",8;
+	end;
+Lrand2:
+	areaannounce "ama_test.gat",30,78,68,120,"Dokebi: But I didn't even do anything baaaaad~!",8;
+	end;
+Lrand3:
+	areaannounce "ama_test.gat",30,78,68,120,"Dokebi: Ow, Ouch!!!",8;
+	end;
+OnTimer5000:
+	donpcevent "mobcount2#momotaro::OnTimer5000";
+	end;
+}
+//=======================================MobCount2==============================-
+ama_test.gat,50,101,0	script	mobcount2#momotaro	-1,{
+OnMobDead:
+	if ($MomoDokebi2 == 2) goto Lfin;
+	set $MomoDokebi2,$MomoDokebi2+1;
+	areaannounce "ama_test.gat",30,78,68,120,"Am Mut: Ow, Ouch!!!",8;end;
+Lfin:
+	areaannounce "ama_test.gat",30,78,68,120,"Am Mut: I'm sorry~~! Waaaaah~~",8;
+	set event_momo,4;
+	initnpctimer;
+	end;
+OnTimer5000:
+	stopnpctimer;
+	enablenpc "Manager#Momotaro";
+	donpcevent "Manager#Momotaro::OnStart";
+	end;
+
+}
+
+//============================================================
+//====================================================== Sushi
+//====================================================== Quest
+ama_in01.gat,162,17,0	script	Iron Chef	765,{
+	if (ama_sushi == 1) goto LStart2;
+	mes "[ShabuShabu]";
+	mes "*Sighs* This is getting worse..";
+	mes "Everyday more customers come,";
+	mes "but I can never get";
+	mes "enough material, even today.";
+	mes "A lot of customers surely will be hungry?";
+	next;
+	mes "[ShabuShabu]";
+	mes "*Sigh*, a customer. Welcome.";
+	mes "As always, my homemade sashimi";
+	mes "focuses on the freshness. What do you need?";
+	next;
+	menu "I want to buy shrimp sushi",L1,"I want to buy sashimi",L2,"Need some help!",L3,"Keep up the good work",-;
+		mes "[ShabuShabu]";
+		mes "Alright then, my sashimi";
+		mes "are famous throughout the world! Their taste relies on its freshness, and no one else can make them.";
+		mes "If you have a chance, come try a little sashimi!";
+		close;
+	L1:
+		mes "[ShabuShabu]";
+		mes "Alright! How much do you want?";
+		mes "Unit price 700 zeny, but if you only want a taste,";
+		mes "I'll give you a discount of 74 zeny,";
+		mes "If you like the taste come back and find me later.";
+		next;
+		menu "I want the 700 zeny piece!",L1_1,"I want the 74 zeny sample!",L1_2,"I'll come eat next time",-;
+			mes "[ShabuShabu]";
+			mes "Alright then, my shrimp sushi";
+			mes "are famous throughout the world! Their taste relies on its freshness, and no one else can make them.";
+			mes "If you have a chance, come try a little sashimi!";
+			close;
+		L1_1:
+			if (Zeny < 700) goto Lzeny;
+			set Zeny,Zeny-700;
+			getitem 551,10;
+			mes "[If you have a chance, come try a little sashimi!]";
+			mes "Thank you very much";
+			close;
+		L1_2:
+			if (Zeny < 74) goto Lzeny;
+			set Zeny,Zeny-74;
+			getitem 551,1;
+			mes "[If you have a chance, come try a little sashimi!]";
+			mes "Thank you very much";
+			close;
+	L2:
+		mes "[ShabuShabu]";
+		mes "Alright! How much do you want?";
+		mes "Unit price 350 zeny, but if you only want a taste,";
+		mes "I'll just give you a discount of 37 zeny.";
+		mes "If you like the taste come back and find me later";
+		next;
+		menu "I want the 350 zeny piece!",L2_1,"I want the 37 zeny sample",L2_2,"I'll come eat next time",-;
+			mes "[ShabuShabu]";
+			mes "Alright then, my sashimi";
+			mes "are famous throughout the world! Their taste relies on its freshness, and no one else can make them.";
+			mes "[If you have a chance, come try a little sashimi!]";
+			close;
+		L2_1:
+			if (Zeny < 350) goto Lzeny;
+			set Zeny,Zeny-350;
+			getitem 544,10;
+			mes "[ShabuShabu]";
+			mes "Thank you very much";
+			close;
+		L2_2:
+			if (Zeny < 37) goto Lzeny;
+			set Zeny,Zeny-37;
+			getitem 544,1;
+			mes "[ShabuShabu]";
+			mes "Thank you very much";
+			close;
+		Lzeny:
+			mes "[ShabuShabu]";
+			mes "You don't have enough zeny with you";
+			close;
+L3:
+		mes "[ShabuShabu]";
+		mes "Oh, any help is welcomed!!";
+		mes "I was just worrying about not having enough material everyday.";
+		mes "Do you want to hear my request?";
+		mes "Of course I will pay you to help me.";
+		next;
+
+		set ama_sushi,1;
+		mes "[ShabuShabu]";
+		mes "Crab Shell.";
+		mes "They are all out. I need them right now.";
+		mes "So please find ^0000FF10Crab shells^000000.";
+		mes "I can never find it when I need it.";
+		mes "I'll be counting on you.";
+		next;
+		mes "[ShabuShabu]";
+		mes "Then, please hurry! I'll be here";
+		mes "waiting for you, please don't forget my request!";
+		close;
+LStart2:
+	if (countitem(964)>=10) goto Lok;
+	mes "[ShabuShabu]";
+	mes "Man, don't have my materials ready?";
+	mes "Oh no, you didn't forget it did you?";
+	next;
+	mes "[ShabuShabu]";
+	mes "^0000FF10Crab shells^000000";
+	mes "Don't forget again.";
+	mes "You must help me find them!";
+	close;
+Lok:
+	delitem 964,10;
+	getitem 551,20;
+	mes "[ShabuShabu]";
+	mes "Hmm! Thank you so much";
+	next;
+	mes "[ShabuShabu]";
+	mes "Here is my thanks, take it!";
+	set ama_sushi,0;
+	close;
+
+}
+
+//============================================================
+//===================================================== Amatsu
+//====================================================== Event
+amatsu.gat,189,166,4	script	Kouji	764,{
+	mes "[Kuruchi]";
+	mes "Lalala Lalala Lalalalalala..";
+	mes "Lalala Lalala Lalalalalala..";
+	next;
+	if (event_amatsu == 2) goto L1;
+	if ((event_amatsu == 3) || (event_amatsu == 4)) goto L2;
+	if (event_amatsu == 5) goto L3;
+	if (event_amatsu == 6) goto L4;
+L0:
+	mes "[Kuruchi]";
+	mes "Hanging Under the Blue Sky's Blue Roof";
+	mes "Shining on Blue Wall's Reflection on the Blue Lake";
+	mes "Blue Hearting Containing a Blue Desire";
+	mes "Blue, Blue Every thing's Blue";
+	next;
+	goto LEnd;
+L1:
+	mes "[Kuruchi]";
+	mes "Monk, Monk, the fox is following me";
+	mes "Because I have its favourite food";
+	mes "Ramen noodle, my favourite too";
+	mes "I can eat it three times a day";
+	set event_amatsu,3;
+	goto LEnd;
+L2:
+	mes "[Kuruchi]";
+	mes "Monk, Monk, The Fox Is Following Me";
+	mes "Shout At Him To Scare It Off!";
+	mes "Voice Too Small So It Didn't Run Off";
+	mes "Followed All The Way To North Side's Shrine!";
+	set event_amatsu,4;
+	goto LEnd;
+L3:
+	mes "[Kuruchi]";
+	mes "Monk, Monk, The Fox Is Following Me";
+	mes "Ramen noodles My Favorite";
+	mes "But Now I am No Longer Afraid?";
+	mes "I Shouted Loudly To Scare It Off!";
+	goto LEnd;
+L4:
+	mes "[Kuruchi]";
+	mes "The Town's Dock Has An Abandoned Boat!";
+	mes "Everyone Forget That In The Ship";
+	mes "Is Full Of Treasure And Gold";
+	mes "A Boat That Is Feared By Everyone";
+	goto LEnd;
+
+LEnd:
+	next;
+	mes "[Kuruchi]";
+	mes "Lalala Lalala Lalalalalala..";
+	mes "Lalala Lalala Lalalalalala..";
+	close;
+}
+//=====================================================================
+amatsu.gat,171,174,4	script	Guard Soldier#01	767,{
+	if ((event_amatsu == 0) || (event_amatsu == 1)) goto L0;
+	if (event_amatsu == 6) goto L1;
+	if (event_amatsu == 7) goto L2;
+	mes "[Guard Soldier]";
+	mes "This area is where";
+	mes "the Master's mother";
+	mes "Is here for her treatment.";
+	next;
+	mes "[Guard Soldier]";
+	mes "Although it's not much to talk about...";
+	mes "She has been sick here for several months";
+	mes "and started to live here";
+	close;
+L0:
+	mes "[Guard Soldier]";
+	mes "This is where the Master's mother stays at.";
+	mes "Please keep quiet, we are also";
+	mes "very worried watching this everyday";
+	next;
+	mes "[Guard Soldier]";
+	mes "Why does this happen";
+	mes "to our benign and wise Master...";
+	mes "I don't understand, *sobs*...";
+	close;
+L1:
+	mes "[Guard Soldier]";
+	mes "What? Seems like something";
+	mes "flew by...  Didn't you see? Oh...";
+	mes "And I heard a loud noise... Scared the shit out of me";
+	close;
+L2:
+	mes "[Guard Soldier]";
+	mes "Our master should be alright now.";
+	mes "We are also greatly relieved.";
+	mes "You have no idea how worried we were... Phew.";
+	close;
+}
+//=====================================================================
+amatsu.gat,164,174,4	script	Guard Soldier#02	767,{
+	if (event_amatsu == 0) goto LOnce;
+	if ((event_amatsu >= 2) && (event_amatsu <= 5)) goto L2;
+	if (event_amatsu == 6) goto L3;
+	if (event_amatsu == 7) goto L4;
+	mes "[Guard Soldier]";
+	mes "Hopefully she will return healthy soon...";
+	mes "The Master has spent a lot of time";
+	mes "taking care and worrying about her.";
+	close;
+LOnce:
+	mes "[Guard Soldier]";
+	mes "Do not enter here.";
+	mes "This is where the master's mother is";
+	mes "recuperating.";
+	next;
+	mes "[Guard Soldier]";
+	mes "Although it's not much to talk about.";
+	mes "But she has been sick here for several months";
+	mes "and started to live here.";
+	set event_amatsu,1;
+	close;
+L2:
+	mes "[Guard Soldier]";
+	mes "If you are invited by the Master...";
+	mes "Please do come in.";
+	mes "Up till today, many doctors came to diagnose but";
+	mes "all their efforts seem futile.";
+	close;
+L3:
+	mes "[Guard Soldier]";
+	mes" Hey!";
+	mes" What's that sound!?";
+	mes" Where did it come from!?";
+	close;
+L4:
+	mes "[Guard Soldier]";
+	mes "The master's mother still";
+	mes "hasn't fully recovered.. ";
+	mes "Although, it seems to have turned for the better.";
+	mes "But then again..";
+	close;
+}
+
+//=====================================================================
+ama_in01.gat,22,111,0	script	Old Lady#01	761,{
+	if (event_amatsu == 5) goto LStart2;
+	if (event_amatsu == 6) goto LStart3;
+	if (event_amatsu == 7) goto LStart4;
+	mes "[...]";
+	mes "^FF6060Clang Clannng! Clang Clannng!  Stupid humans again!";
+	mes "Clang Clannng, Clang Clannng. Who is it? Is it human!?";
+	mes "What do you need here! Hurry up";
+	mes "Get out... Clang Clannng! Clang Clannng!^000000";
+	next;
+	mes "[...]";
+	mes "^FF6060I have decided to live here till";
+	mes "the Ishida Family line ends!";
+	mes "Stop bothering me and get out! Clang Clannng!^000000";
+	next;
+	warp "amatsu",167,197;
+	end;
+LStart2:
+	mes "[...]";
+	mes "^FF0066Clang Clannng! Clang Clannng! Here comes another one!";
+	mes "Stupid Humans! What do you want now";
+	mes "Throw me out of here!?^000000";
+	next;
+	mes "[...]";
+	mes "^FF0066Seems like you learned something somewhere,";
+	mes "That's about all you can do";
+	mes "You can't do anything to me!! Clang Clannng!^000000";
+	next;
+	menu "HAAAA!!",-;
+	set @which,rand(2);
+	if (@which == 1) goto Lfail;
+	mes "[...]";
+	mes "^FF0066Clang Clannng! Clang Clannng! Clang Clannng! This Bastard!";
+	mes "He threw me out like this!";
+	mes "Sick! Not fair!!^000000";
+	next;
+	mes "[...]";
+	mes "^FF0066That god-damned Ishida that rendered me to this.";
+	mes "I'll curse them forever! FOREVER!";
+	mes "Human, you better be careful too!^000000";
+	next;
+	monster "ama_in01.gat",22,112,"Fox",1180,1;
+	killmonsterall "ama_in01.gat";
+	getitem 1022,1;
+	mes "[...]";
+	mes "^FF0066Everything that Paul Shinaku did";
+	mes "will sooner or later";
+	mes "Bring about my downfall...^000000";
+	mes "^CC3300Clangggggggggggg!!^000000";
+	set event_amatsu,6;
+	close;
+Lfail:
+	mes "[...]";
+	mes "^FF0066Clang Clannng! Haha! Clang Clannng! Hahahaha!";
+	mes "How dare you, wanting to throw me out!";
+	mes "Get out of here!! Clang Clannng!^000000";
+	next;
+	warp "amatsu",167,197;
+	end;
+LStart3:
+	mes "[Ishida Sauk]";
+	mes "...*Sigh* Where from young man...?";
+	mes "Did you get rid of the fox?";
+	mes "Somehow I feel so tired, *sigh*...";
+	next;
+	mes "[Ishida Sauk]";
+	mes "Thank you. Coming from another place";
+	mes "and still has to endure through this.";
+	mes "Very sorry... Sorry...";
+	next;
+	mes "[Ishida Sauk]";
+	mes "I need to find my son.";
+	mes "Tell him that I got rid of the fox...";
+	mes "Thank you.";
+	next;
+	mes "[Ishida Sauk]";
+	mes "Now I am getting very tired.";
+	mes "I need to rest now, young man.....";
+	mes "Go find my son...";
+	close;
+LStart4:
+	mes "[Ishida Sauk]";
+	mes "Oh, You are the you man who";
+	mes "got rid of the fox... welcome.";
+	mes "Sit here a while if you can...";
+	next;
+	mes "[Ishida Sauk]";
+	mes "To be possessed by that fox...";
+	mes "It is all my own fault...";
+	mes "I didn't teach my child properly... *sigh*";
+	mes "He was a good kid when he was small.";
+	mes "It's all because I wasn't strict enough...";
+	next;
+	mes "[Ishida Sauk]";
+	mes "Originally this town was small.";
+	mes "Without a castle of this size either.";
+	mes "But, my son got some zeny somehow";
+	mes "and just start bringing them to me.";
+	mes "Don't know what he did to get this zeny.";
+	mes "And has to hide the truth from even me...";
+	next;
+	mes "[Ishida Sauk]";
+	mes "Then starting building on the castle and town,";
+	mes "and treated the townspeople fairly and nicely...";
+	mes "If that was all, then there will be no problem.";
+	mes "The problem came after he did some strange things...";
+	next;
+	mes "[Ishida Sauk]";
+	mes "Yea, he angered the gods";
+	mes "learning some weird spells somewhere.";
+	mes "And started doing experimenting,";
+	mes "Capturing the monsters,";
+	mes "Doing bad things...";
+	next;
+	mes "[Ishida Sauk]";
+	mes "And now, the monsters";
+	mes "started to live in Amatsu...";
+	mes "The gods became so angry even ";
+	mes "the monks from the shrine";
+	mes "don't know what to do.....";
+	next;
+	mes "[Ishida Sauk]";
+	mes "They punished me as well...";
+	mes "and sent a fox here, ";
+	mes "hoping to give a warning,";
+	mes "but my son didn't stop.";
+	next;
+	mes "[Ishida Sauk]";
+	mes "If possible please stop my son.";
+	mes "I am old and almost dead.";
+	mes "I don't know what to do either...";
+	mes "Please guard this peaceful town.";
+	mes "I don't know what my son is smoking";
+	mes "doing that kind of stuff...";
+	close;
+}
+//=====================================================================
+ama_in02.gat,170,62,4	script	Soldier#02	767,{
+	mes "[Kyro]";
+	mes "My name is Kyro. In this town";
+	mes "I handle all the administrative work.";
+	mes "What type of service do you need?";
+	next;
+	menu "Please give me a pass",-,"I want to live here",L2,"Nothing",L3;
+
+	if (event_amatsu == 7) goto L1_1;
+		mes "[Kyro]";
+		mes "The master said that the guests from the continent";
+		mes "can move about freely,";
+		mes "Without any";
+		mes "permits or passes.";
+		close;
+L1_1:
+	if (countitem(7160) == 0) goto L1_2;
+		mes "[Kyro]";
+		mes "I have already given you a pass.";
+		close;
+L1_2:
+		mes "[Kyro]";
+		mes "Did you lose the pass?";
+		mes "If you want another pass";
+		mes "you need to pay 10,000 zeny for registration fees.";
+		next;
+		menu "Get the pass",L1_2_1,"Maybe next time",-;
+			mes "No problem!";
+			mes "If you need anything please come talk to me again!";
+			close;
+L1_2_1:
+		if (Zeny < 10000) goto LError;
+		set Zeny,Zeny-10000;
+		getitem 7160,1;
+		mes "[Kyro]";
+		mes "Come, this is it.";
+		mes "Please be careful and don't lose it again.";
+		close;
+LError:
+		mes "[Kyro]";
+		mes "You don't have enough zeny!";
+		close;
+L2:
+		mes "[Kyro]";
+		mes "This will be difficult, you can";
+		mes "freely move around, but the master";
+		mes "hasn't considered anything about immigration.";
+		mes "But, you can stay as long as you want";
+		close;
+L3:
+		mes "[Kyro]";
+		mes "Then that's it for now...";
+		mes "If there's anything else just tell me.";
+		close;
+
+}
+
+//=====================================================================
+ama_in02.gat,115,177,7	script	Juro	767,{
+	mes "[Juro]";
+	mes "What are you here for?";
+	mes "There is nothing much over here.";
+	next;
+	menu "Oh, really",-,"Please open the door for me",L2;
+
+		mes "[Juro]";
+		mes "The town has much more stuff.";
+		mes "Have a wonderful time...";
+		close;
+L2:
+	if (event_amatsu != 7) goto Lnoflag;
+	if (countitem(7160) < 1) goto Llost;
+		mes "[Juro]";
+		mes "You already got the pass...";
+		mes "Do you want to go in directly? Or";
+		mes "Do you want me to explain first...?";
+		next;
+		menu "Direct access",-,"Listen to explanation",L2_2;
+
+			mes "[Juro]";
+			mes "Then, I will open the door for you.";
+			mes "Please take care...";
+			next;
+			warp "ama_dun01.gat",229,10;
+			end;
+L2_2:
+			mes "[Juro]";
+			mes "The inner space seems to be ";
+			mes "protected by special spells.";
+			mes "Those who wander in carelessly,";
+			mes "become lost and will be assaulted";
+			mes "mysteriously and die.";
+			next;
+			mes "[Juro]";
+			mes "What I can tell you";
+			mes "isn't all that much.";
+			mes "I have not been inside.";
+			mes "It's a mysterious place, its only proof is";
+			mes "of existence is from the";
+			mes "survivors that ventured inside";
+			next;
+			mes "[Juro]";
+			mes "First of all.....";
+			mes "'Don't believe in what you see.'";
+			next;
+			mes "[Juro]";
+			mes "Second of all.....";
+			mes "About the spells, they have their own rules.";
+			mes "Everything has its own purpose,";
+			mes "including the spells.";
+			mes "Will you find some";
+			mes "answers?";
+			next;
+			mes "[Juro]";
+			mes "Then, I'll open the door for you.";
+			mes "Please be careful...";
+			next;
+			warp "ama_dun01.gat",229,10;
+			end;
+Llost:
+		mes "[Juro]";
+		mes "You don't have the pass";
+		mes "so I cannot open the gate for you.";
+		mes "Please understand.";
+		close;
+Lnoflag:
+		mes "[Juro]";
+		mes "What door are you talking about?";
+		mes "In a place like this there won't";
+		mes "be any doors as far as I know.";
+		mes "You might have been mistaken.";
+		next;
+		mes "[Juro]";
+		mes "There are more to see in town.";
+		mes "I hope you have a good time...";
+		close;
+}
+ama_dun01.gat,229,7,0	script	Soldier#08	767,{
+	mes "[Juro]";
+	mes "Ready to leave?";
+	next;
+	menu "Leave",-,"Wait a little more",L1;
+		mes "[Juro]";
+		mes "Gogo!!";
+		next;
+		warp "ama_in02.gat",119,181;
+		end;
+L1:
+		mes "[Juro]";
+		mes "Take care of yourself!";
+		close;
+}
+
+//=====================================================================
+ama_in02.gat,200,176,4	script	Castle Owner	768,{
+	if (event_amatsu == 1) goto LStart2;
+	if ((event_amatsu >= 2) && (event_amatsu <=5)) goto LStart3;
+	if (event_amatsu == 6) goto LStart4;
+	if (event_amatsu == 7) goto LStart5;
+	mes "[Ishida Yoshinake]";
+	mes "What! An outsider?";
+	mes "What do you need me for?? If it's nothing important";
+	mes "Talk to you later...!";
+	next;
+	mes "[Ishida Yoshinake]";
+	mes "Please leave! No matter who you are!!";
+	mes "Right now I am in a VERY bad mood!";
+	close;
+LStart2:
+	mes "[Ishida Yoshinaku]";
+	mes "What! A visitor...? Oh, sorry";
+	mes "But today I am not in the mood";
+	mes "of seeing a visitor!";
+	next;
+	menu "I heard your mother is sick...",L1,"What a beautiful castle",L2,"Who are you?",L3;
+L1:
+	mes "[Ishida Yoshinaku]";
+	mes "Oh... You are an expert pathologist?";
+	mes "Oh yea, if you are a foreign expert";
+	mes "I should be able to trust you...";
+	mes "I guess...";
+	next;
+	mes "[Ishida Yoshinaku]";
+	mes "Welcome, as you know";
+	mes "I am the owner of the East Lake Castle";
+	mes "My name is Ishida Yoshinaku,";
+	mes "Nice to meet you.";
+	next;
+	mes "[Ishida Yoshinaku]";
+	mes "To put it simple: my mother";
+	mes "is not very healthy,";
+	mes "of course you are here because of it";
+	mes "Can you cure my ailing mother??";
+	next;
+	mes "[Ishida Yoshinaku]";
+	mes "So many famous and talented";
+	mes "Doctors has visited her already,";
+	mes "But not only did they not cure her!!";
+	mes "They worsened her condition!!";
+	mes "so I kept feeling disappointed";
+	next;
+	mes "[Ishida Yoshinaku]";
+	mes "You, being a foreign expert,";
+	mes "may cure my mother's sickness!";
+	mes "if you do, I will give you lots of zeny and rewards...";
+	next;
+	mes "[Ishida Yoshinaku]";
+	mes "Please help her,";
+	mes "my mother lives in the mansion outside of the castle,";
+	mes "After you cure her";
+	mes "Come see me again";
+	set event_amatsu,2;
+	close;
+L2:
+	mes "[Ishida Yoshinaku]";
+	mes "Yes! Beautiful indeed! So what";
+	mes "Do you want to do! Leave when you get";
+	mes "bored of it! Man!";
+	next;
+	mes "[Ishida Yoshinaku]";
+	mes "At a pressing time like this... *Sobs*...";
+	mes "Leave when you become satisfied or bored!";
+	close;
+L3:
+	mes "[Ishida Yoshinaku]";
+	mes "...Talking about me? You don't know? Eh?";
+	mes "I am this castle's master!";
+	mes "Go ask around the soldiers outside";
+	mes "If you are not sure!";
+	next;
+	mes "[if you are not sure]";
+	mes "At a pressing time like this... *Sobs*...";
+	mes "Leave when you become satisfied or bored!";
+	close;
+LStart3:
+	mes "[Ishida Yushinaku]";
+	mes "How is my mother?";
+	mes "If you know the name of the sickness....";
+	mes "Please tell me immediately...";
+	mes "Argh... So worried!";
+	mes "I can't sleep at night any longer!";
+	next;
+	mes "[Ishida Yushinaku]";
+	mes "You are from the other continents,";
+	mes "so you must know....";
+	mes "now you are the only one I can trust";
+	close;
+LStart4:
+	mes "[Ishida Yushinaku]";
+	mes "WoW, you are great, I heard";
+	mes "My mother is getting better already,";
+	mes "Anyway, what sickness was it?";
+	next;
+	mes "[Ishida Yushinaku]";
+	mes "Fox? The fox is the reason? ho...";
+	mes "So it's not a sickness after all...!!";
+	mes "Why didn't I think of it earlier!!!";
+	next;
+	mes "[Ishida Yushinaku]";
+	mes "Damn fox, after it ran away,";
+	mes "it tried to revenge like this...";
+	mes "But now there is no other";
+	mes "Way... hahaha! Hahahaha!";
+	next;
+	mes "[Ishida Yushinaku]";
+	mes "Um, hmm, umm...";
+	next;
+	mes "[Ishida Yushinaku]";
+	mes "Anyway, Thanks for your help!";
+	mes "I think my mother will return to normal now...";
+	mes "I want to show you my gratitude...";
+	mes "What to do...";
+	next;
+	mes "[Ishida Yushinaku]";
+	mes "Alright, I will give you this pass.";
+	mes "As long as you have this pass,";
+	mes "you can get into ANYWHERE";
+	mes "In this town";
+	next;
+	set event_amatsu,7;
+	getitem 7160,1;
+	mes "[Ishida Yushinaku]";
+	mes "Although it's not such a great gift, but";
+	mes "I believe you will have use for it someday...";
+	mes "talk to 'Juro' For the details";
+	close;
+LStart5:
+	mes "[Ishida Yushinaku]";
+	mes "Hey... I hope you have a";
+	mes "good time in Amatsu.....";
+	mes "We always welcome the foreigners!";
+	close;
+}
+
+ama_in01.gat,180,173,2	script	Fox Mask	762,{
+	if (event_amatsu == 4) goto LStart2;
+	if (event_amatsu == 5) goto LStart3;
+	mes "[Takikuwi]";
+	mes "Hiya, outsider, this";
+	mes "Shrine is left by a monk a long time ago.";
+	mes "Sometimes I come here to play";
+	mes "along with my friend Tokari";
+	next;
+	mes "[Takikuwi]";
+	mes "If you are here to hide from the monsters,";
+	mes "please do come in, no monsters";
+	mes "can ever come in here!";
+	mes "You can always take a short rest in here!";
+	close;
+LStart2:
+	mes "[Takikuwi]";
+	mes "Hiya, outsider, here to find me?";
+	mes "Because of the fox bothering you?";
+	mes "From your expression You seem to";
+	mes "have had quite a bit of trouble";
+	next;
+	mes "[Takikuwi]";
+	mes "Although usually the head monk";
+	mes "should come to help himself, this shrine";
+	mes "Has been deserted for a long time";
+	next;
+	mes "[Takikuwi]";
+	mes "It is very hard to get rid of a fox in a person's body";
+	mes "If there's alcohol and ramen noodle,";
+	mes "It might be a little easier,";
+	mes "But they are hard to find!";
+	next;
+	mes "[Takikuwi]";
+	mes "Good thing I know quite a bit";
+	mes "about the fox, I'll tell you";
+	mes "some words of advice, although foxes";
+	mes "are very tricky, and although they like to";
+	mes "make fun of humans... but it is seldom";
+	mes "for a fox to display hatred!";
+	next;
+	mes "[Takikuwi]";
+	mes "In another word, if there is hatred";
+	mes "human also did something wrong!!";
+	mes "Which will hurt self,";
+	mes "And sometimes unlucky things happen";
+	mes "and to friend and family as well!";
+	next;
+	mes "[Takikuwi]";
+	mes "Anyway, I've heard that when";
+	mes "there's a strong animal then a fox will chased,";
+	mes "away from the human.";
+	mes "So try hard, and try summoning the animal spirit!";
+	next;
+	menu "Haaaa!!",-;
+	mes "[Takikuwi]";
+	mes "Very good, just repeating it will";
+	mes "show the fox a strong spirit,";
+	mes "and show results, but the best thing is";
+	mes "to find out why the fox will enter the";
+	mes "person's body, but if you do this";
+	mes "it should help, more or less";
+	set event_amatsu,5;
+	close;
+LStart3:
+	mes "[Takikuwi]";
+	mes "Don't forget, when you try summoning";
+	mes "you must think about!";
+	mes "A monster that is stronger than a fox";
+	mes "or it would just be a futile effort!";
+	mes "Remember....... Stronger than a fox....";
+	close;
+}
diff --git a/npc/quests/quests_ayothaya.txt b/npc/quests/quests_ayothaya.txt
index 3d17a9d99..93f8716f6 100644
--- a/npc/quests/quests_ayothaya.txt
+++ b/npc/quests/quests_ayothaya.txt
@@ -1,1833 +1,1833 @@
-//===== Athena Script =======================================

-//= Quest NPCs related to Ayothaya

-//===== By ================================================

-//= Fredzilla

-//===== Version ===========================================

-//= 1.6

-//===== Compatible With ===================================

-//= eAthena 1.0

-//===== Description =======================================

-//= Ayothaya Clue Quest, Ayothaya Shrimp Quest, Ayothaya

-//= Dungeon Quest, Tom Yum Goong Quest,

-//===== Comments ==========================================

-//= List or Variables used

-//= @fishing - 	Checks for if you have caught a fish or not, 

-//=	       	1/10 chance you will get the wedding ring if 

-//=		you have started that quest.

-//= weddingring - Signifies the start of the wedding ring 

-//=               quest, and used throughout to keep track of 

-//=               progress.

-//= recoveredring - Signifies you have retrieved the ring 

-//=		    and therefore can't just drop the ring and 

-//=		    get the same quest again.

-//= 1.0 - First Release, made with infomation from RagnaInfo

-//= 1.1 - added anti-novice protection [Lupus]

-//= 1.3 - Fixed exploit [Lupus]

-//= 1.4 Updated, more close to the official. Thanks to birkiczd

-//=	Also optimized it again, remove unused global variable [Lupus]

-//= 1.5 Removed Duplicates [Silent]

-//= 1.6 Moved quests from cities/ to here:

-//= Shrimp, Dungeon, Tom Yum Goong [Evera]

-//=========================================================

-

-//============================================================

-//============================================== Ayothaya Clue

-//====================================================== Quest

-ayo_dun02.gat,277,178,1	script	OBB	139,4,4,{

-	if(AyoOBB==1 || weddingring!=3) end;

-	mes "["+strcharinfo(0)+"]";

-	mes "Huh what is this?, not foot prints, this is an Old Blue coloured Box";

-	next;

-	set AyoOBB,1;

-	getitem 603,1;

-	logmes "Q_AYOTH1: got OBB";

-	mes "["+strcharinfo(0)+"]";

-	mes "I think I will keep it";

-	close;

-}

-//Dungeon 1 foot prints x 5

-ayo_dun01.gat,30,149,1	script	Clue#01	139,5,5,{

-	if(weddingring!=3) end;

-	npctalk "There are some foot prints here, they head off to the East.";

-	set @footprints1,1;

-	close;

-}

-ayo_dun01.gat,70,149,1	script	Clue#02	139,5,5,{

-	if(weddingring!=3) end;

-	npctalk "There are some more foot prints, they are heading off to the East too!";

-	set @footprints2,1;

-	close;

-}

-ayo_dun01.gat,100,149,1	script	Clue#03	139,5,5,{

-	if(weddingring!=3) end;

-	npctalk "More foot prints heading to the East, who do they belong too?";

-	set @footprints3,1;

-	close;

-}

-ayo_dun01.gat,190,149,1	script	Clue#04	139,5,5,{

-	if(weddingring!=3) end;

-	npctalk "More foot prints, but these are going North.";

-	set @footprints4,1;

-	close;

-}

-ayo_dun01.gat,261,263,1	script	Clue#05	139,5,5,{

-	if(weddingring!=3) end;

-	npctalk "There are some foot prints, they seem to head into that hole there.";

-	set @footprints5,1;

-	close;

-}

-

-//Dungeon 2 foot prints x 4 + 1 fake

-ayo_dun02.gat,222,204,1	script	Clue#06	139,5,5,{

-	if(weddingring!=3) end;

-	npctalk "Yet more foot prints, they are either going South or West.";

-	set @footprints6,1;

-	close;

-}

-ayo_dun02.gat,169,212,1	script	Clue#07	139,5,5,{

-	if(weddingring!=3) end;

-	npctalk "Looks like there are foot print going to the West.";

-	set @footprints7,1;

-	close;

-}

-ayo_dun02.gat,129,212,1	script	Clue#08	139,5,5,{

-	if(weddingring!=3) end;

-	npctalk "Ok these foot prints are either going to the North or West.";

-	set @footprints8,1;

-	close;

-}

-ayo_dun02.gat,79,212,1	script	Clue#09	139,7,7,{

-	if(weddingring!=3) end;

-	npctalk "These are very new, they are going North.";

-	set @footprints9,1;

-	close;

-}

-//FAKE

-ayo_dun02.gat,245,166,1	script	Clue#10	139,7,7,{

-	if(weddingring!=3) end;

-	npctalk "Seems something came by this way, to the East.";

-	close;

-}

-

-ayothaya.gat,233,105,7	script	Shuda	838,{

-	mes "[Shuda]";

-	if(BaseLevel<50) {

-		mes "Where is my ring!?!";

-		close;

-	}

-	if(weddingring==2) goto L_Quest2;

-	if(weddingring==3) goto L_OnQ2;

-	if(weddingring==4) goto L_QuestComplete;

-	if(weddingring==5) goto L_QuestOver;

-	if(countitem(7288)>=1) goto L_RingFound;

-	mes "Oh please wont you help me, my partner has gone missing, but not before droping our ^FF0000Engagement Ring^000000 maybe there is a way of ^0000FFfishing^000000 it out of the sea.";

-	set weddingring,1;

-	close;

-L_RingFound:

-	mes "Oh is that my ring!?!";

-	next;

-	mes "[Shuda]";

-	mes "Can I please have it back?";

-	next;

-	menu "Yes, here you go",N_Yes,"No, I found it, it's mine",-;

-	mes "[Shuda]";

-	mes "Think what you want, but that ring is mine, and without it I can never marry my true love.";

-	mes "";

-	mes "Where ever he may be.";

-	close;

-N_Yes:

-	mes "[Shuda]";

-	if(countitem(7288)<1) {

-		mes "Go away, cheater!";

-		close;

-	}

-	delitem 7288,1;

-	mes "Thank you so much, now I have this back maybe my partner will return.";

-	set weddingring,2;

-	next;

-	mes "[Shuda]";

-	mes "Come back to me when you have time, I need you to do something else for me.";

-	close;

-L_Quest2:

-	mes "It seems even though I have my ring back my partner ^FF0000Annon^000000 doesn't seem to want to come back to me";

-	mes "Maybe he has gotten lost somewhere";

-	mes "";

-	mes "Will you please go and look for him";

-	next;

-	menu "Yes, I would be glad to",L_YesQ2,"No, he will come back on his own",-;

-	mes "[Shuda]";

-	mes "Well he might, but I still need someone to find him, I am afraid something might have happened to him.";

-	close;

-L_YesQ2:

-	set weddingring,3;

-	mes "[Shuda]";

-	mes "Oh thank you so much, I think someone in the town might have seen where he went, maybe he can give you a clue";

-	close;

-L_OnQ2:

-	mes "Have you been able to find my love yet?";

-	mes " ";

-	mes "Please hurry.";

-	mes "*tear*";

-	close;

-L_QuestComplete:

-	mes "You have found him ?!?";

-	mes "Then where is he???";

-	next;

-	mes "You explain the situation.";

-	next;

-	mes "[Shuda]";

-	mes "Well, I thought he was my one.";

-	mes "I don't think I will ever find another like him.";

-	mes "*tear*";

-	next;

-	set weddingring,5;

-	mes "[Shuda]";

-	mes "I can understand, but why not come and talk to me about it, we might have been able to talk it out.";

-	close;

-L_QuestOver:

-	mes "Nice to see you again "+strcharinfo(0)+". How have you been?";

-	close;

-}

-

-ayothaya.gat,253,99,3	script	Fisherman#01	843,{

-	mes "[Dannai]";

-	mes "This place is known to be teeming with fish. The fish here tend to eat anything they find, so it's easy to catch them.";

-	next;

-	mes "[Dannai]";

-	mes "We are providing a fishing rod rental service. Every time you fish, you'll need ^4466771 Monster's Food^000000 to use as bait, and pay a rod rental fee of ^44667750 Zeny^000000.";

-	next;

-	mes "[Dannai]";

-	mes "Would you";

-	mes "like to try?";

-	next;

-	menu "Yes",-,"No",L_No;

-	if(countitem(528) < 1 || zeny < 50) goto L_Fail;

-	delitem 528,1;

-	set zeny,zeny-50;

-	mes "[Fisher Man]";

-	mes "Ok give it a good swing.";

-	mes "Lets see if you got anything.";

-	next;

-	set @fishing, rand(1,10);

-	mes "[Fisher Man]";

-	if(@fishing<5) goto L_Nothing;

-	if(@fishing<10) goto L_Fish;

-	if(@fishing==10) goto L_RingCheck;

-L_No:

-	mes "[Dannai]";

-	mes "Come back anytime.";

-	close;

-L_Fail:

-	mes "[Dannai]";

-	mes "Seems you don't have what I need";

-	mes "Come back when you have some Monster Feed, and 50 zeny.";

-	close;

-L_Nothing:

-	mes "Sorry it seems like you didn't get anything, try again anytime.";

-	close;

-L_Fish:

-	getitem 544,1;

-	mes "Look at this you got yourself a fish, well done.";

-	close;

-L_RingCheck:

-	if(weddingring!=1 || recoveredring==1) goto L_Fish;

-	mes "What is this, some sort of ring!!!";

-	mes "Well I guess since you fished it out you can keep it";

-	next;

-	getitem 7288,1;

-	mes "[Fisher Man]";

-	mes "Come back anytime";

-	set weddingring,0;

-	set recoveredring,1;

-	close;

-}

-

-ayothaya.gat,192,171,4	script	Old Man#10	824,{

-	mes "[Tham]";

-	if(weddingring==3) goto L_OnQ2;

-	mes "What a nice day it is today, don't you agree?";

-	close;

-L_OnQ2:

-	mes "What! Annon is missing, I only saw him a few minutes ago.";

-	next;

-	mes "[Tham]";

-	mes "He was heading for Ayothaya's dungeon, I thought this kind of odd, and now you say he hasn't come back?!?";

-	mes "I think you should follow him in there, just in case something has happened to him";

-	next;

-	mes "[Tham]";

-	mes "Maybe he has left something inside the dungeon, something that can lead you to him";

-	mes "But thats just me";

-	next;

-	mes "[Tham]";

-	mes "You can get to the dungeon through the old temple, it is one map to the right of here, and down the hill.";

-	close;

-}

-

-ayo_dun02.gat,91,264,4	script	Guy	822,{

-	if(weddingring==4) goto L_QuestComplete;

-	if(weddingring==5) goto L_TalkedShuda;

-	if(weddingring==3 && @footprints1==1 && @footprints2==1 && @footprints3==1 && @footprints4==1 && @footprints5==1 && @footprints6==1 && @footprints7==1 && @footprints8==1 && @footprints9==1) goto L_Groom;

-	mes "[Guy]";

-	mes "She won't find me here,she won't...";

-	close;

-L_Groom:

-	

-	mes "[Annon]";

-	mes "Help me please...";

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "^He seems to be injured very bad...";

-	next;

-	menu "Treat his wounds",-,"Leave him alone",L_Go;

-	if(countitem(504) < 1) goto L_Need;

-	delitem 504,1;

-	mes "[Annon]";

-	mes "Who are you";

-	mes "Have you been sent to follow me?";

-	next;

-	mes "[Annon]";

-	mes "So I see now, my ex-partner has sent you to see if I'm OK.";

-	mes " ";

-	mes "Can you go and tell her I'm ok, but I cant go through with the marriage.";

-	next;

-	mes "[Annon]";

-	mes "I cant really give a reason, just tell her that I love her, but not enough to spend the rest of my life with her.";

-	next;

-	mes "[Annon]";

-	mes "I hope she will understand.";

-	mes " ";

-	mes "I guess you will want something in return.";

-	next;

-	mes "[Annon]";

-	mes "I can train you, and make you gain some exp.";

-	mes " ";

-	mes "I will do this now.";

-	next;

-	set BaseExp,BaseExp+100000;

-	set weddingring,4;

-	mes "[Annon]";

-	mes "It is done, please make you way back to Shuda, and please try not to make her cry";

-	close;

-L_Need:

-	mes "["+strcharinfo(0)+"]";

-	mes "I need a White potion to be able to cure him.";

-	close;

-L_Go:

-	mes "["+strcharinfo(0)+"]";

-	mes "Someone else will probably find him.I have other things to do.";

-	close;

-L_QuestComplete:

-	mes "[Annon]";

-	mes "Have you seen Shuda yet?";

-	close;

-L_TalkedShuda:

-	mes "[Annon]";

-	mes "Did she take it OK?";

-	close;

-}

-

-//============================================================

-//============================================ Ayothaya Shrimp

-//====================================================== Quest

-ayothaya.gat,203,169,3	script	Noi	839,{

-	mes "[Noi]";

-	mes "Welcome to Ayothaya.";

-	mes "Out beautiful village is built above the water, surrounded by a dense forest.";

-	next;

-	mes "[Noi]";

-	mes "There are many tourist attractions in this village, that you won't be able to find anywhere else. Out fish markets and the unique architecture of our buildings is enough reason to visit Ayothaya.";

-	next;

-	mes "[Noi]";

-	mes "Please feel free";

-	mes "to take a look around.";

-	next;

-	menu "Building Locations.",s_Loc,"Remove marks from mini-map.",s_Remo,"Cancel.",-;

-

-	mes "[Noi]";

-	mes "Please enjoy";

-	mes "your travels.";

-	close;

-s_Loc:

-	mes "[Noi]";

-	mes "Where would";

-	mes "you like to visit?";

-	next;

-	menu "Weapon Shop",s_Weap,"Tool Shop",s_Tool,"Tavern",s_Tavern,"Shrine",s_Shrine,"Fishing Spot",s_Fish,"Cancel",-;

-

-	mes "[Noi]";

-	mes "If you wish to remove location marks on your mini-map, please select the 'Remove marks from mini-map' command from the menu.";

-	close;

-

-s_Weap:

-	mes "[Noi]";

-	mes "At our Weapon Shop,";

-	mes "you will find great weapons favored by brave Ayothayan seafarers.";

-	next;

-	mes "[Noi]";

-	mes "Our weapon shop is located at ^00FF00+^000000.";

-	viewpoint 1,166,90,1,0x00FF00;

-	close;

-

-s_Tool:

-	mes "[Noi]";

-	mes "We Ayothayans always make sure we have everything we need before we go traveling. It never hurts to be prepared, does it?";

-	next;

-	mes "[Noi]";

-	mes "Our Tool Shop";

-	mes "is located at ^0000FF+^000000.";

-	viewpoint 1,128,86,2,0x0000FF;

-	close;

-

-s_Tavern:

-	mes "[Noi]";

-	mes "One of the basics of adventuring is gathering information, or at least that's what they say. You can meet people from all sorts of places in the Tavern. I'm sure you can earn something useful there.";

-	next;

-	mes "[Noi]";

-	mes "Of course, you must";

-	mes "drop by our Tavern.";

-	mes "It is located at ^FFFF00+^000000.";

-	viewpoint 1,229,70,3,0xFFFF00;

-	close;

-

-s_Shrine:

-	mes "[Noi]";

-	mes "If you wish to pray to God, or achieve a state of peace in your mind, why don't you visit our Shrine? Even if it's just for sight-seeing, everyone is welcome there.";

-	next;

-	mes "[Noi]";

-	mes "Our shrine";

-	mes "is located at^880088+^000000.";

-	viewpoint 1,207,284,4,0x880088;

-	close;

-s_Fish:

-	mes "[Noi]";

-	mes "Since Ayothaya was built above the surface of the water and so close to a beach, it's been a favorite spot for fishermen. Why don't you catch some for dinner at the Fishing Spot?";

-	next;

-	mes "[Noi]";

-	mes "Our famous";

-	mes "Fishing Spot";

-	mes "is located at ^AFAFAF+^000000.";

-	viewpoint 1,251,97,5,0xAFAFAF;

-	close;

-s_Remo:

-	viewpoint 2,166,90,1,0x00FF00;

-	viewpoint 2,128,86,2,0x0000FF;

-	viewpoint 2,229,70,3,0xFFFF00;

-	viewpoint 2,207,284,4,0x880088;

-	viewpoint 2,251,97,5,0xAFAFAF;

-	mes "[Noi]";

-	mes "Alright...";

-	mes "I've removed all the location marks from your mini-map.";

-	mes "Thank you.";

-	close;

-}

-

-ayothaya.gat,153,86,4	script	Thongpool	843,{

-	if(ayoshrimps == 1)goto s_Shrimp2;

-	if(tomyumgoong == 2)goto s_Shrimp;

-	mes "[Thongpool]";

-	mes "Welcome, welcome!";

-	mes "I've got the best Shrimp caught in the cleanest waters in the world~!";

-	close;

-s_Shrimp:

-	mes "[Thongpool]";

-	mes "Come adventurers,";

-	mes "take a look! I have";

-	mes "plenty of Shrimp!";

-	next;

-	mes "[Thongpool]";

-	mes "You're looking for Shrimp,";

-	mes "aren't you? How many Shrimps";

-	mes "do you need? Twenty Forty?";

-	next;

-	menu "I need Shrimp for Tom Yum Goong.",s_Tom,"Err, they look expensive.",-;

-

-	mes "[Thongpool]";

-	mes "What...?";

-	mes "Do you think";

-	mes "it's expensive?";

-	mes "But the fantastic taste";

-	mes "of Tom Yum Goong";

-	mes "is priceless!";

-	close;

-s_Tom:

-	mes "[Thongpool]";

-	mes "Ah! I guess Ms. Mali the Spicy recommended me to you. I guess that also means you want to buy them in bulk?";

-	next;

-	mes "[Thongpool]";

-	mes "After all,";

-	mes "you'll need a larger";

-	mes "amount of Shrimp to";

-	mes "cook Tom Yum Goong.";

-	next;

-	mes "[Thongpool]";

-	mes "Oh yes, you will need 20 Shrimps for Ms. Mali's Tom Yum Goong.";

-	mes "I even give you a discount:";

-	mes "11,000 zeny for 20 shrimps.";

-	mes "What do you say?";

-	next;

-	menu "I'll take them.",s_Take,"I could get 100 Jellopies for that much!",-;

-

-	mes "[Thongpool]";

-	mes "Well well well...";

-	mes "You might your hungry stomach with that many Jellopies but they wouldn't taste as good as my Shrimp!";

-	close;

-

-s_Take:

-	if(Zeny < 11000) goto s_NoZeny;

-	set Zeny, Zeny - 11000;

-	getitem 567,20;

-	emotion e_no1;

-	mes "[Thongpool]";

-	mes "Good, now you have the freshest Shrimp in this village!";

-	mes "It's time for you to go back and ask Ms. Mali to cook them for you.";

-	if(ayoshrimps < 1)set ayoshrimps,1;

-	close;

-

-s_NoZeny:

-	mes "[Thongpool]";

-	mes "Awww...";

-	mes "You don't have";

-	mes "enough money.";

-	close;

-

-s_Shrimp2:

-	mes "[Thongpool]";

-	mes "Mmm...?";

-	mes "Did you need more Shrimps?";

-	mes "Would you like to buy more?";

-	next;

-	menu "Yes!",s_Take,"No, thanks.",-;

-

-	mes "[Thongpool]";

-	mes "I see...";

-	mes "If you need some shrimps, just tell me!";

-	close;

-}

-

-//============================================================

-//=========================================== Ayothaya Dungeon

-//====================================================== Quest

-ayothaya.gat,83,132,7	script	Dusit	843,{

-	if(ayodunquest == 1 || ayodunquest == 2 || ayodunquest == 3)goto s_Dun;

-	mes "[Dusit]";

-	mes "Oh...!";

-	mes "You must be a traveller.";

-	mes "I have a tale you may wish to hear if you're interested in listening.";

-	next;

-	menu "What is it?",s_What,"I know what the story is.",-;

-

-	mes "[Dusit]";

-	mes "You do now?";

-	mes "Then be careful!";

-	mes "It'll eat you alive!";

-	close;

-s_What:

-	mes "[Dusit]";

-	mes "Ayothaya has a long history. Perhaps it looks calm and peaceful now, but in the past our village was terrorized bu a terrible creature.";

-	next;

-	mes "[Dusit]";

-	mes "This beast is known to us as the ^6B1312Sa-mhing Tiger^000000, which used to dwell deep in the ancient ruins.";

-	next;

-	mes "[Dusit]";

-	mes "The Sa-mhing Tiger is addicted to the taste of human flesh. It has been known to transform into the shape of a person it has eaten in order to lure out his family and friends.";

-	next;

-	mes "[Dusit]";

-	mes "The local people are still afraid that the creature might transform into someone they know, and sneak into their homes to eat them.";

-	next;

-	mes "[Dusit]";

-	mes "However there is one way you can identify the Sa-mhing Tiger from a human being. Since it's a tiger, it cannot do some of the things humans are taught to do, such as light a match.";

-	next;

-	mes "[Dusit]";

-	mes "So, if by chance you see a friend acting strangely all of a sudden, ask him to strike a match. Make sure he is not the Sa-mhing Tiger.";

-	next;

-	mes "[Dusit]";

-	mes "However...";

-	mes "I'm not sure if this actually works or not. I guess the best thing to do is just run for your life if you even suspect someone of being the Sa-mhing Tiger.";

-	next;

-	mes "[Dusit]";

-	mes "Do you blieve";

-	mes "in the existance";

-	mes "of man-eating tigers?";

-	next;

-	menu "Well, not really.",-,"Yes, I do and I think they're scary!",s_Yes;

-

-	mes "[Dusit]";

-	mes "Umm...";

-	mes "Oh well. My late grandfather told me about the Sa-mhing Tiger when I was a little kid. Of course, I haven't seen it.";

-	next;

-	mes "[Dusit]";

-	mes "The closest thing I've seen to the Sa-mhing Tiger was a golden cat with a bell. Somehow, I don't think it ate men.";

-	close;

-s_Yes:

-	mes "[Dusit]";

-	mes "Run for your life if you ever encounter the Sa-mhing Tiger! It'll eat you alive!";

-	next;

-	mes "[Dusit]";

-	mes "If you're interested in finding more about the story, I can introduce you to someone who knows that creature more than anyone else.";

-	next;

-	mes "[Dusit]";

-	mes "Why don't you talk to Boonthom? He's a pretty strange person, but there's something about him...";

-	next;

-	mes "[Dusit]";

-	mes "...";

-	mes "......";

-	next;

-	mes "[Dusit]";

-	mes "Ah well, you'll see what I'm talking about. I hope he'll help you learn more about that evil creature.";

-	set ayodunquest,1;

-	close;

-s_Dun:

-	mes "[Dusit]";

-	mes "How are you?";

-	mes "If you're interested in the Sa-mhing Tiger, please to talk to Boonthom.";

-	next;

-	mes "[Dusit]";

-	mes "But beware!";

-	mes "The Sa-mhing Tiger might be closer to you than you expect!";

-	close;

-}

-

-ayo_in01.gat,181,193,4	script	Shaman	840,{

-	if(ayodot == 8)goto s_Check2;

-	if(ayodot == 7 && countitem(7285) > 0)goto s_ICheck;

-	if(ayodot == 6 && countitem(7285) > 0)goto s_Holier;

-	if(ayodunquest == 3)goto s_Lose;

-	if(ayodunquest == 2)goto s_Items;

-	if(ayodunquest == 1)goto s_Quest;

-	mes "[Boonthom]";

-	mes "I'm sorry I can't talk to you.";

-	mes "I'm very busy right now.";

-	close;	

-s_Quest:

-	mes "[Boonthom]";

-	mes "You...!";

-	mes "Isn't it...!";

-	mes "Ooooooohhhhhhh!";

-	next;

-	mes "[Boonthom]";

-	mes "Oh...?";

-	next;

-	mes "[Boonthom]";

-	mes "...";

-	next;

-	mes "[Boonthom]";

-	mes "...";

-	mes "......";

-	next;

-	mes "[Boonthom]";

-	mes "...";

-	mes "......";

-	mes ".........";

-	next;

-	mes "[Boonthom]";

-	mes "Never mind.";

-	mes "Hah! I've lost my train of thought.";

-	next;

-	mes "[Boonthom]";

-	mes "So have you come to me to seek help? I can see the fear in your eyes. Let me gaze into your soul, and see what your fear is for myself. Hmmm...";

-	next;

-	mes "[Boonthom]";

-	mes "...";

-	next;

-	mes "[Boonthom]";

-	mes "...";

-	mes "......";

-	next;

-	mes "[Boonthom]";

-	mes "...";

-	mes "......";

-	mes ".........";

-	next;

-	mes "[Boonthom]";

-	mes "What...!";

-	mes "I see that you dread the Sa-mhing Tiger! I haven't heard any news of that monster for a long time...";

-	next;

-	mes "[Boonthom]";

-	mes "A long time ago, the Sa-mhing Tiger really did roam the village and ate innocent people.";

-	next;

-	mes "[Boonthom]";

-	mes "However, its terror was brought to an end when it was finally captured. I was one of those involved in capturing the Sa-mhing Tiger.";

-	next;

-	mes "[Boonthom]";

-	mes "I insisted on killing it, but the other people were too afraid to do so. Instead, the Sa-mhing Tiger was locked in a cave inside of the ancient ruins.";

-	next;

-	mes "[Boonthom]";

-	mes "I believe that was at least 10 years ago. Perhaps it's already dead by now. However, no one knows how powerful the tiger truly is. It may still be alive.";

-	next;

-	mes "[Boonthom]";

-	mes "I don't think we need to worry about it though. It is locked up and there it shall remain.";

-	next;

-	menu "I want to explore the ancient ruins.",s_Explore,"Locked up! Good! I'm not afraid!",-;

-

-	mes "[Boonthom]";

-	mes "Hmmm...";

-	mes "Not afraid";

-	mes "of it, are you?";

-	next;

-	mes "[Boonthom]";

-	mes "..........";

-	mes "..........";

-	close;

-s_Explore:

-	mes "[Boonthom]";

-	mes "You...";

-	mes "You are strange.";

-	mes "You want to explore the ancient ruins. Do all the adventurers disregard their safety like that?";

-	next;

-	mes "[Boonthom]";

-	mes "It's your choice. But remember, it is very dangerous to go through the path to the center of the building.";

-	mes "Usually, I forbid it.";

-	next;

-	mes "[Boonthom]";

-	mes "But if you want to go in, I can give you some useful tips.";

-	mes "Would you like to listen?";

-	next;

-	menu "If it's that dangerous I'd rather not try",-,"Sure!",s_Sure;

-

-	mes "[Boonthom]";

-	mes "You made a good decision.";

-	mes "You'd better be careful if you want to stay alive.";

-	close;

-s_Sure:

-	mes "[Boonthom]";

-	mes "Umm, okay.";

-	mes "Since you're";

-	mes "that interested...";

-	next;

-	mes "[Boonthom]";

-	mes "If you wish to enter the ancient building, you must have protection against evil spirits and malice.";

-	next;

-	mes "[Boonthom]";

-	mes "There are many ghosts and demons within the cave, and they will attack people who do not possess holy power... Like you.";

-	next;

-	mes "[Boonthom]";

-	mes "I can make you an object";

-	mes "containing this holy power if you wish. In order to make it, I will need some materials.";

-	next;

-	mes "[Boonthom]";

-	mes "^4466771 Needle Packet^000000,";

-	mes "^4466771 Spool^000000,";

-	mes "^4466771 Solid Husk^000000 and";

-	mes "^4466771 Holy Water^000000...";

-	mes "That's all I need.";

-	next;

-	mes "[Boonthom]";

-	mes "Please come back";

-	mes "when you prepare all the materials.";

-	set ayodunquest,2;

-	close;

-

-s_Items:

-	if(countitem(7213) < 1 || countitem(7217) < 1 || countitem(7190) < 1 || countitem(523) < 1)goto s_NoItems; //Pin Cusion, Spool, Hard Back Shell, Holy Water

-	delitem 7213,1; //Pin Cusion

-	delitem 7217,1; //Spool

-	delitem 7190,1; //Hard Back Shell

-	delitem 523,1; //Holy Water

-	mes "[Boonthom]";

-	mes "Excellent!";

-	mes "Now you have brought everything I need. Let me make the thing for you as promised...";

-	next;

-	mes "[Boonthom]";

-	mes "Ooooohmmmmm...";

-	next;

-	mes "[Boonthom]";

-	mes "Hmmmmmm...";

-	mes "Hmmmmmmmmm.";

-	next;

-	mes "[Boonthom]";

-	mes "Pffff pffff...";

-	next;

-	set ayodunquest,3;

-	getitem 7285,1; //Holy Threads

-	mes "[Boonthom]";

-	mes "Here you go.";

-	mes "Please take these holy threads.";

-	mes "With this, you will be able to enter the ruins with less worry.";

-	next;

-	mes "[Boonthom]";

-	mes "Even if you lose this, don't worry.";

-	mes "Just bring me the materials, and I will make you another one.";

-	next;

-	mes "[Boonthom]";

-	mes "The ancient building consists of 2 levels. Before you enter the 2nd underground level, please return to me so that I can tell you how to enter that place.";

-	close;

-

-s_NoItems:

-	mes "[Boonthom]";

-	mes "Did you forget what materials you need to create my object of holy power? Please listen carefully this time.";

-	next;

-	mes "[Boonthom]";

-	mes "^4466771 Needle Packet^000000,";

-	mes "^4466771 Spool^000000,";

-	mes "^4466771 Solid Husk^000000 and";

-	mes "^4466771 Holy Water^000000.";

-	next;

-	mes "[Boonthom]";

-	mes "See you later.";

-	close;

-

-s_Lose:

-	if(countitem(7285) > 0)goto s_NoItems2;

-	if(countitem(7213) < 1 || countitem(7217) < 1 || countitem(7190) < 1 || countitem(523) < 1)goto s_NoItems2; //Pin Cusion, Spool, Hard Back Shell, Holy Water

-	//Custom Dialogues

-	mes "[Boonthom]";

-	mes "Oh, you have all the items I require to make holy threads.";

-	next;

-	mes "[Boonthom]";

-	mes "Would you like to make one?";

-	next;

-	menu "Yes please.",s_Yes,"No I'm fine.",-;

-	

-	mes "[Boonthom]";

-	mes "See you later then.";

-	close;

-s_Yes:

-	if(countitem(7213) < 1 || countitem(7217) < 1 || countitem(7190) < 1 || countitem(523) < 1)goto s_NoItems2; //Pin Cusion, Spool, Hard Back Shell, Holy Water

-	delitem 7213,1; //Pin Cusion

-	delitem 7217,1; //Spool

-	delitem 7190,1; //Hard Back Shell

-	delitem 523,1; //Holy Water

-	getitem 7285,1; //Holy Threads

-	mes "[Boonthom]";

-	mes "All right, here are your holy threads.";

-	mes "If you lose them, I'm still here to make some more.";

-	next;

-	mes "[Boonthom]";

-	mes "Good luck venturing down the dungeon.";

-	close;

-

-s_NoItems2:

-	mes "[Boonthom]";

-	mes "If you lose the holy threads, don't worry. I can make some more for you. Just gather the following items.";

-	next;

-	mes "[Boonthom]";

-	mes "^4466771 Needle Packet^000000,";

-	mes "^4466771 Spool^000000,";

-	mes "^4466771 Solid Husk^000000 and";

-	mes "^4466771 Holy Water^000000.";

-	next;

-	mes "[Boonthom]";

-	mes "See you later.";

-	close;

-s_Holier:

-	mes "[" + strcharinfo(0) + "]";

-	mes "I copied down this";

-	mes "message while exploring";

-	mes "the dungeon. Would you";

-	mes "take a look at this?";

-	next;

-	mes "[Stone Slate]";

-	mes "Do not enter the";

-	mes "2nd underground level";

-	mes "...is danger... You will";

-	mes "...encounter... tiger...";

-	next;

-	mes "[Stone Slate]";

-	mes "You must kill... In order to do...";

-	mes "Must... How to go... the 2nd";

-	mes "underground level...";

-	mes "You need more... Holy power... in";

-	mes "order to... Otherwise, it's";

-	mes "impossible...";

-	next;

-	mes "[Boonthom]";

-	mes "That was written by one of my";

-	mes "comrades who entered the ruins,";

-	mes "as he regretted letting the tiger";

-	mes "live, let it return";

-	next;

-	mes "[Boonthom]";

-	mes "If you were able to find this note,";

-	mes "you must have strong determination";

-	mes "to venture through the ruins.";

-	next;

-	mes "[Boonthom]";

-	mes "As you can guess from the";

-	mes "note, the 2nd underground level is";

-	mes "very very dangerous. You will need";

-	mes "holy threads that contains even more";

-	mes "holy protection.";

-	next;

-	mes "[Boonthom]";

-	mes "Now, go and gather some materials";

-	mes "so that I can create more powerful";

-	mes "holy threads for you.";

-	next;

-	mes "[Boonthom]";

-	mes "^4466772 Holy Water^000000,";

-	mes "^4466771 Yggdrasil Leaf^000000,";

-	mes "^4466772 Needle Packet^000000 and";

-	mes "^4466772 Spool^000000.";

-	next;

-	mes "[Boonthom]";

-	mes "Return to me";

-	mes "once you have";

-	mes "gathered everything.";

-	set ayodot,7;

-	close;

-s_ICheck:	

-	if(countitem(523) < 2 || countitem(610) < 1 || countitem(7213) < 2 || countitem(7217) < 2)goto s_NEnoughItems;

-	if(ayodot == 8)goto s_Process;

-	mes "[Boonthom]";

-	mes "Hmmm~";

-	mes "You've brought";

-	mes "everything. Quite";

-	mes "the enthusiastic one,";

-	mes "aren't you?";

-	next;

-	mes "[Boonthom]";

-	mes "Ooooohmmmmm...";

-	next;

-	mes "[Boonthom]";

-	mes "Hmmmmmm...";

-	mes "Hmmmmmmmmm.";

-	next;

-	mes "[Boonthom]";

-	mes "Pffff pffff...";

-	next;

-s_Process:

-	if(countitem(523) < 2 || countitem(610) < 1 || countitem(7213) < 2 || countitem(7217) < 2)goto s_NEnoughItems;

-	delitem 523,2;

-	delitem 610,1;

-	delitem 7213,2;

-	delitem 7217,2;

-	getitem 7287,1;

-	if(ayodot != 8)set ayodot,8;

-	mes "[Boonthom]";

-	mes "Here you go.";

-	mes "Please take these holy threads.";

-	mes "With this, you will be able to";

-	mes "enter the ruins with less worry.";

-	next;

-	mes "[Boonthom]";

-	mes "Even if you lost this, don't worry.";

-	mes "Just bring me the materials, and";

-	mes "I will make you another one.";

-	close;

-s_NEnoughItems:

-	mes "[Boonthom]";

-	mes "Hmmm...?";

-	mes "Didn't I tell you";

-	mes "what I need to make";

-	mes "a more powerful";

-	mes "holy thread?";

-	next;

-	mes "[Boonthom]";

-	mes "^4466772 Holy Water^000000,";

-	mes "^4466771 Yggdrasil Leaf^000000,";

-	mes "^4466772 Needle Packet^000000 and";

-	mes "^4466772 Spool^000000.";

-	next;

-	mes "[Boonthom]";

-	mes "Return to me";

-	mes "with those items";

-	mes "And I will craft";

-	mes "more powerful holy";

-	mes "threads for you.";

-	close;

-s_Check2:

-	if(countitem(7285) < 1)goto s_Lose;

-	if(countitem(7287) < 1)goto s_LoseThreads;

-	mes "[Boonthom]";

-	mes "Those threads";

-	mes "will protect you";

-	mes "from the spiritual";

-	mes "dangers, but it's up";

-	mes "to you to defend yourself";

-	mes "from monster attacks, okay?";

-	close;

-s_LoseThreads:

-//Custom Dialogues

-	mes "[Boonthom]";

-	mes "I can feel the absence of holy power.";

-	mes "You lost the holier threads didn't you?";

-	next;

-	mes "[Boonthom]";

-	mes "But that's alright, I can make a new one";

-	mes "So... Do you want one?";

-	next;

-	menu "Yeah!",s_ICheck,"Nah",-;

-

-	mes "[Boonthom]";

-	mes "Come back anytime!";

-	close;

-}

-ayo_fild01.gat,129,197,7	script	Puraim	842,{

-	if(countitem(7285) > 0)goto s_Dungeon; //Holy Threads

-	mes "[Puraim]";

-	mes "If I were you, I wouldn't even dare to approach";

-	mes "The ruins down over there.";

-	next;

-	mes "[Puraim]";

-	mes "Anyone who doesn't have the protection of a holy spirit will be easy game for the evil creatures living there. You'd be killed in no time at all!";

-	next;

-	mes "[Puraim]";

-	mes "Go back, adventurer.";

-	mes "If you wish to explore this area, you'd better show me some holy spirit.";

-	close;

-s_Dungeon:

-	mes "[Puraim]";

-	mes "Huh...?";

-	mes "I feel it!";

-	mes "I can feel the power of holiness!";

-	mes "It's coming from you!";

-	next;

-	mes "[Puraim]";

-	mes "I guess you can go ahead into the ruins. So that's what you want? To explore this aera?";

-	next;

-	mes "[Puraim]";

-	mes "I would suggest against coming inside. Even the local people fear this area.";

-	next;

-	mes "[Puraim]";

-	mes "If the Sa-mhing Tiger wasn't around, there would still be all the evil spirits in this place. Even with the holy threads, this place is still dangerous.";

-	next;

-	mes "[Puraim]";

-	mes "So what do you want to do? Do you still want to explore the area, adventurer?";

-	next;

-	menu "Yes",s_Yes,"No! I'm too afraid of the ruins now.",-;

-

-	mes "[Puraim]";

-	mes "Good decision!";

-	mes "As I expected, you're smart enough not to stupidly jeopardize your life.";

-	close;

-s_Yes:

-	mes "[Puraim]";

-	mes "Hmmm...";

-	mes "It seems you adventurers are tempted by the thrill of danger, or you've all got some death wish.";

-	next;

-	mes "[Puraim]";

-	mes "Oh well, that's none of my business. After all, you already have a holy spirit. Still, be careful. You might not want to go to the 2nd underground level of the ruins.";

-	next;

-	mes "[Puraim]";

-	mes "As you Rune-Midgardians say, 'curiousity killed the cat.' Anyway, go for it!";

-	next;

-	mes "[Puraim]";

-	mes "^3C2EE6He shoved you off the hill and you plummet like a rock.";

-	close2;

-	set @hpcheck,readparam(6)/10;

-	if(readparam(5) < @hpcheck)goto s_SetHp;

-	percentheal -10,0;

-s_Warp:

-	warp "ayo_fild02.gat",30,135;

-	end;

-s_SetHp:

-	set @hpcheck2,readparam(5)-1;

-	heal -@hpcheck2,0;

-	goto s_Warp;

-}

-	

-ayo_dun01.gat,260,42,4	script	LocationActivator	139,4,0,{

-	if(ayodot > 5)end;

-	if(countitem(7285) > 0)goto s_Dots;

-	end;

-s_Dots:

-	mes "- Holy threads in your pocket";

-	mes "suddenly started glowing. You felt";

-	mes "something is near you.-";

-	if(ayodot == 0)goto s_0;

-	if(ayodot == 1)goto s_1;

-	if(ayodot == 2)goto s_2;

-	if(ayodot == 3)goto s_3;

-	if(ayodot == 4)goto s_4;

-	if(ayodot == 5)goto s_5;

-	end;

-

-s_0:

-	viewpoint 1,198,164,1,0xFF0000;

-	viewpoint 1,87,16,2,0xFF0000;

-	viewpoint 1,268,215,3,0xFF0000;

-	viewpoint 1,147,274,4,0xFF0000;

-	viewpoint 1,99,118,5,0xFF0000;

-	viewpoint 1,16,188,6,0xFF0000;

-	stopnpctimer;

-	close;

-s_1:

-	viewpoint 1,87,16,2,0xFF0000;

-	viewpoint 1,268,215,3,0xFF0000;

-	viewpoint 1,147,274,4,0xFF0000;

-	viewpoint 1,99,118,5,0xFF0000;

-	viewpoint 1,16,188,6,0xFF0000;

-	close;

-s_2:

-	viewpoint 1,268,215,3,0xFF0000;

-	viewpoint 1,147,274,4,0xFF0000;

-	viewpoint 1,99,118,5,0xFF0000;

-	viewpoint 1,16,188,6,0xFF0000;

-	close;

-s_3:

-	viewpoint 1,147,274,4,0xFF0000;

-	viewpoint 1,99,118,5,0xFF0000;

-	viewpoint 1,16,188,6,0xFF0000;

-	close;

-s_4:

-	viewpoint 1,99,118,5,0xFF0000;

-	viewpoint 1,16,188,6,0xFF0000;

-	close;	

-s_5:

-	viewpoint 1,16,188,6,0xFF0000;

-	close;

-}

-

-ayo_dun01.gat,198,164,4	script	#invayo1	111,{

-

-	if(countitem(7285) < 1)end;

-	if(ayodot == 0)goto s_First;

-

-	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 1st part of the slate.";

-	close;

-

-s_First:

-

-	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 1st part of the slate.";

-	next;

-	mes "^3C2EE6It reads '^0000FFDo not enter the 2nd underground level.^3C2EE6' You are unable to read the rest of the message.";

-	set ayodot,1;

-	close;

-

-}

-

-ayo_dun01.gat,87,16,4	script	#invayo2	111,{

-

-	if(countitem(7285) < 1)end;

-	if(ayodot == 1)goto s_First;

-

-	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 2nd part of the slate.";

-	close;

-

-s_First:

-

-	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 2nd part of the slate.";

-	next;

-	mes "^3C2EE6It reads '^0000FF...is danger... You wil....^3C2EE6' You are unable to read the rest of the message.";

-	set ayodot,2;

-	close;

-

-}

-

-ayo_dun01.gat,268,215,4	script	#invayo3	111,{

-

-	if(countitem(7285) < 1)end;

-	if(ayodot == 2)goto s_First;

-

-	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 3rd part of the slate.";

-	close;

-

-s_First:

-

-	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 3rd part of the slate.";

-	next;

-	mes "^3C2EE6It reads '^0000FF...encounter...tiger....^3C2EE6' You are unable to read the rest of the message.";

-	set ayodot,3;

-	close;

-

-}

-

-ayo_dun01.gat,147,274,4	script	#invayo4	111,{

-

-	if(countitem(7285) < 1)end;

-	if(ayodot == 3)goto s_First;

-

-	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 4th part of the slate.";

-	close;

-

-s_First:

-

-	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 4th part of the slate.";

-	next;

-	mes "^3C2EE6It reads '^0000FFYou must kill... In order to do... MUST ... How to go... the 2nd underground level...^3C2EE6' You are unable to read the rest of the message.";

-	set ayodot,4;

-	close;

-

-}

-

-ayo_dun01.gat,99,118,4	script	#invayo5	111,{

-	if(countitem(7285) < 1)end;

-	if(ayodot == 4)goto s_First;

-	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 5th part of the slate.";

-	close;

-s_First:

-	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 5th part of the slate.";

-	next;

-	mes "^3C2EE6It reads '^0000FFYou need more... Holy power... in order to...^3C2EE6' You are unable to read the rest of the message.";

-	set ayodot,5;

-	close;

-

-}

-	

-ayo_dun01.gat,16,188,4	script	#invayo6	111,{

-	if(countitem(7285) < 1)end;

-	if(ayodot == 5)goto s_First;

-	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the last part of the slate.";

-	close;

-s_First:

-	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the last part of the slate.";

-	next;

-	mes "^3C2EE6It reads '^0000FFOtherwise, it's impossible...^3C2EE6' You are unable to read the rest of the message.";

-	set ayodot,6;

-	close;

-}

-

-ayo_dun01.gat,24,283,4	script	#ayowarp	111,{

-	if(countitem(7287) < 1)goto s_NoEntry;

-	mes "^3C2EE6The holy threads emanate a powerful sense of safety and security. With the protection of holiness, you begin your descent into the 2nd level..";

-	close2;

-	set @ayodunwarp,rand(1,2);

-	if(@ayodunwarp == 2)goto s_2;

-	warp "ayo_dun02.gat",275,26;

-	end;

-s_2:

-	warp "ayo_dun02.gat",24,26;

-	end;	

-s_NoEntry:

-	mes "^3C2EE6You find what seems to be the entrance to the 2nd level. However, you are filled with an overwhelming sense of dread. Somehow, you can't bring yourself to go down...";

-	close;

-}

-

-ayo_dun01.gat,23,283,4	duplicate(#ayowarp)	#ayodupe1	111

-ayo_dun01.gat,25,283,4	duplicate(#ayowarp)	#ayodupe2	111

-ayo_dun01.gat,26,283,4	duplicate(#ayowarp)	#ayodupe3	111

-

-//============================================================

-//============================================== Tom Yum Goong

-//====================================================== Quest

-

-

-ayothaya.gat,196,265,3	script	Einon	842,{

-	if(tomyumgoong == 5)goto s_Done;

-	if(tomyumgoong == 1 || tomyumgoong == 2 || tomyumgoong == 3 || tomyumgoong == 4)goto s_Resta;

-	mes "[Einon]";

-	mes "Do you know what the";

-	mes "most popular cuisine";

-	mes "of this village is?";

-	next;

-	mes "[Einon]";

-	mes "Ayothaya is world famous for its regional cuisine, but out of all Ayothayan dishes, '^3C2EE6Tom Yum Goong^000000' is the best.";

-	next;

-	mes "[Einon]";

-	mes "Tom Yum Goong is a type of soup that is very spicy. Try it once, and you will be amazed by its profound taste. Try it twice, and you will be enraptured by its tantalizing aroma.";

-	next;

-	mes "[Einon]";

-	mes "It's really one of the most delicious foods in the world!";

-	mes "Everyone in the world would  would want to try this at least once in his lifetime. So, would you like to try some?";

-	next;	

-	menu "Sure thing.",s_Sure,"No, thanks. I hate spicy food.",-;

-

-	mes "[Einon]";

-	mes "Oh I see...";

-	mes "However, when you";

-	mes "change your mind,";

-	mes "please come back.";

-	close;

-

-s_Sure:

-	mes "[Einon]";

-	mes "Okay...!";

-	mes "Now who would be best for preparing Tom Yum Goong for you?";

-	mes "Hmmmmm...";

-	next;

-	mes "[Einon]";

-	mes "Everyone in the village knows how to make it, but I recommend that you go visit ^0000FF Mali the Spicy^000000.";

-	next;

-	mes "[Einon]";

-	mes "She is the best cook when it comes to Tom Yum Goong!";

-	mes "Why don't you ask her to cook you some?";

-	set tomyumgoong,1;

-	close;

-s_Resta:

-	mes "[Einon]";

-	mes "Ah, you wanna know where ^0000FFMali the Spicy^000000 is?";

-	mes "Well, there's not too many places a cook would stay other than in a restaurant, right? Hahaha~";

-	close;

-s_Done:

-	mes "[Einon]";

-	mes "Golden Ayothaya...";

-	mes "Although I've grown";

-	mes "up in this village,";

-	mes "I still think my village";

-	mes "is magnificient and beautiful.";

-	next;

-	mes "[Einon]";

-	mes "What do you think?";

-	mes "Wouldn't you agree with me?";

-	close;	

-}

-

-ayo_in01.gat,145,163,4	script	Cook	839,{	

-	if(tomyumgoong == 5)goto s_Busy;

-	if(ayopause == 1)goto s_Pause;

-	if(ayopause == 2)goto s_Pause2;

-	if(tomyumgoong == 4)goto s_Chilee;

-	if(tomyumgoong == 3)goto s_Lemons;

-	if(tomyumgoong == 2)goto s_Shrimp;

-	mes "[Mali the Spicy]";

-	mes "Hello, there!";

-	mes "I am called Mali the Spicy.";

-	mes "All of my dishes always amaze my customers with their tempting scents and deep flavors.";

-	next;

-	mes "[Mali the Spicy]";

-	mes "I am especially proud of my ^3C2EE6Tom Yum Goong^000000, which is the best in the village. I suppose it's my fate to cook the greatest Tom Yum Goong ever.";

-	if(tomyumgoong == 1)goto s_Quest;

-	close;

-s_Quest:

-	next;

-	mes "[Mali the Spicy]";

-	mes "Oh I see...";

-	mes "You want me to cook Tom Yum Goong for you, don't you?";

-	next;

-	mes "[Mali the Spicy]";

-	mes "Honestly, I've been really buse ever since I opened this restaurant. If you really wish to taste my Tom Yum Goong, would you do something for me?";

-	next;

-	menu "Sure!",s_Sure,"Eh... I dunno.",-;

-

-	mes "[Mali the Spicy]";

-	mes "I understand this might be difficult to do, but it's worth a try if you really want to taste the best Tom Yum Goong.";

-	close;

-

-s_Sure:

-	mes "[Mali the Spicy]";

-	mes "First, would you go get the ingredients to make Tom Yum Goong for me? I'll need some ^FF0000Shrimps^000000, ^FF0000Chilees^000000 and ^FF0000Lemons^000000.";

-	next;

-	mes "[Mali the Spicy]";

-	mes "Remember, Shrimp is the main ingredient of this dish. So, the fresher the Shrimp, the tastier your food will be.";

-	next;

-	menu "Where can I find them?",-;

-	mes "[Mali the Spicy]";

-	mes "I expected you to ask me that.";

-	mes "For shrimps, look around the beach. You should see a lot of them there.";

-	next;

-	mes "[Mali the Spicy]";

-	mes "However, you might have a hard time finding them since you haven't done that before. So just buy some Shrimp from the guy who sells the freshest Shrimp around.";

-	next;

-	mes "[Mali the Spicy]";

-	mes "Hmmm...";

-	mes "If you mention";

-	mes "my name, that guy";

-	mes "might give you a discount";

-	next;

-	mes "[Mali the Spicy]";

-	mes "His name is ^0000FFThongpool^000000.";

-	mes "He will be somewhere around the village selling Shrimps. Go and ask him to give you 20 Shrimps to cook Tom Yum Goong.";

-	set tomyumgoong,2;

-	close;

-s_Shrimp:

-	if(countitem(567) > 19)goto s_EnoughShrimp;

-	mes "[Mali the Spicy]";

-	mes "Did you visit ^0000FFThongpool^000000?";

-	mes "He will be somewhere around the village selling Shrimps. Go and ask him to give you 20 Shrimps to cook Tom Yum Goong.";

-	close;

-

-s_EnoughShrimp:

-	delitem 567,20;

-	mes "[Mali the Spicy]";

-	mes "Ah you came back!";

-	mes "Now, let me see what"; 

-	mes "you've brought. Hmmm...";

-	mes "These are...";

-	next;

-	set ayopause,1;

-	set ayoshrimps,0;

-	emotion e_no1;

-	mes "[Mali the Spicy]";

-	mes "The freshest Shrimp that";

-	mes "I've been looking for!";

-	mes "With these big and fresh Shrimps,";

-	mes "I can cook the best Tom Yum Goong";

-	mes "for you! Thank you so much!";

-	next;

-	mes "[Mali the Spicy]";

-	mes "It will be a perfect food with the natural sweetness of the Shrimp, the sourness of Lemons and a little bit of fish sauce!";

-	next;

-s_Pause:

-	mes "[Mali the Spicy]";

-	mes "Oh... Right";

-	mes "But we only have Shrimp.";

-	mes "Now, I want you to bring me some ^FF0000Lemons^000000.";

-	next;

-	menu "Where can I find Lemons?",s_WLemon,"I hate sour food. I'd better quit!",-;

-

-	mes "[Mali the Spicy]";

-	mes "It's your call.";

-	mes "But remember...";

-	mes "The shimps might go bad while you're taking a rest.";

-	close;

-

-s_WLemon:

-	mes "[Mali the Spicy]";

-	mes "A few days ago, I saw a good";

-	mes "Lemon tree while taking a walk.";

-	mes "But this tree belongs to an";

-	mes "ordinary man who's not a Fruit Merchant.";

-	next;

-	mes "[Mali the Spicy]";

-	mes "I'm not sure wheter or not he'd sell Lemons to you, but you can try, I guess.";

-	set ayopause,0;

-	set tomyumgoong,3;

-	close;

-s_Lemons:

-	if(countitem(568) > 9)goto s_EnoughLemon;

-	mes "[Mali the Spicy]";

-	mes "Alright...";

-	mes "I'm counting on you";

-	mes "to get the best Lemons";

-	mes "from the man who owns that tree.";

-	next;

-	mes "[Mali the Spicy]";

-	mes "Somehow, you've got";

-	mes "to get those high quality";

-	mes "Lemons so that I can make some Tom Yum Goong!";

-	close;

-s_EnoughLemon:

-	delitem 568,10;

-	emotion e_gasp;

-	mes "[Mali the Spicy]";

-	mes "Welcome back!";

-	mes "Wow, you came back";

-	mes "really fast! Okay, let me";

-	mes "see the Lemons";

-	mes "you brought?";

-	next;

-	set ayopause,2;

-	mes "[Mali the Spicy]";

-	mes "Wow, great!";

-	mes "These are really fresh Lemons!";

-	mes "How could you bring all of these by";

-	mes "yourself? Thanks for your trouble~";

-	next;

-s_Pause2:

-	mes "[Mali the Spicy]";

-	mes "Now, you should go buy";

-	mes "some ^FF0000Chilees^000000 and some";

-	mes "other materials in the market.";

-	next;

-	mes "[Mali the Spicy]";

-	mes "When you talk";

-	mes "to the Merchants";

-	mes "in the Market, they";

-	mes "will know what you want.";

-	next;

-	menu "Okay, I'll be right back.",s_Okay,"Ah, I'm tired now. Let me take a rest first...",-;

-

-	mes "[Mali the Spicy]";

-	mes "It's your call.";

-	mes "But remember...";

-	mes "The Shrimps might go bad";

-	mes "while you're taking a rest.";

-	close;	

-s_Okay:

-	mes "[Mali the Spicy]";

-	mes "See you in a bit~";

-	set ayopause,0;

-	set tomyumgoong,4;

-	close;

-s_Chilee:

-	if(countitem(7286) > 29)goto s_EnoughChilee;

-	mes "[Mali the Spicy]";

-	mes "Did you get the Chilees?";

-	mes "You should talk to the Merchants in the Market, they'll know what you want.";

-	close;

-s_EnoughChilee:

-	delitem 7286,30;

-	mes "[Mali the Spicy]";

-	mes "Now...";

-	mes "Everything is all set!";

-	mes "Before we start, let me";

-	mes "check the materials.";

-	next;

-	mes "[Mali the Spicy]";

-	mes "^FF0000Shrimp^000000, ^FF0000Chilees^000000, ^FF0000Lemons^000000...";

-	mes "Fish sauce and other little";

-	mes "things...";

-	next;

-	mes "[Mali the Spicy]";

-	mes "Perfect!";

-	mes "Shall we begin?";

-	next;

-	misceffect 125;

-	mes "^D0122C*Tuk*";

-	mes "^6F1E6A*Tup*";

-	mes "^357030*Puk*";

-	next;

-	misceffect 124;

-	mes "^D10C3A*Chop chop*";

-	mes "^DCB060*Tup tup tup*";

-	mes "^8CA7BA*Pu pu*";

-	next;

-	misceffect 23;

-	misceffect 135;

-	mes "^86733BTup tup ^396254chook";

-	mes "^486354chop chop";

-	mes "^BA0010Tup tup tup ^28842FPu pu";

-	next;

-	emotion e_omg;

-	misceffect 99;

-	misceffect 90;

-	mes "Wah^050158ah^241999ahhh^0F48CBhaaaahhh^000000!";

-	next;

-	mes "[Mali the Spicy]";

-	mes "...";

-	mes "......";

-	mes ".........";

-	next;

-	set tomyumgoong,5;

-	set ayoshrimps,0;

-	getitem 566,10;

-	emotion e_no1;

-	mes "[Mali the Spicy]";

-	mes "Here's your";

-	mes "Tom Yum Goong!";

-	mes "Ah~ This taste,";

-	mes "this scent... Yeah.";

-	mes "I know I did a good job.";

-	next;

-	mes "[Mali the Spicy]";

-	mes "Do you know what is the secret of Tom Yum Goong? It isn't simply just food. This has the power to heal you, and help you get into better shape.";

-	next;

-	mes "[Mali the Spicy]";

-	mes "Because...";

-	mes "It countains the";

-	mes "power of God.";

-	next;

-	mes "[Mali the Spicy]";

-	mes "Okay...!";

-	mes "I'm giving you";

-	mes "10 Tom Yum Goong";

-	mes "free of charge~";

-	next;

-	mes "[Mali the Spicy]";

-	mes "Thank you for all the trouble";

-	mes "you have been through to get these";

-	mes "ingredients. It would make me happy";

-	mes "if you shared Tom Yum Goong with";

-	mes "your friends.";

-	next;

-	mes "[Mali the Spicy]";

-	mes "Share the flavor of Ayothaya, and";

-	mes "let them know how beautiful our";

-	mes "land is. It was good to see you,";

-	mes "take care now~";

-	close;

-s_Busy:

-	emotion e_wah;

-	mes "[Mali the Spicy]";

-	mes "Ah...!";

-	mes "So busy, so busy!";

-	mes "My customers never get tired of";

-	mes "the taste of my Tom Yum Goong!";

-	mes "Heh heh heh~!";

-	close;	

-}

-

-ayothaya.gat,213,95,7	script	Merchant	841,{

-	if(tomyumgoong == 4)goto s_Chili;

-s_JumpBack:

-	mes "[Merchant Thongdum]";

-	mes "Hello there!";

-	mes "Ever try a Chili before?";

-	next;

-	mes "[Merchant Thongdum]";

-	mes "Despite its tiny appearance, it has a very strong flavor. It's also hot and spicy, so you should be careful when you eat one.";

-	next;

-	mes "[Merchant Thongdum]";

-	mes "The people of Ayothaya enjoy sensational food with distinct, spicy flavors. In Ayothayan cuisine, we use things like Chilis, Garlics, Ginger and Cilantro.";

-	next;

-	mes "[Merchant Thongdum]";

-	mes "I'm selling Chilis,";

-	mes "so if you need any,";

-	mes "please come to me~";

-	close;

-s_Chili:

-	if(countitem(7286) > 29)goto s_JumpBack;

-	mes "[Merchant Thongdum]";

-	mes "Hello, there~";

-	mes "Are you looking for";

-	mes "ingredients to make";

-	mes "Tom Yum Goong?";

-	next;

-	mes "[Merchant Thongdum]";

-	mes "Let's see...";

-	mes "I'm selling chilis,";

-	mes "fish sauce, and some";

-	mes "spices and flavorings";

-	mes "you'll need. I'll sell";

-	mes "it all to you for 2,000 zeny.";

-	next;

-	menu "Thanks, I'll take it",s_Take,"It's a rip-off, man!",-;

-

-	mes "[Merchant Thongdum]";

-	mes "Don't say that.";

-	mes "My prices are always";

-	mes "reasonable. I want you to know";

-	mes "that I'm a respectable Merchant.";

-	close;

-

-s_Take:

-	if(Zeny < 2000) goto s_NoZeny;

-	set Zeny, Zeny - 2000;

-	getitem 7286,30;

-	mes "[Merchant Thongdum]";

-	mes "Thank you.";

-	mes "I hhope you will enjoy";

-	mes "your Tom Yum Goong~";

-	close;

-

-s_NoZeny:

-//custom dialogues

-	emotion e_wah;

-	mes "[Merchant Thongdum]";

-	mes "Aw, you don't have enough zeny.";

-	mes "Please come back when you do!";

-	close;

-}

-

-ayothaya.gat,121,240,7	script	Mr. Jun	842,1,1,{

-	mes "[Mr. Jun]";

-	mes "...";

-	close;

-OnTouch:

-	if(ayolemon == 2)end;

-	if(ayolemon == 1)goto s_Again;

-	if(tomyumgoong == 3)goto s_Lemon;

-	end;

-s_Lemon:

-	emotion e_hmm;

-	mes "[Mr. Jun]";

-	mes "Hello, there?";

-	mes "Did you need";

-	mes "some help...?";

-	next;

-	menu "I need some Lemons.",s_Quest,"No, thanks.",-;

-

-	mes "[Mr. Jun]";

-	mes "Feel free to";

-	mes "ask me for help";

-	mes "any time, okay?";

-	close;

-

-s_Quest:

-	mes "[Mr. Jun]";

-	mes "Umm...";

-	mes "Lemons?";

-	mes "As you see, I have plenty";

-	mes "of Lemons on my tree";

-	mes "Do you really need some?";

-	next;

-	menu "Yes, I will pay you.",s_Pay,"No, thanks.",-;

-

-	mes "[Mr. Jun]";

-	mes "Hmm...";

-	mes "Now what can";

-	mes "I possibly do";

-	mes "with all these";

-	mes "Lemons?";

-	close;

-

-s_Pay:

-	mes "[Mr. Jun]";

-	mes "I started growing this Lemon tree as a hobby, but I didn't expect to have such a good havest of sweet, succulent Lemons.";

-	next;

-	mes "[Mr. Jun]";

-	mes "Did you just say you were going to pay me for the Lemons? Oh, you've got me wrong. I don't intend to sell these.";

-	next;

-	mes "[Mr. Jun]";

-	mes "But...";

-	mes "I'm more than willing";

-	mes "to share some of them with";

-	mes "you, but only if you can...";

-	next;

-	mes "[Mr. Jun]";

-	mes "Play a small game with me!";

-	mes "How about that? I've been so bored";

-	mes "to death. Even an old man like me";

-	mes "needs to enjoy himself!";

-	next;

-	mes "[Mr. Jun]";

-	mes "Hahahaha~!";

-	mes "What do you say?";

-	mes "Would you like to try?";

-	next;

-	menu "Sure, why not!",s_Game,"No, thanks.",-;

-

-	mes "[Mr. Jun]";

-	mes "Afraid are we?";

-	mes "There's no fooling you:";

-	mes "I'm one of the best at games!";

-	close;

-

-s_Again:

-//custom dialogues

-	mes "[Mr. Jun]";

-	mes "Oh, you're back!";

-	mes "Would you like to try again?";

-	next;

-	menu "Yeah, I'm going to beat you.",s_Game4,"Nah, I just passed by.",-;

-

-	mes "[Mr. Jun]";

-	mes "Ha ha ha!";

-	mes "Come back when you think you can beat me.";

-	close;

-s_Game:

-	mes "[Mr. Jun]";

-	mes "Good!";

-	mes "The game I want us to play is an easy children's game.";

-	next;

-	mes "[Mr. Jun]";

-	mes "^6B1312Rock,";

-	mes "^6B1312Paper, Scissors!";

-	mes "Perhaps you've heard";

-	mes "of it in your land.";

-	next;

-	mes "[Mr. Jun]";

-	mes "Nuh-uh, don't look at me like that.";

-	mes "I'm an old man, and I want to play this game re-live my youth a little bit. You'll understand when you're my age.";

-	next;

-	mes "[Mr. Jun]";

-	mes "Alright, if you win";

-	mes "^3C2EE63^000000 out of ^3C2EE65^000000 matches,";

-	mes "The lemons are yours.";

-	mes "Are you ready?";

-	next;

-s_Game4:

-	mes "[Mr. Jun]";

-	mes "Okay...";

-	mes "As you kids say,";

-	mes "^6B1312Let's get eXtreme!";

-s_Game3:

-	next;

-	mes "[Mr. Jun]";

-	mes "Rock!";

-	mes "Paper!";

-	mes "Scissors!";

-s_Game2:

-	next;

-	menu "Rock",s_Rock,"Paper",s_Paper,"Scissors",s_Scissors;

-

-s_Rock:

-	set @npcvar,rand(1,3);

-	set @playervar,1;

-	next;

-	goto s_Play;

-s_Paper:

-	set @npcvar,rand(1,3);

-	set @playervar,2;

-	next;

-	goto s_Play;

-s_Scissors:

-	set @npcvar,rand(1,3);

-	set @playervar,3;

-	next;

-	goto s_Play;

-s_Play:

-	if(@playervar == 1 && @npcvar == 1)goto s_RockRock;	

-	if(@playervar == 1 && @npcvar == 2)goto s_RockPaper;

-	if(@playervar == 1 && @npcvar == 3)goto s_RockScissors;

-	if(@playervar == 2 && @npcvar == 1)goto s_PaperRock;

-	if(@playervar == 2 && @npcvar == 2)goto s_PaperPaper;

-	if(@playervar == 2 && @npcvar == 3)goto s_PaperScissors;

-	if(@playervar == 3 && @npcvar == 1)goto s_ScissorsRock;

-	if(@playervar == 3 && @npcvar == 2)goto s_ScissorsPaper;

-	if(@playervar == 3 && @npcvar == 3)goto s_ScissorsScissors;

-s_RockRock:

-	emotion e_rock;

-	emotion 11,1;

-	goto s_Draw;

-s_RockPaper:

-	emotion e_paper;

-	emotion 11,1;

-	goto s_Lose;

-s_RockScissors:

-	emotion e_scissors;

-	emotion 11,1;

-	goto s_Win;

-s_PaperRock:

-	emotion e_rock;

-	emotion 12,1;

-	goto s_Win;

-s_PaperPaper:

-	emotion e_paper;

-	emotion 12,1;

-	goto s_Draw;

-s_PaperScissors:

-	emotion e_scissors;

-	emotion 12,1;

-	goto s_Lose;

-s_ScissorsRock:

-	emotion e_rock;

-	emotion 10,1;

-	goto s_Lose;

-s_ScissorsPaper:

-	emotion e_paper;

-	emotion 10,1;

-	goto s_Win;

-s_ScissorsScissors:

-	emotion e_scissors;

-	emotion 10,1;

-	goto s_Draw;

-s_Draw:

-	mes "[Mr. Jun]";

-	mes "Hmpf.";

-	mes "It's a draw";

-	mes "One more time!";

-	mes "Rock! Paper!";

-	mes "Scissors!";

-	goto s_Game2;

-s_Lose:

-	mes "[Mr. Jun]";

-	mes "Yes...!";

-	mes "Oh my god, yes!";

-	set @npcpoint,@npcpoint+1;

-	if(@npcpoint == 3)goto s_Lose2;

-	goto s_Game3;

-s_Win:

-	set @playerpoint,@playerpoint+1;

-	mes "[Mr. Jun]";

-	if(@playerpoint == 1)mes "Noooo...! This cannot be!";

-	if(@playerpoint == 2)mes "What...? I don't believe it! Bah.. !";

-	if(@playerpoint == 3)mes "No...! Sacrilege!";

-	if(@playerpoint == 3)goto s_Win2;

-	goto s_Game3;

-s_Lose2:

-	if(ayolemon != 1)set ayolemon,1;

-//Custom Dialogues

-	next;

-	mes "[Mr. Jun]";

-	mes "I won!";

-	mes "Seems like I can keep up with the kids. Ha ha ha!";

-	next;

-	mes "[Mr. Jun]";

-	mes "If you still want the lemons I'm up for another game. So please don't hesitate to come back.";

-	set @playerpoint,0;

-	set @npcpoint,0;

-	close;	

-s_Win2:

-	next;

-	mes "[Mr. Jun]";

-	mes "You... won.";

-	mes "I'm so exhausted.";

-	mes "I guess I can't compete with you youngsters anymore. Ha ha ha!";

-	next;

-	mes "[Mr. Jun]";

-	mes "As promised,";

-	mes "I shall share some";

-	mes "of my Lemons with you.";

-	mes "Grab as many as you want!";

-	next;

-	set ayolemon,2;

-	getitem 568,10;

-	mes "^3C2EE6You have plucked";

-	mes "^3C2EE610 Lemons from the tree.";

-	next;

-	emotion e_dots;

-	mes "[Mr. Jun]";

-	mes "Hmm...";

-	mes "Looks like you need a lot of them.";

-	mes "Oh well, that's fine with me. I had";

-	mes "a good time with you.";

-	next;

-	mes "[Mr. Jun]";

-	mes "Don't forget this though:";

-	mes "Don't be selfish, and always share";

-	mes "what you have with others. That's";

-	mes "one of the most important values";

-	mes "for human beings.";

-	close;

+//===== Athena Script =======================================
+//= Quest NPCs related to Ayothaya
+//===== By ================================================
+//= Fredzilla
+//===== Version ===========================================
+//= 1.6
+//===== Compatible With ===================================
+//= eAthena 1.0
+//===== Description =======================================
+//= Ayothaya Clue Quest, Ayothaya Shrimp Quest, Ayothaya
+//= Dungeon Quest, Tom Yum Goong Quest,
+//===== Comments ==========================================
+//= List or Variables used
+//= @fishing - 	Checks for if you have caught a fish or not, 
+//=	       	1/10 chance you will get the wedding ring if 
+//=		you have started that quest.
+//= weddingring - Signifies the start of the wedding ring 
+//=               quest, and used throughout to keep track of 
+//=               progress.
+//= recoveredring - Signifies you have retrieved the ring 
+//=		    and therefore can't just drop the ring and 
+//=		    get the same quest again.
+//= 1.0 - First Release, made with infomation from RagnaInfo
+//= 1.1 - added anti-novice protection [Lupus]
+//= 1.3 - Fixed exploit [Lupus]
+//= 1.4 Updated, more close to the official. Thanks to birkiczd
+//=	Also optimized it again, remove unused global variable [Lupus]
+//= 1.5 Removed Duplicates [Silent]
+//= 1.6 Moved quests from cities/ to here:
+//= Shrimp, Dungeon, Tom Yum Goong [Evera]
+//=========================================================
+
+//============================================================
+//============================================== Ayothaya Clue
+//====================================================== Quest
+ayo_dun02.gat,277,178,1	script	OBB	139,4,4,{
+	if(AyoOBB==1 || weddingring!=3) end;
+	mes "["+strcharinfo(0)+"]";
+	mes "Huh what is this?, not foot prints, this is an Old Blue coloured Box";
+	next;
+	set AyoOBB,1;
+	getitem 603,1;
+	logmes "Q_AYOTH1: got OBB";
+	mes "["+strcharinfo(0)+"]";
+	mes "I think I will keep it";
+	close;
+}
+//Dungeon 1 foot prints x 5
+ayo_dun01.gat,30,149,1	script	Clue#01	139,5,5,{
+	if(weddingring!=3) end;
+	npctalk "There are some foot prints here, they head off to the East.";
+	set @footprints1,1;
+	close;
+}
+ayo_dun01.gat,70,149,1	script	Clue#02	139,5,5,{
+	if(weddingring!=3) end;
+	npctalk "There are some more foot prints, they are heading off to the East too!";
+	set @footprints2,1;
+	close;
+}
+ayo_dun01.gat,100,149,1	script	Clue#03	139,5,5,{
+	if(weddingring!=3) end;
+	npctalk "More foot prints heading to the East, who do they belong too?";
+	set @footprints3,1;
+	close;
+}
+ayo_dun01.gat,190,149,1	script	Clue#04	139,5,5,{
+	if(weddingring!=3) end;
+	npctalk "More foot prints, but these are going North.";
+	set @footprints4,1;
+	close;
+}
+ayo_dun01.gat,261,263,1	script	Clue#05	139,5,5,{
+	if(weddingring!=3) end;
+	npctalk "There are some foot prints, they seem to head into that hole there.";
+	set @footprints5,1;
+	close;
+}
+
+//Dungeon 2 foot prints x 4 + 1 fake
+ayo_dun02.gat,222,204,1	script	Clue#06	139,5,5,{
+	if(weddingring!=3) end;
+	npctalk "Yet more foot prints, they are either going South or West.";
+	set @footprints6,1;
+	close;
+}
+ayo_dun02.gat,169,212,1	script	Clue#07	139,5,5,{
+	if(weddingring!=3) end;
+	npctalk "Looks like there are foot print going to the West.";
+	set @footprints7,1;
+	close;
+}
+ayo_dun02.gat,129,212,1	script	Clue#08	139,5,5,{
+	if(weddingring!=3) end;
+	npctalk "Ok these foot prints are either going to the North or West.";
+	set @footprints8,1;
+	close;
+}
+ayo_dun02.gat,79,212,1	script	Clue#09	139,7,7,{
+	if(weddingring!=3) end;
+	npctalk "These are very new, they are going North.";
+	set @footprints9,1;
+	close;
+}
+//FAKE
+ayo_dun02.gat,245,166,1	script	Clue#10	139,7,7,{
+	if(weddingring!=3) end;
+	npctalk "Seems something came by this way, to the East.";
+	close;
+}
+
+ayothaya.gat,233,105,7	script	Shuda	838,{
+	mes "[Shuda]";
+	if(BaseLevel<50) {
+		mes "Where is my ring!?!";
+		close;
+	}
+	if(weddingring==2) goto L_Quest2;
+	if(weddingring==3) goto L_OnQ2;
+	if(weddingring==4) goto L_QuestComplete;
+	if(weddingring==5) goto L_QuestOver;
+	if(countitem(7288)>=1) goto L_RingFound;
+	mes "Oh please wont you help me, my partner has gone missing, but not before droping our ^FF0000Engagement Ring^000000 maybe there is a way of ^0000FFfishing^000000 it out of the sea.";
+	set weddingring,1;
+	close;
+L_RingFound:
+	mes "Oh is that my ring!?!";
+	next;
+	mes "[Shuda]";
+	mes "Can I please have it back?";
+	next;
+	menu "Yes, here you go",N_Yes,"No, I found it, it's mine",-;
+	mes "[Shuda]";
+	mes "Think what you want, but that ring is mine, and without it I can never marry my true love.";
+	mes "";
+	mes "Where ever he may be.";
+	close;
+N_Yes:
+	mes "[Shuda]";
+	if(countitem(7288)<1) {
+		mes "Go away, cheater!";
+		close;
+	}
+	delitem 7288,1;
+	mes "Thank you so much, now I have this back maybe my partner will return.";
+	set weddingring,2;
+	next;
+	mes "[Shuda]";
+	mes "Come back to me when you have time, I need you to do something else for me.";
+	close;
+L_Quest2:
+	mes "It seems even though I have my ring back my partner ^FF0000Annon^000000 doesn't seem to want to come back to me";
+	mes "Maybe he has gotten lost somewhere";
+	mes "";
+	mes "Will you please go and look for him";
+	next;
+	menu "Yes, I would be glad to",L_YesQ2,"No, he will come back on his own",-;
+	mes "[Shuda]";
+	mes "Well he might, but I still need someone to find him, I am afraid something might have happened to him.";
+	close;
+L_YesQ2:
+	set weddingring,3;
+	mes "[Shuda]";
+	mes "Oh thank you so much, I think someone in the town might have seen where he went, maybe he can give you a clue";
+	close;
+L_OnQ2:
+	mes "Have you been able to find my love yet?";
+	mes " ";
+	mes "Please hurry.";
+	mes "*tear*";
+	close;
+L_QuestComplete:
+	mes "You have found him ?!?";
+	mes "Then where is he???";
+	next;
+	mes "You explain the situation.";
+	next;
+	mes "[Shuda]";
+	mes "Well, I thought he was my one.";
+	mes "I don't think I will ever find another like him.";
+	mes "*tear*";
+	next;
+	set weddingring,5;
+	mes "[Shuda]";
+	mes "I can understand, but why not come and talk to me about it, we might have been able to talk it out.";
+	close;
+L_QuestOver:
+	mes "Nice to see you again "+strcharinfo(0)+". How have you been?";
+	close;
+}
+
+ayothaya.gat,253,99,3	script	Fisherman#01	843,{
+	mes "[Dannai]";
+	mes "This place is known to be teeming with fish. The fish here tend to eat anything they find, so it's easy to catch them.";
+	next;
+	mes "[Dannai]";
+	mes "We are providing a fishing rod rental service. Every time you fish, you'll need ^4466771 Monster's Food^000000 to use as bait, and pay a rod rental fee of ^44667750 Zeny^000000.";
+	next;
+	mes "[Dannai]";
+	mes "Would you";
+	mes "like to try?";
+	next;
+	menu "Yes",-,"No",L_No;
+	if(countitem(528) < 1 || zeny < 50) goto L_Fail;
+	delitem 528,1;
+	set zeny,zeny-50;
+	mes "[Fisher Man]";
+	mes "Ok give it a good swing.";
+	mes "Lets see if you got anything.";
+	next;
+	set @fishing, rand(1,10);
+	mes "[Fisher Man]";
+	if(@fishing<5) goto L_Nothing;
+	if(@fishing<10) goto L_Fish;
+	if(@fishing==10) goto L_RingCheck;
+L_No:
+	mes "[Dannai]";
+	mes "Come back anytime.";
+	close;
+L_Fail:
+	mes "[Dannai]";
+	mes "Seems you don't have what I need";
+	mes "Come back when you have some Monster Feed, and 50 zeny.";
+	close;
+L_Nothing:
+	mes "Sorry it seems like you didn't get anything, try again anytime.";
+	close;
+L_Fish:
+	getitem 544,1;
+	mes "Look at this you got yourself a fish, well done.";
+	close;
+L_RingCheck:
+	if(weddingring!=1 || recoveredring==1) goto L_Fish;
+	mes "What is this, some sort of ring!!!";
+	mes "Well I guess since you fished it out you can keep it";
+	next;
+	getitem 7288,1;
+	mes "[Fisher Man]";
+	mes "Come back anytime";
+	set weddingring,0;
+	set recoveredring,1;
+	close;
+}
+
+ayothaya.gat,192,171,4	script	Old Man#10	824,{
+	mes "[Tham]";
+	if(weddingring==3) goto L_OnQ2;
+	mes "What a nice day it is today, don't you agree?";
+	close;
+L_OnQ2:
+	mes "What! Annon is missing, I only saw him a few minutes ago.";
+	next;
+	mes "[Tham]";
+	mes "He was heading for Ayothaya's dungeon, I thought this kind of odd, and now you say he hasn't come back?!?";
+	mes "I think you should follow him in there, just in case something has happened to him";
+	next;
+	mes "[Tham]";
+	mes "Maybe he has left something inside the dungeon, something that can lead you to him";
+	mes "But thats just me";
+	next;
+	mes "[Tham]";
+	mes "You can get to the dungeon through the old temple, it is one map to the right of here, and down the hill.";
+	close;
+}
+
+ayo_dun02.gat,91,264,4	script	Guy	822,{
+	if(weddingring==4) goto L_QuestComplete;
+	if(weddingring==5) goto L_TalkedShuda;
+	if(weddingring==3 && @footprints1==1 && @footprints2==1 && @footprints3==1 && @footprints4==1 && @footprints5==1 && @footprints6==1 && @footprints7==1 && @footprints8==1 && @footprints9==1) goto L_Groom;
+	mes "[Guy]";
+	mes "She won't find me here,she won't...";
+	close;
+L_Groom:
+	
+	mes "[Annon]";
+	mes "Help me please...";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "^He seems to be injured very bad...";
+	next;
+	menu "Treat his wounds",-,"Leave him alone",L_Go;
+	if(countitem(504) < 1) goto L_Need;
+	delitem 504,1;
+	mes "[Annon]";
+	mes "Who are you";
+	mes "Have you been sent to follow me?";
+	next;
+	mes "[Annon]";
+	mes "So I see now, my ex-partner has sent you to see if I'm OK.";
+	mes " ";
+	mes "Can you go and tell her I'm ok, but I cant go through with the marriage.";
+	next;
+	mes "[Annon]";
+	mes "I cant really give a reason, just tell her that I love her, but not enough to spend the rest of my life with her.";
+	next;
+	mes "[Annon]";
+	mes "I hope she will understand.";
+	mes " ";
+	mes "I guess you will want something in return.";
+	next;
+	mes "[Annon]";
+	mes "I can train you, and make you gain some exp.";
+	mes " ";
+	mes "I will do this now.";
+	next;
+	set BaseExp,BaseExp+100000;
+	set weddingring,4;
+	mes "[Annon]";
+	mes "It is done, please make you way back to Shuda, and please try not to make her cry";
+	close;
+L_Need:
+	mes "["+strcharinfo(0)+"]";
+	mes "I need a White potion to be able to cure him.";
+	close;
+L_Go:
+	mes "["+strcharinfo(0)+"]";
+	mes "Someone else will probably find him.I have other things to do.";
+	close;
+L_QuestComplete:
+	mes "[Annon]";
+	mes "Have you seen Shuda yet?";
+	close;
+L_TalkedShuda:
+	mes "[Annon]";
+	mes "Did she take it OK?";
+	close;
+}
+
+//============================================================
+//============================================ Ayothaya Shrimp
+//====================================================== Quest
+ayothaya.gat,203,169,3	script	Noi	839,{
+	mes "[Noi]";
+	mes "Welcome to Ayothaya.";
+	mes "Out beautiful village is built above the water, surrounded by a dense forest.";
+	next;
+	mes "[Noi]";
+	mes "There are many tourist attractions in this village, that you won't be able to find anywhere else. Out fish markets and the unique architecture of our buildings is enough reason to visit Ayothaya.";
+	next;
+	mes "[Noi]";
+	mes "Please feel free";
+	mes "to take a look around.";
+	next;
+	menu "Building Locations.",s_Loc,"Remove marks from mini-map.",s_Remo,"Cancel.",-;
+
+	mes "[Noi]";
+	mes "Please enjoy";
+	mes "your travels.";
+	close;
+s_Loc:
+	mes "[Noi]";
+	mes "Where would";
+	mes "you like to visit?";
+	next;
+	menu "Weapon Shop",s_Weap,"Tool Shop",s_Tool,"Tavern",s_Tavern,"Shrine",s_Shrine,"Fishing Spot",s_Fish,"Cancel",-;
+
+	mes "[Noi]";
+	mes "If you wish to remove location marks on your mini-map, please select the 'Remove marks from mini-map' command from the menu.";
+	close;
+
+s_Weap:
+	mes "[Noi]";
+	mes "At our Weapon Shop,";
+	mes "you will find great weapons favored by brave Ayothayan seafarers.";
+	next;
+	mes "[Noi]";
+	mes "Our weapon shop is located at ^00FF00+^000000.";
+	viewpoint 1,166,90,1,0x00FF00;
+	close;
+
+s_Tool:
+	mes "[Noi]";
+	mes "We Ayothayans always make sure we have everything we need before we go traveling. It never hurts to be prepared, does it?";
+	next;
+	mes "[Noi]";
+	mes "Our Tool Shop";
+	mes "is located at ^0000FF+^000000.";
+	viewpoint 1,128,86,2,0x0000FF;
+	close;
+
+s_Tavern:
+	mes "[Noi]";
+	mes "One of the basics of adventuring is gathering information, or at least that's what they say. You can meet people from all sorts of places in the Tavern. I'm sure you can earn something useful there.";
+	next;
+	mes "[Noi]";
+	mes "Of course, you must";
+	mes "drop by our Tavern.";
+	mes "It is located at ^FFFF00+^000000.";
+	viewpoint 1,229,70,3,0xFFFF00;
+	close;
+
+s_Shrine:
+	mes "[Noi]";
+	mes "If you wish to pray to God, or achieve a state of peace in your mind, why don't you visit our Shrine? Even if it's just for sight-seeing, everyone is welcome there.";
+	next;
+	mes "[Noi]";
+	mes "Our shrine";
+	mes "is located at^880088+^000000.";
+	viewpoint 1,207,284,4,0x880088;
+	close;
+s_Fish:
+	mes "[Noi]";
+	mes "Since Ayothaya was built above the surface of the water and so close to a beach, it's been a favorite spot for fishermen. Why don't you catch some for dinner at the Fishing Spot?";
+	next;
+	mes "[Noi]";
+	mes "Our famous";
+	mes "Fishing Spot";
+	mes "is located at ^AFAFAF+^000000.";
+	viewpoint 1,251,97,5,0xAFAFAF;
+	close;
+s_Remo:
+	viewpoint 2,166,90,1,0x00FF00;
+	viewpoint 2,128,86,2,0x0000FF;
+	viewpoint 2,229,70,3,0xFFFF00;
+	viewpoint 2,207,284,4,0x880088;
+	viewpoint 2,251,97,5,0xAFAFAF;
+	mes "[Noi]";
+	mes "Alright...";
+	mes "I've removed all the location marks from your mini-map.";
+	mes "Thank you.";
+	close;
+}
+
+ayothaya.gat,153,86,4	script	Thongpool	843,{
+	if(ayoshrimps == 1)goto s_Shrimp2;
+	if(tomyumgoong == 2)goto s_Shrimp;
+	mes "[Thongpool]";
+	mes "Welcome, welcome!";
+	mes "I've got the best Shrimp caught in the cleanest waters in the world~!";
+	close;
+s_Shrimp:
+	mes "[Thongpool]";
+	mes "Come adventurers,";
+	mes "take a look! I have";
+	mes "plenty of Shrimp!";
+	next;
+	mes "[Thongpool]";
+	mes "You're looking for Shrimp,";
+	mes "aren't you? How many Shrimps";
+	mes "do you need? Twenty Forty?";
+	next;
+	menu "I need Shrimp for Tom Yum Goong.",s_Tom,"Err, they look expensive.",-;
+
+	mes "[Thongpool]";
+	mes "What...?";
+	mes "Do you think";
+	mes "it's expensive?";
+	mes "But the fantastic taste";
+	mes "of Tom Yum Goong";
+	mes "is priceless!";
+	close;
+s_Tom:
+	mes "[Thongpool]";
+	mes "Ah! I guess Ms. Mali the Spicy recommended me to you. I guess that also means you want to buy them in bulk?";
+	next;
+	mes "[Thongpool]";
+	mes "After all,";
+	mes "you'll need a larger";
+	mes "amount of Shrimp to";
+	mes "cook Tom Yum Goong.";
+	next;
+	mes "[Thongpool]";
+	mes "Oh yes, you will need 20 Shrimps for Ms. Mali's Tom Yum Goong.";
+	mes "I even give you a discount:";
+	mes "11,000 zeny for 20 shrimps.";
+	mes "What do you say?";
+	next;
+	menu "I'll take them.",s_Take,"I could get 100 Jellopies for that much!",-;
+
+	mes "[Thongpool]";
+	mes "Well well well...";
+	mes "You might your hungry stomach with that many Jellopies but they wouldn't taste as good as my Shrimp!";
+	close;
+
+s_Take:
+	if(Zeny < 11000) goto s_NoZeny;
+	set Zeny, Zeny - 11000;
+	getitem 567,20;
+	emotion e_no1;
+	mes "[Thongpool]";
+	mes "Good, now you have the freshest Shrimp in this village!";
+	mes "It's time for you to go back and ask Ms. Mali to cook them for you.";
+	if(ayoshrimps < 1)set ayoshrimps,1;
+	close;
+
+s_NoZeny:
+	mes "[Thongpool]";
+	mes "Awww...";
+	mes "You don't have";
+	mes "enough money.";
+	close;
+
+s_Shrimp2:
+	mes "[Thongpool]";
+	mes "Mmm...?";
+	mes "Did you need more Shrimps?";
+	mes "Would you like to buy more?";
+	next;
+	menu "Yes!",s_Take,"No, thanks.",-;
+
+	mes "[Thongpool]";
+	mes "I see...";
+	mes "If you need some shrimps, just tell me!";
+	close;
+}
+
+//============================================================
+//=========================================== Ayothaya Dungeon
+//====================================================== Quest
+ayothaya.gat,83,132,7	script	Dusit	843,{
+	if(ayodunquest == 1 || ayodunquest == 2 || ayodunquest == 3)goto s_Dun;
+	mes "[Dusit]";
+	mes "Oh...!";
+	mes "You must be a traveller.";
+	mes "I have a tale you may wish to hear if you're interested in listening.";
+	next;
+	menu "What is it?",s_What,"I know what the story is.",-;
+
+	mes "[Dusit]";
+	mes "You do now?";
+	mes "Then be careful!";
+	mes "It'll eat you alive!";
+	close;
+s_What:
+	mes "[Dusit]";
+	mes "Ayothaya has a long history. Perhaps it looks calm and peaceful now, but in the past our village was terrorized bu a terrible creature.";
+	next;
+	mes "[Dusit]";
+	mes "This beast is known to us as the ^6B1312Sa-mhing Tiger^000000, which used to dwell deep in the ancient ruins.";
+	next;
+	mes "[Dusit]";
+	mes "The Sa-mhing Tiger is addicted to the taste of human flesh. It has been known to transform into the shape of a person it has eaten in order to lure out his family and friends.";
+	next;
+	mes "[Dusit]";
+	mes "The local people are still afraid that the creature might transform into someone they know, and sneak into their homes to eat them.";
+	next;
+	mes "[Dusit]";
+	mes "However there is one way you can identify the Sa-mhing Tiger from a human being. Since it's a tiger, it cannot do some of the things humans are taught to do, such as light a match.";
+	next;
+	mes "[Dusit]";
+	mes "So, if by chance you see a friend acting strangely all of a sudden, ask him to strike a match. Make sure he is not the Sa-mhing Tiger.";
+	next;
+	mes "[Dusit]";
+	mes "However...";
+	mes "I'm not sure if this actually works or not. I guess the best thing to do is just run for your life if you even suspect someone of being the Sa-mhing Tiger.";
+	next;
+	mes "[Dusit]";
+	mes "Do you blieve";
+	mes "in the existance";
+	mes "of man-eating tigers?";
+	next;
+	menu "Well, not really.",-,"Yes, I do and I think they're scary!",s_Yes;
+
+	mes "[Dusit]";
+	mes "Umm...";
+	mes "Oh well. My late grandfather told me about the Sa-mhing Tiger when I was a little kid. Of course, I haven't seen it.";
+	next;
+	mes "[Dusit]";
+	mes "The closest thing I've seen to the Sa-mhing Tiger was a golden cat with a bell. Somehow, I don't think it ate men.";
+	close;
+s_Yes:
+	mes "[Dusit]";
+	mes "Run for your life if you ever encounter the Sa-mhing Tiger! It'll eat you alive!";
+	next;
+	mes "[Dusit]";
+	mes "If you're interested in finding more about the story, I can introduce you to someone who knows that creature more than anyone else.";
+	next;
+	mes "[Dusit]";
+	mes "Why don't you talk to Boonthom? He's a pretty strange person, but there's something about him...";
+	next;
+	mes "[Dusit]";
+	mes "...";
+	mes "......";
+	next;
+	mes "[Dusit]";
+	mes "Ah well, you'll see what I'm talking about. I hope he'll help you learn more about that evil creature.";
+	set ayodunquest,1;
+	close;
+s_Dun:
+	mes "[Dusit]";
+	mes "How are you?";
+	mes "If you're interested in the Sa-mhing Tiger, please to talk to Boonthom.";
+	next;
+	mes "[Dusit]";
+	mes "But beware!";
+	mes "The Sa-mhing Tiger might be closer to you than you expect!";
+	close;
+}
+
+ayo_in01.gat,181,193,4	script	Shaman	840,{
+	if(ayodot == 8)goto s_Check2;
+	if(ayodot == 7 && countitem(7285) > 0)goto s_ICheck;
+	if(ayodot == 6 && countitem(7285) > 0)goto s_Holier;
+	if(ayodunquest == 3)goto s_Lose;
+	if(ayodunquest == 2)goto s_Items;
+	if(ayodunquest == 1)goto s_Quest;
+	mes "[Boonthom]";
+	mes "I'm sorry I can't talk to you.";
+	mes "I'm very busy right now.";
+	close;	
+s_Quest:
+	mes "[Boonthom]";
+	mes "You...!";
+	mes "Isn't it...!";
+	mes "Ooooooohhhhhhh!";
+	next;
+	mes "[Boonthom]";
+	mes "Oh...?";
+	next;
+	mes "[Boonthom]";
+	mes "...";
+	next;
+	mes "[Boonthom]";
+	mes "...";
+	mes "......";
+	next;
+	mes "[Boonthom]";
+	mes "...";
+	mes "......";
+	mes ".........";
+	next;
+	mes "[Boonthom]";
+	mes "Never mind.";
+	mes "Hah! I've lost my train of thought.";
+	next;
+	mes "[Boonthom]";
+	mes "So have you come to me to seek help? I can see the fear in your eyes. Let me gaze into your soul, and see what your fear is for myself. Hmmm...";
+	next;
+	mes "[Boonthom]";
+	mes "...";
+	next;
+	mes "[Boonthom]";
+	mes "...";
+	mes "......";
+	next;
+	mes "[Boonthom]";
+	mes "...";
+	mes "......";
+	mes ".........";
+	next;
+	mes "[Boonthom]";
+	mes "What...!";
+	mes "I see that you dread the Sa-mhing Tiger! I haven't heard any news of that monster for a long time...";
+	next;
+	mes "[Boonthom]";
+	mes "A long time ago, the Sa-mhing Tiger really did roam the village and ate innocent people.";
+	next;
+	mes "[Boonthom]";
+	mes "However, its terror was brought to an end when it was finally captured. I was one of those involved in capturing the Sa-mhing Tiger.";
+	next;
+	mes "[Boonthom]";
+	mes "I insisted on killing it, but the other people were too afraid to do so. Instead, the Sa-mhing Tiger was locked in a cave inside of the ancient ruins.";
+	next;
+	mes "[Boonthom]";
+	mes "I believe that was at least 10 years ago. Perhaps it's already dead by now. However, no one knows how powerful the tiger truly is. It may still be alive.";
+	next;
+	mes "[Boonthom]";
+	mes "I don't think we need to worry about it though. It is locked up and there it shall remain.";
+	next;
+	menu "I want to explore the ancient ruins.",s_Explore,"Locked up! Good! I'm not afraid!",-;
+
+	mes "[Boonthom]";
+	mes "Hmmm...";
+	mes "Not afraid";
+	mes "of it, are you?";
+	next;
+	mes "[Boonthom]";
+	mes "..........";
+	mes "..........";
+	close;
+s_Explore:
+	mes "[Boonthom]";
+	mes "You...";
+	mes "You are strange.";
+	mes "You want to explore the ancient ruins. Do all the adventurers disregard their safety like that?";
+	next;
+	mes "[Boonthom]";
+	mes "It's your choice. But remember, it is very dangerous to go through the path to the center of the building.";
+	mes "Usually, I forbid it.";
+	next;
+	mes "[Boonthom]";
+	mes "But if you want to go in, I can give you some useful tips.";
+	mes "Would you like to listen?";
+	next;
+	menu "If it's that dangerous I'd rather not try",-,"Sure!",s_Sure;
+
+	mes "[Boonthom]";
+	mes "You made a good decision.";
+	mes "You'd better be careful if you want to stay alive.";
+	close;
+s_Sure:
+	mes "[Boonthom]";
+	mes "Umm, okay.";
+	mes "Since you're";
+	mes "that interested...";
+	next;
+	mes "[Boonthom]";
+	mes "If you wish to enter the ancient building, you must have protection against evil spirits and malice.";
+	next;
+	mes "[Boonthom]";
+	mes "There are many ghosts and demons within the cave, and they will attack people who do not possess holy power... Like you.";
+	next;
+	mes "[Boonthom]";
+	mes "I can make you an object";
+	mes "containing this holy power if you wish. In order to make it, I will need some materials.";
+	next;
+	mes "[Boonthom]";
+	mes "^4466771 Needle Packet^000000,";
+	mes "^4466771 Spool^000000,";
+	mes "^4466771 Solid Husk^000000 and";
+	mes "^4466771 Holy Water^000000...";
+	mes "That's all I need.";
+	next;
+	mes "[Boonthom]";
+	mes "Please come back";
+	mes "when you prepare all the materials.";
+	set ayodunquest,2;
+	close;
+
+s_Items:
+	if(countitem(7213) < 1 || countitem(7217) < 1 || countitem(7190) < 1 || countitem(523) < 1)goto s_NoItems; //Pin Cusion, Spool, Hard Back Shell, Holy Water
+	delitem 7213,1; //Pin Cusion
+	delitem 7217,1; //Spool
+	delitem 7190,1; //Hard Back Shell
+	delitem 523,1; //Holy Water
+	mes "[Boonthom]";
+	mes "Excellent!";
+	mes "Now you have brought everything I need. Let me make the thing for you as promised...";
+	next;
+	mes "[Boonthom]";
+	mes "Ooooohmmmmm...";
+	next;
+	mes "[Boonthom]";
+	mes "Hmmmmmm...";
+	mes "Hmmmmmmmmm.";
+	next;
+	mes "[Boonthom]";
+	mes "Pffff pffff...";
+	next;
+	set ayodunquest,3;
+	getitem 7285,1; //Holy Threads
+	mes "[Boonthom]";
+	mes "Here you go.";
+	mes "Please take these holy threads.";
+	mes "With this, you will be able to enter the ruins with less worry.";
+	next;
+	mes "[Boonthom]";
+	mes "Even if you lose this, don't worry.";
+	mes "Just bring me the materials, and I will make you another one.";
+	next;
+	mes "[Boonthom]";
+	mes "The ancient building consists of 2 levels. Before you enter the 2nd underground level, please return to me so that I can tell you how to enter that place.";
+	close;
+
+s_NoItems:
+	mes "[Boonthom]";
+	mes "Did you forget what materials you need to create my object of holy power? Please listen carefully this time.";
+	next;
+	mes "[Boonthom]";
+	mes "^4466771 Needle Packet^000000,";
+	mes "^4466771 Spool^000000,";
+	mes "^4466771 Solid Husk^000000 and";
+	mes "^4466771 Holy Water^000000.";
+	next;
+	mes "[Boonthom]";
+	mes "See you later.";
+	close;
+
+s_Lose:
+	if(countitem(7285) > 0)goto s_NoItems2;
+	if(countitem(7213) < 1 || countitem(7217) < 1 || countitem(7190) < 1 || countitem(523) < 1)goto s_NoItems2; //Pin Cusion, Spool, Hard Back Shell, Holy Water
+	//Custom Dialogues
+	mes "[Boonthom]";
+	mes "Oh, you have all the items I require to make holy threads.";
+	next;
+	mes "[Boonthom]";
+	mes "Would you like to make one?";
+	next;
+	menu "Yes please.",s_Yes,"No I'm fine.",-;
+	
+	mes "[Boonthom]";
+	mes "See you later then.";
+	close;
+s_Yes:
+	if(countitem(7213) < 1 || countitem(7217) < 1 || countitem(7190) < 1 || countitem(523) < 1)goto s_NoItems2; //Pin Cusion, Spool, Hard Back Shell, Holy Water
+	delitem 7213,1; //Pin Cusion
+	delitem 7217,1; //Spool
+	delitem 7190,1; //Hard Back Shell
+	delitem 523,1; //Holy Water
+	getitem 7285,1; //Holy Threads
+	mes "[Boonthom]";
+	mes "All right, here are your holy threads.";
+	mes "If you lose them, I'm still here to make some more.";
+	next;
+	mes "[Boonthom]";
+	mes "Good luck venturing down the dungeon.";
+	close;
+
+s_NoItems2:
+	mes "[Boonthom]";
+	mes "If you lose the holy threads, don't worry. I can make some more for you. Just gather the following items.";
+	next;
+	mes "[Boonthom]";
+	mes "^4466771 Needle Packet^000000,";
+	mes "^4466771 Spool^000000,";
+	mes "^4466771 Solid Husk^000000 and";
+	mes "^4466771 Holy Water^000000.";
+	next;
+	mes "[Boonthom]";
+	mes "See you later.";
+	close;
+s_Holier:
+	mes "[" + strcharinfo(0) + "]";
+	mes "I copied down this";
+	mes "message while exploring";
+	mes "the dungeon. Would you";
+	mes "take a look at this?";
+	next;
+	mes "[Stone Slate]";
+	mes "Do not enter the";
+	mes "2nd underground level";
+	mes "...is danger... You will";
+	mes "...encounter... tiger...";
+	next;
+	mes "[Stone Slate]";
+	mes "You must kill... In order to do...";
+	mes "Must... How to go... the 2nd";
+	mes "underground level...";
+	mes "You need more... Holy power... in";
+	mes "order to... Otherwise, it's";
+	mes "impossible...";
+	next;
+	mes "[Boonthom]";
+	mes "That was written by one of my";
+	mes "comrades who entered the ruins,";
+	mes "as he regretted letting the tiger";
+	mes "live, let it return";
+	next;
+	mes "[Boonthom]";
+	mes "If you were able to find this note,";
+	mes "you must have strong determination";
+	mes "to venture through the ruins.";
+	next;
+	mes "[Boonthom]";
+	mes "As you can guess from the";
+	mes "note, the 2nd underground level is";
+	mes "very very dangerous. You will need";
+	mes "holy threads that contains even more";
+	mes "holy protection.";
+	next;
+	mes "[Boonthom]";
+	mes "Now, go and gather some materials";
+	mes "so that I can create more powerful";
+	mes "holy threads for you.";
+	next;
+	mes "[Boonthom]";
+	mes "^4466772 Holy Water^000000,";
+	mes "^4466771 Yggdrasil Leaf^000000,";
+	mes "^4466772 Needle Packet^000000 and";
+	mes "^4466772 Spool^000000.";
+	next;
+	mes "[Boonthom]";
+	mes "Return to me";
+	mes "once you have";
+	mes "gathered everything.";
+	set ayodot,7;
+	close;
+s_ICheck:	
+	if(countitem(523) < 2 || countitem(610) < 1 || countitem(7213) < 2 || countitem(7217) < 2)goto s_NEnoughItems;
+	if(ayodot == 8)goto s_Process;
+	mes "[Boonthom]";
+	mes "Hmmm~";
+	mes "You've brought";
+	mes "everything. Quite";
+	mes "the enthusiastic one,";
+	mes "aren't you?";
+	next;
+	mes "[Boonthom]";
+	mes "Ooooohmmmmm...";
+	next;
+	mes "[Boonthom]";
+	mes "Hmmmmmm...";
+	mes "Hmmmmmmmmm.";
+	next;
+	mes "[Boonthom]";
+	mes "Pffff pffff...";
+	next;
+s_Process:
+	if(countitem(523) < 2 || countitem(610) < 1 || countitem(7213) < 2 || countitem(7217) < 2)goto s_NEnoughItems;
+	delitem 523,2;
+	delitem 610,1;
+	delitem 7213,2;
+	delitem 7217,2;
+	getitem 7287,1;
+	if(ayodot != 8)set ayodot,8;
+	mes "[Boonthom]";
+	mes "Here you go.";
+	mes "Please take these holy threads.";
+	mes "With this, you will be able to";
+	mes "enter the ruins with less worry.";
+	next;
+	mes "[Boonthom]";
+	mes "Even if you lost this, don't worry.";
+	mes "Just bring me the materials, and";
+	mes "I will make you another one.";
+	close;
+s_NEnoughItems:
+	mes "[Boonthom]";
+	mes "Hmmm...?";
+	mes "Didn't I tell you";
+	mes "what I need to make";
+	mes "a more powerful";
+	mes "holy thread?";
+	next;
+	mes "[Boonthom]";
+	mes "^4466772 Holy Water^000000,";
+	mes "^4466771 Yggdrasil Leaf^000000,";
+	mes "^4466772 Needle Packet^000000 and";
+	mes "^4466772 Spool^000000.";
+	next;
+	mes "[Boonthom]";
+	mes "Return to me";
+	mes "with those items";
+	mes "And I will craft";
+	mes "more powerful holy";
+	mes "threads for you.";
+	close;
+s_Check2:
+	if(countitem(7285) < 1)goto s_Lose;
+	if(countitem(7287) < 1)goto s_LoseThreads;
+	mes "[Boonthom]";
+	mes "Those threads";
+	mes "will protect you";
+	mes "from the spiritual";
+	mes "dangers, but it's up";
+	mes "to you to defend yourself";
+	mes "from monster attacks, okay?";
+	close;
+s_LoseThreads:
+//Custom Dialogues
+	mes "[Boonthom]";
+	mes "I can feel the absence of holy power.";
+	mes "You lost the holier threads didn't you?";
+	next;
+	mes "[Boonthom]";
+	mes "But that's alright, I can make a new one";
+	mes "So... Do you want one?";
+	next;
+	menu "Yeah!",s_ICheck,"Nah",-;
+
+	mes "[Boonthom]";
+	mes "Come back anytime!";
+	close;
+}
+ayo_fild01.gat,129,197,7	script	Puraim	842,{
+	if(countitem(7285) > 0)goto s_Dungeon; //Holy Threads
+	mes "[Puraim]";
+	mes "If I were you, I wouldn't even dare to approach";
+	mes "The ruins down over there.";
+	next;
+	mes "[Puraim]";
+	mes "Anyone who doesn't have the protection of a holy spirit will be easy game for the evil creatures living there. You'd be killed in no time at all!";
+	next;
+	mes "[Puraim]";
+	mes "Go back, adventurer.";
+	mes "If you wish to explore this area, you'd better show me some holy spirit.";
+	close;
+s_Dungeon:
+	mes "[Puraim]";
+	mes "Huh...?";
+	mes "I feel it!";
+	mes "I can feel the power of holiness!";
+	mes "It's coming from you!";
+	next;
+	mes "[Puraim]";
+	mes "I guess you can go ahead into the ruins. So that's what you want? To explore this aera?";
+	next;
+	mes "[Puraim]";
+	mes "I would suggest against coming inside. Even the local people fear this area.";
+	next;
+	mes "[Puraim]";
+	mes "If the Sa-mhing Tiger wasn't around, there would still be all the evil spirits in this place. Even with the holy threads, this place is still dangerous.";
+	next;
+	mes "[Puraim]";
+	mes "So what do you want to do? Do you still want to explore the area, adventurer?";
+	next;
+	menu "Yes",s_Yes,"No! I'm too afraid of the ruins now.",-;
+
+	mes "[Puraim]";
+	mes "Good decision!";
+	mes "As I expected, you're smart enough not to stupidly jeopardize your life.";
+	close;
+s_Yes:
+	mes "[Puraim]";
+	mes "Hmmm...";
+	mes "It seems you adventurers are tempted by the thrill of danger, or you've all got some death wish.";
+	next;
+	mes "[Puraim]";
+	mes "Oh well, that's none of my business. After all, you already have a holy spirit. Still, be careful. You might not want to go to the 2nd underground level of the ruins.";
+	next;
+	mes "[Puraim]";
+	mes "As you Rune-Midgardians say, 'curiousity killed the cat.' Anyway, go for it!";
+	next;
+	mes "[Puraim]";
+	mes "^3C2EE6He shoved you off the hill and you plummet like a rock.";
+	close2;
+	set @hpcheck,readparam(6)/10;
+	if(readparam(5) < @hpcheck)goto s_SetHp;
+	percentheal -10,0;
+s_Warp:
+	warp "ayo_fild02.gat",30,135;
+	end;
+s_SetHp:
+	set @hpcheck2,readparam(5)-1;
+	heal -@hpcheck2,0;
+	goto s_Warp;
+}
+	
+ayo_dun01.gat,260,42,4	script	LocationActivator	139,4,0,{
+	if(ayodot > 5)end;
+	if(countitem(7285) > 0)goto s_Dots;
+	end;
+s_Dots:
+	mes "- Holy threads in your pocket";
+	mes "suddenly started glowing. You felt";
+	mes "something is near you.-";
+	if(ayodot == 0)goto s_0;
+	if(ayodot == 1)goto s_1;
+	if(ayodot == 2)goto s_2;
+	if(ayodot == 3)goto s_3;
+	if(ayodot == 4)goto s_4;
+	if(ayodot == 5)goto s_5;
+	end;
+
+s_0:
+	viewpoint 1,198,164,1,0xFF0000;
+	viewpoint 1,87,16,2,0xFF0000;
+	viewpoint 1,268,215,3,0xFF0000;
+	viewpoint 1,147,274,4,0xFF0000;
+	viewpoint 1,99,118,5,0xFF0000;
+	viewpoint 1,16,188,6,0xFF0000;
+	stopnpctimer;
+	close;
+s_1:
+	viewpoint 1,87,16,2,0xFF0000;
+	viewpoint 1,268,215,3,0xFF0000;
+	viewpoint 1,147,274,4,0xFF0000;
+	viewpoint 1,99,118,5,0xFF0000;
+	viewpoint 1,16,188,6,0xFF0000;
+	close;
+s_2:
+	viewpoint 1,268,215,3,0xFF0000;
+	viewpoint 1,147,274,4,0xFF0000;
+	viewpoint 1,99,118,5,0xFF0000;
+	viewpoint 1,16,188,6,0xFF0000;
+	close;
+s_3:
+	viewpoint 1,147,274,4,0xFF0000;
+	viewpoint 1,99,118,5,0xFF0000;
+	viewpoint 1,16,188,6,0xFF0000;
+	close;
+s_4:
+	viewpoint 1,99,118,5,0xFF0000;
+	viewpoint 1,16,188,6,0xFF0000;
+	close;	
+s_5:
+	viewpoint 1,16,188,6,0xFF0000;
+	close;
+}
+
+ayo_dun01.gat,198,164,4	script	#invayo1	111,{
+
+	if(countitem(7285) < 1)end;
+	if(ayodot == 0)goto s_First;
+
+	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 1st part of the slate.";
+	close;
+
+s_First:
+
+	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 1st part of the slate.";
+	next;
+	mes "^3C2EE6It reads '^0000FFDo not enter the 2nd underground level.^3C2EE6' You are unable to read the rest of the message.";
+	set ayodot,1;
+	close;
+
+}
+
+ayo_dun01.gat,87,16,4	script	#invayo2	111,{
+
+	if(countitem(7285) < 1)end;
+	if(ayodot == 1)goto s_First;
+
+	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 2nd part of the slate.";
+	close;
+
+s_First:
+
+	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 2nd part of the slate.";
+	next;
+	mes "^3C2EE6It reads '^0000FF...is danger... You wil....^3C2EE6' You are unable to read the rest of the message.";
+	set ayodot,2;
+	close;
+
+}
+
+ayo_dun01.gat,268,215,4	script	#invayo3	111,{
+
+	if(countitem(7285) < 1)end;
+	if(ayodot == 2)goto s_First;
+
+	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 3rd part of the slate.";
+	close;
+
+s_First:
+
+	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 3rd part of the slate.";
+	next;
+	mes "^3C2EE6It reads '^0000FF...encounter...tiger....^3C2EE6' You are unable to read the rest of the message.";
+	set ayodot,3;
+	close;
+
+}
+
+ayo_dun01.gat,147,274,4	script	#invayo4	111,{
+
+	if(countitem(7285) < 1)end;
+	if(ayodot == 3)goto s_First;
+
+	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 4th part of the slate.";
+	close;
+
+s_First:
+
+	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 4th part of the slate.";
+	next;
+	mes "^3C2EE6It reads '^0000FFYou must kill... In order to do... MUST ... How to go... the 2nd underground level...^3C2EE6' You are unable to read the rest of the message.";
+	set ayodot,4;
+	close;
+
+}
+
+ayo_dun01.gat,99,118,4	script	#invayo5	111,{
+	if(countitem(7285) < 1)end;
+	if(ayodot == 4)goto s_First;
+	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 5th part of the slate.";
+	close;
+s_First:
+	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the 5th part of the slate.";
+	next;
+	mes "^3C2EE6It reads '^0000FFYou need more... Holy power... in order to...^3C2EE6' You are unable to read the rest of the message.";
+	set ayodot,5;
+	close;
+
+}
+	
+ayo_dun01.gat,16,188,4	script	#invayo6	111,{
+	if(countitem(7285) < 1)end;
+	if(ayodot == 5)goto s_First;
+	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the last part of the slate.";
+	close;
+s_First:
+	mes "^3C2EE6You find a piece of a stone slate with letters etched on it. It seems to be the last part of the slate.";
+	next;
+	mes "^3C2EE6It reads '^0000FFOtherwise, it's impossible...^3C2EE6' You are unable to read the rest of the message.";
+	set ayodot,6;
+	close;
+}
+
+ayo_dun01.gat,24,283,4	script	#ayowarp	111,{
+	if(countitem(7287) < 1)goto s_NoEntry;
+	mes "^3C2EE6The holy threads emanate a powerful sense of safety and security. With the protection of holiness, you begin your descent into the 2nd level..";
+	close2;
+	set @ayodunwarp,rand(1,2);
+	if(@ayodunwarp == 2)goto s_2;
+	warp "ayo_dun02.gat",275,26;
+	end;
+s_2:
+	warp "ayo_dun02.gat",24,26;
+	end;	
+s_NoEntry:
+	mes "^3C2EE6You find what seems to be the entrance to the 2nd level. However, you are filled with an overwhelming sense of dread. Somehow, you can't bring yourself to go down...";
+	close;
+}
+
+ayo_dun01.gat,23,283,4	duplicate(#ayowarp)	#ayodupe1	111
+ayo_dun01.gat,25,283,4	duplicate(#ayowarp)	#ayodupe2	111
+ayo_dun01.gat,26,283,4	duplicate(#ayowarp)	#ayodupe3	111
+
+//============================================================
+//============================================== Tom Yum Goong
+//====================================================== Quest
+
+
+ayothaya.gat,196,265,3	script	Einon	842,{
+	if(tomyumgoong == 5)goto s_Done;
+	if(tomyumgoong == 1 || tomyumgoong == 2 || tomyumgoong == 3 || tomyumgoong == 4)goto s_Resta;
+	mes "[Einon]";
+	mes "Do you know what the";
+	mes "most popular cuisine";
+	mes "of this village is?";
+	next;
+	mes "[Einon]";
+	mes "Ayothaya is world famous for its regional cuisine, but out of all Ayothayan dishes, '^3C2EE6Tom Yum Goong^000000' is the best.";
+	next;
+	mes "[Einon]";
+	mes "Tom Yum Goong is a type of soup that is very spicy. Try it once, and you will be amazed by its profound taste. Try it twice, and you will be enraptured by its tantalizing aroma.";
+	next;
+	mes "[Einon]";
+	mes "It's really one of the most delicious foods in the world!";
+	mes "Everyone in the world would  would want to try this at least once in his lifetime. So, would you like to try some?";
+	next;	
+	menu "Sure thing.",s_Sure,"No, thanks. I hate spicy food.",-;
+
+	mes "[Einon]";
+	mes "Oh I see...";
+	mes "However, when you";
+	mes "change your mind,";
+	mes "please come back.";
+	close;
+
+s_Sure:
+	mes "[Einon]";
+	mes "Okay...!";
+	mes "Now who would be best for preparing Tom Yum Goong for you?";
+	mes "Hmmmmm...";
+	next;
+	mes "[Einon]";
+	mes "Everyone in the village knows how to make it, but I recommend that you go visit ^0000FF Mali the Spicy^000000.";
+	next;
+	mes "[Einon]";
+	mes "She is the best cook when it comes to Tom Yum Goong!";
+	mes "Why don't you ask her to cook you some?";
+	set tomyumgoong,1;
+	close;
+s_Resta:
+	mes "[Einon]";
+	mes "Ah, you wanna know where ^0000FFMali the Spicy^000000 is?";
+	mes "Well, there's not too many places a cook would stay other than in a restaurant, right? Hahaha~";
+	close;
+s_Done:
+	mes "[Einon]";
+	mes "Golden Ayothaya...";
+	mes "Although I've grown";
+	mes "up in this village,";
+	mes "I still think my village";
+	mes "is magnificient and beautiful.";
+	next;
+	mes "[Einon]";
+	mes "What do you think?";
+	mes "Wouldn't you agree with me?";
+	close;	
+}
+
+ayo_in01.gat,145,163,4	script	Cook	839,{	
+	if(tomyumgoong == 5)goto s_Busy;
+	if(ayopause == 1)goto s_Pause;
+	if(ayopause == 2)goto s_Pause2;
+	if(tomyumgoong == 4)goto s_Chilee;
+	if(tomyumgoong == 3)goto s_Lemons;
+	if(tomyumgoong == 2)goto s_Shrimp;
+	mes "[Mali the Spicy]";
+	mes "Hello, there!";
+	mes "I am called Mali the Spicy.";
+	mes "All of my dishes always amaze my customers with their tempting scents and deep flavors.";
+	next;
+	mes "[Mali the Spicy]";
+	mes "I am especially proud of my ^3C2EE6Tom Yum Goong^000000, which is the best in the village. I suppose it's my fate to cook the greatest Tom Yum Goong ever.";
+	if(tomyumgoong == 1)goto s_Quest;
+	close;
+s_Quest:
+	next;
+	mes "[Mali the Spicy]";
+	mes "Oh I see...";
+	mes "You want me to cook Tom Yum Goong for you, don't you?";
+	next;
+	mes "[Mali the Spicy]";
+	mes "Honestly, I've been really buse ever since I opened this restaurant. If you really wish to taste my Tom Yum Goong, would you do something for me?";
+	next;
+	menu "Sure!",s_Sure,"Eh... I dunno.",-;
+
+	mes "[Mali the Spicy]";
+	mes "I understand this might be difficult to do, but it's worth a try if you really want to taste the best Tom Yum Goong.";
+	close;
+
+s_Sure:
+	mes "[Mali the Spicy]";
+	mes "First, would you go get the ingredients to make Tom Yum Goong for me? I'll need some ^FF0000Shrimps^000000, ^FF0000Chilees^000000 and ^FF0000Lemons^000000.";
+	next;
+	mes "[Mali the Spicy]";
+	mes "Remember, Shrimp is the main ingredient of this dish. So, the fresher the Shrimp, the tastier your food will be.";
+	next;
+	menu "Where can I find them?",-;
+	mes "[Mali the Spicy]";
+	mes "I expected you to ask me that.";
+	mes "For shrimps, look around the beach. You should see a lot of them there.";
+	next;
+	mes "[Mali the Spicy]";
+	mes "However, you might have a hard time finding them since you haven't done that before. So just buy some Shrimp from the guy who sells the freshest Shrimp around.";
+	next;
+	mes "[Mali the Spicy]";
+	mes "Hmmm...";
+	mes "If you mention";
+	mes "my name, that guy";
+	mes "might give you a discount";
+	next;
+	mes "[Mali the Spicy]";
+	mes "His name is ^0000FFThongpool^000000.";
+	mes "He will be somewhere around the village selling Shrimps. Go and ask him to give you 20 Shrimps to cook Tom Yum Goong.";
+	set tomyumgoong,2;
+	close;
+s_Shrimp:
+	if(countitem(567) > 19)goto s_EnoughShrimp;
+	mes "[Mali the Spicy]";
+	mes "Did you visit ^0000FFThongpool^000000?";
+	mes "He will be somewhere around the village selling Shrimps. Go and ask him to give you 20 Shrimps to cook Tom Yum Goong.";
+	close;
+
+s_EnoughShrimp:
+	delitem 567,20;
+	mes "[Mali the Spicy]";
+	mes "Ah you came back!";
+	mes "Now, let me see what"; 
+	mes "you've brought. Hmmm...";
+	mes "These are...";
+	next;
+	set ayopause,1;
+	set ayoshrimps,0;
+	emotion e_no1;
+	mes "[Mali the Spicy]";
+	mes "The freshest Shrimp that";
+	mes "I've been looking for!";
+	mes "With these big and fresh Shrimps,";
+	mes "I can cook the best Tom Yum Goong";
+	mes "for you! Thank you so much!";
+	next;
+	mes "[Mali the Spicy]";
+	mes "It will be a perfect food with the natural sweetness of the Shrimp, the sourness of Lemons and a little bit of fish sauce!";
+	next;
+s_Pause:
+	mes "[Mali the Spicy]";
+	mes "Oh... Right";
+	mes "But we only have Shrimp.";
+	mes "Now, I want you to bring me some ^FF0000Lemons^000000.";
+	next;
+	menu "Where can I find Lemons?",s_WLemon,"I hate sour food. I'd better quit!",-;
+
+	mes "[Mali the Spicy]";
+	mes "It's your call.";
+	mes "But remember...";
+	mes "The shimps might go bad while you're taking a rest.";
+	close;
+
+s_WLemon:
+	mes "[Mali the Spicy]";
+	mes "A few days ago, I saw a good";
+	mes "Lemon tree while taking a walk.";
+	mes "But this tree belongs to an";
+	mes "ordinary man who's not a Fruit Merchant.";
+	next;
+	mes "[Mali the Spicy]";
+	mes "I'm not sure wheter or not he'd sell Lemons to you, but you can try, I guess.";
+	set ayopause,0;
+	set tomyumgoong,3;
+	close;
+s_Lemons:
+	if(countitem(568) > 9)goto s_EnoughLemon;
+	mes "[Mali the Spicy]";
+	mes "Alright...";
+	mes "I'm counting on you";
+	mes "to get the best Lemons";
+	mes "from the man who owns that tree.";
+	next;
+	mes "[Mali the Spicy]";
+	mes "Somehow, you've got";
+	mes "to get those high quality";
+	mes "Lemons so that I can make some Tom Yum Goong!";
+	close;
+s_EnoughLemon:
+	delitem 568,10;
+	emotion e_gasp;
+	mes "[Mali the Spicy]";
+	mes "Welcome back!";
+	mes "Wow, you came back";
+	mes "really fast! Okay, let me";
+	mes "see the Lemons";
+	mes "you brought?";
+	next;
+	set ayopause,2;
+	mes "[Mali the Spicy]";
+	mes "Wow, great!";
+	mes "These are really fresh Lemons!";
+	mes "How could you bring all of these by";
+	mes "yourself? Thanks for your trouble~";
+	next;
+s_Pause2:
+	mes "[Mali the Spicy]";
+	mes "Now, you should go buy";
+	mes "some ^FF0000Chilees^000000 and some";
+	mes "other materials in the market.";
+	next;
+	mes "[Mali the Spicy]";
+	mes "When you talk";
+	mes "to the Merchants";
+	mes "in the Market, they";
+	mes "will know what you want.";
+	next;
+	menu "Okay, I'll be right back.",s_Okay,"Ah, I'm tired now. Let me take a rest first...",-;
+
+	mes "[Mali the Spicy]";
+	mes "It's your call.";
+	mes "But remember...";
+	mes "The Shrimps might go bad";
+	mes "while you're taking a rest.";
+	close;	
+s_Okay:
+	mes "[Mali the Spicy]";
+	mes "See you in a bit~";
+	set ayopause,0;
+	set tomyumgoong,4;
+	close;
+s_Chilee:
+	if(countitem(7286) > 29)goto s_EnoughChilee;
+	mes "[Mali the Spicy]";
+	mes "Did you get the Chilees?";
+	mes "You should talk to the Merchants in the Market, they'll know what you want.";
+	close;
+s_EnoughChilee:
+	delitem 7286,30;
+	mes "[Mali the Spicy]";
+	mes "Now...";
+	mes "Everything is all set!";
+	mes "Before we start, let me";
+	mes "check the materials.";
+	next;
+	mes "[Mali the Spicy]";
+	mes "^FF0000Shrimp^000000, ^FF0000Chilees^000000, ^FF0000Lemons^000000...";
+	mes "Fish sauce and other little";
+	mes "things...";
+	next;
+	mes "[Mali the Spicy]";
+	mes "Perfect!";
+	mes "Shall we begin?";
+	next;
+	misceffect 125;
+	mes "^D0122C*Tuk*";
+	mes "^6F1E6A*Tup*";
+	mes "^357030*Puk*";
+	next;
+	misceffect 124;
+	mes "^D10C3A*Chop chop*";
+	mes "^DCB060*Tup tup tup*";
+	mes "^8CA7BA*Pu pu*";
+	next;
+	misceffect 23;
+	misceffect 135;
+	mes "^86733BTup tup ^396254chook";
+	mes "^486354chop chop";
+	mes "^BA0010Tup tup tup ^28842FPu pu";
+	next;
+	emotion e_omg;
+	misceffect 99;
+	misceffect 90;
+	mes "Wah^050158ah^241999ahhh^0F48CBhaaaahhh^000000!";
+	next;
+	mes "[Mali the Spicy]";
+	mes "...";
+	mes "......";
+	mes ".........";
+	next;
+	set tomyumgoong,5;
+	set ayoshrimps,0;
+	getitem 566,10;
+	emotion e_no1;
+	mes "[Mali the Spicy]";
+	mes "Here's your";
+	mes "Tom Yum Goong!";
+	mes "Ah~ This taste,";
+	mes "this scent... Yeah.";
+	mes "I know I did a good job.";
+	next;
+	mes "[Mali the Spicy]";
+	mes "Do you know what is the secret of Tom Yum Goong? It isn't simply just food. This has the power to heal you, and help you get into better shape.";
+	next;
+	mes "[Mali the Spicy]";
+	mes "Because...";
+	mes "It countains the";
+	mes "power of God.";
+	next;
+	mes "[Mali the Spicy]";
+	mes "Okay...!";
+	mes "I'm giving you";
+	mes "10 Tom Yum Goong";
+	mes "free of charge~";
+	next;
+	mes "[Mali the Spicy]";
+	mes "Thank you for all the trouble";
+	mes "you have been through to get these";
+	mes "ingredients. It would make me happy";
+	mes "if you shared Tom Yum Goong with";
+	mes "your friends.";
+	next;
+	mes "[Mali the Spicy]";
+	mes "Share the flavor of Ayothaya, and";
+	mes "let them know how beautiful our";
+	mes "land is. It was good to see you,";
+	mes "take care now~";
+	close;
+s_Busy:
+	emotion e_wah;
+	mes "[Mali the Spicy]";
+	mes "Ah...!";
+	mes "So busy, so busy!";
+	mes "My customers never get tired of";
+	mes "the taste of my Tom Yum Goong!";
+	mes "Heh heh heh~!";
+	close;	
+}
+
+ayothaya.gat,213,95,7	script	Merchant	841,{
+	if(tomyumgoong == 4)goto s_Chili;
+s_JumpBack:
+	mes "[Merchant Thongdum]";
+	mes "Hello there!";
+	mes "Ever try a Chili before?";
+	next;
+	mes "[Merchant Thongdum]";
+	mes "Despite its tiny appearance, it has a very strong flavor. It's also hot and spicy, so you should be careful when you eat one.";
+	next;
+	mes "[Merchant Thongdum]";
+	mes "The people of Ayothaya enjoy sensational food with distinct, spicy flavors. In Ayothayan cuisine, we use things like Chilis, Garlics, Ginger and Cilantro.";
+	next;
+	mes "[Merchant Thongdum]";
+	mes "I'm selling Chilis,";
+	mes "so if you need any,";
+	mes "please come to me~";
+	close;
+s_Chili:
+	if(countitem(7286) > 29)goto s_JumpBack;
+	mes "[Merchant Thongdum]";
+	mes "Hello, there~";
+	mes "Are you looking for";
+	mes "ingredients to make";
+	mes "Tom Yum Goong?";
+	next;
+	mes "[Merchant Thongdum]";
+	mes "Let's see...";
+	mes "I'm selling chilis,";
+	mes "fish sauce, and some";
+	mes "spices and flavorings";
+	mes "you'll need. I'll sell";
+	mes "it all to you for 2,000 zeny.";
+	next;
+	menu "Thanks, I'll take it",s_Take,"It's a rip-off, man!",-;
+
+	mes "[Merchant Thongdum]";
+	mes "Don't say that.";
+	mes "My prices are always";
+	mes "reasonable. I want you to know";
+	mes "that I'm a respectable Merchant.";
+	close;
+
+s_Take:
+	if(Zeny < 2000) goto s_NoZeny;
+	set Zeny, Zeny - 2000;
+	getitem 7286,30;
+	mes "[Merchant Thongdum]";
+	mes "Thank you.";
+	mes "I hhope you will enjoy";
+	mes "your Tom Yum Goong~";
+	close;
+
+s_NoZeny:
+//custom dialogues
+	emotion e_wah;
+	mes "[Merchant Thongdum]";
+	mes "Aw, you don't have enough zeny.";
+	mes "Please come back when you do!";
+	close;
+}
+
+ayothaya.gat,121,240,7	script	Mr. Jun	842,1,1,{
+	mes "[Mr. Jun]";
+	mes "...";
+	close;
+OnTouch:
+	if(ayolemon == 2)end;
+	if(ayolemon == 1)goto s_Again;
+	if(tomyumgoong == 3)goto s_Lemon;
+	end;
+s_Lemon:
+	emotion e_hmm;
+	mes "[Mr. Jun]";
+	mes "Hello, there?";
+	mes "Did you need";
+	mes "some help...?";
+	next;
+	menu "I need some Lemons.",s_Quest,"No, thanks.",-;
+
+	mes "[Mr. Jun]";
+	mes "Feel free to";
+	mes "ask me for help";
+	mes "any time, okay?";
+	close;
+
+s_Quest:
+	mes "[Mr. Jun]";
+	mes "Umm...";
+	mes "Lemons?";
+	mes "As you see, I have plenty";
+	mes "of Lemons on my tree";
+	mes "Do you really need some?";
+	next;
+	menu "Yes, I will pay you.",s_Pay,"No, thanks.",-;
+
+	mes "[Mr. Jun]";
+	mes "Hmm...";
+	mes "Now what can";
+	mes "I possibly do";
+	mes "with all these";
+	mes "Lemons?";
+	close;
+
+s_Pay:
+	mes "[Mr. Jun]";
+	mes "I started growing this Lemon tree as a hobby, but I didn't expect to have such a good havest of sweet, succulent Lemons.";
+	next;
+	mes "[Mr. Jun]";
+	mes "Did you just say you were going to pay me for the Lemons? Oh, you've got me wrong. I don't intend to sell these.";
+	next;
+	mes "[Mr. Jun]";
+	mes "But...";
+	mes "I'm more than willing";
+	mes "to share some of them with";
+	mes "you, but only if you can...";
+	next;
+	mes "[Mr. Jun]";
+	mes "Play a small game with me!";
+	mes "How about that? I've been so bored";
+	mes "to death. Even an old man like me";
+	mes "needs to enjoy himself!";
+	next;
+	mes "[Mr. Jun]";
+	mes "Hahahaha~!";
+	mes "What do you say?";
+	mes "Would you like to try?";
+	next;
+	menu "Sure, why not!",s_Game,"No, thanks.",-;
+
+	mes "[Mr. Jun]";
+	mes "Afraid are we?";
+	mes "There's no fooling you:";
+	mes "I'm one of the best at games!";
+	close;
+
+s_Again:
+//custom dialogues
+	mes "[Mr. Jun]";
+	mes "Oh, you're back!";
+	mes "Would you like to try again?";
+	next;
+	menu "Yeah, I'm going to beat you.",s_Game4,"Nah, I just passed by.",-;
+
+	mes "[Mr. Jun]";
+	mes "Ha ha ha!";
+	mes "Come back when you think you can beat me.";
+	close;
+s_Game:
+	mes "[Mr. Jun]";
+	mes "Good!";
+	mes "The game I want us to play is an easy children's game.";
+	next;
+	mes "[Mr. Jun]";
+	mes "^6B1312Rock,";
+	mes "^6B1312Paper, Scissors!";
+	mes "Perhaps you've heard";
+	mes "of it in your land.";
+	next;
+	mes "[Mr. Jun]";
+	mes "Nuh-uh, don't look at me like that.";
+	mes "I'm an old man, and I want to play this game re-live my youth a little bit. You'll understand when you're my age.";
+	next;
+	mes "[Mr. Jun]";
+	mes "Alright, if you win";
+	mes "^3C2EE63^000000 out of ^3C2EE65^000000 matches,";
+	mes "The lemons are yours.";
+	mes "Are you ready?";
+	next;
+s_Game4:
+	mes "[Mr. Jun]";
+	mes "Okay...";
+	mes "As you kids say,";
+	mes "^6B1312Let's get eXtreme!";
+s_Game3:
+	next;
+	mes "[Mr. Jun]";
+	mes "Rock!";
+	mes "Paper!";
+	mes "Scissors!";
+s_Game2:
+	next;
+	menu "Rock",s_Rock,"Paper",s_Paper,"Scissors",s_Scissors;
+
+s_Rock:
+	set @npcvar,rand(1,3);
+	set @playervar,1;
+	next;
+	goto s_Play;
+s_Paper:
+	set @npcvar,rand(1,3);
+	set @playervar,2;
+	next;
+	goto s_Play;
+s_Scissors:
+	set @npcvar,rand(1,3);
+	set @playervar,3;
+	next;
+	goto s_Play;
+s_Play:
+	if(@playervar == 1 && @npcvar == 1)goto s_RockRock;	
+	if(@playervar == 1 && @npcvar == 2)goto s_RockPaper;
+	if(@playervar == 1 && @npcvar == 3)goto s_RockScissors;
+	if(@playervar == 2 && @npcvar == 1)goto s_PaperRock;
+	if(@playervar == 2 && @npcvar == 2)goto s_PaperPaper;
+	if(@playervar == 2 && @npcvar == 3)goto s_PaperScissors;
+	if(@playervar == 3 && @npcvar == 1)goto s_ScissorsRock;
+	if(@playervar == 3 && @npcvar == 2)goto s_ScissorsPaper;
+	if(@playervar == 3 && @npcvar == 3)goto s_ScissorsScissors;
+s_RockRock:
+	emotion e_rock;
+	emotion 11,1;
+	goto s_Draw;
+s_RockPaper:
+	emotion e_paper;
+	emotion 11,1;
+	goto s_Lose;
+s_RockScissors:
+	emotion e_scissors;
+	emotion 11,1;
+	goto s_Win;
+s_PaperRock:
+	emotion e_rock;
+	emotion 12,1;
+	goto s_Win;
+s_PaperPaper:
+	emotion e_paper;
+	emotion 12,1;
+	goto s_Draw;
+s_PaperScissors:
+	emotion e_scissors;
+	emotion 12,1;
+	goto s_Lose;
+s_ScissorsRock:
+	emotion e_rock;
+	emotion 10,1;
+	goto s_Lose;
+s_ScissorsPaper:
+	emotion e_paper;
+	emotion 10,1;
+	goto s_Win;
+s_ScissorsScissors:
+	emotion e_scissors;
+	emotion 10,1;
+	goto s_Draw;
+s_Draw:
+	mes "[Mr. Jun]";
+	mes "Hmpf.";
+	mes "It's a draw";
+	mes "One more time!";
+	mes "Rock! Paper!";
+	mes "Scissors!";
+	goto s_Game2;
+s_Lose:
+	mes "[Mr. Jun]";
+	mes "Yes...!";
+	mes "Oh my god, yes!";
+	set @npcpoint,@npcpoint+1;
+	if(@npcpoint == 3)goto s_Lose2;
+	goto s_Game3;
+s_Win:
+	set @playerpoint,@playerpoint+1;
+	mes "[Mr. Jun]";
+	if(@playerpoint == 1)mes "Noooo...! This cannot be!";
+	if(@playerpoint == 2)mes "What...? I don't believe it! Bah.. !";
+	if(@playerpoint == 3)mes "No...! Sacrilege!";
+	if(@playerpoint == 3)goto s_Win2;
+	goto s_Game3;
+s_Lose2:
+	if(ayolemon != 1)set ayolemon,1;
+//Custom Dialogues
+	next;
+	mes "[Mr. Jun]";
+	mes "I won!";
+	mes "Seems like I can keep up with the kids. Ha ha ha!";
+	next;
+	mes "[Mr. Jun]";
+	mes "If you still want the lemons I'm up for another game. So please don't hesitate to come back.";
+	set @playerpoint,0;
+	set @npcpoint,0;
+	close;	
+s_Win2:
+	next;
+	mes "[Mr. Jun]";
+	mes "You... won.";
+	mes "I'm so exhausted.";
+	mes "I guess I can't compete with you youngsters anymore. Ha ha ha!";
+	next;
+	mes "[Mr. Jun]";
+	mes "As promised,";
+	mes "I shall share some";
+	mes "of my Lemons with you.";
+	mes "Grab as many as you want!";
+	next;
+	set ayolemon,2;
+	getitem 568,10;
+	mes "^3C2EE6You have plucked";
+	mes "^3C2EE610 Lemons from the tree.";
+	next;
+	emotion e_dots;
+	mes "[Mr. Jun]";
+	mes "Hmm...";
+	mes "Looks like you need a lot of them.";
+	mes "Oh well, that's fine with me. I had";
+	mes "a good time with you.";
+	next;
+	mes "[Mr. Jun]";
+	mes "Don't forget this though:";
+	mes "Don't be selfish, and always share";
+	mes "what you have with others. That's";
+	mes "one of the most important values";
+	mes "for human beings.";
+	close;
 }
\ No newline at end of file
diff --git a/npc/quests/quests_comodo.txt b/npc/quests/quests_comodo.txt
index 949309e3f..01708afec 100644
--- a/npc/quests/quests_comodo.txt
+++ b/npc/quests/quests_comodo.txt
@@ -1,1243 +1,1243 @@
-//===== eAthena Script ======================================= 

-//= Quest NPCs related to Comodo

-//===== By: ================================================== 

-//= kobra_k88

-//===== Current Version: ===================================== 

-//= 1.2

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//= 'Cross Hat', 'Bulb Hairband', 'Striped Hairband', 'Blue Hairband' Quests.

-//= 'Mine Helmet', 'Parcel Hat', 'Money Loser's Grief',

-//= 'Phantom of the Opera Mask', 'Doomed Sword' (parts 1,2,3), Quests.

-//===== Additional Comments: ================================= 

-//= 1.1 Fixed exploits [Lupus]

-//= 1.2 Added more quest from cities/comodo.txt [Evera]

-//============================================================ 

-

-

-

-//============================================================================================//

-// 					Hair Ornament Girl 

-//============================================================================================//

-// Cross Hat, Bulb Hairband, Striped Hairband, Blue Hairband

-//==================================================

-comodo.gat,227,158,4	script	Hair Ornament Girl	700,{

-	mes "[Hair Ornament Girl]";

-	if(sex==1)mes "Oh, hi.  Do you need to buy a present for a friend, your mother, or maybe your girl friend? Then get her a Hair Band! It's the best gift you can get her.";

-	if(sex==0)mes "Oh, hi.  Do you need to buy a present for a friend, your mother, or maybe yourself? Then get a Hair Band! It's the best gift you can give, or get.";

-	next;

-	mes "[Hair Ornament Girl]";

-	mes "Just by bringing me a few simple items, I can make you a gorgeous Hair Band!  Here, take a look at these....";

-M_Menu:

-	next;

-	menu "-Cross Hat Hairband",-, "-Bulb Hairband",M_Bulb, "-Striped Hairband",M_Striped, "-Blue Hairband",M_Blue, "-End Conversation",M_End;

-

-		set @BAND$, "Cross Hat Hairband";

-		set @ITEMS$, " ^5555FF1 Rosary^000000 and ^5555FF500 Destroyed Armors^000000.";

-		if(countitem(2608)>=1 && countitem(7069)>=500) set @GETBAND, 1;

-		goto sL_0;

-

-	M_Bulb:

-		set @BAND$, "Bulb Hairband";

-		set @ITEMS$, "^5555FF1 Slotted Circlet^000000 and ^5555FF20 Glass Beads^000000.";

-		if(countitem(2233)>=1 && countitem(746)>=20) set @GETBAND, 2;

-		goto sL_0;

-

-	M_Striped:

-		set @BAND$, "Striped Hairband";

-		set @ITEMS$, "^5555FF1500 Worn-out Prison Uniforms^000000.";

-		if(countitem(1099)>=1500) set @GETBAND, 3;

-		goto sL_0;

-

-	M_Blue:

-		set @BAND$, "Blue Hairband";

-		set @ITEMS$, "^5555FF1 Bandana^000000, ^5555FF1 Cobaltblue Dyestuffs^000000, and ^5555FF300 Anolian Skins^000000.";

-		if(countitem(2211)>=1 && countitem(978)>=1 && countitem(7003)>=300) set @GETBAND, 4;

-

-		sL_0:

-			mes "[Hair Ornament Girl]";

-			mes "So you're interested in the "+@BAND$+" huh? Here are the items you'll need for the "+@BAND$+":";

-			mes @ITEMS$;

-			next;

-			if(@GETBAND > 0) goto sL_GetBand;

-

-			mes "[Hair Ornament Girl]";

-			mes "Bring me all of these items and I will be able to make you a "+@BAND$+".";

-			goto M_Menu;

-

-		sL_GetBand:

-			mes "[Hair Ornament Girl]";

-			mes "I see that you have enough items for a "+@BAND$+".  Would you like me to make you one?";

-			next;

-			menu "Yes, I would.",-, "No thank you.",M_End;

-

-				if(@GETBAND == 1) goto ssL_Cross;

-				if(@GETBAND == 2) goto ssL_Bulb;

-				if(@GETBAND == 3) goto ssL_Striped;

-				if(@GETBAND == 4) goto ssL_Blue;

-

-				ssL_Cross:

-					if(countitem(2608)<1 || countitem(7069)<500) goto L_Cheater;

-					delitem 2608,1;

-					delitem 7069,500;

-					getitem  5036,1;

-					goto ssL_End;

-				ssL_Bulb:

-					if(countitem(2233)<1 || countitem(746)<20) goto L_Cheater;

-					delitem 2233,1;

-					delitem 746,20;

-					getitem 5034,1;

-					goto ssL_End;

-				ssL_Striped:

-					if(countitem(1099)<1500) goto L_Cheater;

-					delitem 1099,1500;

-					getitem 5049,1;

-					goto ssL_End;

-				ssL_Blue:

-					if(countitem(2211)<1 || countitem(978)<1 || countitem(7003)<300) goto L_Cheater;

-					delitem 2211,1;

-					delitem 978,1;

-					delitem 7003,300;

-					getitem 5052,1;

-				ssL_End:

-					mes "[Hair Ornament Girl]";

-					mes "Here is your "+@BAND$+".  Thank you.";

-					set @GETBAND, 0;

-					close;

-	L_Cheater:

-		mes "[Hair Ornament Girl]";

-		mes "Ooops... Where are these items?";

-		close;

-

-	M_End:

-		mes "[Hair Ornament Girl]";

-		mes "Hope to see you again soon.";

-		close;

-}

-

-

-//===================================================================================================//

-//						Mari Isac

-//===================================================================================================//

-// 'Mine Helmet', 'Parcel Hat', 'Money Loser's Grief', 'Phantom of the Opera Mask'

-//===============================================================//

-comodo.gat,274,137,5	script	Mari Isac	702,{

-	mes "[Mari Isac]";

-	mes "I travel all over the world and get to hear many interesting stories from the people I meet.";

-	mes "Sometimes they even teach me how to make special items";

-	next;

-	mes "[Mari Isac]";

-	mes "Would you be interested in some of the items I've learned to make?";

-M_Menu:

-	next;

-	menu "Tell me about them.",M_0, "Make me one.",M_1;

-

-	M_0:

-		menu "-Mine Helmet",-, "-Parcel Hat",sM_Parcel, "-Money Loser's Grief",sM_Money, "-Phantom of the Opera Mask",sM_Phantom;

-

-			mes "[Mari Isac]";

-			mes "I learned how to make the Mine Helmet when I traveled to the old coal mines near Geffen.";

-			next;

-			mes "[Mari Isac]";

-			mes "The 2 most important things a miner needs are light, and head protection.";

-			mes "A very inventive miner was able to create something that dealt with both issues.";

-			next;

-			mes "[Mari Isac]";

-			mes "He attached a light to his safety helmet and called it a Mine Helmet.";

-			mes "This meant that miners no longer had to worry about carrying around lamps and could work more efficiently.";

-			next;

-			mes "[Mari Isac]";

-			mes "Anyways, if you want me to make you a Mine Helmet you'll need to bring me these items:";

-			mes "^5555FF1 Safety Helmet^000000,";

-			mes "^5555FF1 Candle^000000,";

-			mes "^5555FF1 Crystal Mirror^000000,";

-			mes "^5555FF25 Steel^000000.";

-			next;

-			goto M_0;

-		sM_Parcel:

-			mes "[Mari Isac]";

-			mes "I learned how to make the Parcel Hat when I traveled to Alberta.  There they have a unique way of distributing mail and goods.";

-			next;

-			mes "[Mari Isac]";

-			mes "Instead of using a pouch or a sack to carry items for delivery, they use a special kind of hat, called a Parcel Hat.";

-			mes "This hat allows the delivery personel to carry numerous items on their heads.  Of course they have to have good balance to use it.";

-			next;

-			mes "[Mari Isac]";

-			mes "Anyways, if you want me to make you a Parcel Hat, you'll need to bring me these items.";

-			mes "^5555FF150 Fabric^000000,";

-			mes "^5555FF100 Resin^000000,";

-			mes "^5555FF1 Cobaltblue Dyestuffs^000000.";

-			next;

-			goto M_0;

-		sM_Money:

-			mes "[Mari Isac]";

-			mes "I learned how to make the Money Loser's Grief when I traveled to Morroc.";

-			next;

-			mes "[Mari Isac]";

-			mes "A long time ago an honest merchant got into a conflict with a crooked guild.";

-			mes "Unlike the dirty guild, the merchant did not scam or cheat people.";

-			next;

-			mes "[Mari Isac]";

-			mes "Because of this they attacked the merchants shop and took all of his goods.";

-			next;

-			mes "[Mari Isac]";

-			mes "The merchant was devastated by the loss of his shop.";

-			mes "In his sadness he used the bits and pieces that were left from his shop to create a new item.";

-			next;

-			mes "[Mari Isac]";

-			mes "He created the Money Loser's Grief, a symbol of his great sadness.  When people see it, they can't help but feel sympathetic to the wearer.";

-			next;

-			mes "[Mari Isac]";

-			mes "Many merchants now wear it to help themselves get more business.  Of course it is also a reminder of the honest merchants sad tale.";

-			next;

-			mes "[Mari Isac]";

-			mes "Anyways, if you want me to make you a Money Losers Grief, you'll need to bring me these items.";

-			mes "^5555FF1 Circlet with a single slott^000000,";

-			mes "^5555FF1 Gold^000000,";

-			mes "^5555FF20 Steel^000000,";

-			mes "^5555FF80 Feathers^000000,";

-			mes "^5555FF800 Sticky Mucus^000000.";

-			next;

-			goto M_0;

-		sM_Phantom:

-			mes "[Mari Isac]";

-			mes "I learned how to make the Phantom of the Opera Mask when I traveled to Al De Baran.";

-			mes "The story behind this item is that of a man's pure love........";

-			next;

-			mes "[Mari Isac]";

-			mes "There once was a man who was in love with a beautiful opera singer.";	

-			mes "Unfortunately the man had a terribly disfigured face which forced to him to wear a mask.";

-			next;

-			mes "[Mari Isac]";

-			mes "He was ashamed of his appearance and could never bring himself to face the singer.";

-			mes "The man instead, watched her from a far, admiring every nuance of her beauty and grace.";

-			next;

-			mes "[Mari Isac]";

-			mes "He lurked in the bowles of the opera house and from time to time he would sing his sad love song.";

-			mes "Many people heard it and believed that there was a phantom haunting the opera house.";

-			next;

-			mes "[Mari Isac]";

-			mes "The singer also heard his song, and through it she was able to feel his pain and his love for her.";

-			mes "The two eventually met, and when they did she was able to look past his appereance and accept him for who he was.";

-			next;

-			mes "[Mari Isac]";

-			mes "Too this day, the tale of the masked 'phantom' is still romantacised.";

-			next;

-			mes "[Mari Isac]";

-			mes "Anyways, if you want me to make you a Phantom of the Opera Mask, you'll need to bring me these items.";

-			mes "^5555FF1 Opera Masque^000000,";

-			mes "^5555FF50 Horrendous Hairs^000000.";

-			goto M_0;

-

-	M_1:

-		menu "-Mine Helmet",-, "-Parcel Hat",sM_MakePar, "-Money Loser's Grief",sM_MakeMon, "-Phantom of the Opera Mask",sM_MakePhan;

-

-			if(countitem(5009)<1 || countitem(5028)<1 || countitem(747)<1 || countitem(999)<25) goto ssL_NoItems;

-			delitem 5009, 1;

-			delitem 5028, 1;

-			delitem 747, 1;

-			delitem 999, 25;

-			mes "[Mari Isac]";

-			mes "Here you go.  Enjoy your Mine Helmet!";

-			getitem 5031,1;

-			close;

-		sM_MakePar:

-			if(countitem(1059)<150 || countitem(907)<100 || countitem(978)<1) goto ssL_NoItems;

-			delitem 1059, 150;

-			delitem 907, 100;

-			delitem 978, 1;

-			mes "[Mari Isac]";

-			mes "Here you go.  Enjoy your Parcel Hat!";

-			getitem 5023,1;

-			close;

-		sM_MakeMon:

-			if(countitem(2233)<1 || countitem(969)<1 || countitem(999)<20 || countitem(949)<80 || countitem(938)<800) goto ssL_NoItems;

-			delitem 2233, 1;

-			delitem 969, 1;

-			delitem 999, 20;

-			delitem 949, 80;

-			delitem 938, 800;

-			mes "[Mari Isac]";

-			mes "Here you go.  Enjoy your Money Loser's Grief!";

-			getitem 5021,1;

-			close;

-		sM_MakePhan:

-			if(countitem(2281)<1 || countitem(1048)<50) goto ssL_NoItems; 

-			delitem 2281,1;

-			delitem 1048, 50;

-			mes "[Mari Isac]";

-			mes "Here you go.  Enjoy your Phantom of the Opera Mask!";

-			getitem 5043, 1;

-			close;

-

-		ssL_NoItems:

-			mes "[Mari Isac]";

-			mes "You don't seem to have enough items for me to make that hat.  Please come back when you do.";

-			close;

-}

-

-//============================================================================//

-//			Chief Quest (Doomed Swords Part 1)

-//============================================================================//

-//=======================================================

-comodo.gat,206,310,4	script	Rochito	48,{

-	if(dmdswrd_Q == 1) goto L_1;

-	if(dmdswrd_Q == 2) goto L_2;

-	if(dmdswrd_Q == 3) goto sL_2;

-	if(dmdswrd_Q == 4) goto L_3;

-	if(dmdswrd_Q == 5 || dmdswrd_Q == 6) goto sL_3;

-L_0:

-	mes "[Rochito]";

-	mes "Meat, meat, meat... I LOVE MEAT!! Eat, eat, eat... ALL I eat is MEAT!! I'm sooo obsessed with meat..... I'm... I.. I... I'm a MEAT MAN!!";

-	emotion e_lv;

-	next;

-	mes "[Rochito]";

-	mes "Comodo is meat heaven!! That's why BBQ camping in Comodo is sooooo AWESOME!!!"; 

-	next;

-	menu "Tell me more about BBQ Camping.",M_0, "End Conversation.",M_End;

-

-	M_0:

-		mes "[Rochito]";

-		mes "The Komodoru, a native animal of Comodo, is famous because of it's delicious meat.  Every part of the animal is tasty.";

-		mes "However the tastiest part of the Komodoru, is the area around the spine.  It's number one!";

-		emotion e_no1;

-		next;

-		mes "[Rochito]";

-		mes "Look at all of this meat in front of me! I don't know what to do with all of this meat! What should I do?? Oh no!...";

-		emotion e_swt2;

-		next;

-		mes "[Rochito]";

-		mes "Oh, I almost forgot!! You must try this Komodoru spine meat with Comodo's authentic BBQ seasoning.";

-		mes "^5555FFKoserahserah^000000 is the name of the seasoning, and you should at least try it once before you leave.";

-		next;

-		mes "[Rochito]";

-		mes "There is a rumor going around this camp ground that Koserahserah is soooo good that it might be addictive.";

-		mes "It's possible that it may even cause a slight euphoria in those who try it.";

-		next;

-		mes "[Rochito]";

-		mes "I'm not sure if that's true, but I do not that the seasoning is not allowed to be exported outside of Comodo.";

-		mes "Luckily I'm a resident here so I can have as much as I want.";

-		next;

-		mes "[Rochito]";

-		mes "Still, the authorities are worried about how Koserahserah should be regulated.";

-		mes "The ^5555FFChief of Comodo^000000 is currently working on a some guidelines for it.";

-		if(dmdswrd_Q == 0) set dmdswrd_Q, 1;

-		close;

-	M_End:

-		close;

-

-L_1:

-	mes "[Rochito]";

-	mes "This Komodoru spine meat is delicious when seasoned with ^5555FFKoserahseah^000000, a local flavoring that is the pride of Comodo!!";

-	mes "Would you like to try some?";

-	next;

-	mes "[Rochito]";

-	mes "Oh, are you looking for the ^5555FFChief's^000000 house? Just go west of this camp ground to the village.  You'll find his house there.";

-	close;

-

-L_2:

-	mes "[Rochito]";

-	mes "We have a lot of time left on our vacation and I think we should spend the rest of it here, enjoying the Komodoru meat.";

-	next;

-	mes "[Rochito]";

-	mes "In fact, we should just keep on having BBQ parties!";

-	next;

-	mes "^5533FF~ gave Rochito the Koserahserah ~^000000";

-	next;

-	mes "[Rochito]";

-	mes "Oh my!! This is the special Comodo seasoning.... Koserahserah!! How did you manage to get this precious delicacy?";

-	emotion e_gasp;

-	next;

-	mes "[Rochito]";

-	mes "Oh... I see, I see.  So it was given to you by my long time friend.  Well, thank you so much.... thank you...";

-	emotion e_thx;

-	next;

-	mes "[Rochito]";

-	mes "Hey everybody! Tausupa has sent us some Koserahserah seasoning!!";

-	next;

-	mes "[Emralhandas]";

-	mes "Our old friend?";

-	next;

-	mes "[Rochito]";

-	mes "I don't know if we should take such a great gift....";

-	next;

-	mes "[Rockha]";

-	mes ".........................";

- 	next;

-	mes "[Rochito]";

-	mes "We should give him something in return as a thank you.  But what can we give him?...";

-	mes "should we give him that wonderful ^5555FFWine^000000 we've been saving? It has a very nice aroma....";

-	next;

-	mes "[Rochito]";

-	mes "May I ask a favor of you? If it is not too much trouble, would you take this to our dear friend.....";

-	mes "I would deliver this in person but I'm a little busy with the BBQ and all.....";

-	next;

-	mes "[Rochito]";

-	mes "Please.  We would be very grateful if you could give this to him.";

-	next;

-	mes "^5555FF~ received 'Mureuchieligu Wine' ~^000000";

-	set dmdswrd_Q, 3;

-	close;

-

-	sL_2:

-		mes "[Rochito]";

-		mes "Please do us a favor and deliver the wine to the chief.  We would be very happy if you did.";

-		close;

-

-L_3:

-	mes "[Rochito]";

-	mes "You've returned..... Oh! Thank you for the delivering the wine for us.";

-	emotion e_thx;

-	set dmdswrd_Q, 5;

-	next;

-

-	sL_3:

-		mes "[Rochito]";

-		mes "We are very proud of our courageous friend.  It is because of him that we can live peacefully and travel safely.";

-		next;

-		mes "[Rochito]";

-		mes "Oh, I just remembered something....";

-		mes "We've been talking about Comodo's famous meat all this time, and I didn't even mention Comodo's world famous ^5555FFCheese^000000!";

-		next;

-		mes "[Rochito]";

-		mes "I believe there is a cheese expert named ^5533FFTORUNA^000000 somewhere on this island.";

-		mes "If your interested in the cheese you should go ask him about it.";

-		if(dmdswrd_Q == 5) set dmdswrd_Q, 6;

-		close;

-

-	

-}

-

-//=======================================================

-comodo.gat,204,310,4	script	Rockha	98,{

-	if(dmdswrd_Q == 3) goto L_1;

-	if(dmdswrd_Q == 4 || dmdswrd_Q==5) goto L_2;

-L_0:

-	mes "[Rockha]";

-	mes ". . . . . . . . . .";

-	mes "My friends and I always wanted to have our BBQ eat out.....";

-	mes ". . . . . . . . . .";

-	next;

-	menu "About the ^3355FFChief^000000.",M_0, "End Conversation.",M_End;

-

-	M_0:

-		mes "[Rockha]";

-		mes "Yeah... I recently discovered that a friend I thought I lost during the ^FF4444'War with the Witch'^000000, is still alive.";

-		mes "Now he's the ^5555FFChief of Comodo^000000....";

-		next;

-		mes "[Rockha]";

-		mes "At the end of the war the witch was defeated and sealed in the ground beneath this village.";

-		next;

-		mes "[Rockha]";

-		mes "It is rumored that the seasonings we get from our local plants somehow receive their unique qualities from the Witch's magical influence.";

-		next;

-		mes "[Rockha]";

-		mes "Although my friend and I now live in different worlds, his new life hasn't changed him.";

-		mes "Thankfully we can still be friends after all that's happened.";

-		close;

-

-L_1:

-	mes "[Rockha]";

-	mes "Oh, and by the way.... Could you give him this message as well?";

-	mes "Tell him, 'For as long as you have remembered us, we will not forget you.  Friends forever.'.....";

-	close;

-

-L_2:

-	mes "[Rockha]";

-	mes "Ha ha ha..... aaaahhh.... THIS is FRIENDSHIP!!";

-	emotion e_heh;

-	next;

-	mes "[Rockha]";

-	mes "Let us take a moment to make a toast to our good friend.  Let us eat and drink until we can eat no more!!";

-	next;

-	mes "[Rockha]";

-	mes "~!!Yippeeeeee!!~!!Wooohooooo!!~";

-	close;

-	mes "[Rockha]";

-	mes "Thank you for your assistance.  You have shown us that you are truly a good person.  We now consider you as a friend.";

-	next;

-	mes "[Rockha]";

-	mes "If you ever need any help, just come and look for me, ^3355FF'Rockha'^000000.  We are forever in your debt.";

-	close;

-}

-

-//=======================================================

-comodo.gat,209,314,4	script	Rotute	82,{

-	if(dmdswrd_Q==2 || dmdswrd_Q==3) goto L_1;

-	if(dmdswrd_Q == 4 || dmdswrd_Q==5) goto L_2;

-

-L_0:

-	mes "[Rotute]";

-	mes "The quest for the ^5555FFSwords of Power^000000 has not yet been completed!";

-	next;

-	mes "[Rotute]";

-	mes "Although four of the swords have been recovered by our team, there are rumors of a more powerful sword near ^5555FFGlastheim^000000.";

-	mes "This has brought us yet another challenge.....";

-	next;

-	mes "[Rotute]";

-	mes "We must find this new sword!! A new expedition has been planned to find this sword but I feel very anxious.";

-	mes "If we succeed this will affect the whole world!! For my deceased father.....";

-	next;

-	mes "[Rotute]";

-	mes "...... We MUST SUCCEED!!!!";

-	emotion e_go;

-	close;

-

-L_1:

-	mes "[Rotute]";

-	mes "Wow!! This is Comodo's famous seasoning!! The Captain's friend is truly a good person.  To be this generous is unbelievable!";

-	emotion e_gasp;

-	next;

-	mes "[Rotute]";

-	mes "I can only hope that I find a friend that is as loyal as he on this quest.....";

-	close;

-

-L_2:

-	mes "[Rotute]";

-	mes "It's strange.... this is only my first visit to Comodo and yet.... for some reason, it seems so familiar... like it's my home town.";

-	next;

-	mes "[Rotute]";

-	mes "When this journey is over, I hope to visit this wonderful place again..... It feels like something is waiting for me here.";

-	next;

-	mes "[Rotute]";

-	mes "Oh, and thanks so much for helping our captain.";

-	emotion e_thx;

-	close;

-}

-

-//=======================================================

-comodo.gat,209,305,4	script	Emralhandas	70,{

-	mes "[Emralhandas]";

-	mes "Rockha, empty your glass so I can pour you a drink.";

-	next;

-	mes "[Emralhandas]";

-	mes "Many years ago, during the War with the Witch, we dreamed of the day when we could live in peace.";

-	mes "Today that dream has come true and it's all because of you my friends!!";

-	emotion e_no1;

-	next;

-	menu "Ask about her friends....",M_0, "End Conversation",M_End;

-

-	M_0:

-		mes "[Emralhandas]";

-		mes "Many years ago, heroes from every region of Rune Midgard were selected to embark upon a very unique and important quest.";

-		next;

-		mes "[Emralhandas]";

-		mes "The goal was to find the ^5555FF4 rare 'Swords of Power'^000000!";

-		mes "These 4 swords were said to be the most powerful weapons to have ever been made.";

-		next;

-		mes "[Emralhandas]";

-		mes "After 10 hard years of searching, all 4 swords were found and brought together.";

-		mes "Out of all of those who searched the swords, the four bravest were chosen to protect them.";

-		next;

-		mes "[Emralhandas]";

-		mes "I, Emralhandas, was one of the four that were chosen.";

-		next;

-		mes "[Emralhandas]";

-		mes "Of course there were many hardships that we had to endure before, and even after these swords were found........";

-		next;

-		mes "[Emralhandas]";

-		mes "Our team of adventures consisted of myself, our ship's captain 'Rockha', our comrade 'Rochito', and the Chief of this town, 'Tausupa'.";

-		next;

-		mes "[Emralhandas]";

-		mes "We had found the last sword and headed back to the island.  Up to this point we had not even thought about the weapon's owner.";

-		mes "As we left we began to have a bad feeling about what was going to happen next.";

-		next;

-		mes "[Emralhandas]";

-		mes "When we returned to the island, we were confronted by ^790079'Mariposum'^000000, a powerful Witch who practiced the dark art of EVIL magic!!";

-		next;

-		mes "[Emralhandas]";

-		mes "Her goal was to take over the world and plunge into a dark chaos!! We had to defend not only ourselves, but the future of humanity!!";

-		mes "So it was here that me made our stand against this terrible evil!";

-		emotion e_gasp;

-		next;

-		mes "[Emralhandas]";

-		mes "A tremendous battle took place and many of our comrades fell that day... but their efforts were not in vain.";

-		next;

-		mes "[Emralhandas]";

-		mes "With bloodshed and fierce determination we were able to defeat the witch and imprison her beneath the earth.";

-		next;

-		mes "[Emralhandas]";

-		mes "Of all of those who risked their lives that day, one stood out amongst the rest and became the deciding factor in the witch's defeat.....";

-		next;

-		mes "[Emralhandas]";

-		mes "It was ^5555FFTausupa^000000.";

-		next;

-		mes "[Emralhandas]";

-		mes "Of course we are great full to all the brave warriors who fought and lost their lives that day.";

-		mes "Especially to 'Rotute's' father who cannot be with us today, may he rest in peace.";

-		next;

-		mes "[Emralhandas]";

-		mes "Rotute does not know about this yet, but hopefully he will find out about his father's heroism before this quest is complete......";

-		close;

-	M_End:

-		mes "[Emralhandas]";

-		mes "Our quest has not yet been completed.  Rockha, we must eat all of the meat in Rune Midgard until there is none left!!";

-		mes "We must eat and eat, for the pride of our Meat Club!!! (~hiccup~)";

-		close;

-}

-

-

-// Chief's House =========================================================//

-cmd_in02.gat,32,140,4	script	Chief Tausupa	49,{

-	if(dmdswrd_Q == 1) goto L_1;

-	if(dmdswrd_Q == 2) goto sL_1;

-	if(dmdswrd_Q == 3) goto L_2;

-	if(dmdswrd_Q == 4) goto sL_2;

-

-L_0:

-	mes "[Chief Tausupa]";

-	mes "Hello, I am the Chief of Comodo.  You may call me Tausupa.  Comodo is a place of pleasure, enjoyment, love, and beauty.";

-	mes "Welcome, and have a pleasant and relaxing stay here.";

-	next;

-	menu "Ask about the ^5555FFCasino^000000.",M_0, "Ask about the ^790079Evil Witch^000000.",M_1, "End Conversation.",M_End;

-

-	M_0:

-		mes "[Chief Tausupa]";

-		mes "The Casino is one of the many notable sites in Comodo.  It would seem that you have some interest in it.";

-		mes "The Casino uses it's own currency, a coin called the ^5555FF'Eulwo'^000000.";

-		next;

-		mes "[Chief Tausupa]";

-		mes "There are a variety of games for you to enjoy there.";

-		mes "The earnings you win can be used to purchase different items available only in the Casino.";

-		next;

-		mes "[Chief Tausupa]";

-		mes "These earnings, which are in the form of Eulwo, cannot be exchanged for Zeny though.";

-		close;

-	M_1:

-		mes "[Chief Tausupa]";

-		mes ". . . . . . . . . .";

-		mes "You must be from out of town.  I'm not sure where you heard about it, but that story is old and most people have forgotten about it.";

-		mes "It's really not worth mentioning. . . . .  . . . . . . .";

-		close;

-	M_End:

-		mes "[Chief Tausupa]";

-		mes "If you haven't noticed, Comodo is located inside of a huge, natural, cave.  No matter what time of day it is, you'll never see the sunlight.";

-		next;

-		mes "[Chief Tausupa]";

-		mes "It is this unique 24 hour nightlife that attracts so many tourist to our town.  Anyways, please enjoy your stay here.";

-		close;

-

-L_1:

-	mes "[Tausupa]";

-	mes "..... Is that so? My long time friends have come back to Comodo and are at the Camp Grounds enjoying the BBQ huh?.......";

-	next;

-	mes "[Tausupa]";

-	mes "It would seem that they are planning another expedition........";

-	next;

-	mes "[Tausupa]";

-	mes "I have not seen my friends in a long time and the sound of going on another adventure with them is very exciting.... however......";

-	next;

-	mes "[Tausupa]";

-	mes "~sigh~ Unfortunately I will not be able to go with them.  I fear that if I leave, the evil witch will revive and wreak havoc on this world once again.";

-	next;

-	mes "[Tausupa]";

-	mes "..... I have a favor I must ask of you.......";

-	next;

-	mes "[Tausupa]";

-	mes "Can you take this special seasoning to my friends?";

-	next;

-	mes "^5555FF~ recieved Koserahserah ~^000000";

-	set dmdswrd_Q, 2;

-	next;

-

-	sL_1:

-		mes "[Chief Tausupa]";

-		mes "Please take this seasoning to my friends at the BBQ camp grounds and give it to ^5555FFRochito^000000.  Thank you.";

-		close;

-

-L_2:

-	mes "[Chief Tausupa]";

-	mes "Were my friends happy? After you left, I had some time to think..... I should have delivered the seasoning personally......";

-	mes "I should have gone to see them......";

-	next;

-	mes "[Chief Tausupa]";

-	mes "But I am much too busy as the Chief of Comodo........ Maybe I should quit...........";

-	mes "I really want to go on another quest with my good friends.... How did I end up like this?";

-	next;

-	mes "^5555FF~ you give him Mureuchieligu Wine and convey the message ~^000000";

-	next;

-	mes "[Chief Tausupa]";

-	mes "..................";

-	next;

-	mes "[Chief Tausupa]";

-	mes "That was a message from my friends? I think I understand now.... My friends are TRUE friends.  They have been thinking of me all this time........";

-	next;

-	mes "[Chief Tausupa]";

-	mes "I have made up my mind!";

-	emotion e_ic;

-	next;

-	mes "[Chief Tausupa]";

-	mes "Mureuchieligu Wine is made as soon as the grapes are picked.  It is then bottled in the very same place and is left there to age.";

-	mes "The wine spends the rest of its days aging in the same spot.";

-	next;

-	mes "[Chief Tausupa]";

-	mes "Much like the wine, I have been aging away in the same place here in Comodo, and I must continue to stay here for it is my duty.";

-	next;

-	mes "[Chief Tausupa]";

-	mes "I am thankful for my friends' advice.  The gift they gave me had a great deal of meaning.";

-	mes "Please tell my friends this, 'I will not avoid my destiny.  On the contrary, I will fulfill it to the best of my ability'.";

-	set dmdswrd_Q, 4;

-	next;

-

-	sL_2:

-		mes "[Chief Tausupa]";

-		mes "I would like to thank you for helping my friends and I.  I am truly great full.";

-		close;

-}

-

-

-

-//============================================================================//

-//			Cheese Quest (Doomed Swords Part 2)

-//============================================================================//

-

-//=======================================================

-comodo.gat,88,97,4	script	Cheese Expert TORUNA	109,{

-	if(dmdswrd_Q == 7) goto sL_2;

-	mes "[TORUNA]";

-	mes "I hear that the cheese here is delicious.  Every time I come here to visit, I ask for some of that popular cheese.";

-	mes "But they always seem to be out!  If I could just get a taste of that cheese...........";

-M_Menu:

-	next;

-	menu "Ask about the cave.",M_0, "Comodo is a town inside a cave?",M_1, "End Conversation.",M_End;

-

-	M_0:

-		mes "[TORUNA]";

-		mes "It is a natural formation of limestone which was shaped by the erosive powers of fresh water with sea water.";

-		next;

-		mes "[TORUNA]";

-		mes "The air and topsoil in the cave are rich in carbon-dioxide gas.";

-		mes "This was caused by C02 gas leaking into the cave through cracks in the limestone over a period of many years.";

-		next;

-		mes "[TORUNA]";

-		mes "Water from rainfall and ocean currents slowly eroded the limestone to carve out the cave.";

-		next;

-		mes "[TORUNA]";

-		mes "Essentially a cave is formed when water finds cracks in some type of rock formation and erodes the rock to a point where a cave is formed.";

-		mes "Of course this takes hundreds of years and a lot of water.";

-		goto M_Menu;

-	M_1:

-		mes "[TORUNA]";

-		mes "Yep.  What you see here is really the inside of a gigantic cave.";

-		mes "Most people don't realize this at first, and that's thanks to all of the towns people's hard work and dedication.";

-		next;

-		mes "[TORUNA]";

-		mes "The people who settled here were very industrious and worked diligently to turn this cave into a place that they could call home.";

-		next;

-		mes "[TORUNA]";

-		mes "They slowly chipped away at the limestone surfaces, to shape the interior of the cave into something much more eye pleasing.";

-		mes "It was from these humble beginnings that the Comodo you see today, was founded.";

-		next;

-		if(dmdswrd_Q == 6) goto sL_1;

-

-		mes "[TORUNA]";

-		mes "Unfortunately that is only half the story.";

-		next;

-		mes "[TORUNA]";

-		mes "The early settlers faced an even greater challenge when the ^790079Evil Witch, Meropusum^000000, arrived.";

-		mes "She was determined to rule the world, and used the newly founded town of Comodo as her staging ground.";

-		next;

-		mes "[TORUNA]";

-		mes "Led by a group of strong heroes, the town fought back against the witch and sealed her away.  Many lives were lost in this war however.";

-		next;

-		mes "[TORUNA]";

-		mes "The strongest of the heroes was chosen as the town's new leader, and under his leadership the town prospered.";

-		next;

-		mes "[TORUNA]";

-		mes "Be aware though, that Meropusom is still alive.  Although she has been sealed away, her evil powers can still be felt.";

-		mes "Her minions still lurks in the shadows awaiting their master's return.";

-		next;

-		mes "[TORUNA]";

-		mes "So be cautious when venturing into the unknown parts of Comodo.  Anyway, so long and take care.";

-		goto M_Menu;

-

-		sL_1:

-			mes "[TORUNA]";

-			mes "Not only has this cave become a home for the people of Comodo, but it's unique environment has also helped in creating....";

-			next;

-			mes "[TORUNA]";

-			mes "The world famous..... Comodo ^5533FFCheese^000000!!!";

-			emotion e_ic;

-			next;

-			mes "[TORUNA]";

-			mes "This special Cheese is simply DELICIOUS! You will understand how good the Cheese is once you try it.";

-			emotion e_lv2;

-			set dmdswrd_Q, 7;

-			next;

-		sL_2:

-			mes "[TORUNA]";

-			mes "You should go speak with the people at the ^009500Outdoor Bar^000000 near the camp grounds.";

-			mes "I heard them talking about the ^5533FFCheese^000000, it is so popular.";

-			close;

-	M_End:

-		mes "[TORUNA]";

-		mes "The taste of Comodo Cheese is simply out of this world!!  Just one taste and I guarantee that you won't be able to stop!";

-		mes "It's so good you may even go GRAZY without it!";

-		emotion e_lv;

-		next;

-		mes "[TORUNA]";

-		mes "Oh if I could just have one piece.... I'd be so happy I'd dance all night on that ^5555FFHula Dancing Stage^000000!!";

-		close;

-}

-

-//=======================================================

-comodo.gat,164,291,2	script	Rakusa	73,{

-	if(dmdswrd_Q == 7) goto L_1;

-	if(dmdswrd_Q == 8) goto L_2;

-

-	mes "[Rakusa]";

-	mes "Comodo is often referred to as the town of 'recreation and relaxation'.......";

-	next;

-	mes "[Rakusa]";

-	mes "This can be misleading however, for Comodo is not only the home of fun tourist attractions, but two very ^FF4444dangerous dungeons^000000 as well.";

-	next;

-	mes "[Rakusa]";

-	mes "This area has unusually strong monsters.  If you plan on entering the dungeons, be very well prepared and expect trouble.";

-	mes "These dungeons are definitely not for the faint of heart!";

-	close;

-L_1:

-	mes "[Rakusa]";

-	mes "That man sitting over there simply won't stop talking about that Comodo ^3355FF'Cheese'^000000.........";

-	next;

-	mes "[Rakusa]";

-	mes "I just can't stop wondering about what kind of Cheese it is.  I sure hope I will have the opportunity to try it someday.";

-	set dmdswrd_Q, 8;

-	next;

-L_2:

-	mes "[Rakusa]";

-	mes "It looks like ^5533FFKichiri^000000 isn't as interested in the Cheese as that other man is though...... actually he looks rather annoyed.........";

-	next;

-	mes "[Rakusa]";

-	mes "Someone should check on Kichiri and make sure everything is all right......";

-	close;

-}

-

-//=======================================================

-comodo.gat,169,284,4	script	Kichiri	99,{

-	mes "[Kichiri]";

-	if(dmdswrd_Q == 8) goto L_1;

-	if(dmdswrd_Q == 9) goto L_2;

-

-	mes "In the heart of Comodo lies a performance stage.  It's where a number of crazed residents put on shows for the tourists that come to visit.";

-	mes "The shows are so popular that some tourist even come back to Comodo to see them again.";

-	next;

-	mes "[Kichiri]";

-	mes "Many of the residents just dance and dance without much skill.";

-	mes "But for the few who show some talent, there is the possibility of being recruited by the local ^5555FFDancers Guild^000000.";

-	close;

-L_1:

-	mes "The guy sitting near me just won't stop talking about Comodo ^5533FFCheese^000000...... It's going to drive me insane!";

-	emotion e_pif;

-	next;

-	mes "[Kichiri]";

-	mes "Yeah, right over there, the guy named ^3355FFMagatu^000000.  Can you do something about it?";

-	set dmdswrd_Q, 9;

-	close;

-L_2:

-	mes "I just want to have a quit time and have a few drinks, is this too much to ask for?";

-	mes "Stupid drunk ^3355FF' Magatu '^000000..... always talking about ^5533FFCheese^000000......";

-	emotion e_ag;

-	close;

-}

-

-//=======================================================

-comodo.gat,163,280,4	script	Magatu	55,{

-	mes "[Magatu]";

-	if(dmdswrd_Q == 9) goto L_1;

-	if(dmdswrd_Q == 10) goto L_2;

-

-	mes "Yes! That's it!! The irresistible smell of that amazing ^5533FFCheese^000000!! It's so delicious!.... Oh, I can't wait any longer......";

-	emotion e_lv;

-	next;

-	mes "[Magatu]";

-	mes "No matter what anyone else says..... Comodo Cheese is truly the BEST!!! Kekekeke!!";

-	emotion e_no1;

-	next;

-	mes "[Magatu]";

-	mes "Cheese! CHEESE!! WONDERFULL Comodo CHEESE!!!.... so.... tas... ty.... (~drooools~)";

-	emotion e_lv;

-	close;

-L_1:

-	mes "What? You want to know some information regarding Comodo's special ^5533FFCheese^000000?";

-	mes "I guess I could give you some inside information............";

-	emotion e_what;

-	next;

-	mes "[Magatu]";

-	mes "Okay, go to the ^009500Casino^000000 and look for a guy named ^5533FFManzi^000000.  He should be somewhere on the first floor.";

-	mes "He's got a huge scar on his face so he should be easy to spot.";

-	next;

-	mes "[Magatu]";

-	mes "When you see him give him this Bottle Cap.  Don't do anything else, just give him the bottle cap and he will give you some info on the Cheese....";

-	next;

-	mes "^3355FF- Received a Bottle Cap -^000000";

-	set dmdswrd_Q, 10;

-	close;

-L_2:

-	mes "Oh yeah, I got to tell you my friend's name.....";

-	next;

-	mes "[Magatu]";

-	mes "O? I already told you? Bah, I am so drunk....... ^5533FFManzi^000000... He’s in the ^009500Casino^000000, got it?";

-	emotion e_hmm;

-	close;

-}

-

-//======================================================

-cmd_in02.gat,189,99,4	script	Manzi	85,{

-	if(dmdswrd_Q == 10) goto L_1;

-	if(dmdswrd_Q == 11) goto L_2;

-	if(BaseJob == Job_Novice) goto L_Nov;

-

-	mes "[Manzi]";

-	mes "There have been some people who've bet too much and have lost their pecopeco and many other precious items.";

-	mes "So be careful when you make your bets..... you might just loose the shirt off your back.......";

-	close;

-

-	L_Nov:

-		mes "[Manzi]";

-		mes "Stop bothering me you little kid.  This place is for adults only, get out of here.";

-		close;

-L_1:

-	mes "[Manzi]";

-	mes "Yes?..........";

-	next;

-	mes "^3355FF- You give him the Bottle Cap-^000000";

-	next;

-	mes "[Manzi]";

-	mes "..........................";

-	next;

-	mes "[Mazi]";

-	mes "Whoa! This is from my friend Magatu, you must be someone of great importance to him.";

-	mes "Otherwise, he wouldn't have given you the Bottle Cap.";

-	emotion e_ic;

-	next;

-	mes "[Manzi]";

-	mes "I made a promise to Magatu that I'd help anybody who had one of his bottle caps find out more about the ^5533FFCheese^000000.........";

-	next;

-	mes "[Manzi]";

-	mes "Only a selected few get the rare opportunity to taste the legendary Comodo Cheese you know.";

-	next;

-	mes "[Manzi]";

-	mes "Well, I guess you could find out more about Comodo Cheese from a lady near the ^3355FF 'Hulla Stage' ^000000 located near the center of town.";

-	next;

-	mes "^3355FF- Received Shiny Coin -^000000";

-	next;

-	mes "[Manzi]";

-	mes "Just tell her that Manzi from the casino sent you and show her that coin.  She'll tell you all you need to know about the Cheese.";

-	next;

-	mes "[Manzi]";

-	mes "By the way......... no else is listening this right?....... *whispers: that lady is actually in charge of the Comodo Cheese distribution*...........";

-	set dmdswrd_Q, 11;

-	close;

-L_2:

-	mes "[Manzi]";

-	mes "The cheese lady should be near the ^5533FFHulla Stage^000000.  Just remember to show her the coin when you ask her about the cheese.";

-	close;

-}

-

-//=======================================================

-comodo.gat,187,153,4	script	Hullaris	701,{

-	mes "[Hullaris]";

-	if(dmdswrd_Q == 11) goto L_1;

-	if(dmdswrd_Q == 12) goto L_2;

-	if(dmdswrd_Q == 13) goto L_3;

-	if(dmdswrd_Q == 14) goto L_4;

-

-	mes "Hula Dance? Who says it's merely a hula dance?? It is much more than just some dance.";

-	mes "To refer to Comodo's unique form of dancing as simply a hula dance, is just insulting!";

-	emotion e_an;

-	next;

-	mes "[Hullaris]";

-	mes "The Comodo Hula Dance was developed long ago.  Legend has it that the dance was used to control the minds and bodies of others!";

-	mes "Hula 'dance'?.... More like Hula 'communication'......";

-	next;

-	mes "[Hullaris]";

-	mes "This form of 'communication' was capable of not only changing a persons mood, but of controlling a persons mind as well!";

-	next;

-	mes "[Hullaris]";

-	mes "Hehehehehe...... If anyone can dance better than me.... LET EM COME OUT!! It is more than just dancing..........";

-	mes "It is a form of 'COMMUNICATION'!!!";

-	emotion e_gg;

-	close;

-

-L_1:

-	mes "Ah, such a great day...........";

-	next;

-	menu "Show her the Shiny Coin",-,"Don't show her the coin, but continue talking",M_End;

-

-		mes "^3355FF- Shows lady the Shiny Coin -^000000";

-		next;

-		mes "[Hullaris]";

-		mes "Hmm, that coin.... How did you know to come and look for me? Ah, I got it.  Manzi must have told you about me.";

-		emotion e_hmm;

-		next;

-		mes "[Hullaris]";

-		mes "I presume you are also interested in the famous Comodo ^5533FFCheese^000000.";

-		mes "Well you've come to the right place because you're talking to a real expert.";

-		next;

-		mes "[Hullaris]";

-		mes "And let me tell you something about how rare Comodo Cheese is.......";

-		mes "Some people will NEVER get to taste it in their entire lifetime.....";

-		next;

-		mes "[Hullaris]";

-		mes "Before I go any further, I will need to clear up some of the misconceptions you may have about Comodo Cheese.";

-		next;

-		mes "[Hullaris]";

-		mes "In reality, Comodo Cheese is NOT actually a cheese.  It is actually a very powerful enchanted magical stone, know as.........";

-		mes "The ^3355FFStone of Awakening^000000.";

-		next;

-		mes "[Hullaris]";

-		mes "Because of the similarities in shape, form, and color, between the two, people have mistaken the stone to be cheese.";

-		next;

-		mes "[Hullaris]";

-		mes "Legend has it that the user of the Stone of Awakening, could gain great knowledge and power much faster than normal people.";

-		next;

-		mes "[Hullaris]";

-		mes "Many Wizards and Mages in the past have grown very powerful in very short time after consuming the Stone of Awakening.";

-		next;

-		mes "[Hullaris]";

-		mes "Therefore, even though my close friend told you to come to me, I cannot just give you this rare item.";

-		next;

-		mes "[Hullaris]";

-		mes "I am very sorry about this, but you will need to prove to me somehow that you are worthy of this stone.";

-		next;

-		mes "[Hullaris]";

-		goto L_2;

-

-	M_End:

-		mes "[Hullaris]";

-		mes "Hey! Don't look at me like that, get out of here!";

-		emotion e_gasp;

-		close;

-

-L_2:

-	mes "Some sort of ^5533FFProof of Worthiness^000000 could be obtained through the wizard ^5533FF'Nigirboran'^000000.";

-	mes "He is usually inside of the ^009500East Comodo Dungeon^000000.";

-	next;

-	mes "[Hullaris]";

-	mes "Just tell Nigirboran everything I have told you and he will judge whether or not you are worthy of the Stone of Awakening.";

-	mes "Best of luck to you.";

-	set dmdswrd_Q, 12;

-	close;

-L_3:

-	mes "Your back........ do you have the ^5533FFProof of Worthiness^000000?";

-	mes "I cannot give you the Stone of Awakening if you have not passed the test.";

-	close;

-L_4:

-	mes "How did the test go?";

-	next;

-	mes "^3355FF~ Shows Hullaris ~^000000";

-	mes "^3355FF~ Proof of Worthiness ~^000000";

-	next;

-	mes "[Hullaris]";

-	mes "Ah, you did it! I knew you would pass the test.  No I mean it.";

-	mes "There was something about you that gave me confidence in your abilities.";

-	next;

-	mes "[Hullaris]";

-	mes "Anyway, here is the Stone of Awakening as promised.........";

-	next;

-	mes "^3355FF~ you received the Stone of Awakening ~^000000";

-	mes "^3355FF~ you quickly eat it. . . . . ~^000000";

-	next;

-	mes "^3355FF~ Munch . .Munch . . ~^000000";

-	next;

-	mes "^3355FF~ Tastes like some sort of mushroom... ~^000000";

-	mes "^3355FF~ it is somewhat sour... ~^000000";

-	next;

-	mes "^3355FF~ somehow you feel more confident... ~^000000";

-	mes "^3355FF~ and more courageous now! ~^000000";

-	next;

-	mes "[Hullaris]";

-	mes "What do you think? The taste and smell are indescribable huh? From the way you look I can tell that it was worth the effort to find.";

-	next;

-	mes "[Hullaris]";

-	mes "You are now one of the few who have been privileged enough to taste Comodo's special 'Cheese', heh heh heh.....";

-	mes "Well have fun here in Comodo.";

-	set dmdswrd_Q,15;

-	close;

-}

-

-//=========================================================

-beach_dun3.gat,30,220,4	script	Wizard Nigirboran	704,{

-	mes "[Nigirboran]";

-	if(dmdswrd_Q == 12) goto L_1;

-	if(dmdswrd_Q == 13) goto L_2;

-	if(dmdswrd_Q == 14) goto L_3;

-	if(dmdswrd_Q == 15) goto L_4;

-

-	mes ". . . . . . . . . . . . . . .";

-	next;

-	mes "[Nigirboran]";

-	mes "I am Nigirboran, a Wizard in training...";

-	next;

-	mes "[Nigirboran]";

-	mes "If you don't have anything to say, please do not bother me, I am very busy.";

-	close;

-

-L_1:

-	mes ". . . . .  Hmm. . . . . .";

-	next;

-	mes "[Nigirboran]";

-	mes "Hullaris told you to come didn't she? Let me introduce myself.  I am Nigirboran, a Wizard in training.";

-	next;

-	mes "[Nigirboran]";

-	mes "It is true that Comodo ^5533FFCheese^000000 is actually the ^5533FF'Stone of Awakening' or the 'Stone of Wisdom'^000000.";

-	mes "It's unfortunate that so many people think of this great stone as nothing more than a tasty snack.";

-	next;

-	mes "[Nigirboran]";

-	mes "A long time ago, real Comodo cheese was actually made from Payon's poisonous mushrooms, Aldebaran's singing plants, and Morroc's cactus juice.";

-	next;

-	mes "[Nigirboran]";

-	mes "The cheese was aged for a minimum of 3 years before it could be eaten.  If anyone ate the cheese before it had a chance to properly age....";

-	next;

-	mes "[Nigirboran]";

-	mes "The posion and magic from the cheese would melt their insides instantly............";

-	next;

-	mes "[Nigirboran]";

-	mes "That's why Hullaris sent you here.  She wants to see if you can withstand those strong poisons.";

-	next;

-	mes "[Nigirboran]";

-	mes "Are you willing to risk your life just to prove yourself to Hullaris?";

-	next;

-	menu "Sure, why not.",-, "...... Uh... no....",M_End;

-

-		set dmdswrd_Q, 13;

-		mes "[Nigirboran]";

-		goto L_2;

-		

-	M_End:

-		mes "[Nigirboran]";

-		mes "Very well then.";

-		close;

-L_2:

-	mes "Very good, then let us begin the test.";

-	percentheal 100, 100;

-	next;

-	mes "[Nigirboran]";

-	mes "You will be given some real Comodo cheese to eat.  If you are strong enough you will have no problems with the cheese.";

-	next;

-	mes "[Nigirboran]";

-	mes "If you start to feel noxious and start having hallucinations, that means you have succumb to the poison and are not worthy of the Stone of Awakening.";

-	next;

-	mes "[Nigirboran]";

-	mes "Ready?";

-	next;

-	mes "^3355FF~ you are given a piece of funky cheese ~";

-	mes ". . . . . . . . . . . . .^000000";

-	next;

-	mes "^3355FF~ you are given a piece of funky cheese ~";

-	mes ". . . . . . . . . . . . .";

-	mes "~ you swallow it ~";

-	mes ". . . . . . . . . . . . .^000000";

-	next;

-	mes "^3355FF~ you are given a piece of funky cheese ~";

-	mes ". . . . . . . . . . . . .";

-	mes "~ you swallow it ~";

-	mes ". . . . . . . . . . . . .";

-	mes "~ it tastes nasty!!! ~^000000";

-	next;

-	mes "^3355FF~ your body is overcome with a wave of heat ~";

-	mes "~ you feel the poison racing through your body ~^000000";

-	sc_start SC_Poison,900000,1;

-	next;

-	mes "^5533FF. . . . . . . . . . . . . . .^000000"; 

-	next;

-	sc_end SC_Poison;

-	if(BaseLevel < 25) goto L_LowLvl;

-	set @TEMP, rand(3);

-	if(@TEMP == 2) goto R_2;

-	if(@TEMP == 1) goto R_1;

-

-	R_0:

-		mes "^3355FF~ your body seems fine but.....but...but.... ~^000000";

-		next;

-		mes "^3355FF~ your body seems fine but.....but...but.... ~";

-		mes "~ You see pink elephants everywhere!! ~^000000";

-		next;

-		mes "[Nigirboran]";

-		mes "Tsk tsk.  Although your body didn't seem to have any ill effects from the poison.... your mind was not as fortunate.";

-		next;

-		mes "[Nigirboran]";

-		mes "Hahaha... pink elephants.... reminds me of a bad acid trip I once had... er..... forget what I just said.";

-		emotion e_heh;

-		next;

-		mes "[Nigirboran]";

-		mes "If you cannot handle a little piece of cheese, there is absolutely no way you will be able to handle the Stone of Awakening.";

-		next;

-		mes "[Nigirboran]";

-		mes "If you feel up to it, you may try again later.  The fact that you're still alive is a good sign.";

-		close;

-	R_1:

-		mes "^3355FF~ now you feel extremely cold and dizzy.... ~";

-		mes "~ your body feels weak and you are getting drowsy.... ~^000000";

-		sc_start SC_Sleep,900000,1;

-		next;

-		mes "[Nigirboran]";

-		mes "Hmm.... well the good news is you didn't have any hallucinations.  Your body however, reacted poorly and you fell asleep.";

-		sc_end SC_Sleep;

-		next;

-		mes "[Nigirboran]";

-		mes "If you cannot handle a little piece of cheese, there is absolutely no way you will be able to handle the Stone of Awakening.";

-		next;

-		mes "[Nigirboran]";

-		mes "If you feel up to it, you may try again later.  The fact that you're still alive is a good sign.";

-		close;

-	R_2:

-		mes "^3355FF~ you now feel a very strange, soothing sensation........  ~";

-		mes "~ your body feels at ease and your mind is clear... ~^000000";

-		next;

-		mes "[Nigirboran]";

-		mes "Hmm?.... Wow! Now that's rare!! You don't seem to have any ill effects from the posion.";

-		mes "You must be in top shape both mentally and physically.";

-		emotion e_ic;

-		next;

-		mes "[Nigirboran]";

-		mes "You have proved that you are worthy of the ^5533FFStone of Awakening^000000.  Take this.......";

-		next;

-		mes "~ received ^5533FF'Proof of Worthiness'^000000 ~";

-		next;

-		mes "[Nigirboran]";

-		mes "Just show this to Hullaris and she will give you the Stone of Awakening.";

-		set dmdswrd_Q, 14;

-		next;

-		mes "[Nigirboran]";

-		mes "Oh, by the way, why did you choose to look for the Stone in the first place?";

-		next;

-		mes "[Nigirboran]";

-		mes "I surely hope its not because of the temptations of the three Doomed Swords...";

-		mes "....Huh? You don't know what the three Doomed Swords are?";

-		next;

-		mes "[Nigirboran]";

-		mes "Legend has it that the one who wields the three Doomed Swords";

-		mes "^3355FF- Executioner -^000000";

-		mes "^3355FF- Mysteltain-^000000";

-		mes "^3355FF- Grimtooth -^000000";

-		mes "could conquer the whole world with ease.";

-		next;

-		mes "[Nigirboran]";

-		mes "To summon these three Doomed Swords, the user is also required to possess";

-		mes "both the ^3355FF` Tablet of Power '^000000 and";

-		mes "^3355FF` Book of the Tiresome Sheep'^000000.";

-		close;

-

-	L_LowLvl:

-		mes "^3355FF~ it is unbearable and causes you to faint ~^000000";

-		next;

-		warp "beach_dun3.gat",32,214;

-		doevent "Wizard Nigirboran::OnFainted";

-		end;

-

-		OnFainted:

-			mes "[Nigirboran]";

-			mes "~ Sigh ~ You are simply not strong enough to withstand the poison.";

-			mes "Maybe if you had a ^5533FFBase level of at least 25^000000, you could withstand the poison....";

-			close;

-L_3:

-	mes "Go see Hullaris for the Stone of Awakening.  Good luck to you.";

-	close;

-L_4:

-	mes "Look for ^3355FFMoet Leng Good^000000 somewhere";

-	mes "inside ^3355FFAldebaran^000000";

-	mes "regarding information about the 'Tablet of Power'";

-	close;

+//===== eAthena Script ======================================= 
+//= Quest NPCs related to Comodo
+//===== By: ================================================== 
+//= kobra_k88
+//===== Current Version: ===================================== 
+//= 1.2
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//= 'Cross Hat', 'Bulb Hairband', 'Striped Hairband', 'Blue Hairband' Quests.
+//= 'Mine Helmet', 'Parcel Hat', 'Money Loser's Grief',
+//= 'Phantom of the Opera Mask', 'Doomed Sword' (parts 1,2,3), Quests.
+//===== Additional Comments: ================================= 
+//= 1.1 Fixed exploits [Lupus]
+//= 1.2 Added more quest from cities/comodo.txt [Evera]
+//============================================================ 
+
+
+
+//============================================================================================//
+// 					Hair Ornament Girl 
+//============================================================================================//
+// Cross Hat, Bulb Hairband, Striped Hairband, Blue Hairband
+//==================================================
+comodo.gat,227,158,4	script	Hair Ornament Girl	700,{
+	mes "[Hair Ornament Girl]";
+	if(sex==1)mes "Oh, hi.  Do you need to buy a present for a friend, your mother, or maybe your girl friend? Then get her a Hair Band! It's the best gift you can get her.";
+	if(sex==0)mes "Oh, hi.  Do you need to buy a present for a friend, your mother, or maybe yourself? Then get a Hair Band! It's the best gift you can give, or get.";
+	next;
+	mes "[Hair Ornament Girl]";
+	mes "Just by bringing me a few simple items, I can make you a gorgeous Hair Band!  Here, take a look at these....";
+M_Menu:
+	next;
+	menu "-Cross Hat Hairband",-, "-Bulb Hairband",M_Bulb, "-Striped Hairband",M_Striped, "-Blue Hairband",M_Blue, "-End Conversation",M_End;
+
+		set @BAND$, "Cross Hat Hairband";
+		set @ITEMS$, " ^5555FF1 Rosary^000000 and ^5555FF500 Destroyed Armors^000000.";
+		if(countitem(2608)>=1 && countitem(7069)>=500) set @GETBAND, 1;
+		goto sL_0;
+
+	M_Bulb:
+		set @BAND$, "Bulb Hairband";
+		set @ITEMS$, "^5555FF1 Slotted Circlet^000000 and ^5555FF20 Glass Beads^000000.";
+		if(countitem(2233)>=1 && countitem(746)>=20) set @GETBAND, 2;
+		goto sL_0;
+
+	M_Striped:
+		set @BAND$, "Striped Hairband";
+		set @ITEMS$, "^5555FF1500 Worn-out Prison Uniforms^000000.";
+		if(countitem(1099)>=1500) set @GETBAND, 3;
+		goto sL_0;
+
+	M_Blue:
+		set @BAND$, "Blue Hairband";
+		set @ITEMS$, "^5555FF1 Bandana^000000, ^5555FF1 Cobaltblue Dyestuffs^000000, and ^5555FF300 Anolian Skins^000000.";
+		if(countitem(2211)>=1 && countitem(978)>=1 && countitem(7003)>=300) set @GETBAND, 4;
+
+		sL_0:
+			mes "[Hair Ornament Girl]";
+			mes "So you're interested in the "+@BAND$+" huh? Here are the items you'll need for the "+@BAND$+":";
+			mes @ITEMS$;
+			next;
+			if(@GETBAND > 0) goto sL_GetBand;
+
+			mes "[Hair Ornament Girl]";
+			mes "Bring me all of these items and I will be able to make you a "+@BAND$+".";
+			goto M_Menu;
+
+		sL_GetBand:
+			mes "[Hair Ornament Girl]";
+			mes "I see that you have enough items for a "+@BAND$+".  Would you like me to make you one?";
+			next;
+			menu "Yes, I would.",-, "No thank you.",M_End;
+
+				if(@GETBAND == 1) goto ssL_Cross;
+				if(@GETBAND == 2) goto ssL_Bulb;
+				if(@GETBAND == 3) goto ssL_Striped;
+				if(@GETBAND == 4) goto ssL_Blue;
+
+				ssL_Cross:
+					if(countitem(2608)<1 || countitem(7069)<500) goto L_Cheater;
+					delitem 2608,1;
+					delitem 7069,500;
+					getitem  5036,1;
+					goto ssL_End;
+				ssL_Bulb:
+					if(countitem(2233)<1 || countitem(746)<20) goto L_Cheater;
+					delitem 2233,1;
+					delitem 746,20;
+					getitem 5034,1;
+					goto ssL_End;
+				ssL_Striped:
+					if(countitem(1099)<1500) goto L_Cheater;
+					delitem 1099,1500;
+					getitem 5049,1;
+					goto ssL_End;
+				ssL_Blue:
+					if(countitem(2211)<1 || countitem(978)<1 || countitem(7003)<300) goto L_Cheater;
+					delitem 2211,1;
+					delitem 978,1;
+					delitem 7003,300;
+					getitem 5052,1;
+				ssL_End:
+					mes "[Hair Ornament Girl]";
+					mes "Here is your "+@BAND$+".  Thank you.";
+					set @GETBAND, 0;
+					close;
+	L_Cheater:
+		mes "[Hair Ornament Girl]";
+		mes "Ooops... Where are these items?";
+		close;
+
+	M_End:
+		mes "[Hair Ornament Girl]";
+		mes "Hope to see you again soon.";
+		close;
+}
+
+
+//===================================================================================================//
+//						Mari Isac
+//===================================================================================================//
+// 'Mine Helmet', 'Parcel Hat', 'Money Loser's Grief', 'Phantom of the Opera Mask'
+//===============================================================//
+comodo.gat,274,137,5	script	Mari Isac	702,{
+	mes "[Mari Isac]";
+	mes "I travel all over the world and get to hear many interesting stories from the people I meet.";
+	mes "Sometimes they even teach me how to make special items";
+	next;
+	mes "[Mari Isac]";
+	mes "Would you be interested in some of the items I've learned to make?";
+M_Menu:
+	next;
+	menu "Tell me about them.",M_0, "Make me one.",M_1;
+
+	M_0:
+		menu "-Mine Helmet",-, "-Parcel Hat",sM_Parcel, "-Money Loser's Grief",sM_Money, "-Phantom of the Opera Mask",sM_Phantom;
+
+			mes "[Mari Isac]";
+			mes "I learned how to make the Mine Helmet when I traveled to the old coal mines near Geffen.";
+			next;
+			mes "[Mari Isac]";
+			mes "The 2 most important things a miner needs are light, and head protection.";
+			mes "A very inventive miner was able to create something that dealt with both issues.";
+			next;
+			mes "[Mari Isac]";
+			mes "He attached a light to his safety helmet and called it a Mine Helmet.";
+			mes "This meant that miners no longer had to worry about carrying around lamps and could work more efficiently.";
+			next;
+			mes "[Mari Isac]";
+			mes "Anyways, if you want me to make you a Mine Helmet you'll need to bring me these items:";
+			mes "^5555FF1 Safety Helmet^000000,";
+			mes "^5555FF1 Candle^000000,";
+			mes "^5555FF1 Crystal Mirror^000000,";
+			mes "^5555FF25 Steel^000000.";
+			next;
+			goto M_0;
+		sM_Parcel:
+			mes "[Mari Isac]";
+			mes "I learned how to make the Parcel Hat when I traveled to Alberta.  There they have a unique way of distributing mail and goods.";
+			next;
+			mes "[Mari Isac]";
+			mes "Instead of using a pouch or a sack to carry items for delivery, they use a special kind of hat, called a Parcel Hat.";
+			mes "This hat allows the delivery personel to carry numerous items on their heads.  Of course they have to have good balance to use it.";
+			next;
+			mes "[Mari Isac]";
+			mes "Anyways, if you want me to make you a Parcel Hat, you'll need to bring me these items.";
+			mes "^5555FF150 Fabric^000000,";
+			mes "^5555FF100 Resin^000000,";
+			mes "^5555FF1 Cobaltblue Dyestuffs^000000.";
+			next;
+			goto M_0;
+		sM_Money:
+			mes "[Mari Isac]";
+			mes "I learned how to make the Money Loser's Grief when I traveled to Morroc.";
+			next;
+			mes "[Mari Isac]";
+			mes "A long time ago an honest merchant got into a conflict with a crooked guild.";
+			mes "Unlike the dirty guild, the merchant did not scam or cheat people.";
+			next;
+			mes "[Mari Isac]";
+			mes "Because of this they attacked the merchants shop and took all of his goods.";
+			next;
+			mes "[Mari Isac]";
+			mes "The merchant was devastated by the loss of his shop.";
+			mes "In his sadness he used the bits and pieces that were left from his shop to create a new item.";
+			next;
+			mes "[Mari Isac]";
+			mes "He created the Money Loser's Grief, a symbol of his great sadness.  When people see it, they can't help but feel sympathetic to the wearer.";
+			next;
+			mes "[Mari Isac]";
+			mes "Many merchants now wear it to help themselves get more business.  Of course it is also a reminder of the honest merchants sad tale.";
+			next;
+			mes "[Mari Isac]";
+			mes "Anyways, if you want me to make you a Money Losers Grief, you'll need to bring me these items.";
+			mes "^5555FF1 Circlet with a single slott^000000,";
+			mes "^5555FF1 Gold^000000,";
+			mes "^5555FF20 Steel^000000,";
+			mes "^5555FF80 Feathers^000000,";
+			mes "^5555FF800 Sticky Mucus^000000.";
+			next;
+			goto M_0;
+		sM_Phantom:
+			mes "[Mari Isac]";
+			mes "I learned how to make the Phantom of the Opera Mask when I traveled to Al De Baran.";
+			mes "The story behind this item is that of a man's pure love........";
+			next;
+			mes "[Mari Isac]";
+			mes "There once was a man who was in love with a beautiful opera singer.";	
+			mes "Unfortunately the man had a terribly disfigured face which forced to him to wear a mask.";
+			next;
+			mes "[Mari Isac]";
+			mes "He was ashamed of his appearance and could never bring himself to face the singer.";
+			mes "The man instead, watched her from a far, admiring every nuance of her beauty and grace.";
+			next;
+			mes "[Mari Isac]";
+			mes "He lurked in the bowles of the opera house and from time to time he would sing his sad love song.";
+			mes "Many people heard it and believed that there was a phantom haunting the opera house.";
+			next;
+			mes "[Mari Isac]";
+			mes "The singer also heard his song, and through it she was able to feel his pain and his love for her.";
+			mes "The two eventually met, and when they did she was able to look past his appereance and accept him for who he was.";
+			next;
+			mes "[Mari Isac]";
+			mes "Too this day, the tale of the masked 'phantom' is still romantacised.";
+			next;
+			mes "[Mari Isac]";
+			mes "Anyways, if you want me to make you a Phantom of the Opera Mask, you'll need to bring me these items.";
+			mes "^5555FF1 Opera Masque^000000,";
+			mes "^5555FF50 Horrendous Hairs^000000.";
+			goto M_0;
+
+	M_1:
+		menu "-Mine Helmet",-, "-Parcel Hat",sM_MakePar, "-Money Loser's Grief",sM_MakeMon, "-Phantom of the Opera Mask",sM_MakePhan;
+
+			if(countitem(5009)<1 || countitem(5028)<1 || countitem(747)<1 || countitem(999)<25) goto ssL_NoItems;
+			delitem 5009, 1;
+			delitem 5028, 1;
+			delitem 747, 1;
+			delitem 999, 25;
+			mes "[Mari Isac]";
+			mes "Here you go.  Enjoy your Mine Helmet!";
+			getitem 5031,1;
+			close;
+		sM_MakePar:
+			if(countitem(1059)<150 || countitem(907)<100 || countitem(978)<1) goto ssL_NoItems;
+			delitem 1059, 150;
+			delitem 907, 100;
+			delitem 978, 1;
+			mes "[Mari Isac]";
+			mes "Here you go.  Enjoy your Parcel Hat!";
+			getitem 5023,1;
+			close;
+		sM_MakeMon:
+			if(countitem(2233)<1 || countitem(969)<1 || countitem(999)<20 || countitem(949)<80 || countitem(938)<800) goto ssL_NoItems;
+			delitem 2233, 1;
+			delitem 969, 1;
+			delitem 999, 20;
+			delitem 949, 80;
+			delitem 938, 800;
+			mes "[Mari Isac]";
+			mes "Here you go.  Enjoy your Money Loser's Grief!";
+			getitem 5021,1;
+			close;
+		sM_MakePhan:
+			if(countitem(2281)<1 || countitem(1048)<50) goto ssL_NoItems; 
+			delitem 2281,1;
+			delitem 1048, 50;
+			mes "[Mari Isac]";
+			mes "Here you go.  Enjoy your Phantom of the Opera Mask!";
+			getitem 5043, 1;
+			close;
+
+		ssL_NoItems:
+			mes "[Mari Isac]";
+			mes "You don't seem to have enough items for me to make that hat.  Please come back when you do.";
+			close;
+}
+
+//============================================================================//
+//			Chief Quest (Doomed Swords Part 1)
+//============================================================================//
+//=======================================================
+comodo.gat,206,310,4	script	Rochito	48,{
+	if(dmdswrd_Q == 1) goto L_1;
+	if(dmdswrd_Q == 2) goto L_2;
+	if(dmdswrd_Q == 3) goto sL_2;
+	if(dmdswrd_Q == 4) goto L_3;
+	if(dmdswrd_Q == 5 || dmdswrd_Q == 6) goto sL_3;
+L_0:
+	mes "[Rochito]";
+	mes "Meat, meat, meat... I LOVE MEAT!! Eat, eat, eat... ALL I eat is MEAT!! I'm sooo obsessed with meat..... I'm... I.. I... I'm a MEAT MAN!!";
+	emotion e_lv;
+	next;
+	mes "[Rochito]";
+	mes "Comodo is meat heaven!! That's why BBQ camping in Comodo is sooooo AWESOME!!!"; 
+	next;
+	menu "Tell me more about BBQ Camping.",M_0, "End Conversation.",M_End;
+
+	M_0:
+		mes "[Rochito]";
+		mes "The Komodoru, a native animal of Comodo, is famous because of it's delicious meat.  Every part of the animal is tasty.";
+		mes "However the tastiest part of the Komodoru, is the area around the spine.  It's number one!";
+		emotion e_no1;
+		next;
+		mes "[Rochito]";
+		mes "Look at all of this meat in front of me! I don't know what to do with all of this meat! What should I do?? Oh no!...";
+		emotion e_swt2;
+		next;
+		mes "[Rochito]";
+		mes "Oh, I almost forgot!! You must try this Komodoru spine meat with Comodo's authentic BBQ seasoning.";
+		mes "^5555FFKoserahserah^000000 is the name of the seasoning, and you should at least try it once before you leave.";
+		next;
+		mes "[Rochito]";
+		mes "There is a rumor going around this camp ground that Koserahserah is soooo good that it might be addictive.";
+		mes "It's possible that it may even cause a slight euphoria in those who try it.";
+		next;
+		mes "[Rochito]";
+		mes "I'm not sure if that's true, but I do not that the seasoning is not allowed to be exported outside of Comodo.";
+		mes "Luckily I'm a resident here so I can have as much as I want.";
+		next;
+		mes "[Rochito]";
+		mes "Still, the authorities are worried about how Koserahserah should be regulated.";
+		mes "The ^5555FFChief of Comodo^000000 is currently working on a some guidelines for it.";
+		if(dmdswrd_Q == 0) set dmdswrd_Q, 1;
+		close;
+	M_End:
+		close;
+
+L_1:
+	mes "[Rochito]";
+	mes "This Komodoru spine meat is delicious when seasoned with ^5555FFKoserahseah^000000, a local flavoring that is the pride of Comodo!!";
+	mes "Would you like to try some?";
+	next;
+	mes "[Rochito]";
+	mes "Oh, are you looking for the ^5555FFChief's^000000 house? Just go west of this camp ground to the village.  You'll find his house there.";
+	close;
+
+L_2:
+	mes "[Rochito]";
+	mes "We have a lot of time left on our vacation and I think we should spend the rest of it here, enjoying the Komodoru meat.";
+	next;
+	mes "[Rochito]";
+	mes "In fact, we should just keep on having BBQ parties!";
+	next;
+	mes "^5533FF~ gave Rochito the Koserahserah ~^000000";
+	next;
+	mes "[Rochito]";
+	mes "Oh my!! This is the special Comodo seasoning.... Koserahserah!! How did you manage to get this precious delicacy?";
+	emotion e_gasp;
+	next;
+	mes "[Rochito]";
+	mes "Oh... I see, I see.  So it was given to you by my long time friend.  Well, thank you so much.... thank you...";
+	emotion e_thx;
+	next;
+	mes "[Rochito]";
+	mes "Hey everybody! Tausupa has sent us some Koserahserah seasoning!!";
+	next;
+	mes "[Emralhandas]";
+	mes "Our old friend?";
+	next;
+	mes "[Rochito]";
+	mes "I don't know if we should take such a great gift....";
+	next;
+	mes "[Rockha]";
+	mes ".........................";
+ 	next;
+	mes "[Rochito]";
+	mes "We should give him something in return as a thank you.  But what can we give him?...";
+	mes "should we give him that wonderful ^5555FFWine^000000 we've been saving? It has a very nice aroma....";
+	next;
+	mes "[Rochito]";
+	mes "May I ask a favor of you? If it is not too much trouble, would you take this to our dear friend.....";
+	mes "I would deliver this in person but I'm a little busy with the BBQ and all.....";
+	next;
+	mes "[Rochito]";
+	mes "Please.  We would be very grateful if you could give this to him.";
+	next;
+	mes "^5555FF~ received 'Mureuchieligu Wine' ~^000000";
+	set dmdswrd_Q, 3;
+	close;
+
+	sL_2:
+		mes "[Rochito]";
+		mes "Please do us a favor and deliver the wine to the chief.  We would be very happy if you did.";
+		close;
+
+L_3:
+	mes "[Rochito]";
+	mes "You've returned..... Oh! Thank you for the delivering the wine for us.";
+	emotion e_thx;
+	set dmdswrd_Q, 5;
+	next;
+
+	sL_3:
+		mes "[Rochito]";
+		mes "We are very proud of our courageous friend.  It is because of him that we can live peacefully and travel safely.";
+		next;
+		mes "[Rochito]";
+		mes "Oh, I just remembered something....";
+		mes "We've been talking about Comodo's famous meat all this time, and I didn't even mention Comodo's world famous ^5555FFCheese^000000!";
+		next;
+		mes "[Rochito]";
+		mes "I believe there is a cheese expert named ^5533FFTORUNA^000000 somewhere on this island.";
+		mes "If your interested in the cheese you should go ask him about it.";
+		if(dmdswrd_Q == 5) set dmdswrd_Q, 6;
+		close;
+
+	
+}
+
+//=======================================================
+comodo.gat,204,310,4	script	Rockha	98,{
+	if(dmdswrd_Q == 3) goto L_1;
+	if(dmdswrd_Q == 4 || dmdswrd_Q==5) goto L_2;
+L_0:
+	mes "[Rockha]";
+	mes ". . . . . . . . . .";
+	mes "My friends and I always wanted to have our BBQ eat out.....";
+	mes ". . . . . . . . . .";
+	next;
+	menu "About the ^3355FFChief^000000.",M_0, "End Conversation.",M_End;
+
+	M_0:
+		mes "[Rockha]";
+		mes "Yeah... I recently discovered that a friend I thought I lost during the ^FF4444'War with the Witch'^000000, is still alive.";
+		mes "Now he's the ^5555FFChief of Comodo^000000....";
+		next;
+		mes "[Rockha]";
+		mes "At the end of the war the witch was defeated and sealed in the ground beneath this village.";
+		next;
+		mes "[Rockha]";
+		mes "It is rumored that the seasonings we get from our local plants somehow receive their unique qualities from the Witch's magical influence.";
+		next;
+		mes "[Rockha]";
+		mes "Although my friend and I now live in different worlds, his new life hasn't changed him.";
+		mes "Thankfully we can still be friends after all that's happened.";
+		close;
+
+L_1:
+	mes "[Rockha]";
+	mes "Oh, and by the way.... Could you give him this message as well?";
+	mes "Tell him, 'For as long as you have remembered us, we will not forget you.  Friends forever.'.....";
+	close;
+
+L_2:
+	mes "[Rockha]";
+	mes "Ha ha ha..... aaaahhh.... THIS is FRIENDSHIP!!";
+	emotion e_heh;
+	next;
+	mes "[Rockha]";
+	mes "Let us take a moment to make a toast to our good friend.  Let us eat and drink until we can eat no more!!";
+	next;
+	mes "[Rockha]";
+	mes "~!!Yippeeeeee!!~!!Wooohooooo!!~";
+	close;
+	mes "[Rockha]";
+	mes "Thank you for your assistance.  You have shown us that you are truly a good person.  We now consider you as a friend.";
+	next;
+	mes "[Rockha]";
+	mes "If you ever need any help, just come and look for me, ^3355FF'Rockha'^000000.  We are forever in your debt.";
+	close;
+}
+
+//=======================================================
+comodo.gat,209,314,4	script	Rotute	82,{
+	if(dmdswrd_Q==2 || dmdswrd_Q==3) goto L_1;
+	if(dmdswrd_Q == 4 || dmdswrd_Q==5) goto L_2;
+
+L_0:
+	mes "[Rotute]";
+	mes "The quest for the ^5555FFSwords of Power^000000 has not yet been completed!";
+	next;
+	mes "[Rotute]";
+	mes "Although four of the swords have been recovered by our team, there are rumors of a more powerful sword near ^5555FFGlastheim^000000.";
+	mes "This has brought us yet another challenge.....";
+	next;
+	mes "[Rotute]";
+	mes "We must find this new sword!! A new expedition has been planned to find this sword but I feel very anxious.";
+	mes "If we succeed this will affect the whole world!! For my deceased father.....";
+	next;
+	mes "[Rotute]";
+	mes "...... We MUST SUCCEED!!!!";
+	emotion e_go;
+	close;
+
+L_1:
+	mes "[Rotute]";
+	mes "Wow!! This is Comodo's famous seasoning!! The Captain's friend is truly a good person.  To be this generous is unbelievable!";
+	emotion e_gasp;
+	next;
+	mes "[Rotute]";
+	mes "I can only hope that I find a friend that is as loyal as he on this quest.....";
+	close;
+
+L_2:
+	mes "[Rotute]";
+	mes "It's strange.... this is only my first visit to Comodo and yet.... for some reason, it seems so familiar... like it's my home town.";
+	next;
+	mes "[Rotute]";
+	mes "When this journey is over, I hope to visit this wonderful place again..... It feels like something is waiting for me here.";
+	next;
+	mes "[Rotute]";
+	mes "Oh, and thanks so much for helping our captain.";
+	emotion e_thx;
+	close;
+}
+
+//=======================================================
+comodo.gat,209,305,4	script	Emralhandas	70,{
+	mes "[Emralhandas]";
+	mes "Rockha, empty your glass so I can pour you a drink.";
+	next;
+	mes "[Emralhandas]";
+	mes "Many years ago, during the War with the Witch, we dreamed of the day when we could live in peace.";
+	mes "Today that dream has come true and it's all because of you my friends!!";
+	emotion e_no1;
+	next;
+	menu "Ask about her friends....",M_0, "End Conversation",M_End;
+
+	M_0:
+		mes "[Emralhandas]";
+		mes "Many years ago, heroes from every region of Rune Midgard were selected to embark upon a very unique and important quest.";
+		next;
+		mes "[Emralhandas]";
+		mes "The goal was to find the ^5555FF4 rare 'Swords of Power'^000000!";
+		mes "These 4 swords were said to be the most powerful weapons to have ever been made.";
+		next;
+		mes "[Emralhandas]";
+		mes "After 10 hard years of searching, all 4 swords were found and brought together.";
+		mes "Out of all of those who searched the swords, the four bravest were chosen to protect them.";
+		next;
+		mes "[Emralhandas]";
+		mes "I, Emralhandas, was one of the four that were chosen.";
+		next;
+		mes "[Emralhandas]";
+		mes "Of course there were many hardships that we had to endure before, and even after these swords were found........";
+		next;
+		mes "[Emralhandas]";
+		mes "Our team of adventures consisted of myself, our ship's captain 'Rockha', our comrade 'Rochito', and the Chief of this town, 'Tausupa'.";
+		next;
+		mes "[Emralhandas]";
+		mes "We had found the last sword and headed back to the island.  Up to this point we had not even thought about the weapon's owner.";
+		mes "As we left we began to have a bad feeling about what was going to happen next.";
+		next;
+		mes "[Emralhandas]";
+		mes "When we returned to the island, we were confronted by ^790079'Mariposum'^000000, a powerful Witch who practiced the dark art of EVIL magic!!";
+		next;
+		mes "[Emralhandas]";
+		mes "Her goal was to take over the world and plunge into a dark chaos!! We had to defend not only ourselves, but the future of humanity!!";
+		mes "So it was here that me made our stand against this terrible evil!";
+		emotion e_gasp;
+		next;
+		mes "[Emralhandas]";
+		mes "A tremendous battle took place and many of our comrades fell that day... but their efforts were not in vain.";
+		next;
+		mes "[Emralhandas]";
+		mes "With bloodshed and fierce determination we were able to defeat the witch and imprison her beneath the earth.";
+		next;
+		mes "[Emralhandas]";
+		mes "Of all of those who risked their lives that day, one stood out amongst the rest and became the deciding factor in the witch's defeat.....";
+		next;
+		mes "[Emralhandas]";
+		mes "It was ^5555FFTausupa^000000.";
+		next;
+		mes "[Emralhandas]";
+		mes "Of course we are great full to all the brave warriors who fought and lost their lives that day.";
+		mes "Especially to 'Rotute's' father who cannot be with us today, may he rest in peace.";
+		next;
+		mes "[Emralhandas]";
+		mes "Rotute does not know about this yet, but hopefully he will find out about his father's heroism before this quest is complete......";
+		close;
+	M_End:
+		mes "[Emralhandas]";
+		mes "Our quest has not yet been completed.  Rockha, we must eat all of the meat in Rune Midgard until there is none left!!";
+		mes "We must eat and eat, for the pride of our Meat Club!!! (~hiccup~)";
+		close;
+}
+
+
+// Chief's House =========================================================//
+cmd_in02.gat,32,140,4	script	Chief Tausupa	49,{
+	if(dmdswrd_Q == 1) goto L_1;
+	if(dmdswrd_Q == 2) goto sL_1;
+	if(dmdswrd_Q == 3) goto L_2;
+	if(dmdswrd_Q == 4) goto sL_2;
+
+L_0:
+	mes "[Chief Tausupa]";
+	mes "Hello, I am the Chief of Comodo.  You may call me Tausupa.  Comodo is a place of pleasure, enjoyment, love, and beauty.";
+	mes "Welcome, and have a pleasant and relaxing stay here.";
+	next;
+	menu "Ask about the ^5555FFCasino^000000.",M_0, "Ask about the ^790079Evil Witch^000000.",M_1, "End Conversation.",M_End;
+
+	M_0:
+		mes "[Chief Tausupa]";
+		mes "The Casino is one of the many notable sites in Comodo.  It would seem that you have some interest in it.";
+		mes "The Casino uses it's own currency, a coin called the ^5555FF'Eulwo'^000000.";
+		next;
+		mes "[Chief Tausupa]";
+		mes "There are a variety of games for you to enjoy there.";
+		mes "The earnings you win can be used to purchase different items available only in the Casino.";
+		next;
+		mes "[Chief Tausupa]";
+		mes "These earnings, which are in the form of Eulwo, cannot be exchanged for Zeny though.";
+		close;
+	M_1:
+		mes "[Chief Tausupa]";
+		mes ". . . . . . . . . .";
+		mes "You must be from out of town.  I'm not sure where you heard about it, but that story is old and most people have forgotten about it.";
+		mes "It's really not worth mentioning. . . . .  . . . . . . .";
+		close;
+	M_End:
+		mes "[Chief Tausupa]";
+		mes "If you haven't noticed, Comodo is located inside of a huge, natural, cave.  No matter what time of day it is, you'll never see the sunlight.";
+		next;
+		mes "[Chief Tausupa]";
+		mes "It is this unique 24 hour nightlife that attracts so many tourist to our town.  Anyways, please enjoy your stay here.";
+		close;
+
+L_1:
+	mes "[Tausupa]";
+	mes "..... Is that so? My long time friends have come back to Comodo and are at the Camp Grounds enjoying the BBQ huh?.......";
+	next;
+	mes "[Tausupa]";
+	mes "It would seem that they are planning another expedition........";
+	next;
+	mes "[Tausupa]";
+	mes "I have not seen my friends in a long time and the sound of going on another adventure with them is very exciting.... however......";
+	next;
+	mes "[Tausupa]";
+	mes "~sigh~ Unfortunately I will not be able to go with them.  I fear that if I leave, the evil witch will revive and wreak havoc on this world once again.";
+	next;
+	mes "[Tausupa]";
+	mes "..... I have a favor I must ask of you.......";
+	next;
+	mes "[Tausupa]";
+	mes "Can you take this special seasoning to my friends?";
+	next;
+	mes "^5555FF~ recieved Koserahserah ~^000000";
+	set dmdswrd_Q, 2;
+	next;
+
+	sL_1:
+		mes "[Chief Tausupa]";
+		mes "Please take this seasoning to my friends at the BBQ camp grounds and give it to ^5555FFRochito^000000.  Thank you.";
+		close;
+
+L_2:
+	mes "[Chief Tausupa]";
+	mes "Were my friends happy? After you left, I had some time to think..... I should have delivered the seasoning personally......";
+	mes "I should have gone to see them......";
+	next;
+	mes "[Chief Tausupa]";
+	mes "But I am much too busy as the Chief of Comodo........ Maybe I should quit...........";
+	mes "I really want to go on another quest with my good friends.... How did I end up like this?";
+	next;
+	mes "^5555FF~ you give him Mureuchieligu Wine and convey the message ~^000000";
+	next;
+	mes "[Chief Tausupa]";
+	mes "..................";
+	next;
+	mes "[Chief Tausupa]";
+	mes "That was a message from my friends? I think I understand now.... My friends are TRUE friends.  They have been thinking of me all this time........";
+	next;
+	mes "[Chief Tausupa]";
+	mes "I have made up my mind!";
+	emotion e_ic;
+	next;
+	mes "[Chief Tausupa]";
+	mes "Mureuchieligu Wine is made as soon as the grapes are picked.  It is then bottled in the very same place and is left there to age.";
+	mes "The wine spends the rest of its days aging in the same spot.";
+	next;
+	mes "[Chief Tausupa]";
+	mes "Much like the wine, I have been aging away in the same place here in Comodo, and I must continue to stay here for it is my duty.";
+	next;
+	mes "[Chief Tausupa]";
+	mes "I am thankful for my friends' advice.  The gift they gave me had a great deal of meaning.";
+	mes "Please tell my friends this, 'I will not avoid my destiny.  On the contrary, I will fulfill it to the best of my ability'.";
+	set dmdswrd_Q, 4;
+	next;
+
+	sL_2:
+		mes "[Chief Tausupa]";
+		mes "I would like to thank you for helping my friends and I.  I am truly great full.";
+		close;
+}
+
+
+
+//============================================================================//
+//			Cheese Quest (Doomed Swords Part 2)
+//============================================================================//
+
+//=======================================================
+comodo.gat,88,97,4	script	Cheese Expert TORUNA	109,{
+	if(dmdswrd_Q == 7) goto sL_2;
+	mes "[TORUNA]";
+	mes "I hear that the cheese here is delicious.  Every time I come here to visit, I ask for some of that popular cheese.";
+	mes "But they always seem to be out!  If I could just get a taste of that cheese...........";
+M_Menu:
+	next;
+	menu "Ask about the cave.",M_0, "Comodo is a town inside a cave?",M_1, "End Conversation.",M_End;
+
+	M_0:
+		mes "[TORUNA]";
+		mes "It is a natural formation of limestone which was shaped by the erosive powers of fresh water with sea water.";
+		next;
+		mes "[TORUNA]";
+		mes "The air and topsoil in the cave are rich in carbon-dioxide gas.";
+		mes "This was caused by C02 gas leaking into the cave through cracks in the limestone over a period of many years.";
+		next;
+		mes "[TORUNA]";
+		mes "Water from rainfall and ocean currents slowly eroded the limestone to carve out the cave.";
+		next;
+		mes "[TORUNA]";
+		mes "Essentially a cave is formed when water finds cracks in some type of rock formation and erodes the rock to a point where a cave is formed.";
+		mes "Of course this takes hundreds of years and a lot of water.";
+		goto M_Menu;
+	M_1:
+		mes "[TORUNA]";
+		mes "Yep.  What you see here is really the inside of a gigantic cave.";
+		mes "Most people don't realize this at first, and that's thanks to all of the towns people's hard work and dedication.";
+		next;
+		mes "[TORUNA]";
+		mes "The people who settled here were very industrious and worked diligently to turn this cave into a place that they could call home.";
+		next;
+		mes "[TORUNA]";
+		mes "They slowly chipped away at the limestone surfaces, to shape the interior of the cave into something much more eye pleasing.";
+		mes "It was from these humble beginnings that the Comodo you see today, was founded.";
+		next;
+		if(dmdswrd_Q == 6) goto sL_1;
+
+		mes "[TORUNA]";
+		mes "Unfortunately that is only half the story.";
+		next;
+		mes "[TORUNA]";
+		mes "The early settlers faced an even greater challenge when the ^790079Evil Witch, Meropusum^000000, arrived.";
+		mes "She was determined to rule the world, and used the newly founded town of Comodo as her staging ground.";
+		next;
+		mes "[TORUNA]";
+		mes "Led by a group of strong heroes, the town fought back against the witch and sealed her away.  Many lives were lost in this war however.";
+		next;
+		mes "[TORUNA]";
+		mes "The strongest of the heroes was chosen as the town's new leader, and under his leadership the town prospered.";
+		next;
+		mes "[TORUNA]";
+		mes "Be aware though, that Meropusom is still alive.  Although she has been sealed away, her evil powers can still be felt.";
+		mes "Her minions still lurks in the shadows awaiting their master's return.";
+		next;
+		mes "[TORUNA]";
+		mes "So be cautious when venturing into the unknown parts of Comodo.  Anyway, so long and take care.";
+		goto M_Menu;
+
+		sL_1:
+			mes "[TORUNA]";
+			mes "Not only has this cave become a home for the people of Comodo, but it's unique environment has also helped in creating....";
+			next;
+			mes "[TORUNA]";
+			mes "The world famous..... Comodo ^5533FFCheese^000000!!!";
+			emotion e_ic;
+			next;
+			mes "[TORUNA]";
+			mes "This special Cheese is simply DELICIOUS! You will understand how good the Cheese is once you try it.";
+			emotion e_lv2;
+			set dmdswrd_Q, 7;
+			next;
+		sL_2:
+			mes "[TORUNA]";
+			mes "You should go speak with the people at the ^009500Outdoor Bar^000000 near the camp grounds.";
+			mes "I heard them talking about the ^5533FFCheese^000000, it is so popular.";
+			close;
+	M_End:
+		mes "[TORUNA]";
+		mes "The taste of Comodo Cheese is simply out of this world!!  Just one taste and I guarantee that you won't be able to stop!";
+		mes "It's so good you may even go GRAZY without it!";
+		emotion e_lv;
+		next;
+		mes "[TORUNA]";
+		mes "Oh if I could just have one piece.... I'd be so happy I'd dance all night on that ^5555FFHula Dancing Stage^000000!!";
+		close;
+}
+
+//=======================================================
+comodo.gat,164,291,2	script	Rakusa	73,{
+	if(dmdswrd_Q == 7) goto L_1;
+	if(dmdswrd_Q == 8) goto L_2;
+
+	mes "[Rakusa]";
+	mes "Comodo is often referred to as the town of 'recreation and relaxation'.......";
+	next;
+	mes "[Rakusa]";
+	mes "This can be misleading however, for Comodo is not only the home of fun tourist attractions, but two very ^FF4444dangerous dungeons^000000 as well.";
+	next;
+	mes "[Rakusa]";
+	mes "This area has unusually strong monsters.  If you plan on entering the dungeons, be very well prepared and expect trouble.";
+	mes "These dungeons are definitely not for the faint of heart!";
+	close;
+L_1:
+	mes "[Rakusa]";
+	mes "That man sitting over there simply won't stop talking about that Comodo ^3355FF'Cheese'^000000.........";
+	next;
+	mes "[Rakusa]";
+	mes "I just can't stop wondering about what kind of Cheese it is.  I sure hope I will have the opportunity to try it someday.";
+	set dmdswrd_Q, 8;
+	next;
+L_2:
+	mes "[Rakusa]";
+	mes "It looks like ^5533FFKichiri^000000 isn't as interested in the Cheese as that other man is though...... actually he looks rather annoyed.........";
+	next;
+	mes "[Rakusa]";
+	mes "Someone should check on Kichiri and make sure everything is all right......";
+	close;
+}
+
+//=======================================================
+comodo.gat,169,284,4	script	Kichiri	99,{
+	mes "[Kichiri]";
+	if(dmdswrd_Q == 8) goto L_1;
+	if(dmdswrd_Q == 9) goto L_2;
+
+	mes "In the heart of Comodo lies a performance stage.  It's where a number of crazed residents put on shows for the tourists that come to visit.";
+	mes "The shows are so popular that some tourist even come back to Comodo to see them again.";
+	next;
+	mes "[Kichiri]";
+	mes "Many of the residents just dance and dance without much skill.";
+	mes "But for the few who show some talent, there is the possibility of being recruited by the local ^5555FFDancers Guild^000000.";
+	close;
+L_1:
+	mes "The guy sitting near me just won't stop talking about Comodo ^5533FFCheese^000000...... It's going to drive me insane!";
+	emotion e_pif;
+	next;
+	mes "[Kichiri]";
+	mes "Yeah, right over there, the guy named ^3355FFMagatu^000000.  Can you do something about it?";
+	set dmdswrd_Q, 9;
+	close;
+L_2:
+	mes "I just want to have a quit time and have a few drinks, is this too much to ask for?";
+	mes "Stupid drunk ^3355FF' Magatu '^000000..... always talking about ^5533FFCheese^000000......";
+	emotion e_ag;
+	close;
+}
+
+//=======================================================
+comodo.gat,163,280,4	script	Magatu	55,{
+	mes "[Magatu]";
+	if(dmdswrd_Q == 9) goto L_1;
+	if(dmdswrd_Q == 10) goto L_2;
+
+	mes "Yes! That's it!! The irresistible smell of that amazing ^5533FFCheese^000000!! It's so delicious!.... Oh, I can't wait any longer......";
+	emotion e_lv;
+	next;
+	mes "[Magatu]";
+	mes "No matter what anyone else says..... Comodo Cheese is truly the BEST!!! Kekekeke!!";
+	emotion e_no1;
+	next;
+	mes "[Magatu]";
+	mes "Cheese! CHEESE!! WONDERFULL Comodo CHEESE!!!.... so.... tas... ty.... (~drooools~)";
+	emotion e_lv;
+	close;
+L_1:
+	mes "What? You want to know some information regarding Comodo's special ^5533FFCheese^000000?";
+	mes "I guess I could give you some inside information............";
+	emotion e_what;
+	next;
+	mes "[Magatu]";
+	mes "Okay, go to the ^009500Casino^000000 and look for a guy named ^5533FFManzi^000000.  He should be somewhere on the first floor.";
+	mes "He's got a huge scar on his face so he should be easy to spot.";
+	next;
+	mes "[Magatu]";
+	mes "When you see him give him this Bottle Cap.  Don't do anything else, just give him the bottle cap and he will give you some info on the Cheese....";
+	next;
+	mes "^3355FF- Received a Bottle Cap -^000000";
+	set dmdswrd_Q, 10;
+	close;
+L_2:
+	mes "Oh yeah, I got to tell you my friend's name.....";
+	next;
+	mes "[Magatu]";
+	mes "O? I already told you? Bah, I am so drunk....... ^5533FFManzi^000000... He’s in the ^009500Casino^000000, got it?";
+	emotion e_hmm;
+	close;
+}
+
+//======================================================
+cmd_in02.gat,189,99,4	script	Manzi	85,{
+	if(dmdswrd_Q == 10) goto L_1;
+	if(dmdswrd_Q == 11) goto L_2;
+	if(BaseJob == Job_Novice) goto L_Nov;
+
+	mes "[Manzi]";
+	mes "There have been some people who've bet too much and have lost their pecopeco and many other precious items.";
+	mes "So be careful when you make your bets..... you might just loose the shirt off your back.......";
+	close;
+
+	L_Nov:
+		mes "[Manzi]";
+		mes "Stop bothering me you little kid.  This place is for adults only, get out of here.";
+		close;
+L_1:
+	mes "[Manzi]";
+	mes "Yes?..........";
+	next;
+	mes "^3355FF- You give him the Bottle Cap-^000000";
+	next;
+	mes "[Manzi]";
+	mes "..........................";
+	next;
+	mes "[Mazi]";
+	mes "Whoa! This is from my friend Magatu, you must be someone of great importance to him.";
+	mes "Otherwise, he wouldn't have given you the Bottle Cap.";
+	emotion e_ic;
+	next;
+	mes "[Manzi]";
+	mes "I made a promise to Magatu that I'd help anybody who had one of his bottle caps find out more about the ^5533FFCheese^000000.........";
+	next;
+	mes "[Manzi]";
+	mes "Only a selected few get the rare opportunity to taste the legendary Comodo Cheese you know.";
+	next;
+	mes "[Manzi]";
+	mes "Well, I guess you could find out more about Comodo Cheese from a lady near the ^3355FF 'Hulla Stage' ^000000 located near the center of town.";
+	next;
+	mes "^3355FF- Received Shiny Coin -^000000";
+	next;
+	mes "[Manzi]";
+	mes "Just tell her that Manzi from the casino sent you and show her that coin.  She'll tell you all you need to know about the Cheese.";
+	next;
+	mes "[Manzi]";
+	mes "By the way......... no else is listening this right?....... *whispers: that lady is actually in charge of the Comodo Cheese distribution*...........";
+	set dmdswrd_Q, 11;
+	close;
+L_2:
+	mes "[Manzi]";
+	mes "The cheese lady should be near the ^5533FFHulla Stage^000000.  Just remember to show her the coin when you ask her about the cheese.";
+	close;
+}
+
+//=======================================================
+comodo.gat,187,153,4	script	Hullaris	701,{
+	mes "[Hullaris]";
+	if(dmdswrd_Q == 11) goto L_1;
+	if(dmdswrd_Q == 12) goto L_2;
+	if(dmdswrd_Q == 13) goto L_3;
+	if(dmdswrd_Q == 14) goto L_4;
+
+	mes "Hula Dance? Who says it's merely a hula dance?? It is much more than just some dance.";
+	mes "To refer to Comodo's unique form of dancing as simply a hula dance, is just insulting!";
+	emotion e_an;
+	next;
+	mes "[Hullaris]";
+	mes "The Comodo Hula Dance was developed long ago.  Legend has it that the dance was used to control the minds and bodies of others!";
+	mes "Hula 'dance'?.... More like Hula 'communication'......";
+	next;
+	mes "[Hullaris]";
+	mes "This form of 'communication' was capable of not only changing a persons mood, but of controlling a persons mind as well!";
+	next;
+	mes "[Hullaris]";
+	mes "Hehehehehe...... If anyone can dance better than me.... LET EM COME OUT!! It is more than just dancing..........";
+	mes "It is a form of 'COMMUNICATION'!!!";
+	emotion e_gg;
+	close;
+
+L_1:
+	mes "Ah, such a great day...........";
+	next;
+	menu "Show her the Shiny Coin",-,"Don't show her the coin, but continue talking",M_End;
+
+		mes "^3355FF- Shows lady the Shiny Coin -^000000";
+		next;
+		mes "[Hullaris]";
+		mes "Hmm, that coin.... How did you know to come and look for me? Ah, I got it.  Manzi must have told you about me.";
+		emotion e_hmm;
+		next;
+		mes "[Hullaris]";
+		mes "I presume you are also interested in the famous Comodo ^5533FFCheese^000000.";
+		mes "Well you've come to the right place because you're talking to a real expert.";
+		next;
+		mes "[Hullaris]";
+		mes "And let me tell you something about how rare Comodo Cheese is.......";
+		mes "Some people will NEVER get to taste it in their entire lifetime.....";
+		next;
+		mes "[Hullaris]";
+		mes "Before I go any further, I will need to clear up some of the misconceptions you may have about Comodo Cheese.";
+		next;
+		mes "[Hullaris]";
+		mes "In reality, Comodo Cheese is NOT actually a cheese.  It is actually a very powerful enchanted magical stone, know as.........";
+		mes "The ^3355FFStone of Awakening^000000.";
+		next;
+		mes "[Hullaris]";
+		mes "Because of the similarities in shape, form, and color, between the two, people have mistaken the stone to be cheese.";
+		next;
+		mes "[Hullaris]";
+		mes "Legend has it that the user of the Stone of Awakening, could gain great knowledge and power much faster than normal people.";
+		next;
+		mes "[Hullaris]";
+		mes "Many Wizards and Mages in the past have grown very powerful in very short time after consuming the Stone of Awakening.";
+		next;
+		mes "[Hullaris]";
+		mes "Therefore, even though my close friend told you to come to me, I cannot just give you this rare item.";
+		next;
+		mes "[Hullaris]";
+		mes "I am very sorry about this, but you will need to prove to me somehow that you are worthy of this stone.";
+		next;
+		mes "[Hullaris]";
+		goto L_2;
+
+	M_End:
+		mes "[Hullaris]";
+		mes "Hey! Don't look at me like that, get out of here!";
+		emotion e_gasp;
+		close;
+
+L_2:
+	mes "Some sort of ^5533FFProof of Worthiness^000000 could be obtained through the wizard ^5533FF'Nigirboran'^000000.";
+	mes "He is usually inside of the ^009500East Comodo Dungeon^000000.";
+	next;
+	mes "[Hullaris]";
+	mes "Just tell Nigirboran everything I have told you and he will judge whether or not you are worthy of the Stone of Awakening.";
+	mes "Best of luck to you.";
+	set dmdswrd_Q, 12;
+	close;
+L_3:
+	mes "Your back........ do you have the ^5533FFProof of Worthiness^000000?";
+	mes "I cannot give you the Stone of Awakening if you have not passed the test.";
+	close;
+L_4:
+	mes "How did the test go?";
+	next;
+	mes "^3355FF~ Shows Hullaris ~^000000";
+	mes "^3355FF~ Proof of Worthiness ~^000000";
+	next;
+	mes "[Hullaris]";
+	mes "Ah, you did it! I knew you would pass the test.  No I mean it.";
+	mes "There was something about you that gave me confidence in your abilities.";
+	next;
+	mes "[Hullaris]";
+	mes "Anyway, here is the Stone of Awakening as promised.........";
+	next;
+	mes "^3355FF~ you received the Stone of Awakening ~^000000";
+	mes "^3355FF~ you quickly eat it. . . . . ~^000000";
+	next;
+	mes "^3355FF~ Munch . .Munch . . ~^000000";
+	next;
+	mes "^3355FF~ Tastes like some sort of mushroom... ~^000000";
+	mes "^3355FF~ it is somewhat sour... ~^000000";
+	next;
+	mes "^3355FF~ somehow you feel more confident... ~^000000";
+	mes "^3355FF~ and more courageous now! ~^000000";
+	next;
+	mes "[Hullaris]";
+	mes "What do you think? The taste and smell are indescribable huh? From the way you look I can tell that it was worth the effort to find.";
+	next;
+	mes "[Hullaris]";
+	mes "You are now one of the few who have been privileged enough to taste Comodo's special 'Cheese', heh heh heh.....";
+	mes "Well have fun here in Comodo.";
+	set dmdswrd_Q,15;
+	close;
+}
+
+//=========================================================
+beach_dun3.gat,30,220,4	script	Wizard Nigirboran	704,{
+	mes "[Nigirboran]";
+	if(dmdswrd_Q == 12) goto L_1;
+	if(dmdswrd_Q == 13) goto L_2;
+	if(dmdswrd_Q == 14) goto L_3;
+	if(dmdswrd_Q == 15) goto L_4;
+
+	mes ". . . . . . . . . . . . . . .";
+	next;
+	mes "[Nigirboran]";
+	mes "I am Nigirboran, a Wizard in training...";
+	next;
+	mes "[Nigirboran]";
+	mes "If you don't have anything to say, please do not bother me, I am very busy.";
+	close;
+
+L_1:
+	mes ". . . . .  Hmm. . . . . .";
+	next;
+	mes "[Nigirboran]";
+	mes "Hullaris told you to come didn't she? Let me introduce myself.  I am Nigirboran, a Wizard in training.";
+	next;
+	mes "[Nigirboran]";
+	mes "It is true that Comodo ^5533FFCheese^000000 is actually the ^5533FF'Stone of Awakening' or the 'Stone of Wisdom'^000000.";
+	mes "It's unfortunate that so many people think of this great stone as nothing more than a tasty snack.";
+	next;
+	mes "[Nigirboran]";
+	mes "A long time ago, real Comodo cheese was actually made from Payon's poisonous mushrooms, Aldebaran's singing plants, and Morroc's cactus juice.";
+	next;
+	mes "[Nigirboran]";
+	mes "The cheese was aged for a minimum of 3 years before it could be eaten.  If anyone ate the cheese before it had a chance to properly age....";
+	next;
+	mes "[Nigirboran]";
+	mes "The posion and magic from the cheese would melt their insides instantly............";
+	next;
+	mes "[Nigirboran]";
+	mes "That's why Hullaris sent you here.  She wants to see if you can withstand those strong poisons.";
+	next;
+	mes "[Nigirboran]";
+	mes "Are you willing to risk your life just to prove yourself to Hullaris?";
+	next;
+	menu "Sure, why not.",-, "...... Uh... no....",M_End;
+
+		set dmdswrd_Q, 13;
+		mes "[Nigirboran]";
+		goto L_2;
+		
+	M_End:
+		mes "[Nigirboran]";
+		mes "Very well then.";
+		close;
+L_2:
+	mes "Very good, then let us begin the test.";
+	percentheal 100, 100;
+	next;
+	mes "[Nigirboran]";
+	mes "You will be given some real Comodo cheese to eat.  If you are strong enough you will have no problems with the cheese.";
+	next;
+	mes "[Nigirboran]";
+	mes "If you start to feel noxious and start having hallucinations, that means you have succumb to the poison and are not worthy of the Stone of Awakening.";
+	next;
+	mes "[Nigirboran]";
+	mes "Ready?";
+	next;
+	mes "^3355FF~ you are given a piece of funky cheese ~";
+	mes ". . . . . . . . . . . . .^000000";
+	next;
+	mes "^3355FF~ you are given a piece of funky cheese ~";
+	mes ". . . . . . . . . . . . .";
+	mes "~ you swallow it ~";
+	mes ". . . . . . . . . . . . .^000000";
+	next;
+	mes "^3355FF~ you are given a piece of funky cheese ~";
+	mes ". . . . . . . . . . . . .";
+	mes "~ you swallow it ~";
+	mes ". . . . . . . . . . . . .";
+	mes "~ it tastes nasty!!! ~^000000";
+	next;
+	mes "^3355FF~ your body is overcome with a wave of heat ~";
+	mes "~ you feel the poison racing through your body ~^000000";
+	sc_start SC_Poison,900000,1;
+	next;
+	mes "^5533FF. . . . . . . . . . . . . . .^000000"; 
+	next;
+	sc_end SC_Poison;
+	if(BaseLevel < 25) goto L_LowLvl;
+	set @TEMP, rand(3);
+	if(@TEMP == 2) goto R_2;
+	if(@TEMP == 1) goto R_1;
+
+	R_0:
+		mes "^3355FF~ your body seems fine but.....but...but.... ~^000000";
+		next;
+		mes "^3355FF~ your body seems fine but.....but...but.... ~";
+		mes "~ You see pink elephants everywhere!! ~^000000";
+		next;
+		mes "[Nigirboran]";
+		mes "Tsk tsk.  Although your body didn't seem to have any ill effects from the poison.... your mind was not as fortunate.";
+		next;
+		mes "[Nigirboran]";
+		mes "Hahaha... pink elephants.... reminds me of a bad acid trip I once had... er..... forget what I just said.";
+		emotion e_heh;
+		next;
+		mes "[Nigirboran]";
+		mes "If you cannot handle a little piece of cheese, there is absolutely no way you will be able to handle the Stone of Awakening.";
+		next;
+		mes "[Nigirboran]";
+		mes "If you feel up to it, you may try again later.  The fact that you're still alive is a good sign.";
+		close;
+	R_1:
+		mes "^3355FF~ now you feel extremely cold and dizzy.... ~";
+		mes "~ your body feels weak and you are getting drowsy.... ~^000000";
+		sc_start SC_Sleep,900000,1;
+		next;
+		mes "[Nigirboran]";
+		mes "Hmm.... well the good news is you didn't have any hallucinations.  Your body however, reacted poorly and you fell asleep.";
+		sc_end SC_Sleep;
+		next;
+		mes "[Nigirboran]";
+		mes "If you cannot handle a little piece of cheese, there is absolutely no way you will be able to handle the Stone of Awakening.";
+		next;
+		mes "[Nigirboran]";
+		mes "If you feel up to it, you may try again later.  The fact that you're still alive is a good sign.";
+		close;
+	R_2:
+		mes "^3355FF~ you now feel a very strange, soothing sensation........  ~";
+		mes "~ your body feels at ease and your mind is clear... ~^000000";
+		next;
+		mes "[Nigirboran]";
+		mes "Hmm?.... Wow! Now that's rare!! You don't seem to have any ill effects from the posion.";
+		mes "You must be in top shape both mentally and physically.";
+		emotion e_ic;
+		next;
+		mes "[Nigirboran]";
+		mes "You have proved that you are worthy of the ^5533FFStone of Awakening^000000.  Take this.......";
+		next;
+		mes "~ received ^5533FF'Proof of Worthiness'^000000 ~";
+		next;
+		mes "[Nigirboran]";
+		mes "Just show this to Hullaris and she will give you the Stone of Awakening.";
+		set dmdswrd_Q, 14;
+		next;
+		mes "[Nigirboran]";
+		mes "Oh, by the way, why did you choose to look for the Stone in the first place?";
+		next;
+		mes "[Nigirboran]";
+		mes "I surely hope its not because of the temptations of the three Doomed Swords...";
+		mes "....Huh? You don't know what the three Doomed Swords are?";
+		next;
+		mes "[Nigirboran]";
+		mes "Legend has it that the one who wields the three Doomed Swords";
+		mes "^3355FF- Executioner -^000000";
+		mes "^3355FF- Mysteltain-^000000";
+		mes "^3355FF- Grimtooth -^000000";
+		mes "could conquer the whole world with ease.";
+		next;
+		mes "[Nigirboran]";
+		mes "To summon these three Doomed Swords, the user is also required to possess";
+		mes "both the ^3355FF` Tablet of Power '^000000 and";
+		mes "^3355FF` Book of the Tiresome Sheep'^000000.";
+		close;
+
+	L_LowLvl:
+		mes "^3355FF~ it is unbearable and causes you to faint ~^000000";
+		next;
+		warp "beach_dun3.gat",32,214;
+		doevent "Wizard Nigirboran::OnFainted";
+		end;
+
+		OnFainted:
+			mes "[Nigirboran]";
+			mes "~ Sigh ~ You are simply not strong enough to withstand the poison.";
+			mes "Maybe if you had a ^5533FFBase level of at least 25^000000, you could withstand the poison....";
+			close;
+L_3:
+	mes "Go see Hullaris for the Stone of Awakening.  Good luck to you.";
+	close;
+L_4:
+	mes "Look for ^3355FFMoet Leng Good^000000 somewhere";
+	mes "inside ^3355FFAldebaran^000000";
+	mes "regarding information about the 'Tablet of Power'";
+	close;
 }
\ No newline at end of file
diff --git a/npc/quests/quests_ein.txt b/npc/quests/quests_ein.txt
index 2592a8468..1a3a02e97 100644
--- a/npc/quests/quests_ein.txt
+++ b/npc/quests/quests_ein.txt
@@ -1,4104 +1,4104 @@
-//===== eAthena Script ======================================= 

-//= Quest NPCs related to Einbroch and Einbech

-//===== By: ================================================== 

-//= Evera and The eAthena Dev Team

-//===== Current Version: ===================================== 

-//= 1.5.2

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//= Shinokas Quest, Einbroch Lover Quest, Factory Quest,

-//= Uwe Quest.

-//===== Additional Comments: ================================= 

-//= 1.0 Initial Release [Evera]

-//= 1.1 Added more quests [Evera]

-//= 1.2 Added quest bits from Einbech and renamed file to

-//=	quests_ein.txt [Evera]

-//= 1.3 Implemented the polution quest. [MasterOfMuppets]

-//= 1.4.1 Massive bugfix. Fixed Pollution exploit [Lupus]

-//= 1.4.2 Fixed Khowropher bug [Lupus]

-//= 1.5 Fixed double levelup bug [Lupus]

-//= 1.5.1 Fixed exploit [KarLaeda]

-//= 1.5.2 Updated Shino Quest to leave no grabage vars [Lupus]

-//============================================================ 

-

-

-//============================================================

-//=================================================== Shinokas

-//====================================================== Quest

-

-ein_in01.gat,231,163,1	script	Sick Old Man	849,6,6,{

-	switch(Shinokas_Quest){

-	case 9:

-		mes "^3131FFShinokas's";

-		mes "body has grown";

-		mes "cold to the tough.";

-		close;

-	case 8:

-		mes "["+strcharinfo(0)+"]";

-		mes "Shinokas,";

-		mes "I found something!";

-		next;

-		mes "[Shinokas]";

-		mes "You...";

-		mes "Came... back...";

-		mes "Even... if... it's";

-		mes "already... Too late.";

-		mes "*Couhg Cough*";

-		next;

-	 	mes "^3131FFYou help Shinokas";

-	 	mes "sit up, but find that";

-		mes "your hands have been";

-		mes "stained with his blood.^000000";

-		next;

-		mes "["+strcharinfo(0)+"]";

-		mes "Blood...?!";

-		mes "Shinokas!";

-		mes "Who did this to you?";

-		mes "W-we need to call for help!";

-		next;

-		mes "[Shinokas]";

-		mes "No...";

-		mes "It's already";

-		mes "too late for me.";

-		mes "I should have died";

-		mes "a long time ago...";

-		next;

-		mes "[Shinokas]";

-		mes "*Cough*";

-		mes "I only regret that";

-		mes "I've never been able";

-		mes "to apologize to my";

-		mes "friends... *Cough!*";

-		next;

-		mes "[Shinokas]";

-		mes "But did you";

-		mes "find out? D-did";

-		mes "you find out what's";

-		mes "so special about";

-		mes "that ore? W-what";

-		mes "is it... Really?";

-		next;

-		mes "["+strcharinfo(0)+"]";

-		mes "It was...";

-		next;

-		input @text$;

-		mes "^0000FF"+@text$+"^000000!";

-		next;

-		mes "[Shinokas]";

-		mes "W-wait...!";

-		mes "What did...";

-		mes "I can't underst--";

-		mes "*Couhgh cough!*";

-		next;

-		mes "["+strcharinfo(0)+"]";

-		mes "No...!";

-		mes "Tell me who";

-		mes "did this to you!";

-		mes "Where are they?";

-		mes "Speak to me, please!";

-		next;

-		mes "[Shinokas]";

-		mes "W-wha...?";

-		mes "I told you.";

-		mes "Th-they we--";

-		next;

-		mes "[Shinokas]";

-		mes "...";

-		mes "......";

-		next;

-		mes "["+strcharinfo(0)+"]";

-		mes "No!";

-		mes "Shinokas!";

-		mes "Why, God?";

-		mes "Why...";

-		set Shinokas_Quest,9;

-		close;

-	case 7:

-		mes "[Shinokas]";

-		mes "...";

-		mes "......";

-		close;

-	case 6:

-		mes "[Shinokas]";

-		mes "So...?";

-		mes "Did you learn";

-		mes "anything new";

-		mes "in the Factory?";

-		next;

-		mes "["+strcharinfo(0)+"]";

-		if(EinFactory != 16){

-			mes "I haven't went there";

-			mes "yet.";

-			next;

-			mes "[Shinokas]";

-			mes "Then why did you come";

-			mes "back? Go and investigate";

-			mes "the factory now.";

-			close;

-		}

-		mes "Well...";

-		mes "There's a lot of";

-		mes "suspicious business";

-		mes "in the factory, but I don't";

-		mes "think any of it is related";

-		mes "to that ore you mentioned.";

-		next;

-		mes "[Shinokas]";

-		mes "Damn it...";

-		mes "Then where did";

-		mes "they hide it? Where";

-		mes "do you think that";

-		mes "ore might be?";

-		next;

-		while(1){

-			switch(select("Airport:Factory:Train Station:Airship Repairshop:Laboratory")){

-			case 1: //airport

-				mes "[Shinokas]";

-				mes "No...";

-				mes "The Airport is always";

-				mes "crowded with people.";

-				mes "It'd be a bad idea to hide";

-				mes "something so important";

-				mes "in that kind of place.";

-				next;

-				break;

-			case 2: //factory

-				mes "[Shinokas]";

-				mes "Didn't you just";

-				mes "check the factory?";

-				mes "You couldn't find";

-				mes "any clues to the";

-				mes "ore over there...";

-				next;

-				break;

-			case 3: //train

-				mes "[Shinokas]";

-				mes "Hmm...";

-				mes "People are always going";

-				mes "in and out of the Train Station.";

-				mes "It's not the best place to hide";

-				mes "something as important as the ore.";

-				next;

-				break;

-			case 4: //repairshop

-				mes "The Airship? Hm, it does";

-				mes "fly through some mysterious";

-				mes "power... But I already checked";

-				mes "the Airship Replairshop myself.";

-				mes "I haven't found any trace of";

-				mes "the ore over there.";

-				next;

-				break;

-			case 5: //Laboratory

-				mes "[Shinokas]";

-				mes "...!";

-				mes "Yes. Yes...!";

-				mes "That could be it!";

-				mes "Why didn't I think";

-				mes "about the Laboratory?";

-				mes "It makes so much sense!";

-				next;

-				mes "[Shinokas]";

-				mes "I have a good feeling";

-				mes "about this. Please sneak";

-				mes "into that Laboratory and";

-				mes "see if you can find the ore!";

-				next;

-				mes "[Shinokas]";

-				mes "Remember...";

-				mes "Not just anybody";

-				mes "can enter that kind";

-				mes "of place. But I'm sure";

-				mes "you'll figure something out.";

-				set Shinokas_Quest,7;

-				close;

-			}

-		}

-	case 5:

-		mes "[Shinokas]";

-		mes "So, did you find";

-		mes "anything from the";

-		mes "Kapellthaines?";

-		next;

-		mes "["+strcharinfo(0)+"]";

-		mes "Well, Mr. Kapelltheine";

-		mes "is kind of violent, but";

-		mes "I didn't find anything";

-		mes "really suspicious.";

-		next;

-		mes "[Shinokas]";

-		mes "Huh...";

-		mes "I must have";

-		mes "been wrong, then...";

-		mes "Where else could it be?";

-		next;

-		mes "[Shinokas]";

-		mes "Oh, right! The huge";

-		mes "factory in Einbroch!";

-		mes "What could be more";

-		mes "suspicious? There's a ton";

-		mes "of workers, but no one really";

-		mes "knows what they do there...";

-		next;

-		mes "[Shinokas]";

-		mes "If they're so secretive";

-		mes "it's possible that they're";

-		mes "keeping the ore over there.";

-		mes "Please go and search the";

-		mes "Factory for that ore as";

-		mes "soon as you can.";

-		set Shinokas_Quest,6;

-		close;

-	case 4:

-		mes "[Shinokas]";

-		mes "Please...";

-		mes "Find out if the Kapelltheines";

-		mes "are keeping some kind of unique";

-		mes "ore. Their manor is on the road";

-		mes "that leads to the Airport.";

-		close;

-	}

-	//Shinokas_Quest = 0 1 2 3 10

-	mes "[Sick Old Man]";

-	mes "...!";

-	next;

-	mes "[Sick Old Man]";

-	mes "Awwwk~";

-	mes "It's killing me!";

-	mes "Arrrgh! Awwwrgh!";

-	mes "W-when will my son";

-	mes "come back from";

-	mes "the factory...?!";

-	next;

-	if(Shinokas_Quest != 3){

-		mes "^3131FFYou feel really awkward";

-		mes "just staring at this old";

-		mes "man violently rolling";

-		mes "around in his bed.";

-		close;

-	}

-	//Shinokas_Quest = 3

-	mes "["+strcharinfo(0)+"]";

-	mes "Shi...";

-	mes "Shinokas?";

-	next;

-	mes "[Sick Old Man]";

-	mes "Huh...?";

-	mes "Noooo! My name is";

-	mes "Shinotarous. Y-you've";

-	mes "got the wrong person!";

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "This has to be the";

-	mes "Shinokas that Hikeman";

-	mes "was talking about in Einbech";

-	mes "Hmmm, but how can I get";

-	mes "him to admit it?";

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "*Ahem!*";

-	mes "Excuse me...";

-	next;

-	while(1){

-		switch(select("Remember the mine tunnel collapse?:Didn't you used to be a miner?:Have you lived in Einbroch all your life?")){

-		case 1: //remember

-			if(@shinqst2 > 4 || @shinqst3 > 4) goto L_Cont;

-			mes "[Sick Old Man]";

-			mes "Noooo!";

-			mes "I don't know";

-			mes "what the hell";

-			mes "you're talking";

-			mes "about!";

-			next;	

-			break;

-		case 2: //miner

-			if(@shinqst2 > 1)goto s_Quest2;

-			mes "[Sick Old Man]";

-			mes "Noooo...!";

-		 	mes "W-why would you";

-			mes "even ask me that";

-			mes "kind of question?!";

-		s_Quest2:

-			set @shinqst2,@shinqst2 + 1;

-			if(@shinqst3)set @shinqst3,0;

-			next;

-			break;

-

-		case 3: //einbroch

-			if(@shinqst3 > 1)goto s_Quest3;

-			mes "[Sick Old Man]";

-			mes "Y-yes!";

-			mes "Born and raised";

-			mes "raised here in";

-			mes "Einbe--Einbroch!";

-			next;

-			mes "^3131FFIt doesn't seem";

-			mes "like this old man";

-			mes "is telling the truth...";

-		s_Quest3:

-			set @shinqst3,@shinqst3 + 1;

-			if(@shinqst2)set @shinqst2,0;

-			next;

-			break;

-		}

-	}

-	

-L_Cont:

-	mes "[Shinokas]";

-	mes "Hmm...";

-	mes "^0000FFBuender Hikeman^000000...";

-	next;

-	mes "[Shinokas]";

-	mes "No!";

-	mes "I've never met";

-	mes "Buender Hikeman";

-	mes "in my entire li--";

-	next;

-	mes "[Shinokas]";

-	mes "...";

-	mes "......";

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "I was right!";

-	mes "You're Shinokas!";

-	next;

-	mes "[Shinokas]";

-	mes "Curses!";

-	mes "I've blown";

-	mes "my cover!";

-	mes "W-wait! How much";

-	mes "do you know?!";

-	next;

-	mes "[Shinokas]";

-	mes "Did ^0000FFthey^000000 send you?";

-	mes "*Sigh* I think that this";

-	mes "is it. I'll never be";

-	mes "able to solve the";

-	mes "secret before I die.";

-	next;

-	mes "[Shinokas]";

-	mes "Okay.";

-	mes "Get on with it.";

-	mes "I'm ready now...";

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "Tell me everything";

-	mes "you know related to";

-	mes "that incident where";

-	mes "the mine tunnel";

-	mes "collapsed around";

-	mes "you and Hikeman.";

-	next;

-	mes "[Shinokas]";

-	mes "...?";

-	mes "Errr....";

-	mes "You're not";

-	mes "here to kill me?";

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "No...!";

-	mes "I'm here to find";

-	mes "out the truth";

-	next;

-	mes "[Shinokas]";

-	mes "That means...";

-	mes "I still have some time.";

-	mes "This must be destiny!";

-	mes "Allright, I'll tell you what";

-	mes "happened. But it's a";

-	mes "long story...";

-	next;

-	mes "[Shinokas]";

-	mes "How much do you know";

-	mes "about the accident? No,";

-	mes "wait. Don't answer that.";

-	mes "I don't want to hear it";

-	next;

-	mes "[Shinokas]";

-	mes "I admit it. Yes.";

-	mes "I stabbed my friends";

-	mes "in the back. It was an";

-	mes "unforgivable sin that will";

-	mes "haunt me untill the day that I die";

-	next;

-	mes "[Shinokas]";

-	mes "I sold out my friends for";

-	mes "money. I destroyed that";

-	mes "tunnel and killed them. But";

-	mes "I suppose I was tricked as well.";

-	mes "^0000FFThey^000000 never intended to keep";

-	mes "their end of our agreement.";

-	next;

-	mes "[Shinokas]";

-	mes "After I destroyed the tunnel,";

-	mes "they targeted me and I ended";

-	mes "spending the rest of my life being";

-	mes "pursued and running for place to";

-	mes "place. What the hell was that ^0000FFore^000000";

-	mes "and why was it so important?";

-	next;

-	mes "[Shinokas]";

-	mes "I need to know more about";

-	mes "that ore if it's worth killing for.";

-	mes "That's why I've risked sneaking";

-	mes "into Einbroch. Sopposedly, an ore";

-	mes "similar to the ore we found has";

-	mes "been transported here recently";

-	next;

-	menu "Did you find it?",-;

-	mes "[Shinokas]";

-	mes "No, not yet.";

-	mes "I've been searching";

-	mes "for that ore every night.";

-	mes "During the day, this kind";

-	mes "blacksmith has managed";

-	mes "to hide me from those men";

-	next;

-	mes "[Shinokas]";

-	mes "But I won't be safe";

-	mes "for very long. Look, I'm";

-	mes "no saint, but before I die,";

-	mes "I wanna do this one last";

-	mes "thing and see what's so";

-	mes "great about this ore...";

-	next;

-	menu "Wait, who's trying to get you?",-;

-	mes "[Shinokas]";

-	mes "Who's trying to kill me?";

-	mes "The people who hired me and";

-	mes "my friends to dig up that ore in";

-	mes "the first place. We thought they";

-	mes "were ordinary businessmen,";

-	mes "but... They're dangerous.";

-	next;

-	mes "[Shinokas]";

-	mes "So I told you everything";

-	mes "and now you know that my";

-	mes "day might be numbered.";

-	mes "Please do an old man a favor";

-	mes "and search Einbroch for that";

-	mes "strange, mysterious ore.";

-	next;

-	mes "[Shinokas]";

-	mes "Now, the first thing I learned";

-	mes "in this tows is that the richest";

-	mes "family is the Kapelltheines. Only";

-	mes "the rich and powerful can possibly";

-	mes "be involved in something so big.";

-	next;

-	mes "[Shinokas]";

-	mes "Would you search";

-	mes "Kappelltheine Manor";

-	mes "for that ore? It's on the way";

-	mes "to the Airport and it shouldn't be";

-	mes "hard to miss. They're the richest";

-	mes "people in Einbroch, after all.";

-	next;

-	mes "[Shinokas]";

-	mes "I'm too old and weak to leave";

-	mes "this house, and there's the change";

-	mes "that those men will find me. If you";

-	mes "can sympathize with my situation,";

-	mes "please find out if the Kapelltheine";

-	mes "family has any unique ores...";

-	set Shinokas_Quest,4;

-	close;

-

-OnTouch:

-	if(Shinokas_Quest != 8) end;

-	mes "^3131FFThe open window rattles";

-	mes "as you enter the room and";

-	mes "are welcomed by a sudden";

-	mes "chill. A trail of red footprints";

-	mes "lies near your feet.";

-	next;

-	mes "^3131FFA grey sheet lies";

-	mes "rumpled on the bed,";

-	mes "but you can see dark red";

-	mes "stains in between the folds.";

-	close;

-}	

-

-ein_in01.gat,32,133,6	script	Maid	850,{

-	mes "[Maid]";

-	if(Shinokas_Quest != 4){

-		mes "There's no end";

-		mes "to all these plates";

-		mes "I have to clean...!";

-		close;

-	}	

-	mes "Did you ask me";

-	mes "if I saw some kind";

-	mes "of ore around here?";

-	mes "That's strange...";

-	next;

-	mes "[Maid]";

-	mes "Will, I've been with";

-	mes "this family for a long";

-	mes "time. Let me assure you";

-	mes "that there's no secrets";

-	mes "from me in this household!";

-	next;

-	mes "[Maid]";

-	mes "I'm sorry, but I don't";

-	mes "think we have any ores,";

-	mes "special or otherwise, here";

-	mes "in the manor. What exactly";

-	mes "do you need them for?";

-	set Shinokas_Quest,5;

-	close;

-}

-

-einbroch.gat,51,52,1	script	lab_warp	45,2,2{

-	if(Shinokas_Quest != 7){

-		mes "^3131FFThe door is locked.";

-		mes "You cannot enter.";

-		close;

-	}

-	mes "[Security System]";

-	mes "^FF0000*Beep Boop*^000000";

-	mes "Restricted Access Area.";

-	mes "Please identify yourself";

-	mes "through the system.";

-	next;

-	switch(select("Identify.:Information:Cancel")){

-		case 1: //Identify

-			break; //continue after switch =\

-		case 2: //information

-			mes "[Security System]";

-			mes "You must use the";

-			mes "security system in order";

-			mes "to gain access into the";

-			mes "Einbroch Laboratory.";

-			next;

-			mes "[Security System]";

-			mes "You will be given";

-			mes "a password that you";

-			mes "must input correctly";

-			mes "withing 60 seconds.";

-			mes "Otherwise, you will";

-			mes "fail the security check.";

-			//hell of a security system ye got there mate

-			//wonder if gravity co has the same sort? xD

-			next;

-			mes "[Security System]";

-			mes "If you take longer";

-			mes "then 3 minutes to";

-			mes "enter the password,";

-			mes "the security system";

-			mes "will initiate lockout.";

-			close;

-		case 3: //cancel

-			mes "[Security System]";

-			mes "You have canceled";

-			mes "the ID security check.";

-			close;

-	}

-	//ID check:

-	mes "[Security System]";

-	mes "Enter the following";

-	mes "password in 60 seconds.";

-	mes "Failure to do so will result";

-	mes "in lockout. Please wait.";

-	next;

-	mes "[Security System]";

-	set @startseconds,gettime(3)*60*60+gettime(2)*60+gettime(1);

-	switch(rand(1,11)){

-	case 1:

-		mes "^00CCFFburrdingdingdilidingdingphoohudaamb";

-		mes "^00CCFFandoora^0000FFbambarambambamburanbamding";

-		input @str$;

-		if(@str$ != "burrdindingdilidingdingphoohudaambandoorabambarambambamburanbamding") goto L_SCFail;

-		goto L_Suc;

-	case 2:

-		mes "^FF33CCbarapaphurarlandreamduranbatuhi^990066wooi";

-		mes "^990066kabamturubamdingding";

-		next;

-		input @str$;

-		if(@str$ != "barapaphurarlandreamduranbatuhiwooikabamturubamdingding") goto L_SCFail;

-		goto L_Suc;

-	case 3:

-		mes "^00CCFFbelief love luck grimace sweat rush";

-		mes "^00CCFFfolktale rodimus optimus burnblebe";

-		input @str$;

-		if(@str$ != "belief love luck grimace sweat rush folktale rodimus optimus burnblebe") goto L_SCFail;

-		goto L_Suc;

-	case 4:

-		mes "^FF33CCLiGhTsPeEd RiGhT SPEed leFT TURn";

-		mes "^FF33CCRiGhT BuRn OrIGInAL GaNgSteR SmACk";

-		input @str$;

-		if(@str$ != "LiGhTsPeEd RiGhT SPEed leFT TURn RiGhT BuRn OrIGInAL GaNgSteR SmACk") goto L_SCFail;

-		goto L_Suc;

-	case 5:

-		mes "^00CCFFCoboman no chikara-yumei na";

-		mes "^00CCFFchikara-daiookii na chikara da ze!";

-		mes "^00CCFFCOBO ON";

-		input @str$;

-		if(@str$ != "Coboman no chikara-yumei na chikara-daiookii na chikara da ze! COBO ON") goto L_SCFail;

-		goto L_Suc;

-	case 6:

-		mes "^FF33CChfjdkeldjs^990066hfjdjeiskdlefvbd";

-		input @str$;

-		if(@str$ != "hfjdkeldjshfjdjeiskdlefvbd") goto L_SCFail;

-		goto L_Suc;

-	case 7:

-		mes "^00CCFFI'm the King of all Weirdos! Now";

-		mes "^00CCFFyou know of my true power. Obey~!";

-		input @str$;

-		if(@str$ != "I'm the King of all Weirdos! Now you know of my true power. Obey~!") goto L_SCFail;

-		goto L_Suc;

-	case 8:

-		mes "^990066uNflAPPaBLe LoVaBLe SeCreTs AnD";

-		mes "^990066BoWLiNg aGaINST tHe KarMA of YoUtH";

-		input @str$;

-		if(@str$ != "uNflAPPaBLe LoVaBLe SeCreTs AnD BoWLiNg aGaINST tHe KarMA if YoUtH") goto L_SCFail;

-		goto L_Suc;

-	case 9:

-		mes "^00CCFFBy the power of^000000";

-		mes "^00CCFFp-po-poi-po-poi-poin-poing";

-		mes "^00CCFFGOD-POING. I NEVER LOSE!";

-		input @str$;

-		if(@str$ != "By the power of p-po-poi-po-poi-poin-poing GOD-POING. I NEVER LOSE!") goto L_SCFail;

-		goto L_Suc;

-	case 10:

-		mes "^00CCFF...silence. quiet benevolence...";

-		mes "^00CCFFsoul mate... wonder. enigma...";

-		mes "^00CCFFcloud.^000000";

-		input @str$;

-		if(@str$ != "...silence. quiet benevolence... soul mate... wonder. enigma... cloud") goto L_SCFail;

-		goto L_Suc;

-	case 11:

-		mes "^FF33CCopeN,Open!op3n.openOpen0p3nOpEn0pen";

-		mes "^FF33CC`open'0Pen open?open!111OPENSESAME";

-		input @str$;

-		if(@str$ != "opeN,Open!op3n.openOpenOp3nIoEnOpen`open'0Pen open?open!111OPENSESAME") goto L_SCFail;

-		goto L_Suc;

-	}

-L_Suc:

-	next;

-	set @endtime,gettime(3)*60*60+gettime(2)*60+gettime(1);

-	set @time,@endtime-@startseconds;

-	if(@time > 60) goto L_SC60;

-	mes "[Security System]";

-	mes "It took ^FF0000"+@time+" seconds^000000";

-	mes "for you to enter the";

-	mes "password. Initiating";

-	mes "override. Access granted.";

-	close2;

-	warp "ein_in01.gat",283,25;

-	end;

-	

-L_SC60:

-	mes "[Security System]";

-	mes "Time over.";

-	mes "It took ^FF0000"+@time+" seconds^000000";

-	mes "for you to enter the";

-	mes "password. Initiating";

-	mes "lockout. Access denied.";

-	close;

-	

-L_SCFail:

-	next;

-	mes "[Security System]";

-	mes "You have failed";

-	mes "the identification";

-	mes "check. Access denied.";

-	close;

-}

-einbroch.gat,51,56,6	script	Laboratory Soldier#01	852,{

-	mes "[Laboratory Soldier]";

-	mes "This area is off limits.";

-	mes "Please leave";

-	mes "immediately";

-	close;

-

-OnHide:

-	specialeffect 16;

-	disablenpc "Laboratory Soldier#01";

-	end;

-

-OnUnhide:

-	misceffect 215;

-	end;

-

-}

-einbroch.gat,51,47,6	script	Laboratory Soldier#02	852,{

-	mes "[Laboratory Soldier]";

-	mes "This area is off limits.";

-	mes "Please leave";

-	mes "immediately";

-	close;

-

-OnHide:

-	specialeffect 16;

-	disablenpc "Laboratory Soldier#02";

-	end;

-

-OnUnhide:

-	misceffect 215;

-	end;

-

-}

-ein_in01.gat,254,35,1	script	Scientist	749,{

-	mes "[Scientist]";

-	mes "*Grumble grumble*";

-	next;

-	if(ein_scientist == 1) goto L_P2;

-	mes "[Scientist]";

-	mes "Huh...?";

-	mes "How did you";

-	mes "get in here?";

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "Oh! Ah...";

-	mes "I'm the new...";

-	mes "Guard. Nice";

-	mes "to meet you.";

-	next;

-	mes "[Scientist]";

-	mes "Oh. Yeah.";

-	mes "Nice-meet-you";

-	mes "..............";

-	mes "*Grumble grumble*";

-	next;

-	if(select("What's wrong?:Catch you later.")==2){

-		 mes "[Scientist]";

-		 mes "Right.";

-		 mes "Yeah.";

-		 mes "Later, man.";

-		 close;

-	}

-	mes "[Scientist]";

-	mes "What's wrong...?!";

-	mes "Oh, don't get me started!";

-	mes "I'm stuck here doing all the";

-	mes "work while the Lab Departement";

-	mes "Head goes out every freakin' day!";

-	next;

-	mes "[Scientist]";

-	mes "While I'm slaving";

-	mes "away here, he's in";

-	mes "that Airship, busy";

-	mes "flirting with that";

-	mes "woman. God...!";

-	mes "I'm like, so teed off!";

-	if(Shinokas_Quest < 8) set ein_scientist,1;

-	close;

-	

-L_P2:

-	mes "[Scientist]";

-	mes "Man alive!";

-	mes "Would it kill the";

-	mes "Department Head";

-	mes "to come in here and do";

-	mes "some work for a change?!";

-	next;

-	mes "[Scientist]";

-	mes "I mean, come on!";

-	mes "I shouldn't have to";

-	mes "carry his workload!";

-	close;

-}

-

-ein_in01.gat,266,26,1	script	Unknown Stuff	111,{

-	mes "^3131FFThere's something";

-	mes "attached to a huge";

-	mes "machine with many cords";

-	mes "and folds of barbed wire";

-	if(Shinokas_Quest < 8) set ein_stuff,1;

-	close;

-}

-

-airplane.gat,31,77,4	script	Drunken Man#03	853,{

-	if(Shinokas_Quest >= 8){

-		mes "[Drunken Man]";

-		mes "Hahahahaha!";

-		mes "You're great!";

-		mes "I feel great!";

-		mes "Everything's great!";

-		mes "Bwahahahaahahah!";

-		mes "*Hiccup*";

-		close;

-	}

-	mes "[Drunken Man]";

-	mes "Okay okay...";

-	mes "Daddy's gonna";

-	mes "win some Apples";

-	mes "this time for sure!";

-	next;

-	if(ein_stuff && ein_scientist){

-		mes "[Drunken Man]";

-		mes "Let's do it!";

-		mes "^3131FFYmir's Heart^000000 is";

-		mes "on my side! GO!";

-		next;

-		mes "["+strcharinfo(0)+"]";

-		mes "Huh...?";

-		mes "What did he just say?";

-		mes "It seemed important!";

-		next;

-	}

-	mes "^0000FF*Rolling and rumbling*^000000";

-	next;

-	mes "[Kaci]";

-	mes "I have a total of ^FF000011^000000";

-	mes "and you have total ^FF00005^000000.";

-	mes "You lose this game. I'm";

-	mes "sorry, but I hope we play";

-	mes "again sometime.";

-	donpcevent "Kaci::OnLose";

-	next;

-	mes "[Drunken Man]";

-	mes "Waaaaaahhhhhhhhh!";

-	mes "Apples! My apples!";

-	mes "Apples, I need more...!";

-	if(countitem(512) && ein_stuff && ein_scientist) goto L_Apples;

-	close;

-	

-L_Apples:

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "Do you want";

-	mes "some of mine?";

-	next;

-	if(countitem(512) <100){

-		mes "[Drunken Man]";

-		mes "What...?";

-		mes "I can't do anything";

-		mes "with so few Apples!";

-		mes "I'm a high roller and";

-		mes "this is a high stakes game!";

-		close;

-	}

-	mes "[Drunken Man]";

-	mes "Wha--? Yes...";

-	mes "Hell yes! Gimme";

-	mes "some of your Apples!";

-	mes "Yeeeeeeeeeeehaw!";

-	mes "I'm back, baby!";

-	next;

-	mes "[Drunken Man]";

-	mes "Now, to win!";

-	mes "Daddy needs love...";

-	mes "Time to go from";

-	mes "crappy to classy!";

-	next;

-	mes "^0000FF*Rolling and rumbling*^000000";

-	next;

-	delitem 512,countitem(512);

-	set @kaci,rand(2,12);

-	set @man,rand(2,12);

-	if(@man == @kaci){

-		if(rand(2)){

-			if(@man != 12)

-				set @man,@man+1;

-			else

-				set @man,@man-1;

-		}else{

-			if(@man != 2)

-				set @man,@man-1;

-			else

-				set @man,@man+1;

-		}

-	}

-	mes "[Kaci]";

-	mes "Oooh...";

-	mes "I got a total of ^FF0000"+@kaci+"^000000,";

-	mes "and you have a total of ^FF0000"+@man+"^000000.";

-	if(@man < @kaci){

-		mes "I'm sorry, but you lose";

-		mes "again. Better luck next time...";

-		donpcevent "Kaci::OnLose";

-		next;

-		mes "[Drunken Man]";

-		mes "Waaaaaahhhhhhhhhhhh!";

-		mes "Waaaaaaaahhhhhhh!";

-		close;

-	}

-	mes "Congratulations, you won!";

-	mes "Let me give you your winning";

-	mes "and we'll play again some time~";

-	donpcevent "Kaci::OnWin";

-	next;

-	mes "[Drunken Man]";

-	mes "Mwahhhahahahaha!";

-	mes "Whahahahahahahahaha!";

-	mes "That's why they call me";

-	mes "the 'Resurrection Kid!'";

-	mes "I always come back!";

-	next;

-	mes "[Drunken Man]";

-	mes "Oh yes, right!";

-	mes "You...! You lent";

-	mes "me those lucky";

-	mes "Apples. ^111111*Hiccup*^000000";

-	next;

-	mes "[Drunken Man]";

-	mes "I'm Kurschenburg!";

-	mes "Thanks to you, I'm";

-	mes "on a winning streak!";

-	mes "Hahaha! Th-thank you~";

-	mes "^111111*Hic-hic-hiccup!*^000000";

-	next;

-	if(select("So what was that about Ymir's Heart?:Hehe, you're welcome.")==2){

-		 mes "[Drunken Man]";

-		 mes "Hahahaha!";

-		 mes "You're great!";

-		 mes "And I feel great!";

-		 mes "Bwahahahaahahah!";

-		 mes "^111111*Hiccup*^000000";

-		 close;

-	}

-	mes "[Drunken Man]";

-	mes "What...?";

-	mes "Ymir's Heart?";

-	mes "How do you know";

-	mes "about that? ^111111*Hiccup*^000000";

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "Y-you...!";

-	mes "You were just yelling,";

-	mes "'Ymir's Heart is on my";

-	mes "side,' while you were";

-	mes "gambling with those Apples!";

-	next;

-	mes "[Drunken Man]";

-	mes "What...?!";

-	mes "No way~";

-	mes "Err...? Did I...?";

-	next;

-	mes "[Drunken Man]";

-	mes "Heh heh...";

-	mes "I'm not really";

-	mes "supposed to be talking";

-	mes "about this. As head of";

-	mes "the Laboratory, I'm sworn";

-	mes "to secrecy about Ymir's Heart.";

-	next;

-	mes "[Drunken Man]";

-	mes "But what do I care?!";

-	mes "All they want are the";

-	mes "results of my research!";

-	mes "They don't appreciate";

-	mes "my work at all! My title";

-	mes "is completely worthless!";

-	next;

-	mes "[Drunken Man]";

-	mes "You don't know how long I've";

-	mes "been imprisoned in the lab and";

-	mes "that the work conditions just get";

-	mes "worse and worse. Screw them! I'll";

-	mes "keep getting paid as long as I show";

-	mes "them some progress in our project!";

-	next;

-	menu "Project?",-;

-	mes "[Drunken Man]";

-	mes "Yeah, we're researching";

-	mes "Ymir's Heart. It was found";

-	mes "a long time ago in ^3131FFEinbech^000000";

-	mes "and it's in our lab now.";

-	next;

-	mes "[Drunken Man]";

-	mes "Everyone knows it's supposed";

-	mes "to hold some legendary power,";

-	mes "but even I was surprised to see";

-	mes "what it was capable of. It's both";

-	mes "terrible and miraculous, scary";

-	mes "and wondrous...";

-	next;

-	mes "[Drunken Man]";

-	mes "So...";

-	mes "I figure...";

-	mes "It may even";

-	mes "have the power to";

-	mes "win me Dice games!";

-	mes "Bwahaha--*Hiccup!*";

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "(That thing I saw";

-	mes "hooked up to all those";

-	mes "wires in the Laboratory";

-	mes "must have been a piece";

-	mes "of ^3131FFYmir's Heart^000000. I better";

-	mes "tell Shinokas about this.)";

-	set Shinokas_Quest,8;

-	//cleaning temp variables from the lab.

-	set ein_stuff,0;

-	set ein_scientist,0;

-	close;

-}

-	

-einbech.gat,57,210,4	script	Young Man#04	854,{

-	mes "[Young Man]"; 

-	mes "Behind the pub,";

-	mes "you'll see this old man";

-	mes "who's always mumbling";

-	mes "something to himself.";

-	next;

-	mes "[Young Man]";

-	mes "Sometimes he seems really";

-	mes "angry, but other times he looks";

-	mes "awfully depressed. He must have";

-	mes "lived through some really horrible";

-	mes "experiences. I can't help but feel";

-	mes "really sorry for the old guy.";

-	next;

-	mes "[Young Man]";

-	mes "He says and does";

-	mes "a lot of strange things.";

-	mes "It's sad to see someone";

-	mes "that old act that way, but";

-	mes "it makes me wonder what";

-	mes "could have happened to him.";

-	if(!Shinokas_Quest)set Shinokas_Quest,1;

-	close;

-}

-

-einbech.gat,165,105,7	script	Buender Hikeman	847,{

-	if(Shinokas_Quest >= 9) goto L_P2;

-	if(Shinokas_Quest == 3) goto L_BEST;

-	if(Shinokas_Quest == 2) goto L_BASTARD;

-	mes "[Buender Hikeman]";

-	mes "...";

-	mes "......";

-	if(!Shinokas_Quest)close;

-	next;

-	mes "[Buender Hikeman]";

-	mes "...";

-	mes "......";

-	mes "......You...";

-	next;

-	mes "[Buender Hikeman]";

-	mes "...";

-	mes "......";

-	mes "......You...";

-	mes "......Stop it...";

-	next;

-	mes "[Buender Hikeman]";

-	mes "...";

-	mes "......";

-	mes "......You...";

-	mes "......Stop it...";

-	mes "...You ^FF0000bastard^000000!";

-	next;

-	mes "[Buender Hikeman]";

-	mes "RaaaaAAAARGHHH!!";

-	next;

-	mes "[Buender Hikeman]";

-	mes "^0000FFThe old man seems^000000";

-	mes "^0000FFslightly irked at seeing^000000";

-	mes "^0000FFyou. Unfortunately, his^000000";

-	mes "^0000FFscreaming and rambling^000000";

-	mes "^0000FFis totally incoherent.^000000";

-	next;

-	mes "[Buender Hikeman]";

-	mes "It ^FF0000is^000000 you!";

-	mes "You're responsible!";

-	mes "You've taken everything";

-	mes "away from me!!";

-	next;

-	menu "What are you talking about?",L_WHAT,"Ignore Him.",-;

-	mes "[Buender Hikeman]";

-	mes "W...wait!";

-	mes "I said wait!";

-	mes "*Cough!*";

-	close;

-L_WHAT:

-	mes "[Buender Hikeman]";

-	mes "How dare you...";

-	mes "How dare you treat";

-	mes "after destroying all the";

-	mes "happiness in my life!";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Damn you...";

-	mes "How can you have";

-	mes "the audacity to pretend";

-	mes "as if nothing happened?!";

-	mes "*C-cough Cough...*";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Are you so evil to";

-	mes "just shallowly forget";

-	mes "what you've done to our";

-	mes "lives? Did you already";

-	mes "forget what you did";

-	mes "here in Einbech?!";

-	next;

-	mes "[Buender Hikeman]";

-	mes "It was such a long";

-	mes "time ago, but I'll never";

-	mes "forget. This town was";

-	mes "small, but full of folk";

-	mes "with warm hearts...";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Me, Khartophe, Anuto,";

-	mes "Maskharundt... All of";

-	mes "us were friends hired";

-	mes "by that businessman";

-	mes "to dig up ores in the mine.";

-	next;

-	mes "[Buender Hikeman]";

-	mes "And then there";

-	mes "was you! All of us";

-	mes "put together made the";

-	mes "greatest mining team!";

-	mes "That was, until, we";

-	mes "discovered ^FF0000it^000000.";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Yes...";

-	mes "The mysterious ore";

-	mes "that dazzled with a";

-	mes "magnificent light.";

-	next;

-	mes "[Buender Hikeman]";

-	mes "But we should have known";

-	mes "that the ^0000FFUngoliant^000000 would";

-	mes "be arround that ore. We";

-	mes "should have realized";

-	mes "the danger...";

-	next;

-	mes "[Buender Hikeman]";

-	mes "We reported our findings";

-	mes "to our employer, and then";

-	mes "the ore just disappeared. He";

-	mes "must have sent it somewhere,";

-	mes "it was none of our business.";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Then life was back";

-	mes "to normal for a while.";

-	mes "But one day you yelled";

-	mes "to us that you had found";

-	mes "another special, mysterious";

-	mes "ore in the mines.";

-	next;

-	mes "[Buender Hikeman]";

-	mes "But when we came";

-	mes "over to check the hole";

-	mes "you dug up, you know";

-	mes "what we found...?!";

-	next;

-	menu "Ungoliant?",L_UNGOLIANT,"A mysterious ore, right?",L_ORE,"Nothing...?",-;

-	mes "[Buender Hikeman]";

-	mes "Yes...";

-	mes "Nothing.";

-	next;

-	goto L_CONTINUE;

-L_UNGOLIANT:

-	mes "[Buender Hikeman]";

-	mes "Don't you remember";

-	mes "what happened? What";

-	mes "you did to us at that time?!";

-	next;

-L_CONTINUE:

-	mes "[Buender Hikeman]";

-	mes "There was nothing";

-	mes "inside the hole!";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Then you pointed to";

-	mes "the wall behind us and";

-	mes "screamed that Ungoliant";

-	mes "was coming! In our panic";

-	mes "we started to dig our way out!";

-	next;

-	mes "[Buender Hikeman]";

-	mes "I remember that the expression on";

-	mes "your face seemed so strange. I had";

-	mes "thought you looked sad, but now I'm";

-	mes "sure you were consumed by greed! We";

-	mes "trusted you and you betrayed us!";

-	next;

-	mes "[Buender Hikeman]";

-	mes "When we finally smashed";

-	mes "down that last wall, everything";

-	mes "started to fall around us. We";

-	mes "were the only two to survive";

-	mes "that tunnel collapse.";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Then I learned...";

-	mes "You planned it all along.";

-	if(Shinokas_Quest == 1) set Shinokas_Quest,2;

-	close;

-L_ORE:

-	mes "[Buender Hikeman]";

-	mes "Don't you remember";

-	mes "what happened? What";

-	mes "you did to us at that time?!";

-	next;

-	goto L_CONTINUE;

-L_BASTARD:

-	mes "[Buender Hikeman]";

-	mes "Bastard!";

-	mes "I'm sick of";

-	mes "your lies!";

-	next;

-	menu "I'm not who you think!",L_IM,"How did you survive the accident?",-;

-L_HOW:

-	mes "[Buender Hikeman]";

-	mes "When I came to,";

-	mes "I was lying on my";

-	mes "stomach in the ruins";

-	mes "of that dark tunnel.";

-	next;

-	mes "[Buender Hikeman]";

-	mes "And I found...";

-	mes "You know what I found.";

-	next;

-	mes "[Buender Hikeman]";

-	mes "*Cough Cough*";

-	mes "The corpses of my friends!";

-	mes "Kartophe, Anuto, Maskharundt";

-	mes "Great men and my best friends.";

-	mes "But where were you?!";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Your body was nowhere";

-	mes "to be found. I searched";

-	mes "the tunnel and finnaly";

-	mes "climbed outside where";

-	mes "I was found unconscious.";

-	next;

-	mes "[Buender Hikeman]";

-	mes "I was so stupid.";

-	mes "It was because of";

-	mes "that ore! You killed our";

-	mes "friend and destroyed";

-	mes "my life for that thing!";

-	next;

-	mes "[Buender Hikeman]";

-	mes "And now...";

-	mes "You come out of";

-	mes "hiding and show up.";

-	mes "What do you want of";

-	mes "me? What more can";

-	mes "you possibly take away?!";

-	next;

-	menu "I'm not who you think I am!",L_THINK,"I'd like to apologize.",-;

-	mes "[Buender Hikeman]";

-	mes "Ha ha...";

-	mes "Apologize?";

-	mes "The harm is";

-	mes "already done...";

-	goto L_CONTINUE2;

-L_THINK:

-	mes "[Buender Hikeman]";

-	mes "Quit lying!";

-	mes "You've stirred up";

-	mes "my hatred by showing";

-	mes "up again! I've never";

-	mes "forgotten that day!";

-	next;

-L_CONTINUE2:

-	mes "[Buender Hikeman]";

-	mes "It's too late";

-	mes "for you now. For";

-	mes "the sake of my friends,";

-	mes "I'll have my vengeance!";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Prepare to die!";

-	mes "^0000FFShinokas^000000!!!!";

-	next;

-	mes "[Buender Hikeman]";

-	mes "...!";

-	mes "*Cough! Cough!*";

-	mes "Noooo! N-not now...";

-	mes "*Cough! Cough!*";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "...";

-	mes "I better";

-	mes "get away";

-	mes "from him!";

-	next;

-	mes "^0000FFYou ran away from Hikeman^000000";

-	mes "^0000FFas he collapsed on the ground^000000";

-	mes "^0000FFIt wouldn't be a good idea to^000000";

-	mes "^0000FFprovoke the old man anymore,^000000";

-	mes "^0000FFintentionally or not.^000000";

-	if(Shinokas_Quest == 2) set Shinokas_Quest,3;

-	close;

-L_BEST:

-	mes "^0000FFIt'd be best^000000";

-	mes "^0000FFto avoid aggravating^000000";

-	mes "^0000FFthe old man for now.^000000";

-	close;

-L_IM:

-	mes "[Buender Hikeman]";

-	mes "Ha...!";

-	mes "Do you think";

-	mes "I'd so easily";

-	mes "forget the face";

-	mes "of the person who";

-	mes "shattered my life?!";

-	goto L_HOW;

-	

-L_P2:

-	mes "^0000FFHikeman is dozing^000000";

-	mes "^0000FFoff in his chair. Judging^000000";

-	mes "^0000FFfrom the look of discomfort^000000";

-	mes "^0000FFon his face, he seems to be^000000";

-	mes "^0000FFhaving a nightmare.^000000";

-	if(Shinokas_Quest == 10) close;

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "Excuse me...";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Huh...?";

-	mes ".........!!";

-	mes "Hahahahaha!";

-	mes "Come back for";

-	mes "your beating,";

-	mes "eh, Shinokas?!";

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "Look...!";

-	mes "I'm not Shinokas,";

-	mes "okay? How can you";

-	mes "forget what he looks";

-	mes "like or how old he is?";

-	mes "I'm way younger!";

-	next;

-	mes "[Buender Hikeman]";

-	mes "What...?";

-	next;

-	mes "[Buender Hikeman]";

-	mes "..................";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Uhhhh......";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Huh.";

-	next;

-	mes "[Buender Hikeman]";

-	mes "It seems...";

-	mes "I've made a";

-	mes "huge mistake.";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Ever since the accident, people";

-	mes "have said that I haven't been the";

-	mes "same. Maybe they're right.";

-	next;

-	mes "[Buender Hikeman]";

-	mes "I keep making the same";

-	mes "mistakes, so maybe they're";

-	mes "right about me getting senile.";

-	mes "Did you come just to clear";

-	mes "up this misunderstanding?";

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "Um...";

-	mes "Actually...";

-	next;

-	menu "Tell Hikeman about Shinakas's death.",-,"Don't notify Hikeman",L_NNotify;

-

-	set Shinokas_Quest,10;

-	mes "["+strcharinfo(0)+"]";

-	mes "Shinokas died";

-	mes "a while ago in";

-	mes "Einbroch.";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Wh-what...?";

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "Shinokas was killed by";

-	mes "some men. He thinks they";

-	mes "may have been the ones";

-	mes "who hired you guys. In the";

-	mes "end, he was betrayed too...";

-	next;

-	mes "[Buender Hikeman]";

-	mes "I...";

-	mes "I see...";

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "Shinokas may have";

-	mes "gotten some money,";

-	mes "but he spent the rest";

-	mes "of his life in hiding,";

-	mes "being hunted down.";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Nothing's left.";

-	mes "I've got nothing";

-	mes "to look forward to.";

-	mes "I was living only to";

-	mes "avenge my friends...";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Please...";

-	mes "Just go back to";

-	mes "wherever you came";

-	mes "from. Leave me alone...";

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "...";

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "Did Hikeman really want";

-	mes "revenge on Shinokas or did";

-	mes "he want to hear him out since";

-	mes "they used to be close friends?";

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "If I mention that";

-	mes "what they found was";

-	mes "the Ymir Heart Piece,";

-	mes "Hikeman might end up";

-	mes "getting hunter down, so";

-	mes "I better not say anything.";

-	next;

-	mes "["+strcharinfo(0)+"]";

-	mes "Why are those men";

-	mes "so obsessed with that";

-	mes "Ymir Heart Piece? Is it";

-	mes "really worth this kind of";

-	mes "cruelty? Whoever they are,";

-	mes "their intentions can't be good.";

-	if(BaseLevel < 41)set BaseExp,BaseExp+34750;

-	else if(BaseLevel > 40 && BaseLevel < 61)set BaseExp,BaseExp+69500;

-	else if(BaseLevel > 60 && BaseLevel < 71)set BaseExp,BaseExp+139000;

-	else if(BaseLevel > 70 && BaseLevel < 81)set BaseExp,BaseExp+278000;

-	else if(BaseLevel > 80 && BaseLevel < 91)set BaseExp,BaseExp+417000;

-	else if(BaseLevel > 90)set BaseExp,BaseExp+556000;

-	close;

-	

-L_NNotify:

-	mes "["+strcharinfo(0)+"]";

-	mes "Yeah...";

-	mes "That's right.";

-	mes "I wanted to clear up";

-	mes "this misunderstanding";

-	mes "so you could calm down,";

-	mes "even if it's just a little bit.";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Well, you don't have";

-	mes "to worry so much about";

-	mes ",u stress. I find that the";

-	mes "winds that pass through";

-	mes "this town to be very relaxing.";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Each time the wind";

-	mes "blows by, my vision blurs,";

-	mes "my memories haze and all";

-	mes "of my hatred just drifts away.";

-	next;

-	mes "[Buender Hikeman]";

-	mes "Without the wind, I'd only";

-	mes "have my hatred towards ^FF0000him^000000.";

-	mes "Maybe it's my only reason for";

-	mes "living and maybe I'm lonely,";

-	mes "but it's too late to feel";

-	mes "sorry for myself now.";

-	close;

-}

-

-

-//============================================================

-//============================================= Einbroch Lover

-//====================================================== Quest

-ein_in01.gat,31,151,4	script	Satra	850,{

-	if(EIN_LOVERQ > 11)goto s_Intimi;

-	if(EIN_LOVERQ == 11)goto s_Coal4;

-	if(EIN_LOVERQ == 10)goto s_Coal3;

-	if(EIN_LOVERQ == 9)goto s_Coal2;

-	if(EIN_LOVERQ == 8)goto s_Coal1;

-	if(EIN_LOVERQ == 7)goto s_Advent;

-	mes "[Satra]";

-	mes "A wandering";

-	mes "adventurer...?";

-	mes "How sinfully";

-	mes "intriguing!";

-	mes "Ho ho ho ho~";

-	next;

-	mes "[Satra]";

-	mes "Oh, do not worry";

-	mes "I'm sure the beauty of";

-	mes "my home has captured your";

-	mes "curiosity. My brutish excuse";

-	mes "for a husband would have you";

-	mes "beat if he found you...";

-	next;

-	mes "[Satra]";

-	mes "But I'm far more genteel";

-	mes "then Megass. You're more";

-	mes "than welcome to enjoy the";

-	mes "furnishings. Ho ho ho ho~";

-	close;

-

-s_Advent:

-	mes "[Satra]";

-	mes "A wandering adventurer...?";

-	mes "How ravishingly delightful!";

-	mes "You must have risked life and";

-	mes "limb to sneak past my husband";

-	mes "to enjoy the captivating sights";

-	mes "of my home. Ho ho ho ho~";

-	next;

-	mes "[Satra]";

-	mes "Since you're a very";

-	mes "unique quest, I shall";

-	mes "give you a unique honor";

-	mes "and deign to converse";

-	mes "with you, adventurer.";

-	next;

-	mes "[Satra]";

-	mes "Einbech exists to provide";

-	mes "my family with coal and";

-	mes "materials from their mines.";

-	mes "It's a natural law: workers";

-	mes "must be led by a chosen few.";

-	next;

-	mes "[Satra]";

-	mes "It's delightfully";

-	mes "ludicrous to see those";

-	mes "workers aspire to reach";

-	mes "our heights of social";

-	mes "prestige. Ho ho ho ho~";

-	next;

-	mes "[Satra]";

-	mes "Oh, I haven't spoken to";

-	mes "someone from a lower";

-	mes "class in ages! It feels";

-	mes "so forbiddenly exciting!";

-	next;

-	mes "[Satra]";

-	mes "Well adventurer, that's";

-	mes "the end of our informal";

-	mes "chat. I'll even grant you";

-	mes "full permission to boast";

-	mes "of the fact that you've";

-	mes "spoken to Lady Satra.";

-	next;

-	mes "[Satra]";

-	mes "If you wish for";

-	mes "me to share words with";

-	mes "you once more, prove to";

-	mes "me that you're worthier";

-	mes "than the other peons of";

-	mes "my graceful presence.";

-	next;

-s_Coal1:

-	mes "[Satra]";

-	mes "Oh, I have a marvelous";

-	mes "idea! Why don't you bring";

-	mes "me ^9C0000Coals^000000? It's not impossible";

-	mes "for someone like yourself, but";

-	mes "this kind of task will require";

-	mes "some effort on your part.";

-	next;

-	if(EIN_LOVERQ == 8 && countitem(1003) > 9)goto s_GotCoal1;

-	mes "[Satra]";

-	mes "Tah tah,";

-	mes "adventurer~";

-	if(EIN_LOVERQ == 7)set EIN_LOVERQ,8;

-	close;

-

-s_GotCoal1:

-	mes "[Satra]";

-	mes "My, you've already";

-	mes "brought the Coal?";

-	mes "How charmingly";

-	mes "prompt you are~";

-	next;

-	mes "[Satra]";

-	mes "On behalf of the";

-	mes "Kappellthaine family,";

-	mes "I shall ignore your lowly";

-	mes "status and graciously";

-	mes "accept your small gift.";

-	mes "Ho ho ho~";

-	next;

-	mes "[Satra]";

-	mes "Do you hail from";

-	mes "Einbech, adventurer?";

-	mes "Ah, the Rune-Midgarts";

-	mes "kingdom! I've visited your";

-	mes "country. It's quite quaint";

-	mes "and Jawaii is very lovely.";

-	next;

-	mes "[Satra]";

-	mes "Well, I shall try to";

-	mes "find some use for these.";

-	mes "I'm afraid the gift I've asked";

-	mes "from you isn't very practical.";

-	mes "How is coal usually used?";

-	mes "Ah, I have a novel idea!";

-	next;

-	mes "[Satra]";

-	mes "Wouldn't it be";

-	mes "intoxicatingly wild if";

-	mes "Megass were to hold one";

-	mes "of those social functions that";

-	mes "the lower classes are so fond";

-	mes "of? A 'barbeque', yes?";

-	next;

-	mes "[Satra]";

-	mes "In any case, If you";

-	mes "bring me more of that";

-	mes "Coal, you would be even";

-	mes "more favored by me and";

-	mes "you'll become a recipient";

-	mes "of my good graces. Ho ho~";

-	set EIN_LOVERQ,9;

-	delitem 1003,10;

-	close;

-

-s_Coal2:

-	mes "[Satra]";

-	mes "^111111*Titter~*^000000";

-	mes "Why, if it isn't my";

-	mes "intrepid adventurer.";

-	mes "Ho ho ho ho~";

-	next;

-	if(countitem(1003) > 9)goto s_GotCoal2;

-	mes "[Satra]";

-	mes "My apologies, but you";

-	mes "must first prove to me";

-	mes "that you are worthy of";

-	mes "conversation. Why don't";

-	mes "you deliver more of those";

-	mes "^9C0000Coals^000000, mmm?";

-	next;

-	mes "[Satra]";

-	mes "After all, I have no other";

-	mes "means of knowing whether";

-	mes "or not you appreciate the time";

-	mes "I sacrifice by socializing with";

-	mes "someone of your status.";

-	mes "Ho ho ho ho~";

-	close;

-

-s_GotCoal2:

-	mes "[Satra]";

-	mes "My word!";

-	mes "Why are you carrying";

-	mes "all of that dirty Coal";

-	mes "with you? You poor,";

-	mes "impoverished thing.";

-	next;

-	mes "[Satra]";

-	mes "Oh! Dear me,";

-	mes "I've nearly forgotten~";

-	mes "How divinely silly of me!";

-	mes "Once again, I graciously";

-	mes "accept your small gift on";

-	mes "behalf of the Kappelthaines.";

-	next;

-	mes "[Satra]";

-	mes "Let me share a little";

-	mes "bit of history concerning";

-	mes "our lovely Einbroch. At one";

-	mes "time, there was only Einbech,";

-	mes "the mining village. You can";

-	mes "imagine how long ago that was.";

-	next;

-	mes "[Satra]";

-	mes "However, the minerals";

-	mes "and ores mined in Einbech";

-	mes "need to be processed and";

-	mes "refined in factories that were";

-	mes "all built in a nearby industrial";

-	mes "comple which became Einbroch.";

-	next;

-	mes "[Satra]";

-	mes "Now every citizen in";

-	mes "Einbroch is wealthy and";

-	mes "it's well known that there";

-	mes "is a higher standard of";

-	mes "living here than in Einbech.";

-	next;

-	mes "[Satra]";

-	mes "Goodness, I believe";

-	mes "it's time for a spot of tea~";

-	mes "The next time you wish to have";

-	mes "an audience with me, it would";

-	mes "behoove you to bring another";

-	mes "gift of Coal. Toodles~";

-	set EIN_LOVERQ,10;

-	delitem 1003,10;

-	close;

-

-s_Coal3:

-	mes "[Satra]";

-	mes "Why hello~";

-	mes "Your visits have";

-	mes "recently been quite";

-	mes "delightful, fair adventurer.";

-	next;

-	mes "[Satra]";

-	mes "Oh, my apologies!";

-	mes "I supposed you're just";

-	mes "here for sight seeing,";

-	mes "or perhaps you're running";

-	mes "some sort of adventurer's";

-	mes "errand. Am I right?";

-	next;

-	if(countitem(1003) > 9)goto s_GotCoal3;

-	mes "[Satra]";

-	mes "I know you well enough";

-	mes "to know that you wouldn't";

-	mes "be so rude as to stop by";

-	mes "and chat without bringing";

-	mes "any ^9C0000Coal^000000. Ho ho ho ho~";

-	close;

-

-s_GotCoal3:

-	mes "[Satra]";

-	mes "Continue to show";

-	mes "your appreciation";

-	mes "and dedication to me";

-	mes "and you'll soon be known";

-	mes "to be my most favored";

-	mes "commoner. Ho ho ho ho~";

-	next;

-	mes "[Satra]";

-	mes "I'm sure you've noticed";

-	mes "the strained relationship";

-	mes "between Einbroch and Einbech";

-	mes "by now. It's a shame, really.";

-	next;

-	mes "[Satra]";

-	mes "As Einbroch grew wealthier";

-	mes "and Einbech became more";

-	mes "destitude, the affluent began";

-	mes "despising the impoverished.";

-	mes "I supposed it follows that the";

-	mes "poor started to resent the rich.";

-	next;

-	mes "[Satra]";

-	mes "It might be said that";

-	mes "both towns have been";

-	mes "trying to take advantage";

-	mes "of each other, but it's";

-	mes "clear that Einbroch has";

-	mes "always had the upper hand.";

-	next;

-	mes "[Satra]";

-	mes "In fact, because of";

-	mes "this rift between our";

-	mes "cities, our families are";

-	mes "taught not to associate";

-	mes "with the people of Einbech.";

-	next;

-	mes "[Satra]";

-	mes "Now, I believe that most";

-	mes "people who live in Einbech";

-	mes "are peons, but that does not";

-	mes "mean I will not give them a";

-	mes "chance to prove their worth.";

-	next;

-	mes "[Satra]";

-	mes "Why should I deprive";

-	mes "the lowly of my gracious";

-	mes "presence if they prove";

-	mes "themselves meritable?";

-	mes "Ho ho ho ho~";

-	next;

-	mes "[Satra]";

-	mes "Oh, that was scrumptious!";

-	mes "If you wish to pay me another";

-	mes "visit, don't forget to bring some";

-	mes "Coal with you. Tah tah~";

-	set EIN_LOVERQ,11;

-	delitem 1003,10;

-	close;

-

-s_Coal4:

-	mes "[Satra]";

-	mes "Ho ho ho ho~";

-	mes "Welcome adventurer,";

-	mes "I so enjoy our little chats.";

-	mes "Hors d'oeuvre?";

-	next;

-	if(countitem(1003) > 9)goto s_GotCoal4;

-	mes "[Satra]";

-	mes "Ah...";

-	mes "It seems you've";

-	mes "forgotten your ^9C0000Coals^000000.";

-	mes "A silly mistake, but one";

-	mes "I'm willing to overlook.";

-	close;

-

-s_GotCoal4:

-	mes "[Satra]";

-	mes "Oh! You can't enjoy";

-	mes "any food in that state!";

-	mes "Your hands are atrociously";

-	mes "grimy! May I ask why?";

-	next;

-	mes "[Satra]";

-	mes "Ah~";

-	mes "In my excitement,";

-	mes "I nearly forgot that";

-	mes "I asked you to bring";

-	mes "Coals to me again!";

-	mes "My apologies~";

-	next;

-	mes "[Satra]";

-	mes "You've brought so much Coal";

-	mes "to me, I'm convinced that you're";

-	mes "much more diligent than those";

-	mes "languid peasants in Einbech.";

-	mes "I appreciate that you've labored";

-	mes "so much to win my favor.";

-	next;

-	mes "[Satra]";

-	mes "Hm, what was that?";

-	mes "someone else provided";

-	mes "these Coals and you were";

-	mes "only delivering them? Then";

-	mes "who actually gathered these?";

-	next;

-	input @str$;

-	mes "[Satra]";

-	if(@str$ != "Clitzer"){

-		mes "I beg your pardon?";

-		mes "" + @str$ + "? Oh my...";

-		mes "I believe I may have";

-		mes "misheard you. Ho ho ho ho~";

-		close;

-	}

-	mes "Ah, Clitzer?";

-	mes "I must say, that's";

-	mes "a very humble name.";

-	mes "Yet it's so familiar...";

-	next;

-	mes "[Satra]";

-	mes "Ah, I recall there";

-	mes "was a hooligan that";

-	mes "has been pestering my";

-	mes "daughter named Clitzer.";

-	mes "Perhaps they are one";

-	mes "and the same. Hmm...";

-	next;

-	mes "[Satra]";

-	mes "I remember that he was";

-	mes "rather shabby looking and";

-	mes "lacked any semblance of";

-	mes "etiquette whatsoever. Clearly,";

-	mes "he is a fool and a coward, but";

-	mes "now I see that he is sincere.";

-	next;

-	mes "[Satra]";

-	mes "It might not be possible";

-	mes "to let him go otu with my";

-	mes "daughter straight away, but";

-	mes "I will invite him for a spot of";

-	mes "tea. And if Calla likes him,";

-	mes "well, he must be special.";

-	next;

-	mes "[Satra]";

-	mes "For a humble peasant,";

-	mes "this must be like a dream";

-	mes "come true! And to have tea";

-	mes "with Clitzer. Oh, what would";

-	mes "the girls say? Ah, but I did";

-	mes "marry that oafish Megass~";

-	next;

-	mes "[Satra]";

-	mes "Anyway, when you next";

-	mes "meet Clitzer, please tell";

-	mes "him to pay me a visit soon.";

-	mes "Oh, and remind him to dress";

-	mes "appropriately for this special";

-	mes "occasion. Ho ho ho ho ho~";

-	set EIN_LOVERQ,12;

-	close;

-

-s_Intimi:

-	mes "[Satra]";

-	mes "I understand that my";

-	mes "home is extravagantly";

-	mes "splendid and to approach";

-	mes "any Kappelthaine is an";

-	mes "honor t most commoners.";

-	next;

-	mes "[Satra]";

-	mes "However, Clitzer";

-	mes "has no reason to feel so";

-	mes "intimidated. Tell the poor";

-	mes "boy that he's earned the";

-	mes "honor of speaking with me.";

-	close;

-

-}

-

-ein_in01.gat,31,138,4	script	Calla	90,{

-	if(EIN_LOVERQ > 4 && EIN_LOVERQ < 14)goto s_NoSwitch;

-	if(EIN_LOVERQ > 1)goto s_Switches;

-s_NoSwitch:

-	mes "[Calla]";

-	mes "Hello adventurer.";

-	mes "Our city must just be";

-	mes "another place where";

-	mes "you'll stay no longer";

-	mes "than a few days.";

-	next;

-	mes "[Calla]";

-	mes "You must have so much";

-	mes "freedom. I envy you. I can't";

-	mes "do what I want to do. I don't";

-	mes "even have the courage to tell";

-	mes "my family what I really want,";

-	mes "much less change things here...";

-	next;

-	mes "[Calla]";

-	mes "How is it like?";

-	mes "Going wherever you";

-	mes "please, following your";

-	mes "heart's true desire?";

-	mes "What I would give to";

-	mes "be able to do that...";

-	if(!EIN_LOVERQ)set EIN_LOVERQ,1;

-	close;

-

-s_Switches:

-	switch(EIN_LOVERQ)

-	{

-

-	case 2:

-		mes "[Calla]";

-		mes "You're the adventurer";

-		mes "from before, aren't you?";

-		mes "Sadly, there isn't much";

-		mes "to do around here. This";

-		mes "place is basically like";

-		mes "a prison to me...";

-		next;

-		mes "[Calla]";

-		mes "Oh, you've met Clitzer?";

-		mes "Isn't he so kind, such";

-		mes "a perfect gentleman?";

-		next;

-		mes "[Calla]";

-		mes "I really wish I could";

-		mes "see him, but it's almost";

-		mes "impossible. My parents think";

-		mes "he's not good enough for me,";

-		mes "but they're wrong! What am";

-		mes "I going to do? Oh, Clitzer...";

-		next;

-		mes "[Calla]";

-		mes "Well, maybe I can't see";

-		mes "him, but would you give";

-		mes "my violin to Clitzer for me?";

-		mes "I used to play this for him";

-		mes "all the time...";

-		next;

-		mes "[Calla]";

-		mes "I'm sorry to trouble you,";

-		mes "but please understand";

-		mes "that I want to comfort my";

-		mes "Clitzer in any way that";

-		mes "I possibly can. Thank";

-		mes "you so much, adventurer...";

-		set EIN_LOVERQ,3;

-		getitem 1901,1;

-		close;

-	break;

-

-	case 3:

-	s_Regards:

-		mes "[Calla]";

-		mes "Oh, please send my";

-		mes "regards to Clitzer for me.";

-		mes "I wish I could comnfort";

-		mes "him in person, but this";

-		mes "is the best I can do for now.";

-		close;

-	break;

-

-	case 4:

-		if(!countitem(712))goto s_Regards;

-		mes "[Calla]";

-		mes "You've spoken";

-		mes "with Clitzer? How";

-		mes "is he? What did he say?";

-		next;

-		mes "[Calla]";

-		mes "Oh...?";

-		mes "He asked you to";

-		mes "deliver this flower";

-		mes "to me? How sweet~";

-		mes "Thank you very much,";

-		mes "kind adventurer~";

-		next;

-		mes "[Calla]";

-		mes "Ah, I'm so rude!";

-		mes "I've been calling you";

-		mes "^111111*adventurer*^000000 this whole";

-		mes "time you've been helping";

-		mes "me! Would you please";

-		mes "tell me your name?";

-		next;

-		input @str$;

-		mes "[Calla]";

-		if(@str$ != strcharinfo(0)){

-			mes "I'm sorry...";

-			mes "I didn't catch that.";

-			mes "would you please tell";

-			mes "me your name again?";

-			close;

-		}

-		mes "Ah, " + strcharinfo(0) + "!";

-		mes "Such a lovely name~";

-		mes "I promise that I won't ever";

-		mes "forget it. Oh, and if you pass by";

-		mes "Einbech, would you thank Clitzer";

-		mes "for the flower for me please?";

-		next;

-		mes "[Calla]";

-		mes "A-and... And...";

-		mes "Please tell him that";

-		mes "I really miss him a lot.";

-		mes "^565656*Sob Sob...*";

-		delitem 712,1;

-		set EIN_LOVERQ,5;

-		close;

-	break;

-

-	case 14:

-		mes "[Calla]";

-		mes "I just heard from my mother";

-		mes "that she's planning to have";

-		mes "tea with Clitzer! I'm sure that";

-		mes "I have you to thank for this~";

-		next;

-		mes "[Calla]";

-		mes "I never dreamed that";

-		mes "something as wonderful";

-		mes "as this could happen.";

-		mes "I'm so happy, I could cry...";

-		mes "I'll always be grateful";

-		mes "for what you've done.";

-		next;

-		mes "[Calla]";

-		mes "I feel like such a fool,";

-		mes "thinking it was all hopeless.";

-		mes "I'll be doing my best to have";

-		mes "my parents accept Clitzer and";

-		mes "someday we'll be married~";

-		next;

-		mes "[Calla]";

-		mes "There isn't much that I can";

-		mes "give you, but I can show you";

-		mes "one of my family's secrets.";

-		mes "It's an invigorating massage";

-		mes "technique that makes you alot";

-		mes "healthier in only ten seconds.";

-		next;

-		mes "[Calla]";

-		mes "Well, please take";

-		mes "off your equipment";

-		mes "and stand still while";

-		mes "I give the massage. It";

-		mes "might hurt a bit at first...";

-		nude;

-		next;

-		mes "^3151FF*Rub Rub Rub*";

-		mes "*Knead Knead Knead*";

-		mes "*Crrack C-c-c--c-crack*";

-		mes "*Crack Crack Crrrrrack*";

-		mes "*Rub Crrraaaaaaaaaackk*^000000";

-		next;

-		mes "[" + strcharinfo(0) + "]";

-		mes "Ooooooooh...";

-		mes "I feel sooo";

-		mes "sore and yet";

-		mes "soooooo good.";

-		mes "Wait. Now I just";

-		mes "feel goooood~";

-		if(BaseLevel < 41)set BaseExp,BaseExp+3712;

-		else if(BaseLevel > 40 && BaseLevel < 61)set BaseExp,BaseExp+7425;

-		else if(BaseLevel > 60 && BaseLevel < 71)set BaseExp,BaseExp+14850;

-		else if(BaseLevel > 70 && BaseLevel < 81)set BaseExp,BaseExp+29700;

-		else if(BaseLevel > 80 && BaseLevel < 91)set BaseExp,BaseExp+59400;

-		else if(BaseLevel > 90)set BaseExp,BaseExp+118800;

-		set EIN_LOVERQ,15;

-		next;

-		mes "[Calla]";

-		mes "So how was it?";

-		mes "I hope it was refreshing.";

-		mes "Please understand that";

-		mes "it's the best thing I can";

-		mes "give you to show my gratitude.";

-		next;

-		mes "[Calla]";

-		mes "Once again,";

-		mes "thank you so";

-		mes "much, " + strcharinfo(0) + ".";

-		mes "I'll always pray for";

-		mes "your safety on your";

-		mes "your adventures~";

-		close;

-	break;

-

-	case 15:

-		mes "[Calla]";

-		mes "Thank you so much!";

-		mes "I'll try my best to convince";

-		mes "my parents to accept our";

-		mes "relationship. It'll be hard,";

-		mes "but it's a good first step~";

-		next;

-		mes "[Calla]";

-		mes "I hope that we can all";

-		mes "work together ti improve";

-		mes "relations between Einbech";

-		mes "and Einbroch. The hatred";

-		mes "between our towns must end...";

-		next;

-		mes "[Calla]";

-		mes "I really appreciate";

-		mes "what you've done for";

-		mes "all of use. I'll be praying";

-		mes "for your safety, adventurer.";

-		close;

-	break;

-

-	}

-}

-

-ein_in01.gat,191,102,4	script	Kaijeta	846,{

-	if(EIN_LOVERQ > 13)goto s_Learned;

-	if(EIN_LOVERQ == 13)goto s_Clothes;

-	if(EIN_LOVERQ > 6 && EIN_LOVERQ < 13)goto s_Hatred;

-	if(EIN_LOVERQ == 6)goto s_Helping;

-	mes "[Kaijeta]";

-	mes "Welcome to my humble";

-	mes "abode, adventurer. I'm";

-	mes "sorry if I'm a poor host.";

-	next;

-	mes "[Kaijeta]";

-	mes "As you can see, we have";

-	mes "to share this house with";

-	mes "other families so we don't";

-	mes "have much open space or";

-	mes "privacy. I'm afraid we can't";

-	mes "even affor basic comfort.";

-	next;

-	mes "[Kaijeta]";

-	mes "For now, this is the best";

-	mes "we can do. We don't have";

-	mes "the zeny to buy a house or";

-	mes "land, so we have no choice";

-	mes "but to endure through this...";

-	close;

-

-s_Helping:

-	mes "[Kaijeta]";

-	mes "Thank you for helping my";

-	mes "son. He may look like a fool";

-	mes "for falling in love with someone";

-	mes "from Einbroch, but he's an honest";

-	mes "hard working man.";

-	next;

-	mes "[Kaijeta]";

-	mes "Then again, it was bound to";

-	mes "happen sometime. Einbech is";

-	mes "a very poor town while Einbroch";

-	mes "is a very rich town. I'd understand";

-	mes "if you don't agree, but opposites";

-	mes "attract sooner of later.";

-	next;

-	mes "[Kaijeta]";

-	mes "^565656*Sigh...*^000000";

-	mes "If my son and Calla can";

-	mes "work things out, maybe it";

-	mes "would improve relations";

-	mes "between our two towns.";

-	mes "I certainly hope so...";

-	next;

-	mes "[Kaijeta]";

-	mes "Still, I'm quite baffled!";

-	mes "I raised my son to have more";

-	mes "guts than to wallow in misery";

-	mes "when his heart's broken. And";

-	mes "I still have no idea how he got";

-	mes "together with such a rich woman.";

-	next;

-	mes "[Kaijeta]";

-	mes "Do you have any idea";

-	mes "how we can put an end";

-	mes "to the hate between our";

-	mes "two towns? I don't want to";

-	mes "see this couple separated";

-	mes "because of such pettiness.";

-	set EIN_LOVERQ,7;

-	close;

-

-s_Hatred:

-	mes "[Kaijeta]";

-	mes "I can't bear to see the";

-	mes "petty hatred between our";

-	mes "two towns stop my son from";

-	mes "seeing the woman he loves...";

-	close;

-

-s_Clothes:

-	mes "[Kaijeta]";

-	mes "Thank you for helping";

-	mes "my son Clitzer. Sadly, the";

-	mes "little fool doesn't have any";

-	mes "clue when it comes to certain";

-	mes "things like choosing clothing.";

-	mes "he gets so nervous about it!";

-	next;

-	mes "[Kaijeta]";

-	mes "A man should wear nice";

-	mes "clothes, like a Formal Suit";

-	mes "or a Tuxedo, for important";

-	mes "meetings and special occassions.";

-	mes "hopefully, he'll learn that soon.";

-	close;

-

-s_Learned:

-	mes "[Kaijeta]";

-	mes "My son learned";

-	mes "an awful lot from";

-	mes "your good example.";

-	mes "As a mother, I really";

-	mes "appreciate everything";

-	mes "you've done for him.";

-	next;

-	mes "[Kaijeta]";

-	mes "Well, adventurer,";

-	mes "I will be praying for";

-	mes "your safety wherever";

-	mes "your journeys may";

-	mes "take you.";

-	close;

-

-}

-

-ein_in01.gat,200,101,4	script	Clitzer	854,{

-	if(EIN_LOVERQ)goto s_Switches;

-s_Back:

-	mes "[Clitzer]";

-	mes "Is there something";

-	mes "that you really want";

-	mes "in life, but it's just";

-	mes "beyond your grasp?";

-	next;

-	mes "[Clitzer]";

-	mes "I wish I was more";

-	mes "like you adventurers.";

-	mes "People like you never";

-	mes "seem to give up, no matter";

-	mes "what the obstacles may be.";

-	mes "But I'm so helpless...";

-	next;

-	mes "[Clitzer]";

-	mes "I can't even see";

-	mes "the one person that";

-	mes "I love. We're just so";

-	mes "different that it's not";

-	mes "even possible anymore...";

-	close;

-

-s_Switches:

-	switch(EIN_LOVERQ){

-	case 1:

-		mes "[Clitzer]";

-		mes "That faintly sweet";

-		mes "and pleasant scent...";

-		mes "It's just like the fragrance";

-		mes "they use in Calla's house.";

-		next;

-		mes "[Clitzer]";

-		mes "Ah, so you visited";

-		mes "Calla in Einbroch?";

-		mes "I miss her sooo much!";

-		mes "Is she doing alright?";

-		next;

-		mes "[Clitzer]";

-		mes "Calla's so beautiful.";

-		mes "And she's so lovely.";

-		mes "Every time I close my";

-		mes "eyes, I can still see";

-		mes "her lovely smile.";

-		next;

-		mes "[Clitzer]";

-		mes "I'm sorry if I sound";

-		mes "silly, but I can't help";

-		mes "it. I know I'm acting like";

-		mes "a complete idiot. But I'd";

-		mes "give anything to see her...";

-		next;

-		mes "[Clitzer]";

-		mes "Just...";

-		mes "Just don't listen";

-		mes "to anything I say.";

-		mes "I'm just a poor fool";

-		mes "in love with the wrong";

-		mes "person. That has to be it...";

-		set EIN_LOVERQ,2;

-		close;

-		break;

-

-	case 2:

-		mes "[Clitzer]";

-		mes "^565656*Sigh*^000000";

-		mes "I really appreciate your";

-		mes "sympathy, but I'm merely";

-		mes "a coward and a fool.";

-		next;

-		mes "[Clitzer]";

-		mes "Yeah...";

-		mes "I'm a coward for doing";

-		mes "nothing about my feelings";

-		mes "and an idiot for falling in love";

-		mes "with such a high class girl in";

-		mes "the first place... Oh, Calla...";

-		close;

-		break;

-

-	case 3:

-		if(!countitem(1901))goto s_Back;

-		mes "[Clitzer]";

-		mes "What brings you here?";

-		mes "aren't you tired of hearing";

-		mes "me moan and whine about";

-		mes "lost love? ^111111*Siiiiigh...*^000000";

-		next;

-		mes "[Clitzer]";

-		mes "Hey, this violin...";

-		mes "Calla used to play";

-		mes "such beautiful music";

-		mes "on this for me. Did";

-		mes "she give this to you?";

-		next;

-		mes "[Clitzer]";

-		mes "I see. Calla must have";

-		mes "known that I'm all broken up";

-		mes "right now. She's too good to";

-		mes "me. How can se consider";

-		mes "my feelings before thinking";

-		mes "about herself?";

-		next;

-		mes "[Clitzer]";

-		mes "I know I'm being";

-		mes "shameless, but I have";

-		mes "a favor to ask. Adventurer,";

-		mes "would you please send";

-		mes "Calla a present for me?";

-		next;

-		mes "[Clitzer]";

-		mes "All you need to do is";

-		mes "just give her ^FF00001 Flower^000000.";

-		mes "I don't have the zeny and";

-		mes "I don't think I'm welcome";

-		mes "at Kapellthaine Manor.";

-		next;

-		mes "[Clitzer]";

-		mes "Here, in return, I'll";

-		mes "give you this health";

-		mes "massage. It's not a";

-		mes "big deal, but when I'm";

-		mes "done, your mind and body";

-		mes "will be refreshed. Here goes!";

-		next;

-		mes "^3151FF*Knead Knead*";

-		mes "*Rub Rub Rub Rub*";

-		mes "*Press Press Press*";

-		mes "*C-c-c-c-c-c-crakck!*^000000";

-		next;

-		mes "[" + strcharinfo(0) + "]";

-		mes "Oh--";

-		mes "Hell yeah!";

-		mes "That's the stuff!";

-		delitem 1901,1;

-		if(BaseLevel < 41)set BaseExp,BaseExp+3712;

-		else if(BaseLevel > 40 && BaseLevel < 61)set BaseExp,BaseExp+7425;

-		else if(BaseLevel > 60 && BaseLevel < 71)set BaseExp,BaseExp+14850;

-		else if(BaseLevel > 70 && BaseLevel < 81)set BaseExp,BaseExp+29700;

-		else if(BaseLevel > 80 && BaseLevel < 91)set BaseExp,BaseExp+59400;

-		else if(BaseLevel > 90)set BaseExp,BaseExp+118800;

-		set EIN_LOVERQ,4;

-		next;

-		mes "[Clitzer]";

-		mes "Would you please bring";

-		mes "1 Flower to Calla for me?";

-		mes "I'm sorry for troubling you...";

-		close;

-		break;

-

-	case 4:

-		mes "[Clitzer]";

-		mes "Would you please bring";

-		mes "1 Flower to Calla for me?";

-		mes "I'm sorry for troubling you...";

-		close;

-		break;

-

-	case 5:

-		mes "[Clitzer]";

-		mes "You've given her";

-		mes "the flower? That's";

-		mes "great! Thank you,";

-		mes "thank you so mu--";

-		next;

-		mes "[Clitzer]";

-		mes "...Oh!";

-		mes "Gosh! I was thinking so";

-		mes "much about myself that";

-		mes "I forgot to ask you for your";

-		mes "name! I'm sorry for being";

-		mes "so knuckle-headed...";

-		next;

-		mes "[Clitzer]";

-		mes "So...";

-		mes "What's your name?";

-		next;

-		input @str$;

-		mes "[Clitzer]";

-		if(@str$ != strcharinfo(0)){

-			mes "Hm...?";

-			mes "Oh, don't be";

-			mes "so nervous~";

-			mes "But would you please";

-			mes "tell me your name again?";

-			mes "I couldn't hear you...";

-			close;

-		}

-		mes "" + strcharinfo(0) + "...";

-		mes "That's very nice. Thank you,";

-		mes "I'm really grateful for your help.";

-		mes "Although I can't see Calla in";

-		mes "person, I can at least send";

-		mes "my regards if you help me.";

-		next;

-		mes "[Clitzer]";

-		mes "I feel so much";

-		mes "better now. Oh!";

-		mes "When you have the";

-		mes "time, why don't you talk";

-		mes "to my mother? She always";

-		mes "likes meeting my friends.";

-		set EIN_LOVERQ,6;

-		close;

-		break;

-

-	case 6:

-	case 7:

-	case 8:

-	case 9:

-	case 10:

-	case 11:

-		mes "[Clitzer]";

-		mes "^111111*Sigh...*^000000";

-		mes "What can I do to";

-		mes "get Calla's parents";

-		mes "to accept me as her";

-		mes "boyfriend? I can't";

-		mes "think of anything...";

-		close;

-		break;

-

-	case 12:

-		mes "[Clitzer]";

-		mes "Eh...?";

-		mes "What did you just say?";

-		mes "You did something for";

-		mes "the Kapellthaines?";

-		next;

-		mes "[Clitzer]";

-		mes "What...?";

-		mes "Did you just say";

-		mes "that Calla's mother";

-		mes "wants me to have tea";

-		mes "with her? Holy moley...!";

-		next;

-		mes "[Clitzer]";

-		mes "Okay, okay.";

-		mes "I-I I'll need something";

-		mes "nice to wear, right? Oh.";

-		mes "Wow. This is so sudden!";

-		mes "W-what should I do?";

-		next;

-		mes "[Clitzer]";

-		mes "This monkey suit";

-		mes "that I've got on just";

-		mes "won't do! Arrrgh! But I've";

-		mes "already outgrown all of my";

-		mes "nice clothes already. Boy,";

-		mes "am I in a pickle...";

-		set EIN_LOVERQ,13;

-		close;

-		break;

-

-	case 13:

-		if(countitem(2320) || countitem(7170))goto s_Clothes;

-		mes "[Clitzer]";

-		mes "Noooooo!";

-		mes "I've got to find";

-		mes "the perfect thing";

-		mes "to wear or Calla's";

-		mes "mother might ^FF0000hate^000000 me!";

-		next;

-		mes "[Clitzer]";

-		mes "Think, Clitzer, think!";

-		mes "Okay, no fun colors.";

-		mes "I don't want her to";

-		mes "think I'm not serious";

-		mes "about Calla. Stripes";

-		mes "might be bad too...";

-		close;

-		break;

-

-	case 14:

-	case 15:

-		mes "[Clitzer]";

-		mes "Look out, world!";

-		mes "I'm gonna become";

-		mes "worth of Calla's love!";

-		mes "Someday, maybe even her";

-		mes "parents will approve me!";

-		close;

-		break;

-	}

-

-s_Clothes:

-	mes "[Clitzer]";

-	mes "Waaah!";

-	mes "What should I wear?!";

-	mes "I can't for the life of me";

-	mes "figure this out! Something,";

-	mes "um, formal? I've never worn";

-	mes "anything like that before!";

-	next;

-	if(countitem(7170)){

-		set @clothes,7170;

-		mes "[Clitzer]";

-		mes "Wait, " + strcharinfo(0) + ".";

-		mes "What's that you've got";

-		mes "there? I've seen something";

-		mes "like that before. It's called";

-		mes "a Tuxedo, right? Something";

-		mes "like that would be perfect!";

-		next;

-		menu "Give it to him.",s_Giveclothes,"Ignore him.",-;

-

-		mes "[Clitzer]";

-		mes "But how can I get";

-		mes "a Tuxedo? Ooh, I hope";

-		mes "it doesn't cost too much";

-		mes "zeny or I won't be able to";

-		mes "get one of those soon...";

-	} else if(countitem(2320)){

-		set @clothes,2320;

-		mes "[Clitzer]";

-		mes "Wait, " + strcharinfo(0) + ".";

-		mes "What's that you've got";

-		mes "there? I've seen something";

-		mes "like that before. It's called";

-		mes "a Formal Suit, right?";

-		mes "Something like that would";

-		mes "be perfect!";

-		next;

-		menu "Give it to him.",s_Giveclothes,"Ignore him.",-;

-

-		mes "[Clitzer]";

-		mes "But how can I get";

-		mes "a Formal Suit? I hope";

-		mes "it doesn't cost too much";

-		mes "zeny or I won't be able to";

-		mes "get one of those soon...";

-	}

-	close;

-

-s_Giveclothes:

-	mes "[Clitzer]";

-	mes "I can have this?";

-	mes "Oh, thank you so much!";

-	mes "Finally, I have something";

-	mes "nice enough to wear to meet";

-	mes "Calla's mom! What a relief!";

-	next;

-	mes "[Clitzer]";

-	mes "You've been helping me all";

-	mes "this time and I haven't properly";

-	mes "expressed my gratitude. I'm sorry";

-	mes "if I've been to absorbed in my own";

-	mes "problems. I may be poor, but I need";

-	mes "to repay you somehow...";

-	next;

-	mes "[Clitzer]";

-	mes "Wait...";

-	mes "Why don't you have this";

-	mes "ore? I don't how";

-	mes "valuable it is, but I know";

-	mes "that it's pretty rare. It may";

-	mes "even be useful to you later~";

-	delitem @clothes,1;

-	set EIN_LOVERQ,14;

-	switch(rand(1,9)){

-	case 1:

-		getitem 7289,1;

-		break;

-

-	case 2:

-		getitem 7290,1;

-		break;

-

-	case 3:

-		getitem 7291,1;

-		break;

-

-	case 4:

-		getitem 7292,1;

-		break;

-

-	case 5:

-		getitem 7293,1;

-		break;

-

-	case 6:

-		getitem 7294,1;

-		break;

-

-	case 7:

-		getitem 7295,1;

-		break;

-

-	case 8:

-		getitem 7296,1;

-		break;

-

-	case 9:

-		getitem 7297,1;

-		break;

-	}

-	next;

-	mes "[Clitzer]";

-	mes "" + strcharinfo(0) + ",";

-	mes "you've really opened";

-	mes "my eyes. From now on,";

-	mes "I'll do my best to earn the";

-	mes "approval of Calla's parents and";

-	mes "become worthy of Calla's love.";

-	close;

-

-}

-

-//============================================================

-//=========================================== Einbroch Polution

-//============================================================

-

-einbroch.gat,1,1,0	script	#PolutionNPC	-1,{

-

-OnPolution:

-	set @AlrdEinPoll,1;

-	donpcevent "Liotzburg::OnHide";

-	donpcevent "Morei::OnHide";

-	donpcevent "Mark::OnHide";

-	donpcevent "Khemko::OnHide";

-	donpcevent "Oberu::OnHide";

-	donpcevent "Khowropher::OnHide";

-	donpcevent "Kesunboss::OnHide";

-	donpcevent "Train Station Staff#01::OnHide";

-	donpcevent "Train Station Staff#02::OnHide";

-	donpcevent "Leslie::OnHide";

-	donpcevent "Little Toby::OnHide";

-	donpcevent "Tan::OnHide";

-	donpcevent "Keneshiotz::OnHide";

-	donpcevent "Sleik::OnHide";

-	donpcevent "Uwe Kleine::OnHide";

-	donpcevent "Laboratory Soldier#01::OnHide";

-	donpcevent "Laboratory Soldier#02::OnHide";

-	disablenpc "Paddler";

-	disablenpc "Head Gear Dealer";

-

-	mapannounce "einbroch.gat","This is a state of emercency! Harmful smog is reaching high levels of saturation. Residents of Einbroch must find shelter immediately.",bc_map;

-	monster "einbroch.gat",82,332,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",99,328,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",122,317,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",138,319,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",147,312,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",159,316,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",173,315,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",161,311,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",147,296,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",168,282,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",175,271,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",146,274,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",160,272,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",155,256,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",179,262,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",192,248,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",212,255,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",230,250,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",246,251,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",262,254,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",253,240,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",202,245,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",181,251,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",172,238,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",146,242,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",186,226,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",173,239,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",124,248,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",120,234,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",98,234,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",101,219,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",89,208,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",96,191,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",76,194,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",60,196,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",45,194,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",34,201,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",40,184,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",64,173,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",96,173,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",41,155,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",46,131,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",46,108,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",38,93,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",55,86,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",81,81,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",107,82,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",107,104,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",123,73,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",132,87,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",125,63,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",142,64,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",150,52,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",157,37,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",179,39,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",197,46,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",217,67,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",246,54,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",228,110,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk"; 

-	monster "einbroch.gat",250,118,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",273,127,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk"; 

-	monster "einbroch.gat",288,138,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk"; 

-	monster "einbroch.gat",281,160,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk"; 

-	monster "einbroch.gat",281,192,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",291,201,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",283,218,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk"; 

-	monster "einbroch.gat",268,216,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk"; 

-	monster "einbroch.gat",273,196,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk"; 

-	monster "einbroch.gat",262,164,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",241,180,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",216,205,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",209,198,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",224,177,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",227,163,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",208,166,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",132,87,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",149,119,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",119,36,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",84,155,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";

-	monster "einbroch.gat",82,107,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";

-	initnpctimer;

-	end;

-

-OnMobChk:

-	if(mobcount("einbroch.gat","#PolutionNPC::OnMobChk"))end;

-

-OnTimer600000:

-	killmonster "einbroch.gat","#PolutionNPC::OnMobChk";

-	mapannounce "einbroch.gat","Emergency status is now cancelled. Air pollution levels are now within the safety zone.",bc_map;

-	enablenpc "Liotzburg";

-	donpcevent "Liotzburg::OnUnHide";

-	enablenpc "Morei";

-	donpcevent "Morei::OnUnHide";

-	enablenpc "Mark";

-	donpcevent "Mark::OnUnHide";

-	enablenpc "Khemko";

-	donpcevent "Khemko::OnUnHide";

-	enablenpc "Oberu";

-	donpcevent "Oberu::OnUnHide";

-	enablenpc "Khowropher";

-	donpcevent "Khowropher::OnUnHide";

-	enablenpc "Kesunboss";

-	donpcevent "Kesunboss::OnUnHide";

-	enablenpc "Train Station Staff#01";

-	donpcevent "Train Station Staff#01::OnUnHide";

-	enablenpc "Train Station Staff#02";

-	donpcevent "Train Station Staff#02::OnUnHide";

-	enablenpc "Leslie";

-	donpcevent "Leslie::OnUnHide";

-	enablenpc "Little Toby";

-	donpcevent "Little Toby::OnUnHide";

-	enablenpc "Tan";

-	donpcevent "Tan::OnUnHide";

-	enablenpc "Keneshiotz";

-	donpcevent "Keneshiotz::OnUnHide";

-	enablenpc "Sleik";

-	donpcevent "Sleik::OnUnHide";

-	enablenpc "Uwe Kleine";

-	donpcevent "Uwe Kleine::OnUnHide";

-	enablenpc "Laboratory Soldier#01";

-	donpcevent "Laboratory Soldier#01::OnUnHide";

-	enablenpc "Laboratory Soldier#02";

-	donpcevent "Laboratory Soldier#02::OnUnHide";

-	enablenpc "Paddler";

-	enablenpc "Head Gear Dealer";

-	set $EinPolution,0;

-	set @AlrdEinPoll,0;

-	end;

-

-}

-

-sec_in02.gat,127,86,3	script	Einbroch Polution	851,{

-

-	if(getgmlevel() > 79){

-		mes "[Einbroch Polution Variable Management]";

-		mes "$EinPolution is currently: " + $EinPolution + ".";

-		mes "What would you like to do?";

-		next;

-		menu "Reset $EinPolution to 0",s_0,"Input My Own Value",s_Input,"Cancel.",-;

-		close;

-	s_0:

-		mes "[Einbroch Polution Variable Management]";

-		mes "$EinPolution has been reset to 0.";

-		set $EinPolution,0;

-		set @AlrdEinPoll,0;

-		close;

-	s_Input:

-		mes "[Einbroch Polution Variable Management]";

-		mes "Insert a number you want $EinPollution";

-		mes "to be replaced with. Type '0' to cancel.";

-		input @temppol;

-		if(@temppol == 0)close;

-		set $EinPolution,@temppol;

-		mes "[Einbroch Polution Variable Management]";

-		mes "$EinPolution has been set to: " + $EinPolution + ".";

-		close;

-	} else {

-		mes "[Einbroch Polution Variable Management]";

-		mes "Sorry you don't have authorization";

-		mes "to use this NPC.";

-		close;

-	}

-}

-

-//============================================================

-//=========================================== Einbroch Factory

-//====================================================== Quest

-

-einbroch.gat,132,84,3	script	Liotzburg	853,{

-

-	if($EinPolution > 9){

-		mes "[Liotzburg]";

-		mes "What's going on?!";

-		mes "Who's responsible?!";

-		mes "God, I can't believe";

-		mes "this is happening!";

-		mes "^333333*Cough Cough!*^000000";

-		next;

-		mes "[Liotzburg]";

-		mes "I need to get out of here!";

-		mes "You! D-do something and";

-		mes "fix this! I gotta hide and find";

-		mes "someplace safe!";

-		close2;

-		if(!@AlrdEinPoll)donpcevent "#PolutionNPC::OnPolution";

-		end;

-	}

-	if(EinFactory >= 13){

-		if(EinFactory > 13){

-			mes "[Liotzburg]";

-			mes "What...?";

-			mes "Factory Repair";

-			mes "budget? No way!";

-			next;

-		}

-		mes "[Liotzburg]";

-		mes "Why waste money?";

-		mes "We haven't had any";

-		mes "problems so far! Look,";

-		mes "everything's fine! Why";

-		mes "are you exaggerating";

-		mes "such small details?";

-		next;

-		mes "[Liotzburg]";

-		mes "The field overseer,";

-		mes "Zelmeto, just came by to";

-		mes "ask for a budget increase.";

-		mes "Well, I think he's lying!";

-		mes "Everything's perfect!";

-		if(EinFactory == 13)set EinFactory,14;

-		close;

-	}

-	mes "[Liotzburg]";

-	mes "I'm the plant";

-	mes "superintendant of this";

-	mes "factory. Most of my employees";

-	mes "are diligent workers. I can't say";

-	mes "that of everyone, but overall we're";

-	mes "doing an excellent job. Ha ha ha~!";

-	next;

-	mes "[Liotzburg]";

-	mes "So long as this factory";

-	mes "is well maintained, we won't";

-	mes "have to worry about this city's";

-	mes "safety. The field overseer,";

-	mes "Zelmeto, is also very reliable.";

-	next;

-	mes "[Liotzburg]";

-	mes "I can trust Zelmeto";

-	mes "to look after things,";

-	mes "so there's no need for";

-	mes "me to go inside the factory.";

-	mes "Delegating work is great!";

-	next;

-	mes "[Liotzburg]";

-	mes "Our factory will";

-	mes "continue to develop";

-	mes "and everyone will be";

-	mes "proud of the progress";

-	mes "we're making. Yes, I can";

-	mes "assure you of that!";

-	close;

-

-OnHide:

-	specialeffect 16;

-	disablenpc "Liotzburg";

-	end;

-

-OnUnhide:

-	misceffect 215;

-	end;

-

-}

-

-ein_in01.gat,67,243,3	script	Zelmeto	851,{

-

-	if($EinPolution > 9){

-		mes "[Zelmeto]";

-		mes "We've got a big problem";

-		mes "here! I appreciate that you've";

-		mes "been gathering the materials,";

-		mes "but the machines have been";

-		mes "broken for too long!";

-		next;

-		mes "[Zelmeto]";

-		mes "Right when I tried to";

-		mes "fix it, a huge shortout";

-		mes "occurred. Our town is";

-		mes "probably filled with";

-		mes "toxic fog right now!";

-		next;

-		mes "[Zelmeto]";

-		mes "I'll try my best to fix";

-		mes "this, but we really should";

-		mes "have allocated some funds";

-		mes "to fix this machine earlier!";

-		next;

-		mes "[Zelmeto]";

-		mes "The most important";

-		mes "thing is that you get";

-		mes "out of here and find";

-		mes "shelter! Right now!";

-		close2;

-		warp "einbroch.gat",131,83;

-		end;

-	}

-

-	if(EinFactory > 0)goto s_Switches;

-	mes "[Zelmeto]";

-	mes "Ah, you must be a visitor.";

-	mes "I'm Zelmeto Abellov, the";

-	mes "field overseer. Have you";

-	mes "been in this facility before?";

-	next;

-	mes "[Zelmeto]";

-	mes "This factory plays an";

-	mes "important role in our city";

-	mes "and generates a lot of income.";

-	mes "However, our employess suffer";

-	mes "from a poor work environment.";

-	next;

-	mes "[Zelmeto]";

-	mes "Our superintendant makes a lot";

-	mes "of money and seems content with";

-	mes "the current situation. However, the";

-	mes "rest of the workforce doesn't enjoy";

-	mes "all of the benefits he receives.";

-	mes "[Zelmeto]";

-	mes "Many people have already";

-	mes "quit and there are only a few";

-	mes "people who continue to work";

-	mes "here. So now we're understaffed";

-	mes "and I'm in quite a bind...";

-	next;

-	mes "[Zelmeto]";

-	mes "There are some urgent";

-	mes "tasks I need done, but";

-	mes "there's no way for me";

-	mes "to recruit new workers.";

-	mes "Ah, I'm sorry, I've spoken too";

-	mes "freely about my own problems...";

-	next;

-	menu "You're understaffed?",s_Underst,"No, it's okay.",-;

-

-	mes "[Zelmeto]";

-	mes "Thank you for";

-	mes "your kindness.";

-	mes "And please don't";

-	mes "let anyone know about";

-	mes "anything I just told you.";

-	close;

-

-s_Underst:

-	mes "[Zelmeto]";

-	mes "Yes, we are!";

-	mes "I don't have enough";

-	mes "people to inspect the";

-	mes "factory machines and";

-	mes "determine what kinds";

-	mes "of problems we have.";

-	next;

-	mes "[Zelmeto]";

-	mes "It's a time consuming";

-	mes "task I'd rather do on my";

-	mes "own. However, between that";

-	mes "and managing the workforce,";

-	mes "I don't have enough time...";

-	next;

-	menu "I can help you.",s_Help,"Keep up the good job.",-;

-

-	mes "[Zelmeto]";

-	mes "Well, it's a living.";

-	mes "^6A6A6A*Sigh*^000000 I can put up with";

-	mes "this, but I hope the higher";

-	mes "ups will consider improving";

-	mes "the work environment here...";

-	close;

-

-s_Help:

-	mes "[Zelmeto]";

-	mes "You can help me?";

-	mes "I know something like";

-	mes "this is too much to ask,";

-	mes "but I'll accept any help";

-	mes "anyone offers me. I'm";

-	mes "that desperate.";

-	next;

-	mes "[Zelmeto]";

-	mes "Alright, I'll have you";

-	mes "inspect the machines";

-	mes "in the factory one by one.";

-	mes "It's imperative that we know";

-	mes "what needs to be repaired";

-	mes "and what's working fine";

-	next;

-	mes "[Zelmeto]";

-	mes "First, find the ^FF00002nd control";

-	mes "panel^000000 and determine its";

-	mes "status. I'm fairly certain that";

-	mes "it broke a long time ago, but";

-	mes "it wouldn't hur to make sure.";

-	mes "You should find it easily.";

-	next;

-	mes "[Zelmeto]";

-	mes "When you finish your";

-	mes "inspection, report back";

-	mes "to me so I can tell you";

-	mes "which machine to check";

-	mes "next. Thanks again for";

-	mes "offering to help";

-	set EinFactory,1;

-	close;

-s_Switches:

-	switch(EinFactory){

-	case 1:

-		mes "[Zelmeto]";

-		mes "If you would,";

-		mes "please inspect the";

-		mes "2nd control panel that";

-		mes "seems to have been";

-		mes "broken for a while...";

-		close;

-		break;

-

-	case 2:

-		mes "[Zelmeto]";

-		mes "Huh, I see.";

-		mes "We must do something";

-		mes "about that as soon as";

-		mes "we can. Now, let me tell";

-		mes "you what to check next.";

-		next;

-		mes "[Zelmeto]";

-		mes "There are 3 automatic";

-		mes "pressure governors which";

-		mes "hammer the bent iron plates";

-		mes "from above to flatten them. It";

-		mes "seems that one of them may";

-		mes "have some kind of problem.";

-		next;

-		mes "[Zelmeto]";

-		mes "Please inspect the ^FF0000automatic";

-		mes "pressure governors^000000. Even if the";

-		mes "problem seems small, please";

-		mes "report it to me. I know it might";

-		mes "seem fine now, but I want to";

-		mes "prevent an accident if I can.";

-		next;

-		mes "[Zelmeto]";

-		mes "Thank you";

-		mes "in advance,";

-		mes "adventurer.";

-		set EinFactory,3;

-		close;

-		break;

-

-	case 3:

-		mes "[Zelmeto]";

-		mes "You need to inspect";

-		mes "an automatic pressure";

-		mes "governor. It looks fine,";

-		mes "but sometimes it makes";

-		mes "strange noises.";

-		next;

-		mes "[Zelmeto]";

-		mes "It probably will";

-		mes "be a good idea to";

-		mes "check that machine";

-		mes "more carefully this";

-		mes "time, just in case.";

-		next;

-		mes "[Zelmeto]";

-		mes "Thank you";

-		mes "for helping us,";

-		mes "adventurer.";

-		close;

-		break;

-

-	case 4:

-		mes "[Zelmeto]";

-		mes "What...?";

-		mes "This is worse";

-		mes "than I expected. But";

-		mes "it's good that we know";

-		mes "about these problems";

-		mes "as soon as possible.";

-		next;

-		mes "[Zelmeto]";

-		mes "Don't you worry,";

-		mes "we'll take care of";

-		mes "this. In the meantime,";

-		mes "I'd like you to inspect";

-		mes "the next machine for me.";

-		next;

-		mes "[Zelmeto]";

-		mes "I want you to check";

-		mes "a ^FF0000control panel^000000. It's the";

-		mes "same kind as the one";

-		mes "you just inspected, but";

-		mes "bigger in size.";

-		next;

-		mes "[Zelmeto]";

-		mes "It's located in the";

-		mes "middle of the factory,";

-		mes "so you should be able";

-		mes "to find it. It may be in bad";

-		mes "condition, even though it's";

-		mes "operating fine for now...";

-		next;

-		mes "[Zelmeto]";

-		mes "We need to ensure that";

-		mes "it's stable, reliable and";

-		mes "doesn't pose a threat to";

-		mes "our workforce. Thanks";

-		mes "again, adventurer.";

-		set EinFactory,5;

-		close;

-		break;

-

-	case 5:

-		mes "[Zelmeto]";

-		mes "I'd like you to inspect";

-		mes "the control panel. It's";

-		mes "fairly large and can be";

-		mes "found in the middle of the";

-		mes "factory. You shouldn't have";

-		mes "too much trouble finding it.";

-		close;

-		break;

-

-	case 6:

-		mes "[Zelmeto]";

-		mes "I see...";

-		mes "It's most likely that";

-		mes "there was a short";

-		mes "circuit and most";

-		mes "of the internal devices";

-		mes "were burnt out...";

-		next;

-		mes "[Zelmeto]";

-		mes "Thanks for checking";

-		mes "that out for me. Now,";

-		mes "the next machine I need";

-		mes "you to inspect is different";

-		mes "than the others I've had";

-		mes "you examine.";

-		next;

-		mes "[Zelmeto]";

-		mes "It's a mechanical";

-		mes "hand that transports";

-		mes "small objects. We didn't";

-		mes "really give it a name, but";

-		mes "you should be able to find it.";

-		next;

-		mes "[Zelmeto]";

-		mes "Recently, it seems";

-		mes "that there have been";

-		mes "problems in operating";

-		mes "that machine. If something's";

-		mes "broken, we need to know";

-		mes "and fix it right away.";

-		next;

-		mes "[Zelmeto]";

-		mes "Thanks again";

-		mes "in advance.";

-		set EinFactory,7;

-		close;		

-		break;

-

-	case 7:

-		mes "[Zelmeto]";

-		mes "The machine which";

-		mes "I want you to inspect";

-		mes "this time is a small";

-		mes "sized conveyor.";

-		next;

-		mes "[Zelmeto]";

-		mes "Be sure that you";

-		mes "inspect the small";

-		mes "one, since we also";

-		mes "have a large conveyor";

-		mes "in the factory as well";

-		close;

-		break;

-

-	case 8:

-		mes "[Zelmeto]";

-		mes "Huh?";

-		mes "I'm suprised to hear";

-		mes "that. ^6A6A6A*Sigh*^000000 There's just";

-		mes "too many things that need";

-		mes "fixing. This is terrible...";

-		next;

-		mes "[Zelmeto]";

-		mes "Well, let me worry";

-		mes "about that for now. Please";

-		mes "focus on continuing to inspect";

-		mes "some of the other machines.";

-		next;

-		mes "[Zelmeto]";

-		mes "Now, there's a pipe inside";

-		mes "this factory that I want you";

-		mes "to look at. Many of our pipes";

-		mes "aren't in the best condition,";

-		mes "but this particular one might";

-		mes "be severely damaged.";

-		next;

-		mes "[Zelmeto]";

-		mes "Now, the pipe I want";

-		mes "you to inspect is located";

-		mes "near those large caultrons";

-		mes "of molten metal. You should";

-		mes "be able to find it pretty easily";

-		next;

-		mes "[Zelmeto]";

-		mes "Thanks again";

-		mes "for your help,";

-		mes "adventurer.";

-		set EinFactory,9;

-		close;

-		break;

-

-	case 9:

-		mes "[Zelmeto]";

-		mes "The pipe I want";

-		mes "you to inspect is located";

-		mes "near those large caultrons";

-		mes "of molten metal. You should";

-		mes "be able to find it pretty easily";

-		next;

-		mes "[Zelmeto]";

-		mes "Thanks again";

-		mes "for your help,";

-		mes "adventurer.";

-		close;

-		break;

-

-	case 10:

-		mes "[Zelmeto]";

-		mes "This is";

-		mes "worse than";

-		mes "I imagined...";

-		next;

-		mes "[Zelmeto]";

-		mes "We've got to start";

-		mes "repairs as soon as we";

-		mes "can! Hopefully, we can";

-		mes "resolve this before";

-		mes "any serious problems happen...";

-		next;

-		mes "[Zelmeto]";

-		mes "Alright, the last";

-		mes "thing that you need to";

-		mes "inspect is a ^FF0000large conveyor^000000.";

-		mes "It's similiar to the one you";

-		mes "inspected before, but it's";

-		mes "bigger and more powerful.";

-		next;

-		mes "[Zelmeto]";

-		mes "We have only one of these";

-		mes "machines and it's usually";

-		mes "moved around a lot since";

-		mes "a lot of people in the factory";

-		mes "use it. I really don't know";

-		mes "where it could be now.";

-		next;

-		mes "[Zelmeto]";

-		mes "Still I'm sure that";

-		mes "it's inside the building,";

-		mes "so you should be able to";

-		mes "find it. I hope you can inspect";

-		mes "that conveyor for me soon.";

-		set EinFactory,11;

-		close;

-		break;

-

-	case 11:

-		mes "[Zelmeto]";

-		mes "The machine which";

-		mes "you are supposed to";

-		mes "inspect right now";

-		mes "is a large convyore.";

-		next;

-		mes "[Zelmeto]";

-		mes "Remember that we";

-		mes "also have a small sized";

-		mes "conveyor, so make sure";

-		mes "that you examine the";

-		mes "larger one, alright?";

-		close;

-		break;

-

-	case 12:

-		mes "[Zelmeto]";

-		mes "Well, I figured that both";

-		mes "conveyors would have";

-		mes "similiar problems. We";

-		mes "can fix them at the";

-		mes "same time, but it'll";

-		mes "be a hassle";

-		next;

-		mes "[Zelmeto]";

-		mes "Thank you so much for";

-		mes "your help. Without you,";

-		mes "I'm pretty sure we wouldn't";

-		mes "know about these problems";

-		mes "until it was too late.";

-		next;

-		mes "[Zelmeto]";

-		mes "Now, I've got to make sure";

-		mes "we have enough materials";

-		mes "to make the repairs so that";

-		mes "the machines will be safely";

-		mes "functioning again.";

-		next;

-		mes "[Zelmeto]";

-		mes "First, I better";

-		mes "hurry and request";

-		mes "an increase for the";

-		mes "Factory Repair budget";

-		mes "from our superintendant.";

-		set EinFactory,13;

-		close;

-		break;

-

-	case 13:

-		mes "[Zelmeto]";

-		mes "I've got to report this";

-		mes "to our superintendant";

-		mes "as soon as possible.";

-		next;

-		mes "[Zelmeto]";

-		mes "With any luck, he'll approve";

-		mes "a budget increase so that we";

-		mes "can get all of the materials";

-		mes "needed for the repairs.";

-		close;

-		break;

-

-	case 14:

-		mes "[Zelmeto]";

-		mes "...";

-		mes "......";

-		next;

-		mes "[Zelmeto]";

-		mes "^6A6A6A*Sigh*^000000";

-		mes "My proposal was rejected";

-		mes "by our superintendant. But";

-		mes "maintainance and repairs";

-		mes "are crucial for peak operating";

-		mes "efficiency and worker safety!";

-		next;

-		mes "[Zelmeto]";

-		mes "I'm frustrated and worried.";

-		mes "Maybe nothing will happen";

-		mes "for now, but we've got to";

-		mes "safeguard our future by";

-		mes "regularly maintaining";

-		mes "all of these machines";

-		next;

-		mes "[Zelmeto]";

-		mes "Even possible threats";

-		mes "to the safety of our workers";

-		mes "can't be ignored. Isn't there";

-		mes "something I can do? ^6A6A6A*Sigh*^000000";

-		next;

-		mes "[Zelmeto]";

-		mes "If we can";

-		mes "just get";

-		mes "20 ^FF0000Flexible Tube^000000,";

-		mes "10 ^FF0000Rusty Screw^000000 and";

-		mes "10 ^FF0000Used Iron Plate^000000,";

-		mes "we could make those repairs.";	

-		next;

-		mes "[Zelmeto]";

-		mes "But without funds, there's";

-		mes "no way we can purchase";

-		mes "those items. If something";

-		mes "happens, who's going to";

-		mes "be responsible?";

-		set EinFactory,15;

-		close;

-		break;

-

-	case 15:

-		mes "[Zelmeto]";

-		if(countitem(7325) < 20 || countitem(7317) < 10 || countitem(7319) < 10){

-			mes "We need";

-			mes "at least";

-			mes "20 ^FF0000Flexible Tube^000000,";

-			mes "10 ^FF0000Rusty Screw^000000 and";

-			mes "10 ^FF0000Used Iron Plate^000000,";

-			mes "to repair this factory.";

-			next;

-			mes "[Zelmeto]";

-			mes "^6A6A6A*Sigh*^000000";

-			mes "But there's no way";

-			mes "we can get all of those";

-			mes "things. Our budget isn't";

-			mes "big enough to cover it.";

-			close;

-		}

-		mes "Ah, it's you again.";

-		mes "It's shameful letting";

-		mes "other people know about";

-		mes "our miserable situation...";

-		next;

-		mes "[Zelmeto]";

-		mes "There's nothing";

-		mes "worth seeing here,";

-		mes "so there really isn't";

-		mes "a point in you coming to";

-		mes "visit this place anymore.";

-		next;

-		menu "Give him the materials.",s_Give,"Huh.",-;

-

-		mes "[Zelmeto]";

-		mes "^6A6A6A*Sigh*^000000";

-		mes "I'm really worried";

-		mes "about this factory's";

-		mes "future. What is our";

-		mes "superintendant thinking...?";

-		close;

-

-	s_Give:	

-		mes "[Zelmeto]";

-		mes "...Hm?";

-		mes "Aren't these the";

-		mes "materials we need";

-		mes "to make repairs in";

-		mes "the factory? How did";

-		mes "you find all of these?";

-		next;

-		if(countitem(7325) < 20 || countitem(7317) < 10 || countitem(7319) < 10)close;

-		delitem 7325,20;

-		delitem 7317,10;

-		delitem 7319,10;

-		set EinFactory,16;

-		set $EinPolution,$EinPolution+1;

-		if(BaseLevel < 41) set BaseExp,BaseExp+615;

-		else if(BaseLevel >= 41 && BaseLevel < 51) set BaseExp,BaseExp+3075;

-		else if(BaseLevel >= 51 && BaseLevel < 61) set BaseExp,BaseExp+6604;

-		else if(BaseLevel >= 61 && BaseLevel < 71) set BaseExp,BaseExp+18508;

-		else if(BaseLevel >= 71 && BaseLevel < 81) set BaseExp,BaseExp+32062;

-		else if(BaseLevel >= 81 && BaseLevel < 91) set BaseExp,BaseExp+76026;

-		else if(BaseLevel >= 91) set BaseExp,BaseExp+290675;

-		mes "[Zelmeto]";

-		mes "I don't know how";

-		mes "I can possible pay you";

-		mes "back for this great favor.";

-		mes "I appreciate that you've";

-		mes "stepped forward to help us.";

-		next;

-		mes "[Zelmeto]";

-		mes "Oh...!";

-		mes "In my years of managing,";

-		mes "I've learned the ultimate";

-		mes "motivation techniques. Let";

-		mes "me enhance your motivation";

-		mes "to show you my gratitude.";

-		next;

-		mes "[Zelmeto]";

-		mes "Now...";

-		mes "Just open your mind";

-		mes "and listen to my words";

-		mes "of encouragement";

-		mes "and inspiration...";

-		next;

-		mes "[Zelmeto]";

-		mes "^3131FFWhen the going";

-		mes "gets rough, you've";

-		mes "gotta get rougher!";

-		mes "You gotta climb that";

-		mes "mountain 'cause no one's";

-		mes "gonna climb it for you!";

-		next;

-		mes "[Zelmeto]";

-		mes "^3131FFDon't give it up!";

-		mes "Go for broke!";

-		mes "Losers are quitters";

-		mes "and quitters are losers!";

-		next;

-		mes "[Zelmeto]";

-		mes "^6A6A6A*Whew*";

-		mes "^000000I haven't given that much";

-		mes "inspiration in a while, but";

-		mes "your help was well worth it.";

-		mes "I'm going to start  the repairs, but";

-		mes "once again I'd like to thank you.";

-		close;

-		break;

-

-	case 16:

-		mes "[Zelmeto]";

-		mes "We'll be putting good";

-		mes "use to the materials you";

-		mes "gave me. With your help,";

-		mes "our factory will operate";

-		mes "safely. At least, for just";

-		mes "a little while longer.";

-		close;

-	}	

-}

-

-ein_in01.gat,50,232,4	script	2nd Control Panel	111,{

-

-	if(EinFactory == 1){

-		mes "^3131FFIt's the 2nd control panel";

-		mes "Zelmeto asked you to inspect.";

-		mes "it looks totally broken: screws";

-		mes "are missing, and the iron cover";

-		mes "has been bent open, revealing";

-		mes "a tangled mess of wires inside.";

-		set EinFactory,2;

-		close;

-	}

-	end;

-}

-

-ein_in01.gat,108,217,4	script	3rd Pressure Governor	111,{

-

-	if(EinFactory == 3){

-		mes "^3131FFAt first glance, this";

-		mes "pressure governor looks";

-		mes "perfectly fine. But after you";

-		mes "check it more carefully, you";

-		mes "find that it's making strange";

-		mes "grinding noises and a few of";

-		mes "the surface screws are loose.";

-		set EinFactory,4;

-		close;

-	}

-	end;

-}

-

-ein_in01.gat,61,259,4	script	Main Control Panel	111,{

-

-	if(EinFactory == 5){

-		mes "^3131FFThe main control panel";

-		mes "doesn't look like it has";

-		mes "any problems. But after";

-		mes "tapping on its surface,";

-		mes "you hear a disheartening";

-		mes "hollow sound. It looks like";

-		mes "it's missing some parts...";

-		set EinFactory,6;

-		close;

-	}

-	end;

-}

-

-ein_in01.gat,47,197,4	script	Conveyor#01	111,{

-

-	if(EinFactory == 7){

-		mes "^3131FFThe conveyor's movements";

-		mes "look jittery and clumsy. The";

-		mes "mechanical arm also doesn't";

-		mes "look powerful enough to bear";

-		mes "the loads that it's carrying. The";

-		mes "screws in the conveyor look";

-		mes "loose and rusted over.";

-		set EinFactory,8;

-		close;

-	}

-	end;

-}

-

-ein_in01.gat,100,267,4	script	Pipe	111,{

-

-	if(EinFactory == 9){

-		mes "^3131FFThe inspection of this";

-		mes "pipe didn't take very long.";

-		mes "It's bloated and worn out";

-		mes "from long durations of";

-		mes "being overloaded with";

-		mes "pressure. It's a wonder";

-		mes "it hasn't exploded yet.";

-		set EinFactory,10;

-		close;

-	}

-	end;

-}

-

-ein_in01.gat,95,238,4	script	Conveyor#02	111,{

-

-	if(EinFactory == 11){

-		mes "^3131FFThis conveyor seems";

-		mes "to have similiar problems";

-		mes "as its smaller version. Its";

-		mes "movements are awkward,";

-		mes "erratic and weak, and almost";

-		mes "all of its screws are rusted.";

-		set EinFactory,12;

-		close;

-	}

-	end;

-}

-//============================================================

-//=============================================== Einbroch Uwe

-//====================================================== Quest

-einbroch.gat,215,180,5	script	Uwe Kleine	85,{

-

-	if(EinUwe == 2)goto s_Cont2;

-	if(EinUwe == 1)goto s_Cont;

-	mes "[Uwe]";

-	mes "Cooking is such a joy~!";

-	mes "The scents, the flavors, the";

-	mes "sensation of sheer ^EFAEBDsatiation^000000...";

-	next;

-	menu "Um, isn't this a forge?",s_Forge,"Ignore him.",-;

-

-	mes "[Uwe]";

-	mes "Cooking begins with";

-	mes "fire and ends with fire.";

-	mes "There's a certain art to";

-	mes "creating fine, delicious";

-	mes "foods to delight the palate~";

-	close;

-

-s_Forge:

-	mes "[Uwe]";

-	mes "Is this a forge?";

-	mes "Oh, sugar honey,";

-	mes "you haven't been here";

-	mes "before, haven't you?";

-	next;

-	mes "[Uwe]";

-	mes "My name is Uwe Kleine";

-	mes "and this is my forge~! I am";

-	mes "the most elegant Blacksmith";

-	mes "and the best chef here in the";

-	mes "Schwartzwald Republic~";

-	next;

-	mes "[Uwe]";

-	mes "So, how can";

-	if(Sex){

-		mes "I help you, you";

-		mes "adoooooooooorable";

-		mes "hunk of a man?";

-	}else{

-		mes "I help you?";

-	}

-	next;

-	menu "Talk about Einbroch",s_Ein,"Ask him to forge a Weapon.",s_Weap,"Master, I want to learn cooking.",s_Cook,"Cancel.",-;

-

-	mes "[Uwe]";

-	mes "Take care,";

-	mes "sugar honey~";

-	mes "Ho ho ho!";

-	close;

-

-s_Ein:

-	mes "[Uwe]";

-	mes "Einbroch was originally";

-	mes "build to support Einbech's";

-	mes "mining efforts. Because it's";

-	mes "small and crowded with people,";

-	mes "there's no room to build the ore";

-	mes "refining factories over there.";

-	next;

-	mes "[Uwe]";

-	mes "Sine Einbroch used to be";

-	mes "an empty lot, it was perfect";

-	mes "for building factories. That's";

-	mes "what my grandfather told me a";

-	mes "long time ago. Anyway, Einbroch";

-	mes "quickly grew into a major city.";

-	next;

-	mes "[Uwe]";

-	mes "Now people think that this";

-	mes "city was never planned to be";

-	mes "just an extension of Einbech.";

-	mes "See that rampart over there?";

-	mes "It doesn't connection to Einbech";

-	mes "at all! No protection for them...";

-	next;

-	mes "[Uwe]";

-	mes "It's like the government";

-	mes "lost all interest in Einbech.";

-	mes "Even the miners there have";

-	mes "been moving here to work in";

-	mes "the factories. But more people";

-	mes "hasn't made this city more lively.";

-	next;

-	mes "[Uwe]";

-	mes "Einbroch may look modern";

-	mes "and exciting now, but soon";

-	mes "you'll see that there's no sign";

-	mes "of warmth or life. So... Just";

-	mes "don't live here in your old age.";

-	next;

-	menu "Then why are you here?",s_WhyHere,"I won't. Thanks for the advice.",-;

-

-	mes "[Uwe]";

-	mes "Oh, that is such";

-	mes "a good decision,";

-	mes "sugar honey! Oh, you";

-	mes "cutie adventurers are";

-	mes "so precious, so lovable.";

-	mes "^111111*Tee hee hee~*^000000";

-	next;

-	mes "[Uwe]";

-	mes "Well, that was";

-	mes "a fun talk. Come";

-	mes "back and visit, 'kay?";

-	mes "I'll miss you until";

-	mes "the next time~";

-	close;

-

-s_WhyHere:

-	mes "[Uwe]";

-	mes "Well, I have some";

-	mes "precious memories of";

-	mes "this place. Once, there was";

-	mes "a man who lived here who";

-	mes "was just like a father to me.";

-	next;

-	mes "[Uwe]";

-	mes "Oh, but I'm sure that";

-	mes "you don't want to hear";

-	mes "about that. Next time you";

-	mes "drop by, we'll talk about";

-	mes "something more fun, 'kay?";

-	mes "Buhbye for now, cutie~";

-	close;

-

-s_Weap:

-	mes "[Uwe]";

-	mes "Well...";

-	mes "I actually just";

-	mes "do smithing work";

-	mes "to create my own";

-	mes "cooking tools.";

-	next;

-	mes "[Uwe]";

-	mes "Oh, I understand";

-	mes "that somebody needs";

-	mes "to fight the monsters,";

-	mes "but I'm the wrong person";

-	mes "to ask for forging weapons.";

-	mes "I... am a strict pacifist~";

-	next;

-	mes "[Uwe]";

-	mes "Just go look";

-	mes "around for a little";

-	mes "bit, I'm sure you'll";

-	mes "find a Blacksmith";

-	mes "who's willing to forge";

-	mes "you a good weapon~";

-	close;

-

-s_Cook:

-	mes "[Uwe]";

-	mes "Mm...?";

-	mes "Did you just";

-	mes "say that you";

-	mes "want to learn";

-	mes "the art of cooking?";

-	next;

-	mes "[Uwe]";

-	mes "I'm sorry, but I can't";

-	mes "really give culinary";

-	mes "lessons. But I will";

-	mes "give good advice for";

-	mes "hopeful beginners.";

-	next;

-	mes "[Uwe]";

-	mes "Now...";

-	mes "For your tuiton";

-	mes "I'll need-- Gosh,";

-	mes "there's just so many";

-	mes "things. Get some paper,";

-	mes "and a pen for this list...";

-	next;

-	mes "[Uwe]";

-	mes "Just kidding!";

-	mes "^111111*Titter~* ^000000I don't need";

-	mes "much to make some";

-	mes "cooking utensils. Bring";

-	mes "6 ^0000FFLarge Jellopies^000000. That's it!";

-	next;

-	mes "[Uwe]";

-	mes "In return, I will give you";

-	mes "1 Coal and some useful";

-	mes "cooking advice for novices.";

-	mes "I give this advice for free to";

-	mes "my smithing colleages, though.";

-	next;

-	mes "[Uwe]";

-	mes "Why ^EFAEBDdon't^000000 you";

-	mes "become a Blacksmith?";

-	mes "I'm much more confident";

-	mes "in that field. ^111111*Tee hee~*^000000";

-	next;

-	mes "[Uwe]";

-	mes "Well, I'll be";

-	mes "waiting right";

-	mes "here until you";

-	mes "come back.";

-	mes "^111111...*Tee hee~*";

-	set EinUwe,1;

-	close;

-

-s_Cont:

-	mes "[Uwe]";

-	mes "Oh hello hello~";

-	mes "It's been a long";

-	mes "time since we've talked,";

-	mes "you cutie adventurer~";

-	next;

-	mes "[Uwe]";

-	mes "So, sugar honey,";

-	mes "how is it going with";

-	mes "the little favor I asked";

-	mes "you about last time?";

-	mes "Did you already forget";

-	mes "the 6 Large Jellopies?";

-	next;

-	menu "Talk about Einbroch",s_Ein,"Ask him to forge a Weapon.",s_Weap,"Give him the Materials.",s_Material,"Cancel.",-;

-

-s_Material:

-	mes "[Uwe]";

-	if(countitem(7126) < 6){

-		mes "Huh...?";

-		mes "You brought";

-		if(countitem(7126))

-			mes "only " + countitem(7126) + " of them?";

-		else

-			mes "none at all...?";

-		mes "Next time, be sure";

-		mes "to bring 6 Large Jellopies,";

-		mes "okay? Don't forget, cutie~";

-		close;

-	}

-	delitem 7126,6;

-	getitem 1003,1;

-	set EinUwe,2;

-	mes "Thank you ^EFAEBDso^000000 much!";

-	mes "Here's the Coal I promised~";

-	next;

-	mes "[Uwe]";

-	mes "Now, I can't teach you everything";

-	mes "about cooking, but I will give you";

-	mes "some good advice for beginners.";

-	mes "I hope you pay attnetion, sugar";

-	mes "honey. Now what would you like";

-	mes "to hear more about? Hmm...?";

-	next;

-s_Menu3:

-	menu "Heart",s_Heart,"Ingredients",s_Ingredients,"Skills",s_Skills,"Tools",s_Tools,"Cancel.",-;

-

-	mes "[Uwe]";

-	mes "Take care,";

-	mes "sugar honey~";

-	mes "Ho ho ho!";

-	close;

-

-s_Heart:

-	mes "[Uwe]";

-	mes "Ah, heart. Just like forging,";

-	mes "you need passion and desire";

-	mes "to create something special.";

-	mes "Every smith and cook knows that";

-	mes "you can do anything if you have";

-	mes "the will and the commitments.";

-	next;

-	mes "[Uwe]";

-	mes "Well, that's all";

-	mes "I really have to";

-	mes "say about that. But";

-	mes "come back and chat";

-	mes "whenever you please.";

-	mes "...Behbie~";

-	close;

-

-s_Ingredients:

-	mes "[Uwe]";

-	mes "Now, for beginners,";

-	mes "learning to select";

-	mes "and use ingredients";

-	mes "is one of the most";

-	mes "important fundamentals.";

-	next;

-	mes "[Uwe]";

-	mes "Cooking is like forging";

-	mes "since specific ingredients";

-	mes "are needed to make specialty";

-	mes "items or dishes. You can't just";

-	mes "skip them if you really need";

-	mes "them, right? Right!";

-	next;

-	mes "[Uwe]";

-	mes "Once you make up your";

-	mes "mind to do something,";

-	mes "focus on finishing it, 'kay?";

-	mes "Never cut corners and always";

-	mes "dedicate yourself to make the";

-	mes "very best finished product~";

-	next;

-	mes "[Uwe]";

-	mes "Well, that was";

-	mes "a fun talk. Come";

-	mes "back and visit, 'kay?";

-	mes "I'll miss you until";

-	mes "the next time~";

-	mes "...Ho ho~";

-	close;

-

-s_Skills:

-	mes "[Uwe]";

-	mes "When you're beginning to learn";

-	mes "skills, you can't let yourself be";

-	mes "discouraged! Practice makes";

-	mes "perfect, you know? But never";

-	mes "use your lack of skills as an";

-	mes "excuse if you happen to fail...";

-	next;

-	mes "[Uwe]";

-	mes "Effort is also an essential";

-	mes "in forging and cooking! Now,";

-	mes "on the oher hand, if you put";

-	mes "in all the effort but didn't learn";

-	mes "any of the skills, you'll still get";

-	mes "nowhere fast, right? Right!";

-	next;

-	mes "[Uwe]";

-	mes "The key is to always";

-	mes "give 100% effort and work";

-	mes "on improving your skills.";

-	mes "Before you know it, you'll";

-	mes "be a respected master!";

-	next;

-	mes "[Uwe]";

-	mes "Well, that was";

-	mes "a fun talk. Come";

-	mes "back and visit, 'kay?";

-	mes "I'll miss you until";

-	mes "the next time~";

-	mes "...Ho ho~";

-	close;

-

-s_Tools:

-	mes "[Uwe]";

-	mes "Cooking is a little";

-	mes "easier if you have";

-	mes "nicer tools to use,";

-	mes "but that's it. Tools by";

-	mes "themselves can't make";

-	mes "just anybody a master.";

-	next;

-	mes "[Uwe]";

-	mes "In the end, the best";

-	mes "tools are the ones you're";

-	mes "most comfortable with using.";

-	mes "In fact, I still use the old knife";

-	mes "I used back when I was just";

-	mes "a little novice chef~";

-	next;

-	mes "[Uwe]";

-	mes "Well, that was";

-	mes "a fun talk. Come";

-	mes "back and visit, 'kay?";

-	mes "I'll miss you until";

-	mes "the next time~";

-	mes "...Ho ho~";

-	close; 

-

-s_Cont2:

-	mes "[Uwe]";

-	mes "Ah, hello again,";

-	mes "cutie adventurer.";

-	mes "How can I help you?";

-	next;

-	menu "Talk about Einbroch",s_Ein,"Ask him to forge a Weapon.",s_Weap,"Talk about Cooking.",s_Cooking,"Cancel.",-;	

-

-	mes "[Uwe]";

-	mes "Take care,";

-	mes "sugar honey~";

-	mes "Ho ho ho!";

-	close;

-

-s_Cooking:

-	mes "[Uwe]";

-	mes "Ooh, cooking!";

-	mes "So what did you";

-	mes "want to ask me...?";

-	next;

-	goto s_Menu3;

-

-OnHide:

-	specialeffect 16;

-	disablenpc "Uwe Kleine";

-	end;

-

-OnUnhide:

-	misceffect 215;

-	end;

-

+//===== eAthena Script ======================================= 
+//= Quest NPCs related to Einbroch and Einbech
+//===== By: ================================================== 
+//= Evera and The eAthena Dev Team
+//===== Current Version: ===================================== 
+//= 1.5.2
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//= Shinokas Quest, Einbroch Lover Quest, Factory Quest,
+//= Uwe Quest.
+//===== Additional Comments: ================================= 
+//= 1.0 Initial Release [Evera]
+//= 1.1 Added more quests [Evera]
+//= 1.2 Added quest bits from Einbech and renamed file to
+//=	quests_ein.txt [Evera]
+//= 1.3 Implemented the polution quest. [MasterOfMuppets]
+//= 1.4.1 Massive bugfix. Fixed Pollution exploit [Lupus]
+//= 1.4.2 Fixed Khowropher bug [Lupus]
+//= 1.5 Fixed double levelup bug [Lupus]
+//= 1.5.1 Fixed exploit [KarLaeda]
+//= 1.5.2 Updated Shino Quest to leave no grabage vars [Lupus]
+//============================================================ 
+
+
+//============================================================
+//=================================================== Shinokas
+//====================================================== Quest
+
+ein_in01.gat,231,163,1	script	Sick Old Man	849,6,6,{
+	switch(Shinokas_Quest){
+	case 9:
+		mes "^3131FFShinokas's";
+		mes "body has grown";
+		mes "cold to the tough.";
+		close;
+	case 8:
+		mes "["+strcharinfo(0)+"]";
+		mes "Shinokas,";
+		mes "I found something!";
+		next;
+		mes "[Shinokas]";
+		mes "You...";
+		mes "Came... back...";
+		mes "Even... if... it's";
+		mes "already... Too late.";
+		mes "*Couhg Cough*";
+		next;
+	 	mes "^3131FFYou help Shinokas";
+	 	mes "sit up, but find that";
+		mes "your hands have been";
+		mes "stained with his blood.^000000";
+		next;
+		mes "["+strcharinfo(0)+"]";
+		mes "Blood...?!";
+		mes "Shinokas!";
+		mes "Who did this to you?";
+		mes "W-we need to call for help!";
+		next;
+		mes "[Shinokas]";
+		mes "No...";
+		mes "It's already";
+		mes "too late for me.";
+		mes "I should have died";
+		mes "a long time ago...";
+		next;
+		mes "[Shinokas]";
+		mes "*Cough*";
+		mes "I only regret that";
+		mes "I've never been able";
+		mes "to apologize to my";
+		mes "friends... *Cough!*";
+		next;
+		mes "[Shinokas]";
+		mes "But did you";
+		mes "find out? D-did";
+		mes "you find out what's";
+		mes "so special about";
+		mes "that ore? W-what";
+		mes "is it... Really?";
+		next;
+		mes "["+strcharinfo(0)+"]";
+		mes "It was...";
+		next;
+		input @text$;
+		mes "^0000FF"+@text$+"^000000!";
+		next;
+		mes "[Shinokas]";
+		mes "W-wait...!";
+		mes "What did...";
+		mes "I can't underst--";
+		mes "*Couhgh cough!*";
+		next;
+		mes "["+strcharinfo(0)+"]";
+		mes "No...!";
+		mes "Tell me who";
+		mes "did this to you!";
+		mes "Where are they?";
+		mes "Speak to me, please!";
+		next;
+		mes "[Shinokas]";
+		mes "W-wha...?";
+		mes "I told you.";
+		mes "Th-they we--";
+		next;
+		mes "[Shinokas]";
+		mes "...";
+		mes "......";
+		next;
+		mes "["+strcharinfo(0)+"]";
+		mes "No!";
+		mes "Shinokas!";
+		mes "Why, God?";
+		mes "Why...";
+		set Shinokas_Quest,9;
+		close;
+	case 7:
+		mes "[Shinokas]";
+		mes "...";
+		mes "......";
+		close;
+	case 6:
+		mes "[Shinokas]";
+		mes "So...?";
+		mes "Did you learn";
+		mes "anything new";
+		mes "in the Factory?";
+		next;
+		mes "["+strcharinfo(0)+"]";
+		if(EinFactory != 16){
+			mes "I haven't went there";
+			mes "yet.";
+			next;
+			mes "[Shinokas]";
+			mes "Then why did you come";
+			mes "back? Go and investigate";
+			mes "the factory now.";
+			close;
+		}
+		mes "Well...";
+		mes "There's a lot of";
+		mes "suspicious business";
+		mes "in the factory, but I don't";
+		mes "think any of it is related";
+		mes "to that ore you mentioned.";
+		next;
+		mes "[Shinokas]";
+		mes "Damn it...";
+		mes "Then where did";
+		mes "they hide it? Where";
+		mes "do you think that";
+		mes "ore might be?";
+		next;
+		while(1){
+			switch(select("Airport:Factory:Train Station:Airship Repairshop:Laboratory")){
+			case 1: //airport
+				mes "[Shinokas]";
+				mes "No...";
+				mes "The Airport is always";
+				mes "crowded with people.";
+				mes "It'd be a bad idea to hide";
+				mes "something so important";
+				mes "in that kind of place.";
+				next;
+				break;
+			case 2: //factory
+				mes "[Shinokas]";
+				mes "Didn't you just";
+				mes "check the factory?";
+				mes "You couldn't find";
+				mes "any clues to the";
+				mes "ore over there...";
+				next;
+				break;
+			case 3: //train
+				mes "[Shinokas]";
+				mes "Hmm...";
+				mes "People are always going";
+				mes "in and out of the Train Station.";
+				mes "It's not the best place to hide";
+				mes "something as important as the ore.";
+				next;
+				break;
+			case 4: //repairshop
+				mes "The Airship? Hm, it does";
+				mes "fly through some mysterious";
+				mes "power... But I already checked";
+				mes "the Airship Replairshop myself.";
+				mes "I haven't found any trace of";
+				mes "the ore over there.";
+				next;
+				break;
+			case 5: //Laboratory
+				mes "[Shinokas]";
+				mes "...!";
+				mes "Yes. Yes...!";
+				mes "That could be it!";
+				mes "Why didn't I think";
+				mes "about the Laboratory?";
+				mes "It makes so much sense!";
+				next;
+				mes "[Shinokas]";
+				mes "I have a good feeling";
+				mes "about this. Please sneak";
+				mes "into that Laboratory and";
+				mes "see if you can find the ore!";
+				next;
+				mes "[Shinokas]";
+				mes "Remember...";
+				mes "Not just anybody";
+				mes "can enter that kind";
+				mes "of place. But I'm sure";
+				mes "you'll figure something out.";
+				set Shinokas_Quest,7;
+				close;
+			}
+		}
+	case 5:
+		mes "[Shinokas]";
+		mes "So, did you find";
+		mes "anything from the";
+		mes "Kapellthaines?";
+		next;
+		mes "["+strcharinfo(0)+"]";
+		mes "Well, Mr. Kapelltheine";
+		mes "is kind of violent, but";
+		mes "I didn't find anything";
+		mes "really suspicious.";
+		next;
+		mes "[Shinokas]";
+		mes "Huh...";
+		mes "I must have";
+		mes "been wrong, then...";
+		mes "Where else could it be?";
+		next;
+		mes "[Shinokas]";
+		mes "Oh, right! The huge";
+		mes "factory in Einbroch!";
+		mes "What could be more";
+		mes "suspicious? There's a ton";
+		mes "of workers, but no one really";
+		mes "knows what they do there...";
+		next;
+		mes "[Shinokas]";
+		mes "If they're so secretive";
+		mes "it's possible that they're";
+		mes "keeping the ore over there.";
+		mes "Please go and search the";
+		mes "Factory for that ore as";
+		mes "soon as you can.";
+		set Shinokas_Quest,6;
+		close;
+	case 4:
+		mes "[Shinokas]";
+		mes "Please...";
+		mes "Find out if the Kapelltheines";
+		mes "are keeping some kind of unique";
+		mes "ore. Their manor is on the road";
+		mes "that leads to the Airport.";
+		close;
+	}
+	//Shinokas_Quest = 0 1 2 3 10
+	mes "[Sick Old Man]";
+	mes "...!";
+	next;
+	mes "[Sick Old Man]";
+	mes "Awwwk~";
+	mes "It's killing me!";
+	mes "Arrrgh! Awwwrgh!";
+	mes "W-when will my son";
+	mes "come back from";
+	mes "the factory...?!";
+	next;
+	if(Shinokas_Quest != 3){
+		mes "^3131FFYou feel really awkward";
+		mes "just staring at this old";
+		mes "man violently rolling";
+		mes "around in his bed.";
+		close;
+	}
+	//Shinokas_Quest = 3
+	mes "["+strcharinfo(0)+"]";
+	mes "Shi...";
+	mes "Shinokas?";
+	next;
+	mes "[Sick Old Man]";
+	mes "Huh...?";
+	mes "Noooo! My name is";
+	mes "Shinotarous. Y-you've";
+	mes "got the wrong person!";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "This has to be the";
+	mes "Shinokas that Hikeman";
+	mes "was talking about in Einbech";
+	mes "Hmmm, but how can I get";
+	mes "him to admit it?";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "*Ahem!*";
+	mes "Excuse me...";
+	next;
+	while(1){
+		switch(select("Remember the mine tunnel collapse?:Didn't you used to be a miner?:Have you lived in Einbroch all your life?")){
+		case 1: //remember
+			if(@shinqst2 > 4 || @shinqst3 > 4) goto L_Cont;
+			mes "[Sick Old Man]";
+			mes "Noooo!";
+			mes "I don't know";
+			mes "what the hell";
+			mes "you're talking";
+			mes "about!";
+			next;	
+			break;
+		case 2: //miner
+			if(@shinqst2 > 1)goto s_Quest2;
+			mes "[Sick Old Man]";
+			mes "Noooo...!";
+		 	mes "W-why would you";
+			mes "even ask me that";
+			mes "kind of question?!";
+		s_Quest2:
+			set @shinqst2,@shinqst2 + 1;
+			if(@shinqst3)set @shinqst3,0;
+			next;
+			break;
+
+		case 3: //einbroch
+			if(@shinqst3 > 1)goto s_Quest3;
+			mes "[Sick Old Man]";
+			mes "Y-yes!";
+			mes "Born and raised";
+			mes "raised here in";
+			mes "Einbe--Einbroch!";
+			next;
+			mes "^3131FFIt doesn't seem";
+			mes "like this old man";
+			mes "is telling the truth...";
+		s_Quest3:
+			set @shinqst3,@shinqst3 + 1;
+			if(@shinqst2)set @shinqst2,0;
+			next;
+			break;
+		}
+	}
+	
+L_Cont:
+	mes "[Shinokas]";
+	mes "Hmm...";
+	mes "^0000FFBuender Hikeman^000000...";
+	next;
+	mes "[Shinokas]";
+	mes "No!";
+	mes "I've never met";
+	mes "Buender Hikeman";
+	mes "in my entire li--";
+	next;
+	mes "[Shinokas]";
+	mes "...";
+	mes "......";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "I was right!";
+	mes "You're Shinokas!";
+	next;
+	mes "[Shinokas]";
+	mes "Curses!";
+	mes "I've blown";
+	mes "my cover!";
+	mes "W-wait! How much";
+	mes "do you know?!";
+	next;
+	mes "[Shinokas]";
+	mes "Did ^0000FFthey^000000 send you?";
+	mes "*Sigh* I think that this";
+	mes "is it. I'll never be";
+	mes "able to solve the";
+	mes "secret before I die.";
+	next;
+	mes "[Shinokas]";
+	mes "Okay.";
+	mes "Get on with it.";
+	mes "I'm ready now...";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Tell me everything";
+	mes "you know related to";
+	mes "that incident where";
+	mes "the mine tunnel";
+	mes "collapsed around";
+	mes "you and Hikeman.";
+	next;
+	mes "[Shinokas]";
+	mes "...?";
+	mes "Errr....";
+	mes "You're not";
+	mes "here to kill me?";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "No...!";
+	mes "I'm here to find";
+	mes "out the truth";
+	next;
+	mes "[Shinokas]";
+	mes "That means...";
+	mes "I still have some time.";
+	mes "This must be destiny!";
+	mes "Allright, I'll tell you what";
+	mes "happened. But it's a";
+	mes "long story...";
+	next;
+	mes "[Shinokas]";
+	mes "How much do you know";
+	mes "about the accident? No,";
+	mes "wait. Don't answer that.";
+	mes "I don't want to hear it";
+	next;
+	mes "[Shinokas]";
+	mes "I admit it. Yes.";
+	mes "I stabbed my friends";
+	mes "in the back. It was an";
+	mes "unforgivable sin that will";
+	mes "haunt me untill the day that I die";
+	next;
+	mes "[Shinokas]";
+	mes "I sold out my friends for";
+	mes "money. I destroyed that";
+	mes "tunnel and killed them. But";
+	mes "I suppose I was tricked as well.";
+	mes "^0000FFThey^000000 never intended to keep";
+	mes "their end of our agreement.";
+	next;
+	mes "[Shinokas]";
+	mes "After I destroyed the tunnel,";
+	mes "they targeted me and I ended";
+	mes "spending the rest of my life being";
+	mes "pursued and running for place to";
+	mes "place. What the hell was that ^0000FFore^000000";
+	mes "and why was it so important?";
+	next;
+	mes "[Shinokas]";
+	mes "I need to know more about";
+	mes "that ore if it's worth killing for.";
+	mes "That's why I've risked sneaking";
+	mes "into Einbroch. Sopposedly, an ore";
+	mes "similar to the ore we found has";
+	mes "been transported here recently";
+	next;
+	menu "Did you find it?",-;
+	mes "[Shinokas]";
+	mes "No, not yet.";
+	mes "I've been searching";
+	mes "for that ore every night.";
+	mes "During the day, this kind";
+	mes "blacksmith has managed";
+	mes "to hide me from those men";
+	next;
+	mes "[Shinokas]";
+	mes "But I won't be safe";
+	mes "for very long. Look, I'm";
+	mes "no saint, but before I die,";
+	mes "I wanna do this one last";
+	mes "thing and see what's so";
+	mes "great about this ore...";
+	next;
+	menu "Wait, who's trying to get you?",-;
+	mes "[Shinokas]";
+	mes "Who's trying to kill me?";
+	mes "The people who hired me and";
+	mes "my friends to dig up that ore in";
+	mes "the first place. We thought they";
+	mes "were ordinary businessmen,";
+	mes "but... They're dangerous.";
+	next;
+	mes "[Shinokas]";
+	mes "So I told you everything";
+	mes "and now you know that my";
+	mes "day might be numbered.";
+	mes "Please do an old man a favor";
+	mes "and search Einbroch for that";
+	mes "strange, mysterious ore.";
+	next;
+	mes "[Shinokas]";
+	mes "Now, the first thing I learned";
+	mes "in this tows is that the richest";
+	mes "family is the Kapelltheines. Only";
+	mes "the rich and powerful can possibly";
+	mes "be involved in something so big.";
+	next;
+	mes "[Shinokas]";
+	mes "Would you search";
+	mes "Kappelltheine Manor";
+	mes "for that ore? It's on the way";
+	mes "to the Airport and it shouldn't be";
+	mes "hard to miss. They're the richest";
+	mes "people in Einbroch, after all.";
+	next;
+	mes "[Shinokas]";
+	mes "I'm too old and weak to leave";
+	mes "this house, and there's the change";
+	mes "that those men will find me. If you";
+	mes "can sympathize with my situation,";
+	mes "please find out if the Kapelltheine";
+	mes "family has any unique ores...";
+	set Shinokas_Quest,4;
+	close;
+
+OnTouch:
+	if(Shinokas_Quest != 8) end;
+	mes "^3131FFThe open window rattles";
+	mes "as you enter the room and";
+	mes "are welcomed by a sudden";
+	mes "chill. A trail of red footprints";
+	mes "lies near your feet.";
+	next;
+	mes "^3131FFA grey sheet lies";
+	mes "rumpled on the bed,";
+	mes "but you can see dark red";
+	mes "stains in between the folds.";
+	close;
+}	
+
+ein_in01.gat,32,133,6	script	Maid	850,{
+	mes "[Maid]";
+	if(Shinokas_Quest != 4){
+		mes "There's no end";
+		mes "to all these plates";
+		mes "I have to clean...!";
+		close;
+	}	
+	mes "Did you ask me";
+	mes "if I saw some kind";
+	mes "of ore around here?";
+	mes "That's strange...";
+	next;
+	mes "[Maid]";
+	mes "Will, I've been with";
+	mes "this family for a long";
+	mes "time. Let me assure you";
+	mes "that there's no secrets";
+	mes "from me in this household!";
+	next;
+	mes "[Maid]";
+	mes "I'm sorry, but I don't";
+	mes "think we have any ores,";
+	mes "special or otherwise, here";
+	mes "in the manor. What exactly";
+	mes "do you need them for?";
+	set Shinokas_Quest,5;
+	close;
+}
+
+einbroch.gat,51,52,1	script	lab_warp	45,2,2{
+	if(Shinokas_Quest != 7){
+		mes "^3131FFThe door is locked.";
+		mes "You cannot enter.";
+		close;
+	}
+	mes "[Security System]";
+	mes "^FF0000*Beep Boop*^000000";
+	mes "Restricted Access Area.";
+	mes "Please identify yourself";
+	mes "through the system.";
+	next;
+	switch(select("Identify.:Information:Cancel")){
+		case 1: //Identify
+			break; //continue after switch =\
+		case 2: //information
+			mes "[Security System]";
+			mes "You must use the";
+			mes "security system in order";
+			mes "to gain access into the";
+			mes "Einbroch Laboratory.";
+			next;
+			mes "[Security System]";
+			mes "You will be given";
+			mes "a password that you";
+			mes "must input correctly";
+			mes "withing 60 seconds.";
+			mes "Otherwise, you will";
+			mes "fail the security check.";
+			//hell of a security system ye got there mate
+			//wonder if gravity co has the same sort? xD
+			next;
+			mes "[Security System]";
+			mes "If you take longer";
+			mes "then 3 minutes to";
+			mes "enter the password,";
+			mes "the security system";
+			mes "will initiate lockout.";
+			close;
+		case 3: //cancel
+			mes "[Security System]";
+			mes "You have canceled";
+			mes "the ID security check.";
+			close;
+	}
+	//ID check:
+	mes "[Security System]";
+	mes "Enter the following";
+	mes "password in 60 seconds.";
+	mes "Failure to do so will result";
+	mes "in lockout. Please wait.";
+	next;
+	mes "[Security System]";
+	set @startseconds,gettime(3)*60*60+gettime(2)*60+gettime(1);
+	switch(rand(1,11)){
+	case 1:
+		mes "^00CCFFburrdingdingdilidingdingphoohudaamb";
+		mes "^00CCFFandoora^0000FFbambarambambamburanbamding";
+		input @str$;
+		if(@str$ != "burrdindingdilidingdingphoohudaambandoorabambarambambamburanbamding") goto L_SCFail;
+		goto L_Suc;
+	case 2:
+		mes "^FF33CCbarapaphurarlandreamduranbatuhi^990066wooi";
+		mes "^990066kabamturubamdingding";
+		next;
+		input @str$;
+		if(@str$ != "barapaphurarlandreamduranbatuhiwooikabamturubamdingding") goto L_SCFail;
+		goto L_Suc;
+	case 3:
+		mes "^00CCFFbelief love luck grimace sweat rush";
+		mes "^00CCFFfolktale rodimus optimus burnblebe";
+		input @str$;
+		if(@str$ != "belief love luck grimace sweat rush folktale rodimus optimus burnblebe") goto L_SCFail;
+		goto L_Suc;
+	case 4:
+		mes "^FF33CCLiGhTsPeEd RiGhT SPEed leFT TURn";
+		mes "^FF33CCRiGhT BuRn OrIGInAL GaNgSteR SmACk";
+		input @str$;
+		if(@str$ != "LiGhTsPeEd RiGhT SPEed leFT TURn RiGhT BuRn OrIGInAL GaNgSteR SmACk") goto L_SCFail;
+		goto L_Suc;
+	case 5:
+		mes "^00CCFFCoboman no chikara-yumei na";
+		mes "^00CCFFchikara-daiookii na chikara da ze!";
+		mes "^00CCFFCOBO ON";
+		input @str$;
+		if(@str$ != "Coboman no chikara-yumei na chikara-daiookii na chikara da ze! COBO ON") goto L_SCFail;
+		goto L_Suc;
+	case 6:
+		mes "^FF33CChfjdkeldjs^990066hfjdjeiskdlefvbd";
+		input @str$;
+		if(@str$ != "hfjdkeldjshfjdjeiskdlefvbd") goto L_SCFail;
+		goto L_Suc;
+	case 7:
+		mes "^00CCFFI'm the King of all Weirdos! Now";
+		mes "^00CCFFyou know of my true power. Obey~!";
+		input @str$;
+		if(@str$ != "I'm the King of all Weirdos! Now you know of my true power. Obey~!") goto L_SCFail;
+		goto L_Suc;
+	case 8:
+		mes "^990066uNflAPPaBLe LoVaBLe SeCreTs AnD";
+		mes "^990066BoWLiNg aGaINST tHe KarMA of YoUtH";
+		input @str$;
+		if(@str$ != "uNflAPPaBLe LoVaBLe SeCreTs AnD BoWLiNg aGaINST tHe KarMA if YoUtH") goto L_SCFail;
+		goto L_Suc;
+	case 9:
+		mes "^00CCFFBy the power of^000000";
+		mes "^00CCFFp-po-poi-po-poi-poin-poing";
+		mes "^00CCFFGOD-POING. I NEVER LOSE!";
+		input @str$;
+		if(@str$ != "By the power of p-po-poi-po-poi-poin-poing GOD-POING. I NEVER LOSE!") goto L_SCFail;
+		goto L_Suc;
+	case 10:
+		mes "^00CCFF...silence. quiet benevolence...";
+		mes "^00CCFFsoul mate... wonder. enigma...";
+		mes "^00CCFFcloud.^000000";
+		input @str$;
+		if(@str$ != "...silence. quiet benevolence... soul mate... wonder. enigma... cloud") goto L_SCFail;
+		goto L_Suc;
+	case 11:
+		mes "^FF33CCopeN,Open!op3n.openOpen0p3nOpEn0pen";
+		mes "^FF33CC`open'0Pen open?open!111OPENSESAME";
+		input @str$;
+		if(@str$ != "opeN,Open!op3n.openOpenOp3nIoEnOpen`open'0Pen open?open!111OPENSESAME") goto L_SCFail;
+		goto L_Suc;
+	}
+L_Suc:
+	next;
+	set @endtime,gettime(3)*60*60+gettime(2)*60+gettime(1);
+	set @time,@endtime-@startseconds;
+	if(@time > 60) goto L_SC60;
+	mes "[Security System]";
+	mes "It took ^FF0000"+@time+" seconds^000000";
+	mes "for you to enter the";
+	mes "password. Initiating";
+	mes "override. Access granted.";
+	close2;
+	warp "ein_in01.gat",283,25;
+	end;
+	
+L_SC60:
+	mes "[Security System]";
+	mes "Time over.";
+	mes "It took ^FF0000"+@time+" seconds^000000";
+	mes "for you to enter the";
+	mes "password. Initiating";
+	mes "lockout. Access denied.";
+	close;
+	
+L_SCFail:
+	next;
+	mes "[Security System]";
+	mes "You have failed";
+	mes "the identification";
+	mes "check. Access denied.";
+	close;
+}
+einbroch.gat,51,56,6	script	Laboratory Soldier#01	852,{
+	mes "[Laboratory Soldier]";
+	mes "This area is off limits.";
+	mes "Please leave";
+	mes "immediately";
+	close;
+
+OnHide:
+	specialeffect 16;
+	disablenpc "Laboratory Soldier#01";
+	end;
+
+OnUnhide:
+	misceffect 215;
+	end;
+
+}
+einbroch.gat,51,47,6	script	Laboratory Soldier#02	852,{
+	mes "[Laboratory Soldier]";
+	mes "This area is off limits.";
+	mes "Please leave";
+	mes "immediately";
+	close;
+
+OnHide:
+	specialeffect 16;
+	disablenpc "Laboratory Soldier#02";
+	end;
+
+OnUnhide:
+	misceffect 215;
+	end;
+
+}
+ein_in01.gat,254,35,1	script	Scientist	749,{
+	mes "[Scientist]";
+	mes "*Grumble grumble*";
+	next;
+	if(ein_scientist == 1) goto L_P2;
+	mes "[Scientist]";
+	mes "Huh...?";
+	mes "How did you";
+	mes "get in here?";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Oh! Ah...";
+	mes "I'm the new...";
+	mes "Guard. Nice";
+	mes "to meet you.";
+	next;
+	mes "[Scientist]";
+	mes "Oh. Yeah.";
+	mes "Nice-meet-you";
+	mes "..............";
+	mes "*Grumble grumble*";
+	next;
+	if(select("What's wrong?:Catch you later.")==2){
+		 mes "[Scientist]";
+		 mes "Right.";
+		 mes "Yeah.";
+		 mes "Later, man.";
+		 close;
+	}
+	mes "[Scientist]";
+	mes "What's wrong...?!";
+	mes "Oh, don't get me started!";
+	mes "I'm stuck here doing all the";
+	mes "work while the Lab Departement";
+	mes "Head goes out every freakin' day!";
+	next;
+	mes "[Scientist]";
+	mes "While I'm slaving";
+	mes "away here, he's in";
+	mes "that Airship, busy";
+	mes "flirting with that";
+	mes "woman. God...!";
+	mes "I'm like, so teed off!";
+	if(Shinokas_Quest < 8) set ein_scientist,1;
+	close;
+	
+L_P2:
+	mes "[Scientist]";
+	mes "Man alive!";
+	mes "Would it kill the";
+	mes "Department Head";
+	mes "to come in here and do";
+	mes "some work for a change?!";
+	next;
+	mes "[Scientist]";
+	mes "I mean, come on!";
+	mes "I shouldn't have to";
+	mes "carry his workload!";
+	close;
+}
+
+ein_in01.gat,266,26,1	script	Unknown Stuff	111,{
+	mes "^3131FFThere's something";
+	mes "attached to a huge";
+	mes "machine with many cords";
+	mes "and folds of barbed wire";
+	if(Shinokas_Quest < 8) set ein_stuff,1;
+	close;
+}
+
+airplane.gat,31,77,4	script	Drunken Man#03	853,{
+	if(Shinokas_Quest >= 8){
+		mes "[Drunken Man]";
+		mes "Hahahahaha!";
+		mes "You're great!";
+		mes "I feel great!";
+		mes "Everything's great!";
+		mes "Bwahahahaahahah!";
+		mes "*Hiccup*";
+		close;
+	}
+	mes "[Drunken Man]";
+	mes "Okay okay...";
+	mes "Daddy's gonna";
+	mes "win some Apples";
+	mes "this time for sure!";
+	next;
+	if(ein_stuff && ein_scientist){
+		mes "[Drunken Man]";
+		mes "Let's do it!";
+		mes "^3131FFYmir's Heart^000000 is";
+		mes "on my side! GO!";
+		next;
+		mes "["+strcharinfo(0)+"]";
+		mes "Huh...?";
+		mes "What did he just say?";
+		mes "It seemed important!";
+		next;
+	}
+	mes "^0000FF*Rolling and rumbling*^000000";
+	next;
+	mes "[Kaci]";
+	mes "I have a total of ^FF000011^000000";
+	mes "and you have total ^FF00005^000000.";
+	mes "You lose this game. I'm";
+	mes "sorry, but I hope we play";
+	mes "again sometime.";
+	donpcevent "Kaci::OnLose";
+	next;
+	mes "[Drunken Man]";
+	mes "Waaaaaahhhhhhhhh!";
+	mes "Apples! My apples!";
+	mes "Apples, I need more...!";
+	if(countitem(512) && ein_stuff && ein_scientist) goto L_Apples;
+	close;
+	
+L_Apples:
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Do you want";
+	mes "some of mine?";
+	next;
+	if(countitem(512) <100){
+		mes "[Drunken Man]";
+		mes "What...?";
+		mes "I can't do anything";
+		mes "with so few Apples!";
+		mes "I'm a high roller and";
+		mes "this is a high stakes game!";
+		close;
+	}
+	mes "[Drunken Man]";
+	mes "Wha--? Yes...";
+	mes "Hell yes! Gimme";
+	mes "some of your Apples!";
+	mes "Yeeeeeeeeeeehaw!";
+	mes "I'm back, baby!";
+	next;
+	mes "[Drunken Man]";
+	mes "Now, to win!";
+	mes "Daddy needs love...";
+	mes "Time to go from";
+	mes "crappy to classy!";
+	next;
+	mes "^0000FF*Rolling and rumbling*^000000";
+	next;
+	delitem 512,countitem(512);
+	set @kaci,rand(2,12);
+	set @man,rand(2,12);
+	if(@man == @kaci){
+		if(rand(2)){
+			if(@man != 12)
+				set @man,@man+1;
+			else
+				set @man,@man-1;
+		}else{
+			if(@man != 2)
+				set @man,@man-1;
+			else
+				set @man,@man+1;
+		}
+	}
+	mes "[Kaci]";
+	mes "Oooh...";
+	mes "I got a total of ^FF0000"+@kaci+"^000000,";
+	mes "and you have a total of ^FF0000"+@man+"^000000.";
+	if(@man < @kaci){
+		mes "I'm sorry, but you lose";
+		mes "again. Better luck next time...";
+		donpcevent "Kaci::OnLose";
+		next;
+		mes "[Drunken Man]";
+		mes "Waaaaaahhhhhhhhhhhh!";
+		mes "Waaaaaaaahhhhhhh!";
+		close;
+	}
+	mes "Congratulations, you won!";
+	mes "Let me give you your winning";
+	mes "and we'll play again some time~";
+	donpcevent "Kaci::OnWin";
+	next;
+	mes "[Drunken Man]";
+	mes "Mwahhhahahahaha!";
+	mes "Whahahahahahahahaha!";
+	mes "That's why they call me";
+	mes "the 'Resurrection Kid!'";
+	mes "I always come back!";
+	next;
+	mes "[Drunken Man]";
+	mes "Oh yes, right!";
+	mes "You...! You lent";
+	mes "me those lucky";
+	mes "Apples. ^111111*Hiccup*^000000";
+	next;
+	mes "[Drunken Man]";
+	mes "I'm Kurschenburg!";
+	mes "Thanks to you, I'm";
+	mes "on a winning streak!";
+	mes "Hahaha! Th-thank you~";
+	mes "^111111*Hic-hic-hiccup!*^000000";
+	next;
+	if(select("So what was that about Ymir's Heart?:Hehe, you're welcome.")==2){
+		 mes "[Drunken Man]";
+		 mes "Hahahaha!";
+		 mes "You're great!";
+		 mes "And I feel great!";
+		 mes "Bwahahahaahahah!";
+		 mes "^111111*Hiccup*^000000";
+		 close;
+	}
+	mes "[Drunken Man]";
+	mes "What...?";
+	mes "Ymir's Heart?";
+	mes "How do you know";
+	mes "about that? ^111111*Hiccup*^000000";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Y-you...!";
+	mes "You were just yelling,";
+	mes "'Ymir's Heart is on my";
+	mes "side,' while you were";
+	mes "gambling with those Apples!";
+	next;
+	mes "[Drunken Man]";
+	mes "What...?!";
+	mes "No way~";
+	mes "Err...? Did I...?";
+	next;
+	mes "[Drunken Man]";
+	mes "Heh heh...";
+	mes "I'm not really";
+	mes "supposed to be talking";
+	mes "about this. As head of";
+	mes "the Laboratory, I'm sworn";
+	mes "to secrecy about Ymir's Heart.";
+	next;
+	mes "[Drunken Man]";
+	mes "But what do I care?!";
+	mes "All they want are the";
+	mes "results of my research!";
+	mes "They don't appreciate";
+	mes "my work at all! My title";
+	mes "is completely worthless!";
+	next;
+	mes "[Drunken Man]";
+	mes "You don't know how long I've";
+	mes "been imprisoned in the lab and";
+	mes "that the work conditions just get";
+	mes "worse and worse. Screw them! I'll";
+	mes "keep getting paid as long as I show";
+	mes "them some progress in our project!";
+	next;
+	menu "Project?",-;
+	mes "[Drunken Man]";
+	mes "Yeah, we're researching";
+	mes "Ymir's Heart. It was found";
+	mes "a long time ago in ^3131FFEinbech^000000";
+	mes "and it's in our lab now.";
+	next;
+	mes "[Drunken Man]";
+	mes "Everyone knows it's supposed";
+	mes "to hold some legendary power,";
+	mes "but even I was surprised to see";
+	mes "what it was capable of. It's both";
+	mes "terrible and miraculous, scary";
+	mes "and wondrous...";
+	next;
+	mes "[Drunken Man]";
+	mes "So...";
+	mes "I figure...";
+	mes "It may even";
+	mes "have the power to";
+	mes "win me Dice games!";
+	mes "Bwahaha--*Hiccup!*";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "(That thing I saw";
+	mes "hooked up to all those";
+	mes "wires in the Laboratory";
+	mes "must have been a piece";
+	mes "of ^3131FFYmir's Heart^000000. I better";
+	mes "tell Shinokas about this.)";
+	set Shinokas_Quest,8;
+	//cleaning temp variables from the lab.
+	set ein_stuff,0;
+	set ein_scientist,0;
+	close;
+}
+	
+einbech.gat,57,210,4	script	Young Man#04	854,{
+	mes "[Young Man]"; 
+	mes "Behind the pub,";
+	mes "you'll see this old man";
+	mes "who's always mumbling";
+	mes "something to himself.";
+	next;
+	mes "[Young Man]";
+	mes "Sometimes he seems really";
+	mes "angry, but other times he looks";
+	mes "awfully depressed. He must have";
+	mes "lived through some really horrible";
+	mes "experiences. I can't help but feel";
+	mes "really sorry for the old guy.";
+	next;
+	mes "[Young Man]";
+	mes "He says and does";
+	mes "a lot of strange things.";
+	mes "It's sad to see someone";
+	mes "that old act that way, but";
+	mes "it makes me wonder what";
+	mes "could have happened to him.";
+	if(!Shinokas_Quest)set Shinokas_Quest,1;
+	close;
+}
+
+einbech.gat,165,105,7	script	Buender Hikeman	847,{
+	if(Shinokas_Quest >= 9) goto L_P2;
+	if(Shinokas_Quest == 3) goto L_BEST;
+	if(Shinokas_Quest == 2) goto L_BASTARD;
+	mes "[Buender Hikeman]";
+	mes "...";
+	mes "......";
+	if(!Shinokas_Quest)close;
+	next;
+	mes "[Buender Hikeman]";
+	mes "...";
+	mes "......";
+	mes "......You...";
+	next;
+	mes "[Buender Hikeman]";
+	mes "...";
+	mes "......";
+	mes "......You...";
+	mes "......Stop it...";
+	next;
+	mes "[Buender Hikeman]";
+	mes "...";
+	mes "......";
+	mes "......You...";
+	mes "......Stop it...";
+	mes "...You ^FF0000bastard^000000!";
+	next;
+	mes "[Buender Hikeman]";
+	mes "RaaaaAAAARGHHH!!";
+	next;
+	mes "[Buender Hikeman]";
+	mes "^0000FFThe old man seems^000000";
+	mes "^0000FFslightly irked at seeing^000000";
+	mes "^0000FFyou. Unfortunately, his^000000";
+	mes "^0000FFscreaming and rambling^000000";
+	mes "^0000FFis totally incoherent.^000000";
+	next;
+	mes "[Buender Hikeman]";
+	mes "It ^FF0000is^000000 you!";
+	mes "You're responsible!";
+	mes "You've taken everything";
+	mes "away from me!!";
+	next;
+	menu "What are you talking about?",L_WHAT,"Ignore Him.",-;
+	mes "[Buender Hikeman]";
+	mes "W...wait!";
+	mes "I said wait!";
+	mes "*Cough!*";
+	close;
+L_WHAT:
+	mes "[Buender Hikeman]";
+	mes "How dare you...";
+	mes "How dare you treat";
+	mes "after destroying all the";
+	mes "happiness in my life!";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Damn you...";
+	mes "How can you have";
+	mes "the audacity to pretend";
+	mes "as if nothing happened?!";
+	mes "*C-cough Cough...*";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Are you so evil to";
+	mes "just shallowly forget";
+	mes "what you've done to our";
+	mes "lives? Did you already";
+	mes "forget what you did";
+	mes "here in Einbech?!";
+	next;
+	mes "[Buender Hikeman]";
+	mes "It was such a long";
+	mes "time ago, but I'll never";
+	mes "forget. This town was";
+	mes "small, but full of folk";
+	mes "with warm hearts...";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Me, Khartophe, Anuto,";
+	mes "Maskharundt... All of";
+	mes "us were friends hired";
+	mes "by that businessman";
+	mes "to dig up ores in the mine.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "And then there";
+	mes "was you! All of us";
+	mes "put together made the";
+	mes "greatest mining team!";
+	mes "That was, until, we";
+	mes "discovered ^FF0000it^000000.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Yes...";
+	mes "The mysterious ore";
+	mes "that dazzled with a";
+	mes "magnificent light.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "But we should have known";
+	mes "that the ^0000FFUngoliant^000000 would";
+	mes "be arround that ore. We";
+	mes "should have realized";
+	mes "the danger...";
+	next;
+	mes "[Buender Hikeman]";
+	mes "We reported our findings";
+	mes "to our employer, and then";
+	mes "the ore just disappeared. He";
+	mes "must have sent it somewhere,";
+	mes "it was none of our business.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Then life was back";
+	mes "to normal for a while.";
+	mes "But one day you yelled";
+	mes "to us that you had found";
+	mes "another special, mysterious";
+	mes "ore in the mines.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "But when we came";
+	mes "over to check the hole";
+	mes "you dug up, you know";
+	mes "what we found...?!";
+	next;
+	menu "Ungoliant?",L_UNGOLIANT,"A mysterious ore, right?",L_ORE,"Nothing...?",-;
+	mes "[Buender Hikeman]";
+	mes "Yes...";
+	mes "Nothing.";
+	next;
+	goto L_CONTINUE;
+L_UNGOLIANT:
+	mes "[Buender Hikeman]";
+	mes "Don't you remember";
+	mes "what happened? What";
+	mes "you did to us at that time?!";
+	next;
+L_CONTINUE:
+	mes "[Buender Hikeman]";
+	mes "There was nothing";
+	mes "inside the hole!";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Then you pointed to";
+	mes "the wall behind us and";
+	mes "screamed that Ungoliant";
+	mes "was coming! In our panic";
+	mes "we started to dig our way out!";
+	next;
+	mes "[Buender Hikeman]";
+	mes "I remember that the expression on";
+	mes "your face seemed so strange. I had";
+	mes "thought you looked sad, but now I'm";
+	mes "sure you were consumed by greed! We";
+	mes "trusted you and you betrayed us!";
+	next;
+	mes "[Buender Hikeman]";
+	mes "When we finally smashed";
+	mes "down that last wall, everything";
+	mes "started to fall around us. We";
+	mes "were the only two to survive";
+	mes "that tunnel collapse.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Then I learned...";
+	mes "You planned it all along.";
+	if(Shinokas_Quest == 1) set Shinokas_Quest,2;
+	close;
+L_ORE:
+	mes "[Buender Hikeman]";
+	mes "Don't you remember";
+	mes "what happened? What";
+	mes "you did to us at that time?!";
+	next;
+	goto L_CONTINUE;
+L_BASTARD:
+	mes "[Buender Hikeman]";
+	mes "Bastard!";
+	mes "I'm sick of";
+	mes "your lies!";
+	next;
+	menu "I'm not who you think!",L_IM,"How did you survive the accident?",-;
+L_HOW:
+	mes "[Buender Hikeman]";
+	mes "When I came to,";
+	mes "I was lying on my";
+	mes "stomach in the ruins";
+	mes "of that dark tunnel.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "And I found...";
+	mes "You know what I found.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "*Cough Cough*";
+	mes "The corpses of my friends!";
+	mes "Kartophe, Anuto, Maskharundt";
+	mes "Great men and my best friends.";
+	mes "But where were you?!";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Your body was nowhere";
+	mes "to be found. I searched";
+	mes "the tunnel and finnaly";
+	mes "climbed outside where";
+	mes "I was found unconscious.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "I was so stupid.";
+	mes "It was because of";
+	mes "that ore! You killed our";
+	mes "friend and destroyed";
+	mes "my life for that thing!";
+	next;
+	mes "[Buender Hikeman]";
+	mes "And now...";
+	mes "You come out of";
+	mes "hiding and show up.";
+	mes "What do you want of";
+	mes "me? What more can";
+	mes "you possibly take away?!";
+	next;
+	menu "I'm not who you think I am!",L_THINK,"I'd like to apologize.",-;
+	mes "[Buender Hikeman]";
+	mes "Ha ha...";
+	mes "Apologize?";
+	mes "The harm is";
+	mes "already done...";
+	goto L_CONTINUE2;
+L_THINK:
+	mes "[Buender Hikeman]";
+	mes "Quit lying!";
+	mes "You've stirred up";
+	mes "my hatred by showing";
+	mes "up again! I've never";
+	mes "forgotten that day!";
+	next;
+L_CONTINUE2:
+	mes "[Buender Hikeman]";
+	mes "It's too late";
+	mes "for you now. For";
+	mes "the sake of my friends,";
+	mes "I'll have my vengeance!";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Prepare to die!";
+	mes "^0000FFShinokas^000000!!!!";
+	next;
+	mes "[Buender Hikeman]";
+	mes "...!";
+	mes "*Cough! Cough!*";
+	mes "Noooo! N-not now...";
+	mes "*Cough! Cough!*";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "...";
+	mes "I better";
+	mes "get away";
+	mes "from him!";
+	next;
+	mes "^0000FFYou ran away from Hikeman^000000";
+	mes "^0000FFas he collapsed on the ground^000000";
+	mes "^0000FFIt wouldn't be a good idea to^000000";
+	mes "^0000FFprovoke the old man anymore,^000000";
+	mes "^0000FFintentionally or not.^000000";
+	if(Shinokas_Quest == 2) set Shinokas_Quest,3;
+	close;
+L_BEST:
+	mes "^0000FFIt'd be best^000000";
+	mes "^0000FFto avoid aggravating^000000";
+	mes "^0000FFthe old man for now.^000000";
+	close;
+L_IM:
+	mes "[Buender Hikeman]";
+	mes "Ha...!";
+	mes "Do you think";
+	mes "I'd so easily";
+	mes "forget the face";
+	mes "of the person who";
+	mes "shattered my life?!";
+	goto L_HOW;
+	
+L_P2:
+	mes "^0000FFHikeman is dozing^000000";
+	mes "^0000FFoff in his chair. Judging^000000";
+	mes "^0000FFfrom the look of discomfort^000000";
+	mes "^0000FFon his face, he seems to be^000000";
+	mes "^0000FFhaving a nightmare.^000000";
+	if(Shinokas_Quest == 10) close;
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Excuse me...";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Huh...?";
+	mes ".........!!";
+	mes "Hahahahaha!";
+	mes "Come back for";
+	mes "your beating,";
+	mes "eh, Shinokas?!";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Look...!";
+	mes "I'm not Shinokas,";
+	mes "okay? How can you";
+	mes "forget what he looks";
+	mes "like or how old he is?";
+	mes "I'm way younger!";
+	next;
+	mes "[Buender Hikeman]";
+	mes "What...?";
+	next;
+	mes "[Buender Hikeman]";
+	mes "..................";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Uhhhh......";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Huh.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "It seems...";
+	mes "I've made a";
+	mes "huge mistake.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Ever since the accident, people";
+	mes "have said that I haven't been the";
+	mes "same. Maybe they're right.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "I keep making the same";
+	mes "mistakes, so maybe they're";
+	mes "right about me getting senile.";
+	mes "Did you come just to clear";
+	mes "up this misunderstanding?";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Um...";
+	mes "Actually...";
+	next;
+	menu "Tell Hikeman about Shinakas's death.",-,"Don't notify Hikeman",L_NNotify;
+
+	set Shinokas_Quest,10;
+	mes "["+strcharinfo(0)+"]";
+	mes "Shinokas died";
+	mes "a while ago in";
+	mes "Einbroch.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Wh-what...?";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Shinokas was killed by";
+	mes "some men. He thinks they";
+	mes "may have been the ones";
+	mes "who hired you guys. In the";
+	mes "end, he was betrayed too...";
+	next;
+	mes "[Buender Hikeman]";
+	mes "I...";
+	mes "I see...";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Shinokas may have";
+	mes "gotten some money,";
+	mes "but he spent the rest";
+	mes "of his life in hiding,";
+	mes "being hunted down.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Nothing's left.";
+	mes "I've got nothing";
+	mes "to look forward to.";
+	mes "I was living only to";
+	mes "avenge my friends...";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Please...";
+	mes "Just go back to";
+	mes "wherever you came";
+	mes "from. Leave me alone...";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "...";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Did Hikeman really want";
+	mes "revenge on Shinokas or did";
+	mes "he want to hear him out since";
+	mes "they used to be close friends?";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "If I mention that";
+	mes "what they found was";
+	mes "the Ymir Heart Piece,";
+	mes "Hikeman might end up";
+	mes "getting hunter down, so";
+	mes "I better not say anything.";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Why are those men";
+	mes "so obsessed with that";
+	mes "Ymir Heart Piece? Is it";
+	mes "really worth this kind of";
+	mes "cruelty? Whoever they are,";
+	mes "their intentions can't be good.";
+	if(BaseLevel < 41)set BaseExp,BaseExp+34750;
+	else if(BaseLevel > 40 && BaseLevel < 61)set BaseExp,BaseExp+69500;
+	else if(BaseLevel > 60 && BaseLevel < 71)set BaseExp,BaseExp+139000;
+	else if(BaseLevel > 70 && BaseLevel < 81)set BaseExp,BaseExp+278000;
+	else if(BaseLevel > 80 && BaseLevel < 91)set BaseExp,BaseExp+417000;
+	else if(BaseLevel > 90)set BaseExp,BaseExp+556000;
+	close;
+	
+L_NNotify:
+	mes "["+strcharinfo(0)+"]";
+	mes "Yeah...";
+	mes "That's right.";
+	mes "I wanted to clear up";
+	mes "this misunderstanding";
+	mes "so you could calm down,";
+	mes "even if it's just a little bit.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Well, you don't have";
+	mes "to worry so much about";
+	mes ",u stress. I find that the";
+	mes "winds that pass through";
+	mes "this town to be very relaxing.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Each time the wind";
+	mes "blows by, my vision blurs,";
+	mes "my memories haze and all";
+	mes "of my hatred just drifts away.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Without the wind, I'd only";
+	mes "have my hatred towards ^FF0000him^000000.";
+	mes "Maybe it's my only reason for";
+	mes "living and maybe I'm lonely,";
+	mes "but it's too late to feel";
+	mes "sorry for myself now.";
+	close;
+}
+
+
+//============================================================
+//============================================= Einbroch Lover
+//====================================================== Quest
+ein_in01.gat,31,151,4	script	Satra	850,{
+	if(EIN_LOVERQ > 11)goto s_Intimi;
+	if(EIN_LOVERQ == 11)goto s_Coal4;
+	if(EIN_LOVERQ == 10)goto s_Coal3;
+	if(EIN_LOVERQ == 9)goto s_Coal2;
+	if(EIN_LOVERQ == 8)goto s_Coal1;
+	if(EIN_LOVERQ == 7)goto s_Advent;
+	mes "[Satra]";
+	mes "A wandering";
+	mes "adventurer...?";
+	mes "How sinfully";
+	mes "intriguing!";
+	mes "Ho ho ho ho~";
+	next;
+	mes "[Satra]";
+	mes "Oh, do not worry";
+	mes "I'm sure the beauty of";
+	mes "my home has captured your";
+	mes "curiosity. My brutish excuse";
+	mes "for a husband would have you";
+	mes "beat if he found you...";
+	next;
+	mes "[Satra]";
+	mes "But I'm far more genteel";
+	mes "then Megass. You're more";
+	mes "than welcome to enjoy the";
+	mes "furnishings. Ho ho ho ho~";
+	close;
+
+s_Advent:
+	mes "[Satra]";
+	mes "A wandering adventurer...?";
+	mes "How ravishingly delightful!";
+	mes "You must have risked life and";
+	mes "limb to sneak past my husband";
+	mes "to enjoy the captivating sights";
+	mes "of my home. Ho ho ho ho~";
+	next;
+	mes "[Satra]";
+	mes "Since you're a very";
+	mes "unique quest, I shall";
+	mes "give you a unique honor";
+	mes "and deign to converse";
+	mes "with you, adventurer.";
+	next;
+	mes "[Satra]";
+	mes "Einbech exists to provide";
+	mes "my family with coal and";
+	mes "materials from their mines.";
+	mes "It's a natural law: workers";
+	mes "must be led by a chosen few.";
+	next;
+	mes "[Satra]";
+	mes "It's delightfully";
+	mes "ludicrous to see those";
+	mes "workers aspire to reach";
+	mes "our heights of social";
+	mes "prestige. Ho ho ho ho~";
+	next;
+	mes "[Satra]";
+	mes "Oh, I haven't spoken to";
+	mes "someone from a lower";
+	mes "class in ages! It feels";
+	mes "so forbiddenly exciting!";
+	next;
+	mes "[Satra]";
+	mes "Well adventurer, that's";
+	mes "the end of our informal";
+	mes "chat. I'll even grant you";
+	mes "full permission to boast";
+	mes "of the fact that you've";
+	mes "spoken to Lady Satra.";
+	next;
+	mes "[Satra]";
+	mes "If you wish for";
+	mes "me to share words with";
+	mes "you once more, prove to";
+	mes "me that you're worthier";
+	mes "than the other peons of";
+	mes "my graceful presence.";
+	next;
+s_Coal1:
+	mes "[Satra]";
+	mes "Oh, I have a marvelous";
+	mes "idea! Why don't you bring";
+	mes "me ^9C0000Coals^000000? It's not impossible";
+	mes "for someone like yourself, but";
+	mes "this kind of task will require";
+	mes "some effort on your part.";
+	next;
+	if(EIN_LOVERQ == 8 && countitem(1003) > 9)goto s_GotCoal1;
+	mes "[Satra]";
+	mes "Tah tah,";
+	mes "adventurer~";
+	if(EIN_LOVERQ == 7)set EIN_LOVERQ,8;
+	close;
+
+s_GotCoal1:
+	mes "[Satra]";
+	mes "My, you've already";
+	mes "brought the Coal?";
+	mes "How charmingly";
+	mes "prompt you are~";
+	next;
+	mes "[Satra]";
+	mes "On behalf of the";
+	mes "Kappellthaine family,";
+	mes "I shall ignore your lowly";
+	mes "status and graciously";
+	mes "accept your small gift.";
+	mes "Ho ho ho~";
+	next;
+	mes "[Satra]";
+	mes "Do you hail from";
+	mes "Einbech, adventurer?";
+	mes "Ah, the Rune-Midgarts";
+	mes "kingdom! I've visited your";
+	mes "country. It's quite quaint";
+	mes "and Jawaii is very lovely.";
+	next;
+	mes "[Satra]";
+	mes "Well, I shall try to";
+	mes "find some use for these.";
+	mes "I'm afraid the gift I've asked";
+	mes "from you isn't very practical.";
+	mes "How is coal usually used?";
+	mes "Ah, I have a novel idea!";
+	next;
+	mes "[Satra]";
+	mes "Wouldn't it be";
+	mes "intoxicatingly wild if";
+	mes "Megass were to hold one";
+	mes "of those social functions that";
+	mes "the lower classes are so fond";
+	mes "of? A 'barbeque', yes?";
+	next;
+	mes "[Satra]";
+	mes "In any case, If you";
+	mes "bring me more of that";
+	mes "Coal, you would be even";
+	mes "more favored by me and";
+	mes "you'll become a recipient";
+	mes "of my good graces. Ho ho~";
+	set EIN_LOVERQ,9;
+	delitem 1003,10;
+	close;
+
+s_Coal2:
+	mes "[Satra]";
+	mes "^111111*Titter~*^000000";
+	mes "Why, if it isn't my";
+	mes "intrepid adventurer.";
+	mes "Ho ho ho ho~";
+	next;
+	if(countitem(1003) > 9)goto s_GotCoal2;
+	mes "[Satra]";
+	mes "My apologies, but you";
+	mes "must first prove to me";
+	mes "that you are worthy of";
+	mes "conversation. Why don't";
+	mes "you deliver more of those";
+	mes "^9C0000Coals^000000, mmm?";
+	next;
+	mes "[Satra]";
+	mes "After all, I have no other";
+	mes "means of knowing whether";
+	mes "or not you appreciate the time";
+	mes "I sacrifice by socializing with";
+	mes "someone of your status.";
+	mes "Ho ho ho ho~";
+	close;
+
+s_GotCoal2:
+	mes "[Satra]";
+	mes "My word!";
+	mes "Why are you carrying";
+	mes "all of that dirty Coal";
+	mes "with you? You poor,";
+	mes "impoverished thing.";
+	next;
+	mes "[Satra]";
+	mes "Oh! Dear me,";
+	mes "I've nearly forgotten~";
+	mes "How divinely silly of me!";
+	mes "Once again, I graciously";
+	mes "accept your small gift on";
+	mes "behalf of the Kappelthaines.";
+	next;
+	mes "[Satra]";
+	mes "Let me share a little";
+	mes "bit of history concerning";
+	mes "our lovely Einbroch. At one";
+	mes "time, there was only Einbech,";
+	mes "the mining village. You can";
+	mes "imagine how long ago that was.";
+	next;
+	mes "[Satra]";
+	mes "However, the minerals";
+	mes "and ores mined in Einbech";
+	mes "need to be processed and";
+	mes "refined in factories that were";
+	mes "all built in a nearby industrial";
+	mes "comple which became Einbroch.";
+	next;
+	mes "[Satra]";
+	mes "Now every citizen in";
+	mes "Einbroch is wealthy and";
+	mes "it's well known that there";
+	mes "is a higher standard of";
+	mes "living here than in Einbech.";
+	next;
+	mes "[Satra]";
+	mes "Goodness, I believe";
+	mes "it's time for a spot of tea~";
+	mes "The next time you wish to have";
+	mes "an audience with me, it would";
+	mes "behoove you to bring another";
+	mes "gift of Coal. Toodles~";
+	set EIN_LOVERQ,10;
+	delitem 1003,10;
+	close;
+
+s_Coal3:
+	mes "[Satra]";
+	mes "Why hello~";
+	mes "Your visits have";
+	mes "recently been quite";
+	mes "delightful, fair adventurer.";
+	next;
+	mes "[Satra]";
+	mes "Oh, my apologies!";
+	mes "I supposed you're just";
+	mes "here for sight seeing,";
+	mes "or perhaps you're running";
+	mes "some sort of adventurer's";
+	mes "errand. Am I right?";
+	next;
+	if(countitem(1003) > 9)goto s_GotCoal3;
+	mes "[Satra]";
+	mes "I know you well enough";
+	mes "to know that you wouldn't";
+	mes "be so rude as to stop by";
+	mes "and chat without bringing";
+	mes "any ^9C0000Coal^000000. Ho ho ho ho~";
+	close;
+
+s_GotCoal3:
+	mes "[Satra]";
+	mes "Continue to show";
+	mes "your appreciation";
+	mes "and dedication to me";
+	mes "and you'll soon be known";
+	mes "to be my most favored";
+	mes "commoner. Ho ho ho ho~";
+	next;
+	mes "[Satra]";
+	mes "I'm sure you've noticed";
+	mes "the strained relationship";
+	mes "between Einbroch and Einbech";
+	mes "by now. It's a shame, really.";
+	next;
+	mes "[Satra]";
+	mes "As Einbroch grew wealthier";
+	mes "and Einbech became more";
+	mes "destitude, the affluent began";
+	mes "despising the impoverished.";
+	mes "I supposed it follows that the";
+	mes "poor started to resent the rich.";
+	next;
+	mes "[Satra]";
+	mes "It might be said that";
+	mes "both towns have been";
+	mes "trying to take advantage";
+	mes "of each other, but it's";
+	mes "clear that Einbroch has";
+	mes "always had the upper hand.";
+	next;
+	mes "[Satra]";
+	mes "In fact, because of";
+	mes "this rift between our";
+	mes "cities, our families are";
+	mes "taught not to associate";
+	mes "with the people of Einbech.";
+	next;
+	mes "[Satra]";
+	mes "Now, I believe that most";
+	mes "people who live in Einbech";
+	mes "are peons, but that does not";
+	mes "mean I will not give them a";
+	mes "chance to prove their worth.";
+	next;
+	mes "[Satra]";
+	mes "Why should I deprive";
+	mes "the lowly of my gracious";
+	mes "presence if they prove";
+	mes "themselves meritable?";
+	mes "Ho ho ho ho~";
+	next;
+	mes "[Satra]";
+	mes "Oh, that was scrumptious!";
+	mes "If you wish to pay me another";
+	mes "visit, don't forget to bring some";
+	mes "Coal with you. Tah tah~";
+	set EIN_LOVERQ,11;
+	delitem 1003,10;
+	close;
+
+s_Coal4:
+	mes "[Satra]";
+	mes "Ho ho ho ho~";
+	mes "Welcome adventurer,";
+	mes "I so enjoy our little chats.";
+	mes "Hors d'oeuvre?";
+	next;
+	if(countitem(1003) > 9)goto s_GotCoal4;
+	mes "[Satra]";
+	mes "Ah...";
+	mes "It seems you've";
+	mes "forgotten your ^9C0000Coals^000000.";
+	mes "A silly mistake, but one";
+	mes "I'm willing to overlook.";
+	close;
+
+s_GotCoal4:
+	mes "[Satra]";
+	mes "Oh! You can't enjoy";
+	mes "any food in that state!";
+	mes "Your hands are atrociously";
+	mes "grimy! May I ask why?";
+	next;
+	mes "[Satra]";
+	mes "Ah~";
+	mes "In my excitement,";
+	mes "I nearly forgot that";
+	mes "I asked you to bring";
+	mes "Coals to me again!";
+	mes "My apologies~";
+	next;
+	mes "[Satra]";
+	mes "You've brought so much Coal";
+	mes "to me, I'm convinced that you're";
+	mes "much more diligent than those";
+	mes "languid peasants in Einbech.";
+	mes "I appreciate that you've labored";
+	mes "so much to win my favor.";
+	next;
+	mes "[Satra]";
+	mes "Hm, what was that?";
+	mes "someone else provided";
+	mes "these Coals and you were";
+	mes "only delivering them? Then";
+	mes "who actually gathered these?";
+	next;
+	input @str$;
+	mes "[Satra]";
+	if(@str$ != "Clitzer"){
+		mes "I beg your pardon?";
+		mes "" + @str$ + "? Oh my...";
+		mes "I believe I may have";
+		mes "misheard you. Ho ho ho ho~";
+		close;
+	}
+	mes "Ah, Clitzer?";
+	mes "I must say, that's";
+	mes "a very humble name.";
+	mes "Yet it's so familiar...";
+	next;
+	mes "[Satra]";
+	mes "Ah, I recall there";
+	mes "was a hooligan that";
+	mes "has been pestering my";
+	mes "daughter named Clitzer.";
+	mes "Perhaps they are one";
+	mes "and the same. Hmm...";
+	next;
+	mes "[Satra]";
+	mes "I remember that he was";
+	mes "rather shabby looking and";
+	mes "lacked any semblance of";
+	mes "etiquette whatsoever. Clearly,";
+	mes "he is a fool and a coward, but";
+	mes "now I see that he is sincere.";
+	next;
+	mes "[Satra]";
+	mes "It might not be possible";
+	mes "to let him go otu with my";
+	mes "daughter straight away, but";
+	mes "I will invite him for a spot of";
+	mes "tea. And if Calla likes him,";
+	mes "well, he must be special.";
+	next;
+	mes "[Satra]";
+	mes "For a humble peasant,";
+	mes "this must be like a dream";
+	mes "come true! And to have tea";
+	mes "with Clitzer. Oh, what would";
+	mes "the girls say? Ah, but I did";
+	mes "marry that oafish Megass~";
+	next;
+	mes "[Satra]";
+	mes "Anyway, when you next";
+	mes "meet Clitzer, please tell";
+	mes "him to pay me a visit soon.";
+	mes "Oh, and remind him to dress";
+	mes "appropriately for this special";
+	mes "occasion. Ho ho ho ho ho~";
+	set EIN_LOVERQ,12;
+	close;
+
+s_Intimi:
+	mes "[Satra]";
+	mes "I understand that my";
+	mes "home is extravagantly";
+	mes "splendid and to approach";
+	mes "any Kappelthaine is an";
+	mes "honor t most commoners.";
+	next;
+	mes "[Satra]";
+	mes "However, Clitzer";
+	mes "has no reason to feel so";
+	mes "intimidated. Tell the poor";
+	mes "boy that he's earned the";
+	mes "honor of speaking with me.";
+	close;
+
+}
+
+ein_in01.gat,31,138,4	script	Calla	90,{
+	if(EIN_LOVERQ > 4 && EIN_LOVERQ < 14)goto s_NoSwitch;
+	if(EIN_LOVERQ > 1)goto s_Switches;
+s_NoSwitch:
+	mes "[Calla]";
+	mes "Hello adventurer.";
+	mes "Our city must just be";
+	mes "another place where";
+	mes "you'll stay no longer";
+	mes "than a few days.";
+	next;
+	mes "[Calla]";
+	mes "You must have so much";
+	mes "freedom. I envy you. I can't";
+	mes "do what I want to do. I don't";
+	mes "even have the courage to tell";
+	mes "my family what I really want,";
+	mes "much less change things here...";
+	next;
+	mes "[Calla]";
+	mes "How is it like?";
+	mes "Going wherever you";
+	mes "please, following your";
+	mes "heart's true desire?";
+	mes "What I would give to";
+	mes "be able to do that...";
+	if(!EIN_LOVERQ)set EIN_LOVERQ,1;
+	close;
+
+s_Switches:
+	switch(EIN_LOVERQ)
+	{
+
+	case 2:
+		mes "[Calla]";
+		mes "You're the adventurer";
+		mes "from before, aren't you?";
+		mes "Sadly, there isn't much";
+		mes "to do around here. This";
+		mes "place is basically like";
+		mes "a prison to me...";
+		next;
+		mes "[Calla]";
+		mes "Oh, you've met Clitzer?";
+		mes "Isn't he so kind, such";
+		mes "a perfect gentleman?";
+		next;
+		mes "[Calla]";
+		mes "I really wish I could";
+		mes "see him, but it's almost";
+		mes "impossible. My parents think";
+		mes "he's not good enough for me,";
+		mes "but they're wrong! What am";
+		mes "I going to do? Oh, Clitzer...";
+		next;
+		mes "[Calla]";
+		mes "Well, maybe I can't see";
+		mes "him, but would you give";
+		mes "my violin to Clitzer for me?";
+		mes "I used to play this for him";
+		mes "all the time...";
+		next;
+		mes "[Calla]";
+		mes "I'm sorry to trouble you,";
+		mes "but please understand";
+		mes "that I want to comfort my";
+		mes "Clitzer in any way that";
+		mes "I possibly can. Thank";
+		mes "you so much, adventurer...";
+		set EIN_LOVERQ,3;
+		getitem 1901,1;
+		close;
+	break;
+
+	case 3:
+	s_Regards:
+		mes "[Calla]";
+		mes "Oh, please send my";
+		mes "regards to Clitzer for me.";
+		mes "I wish I could comnfort";
+		mes "him in person, but this";
+		mes "is the best I can do for now.";
+		close;
+	break;
+
+	case 4:
+		if(!countitem(712))goto s_Regards;
+		mes "[Calla]";
+		mes "You've spoken";
+		mes "with Clitzer? How";
+		mes "is he? What did he say?";
+		next;
+		mes "[Calla]";
+		mes "Oh...?";
+		mes "He asked you to";
+		mes "deliver this flower";
+		mes "to me? How sweet~";
+		mes "Thank you very much,";
+		mes "kind adventurer~";
+		next;
+		mes "[Calla]";
+		mes "Ah, I'm so rude!";
+		mes "I've been calling you";
+		mes "^111111*adventurer*^000000 this whole";
+		mes "time you've been helping";
+		mes "me! Would you please";
+		mes "tell me your name?";
+		next;
+		input @str$;
+		mes "[Calla]";
+		if(@str$ != strcharinfo(0)){
+			mes "I'm sorry...";
+			mes "I didn't catch that.";
+			mes "would you please tell";
+			mes "me your name again?";
+			close;
+		}
+		mes "Ah, " + strcharinfo(0) + "!";
+		mes "Such a lovely name~";
+		mes "I promise that I won't ever";
+		mes "forget it. Oh, and if you pass by";
+		mes "Einbech, would you thank Clitzer";
+		mes "for the flower for me please?";
+		next;
+		mes "[Calla]";
+		mes "A-and... And...";
+		mes "Please tell him that";
+		mes "I really miss him a lot.";
+		mes "^565656*Sob Sob...*";
+		delitem 712,1;
+		set EIN_LOVERQ,5;
+		close;
+	break;
+
+	case 14:
+		mes "[Calla]";
+		mes "I just heard from my mother";
+		mes "that she's planning to have";
+		mes "tea with Clitzer! I'm sure that";
+		mes "I have you to thank for this~";
+		next;
+		mes "[Calla]";
+		mes "I never dreamed that";
+		mes "something as wonderful";
+		mes "as this could happen.";
+		mes "I'm so happy, I could cry...";
+		mes "I'll always be grateful";
+		mes "for what you've done.";
+		next;
+		mes "[Calla]";
+		mes "I feel like such a fool,";
+		mes "thinking it was all hopeless.";
+		mes "I'll be doing my best to have";
+		mes "my parents accept Clitzer and";
+		mes "someday we'll be married~";
+		next;
+		mes "[Calla]";
+		mes "There isn't much that I can";
+		mes "give you, but I can show you";
+		mes "one of my family's secrets.";
+		mes "It's an invigorating massage";
+		mes "technique that makes you alot";
+		mes "healthier in only ten seconds.";
+		next;
+		mes "[Calla]";
+		mes "Well, please take";
+		mes "off your equipment";
+		mes "and stand still while";
+		mes "I give the massage. It";
+		mes "might hurt a bit at first...";
+		nude;
+		next;
+		mes "^3151FF*Rub Rub Rub*";
+		mes "*Knead Knead Knead*";
+		mes "*Crrack C-c-c--c-crack*";
+		mes "*Crack Crack Crrrrrack*";
+		mes "*Rub Crrraaaaaaaaaackk*^000000";
+		next;
+		mes "[" + strcharinfo(0) + "]";
+		mes "Ooooooooh...";
+		mes "I feel sooo";
+		mes "sore and yet";
+		mes "soooooo good.";
+		mes "Wait. Now I just";
+		mes "feel goooood~";
+		if(BaseLevel < 41)set BaseExp,BaseExp+3712;
+		else if(BaseLevel > 40 && BaseLevel < 61)set BaseExp,BaseExp+7425;
+		else if(BaseLevel > 60 && BaseLevel < 71)set BaseExp,BaseExp+14850;
+		else if(BaseLevel > 70 && BaseLevel < 81)set BaseExp,BaseExp+29700;
+		else if(BaseLevel > 80 && BaseLevel < 91)set BaseExp,BaseExp+59400;
+		else if(BaseLevel > 90)set BaseExp,BaseExp+118800;
+		set EIN_LOVERQ,15;
+		next;
+		mes "[Calla]";
+		mes "So how was it?";
+		mes "I hope it was refreshing.";
+		mes "Please understand that";
+		mes "it's the best thing I can";
+		mes "give you to show my gratitude.";
+		next;
+		mes "[Calla]";
+		mes "Once again,";
+		mes "thank you so";
+		mes "much, " + strcharinfo(0) + ".";
+		mes "I'll always pray for";
+		mes "your safety on your";
+		mes "your adventures~";
+		close;
+	break;
+
+	case 15:
+		mes "[Calla]";
+		mes "Thank you so much!";
+		mes "I'll try my best to convince";
+		mes "my parents to accept our";
+		mes "relationship. It'll be hard,";
+		mes "but it's a good first step~";
+		next;
+		mes "[Calla]";
+		mes "I hope that we can all";
+		mes "work together ti improve";
+		mes "relations between Einbech";
+		mes "and Einbroch. The hatred";
+		mes "between our towns must end...";
+		next;
+		mes "[Calla]";
+		mes "I really appreciate";
+		mes "what you've done for";
+		mes "all of use. I'll be praying";
+		mes "for your safety, adventurer.";
+		close;
+	break;
+
+	}
+}
+
+ein_in01.gat,191,102,4	script	Kaijeta	846,{
+	if(EIN_LOVERQ > 13)goto s_Learned;
+	if(EIN_LOVERQ == 13)goto s_Clothes;
+	if(EIN_LOVERQ > 6 && EIN_LOVERQ < 13)goto s_Hatred;
+	if(EIN_LOVERQ == 6)goto s_Helping;
+	mes "[Kaijeta]";
+	mes "Welcome to my humble";
+	mes "abode, adventurer. I'm";
+	mes "sorry if I'm a poor host.";
+	next;
+	mes "[Kaijeta]";
+	mes "As you can see, we have";
+	mes "to share this house with";
+	mes "other families so we don't";
+	mes "have much open space or";
+	mes "privacy. I'm afraid we can't";
+	mes "even affor basic comfort.";
+	next;
+	mes "[Kaijeta]";
+	mes "For now, this is the best";
+	mes "we can do. We don't have";
+	mes "the zeny to buy a house or";
+	mes "land, so we have no choice";
+	mes "but to endure through this...";
+	close;
+
+s_Helping:
+	mes "[Kaijeta]";
+	mes "Thank you for helping my";
+	mes "son. He may look like a fool";
+	mes "for falling in love with someone";
+	mes "from Einbroch, but he's an honest";
+	mes "hard working man.";
+	next;
+	mes "[Kaijeta]";
+	mes "Then again, it was bound to";
+	mes "happen sometime. Einbech is";
+	mes "a very poor town while Einbroch";
+	mes "is a very rich town. I'd understand";
+	mes "if you don't agree, but opposites";
+	mes "attract sooner of later.";
+	next;
+	mes "[Kaijeta]";
+	mes "^565656*Sigh...*^000000";
+	mes "If my son and Calla can";
+	mes "work things out, maybe it";
+	mes "would improve relations";
+	mes "between our two towns.";
+	mes "I certainly hope so...";
+	next;
+	mes "[Kaijeta]";
+	mes "Still, I'm quite baffled!";
+	mes "I raised my son to have more";
+	mes "guts than to wallow in misery";
+	mes "when his heart's broken. And";
+	mes "I still have no idea how he got";
+	mes "together with such a rich woman.";
+	next;
+	mes "[Kaijeta]";
+	mes "Do you have any idea";
+	mes "how we can put an end";
+	mes "to the hate between our";
+	mes "two towns? I don't want to";
+	mes "see this couple separated";
+	mes "because of such pettiness.";
+	set EIN_LOVERQ,7;
+	close;
+
+s_Hatred:
+	mes "[Kaijeta]";
+	mes "I can't bear to see the";
+	mes "petty hatred between our";
+	mes "two towns stop my son from";
+	mes "seeing the woman he loves...";
+	close;
+
+s_Clothes:
+	mes "[Kaijeta]";
+	mes "Thank you for helping";
+	mes "my son Clitzer. Sadly, the";
+	mes "little fool doesn't have any";
+	mes "clue when it comes to certain";
+	mes "things like choosing clothing.";
+	mes "he gets so nervous about it!";
+	next;
+	mes "[Kaijeta]";
+	mes "A man should wear nice";
+	mes "clothes, like a Formal Suit";
+	mes "or a Tuxedo, for important";
+	mes "meetings and special occassions.";
+	mes "hopefully, he'll learn that soon.";
+	close;
+
+s_Learned:
+	mes "[Kaijeta]";
+	mes "My son learned";
+	mes "an awful lot from";
+	mes "your good example.";
+	mes "As a mother, I really";
+	mes "appreciate everything";
+	mes "you've done for him.";
+	next;
+	mes "[Kaijeta]";
+	mes "Well, adventurer,";
+	mes "I will be praying for";
+	mes "your safety wherever";
+	mes "your journeys may";
+	mes "take you.";
+	close;
+
+}
+
+ein_in01.gat,200,101,4	script	Clitzer	854,{
+	if(EIN_LOVERQ)goto s_Switches;
+s_Back:
+	mes "[Clitzer]";
+	mes "Is there something";
+	mes "that you really want";
+	mes "in life, but it's just";
+	mes "beyond your grasp?";
+	next;
+	mes "[Clitzer]";
+	mes "I wish I was more";
+	mes "like you adventurers.";
+	mes "People like you never";
+	mes "seem to give up, no matter";
+	mes "what the obstacles may be.";
+	mes "But I'm so helpless...";
+	next;
+	mes "[Clitzer]";
+	mes "I can't even see";
+	mes "the one person that";
+	mes "I love. We're just so";
+	mes "different that it's not";
+	mes "even possible anymore...";
+	close;
+
+s_Switches:
+	switch(EIN_LOVERQ){
+	case 1:
+		mes "[Clitzer]";
+		mes "That faintly sweet";
+		mes "and pleasant scent...";
+		mes "It's just like the fragrance";
+		mes "they use in Calla's house.";
+		next;
+		mes "[Clitzer]";
+		mes "Ah, so you visited";
+		mes "Calla in Einbroch?";
+		mes "I miss her sooo much!";
+		mes "Is she doing alright?";
+		next;
+		mes "[Clitzer]";
+		mes "Calla's so beautiful.";
+		mes "And she's so lovely.";
+		mes "Every time I close my";
+		mes "eyes, I can still see";
+		mes "her lovely smile.";
+		next;
+		mes "[Clitzer]";
+		mes "I'm sorry if I sound";
+		mes "silly, but I can't help";
+		mes "it. I know I'm acting like";
+		mes "a complete idiot. But I'd";
+		mes "give anything to see her...";
+		next;
+		mes "[Clitzer]";
+		mes "Just...";
+		mes "Just don't listen";
+		mes "to anything I say.";
+		mes "I'm just a poor fool";
+		mes "in love with the wrong";
+		mes "person. That has to be it...";
+		set EIN_LOVERQ,2;
+		close;
+		break;
+
+	case 2:
+		mes "[Clitzer]";
+		mes "^565656*Sigh*^000000";
+		mes "I really appreciate your";
+		mes "sympathy, but I'm merely";
+		mes "a coward and a fool.";
+		next;
+		mes "[Clitzer]";
+		mes "Yeah...";
+		mes "I'm a coward for doing";
+		mes "nothing about my feelings";
+		mes "and an idiot for falling in love";
+		mes "with such a high class girl in";
+		mes "the first place... Oh, Calla...";
+		close;
+		break;
+
+	case 3:
+		if(!countitem(1901))goto s_Back;
+		mes "[Clitzer]";
+		mes "What brings you here?";
+		mes "aren't you tired of hearing";
+		mes "me moan and whine about";
+		mes "lost love? ^111111*Siiiiigh...*^000000";
+		next;
+		mes "[Clitzer]";
+		mes "Hey, this violin...";
+		mes "Calla used to play";
+		mes "such beautiful music";
+		mes "on this for me. Did";
+		mes "she give this to you?";
+		next;
+		mes "[Clitzer]";
+		mes "I see. Calla must have";
+		mes "known that I'm all broken up";
+		mes "right now. She's too good to";
+		mes "me. How can se consider";
+		mes "my feelings before thinking";
+		mes "about herself?";
+		next;
+		mes "[Clitzer]";
+		mes "I know I'm being";
+		mes "shameless, but I have";
+		mes "a favor to ask. Adventurer,";
+		mes "would you please send";
+		mes "Calla a present for me?";
+		next;
+		mes "[Clitzer]";
+		mes "All you need to do is";
+		mes "just give her ^FF00001 Flower^000000.";
+		mes "I don't have the zeny and";
+		mes "I don't think I'm welcome";
+		mes "at Kapellthaine Manor.";
+		next;
+		mes "[Clitzer]";
+		mes "Here, in return, I'll";
+		mes "give you this health";
+		mes "massage. It's not a";
+		mes "big deal, but when I'm";
+		mes "done, your mind and body";
+		mes "will be refreshed. Here goes!";
+		next;
+		mes "^3151FF*Knead Knead*";
+		mes "*Rub Rub Rub Rub*";
+		mes "*Press Press Press*";
+		mes "*C-c-c-c-c-c-crakck!*^000000";
+		next;
+		mes "[" + strcharinfo(0) + "]";
+		mes "Oh--";
+		mes "Hell yeah!";
+		mes "That's the stuff!";
+		delitem 1901,1;
+		if(BaseLevel < 41)set BaseExp,BaseExp+3712;
+		else if(BaseLevel > 40 && BaseLevel < 61)set BaseExp,BaseExp+7425;
+		else if(BaseLevel > 60 && BaseLevel < 71)set BaseExp,BaseExp+14850;
+		else if(BaseLevel > 70 && BaseLevel < 81)set BaseExp,BaseExp+29700;
+		else if(BaseLevel > 80 && BaseLevel < 91)set BaseExp,BaseExp+59400;
+		else if(BaseLevel > 90)set BaseExp,BaseExp+118800;
+		set EIN_LOVERQ,4;
+		next;
+		mes "[Clitzer]";
+		mes "Would you please bring";
+		mes "1 Flower to Calla for me?";
+		mes "I'm sorry for troubling you...";
+		close;
+		break;
+
+	case 4:
+		mes "[Clitzer]";
+		mes "Would you please bring";
+		mes "1 Flower to Calla for me?";
+		mes "I'm sorry for troubling you...";
+		close;
+		break;
+
+	case 5:
+		mes "[Clitzer]";
+		mes "You've given her";
+		mes "the flower? That's";
+		mes "great! Thank you,";
+		mes "thank you so mu--";
+		next;
+		mes "[Clitzer]";
+		mes "...Oh!";
+		mes "Gosh! I was thinking so";
+		mes "much about myself that";
+		mes "I forgot to ask you for your";
+		mes "name! I'm sorry for being";
+		mes "so knuckle-headed...";
+		next;
+		mes "[Clitzer]";
+		mes "So...";
+		mes "What's your name?";
+		next;
+		input @str$;
+		mes "[Clitzer]";
+		if(@str$ != strcharinfo(0)){
+			mes "Hm...?";
+			mes "Oh, don't be";
+			mes "so nervous~";
+			mes "But would you please";
+			mes "tell me your name again?";
+			mes "I couldn't hear you...";
+			close;
+		}
+		mes "" + strcharinfo(0) + "...";
+		mes "That's very nice. Thank you,";
+		mes "I'm really grateful for your help.";
+		mes "Although I can't see Calla in";
+		mes "person, I can at least send";
+		mes "my regards if you help me.";
+		next;
+		mes "[Clitzer]";
+		mes "I feel so much";
+		mes "better now. Oh!";
+		mes "When you have the";
+		mes "time, why don't you talk";
+		mes "to my mother? She always";
+		mes "likes meeting my friends.";
+		set EIN_LOVERQ,6;
+		close;
+		break;
+
+	case 6:
+	case 7:
+	case 8:
+	case 9:
+	case 10:
+	case 11:
+		mes "[Clitzer]";
+		mes "^111111*Sigh...*^000000";
+		mes "What can I do to";
+		mes "get Calla's parents";
+		mes "to accept me as her";
+		mes "boyfriend? I can't";
+		mes "think of anything...";
+		close;
+		break;
+
+	case 12:
+		mes "[Clitzer]";
+		mes "Eh...?";
+		mes "What did you just say?";
+		mes "You did something for";
+		mes "the Kapellthaines?";
+		next;
+		mes "[Clitzer]";
+		mes "What...?";
+		mes "Did you just say";
+		mes "that Calla's mother";
+		mes "wants me to have tea";
+		mes "with her? Holy moley...!";
+		next;
+		mes "[Clitzer]";
+		mes "Okay, okay.";
+		mes "I-I I'll need something";
+		mes "nice to wear, right? Oh.";
+		mes "Wow. This is so sudden!";
+		mes "W-what should I do?";
+		next;
+		mes "[Clitzer]";
+		mes "This monkey suit";
+		mes "that I've got on just";
+		mes "won't do! Arrrgh! But I've";
+		mes "already outgrown all of my";
+		mes "nice clothes already. Boy,";
+		mes "am I in a pickle...";
+		set EIN_LOVERQ,13;
+		close;
+		break;
+
+	case 13:
+		if(countitem(2320) || countitem(7170))goto s_Clothes;
+		mes "[Clitzer]";
+		mes "Noooooo!";
+		mes "I've got to find";
+		mes "the perfect thing";
+		mes "to wear or Calla's";
+		mes "mother might ^FF0000hate^000000 me!";
+		next;
+		mes "[Clitzer]";
+		mes "Think, Clitzer, think!";
+		mes "Okay, no fun colors.";
+		mes "I don't want her to";
+		mes "think I'm not serious";
+		mes "about Calla. Stripes";
+		mes "might be bad too...";
+		close;
+		break;
+
+	case 14:
+	case 15:
+		mes "[Clitzer]";
+		mes "Look out, world!";
+		mes "I'm gonna become";
+		mes "worth of Calla's love!";
+		mes "Someday, maybe even her";
+		mes "parents will approve me!";
+		close;
+		break;
+	}
+
+s_Clothes:
+	mes "[Clitzer]";
+	mes "Waaah!";
+	mes "What should I wear?!";
+	mes "I can't for the life of me";
+	mes "figure this out! Something,";
+	mes "um, formal? I've never worn";
+	mes "anything like that before!";
+	next;
+	if(countitem(7170)){
+		set @clothes,7170;
+		mes "[Clitzer]";
+		mes "Wait, " + strcharinfo(0) + ".";
+		mes "What's that you've got";
+		mes "there? I've seen something";
+		mes "like that before. It's called";
+		mes "a Tuxedo, right? Something";
+		mes "like that would be perfect!";
+		next;
+		menu "Give it to him.",s_Giveclothes,"Ignore him.",-;
+
+		mes "[Clitzer]";
+		mes "But how can I get";
+		mes "a Tuxedo? Ooh, I hope";
+		mes "it doesn't cost too much";
+		mes "zeny or I won't be able to";
+		mes "get one of those soon...";
+	} else if(countitem(2320)){
+		set @clothes,2320;
+		mes "[Clitzer]";
+		mes "Wait, " + strcharinfo(0) + ".";
+		mes "What's that you've got";
+		mes "there? I've seen something";
+		mes "like that before. It's called";
+		mes "a Formal Suit, right?";
+		mes "Something like that would";
+		mes "be perfect!";
+		next;
+		menu "Give it to him.",s_Giveclothes,"Ignore him.",-;
+
+		mes "[Clitzer]";
+		mes "But how can I get";
+		mes "a Formal Suit? I hope";
+		mes "it doesn't cost too much";
+		mes "zeny or I won't be able to";
+		mes "get one of those soon...";
+	}
+	close;
+
+s_Giveclothes:
+	mes "[Clitzer]";
+	mes "I can have this?";
+	mes "Oh, thank you so much!";
+	mes "Finally, I have something";
+	mes "nice enough to wear to meet";
+	mes "Calla's mom! What a relief!";
+	next;
+	mes "[Clitzer]";
+	mes "You've been helping me all";
+	mes "this time and I haven't properly";
+	mes "expressed my gratitude. I'm sorry";
+	mes "if I've been to absorbed in my own";
+	mes "problems. I may be poor, but I need";
+	mes "to repay you somehow...";
+	next;
+	mes "[Clitzer]";
+	mes "Wait...";
+	mes "Why don't you have this";
+	mes "ore? I don't how";
+	mes "valuable it is, but I know";
+	mes "that it's pretty rare. It may";
+	mes "even be useful to you later~";
+	delitem @clothes,1;
+	set EIN_LOVERQ,14;
+	switch(rand(1,9)){
+	case 1:
+		getitem 7289,1;
+		break;
+
+	case 2:
+		getitem 7290,1;
+		break;
+
+	case 3:
+		getitem 7291,1;
+		break;
+
+	case 4:
+		getitem 7292,1;
+		break;
+
+	case 5:
+		getitem 7293,1;
+		break;
+
+	case 6:
+		getitem 7294,1;
+		break;
+
+	case 7:
+		getitem 7295,1;
+		break;
+
+	case 8:
+		getitem 7296,1;
+		break;
+
+	case 9:
+		getitem 7297,1;
+		break;
+	}
+	next;
+	mes "[Clitzer]";
+	mes "" + strcharinfo(0) + ",";
+	mes "you've really opened";
+	mes "my eyes. From now on,";
+	mes "I'll do my best to earn the";
+	mes "approval of Calla's parents and";
+	mes "become worthy of Calla's love.";
+	close;
+
+}
+
+//============================================================
+//=========================================== Einbroch Polution
+//============================================================
+
+einbroch.gat,1,1,0	script	#PolutionNPC	-1,{
+
+OnPolution:
+	set @AlrdEinPoll,1;
+	donpcevent "Liotzburg::OnHide";
+	donpcevent "Morei::OnHide";
+	donpcevent "Mark::OnHide";
+	donpcevent "Khemko::OnHide";
+	donpcevent "Oberu::OnHide";
+	donpcevent "Khowropher::OnHide";
+	donpcevent "Kesunboss::OnHide";
+	donpcevent "Train Station Staff#01::OnHide";
+	donpcevent "Train Station Staff#02::OnHide";
+	donpcevent "Leslie::OnHide";
+	donpcevent "Little Toby::OnHide";
+	donpcevent "Tan::OnHide";
+	donpcevent "Keneshiotz::OnHide";
+	donpcevent "Sleik::OnHide";
+	donpcevent "Uwe Kleine::OnHide";
+	donpcevent "Laboratory Soldier#01::OnHide";
+	donpcevent "Laboratory Soldier#02::OnHide";
+	disablenpc "Paddler";
+	disablenpc "Head Gear Dealer";
+
+	mapannounce "einbroch.gat","This is a state of emercency! Harmful smog is reaching high levels of saturation. Residents of Einbroch must find shelter immediately.",bc_map;
+	monster "einbroch.gat",82,332,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",99,328,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",122,317,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",138,319,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",147,312,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",159,316,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",173,315,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",161,311,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",147,296,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",168,282,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",175,271,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",146,274,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",160,272,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",155,256,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",179,262,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",192,248,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",212,255,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",230,250,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",246,251,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",262,254,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",253,240,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",202,245,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",181,251,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",172,238,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",146,242,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",186,226,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",173,239,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",124,248,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",120,234,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",98,234,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",101,219,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",89,208,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",96,191,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",76,194,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",60,196,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",45,194,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",34,201,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",40,184,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",64,173,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",96,173,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",41,155,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",46,131,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",46,108,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",38,93,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",55,86,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",81,81,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",107,82,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",107,104,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",123,73,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",132,87,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",125,63,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",142,64,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",150,52,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",157,37,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",179,39,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",197,46,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",217,67,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",246,54,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",228,110,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk"; 
+	monster "einbroch.gat",250,118,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",273,127,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk"; 
+	monster "einbroch.gat",288,138,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk"; 
+	monster "einbroch.gat",281,160,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk"; 
+	monster "einbroch.gat",281,192,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",291,201,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",283,218,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk"; 
+	monster "einbroch.gat",268,216,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk"; 
+	monster "einbroch.gat",273,196,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk"; 
+	monster "einbroch.gat",262,164,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",241,180,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",216,205,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",209,198,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",224,177,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",227,163,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",208,166,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",132,87,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",149,119,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",119,36,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",84,155,"Toxic Fog",1621,1,"#PolutionNPC::OnMobChk";
+	monster "einbroch.gat",82,107,"Red Fog",1620,1,"#PolutionNPC::OnMobChk";
+	initnpctimer;
+	end;
+
+OnMobChk:
+	if(mobcount("einbroch.gat","#PolutionNPC::OnMobChk"))end;
+
+OnTimer600000:
+	killmonster "einbroch.gat","#PolutionNPC::OnMobChk";
+	mapannounce "einbroch.gat","Emergency status is now cancelled. Air pollution levels are now within the safety zone.",bc_map;
+	enablenpc "Liotzburg";
+	donpcevent "Liotzburg::OnUnHide";
+	enablenpc "Morei";
+	donpcevent "Morei::OnUnHide";
+	enablenpc "Mark";
+	donpcevent "Mark::OnUnHide";
+	enablenpc "Khemko";
+	donpcevent "Khemko::OnUnHide";
+	enablenpc "Oberu";
+	donpcevent "Oberu::OnUnHide";
+	enablenpc "Khowropher";
+	donpcevent "Khowropher::OnUnHide";
+	enablenpc "Kesunboss";
+	donpcevent "Kesunboss::OnUnHide";
+	enablenpc "Train Station Staff#01";
+	donpcevent "Train Station Staff#01::OnUnHide";
+	enablenpc "Train Station Staff#02";
+	donpcevent "Train Station Staff#02::OnUnHide";
+	enablenpc "Leslie";
+	donpcevent "Leslie::OnUnHide";
+	enablenpc "Little Toby";
+	donpcevent "Little Toby::OnUnHide";
+	enablenpc "Tan";
+	donpcevent "Tan::OnUnHide";
+	enablenpc "Keneshiotz";
+	donpcevent "Keneshiotz::OnUnHide";
+	enablenpc "Sleik";
+	donpcevent "Sleik::OnUnHide";
+	enablenpc "Uwe Kleine";
+	donpcevent "Uwe Kleine::OnUnHide";
+	enablenpc "Laboratory Soldier#01";
+	donpcevent "Laboratory Soldier#01::OnUnHide";
+	enablenpc "Laboratory Soldier#02";
+	donpcevent "Laboratory Soldier#02::OnUnHide";
+	enablenpc "Paddler";
+	enablenpc "Head Gear Dealer";
+	set $EinPolution,0;
+	set @AlrdEinPoll,0;
+	end;
+
+}
+
+sec_in02.gat,127,86,3	script	Einbroch Polution	851,{
+
+	if(getgmlevel() > 79){
+		mes "[Einbroch Polution Variable Management]";
+		mes "$EinPolution is currently: " + $EinPolution + ".";
+		mes "What would you like to do?";
+		next;
+		menu "Reset $EinPolution to 0",s_0,"Input My Own Value",s_Input,"Cancel.",-;
+		close;
+	s_0:
+		mes "[Einbroch Polution Variable Management]";
+		mes "$EinPolution has been reset to 0.";
+		set $EinPolution,0;
+		set @AlrdEinPoll,0;
+		close;
+	s_Input:
+		mes "[Einbroch Polution Variable Management]";
+		mes "Insert a number you want $EinPollution";
+		mes "to be replaced with. Type '0' to cancel.";
+		input @temppol;
+		if(@temppol == 0)close;
+		set $EinPolution,@temppol;
+		mes "[Einbroch Polution Variable Management]";
+		mes "$EinPolution has been set to: " + $EinPolution + ".";
+		close;
+	} else {
+		mes "[Einbroch Polution Variable Management]";
+		mes "Sorry you don't have authorization";
+		mes "to use this NPC.";
+		close;
+	}
+}
+
+//============================================================
+//=========================================== Einbroch Factory
+//====================================================== Quest
+
+einbroch.gat,132,84,3	script	Liotzburg	853,{
+
+	if($EinPolution > 9){
+		mes "[Liotzburg]";
+		mes "What's going on?!";
+		mes "Who's responsible?!";
+		mes "God, I can't believe";
+		mes "this is happening!";
+		mes "^333333*Cough Cough!*^000000";
+		next;
+		mes "[Liotzburg]";
+		mes "I need to get out of here!";
+		mes "You! D-do something and";
+		mes "fix this! I gotta hide and find";
+		mes "someplace safe!";
+		close2;
+		if(!@AlrdEinPoll)donpcevent "#PolutionNPC::OnPolution";
+		end;
+	}
+	if(EinFactory >= 13){
+		if(EinFactory > 13){
+			mes "[Liotzburg]";
+			mes "What...?";
+			mes "Factory Repair";
+			mes "budget? No way!";
+			next;
+		}
+		mes "[Liotzburg]";
+		mes "Why waste money?";
+		mes "We haven't had any";
+		mes "problems so far! Look,";
+		mes "everything's fine! Why";
+		mes "are you exaggerating";
+		mes "such small details?";
+		next;
+		mes "[Liotzburg]";
+		mes "The field overseer,";
+		mes "Zelmeto, just came by to";
+		mes "ask for a budget increase.";
+		mes "Well, I think he's lying!";
+		mes "Everything's perfect!";
+		if(EinFactory == 13)set EinFactory,14;
+		close;
+	}
+	mes "[Liotzburg]";
+	mes "I'm the plant";
+	mes "superintendant of this";
+	mes "factory. Most of my employees";
+	mes "are diligent workers. I can't say";
+	mes "that of everyone, but overall we're";
+	mes "doing an excellent job. Ha ha ha~!";
+	next;
+	mes "[Liotzburg]";
+	mes "So long as this factory";
+	mes "is well maintained, we won't";
+	mes "have to worry about this city's";
+	mes "safety. The field overseer,";
+	mes "Zelmeto, is also very reliable.";
+	next;
+	mes "[Liotzburg]";
+	mes "I can trust Zelmeto";
+	mes "to look after things,";
+	mes "so there's no need for";
+	mes "me to go inside the factory.";
+	mes "Delegating work is great!";
+	next;
+	mes "[Liotzburg]";
+	mes "Our factory will";
+	mes "continue to develop";
+	mes "and everyone will be";
+	mes "proud of the progress";
+	mes "we're making. Yes, I can";
+	mes "assure you of that!";
+	close;
+
+OnHide:
+	specialeffect 16;
+	disablenpc "Liotzburg";
+	end;
+
+OnUnhide:
+	misceffect 215;
+	end;
+
+}
+
+ein_in01.gat,67,243,3	script	Zelmeto	851,{
+
+	if($EinPolution > 9){
+		mes "[Zelmeto]";
+		mes "We've got a big problem";
+		mes "here! I appreciate that you've";
+		mes "been gathering the materials,";
+		mes "but the machines have been";
+		mes "broken for too long!";
+		next;
+		mes "[Zelmeto]";
+		mes "Right when I tried to";
+		mes "fix it, a huge shortout";
+		mes "occurred. Our town is";
+		mes "probably filled with";
+		mes "toxic fog right now!";
+		next;
+		mes "[Zelmeto]";
+		mes "I'll try my best to fix";
+		mes "this, but we really should";
+		mes "have allocated some funds";
+		mes "to fix this machine earlier!";
+		next;
+		mes "[Zelmeto]";
+		mes "The most important";
+		mes "thing is that you get";
+		mes "out of here and find";
+		mes "shelter! Right now!";
+		close2;
+		warp "einbroch.gat",131,83;
+		end;
+	}
+
+	if(EinFactory > 0)goto s_Switches;
+	mes "[Zelmeto]";
+	mes "Ah, you must be a visitor.";
+	mes "I'm Zelmeto Abellov, the";
+	mes "field overseer. Have you";
+	mes "been in this facility before?";
+	next;
+	mes "[Zelmeto]";
+	mes "This factory plays an";
+	mes "important role in our city";
+	mes "and generates a lot of income.";
+	mes "However, our employess suffer";
+	mes "from a poor work environment.";
+	next;
+	mes "[Zelmeto]";
+	mes "Our superintendant makes a lot";
+	mes "of money and seems content with";
+	mes "the current situation. However, the";
+	mes "rest of the workforce doesn't enjoy";
+	mes "all of the benefits he receives.";
+	mes "[Zelmeto]";
+	mes "Many people have already";
+	mes "quit and there are only a few";
+	mes "people who continue to work";
+	mes "here. So now we're understaffed";
+	mes "and I'm in quite a bind...";
+	next;
+	mes "[Zelmeto]";
+	mes "There are some urgent";
+	mes "tasks I need done, but";
+	mes "there's no way for me";
+	mes "to recruit new workers.";
+	mes "Ah, I'm sorry, I've spoken too";
+	mes "freely about my own problems...";
+	next;
+	menu "You're understaffed?",s_Underst,"No, it's okay.",-;
+
+	mes "[Zelmeto]";
+	mes "Thank you for";
+	mes "your kindness.";
+	mes "And please don't";
+	mes "let anyone know about";
+	mes "anything I just told you.";
+	close;
+
+s_Underst:
+	mes "[Zelmeto]";
+	mes "Yes, we are!";
+	mes "I don't have enough";
+	mes "people to inspect the";
+	mes "factory machines and";
+	mes "determine what kinds";
+	mes "of problems we have.";
+	next;
+	mes "[Zelmeto]";
+	mes "It's a time consuming";
+	mes "task I'd rather do on my";
+	mes "own. However, between that";
+	mes "and managing the workforce,";
+	mes "I don't have enough time...";
+	next;
+	menu "I can help you.",s_Help,"Keep up the good job.",-;
+
+	mes "[Zelmeto]";
+	mes "Well, it's a living.";
+	mes "^6A6A6A*Sigh*^000000 I can put up with";
+	mes "this, but I hope the higher";
+	mes "ups will consider improving";
+	mes "the work environment here...";
+	close;
+
+s_Help:
+	mes "[Zelmeto]";
+	mes "You can help me?";
+	mes "I know something like";
+	mes "this is too much to ask,";
+	mes "but I'll accept any help";
+	mes "anyone offers me. I'm";
+	mes "that desperate.";
+	next;
+	mes "[Zelmeto]";
+	mes "Alright, I'll have you";
+	mes "inspect the machines";
+	mes "in the factory one by one.";
+	mes "It's imperative that we know";
+	mes "what needs to be repaired";
+	mes "and what's working fine";
+	next;
+	mes "[Zelmeto]";
+	mes "First, find the ^FF00002nd control";
+	mes "panel^000000 and determine its";
+	mes "status. I'm fairly certain that";
+	mes "it broke a long time ago, but";
+	mes "it wouldn't hur to make sure.";
+	mes "You should find it easily.";
+	next;
+	mes "[Zelmeto]";
+	mes "When you finish your";
+	mes "inspection, report back";
+	mes "to me so I can tell you";
+	mes "which machine to check";
+	mes "next. Thanks again for";
+	mes "offering to help";
+	set EinFactory,1;
+	close;
+s_Switches:
+	switch(EinFactory){
+	case 1:
+		mes "[Zelmeto]";
+		mes "If you would,";
+		mes "please inspect the";
+		mes "2nd control panel that";
+		mes "seems to have been";
+		mes "broken for a while...";
+		close;
+		break;
+
+	case 2:
+		mes "[Zelmeto]";
+		mes "Huh, I see.";
+		mes "We must do something";
+		mes "about that as soon as";
+		mes "we can. Now, let me tell";
+		mes "you what to check next.";
+		next;
+		mes "[Zelmeto]";
+		mes "There are 3 automatic";
+		mes "pressure governors which";
+		mes "hammer the bent iron plates";
+		mes "from above to flatten them. It";
+		mes "seems that one of them may";
+		mes "have some kind of problem.";
+		next;
+		mes "[Zelmeto]";
+		mes "Please inspect the ^FF0000automatic";
+		mes "pressure governors^000000. Even if the";
+		mes "problem seems small, please";
+		mes "report it to me. I know it might";
+		mes "seem fine now, but I want to";
+		mes "prevent an accident if I can.";
+		next;
+		mes "[Zelmeto]";
+		mes "Thank you";
+		mes "in advance,";
+		mes "adventurer.";
+		set EinFactory,3;
+		close;
+		break;
+
+	case 3:
+		mes "[Zelmeto]";
+		mes "You need to inspect";
+		mes "an automatic pressure";
+		mes "governor. It looks fine,";
+		mes "but sometimes it makes";
+		mes "strange noises.";
+		next;
+		mes "[Zelmeto]";
+		mes "It probably will";
+		mes "be a good idea to";
+		mes "check that machine";
+		mes "more carefully this";
+		mes "time, just in case.";
+		next;
+		mes "[Zelmeto]";
+		mes "Thank you";
+		mes "for helping us,";
+		mes "adventurer.";
+		close;
+		break;
+
+	case 4:
+		mes "[Zelmeto]";
+		mes "What...?";
+		mes "This is worse";
+		mes "than I expected. But";
+		mes "it's good that we know";
+		mes "about these problems";
+		mes "as soon as possible.";
+		next;
+		mes "[Zelmeto]";
+		mes "Don't you worry,";
+		mes "we'll take care of";
+		mes "this. In the meantime,";
+		mes "I'd like you to inspect";
+		mes "the next machine for me.";
+		next;
+		mes "[Zelmeto]";
+		mes "I want you to check";
+		mes "a ^FF0000control panel^000000. It's the";
+		mes "same kind as the one";
+		mes "you just inspected, but";
+		mes "bigger in size.";
+		next;
+		mes "[Zelmeto]";
+		mes "It's located in the";
+		mes "middle of the factory,";
+		mes "so you should be able";
+		mes "to find it. It may be in bad";
+		mes "condition, even though it's";
+		mes "operating fine for now...";
+		next;
+		mes "[Zelmeto]";
+		mes "We need to ensure that";
+		mes "it's stable, reliable and";
+		mes "doesn't pose a threat to";
+		mes "our workforce. Thanks";
+		mes "again, adventurer.";
+		set EinFactory,5;
+		close;
+		break;
+
+	case 5:
+		mes "[Zelmeto]";
+		mes "I'd like you to inspect";
+		mes "the control panel. It's";
+		mes "fairly large and can be";
+		mes "found in the middle of the";
+		mes "factory. You shouldn't have";
+		mes "too much trouble finding it.";
+		close;
+		break;
+
+	case 6:
+		mes "[Zelmeto]";
+		mes "I see...";
+		mes "It's most likely that";
+		mes "there was a short";
+		mes "circuit and most";
+		mes "of the internal devices";
+		mes "were burnt out...";
+		next;
+		mes "[Zelmeto]";
+		mes "Thanks for checking";
+		mes "that out for me. Now,";
+		mes "the next machine I need";
+		mes "you to inspect is different";
+		mes "than the others I've had";
+		mes "you examine.";
+		next;
+		mes "[Zelmeto]";
+		mes "It's a mechanical";
+		mes "hand that transports";
+		mes "small objects. We didn't";
+		mes "really give it a name, but";
+		mes "you should be able to find it.";
+		next;
+		mes "[Zelmeto]";
+		mes "Recently, it seems";
+		mes "that there have been";
+		mes "problems in operating";
+		mes "that machine. If something's";
+		mes "broken, we need to know";
+		mes "and fix it right away.";
+		next;
+		mes "[Zelmeto]";
+		mes "Thanks again";
+		mes "in advance.";
+		set EinFactory,7;
+		close;		
+		break;
+
+	case 7:
+		mes "[Zelmeto]";
+		mes "The machine which";
+		mes "I want you to inspect";
+		mes "this time is a small";
+		mes "sized conveyor.";
+		next;
+		mes "[Zelmeto]";
+		mes "Be sure that you";
+		mes "inspect the small";
+		mes "one, since we also";
+		mes "have a large conveyor";
+		mes "in the factory as well";
+		close;
+		break;
+
+	case 8:
+		mes "[Zelmeto]";
+		mes "Huh?";
+		mes "I'm suprised to hear";
+		mes "that. ^6A6A6A*Sigh*^000000 There's just";
+		mes "too many things that need";
+		mes "fixing. This is terrible...";
+		next;
+		mes "[Zelmeto]";
+		mes "Well, let me worry";
+		mes "about that for now. Please";
+		mes "focus on continuing to inspect";
+		mes "some of the other machines.";
+		next;
+		mes "[Zelmeto]";
+		mes "Now, there's a pipe inside";
+		mes "this factory that I want you";
+		mes "to look at. Many of our pipes";
+		mes "aren't in the best condition,";
+		mes "but this particular one might";
+		mes "be severely damaged.";
+		next;
+		mes "[Zelmeto]";
+		mes "Now, the pipe I want";
+		mes "you to inspect is located";
+		mes "near those large caultrons";
+		mes "of molten metal. You should";
+		mes "be able to find it pretty easily";
+		next;
+		mes "[Zelmeto]";
+		mes "Thanks again";
+		mes "for your help,";
+		mes "adventurer.";
+		set EinFactory,9;
+		close;
+		break;
+
+	case 9:
+		mes "[Zelmeto]";
+		mes "The pipe I want";
+		mes "you to inspect is located";
+		mes "near those large caultrons";
+		mes "of molten metal. You should";
+		mes "be able to find it pretty easily";
+		next;
+		mes "[Zelmeto]";
+		mes "Thanks again";
+		mes "for your help,";
+		mes "adventurer.";
+		close;
+		break;
+
+	case 10:
+		mes "[Zelmeto]";
+		mes "This is";
+		mes "worse than";
+		mes "I imagined...";
+		next;
+		mes "[Zelmeto]";
+		mes "We've got to start";
+		mes "repairs as soon as we";
+		mes "can! Hopefully, we can";
+		mes "resolve this before";
+		mes "any serious problems happen...";
+		next;
+		mes "[Zelmeto]";
+		mes "Alright, the last";
+		mes "thing that you need to";
+		mes "inspect is a ^FF0000large conveyor^000000.";
+		mes "It's similiar to the one you";
+		mes "inspected before, but it's";
+		mes "bigger and more powerful.";
+		next;
+		mes "[Zelmeto]";
+		mes "We have only one of these";
+		mes "machines and it's usually";
+		mes "moved around a lot since";
+		mes "a lot of people in the factory";
+		mes "use it. I really don't know";
+		mes "where it could be now.";
+		next;
+		mes "[Zelmeto]";
+		mes "Still I'm sure that";
+		mes "it's inside the building,";
+		mes "so you should be able to";
+		mes "find it. I hope you can inspect";
+		mes "that conveyor for me soon.";
+		set EinFactory,11;
+		close;
+		break;
+
+	case 11:
+		mes "[Zelmeto]";
+		mes "The machine which";
+		mes "you are supposed to";
+		mes "inspect right now";
+		mes "is a large convyore.";
+		next;
+		mes "[Zelmeto]";
+		mes "Remember that we";
+		mes "also have a small sized";
+		mes "conveyor, so make sure";
+		mes "that you examine the";
+		mes "larger one, alright?";
+		close;
+		break;
+
+	case 12:
+		mes "[Zelmeto]";
+		mes "Well, I figured that both";
+		mes "conveyors would have";
+		mes "similiar problems. We";
+		mes "can fix them at the";
+		mes "same time, but it'll";
+		mes "be a hassle";
+		next;
+		mes "[Zelmeto]";
+		mes "Thank you so much for";
+		mes "your help. Without you,";
+		mes "I'm pretty sure we wouldn't";
+		mes "know about these problems";
+		mes "until it was too late.";
+		next;
+		mes "[Zelmeto]";
+		mes "Now, I've got to make sure";
+		mes "we have enough materials";
+		mes "to make the repairs so that";
+		mes "the machines will be safely";
+		mes "functioning again.";
+		next;
+		mes "[Zelmeto]";
+		mes "First, I better";
+		mes "hurry and request";
+		mes "an increase for the";
+		mes "Factory Repair budget";
+		mes "from our superintendant.";
+		set EinFactory,13;
+		close;
+		break;
+
+	case 13:
+		mes "[Zelmeto]";
+		mes "I've got to report this";
+		mes "to our superintendant";
+		mes "as soon as possible.";
+		next;
+		mes "[Zelmeto]";
+		mes "With any luck, he'll approve";
+		mes "a budget increase so that we";
+		mes "can get all of the materials";
+		mes "needed for the repairs.";
+		close;
+		break;
+
+	case 14:
+		mes "[Zelmeto]";
+		mes "...";
+		mes "......";
+		next;
+		mes "[Zelmeto]";
+		mes "^6A6A6A*Sigh*^000000";
+		mes "My proposal was rejected";
+		mes "by our superintendant. But";
+		mes "maintainance and repairs";
+		mes "are crucial for peak operating";
+		mes "efficiency and worker safety!";
+		next;
+		mes "[Zelmeto]";
+		mes "I'm frustrated and worried.";
+		mes "Maybe nothing will happen";
+		mes "for now, but we've got to";
+		mes "safeguard our future by";
+		mes "regularly maintaining";
+		mes "all of these machines";
+		next;
+		mes "[Zelmeto]";
+		mes "Even possible threats";
+		mes "to the safety of our workers";
+		mes "can't be ignored. Isn't there";
+		mes "something I can do? ^6A6A6A*Sigh*^000000";
+		next;
+		mes "[Zelmeto]";
+		mes "If we can";
+		mes "just get";
+		mes "20 ^FF0000Flexible Tube^000000,";
+		mes "10 ^FF0000Rusty Screw^000000 and";
+		mes "10 ^FF0000Used Iron Plate^000000,";
+		mes "we could make those repairs.";	
+		next;
+		mes "[Zelmeto]";
+		mes "But without funds, there's";
+		mes "no way we can purchase";
+		mes "those items. If something";
+		mes "happens, who's going to";
+		mes "be responsible?";
+		set EinFactory,15;
+		close;
+		break;
+
+	case 15:
+		mes "[Zelmeto]";
+		if(countitem(7325) < 20 || countitem(7317) < 10 || countitem(7319) < 10){
+			mes "We need";
+			mes "at least";
+			mes "20 ^FF0000Flexible Tube^000000,";
+			mes "10 ^FF0000Rusty Screw^000000 and";
+			mes "10 ^FF0000Used Iron Plate^000000,";
+			mes "to repair this factory.";
+			next;
+			mes "[Zelmeto]";
+			mes "^6A6A6A*Sigh*^000000";
+			mes "But there's no way";
+			mes "we can get all of those";
+			mes "things. Our budget isn't";
+			mes "big enough to cover it.";
+			close;
+		}
+		mes "Ah, it's you again.";
+		mes "It's shameful letting";
+		mes "other people know about";
+		mes "our miserable situation...";
+		next;
+		mes "[Zelmeto]";
+		mes "There's nothing";
+		mes "worth seeing here,";
+		mes "so there really isn't";
+		mes "a point in you coming to";
+		mes "visit this place anymore.";
+		next;
+		menu "Give him the materials.",s_Give,"Huh.",-;
+
+		mes "[Zelmeto]";
+		mes "^6A6A6A*Sigh*^000000";
+		mes "I'm really worried";
+		mes "about this factory's";
+		mes "future. What is our";
+		mes "superintendant thinking...?";
+		close;
+
+	s_Give:	
+		mes "[Zelmeto]";
+		mes "...Hm?";
+		mes "Aren't these the";
+		mes "materials we need";
+		mes "to make repairs in";
+		mes "the factory? How did";
+		mes "you find all of these?";
+		next;
+		if(countitem(7325) < 20 || countitem(7317) < 10 || countitem(7319) < 10)close;
+		delitem 7325,20;
+		delitem 7317,10;
+		delitem 7319,10;
+		set EinFactory,16;
+		set $EinPolution,$EinPolution+1;
+		if(BaseLevel < 41) set BaseExp,BaseExp+615;
+		else if(BaseLevel >= 41 && BaseLevel < 51) set BaseExp,BaseExp+3075;
+		else if(BaseLevel >= 51 && BaseLevel < 61) set BaseExp,BaseExp+6604;
+		else if(BaseLevel >= 61 && BaseLevel < 71) set BaseExp,BaseExp+18508;
+		else if(BaseLevel >= 71 && BaseLevel < 81) set BaseExp,BaseExp+32062;
+		else if(BaseLevel >= 81 && BaseLevel < 91) set BaseExp,BaseExp+76026;
+		else if(BaseLevel >= 91) set BaseExp,BaseExp+290675;
+		mes "[Zelmeto]";
+		mes "I don't know how";
+		mes "I can possible pay you";
+		mes "back for this great favor.";
+		mes "I appreciate that you've";
+		mes "stepped forward to help us.";
+		next;
+		mes "[Zelmeto]";
+		mes "Oh...!";
+		mes "In my years of managing,";
+		mes "I've learned the ultimate";
+		mes "motivation techniques. Let";
+		mes "me enhance your motivation";
+		mes "to show you my gratitude.";
+		next;
+		mes "[Zelmeto]";
+		mes "Now...";
+		mes "Just open your mind";
+		mes "and listen to my words";
+		mes "of encouragement";
+		mes "and inspiration...";
+		next;
+		mes "[Zelmeto]";
+		mes "^3131FFWhen the going";
+		mes "gets rough, you've";
+		mes "gotta get rougher!";
+		mes "You gotta climb that";
+		mes "mountain 'cause no one's";
+		mes "gonna climb it for you!";
+		next;
+		mes "[Zelmeto]";
+		mes "^3131FFDon't give it up!";
+		mes "Go for broke!";
+		mes "Losers are quitters";
+		mes "and quitters are losers!";
+		next;
+		mes "[Zelmeto]";
+		mes "^6A6A6A*Whew*";
+		mes "^000000I haven't given that much";
+		mes "inspiration in a while, but";
+		mes "your help was well worth it.";
+		mes "I'm going to start  the repairs, but";
+		mes "once again I'd like to thank you.";
+		close;
+		break;
+
+	case 16:
+		mes "[Zelmeto]";
+		mes "We'll be putting good";
+		mes "use to the materials you";
+		mes "gave me. With your help,";
+		mes "our factory will operate";
+		mes "safely. At least, for just";
+		mes "a little while longer.";
+		close;
+	}	
+}
+
+ein_in01.gat,50,232,4	script	2nd Control Panel	111,{
+
+	if(EinFactory == 1){
+		mes "^3131FFIt's the 2nd control panel";
+		mes "Zelmeto asked you to inspect.";
+		mes "it looks totally broken: screws";
+		mes "are missing, and the iron cover";
+		mes "has been bent open, revealing";
+		mes "a tangled mess of wires inside.";
+		set EinFactory,2;
+		close;
+	}
+	end;
+}
+
+ein_in01.gat,108,217,4	script	3rd Pressure Governor	111,{
+
+	if(EinFactory == 3){
+		mes "^3131FFAt first glance, this";
+		mes "pressure governor looks";
+		mes "perfectly fine. But after you";
+		mes "check it more carefully, you";
+		mes "find that it's making strange";
+		mes "grinding noises and a few of";
+		mes "the surface screws are loose.";
+		set EinFactory,4;
+		close;
+	}
+	end;
+}
+
+ein_in01.gat,61,259,4	script	Main Control Panel	111,{
+
+	if(EinFactory == 5){
+		mes "^3131FFThe main control panel";
+		mes "doesn't look like it has";
+		mes "any problems. But after";
+		mes "tapping on its surface,";
+		mes "you hear a disheartening";
+		mes "hollow sound. It looks like";
+		mes "it's missing some parts...";
+		set EinFactory,6;
+		close;
+	}
+	end;
+}
+
+ein_in01.gat,47,197,4	script	Conveyor#01	111,{
+
+	if(EinFactory == 7){
+		mes "^3131FFThe conveyor's movements";
+		mes "look jittery and clumsy. The";
+		mes "mechanical arm also doesn't";
+		mes "look powerful enough to bear";
+		mes "the loads that it's carrying. The";
+		mes "screws in the conveyor look";
+		mes "loose and rusted over.";
+		set EinFactory,8;
+		close;
+	}
+	end;
+}
+
+ein_in01.gat,100,267,4	script	Pipe	111,{
+
+	if(EinFactory == 9){
+		mes "^3131FFThe inspection of this";
+		mes "pipe didn't take very long.";
+		mes "It's bloated and worn out";
+		mes "from long durations of";
+		mes "being overloaded with";
+		mes "pressure. It's a wonder";
+		mes "it hasn't exploded yet.";
+		set EinFactory,10;
+		close;
+	}
+	end;
+}
+
+ein_in01.gat,95,238,4	script	Conveyor#02	111,{
+
+	if(EinFactory == 11){
+		mes "^3131FFThis conveyor seems";
+		mes "to have similiar problems";
+		mes "as its smaller version. Its";
+		mes "movements are awkward,";
+		mes "erratic and weak, and almost";
+		mes "all of its screws are rusted.";
+		set EinFactory,12;
+		close;
+	}
+	end;
+}
+//============================================================
+//=============================================== Einbroch Uwe
+//====================================================== Quest
+einbroch.gat,215,180,5	script	Uwe Kleine	85,{
+
+	if(EinUwe == 2)goto s_Cont2;
+	if(EinUwe == 1)goto s_Cont;
+	mes "[Uwe]";
+	mes "Cooking is such a joy~!";
+	mes "The scents, the flavors, the";
+	mes "sensation of sheer ^EFAEBDsatiation^000000...";
+	next;
+	menu "Um, isn't this a forge?",s_Forge,"Ignore him.",-;
+
+	mes "[Uwe]";
+	mes "Cooking begins with";
+	mes "fire and ends with fire.";
+	mes "There's a certain art to";
+	mes "creating fine, delicious";
+	mes "foods to delight the palate~";
+	close;
+
+s_Forge:
+	mes "[Uwe]";
+	mes "Is this a forge?";
+	mes "Oh, sugar honey,";
+	mes "you haven't been here";
+	mes "before, haven't you?";
+	next;
+	mes "[Uwe]";
+	mes "My name is Uwe Kleine";
+	mes "and this is my forge~! I am";
+	mes "the most elegant Blacksmith";
+	mes "and the best chef here in the";
+	mes "Schwartzwald Republic~";
+	next;
+	mes "[Uwe]";
+	mes "So, how can";
+	if(Sex){
+		mes "I help you, you";
+		mes "adoooooooooorable";
+		mes "hunk of a man?";
+	}else{
+		mes "I help you?";
+	}
+	next;
+	menu "Talk about Einbroch",s_Ein,"Ask him to forge a Weapon.",s_Weap,"Master, I want to learn cooking.",s_Cook,"Cancel.",-;
+
+	mes "[Uwe]";
+	mes "Take care,";
+	mes "sugar honey~";
+	mes "Ho ho ho!";
+	close;
+
+s_Ein:
+	mes "[Uwe]";
+	mes "Einbroch was originally";
+	mes "build to support Einbech's";
+	mes "mining efforts. Because it's";
+	mes "small and crowded with people,";
+	mes "there's no room to build the ore";
+	mes "refining factories over there.";
+	next;
+	mes "[Uwe]";
+	mes "Sine Einbroch used to be";
+	mes "an empty lot, it was perfect";
+	mes "for building factories. That's";
+	mes "what my grandfather told me a";
+	mes "long time ago. Anyway, Einbroch";
+	mes "quickly grew into a major city.";
+	next;
+	mes "[Uwe]";
+	mes "Now people think that this";
+	mes "city was never planned to be";
+	mes "just an extension of Einbech.";
+	mes "See that rampart over there?";
+	mes "It doesn't connection to Einbech";
+	mes "at all! No protection for them...";
+	next;
+	mes "[Uwe]";
+	mes "It's like the government";
+	mes "lost all interest in Einbech.";
+	mes "Even the miners there have";
+	mes "been moving here to work in";
+	mes "the factories. But more people";
+	mes "hasn't made this city more lively.";
+	next;
+	mes "[Uwe]";
+	mes "Einbroch may look modern";
+	mes "and exciting now, but soon";
+	mes "you'll see that there's no sign";
+	mes "of warmth or life. So... Just";
+	mes "don't live here in your old age.";
+	next;
+	menu "Then why are you here?",s_WhyHere,"I won't. Thanks for the advice.",-;
+
+	mes "[Uwe]";
+	mes "Oh, that is such";
+	mes "a good decision,";
+	mes "sugar honey! Oh, you";
+	mes "cutie adventurers are";
+	mes "so precious, so lovable.";
+	mes "^111111*Tee hee hee~*^000000";
+	next;
+	mes "[Uwe]";
+	mes "Well, that was";
+	mes "a fun talk. Come";
+	mes "back and visit, 'kay?";
+	mes "I'll miss you until";
+	mes "the next time~";
+	close;
+
+s_WhyHere:
+	mes "[Uwe]";
+	mes "Well, I have some";
+	mes "precious memories of";
+	mes "this place. Once, there was";
+	mes "a man who lived here who";
+	mes "was just like a father to me.";
+	next;
+	mes "[Uwe]";
+	mes "Oh, but I'm sure that";
+	mes "you don't want to hear";
+	mes "about that. Next time you";
+	mes "drop by, we'll talk about";
+	mes "something more fun, 'kay?";
+	mes "Buhbye for now, cutie~";
+	close;
+
+s_Weap:
+	mes "[Uwe]";
+	mes "Well...";
+	mes "I actually just";
+	mes "do smithing work";
+	mes "to create my own";
+	mes "cooking tools.";
+	next;
+	mes "[Uwe]";
+	mes "Oh, I understand";
+	mes "that somebody needs";
+	mes "to fight the monsters,";
+	mes "but I'm the wrong person";
+	mes "to ask for forging weapons.";
+	mes "I... am a strict pacifist~";
+	next;
+	mes "[Uwe]";
+	mes "Just go look";
+	mes "around for a little";
+	mes "bit, I'm sure you'll";
+	mes "find a Blacksmith";
+	mes "who's willing to forge";
+	mes "you a good weapon~";
+	close;
+
+s_Cook:
+	mes "[Uwe]";
+	mes "Mm...?";
+	mes "Did you just";
+	mes "say that you";
+	mes "want to learn";
+	mes "the art of cooking?";
+	next;
+	mes "[Uwe]";
+	mes "I'm sorry, but I can't";
+	mes "really give culinary";
+	mes "lessons. But I will";
+	mes "give good advice for";
+	mes "hopeful beginners.";
+	next;
+	mes "[Uwe]";
+	mes "Now...";
+	mes "For your tuiton";
+	mes "I'll need-- Gosh,";
+	mes "there's just so many";
+	mes "things. Get some paper,";
+	mes "and a pen for this list...";
+	next;
+	mes "[Uwe]";
+	mes "Just kidding!";
+	mes "^111111*Titter~* ^000000I don't need";
+	mes "much to make some";
+	mes "cooking utensils. Bring";
+	mes "6 ^0000FFLarge Jellopies^000000. That's it!";
+	next;
+	mes "[Uwe]";
+	mes "In return, I will give you";
+	mes "1 Coal and some useful";
+	mes "cooking advice for novices.";
+	mes "I give this advice for free to";
+	mes "my smithing colleages, though.";
+	next;
+	mes "[Uwe]";
+	mes "Why ^EFAEBDdon't^000000 you";
+	mes "become a Blacksmith?";
+	mes "I'm much more confident";
+	mes "in that field. ^111111*Tee hee~*^000000";
+	next;
+	mes "[Uwe]";
+	mes "Well, I'll be";
+	mes "waiting right";
+	mes "here until you";
+	mes "come back.";
+	mes "^111111...*Tee hee~*";
+	set EinUwe,1;
+	close;
+
+s_Cont:
+	mes "[Uwe]";
+	mes "Oh hello hello~";
+	mes "It's been a long";
+	mes "time since we've talked,";
+	mes "you cutie adventurer~";
+	next;
+	mes "[Uwe]";
+	mes "So, sugar honey,";
+	mes "how is it going with";
+	mes "the little favor I asked";
+	mes "you about last time?";
+	mes "Did you already forget";
+	mes "the 6 Large Jellopies?";
+	next;
+	menu "Talk about Einbroch",s_Ein,"Ask him to forge a Weapon.",s_Weap,"Give him the Materials.",s_Material,"Cancel.",-;
+
+s_Material:
+	mes "[Uwe]";
+	if(countitem(7126) < 6){
+		mes "Huh...?";
+		mes "You brought";
+		if(countitem(7126))
+			mes "only " + countitem(7126) + " of them?";
+		else
+			mes "none at all...?";
+		mes "Next time, be sure";
+		mes "to bring 6 Large Jellopies,";
+		mes "okay? Don't forget, cutie~";
+		close;
+	}
+	delitem 7126,6;
+	getitem 1003,1;
+	set EinUwe,2;
+	mes "Thank you ^EFAEBDso^000000 much!";
+	mes "Here's the Coal I promised~";
+	next;
+	mes "[Uwe]";
+	mes "Now, I can't teach you everything";
+	mes "about cooking, but I will give you";
+	mes "some good advice for beginners.";
+	mes "I hope you pay attnetion, sugar";
+	mes "honey. Now what would you like";
+	mes "to hear more about? Hmm...?";
+	next;
+s_Menu3:
+	menu "Heart",s_Heart,"Ingredients",s_Ingredients,"Skills",s_Skills,"Tools",s_Tools,"Cancel.",-;
+
+	mes "[Uwe]";
+	mes "Take care,";
+	mes "sugar honey~";
+	mes "Ho ho ho!";
+	close;
+
+s_Heart:
+	mes "[Uwe]";
+	mes "Ah, heart. Just like forging,";
+	mes "you need passion and desire";
+	mes "to create something special.";
+	mes "Every smith and cook knows that";
+	mes "you can do anything if you have";
+	mes "the will and the commitments.";
+	next;
+	mes "[Uwe]";
+	mes "Well, that's all";
+	mes "I really have to";
+	mes "say about that. But";
+	mes "come back and chat";
+	mes "whenever you please.";
+	mes "...Behbie~";
+	close;
+
+s_Ingredients:
+	mes "[Uwe]";
+	mes "Now, for beginners,";
+	mes "learning to select";
+	mes "and use ingredients";
+	mes "is one of the most";
+	mes "important fundamentals.";
+	next;
+	mes "[Uwe]";
+	mes "Cooking is like forging";
+	mes "since specific ingredients";
+	mes "are needed to make specialty";
+	mes "items or dishes. You can't just";
+	mes "skip them if you really need";
+	mes "them, right? Right!";
+	next;
+	mes "[Uwe]";
+	mes "Once you make up your";
+	mes "mind to do something,";
+	mes "focus on finishing it, 'kay?";
+	mes "Never cut corners and always";
+	mes "dedicate yourself to make the";
+	mes "very best finished product~";
+	next;
+	mes "[Uwe]";
+	mes "Well, that was";
+	mes "a fun talk. Come";
+	mes "back and visit, 'kay?";
+	mes "I'll miss you until";
+	mes "the next time~";
+	mes "...Ho ho~";
+	close;
+
+s_Skills:
+	mes "[Uwe]";
+	mes "When you're beginning to learn";
+	mes "skills, you can't let yourself be";
+	mes "discouraged! Practice makes";
+	mes "perfect, you know? But never";
+	mes "use your lack of skills as an";
+	mes "excuse if you happen to fail...";
+	next;
+	mes "[Uwe]";
+	mes "Effort is also an essential";
+	mes "in forging and cooking! Now,";
+	mes "on the oher hand, if you put";
+	mes "in all the effort but didn't learn";
+	mes "any of the skills, you'll still get";
+	mes "nowhere fast, right? Right!";
+	next;
+	mes "[Uwe]";
+	mes "The key is to always";
+	mes "give 100% effort and work";
+	mes "on improving your skills.";
+	mes "Before you know it, you'll";
+	mes "be a respected master!";
+	next;
+	mes "[Uwe]";
+	mes "Well, that was";
+	mes "a fun talk. Come";
+	mes "back and visit, 'kay?";
+	mes "I'll miss you until";
+	mes "the next time~";
+	mes "...Ho ho~";
+	close;
+
+s_Tools:
+	mes "[Uwe]";
+	mes "Cooking is a little";
+	mes "easier if you have";
+	mes "nicer tools to use,";
+	mes "but that's it. Tools by";
+	mes "themselves can't make";
+	mes "just anybody a master.";
+	next;
+	mes "[Uwe]";
+	mes "In the end, the best";
+	mes "tools are the ones you're";
+	mes "most comfortable with using.";
+	mes "In fact, I still use the old knife";
+	mes "I used back when I was just";
+	mes "a little novice chef~";
+	next;
+	mes "[Uwe]";
+	mes "Well, that was";
+	mes "a fun talk. Come";
+	mes "back and visit, 'kay?";
+	mes "I'll miss you until";
+	mes "the next time~";
+	mes "...Ho ho~";
+	close; 
+
+s_Cont2:
+	mes "[Uwe]";
+	mes "Ah, hello again,";
+	mes "cutie adventurer.";
+	mes "How can I help you?";
+	next;
+	menu "Talk about Einbroch",s_Ein,"Ask him to forge a Weapon.",s_Weap,"Talk about Cooking.",s_Cooking,"Cancel.",-;	
+
+	mes "[Uwe]";
+	mes "Take care,";
+	mes "sugar honey~";
+	mes "Ho ho ho!";
+	close;
+
+s_Cooking:
+	mes "[Uwe]";
+	mes "Ooh, cooking!";
+	mes "So what did you";
+	mes "want to ask me...?";
+	next;
+	goto s_Menu3;
+
+OnHide:
+	specialeffect 16;
+	disablenpc "Uwe Kleine";
+	end;
+
+OnUnhide:
+	misceffect 215;
+	end;
+
 }
\ No newline at end of file
diff --git a/npc/quests/quests_geffen.txt b/npc/quests/quests_geffen.txt
index 628e1d3ae..2942f5a82 100644
--- a/npc/quests/quests_geffen.txt
+++ b/npc/quests/quests_geffen.txt
@@ -1,184 +1,184 @@
-//===== eAthena Script ======================================= 

-//= Quest NPCs related to Geffen

-//===== By: ================================================== 

-//= kobra_k88

-//===== Current Version: ===================================== 

-//= 1.2

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//= Welding Mask and Headset Quests.

-//===== Additional Comments: ================================= 

-//= 1.1 Fixed exploits [Lupus]

-//= 1.2 Removed Duplicates [Silent]

-//============================================================ 

-

-

-

-//==============================================================================================//

-// 					Blacksmith: 'Welding Mask' Quest

-//==============================================================================================//

-geffen_in.gat,144,166,4	script	Blacksmith#01	63,{

-	mes "[Blacksmith]";

-	mes "Who am I?!........";

-	emotion e_gasp;

-	next;

-	mes "[Blacksmith]";

-	mes "Iam the one and only Veteran Blacksmith here!! Haven't you heard???";

-	mes "I've been working for 30 years in this hot, bloody, Hellfire!";

-	emotion e_no1;

-	next;

-	mes "[Blacksmith]";

-	mes "Since I became a Blacksmith, I invented something really incredible..... wanna hear about it?";

-	next;

-	menu "I'd love to.",-, "Well, not really....",M_No;

-

-		mes "[Blacksmith]";

-		mes "Blacksmiths are always welding metals under the HOTEST and must grueling conditions!";

-		mes "The tremendous heat from the metals is so intense that it almost feels as if your face is going to burn off....";

-		emotion e_omg;

-		next;

-		mes "[Blacksmith]";

-		mes "But with my great invention, Blacksmiths no longer have to fear their faces catching on fire! I call it the ^3355FF' Welding Mask'^000000!!";

-		emotion e_ic;

-		next;

-		mes "[Blacksmith]";

-		mes "By wearing this over ones face, one will be fully protected from scorching heat and flying debirs.";

-		next;

-		mes "[Blacksmith]";

-		mes "So what do you think? For ^4455FF'50 Steels'^000000 and only ^4455FF2000 Zeny^000000, I can make you one.";

-		next;

-		menu "Hm.. Not bad. Alright.",-, "No thanks.  I'd have no use for it.",sM_No;

-

-			mes "[Blacksmith]";

-			if(countitem(999) < 50 || Zeny < 2000) goto sL_NotEnuf;

-			delitem 999,50;

-			set Zeny, Zeny - 2000;

-			mes "Great! I'll make one right away.......";

-			next;	

-			mes "~!clonk!~!clank!~!bang!~ ~!clonk!~!clank!~!bang!~";

-			next;

-			mes "[Blacksmith]";

-			mes "Here you are, your very own Welding Mask! It was a pleasure doing buisness with you!";

-			getitem 2292,1;

-			close;

-

-			sL_NotEnuf:

-				mes "Listen here.... I said I needed ^4455FF'50 Steels'^000000 and ^4455FF2000 Zeny^000000 to make you a Welding Mask.";

-				emotion e_swt;

-				close;

-

-		sM_No:

-			mes "[Blacksmith]";

-			mes "Oh man... Your gonna regret not getting one.  Trust me sooner or later you're gonna need a ^5555FFWelding Mask^000000.";

-			mes "Everybody does.....";

-			close;

-

-	M_No:

-		mes "[Blacksmith]";

-		mes "Well then, stop wasting my time!";

-		emotion e_pif;

-		close;

-}

-

-

-//=============================================================================================//

-//					Eric: Headset Quest

-//=============================================================================================//

-geffen_in.gat,30,71,4	script	Eric	83,{

-	mes "[Eric]";

-	mes "Please listen to the story of my blessed grand father...";

-	emotion e_sob;

-	next;

-	menu "Listen.",-, "Ask about Items needed.",M_Ask, "Make.",M_Make, "End Conversation.",M_End;

-

-		mes "[Eric]";

-		mes "My grand father passed away few years ago.... he was very special to me.....";

-		next;

-		mes "[Eric]";

-		mes "For as long as I can remember, he was always there for me.";

-		mes "He even took better care of me than did my own father, who was always busy with work.";

-		next;

-		mes "[Eric]";

-		mes "To me, my grand father's library was always like a 'Fairyland'.";

-		mes "I spent most of my time there and I learned a lot of things from his vast collection of books";

-		next;

-		mes "[Eric]";

-		mes "Grand father was interested in alchemy and music, so his library was filled with many books on these subjects.";

-		next;

-		mes "[Eric]";

-		mes "One day while I was in grand fathers library, I discovered an interesting design sheet.....";

-		mes "It was a design for what look liked 'Ear Muffs'.... underneath the drawing was a description that read:";

-		next;

-		mes "[Eric]";

-		mes "'When worn on over the ears, anything from music to the faintest whispers can be heard.";

-		mes "The sounds are transmitted to the ears through a thin wire.  Project Name: ^5555FFHeadset^000000";

-		next;

-		mes "[Eric]";

-		mes "It was a project that my grand father was working on before he passed away.... unfortunately he was never able to finish it.....";

-		next;

-		mes "[Eric]";

-		mes "That's why I made up my mind to pick up where he left off and finish his beloved project!";

-		mes "I met with a few Alchemists and asked them to create a working prototype based on his plans.";

-		next;

-		mes "[Eric]";

-		mes "But they were not able to understand my grand fathers concepts and therefore could not help me.";

-		next;

-		mes "[Eric]";

-		mes "Even so I did not give up and decided to make it myself.  So I studied and researched for many years....";

-		mes "And now I have a full working knowledge of my grand fathers invention, the ^5555FFHeadset^000000!!";

-		next;

-		mes "[Eric]";

-		mes "Yet there is still one obsticale that is keeping me from making it.... I do not have the materials necessary to make my grand fathers invention!";

-		next;

-		mes "[Eric]";

-		mes "My only goal in life is to realize my grand fathers ideas and pay tribute to the man I hold so dear to my heart.......";

-		emotion e_sob;

-		next;

-		mes "[Eric]";

-		mes "If only I had those materials.... Hmm... would you be iterested in this project? All I ask is that you gather the right items for me....";

-		emotion e_hmm;

-		close;

-

-	M_Ask:

-		mes "[Eric]";

-		mes "These are items needed for grand father's Headset:";

-		mes "^3355FFSteel^000000 ^FF555540^000000";

-		mes "^3355FFOridecon^000000 ^FF55551^000000";

-		mes "^3355FFAlcohol^000000 ^FF55551^000000";

-		mes "^3355FFCoal^000000 ^FF55551^000000";

-		close;

-

-	M_Make:

-		mes "[Eric]";

-		if(countitem(999) < 40 || countitem(984) < 1 || countitem(970)<1 || countitem(1003) < 1) goto L_NotEnuf;

-		delitem 999,40;

-		delitem 984,1;

-		delitem 970,1;

-		delitem 1003,1;

-		mes "Oh this is GREAT!! You have all of the materials I need to make my grandfather's Headset!";

-		emotion e_ic;

-		next;

-		mes "[Eric]";

-		mes "Give me a few minutes to assemble it...............";

-		next;

-		getitem 5001,1;

-		mes "[Eric]";

-		mes "FINALLY!! It's complete! My grand father's Headset! Please take them... without your help this wouldn't have been possible.";

-		emotion e_gasp;

-		next;

-		mes "[Eric]";

-		mes "Thank so very much! Because of you, I could fullfill my grand father's wish.  I just know he's smiling down on me from Heaven.....";

-		emotion e_thx;

-		close;

-

-		L_NotEnuf:

-			mes "Thank you for trying to help me but..... you don't seem to have all of the items I need.....";

-			emotion e_swt;

-			close;

-	M_End:

-		mes "[Eric]";

-		mes "Farewell..... boo hoo....";

-		emotion e_sob;

-		close;

-}

+//===== eAthena Script ======================================= 
+//= Quest NPCs related to Geffen
+//===== By: ================================================== 
+//= kobra_k88
+//===== Current Version: ===================================== 
+//= 1.2
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//= Welding Mask and Headset Quests.
+//===== Additional Comments: ================================= 
+//= 1.1 Fixed exploits [Lupus]
+//= 1.2 Removed Duplicates [Silent]
+//============================================================ 
+
+
+
+//==============================================================================================//
+// 					Blacksmith: 'Welding Mask' Quest
+//==============================================================================================//
+geffen_in.gat,144,166,4	script	Blacksmith#01	63,{
+	mes "[Blacksmith]";
+	mes "Who am I?!........";
+	emotion e_gasp;
+	next;
+	mes "[Blacksmith]";
+	mes "Iam the one and only Veteran Blacksmith here!! Haven't you heard???";
+	mes "I've been working for 30 years in this hot, bloody, Hellfire!";
+	emotion e_no1;
+	next;
+	mes "[Blacksmith]";
+	mes "Since I became a Blacksmith, I invented something really incredible..... wanna hear about it?";
+	next;
+	menu "I'd love to.",-, "Well, not really....",M_No;
+
+		mes "[Blacksmith]";
+		mes "Blacksmiths are always welding metals under the HOTEST and must grueling conditions!";
+		mes "The tremendous heat from the metals is so intense that it almost feels as if your face is going to burn off....";
+		emotion e_omg;
+		next;
+		mes "[Blacksmith]";
+		mes "But with my great invention, Blacksmiths no longer have to fear their faces catching on fire! I call it the ^3355FF' Welding Mask'^000000!!";
+		emotion e_ic;
+		next;
+		mes "[Blacksmith]";
+		mes "By wearing this over ones face, one will be fully protected from scorching heat and flying debirs.";
+		next;
+		mes "[Blacksmith]";
+		mes "So what do you think? For ^4455FF'50 Steels'^000000 and only ^4455FF2000 Zeny^000000, I can make you one.";
+		next;
+		menu "Hm.. Not bad. Alright.",-, "No thanks.  I'd have no use for it.",sM_No;
+
+			mes "[Blacksmith]";
+			if(countitem(999) < 50 || Zeny < 2000) goto sL_NotEnuf;
+			delitem 999,50;
+			set Zeny, Zeny - 2000;
+			mes "Great! I'll make one right away.......";
+			next;	
+			mes "~!clonk!~!clank!~!bang!~ ~!clonk!~!clank!~!bang!~";
+			next;
+			mes "[Blacksmith]";
+			mes "Here you are, your very own Welding Mask! It was a pleasure doing buisness with you!";
+			getitem 2292,1;
+			close;
+
+			sL_NotEnuf:
+				mes "Listen here.... I said I needed ^4455FF'50 Steels'^000000 and ^4455FF2000 Zeny^000000 to make you a Welding Mask.";
+				emotion e_swt;
+				close;
+
+		sM_No:
+			mes "[Blacksmith]";
+			mes "Oh man... Your gonna regret not getting one.  Trust me sooner or later you're gonna need a ^5555FFWelding Mask^000000.";
+			mes "Everybody does.....";
+			close;
+
+	M_No:
+		mes "[Blacksmith]";
+		mes "Well then, stop wasting my time!";
+		emotion e_pif;
+		close;
+}
+
+
+//=============================================================================================//
+//					Eric: Headset Quest
+//=============================================================================================//
+geffen_in.gat,30,71,4	script	Eric	83,{
+	mes "[Eric]";
+	mes "Please listen to the story of my blessed grand father...";
+	emotion e_sob;
+	next;
+	menu "Listen.",-, "Ask about Items needed.",M_Ask, "Make.",M_Make, "End Conversation.",M_End;
+
+		mes "[Eric]";
+		mes "My grand father passed away few years ago.... he was very special to me.....";
+		next;
+		mes "[Eric]";
+		mes "For as long as I can remember, he was always there for me.";
+		mes "He even took better care of me than did my own father, who was always busy with work.";
+		next;
+		mes "[Eric]";
+		mes "To me, my grand father's library was always like a 'Fairyland'.";
+		mes "I spent most of my time there and I learned a lot of things from his vast collection of books";
+		next;
+		mes "[Eric]";
+		mes "Grand father was interested in alchemy and music, so his library was filled with many books on these subjects.";
+		next;
+		mes "[Eric]";
+		mes "One day while I was in grand fathers library, I discovered an interesting design sheet.....";
+		mes "It was a design for what look liked 'Ear Muffs'.... underneath the drawing was a description that read:";
+		next;
+		mes "[Eric]";
+		mes "'When worn on over the ears, anything from music to the faintest whispers can be heard.";
+		mes "The sounds are transmitted to the ears through a thin wire.  Project Name: ^5555FFHeadset^000000";
+		next;
+		mes "[Eric]";
+		mes "It was a project that my grand father was working on before he passed away.... unfortunately he was never able to finish it.....";
+		next;
+		mes "[Eric]";
+		mes "That's why I made up my mind to pick up where he left off and finish his beloved project!";
+		mes "I met with a few Alchemists and asked them to create a working prototype based on his plans.";
+		next;
+		mes "[Eric]";
+		mes "But they were not able to understand my grand fathers concepts and therefore could not help me.";
+		next;
+		mes "[Eric]";
+		mes "Even so I did not give up and decided to make it myself.  So I studied and researched for many years....";
+		mes "And now I have a full working knowledge of my grand fathers invention, the ^5555FFHeadset^000000!!";
+		next;
+		mes "[Eric]";
+		mes "Yet there is still one obsticale that is keeping me from making it.... I do not have the materials necessary to make my grand fathers invention!";
+		next;
+		mes "[Eric]";
+		mes "My only goal in life is to realize my grand fathers ideas and pay tribute to the man I hold so dear to my heart.......";
+		emotion e_sob;
+		next;
+		mes "[Eric]";
+		mes "If only I had those materials.... Hmm... would you be iterested in this project? All I ask is that you gather the right items for me....";
+		emotion e_hmm;
+		close;
+
+	M_Ask:
+		mes "[Eric]";
+		mes "These are items needed for grand father's Headset:";
+		mes "^3355FFSteel^000000 ^FF555540^000000";
+		mes "^3355FFOridecon^000000 ^FF55551^000000";
+		mes "^3355FFAlcohol^000000 ^FF55551^000000";
+		mes "^3355FFCoal^000000 ^FF55551^000000";
+		close;
+
+	M_Make:
+		mes "[Eric]";
+		if(countitem(999) < 40 || countitem(984) < 1 || countitem(970)<1 || countitem(1003) < 1) goto L_NotEnuf;
+		delitem 999,40;
+		delitem 984,1;
+		delitem 970,1;
+		delitem 1003,1;
+		mes "Oh this is GREAT!! You have all of the materials I need to make my grandfather's Headset!";
+		emotion e_ic;
+		next;
+		mes "[Eric]";
+		mes "Give me a few minutes to assemble it...............";
+		next;
+		getitem 5001,1;
+		mes "[Eric]";
+		mes "FINALLY!! It's complete! My grand father's Headset! Please take them... without your help this wouldn't have been possible.";
+		emotion e_gasp;
+		next;
+		mes "[Eric]";
+		mes "Thank so very much! Because of you, I could fullfill my grand father's wish.  I just know he's smiling down on me from Heaven.....";
+		emotion e_thx;
+		close;
+
+		L_NotEnuf:
+			mes "Thank you for trying to help me but..... you don't seem to have all of the items I need.....";
+			emotion e_swt;
+			close;
+	M_End:
+		mes "[Eric]";
+		mes "Farewell..... boo hoo....";
+		emotion e_sob;
+		close;
+}
diff --git a/npc/quests/quests_gonryun.txt b/npc/quests/quests_gonryun.txt
index e7e7c231c..83000a5db 100644
--- a/npc/quests/quests_gonryun.txt
+++ b/npc/quests/quests_gonryun.txt
@@ -1,3493 +1,3493 @@
-//===== eAthena Script ======================================= 

-//= Quest NPCs related to Gonryun

-//===== By: ==================================================

-//= KarLaeda

-//===== Current Version: ===================================== 

-//= 1.0

-//===== Compatible With: ===================================== 

-//= eAthena 1

-//===== Description: ========================================= 

-//= Gonryun Broken Sword Quest

-//===== Additional Comments: ================================= 

-//= 

-//============================================================ 

-

-

-gon_in.gat,17,93,5	script	Chief#gnbs	775,{

-	mes "[SaYumMoon]";

-	if (BaseLevel <= 50) {

-		mes "hmm...";

-		mes "Oh, Hi there~";

-		mes "I am SaYumMoon, a chief of";

-		mes "this village.";

-		mes "Welcome to Kunlun.";

-		next;

-		mes "[SaYumMoon]";

-		mes "Well, to tell you about this village..";

-		mes "We weren't that much associated with ";

-		mes "other villages.";

-		mes "Nevertheless, through the village named";

-		mes "Alberta, we allowed people to visit";

-		mes "here. It all happened lately.";

-		next;

-		mes "[SaYumMoon]";

-		mes "I feel that this town has been";

-		mes "isolated for too long.";

-		mes "Therefore, people in this town";

-		mes "are not yet so friendly with";

-		mes "visitors yet.";

-		next;

-		mes "[SaYumMoon]";

-		mes "Moreover, thieves are having";

-		mes "fun in this town lately.";

-		mes "Well, you've come to visit this";

-		mes "town.. Enjoy your stay.";

-		close;

-	}

-	if (b_sword == 0) {

-		set b_sword,1;

-		mes "hmm...";

-		mes "Oh, Hi there~";

-		mes "I am SaYumMoon, a chief of";

-		mes "this village.";

-		mes "Welcome to Kunlun.";

-		next;

-		mes "[SaYumMoon]";

-		mes "Well, to tell you about this village..";

-		mes "We weren't that much associated with ";

-		mes "other villages.";

-		mes "Nevertheless, through the village named";

-		mes "Alberta, we allowed people to visit";

-		mes "here. It all happened lately.";

-		next;

-		mes "[SaYumMoon]";

-		mes "I feel that this town has been";

-		mes "isolated for too long.";

-		mes "Therefore, people in this town";

-		mes "are not yet so friendly with";

-		mes "visitors yet.";

-		next;

-		mes "[SaYumMoon]";

-		mes "Moreover, thieves are having";

-		mes "fun in this town lately.";

-		mes "Well, you've come to visit this";

-		mes "town.. Enjoy your stay.";

-		close;

-	}

-	if (b_sword < 18) {

-		switch (b_sword) {

-		case 1:

-			mes "Umm....";

-			mes "Oh, Hi there~";

-			mes "I am SaYumMoon, a chief of";

-			mes "this village.";

-			next;

-			mes "[SaYumMoon]";

-			mes "Welcome to Kunlun.";

-			mes "I feel that this village has been";

-			mes "isolated for too long";

-			mes "unlike other villages.";

-			next;

-			mes "[SaYumMoon]";

-			mes "Nevertheless, through the village named";

-			mes "Alberta, we allowed people to visit";

-			mes "here. It all happened lately.";

-			mes "Since our village has been";

-			next;

-			mes "[SaYumMoon]";

-			mes "isolated for long time,";

-			mes "people in this town";

-			mes "are not yet so friendly with";

-			mes "visitors yet.";

-			mes "Moreover, thieves are having";

-			next;

-			mes "[SaYumMoon]";

-			mes "fun in this town lately.";

-			mes "Well, you've come to visit this";

-			mes "town.. Enjoy your stay.";

-			break;

-		case 2:

-			mes "Oh, it's you~";

-			mes "How do you like it here so far?";

-			mes "Like you've noticed,";

-			mes "village is not so peaceful huh?";

-			next;

-			if(select("It's alright.:I heard that something was stolen..") == 1){

-				mes "[SaYumMoon]";

-				mes "Good...";

-				mes "Well, watch out for robbery.";

-				mes "And..don't act suspicious";

-				mes "in the village.";

-				close;

-			}

-			mes "[SaYumMoon]";

-			mes "hmm..you heard of it?";

-			mes "It was just last night when robbery";

-			mes "occurred. The rumor was true..";

-			mes "Lots of thieves are out there in the village.";

-			next;

-			switch(select("......:What was stolen?:Anyone with injuries?")){

-			case 1:

-				mes "[SaYumMoon]";

-				mes "Can't believe it really happened.";

-				mes "If you see anyone suspicious,";

-				mes "please let me know.";

-				set b_sword,3;

-				break;

-			case 2:

-				mes "[SaYumMoon]";

-				mes "um.....";

-				mes "that is....";

-				mes "just an ordinary sword.";

-				mes "But to us, it's a family treasure";

-				mes "from generation to generation.";

-				next;

-				mes "[SaYumMoon]";

-				mes "I must find this sword";

-				mes "no mattter what!";

-				mes "...but I can't go find it just";

-				mes "by myself. I am too busy.";

-				next;

-				mes "[SaYumMoon]";

-				mes "You know how busy it is to be a";

-				mes "chief of village.";

-				mes "This is a big trouble...hmm...";

-				next;

-				if (select("Hope you find it soon.:Can I find it for you?") == 1){

-					mes "[SaYumMoon]";

-					mes "um..thank you.";

-					mes "Perhaps you find a sword, ";

-					mes "please let me know.";

-					set b_sword,11;

-				} else {

-					mes "[SaYumMoon]";

-					mes "Oh~ Are you serious??";

-					mes "People in the village are";

-					mes "now very sensitive cause of";

-					mes "thieves. It is so difficult to ask";

-					mes "them for a help. If you would help";

-					mes "me to find a sword. I'll pay for that for sure.";

-					set b_sword,3;

-				}

-				break;

-			case 3:

-				mes "[SaYumMoon]";

-				mes "Fortunately, no one's hurt.";

-				mes "But we lost something valuable.";

-				mes "It's a family treasure";

-				mes "which came from generation";

-				mes "to generation.";

-				next;

-				mes "[SaYumMoon]";

-				mes "I must find this sword";

-				mes "no mattter what!";

-				mes "...but I can't go find it just";

-				mes "by myself. I am too busy.";

-				next;

-				mes "[SaYumMoon]";

-				mes "You know how busy it is to be a";

-				mes "chief of village.";

-				mes "This is a big trouble...hmm...";

-				next;

-				if (select("Hope you find it soon.:Can I find it for you?") == 1){

-					mes "[SaYumMoon]";

-					mes "um..thank you.";

-					mes "Perhaps you find a sword, ";

-					mes "please let me know.";

-					set b_sword,11;

-				} else {

-					mes "[SaYumMoon]";

-					mes "Oh~ Are you serious??";

-					mes "People in the village are";

-					mes "now very sensitive cause of";

-					mes "thieves. It is so difficult to ask";

-					mes "them for a help. If you would help";

-					mes "me to find a sword. I'll pay for that for sure.";

-					set b_sword,3;

-				}

-				break;

-			}

-			break;

-		case 3:

-			mes "Haven't found it yet?";

-			mes "No rush. Take it easy.";

-			mes "You have to take care of";

-			mes "youself first before";

-			mes "doing other's favors.";

-			break;

-		case 4:

-			mes "Haven't found it yet?";

-			mes "No rush. Take it easy.";

-			mes "You have to take care of";

-			mes "youself first before";

-			mes "doing other's favors.";

-			break;

-		case 5:

-			mes "Haven't found it yet?";

-			mes "No rush. Take it easy.";

-			mes "You have to take care of";

-			mes "youself first before";

-			mes "doing other's favors.";

-			break;

-		case 6:

-			mes "Oh, you found a traces?";

-			mes "You're doing a good work.";

-			mes "This is my family remedies.";

-			mes "It might help you.";

-			set b_sword,7;

-			getitem 504,3; // White_Potion

-			break;

-		case 7:

-			mes "Thief is in an injury.";

-			mes "He probably is not";

-			mes "far away from here.";

-			break;

-		case 8:

-			mes "Oh, my sword...";

-			mes "..it's broken?";

-			mes "Unbelievable~";

-			mes "How could this happen..";

-			mes "Would you also look for";

-			mes "the other parts please?";

-			break;

-		case 9:

-			mes "hmm...";

-			mes "..my sword... in pieces..";

-			mes "I beg you please. Find it for me.";

-			mes "You'll get something in return.";

-			break;

-		case 10:

-			mes "Oh~~";

-			mes "You've found the pieces for me~";

-			mes "I knew you would've make it.";

-			mes "But they are broken into pieces.";

-			mes "What should I do...";

-			next;

-			mes "[SaYumMoon]";

-			mes "If it's ok with you,";

-			mes "Would you repair my sword for me?";

-			mes "I'm sure I'll pay for that.";

-			next;

-			if (select("No way.:Alright.") == 1) {

-				mes "[SaYumMoon]";

-				mes "Well, yes.. you've been such a";

-				mes "nice person. I appreciate for";

-				mes "your hard work.";

-				mes "It would be better if you help me";

-				mes "to repair the sword for me though..";

-				mes "nono.. I am not enforcing you..";

-				next;

-				mes "[SaYumMoon]";

-				mes "I'll find someway to repair it.";

-				mes "Without your help, I could've done";

-				mes "nothing. This is not a big present";

-				mes "but please take it.";

-				set b_sword,15;

-				getitem 603,1; // Old_Blue_Box

-				next;

-				mes "[SaYumMoon]";

-				mes "If you get any informations or";

-				mes "traces about that damn thief,";

-				mes "please let me know.";

-				mes "I got my sword back but there's";

-				mes "no way I can forgive that thief.";

-				mes "Have a nice travel.";

-			} else {

-				mes "[SaYumMoon]";

-				mes "Wow..you are so nice.";

-				mes "I am owing you a big favor.";

-				mes "I have no idea how this sword";

-				mes "broke into pieces.";

-				mes "I believe you have to find famous";

-				mes "blacksmith to repair it.";

-				next;

-				mes "[SaYumMoon]";

-				mes "Like you know already, this is";

-				mes "a family treasure for me.";

-				mes "oh.. one more thing..";

-				next;

-				mes "[SaYumMoon]";

-				mes "There's a guy named ^555555Choahk^000000";

-				mes "in the village. He has been to many";

-				mes "places all around the world.";

-				mes "He probably has the informations";

-				mes "you need. Go find him first.";

-				next;

-				mes "[SaYumMoon]";

-				mes "and.. this is not a big gift";

-				mes "but please take it..";

-				mes "here...";

-				set b_sword,14;

-				getitem 603,1; // Old_Blue_Box

-			}

-			break;

-		case 11:

-			mes "The village is not in a good";

-			mes "mood at this moment, but still";

-			mes "lots of things to look around.";

-			break;

-		case 12:

-			mes "hmm.. no traces? no marks?... nothing?";

-			mes "ok.. well, thanks for help anyways.";

-			mes "umm....";

-			next;

-			mes "[SaYumMoon]";

-			mes "Here..take this.";

-			mes "Have a good time.";

-			set b_sword,13;

-			getitem 504,1; // White_Potion

-			break;

-		case 13:

-			mes "Everything going well?";

-			mes "The village is not in a good mood.";

-			mes "Take care of yourself.";

-			break;

-		case 14:

-			mes "I appreciate what you are doing.";

-			mes "You make me feel comfortable.";

-			mes "Village seems it's turning back";

-			mes "to old times too. huhu";

-			break;

-		case 15:

-			mes "I appreciate what you are doing.";

-			mes "You make me feel comfortable.";

-			mes "Village seems it's turning back";

-			mes "to old times too. huhu";

-			break;

-		case 16:

-			mes "I appreciate what you are doing.";

-			mes "You make me feel comfortable.";

-			mes "Village seems it's turning back";

-			mes "to old times too. huhu";

-			break;

-		case 17:

-			mes "I appreciate what you are doing.";

-			mes "You make me feel comfortable.";

-			mes "Village seems it's turning back";

-			mes "to old times too. huhu";

-			break;

-		}

-	} else if (b_sword < 32) {

-		mes "I appreciate what you are doing.";

-		mes "You make me feel comfortable.";

-		mes "Village seems it's turning back";

-		mes "to old times too. huhu";

-		mes "and please repair my";

-		mes "sword for me.";

-		next;

-		mes "[SaYumMoon]";

-		mes "You've done so many things for me.";

-		mes "I feel sorry about asking you";

-		mes "more to do.";

-	} else if (b_sword == 32) {

-		if (countitem(1123) < 1) { // Haedonggum

-			mes "um.....";

-			mes "Not yet huh?";

-			mes "You'll repair it for me right?";

-			mes "I'll be waiting.";

-		} else {

-			mes "oh.. it's you.";

-			mes "............";

-			mes "Is that my sword?";

-			mes "Wow you have done it.";

-			mes "Good work!";

-			next;

-			mes "[SaYumMoon]";

-			mes "Hmm..If you have a similar sword I have,";

-			mes "please leave it somewhere else and come back.";

-			mes "Just in case that you give me a wrong one...";

-			next;

-			if(select("Wait for sec:Here it is.") == 1 || countitem(1123) < 1){

-				mes "[SaYumMoon]";

-				mes "Ok, go ahead.";

-				mes "Don't leave mine!!";

-				mes "haha..";

-				close;

-			}

-			mes "[SaYumMoon]";

-			mes "This is a small gift for you.";

-			mes "Please take it.";

-			mes "Thanks for a job well done!";

-			delitem 1123,1; // Haedonggum

-			set b_sword,33;

-			getitem 2404,1; // Shoes_

-			next;

-			mes "[SaYumMoon]";

-			mes "Many thanks for your trouble.";

-			mes "Now I don't feel shame to";

-			mes "ancestors anymore.";

-			mes "huhuh...";

-			mes "Have a good time.";

-		}

-	} else {

-		mes "Oh, it's you.";

-		mes "Once again, thank you.";

-		mes "Enjoy your stay in";

-		mes "our village.";

-		mes "huhuh..";

-	}

-	close;

-}

-

-gon_in.gat,152,35,4	script	Hostess#gnbs	702,{

-	mes "[MaYumBang]";

-	if (b_sword < 1) {

-		mes "Oh.. you're new here right?";

-		mes "Came from out of town?";

-		mes "It's easy to see many people from";

-		mes "out of town these days.";

-		mes "It made people in the village busy.";

-		next;

-		mes "[MaYumBang]";

-		mes "Oops, what am I saying..";

-		mes "Wants some wine?";

-		next;

-		if (select("Yes, please:No, it's ok.") == 1) {

-			mes "[MaYumBang]";

-			mes "Oooops.. oh no...";

-			mes "Many customers came by earlier and";

-			mes "we are out of wine..";

-			mes "Customers are growing larger.";

-			mes "It is also a trouble..";

-		} else {

-			mes "[MaYumBang]";

-			mes "Well, have fun in the village.";

-			mes "Stop by sometimes.";

-		}

-	} else if (b_sword < 3) {

-		mes "You know what?";

-		mes "Chief's house was robbed last night.";

-		mes "I can't believe this happened.";

-		mes "Thieves are hanging around the";

-		mes "village these days.";

-		next;

-		mes "[MaYumBang]";

-		mes "How anxious it is..";

-		mes "It could also happen to my shop.";

-		mes "I should watch out.";

-		mes "oh..what am I saying to you..";

-		mes "Enjoy your time in my shop..hoho.";

-		if (b_sword == 1) set b_sword,2;

-	} else if (b_sword == 3) {

-		mes "Oh, it's you again.";

-		mes "I heard that you decided to";

-		mes "help our chief.";

-		mes "Please get him for us.";

-		mes "How anxious it is..";

-		next;

-		mes "[MaYumBang]";

-		mes "Do you see that guy over there";

-		mes "leaning on the table?";

-		mes "He seems to know about last night's";

-		mes "happenings.";

-		mes "He has been drinking all night long.";

-		set b_sword,4;

-	} else if (b_sword > 3 && b_sword < 11) {

-		mes "Hello there.";

-		mes "Feel something strange in the village huh?";

-		mes "It's all because of the thieves.";

-		mes "And it makes my business worse.";

-		mes "peeew...";

-	} else if (b_sword == 11 || b_sword == 12) {

-		mes "Feel something strange in the village huh?";

-		mes "Hope the thief to get caught in short time.";

-		mes "...";

-	} else {

-		mes "You caught him?";

-		mes "Wow, how brave you are.";

-		mes "I should get ready to run the";

-		mes "shop again. I need to order";

-		mes "some wine first.";

-		next;

-		mes "[MaYumBang]";

-		mes "SulBoong drank all the wine in the shop.";

-		mes "I did not refill the wine since there";

-		mes "aren't any customers...hoho.";

-		mes "Stop by next time.";

-		mes "I'll have a wine ready.";

-	}

-	close;

-}

-

-gon_in.gat,165,16,4	script	Man in hangover#gnbs	748,{

-	mes "[SulBoong]";

-	if (b_sword < 4) {

-		mes "Ahhh.. my stomach.. my head..";

-		mes "Shouldn't drink so much..";

-		mes "Ehhhh....";

-		emotion e_swt2;

-	} else if (b_sword == 4) {

-		if (countitem(506) < 1) { // Green_Potion

-			mes "Ehhh....";

-			mes "Can somebody bring me a potion?";

-			mes "Ehhh....";

-			close;

-		}

-		mes "Ehhh..my stomach..";

-		mes "I need something..";

-		mes "Ehhh..";

-		mes "uh..hey you.. could you give me one of";

-		mes "your ^00FF00Green_Potion^000000 to me?";

-		mes "I got a mad stomach.";

-		next;

-		if (select("No.:Ok, here.") == 1 || countitem(506) < 1) {

-			mes "[SulBoong]";

-			mes "Ehh...";

-			mes "Are you sure?";

-			next;

-			if (select("Sorry, I don't have one.:Ok, here it is.") == 1 || countitem(506) < 1) {

-				mes "[SulBoong]";

-				mes "Wooo..";

-				mes "Go away man..";

-				set b_sword,12;

-				close;

-			}

-			delitem 506,1; // Green_Potion

-			set b_sword,5;

-			mes "[SulBoong]";

-			mes "Oh.. thanks.";

-			mes "I thought you're teasing me.";

-			mes "I feel much better now.";

-			mes "By the way.. You got any questions?";

-			next;

-			if (select("About thief.:Nothing.") == 1){

-				mes "[SulBoong]";

-				mes "Ah~ a thief..";

-				mes "hmm.. let me see..";

-				mes "I went out for walk in the middle";

-				mes "of night while I was drinking.";

-				mes "And I heard something noisy.";

-				next;

-				mes "[SulBoong]";

-				mes "I looked around and found that";

-				mes "area near chief's house was brighter";

-				mes "than any other area. It was strange.";

-				mes "So I kept watching at it and";

-				mes "all of a sudden, I saw something moving";

-				mes "on the roof of houses.";

-				next;

-				mes "[SulBoong]";

-				mes "It disappeared in a second.";

-				mes "I was drunk, and it was dark outside.";

-				mes "I have no idea whether it was a man or a cat or..";

-				mes "don't know what it was.. huhu..";

-				set b_sword,6;

-			} else {

-				mes "[SulBoong]";

-				mes "Ok, then, good bye..";

-				mes "Don't be a drinker like me.";

-				mes "Unless you want to suffer from a hangovers.";

-				mes "huhu..";

-			}

-		} else {

-			delitem 506,1; // Green_Potion

-			set b_sword,5;

-			emotion e_thx;

-			mes "[SulBoong]";

-			mes "Thank you.";

-			mes "heew.. feel much better now.";

-			mes "hmm.. you seem like you got";

-			mes "something to ask me.";

-			next;

-			switch(select("About thief..:How much have you been drinking?:Nothing..")){

-			case 1:

-				mes "[SulBoong]";

-				mes "Ah~ a thief..hmm...";

-				mes "I went out for walk in the middle";

-				mes "of night while I was drinking.";

-				mes "And I heard something noisy.";

-				mes "I looked around and found that";

-				mes "area near chief's house was brighter";

-				next;

-				mes "[SulBoong]";

-				mes "than any other area. It was strange.";

-				mes "So I kept watching at it and";

-				mes "all of a sudden, I saw something moving";

-				mes "on the roof of houses.";

-				mes "It disappeared in a second.";

-				next;

-				if (select("Where to?:Probably a cat.") == 1) {

-					mes "[SulBoong]";

-					mes "Umm?";

-					mes "Well..let me see..";

-					mes "It came from... and head to...um...";

-					mes "bla bla..";

-					next;

-					mes "He was mumbling for awhile";

-					mes "......";

-					next;

-					mes "[SulBoong]";

-					mes "Ah ha~ right...";

-					mes "A shrine.. yes..thief was heading to";

-					mes "a shrine and disappeared.";

-					mes "I'm not sure if it was a human or";

-					mes "an animal...but little big creature.";

-					mes "wonder what it was..";

-					set b_sword,6;

-					next;

-					mes "[SulBoong]";

-					mes "Anything else I can help?";

-					mes "Thanks for the potion.";

-					next;

-					switch(select("Thanks for the information.:Stop drinking too much.:Ok, bye")){

-					case 1:

-						mes "[SulBoong]";

-						mes "I'll see you later then.";

-						mes "I am always here drinking..huhu";

-						break;

-					case 2:

-						mes "[SulBoong]";

-						mes "hmm..";

-						mes "Don't mind me.";

-						break;

-					case 3:

-						mes "[SulBoong]";

-						mes "Alrighty.";

-						mes "Come again whenever you find";

-						mes "any other questions.";

-						break;

-					}

-				} else {

-					mes "[SulBoong]";

-					mes "Yeah..maybe.";

-					mes "It was so dark outside and I was drunk.";

-					mes "I can't remember it clearly.";

-					mes "Anyways it was bigger than a cat for sure.";

-				}

-				break;

-			case 2:

-				mes "[SulBoong]";

-				mes "Ah..um....I..I am not sure.";

-				mes "When I woke up, There were so many";

-				mes "empty bottles around me.";

-				mes ".....";

-				next;

-				mes "^00FF00.......";

-				mes "Without a specific reason, he seemed to be very respectable.^000000";

-				break;

-			case 3:

-				mes "[SulBoong]";

-				mes "alright then.";

-				mes "Hope you don't ever drink like me";

-				mes "in the future.";

-				mes "You'll suffer for long time if you do.";

-				mes "You know what hangover is right?";

-				break;

-			}

-		}

-	} else if (b_sword == 5) {

-		mes "Oh, it's you.";

-		mes "Thanks for the portion last time.";

-		mes "What are you up to?";

-		mes "Got any question for me?";

-		next;

-		if (select("About a thief last night...:Nope, just passing by..") == 1){

-			mes "[SulBoong]";

-			mes "Ah~ a thief..";

-			mes "hmm.. let me see..";

-			mes "I went out for walk in the middle";

-			mes "of night while I was drinking.";

-			mes "And I heard something noisy.";

-			mes "I looked around and found that";

-			next;

-			mes "[SulBoong]";

-			mes "area near chief's house was brighter";

-			mes "than any other area. It was strange.";

-			mes "So I kept watching at it and";

-			mes "all of a sudden, I saw something moving";

-			mes "on the roof of houses.";

-			next;

-			mes "[SulBoong]";

-			mes "It disappeared in a second.";

-			mes "I was drunk, and it was dark outside.";

-			mes "I have no idea whether it was a man or a cat or..";

-			mes "don't know what it was.. huhu..";

-			set b_sword,6;

-		} else {

-			mes "[SulBoong]";

-			mes "alright then.";

-			mes "Hope you don't ever drink like me";

-			mes "in the future.";

-			mes "bye.";

-		}

-	} else if (b_sword < 11) {

-		mes "Well, do your job well.";

-		mes "To keep the peace in our village,";

-		mes "we need to take chief's worries out.";

-	} else if (b_sword <14) {

-		switch (b_sword) {

-		case 11:

-			mes "Ahhh.. my stomach.. my head..";

-			mes "Shouldn't drink so much..";

-			mes "Ehhhh....";

-			emotion e_swt2;

-			break;

-		case 12:

-			mes "Ehhhh..go away.";

-			mes "You're a man with no mercy.";

-			mes "ehhh...";

-			emotion e_pif;

-			break;

-		case 13:

-			mes "Ehhhh..go away.";

-			mes "You're such a coldhearted man.";

-			mes "ehhh...";

-			emotion e_pif;

-			break;

-		}

-	} else {

-		mes "Wahahaha.";

-		mes "So..you found a chief's belongging's?";

-		mes "I knew you could've done it.";

-		mes "You're brave enough to do anything.";

-		mes "Wahahaha.";

-	}

-	close;

-}

-

-gon_dun01.gat,148,156,0	script	start01#gnbs	-1,{

-	OnInit:

-		sleep 10000;

-	OnCommandOn:

-		donpcevent "trace1-"+rand(1,5)+"::OnCommandOn";

-		end;

-}

-

-gon_dun01.gat,201,25,0	script	trace1-1#gnbs	139,1,1,{

-	if (b_sword == 7) donpcevent "timer1-1::OnCommandOn";

-	end;

-

-	OnTimer10000:

-		stopnpctimer;

-		disablenpc "trace1-1#gnbs";

-		donpcevent "start01#gnbs::OnCommandOn";

-		end;

-

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "trace1-1#gnbs";

-		end;

-

-	OnCommandOn:

-		enablenpc "trace1-1#gnbs";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-}

-

-gon_dun01.gat,2,1,0	script	timer1-1	-1,{

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "timer1-1";

-		end;

-

-	OnCommandOn:

-		enablenpc "timer1-1";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-

-	OnCommandOff:

-		stopnpctimer;

-		disablenpc "timer1-1";

-		end;

-

-	OnTimer3000:

-		donpcevent "#getitem1-1::OnCommandOn";

-		end;

-}

-

-gon_dun01.gat,202,25,0	script	#getitem1-1	111,2,1,{

-	if (b_sword != 7) end;

-	set b_sword,8;

-	mes "You found ^FF0000piece of blade^000000.";

-	mes "Seems like it's a part of the sword you've been looking for.";

-	close;

-

-	OnInit:

-		disablenpc "#getitem1-1";

-		end;

-

-	OnCommandOn:

-		enablenpc "#getitem1-1";

-		donpcevent "timer1-1::OnCommandOff";

-		donpcevent "start01#gnbs::OnCommandOn";

-

-	OnCommandOff:

-		disablenpc "#getitem1-1";

-		end;

-}

-

-gon_dun01.gat,190,160,0	script	trace1-2#gnbs	139,1,1,{

-	if (b_sword == 7) donpcevent "timer1-2::OnCommandOn";

-	end;

-

-	OnTimer100000:

-		stopnpctimer;

-		disablenpc "trace1-2#gnbs";

-		donpcevent "start01#gnbs::OnCommandOn";

-		end;

-

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "trace1-2#gnbs";

-		end;

-

-	OnCommandOn:

-		enablenpc "trace1-2#gnbs";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-}

-

-gon_dun01.gat,3,1,0	script	timer1-2	-1,{

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "timer1-2";

-		end;

-

-	OnCommandOn:

-		enablenpc "timer1-2";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-

-	OnCommandOff:

-		stopnpctimer;

-		disablenpc "timer1-2";

-		end;

-

-	OnTimer3000:

-		donpcevent "#getitem1-2::OnCommandOn";

-		end;

-}

-

-gon_dun01.gat,190,159,0	script	#getitem1-2	111,2,1,{

-	if (b_sword != 7) end;

-	set b_sword,8;

-	mes "You found ^FF0000piece of blade^000000.";

-	mes "Seems like it's a part of the sword you've been looking for.";

-	close;

-

-	OnInit:

-		disablenpc "#getitem1-2";

-		end;

-

-	OnCommandOn:

-		enablenpc "#getitem1-2";

-		donpcevent "timer1-2::OnCommandOff";

-		donpcevent "start01#gnbs::OnCommandOn";

-

-	OnCommandOff:

-		disablenpc "#getitem1-2";

-		end;

-}

-

-gon_dun01.gat,163,53,0	script	trace1-3#gnbs	139,1,1,{

-	if (b_sword == 7) donpcevent "timer1-3::OnCommandOn";

-	end;

-

-	OnTimer90000:

-		stopnpctimer;

-		disablenpc "trace1-3#gnbs";

-		donpcevent "start01#gnbs::OnCommandOn";

-		end;

-

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "trace1-3#gnbs";

-		end;

-

-	OnCommandOn:

-		enablenpc "trace1-3#gnbs";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-}

-

-gon_dun01.gat,4,1,0	script	timer1-3	-1,{

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "timer1-3";

-		end;

-

-	OnCommandOn:

-		enablenpc "timer1-3";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-

-	OnCommandOff:

-		stopnpctimer;

-		disablenpc "timer1-3";

-		end;

-

-	OnTimer3000:

-		donpcevent "#getitem1-3::OnCommandOn";

-		end;

-}

-

-gon_dun01.gat,164,53,0	script	#getitem1-3	111,2,1,{

-	if (b_sword != 7) end;

-	set b_sword,8;

-	mes "You found ^FF0000piece of blade^000000.";

-	mes "Seems like it's a part of the sword you've been looking for.";

-	close;

-

-	OnInit:

-		disablenpc "#getitem1-3";

-		end;

-

-	OnCommandOn:

-		enablenpc "#getitem1-3";

-		donpcevent "timer1-3::OnCommandOff";

-		donpcevent "start01#gnbs::OnCommandOn";

-

-	OnCommandOff:

-		disablenpc "#getitem1-3";

-		end;

-}

-

-gon_dun01.gat,133,183,0	script	trace1-4#gnbs	139,1,1,{

-	if (b_sword == 7) donpcevent "timer1-4::OnCommandOn";

-	end;

-

-	OnTimer150000:

-		stopnpctimer;

-		disablenpc "trace1-4#gnbs";

-		donpcevent "start01#gnbs::OnCommandOn";

-		end;

-

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "trace1-4#gnbs";

-		end;

-

-	OnCommandOn:

-		enablenpc "trace1-4#gnbs";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-}

-

-gon_dun01.gat,5,1,0	script	timer1-4	-1,{

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "timer1-4";

-		end;

-

-	OnCommandOn:

-		enablenpc "timer1-4";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-

-	OnCommandOff:

-		stopnpctimer;

-		disablenpc "timer1-4";

-		end;

-

-	OnTimer3000:

-		donpcevent "#getitem1-4::OnCommandOn";

-		end;

-}

-

-gon_dun01.gat,134,183,0	script	#getitem1-4	111,2,1,{

-	if (b_sword != 7) end;

-	set b_sword,8;

-	mes "You found ^FF0000piece of blade^000000.";

-	mes "Seems like it's a part of the sword you've been looking for.";

-	close;

-

-	OnInit:

-		disablenpc "#getitem1-4";

-		end;

-

-	OnCommandOn:

-		enablenpc "#getitem1-4";

-		donpcevent "timer1-4::OnCommandOff";

-		donpcevent "start01#gnbs::OnCommandOn";

-

-	OnCommandOff:

-		disablenpc "#getitem1-4";

-		end;

-}

-

-gon_dun01.gat,139,257,0	script	trace1-5#gnbs	139,1,1,{

-	if (b_sword == 7) donpcevent "timer1-5::OnCommandOn";

-	end;

-

-	OnTimer170000:

-		stopnpctimer;

-		disablenpc "trace1-5#gnbs";

-		donpcevent "start01#gnbs::OnCommandOn";

-		end;

-

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "trace1-5#gnbs";

-		end;

-

-	OnCommandOn:

-		enablenpc "trace1-5#gnbs";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-}

-

-gon_dun01.gat,6,1,0	script	timer1-5	-1,{

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "timer1-5";

-		end;

-

-	OnCommandOn:

-		enablenpc "timer1-5";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-

-	OnCommandOff:

-		stopnpctimer;

-		disablenpc "timer1-5";

-		end;

-

-	OnTimer3000:

-		donpcevent "#getitem1-5::OnCommandOn";

-		end;

-}

-

-gon_dun01.gat,140,257,0	script	#getitem1-5	111,2,1,{

-	if (b_sword != 7) end;

-	set b_sword,8;

-	mes "You found ^FF0000piece of blade^000000.";

-	mes "Seems like it's a part of the sword you've been looking for.";

-	close;

-

-	OnInit:

-		disablenpc "#getitem1-5";

-		end;

-

-	OnCommandOn:

-		enablenpc "#getitem1-5";

-		donpcevent "timer1-5::OnCommandOff";

-		donpcevent "start01#gnbs::OnCommandOn";

-

-	OnCommandOff:

-		disablenpc "#getitem1-5";

-		end;

-}

-

-gon_dun02.gat,1,1,0	script	start02#gnbs	-1,{

-	OnInit:

-		sleep 10000;

-	OnCommandOn:

-		donpcevent "trace2-"+rand(1,6)+"::OnCommandOn";

-		end;

-}

-

-gon_dun02.gat,65,168,0	script	trace2-1#gnbs	139,1,1,{

-	if (b_sword == 8) donpcevent "timer2-1::OnCommandOn";

-	end;

-

-	OnTimer80000:

-		stopnpctimer;

-		disablenpc "trace2-1#gnbs";

-		donpcevent "start02#gnbs::OnCommandOn";

-		end;

-

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "trace2-1#gnbs";

-		end;

-

-	OnCommandOn:

-		enablenpc "trace2-1#gnbs";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-}

-

-gon_dun02.gat,2,1,0	script	timer2-1	-1,{

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "timer2-1";

-		end;

-

-	OnCommandOn:

-		enablenpc "timer2-1";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-

-	OnCommandOff:

-		stopnpctimer;

-		disablenpc "timer2-1";

-		end;

-

-	OnTimer3000:

-		donpcevent "#getitem2-1::OnCommandOn";

-		end;

-}

-

-gon_dun02.gat,202,25,0	script	#getitem2-1	111,2,1,{

-	if (b_sword != 8) end;

-	set b_sword,9;

-	mes "You found ^FF0000piece of blade^000000.";

-	mes "Seems like it's a part of the sword you've been looking for.";

-	close;

-

-	OnInit:

-		disablenpc "#getitem2-1";

-		end;

-

-	OnCommandOn:

-		enablenpc "#getitem2-1";

-		donpcevent "timer2-1::OnCommandOff";

-		donpcevent "start02#gnbs::OnCommandOn";

-

-	OnCommandOff:

-		disablenpc "#getitem2-1";

-		end;

-}

-

-gon_dun02.gat,265,200,0	script	trace2-2#gnbs	139,1,1,{

-	if (b_sword == 8) donpcevent "timer2-2::OnCommandOn";

-	end;

-

-	OnTimer130000:

-		stopnpctimer;

-		disablenpc "trace2-2#gnbs";

-		donpcevent "start02#gnbs::OnCommandOn";

-		end;

-

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "trace2-2#gnbs";

-		end;

-

-	OnCommandOn:

-		enablenpc "trace2-2#gnbs";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-}

-

-gon_dun02.gat,3,1,0	script	timer2-2	-1,{

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "timer2-2";

-		end;

-

-	OnCommandOn:

-		enablenpc "timer2-2";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-

-	OnCommandOff:

-		stopnpctimer;

-		disablenpc "timer2-2";

-		end;

-

-	OnTimer3000:

-		donpcevent "#getitem2-2::OnCommandOn";

-		end;

-}

-

-gon_dun02.gat,265,201,0	script	#getitem2-2	111,2,1,{

-	if (b_sword != 8) end;

-	set b_sword,9;

-	mes "You found ^FF0000piece of blade^000000.";

-	mes "Seems like it's a part of the sword you've been looking for.";

-	close;

-

-	OnInit:

-		disablenpc "#getitem2-2";

-		end;

-

-	OnCommandOn:

-		enablenpc "#getitem2-2";

-		donpcevent "timer2-2::OnCommandOff";

-		donpcevent "start02#gnbs::OnCommandOn";

-

-	OnCommandOff:

-		disablenpc "#getitem2-2";

-		end;

-}

-

-gon_dun02.gat,247,129,0	script	trace2-3#gnbs	139,1,1,{

-	if (b_sword == 8) donpcevent "timer2-3::OnCommandOn";

-	end;

-

-	OnTimer110000:

-		stopnpctimer;

-		disablenpc "trace2-3#gnbs";

-		donpcevent "start02#gnbs::OnCommandOn";

-		end;

-

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "trace2-3#gnbs";

-		end;

-

-	OnCommandOn:

-		enablenpc "trace2-3#gnbs";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-}

-

-gon_dun02.gat,4,1,0	script	timer2-3	-1,{

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "timer2-3";

-		end;

-

-	OnCommandOn:

-		enablenpc "timer2-3";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-

-	OnCommandOff:

-		stopnpctimer;

-		disablenpc "timer2-3";

-		end;

-

-	OnTimer3000:

-		donpcevent "#getitem2-3::OnCommandOn";

-		end;

-}

-

-gon_dun02.gat,247,128,0	script	#getitem2-3	111,2,1,{

-	if (b_sword != 8) end;

-	set b_sword,9;

-	mes "You found ^FF0000piece of blade^000000.";

-	mes "Seems like it's a part of the sword you've been looking for.";

-	close;

-

-	OnInit:

-		disablenpc "#getitem2-3";

-		end;

-

-	OnCommandOn:

-		enablenpc "#getitem2-3";

-		donpcevent "timer2-3::OnCommandOff";

-		donpcevent "start02#gnbs::OnCommandOn";

-

-	OnCommandOff:

-		disablenpc "#getitem2-3";

-		end;

-}

-

-gon_dun02.gat,149,74,0	script	trace2-4#gnbs	139,1,1,{

-	if (b_sword == 8) donpcevent "timer2-4::OnCommandOn";

-	end;

-

-	OnTimer230000:

-		stopnpctimer;

-		disablenpc "trace2-4#gnbs";

-		donpcevent "start02#gnbs::OnCommandOn";

-		end;

-

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "trace2-4#gnbs";

-		end;

-

-	OnCommandOn:

-		enablenpc "trace2-4#gnbs";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-}

-

-gon_dun02.gat,5,1,0	script	timer2-4	-1,{

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "timer2-4";

-		end;

-

-	OnCommandOn:

-		enablenpc "timer2-4";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-

-	OnCommandOff:

-		stopnpctimer;

-		disablenpc "timer2-4";

-		end;

-

-	OnTimer3000:

-		donpcevent "#getitem2-4::OnCommandOn";

-		end;

-}

-

-gon_dun02.gat,149,75,0	script	#getitem2-4	111,2,1,{

-	if (b_sword != 8) end;

-	set b_sword,9;

-	mes "You found ^FF0000piece of blade^000000.";

-	mes "Seems like it's a part of the sword you've been looking for.";

-	close;

-

-	OnInit:

-		disablenpc "#getitem2-4";

-		end;

-

-	OnCommandOn:

-		enablenpc "#getitem2-4";

-		donpcevent "timer2-4::OnCommandOff";

-		donpcevent "start02#gnbs::OnCommandOn";

-

-	OnCommandOff:

-		disablenpc "#getitem2-4";

-		end;

-}

-

-gon_dun02.gat,23,105,0	script	trace2-5#gnbs	139,1,1,{

-	if (b_sword == 8) donpcevent "timer2-5::OnCommandOn";

-	end;

-

-	OnTimer190000:

-		stopnpctimer;

-		disablenpc "trace2-5#gnbs";

-		donpcevent "start02#gnbs::OnCommandOn";

-		end;

-

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "trace2-5#gnbs";

-		end;

-

-	OnCommandOn:

-		enablenpc "trace2-5#gnbs";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-}

-

-gon_dun02.gat,6,1,0	script	timer2-5	-1,{

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "timer2-5";

-		end;

-

-	OnCommandOn:

-		enablenpc "timer2-5";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-

-	OnCommandOff:

-		stopnpctimer;

-		disablenpc "timer2-5";

-		end;

-

-	OnTimer3000:

-		donpcevent "#getitem2-5::OnCommandOn";

-		end;

-}

-

-gon_dun02.gat,23,106,0	script	#getitem2-5	111,2,1,{

-	if (b_sword != 8) end;

-	set b_sword,9;

-	mes "You found ^FF0000piece of blade^000000.";

-	mes "Seems like it's a part of the sword you've been looking for.";

-	close;

-

-	OnInit:

-		disablenpc "#getitem2-5";

-		end;

-

-	OnCommandOn:

-		enablenpc "#getitem2-5";

-		donpcevent "timer2-5::OnCommandOff";

-		donpcevent "start02#gnbs::OnCommandOn";

-

-	OnCommandOff:

-		disablenpc "#getitem2-5";

-		end;

-}

-

-gon_dun02.gat,249,39,0	script	trace2-6#gnbs	139,1,1,{

-	if (b_sword == 8) donpcevent "timer2-6::OnCommandOn";

-	end;

-

-	OnTimer110000:

-		stopnpctimer;

-		disablenpc "trace2-6#gnbs";

-		donpcevent "start02#gnbs::OnCommandOn";

-		end;

-

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "trace2-6#gnbs";

-		end;

-

-	OnCommandOn:

-		enablenpc "trace2-6#gnbs";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-}

-

-gon_dun02.gat,7,1,0	script	timer2-6	-1,{

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "timer2-6";

-		end;

-

-	OnCommandOn:

-		enablenpc "timer2-6";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-

-	OnCommandOff:

-		stopnpctimer;

-		disablenpc "timer2-6";

-		end;

-

-	OnTimer3000:

-		donpcevent "#getitem2-6::OnCommandOn";

-		end;

-}

-

-gon_dun02.gat,249,40,0	script	#getitem2-6	111,2,1,{

-	if (b_sword != 8) end;

-	set b_sword,9;

-	mes "You found ^FF0000piece of blade^000000.";

-	mes "Seems like it's a part of the sword you've been looking for.";

-	close;

-

-	OnInit:

-		disablenpc "#getitem2-6";

-		end;

-

-	OnCommandOn:

-		enablenpc "#getitem2-6";

-		donpcevent "timer2-6::OnCommandOff";

-		donpcevent "start02#gnbs::OnCommandOn";

-

-	OnCommandOff:

-		disablenpc "#getitem2-6";

-		end;

-}

-

-gon_dun03.gat,1,1,0	script	start03#gnbs	-1,{

-	OnInit:

-		sleep 10000;

-	OnCommandOn:

-		donpcevent "trace3-"+rand(1,7)+"::OnCommandOn";

-		end;

-}

-

-gon_dun03.gat,11,75,0	script	trace3-1#gnbs	139,1,1,{

-	if (b_sword == 9) donpcevent "timer3-1::OnCommandOn";

-	end;

-

-	OnTimer200000:

-		stopnpctimer;

-		disablenpc "trace3-1#gnbs";

-		donpcevent "start03#gnbs::OnCommandOn";

-		end;

-

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "trace3-1#gnbs";

-		end;

-

-	OnCommandOn:

-		enablenpc "trace3-1#gnbs";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-}

-

-gon_dun03.gat,2,1,0	script	timer3-1	-1,{

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "timer3-1";

-		end;

-

-	OnCommandOn:

-		enablenpc "timer3-1";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-

-	OnCommandOff:

-		stopnpctimer;

-		disablenpc "timer3-1";

-		end;

-

-	OnTimer3000:

-		donpcevent "#getitem3-1::OnCommandOn";

-		end;

-}

-

-gon_dun03.gat,10,74,0	script	#getitem3-1	111,2,1,{

-	if (b_sword != 9) end;

-	set b_sword,10;

-	mes "You found ^FF0000piece of blade^000000.";

-	mes "Seems like it's a part of the sword you've been looking for.";

-	mes "You put all the pieces on the ground";

-	mes "and assembled them. Seems like you've found ";

-	mes "all pieces of the blade.";

-	close;

-

-	OnInit:

-		disablenpc "#getitem3-1";

-		end;

-

-	OnCommandOn:

-		enablenpc "#getitem3-1";

-		donpcevent "timer3-1::OnCommandOff";

-		donpcevent "start03#gnbs::OnCommandOn";

-

-	OnCommandOff:

-		disablenpc "#getitem3-1";

-		end;

-}

-

-gon_dun03.gat,199,103,0	script	trace3-2#gnbs	139,1,1,{

-	if (b_sword == 9) donpcevent "timer3-2::OnCommandOn";

-	end;

-

-	OnTimer130000:

-		stopnpctimer;

-		disablenpc "trace3-2#gnbs";

-		donpcevent "start03#gnbs::OnCommandOn";

-		end;

-

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "trace3-2#gnbs";

-		end;

-

-	OnCommandOn:

-		enablenpc "trace3-2#gnbs";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-}

-

-gon_dun03.gat,3,1,0	script	timer3-2	-1,{

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "timer3-2";

-		end;

-

-	OnCommandOn:

-		enablenpc "timer3-2";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-

-	OnCommandOff:

-		stopnpctimer;

-		disablenpc "timer3-2";

-		end;

-

-	OnTimer3000:

-		donpcevent "#getitem3-2::OnCommandOn";

-		end;

-}

-

-gon_dun03.gat,199,102,0	script	#getitem3-2	111,2,1,{

-	if (b_sword != 9) end;

-	set b_sword,10;

-	mes "You found ^FF0000piece of blade^000000.";

-	mes "Seems like it's a part of the sword you've been looking for.";

-	mes "You put all the pieces on the ground";

-	mes "and assembled them. Seems like you've found ";

-	mes "all pieces of the blade.";

-	close;

-

-	OnInit:

-		disablenpc "#getitem3-2";

-		end;

-

-	OnCommandOn:

-		enablenpc "#getitem3-2";

-		donpcevent "timer3-2::OnCommandOff";

-		donpcevent "start03#gnbs::OnCommandOn";

-

-	OnCommandOff:

-		disablenpc "#getitem3-2";

-		end;

-}

-

-gon_dun03.gat,14,162,0	script	trace3-3#gnbs	139,1,1,{

-	if (b_sword == 9) donpcevent "timer3-3::OnCommandOn";

-	end;

-

-	OnTimer110000:

-		stopnpctimer;

-		disablenpc "trace3-3#gnbs";

-		donpcevent "start03#gnbs::OnCommandOn";

-		end;

-

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "trace3-3#gnbs";

-		end;

-

-	OnCommandOn:

-		enablenpc "trace3-3#gnbs";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-}

-

-gon_dun03.gat,4,1,0	script	timer3-3	-1,{

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "timer3-3";

-		end;

-

-	OnCommandOn:

-		enablenpc "timer3-3";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-

-	OnCommandOff:

-		stopnpctimer;

-		disablenpc "timer3-3";

-		end;

-

-	OnTimer3000:

-		donpcevent "#getitem3-3::OnCommandOn";

-		end;

-}

-

-gon_dun03.gat,14,163,0	script	#getitem3-3	111,2,1,{

-	if (b_sword != 9) end;

-	set b_sword,10;

-	mes "You found ^FF0000piece of blade^000000.";

-	mes "Seems like it's a part of the sword you've been looking for.";

-	mes "You put all the pieces on the ground";

-	mes "and assembled them. Seems like you've found ";

-	mes "all pieces of the blade.";

-	close;

-

-	OnInit:

-		disablenpc "#getitem3-3";

-		end;

-

-	OnCommandOn:

-		enablenpc "#getitem3-3";

-		donpcevent "timer3-3::OnCommandOff";

-		donpcevent "start03#gnbs::OnCommandOn";

-

-	OnCommandOff:

-		disablenpc "#getitem3-3";

-		end;

-}

-

-gon_dun03.gat,155,263,0	script	trace3-4#gnbs	139,1,1,{

-	if (b_sword == 9) donpcevent "timer3-4::OnCommandOn";

-	end;

-

-	OnTimer230000:

-		stopnpctimer;

-		disablenpc "trace3-4#gnbs";

-		donpcevent "start03#gnbs::OnCommandOn";

-		end;

-

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "trace3-4#gnbs";

-		end;

-

-	OnCommandOn:

-		enablenpc "trace3-4#gnbs";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-}

-

-gon_dun03.gat,5,1,0	script	timer3-4	-1,{

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "timer3-4";

-		end;

-

-	OnCommandOn:

-		enablenpc "timer3-4";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-

-	OnCommandOff:

-		stopnpctimer;

-		disablenpc "timer3-4";

-		end;

-

-	OnTimer3000:

-		donpcevent "#getitem3-4::OnCommandOn";

-		end;

-}

-

-gon_dun03.gat,156,263,0	script	#getitem3-4	111,2,1,{

-	if (b_sword != 9) end;

-	set b_sword,10;

-	mes "You found ^FF0000piece of blade^000000.";

-	mes "Seems like it's a part of the sword you've been looking for.";

-	mes "You put all the pieces on the ground";

-	mes "and assembled them. Seems like you've found ";

-	mes "all pieces of the blade.";

-	close;

-

-	OnInit:

-		disablenpc "#getitem3-4";

-		end;

-

-	OnCommandOn:

-		enablenpc "#getitem3-4";

-		donpcevent "timer3-4::OnCommandOff";

-		donpcevent "start03#gnbs::OnCommandOn";

-

-	OnCommandOff:

-		disablenpc "#getitem3-4";

-		end;

-}

-

-gon_dun03.gat,169,90,0	script	trace3-5#gnbs	139,1,1,{

-	if (b_sword == 9) donpcevent "timer3-5::OnCommandOn";

-	end;

-

-	OnTimer190000:

-		stopnpctimer;

-		disablenpc "trace3-5#gnbs";

-		donpcevent "start03#gnbs::OnCommandOn";

-		end;

-

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "trace3-5#gnbs";

-		end;

-

-	OnCommandOn:

-		enablenpc "trace3-5#gnbs";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-}

-

-gon_dun03.gat,6,1,0	script	timer3-5	-1,{

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "timer3-5";

-		end;

-

-	OnCommandOn:

-		enablenpc "timer3-5";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-

-	OnCommandOff:

-		stopnpctimer;

-		disablenpc "timer3-5";

-		end;

-

-	OnTimer3000:

-		donpcevent "#getitem3-5::OnCommandOn";

-		end;

-}

-

-gon_dun03.gat,170,90,0	script	#getitem3-5	111,2,1,{

-	if (b_sword != 9) end;

-	set b_sword,10;

-	mes "You found ^FF0000piece of blade^000000.";

-	mes "Seems like it's a part of the sword you've been looking for.";

-	mes "You put all the pieces on the ground";

-	mes "and assembled them. Seems like you've found ";

-	mes "all pieces of the blade.";

-	close;

-

-	OnInit:

-		disablenpc "#getitem3-5";

-		end;

-

-	OnCommandOn:

-		enablenpc "#getitem3-5";

-		donpcevent "timer3-5::OnCommandOff";

-		donpcevent "start03#gnbs::OnCommandOn";

-

-	OnCommandOff:

-		disablenpc "#getitem3-5";

-		end;

-}

-

-gon_dun03.gat,162,40,0	script	trace3-6#gnbs	139,1,1,{

-	if (b_sword == 9) donpcevent "timer3-6::OnCommandOn";

-	end;

-

-	OnTimer110000:

-		stopnpctimer;

-		disablenpc "trace3-6#gnbs";

-		donpcevent "start03#gnbs::OnCommandOn";

-		end;

-

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "trace3-6#gnbs";

-		end;

-

-	OnCommandOn:

-		enablenpc "trace3-6#gnbs";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-}

-

-gon_dun03.gat,7,1,0	script	timer3-6	-1,{

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "timer3-6";

-		end;

-

-	OnCommandOn:

-		enablenpc "timer3-6";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-

-	OnCommandOff:

-		stopnpctimer;

-		disablenpc "timer3-6";

-		end;

-

-	OnTimer3000:

-		donpcevent "#getitem3-6::OnCommandOn";

-		end;

-}

-

-gon_dun03.gat,68,39,0	script	#getitem3-6	111,1,2,{

-	if (b_sword != 9) end;

-	set b_sword,10;

-	mes "You found ^FF0000piece of blade^000000.";

-	mes "Seems like it's a part of the sword you've been looking for.";

-	mes "You put all the pieces on the ground";

-	mes "and assembled them. Seems like you've found ";

-	mes "all pieces of the blade.";

-	close;

-

-	OnInit:

-		disablenpc "#getitem3-6";

-		end;

-

-	OnCommandOn:

-		enablenpc "#getitem3-6";

-		donpcevent "timer3-6::OnCommandOff";

-		donpcevent "start03#gnbs::OnCommandOn";

-

-	OnCommandOff:

-		disablenpc "#getitem3-6";

-		end;

-}

-

-gon_dun03.gat,68,212,0	script	trace3-7#gnbs	139,1,1,{

-	if (b_sword == 9) donpcevent "timer3-7::OnCommandOn";

-	end;

-

-	OnTimer110000:

-		stopnpctimer;

-		disablenpc "trace3-7#gnbs";

-		donpcevent "start03#gnbs::OnCommandOn";

-		end;

-

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "trace3-7#gnbs";

-		end;

-

-	OnCommandOn:

-		enablenpc "trace3-7#gnbs";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-}

-

-gon_dun03.gat,6,1,0	script	timer3-7	-1,{

-	OnInit:

-		initnpctimer;

-		stopnpctimer;

-		disablenpc "timer3-7";

-		end;

-

-	OnCommandOn:

-		enablenpc "timer3-7";

-		setnpctimer 0;

-		startnpctimer;

-		end;

-

-	OnCommandOff:

-		stopnpctimer;

-		disablenpc "timer3-7";

-		end;

-

-	OnTimer3000:

-		donpcevent "#getitem3-7::OnCommandOn";

-		end;

-}

-

-gon_dun03.gat,68,213,0	script	#getitem3-7	111,1,2,{

-	if (b_sword != 9) end;

-	set b_sword,10;

-	mes "You found ^FF0000piece of blade^000000.";

-	mes "Seems like it's a part of the sword you've been looking for.";

-	mes "You put all the pieces on the ground";

-	mes "and assembled them. Seems like you've found ";

-	mes "all pieces of the blade.";

-	close;

-

-	OnInit:

-		disablenpc "#getitem3-7";

-		end;

-

-	OnCommandOn:

-		enablenpc "#getitem3-7";

-		donpcevent "timer3-7::OnCommandOff";

-		donpcevent "start03#gnbs::OnCommandOn";

-

-	OnCommandOff:

-		disablenpc "#getitem3-7";

-		end;

-}

-

-gon_in,18,27,5	script	Madam#gnbs	771,{

-	mes "[SangHwaYeun]";

-	mes "hohohohoho~";

-	mes "Who might this be?";

-	mes "A vistor from out of town~";

-	mes "hohoho.";

-	next;

-	if (select("Hi, Madam~:Where's chief?") == 1) {

-		mes "[SangHwaYeun]";

-		mes "Hi, there~";

-		close;

-	}

-	mes "[SangHwaYeun]";

-	if (sex == 0) {

-		mes "Hoho, he's upstairs.";

-		mes "You're such a pretty lady.";

-		mes "Don't be too fascinated by";

-		mes "my husband. alright?";

-		mes "Hohoho~";

-	} else {

-		mes "He's upstairs.";

-		mes "You are such a handsome young man";

-		mes "But not better than my huhsband.";

-		mes "Hohoho..";

-	}

-	close;

-}

-

-gon_dun03,62,222,0	script	Strange dead body#gnbs	111,{

-	if (b_sword < 7) {

-		mes "Here's a rotten dead body.";

-		mes "Seemed to be eaten by monsters.";

-		close;

-	}

-	if (b_sword > 6 && b_sword < 11) {

-		mes "There's a paper between the bones";

-		mes "of dead body.";

-		mes "Take a look?";

-		next;

-		if (select("Yes.:Leave.") == 1) {

-			mes "Paper is so worned out,";

-			mes "but there's a words on it.";

-			mes "It's written by a blood.";

-			mes "So difficult to see the letter.";

-			mes "Almost impossible to find out what's written.";

-			next;

-			mes "^FF0000Damn I can't...believe..  failed..";

-			mes "Sayum... I should've..";

-			mes "watchout...ehhh...but..  break";

-			mes "..pieces...and seprate..";

-			mes "I..with";

-			mes "this...^000000";

-			next;

-			mes "Paper was all blood-stained.";

-			mes "He probably couldn't make it any longer.";

-		} else {

-			mes "Felt something was missing.";

-			mes "Blood-stained dead body was";

-			mes "getting on my nerve";

-			mes "But I just decided to leave from here.";

-		}

-	} else if (b_sword == 11 || b_sword == 12) {

-		mes "Here's a ungly looking dead body.";

-		mes "I should just pass by.";

-	} else {

-		mes "A skeleton eaten by many monsters.";

-		mes "Felt pitable for awhile, but felt";

-		mes "bad when looking at it for";

-		mes "long time.";

-	}

-	close;

-}

-

-gonryun,139,142,7	script	Girl##gnbs1	772,{

-	mes "[SaEunSo]";

-	if (b_sword < 12) {

-		mes "..........";

-		mes "I was happy looking at the visitors";

-		mes "from other villages, but because of";

-		mes "the thief, I feel terrible now'";

-		emotion e_dots;

-	} else {

-		mes "Hehe...";

-		mes "I am so happy now.";

-		mes "Lots of visitors are coming to our village..";

-		mes "found the stuff my father lost..";

-		mes "Hehe...";

-		mes "The guy who found the stuff for my";

-		mes "father.. I am sure he is a great man.";

-	}

-	close;

-}

-

-gonryun.gat,100,241,0	script	Stranger#gnbs"	733,{

-	mes "[Choahk]";

-	if (b_sword < 14) {

-		mes "Hmm...";

-		mes "I'm pretty busy right now, come later.";

-		emotion e_dots;

-	} else if (b_sword < 17) {

-		switch (b_sword) {

-		case 14:

-			switch(nakha) {

-			case 0:

-				mes "Hmm...";

-				mes "What is it?";

-				mes "What do you want?";

-				mes "I don't like to get bothered.";

-				next;

-				if (select("Ask about blacksmith.:Are are you being so mean?") == 1){

-					mes "[Choahk]";

-					mes "Hum.....";

-					mes "so..you are the one who found";

-					mes "the sword huh?";

-					mes "Did you also get asked to repair it?";

-					next;

-					if (select("Exactly.:No..I'm just...") == 1){

-						mes "[Choahk]";

-						mes "well..";

-						mes "If you want some information";

-						mes "from me, come after helping one";

-						mes "person in the village who's in trouble right now.";

-						set b_sword,16;

-					} else {

-						mes "[Choahk]";

-						mes "Hmm...";

-						mes "I guess not...";

-						mes "Don't bother me anymore. I got bunch of things to do.";

-					}

-				} else {

-					mes "[Choahk]";

-					mes "Hmm...";

-					mes "Why do you care about other's";

-					mes "personality. It's none of your business.";

-					mes "Take a look at yourself first";

-					mes "before you say something like that.";

-				}

-				break;

-			case 1:

-				mes "Hmm...";

-				mes "You're in the middle of helping";

-				mes "someone now huh?";

-				mes "Why don't you go and take care of it first.";

-				mes "Once you start to help someone,";

-				mes "you're responsible to finsh that job well.";

-				set b_sword,16;

-				break;

-			case 2:

-				mes "Hmm...";

-				mes "You're in the middle of helping";

-				mes "someone now huh?";

-				mes "Why don't you go and take care of it first.";

-				mes "Once you start to help someone,";

-				mes "you're responsible to finsh that job well.";

-				set b_sword,16;

-				break;

-			case 3:

-				mes "Hmm...";

-				mes "What do you want??";

-				next;

-				if (select("Ask about blacksmith.:Are are you being so mean?") == 1) {

-					mes "[Choahk]";

-					mes "Hum.....";

-					mes "so..you are the one who found";

-					mes "the sword huh?";

-					mes "Did you also get asked to repair it?";

-					next;

-					if (select("Exactly.:No..I'm just...") == 1){

-						mes "[Choahk]";

-						mes "Hmm...";

-						mes "Since it's broke into pieces,";

-						mes "you should find someone to repair it.";

-						mes "Go to ^FF0000Geffen^000000, you'll find someone";

-						mes "who can help you.";

-						set b_sword,17;

-					} else {

-						mes "[Choahk]";

-						mes "Hmm...";

-						mes "I guess not...";

-						mes "Don't bother me anymore.";

-						mes "I got bunch of things to do.";

-					}

-				} else {

-					mes "[Choahk]";

-					mes "Hmm...";

-					mes "Why do you care about other's";

-					mes "personality. It's none of your business.";

-					mes "Take a look at yourself first";

-					mes "before you say something like that.";

-				}

-				break;

-			case 4:

-				mes "Guess I was wasting my time.";

-				mes "If you make any promises,";

-				mes "it's your responsibility to";

-				mes "take care of it until it's completely done.";

-				next;

-				mes "[Choahk]";

-				mes "I don't like people who do not";

-				mes "keep the promises.";

-				mes "You'll not get any informations from me.";

-				mes "Don't ever bother me again.";

-				set b_sword,15;

-				break;

-			}

-			break;

-		case 15:

-			mes "Hmm...";

-			mes "I'm busy right now. Why don't come later.";

-			emotion e_dots;

-			break;

-		case 16:

-			switch(nakha){

-			case 0:

-				mes "Hmm......";

-				mes "You're not done with your";

-				mes "requirements yet.";

-				mes "I can't give you any information";

-				mes "until you finish your job.";

-				break;

-			case 1:

-				mes "Hmm....";

-				mes "Once you start to help someone,";

-				mes "you're responsible to finsh that job well.";

-				mes "Why don't you go and take care of it first.";

-				break;

-			case 2:

-				mes "Hmm....";

-				mes "Once you start to help someone,";

-				mes "you're responsible to finsh that job well.";

-				mes "Why don't you go and take care of it first.";

-				break;

-			case 3:

-				mes "Hmm......";

-				mes "What do you want?";

-				next;

-				if (select("Ask about blacksmith.:Are are you being so mean?") == 1) {

-					mes "[Choahk]";

-					mes "Hum.....";

-					mes "so..you are the one who found";

-					mes "the sword huh?";

-					mes "Did you also get asked to repair it?";

-					next;

-					if (select("Exactly:No.. I'm just...") == 1) {

-						mes "[Choahk]";

-						mes "Hmm...";

-						mes "Since it's broke into pieces,";

-						mes "you should find someone to repair it.";

-						mes "Go to ^FF0000Geffen^000000, you'll find someone";

-						mes "who can help you.";

-						set b_sword,17;

-					} else {

-						mes "[Choahk]";

-						mes "Hmm...";

-						mes "I guess not...";

-						mes "Don't bother me anymore.";

-						mes "I got bunch of things to do.";

-					}

-				} else {

-					mes "[Choahk]";

-					mes "Hmm...";

-					mes "Why do you care about other's";

-					mes "personality. It's none of your business.";

-					mes "Take a look at yourself first";

-					mes "before you say something like that.";

-				}

-				break;

-			case 4:

-				mes "Guess I was wasting my time.";

-				mes "If you make any promises,";

-				mes "it's your responsibility to";

-				mes "take care of it until it's completely done.";

-				next;

-				mes "[Choahk]";

-				mes "I don't like people who do not";

-				mes "keep the promises.";

-				mes "You'll not get any informations from me.";

-				mes "Don't ever bother me again.";

-				set b_sword,15;

-				break;

-			}

-			break;

-		}

-	} else if (b_sword < 33) {

-		mes "Umm?";

-		mes "Didn't I tell you to go to ^FF0000Geffen^000000?";

-		mes "You'll find famous blacksmith there.";

-		mes "He'll repair the sword for you.";

-		mes "I gave you all the informations";

-		mes "I have so far.";

-		next;

-		mes "[Choahk]";

-		mes "You are responsible to take care of the rest.";

-	} else {

-		mes "Hmm......";

-		mes "Helping people in trouble is";

-		mes "such a nice thing to do.";

-		mes "You are doing the right thing.";

-	}

-	close;

-}

-

-geffen_in.gat,71,112,2	script	Blacksmith#SaYumMoon	731,{

-	mes "[Aumgarl]";

-	if (b_sword < 17) {

-		mes "Pew..hew....";

-		mes "My poor baby Lyroo..";

-		mes "hew....";

-	} else if (b_sword < 32) {

-		switch (b_sword) {

-		case 17:

-			mes "Pew..hew....";

-			mes "My poor baby Lyroo..";

-			mes "hew....";

-			next;

-			if (select("Sir...:...........") == 1) {

-				mes "[Aumgarl]";

-				mes "Umm? Who're you?";

-				mes "Need something?";

-				mes "If not, please leave..";

-				next;

-				if (select("I came to repair the sword.:I heard you are famous blacksmith...") == 1) {

-					mes "[Aumgarl]";

-					mes "Umm........";

-					mes "Sorry but, we're closed.";

-					mes "Come again next time.";

-					mes "Bye";

-					set b_sword,18;

-				} else {

-					mes "[Aumgarl]";

-					mes "Yes, I am a blacksmith,";

-					mes "but I don't think I am famous.";

-					mes "And unfortunately.. we are closed.";

-				}

-			} else {

-				mes "[Aumgarl]";

-				mes "Done with your business?";

-				mes "Then please leave.";

-			}

-			break;

-		case 18:

-			mes "Like I said...I am busy!";

-			mes "Come later.";

-			if (rand(1,8) == 7) {

-				set b_sword,19;

-				mes "What nerve you've got!";

-			}

-			close2;

-			warp "geffen.gat",173,169;

-			end;

-		case 19:

-			mes "Hmm....";

-			mes "Ahh....";

-			mes "What nerve you've got!";

-			mes "What do you want?";

-			next;

-			switch(select("I want to marry your granddaughter.:Your graddaughter is such a pretty girl.:I came to repair the sword.")){

-			case 1:

-				mes "[Aumgarl]";

-				mes ".....";

-				mes ".........";

-				mes ".............";

-				mes "...................";

-				mes "........................";

-				next;

-				mes "[Aumgarl]";

-				mes "Who the heck are you?";

-				mes "Want my granddaughter all of a sudden?";

-				mes "Get the hell out of here!";

-				mes "Don't ever come back here!";

-				emotion e_pif;

-				break;

-			case 2:

-				mes "[Aumgarl]";

-				mes "You're damn right~";

-				mes "My granddaughter is so~ pretty.";

-				mes "Hahaha....";

-				mes ".....peew heew....";

-				next;

-				switch(select("I want to marry her...:I came to repair the sword.:Anything wrong?")){

-				case 1:

-					mes "[Aumgarl]";

-					mes ".....";

-					mes ".........";

-					mes ".............";

-					mes "...................";

-					mes "........................";

-					next;

-					mes "[Aumgarl]";

-					mes "Who the heck are you?";

-					mes "Want my granddaughter all of a sudden?";

-					mes "Get the hell out of here!";

-					mes "Don't ever come back here!";

-					emotion e_pif;

-					break;

-				case 2:

-					mes "[Aumgarl]";

-					mes "...............";

-					mes "the sword?";

-					mes "I don't remember when was the";

-					mes "last time I touched a steel.";

-					mes "hmm...";

-					mes "let me see the sword.?";

-					next;

-					mes "[Aumgarl]";

-					mes "Hmm......";

-					mes "Umm.........";

-					mes "............";

-					next;

-					mes "^0000FFHe took a careful look at the pieces of sword for awhile.^000000";

-					next;

-					mes "[Aumgarl]";

-					mes "Hmm.......";

-					mes "So this is the one huh?";

-					mes "Well.....";

-					mes "I am sorry, but this sword is not";

-					mes "something I can repair";

-					mes "at the moment.";

-					next;

-					mes "[Aumgarl]";

-					mes "Why don't you go find";

-					mes "some other blacksmith.";

-					mes "I am sorry........";

-					break;

-				case 3:

-					mes "[Aumgarl]";

-					mes "Ah...............";

-					mes "this is not something I shall tell";

-					mes "others....but....";

-					mes "my granddaughter lyroo has";

-					mes "an incurable disease...";

-					next;

-					mes "[Aumgarl]";

-					mes "Not long after she was born,";

-					mes "her parents died by an accident.";

-					mes "Since from that day of an accident,";

-					mes "I took care of her.";

-					mes "hmm......";

-					next;

-					mes "[Aumgarl]";

-					mes "Ahh...........";

-					mes "and...moreover, she started to suffer";

-					mes "from an illness. I've met many famous";

-					mes "doctors all around the place but....";

-					mes "no one even found out the name of";

-					mes "a disease.";

-					next;

-					switch(select("I am sorry to hear that.:I'll make her happy.:I want to cure her.")){

-					case 1:

-						mes "[Aumgarl]";

-						mes "Ahh.......";

-						mes "I'll just have to take it";

-						mes "as our fate.";

-						mes "I just feel sorry for lyroo.";

-						mes ".............";

-						emotion e_dots;

-						break;

-					case 2:

-						mes "[Aumgarl]";

-						mes "Umm.....";

-						mes "What do you mean?";

-						mes "How're you going to make her happy?";

-						mes "I don't think it makes sense at all.";

-						mes "Umm......";

-						next;

-						switch(select( "I'll make her happy all the time.:I want to take her with me.:I will cure her.")){

-						case 1:

-							mes "[Aumgarl]";

-							mes "................";

-							mes "What are you talking about?";

-							mes "Make her happy all the time?";

-							mes "She is dying even at";

-							mes "this moment.";

-							next;

-							mes "[Aumgarl]";

-							mes "I think you are out of";

-							mes "your mind!";

-							mes "Get out of here.";

-							break;

-						case 2:

-							mes "[Aumgarl]";

-							mes "................";

-							mes "You want to take her to where?";

-							mes "What are you gonna do?";

-							next;

-							if (select("I will cure her.:I am sorry.") == 1) {

-								mes "[Aumgarl]";

-								mes "It's useless talking about";

-								mes "it any longer. I don't think";

-								mes "there is anyone who can";

-								mes "cure my granddaughter.";

-							} else {

-								mes "[Aumgarl]";

-								mes "Ahh.......";

-								mes "I am not blaming you.";

-								mes "It's not your fault anyway.";

-								mes "........";

-								next;

-								if (select("...........:I'll wish for her recover.") == 1){

-									mes "[Aumgarl]";

-									mes "Ahh......";

-									mes "....I am sorry to ask you this but..";

-									mes "can you do me a favor?";

-									mes "Umm......";

-									next;

-									if (select("No.:Sure.") == 1) {

-										mes "[Aumgarl]";

-										mes "Umm....";

-										mes "Alright, I won't bother you..";

-										mes "bye...";

-										break;

-									}

-									mes "[Aumgarl]";

-									mes "It won't be easy but,";

-									mes "would you help me to find";

-									mes "any doctors... nono..anybody";

-									mes "who can cure Lyroo or";

-									next;

-									mes "[Aumgarl]";

-									mes "has any informations";

-									mes "about her unidentified illness?";

-									mes "please?";

-									mes "...peeew..";

-									next;

-									menu "Yes, Sir.",-;

-									mes "[Aumgarl]";

-									mes "Oh....";

-									mes "Thank you so much.";

-									mes "If Lyroo can get her health back,";

-									mes "I'll never forget";

-									mes "your help forever.";

-									next;

-									mes "[Aumgarl]";

-									mes "Thank you..";

-									mes "Thank you...";

-									set b_sword,20;

-								} else {

-									mes "[Aumgarl]";

-									mes "Well...thanks.";

-									mes "I'm going to try my best to";

-									mes "make her happy till the";

-									mes "last second.";

-									mes "Come by sometimes to say hi";

-									mes "to Lyroo.";

-								}

-							}

-							break;

-						case 3:

-							mes "[Aumgarl]";

-							mes ".............";

-							mes "How're you going to cure";

-							mes "my granddaughter?";

-							mes "You don't look like";

-							mes "a doctor to me.";

-							next;

-							switch(select("I am a doctor.:I know a famous doctor.:I'll cure her no matter what.")){

-							case 1:

-								mes "[Aumgarl]";

-								mes "Hoo.......";

-								mes "Do I look like a fool to you?";

-								mes "I hate people who lie";

-								emotion e_pif;

-								close2;

-								warp "geffen.gat",173,169;

-								end;

-							case 2:

-								mes "[Aumgarl]";

-								mes "A famous doctor?";

-								mes "I've met all kinds of";

-								mes "doctors around.";

-								mes "I probably have met that";

-								mes "doctor already.";

-								break;

-							case 3:

-								mes "[Aumgarl]";

-								mes "................";

-								mes "You want to cure her";

-								mes "no matter what?";

-								mes "How're going to do that?";

-								mes "What if it turns worse?";

-								mes "Huh?";

-								next;

-								mes "[Aumgarl]";

-								mes "No more of your bragging.";

-								mes "Please go away.";

-								break;

-							}

-							break;

-						}

-						break;

-					case 3:

-						mes "[Aumgarl]";

-						mes ".................";

-						mes "Thanks for your concern..";

-						mes "but you're a stranger to us.";

-						mes "I can't let you do that.";

-						mes "Thanks anyways.";

-						break;

-					}

-					break;

-				}

-				break;

-			case 3:

-				mes "[Aumgarl]";

-				mes ".........";

-				mes "Umm........";

-				mes "I'm sorry but";

-				mes "I am so exhausted.";

-				mes "Can't help you..";

-				break;

-			}

-			break;

-		case 20:

-		case 21:

-		case 22:

-		case 23:

-			mes "Ahh........";

-			mes "Go to place where it's";

-			mes "crowd of people.";

-			mes "And you'll get some informations.";

-			mes "I'm counting on you.";

-			break;

-		case 24:

-		case 25:

-		case 26:

-			mes "Ahh....";

-			mes "Lyroo is upstairs.";

-			mes "She's in pain.";

-			mes "Don't talk to her too long.";

-			break;

-		case 27:

-			mes "Oh....";

-			mes "Thank you...";

-			mes "I never thought you'll";

-			mes "help me.";

-			mes "Go ahead see Lyroo.";

-			break;

-		case 28:

-			mes "Thank you so much...";

-			mes "Without your help...";

-			emotion e_sob;

-			mes "it was meaningless.";

-			next;

-			mes "[Aumgarl]";

-			mes "Alright....";

-			mes "Is there anything I can";

-			mes "do for you?";

-			mes "I want to return your favor somehow.";

-			next;

-			if (select("No..I don't need anything.:Would you repair the sword for me?") == 1) {

-				mes "[Aumgarl]";

-				mes "Hmm....";

-				mes "Well..";

-				mes "Whenever you have a favor to ask,";

-				mes "come and find me.";

-				mes "I'll try my best to help you.";

-				set b_sword,29;

-			} else {

-				mes "[Aumgarl]";

-				mes "Hmm....";

-				mes "Show me the sword.";

-				mes "I need to take a look at it first";

-				mes "to find out whether I can repair it or not.";

-				next;

-				mes "^0000FF Showed the pieces of broken sword";

-				mes "to Aumgarl.";

-				mes "....................";

-				mes "Aumgarl took a careful look";

-				mes "at the pieces for awhile..^000000";

-				next;

-				mes "................";

-				mes "............";

-				mes "........";

-				mes "......";

-				next;

-				mes "[Aumgarl]";

-				mes "Umm.....";

-				mes "Well.....";

-				mes "It's not possible to get into";

-				mes "work right away.";

-				mes "I need some materials.";

-				next;

-				mes "[Aumgarl]";

-				mes "To repair this sword, we need";

-				mes "some materials.";

-				mes "Since Lyroo is upstairs in pain.";

-				mes "I don't think I can leave the house.";

-				next;

-				mes "[Aumgarl]";

-				mes "so....would you get the";

-				mes "materials for me?";

-				mes "I am sorry I am asking";

-				mes "you too much to do.";

-				next;

-				if (select("Umm..let's do it next time.:Alright, I'll go get them.") == 1){

-					mes "[Aumgarl]";

-					mes "Umm.....";

-					mes "I am sorry I can't";

-					mes "help you right away.";

-					mes "Come back here when";

-					mes "you need my help then.";

-				} else {

-					mes "[Aumgarl]";

-					mes "Oh~~ really?";

-					mes "Thank you.";

-					mes "I'm sure I'll repair it for you.";

-					mes "Now, listen carefully.";

-					next;

-					mes "[Aumgarl]";

-					mes "^FF00FF One Anvil";

-					mes "2 Oridecon Stones";

-					mes "5 Broken Swords";

-					mes "2 Steels";

-					mes "1 Hammer of Blacksmith";

-					mes "2 Star Crumbs";

-					mes "5 Live Coals^000000";

-					next;

-					mes "[Aumgarl]";

-					mes "Quite alot huh?";

-					mes "They are necessities";

-					mes "We need them to repair the sword.";

-					mes "I'll go find some other materials.";

-					set b_sword,30;

-				}

-			}

-			break;

-		case 29:

-			mes "Oh~ It's you.";

-			mes "Got any favor to ask?";

-			mes "I'll do my best";

-			mes "to help you.";

-			next;

-			if (select("Maybe next time..:Please repair this sword for me.") == 1) {

-				mes "[Aumgarl]";

-				mes "Well..";

-				mes "Whenever you have a favor to ask,";

-				mes "come and find me.";

-			} else {

-				mes "[Aumgarl]";

-				mes "Hmm....";

-				mes "Show me the sword.";

-				mes "I need to take a look at it first";

-				mes "to find out whether I can repair it or not.";

-				next;

-				mes "^0000FF Showed the pieces of broken sword";

-				mes "to Aumgarl.";

-				mes "....................";

-				mes "Aumgarl took a careful look";

-				mes "at the pieces for awhile..^000000";

-				next;

-				mes "................";

-				mes "............";

-				mes "........";

-				mes "......";

-				next;

-				mes "[Aumgarl]";

-				mes "Umm.....";

-				mes "Well.....";

-				mes "It's not possible to get into";

-				mes "work right away.";

-				mes "I need some materials.";

-				next;

-				mes "[Aumgarl]";

-				mes "To repair this sword, we need";

-				mes "some materials.";

-				mes "Since Lyroo is upstairs in pain.";

-				mes "I don't think I can leave the house.";

-				next;

-				mes "[Aumgarl]";

-				mes "so....would you get the";

-				mes "materials for me?";

-				mes "I am sorry I am asking";

-				mes "you too much to do.";

-				next;

-				if (select("Umm..let's do it next time.:Alright, I'll go get them.") == 1) {

-					mes "[Aumgarl]";

-					mes "Umm.....";

-					mes "I am sorry I can't";

-					mes "help you right away.";

-					mes "Come back here when";

-					mes "you need my help then.";

-				} else {

-					mes "[Aumgarl]";

-					mes "Oh~~ really?";

-					mes "Thank you.";

-					mes "I'm sure I'll repair it for you.";

-					mes "Now, listen carefully.";

-					next;

-					mes "[Aumgarl]";

-					mes "^FF00FF1 Anvil";

-					mes "2 Oridecon Stones";

-					mes "5 Broken Swords";

-					mes "2 Steels";

-					mes "1 Hammer of Blacksmith";

-					mes "2 Star Crumbs";

-					mes "5 Live Coals^000000";

-					next;

-					mes "[Aumgarl]";

-					mes "Quite alot huh?";

-					mes "They are necessities";

-					mes "We need them to repair the sword.";

-					mes "I'll go find some other materials.";

-					set b_sword,30;

-				}

-			}

-			break;

-		case 30:

-			if (countitem(986) > 0 && countitem(756) > 1 && countitem(7110) > 4 && countitem(999) > 1 && countitem(1005) > 0 && countitem(1000) > 1 && countitem(7098) > 4) {

-				mes "Oh~~ good, you got them all.";

-				mes "Alright, come back later,";

-				mes "I'll have it repaired.";

-				delitem 986,1; // Anvil

-				delitem 756,2; // Oridecon_Stone

-				delitem 7110,5; // Vroken_Sword

-				delitem 999,2; // Steel

-				delitem 1005,1; // Hammer_Of_Blacksmith

-				delitem 1000,2; // Star_Crumb

-				delitem 7098,5; // Live_Coal

-				set b_sword,31;

-			} else {

-				mes "Hmm.....";

-				mes "Not ready yet?";

-				mes "Materials you need are...";

-				next;

-				mes "[Aumgarl]";

-				mes "^FF00FF1 Anvil";

-				mes "2 Oridecon Stones";

-				mes "5 Broken Swords";

-				mes "2 Steels";

-				mes "1 Hammer of Blacksmith";

-				mes "2 Star Crumbs";

-				mes "5 Live Coals^000000";

-				next;

-				mes "[Aumgarl]";

-				mes "Wrote them down?";

-				mes "I'm almost ready for other materials.";

-			}

-			break;

-		case 31:

-			if (rand(1,5) == 2) {

-				mes "Hey, you're back.";

-				mes "Here it is.";

-				mes "This sword is a great one";

-				mes "for sure. I've noticed at";

-				mes "the first sight.";

-				mes "huhu.....";

-				next;

-				mes "[Aumgarl]";

-				mes "I haven't seen this kind of";

-				mes "great sword for a long";

-				mes "time in my life.";

-				mes "I envy you...";

-				mes "Huhuhu......";

-				next;

-				mes "'You received repaired";

-				mes "'^FF0000SaYumMoon's sword^000000'.";

-				set b_sword,32;

-				getitem 1123,1; // Haedonggum

-			} else {

-				mes "Umm.. it's not done yet.";

-				mes "Would you give me little";

-				mes "more time? It takes longer";

-				mes "than I thought. sorry.";

-			}

-			break;

-		}

-	} else {

-		mes "Thank you...";

-		mes "You've been a great help";

-		mes "to us.";

-		mes "Hope my work had";

-		mes "helped you.";

-	}

-	close;

-}

-

-geffen_in.gat,106,106,7	script	Girl#gnbs2	716,{

-	mes "[Lyroo]";

-	if (b_sword < 20) {

-		mes "Ah...Ah....";

-		mes "Ah...Hi.......";

-		next;

-		mes "^0000FFThis girl seemed to be in serious pain.^000000";

-		close;

-	} else if (b_sword < 24) {

-		mes "Aaa....Aaa....";

-		mes "you...you....";

-		mes "you are the....one...";

-		mes "who will....cure....";

-		mes "...me? Aa....";

-		next;

-		mes "[Lyroo]";

-		mes "..tha... thank you....";

-		next;

-		mes "^0000FFBetter stop talking to her and";

-		mes "rush to find a way to cure her.^000000";

-		close;

-	} else if (b_sword == 24 || b_sword == 25 || b_sword == 26) {

-		mes "Ahh...ahh....";

-		if (sex == 0) {

-			mes "It's ..you.. pretty...sister..";

-		} else {

-			mes "It's ..you.. handsome...brother..";

-		}

-		mes "ah he he....";

-		next;

-		if (select("Ask about her health condition.:Talk to her for a while.") == 1){

-			mes "[Lyroo]";

-			if (rand(1,4) == 3) {

-				mes "uh....umm...?";

-				mes "umm... I...";

-				mes "I can't talk...too long..";

-				mes "so.. listen....carefully..please...";

-				next;

-				mes "[Lyroo]";

-				mes "^0030FFMy body..repeatedly turns cold and hot...";

-				mes "....no sweating on my body...";

-				mes "..and get paralyzed ...quite often..and..";

-				mes "my heart beats ...irregularly.^000000";

-				next;

-				mes "[Lyroo]";

-				mes "Ahh...Ahh.";

-				mes "...........";

-			} else {

-				mes "I...am...so...";

-				mes "...tired.";

-				mes ".............";

-			}

-		} else {

-			mes "[Lyroo]";

-			mes "Ahh........";

-			mes "I..want to ...talk to...you..";

-			mes "but.... sorry....";

-		}

-		next;

-		mes "^0000FFshe seems to have fallen asleeep.^000000";

-		close;

-	} else if (b_sword == 27) {

-		mes "uh...umm?";

-		if (sex == 0) {

-			mes "Ah....It's you pretty sister...";

-		} else {

-			mes "Ah....It's you handsome brother...";

-		}

-		if (countitem(606) > 0) {

-			mes "uh?..what is that you have?";

-			next;

-			if (select("It's nothing.:It's your medicine.") == 1 || countitem(606) < 1){

-				mes "[Lyroo]";

-				mes "umm......";

-				mes "ok....";

-				mes "...........";

-				close;

-			}

-			mes "[Lyroo]";

-			mes "Ah!";

-			mes "you found the medicine~";

-			mes "Ah..hehe...";

-			delitem 606,1; // Aloebera

-			next;

-			mes "^0000FFYou gave her a medicine you";

-			mes "received from Cylrnel.";

-			mes "After taking a medicine, Lyroo";

-			mes "fell in asleep.^000000";

-			set b_sword,28;

-		}

-		close;

-	} else {

-		mes "ehehe...";

-		if (sex == 0) {

-			mes "Thank you my pretty sister.";

-		} else {

-			mes "Thank you my handsome brother.";

-		}

-		mes "I'll have my health back";

-		mes "and be a strong girl. hehe";

-		close;

-	}

-}

-

-prontera.gat,275,86,2	script	Young man#SaYumMoon"	97,{

-	mes "[Neil]";

-	if (b_sword < 20) {

-		mes "It's so good to be helathy.";

-		mes "If you stay in hospital laying";

-		mes "down on the bed all day long,";

-		mes "It'll make you feel depressed.";

-		next;

-		mes "[Neil]";

-		mes "Take care of your health";

-		mes "all the time.";

-		mes "Health is the best of all.";

-	} else {

-		mes "Not long ago, I was in hospital";

-		mes "laying down on the bed for";

-		mes "quite a long time.";

-		mes "And I met this ^FF5000doctor from Yuno^000000.";

-		mes "She helped me to recover in no time.";

-		mes "Yet, I can't run around though.";

-		next;

-		mes "[Neil]";

-		mes "However, I can't believe I got";

-		mes "my health back. It's like a";

-		mes "miracle. Hope I can be someone like";

-		mes "her who can cure others.";

-		if (b_sword == 20) set b_sword,21;

-	}

-	close;

-}

-

-yuno,208,164,4	script	Active little girl#gnbs	101,{

-	mes "[Hisa]";

-	if (b_sword < 21) {

-		mes "Ahhmm.....";

-		mes "This town is so boring.";

-		mes "No events, no festivals..";

-		mes "and all the people stay in";

-		mes "their home studying this and that.";

-		close;

-	}

-	mes "But still, there's one person";

-	mes "I respect. Her name is ^FF5500Cylrnel^000000.";

-	mes "She is an expert in medical treatment.";

-	mes "Moreover, whenever someone becomes";

-	mes "sick in the town, she comes right";

-	mes "away to cure that person..";

-	next;

-	mes "[Hisa]";

-	mes "She tells me lots of stories";

-	mes "she experienced. It's so";

-	mes "interesting to hear them.";

-	mes "She also made jorney round the";

-	mes "world.... Ah ha.....";

-	next;

-	mes "[Hisa]";

-	mes "She's probably at her home.";

-	mes "She came back from a trip.";

-	mes "haha......";

-	if (b_sword == 21) set b_sword,22;

-	if (rand(1,2) == 2) {

-		next;

-		mes "[Hisa]";

-		mes "Ah~!";

-		mes "She's also known as an";

-		mes "fickle woman.";

-		mes "Better watch out. haha..";

-	}

-	close;

-}

-

-yuno_in01,99,101,4	script	Doctor#gnbs	744,{

-	if (b_sword < 23) {

-		mes "[??????]";

-		mes "I have no idea who you are";

-		mes "but would you mind to leave me alone?";

-		mes "I am really busy right now.";

-	} else if (b_sword < 27) {

-		mes "[Cylrnel]";

-		switch (b_sword) {

-		case 23:

-			mes "How can I help you?";

-			mes "If it's not urgent, please";

-			mes "come back next time.";

-			next;

-			mes "[Cylrnel]";

-			if (rand(1,4) == 2) {

-				mes "...............";

-				mes "Need to ask me something?";

-				next;

-				if (select("You're so beautiful.:Do you like traveling?") == 1) {

-					mes "[Cylrnel]";

-					if (rand(1,4) == 4) {

-						mes "..excuse me?";

-						mes "Ah ha ha~";

-						mes "You're a funny guy.";

-						mes "Trying to work on me?";

-						mes "Ah ha ha ha.";

-						next;

-						if (select("Yes, I fell in love in first sight.:I have a favor to ask.") == 1) {

-							mes "[Cylrnel]";

-							if (rand(1,3) == 3) {

-								mes "Ahhaha...Ahahaha...";

-								mes "Ah..I'm sorry..";

-								mes "I haven't seen a guy like you";

-								mes "for a long time.";

-								next;

-								mes "[Cylrnel]";

-								mes "It makes me laugh..haha.";

-								mes "Guess what?";

-								mes "I know you're not here";

-								mes "to work on me.";

-								mes "What business do you have?";

-								next;

-								menu "Well, actually...",-;

-								mes "^FF0000Told Cylrnel about Lyroo.";

-								mes "And also about favor of blacksmith, Aumgarl.^000000";

-								next;

-								mes "[Cylrnel]";

-								if (rand(1,3) == 2) {

-									mes "Um.....";

-									mes "that's what happened..";

-									mes "Oh, well..";

-									mes "I need exact symptoms of a girl.";

-									mes "Go find exact symptoms first";

-									mes "and come back again.";

-									next;

-									mes "[Cylrnel]";

-									mes "Without exact symptoms,";

-									mes "I can't make any diagnose.";

-									set b_sword,24;

-								} else {

-									mes "Umm.......";

-									mes "Quite a long story..";

-									mes "I have no idea why you're";

-									mes "trying to help these people,";

-									mes "but, it's hard to believe you.";

-									mes "Why don't you find some other doctor?";

-								}

-							} else {

-								mes "Ah!";

-								mes "I never thought someone";

-								mes "like you still exist.";

-								mes "I am sorry but, I am";

-								mes "tired with this crap.";

-							}

-						} else {

-							mes "[Cylrnel]";

-							if (rand(1,3) == 3) {

-								mes "Huhu...";

-								mes "well...";

-								mes "Let me hear your story.";

-								next;

-								menu "Actually...",-;

-								mes "^FF0000Told Cylrnel about Lyroo.";

-								mes "And also about favor of blacksmith, Aumgarl.^000000";

-								next;

-								mes "[Cylrnel]";

-								if (rand(1,3) == 1) {

-									mes "Um.....";

-									mes "that's what happened..";

-									mes "Oh, well..";

-									mes "I need exact symptoms of a girl.";

-									mes "Go find exact symptoms first";

-									mes "and come back again.";

-									next;

-									mes "[Cylrnel]";

-									mes "Without exact symptoms,";

-									mes "I can't make any diagnose.";

-									set b_sword,24;

-								} else {

-									mes "Umm.......";

-									mes "Quite a long story..";

-									mes "I have no idea why you're";

-									mes "trying to help these people,";

-									mes "but, it's hard to believe you.";

-									mes "Why don't you find some other doctor?";

-								}

-							} else {

-								mes "Huhu..";

-								mes "Well...";

-								mes "You're no differ with";

-								mes "any other guys around.";

-								mes "I don't have any bussiness";

-								mes "with you. please leave.";

-								close2;

-								warp "yuno.gat",246,143;

-								end;

-							}

-						}

-					} else {

-						mes "Ahhaha..";

-						mes "You're a funny guy.";

-						mes "But, that doesn't";

-						mes "work on me.";

-					}

-				} else {

-					mes "[Cylrnel]";

-					mes "Hmm.. Yes.. but,";

-					mes "if you don't have ";

-					mes "any business to take care,";

-					mes "please leave, I'm pretty busy right now.";

-				}

-			} else {

-				mes "I am sorry, I don't have a time to waste.";

-			}

-			break;

-		case 24:

-			mes "Oh..";

-			mes "you're back..";

-			mes "Did you find the right symptoms?";

-			mes "I wanted to go with you, but";

-			mes "I been really busy.";

-			next;

-			if(select("Not yet...:Yes, Here.") == 1){

-				mes "[Cylrnel]";

-				mes "You're still here?";

-				mes "Go right away!";

-				mes "She's in serious pain.";

-				mes "Her body could be paralyzed";

-				mes "in any minute!";

-				close;

-			}

-			mes "[Cylrnel]";

-			mes "What a relief..";

-			mes "You're earlier than I thought.";

-			mes "I'll ask you some questions about";

-			mes "her condition. Answer correctly.";

-			next;

-			mes "[Cylrnel]";

-			mes "First, How was her body temperature?";

-			set @sick,0;

-			next;

-			setarray .sick1$[1],"Very hot.","Very cold.","Normal.","Turns hot and cold repeatedly.";

-			set @sick1,select(.sick1$[1],.sick1$[2],.sick1$[3],.sick1$[4]);

-			if (@sick1 == 4) set @sick,@sick+1;

-			mes "[Cylrnel]";

-			mes "Ok.";

-			mes "Now, about physiological condition.";

-			next;

-			setarray .sick2$[1],"No sweating at all.","Sweating all over the body.","Runny nose.","No tears, sweats at all.";

-			set @sick2,select(.sick2$[1],.sick2$[2],.sick2$[3],.sick2$[4]);

-			if (@sick2 == 1) set @sick,@sick+1;

-			mes "[Cylrnel]";

-			mes "Next, tell me about";

-			mes "her body condition.";

-			next;

-			setarray .sick3$[1],"Nothing particular.","Become paralyzed often.","Muscles became so soft.","Muscles became so hard.";

-			set @sick3,select(.sick3$[1],.sick3$[2],.sick3$[3],.sick3$[4]);

-			if (@sick3 == 2) set @sick,@sick+1;

-			mes "[Cylrnel]";

-			mes "How about an internal organs?";

-			next;

-			setarray .sick4$[1],"Stomach hurts like it's been stabbed by a knife.","Head hurts like it's been smashed by a hammer.","Heart beats irregularly.","Has difficulty in breathing.";

-			set @sick4,select(.sick4$[1],.sick4$[2],.sick4$[3],.sick4$[4]);

-			if (@sick4 == 3) set @sick,@sick+1;

-			mes "[Cylrnel]";

-			mes "Hmm.. alright.";

-			mes "Let me check this.";

-			mes "so the symptoms are";

-			mes "..............";

-			next;

-			mes "[Cylrnel]";

-			mes "^FF0000"+.sick1$[@sick1]+"";

-			mes ""+.sick2$[@sick2]+"";

-			mes ""+.sick3$[@sick3]+"";

-			mes ""+.sick4$[@sick4]+"^000000";

-			mes "right?";

-			next;

-			if(select("No..not exactly..:Yes, I am sure.") == 1){

-				mes "[Cylrnel]";

-				mes "Then, go back to her and";

-				mes "find the exact symptoms";

-				mes "right away~!!";

-				close;

-			}

-			mes "[Cylrnel]";

-			mes "You're sure about";

-			mes "this, right?";

-			mes "If they're wrong symptoms, I can't be responsible.";

-			next;

-			if(select("Well..let me go and recheck it.:I'm sure.") == 1){

-				mes "[Cylrnel]";

-				mes "Then, go back to her and";

-				mes "find the exact symptoms";

-				mes "right away~!!";

-				close;

-			}

-			mes "[Cylrnel]";

-			mes "Hmm.....";

-			mes "Aright. I'll trust you.";

-			mes "Now, go get these ingredients.";

-			mes "Get them as fast as possible.";

-			mes "Alright?";

-			next;

-			if (@sick == 4) {

-				mes "[Cylrnel]";

-				mes "^FF00002 Seeds of Yggdrasil";

-				mes "3 Aloes";

-				mes "1 Witherless Rose";

-				mes "10 Starsands Of Witch";

-				mes "5 Burning Hearts";

-				mes "5 Ice pieces";

-				set b_sword,26;

-				next;

-				mes "[Cylrnel]";

-				mes "Wrote them down?";

-				mes "I'll tell you once again.";

-				mes "We need...";

-				next;

-				mes "[Cylrnel]";

-				mes "^FF00002 Seeds of Yggdrasil";

-				mes "3 Aloes";

-				mes "1 Witherless Rose";

-				mes "10 Starsands Of Witch";

-				mes "5 Burning Hearts";

-				mes "5 Ice pieces";

-				next;

-			} else {

-				mes "[Cylrnel]";

-				mes "^FF00001 Seed of Yggdrasil";

-				mes "1 Aloe";

-				mes "5 Starsands Of Witch";

-				mes "3 Burning Hearts";

-				mes "3 Ice pieces";

-				set b_sword,25;

-				next;

-				mes "[Cylrnel]";

-				mes "Wrote them down?";

-				mes "I'll tell you once again.";

-				mes "We need...";

-				next;

-				mes "[Cylrnel]";

-				mes "^FF00001 Seed of Yggdrasil";

-				mes "1 Aloe";

-				mes "5 Starsands Of Witch";

-				mes "3 Burning Hearts";

-				mes "3 Ice pieces";

-				next;

-			}

-			mes "[Cylrnel]";

-			mes "Get them as fast as possible.";

-			mes "There isn't much time for Lyroo.";

-			break;

-		case 25:

-			if (countitem(608) > 0 && countitem(704) > 0 && countitem(1061) > 4 && countitem(7097) > 2 && countitem(7066) > 2) {

-				mes "Hmm....";

-				mes "Good. you got them all.";

-				mes "Let me see..";

-				mes ".............";

-				delitem 608,1; // Seed_Of_Yggdrasil

-				delitem 704,1; // Aloe

-				delitem 1061,5; // Starsand_Of_Witch

-				delitem 7097,3; // Burning_Heart

-				delitem 7066,3; // Ice_Piece

-				next;

-				mes "^FF0000Cylrnel began to mix";

-				mes "the ingredients.";

-				mes "................";

-				mes ".............";

-				mes ".........";

-				mes "......^000000";

-				next;

-				mes "[Cylrnel]";

-				mes "............";

-				mes "What!?!?";

-				mes ".....";

-				mes "Hey you....";

-				mes "You gave me a wrong information.";

-				set b_sword,24;

-				next;

-				mes "[Cylrnel]";

-				mes "I made the mecine according";

-				mes "to the symptoms you told me.";

-				mes "But, it became strange medicine!";

-				mes "Bring me the exact symptoms!";

-				close2;

-				warp "yuno.gat",246,143;

-				end;

-			} else {

-				mes "...........";

-				mes "Hey~ you don't have all";

-				mes "the ingredients yet.";

-				mes "Go get them all right away.";

-				next;

-				mes "[Cylrnel]";

-				mes "^FF00001 Seed of Yggdrasil";

-				mes "1 Aloe";

-				mes "5 Starsands Of Witch";

-				mes "3 Burning Hearts";

-				mes "3 Ice pieces";

-				next;

-				mes "[Cylrnel]";

-				mes "Alright?";

-				mes "Now, hurry!.";

-				close2;

-				warp "yuno.gat",246,143;

-				end;

-			}

-			break;

-		case 26:

-			if (countitem(608) > 1 && countitem(704) > 2 && countitem(748) > 0 && countitem(1061) > 9 && countitem(7097) > 4 && countitem(7066) > 4) {

-				mes "Hmm....";

-				mes "Good. you got them all.";

-				mes "Let me see..";

-				mes ".............";

-				delitem 608,2; // Seed_Of_Yggdrasil

-				delitem 704,3; // Aloe

-				delitem 748,1; // Witherless_Rose

-				delitem 1061,10; // Starsand_Of_Witch

-				delitem 7097,5; // Burning_Heart

-				delitem 7066,5; // Ice_Piece

-				next;

-				mes "^FF0000Cylrnel began to mix";

-				mes "the ingredients.";

-				mes "................";

-				mes ".............";

-				mes ".........";

-				mes "......^000000";

-				next;

-				mes "[Cylrnel]";

-				mes "Here~!";

-				mes "It's done.";

-				mes "I don't think this medicine would";

-				mes "cure her disease completely. However,";

-				mes "it will alleviate her from the pain.";

-				next;

-				mes "[Cylrnel]";

-				mes "It wasn't easy to make this medicine.";

-				mes "Here, take this with you.";

-				mes "Take care then..";

-				set b_sword,27;

-				getitem 606,1; // Aloebera

-			} else {

-				mes "...........";

-				mes "Hey~ you don't have all";

-				mes "the ingredients yet.";

-				mes "Go get them all right away.";

-				next;

-				mes "[Cylrnel]";

-				mes "^FF00002 Seeds of Yggdrasil";

-				mes "3 Aloes";

-				mes "1 Witherless Rose";

-				mes "10 Starsands Of Witch";

-				mes "5 Burning Hearts";

-				mes "5 Ice pieces";

-				next;

-				mes "[Cylrnel]";

-				mes "Alright?";

-				mes "Go get them as fast as possible.";

-				close;

-				warp "yuno.gat",246,143;

-				end;

-			}

-			break;

-		}

-	} else {

-		mes "[Cylrnel]";

-		mes "Huhu...";

-		mes "How is she doing?";

-		mes "Getting better?.";

-		mes "By taking that medicine, she'll";

-		mes "recover fast.";

-		next;

-		mes "[Cylrnel]";

-		mes "Tell her to come to me";

-		mes "sometimes to get a medical.";

-		mes "treatment. Walking from her";

-		mes "house to here would be a good";

-		mes "exercise too. Name of her disease";

-		mes "is called '^FF0000Amarhade^000000'.";

-		next;

-		mes "[Cylrnel]";

-		mes "It's a rare disease that";

-		mes "it's not even well known";

-		mes "to medical institution.";

-		mes "Likewise, exact treatment";

-		mes "has not maden yet.";

-		next;

-		mes "[Cylrnel]";

-		mes "..but I found the something..";

-		mes "and it's a.....secret. haha.";

-//      Emotion "Doctor" ET_DELIGHT

-		emotion e_ho;

-	}

-	close;

-}

-

-yuno_in01.gat,104,94,0	script	go away#gnbs	139,2,1{

-	if (b_sword < 22) {

-		mes "[??????]";

-		mes "^FF0000What are you doing here?";

-		mes "Get out!^000000";

-		close2;

-		warp "yuno.gat",246,143;

-		end;

-	} else if (b_sword == 22) {

-		if (rand(1,10) == 10) {

-			mes "[??????]";

-			mes "I am very busy right now. please leave.";

-			set b_sword,23;

-			close;

-		} else {

-			mes "[??????]";

-			mes "^FF0000What are you doing here?";

-			mes "Get out!^000000";

-			close2;

-			warp "yuno.gat",246,143;

-			end;

-		}

-	} else {

-		mes "[Cylrnel]";

-		mes "Who are you?";

-		close;

-	}

-}

+//===== eAthena Script ======================================= 
+//= Quest NPCs related to Gonryun
+//===== By: ==================================================
+//= KarLaeda
+//===== Current Version: ===================================== 
+//= 1.0
+//===== Compatible With: ===================================== 
+//= eAthena 1
+//===== Description: ========================================= 
+//= Gonryun Broken Sword Quest
+//===== Additional Comments: ================================= 
+//= 
+//============================================================ 
+
+
+gon_in.gat,17,93,5	script	Chief#gnbs	775,{
+	mes "[SaYumMoon]";
+	if (BaseLevel <= 50) {
+		mes "hmm...";
+		mes "Oh, Hi there~";
+		mes "I am SaYumMoon, a chief of";
+		mes "this village.";
+		mes "Welcome to Kunlun.";
+		next;
+		mes "[SaYumMoon]";
+		mes "Well, to tell you about this village..";
+		mes "We weren't that much associated with ";
+		mes "other villages.";
+		mes "Nevertheless, through the village named";
+		mes "Alberta, we allowed people to visit";
+		mes "here. It all happened lately.";
+		next;
+		mes "[SaYumMoon]";
+		mes "I feel that this town has been";
+		mes "isolated for too long.";
+		mes "Therefore, people in this town";
+		mes "are not yet so friendly with";
+		mes "visitors yet.";
+		next;
+		mes "[SaYumMoon]";
+		mes "Moreover, thieves are having";
+		mes "fun in this town lately.";
+		mes "Well, you've come to visit this";
+		mes "town.. Enjoy your stay.";
+		close;
+	}
+	if (b_sword == 0) {
+		set b_sword,1;
+		mes "hmm...";
+		mes "Oh, Hi there~";
+		mes "I am SaYumMoon, a chief of";
+		mes "this village.";
+		mes "Welcome to Kunlun.";
+		next;
+		mes "[SaYumMoon]";
+		mes "Well, to tell you about this village..";
+		mes "We weren't that much associated with ";
+		mes "other villages.";
+		mes "Nevertheless, through the village named";
+		mes "Alberta, we allowed people to visit";
+		mes "here. It all happened lately.";
+		next;
+		mes "[SaYumMoon]";
+		mes "I feel that this town has been";
+		mes "isolated for too long.";
+		mes "Therefore, people in this town";
+		mes "are not yet so friendly with";
+		mes "visitors yet.";
+		next;
+		mes "[SaYumMoon]";
+		mes "Moreover, thieves are having";
+		mes "fun in this town lately.";
+		mes "Well, you've come to visit this";
+		mes "town.. Enjoy your stay.";
+		close;
+	}
+	if (b_sword < 18) {
+		switch (b_sword) {
+		case 1:
+			mes "Umm....";
+			mes "Oh, Hi there~";
+			mes "I am SaYumMoon, a chief of";
+			mes "this village.";
+			next;
+			mes "[SaYumMoon]";
+			mes "Welcome to Kunlun.";
+			mes "I feel that this village has been";
+			mes "isolated for too long";
+			mes "unlike other villages.";
+			next;
+			mes "[SaYumMoon]";
+			mes "Nevertheless, through the village named";
+			mes "Alberta, we allowed people to visit";
+			mes "here. It all happened lately.";
+			mes "Since our village has been";
+			next;
+			mes "[SaYumMoon]";
+			mes "isolated for long time,";
+			mes "people in this town";
+			mes "are not yet so friendly with";
+			mes "visitors yet.";
+			mes "Moreover, thieves are having";
+			next;
+			mes "[SaYumMoon]";
+			mes "fun in this town lately.";
+			mes "Well, you've come to visit this";
+			mes "town.. Enjoy your stay.";
+			break;
+		case 2:
+			mes "Oh, it's you~";
+			mes "How do you like it here so far?";
+			mes "Like you've noticed,";
+			mes "village is not so peaceful huh?";
+			next;
+			if(select("It's alright.:I heard that something was stolen..") == 1){
+				mes "[SaYumMoon]";
+				mes "Good...";
+				mes "Well, watch out for robbery.";
+				mes "And..don't act suspicious";
+				mes "in the village.";
+				close;
+			}
+			mes "[SaYumMoon]";
+			mes "hmm..you heard of it?";
+			mes "It was just last night when robbery";
+			mes "occurred. The rumor was true..";
+			mes "Lots of thieves are out there in the village.";
+			next;
+			switch(select("......:What was stolen?:Anyone with injuries?")){
+			case 1:
+				mes "[SaYumMoon]";
+				mes "Can't believe it really happened.";
+				mes "If you see anyone suspicious,";
+				mes "please let me know.";
+				set b_sword,3;
+				break;
+			case 2:
+				mes "[SaYumMoon]";
+				mes "um.....";
+				mes "that is....";
+				mes "just an ordinary sword.";
+				mes "But to us, it's a family treasure";
+				mes "from generation to generation.";
+				next;
+				mes "[SaYumMoon]";
+				mes "I must find this sword";
+				mes "no mattter what!";
+				mes "...but I can't go find it just";
+				mes "by myself. I am too busy.";
+				next;
+				mes "[SaYumMoon]";
+				mes "You know how busy it is to be a";
+				mes "chief of village.";
+				mes "This is a big trouble...hmm...";
+				next;
+				if (select("Hope you find it soon.:Can I find it for you?") == 1){
+					mes "[SaYumMoon]";
+					mes "um..thank you.";
+					mes "Perhaps you find a sword, ";
+					mes "please let me know.";
+					set b_sword,11;
+				} else {
+					mes "[SaYumMoon]";
+					mes "Oh~ Are you serious??";
+					mes "People in the village are";
+					mes "now very sensitive cause of";
+					mes "thieves. It is so difficult to ask";
+					mes "them for a help. If you would help";
+					mes "me to find a sword. I'll pay for that for sure.";
+					set b_sword,3;
+				}
+				break;
+			case 3:
+				mes "[SaYumMoon]";
+				mes "Fortunately, no one's hurt.";
+				mes "But we lost something valuable.";
+				mes "It's a family treasure";
+				mes "which came from generation";
+				mes "to generation.";
+				next;
+				mes "[SaYumMoon]";
+				mes "I must find this sword";
+				mes "no mattter what!";
+				mes "...but I can't go find it just";
+				mes "by myself. I am too busy.";
+				next;
+				mes "[SaYumMoon]";
+				mes "You know how busy it is to be a";
+				mes "chief of village.";
+				mes "This is a big trouble...hmm...";
+				next;
+				if (select("Hope you find it soon.:Can I find it for you?") == 1){
+					mes "[SaYumMoon]";
+					mes "um..thank you.";
+					mes "Perhaps you find a sword, ";
+					mes "please let me know.";
+					set b_sword,11;
+				} else {
+					mes "[SaYumMoon]";
+					mes "Oh~ Are you serious??";
+					mes "People in the village are";
+					mes "now very sensitive cause of";
+					mes "thieves. It is so difficult to ask";
+					mes "them for a help. If you would help";
+					mes "me to find a sword. I'll pay for that for sure.";
+					set b_sword,3;
+				}
+				break;
+			}
+			break;
+		case 3:
+			mes "Haven't found it yet?";
+			mes "No rush. Take it easy.";
+			mes "You have to take care of";
+			mes "youself first before";
+			mes "doing other's favors.";
+			break;
+		case 4:
+			mes "Haven't found it yet?";
+			mes "No rush. Take it easy.";
+			mes "You have to take care of";
+			mes "youself first before";
+			mes "doing other's favors.";
+			break;
+		case 5:
+			mes "Haven't found it yet?";
+			mes "No rush. Take it easy.";
+			mes "You have to take care of";
+			mes "youself first before";
+			mes "doing other's favors.";
+			break;
+		case 6:
+			mes "Oh, you found a traces?";
+			mes "You're doing a good work.";
+			mes "This is my family remedies.";
+			mes "It might help you.";
+			set b_sword,7;
+			getitem 504,3; // White_Potion
+			break;
+		case 7:
+			mes "Thief is in an injury.";
+			mes "He probably is not";
+			mes "far away from here.";
+			break;
+		case 8:
+			mes "Oh, my sword...";
+			mes "..it's broken?";
+			mes "Unbelievable~";
+			mes "How could this happen..";
+			mes "Would you also look for";
+			mes "the other parts please?";
+			break;
+		case 9:
+			mes "hmm...";
+			mes "..my sword... in pieces..";
+			mes "I beg you please. Find it for me.";
+			mes "You'll get something in return.";
+			break;
+		case 10:
+			mes "Oh~~";
+			mes "You've found the pieces for me~";
+			mes "I knew you would've make it.";
+			mes "But they are broken into pieces.";
+			mes "What should I do...";
+			next;
+			mes "[SaYumMoon]";
+			mes "If it's ok with you,";
+			mes "Would you repair my sword for me?";
+			mes "I'm sure I'll pay for that.";
+			next;
+			if (select("No way.:Alright.") == 1) {
+				mes "[SaYumMoon]";
+				mes "Well, yes.. you've been such a";
+				mes "nice person. I appreciate for";
+				mes "your hard work.";
+				mes "It would be better if you help me";
+				mes "to repair the sword for me though..";
+				mes "nono.. I am not enforcing you..";
+				next;
+				mes "[SaYumMoon]";
+				mes "I'll find someway to repair it.";
+				mes "Without your help, I could've done";
+				mes "nothing. This is not a big present";
+				mes "but please take it.";
+				set b_sword,15;
+				getitem 603,1; // Old_Blue_Box
+				next;
+				mes "[SaYumMoon]";
+				mes "If you get any informations or";
+				mes "traces about that damn thief,";
+				mes "please let me know.";
+				mes "I got my sword back but there's";
+				mes "no way I can forgive that thief.";
+				mes "Have a nice travel.";
+			} else {
+				mes "[SaYumMoon]";
+				mes "Wow..you are so nice.";
+				mes "I am owing you a big favor.";
+				mes "I have no idea how this sword";
+				mes "broke into pieces.";
+				mes "I believe you have to find famous";
+				mes "blacksmith to repair it.";
+				next;
+				mes "[SaYumMoon]";
+				mes "Like you know already, this is";
+				mes "a family treasure for me.";
+				mes "oh.. one more thing..";
+				next;
+				mes "[SaYumMoon]";
+				mes "There's a guy named ^555555Choahk^000000";
+				mes "in the village. He has been to many";
+				mes "places all around the world.";
+				mes "He probably has the informations";
+				mes "you need. Go find him first.";
+				next;
+				mes "[SaYumMoon]";
+				mes "and.. this is not a big gift";
+				mes "but please take it..";
+				mes "here...";
+				set b_sword,14;
+				getitem 603,1; // Old_Blue_Box
+			}
+			break;
+		case 11:
+			mes "The village is not in a good";
+			mes "mood at this moment, but still";
+			mes "lots of things to look around.";
+			break;
+		case 12:
+			mes "hmm.. no traces? no marks?... nothing?";
+			mes "ok.. well, thanks for help anyways.";
+			mes "umm....";
+			next;
+			mes "[SaYumMoon]";
+			mes "Here..take this.";
+			mes "Have a good time.";
+			set b_sword,13;
+			getitem 504,1; // White_Potion
+			break;
+		case 13:
+			mes "Everything going well?";
+			mes "The village is not in a good mood.";
+			mes "Take care of yourself.";
+			break;
+		case 14:
+			mes "I appreciate what you are doing.";
+			mes "You make me feel comfortable.";
+			mes "Village seems it's turning back";
+			mes "to old times too. huhu";
+			break;
+		case 15:
+			mes "I appreciate what you are doing.";
+			mes "You make me feel comfortable.";
+			mes "Village seems it's turning back";
+			mes "to old times too. huhu";
+			break;
+		case 16:
+			mes "I appreciate what you are doing.";
+			mes "You make me feel comfortable.";
+			mes "Village seems it's turning back";
+			mes "to old times too. huhu";
+			break;
+		case 17:
+			mes "I appreciate what you are doing.";
+			mes "You make me feel comfortable.";
+			mes "Village seems it's turning back";
+			mes "to old times too. huhu";
+			break;
+		}
+	} else if (b_sword < 32) {
+		mes "I appreciate what you are doing.";
+		mes "You make me feel comfortable.";
+		mes "Village seems it's turning back";
+		mes "to old times too. huhu";
+		mes "and please repair my";
+		mes "sword for me.";
+		next;
+		mes "[SaYumMoon]";
+		mes "You've done so many things for me.";
+		mes "I feel sorry about asking you";
+		mes "more to do.";
+	} else if (b_sword == 32) {
+		if (countitem(1123) < 1) { // Haedonggum
+			mes "um.....";
+			mes "Not yet huh?";
+			mes "You'll repair it for me right?";
+			mes "I'll be waiting.";
+		} else {
+			mes "oh.. it's you.";
+			mes "............";
+			mes "Is that my sword?";
+			mes "Wow you have done it.";
+			mes "Good work!";
+			next;
+			mes "[SaYumMoon]";
+			mes "Hmm..If you have a similar sword I have,";
+			mes "please leave it somewhere else and come back.";
+			mes "Just in case that you give me a wrong one...";
+			next;
+			if(select("Wait for sec:Here it is.") == 1 || countitem(1123) < 1){
+				mes "[SaYumMoon]";
+				mes "Ok, go ahead.";
+				mes "Don't leave mine!!";
+				mes "haha..";
+				close;
+			}
+			mes "[SaYumMoon]";
+			mes "This is a small gift for you.";
+			mes "Please take it.";
+			mes "Thanks for a job well done!";
+			delitem 1123,1; // Haedonggum
+			set b_sword,33;
+			getitem 2404,1; // Shoes_
+			next;
+			mes "[SaYumMoon]";
+			mes "Many thanks for your trouble.";
+			mes "Now I don't feel shame to";
+			mes "ancestors anymore.";
+			mes "huhuh...";
+			mes "Have a good time.";
+		}
+	} else {
+		mes "Oh, it's you.";
+		mes "Once again, thank you.";
+		mes "Enjoy your stay in";
+		mes "our village.";
+		mes "huhuh..";
+	}
+	close;
+}
+
+gon_in.gat,152,35,4	script	Hostess#gnbs	702,{
+	mes "[MaYumBang]";
+	if (b_sword < 1) {
+		mes "Oh.. you're new here right?";
+		mes "Came from out of town?";
+		mes "It's easy to see many people from";
+		mes "out of town these days.";
+		mes "It made people in the village busy.";
+		next;
+		mes "[MaYumBang]";
+		mes "Oops, what am I saying..";
+		mes "Wants some wine?";
+		next;
+		if (select("Yes, please:No, it's ok.") == 1) {
+			mes "[MaYumBang]";
+			mes "Oooops.. oh no...";
+			mes "Many customers came by earlier and";
+			mes "we are out of wine..";
+			mes "Customers are growing larger.";
+			mes "It is also a trouble..";
+		} else {
+			mes "[MaYumBang]";
+			mes "Well, have fun in the village.";
+			mes "Stop by sometimes.";
+		}
+	} else if (b_sword < 3) {
+		mes "You know what?";
+		mes "Chief's house was robbed last night.";
+		mes "I can't believe this happened.";
+		mes "Thieves are hanging around the";
+		mes "village these days.";
+		next;
+		mes "[MaYumBang]";
+		mes "How anxious it is..";
+		mes "It could also happen to my shop.";
+		mes "I should watch out.";
+		mes "oh..what am I saying to you..";
+		mes "Enjoy your time in my shop..hoho.";
+		if (b_sword == 1) set b_sword,2;
+	} else if (b_sword == 3) {
+		mes "Oh, it's you again.";
+		mes "I heard that you decided to";
+		mes "help our chief.";
+		mes "Please get him for us.";
+		mes "How anxious it is..";
+		next;
+		mes "[MaYumBang]";
+		mes "Do you see that guy over there";
+		mes "leaning on the table?";
+		mes "He seems to know about last night's";
+		mes "happenings.";
+		mes "He has been drinking all night long.";
+		set b_sword,4;
+	} else if (b_sword > 3 && b_sword < 11) {
+		mes "Hello there.";
+		mes "Feel something strange in the village huh?";
+		mes "It's all because of the thieves.";
+		mes "And it makes my business worse.";
+		mes "peeew...";
+	} else if (b_sword == 11 || b_sword == 12) {
+		mes "Feel something strange in the village huh?";
+		mes "Hope the thief to get caught in short time.";
+		mes "...";
+	} else {
+		mes "You caught him?";
+		mes "Wow, how brave you are.";
+		mes "I should get ready to run the";
+		mes "shop again. I need to order";
+		mes "some wine first.";
+		next;
+		mes "[MaYumBang]";
+		mes "SulBoong drank all the wine in the shop.";
+		mes "I did not refill the wine since there";
+		mes "aren't any customers...hoho.";
+		mes "Stop by next time.";
+		mes "I'll have a wine ready.";
+	}
+	close;
+}
+
+gon_in.gat,165,16,4	script	Man in hangover#gnbs	748,{
+	mes "[SulBoong]";
+	if (b_sword < 4) {
+		mes "Ahhh.. my stomach.. my head..";
+		mes "Shouldn't drink so much..";
+		mes "Ehhhh....";
+		emotion e_swt2;
+	} else if (b_sword == 4) {
+		if (countitem(506) < 1) { // Green_Potion
+			mes "Ehhh....";
+			mes "Can somebody bring me a potion?";
+			mes "Ehhh....";
+			close;
+		}
+		mes "Ehhh..my stomach..";
+		mes "I need something..";
+		mes "Ehhh..";
+		mes "uh..hey you.. could you give me one of";
+		mes "your ^00FF00Green_Potion^000000 to me?";
+		mes "I got a mad stomach.";
+		next;
+		if (select("No.:Ok, here.") == 1 || countitem(506) < 1) {
+			mes "[SulBoong]";
+			mes "Ehh...";
+			mes "Are you sure?";
+			next;
+			if (select("Sorry, I don't have one.:Ok, here it is.") == 1 || countitem(506) < 1) {
+				mes "[SulBoong]";
+				mes "Wooo..";
+				mes "Go away man..";
+				set b_sword,12;
+				close;
+			}
+			delitem 506,1; // Green_Potion
+			set b_sword,5;
+			mes "[SulBoong]";
+			mes "Oh.. thanks.";
+			mes "I thought you're teasing me.";
+			mes "I feel much better now.";
+			mes "By the way.. You got any questions?";
+			next;
+			if (select("About thief.:Nothing.") == 1){
+				mes "[SulBoong]";
+				mes "Ah~ a thief..";
+				mes "hmm.. let me see..";
+				mes "I went out for walk in the middle";
+				mes "of night while I was drinking.";
+				mes "And I heard something noisy.";
+				next;
+				mes "[SulBoong]";
+				mes "I looked around and found that";
+				mes "area near chief's house was brighter";
+				mes "than any other area. It was strange.";
+				mes "So I kept watching at it and";
+				mes "all of a sudden, I saw something moving";
+				mes "on the roof of houses.";
+				next;
+				mes "[SulBoong]";
+				mes "It disappeared in a second.";
+				mes "I was drunk, and it was dark outside.";
+				mes "I have no idea whether it was a man or a cat or..";
+				mes "don't know what it was.. huhu..";
+				set b_sword,6;
+			} else {
+				mes "[SulBoong]";
+				mes "Ok, then, good bye..";
+				mes "Don't be a drinker like me.";
+				mes "Unless you want to suffer from a hangovers.";
+				mes "huhu..";
+			}
+		} else {
+			delitem 506,1; // Green_Potion
+			set b_sword,5;
+			emotion e_thx;
+			mes "[SulBoong]";
+			mes "Thank you.";
+			mes "heew.. feel much better now.";
+			mes "hmm.. you seem like you got";
+			mes "something to ask me.";
+			next;
+			switch(select("About thief..:How much have you been drinking?:Nothing..")){
+			case 1:
+				mes "[SulBoong]";
+				mes "Ah~ a thief..hmm...";
+				mes "I went out for walk in the middle";
+				mes "of night while I was drinking.";
+				mes "And I heard something noisy.";
+				mes "I looked around and found that";
+				mes "area near chief's house was brighter";
+				next;
+				mes "[SulBoong]";
+				mes "than any other area. It was strange.";
+				mes "So I kept watching at it and";
+				mes "all of a sudden, I saw something moving";
+				mes "on the roof of houses.";
+				mes "It disappeared in a second.";
+				next;
+				if (select("Where to?:Probably a cat.") == 1) {
+					mes "[SulBoong]";
+					mes "Umm?";
+					mes "Well..let me see..";
+					mes "It came from... and head to...um...";
+					mes "bla bla..";
+					next;
+					mes "He was mumbling for awhile";
+					mes "......";
+					next;
+					mes "[SulBoong]";
+					mes "Ah ha~ right...";
+					mes "A shrine.. yes..thief was heading to";
+					mes "a shrine and disappeared.";
+					mes "I'm not sure if it was a human or";
+					mes "an animal...but little big creature.";
+					mes "wonder what it was..";
+					set b_sword,6;
+					next;
+					mes "[SulBoong]";
+					mes "Anything else I can help?";
+					mes "Thanks for the potion.";
+					next;
+					switch(select("Thanks for the information.:Stop drinking too much.:Ok, bye")){
+					case 1:
+						mes "[SulBoong]";
+						mes "I'll see you later then.";
+						mes "I am always here drinking..huhu";
+						break;
+					case 2:
+						mes "[SulBoong]";
+						mes "hmm..";
+						mes "Don't mind me.";
+						break;
+					case 3:
+						mes "[SulBoong]";
+						mes "Alrighty.";
+						mes "Come again whenever you find";
+						mes "any other questions.";
+						break;
+					}
+				} else {
+					mes "[SulBoong]";
+					mes "Yeah..maybe.";
+					mes "It was so dark outside and I was drunk.";
+					mes "I can't remember it clearly.";
+					mes "Anyways it was bigger than a cat for sure.";
+				}
+				break;
+			case 2:
+				mes "[SulBoong]";
+				mes "Ah..um....I..I am not sure.";
+				mes "When I woke up, There were so many";
+				mes "empty bottles around me.";
+				mes ".....";
+				next;
+				mes "^00FF00.......";
+				mes "Without a specific reason, he seemed to be very respectable.^000000";
+				break;
+			case 3:
+				mes "[SulBoong]";
+				mes "alright then.";
+				mes "Hope you don't ever drink like me";
+				mes "in the future.";
+				mes "You'll suffer for long time if you do.";
+				mes "You know what hangover is right?";
+				break;
+			}
+		}
+	} else if (b_sword == 5) {
+		mes "Oh, it's you.";
+		mes "Thanks for the portion last time.";
+		mes "What are you up to?";
+		mes "Got any question for me?";
+		next;
+		if (select("About a thief last night...:Nope, just passing by..") == 1){
+			mes "[SulBoong]";
+			mes "Ah~ a thief..";
+			mes "hmm.. let me see..";
+			mes "I went out for walk in the middle";
+			mes "of night while I was drinking.";
+			mes "And I heard something noisy.";
+			mes "I looked around and found that";
+			next;
+			mes "[SulBoong]";
+			mes "area near chief's house was brighter";
+			mes "than any other area. It was strange.";
+			mes "So I kept watching at it and";
+			mes "all of a sudden, I saw something moving";
+			mes "on the roof of houses.";
+			next;
+			mes "[SulBoong]";
+			mes "It disappeared in a second.";
+			mes "I was drunk, and it was dark outside.";
+			mes "I have no idea whether it was a man or a cat or..";
+			mes "don't know what it was.. huhu..";
+			set b_sword,6;
+		} else {
+			mes "[SulBoong]";
+			mes "alright then.";
+			mes "Hope you don't ever drink like me";
+			mes "in the future.";
+			mes "bye.";
+		}
+	} else if (b_sword < 11) {
+		mes "Well, do your job well.";
+		mes "To keep the peace in our village,";
+		mes "we need to take chief's worries out.";
+	} else if (b_sword <14) {
+		switch (b_sword) {
+		case 11:
+			mes "Ahhh.. my stomach.. my head..";
+			mes "Shouldn't drink so much..";
+			mes "Ehhhh....";
+			emotion e_swt2;
+			break;
+		case 12:
+			mes "Ehhhh..go away.";
+			mes "You're a man with no mercy.";
+			mes "ehhh...";
+			emotion e_pif;
+			break;
+		case 13:
+			mes "Ehhhh..go away.";
+			mes "You're such a coldhearted man.";
+			mes "ehhh...";
+			emotion e_pif;
+			break;
+		}
+	} else {
+		mes "Wahahaha.";
+		mes "So..you found a chief's belongging's?";
+		mes "I knew you could've done it.";
+		mes "You're brave enough to do anything.";
+		mes "Wahahaha.";
+	}
+	close;
+}
+
+gon_dun01.gat,148,156,0	script	start01#gnbs	-1,{
+	OnInit:
+		sleep 10000;
+	OnCommandOn:
+		donpcevent "trace1-"+rand(1,5)+"::OnCommandOn";
+		end;
+}
+
+gon_dun01.gat,201,25,0	script	trace1-1#gnbs	139,1,1,{
+	if (b_sword == 7) donpcevent "timer1-1::OnCommandOn";
+	end;
+
+	OnTimer10000:
+		stopnpctimer;
+		disablenpc "trace1-1#gnbs";
+		donpcevent "start01#gnbs::OnCommandOn";
+		end;
+
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "trace1-1#gnbs";
+		end;
+
+	OnCommandOn:
+		enablenpc "trace1-1#gnbs";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+}
+
+gon_dun01.gat,2,1,0	script	timer1-1	-1,{
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "timer1-1";
+		end;
+
+	OnCommandOn:
+		enablenpc "timer1-1";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+
+	OnCommandOff:
+		stopnpctimer;
+		disablenpc "timer1-1";
+		end;
+
+	OnTimer3000:
+		donpcevent "#getitem1-1::OnCommandOn";
+		end;
+}
+
+gon_dun01.gat,202,25,0	script	#getitem1-1	111,2,1,{
+	if (b_sword != 7) end;
+	set b_sword,8;
+	mes "You found ^FF0000piece of blade^000000.";
+	mes "Seems like it's a part of the sword you've been looking for.";
+	close;
+
+	OnInit:
+		disablenpc "#getitem1-1";
+		end;
+
+	OnCommandOn:
+		enablenpc "#getitem1-1";
+		donpcevent "timer1-1::OnCommandOff";
+		donpcevent "start01#gnbs::OnCommandOn";
+
+	OnCommandOff:
+		disablenpc "#getitem1-1";
+		end;
+}
+
+gon_dun01.gat,190,160,0	script	trace1-2#gnbs	139,1,1,{
+	if (b_sword == 7) donpcevent "timer1-2::OnCommandOn";
+	end;
+
+	OnTimer100000:
+		stopnpctimer;
+		disablenpc "trace1-2#gnbs";
+		donpcevent "start01#gnbs::OnCommandOn";
+		end;
+
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "trace1-2#gnbs";
+		end;
+
+	OnCommandOn:
+		enablenpc "trace1-2#gnbs";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+}
+
+gon_dun01.gat,3,1,0	script	timer1-2	-1,{
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "timer1-2";
+		end;
+
+	OnCommandOn:
+		enablenpc "timer1-2";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+
+	OnCommandOff:
+		stopnpctimer;
+		disablenpc "timer1-2";
+		end;
+
+	OnTimer3000:
+		donpcevent "#getitem1-2::OnCommandOn";
+		end;
+}
+
+gon_dun01.gat,190,159,0	script	#getitem1-2	111,2,1,{
+	if (b_sword != 7) end;
+	set b_sword,8;
+	mes "You found ^FF0000piece of blade^000000.";
+	mes "Seems like it's a part of the sword you've been looking for.";
+	close;
+
+	OnInit:
+		disablenpc "#getitem1-2";
+		end;
+
+	OnCommandOn:
+		enablenpc "#getitem1-2";
+		donpcevent "timer1-2::OnCommandOff";
+		donpcevent "start01#gnbs::OnCommandOn";
+
+	OnCommandOff:
+		disablenpc "#getitem1-2";
+		end;
+}
+
+gon_dun01.gat,163,53,0	script	trace1-3#gnbs	139,1,1,{
+	if (b_sword == 7) donpcevent "timer1-3::OnCommandOn";
+	end;
+
+	OnTimer90000:
+		stopnpctimer;
+		disablenpc "trace1-3#gnbs";
+		donpcevent "start01#gnbs::OnCommandOn";
+		end;
+
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "trace1-3#gnbs";
+		end;
+
+	OnCommandOn:
+		enablenpc "trace1-3#gnbs";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+}
+
+gon_dun01.gat,4,1,0	script	timer1-3	-1,{
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "timer1-3";
+		end;
+
+	OnCommandOn:
+		enablenpc "timer1-3";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+
+	OnCommandOff:
+		stopnpctimer;
+		disablenpc "timer1-3";
+		end;
+
+	OnTimer3000:
+		donpcevent "#getitem1-3::OnCommandOn";
+		end;
+}
+
+gon_dun01.gat,164,53,0	script	#getitem1-3	111,2,1,{
+	if (b_sword != 7) end;
+	set b_sword,8;
+	mes "You found ^FF0000piece of blade^000000.";
+	mes "Seems like it's a part of the sword you've been looking for.";
+	close;
+
+	OnInit:
+		disablenpc "#getitem1-3";
+		end;
+
+	OnCommandOn:
+		enablenpc "#getitem1-3";
+		donpcevent "timer1-3::OnCommandOff";
+		donpcevent "start01#gnbs::OnCommandOn";
+
+	OnCommandOff:
+		disablenpc "#getitem1-3";
+		end;
+}
+
+gon_dun01.gat,133,183,0	script	trace1-4#gnbs	139,1,1,{
+	if (b_sword == 7) donpcevent "timer1-4::OnCommandOn";
+	end;
+
+	OnTimer150000:
+		stopnpctimer;
+		disablenpc "trace1-4#gnbs";
+		donpcevent "start01#gnbs::OnCommandOn";
+		end;
+
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "trace1-4#gnbs";
+		end;
+
+	OnCommandOn:
+		enablenpc "trace1-4#gnbs";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+}
+
+gon_dun01.gat,5,1,0	script	timer1-4	-1,{
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "timer1-4";
+		end;
+
+	OnCommandOn:
+		enablenpc "timer1-4";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+
+	OnCommandOff:
+		stopnpctimer;
+		disablenpc "timer1-4";
+		end;
+
+	OnTimer3000:
+		donpcevent "#getitem1-4::OnCommandOn";
+		end;
+}
+
+gon_dun01.gat,134,183,0	script	#getitem1-4	111,2,1,{
+	if (b_sword != 7) end;
+	set b_sword,8;
+	mes "You found ^FF0000piece of blade^000000.";
+	mes "Seems like it's a part of the sword you've been looking for.";
+	close;
+
+	OnInit:
+		disablenpc "#getitem1-4";
+		end;
+
+	OnCommandOn:
+		enablenpc "#getitem1-4";
+		donpcevent "timer1-4::OnCommandOff";
+		donpcevent "start01#gnbs::OnCommandOn";
+
+	OnCommandOff:
+		disablenpc "#getitem1-4";
+		end;
+}
+
+gon_dun01.gat,139,257,0	script	trace1-5#gnbs	139,1,1,{
+	if (b_sword == 7) donpcevent "timer1-5::OnCommandOn";
+	end;
+
+	OnTimer170000:
+		stopnpctimer;
+		disablenpc "trace1-5#gnbs";
+		donpcevent "start01#gnbs::OnCommandOn";
+		end;
+
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "trace1-5#gnbs";
+		end;
+
+	OnCommandOn:
+		enablenpc "trace1-5#gnbs";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+}
+
+gon_dun01.gat,6,1,0	script	timer1-5	-1,{
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "timer1-5";
+		end;
+
+	OnCommandOn:
+		enablenpc "timer1-5";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+
+	OnCommandOff:
+		stopnpctimer;
+		disablenpc "timer1-5";
+		end;
+
+	OnTimer3000:
+		donpcevent "#getitem1-5::OnCommandOn";
+		end;
+}
+
+gon_dun01.gat,140,257,0	script	#getitem1-5	111,2,1,{
+	if (b_sword != 7) end;
+	set b_sword,8;
+	mes "You found ^FF0000piece of blade^000000.";
+	mes "Seems like it's a part of the sword you've been looking for.";
+	close;
+
+	OnInit:
+		disablenpc "#getitem1-5";
+		end;
+
+	OnCommandOn:
+		enablenpc "#getitem1-5";
+		donpcevent "timer1-5::OnCommandOff";
+		donpcevent "start01#gnbs::OnCommandOn";
+
+	OnCommandOff:
+		disablenpc "#getitem1-5";
+		end;
+}
+
+gon_dun02.gat,1,1,0	script	start02#gnbs	-1,{
+	OnInit:
+		sleep 10000;
+	OnCommandOn:
+		donpcevent "trace2-"+rand(1,6)+"::OnCommandOn";
+		end;
+}
+
+gon_dun02.gat,65,168,0	script	trace2-1#gnbs	139,1,1,{
+	if (b_sword == 8) donpcevent "timer2-1::OnCommandOn";
+	end;
+
+	OnTimer80000:
+		stopnpctimer;
+		disablenpc "trace2-1#gnbs";
+		donpcevent "start02#gnbs::OnCommandOn";
+		end;
+
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "trace2-1#gnbs";
+		end;
+
+	OnCommandOn:
+		enablenpc "trace2-1#gnbs";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+}
+
+gon_dun02.gat,2,1,0	script	timer2-1	-1,{
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "timer2-1";
+		end;
+
+	OnCommandOn:
+		enablenpc "timer2-1";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+
+	OnCommandOff:
+		stopnpctimer;
+		disablenpc "timer2-1";
+		end;
+
+	OnTimer3000:
+		donpcevent "#getitem2-1::OnCommandOn";
+		end;
+}
+
+gon_dun02.gat,202,25,0	script	#getitem2-1	111,2,1,{
+	if (b_sword != 8) end;
+	set b_sword,9;
+	mes "You found ^FF0000piece of blade^000000.";
+	mes "Seems like it's a part of the sword you've been looking for.";
+	close;
+
+	OnInit:
+		disablenpc "#getitem2-1";
+		end;
+
+	OnCommandOn:
+		enablenpc "#getitem2-1";
+		donpcevent "timer2-1::OnCommandOff";
+		donpcevent "start02#gnbs::OnCommandOn";
+
+	OnCommandOff:
+		disablenpc "#getitem2-1";
+		end;
+}
+
+gon_dun02.gat,265,200,0	script	trace2-2#gnbs	139,1,1,{
+	if (b_sword == 8) donpcevent "timer2-2::OnCommandOn";
+	end;
+
+	OnTimer130000:
+		stopnpctimer;
+		disablenpc "trace2-2#gnbs";
+		donpcevent "start02#gnbs::OnCommandOn";
+		end;
+
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "trace2-2#gnbs";
+		end;
+
+	OnCommandOn:
+		enablenpc "trace2-2#gnbs";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+}
+
+gon_dun02.gat,3,1,0	script	timer2-2	-1,{
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "timer2-2";
+		end;
+
+	OnCommandOn:
+		enablenpc "timer2-2";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+
+	OnCommandOff:
+		stopnpctimer;
+		disablenpc "timer2-2";
+		end;
+
+	OnTimer3000:
+		donpcevent "#getitem2-2::OnCommandOn";
+		end;
+}
+
+gon_dun02.gat,265,201,0	script	#getitem2-2	111,2,1,{
+	if (b_sword != 8) end;
+	set b_sword,9;
+	mes "You found ^FF0000piece of blade^000000.";
+	mes "Seems like it's a part of the sword you've been looking for.";
+	close;
+
+	OnInit:
+		disablenpc "#getitem2-2";
+		end;
+
+	OnCommandOn:
+		enablenpc "#getitem2-2";
+		donpcevent "timer2-2::OnCommandOff";
+		donpcevent "start02#gnbs::OnCommandOn";
+
+	OnCommandOff:
+		disablenpc "#getitem2-2";
+		end;
+}
+
+gon_dun02.gat,247,129,0	script	trace2-3#gnbs	139,1,1,{
+	if (b_sword == 8) donpcevent "timer2-3::OnCommandOn";
+	end;
+
+	OnTimer110000:
+		stopnpctimer;
+		disablenpc "trace2-3#gnbs";
+		donpcevent "start02#gnbs::OnCommandOn";
+		end;
+
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "trace2-3#gnbs";
+		end;
+
+	OnCommandOn:
+		enablenpc "trace2-3#gnbs";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+}
+
+gon_dun02.gat,4,1,0	script	timer2-3	-1,{
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "timer2-3";
+		end;
+
+	OnCommandOn:
+		enablenpc "timer2-3";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+
+	OnCommandOff:
+		stopnpctimer;
+		disablenpc "timer2-3";
+		end;
+
+	OnTimer3000:
+		donpcevent "#getitem2-3::OnCommandOn";
+		end;
+}
+
+gon_dun02.gat,247,128,0	script	#getitem2-3	111,2,1,{
+	if (b_sword != 8) end;
+	set b_sword,9;
+	mes "You found ^FF0000piece of blade^000000.";
+	mes "Seems like it's a part of the sword you've been looking for.";
+	close;
+
+	OnInit:
+		disablenpc "#getitem2-3";
+		end;
+
+	OnCommandOn:
+		enablenpc "#getitem2-3";
+		donpcevent "timer2-3::OnCommandOff";
+		donpcevent "start02#gnbs::OnCommandOn";
+
+	OnCommandOff:
+		disablenpc "#getitem2-3";
+		end;
+}
+
+gon_dun02.gat,149,74,0	script	trace2-4#gnbs	139,1,1,{
+	if (b_sword == 8) donpcevent "timer2-4::OnCommandOn";
+	end;
+
+	OnTimer230000:
+		stopnpctimer;
+		disablenpc "trace2-4#gnbs";
+		donpcevent "start02#gnbs::OnCommandOn";
+		end;
+
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "trace2-4#gnbs";
+		end;
+
+	OnCommandOn:
+		enablenpc "trace2-4#gnbs";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+}
+
+gon_dun02.gat,5,1,0	script	timer2-4	-1,{
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "timer2-4";
+		end;
+
+	OnCommandOn:
+		enablenpc "timer2-4";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+
+	OnCommandOff:
+		stopnpctimer;
+		disablenpc "timer2-4";
+		end;
+
+	OnTimer3000:
+		donpcevent "#getitem2-4::OnCommandOn";
+		end;
+}
+
+gon_dun02.gat,149,75,0	script	#getitem2-4	111,2,1,{
+	if (b_sword != 8) end;
+	set b_sword,9;
+	mes "You found ^FF0000piece of blade^000000.";
+	mes "Seems like it's a part of the sword you've been looking for.";
+	close;
+
+	OnInit:
+		disablenpc "#getitem2-4";
+		end;
+
+	OnCommandOn:
+		enablenpc "#getitem2-4";
+		donpcevent "timer2-4::OnCommandOff";
+		donpcevent "start02#gnbs::OnCommandOn";
+
+	OnCommandOff:
+		disablenpc "#getitem2-4";
+		end;
+}
+
+gon_dun02.gat,23,105,0	script	trace2-5#gnbs	139,1,1,{
+	if (b_sword == 8) donpcevent "timer2-5::OnCommandOn";
+	end;
+
+	OnTimer190000:
+		stopnpctimer;
+		disablenpc "trace2-5#gnbs";
+		donpcevent "start02#gnbs::OnCommandOn";
+		end;
+
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "trace2-5#gnbs";
+		end;
+
+	OnCommandOn:
+		enablenpc "trace2-5#gnbs";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+}
+
+gon_dun02.gat,6,1,0	script	timer2-5	-1,{
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "timer2-5";
+		end;
+
+	OnCommandOn:
+		enablenpc "timer2-5";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+
+	OnCommandOff:
+		stopnpctimer;
+		disablenpc "timer2-5";
+		end;
+
+	OnTimer3000:
+		donpcevent "#getitem2-5::OnCommandOn";
+		end;
+}
+
+gon_dun02.gat,23,106,0	script	#getitem2-5	111,2,1,{
+	if (b_sword != 8) end;
+	set b_sword,9;
+	mes "You found ^FF0000piece of blade^000000.";
+	mes "Seems like it's a part of the sword you've been looking for.";
+	close;
+
+	OnInit:
+		disablenpc "#getitem2-5";
+		end;
+
+	OnCommandOn:
+		enablenpc "#getitem2-5";
+		donpcevent "timer2-5::OnCommandOff";
+		donpcevent "start02#gnbs::OnCommandOn";
+
+	OnCommandOff:
+		disablenpc "#getitem2-5";
+		end;
+}
+
+gon_dun02.gat,249,39,0	script	trace2-6#gnbs	139,1,1,{
+	if (b_sword == 8) donpcevent "timer2-6::OnCommandOn";
+	end;
+
+	OnTimer110000:
+		stopnpctimer;
+		disablenpc "trace2-6#gnbs";
+		donpcevent "start02#gnbs::OnCommandOn";
+		end;
+
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "trace2-6#gnbs";
+		end;
+
+	OnCommandOn:
+		enablenpc "trace2-6#gnbs";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+}
+
+gon_dun02.gat,7,1,0	script	timer2-6	-1,{
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "timer2-6";
+		end;
+
+	OnCommandOn:
+		enablenpc "timer2-6";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+
+	OnCommandOff:
+		stopnpctimer;
+		disablenpc "timer2-6";
+		end;
+
+	OnTimer3000:
+		donpcevent "#getitem2-6::OnCommandOn";
+		end;
+}
+
+gon_dun02.gat,249,40,0	script	#getitem2-6	111,2,1,{
+	if (b_sword != 8) end;
+	set b_sword,9;
+	mes "You found ^FF0000piece of blade^000000.";
+	mes "Seems like it's a part of the sword you've been looking for.";
+	close;
+
+	OnInit:
+		disablenpc "#getitem2-6";
+		end;
+
+	OnCommandOn:
+		enablenpc "#getitem2-6";
+		donpcevent "timer2-6::OnCommandOff";
+		donpcevent "start02#gnbs::OnCommandOn";
+
+	OnCommandOff:
+		disablenpc "#getitem2-6";
+		end;
+}
+
+gon_dun03.gat,1,1,0	script	start03#gnbs	-1,{
+	OnInit:
+		sleep 10000;
+	OnCommandOn:
+		donpcevent "trace3-"+rand(1,7)+"::OnCommandOn";
+		end;
+}
+
+gon_dun03.gat,11,75,0	script	trace3-1#gnbs	139,1,1,{
+	if (b_sword == 9) donpcevent "timer3-1::OnCommandOn";
+	end;
+
+	OnTimer200000:
+		stopnpctimer;
+		disablenpc "trace3-1#gnbs";
+		donpcevent "start03#gnbs::OnCommandOn";
+		end;
+
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "trace3-1#gnbs";
+		end;
+
+	OnCommandOn:
+		enablenpc "trace3-1#gnbs";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+}
+
+gon_dun03.gat,2,1,0	script	timer3-1	-1,{
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "timer3-1";
+		end;
+
+	OnCommandOn:
+		enablenpc "timer3-1";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+
+	OnCommandOff:
+		stopnpctimer;
+		disablenpc "timer3-1";
+		end;
+
+	OnTimer3000:
+		donpcevent "#getitem3-1::OnCommandOn";
+		end;
+}
+
+gon_dun03.gat,10,74,0	script	#getitem3-1	111,2,1,{
+	if (b_sword != 9) end;
+	set b_sword,10;
+	mes "You found ^FF0000piece of blade^000000.";
+	mes "Seems like it's a part of the sword you've been looking for.";
+	mes "You put all the pieces on the ground";
+	mes "and assembled them. Seems like you've found ";
+	mes "all pieces of the blade.";
+	close;
+
+	OnInit:
+		disablenpc "#getitem3-1";
+		end;
+
+	OnCommandOn:
+		enablenpc "#getitem3-1";
+		donpcevent "timer3-1::OnCommandOff";
+		donpcevent "start03#gnbs::OnCommandOn";
+
+	OnCommandOff:
+		disablenpc "#getitem3-1";
+		end;
+}
+
+gon_dun03.gat,199,103,0	script	trace3-2#gnbs	139,1,1,{
+	if (b_sword == 9) donpcevent "timer3-2::OnCommandOn";
+	end;
+
+	OnTimer130000:
+		stopnpctimer;
+		disablenpc "trace3-2#gnbs";
+		donpcevent "start03#gnbs::OnCommandOn";
+		end;
+
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "trace3-2#gnbs";
+		end;
+
+	OnCommandOn:
+		enablenpc "trace3-2#gnbs";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+}
+
+gon_dun03.gat,3,1,0	script	timer3-2	-1,{
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "timer3-2";
+		end;
+
+	OnCommandOn:
+		enablenpc "timer3-2";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+
+	OnCommandOff:
+		stopnpctimer;
+		disablenpc "timer3-2";
+		end;
+
+	OnTimer3000:
+		donpcevent "#getitem3-2::OnCommandOn";
+		end;
+}
+
+gon_dun03.gat,199,102,0	script	#getitem3-2	111,2,1,{
+	if (b_sword != 9) end;
+	set b_sword,10;
+	mes "You found ^FF0000piece of blade^000000.";
+	mes "Seems like it's a part of the sword you've been looking for.";
+	mes "You put all the pieces on the ground";
+	mes "and assembled them. Seems like you've found ";
+	mes "all pieces of the blade.";
+	close;
+
+	OnInit:
+		disablenpc "#getitem3-2";
+		end;
+
+	OnCommandOn:
+		enablenpc "#getitem3-2";
+		donpcevent "timer3-2::OnCommandOff";
+		donpcevent "start03#gnbs::OnCommandOn";
+
+	OnCommandOff:
+		disablenpc "#getitem3-2";
+		end;
+}
+
+gon_dun03.gat,14,162,0	script	trace3-3#gnbs	139,1,1,{
+	if (b_sword == 9) donpcevent "timer3-3::OnCommandOn";
+	end;
+
+	OnTimer110000:
+		stopnpctimer;
+		disablenpc "trace3-3#gnbs";
+		donpcevent "start03#gnbs::OnCommandOn";
+		end;
+
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "trace3-3#gnbs";
+		end;
+
+	OnCommandOn:
+		enablenpc "trace3-3#gnbs";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+}
+
+gon_dun03.gat,4,1,0	script	timer3-3	-1,{
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "timer3-3";
+		end;
+
+	OnCommandOn:
+		enablenpc "timer3-3";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+
+	OnCommandOff:
+		stopnpctimer;
+		disablenpc "timer3-3";
+		end;
+
+	OnTimer3000:
+		donpcevent "#getitem3-3::OnCommandOn";
+		end;
+}
+
+gon_dun03.gat,14,163,0	script	#getitem3-3	111,2,1,{
+	if (b_sword != 9) end;
+	set b_sword,10;
+	mes "You found ^FF0000piece of blade^000000.";
+	mes "Seems like it's a part of the sword you've been looking for.";
+	mes "You put all the pieces on the ground";
+	mes "and assembled them. Seems like you've found ";
+	mes "all pieces of the blade.";
+	close;
+
+	OnInit:
+		disablenpc "#getitem3-3";
+		end;
+
+	OnCommandOn:
+		enablenpc "#getitem3-3";
+		donpcevent "timer3-3::OnCommandOff";
+		donpcevent "start03#gnbs::OnCommandOn";
+
+	OnCommandOff:
+		disablenpc "#getitem3-3";
+		end;
+}
+
+gon_dun03.gat,155,263,0	script	trace3-4#gnbs	139,1,1,{
+	if (b_sword == 9) donpcevent "timer3-4::OnCommandOn";
+	end;
+
+	OnTimer230000:
+		stopnpctimer;
+		disablenpc "trace3-4#gnbs";
+		donpcevent "start03#gnbs::OnCommandOn";
+		end;
+
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "trace3-4#gnbs";
+		end;
+
+	OnCommandOn:
+		enablenpc "trace3-4#gnbs";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+}
+
+gon_dun03.gat,5,1,0	script	timer3-4	-1,{
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "timer3-4";
+		end;
+
+	OnCommandOn:
+		enablenpc "timer3-4";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+
+	OnCommandOff:
+		stopnpctimer;
+		disablenpc "timer3-4";
+		end;
+
+	OnTimer3000:
+		donpcevent "#getitem3-4::OnCommandOn";
+		end;
+}
+
+gon_dun03.gat,156,263,0	script	#getitem3-4	111,2,1,{
+	if (b_sword != 9) end;
+	set b_sword,10;
+	mes "You found ^FF0000piece of blade^000000.";
+	mes "Seems like it's a part of the sword you've been looking for.";
+	mes "You put all the pieces on the ground";
+	mes "and assembled them. Seems like you've found ";
+	mes "all pieces of the blade.";
+	close;
+
+	OnInit:
+		disablenpc "#getitem3-4";
+		end;
+
+	OnCommandOn:
+		enablenpc "#getitem3-4";
+		donpcevent "timer3-4::OnCommandOff";
+		donpcevent "start03#gnbs::OnCommandOn";
+
+	OnCommandOff:
+		disablenpc "#getitem3-4";
+		end;
+}
+
+gon_dun03.gat,169,90,0	script	trace3-5#gnbs	139,1,1,{
+	if (b_sword == 9) donpcevent "timer3-5::OnCommandOn";
+	end;
+
+	OnTimer190000:
+		stopnpctimer;
+		disablenpc "trace3-5#gnbs";
+		donpcevent "start03#gnbs::OnCommandOn";
+		end;
+
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "trace3-5#gnbs";
+		end;
+
+	OnCommandOn:
+		enablenpc "trace3-5#gnbs";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+}
+
+gon_dun03.gat,6,1,0	script	timer3-5	-1,{
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "timer3-5";
+		end;
+
+	OnCommandOn:
+		enablenpc "timer3-5";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+
+	OnCommandOff:
+		stopnpctimer;
+		disablenpc "timer3-5";
+		end;
+
+	OnTimer3000:
+		donpcevent "#getitem3-5::OnCommandOn";
+		end;
+}
+
+gon_dun03.gat,170,90,0	script	#getitem3-5	111,2,1,{
+	if (b_sword != 9) end;
+	set b_sword,10;
+	mes "You found ^FF0000piece of blade^000000.";
+	mes "Seems like it's a part of the sword you've been looking for.";
+	mes "You put all the pieces on the ground";
+	mes "and assembled them. Seems like you've found ";
+	mes "all pieces of the blade.";
+	close;
+
+	OnInit:
+		disablenpc "#getitem3-5";
+		end;
+
+	OnCommandOn:
+		enablenpc "#getitem3-5";
+		donpcevent "timer3-5::OnCommandOff";
+		donpcevent "start03#gnbs::OnCommandOn";
+
+	OnCommandOff:
+		disablenpc "#getitem3-5";
+		end;
+}
+
+gon_dun03.gat,162,40,0	script	trace3-6#gnbs	139,1,1,{
+	if (b_sword == 9) donpcevent "timer3-6::OnCommandOn";
+	end;
+
+	OnTimer110000:
+		stopnpctimer;
+		disablenpc "trace3-6#gnbs";
+		donpcevent "start03#gnbs::OnCommandOn";
+		end;
+
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "trace3-6#gnbs";
+		end;
+
+	OnCommandOn:
+		enablenpc "trace3-6#gnbs";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+}
+
+gon_dun03.gat,7,1,0	script	timer3-6	-1,{
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "timer3-6";
+		end;
+
+	OnCommandOn:
+		enablenpc "timer3-6";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+
+	OnCommandOff:
+		stopnpctimer;
+		disablenpc "timer3-6";
+		end;
+
+	OnTimer3000:
+		donpcevent "#getitem3-6::OnCommandOn";
+		end;
+}
+
+gon_dun03.gat,68,39,0	script	#getitem3-6	111,1,2,{
+	if (b_sword != 9) end;
+	set b_sword,10;
+	mes "You found ^FF0000piece of blade^000000.";
+	mes "Seems like it's a part of the sword you've been looking for.";
+	mes "You put all the pieces on the ground";
+	mes "and assembled them. Seems like you've found ";
+	mes "all pieces of the blade.";
+	close;
+
+	OnInit:
+		disablenpc "#getitem3-6";
+		end;
+
+	OnCommandOn:
+		enablenpc "#getitem3-6";
+		donpcevent "timer3-6::OnCommandOff";
+		donpcevent "start03#gnbs::OnCommandOn";
+
+	OnCommandOff:
+		disablenpc "#getitem3-6";
+		end;
+}
+
+gon_dun03.gat,68,212,0	script	trace3-7#gnbs	139,1,1,{
+	if (b_sword == 9) donpcevent "timer3-7::OnCommandOn";
+	end;
+
+	OnTimer110000:
+		stopnpctimer;
+		disablenpc "trace3-7#gnbs";
+		donpcevent "start03#gnbs::OnCommandOn";
+		end;
+
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "trace3-7#gnbs";
+		end;
+
+	OnCommandOn:
+		enablenpc "trace3-7#gnbs";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+}
+
+gon_dun03.gat,6,1,0	script	timer3-7	-1,{
+	OnInit:
+		initnpctimer;
+		stopnpctimer;
+		disablenpc "timer3-7";
+		end;
+
+	OnCommandOn:
+		enablenpc "timer3-7";
+		setnpctimer 0;
+		startnpctimer;
+		end;
+
+	OnCommandOff:
+		stopnpctimer;
+		disablenpc "timer3-7";
+		end;
+
+	OnTimer3000:
+		donpcevent "#getitem3-7::OnCommandOn";
+		end;
+}
+
+gon_dun03.gat,68,213,0	script	#getitem3-7	111,1,2,{
+	if (b_sword != 9) end;
+	set b_sword,10;
+	mes "You found ^FF0000piece of blade^000000.";
+	mes "Seems like it's a part of the sword you've been looking for.";
+	mes "You put all the pieces on the ground";
+	mes "and assembled them. Seems like you've found ";
+	mes "all pieces of the blade.";
+	close;
+
+	OnInit:
+		disablenpc "#getitem3-7";
+		end;
+
+	OnCommandOn:
+		enablenpc "#getitem3-7";
+		donpcevent "timer3-7::OnCommandOff";
+		donpcevent "start03#gnbs::OnCommandOn";
+
+	OnCommandOff:
+		disablenpc "#getitem3-7";
+		end;
+}
+
+gon_in,18,27,5	script	Madam#gnbs	771,{
+	mes "[SangHwaYeun]";
+	mes "hohohohoho~";
+	mes "Who might this be?";
+	mes "A vistor from out of town~";
+	mes "hohoho.";
+	next;
+	if (select("Hi, Madam~:Where's chief?") == 1) {
+		mes "[SangHwaYeun]";
+		mes "Hi, there~";
+		close;
+	}
+	mes "[SangHwaYeun]";
+	if (sex == 0) {
+		mes "Hoho, he's upstairs.";
+		mes "You're such a pretty lady.";
+		mes "Don't be too fascinated by";
+		mes "my husband. alright?";
+		mes "Hohoho~";
+	} else {
+		mes "He's upstairs.";
+		mes "You are such a handsome young man";
+		mes "But not better than my huhsband.";
+		mes "Hohoho..";
+	}
+	close;
+}
+
+gon_dun03,62,222,0	script	Strange dead body#gnbs	111,{
+	if (b_sword < 7) {
+		mes "Here's a rotten dead body.";
+		mes "Seemed to be eaten by monsters.";
+		close;
+	}
+	if (b_sword > 6 && b_sword < 11) {
+		mes "There's a paper between the bones";
+		mes "of dead body.";
+		mes "Take a look?";
+		next;
+		if (select("Yes.:Leave.") == 1) {
+			mes "Paper is so worned out,";
+			mes "but there's a words on it.";
+			mes "It's written by a blood.";
+			mes "So difficult to see the letter.";
+			mes "Almost impossible to find out what's written.";
+			next;
+			mes "^FF0000Damn I can't...believe..  failed..";
+			mes "Sayum... I should've..";
+			mes "watchout...ehhh...but..  break";
+			mes "..pieces...and seprate..";
+			mes "I..with";
+			mes "this...^000000";
+			next;
+			mes "Paper was all blood-stained.";
+			mes "He probably couldn't make it any longer.";
+		} else {
+			mes "Felt something was missing.";
+			mes "Blood-stained dead body was";
+			mes "getting on my nerve";
+			mes "But I just decided to leave from here.";
+		}
+	} else if (b_sword == 11 || b_sword == 12) {
+		mes "Here's a ungly looking dead body.";
+		mes "I should just pass by.";
+	} else {
+		mes "A skeleton eaten by many monsters.";
+		mes "Felt pitable for awhile, but felt";
+		mes "bad when looking at it for";
+		mes "long time.";
+	}
+	close;
+}
+
+gonryun,139,142,7	script	Girl##gnbs1	772,{
+	mes "[SaEunSo]";
+	if (b_sword < 12) {
+		mes "..........";
+		mes "I was happy looking at the visitors";
+		mes "from other villages, but because of";
+		mes "the thief, I feel terrible now'";
+		emotion e_dots;
+	} else {
+		mes "Hehe...";
+		mes "I am so happy now.";
+		mes "Lots of visitors are coming to our village..";
+		mes "found the stuff my father lost..";
+		mes "Hehe...";
+		mes "The guy who found the stuff for my";
+		mes "father.. I am sure he is a great man.";
+	}
+	close;
+}
+
+gonryun.gat,100,241,0	script	Stranger#gnbs"	733,{
+	mes "[Choahk]";
+	if (b_sword < 14) {
+		mes "Hmm...";
+		mes "I'm pretty busy right now, come later.";
+		emotion e_dots;
+	} else if (b_sword < 17) {
+		switch (b_sword) {
+		case 14:
+			switch(nakha) {
+			case 0:
+				mes "Hmm...";
+				mes "What is it?";
+				mes "What do you want?";
+				mes "I don't like to get bothered.";
+				next;
+				if (select("Ask about blacksmith.:Are are you being so mean?") == 1){
+					mes "[Choahk]";
+					mes "Hum.....";
+					mes "so..you are the one who found";
+					mes "the sword huh?";
+					mes "Did you also get asked to repair it?";
+					next;
+					if (select("Exactly.:No..I'm just...") == 1){
+						mes "[Choahk]";
+						mes "well..";
+						mes "If you want some information";
+						mes "from me, come after helping one";
+						mes "person in the village who's in trouble right now.";
+						set b_sword,16;
+					} else {
+						mes "[Choahk]";
+						mes "Hmm...";
+						mes "I guess not...";
+						mes "Don't bother me anymore. I got bunch of things to do.";
+					}
+				} else {
+					mes "[Choahk]";
+					mes "Hmm...";
+					mes "Why do you care about other's";
+					mes "personality. It's none of your business.";
+					mes "Take a look at yourself first";
+					mes "before you say something like that.";
+				}
+				break;
+			case 1:
+				mes "Hmm...";
+				mes "You're in the middle of helping";
+				mes "someone now huh?";
+				mes "Why don't you go and take care of it first.";
+				mes "Once you start to help someone,";
+				mes "you're responsible to finsh that job well.";
+				set b_sword,16;
+				break;
+			case 2:
+				mes "Hmm...";
+				mes "You're in the middle of helping";
+				mes "someone now huh?";
+				mes "Why don't you go and take care of it first.";
+				mes "Once you start to help someone,";
+				mes "you're responsible to finsh that job well.";
+				set b_sword,16;
+				break;
+			case 3:
+				mes "Hmm...";
+				mes "What do you want??";
+				next;
+				if (select("Ask about blacksmith.:Are are you being so mean?") == 1) {
+					mes "[Choahk]";
+					mes "Hum.....";
+					mes "so..you are the one who found";
+					mes "the sword huh?";
+					mes "Did you also get asked to repair it?";
+					next;
+					if (select("Exactly.:No..I'm just...") == 1){
+						mes "[Choahk]";
+						mes "Hmm...";
+						mes "Since it's broke into pieces,";
+						mes "you should find someone to repair it.";
+						mes "Go to ^FF0000Geffen^000000, you'll find someone";
+						mes "who can help you.";
+						set b_sword,17;
+					} else {
+						mes "[Choahk]";
+						mes "Hmm...";
+						mes "I guess not...";
+						mes "Don't bother me anymore.";
+						mes "I got bunch of things to do.";
+					}
+				} else {
+					mes "[Choahk]";
+					mes "Hmm...";
+					mes "Why do you care about other's";
+					mes "personality. It's none of your business.";
+					mes "Take a look at yourself first";
+					mes "before you say something like that.";
+				}
+				break;
+			case 4:
+				mes "Guess I was wasting my time.";
+				mes "If you make any promises,";
+				mes "it's your responsibility to";
+				mes "take care of it until it's completely done.";
+				next;
+				mes "[Choahk]";
+				mes "I don't like people who do not";
+				mes "keep the promises.";
+				mes "You'll not get any informations from me.";
+				mes "Don't ever bother me again.";
+				set b_sword,15;
+				break;
+			}
+			break;
+		case 15:
+			mes "Hmm...";
+			mes "I'm busy right now. Why don't come later.";
+			emotion e_dots;
+			break;
+		case 16:
+			switch(nakha){
+			case 0:
+				mes "Hmm......";
+				mes "You're not done with your";
+				mes "requirements yet.";
+				mes "I can't give you any information";
+				mes "until you finish your job.";
+				break;
+			case 1:
+				mes "Hmm....";
+				mes "Once you start to help someone,";
+				mes "you're responsible to finsh that job well.";
+				mes "Why don't you go and take care of it first.";
+				break;
+			case 2:
+				mes "Hmm....";
+				mes "Once you start to help someone,";
+				mes "you're responsible to finsh that job well.";
+				mes "Why don't you go and take care of it first.";
+				break;
+			case 3:
+				mes "Hmm......";
+				mes "What do you want?";
+				next;
+				if (select("Ask about blacksmith.:Are are you being so mean?") == 1) {
+					mes "[Choahk]";
+					mes "Hum.....";
+					mes "so..you are the one who found";
+					mes "the sword huh?";
+					mes "Did you also get asked to repair it?";
+					next;
+					if (select("Exactly:No.. I'm just...") == 1) {
+						mes "[Choahk]";
+						mes "Hmm...";
+						mes "Since it's broke into pieces,";
+						mes "you should find someone to repair it.";
+						mes "Go to ^FF0000Geffen^000000, you'll find someone";
+						mes "who can help you.";
+						set b_sword,17;
+					} else {
+						mes "[Choahk]";
+						mes "Hmm...";
+						mes "I guess not...";
+						mes "Don't bother me anymore.";
+						mes "I got bunch of things to do.";
+					}
+				} else {
+					mes "[Choahk]";
+					mes "Hmm...";
+					mes "Why do you care about other's";
+					mes "personality. It's none of your business.";
+					mes "Take a look at yourself first";
+					mes "before you say something like that.";
+				}
+				break;
+			case 4:
+				mes "Guess I was wasting my time.";
+				mes "If you make any promises,";
+				mes "it's your responsibility to";
+				mes "take care of it until it's completely done.";
+				next;
+				mes "[Choahk]";
+				mes "I don't like people who do not";
+				mes "keep the promises.";
+				mes "You'll not get any informations from me.";
+				mes "Don't ever bother me again.";
+				set b_sword,15;
+				break;
+			}
+			break;
+		}
+	} else if (b_sword < 33) {
+		mes "Umm?";
+		mes "Didn't I tell you to go to ^FF0000Geffen^000000?";
+		mes "You'll find famous blacksmith there.";
+		mes "He'll repair the sword for you.";
+		mes "I gave you all the informations";
+		mes "I have so far.";
+		next;
+		mes "[Choahk]";
+		mes "You are responsible to take care of the rest.";
+	} else {
+		mes "Hmm......";
+		mes "Helping people in trouble is";
+		mes "such a nice thing to do.";
+		mes "You are doing the right thing.";
+	}
+	close;
+}
+
+geffen_in.gat,71,112,2	script	Blacksmith#SaYumMoon	731,{
+	mes "[Aumgarl]";
+	if (b_sword < 17) {
+		mes "Pew..hew....";
+		mes "My poor baby Lyroo..";
+		mes "hew....";
+	} else if (b_sword < 32) {
+		switch (b_sword) {
+		case 17:
+			mes "Pew..hew....";
+			mes "My poor baby Lyroo..";
+			mes "hew....";
+			next;
+			if (select("Sir...:...........") == 1) {
+				mes "[Aumgarl]";
+				mes "Umm? Who're you?";
+				mes "Need something?";
+				mes "If not, please leave..";
+				next;
+				if (select("I came to repair the sword.:I heard you are famous blacksmith...") == 1) {
+					mes "[Aumgarl]";
+					mes "Umm........";
+					mes "Sorry but, we're closed.";
+					mes "Come again next time.";
+					mes "Bye";
+					set b_sword,18;
+				} else {
+					mes "[Aumgarl]";
+					mes "Yes, I am a blacksmith,";
+					mes "but I don't think I am famous.";
+					mes "And unfortunately.. we are closed.";
+				}
+			} else {
+				mes "[Aumgarl]";
+				mes "Done with your business?";
+				mes "Then please leave.";
+			}
+			break;
+		case 18:
+			mes "Like I said...I am busy!";
+			mes "Come later.";
+			if (rand(1,8) == 7) {
+				set b_sword,19;
+				mes "What nerve you've got!";
+			}
+			close2;
+			warp "geffen.gat",173,169;
+			end;
+		case 19:
+			mes "Hmm....";
+			mes "Ahh....";
+			mes "What nerve you've got!";
+			mes "What do you want?";
+			next;
+			switch(select("I want to marry your granddaughter.:Your graddaughter is such a pretty girl.:I came to repair the sword.")){
+			case 1:
+				mes "[Aumgarl]";
+				mes ".....";
+				mes ".........";
+				mes ".............";
+				mes "...................";
+				mes "........................";
+				next;
+				mes "[Aumgarl]";
+				mes "Who the heck are you?";
+				mes "Want my granddaughter all of a sudden?";
+				mes "Get the hell out of here!";
+				mes "Don't ever come back here!";
+				emotion e_pif;
+				break;
+			case 2:
+				mes "[Aumgarl]";
+				mes "You're damn right~";
+				mes "My granddaughter is so~ pretty.";
+				mes "Hahaha....";
+				mes ".....peew heew....";
+				next;
+				switch(select("I want to marry her...:I came to repair the sword.:Anything wrong?")){
+				case 1:
+					mes "[Aumgarl]";
+					mes ".....";
+					mes ".........";
+					mes ".............";
+					mes "...................";
+					mes "........................";
+					next;
+					mes "[Aumgarl]";
+					mes "Who the heck are you?";
+					mes "Want my granddaughter all of a sudden?";
+					mes "Get the hell out of here!";
+					mes "Don't ever come back here!";
+					emotion e_pif;
+					break;
+				case 2:
+					mes "[Aumgarl]";
+					mes "...............";
+					mes "the sword?";
+					mes "I don't remember when was the";
+					mes "last time I touched a steel.";
+					mes "hmm...";
+					mes "let me see the sword.?";
+					next;
+					mes "[Aumgarl]";
+					mes "Hmm......";
+					mes "Umm.........";
+					mes "............";
+					next;
+					mes "^0000FFHe took a careful look at the pieces of sword for awhile.^000000";
+					next;
+					mes "[Aumgarl]";
+					mes "Hmm.......";
+					mes "So this is the one huh?";
+					mes "Well.....";
+					mes "I am sorry, but this sword is not";
+					mes "something I can repair";
+					mes "at the moment.";
+					next;
+					mes "[Aumgarl]";
+					mes "Why don't you go find";
+					mes "some other blacksmith.";
+					mes "I am sorry........";
+					break;
+				case 3:
+					mes "[Aumgarl]";
+					mes "Ah...............";
+					mes "this is not something I shall tell";
+					mes "others....but....";
+					mes "my granddaughter lyroo has";
+					mes "an incurable disease...";
+					next;
+					mes "[Aumgarl]";
+					mes "Not long after she was born,";
+					mes "her parents died by an accident.";
+					mes "Since from that day of an accident,";
+					mes "I took care of her.";
+					mes "hmm......";
+					next;
+					mes "[Aumgarl]";
+					mes "Ahh...........";
+					mes "and...moreover, she started to suffer";
+					mes "from an illness. I've met many famous";
+					mes "doctors all around the place but....";
+					mes "no one even found out the name of";
+					mes "a disease.";
+					next;
+					switch(select("I am sorry to hear that.:I'll make her happy.:I want to cure her.")){
+					case 1:
+						mes "[Aumgarl]";
+						mes "Ahh.......";
+						mes "I'll just have to take it";
+						mes "as our fate.";
+						mes "I just feel sorry for lyroo.";
+						mes ".............";
+						emotion e_dots;
+						break;
+					case 2:
+						mes "[Aumgarl]";
+						mes "Umm.....";
+						mes "What do you mean?";
+						mes "How're you going to make her happy?";
+						mes "I don't think it makes sense at all.";
+						mes "Umm......";
+						next;
+						switch(select( "I'll make her happy all the time.:I want to take her with me.:I will cure her.")){
+						case 1:
+							mes "[Aumgarl]";
+							mes "................";
+							mes "What are you talking about?";
+							mes "Make her happy all the time?";
+							mes "She is dying even at";
+							mes "this moment.";
+							next;
+							mes "[Aumgarl]";
+							mes "I think you are out of";
+							mes "your mind!";
+							mes "Get out of here.";
+							break;
+						case 2:
+							mes "[Aumgarl]";
+							mes "................";
+							mes "You want to take her to where?";
+							mes "What are you gonna do?";
+							next;
+							if (select("I will cure her.:I am sorry.") == 1) {
+								mes "[Aumgarl]";
+								mes "It's useless talking about";
+								mes "it any longer. I don't think";
+								mes "there is anyone who can";
+								mes "cure my granddaughter.";
+							} else {
+								mes "[Aumgarl]";
+								mes "Ahh.......";
+								mes "I am not blaming you.";
+								mes "It's not your fault anyway.";
+								mes "........";
+								next;
+								if (select("...........:I'll wish for her recover.") == 1){
+									mes "[Aumgarl]";
+									mes "Ahh......";
+									mes "....I am sorry to ask you this but..";
+									mes "can you do me a favor?";
+									mes "Umm......";
+									next;
+									if (select("No.:Sure.") == 1) {
+										mes "[Aumgarl]";
+										mes "Umm....";
+										mes "Alright, I won't bother you..";
+										mes "bye...";
+										break;
+									}
+									mes "[Aumgarl]";
+									mes "It won't be easy but,";
+									mes "would you help me to find";
+									mes "any doctors... nono..anybody";
+									mes "who can cure Lyroo or";
+									next;
+									mes "[Aumgarl]";
+									mes "has any informations";
+									mes "about her unidentified illness?";
+									mes "please?";
+									mes "...peeew..";
+									next;
+									menu "Yes, Sir.",-;
+									mes "[Aumgarl]";
+									mes "Oh....";
+									mes "Thank you so much.";
+									mes "If Lyroo can get her health back,";
+									mes "I'll never forget";
+									mes "your help forever.";
+									next;
+									mes "[Aumgarl]";
+									mes "Thank you..";
+									mes "Thank you...";
+									set b_sword,20;
+								} else {
+									mes "[Aumgarl]";
+									mes "Well...thanks.";
+									mes "I'm going to try my best to";
+									mes "make her happy till the";
+									mes "last second.";
+									mes "Come by sometimes to say hi";
+									mes "to Lyroo.";
+								}
+							}
+							break;
+						case 3:
+							mes "[Aumgarl]";
+							mes ".............";
+							mes "How're you going to cure";
+							mes "my granddaughter?";
+							mes "You don't look like";
+							mes "a doctor to me.";
+							next;
+							switch(select("I am a doctor.:I know a famous doctor.:I'll cure her no matter what.")){
+							case 1:
+								mes "[Aumgarl]";
+								mes "Hoo.......";
+								mes "Do I look like a fool to you?";
+								mes "I hate people who lie";
+								emotion e_pif;
+								close2;
+								warp "geffen.gat",173,169;
+								end;
+							case 2:
+								mes "[Aumgarl]";
+								mes "A famous doctor?";
+								mes "I've met all kinds of";
+								mes "doctors around.";
+								mes "I probably have met that";
+								mes "doctor already.";
+								break;
+							case 3:
+								mes "[Aumgarl]";
+								mes "................";
+								mes "You want to cure her";
+								mes "no matter what?";
+								mes "How're going to do that?";
+								mes "What if it turns worse?";
+								mes "Huh?";
+								next;
+								mes "[Aumgarl]";
+								mes "No more of your bragging.";
+								mes "Please go away.";
+								break;
+							}
+							break;
+						}
+						break;
+					case 3:
+						mes "[Aumgarl]";
+						mes ".................";
+						mes "Thanks for your concern..";
+						mes "but you're a stranger to us.";
+						mes "I can't let you do that.";
+						mes "Thanks anyways.";
+						break;
+					}
+					break;
+				}
+				break;
+			case 3:
+				mes "[Aumgarl]";
+				mes ".........";
+				mes "Umm........";
+				mes "I'm sorry but";
+				mes "I am so exhausted.";
+				mes "Can't help you..";
+				break;
+			}
+			break;
+		case 20:
+		case 21:
+		case 22:
+		case 23:
+			mes "Ahh........";
+			mes "Go to place where it's";
+			mes "crowd of people.";
+			mes "And you'll get some informations.";
+			mes "I'm counting on you.";
+			break;
+		case 24:
+		case 25:
+		case 26:
+			mes "Ahh....";
+			mes "Lyroo is upstairs.";
+			mes "She's in pain.";
+			mes "Don't talk to her too long.";
+			break;
+		case 27:
+			mes "Oh....";
+			mes "Thank you...";
+			mes "I never thought you'll";
+			mes "help me.";
+			mes "Go ahead see Lyroo.";
+			break;
+		case 28:
+			mes "Thank you so much...";
+			mes "Without your help...";
+			emotion e_sob;
+			mes "it was meaningless.";
+			next;
+			mes "[Aumgarl]";
+			mes "Alright....";
+			mes "Is there anything I can";
+			mes "do for you?";
+			mes "I want to return your favor somehow.";
+			next;
+			if (select("No..I don't need anything.:Would you repair the sword for me?") == 1) {
+				mes "[Aumgarl]";
+				mes "Hmm....";
+				mes "Well..";
+				mes "Whenever you have a favor to ask,";
+				mes "come and find me.";
+				mes "I'll try my best to help you.";
+				set b_sword,29;
+			} else {
+				mes "[Aumgarl]";
+				mes "Hmm....";
+				mes "Show me the sword.";
+				mes "I need to take a look at it first";
+				mes "to find out whether I can repair it or not.";
+				next;
+				mes "^0000FF Showed the pieces of broken sword";
+				mes "to Aumgarl.";
+				mes "....................";
+				mes "Aumgarl took a careful look";
+				mes "at the pieces for awhile..^000000";
+				next;
+				mes "................";
+				mes "............";
+				mes "........";
+				mes "......";
+				next;
+				mes "[Aumgarl]";
+				mes "Umm.....";
+				mes "Well.....";
+				mes "It's not possible to get into";
+				mes "work right away.";
+				mes "I need some materials.";
+				next;
+				mes "[Aumgarl]";
+				mes "To repair this sword, we need";
+				mes "some materials.";
+				mes "Since Lyroo is upstairs in pain.";
+				mes "I don't think I can leave the house.";
+				next;
+				mes "[Aumgarl]";
+				mes "so....would you get the";
+				mes "materials for me?";
+				mes "I am sorry I am asking";
+				mes "you too much to do.";
+				next;
+				if (select("Umm..let's do it next time.:Alright, I'll go get them.") == 1){
+					mes "[Aumgarl]";
+					mes "Umm.....";
+					mes "I am sorry I can't";
+					mes "help you right away.";
+					mes "Come back here when";
+					mes "you need my help then.";
+				} else {
+					mes "[Aumgarl]";
+					mes "Oh~~ really?";
+					mes "Thank you.";
+					mes "I'm sure I'll repair it for you.";
+					mes "Now, listen carefully.";
+					next;
+					mes "[Aumgarl]";
+					mes "^FF00FF One Anvil";
+					mes "2 Oridecon Stones";
+					mes "5 Broken Swords";
+					mes "2 Steels";
+					mes "1 Hammer of Blacksmith";
+					mes "2 Star Crumbs";
+					mes "5 Live Coals^000000";
+					next;
+					mes "[Aumgarl]";
+					mes "Quite alot huh?";
+					mes "They are necessities";
+					mes "We need them to repair the sword.";
+					mes "I'll go find some other materials.";
+					set b_sword,30;
+				}
+			}
+			break;
+		case 29:
+			mes "Oh~ It's you.";
+			mes "Got any favor to ask?";
+			mes "I'll do my best";
+			mes "to help you.";
+			next;
+			if (select("Maybe next time..:Please repair this sword for me.") == 1) {
+				mes "[Aumgarl]";
+				mes "Well..";
+				mes "Whenever you have a favor to ask,";
+				mes "come and find me.";
+			} else {
+				mes "[Aumgarl]";
+				mes "Hmm....";
+				mes "Show me the sword.";
+				mes "I need to take a look at it first";
+				mes "to find out whether I can repair it or not.";
+				next;
+				mes "^0000FF Showed the pieces of broken sword";
+				mes "to Aumgarl.";
+				mes "....................";
+				mes "Aumgarl took a careful look";
+				mes "at the pieces for awhile..^000000";
+				next;
+				mes "................";
+				mes "............";
+				mes "........";
+				mes "......";
+				next;
+				mes "[Aumgarl]";
+				mes "Umm.....";
+				mes "Well.....";
+				mes "It's not possible to get into";
+				mes "work right away.";
+				mes "I need some materials.";
+				next;
+				mes "[Aumgarl]";
+				mes "To repair this sword, we need";
+				mes "some materials.";
+				mes "Since Lyroo is upstairs in pain.";
+				mes "I don't think I can leave the house.";
+				next;
+				mes "[Aumgarl]";
+				mes "so....would you get the";
+				mes "materials for me?";
+				mes "I am sorry I am asking";
+				mes "you too much to do.";
+				next;
+				if (select("Umm..let's do it next time.:Alright, I'll go get them.") == 1) {
+					mes "[Aumgarl]";
+					mes "Umm.....";
+					mes "I am sorry I can't";
+					mes "help you right away.";
+					mes "Come back here when";
+					mes "you need my help then.";
+				} else {
+					mes "[Aumgarl]";
+					mes "Oh~~ really?";
+					mes "Thank you.";
+					mes "I'm sure I'll repair it for you.";
+					mes "Now, listen carefully.";
+					next;
+					mes "[Aumgarl]";
+					mes "^FF00FF1 Anvil";
+					mes "2 Oridecon Stones";
+					mes "5 Broken Swords";
+					mes "2 Steels";
+					mes "1 Hammer of Blacksmith";
+					mes "2 Star Crumbs";
+					mes "5 Live Coals^000000";
+					next;
+					mes "[Aumgarl]";
+					mes "Quite alot huh?";
+					mes "They are necessities";
+					mes "We need them to repair the sword.";
+					mes "I'll go find some other materials.";
+					set b_sword,30;
+				}
+			}
+			break;
+		case 30:
+			if (countitem(986) > 0 && countitem(756) > 1 && countitem(7110) > 4 && countitem(999) > 1 && countitem(1005) > 0 && countitem(1000) > 1 && countitem(7098) > 4) {
+				mes "Oh~~ good, you got them all.";
+				mes "Alright, come back later,";
+				mes "I'll have it repaired.";
+				delitem 986,1; // Anvil
+				delitem 756,2; // Oridecon_Stone
+				delitem 7110,5; // Vroken_Sword
+				delitem 999,2; // Steel
+				delitem 1005,1; // Hammer_Of_Blacksmith
+				delitem 1000,2; // Star_Crumb
+				delitem 7098,5; // Live_Coal
+				set b_sword,31;
+			} else {
+				mes "Hmm.....";
+				mes "Not ready yet?";
+				mes "Materials you need are...";
+				next;
+				mes "[Aumgarl]";
+				mes "^FF00FF1 Anvil";
+				mes "2 Oridecon Stones";
+				mes "5 Broken Swords";
+				mes "2 Steels";
+				mes "1 Hammer of Blacksmith";
+				mes "2 Star Crumbs";
+				mes "5 Live Coals^000000";
+				next;
+				mes "[Aumgarl]";
+				mes "Wrote them down?";
+				mes "I'm almost ready for other materials.";
+			}
+			break;
+		case 31:
+			if (rand(1,5) == 2) {
+				mes "Hey, you're back.";
+				mes "Here it is.";
+				mes "This sword is a great one";
+				mes "for sure. I've noticed at";
+				mes "the first sight.";
+				mes "huhu.....";
+				next;
+				mes "[Aumgarl]";
+				mes "I haven't seen this kind of";
+				mes "great sword for a long";
+				mes "time in my life.";
+				mes "I envy you...";
+				mes "Huhuhu......";
+				next;
+				mes "'You received repaired";
+				mes "'^FF0000SaYumMoon's sword^000000'.";
+				set b_sword,32;
+				getitem 1123,1; // Haedonggum
+			} else {
+				mes "Umm.. it's not done yet.";
+				mes "Would you give me little";
+				mes "more time? It takes longer";
+				mes "than I thought. sorry.";
+			}
+			break;
+		}
+	} else {
+		mes "Thank you...";
+		mes "You've been a great help";
+		mes "to us.";
+		mes "Hope my work had";
+		mes "helped you.";
+	}
+	close;
+}
+
+geffen_in.gat,106,106,7	script	Girl#gnbs2	716,{
+	mes "[Lyroo]";
+	if (b_sword < 20) {
+		mes "Ah...Ah....";
+		mes "Ah...Hi.......";
+		next;
+		mes "^0000FFThis girl seemed to be in serious pain.^000000";
+		close;
+	} else if (b_sword < 24) {
+		mes "Aaa....Aaa....";
+		mes "you...you....";
+		mes "you are the....one...";
+		mes "who will....cure....";
+		mes "...me? Aa....";
+		next;
+		mes "[Lyroo]";
+		mes "..tha... thank you....";
+		next;
+		mes "^0000FFBetter stop talking to her and";
+		mes "rush to find a way to cure her.^000000";
+		close;
+	} else if (b_sword == 24 || b_sword == 25 || b_sword == 26) {
+		mes "Ahh...ahh....";
+		if (sex == 0) {
+			mes "It's ..you.. pretty...sister..";
+		} else {
+			mes "It's ..you.. handsome...brother..";
+		}
+		mes "ah he he....";
+		next;
+		if (select("Ask about her health condition.:Talk to her for a while.") == 1){
+			mes "[Lyroo]";
+			if (rand(1,4) == 3) {
+				mes "uh....umm...?";
+				mes "umm... I...";
+				mes "I can't talk...too long..";
+				mes "so.. listen....carefully..please...";
+				next;
+				mes "[Lyroo]";
+				mes "^0030FFMy body..repeatedly turns cold and hot...";
+				mes "....no sweating on my body...";
+				mes "..and get paralyzed ...quite often..and..";
+				mes "my heart beats ...irregularly.^000000";
+				next;
+				mes "[Lyroo]";
+				mes "Ahh...Ahh.";
+				mes "...........";
+			} else {
+				mes "I...am...so...";
+				mes "...tired.";
+				mes ".............";
+			}
+		} else {
+			mes "[Lyroo]";
+			mes "Ahh........";
+			mes "I..want to ...talk to...you..";
+			mes "but.... sorry....";
+		}
+		next;
+		mes "^0000FFshe seems to have fallen asleeep.^000000";
+		close;
+	} else if (b_sword == 27) {
+		mes "uh...umm?";
+		if (sex == 0) {
+			mes "Ah....It's you pretty sister...";
+		} else {
+			mes "Ah....It's you handsome brother...";
+		}
+		if (countitem(606) > 0) {
+			mes "uh?..what is that you have?";
+			next;
+			if (select("It's nothing.:It's your medicine.") == 1 || countitem(606) < 1){
+				mes "[Lyroo]";
+				mes "umm......";
+				mes "ok....";
+				mes "...........";
+				close;
+			}
+			mes "[Lyroo]";
+			mes "Ah!";
+			mes "you found the medicine~";
+			mes "Ah..hehe...";
+			delitem 606,1; // Aloebera
+			next;
+			mes "^0000FFYou gave her a medicine you";
+			mes "received from Cylrnel.";
+			mes "After taking a medicine, Lyroo";
+			mes "fell in asleep.^000000";
+			set b_sword,28;
+		}
+		close;
+	} else {
+		mes "ehehe...";
+		if (sex == 0) {
+			mes "Thank you my pretty sister.";
+		} else {
+			mes "Thank you my handsome brother.";
+		}
+		mes "I'll have my health back";
+		mes "and be a strong girl. hehe";
+		close;
+	}
+}
+
+prontera.gat,275,86,2	script	Young man#SaYumMoon"	97,{
+	mes "[Neil]";
+	if (b_sword < 20) {
+		mes "It's so good to be helathy.";
+		mes "If you stay in hospital laying";
+		mes "down on the bed all day long,";
+		mes "It'll make you feel depressed.";
+		next;
+		mes "[Neil]";
+		mes "Take care of your health";
+		mes "all the time.";
+		mes "Health is the best of all.";
+	} else {
+		mes "Not long ago, I was in hospital";
+		mes "laying down on the bed for";
+		mes "quite a long time.";
+		mes "And I met this ^FF5000doctor from Yuno^000000.";
+		mes "She helped me to recover in no time.";
+		mes "Yet, I can't run around though.";
+		next;
+		mes "[Neil]";
+		mes "However, I can't believe I got";
+		mes "my health back. It's like a";
+		mes "miracle. Hope I can be someone like";
+		mes "her who can cure others.";
+		if (b_sword == 20) set b_sword,21;
+	}
+	close;
+}
+
+yuno,208,164,4	script	Active little girl#gnbs	101,{
+	mes "[Hisa]";
+	if (b_sword < 21) {
+		mes "Ahhmm.....";
+		mes "This town is so boring.";
+		mes "No events, no festivals..";
+		mes "and all the people stay in";
+		mes "their home studying this and that.";
+		close;
+	}
+	mes "But still, there's one person";
+	mes "I respect. Her name is ^FF5500Cylrnel^000000.";
+	mes "She is an expert in medical treatment.";
+	mes "Moreover, whenever someone becomes";
+	mes "sick in the town, she comes right";
+	mes "away to cure that person..";
+	next;
+	mes "[Hisa]";
+	mes "She tells me lots of stories";
+	mes "she experienced. It's so";
+	mes "interesting to hear them.";
+	mes "She also made jorney round the";
+	mes "world.... Ah ha.....";
+	next;
+	mes "[Hisa]";
+	mes "She's probably at her home.";
+	mes "She came back from a trip.";
+	mes "haha......";
+	if (b_sword == 21) set b_sword,22;
+	if (rand(1,2) == 2) {
+		next;
+		mes "[Hisa]";
+		mes "Ah~!";
+		mes "She's also known as an";
+		mes "fickle woman.";
+		mes "Better watch out. haha..";
+	}
+	close;
+}
+
+yuno_in01,99,101,4	script	Doctor#gnbs	744,{
+	if (b_sword < 23) {
+		mes "[??????]";
+		mes "I have no idea who you are";
+		mes "but would you mind to leave me alone?";
+		mes "I am really busy right now.";
+	} else if (b_sword < 27) {
+		mes "[Cylrnel]";
+		switch (b_sword) {
+		case 23:
+			mes "How can I help you?";
+			mes "If it's not urgent, please";
+			mes "come back next time.";
+			next;
+			mes "[Cylrnel]";
+			if (rand(1,4) == 2) {
+				mes "...............";
+				mes "Need to ask me something?";
+				next;
+				if (select("You're so beautiful.:Do you like traveling?") == 1) {
+					mes "[Cylrnel]";
+					if (rand(1,4) == 4) {
+						mes "..excuse me?";
+						mes "Ah ha ha~";
+						mes "You're a funny guy.";
+						mes "Trying to work on me?";
+						mes "Ah ha ha ha.";
+						next;
+						if (select("Yes, I fell in love in first sight.:I have a favor to ask.") == 1) {
+							mes "[Cylrnel]";
+							if (rand(1,3) == 3) {
+								mes "Ahhaha...Ahahaha...";
+								mes "Ah..I'm sorry..";
+								mes "I haven't seen a guy like you";
+								mes "for a long time.";
+								next;
+								mes "[Cylrnel]";
+								mes "It makes me laugh..haha.";
+								mes "Guess what?";
+								mes "I know you're not here";
+								mes "to work on me.";
+								mes "What business do you have?";
+								next;
+								menu "Well, actually...",-;
+								mes "^FF0000Told Cylrnel about Lyroo.";
+								mes "And also about favor of blacksmith, Aumgarl.^000000";
+								next;
+								mes "[Cylrnel]";
+								if (rand(1,3) == 2) {
+									mes "Um.....";
+									mes "that's what happened..";
+									mes "Oh, well..";
+									mes "I need exact symptoms of a girl.";
+									mes "Go find exact symptoms first";
+									mes "and come back again.";
+									next;
+									mes "[Cylrnel]";
+									mes "Without exact symptoms,";
+									mes "I can't make any diagnose.";
+									set b_sword,24;
+								} else {
+									mes "Umm.......";
+									mes "Quite a long story..";
+									mes "I have no idea why you're";
+									mes "trying to help these people,";
+									mes "but, it's hard to believe you.";
+									mes "Why don't you find some other doctor?";
+								}
+							} else {
+								mes "Ah!";
+								mes "I never thought someone";
+								mes "like you still exist.";
+								mes "I am sorry but, I am";
+								mes "tired with this crap.";
+							}
+						} else {
+							mes "[Cylrnel]";
+							if (rand(1,3) == 3) {
+								mes "Huhu...";
+								mes "well...";
+								mes "Let me hear your story.";
+								next;
+								menu "Actually...",-;
+								mes "^FF0000Told Cylrnel about Lyroo.";
+								mes "And also about favor of blacksmith, Aumgarl.^000000";
+								next;
+								mes "[Cylrnel]";
+								if (rand(1,3) == 1) {
+									mes "Um.....";
+									mes "that's what happened..";
+									mes "Oh, well..";
+									mes "I need exact symptoms of a girl.";
+									mes "Go find exact symptoms first";
+									mes "and come back again.";
+									next;
+									mes "[Cylrnel]";
+									mes "Without exact symptoms,";
+									mes "I can't make any diagnose.";
+									set b_sword,24;
+								} else {
+									mes "Umm.......";
+									mes "Quite a long story..";
+									mes "I have no idea why you're";
+									mes "trying to help these people,";
+									mes "but, it's hard to believe you.";
+									mes "Why don't you find some other doctor?";
+								}
+							} else {
+								mes "Huhu..";
+								mes "Well...";
+								mes "You're no differ with";
+								mes "any other guys around.";
+								mes "I don't have any bussiness";
+								mes "with you. please leave.";
+								close2;
+								warp "yuno.gat",246,143;
+								end;
+							}
+						}
+					} else {
+						mes "Ahhaha..";
+						mes "You're a funny guy.";
+						mes "But, that doesn't";
+						mes "work on me.";
+					}
+				} else {
+					mes "[Cylrnel]";
+					mes "Hmm.. Yes.. but,";
+					mes "if you don't have ";
+					mes "any business to take care,";
+					mes "please leave, I'm pretty busy right now.";
+				}
+			} else {
+				mes "I am sorry, I don't have a time to waste.";
+			}
+			break;
+		case 24:
+			mes "Oh..";
+			mes "you're back..";
+			mes "Did you find the right symptoms?";
+			mes "I wanted to go with you, but";
+			mes "I been really busy.";
+			next;
+			if(select("Not yet...:Yes, Here.") == 1){
+				mes "[Cylrnel]";
+				mes "You're still here?";
+				mes "Go right away!";
+				mes "She's in serious pain.";
+				mes "Her body could be paralyzed";
+				mes "in any minute!";
+				close;
+			}
+			mes "[Cylrnel]";
+			mes "What a relief..";
+			mes "You're earlier than I thought.";
+			mes "I'll ask you some questions about";
+			mes "her condition. Answer correctly.";
+			next;
+			mes "[Cylrnel]";
+			mes "First, How was her body temperature?";
+			set @sick,0;
+			next;
+			setarray .sick1$[1],"Very hot.","Very cold.","Normal.","Turns hot and cold repeatedly.";
+			set @sick1,select(.sick1$[1],.sick1$[2],.sick1$[3],.sick1$[4]);
+			if (@sick1 == 4) set @sick,@sick+1;
+			mes "[Cylrnel]";
+			mes "Ok.";
+			mes "Now, about physiological condition.";
+			next;
+			setarray .sick2$[1],"No sweating at all.","Sweating all over the body.","Runny nose.","No tears, sweats at all.";
+			set @sick2,select(.sick2$[1],.sick2$[2],.sick2$[3],.sick2$[4]);
+			if (@sick2 == 1) set @sick,@sick+1;
+			mes "[Cylrnel]";
+			mes "Next, tell me about";
+			mes "her body condition.";
+			next;
+			setarray .sick3$[1],"Nothing particular.","Become paralyzed often.","Muscles became so soft.","Muscles became so hard.";
+			set @sick3,select(.sick3$[1],.sick3$[2],.sick3$[3],.sick3$[4]);
+			if (@sick3 == 2) set @sick,@sick+1;
+			mes "[Cylrnel]";
+			mes "How about an internal organs?";
+			next;
+			setarray .sick4$[1],"Stomach hurts like it's been stabbed by a knife.","Head hurts like it's been smashed by a hammer.","Heart beats irregularly.","Has difficulty in breathing.";
+			set @sick4,select(.sick4$[1],.sick4$[2],.sick4$[3],.sick4$[4]);
+			if (@sick4 == 3) set @sick,@sick+1;
+			mes "[Cylrnel]";
+			mes "Hmm.. alright.";
+			mes "Let me check this.";
+			mes "so the symptoms are";
+			mes "..............";
+			next;
+			mes "[Cylrnel]";
+			mes "^FF0000"+.sick1$[@sick1]+"";
+			mes ""+.sick2$[@sick2]+"";
+			mes ""+.sick3$[@sick3]+"";
+			mes ""+.sick4$[@sick4]+"^000000";
+			mes "right?";
+			next;
+			if(select("No..not exactly..:Yes, I am sure.") == 1){
+				mes "[Cylrnel]";
+				mes "Then, go back to her and";
+				mes "find the exact symptoms";
+				mes "right away~!!";
+				close;
+			}
+			mes "[Cylrnel]";
+			mes "You're sure about";
+			mes "this, right?";
+			mes "If they're wrong symptoms, I can't be responsible.";
+			next;
+			if(select("Well..let me go and recheck it.:I'm sure.") == 1){
+				mes "[Cylrnel]";
+				mes "Then, go back to her and";
+				mes "find the exact symptoms";
+				mes "right away~!!";
+				close;
+			}
+			mes "[Cylrnel]";
+			mes "Hmm.....";
+			mes "Aright. I'll trust you.";
+			mes "Now, go get these ingredients.";
+			mes "Get them as fast as possible.";
+			mes "Alright?";
+			next;
+			if (@sick == 4) {
+				mes "[Cylrnel]";
+				mes "^FF00002 Seeds of Yggdrasil";
+				mes "3 Aloes";
+				mes "1 Witherless Rose";
+				mes "10 Starsands Of Witch";
+				mes "5 Burning Hearts";
+				mes "5 Ice pieces";
+				set b_sword,26;
+				next;
+				mes "[Cylrnel]";
+				mes "Wrote them down?";
+				mes "I'll tell you once again.";
+				mes "We need...";
+				next;
+				mes "[Cylrnel]";
+				mes "^FF00002 Seeds of Yggdrasil";
+				mes "3 Aloes";
+				mes "1 Witherless Rose";
+				mes "10 Starsands Of Witch";
+				mes "5 Burning Hearts";
+				mes "5 Ice pieces";
+				next;
+			} else {
+				mes "[Cylrnel]";
+				mes "^FF00001 Seed of Yggdrasil";
+				mes "1 Aloe";
+				mes "5 Starsands Of Witch";
+				mes "3 Burning Hearts";
+				mes "3 Ice pieces";
+				set b_sword,25;
+				next;
+				mes "[Cylrnel]";
+				mes "Wrote them down?";
+				mes "I'll tell you once again.";
+				mes "We need...";
+				next;
+				mes "[Cylrnel]";
+				mes "^FF00001 Seed of Yggdrasil";
+				mes "1 Aloe";
+				mes "5 Starsands Of Witch";
+				mes "3 Burning Hearts";
+				mes "3 Ice pieces";
+				next;
+			}
+			mes "[Cylrnel]";
+			mes "Get them as fast as possible.";
+			mes "There isn't much time for Lyroo.";
+			break;
+		case 25:
+			if (countitem(608) > 0 && countitem(704) > 0 && countitem(1061) > 4 && countitem(7097) > 2 && countitem(7066) > 2) {
+				mes "Hmm....";
+				mes "Good. you got them all.";
+				mes "Let me see..";
+				mes ".............";
+				delitem 608,1; // Seed_Of_Yggdrasil
+				delitem 704,1; // Aloe
+				delitem 1061,5; // Starsand_Of_Witch
+				delitem 7097,3; // Burning_Heart
+				delitem 7066,3; // Ice_Piece
+				next;
+				mes "^FF0000Cylrnel began to mix";
+				mes "the ingredients.";
+				mes "................";
+				mes ".............";
+				mes ".........";
+				mes "......^000000";
+				next;
+				mes "[Cylrnel]";
+				mes "............";
+				mes "What!?!?";
+				mes ".....";
+				mes "Hey you....";
+				mes "You gave me a wrong information.";
+				set b_sword,24;
+				next;
+				mes "[Cylrnel]";
+				mes "I made the mecine according";
+				mes "to the symptoms you told me.";
+				mes "But, it became strange medicine!";
+				mes "Bring me the exact symptoms!";
+				close2;
+				warp "yuno.gat",246,143;
+				end;
+			} else {
+				mes "...........";
+				mes "Hey~ you don't have all";
+				mes "the ingredients yet.";
+				mes "Go get them all right away.";
+				next;
+				mes "[Cylrnel]";
+				mes "^FF00001 Seed of Yggdrasil";
+				mes "1 Aloe";
+				mes "5 Starsands Of Witch";
+				mes "3 Burning Hearts";
+				mes "3 Ice pieces";
+				next;
+				mes "[Cylrnel]";
+				mes "Alright?";
+				mes "Now, hurry!.";
+				close2;
+				warp "yuno.gat",246,143;
+				end;
+			}
+			break;
+		case 26:
+			if (countitem(608) > 1 && countitem(704) > 2 && countitem(748) > 0 && countitem(1061) > 9 && countitem(7097) > 4 && countitem(7066) > 4) {
+				mes "Hmm....";
+				mes "Good. you got them all.";
+				mes "Let me see..";
+				mes ".............";
+				delitem 608,2; // Seed_Of_Yggdrasil
+				delitem 704,3; // Aloe
+				delitem 748,1; // Witherless_Rose
+				delitem 1061,10; // Starsand_Of_Witch
+				delitem 7097,5; // Burning_Heart
+				delitem 7066,5; // Ice_Piece
+				next;
+				mes "^FF0000Cylrnel began to mix";
+				mes "the ingredients.";
+				mes "................";
+				mes ".............";
+				mes ".........";
+				mes "......^000000";
+				next;
+				mes "[Cylrnel]";
+				mes "Here~!";
+				mes "It's done.";
+				mes "I don't think this medicine would";
+				mes "cure her disease completely. However,";
+				mes "it will alleviate her from the pain.";
+				next;
+				mes "[Cylrnel]";
+				mes "It wasn't easy to make this medicine.";
+				mes "Here, take this with you.";
+				mes "Take care then..";
+				set b_sword,27;
+				getitem 606,1; // Aloebera
+			} else {
+				mes "...........";
+				mes "Hey~ you don't have all";
+				mes "the ingredients yet.";
+				mes "Go get them all right away.";
+				next;
+				mes "[Cylrnel]";
+				mes "^FF00002 Seeds of Yggdrasil";
+				mes "3 Aloes";
+				mes "1 Witherless Rose";
+				mes "10 Starsands Of Witch";
+				mes "5 Burning Hearts";
+				mes "5 Ice pieces";
+				next;
+				mes "[Cylrnel]";
+				mes "Alright?";
+				mes "Go get them as fast as possible.";
+				close;
+				warp "yuno.gat",246,143;
+				end;
+			}
+			break;
+		}
+	} else {
+		mes "[Cylrnel]";
+		mes "Huhu...";
+		mes "How is she doing?";
+		mes "Getting better?.";
+		mes "By taking that medicine, she'll";
+		mes "recover fast.";
+		next;
+		mes "[Cylrnel]";
+		mes "Tell her to come to me";
+		mes "sometimes to get a medical.";
+		mes "treatment. Walking from her";
+		mes "house to here would be a good";
+		mes "exercise too. Name of her disease";
+		mes "is called '^FF0000Amarhade^000000'.";
+		next;
+		mes "[Cylrnel]";
+		mes "It's a rare disease that";
+		mes "it's not even well known";
+		mes "to medical institution.";
+		mes "Likewise, exact treatment";
+		mes "has not maden yet.";
+		next;
+		mes "[Cylrnel]";
+		mes "..but I found the something..";
+		mes "and it's a.....secret. haha.";
+//      Emotion "Doctor" ET_DELIGHT
+		emotion e_ho;
+	}
+	close;
+}
+
+yuno_in01.gat,104,94,0	script	go away#gnbs	139,2,1{
+	if (b_sword < 22) {
+		mes "[??????]";
+		mes "^FF0000What are you doing here?";
+		mes "Get out!^000000";
+		close2;
+		warp "yuno.gat",246,143;
+		end;
+	} else if (b_sword == 22) {
+		if (rand(1,10) == 10) {
+			mes "[??????]";
+			mes "I am very busy right now. please leave.";
+			set b_sword,23;
+			close;
+		} else {
+			mes "[??????]";
+			mes "^FF0000What are you doing here?";
+			mes "Get out!^000000";
+			close2;
+			warp "yuno.gat",246,143;
+			end;
+		}
+	} else {
+		mes "[Cylrnel]";
+		mes "Who are you?";
+		close;
+	}
+}
diff --git a/npc/quests/quests_izlude.txt b/npc/quests/quests_izlude.txt
index 9144f7a93..4ff96b343 100644
--- a/npc/quests/quests_izlude.txt
+++ b/npc/quests/quests_izlude.txt
@@ -1,128 +1,128 @@
-//===== eAthena Script ======================================= 

-//= Quest NPCs related to Izlude

-//===== By: ================================================== 

-//= Evera and The eAthena Dev Team

-//===== Current Version: ===================================== 

-//= 1.0

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//= Edgar's Offer

-//===== Additional Comments: ================================= 

-//= 1.0 Initial release [Evera]

-//============================================================

-

-//==================================================== Edgar's

-//====================================================== Offer

-izlude.gat,182,186,6	script	Edgar	709,{

-	

-	mes "[Edgar]";

-	mes "My town, Izlude is connected to";

-	mes "Alberta by the harbor in the West.";

-	mes "There is so much traffic between";

-	mes "us, I almost become an Albertian.";

-	mes "Hehehe~";

-	next;

-	mes "[Edgar]";

-	mes "There's this guy I know pretty";

-	mes "well, Phelix, who lives in Alberta.";

-	mes "That guy is really stingy... He";

-	mes "charges for everything!";

-	next;

-	mes "[Edgar]";

-	mes "But he's a really nice guy and";

-	mes "likes helping other people. He has";

-	mes "a good heart and will give you his";

-	mes "support if you meet his price.";

-	next;

-	mes "[Edgar]";

-	mes "Lately, people in Alberta say that";

-	mes "he is really trying to help folks";

-	mes "and that his demand for Jellopies";

-	mes "is just a cover-up. Well, you";

-	mes "should take a look at what he has";

-	mes "to offer.";

-M_Menu:

-	next;

-	menu "Can you tell me the way to Alberta?",-,"End Conversation",M_End;

-	

-		mes "[Edgar]";

-		mes "Huh? Well, you can use your feet";

-		mes "and just walk. But if you have";

-		mes "money, I'd like to suggest that you";

-		mes "take a ship.";

-		next;

-		menu "Ok, gotcha.",-,"But I'm sick of walking and I'm broke!",sM_1;

-		

-			mes "[Edgar]";

-			mes "Alright, Take  Care~";

-			close;

-

-		sM_1:

-			if (MISC_QUEST & 16) goto sM_2;

-			mes "[Edgar]";

-			mes "Okay...";

-			mes "You don't want to walk AND you've";

-			mes "got no cash, but you still want to";

-			mes "go there? Oh geez.";

-			next;

-			mes "[Edgar]";

-			mes "Fine fine. Me, being the captain of";

-			mes "a ship, can afford to bring you";

-			mes "there at a lower price. How does";

-			mes "250 Zeny sound?";

-			next;

-			menu "Alrighty~?",-,"Bah, what a rip off!!",sm_1b;

-			

-				set MISC_QUEST,MISC_QUEST | 16;

-				if(Zeny < 250) goto sl_NoZeny;

-				set Zeny, Zeny - 250;

-				warp "alberta.gat",195,164;

-

-			sm_1b:

-				mes "[Edgar]";

-				mes "Boy oh boy,";

-				mes "if you think";

-				mes "that's a rip off...";

-				close;

-

-			sM_2:

-				mes "[Edgar]";

-				mes "So are you heading to Alberta";

-				mes "again? Let me give you the same";

-				mes "discount and only charge 250 Zeny,";

-				mes "just like the last time.";

-				mes "How's that sound?";

-				next;

-				menu "Alrighty~!",-,"Why are you being so nice to me?!",sM_2b;

-

-				if(Zeny < 250) goto sl_NoZeny;

-				set Zeny, Zeny - 250;

-				warp "alberta.gat",195,164;

-

-			sM_2b:

-				mes "[Edgar]";

-				mes "It's just the way I am. That, and";

-				mes "your devilish smile reminds me of";

-				mes "my beloved blond haired son who";

-				mes "left home years ago to become a";

-				mes "Sailor on his own ship. Bless his";

-				mes "soul, wherever he is.";

-				close;

-

-				sl_NoZeny:

-					mes "[Edgar]";

-					mes "Um...";

-					mes "This isn't";

-					mes "enough money.";

-					mes "Go and get";

-					mes "some more.";

-					close;

-

-	M_End:

-		mes "[Edgar]";

-		mes "Yeah, alright.";

-		mes "See you later~";

-		close;

-

+//===== eAthena Script ======================================= 
+//= Quest NPCs related to Izlude
+//===== By: ================================================== 
+//= Evera and The eAthena Dev Team
+//===== Current Version: ===================================== 
+//= 1.0
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//= Edgar's Offer
+//===== Additional Comments: ================================= 
+//= 1.0 Initial release [Evera]
+//============================================================
+
+//==================================================== Edgar's
+//====================================================== Offer
+izlude.gat,182,186,6	script	Edgar	709,{
+	
+	mes "[Edgar]";
+	mes "My town, Izlude is connected to";
+	mes "Alberta by the harbor in the West.";
+	mes "There is so much traffic between";
+	mes "us, I almost become an Albertian.";
+	mes "Hehehe~";
+	next;
+	mes "[Edgar]";
+	mes "There's this guy I know pretty";
+	mes "well, Phelix, who lives in Alberta.";
+	mes "That guy is really stingy... He";
+	mes "charges for everything!";
+	next;
+	mes "[Edgar]";
+	mes "But he's a really nice guy and";
+	mes "likes helping other people. He has";
+	mes "a good heart and will give you his";
+	mes "support if you meet his price.";
+	next;
+	mes "[Edgar]";
+	mes "Lately, people in Alberta say that";
+	mes "he is really trying to help folks";
+	mes "and that his demand for Jellopies";
+	mes "is just a cover-up. Well, you";
+	mes "should take a look at what he has";
+	mes "to offer.";
+M_Menu:
+	next;
+	menu "Can you tell me the way to Alberta?",-,"End Conversation",M_End;
+	
+		mes "[Edgar]";
+		mes "Huh? Well, you can use your feet";
+		mes "and just walk. But if you have";
+		mes "money, I'd like to suggest that you";
+		mes "take a ship.";
+		next;
+		menu "Ok, gotcha.",-,"But I'm sick of walking and I'm broke!",sM_1;
+		
+			mes "[Edgar]";
+			mes "Alright, Take  Care~";
+			close;
+
+		sM_1:
+			if (MISC_QUEST & 16) goto sM_2;
+			mes "[Edgar]";
+			mes "Okay...";
+			mes "You don't want to walk AND you've";
+			mes "got no cash, but you still want to";
+			mes "go there? Oh geez.";
+			next;
+			mes "[Edgar]";
+			mes "Fine fine. Me, being the captain of";
+			mes "a ship, can afford to bring you";
+			mes "there at a lower price. How does";
+			mes "250 Zeny sound?";
+			next;
+			menu "Alrighty~?",-,"Bah, what a rip off!!",sm_1b;
+			
+				set MISC_QUEST,MISC_QUEST | 16;
+				if(Zeny < 250) goto sl_NoZeny;
+				set Zeny, Zeny - 250;
+				warp "alberta.gat",195,164;
+
+			sm_1b:
+				mes "[Edgar]";
+				mes "Boy oh boy,";
+				mes "if you think";
+				mes "that's a rip off...";
+				close;
+
+			sM_2:
+				mes "[Edgar]";
+				mes "So are you heading to Alberta";
+				mes "again? Let me give you the same";
+				mes "discount and only charge 250 Zeny,";
+				mes "just like the last time.";
+				mes "How's that sound?";
+				next;
+				menu "Alrighty~!",-,"Why are you being so nice to me?!",sM_2b;
+
+				if(Zeny < 250) goto sl_NoZeny;
+				set Zeny, Zeny - 250;
+				warp "alberta.gat",195,164;
+
+			sM_2b:
+				mes "[Edgar]";
+				mes "It's just the way I am. That, and";
+				mes "your devilish smile reminds me of";
+				mes "my beloved blond haired son who";
+				mes "left home years ago to become a";
+				mes "Sailor on his own ship. Bless his";
+				mes "soul, wherever he is.";
+				close;
+
+				sl_NoZeny:
+					mes "[Edgar]";
+					mes "Um...";
+					mes "This isn't";
+					mes "enough money.";
+					mes "Go and get";
+					mes "some more.";
+					close;
+
+	M_End:
+		mes "[Edgar]";
+		mes "Yeah, alright.";
+		mes "See you later~";
+		close;
+
 }
\ No newline at end of file
diff --git a/npc/quests/quests_lighthalzen.txt b/npc/quests/quests_lighthalzen.txt
index b1fcd2fb0..8d7a4aaa7 100644
--- a/npc/quests/quests_lighthalzen.txt
+++ b/npc/quests/quests_lighthalzen.txt
@@ -1,2617 +1,2617 @@
-//===== eAthena Script ======================================= 

-//= Quest NPCs located in Lighthalzen

-//===== By: ================================================== 

-//= Persian, Vicious_Pucca, aoa00, Evera, MasterOfMupppets,

-//= Lupus, Lord Gywall

-//===== Current Version: ===================================== 

-//= 2.9

-//===== Compatible With: ===================================== 

-//= eAthena SVN

-//===== Description: ========================================= 

-//= Event for the Mobster respawn

-//= Bio Labs Quest

-//= Friendship Quest

-//= Pickpocket Mini-Quest

-//= Bio Ethics Quest (Need bug testing!)

-//===== Additional Comments: ================================= 

-//= Grammar/script check please. This was a quick job.

-//= Things to add: Look at the thread "Lighthalzen Guard" in SVN script

-//= 0.3 Initial Release

-//= 0.5 Added mobsters spawn and Einbroch pollution. Alert lasts either 10 minutes or all mob killed.

-//= 0.6-0.9 fix small bug. Added Bio-lab entrance Quest. Added Getting security-card Quest.

-//= 1.0 Patched "mobsters spawn & Alert" like Real-RO.

-//= 1.0a fixed rand(1,10) + comparision. There just can't be 'X < 1' [Lupus]

-//= 1.1 Changed the mobster spawn to g_mobster to prevent exploits [MasterOfMuppets]

-//= 1.2 Added the cube room quest by DeNy, translated by vicious_pucca. [MasterOfMuppets]

-//=	Thanks to Linuxwolf for a grammar check as well =).

-//= 1.2a Moved Biolab entrance to lhz_dun warps. [Vicious]

-//= 1.3 Fixed password bug, fixed endless item exploit, some typos [Lupus]

-//= 1.4 Fixed password abuse. When people don't read the password under the picture

-//= 	and enter Zero shit 8) (TODO: I saw some "Sticks" abuses, too.. where you could skip a part of quest...)

-//= 1.5 Fixed Mobster's OnDead event(it has to start with "On"!) [Playtester]

-//= 1.5a Fixed "free stick" bug, thx 2 Neouni [Lupus]

-//= 1.6 Added Gywall's Pickpocket Quest

-//= 1.7 Implemented the Friendship quest [MasterOfMuppets]

-//= 1.8 Changed the name of the mobsters to Gangster, as it should be. [MasterOfMuppets]

-//= 1.9 Added extra input check on Biolab so that the first letter of the word could be capitalized or undercase. [Evera]

-//= 2.0 Removed Duplicates [Silent]

-//= 2.1 Added first part of Bio Ethics Quest [Evera]

-//= 2.2 Added bit to say Bio Ethics is unfinished, and if a player attempts, it warps them

-//= 	out after finished part... Don't want players getting stuck ;_; [Evera]

-//= 2.3 Finished Bio Ethics Quest. Need bug testers before moving to trunk, my

-//=	mind was somewhere else when writing @_@ [Evera]

-//= 2.4	Fixed the bug where a str&int debug was shown in the console for

-//=	test tube in bio labs quest. [Evera]

-//= 2.5	Fixed Kellasus giving you extra skills in Bio Ethics quest [Evera]

-//= 2.6	Fixed exploit letting any class get homunculus from Bio Ethics Quest [Evera]

-//= 2.6a Moved Bio Ethics Quest to Alchemist SKILL QUESTS [Lupus]

-//= 2.7 fixed bugs that let people bypass some quest parts V_V [Lupus]

-//=	reused cubekey var for 4 Cube Room key vars

-//= 2.8 More optimization. Also fixed bug with "2x short sticks -> long" [Lupus]

-//=	Now uses MISC_QUEST&512 instead of 'hzdun'. WIP

-//= 2.9 Fixed Friendship Quest levelup exploit (u could get EXP twice) [Lupus]

-//============================================================ 

-

-lighthalzen.gat,1,1,7	script	sneakAddSuber	-1,{

-OnInit:

-	set $@sneakchance, 3;	// chance of successful sneak(0 = never, 10 = always)

-	set $@sneakguard, 0;	// numbers of people who sneaked past guard

-	set $@threshold, 10;	// numbers of sneakers before mob appears

-	set $@mob, 50;		// Max respawn numbers of "mobsters"

-	set $@mobcount, 0;	// current numbers of "mobsters"

-	set $@lhz_alert, 0;	// Alert on Lighthalzen(0 = off, 1 = on)

-	set $@i, 0;

-	

-	end;

-

-OnMinute00:

-OnMinute05:

-OnMinute10:

-OnMinute15:

-OnMinute20:

-OnMinute25:

-OnMinute30:

-OnMinute35:

-OnMinute40:

-OnMinute45:

-OnMinute50:

-OnMinute55:

-	if($@lhz_alert == 0) set $@sneakguard, $@sneakguard + rand(1,3);

-	if($@lhz_alert == 1) set $@sneakguard, $@sneakguard - 1;  // Monsters will die after 5~10 min. (sneakAddSuber)

-	end;

-}

-

-lighthalzen.gat,1,1,7	script	AlertChk	-1,{

-OnInit:

-	initnpctimer;

-	end;

-

-OnTimer10000:

-	if($@sneakguard >= $@threshold) goto MakeMob;

-	if($@sneakguard == 0) goto ClearMob;  // Monsters will die after 5~10 min. (sneakAddSuber)

-	setnpctimer 0;

-	end;

-	

-MakeMob:

-	if($@lhz_alert == 1) goto ChkEnd;

-	set $@mobcount, $@mob;

-	mapannounce "lighthalzen.gat","Maintenance Organization of the Public Order: Currently the security of the city has been compromized, We ask the citizens to be more careful. I repeat. We ask the citizens to be more careful.", 1;

-	

-	for( set $@i, 0; $@i < $@mob; set $@i, $@i + 1 ) {

-		monster "lighthalzen.gat",0,0,"Gangster",1592,1,"AlertChk::OnMobKilled";

-	}

-

-	set $@lhz_alert, 1;	

-	set $@sneakguard, 2;   // Monsters will die after 5~10 min. (sneakAddSuber)

-	setnpctimer 0;

-	end;

-	

-ClearMob:

-	if($@lhz_alert == 0) goto ChkEnd;

-	set $@mobcount, 0;

-	mapannounce "lighthalzen.gat","Maintenance organization of the Public Order: We were able to get rid of all the trouble makers in the city. You may relax now.", 1;	

-	killmonster "lighthalzen.gat","AlertChk::OnMobKilled";

-	set $@lhz_alert, 0;

-	set $@sneakguard, 0;

-	setnpctimer 0;

-	end;

-		

-OnMobKilled:

-	set $@mobcount, $@mobcount - 1;

-	if($@mobcount == 0) goto ClearMob;

-	setnpctimer 0;

-	end;	

-	

-ChkEnd:	

-	setnpctimer 0;

-	end;	

-}

-

-lighthalzen.gat,267,200,3	script	Security Guard#01	868,{

-

-	if(countitem(7350)>0) goto Lhzpass1;

-	if($@lhz_alert == 1) goto Lhzstop;

-	if((gettime(2)>00 && gettime(2)<10)) goto LhzTalk2;

-	if((gettime(2)>30 && gettime(2)<40)) goto LhzTalk2;

-	set @LhzTalk,rand(1,10);

-	if(@LhzTalk  < 2 ) goto LhzTalk1;

-

-LhzTalk:

-	mes "[Guard]";

-	mes "Hey! Where do you think you are going?";

-	mes "I can not send nobody to the slum district!";

-	mes "If we let suspecious people like you pass,";

-	mes "there is no point in peace keeping!";

-	close;

-

-LhzTalk1:

-	mes "-Looks like the guard is doing something else";

-	mes "Now is a good time to sneak by.-";

-	next;

-	warp "lighthalzen.gat",297,227;

-	set $@sneakguard, $@sneakguard + 1;

-	close;

-

-LhzTalk2:

-	set @LhzTalk,rand(1,10);

-	if(@LhzTalk  < 2 ) goto LhzTalk;

-	mes "[Guard]";

-	mes "zzZ... zzZ... zzZ...";

-	mes "hmm. hmm... zzZ...";

-	next;

-	mes "-Looks like the guard is sleeping";

-	mes "Now is a good time to sneak by.-";

-	next;

-	warp "lighthalzen.gat",297,227;

-	close;

-

-Lhzpass1:

-	mes "[Guard]";

-	mes "Who are you! ...Hmm? You have a pass?";

-	mes "I'm sorry. You look like an adventurer,";

-	mes "but I guess you got the authority.";

-	mes "You may pass.";

-	next; 

-	warp "lighthalzen.gat",297,227;

-	close;

-

-Lhzstop:

-	mes "[Guard]";

-	mes "Recently, there were too many people sneaking pass us,";

-	mes "so we raised the security level.";

-	mes "Who sneak past us anyway?";

-	mes "It's troublesome...";

-	close;

-}

-

-lighthalzen.gat,294,223,7	script	Security Guard#02	868,{

-

-	if(countitem(7350)>0) goto Lhzpass1;

-	if($@lhz_alert == 1) goto Lhzstop;

-	if((gettime(2)>00 && gettime(2)<10)) goto LhzTalk2;

-	if((gettime(2)>30 && gettime(2)<40)) goto LhzTalk2;

-	set @LhzTalk,rand(1,10);

-	if(@LhzTalk  < 2 ) goto LhzTalk1;

-

-LhzTalk:

-	mes "[Guard]";

-	mes "Hey! Where do you think you are going?";

-	mes "I can not send nobody to the slum district!";

-	mes "If we let suspecious people like you pass,";

-	mes "there is no point in peace keeping!";

-	close;

-

-LhzTalk1:

-	mes "-Looks like the guard is doing something else";

-	mes "Now is a good time to sneak by.-";

-	next;

-	warp "lighthalzen.gat",264,200;

-	set $@sneakguard, $@sneakguard + 1;

-	close;

-

-LhzTalk2:

-	set @LhzTalk,rand(1,10);

-	if(@LhzTalk  < 2 ) goto LhzTalk;

-	mes "[Guard]";

-	mes "zzZ... zzZ... zzZ...";

-	mes "hmm. hmm... zzZ...";

-	next;

-	mes "-Looks like the guard is sleeping";

-	mes "Now is a good time to sneak by.-";

-	next;

-	warp "lighthalzen.gat",264,200;

-	close;

-

-Lhzpass1:

-	mes "[Guard]";

-	mes "Who are you! ...Hmm? You have a pass?";

-	mes "I'm sorry. You look like an adventurer,";

-	mes "but I guess you got the authority.";

-	mes "You may pass.";

-	next; 

-	warp "lighthalzen.gat",264,200;

-	close;

-

-Lhzstop:

-	mes "[Guard]";

-	mes "Recently, there were too many people sneaking pass us,";

-	mes "so we raised the security level.";

-	mes "Who sneak past us anyway?";

-	mes "It's troublesome...";

-	close;

-}

-

-//============================================================

-// Cube Room

-//============================================================

-

-//--------------------------Piciburn--------------------------

-

-lighthalzen.gat,341,224,4	script	Piciburn	868,{

-	if (BaseLevel < 60){

-		mes "[Piciburn]";

-		mes "Keep moving.";

-		close;

-	}

-	if (MISC_QUEST&512) goto L_DONE;

-	if (piciburn == 7) goto L_10;

-	if (piciburn == 6) goto L_9;

-	if (piciburn == 5) goto L_6;

-	if (piciburn == 4) goto L_4;

-	if (piciburn == 3) goto L_3;

-	if (piciburn == 2) goto L_2;

-	if (piciburn == 1) goto L_1;

-	mes "[Piciburn]";

-	mes "Hmm...? What is it?";

-	mes "I am busy at the moment,";

-	mes "so stop bothering me.";

-	set piciburn,1;

-	close;

-

-L_1:

-	mes "[Piciburn]";

-	mes "I'm getting distracted because";

-	mes "You keep staring at me!";

-	mes "Would you please leave me alone?";

-	set piciburn,piciburn+1;

-	close;

-

-L_2:

-	mes "[Piciburn]";

-	mes "Hmm...? Oh, it's you..";

-	mes "You are really getting on my nerves.";

-	mes "You're weird, you know that?";

-	mes "What is it that you want from me?";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "Nothing really...";

-	mes "Just looking around...";

-	mes "What are you doing?";

-	next;

-	mes "[Piciburn]";

-	mes "Oh, man...";

-	mes "If I just needed to show you this,";

-	mes "I wouldn't have got all worked up.";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "I know. Haha.";

-	next;

-	mes "[Piciburn]";

-	mes "You really ARE a weird person...";

-	mes "Are you just going to stand there";

-	mes "and keep watching?";

-	next;

-	mes "[Piciburn]";

-	mes "... You're really annoying me!";

-	mes "What do you want from me?!";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "I've aready told you.";

-	mes "I asked what you were doing.";

-	mes "This place is hot and sticky.";

-	next;

-	mes "[Piciburn]";

-	mes "Okay, okay..";

-	mes "I'll tell you what i'm doing,";

-	mes "but would you leave me in peace";

-	mes "if i did? Thanks.";

-	next;

-	mes "[Piciburn]";

-	mes "I'm.. um... doing something illegal...";

-	mes "Don't tell anyone about this!";

-	next;

-	mes "[Piciburn]";

-	mes "I am the only person who can make a route to";

-	mes "the industrial city's -^FF0000Laboratory^000000- or";

-	mes "places normal people wouldn't usually be able to get to.";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "The -Laboratory?!!!-";

-	mes "Can you really get people in there?!!!";

-	next;

-	mes "[Piciburn]";

-	mes "Agh! Quieten down! What did i tell you?";

-	mes "I've told you what i do, now will you stop staring at me?";

-	mes "And be quiet~!";

-	mes "You're weird.. ¬_¬";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "Ah..Haha.. I'm sorry.";

-	mes "I really want to go there,";

-	mes "so I got excited when I heard you can get people in there";

-	next;

-	mes "[Piciburn]";

-	mes "Hmm? You were planning to get in there?";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "Yeah, but i couldn't get in..";

-	next;

-	mes "[Piciburn]";

-	mes "Hmm...";

-	mes "This is troublesome...";

-	mes "I don't usually tell people i cannot";

-	mes "trust how to get into the Laboratory...";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "What do I need to do?";

-	mes "How can I get into the laboratory?";

-	next;

-	mes "[Piciburn]";

-	mes "Geez~, I'm just giving people a route, not sending them there.";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "Doesn't that mean the same thing?";

-	next;

-	mes "[Piciburn]";

-	mes "What I'm saying is,";

-	mes "I'm giving people the chance to get into the labs.";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "You're really talented, huh.";

-	next;

-	mes "[Piciburn]";

-	mes "Hahaha! Damn right.";

-	mes "It's a piece of cake!";

-	mes "...";

-	mes "Actually, now i think about it, it's impossible..";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "How's it impossible?";

-	mes "I haven't say anything yet~..";

-	next;

-	mes "[Piciburn]";

-	mes "Oh come on, you were going to BEG me to send you there~!!!";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "Heh...";

-	mes "You really ARE clever.";

-	mes "Well...";

-	mes "Pretty please~~?";

-	next;

-	mes "[Piciburn]";

-	mes "I can never let you in~..";

-	mes "Never ever~!!!";

-	set piciburn,piciburn+1;

-	close;

-

-L_3:

-	mes "[" +strcharinfo(0) + "]";

-	mes "Please?";

-	next;

-	mes "[Piciburn]";

-	mes "No way.";

-	set piciburn,piciburn+1;

-	close;

-

-L_4:

-	mes "[" +strcharinfo(0) + "]";

-	mes "Pleaseeeee?";

-	next;

-	mes "[Piciburn]";

-	mes "No.";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "Pleaseeeeeeeeeee?";

-	next;

-	mes "[Piciburn]";

-	mes "I don't want to.";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "Do it!!!";

-	next;

-	mes "[Piciburn]";

-	mes "Never~!!!";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "Why are you doing this to me?!!";

-	mes "What do you want from me !?!";

-	next;

-	mes "[Piciburn]";

-	mes "What do I want?";

-	mes "Heh heh.. One billion zeny.";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "Are you crazy?!";

-	next;

-	mes "[Piciburn]";

-	mes "It's your choice.";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "Sir, you know I don't have that much money.";

-	mes "Is there anything else you need?";

-	next;

-	mes "[Piciburn]";

-	mes "Hmm...";

-	mes "Okay fine...";

-	mes "Bring me 20 Jellopies.";

-	mes "'Kay?";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "........";

-	mes "So that's what you really wanted to ask me?";

-	next;

-	mes "[Piciburn]";

-	mes "Hahaha...";

-	mes "Yeah~~...";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "........";

-	next;

-	mes "[Piciburn]";

-	mes "So, what're you doing just standing there?";

-	mes "Are you going to do it or not?";

-	next;

-	menu "Definitely!",L_5,"No way! It's impossible!",-;

-

-	mes "[Piciburn]";

-	mes "Ah well, your loss,";

-	mes "Too bad!";

-	mes "Bye now~!!";

-	close;

-

-L_5:

-	mes "[Piciburn]";

-	mes "Okay then, do as I said,";

-	mes "bring me 20 jellopies!";

-	mes "....";

-	mes "What're you waiting for?! GO!!";

-	set piciburn,piciburn+1;

-	close;

-

-L_6:

-	mes "[Piciburn]";

-	mes "Did you get the items?";

-	next;

-	menu "Erm.. No..",-,"Hell yeah!",L_7,"What did you want again..?",L7_1;

-

-	mes "[Piciburn]";

-	mes "Hey, I don't feel like playing around anymore.";

-	mes "If you really want to get there, bring the damn items!";

-	close;

-

-L_7:

-	if (countitem(909) >= 20) goto L_8;

-	mes "[Piciburn]";

-	mes "Are you joking?";

-	mes "If you keep doing this,";

-	mes "I may not keep the promise either.";

-	mes "So go and get them already!";

-	close;

-

-L7_1:

-	mes "[Piciburn]";

-	mes "You're really stupid~!";

-	mes "It's 20 jellopies!";

-	mes "Don't forget this time~";

-	close;

-

-L_8:

-	delitem 909,20;

-	mes "[Piciburn]";

-	mes "Hmm. You're more reliable than i thought.";

-	mes "Taking this errand into consideration,";

-	mes "i guess you really want to get in there?";

-	next;

-	mes "[Piciburn]";

-	mes "Coming to think of it,";

-	mes "you look different.";

-	mes "Should I say you look more... trustworthy..?";

-	next;

-	mes "[Piciburn]";

-	mes "Well... Anyway...";

-	mes "A promise is a promise.";

-	mes "I will tell you how to get there.";

-	next;

-	mes "[Piciburn]";

-	mes "As I told you earlier, all I can do is";

-	mes "give you the opportunity to get in.";

-	next;

-	mes "[Piciburn]";

-	mes "I used to be a manager working for the lab,";

-	mes "but time moves on, as people do,";

-	mes "and now I am working against the lab.";

-	next;

-	mes "[Piciburn]";

-	mes "Now... Answer honestly on all I ask here on out.";

-	mes "Where i send you all depends on how you answer.";

-	next;

-	mes "[Piciburn]";

-	mes "Somewhere in the place I'm going to send you";

-	mes "There will be things you must find,";

-	mes "So search well.";

-	next;

-	mes "[Piciburn]";

-	mes "Well, when you've made your mind up,";

-	mes "come back and talk to me. Okay?";

-	set piciburn,piciburn+1;

-	close;

-

-L_9:

-	mes "[Piciburn]";

-	mes "Hmm... So...";

-	mes "Are you ready to go?";

-	next;

-	menu "No",-,"Yes",L9_1;

-

-	mes "[Piciburn]";

-	mes "Hmm... Not yet, huh...";

-	mes "Well, I guess it is to be expected.";

-	mes "But don't make me wait too long~!";

-	close;

-

-L9_1:

-	mes "[Piciburn]";

-	mes "This is going to be hard~";

-	mes "Let's go!!!";

-	close2;

-	set piciburn,piciburn+1;

-	set @rdm,rand(3);

-	if(@rdm==1)goto L_warp1;

-	if(@rdm==2)goto L_warp2;

- 	warp "lhz_cube.gat",67,193;

-	end;

-

-L_10:

-	mes "[Piciburn]";

-	mes "Hah!";

-	mes "You failed in there, right? Hahahaha~.";

-	mes "Are you going to try again? Or is it too tough~";

-	next;

-	menu "No",-,"Yes",L10_1;

-

-	mes "[Piciburn]";

-	mes "It was that hard huh?";

-	mes "Well, come back if you change your mind.";

-	close;

-

-L10_1:

-	mes "[Piciburn]";

-	mes "Okay..";

-	mes "I will send you there again..";

-	mes "Good luck!";

-	close2;

-	set @rdm,rand(3);

-	if(@rdm==1)goto L_warp1;

-	if(@rdm==2)goto L_warp2;

- 	warp "lhz_cube.gat",67,193;

-	end;

-

-L_warp1: 

-	warp "lhz_cube.gat",66,136;

-	end;

-L_warp2:

-	warp "lhz_cube.gat",66,74;

-	end;

-

-L_DONE:

-	mes "[Piciburn]";

-	mes "Oh~ I guess you found the entrance.";

-	mes "I'll tell you now...";

-	mes "If you want to go in there again";

-	next;

-	mes "[Piciburn]";

-	mes "You can get there by a sewer passage a bit south of the town.";

-	next;

-	mes "[" +strcharinfo(0) + "]";

-	mes "No wayyyyy!!";

-	next;

-	mes "[Piciburn]";

-	mes "I know. I know...";

-	mes "It is dirty.";

-	mes "But it's only way in, so don't complain!";

-	next;

-	mes "[Piciburn]";

-	mes "Now, take care of yourself~.";

-	close;

-}

-

-//--------------------------Box--------------------------

-

-lhz_cube.gat,248,179,0	script	Box#01	111,{

-	if (MISC_QUEST&512 || cubekey&64) goto L_DONE;

-	mes "There is an axe in the box.";

-	next;

-	menu "Take the axe.",L_1,"Leave it alone.",-;

-	close;

-

-L_1:

-	mes "You acquired the ^FF0000axe^000000.";

-	set cubekey,cubekey|64;

-	close;

-

-L_DONE:

-	mes "There is a box that used to contain an ^FF0000axe^000000.";

-	close;

-}

-

-//--------------------------Barrel--------------------------

-

-lhz_cube.gat,237,183,0	script	Barrel	111,{

-	if (MISC_QUEST&512 || cubekey&1) goto L_DONE;

-	if (cubekey&128) goto L_2;

-	mes "There is a box that looks weak.";

-	if ((cubekey&64) == 0) close;

-	next;

-	input @axe$;

-

-	if (@axe$ == "axe" || @axe$ == "Axe") goto L_1;

-	mes "There is no change.";

-	close;

-

-L_1:

-	mes "When you break the barrel with an axe,";

-	mes "you see that there's a box inside of it.";

-	next;

-	mes "On top of the box, there's a panel with the numbers 1~9";

-	set cubekey,cubekey|128;

-	close;

-

-L_2:

-	mes "There is a box with numbers 1~9 on it's surface.";

-	next;

-	set @agree,0;

-	input @number;

-	if (num6 == @number) set @agree,@agree+1;

-	input @number;

-	if (num8 == @number) set @agree,@agree+1;

-	input @number;

-	if (num1 == @number) set @agree,@agree+1;

-	input @number;

-	if (num4 == @number) set @agree,@agree+1;

-	input @number;

-	if (num9 == @number) set @agree,@agree+1;

-	input @number;

-	if (num2 == @number) set @agree,@agree+1;

-	input @number;

-	if (num7 == @number) set @agree,@agree+1;

-	input @number;

-	if (num5 == @number) set @agree,@agree+1;

-	input @number;

-	if (num3 == @number) set @agree,@agree+1;

-	if (@agree == 9 && num1) goto L_3; //you can't enter correct numbers, till read them under that picture [Lupus]

-	mes "There is no change.";

-	close;

-

-L_3:

-	mes "The box opened, making a metallic click.";

-	mes "Within the box, there is 'yellow key'.";

-	next;

-	mes "You acquired '^FF0000yellow key^000000'.";

-	set cubekey,cubekey|1;

-	close;

-

-L_DONE:

-	mes "This box used to have the '^FF0000yellow key^000000'";

-	mes "The box is now empty.";

-	close;

-}

-

-//--------------------------Drawer--------------------------

-

-lhz_cube.gat,242,201,0	script	Drawer	111,{

-	if (MISC_QUEST&512 || cubekey&32) goto L_DONE;

-	mes "The drawer is locked.";

-	if (cubekey&2) goto L_1;

-	close;

-

-L_1:

-	input @key$;

-	if (@key$ == "red key" || @key$ == "Red Key") goto L_2;

-	mes "The drawer is locked, you need some kind of key.";

-	close;

-

-L_2:

-	mes "The red key fits the lock perfectly,opening the drawer.";

-	mes "You found a 'small knife' inside.";

-	next;

-	mes "You acquired ^FF0000small knife^000000.";

-	set cubekey,cubekey|32;

-	close;

-

-L_DONE:

-	mes "It is the drawer you got ^FF0000small knife^000000 from.";

-	mes "There is nothing inside now.";

-	close;

-}

-

-//--------------------------Documents--------------------------

-

-lhz_cube.gat,237,198,0	script	Documents	111,{

-	if (MISC_QUEST&512 || cubekey&2) goto L_DONE;

-	mes "There are tons of documents here.";

-	next;

-	menu "Search the documents.",L_1,"Ignore.",-;

-	close;

-

-L_1:

-	mes "As you look through the documents, a 'red key' falls out.";

-	next;

-	mes "You acquired ^FF0000red key^000000.";

-	set cubekey,cubekey|2;

-	close;

-

-L_DONE:

-	mes "This is where you acquired ^FF0000red key^000000.";

-	mes "There's nothing else to do here.";

-	close;

-}

-

-//--------------------------Bed--------------------------

-

-lhz_cube.gat,247,198,0	script	Bed	111,{

-	mes "There is a messy bed.";

-	next;

-	menu "Above bed",-,"Below bed",L_1;

-

-	mes "The blanket is messily placed.";

-	mes "There is nothing special here.";

-	close;

-

-L_1:

-	if (MISC_QUEST&512 || cubekey&131072) goto L_DONE;

-	if (cubekey&2048){

-		mes "As you look under the bed, you see that there";

-		mes "is a small object covered in dust.";

-		next;

-		input @bed$;

-

-		if (cubekey&4096 && (@bed$ == "long stick" || @bed$ == "Long Stick")){

-			mes "You used the long stick to pull it out.";

-			next;

-			mes "You acquired '^FF0000cube model^000000'.";

-			set cubekey,cubekey|131072;

-			close;

-		}

-		mes "It looks like you need some kind of long item to";

-		mes "Get the item out, you can't reach it!";

-		close;

-	}

-	mes "You look below the bed and see a 'small stick'.";

-	mes "It is within your grasp, but there is";

-	mes "also another item hidden under the bed, which";

-	mes "you'll need some kind of long item to pull it out.";

-	next;

-	mes "You acquired the '^FF0000small stick^000000'.";

-	mes "It looks like this stick could be combined";

-	mes "with another stick to make it larger.";

-	set cubekey,cubekey|2048;

-

-	if ((cubekey&4096) == 0 && cubekey&1024){

-		set cubekey,cubekey|4096;

-		next;

-		mes "It looks similar to the decently sized stick that you";

-		mes "found under the desk.";

-		mes "You put the two end to end, and they click into place.";

-		next;

-		mes "You acquired '^FF0000long stick^000000'.";

-	}

-	close;

-

-L_DONE:

-	mes "This is the place where you got '^FF0000cube model^000000' from.";

-	mes "There is nothing down here now but dust.";

-	close;

-}

-

-//--------------------------Cup--------------------------

-

-lhz_cube.gat,229,184,0	script	Cup	111,{

-	if (MISC_QUEST&512 || cubekey&4) goto L_DONE;

-	mes "You see an empty bottle and a cup with something in it.";

-	next;

-	menu "Leave it alone.",-,"Look what is inside.",L_1;

-	close;

-

-L_1:

-	mes "When you look inside, you see a 'rusty key'.";

-	next;

-	mes "You acquired the '^FF0000rusty key^000000'.";

-	set cubekey,cubekey|4;

-	close;

-

-L_DONE:

-	mes "You got the '^FF0000rusty key^000000' here.";

-	mes "There's nothing but an empty cup and an empty bottle.";

-	close;

-}

-

-//--------------------------Shelf--------------------------

-

-lhz_cube.gat,233,206,0	script	Shelf	111,{

-	if (MISC_QUEST&512 || cubekey&8) goto L_DONE;

-	mes "There are lots of bottles filled with acids lined up";

-	mes "Along the shelf, they have different labels.";

-	next;

-	input @lathe$;

-

-	if (cubekey&4 && (@lathe$ == "rusty key" || @lathe$ == "Rusty Key")) goto L_1;

-	mes "Nothing happened.";

-	close;

-

-L_1:

-	mes "As you put the 'rusty key' into a bottle, it fizzes";

-	mes "and bubbles, and all the liquid disappears.";

-	mes "All that's left is a clean, green key.";

-	next;

-	mes "You acquired the '^FF0000green key^000000'";

-	set cubekey,cubekey|8;

-	close;

-

-L_DONE:

-	mes "There is an acid that changed corroded all the rust";

-	mes "off of your key.";

-	next;

-	mes "I don't see anything useful.";

-	close;

-}

-

-//--------------------------Closet--------------------------

-

-lhz_cube.gat,249,191,0	script	Closet	111,{

-	if (MISC_QUEST&512 || cubekey&8192) goto L_DONE;

-	mes "There is a closet with lots of drawers.";

-	if (cubekey&8) goto L_2;

-	next;

-	menu "Leave it alone.",-,"Open one of the drawers.",L_1;

-	close;

-

-L_1:

-	mes "There's nothing of any interest in this drawer.";

-	close;

-

-L_2:

-	next;

-	input @gkey$;

-

-	if (@gkey$ == "green key" || @gkey$ == "Green Key") goto L_3;

-	mes "There's nothing of any interest in this drawer.";

-	close;

-

-L_3:

-	mes "You put the 'green key' into a keyhole,";

-	mes "opening one of the locked drawers.";

-	mes "In the drawer, there is a model of";

-	mes "a polygon.";

-	next;

-	mes "'You acquired the ^FF0000polygon model^000000.";

-	set cubekey,cubekey|8192;

-	close;

-

-L_DONE:

-	mes "This is the closet where you got";

-	mes "the 'polygon model' from.";

-	next;

-	mes "The other draws will not open, there's";

-	mes "nothing else to do here.";

-	close;

-}

-

-//--------------------------Desk--------------------------

-

-lhz_cube.gat,234,200,0	script	Desk	111,{

-	mes "There is a desk with lots of objects scattered around.";

-	next;

-	menu "Above the desk",-,"Below the desk",L_1,"Drawer",L_2;

-

-	mes "There are lots of books, papers and";

-	mes "research equipment.";

-	close;

-

-L_1:

-	if(MISC_QUEST&512 || cubekey&1024) goto L_DONE;

-

-	mes "When you look below the desk,";

-	mes "You see a decent sized stick.";

-	next;

-	mes "You acquired '^FF0000short stick^000000'.";

-	mes "It looks like this stick could be combined";

-	mes "with another stick to make it larger.";

-	set cubekey,cubekey|1024;

-	if(cubekey&2048){

-		set cubekey,cubekey|4096;

-		next;

-		mes "It seems like the decently sized stick can be";

-		mes "combined with the 'short stick' from under the bed.";

-		mes "You put the two end to end, and they click into place.";

-		next;

-		mes "You acquired the '^FF0000long stick^000000'";

-	}

-	close;

-L_DONE:

-	mes "This is where you acquired the '^FF0000short stick^000000'.";

-	mes "There is nothing but dust now.";

-	close;

-L_2:

-	mes "It is locked and can't be opened.";

-	close;

-}

-

-//--------------------------Picture--------------------------

-

-lhz_cube.gat,237,206,0	script	Picture	111,{

-	if (MISC_QUEST&512 || num1 > 0) goto L_DONE;

-	mes "There is a picture on the wall.";

-	next;

-	menu "Move it.",L_1,"Leave it alone.",-;

-	close;

-

-L_1:

-	mes "It does not move.";

-	next;

-	input @knife$;

-

-	if (cubekey&32 && (@knife$ == "small knife" || @knife$ == "Small Knife")) goto L1_1;

-	mes "Nothing happened.";

-	close;

-

-L1_1:

-	mes "You slid the 'small knife' behind the frame";

-	mes "and used it to twist the picture.";

-	mes "As you turn the frame, the picture detatches and";

-	mes "falls from the wall.";

-	next;

-	set num1,rand(1,9);

-	Lset1:

-	set num2,rand(1,9);

-	if (num1 == num2) goto Lset1;

-	Lset2:

-	set num3,rand(1,9);

-	if (num1 == num3) goto Lset2;

-	if (num2 == num3) goto Lset2;

-	Lset3:

-	set num4,rand(1,9);

-	if (num1 == num4) goto Lset3;

-	if (num2 == num4) goto Lset3;

-	if (num3 == num4) goto Lset3;

-	Lset4:

-	set num5,rand(1,9);

-	if (num1 == num5) goto Lset4;

-	if (num2 == num5) goto Lset4;

-	if (num3 == num5) goto Lset4;

-	if (num4 == num5) goto Lset4;

-	Lset5:

-	set num6,rand(1,9);

-	if (num1 == num6) goto Lset5;

-	if (num2 == num6) goto Lset5;

-	if (num3 == num6) goto Lset5;

-	if (num4 == num6) goto Lset5;

-	if (num5 == num6) goto Lset5;

-	Lset6:

-	set num7,rand(1,9);

-	if (num1 == num7) goto Lset6;

-	if (num2 == num7) goto Lset6;

-	if (num3 == num7) goto Lset6;

-	if (num4 == num7) goto Lset6;

-	if (num5 == num7) goto Lset6;

-	if (num6 == num7) goto Lset6;

-	Lset7:

-	set num8,rand(1,9);

-	if (num1 == num8) goto Lset7;

-	if (num2 == num8) goto Lset7;

-	if (num3 == num8) goto Lset7;

-	if (num4 == num8) goto Lset7;

-	if (num5 == num8) goto Lset7;

-	if (num6 == num8) goto Lset7;

-	if (num7 == num8) goto Lset7;

-	Lset8:

-	set num9,rand(1,9);

-	if (num1 == num9) goto Lset8;

-	if (num2 == num9) goto Lset8;

-	if (num3 == num9) goto Lset8;

-	if (num4 == num9) goto Lset8;

-	if (num5 == num9) goto Lset8;

-	if (num6 == num9) goto Lset8;

-	if (num7 == num9) goto Lset8;

-	if (num8 == num9) goto Lset8;

-

-L_DONE:

-	mes "There is a number behind the picture.";

-	mes "" + num1 + "3 " + num2 + "6 " + num3 + "9 " + num4 + "4 " + num5 + "8 " + num6 + "1 " + num7 + "7 " + num8 + "2 " + num9 + "5";

-	mes "Perhaps you should write this number down somewhere...";

-	close;

-}

-

-//--------------------------generator--------------------------

-

-lhz_cube.gat,224,192,0	script	Generator	111,{

-	if (MISC_QUEST&512 || cubekey&256) goto L_DONE;

-	mes "The big machine is running, making a huge noise.";

-	mes "There are lots weird symbols and";

-	mes "a small key hole beside them.";

-	next;

-	input @key$;

-

-	if (cubekey&1 && (@key$ == "yellow key" || @key$ == "Yellow Key")) goto L_1;

-	mes "There's nothing to do here.";

-	close;

-

-L_1:

-	mes "You insert the 'yellow key' into the keyhole";

-	mes "and twist it.";

-	mes "The machine clicks, and becomes silent.";

-	next;

-	mes "When it was stopped, the lamp next to the bed";

-	mes "also turned off.";

-	set cubekey,cubekey|256;

-	close;

-

-L_DONE:

-	mes "The big machine sits quietly.";

-	close;

-}

-

-//--------------------------Lamp--------------------------

-

-lhz_cube.gat,248,205,0	script	Lamp	111,{

-	if (MISC_QUEST&512 || cubekey&16) goto L_DONE;

-	if (cubekey&256) goto L_1;

-	mes "There is a bright lamp.";

-	mes "Seems like there is something inside";

-	mes "but it is too hot to touch.";

-	mes "It looks like you need to somehow turn the lamp off.";

-	close;

-

-L_1:

-	mes "There is something inside of the bulb.";

-	next;

-	menu "Leave it alone.",-,"Break the bulb.",L_2;

-	close;

-

-L_2:

-	mes "When you break the bulb, a";

-	mes "'black key' falls out.";

-	next;

-	mes "You acquired the '^FF0000black key^000000'.";

-	set cubekey,cubekey|16;

-	close;

-

-L_DONE:

-	mes "There nothing but a broken bulb.";

-	close;

-}

-

-//--------------------------Box--------------------------

-

-lhz_cube.gat,248,193,0	script	Box#02	111,{

-	if (MISC_QUEST&512 || countitem(2657) || @gotLPkey) goto L_DONE;

-	mes "There is a box with three holes.";

-	next;

-	if (cubekey&65536 && cubekey&262144 && cubekey&16384) goto L_4;

-	menu "Ellipse hole",L_1,"Square hole",L_2,"Polygonal hole",L_3;

-

-L_1:

-	if (cubekey&65536) goto L1_2;

-	input @ellipse$;

-

-	if (cubekey&32768 && (@ellipse$ == "ellipse model" || @ellipse$ == "Ellipse Model")) goto L1_1;

-	mes "Nothing happened.";

-	close;

-

-L1_1:

-	mes "You inserted the 'ellipse model' into the ellipse-shaped hole.";

-	mes "The box makes a metallic click.";

-	set cubekey,cubekey|65536;

-	close;

-

-L1_2:

-	mes "You've already inserted the 'ellipse model'.";

-	close;

-

-L_2:

-	if (cubekey&262144) goto L2_2;

-	input @quadrangle$;

-

-	if (cubekey&131072 && (@quadrangle$ == "cube model" || @quadrangle$ == "Cube Model")) goto L2_1;

-	mes "Nothing happened.";

-	close;

-

-L2_1:

-	mes "You inserted the 'cube model' into the square-shaped hole.";

-	mes "The box makes a metallic click.";

-	set cubekey,cubekey|262144;

-	close;

-

-L2_2:

-	mes "You already inserted the 'square model'.";

-	close;

-

-L_3:

-	if (cubekey&16384) goto L3_2;

-	input @polygon$;

-

-	if (cubekey&8192 && (@polygon$ == "polygon model" || @polygon$ == "Polygon Model")) goto L3_1;

-	mes "Nothing happened.";

-	close;

-

-L3_1:

-	mes "You inserted the 'polygon model' into the polygonal hole.";

-	mes "The box makes a metallic click.";

-	set cubekey,cubekey|16384;

-	close;

-

-L3_2:

-	mes "You've already inserted the 'polygon model'.";

-	close;

-

-L_4:

-	mes "All holes are filled with keymodels.";

-	next;

-	menu "Leave it alone.",-,"Open the box.",L4_1;

-	close;

-

-L4_1:

-	mes "There is a small card inside of it.";

-	next;

-	mes "You acquired the 'Laboratory Permit'.";

-	set @gotLPkey,1;

-	getitem 2657,1;

-	close;

-

-L_DONE:

-	mes "There is an opened box.";

-	mes "There is nothing inside.";

-	close;

-}

-

-//--------------------------Test tube--------------------------

-

-lhz_cube.gat,224,197,0	script	Test Tube	111,{

-	if (MISC_QUEST&512) goto L_DONE;

-	if (countitem(2657) > 0) goto L_3;

-	if (cubekey&32768) goto L_2;

-	mes "There is a weird test tube.";

-	mes "It seems like there is something inside.";

-	mes "There' a keyhole and a hole that fits a thin object.";

-	next;

-	input @key$;

-

-	if (cubekey&16 && (@key$ == "black key" || @key$ == "Black Key")) goto L_1;

-	mes "Nothing happened.";

-	close;

-

-L_1:

-	mes "You inserted the 'black key' and turned it.";

-	mes "The glass window at the front of the machine opened,";

-	mes "Revealing an ellipse model.";

-	next;

-	mes "You acquired the '^FF0000ellipse model^000000'.";

-	set cubekey,cubekey|32768;

-	close;

-

-L_2:

-	mes "This is where you got '^FF0000ellipse model^000000'.";

-	mes "There is a weird symbol on the bottom of the machine.";

-	mes "It looks like it could open as it has hinges on one side.";

-	close;

-

-L_3:

-	mes "There is a rectangular hole in the front of the machine.";

-	next;

-	input @answer$;

-

-	if (@answer$ == "Laboratory Permit" || @answer$ == "permit" || @answer$ == "laboratory permit" || @answer$ == "Permit") goto L_4;

-	mes "Nothing happened.";

-	close;

-

-L_4:

-	mes "You inserted the 'Laboratory Keycard' in the hole,";

-	mes "and the stair leading down appeared on the floor.";

-	next;

-	menu "Go down.",L4_1,"Do not go down.",-;

-	close;

-

-L4_1:

-	mes "It connected to a long staircase.";

-	set cubekey,0;	

-	set num1,0;	set num2,0;	set num3,0;	set num4,0;	set num5,0;

-	set num6,0;	set num7,0;	set num8,0;	set num9,0;

-	set piciburn,0;

-	set MISC_QUEST,MISC_QUEST|512;

-	close2;

-L_DONE:

-	warp "lhz_cube.gat",177,13;

-	end;

-}

-

-//============================================================

-// Lighthalzen Pickpocket Mini-Quest

-//============================================================

-

-lighthalzen.gat,240,216,4	script	Man#Pickpocket1	870,2,2,{

-	end;

-OnTouch:

-	callfunc "F_LHZPick",33,1;

-	close;

-}

-

-lighthalzen.gat,220,169,4	script	Man#Pickpocket2	870,2,2,{

-	end;

-OnTouch:

-	callfunc "F_LHZPick",33,2;

-	close;

-}

-

-lighthalzen.gat,164,127,4	script	Man#Pickpocket3	870,2,2,{

-	end;

-OnTouch:

-	callfunc "F_LHZPick",20,3;

-	if(@caught!=1) close;

-	mes "[Strange Man]";

-	mes "Ayee! I'm trapped.";

-	mes "If you will forgive me,";

-	mes "I can give you something good.";

-	mes "["+strcharinfo(0)+"]";

-	mes "You're forgiven, now what is this";

-	mes "good thing you mentioned?";

-	next;

-	mes "[Strange Man]";

-	mes "The lower part of your body,";

-	mes "will produce a strong power";

-	mes "once you've taken the secret potion.";

-	mes "It's very useful";

-	mes "when you want to run quickly";

-	next;

-	mes "[Strange Man]";

-	mes "I will sell you them for a bargin";

-	mes "price of 15,000 zeny to a maximum";

-	mes "of three potions.";

-	mes "How many do you want?";

-	next;

-	input @number;

-	if(@number>3) set @number,3;

-	set @cost,15000*@number;

-	if(Zeny<@cost) goto L_Zeny;

-	//please check that you add the script to it.

-	set Zeny,zeny-@cost;

-	getitem 12016,@number; //Speed Potion

-	mes "[Strange Man]";

-	mes "Thanks for your money.";

-	if(rand(1,2)==1) goto L_Reset;

-	disablenpc "Man#Pickpocket3";

-	enablenpc "Man#Pickpocket2";

-	close;

-L_Reset:

-	disablenpc "Man#Pickpocket3";

-	enablenpc "Man#Pickpocket1";

-	close;

-L_Zeny:

-	mes "[Strange Man]";

-	mes "Too bad.";

-	mes "No zeny makes you a poor man.";

-	close;

-OnInit:

-	disablenpc "Man#Pickpocket2";

-	disablenpc "Man#Pickpocket3";

-}

-

-function	script	F_LHZPick	{

-	if(Zeny<100) set Zeny,0;

-	if(Zeny>=100) set Zeny,zeny-100;

-	mes "Pickpocket";

-	next;

-	if(rand(0,100)<getarg(0)) goto L_Caught;

-	mes "Hehehehe....";

-	return;

-L_Caught:

-	mes "(You notice the man put his";

-	mes "hand in your pocket!)";

-	mes "["+strcharinfo(0)+"]";

-	mes "Eh!? What are you doing!";

-	mes "You are!! Stealing my money?!";

-	mes "[Strange Man]";

-	mes "Ah! I'm caught!";

-	mes "["+strcharinfo(0)+"]";

-	mes "You're a pickpocket?!?";

-	mes "[Strange Man]";

-	mes "Hehehehe....";

-	next;

-	set @rand,rand(1,4);

-	if(getarg(1)==1 && @rand<4) goto L_MoveB;

-	if(getarg(1)==2 && @rand<4) goto L_MoveA;

-	if(getarg(1)==1 && @rand==4) goto L_MoveC1;

-	if(getarg(1)==2 && @rand==4) goto L_MoveC2;

-	set @caught,1;

-	return;

-L_MoveA:

-	disablenpc "Man#Pickpocket2";

-	enablenpc "Man#Pickpocket1";

-	return;

-L_MoveB:

-	disablenpc "Man#Pickpocket1";

-	enablenpc "Man#Pickpocket2";

-	return;

-L_MoveC1:

-	disablenpc "Man#Pickpocket1";

-	enablenpc "Man#Pickpocket3";

-	return;

-L_MoveC2:

-	disablenpc "Man#Pickpocket2";

-	enablenpc "Man#Pickpocket3";

-	return;

-}

-

-//==============================================================

-// Friendship

-//==============================================================

-

-lhz_in02.gat,201,210,3	script	Digotz	869,{

-

-	if(friendship > 9)goto s_Dead;

-	if(friendship == 9)goto s_Wounded;

-	if(friendship == 8)goto s_Cont7;

-	if(friendship == 6 && friendship2 || friendship == 7)goto s_Cont6;

-	if(friendship == 6)goto s_Cont5;

-	if(friendship == 4 || friendship == 5)goto s_Cont4;

-	if(friendship == 3)goto s_Cont3;

-	if(friendship == 2)goto s_Cont2;

-	mes "[Digotz]";

-	mes "Oh, an adventurer?";

-	mes "Welcome to Uptown";

-	mes "Lighthalzen. However,";

-	mes "I'm afraid this area won't";

-	mes "have much to offer you";

-	mes "in the way of excitement.";

-	next;

-	if(friendship == 1)goto s_Cont;

-	mes "[Digotz]";

-	mes "Feel free to take";

-	mes "a look around if you";

-	mes "so wish. I'm actually";

-	mes "glad to see somebody";

-	mes "aside from the stuck up";

-	mes "rich people who live here.";

-	close;

-

-s_Cont:

-	mes "[Digotz]";

-	mes "My name is Digotz,";

-	mes "just another citizen";

-	mes "of Upper Lighthalzen.";

-	mes "I hope that you enjoy";

-	mes "your stay in my hometown";

-	next;

-	menu "Do you know someone named Maku?",-;

-

-	mes "[Digotz]";

-	mes "Maku? Maku. Yes, he's my";

-	mes "childhood friend. Or he was,";

-	mes "anyway. Now he's just a jerk.";

-	mes "In an case, we can't hang";

-	mes "out, even if we wanted to,";

-	mes "for several reasons.";

-	next;

-	mes "[Digotz]";

-	mes "Hey, why am I even";

-	mes "talking about this? It's";

-	mes "not like I'm bothered by";

-	mes "the fact that me and Maku aren't";

-	mes "pals anymore. You know what?";

-	mes "Just forget everything I said.";

-	set friendship,2;

-	close;

-

-s_Cont2:

-	mes "[Digotz]";

-	mes "What are you still";

-	mes "doing hanging around";

-	mes "here? There's nothing";

-	mes "interesting in Uptown";

-	mes "for you to see, adventurer.";

-	next;

-	mes "[Digotz]";

-	mes "Gosh...!";

-	mes "Just hearing about";

-	mes "Maku makes me so feel";

-	mes "so upset for some reason!";

-	close;

-

-s_Cont3:

-	mes "[Digotz]";

-	mes "I know that the";

-	mes "opulence of Uptown";

-	mes "seems rather attractive,";

-	mes "but trust me. This place";

-	mes "is colorless. Now, have";

-	mes "you visited the poor district?";

-	next;

-	menu "Yes, I did already...",-;

-

-	mes "[" + strcharinfo(0) + "]";

-	mes "Yes, I did already...";

-	mes "And I met someone";

-	mes "named Maku there.";

-	next;

-	mes "[Digotz]";

-	mes "Maku?! Oh, he must have";

-	mes "mentioned something about";

-	mes "me. But I don't care what he";

-	mes "says, unless it's an apology";

-	mes "for being a fully blown jerk.";

-	mes "Ever since we were kids...";

-	next;

-	mes "[Digotz]";

-	mes "Anyway, we used to be close,";

-	mes "but that guy was never a true";

-	mes "friend of mine! Like that one";

-	mes "time he cheated to beat me at";

-	mes "arm wrestling! Or when he never";

-	mes "thanked me for buying us lunch!";

-	next;

-	mes "[Digotz]";

-	mes "Sure, he might have helped";

-	mes "me a little in meeting my first";

-	mes "girlfriend, but I'll never ever";

-	mes "forgive him for fixing me up";

-	mes "on the worst blind dates a";

-	mes "man can possible experience!";

-	next;

-	mes "[Digotz]";

-	mes "Maku doesn't know a damn";

-	mes "about friendship! Even if I did";

-	mes "want to see him, there are these";

-	mes "people who don't want the rich";

-	mes "to ever meet with the poor.";

-	next;

-	mes "If Maku's fine, that's";

-	mes "good enough to hear for";

-	mes "me! There's no need for me";

-	mes "to go all the way over there";

-	mes "and check up on him! I only";

-	mes "have one regret though...";

-	next;

-	mes "[Digotz]";

-	mes "I only wish I had one";

-	mes "last chance to see Maku...";

-	mes "So that I could kick his sorry";

-	mes "ass myself! Yeah, that's right!";

-	mes "Arrogant bastard! But still,";

-	mes "I'm not able to do that...";

-	next;

-	mes "[Digotz]";

-	mes "The security guards here";

-	mes "will never allow the rich and";

-	mes "poor to meet, fearing that";

-	mes "the poor will disturb the peace";

-	mes "and order of the city. It's a dumb";

-	mes "rule made for dumb people.";

-	next;

-	mes "[Digotz]";

-	mes "Still, it's pretty scary that";

-	mes "someone can get punished";

-	mes "for violating such a stupid";

-	mes "taboo, actually. Anyway, if";

-	mes "you see Maku again, tell";

-	mes "him this for me, got it?";

-	next;

-	mes "[Digotz]";

-	mes "^FF0000Hopeless bastard!";

-	mes "You're still a stubborn jerk!";

-	mes "You owe me at least 3 lunches!";

-	mes "Not to mention an apology!";

-	mes "But who cares what you think?!";

-	mes "I'm so goddamn happy without you!";

-	set friendship,4;

-	close;

-

-s_Cont4:

-	mes "[Digotz]";

-	mes "Still checking out";

-	mes "Uptown Lighthalzen?";

-	mes "Not like I'd care, but if you";

-	mes "do happen to see Maku,";

-	mes "deliver this little message";

-	mes "for me, sentence by sentence.";

-	next;

-	mes "[Digotz]";

-	mes "^FF0000Hopeless bastard!";

-	mes "You're still a stubborn jerk!";

-	mes "You owe me at least 3 lunches!";

-	mes "Not to mention an apology!";

-	mes "But who cares what you think?!";

-	mes "I'm so goddamn happy without you!";

-	close;

-

-s_Cont5:

-	mes "[Digotz]";

-	mes "Oh, it's been a while.";

-	mes "What are you doing back";

-	mes "over here? And, um, did";

-	mes "you deliver that message";

-	mes "to Maku? Now when I think";

-	mes "about it, I was kind of--";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "I delivered your message";

-	mes "word for word, and Maku";

-	mes "got angry, called you names";

-	mes "and has been threatening to";

-	mes "beat you up pretty badly.";

-	next;

-	mes "[Digotz]";

-	mes "That no-good, dirty";

-	mes "lying rotten scoundrel!";

-	mes "If it weren't for those";

-	mes "guards, I'd head over to";

-	mes "the ghetto and beat Maku";

-	mes "up myself! That stupid guy!";

-	next;

-	mes "[Digotz]";

-	mes "During times like this,";

-	mes "I really miss ^FF0000Benkaistein^000000";

-	mes "That guy would always have";

-	mes "an answer for this kind of";

-	mes "situation. Yeah, I think he's";

-	mes "in some far off town, studying.";

-	next;

-	mes "[Digotz]";

-	mes "Supposedly he's in that";

-	mes "place, whatever it's called,";

-	mes "since there's a ton of books";

-	mes "there that he can use. But";

-	mes "yeah, Benkaistein would";

-	mes "always be the mediator...";

-	next;

-	mes "[Digotz]";

-	mes "Even back then, when";

-	mes "me, him and Maku used to";

-	mes "hang out, Benkastein would";

-	mes "mediate if we got into some";

-	mes "argument. Still, he couldn't";

-	mes "do anything about Maku now...";

-	next;

-	mes "[Digotz]";

-	mes "I don't know why,";

-	mes "but I'm so angry!";

-	mes "Why am I stressing";

-	mes "out so much over this?!";

-	set friendship2,1;

-	close;

-

-s_Cont6:

-	mes "[Digotz]";

-	mes "Even if Benkaistein came";

-	mes "back from wherever he was";

-	mes "studying, I don't think he'd be";

-	mes "able to get Maku to apologize";

-	mes "to me. That guy is just way";

-	mes "too stubborn for his own good!";

-	if(friendship != 7)close;

-	next;

-	menu "Show Benkastein's Journal",s_Journal,"Don't show Benkastein's Journal.",-;

-

-	mes "[Digotz]";

-	mes "I don't understand";

-	mes "why I'm so angry!";

-	mes "I'm starting to act";

-	mes "more like Maku, though,";

-	mes "don't get me wrong, it's";

-	mes "not like I care about the guy.";

-	close;

-

-s_Journal:

-	mes "[Digotz]";

-	mes "Why am I so ticked off?";

-	mes "^3131FF*Sigh*^000000 You have something";

-	mes "to show me? Huh? Benkastein";

-	mes "wanted me to read this diary";

-	mes "of his? Sure, why not? I do";

-	mes "owe him a lot over the years...";

-	next;

-	mes "[Benkastein's Journal]";

-	mes "^AD9595Today, me, Digotz and";

-	mes "Maku played this crazy flying";

-	mes "game. Basically, we make";

-	mes "these wings out of wood and";

-	mes "paper, jump of these hills";

-	mes "and try to fly. Dumb, I know.";

-	next;

-	mes "^000000[Benkastein's Journal]";

-	mes "^AD9595Today it was my turn to";

-	mes "jump and flap my arms with";

-	mes "these fake, badly made wings.";

-	mes "It's not really a fun game when";

-	mes "I think about it. Boy, I hope";

-	mes "we don't do that again.";

-	next;

-	mes "^000000[Digotz]";

-	mes "Oh yeah, I remember that!";

-	mes "Maky wore the wings most";

-	mes "of the time, but I still hold";

-	mes "the record for staying in the";

-	mes "air the longest! Yeah, I was";

-	mes "a regular Kid Pegasus~";

-	next;

-	mes "[Benkastein's Journal]";

-	mes "^AD9595Maku, Digotz and me went";

-	mes "outside of town. Of course,";

-	mes "we didn't tell anyone or else";

-	mes "we'd get in trouble. It was";

-	mes "a really exciting day. But";

-	mes "then, we ran into a monster!";

-	next;

-	mes "^000000[Benkastein's Journal]";

-	mes "^AD9595I wanted to run away but Maku";

-	mes "and Digotz wanted to beat it so";

-	mes "that we could become heroes.";

-	mes "Of course, we got hurt pretty";

-	mes "bad and the monster got away.";

-	mes "Boy, mom was not happy...";

-	next;

-	mes "^000000[Digotz]";

-	mes "Huh. I don't remember";

-	mes "that so well. But I know that";

-	mes "Benkastein, me and Maku";

-	mes "weren't afraid of anything back";

-	mes "then. We must have been totally";

-	mes "nuts to fight a monster, though.";

-	next;

-	mes "[Benkastein's Journal]";

-	mes "^AD9595Digotz's been sick for three";

-	mes "days now. It's just a normal";

-	mes "cold and Maku keeps saying";

-	mes "it's Digotz's fault he got sick.";

-	mes "But he's always asking me to";

-	mes "go visit him and see if he's okay.";

-	next;

-	mes "^000000[Digotz]";

-	mes "I think I remember being";

-	mes "pretty sick. Maku was worried?";

-	mes "I... I must have had a horrible";

-	mes "life threatening disease like,";

-	mes "um, Gonorrhitis. You know.";

-	mes "That might have been it.";

-	next;

-	mes "[Benkastein's Journal]";

-	mes "^AD9595Mom and dad keep telling";

-	mes "me not to hang out with Maku";

-	mes "anymore. Their reason is really";

-	mes "dumb, and I don't care if he is";

-	mes "poor. He's one of the best guys";

-	mes "that I'll ever know.";

-	next;

-	mes "^000000[Benkastein's Journal]";

-	mes "^AD9595Digotz's family is really";

-	mes "rich and they don't want him";

-	mes "to see Maku anymore either.";

-	mes "But Digotz doesn't care.";

-	mes "I know he likes Maku a lot.";

-	next;

-	mes "^000000[Digotz]";

-	mes "Well, we were a lot";

-	mes "younger and closer back";

-	mes "then, so... ^111111*Ahem!*^000000Why did";

-	mes "Benkastein even write that?!";

-	next;

-	mes "[Benkastein's Journal]";

-	mes "^AD9595Today, the three of us";

-	mes "made an oath of brotherhood,";

-	mes "just like we read in the comic";

-	mes "book. We swore we'd always";

-	mes "be friends no matter what.";

-	mes "For always and for always.";

-	next;

-	mes "^000000[Digotz]";

-	mes "I... I was forced to make";

-	mes "that oath! And people do";

-	mes "change, you know! I mean,";

-	mes "we were basically just kids,";

-	mes "it's not like that oath really";

-	mes "means anything now, does it?";

-	next;

-	mes "[Digotz]";

-	mes "That does it. I'm gonna";

-	mes "go see that Maku. I don't";

-	mes "miss him or anything, but";

-	mes "I gotta get him to cancel";

-	mes "that oath. And maybe I'll";

-	mes "beat up him a little bit.";

-	set friendship,8;

-	close;

-

-s_Cont7:

-	mes "[Digotz]";

-	mes "Wh-whoa, I need to";

-	mes "get ready! That Maku's";

-	mes "gonna make fun of me if";

-	mes "I look too rich and pampered.";

-	mes "Damn! Where did I put all of";

-	mes "my fashionable street clothes?";

-	close;

-

-s_Wounded:

-	mes "^3131FFDigotz is seriously";

-	mes "injured from a wound";

-	mes "by a knife that is still";

-	mes "embedded in his belly.^000000";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Digotz...?";

-	mes "Oh no, let me";

-	mes "get you some help!";

-	next;

-	mes "[Digotz]";

-	mes "H-het... It's the";

-	mes "adventurer... Man,";

-	mes "that Maku. He always";

-	mes "did bring me bad luck...";

-	mes "It's too late for me and";

-	mes "I don't have much time...";

-	next;

-	mes "[Digotz]";

-	mes "Those guards I told you";

-	mes "about... The ones who don't";

-	mes "want the poor and the rich to";

-	mes "mingle? I... Guess they found";

-	mes "out I was gonna meet my old";

-	mes "pal. I just wanted to see him...";

-	next;

-	mes "[Digotz]";

-	mes "This guy... In a black";

-	mes "suit... He just... He just";

-	mes "stabbed me! I... God. It's";

-	mes "been so long since I've talked";

-	mes "to him. We'll hang out and have";

-	mes "fun, just like the good old days.";

-	next;

-	mes "[Digotz]";

-	mes "I missed my buddies, but now...";

-	mes "Now I can hear them calling me.";

-	mes "Now we can all be together just";

-	mes "like we all promised. Yeah...";

-	mes "I was wrong. Life's too short";

-	mes "to be angry with your frie--";

-	next;

-	mes "[Digotz]";

-	mes "..............";

-	next;

-	mes "[Digotz]";

-	mes "..............";

-	mes ".......................";

-	next;

-	mes "[Digotz]";

-	mes "..............";

-	mes ".......................";

-	mes "................................";

-	next;

-	mes "^3131FFDigotz stopped breating.";

-	mes "You remove the Knife from";

-	mes "his lifeless body as a final";

-	mes "courtesy to a man who";

-	mes "dearly loved his friends.";

-	next;

-	set friendship,10;

-	getitem 1201,1;

-	close;

-

-s_Dead:

-	mes "^3131FFDigotz has passed";

-	mes "away, but the look on";

-	mes "his face seems very";

-	mes "peaceful and content.";

-	close;

-

-}

-

-lighthalzen.gat,337,232,3	script	Maku	870,{

-

-	if(friendship > 1)goto Switches;

-	mes "[Maku]";

-	mes "Hey, you're on of";

-	mes "those adventurers, eh?";

-	mes "Welcome to the ghetto.";

-	mes "Nothing too adventurous";

-	mes "here, but hey, you can";

-	mes "explore all you want.";

-	next;

-	mes "[Maku]";

-	mes "I don't know if you know";

-	mes "but actually, the people who";

-	mes "live here ain't allowed to";

-	mes "explore this whole city. It's";

-	mes "kind of taboo to talk about,";

-	mes "but what do I care, right?";

-	next;

-	mes "[Maku]";

-	mes "Yeah, basically the rich";

-	mes "people here are too afraid";

-	mes "of the poor people comin' to";

-	mes "see them, so the security in";

-	mes "this city is pretty tight! Those";

-	mes "upper class guys are trash...";

-	next;

-	mes "[Maku]";

-	mes "I didn't use to think";

-	mes "this way. I actually used";

-	mes "to have a pretty rich friend";

-	mes "till I found out he's not all";

-	mes "I thought he was. That";

-	mes "moron! Why's he like that?!";

-	next;

-	mes "[Maku]";

-	mes "Eh, forget about it.";

-	mes "Why am I even talking";

-	mes "about my personal life";

-	mes "to someone I just met";

-	mes "anyway? Sure, we all";

-	mes "do it, but still...";

-	next;

-	mes "[Maku]";

-	mes "Well, when you get";

-	mes "bored of the ghetto,";

-	mes "you really oughta check";

-	mes "out the rich section of town.";

-	mes "I'm bitter, but I'll also admit";

-	mes "it's way nicer than this place.";

-	if(BaseLevel > 29) set friendship,1;

-	close;

-

-

-Switches:

-	switch(friendship)

-	{

-	

-	case 2:

-		mes "[Maku]";

-		mes "Hey, what are you";

-		mes "doing back over here?";

-		mes "I thought I recommended";

-		mes "going over to check out";

-		mes "Uptown Lighthalzen. This";

-		mes "place is pretty run-down...";

-		next;

-		menu "I actually met Digotz and...",-;

-

-		mes "[Maku]";

-		mes "You what...?!";

-		mes "You saw my old pal,";

-		mes "Digotz?! Er, I mean,";

-		mes "Mister Alexander Digotz,";

-		mes "who used to be my buddy,";

-		mes "but obviously not anymore.";

-		next;

-		mes "[Maku]";

-		mes "Sure, we were real close";

-		mes "at one time, but that was";

-		mes "too long ago. It's been a";

-		mes "long time since we hung";

-		mes "out and he probable hates";

-		mes "my penniless guts and...";

-		next;

-		mes "[Maku]";

-		mes "Crud, just listen to";

-		mes "me, I sound like a wuss.";

-		mes "I don't miss Digotz! In fact,";

-		mes "I hate the guy, one hundred";

-		mes "percent! The next time I see";

-		mes "him, I'll beat him to a pulp!";

-		set friendship,3;

-		close;

-	break;

-

-	case 3:

-		mes "[Maku]";

-		mes "Man, I need to blow off some";

-		mes "steam! Sure, me and Digotz";

-		mes "were buds before and maybe";

-		mes "we might seem like friends now,";

-		mes "but not anymore, though we used";

-		mes "to be closer than this. Argh!";

-		next;

-		mes "[Maku]";

-		mes "Don't get me wrong, I don't";

-		mes "miss the guy or anything like";

-		mes "that and I don't feel sorry about";

-		mes "what happened. But if he ever";

-		mes "came to apologize to me, I'd";

-		mes "probably accept, you know.";

-		next;

-		mes "[Maku]";

-		mes "Well, after thinking";

-		mes "about it, of course.";

-		mes "I mean, I'm not the one";

-		mes "holding a grudge. It's all";

-		mes "that guy's fault! Sheeeesh!";

-		close;

-	break;

-

-	case 4:

-		mes "[Maku]";

-		mes "What the hell are you";

-		mes "still doing around here?";

-		mes "You must have better things";

-		mes "to do than talk to a ruffian";

-		mes "like me or that snobby and";

-		mes "totally prickish Digotz.";

-		next;

-		menu "Speaking of which...",-;

-		mes "[" + strcharinfo(0) + "]";

-		mes "Speaking of which...";

-		mes "I spoke to Digotz again.";

-		mes "He told me to give you a";

-		mes "message, but I'm not sure th--";

-		next;

-		mes "[Maku]";

-		mes "That no-good bastard";

-		mes "has a message for me?!";

-		mes "Oh, I'm soooo honored~";

-		mes "Tell me what that fink";

-		mes "has to say, line by line!";

-		next;

-		input @digotzstr$;

-		if(@digotzstr$ != "Hopeless bastard!")goto failstr;

-		mes "[Maku]";

-		mes "\"Hopeless Bastard?!\"";

-		mes "Well, at least he had";

-		mes "the stomach to say that.";

-		mes "Through somebody else";

-		mes "anyway! What else'd he say?!";

-		next;

-		input @digotzstr$;

-		if(@digotzstr$ != "You're still a stubborn jerk!")goto failstr;

-		mes "[Maku]";

-		mes "\"Stubborn Jerk?!\"";

-		mes "Takes no one to know one,";

-		mes "bastard! Why I oughta--";

-		mes "Grrr! What'd he say next?!";

-		next;

-		input @digotzstr$;

-		if(@digotzstr$ != "You owe me at least 3 lunches!")goto failstr;

-		mes "[Maku]";

-		mes "Three lunches?!";

-		mes "I treated that guy to";

-		mes "lunch like, fifteen times!";

-		mes "I tell you, the guy does not";

-		mes "know the meaning of friendship!";

-		mes "What else did that moron say?!";

-		next;

-		input @digotzstr$;	

-		if(@digotzstr$ != "Not to mention an apology!")goto failstr;

-		mes "[Maku]";

-		mes "Me, apologize?!";

-		mes "He should be on his hands";

-		mes "and knees begging for my";

-		mes "frickin' forgiveness! That...";

-		mes "That selfish no-good stupid...";

-		mes "W-what else did he tell you?!";

-		next;

-		input @digotzstr$;

-		if(@digotzstr$ != "But who cares what you think?!")goto failstr;

-		mes "[Maku]";

-		mes "Who cares what I think?!";

-		mes "GRRRAAH~!! Who cares";

-		mes "what he thinks!! ^111111*Pant Pant*^000000";

-		mes "I'm gonna murderlize that";

-		mes "dumb creep! He can't possibly";

-		mes "make me angrier than I am now!";

-		next;

-		input @digotzstr$;

-		if(@digotzstr$ != "I'm so goddamn happy without you!")goto failstr;

-		mes "[Maku]";

-		mes "That's it.";

-		mes "It's decided. The";

-		mes "next time I see Digotz,";

-		mes "I'm gonna plaster his";

-		mes "face all over the floor.";

-		set friendship,5;

-		close;

-	break;

-

-	case 5:

-		mes "[Maku]";

-		mes "RrrrRrrrr.....";

-		mes "RrrrrRRRrrRR.....";

-		mes "GGGGGRRRRR...";

-		next;

-		mes "^3131FFUh oh...";

-		mes "It looks like Maku";

-		mes "is starting to rage";

-		mes "just a bit too much.^000000";

-		next;

-		mes "[Maku]";

-		mes "...";

-		mes "......";

-		mes ".........";

-		next;

-		mes "[Maku]";

-		mes "Gggrrrr...";

-		next;

-		mes "[Maku]";

-		mes "GRAAAAAAAAH~!";

-		mes "Who the hell does he";

-		mes "think he is, telling me";

-		mes "all sorts of crap!? Digotz,";

-		mes "you're not getting away";

-		mes "with this! Gonna wreck you!!";

-		next;

-		set Hp,MaxHp/2;

-		mes "^3131FFMaku's seething quickly";

-		mes "explodes into pure, violent";

-		mes "rage. You manage to calm";

-		mes "him down after a while, but";

-		mes "barely keep yourself from";

-		mes "getting killed in this outburst^000000";

-		next;

-		mes "[Maku]";

-		mes "^111111*Pant pant* *Whew~*^000000";

-		mes "D-don't worry, I've got";

-		mes "a grip on myself now.";

-		mes "Thanks for not letting me";

-		mes "get too crazy. Times like";

-		mes "this, I really miss ^FF0000Benkaistein^000000.";

-		next;

-		mes "[Maku]";

-		mes "Benkastein would always";

-		mes "make sure that I'd stay out";

-		mes "of fights. I really miss that";

-		mes "guy. Still, he ain't around...";

-		next;

-		mes "[Maku]";

-		mes "Damn those guards!";

-		mes "If they weren't there,";

-		mes "I could just go over and";

-		mes "kick Digotz's ass! I swear,";

-		mes "if it weren't for them...!";		

-		set friendship,6;

-		close;

-	break;

-

-	case 6:

-		mes "[Maku]";

-		mes "Arrrrgh! Whenever I hear";

-		mes "about that Digotz, I get so";

-		mes "peeved! Is that guy giving";

-		mes "me the brushoff just because";

-		mes "I'm not a rich guy like he is?!";

-		next;

-		mes "[Maku]";

-		mes "I can't...";

-		mes "I can't even beat him up";

-		mes "all properly because of";

-		mes "all those freakin' guards!";

-		mes "Arrrrrrrgh! Man, where's";

-		mes "Benkastein when I need him?";

-		close;

-	break;

-

-	case 7:

-		mes "[Maku]";

-		mes "Arrrrgh! Whenever I hear";

-		mes "about that Digotz, I get so";

-		mes "peeved! Is that guy giving";

-		mes "me the brushoff just because";

-		mes "I'm not a rich guy like he is?!";

-		next;

-		mes "[Maku]";

-		mes "I can't...";

-		mes "I can't even beat him up";

-		mes "all properly because of";

-		mes "all those freakin' guards!";

-		mes "Arrrrrrrgh! Man, where's";

-		mes "Benkastein when I need him?";

-		close;

-	break;

-

-	case 8:

-		mes "[Maku]";

-		mes "Hey, what is that? You want";

-		mes "me to read this journal?";

-		mes "Er, okay, but I'm none too";

-		mes "comfortable going through";

-		mes "somebody's diary. It's just";

-		mes "kinda... creepy, you know?";

-		next;

-		mes "[Maku]";

-		mes "Hey, this think is";

-		mes "Benkastein's. I haven't";

-		mes "seen that guy in a long while.";

-		mes "Ah, so he gave it to you for me";

-		mes "to read? Alright, I owe him a";

-		mes "favor or two, so I oughta...";

-		next;

-		mes "[Benkastein's Journal]";

-		mes "^AD9595Today, me, Digotz and";

-		mes "Maku played this crazy flying";

-		mes "game. Basically, we make";

-		mes "these wings out of wood and";

-		mes "paper, jump of these hills";

-		mes "and try to fly. Dumb, I know.";

-		next;

-		mes "^000000[Benkastein's Journal]";

-		mes "^AD9595Today it was my turn to";

-		mes "jump and flap my arms with";

-		mes "these fake, badly made wings.";

-		mes "It's not really a fun game when";

-		mes "I think about it. Boy, I hope";

-		mes "we don't do that again.";

-		next;

-		mes "^000000[Maku]";

-		mes "What is he talking about?!";

-		mes "That game was real fun!";

-		mes "Yeah, I usually wore the";

-		mes "wings and Digotz always";

-		mes "wanted to wear them too.";

-		next;

-		mes "[Benkastein's Journal]";

-		mes "^AD9595Maku, Digotz and me went";

-		mes "outside of town. Of course,";

-		mes "we didn't tell anyone or else";

-		mes "we'd get in trouble. It was";

-		mes "a really exciting day. But";

-		mes "then, we ran into a monster!";

-		next;

-		mes "^000000[Benkastein's Journal]";

-		mes "^AD9595I wanted to run away but Maku";

-		mes "and Digotz wanted to beat it so";

-		mes "that we could become heroes.";

-		mes "Of course, we got hurt pretty";

-		mes "bad and the monster got away.";

-		mes "Boy, mom was not happy...";

-		next;

-		mes "^000000[Maku]";

-		mes "That's right! Back then,";

-		mes "the three of us weren't";

-		mes "afraid of anything! Of course,";

-		mes "Digotz got beat up the most.";

-		mes "But I gotta say, he was also";

-		mes "the most fearless of us.";

-		next;

-		mes "[Benkastein's Journal]";

-		mes "^AD9595Digotz's been sick for three";

-		mes "days now. It's just a normal";

-		mes "cold and Maku keeps saying";

-		mes "it's Digotz's fault he got sick.";

-		mes "But he's always asking me to";

-		mes "go visit him and see if he's okay.";

-		next;

-		mes "^000000[Maku]";

-		mes "Wh-what?! No, I wasn't";

-		mes "worried at all! That must";

-		mes "have been the time Digotz";

-		mes "caught Clymonia. You know,";

-		mes "that, uh, horrible disease. No";

-		mes "one should have that one!";

-		next;

-		mes "[Benkastein's Journal]";

-		mes "^AD9595Mom and dad keep telling";

-		mes "me not to hang out with Maku";

-		mes "anymore. Their reason is really";

-		mes "dumb, and I don't care if he is";

-		mes "poor. He's one of the best guys";

-		mes "that I'll ever know.";

-		next;

-		mes "^000000[Benkastein's Journal]";

-		mes "^AD9595Digotz's family is really";

-		mes "rich and they don't want him";

-		mes "to see Maku anymore either.";

-		mes "But Digotz doesn't care.";

-		mes "I know he likes Maku a lot.";

-		next;

-		mes "^000000[Maku]";

-		mes "...";

-		mes "......";

-		next;

-		mes "[Benkastein's Journal]";

-		mes "^AD9595Today, the three of us";

-		mes "made an oath of brotherhood,";

-		mes "just like we read in the comic";

-		mes "book. We swore we'd always";

-		mes "be friends no matter what.";

-		mes "For always and for always.";

-		next;

-		mes "^000000[Maku]";

-		mes "Well, that's true,";

-		mes "I guess, but people";

-		mes "change! Besides, we got";

-		mes "that idea from a comic book!";

-		mes "Well, if he apologizes first,";

-		mes "I guess I better forgive him.";

-		next;

-		mes "[" + strcharinfo(0) + "]";

-		mes "Good...";

-		mes "Because Digotz said";

-		mes "that he'll be coming";

-		mes "by in a few days.";

-		next;

-		mes "[Maku]";

-		mes "What?! He's really coming";

-		mes "here? What for? It's too late";

-		mes "to patch things up! Still, I'd be";

-		mes "a real prick if I didn't see him";

-		mes "Alright, fine! I'll teach that guy";

-		mes "a lesson once he's here!";

-		next;

-		mes "[Maku]";

-		mes "And, um, gimme that";

-		mes "journal! I'm gonna read";

-		mes "more of it so I can make";

-		mes "fun of Digotz. Bwahahaha!";

-		mes "But yeah, um, thanks. Not";

-		mes "that I'm grateful or anything.";

-		next;

-		mes "[Maku]";

-		mes "So, uh, I guess";

-		mes "I'll see you later.";

-		mes "Um, now I gotta get";

-		mes "ready for something.";

-		mes "^111111(But not to see Digotz!)";

-		if(countitem(7351))delitem 7351,1;

-		set friendship,9;

-		close;

-	break;

-

-	case 9:

-		mes "[Maku]";

-		mes "Why is Digotz";

-		mes "so late? This isn't";

-		mes "like him at all. Maybe";

-		mes "something's wrong?";

-		close;

-	break;

-

-	case 10:

-		mes "[Maku]";

-		mes "Why is Digotz";

-		mes "so late? This isn't";

-		mes "like him at all. Maybe";

-		mes "something's wrong?";

-		next;

-		mes "[Maku]";

-		mes "Eh, he might have";

-		mes "some kinda reason for";

-		mes "being late, but if he don't,";

-		mes "i've been saving a whole";

-		mes "six pack of kickass to open,";

-		mes "just for him. Heh heh heh~";

-		close;

-	break;

-

-	case 11:

-		mes "[Maku]";

-		mes "Why is Digotz";

-		mes "so late? This isn't";

-		mes "like him at all. Maybe";

-		mes "something's wrong?";

-		next;

-		mes "[Maku]";

-		mes "Eh, he might have";

-		mes "some kinda reason for";

-		mes "being late, but if he don't,";

-		mes "i've been saving a whole";

-		mes "six pack of kickass to open,";

-		mes "just for him. Heh heh heh~";

-		close;

-	break;

-	}

-

-failstr:

-	mes "[Maku]";

-	mes "Wha...? I dunno if Digotz";

-	mes "would say something like";

-	mes "that. You sure you heard";

-	mes "him carefully enough? It's";

-	mes "been a while, but I know";

-	mes "how Digotz talks, man.";

-	close;

-}

-

-yuno_in04.gat,107,14,4	script	Student	754,{

-

-	mes "[Joey Choryee]";

-	mes "This is a study area where";

-	mes "you're not supposed to speak,";

-	mes "walk or even breathe loudly.";

-	mes "Still, students like Benkastein";

-	mes "can tune out the whole world";

-	mes "when they study hard enough...";

-	if(friendship != 6)close;

-	next;

-	mes "[Joey Choryee]";

-	mes "Benkastein...?";

-	mes "He's in the north part.";

-	mes "of this room. He's a real";

-	mes "nice guy, but a little anal.";

-	mes "Well, he's too organized";

-	mes "and he labels everything!";

-	close;

-

-}

-

-yuno_in04.gat,96,106,4	script	Passionate Student	754,{

-

-	if(friendship == 10)goto s_Ask;

-	if(friendship3 == 2 || friendship3 == 3)goto s_Cont2;

-	if(friendship3 == 1)goto s_Cont;

-	mes "[Passionate Student]";

-	mes "Let's see, now.";

-	mes "Wind Magic, Black Magic,";

-	mes "Porings, ah, there it is";

-	mes "Monster race properties.";

-	mes "Hopefully this contains";

-	mes "the information I need...";

-	next;

-	if(friendship != 6)goto s_Dialog;

-	mes "Upon briefly glancing at";

-	mes "this student's belongings,";

-	mes "you notice that the name";

-	mes "\"Benkastein\" is printed";

-	mes "on them. This is the friend";

-	mes "mentioned by Maku and Digotz!";

-	next;

-	menu "Excuse me...",-;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Excuse me...";

-	mes "Benkastein?";

-	next;

-	mes "[Passionate Student]";

-	mes "...The world of humans";

-	mes "and the world of demons,";

-	mes "yes, yes... No, what I'm";

-	mes "looking for is a reference";

-	mes "to the heavens of Asgard.";

-	mes "Hmm, this here might help...";

-	next;

-	menu "Hey...",-;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Hey...";

-	mes "Over here.";

-	mes "Benkastein!";

-	next;

-	mes "[Passionate Student]";

-	mes "...Oh, now that's a very";

-	mes "interesting observation.";

-	mes "If I can incorporate that";

-	mes "into my thesis without too";

-	mes "much trouble, my standpoint";

-	mes "would look much more solid...";

-	next;

-	menu "HEY YOU...!",-;

-	mes "[" + strcharinfo(0) + "]";

-	mes "HEY YOU...!";

-	mes "BENKASTEIN~!";

-	next;

-	mes "[Passionate Student]";

-	mes "Oh, good heavens!";

-	mes "C-can't you keep";

-	mes "your voice down?";

-	mes "I-I'm trying to study!";

-	mes "No, wait. Have you been";

-	mes "calling me all this time?";

-	set friendship3,1;

-	close;

-

-s_Cont:

-	mes "[Passionate Student]";

-	mes "Oh, you startled me!";

-	mes "Still, I'm aware that it's";

-	mes "hard to get my attention";

-	mes "once I immerse myself";

-	mes "in a book. So, how can";

-	mes "I help you, adventurer?";

-	next;

-	menu "Tell him about Maku and Digotz.",-;

-	mes "[Benkastein]";

-	mes "Oh, how are my friends";

-	mes "doing? Oh, what? They're";

-	mes "having a huge fight just";

-	mes "because one's rich and";

-	mes "the other one's poor?";

-	mes "That's pretty childish!";

-	next;

-	mes "[Benkastein]";

-	mes "But then again, that's just";

-	mes "like them. ^111111*Sigh*^000000 I really want";

-	mes "to go back home and get those";

-	mes "two to make up, but I also need";

-	mes "to finish this thesis. Let's see...";

-	mes "What can I possibly do from here?";

-	next;

-	mes "[Benkastein]";

-	mes "Oh, I know what I can do!";

-	mes "Wait, but where did I put it?";

-	mes "Oh, how cold I lose something";

-	mes "so important? Wait! Would you";

-	mes "please wait a second while";

-	mes "I look for something?";

-	set friendship3,2;

-	close;

-

-s_Cont2:

-	mes "[Benkastein]";

-	mes "Aw nuts, this is";

-	mes "taking much longer";

-	mes "than I had expected.";

-	mes "Now where did I put";

-	mes "that thing? Hmmmm...";

-	if(friendship3 == 3)goto s_Cont3;

-	next;

-	mes "^3131FFPerhaps it would";

-	mes "be best if you help";

-	mes "Benkastein to look for";

-	mes "what he's searching for.";

-	close;

-

-s_Cont3:

-	next;

-	mes "[Benkastein]";

-	mes "Oh, is that it?";

-	mes "Did you find my";

-	mes "journal? Quick, let";

-	mes "me check. Yes, yes...";

-	mes "This is it! Thank you";

-	mes "for finding this for me!";

-	next;

-	mes "[Benkastein]";

-	mes "Would you mind doing";

-	mes "a favor for me? It'd be";

-	mes "better if I talk to them";

-	mes "myself, but I'm too busy";

-	mes "working on this thesis...";

-	next;

-	mes "[Benkastein]";

-	mes "Would you please give this";

-	mes "journal to Digotz and Maku?";

-	mes "I wrote it in when we were";

-	mes "really young, so it should";

-	mes "remind them of all the good";

-	mes "times we used to share.";

-	next;

-	mes "[Benkastein]";

-	mes "Anyway, this should at";

-	mes "least help them realize";

-	mes "how stupid they've been";

-	mes "acting. Thanks in advance,";

-	mes "and please take care of";

-	mes "Maku and Digotz for me.";

-	if(friendship == 6)set friendship,7;

-	close;

-

-s_Dialog:

-	mes "^3131FFThis student seems to";

-	mes "be dilligently conducting";

-	mes "intensive research on some";

-	mes "academic subject. For now,";

-	mes "it would be best to leave him";

-	mes "alone so that he can study.";

-	close;

-

-s_Ask:

-	mes "[Benkastein]";

-	mes "Were you able to bring";

-	mes "my journal to Digotz and";

-	mes "Maku? I'm pretty sure it'd";

-	mes "remind them of all the good";

-	mes "times we had. I know they";

-	mes "sure can be stubborn...";

-	next;

-	mes "[Benkastein]";

-	mes "Anyway, I really";

-	mes "appreciate all your";

-	mes "help. When I go back";

-	mes "home, I look forward to";

-	mes "seeing the two of them again.";

-	next;

-	mes "[Benkastein]";

-	mes "Until then, I need to research,";

-	mes "finish my thesis and accomplish";

-	mes "my academic goals. Oh, please";

-	mes "take this pass which will let you";

-	mes "go back and forth between the";

-	mes "rich and poor areas as my thanks.";

-	next;

-	mes "[Benkastein]";

-	mes "Anyway, I wish you";

-	mes "safety in your travels,";

-	mes "adventurer. When the three";

-	mes "of us get together, I'll be";

-	mes "sure to let you know~";

-	if(BaseLevel < 41)set BaseExp,BaseExp+49500;

-	else if(BaseLevel > 40 && BaseLevel < 61)set BaseExp,BaseExp+99000;

-	else if(BaseLevel > 60 && BaseLevel < 71)set BaseExp,BaseExp+198000;

-	else if(BaseLevel > 70 && BaseLevel < 81)set BaseExp,BaseExp+396000;

-	else if(BaseLevel > 80 && BaseLevel < 91)set BaseExp,BaseExp+594000;

-	else if(BaseLevel > 90)set BaseExp,BaseExp+792000;

-	getitem 7350,1;

-	set friendship,11;

-	set friendship3,0;

-	close;

-

-}

-

-yuno_in04.gat,168,117,1	script	Book	111,{

-

-	if(friendship3 >= 3)goto Book2;

-	if(friendship3 == 2)goto Book;

-	mes "^3131FFThis book is labeled,";

-	mes "\"Benkastein's Journal";

-	mes "Vol. 6.\".";

-	close;

-Book:

-	mes "^3131FFThis book is labeled,";

-	mes "\"Benkastein's Journal";

-	mes "Vol. 6.\". This is probably";

-	mes "what Benkastein was trying";

-	mes "to find, so it might be best to";

-	mes "bring this and show it to him";

-	set friendship3,3;

-	getitem 7351,1;

-	close;

-Book2:

-	mes "^3131FFThis is where you found";

-	mes "the book that Benkastein";

-	mes "was looking for.";

-	close;

-

-}

-

-yuno_in04.gat,169,109,1	script	Ambitious Hollgrehenn	111,{

-

-	mes "*Hollgrehenn: The Ambition*";

-	mes "By Aragham Caul*";

-	mes "";

-	mes "";

-	mes "";

-	mes "";

-	mes "Publisher:";

-	mes "Muha Books, Co.";

-	next;

-	mes "...";

-	mes "He would stop at nothing";

-	mes "to have the greatest weapon";

-	mes "in the world in his possession.";

-	mes "He became a smith so that he";

-	mes "could discern which weapons";

-	mes "were the most powerful...";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "That's strange...";

-	mes "The next page";

-	mes "has been torn out.";

-	close;

-

-}

-

-yuno_in04.gat,171,117,1	script	List of Books	111,{

-

-	mes "^3131FFYou find a series";

-	mes "of paperback books";

-	mes "with titles, printed";

-	mes "on the binding in an";

-	mes "elegantly decorative";

-	mes "cursive style font.";

-	mes "The titles include...";

-	next;

-	mes "*Volcanic Passion*";

-	mes "*Midnight Crescendo*";

-	mes "*A Paris Affair*";

-	mes "*Fever Pitch*";

-	mes "*The Cowyboy Next Door*";

-	mes "*Platonic Romance*";

-	mes "*How Lara Got Her Groove Back*";

-	next;

-	mes "^000000[" + strcharinfo(0) + "]";

-	mes "What the...?!";

-	mes "This place even has";

-	mes "a romance novel section?";

-	close;

-

+//===== eAthena Script ======================================= 
+//= Quest NPCs located in Lighthalzen
+//===== By: ================================================== 
+//= Persian, Vicious_Pucca, aoa00, Evera, MasterOfMupppets,
+//= Lupus, Lord Gywall
+//===== Current Version: ===================================== 
+//= 2.9
+//===== Compatible With: ===================================== 
+//= eAthena SVN
+//===== Description: ========================================= 
+//= Event for the Mobster respawn
+//= Bio Labs Quest
+//= Friendship Quest
+//= Pickpocket Mini-Quest
+//= Bio Ethics Quest (Need bug testing!)
+//===== Additional Comments: ================================= 
+//= Grammar/script check please. This was a quick job.
+//= Things to add: Look at the thread "Lighthalzen Guard" in SVN script
+//= 0.3 Initial Release
+//= 0.5 Added mobsters spawn and Einbroch pollution. Alert lasts either 10 minutes or all mob killed.
+//= 0.6-0.9 fix small bug. Added Bio-lab entrance Quest. Added Getting security-card Quest.
+//= 1.0 Patched "mobsters spawn & Alert" like Real-RO.
+//= 1.0a fixed rand(1,10) + comparision. There just can't be 'X < 1' [Lupus]
+//= 1.1 Changed the mobster spawn to g_mobster to prevent exploits [MasterOfMuppets]
+//= 1.2 Added the cube room quest by DeNy, translated by vicious_pucca. [MasterOfMuppets]
+//=	Thanks to Linuxwolf for a grammar check as well =).
+//= 1.2a Moved Biolab entrance to lhz_dun warps. [Vicious]
+//= 1.3 Fixed password bug, fixed endless item exploit, some typos [Lupus]
+//= 1.4 Fixed password abuse. When people don't read the password under the picture
+//= 	and enter Zero shit 8) (TODO: I saw some "Sticks" abuses, too.. where you could skip a part of quest...)
+//= 1.5 Fixed Mobster's OnDead event(it has to start with "On"!) [Playtester]
+//= 1.5a Fixed "free stick" bug, thx 2 Neouni [Lupus]
+//= 1.6 Added Gywall's Pickpocket Quest
+//= 1.7 Implemented the Friendship quest [MasterOfMuppets]
+//= 1.8 Changed the name of the mobsters to Gangster, as it should be. [MasterOfMuppets]
+//= 1.9 Added extra input check on Biolab so that the first letter of the word could be capitalized or undercase. [Evera]
+//= 2.0 Removed Duplicates [Silent]
+//= 2.1 Added first part of Bio Ethics Quest [Evera]
+//= 2.2 Added bit to say Bio Ethics is unfinished, and if a player attempts, it warps them
+//= 	out after finished part... Don't want players getting stuck ;_; [Evera]
+//= 2.3 Finished Bio Ethics Quest. Need bug testers before moving to trunk, my
+//=	mind was somewhere else when writing @_@ [Evera]
+//= 2.4	Fixed the bug where a str&int debug was shown in the console for
+//=	test tube in bio labs quest. [Evera]
+//= 2.5	Fixed Kellasus giving you extra skills in Bio Ethics quest [Evera]
+//= 2.6	Fixed exploit letting any class get homunculus from Bio Ethics Quest [Evera]
+//= 2.6a Moved Bio Ethics Quest to Alchemist SKILL QUESTS [Lupus]
+//= 2.7 fixed bugs that let people bypass some quest parts V_V [Lupus]
+//=	reused cubekey var for 4 Cube Room key vars
+//= 2.8 More optimization. Also fixed bug with "2x short sticks -> long" [Lupus]
+//=	Now uses MISC_QUEST&512 instead of 'hzdun'. WIP
+//= 2.9 Fixed Friendship Quest levelup exploit (u could get EXP twice) [Lupus]
+//============================================================ 
+
+lighthalzen.gat,1,1,7	script	sneakAddSuber	-1,{
+OnInit:
+	set $@sneakchance, 3;	// chance of successful sneak(0 = never, 10 = always)
+	set $@sneakguard, 0;	// numbers of people who sneaked past guard
+	set $@threshold, 10;	// numbers of sneakers before mob appears
+	set $@mob, 50;		// Max respawn numbers of "mobsters"
+	set $@mobcount, 0;	// current numbers of "mobsters"
+	set $@lhz_alert, 0;	// Alert on Lighthalzen(0 = off, 1 = on)
+	set $@i, 0;
+	
+	end;
+
+OnMinute00:
+OnMinute05:
+OnMinute10:
+OnMinute15:
+OnMinute20:
+OnMinute25:
+OnMinute30:
+OnMinute35:
+OnMinute40:
+OnMinute45:
+OnMinute50:
+OnMinute55:
+	if($@lhz_alert == 0) set $@sneakguard, $@sneakguard + rand(1,3);
+	if($@lhz_alert == 1) set $@sneakguard, $@sneakguard - 1;  // Monsters will die after 5~10 min. (sneakAddSuber)
+	end;
+}
+
+lighthalzen.gat,1,1,7	script	AlertChk	-1,{
+OnInit:
+	initnpctimer;
+	end;
+
+OnTimer10000:
+	if($@sneakguard >= $@threshold) goto MakeMob;
+	if($@sneakguard == 0) goto ClearMob;  // Monsters will die after 5~10 min. (sneakAddSuber)
+	setnpctimer 0;
+	end;
+	
+MakeMob:
+	if($@lhz_alert == 1) goto ChkEnd;
+	set $@mobcount, $@mob;
+	mapannounce "lighthalzen.gat","Maintenance Organization of the Public Order: Currently the security of the city has been compromized, We ask the citizens to be more careful. I repeat. We ask the citizens to be more careful.", 1;
+	
+	for( set $@i, 0; $@i < $@mob; set $@i, $@i + 1 ) {
+		monster "lighthalzen.gat",0,0,"Gangster",1592,1,"AlertChk::OnMobKilled";
+	}
+
+	set $@lhz_alert, 1;	
+	set $@sneakguard, 2;   // Monsters will die after 5~10 min. (sneakAddSuber)
+	setnpctimer 0;
+	end;
+	
+ClearMob:
+	if($@lhz_alert == 0) goto ChkEnd;
+	set $@mobcount, 0;
+	mapannounce "lighthalzen.gat","Maintenance organization of the Public Order: We were able to get rid of all the trouble makers in the city. You may relax now.", 1;	
+	killmonster "lighthalzen.gat","AlertChk::OnMobKilled";
+	set $@lhz_alert, 0;
+	set $@sneakguard, 0;
+	setnpctimer 0;
+	end;
+		
+OnMobKilled:
+	set $@mobcount, $@mobcount - 1;
+	if($@mobcount == 0) goto ClearMob;
+	setnpctimer 0;
+	end;	
+	
+ChkEnd:	
+	setnpctimer 0;
+	end;	
+}
+
+lighthalzen.gat,267,200,3	script	Security Guard#01	868,{
+
+	if(countitem(7350)>0) goto Lhzpass1;
+	if($@lhz_alert == 1) goto Lhzstop;
+	if((gettime(2)>00 && gettime(2)<10)) goto LhzTalk2;
+	if((gettime(2)>30 && gettime(2)<40)) goto LhzTalk2;
+	set @LhzTalk,rand(1,10);
+	if(@LhzTalk  < 2 ) goto LhzTalk1;
+
+LhzTalk:
+	mes "[Guard]";
+	mes "Hey! Where do you think you are going?";
+	mes "I can not send nobody to the slum district!";
+	mes "If we let suspecious people like you pass,";
+	mes "there is no point in peace keeping!";
+	close;
+
+LhzTalk1:
+	mes "-Looks like the guard is doing something else";
+	mes "Now is a good time to sneak by.-";
+	next;
+	warp "lighthalzen.gat",297,227;
+	set $@sneakguard, $@sneakguard + 1;
+	close;
+
+LhzTalk2:
+	set @LhzTalk,rand(1,10);
+	if(@LhzTalk  < 2 ) goto LhzTalk;
+	mes "[Guard]";
+	mes "zzZ... zzZ... zzZ...";
+	mes "hmm. hmm... zzZ...";
+	next;
+	mes "-Looks like the guard is sleeping";
+	mes "Now is a good time to sneak by.-";
+	next;
+	warp "lighthalzen.gat",297,227;
+	close;
+
+Lhzpass1:
+	mes "[Guard]";
+	mes "Who are you! ...Hmm? You have a pass?";
+	mes "I'm sorry. You look like an adventurer,";
+	mes "but I guess you got the authority.";
+	mes "You may pass.";
+	next; 
+	warp "lighthalzen.gat",297,227;
+	close;
+
+Lhzstop:
+	mes "[Guard]";
+	mes "Recently, there were too many people sneaking pass us,";
+	mes "so we raised the security level.";
+	mes "Who sneak past us anyway?";
+	mes "It's troublesome...";
+	close;
+}
+
+lighthalzen.gat,294,223,7	script	Security Guard#02	868,{
+
+	if(countitem(7350)>0) goto Lhzpass1;
+	if($@lhz_alert == 1) goto Lhzstop;
+	if((gettime(2)>00 && gettime(2)<10)) goto LhzTalk2;
+	if((gettime(2)>30 && gettime(2)<40)) goto LhzTalk2;
+	set @LhzTalk,rand(1,10);
+	if(@LhzTalk  < 2 ) goto LhzTalk1;
+
+LhzTalk:
+	mes "[Guard]";
+	mes "Hey! Where do you think you are going?";
+	mes "I can not send nobody to the slum district!";
+	mes "If we let suspecious people like you pass,";
+	mes "there is no point in peace keeping!";
+	close;
+
+LhzTalk1:
+	mes "-Looks like the guard is doing something else";
+	mes "Now is a good time to sneak by.-";
+	next;
+	warp "lighthalzen.gat",264,200;
+	set $@sneakguard, $@sneakguard + 1;
+	close;
+
+LhzTalk2:
+	set @LhzTalk,rand(1,10);
+	if(@LhzTalk  < 2 ) goto LhzTalk;
+	mes "[Guard]";
+	mes "zzZ... zzZ... zzZ...";
+	mes "hmm. hmm... zzZ...";
+	next;
+	mes "-Looks like the guard is sleeping";
+	mes "Now is a good time to sneak by.-";
+	next;
+	warp "lighthalzen.gat",264,200;
+	close;
+
+Lhzpass1:
+	mes "[Guard]";
+	mes "Who are you! ...Hmm? You have a pass?";
+	mes "I'm sorry. You look like an adventurer,";
+	mes "but I guess you got the authority.";
+	mes "You may pass.";
+	next; 
+	warp "lighthalzen.gat",264,200;
+	close;
+
+Lhzstop:
+	mes "[Guard]";
+	mes "Recently, there were too many people sneaking pass us,";
+	mes "so we raised the security level.";
+	mes "Who sneak past us anyway?";
+	mes "It's troublesome...";
+	close;
+}
+
+//============================================================
+// Cube Room
+//============================================================
+
+//--------------------------Piciburn--------------------------
+
+lighthalzen.gat,341,224,4	script	Piciburn	868,{
+	if (BaseLevel < 60){
+		mes "[Piciburn]";
+		mes "Keep moving.";
+		close;
+	}
+	if (MISC_QUEST&512) goto L_DONE;
+	if (piciburn == 7) goto L_10;
+	if (piciburn == 6) goto L_9;
+	if (piciburn == 5) goto L_6;
+	if (piciburn == 4) goto L_4;
+	if (piciburn == 3) goto L_3;
+	if (piciburn == 2) goto L_2;
+	if (piciburn == 1) goto L_1;
+	mes "[Piciburn]";
+	mes "Hmm...? What is it?";
+	mes "I am busy at the moment,";
+	mes "so stop bothering me.";
+	set piciburn,1;
+	close;
+
+L_1:
+	mes "[Piciburn]";
+	mes "I'm getting distracted because";
+	mes "You keep staring at me!";
+	mes "Would you please leave me alone?";
+	set piciburn,piciburn+1;
+	close;
+
+L_2:
+	mes "[Piciburn]";
+	mes "Hmm...? Oh, it's you..";
+	mes "You are really getting on my nerves.";
+	mes "You're weird, you know that?";
+	mes "What is it that you want from me?";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "Nothing really...";
+	mes "Just looking around...";
+	mes "What are you doing?";
+	next;
+	mes "[Piciburn]";
+	mes "Oh, man...";
+	mes "If I just needed to show you this,";
+	mes "I wouldn't have got all worked up.";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "I know. Haha.";
+	next;
+	mes "[Piciburn]";
+	mes "You really ARE a weird person...";
+	mes "Are you just going to stand there";
+	mes "and keep watching?";
+	next;
+	mes "[Piciburn]";
+	mes "... You're really annoying me!";
+	mes "What do you want from me?!";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "I've aready told you.";
+	mes "I asked what you were doing.";
+	mes "This place is hot and sticky.";
+	next;
+	mes "[Piciburn]";
+	mes "Okay, okay..";
+	mes "I'll tell you what i'm doing,";
+	mes "but would you leave me in peace";
+	mes "if i did? Thanks.";
+	next;
+	mes "[Piciburn]";
+	mes "I'm.. um... doing something illegal...";
+	mes "Don't tell anyone about this!";
+	next;
+	mes "[Piciburn]";
+	mes "I am the only person who can make a route to";
+	mes "the industrial city's -^FF0000Laboratory^000000- or";
+	mes "places normal people wouldn't usually be able to get to.";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "The -Laboratory?!!!-";
+	mes "Can you really get people in there?!!!";
+	next;
+	mes "[Piciburn]";
+	mes "Agh! Quieten down! What did i tell you?";
+	mes "I've told you what i do, now will you stop staring at me?";
+	mes "And be quiet~!";
+	mes "You're weird.. ¬_¬";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "Ah..Haha.. I'm sorry.";
+	mes "I really want to go there,";
+	mes "so I got excited when I heard you can get people in there";
+	next;
+	mes "[Piciburn]";
+	mes "Hmm? You were planning to get in there?";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "Yeah, but i couldn't get in..";
+	next;
+	mes "[Piciburn]";
+	mes "Hmm...";
+	mes "This is troublesome...";
+	mes "I don't usually tell people i cannot";
+	mes "trust how to get into the Laboratory...";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "What do I need to do?";
+	mes "How can I get into the laboratory?";
+	next;
+	mes "[Piciburn]";
+	mes "Geez~, I'm just giving people a route, not sending them there.";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "Doesn't that mean the same thing?";
+	next;
+	mes "[Piciburn]";
+	mes "What I'm saying is,";
+	mes "I'm giving people the chance to get into the labs.";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "You're really talented, huh.";
+	next;
+	mes "[Piciburn]";
+	mes "Hahaha! Damn right.";
+	mes "It's a piece of cake!";
+	mes "...";
+	mes "Actually, now i think about it, it's impossible..";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "How's it impossible?";
+	mes "I haven't say anything yet~..";
+	next;
+	mes "[Piciburn]";
+	mes "Oh come on, you were going to BEG me to send you there~!!!";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "Heh...";
+	mes "You really ARE clever.";
+	mes "Well...";
+	mes "Pretty please~~?";
+	next;
+	mes "[Piciburn]";
+	mes "I can never let you in~..";
+	mes "Never ever~!!!";
+	set piciburn,piciburn+1;
+	close;
+
+L_3:
+	mes "[" +strcharinfo(0) + "]";
+	mes "Please?";
+	next;
+	mes "[Piciburn]";
+	mes "No way.";
+	set piciburn,piciburn+1;
+	close;
+
+L_4:
+	mes "[" +strcharinfo(0) + "]";
+	mes "Pleaseeeee?";
+	next;
+	mes "[Piciburn]";
+	mes "No.";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "Pleaseeeeeeeeeee?";
+	next;
+	mes "[Piciburn]";
+	mes "I don't want to.";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "Do it!!!";
+	next;
+	mes "[Piciburn]";
+	mes "Never~!!!";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "Why are you doing this to me?!!";
+	mes "What do you want from me !?!";
+	next;
+	mes "[Piciburn]";
+	mes "What do I want?";
+	mes "Heh heh.. One billion zeny.";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "Are you crazy?!";
+	next;
+	mes "[Piciburn]";
+	mes "It's your choice.";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "Sir, you know I don't have that much money.";
+	mes "Is there anything else you need?";
+	next;
+	mes "[Piciburn]";
+	mes "Hmm...";
+	mes "Okay fine...";
+	mes "Bring me 20 Jellopies.";
+	mes "'Kay?";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "........";
+	mes "So that's what you really wanted to ask me?";
+	next;
+	mes "[Piciburn]";
+	mes "Hahaha...";
+	mes "Yeah~~...";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "........";
+	next;
+	mes "[Piciburn]";
+	mes "So, what're you doing just standing there?";
+	mes "Are you going to do it or not?";
+	next;
+	menu "Definitely!",L_5,"No way! It's impossible!",-;
+
+	mes "[Piciburn]";
+	mes "Ah well, your loss,";
+	mes "Too bad!";
+	mes "Bye now~!!";
+	close;
+
+L_5:
+	mes "[Piciburn]";
+	mes "Okay then, do as I said,";
+	mes "bring me 20 jellopies!";
+	mes "....";
+	mes "What're you waiting for?! GO!!";
+	set piciburn,piciburn+1;
+	close;
+
+L_6:
+	mes "[Piciburn]";
+	mes "Did you get the items?";
+	next;
+	menu "Erm.. No..",-,"Hell yeah!",L_7,"What did you want again..?",L7_1;
+
+	mes "[Piciburn]";
+	mes "Hey, I don't feel like playing around anymore.";
+	mes "If you really want to get there, bring the damn items!";
+	close;
+
+L_7:
+	if (countitem(909) >= 20) goto L_8;
+	mes "[Piciburn]";
+	mes "Are you joking?";
+	mes "If you keep doing this,";
+	mes "I may not keep the promise either.";
+	mes "So go and get them already!";
+	close;
+
+L7_1:
+	mes "[Piciburn]";
+	mes "You're really stupid~!";
+	mes "It's 20 jellopies!";
+	mes "Don't forget this time~";
+	close;
+
+L_8:
+	delitem 909,20;
+	mes "[Piciburn]";
+	mes "Hmm. You're more reliable than i thought.";
+	mes "Taking this errand into consideration,";
+	mes "i guess you really want to get in there?";
+	next;
+	mes "[Piciburn]";
+	mes "Coming to think of it,";
+	mes "you look different.";
+	mes "Should I say you look more... trustworthy..?";
+	next;
+	mes "[Piciburn]";
+	mes "Well... Anyway...";
+	mes "A promise is a promise.";
+	mes "I will tell you how to get there.";
+	next;
+	mes "[Piciburn]";
+	mes "As I told you earlier, all I can do is";
+	mes "give you the opportunity to get in.";
+	next;
+	mes "[Piciburn]";
+	mes "I used to be a manager working for the lab,";
+	mes "but time moves on, as people do,";
+	mes "and now I am working against the lab.";
+	next;
+	mes "[Piciburn]";
+	mes "Now... Answer honestly on all I ask here on out.";
+	mes "Where i send you all depends on how you answer.";
+	next;
+	mes "[Piciburn]";
+	mes "Somewhere in the place I'm going to send you";
+	mes "There will be things you must find,";
+	mes "So search well.";
+	next;
+	mes "[Piciburn]";
+	mes "Well, when you've made your mind up,";
+	mes "come back and talk to me. Okay?";
+	set piciburn,piciburn+1;
+	close;
+
+L_9:
+	mes "[Piciburn]";
+	mes "Hmm... So...";
+	mes "Are you ready to go?";
+	next;
+	menu "No",-,"Yes",L9_1;
+
+	mes "[Piciburn]";
+	mes "Hmm... Not yet, huh...";
+	mes "Well, I guess it is to be expected.";
+	mes "But don't make me wait too long~!";
+	close;
+
+L9_1:
+	mes "[Piciburn]";
+	mes "This is going to be hard~";
+	mes "Let's go!!!";
+	close2;
+	set piciburn,piciburn+1;
+	set @rdm,rand(3);
+	if(@rdm==1)goto L_warp1;
+	if(@rdm==2)goto L_warp2;
+ 	warp "lhz_cube.gat",67,193;
+	end;
+
+L_10:
+	mes "[Piciburn]";
+	mes "Hah!";
+	mes "You failed in there, right? Hahahaha~.";
+	mes "Are you going to try again? Or is it too tough~";
+	next;
+	menu "No",-,"Yes",L10_1;
+
+	mes "[Piciburn]";
+	mes "It was that hard huh?";
+	mes "Well, come back if you change your mind.";
+	close;
+
+L10_1:
+	mes "[Piciburn]";
+	mes "Okay..";
+	mes "I will send you there again..";
+	mes "Good luck!";
+	close2;
+	set @rdm,rand(3);
+	if(@rdm==1)goto L_warp1;
+	if(@rdm==2)goto L_warp2;
+ 	warp "lhz_cube.gat",67,193;
+	end;
+
+L_warp1: 
+	warp "lhz_cube.gat",66,136;
+	end;
+L_warp2:
+	warp "lhz_cube.gat",66,74;
+	end;
+
+L_DONE:
+	mes "[Piciburn]";
+	mes "Oh~ I guess you found the entrance.";
+	mes "I'll tell you now...";
+	mes "If you want to go in there again";
+	next;
+	mes "[Piciburn]";
+	mes "You can get there by a sewer passage a bit south of the town.";
+	next;
+	mes "[" +strcharinfo(0) + "]";
+	mes "No wayyyyy!!";
+	next;
+	mes "[Piciburn]";
+	mes "I know. I know...";
+	mes "It is dirty.";
+	mes "But it's only way in, so don't complain!";
+	next;
+	mes "[Piciburn]";
+	mes "Now, take care of yourself~.";
+	close;
+}
+
+//--------------------------Box--------------------------
+
+lhz_cube.gat,248,179,0	script	Box#01	111,{
+	if (MISC_QUEST&512 || cubekey&64) goto L_DONE;
+	mes "There is an axe in the box.";
+	next;
+	menu "Take the axe.",L_1,"Leave it alone.",-;
+	close;
+
+L_1:
+	mes "You acquired the ^FF0000axe^000000.";
+	set cubekey,cubekey|64;
+	close;
+
+L_DONE:
+	mes "There is a box that used to contain an ^FF0000axe^000000.";
+	close;
+}
+
+//--------------------------Barrel--------------------------
+
+lhz_cube.gat,237,183,0	script	Barrel	111,{
+	if (MISC_QUEST&512 || cubekey&1) goto L_DONE;
+	if (cubekey&128) goto L_2;
+	mes "There is a box that looks weak.";
+	if ((cubekey&64) == 0) close;
+	next;
+	input @axe$;
+
+	if (@axe$ == "axe" || @axe$ == "Axe") goto L_1;
+	mes "There is no change.";
+	close;
+
+L_1:
+	mes "When you break the barrel with an axe,";
+	mes "you see that there's a box inside of it.";
+	next;
+	mes "On top of the box, there's a panel with the numbers 1~9";
+	set cubekey,cubekey|128;
+	close;
+
+L_2:
+	mes "There is a box with numbers 1~9 on it's surface.";
+	next;
+	set @agree,0;
+	input @number;
+	if (num6 == @number) set @agree,@agree+1;
+	input @number;
+	if (num8 == @number) set @agree,@agree+1;
+	input @number;
+	if (num1 == @number) set @agree,@agree+1;
+	input @number;
+	if (num4 == @number) set @agree,@agree+1;
+	input @number;
+	if (num9 == @number) set @agree,@agree+1;
+	input @number;
+	if (num2 == @number) set @agree,@agree+1;
+	input @number;
+	if (num7 == @number) set @agree,@agree+1;
+	input @number;
+	if (num5 == @number) set @agree,@agree+1;
+	input @number;
+	if (num3 == @number) set @agree,@agree+1;
+	if (@agree == 9 && num1) goto L_3; //you can't enter correct numbers, till read them under that picture [Lupus]
+	mes "There is no change.";
+	close;
+
+L_3:
+	mes "The box opened, making a metallic click.";
+	mes "Within the box, there is 'yellow key'.";
+	next;
+	mes "You acquired '^FF0000yellow key^000000'.";
+	set cubekey,cubekey|1;
+	close;
+
+L_DONE:
+	mes "This box used to have the '^FF0000yellow key^000000'";
+	mes "The box is now empty.";
+	close;
+}
+
+//--------------------------Drawer--------------------------
+
+lhz_cube.gat,242,201,0	script	Drawer	111,{
+	if (MISC_QUEST&512 || cubekey&32) goto L_DONE;
+	mes "The drawer is locked.";
+	if (cubekey&2) goto L_1;
+	close;
+
+L_1:
+	input @key$;
+	if (@key$ == "red key" || @key$ == "Red Key") goto L_2;
+	mes "The drawer is locked, you need some kind of key.";
+	close;
+
+L_2:
+	mes "The red key fits the lock perfectly,opening the drawer.";
+	mes "You found a 'small knife' inside.";
+	next;
+	mes "You acquired ^FF0000small knife^000000.";
+	set cubekey,cubekey|32;
+	close;
+
+L_DONE:
+	mes "It is the drawer you got ^FF0000small knife^000000 from.";
+	mes "There is nothing inside now.";
+	close;
+}
+
+//--------------------------Documents--------------------------
+
+lhz_cube.gat,237,198,0	script	Documents	111,{
+	if (MISC_QUEST&512 || cubekey&2) goto L_DONE;
+	mes "There are tons of documents here.";
+	next;
+	menu "Search the documents.",L_1,"Ignore.",-;
+	close;
+
+L_1:
+	mes "As you look through the documents, a 'red key' falls out.";
+	next;
+	mes "You acquired ^FF0000red key^000000.";
+	set cubekey,cubekey|2;
+	close;
+
+L_DONE:
+	mes "This is where you acquired ^FF0000red key^000000.";
+	mes "There's nothing else to do here.";
+	close;
+}
+
+//--------------------------Bed--------------------------
+
+lhz_cube.gat,247,198,0	script	Bed	111,{
+	mes "There is a messy bed.";
+	next;
+	menu "Above bed",-,"Below bed",L_1;
+
+	mes "The blanket is messily placed.";
+	mes "There is nothing special here.";
+	close;
+
+L_1:
+	if (MISC_QUEST&512 || cubekey&131072) goto L_DONE;
+	if (cubekey&2048){
+		mes "As you look under the bed, you see that there";
+		mes "is a small object covered in dust.";
+		next;
+		input @bed$;
+
+		if (cubekey&4096 && (@bed$ == "long stick" || @bed$ == "Long Stick")){
+			mes "You used the long stick to pull it out.";
+			next;
+			mes "You acquired '^FF0000cube model^000000'.";
+			set cubekey,cubekey|131072;
+			close;
+		}
+		mes "It looks like you need some kind of long item to";
+		mes "Get the item out, you can't reach it!";
+		close;
+	}
+	mes "You look below the bed and see a 'small stick'.";
+	mes "It is within your grasp, but there is";
+	mes "also another item hidden under the bed, which";
+	mes "you'll need some kind of long item to pull it out.";
+	next;
+	mes "You acquired the '^FF0000small stick^000000'.";
+	mes "It looks like this stick could be combined";
+	mes "with another stick to make it larger.";
+	set cubekey,cubekey|2048;
+
+	if ((cubekey&4096) == 0 && cubekey&1024){
+		set cubekey,cubekey|4096;
+		next;
+		mes "It looks similar to the decently sized stick that you";
+		mes "found under the desk.";
+		mes "You put the two end to end, and they click into place.";
+		next;
+		mes "You acquired '^FF0000long stick^000000'.";
+	}
+	close;
+
+L_DONE:
+	mes "This is the place where you got '^FF0000cube model^000000' from.";
+	mes "There is nothing down here now but dust.";
+	close;
+}
+
+//--------------------------Cup--------------------------
+
+lhz_cube.gat,229,184,0	script	Cup	111,{
+	if (MISC_QUEST&512 || cubekey&4) goto L_DONE;
+	mes "You see an empty bottle and a cup with something in it.";
+	next;
+	menu "Leave it alone.",-,"Look what is inside.",L_1;
+	close;
+
+L_1:
+	mes "When you look inside, you see a 'rusty key'.";
+	next;
+	mes "You acquired the '^FF0000rusty key^000000'.";
+	set cubekey,cubekey|4;
+	close;
+
+L_DONE:
+	mes "You got the '^FF0000rusty key^000000' here.";
+	mes "There's nothing but an empty cup and an empty bottle.";
+	close;
+}
+
+//--------------------------Shelf--------------------------
+
+lhz_cube.gat,233,206,0	script	Shelf	111,{
+	if (MISC_QUEST&512 || cubekey&8) goto L_DONE;
+	mes "There are lots of bottles filled with acids lined up";
+	mes "Along the shelf, they have different labels.";
+	next;
+	input @lathe$;
+
+	if (cubekey&4 && (@lathe$ == "rusty key" || @lathe$ == "Rusty Key")) goto L_1;
+	mes "Nothing happened.";
+	close;
+
+L_1:
+	mes "As you put the 'rusty key' into a bottle, it fizzes";
+	mes "and bubbles, and all the liquid disappears.";
+	mes "All that's left is a clean, green key.";
+	next;
+	mes "You acquired the '^FF0000green key^000000'";
+	set cubekey,cubekey|8;
+	close;
+
+L_DONE:
+	mes "There is an acid that changed corroded all the rust";
+	mes "off of your key.";
+	next;
+	mes "I don't see anything useful.";
+	close;
+}
+
+//--------------------------Closet--------------------------
+
+lhz_cube.gat,249,191,0	script	Closet	111,{
+	if (MISC_QUEST&512 || cubekey&8192) goto L_DONE;
+	mes "There is a closet with lots of drawers.";
+	if (cubekey&8) goto L_2;
+	next;
+	menu "Leave it alone.",-,"Open one of the drawers.",L_1;
+	close;
+
+L_1:
+	mes "There's nothing of any interest in this drawer.";
+	close;
+
+L_2:
+	next;
+	input @gkey$;
+
+	if (@gkey$ == "green key" || @gkey$ == "Green Key") goto L_3;
+	mes "There's nothing of any interest in this drawer.";
+	close;
+
+L_3:
+	mes "You put the 'green key' into a keyhole,";
+	mes "opening one of the locked drawers.";
+	mes "In the drawer, there is a model of";
+	mes "a polygon.";
+	next;
+	mes "'You acquired the ^FF0000polygon model^000000.";
+	set cubekey,cubekey|8192;
+	close;
+
+L_DONE:
+	mes "This is the closet where you got";
+	mes "the 'polygon model' from.";
+	next;
+	mes "The other draws will not open, there's";
+	mes "nothing else to do here.";
+	close;
+}
+
+//--------------------------Desk--------------------------
+
+lhz_cube.gat,234,200,0	script	Desk	111,{
+	mes "There is a desk with lots of objects scattered around.";
+	next;
+	menu "Above the desk",-,"Below the desk",L_1,"Drawer",L_2;
+
+	mes "There are lots of books, papers and";
+	mes "research equipment.";
+	close;
+
+L_1:
+	if(MISC_QUEST&512 || cubekey&1024) goto L_DONE;
+
+	mes "When you look below the desk,";
+	mes "You see a decent sized stick.";
+	next;
+	mes "You acquired '^FF0000short stick^000000'.";
+	mes "It looks like this stick could be combined";
+	mes "with another stick to make it larger.";
+	set cubekey,cubekey|1024;
+	if(cubekey&2048){
+		set cubekey,cubekey|4096;
+		next;
+		mes "It seems like the decently sized stick can be";
+		mes "combined with the 'short stick' from under the bed.";
+		mes "You put the two end to end, and they click into place.";
+		next;
+		mes "You acquired the '^FF0000long stick^000000'";
+	}
+	close;
+L_DONE:
+	mes "This is where you acquired the '^FF0000short stick^000000'.";
+	mes "There is nothing but dust now.";
+	close;
+L_2:
+	mes "It is locked and can't be opened.";
+	close;
+}
+
+//--------------------------Picture--------------------------
+
+lhz_cube.gat,237,206,0	script	Picture	111,{
+	if (MISC_QUEST&512 || num1 > 0) goto L_DONE;
+	mes "There is a picture on the wall.";
+	next;
+	menu "Move it.",L_1,"Leave it alone.",-;
+	close;
+
+L_1:
+	mes "It does not move.";
+	next;
+	input @knife$;
+
+	if (cubekey&32 && (@knife$ == "small knife" || @knife$ == "Small Knife")) goto L1_1;
+	mes "Nothing happened.";
+	close;
+
+L1_1:
+	mes "You slid the 'small knife' behind the frame";
+	mes "and used it to twist the picture.";
+	mes "As you turn the frame, the picture detatches and";
+	mes "falls from the wall.";
+	next;
+	set num1,rand(1,9);
+	Lset1:
+	set num2,rand(1,9);
+	if (num1 == num2) goto Lset1;
+	Lset2:
+	set num3,rand(1,9);
+	if (num1 == num3) goto Lset2;
+	if (num2 == num3) goto Lset2;
+	Lset3:
+	set num4,rand(1,9);
+	if (num1 == num4) goto Lset3;
+	if (num2 == num4) goto Lset3;
+	if (num3 == num4) goto Lset3;
+	Lset4:
+	set num5,rand(1,9);
+	if (num1 == num5) goto Lset4;
+	if (num2 == num5) goto Lset4;
+	if (num3 == num5) goto Lset4;
+	if (num4 == num5) goto Lset4;
+	Lset5:
+	set num6,rand(1,9);
+	if (num1 == num6) goto Lset5;
+	if (num2 == num6) goto Lset5;
+	if (num3 == num6) goto Lset5;
+	if (num4 == num6) goto Lset5;
+	if (num5 == num6) goto Lset5;
+	Lset6:
+	set num7,rand(1,9);
+	if (num1 == num7) goto Lset6;
+	if (num2 == num7) goto Lset6;
+	if (num3 == num7) goto Lset6;
+	if (num4 == num7) goto Lset6;
+	if (num5 == num7) goto Lset6;
+	if (num6 == num7) goto Lset6;
+	Lset7:
+	set num8,rand(1,9);
+	if (num1 == num8) goto Lset7;
+	if (num2 == num8) goto Lset7;
+	if (num3 == num8) goto Lset7;
+	if (num4 == num8) goto Lset7;
+	if (num5 == num8) goto Lset7;
+	if (num6 == num8) goto Lset7;
+	if (num7 == num8) goto Lset7;
+	Lset8:
+	set num9,rand(1,9);
+	if (num1 == num9) goto Lset8;
+	if (num2 == num9) goto Lset8;
+	if (num3 == num9) goto Lset8;
+	if (num4 == num9) goto Lset8;
+	if (num5 == num9) goto Lset8;
+	if (num6 == num9) goto Lset8;
+	if (num7 == num9) goto Lset8;
+	if (num8 == num9) goto Lset8;
+
+L_DONE:
+	mes "There is a number behind the picture.";
+	mes "" + num1 + "3 " + num2 + "6 " + num3 + "9 " + num4 + "4 " + num5 + "8 " + num6 + "1 " + num7 + "7 " + num8 + "2 " + num9 + "5";
+	mes "Perhaps you should write this number down somewhere...";
+	close;
+}
+
+//--------------------------generator--------------------------
+
+lhz_cube.gat,224,192,0	script	Generator	111,{
+	if (MISC_QUEST&512 || cubekey&256) goto L_DONE;
+	mes "The big machine is running, making a huge noise.";
+	mes "There are lots weird symbols and";
+	mes "a small key hole beside them.";
+	next;
+	input @key$;
+
+	if (cubekey&1 && (@key$ == "yellow key" || @key$ == "Yellow Key")) goto L_1;
+	mes "There's nothing to do here.";
+	close;
+
+L_1:
+	mes "You insert the 'yellow key' into the keyhole";
+	mes "and twist it.";
+	mes "The machine clicks, and becomes silent.";
+	next;
+	mes "When it was stopped, the lamp next to the bed";
+	mes "also turned off.";
+	set cubekey,cubekey|256;
+	close;
+
+L_DONE:
+	mes "The big machine sits quietly.";
+	close;
+}
+
+//--------------------------Lamp--------------------------
+
+lhz_cube.gat,248,205,0	script	Lamp	111,{
+	if (MISC_QUEST&512 || cubekey&16) goto L_DONE;
+	if (cubekey&256) goto L_1;
+	mes "There is a bright lamp.";
+	mes "Seems like there is something inside";
+	mes "but it is too hot to touch.";
+	mes "It looks like you need to somehow turn the lamp off.";
+	close;
+
+L_1:
+	mes "There is something inside of the bulb.";
+	next;
+	menu "Leave it alone.",-,"Break the bulb.",L_2;
+	close;
+
+L_2:
+	mes "When you break the bulb, a";
+	mes "'black key' falls out.";
+	next;
+	mes "You acquired the '^FF0000black key^000000'.";
+	set cubekey,cubekey|16;
+	close;
+
+L_DONE:
+	mes "There nothing but a broken bulb.";
+	close;
+}
+
+//--------------------------Box--------------------------
+
+lhz_cube.gat,248,193,0	script	Box#02	111,{
+	if (MISC_QUEST&512 || countitem(2657) || @gotLPkey) goto L_DONE;
+	mes "There is a box with three holes.";
+	next;
+	if (cubekey&65536 && cubekey&262144 && cubekey&16384) goto L_4;
+	menu "Ellipse hole",L_1,"Square hole",L_2,"Polygonal hole",L_3;
+
+L_1:
+	if (cubekey&65536) goto L1_2;
+	input @ellipse$;
+
+	if (cubekey&32768 && (@ellipse$ == "ellipse model" || @ellipse$ == "Ellipse Model")) goto L1_1;
+	mes "Nothing happened.";
+	close;
+
+L1_1:
+	mes "You inserted the 'ellipse model' into the ellipse-shaped hole.";
+	mes "The box makes a metallic click.";
+	set cubekey,cubekey|65536;
+	close;
+
+L1_2:
+	mes "You've already inserted the 'ellipse model'.";
+	close;
+
+L_2:
+	if (cubekey&262144) goto L2_2;
+	input @quadrangle$;
+
+	if (cubekey&131072 && (@quadrangle$ == "cube model" || @quadrangle$ == "Cube Model")) goto L2_1;
+	mes "Nothing happened.";
+	close;
+
+L2_1:
+	mes "You inserted the 'cube model' into the square-shaped hole.";
+	mes "The box makes a metallic click.";
+	set cubekey,cubekey|262144;
+	close;
+
+L2_2:
+	mes "You already inserted the 'square model'.";
+	close;
+
+L_3:
+	if (cubekey&16384) goto L3_2;
+	input @polygon$;
+
+	if (cubekey&8192 && (@polygon$ == "polygon model" || @polygon$ == "Polygon Model")) goto L3_1;
+	mes "Nothing happened.";
+	close;
+
+L3_1:
+	mes "You inserted the 'polygon model' into the polygonal hole.";
+	mes "The box makes a metallic click.";
+	set cubekey,cubekey|16384;
+	close;
+
+L3_2:
+	mes "You've already inserted the 'polygon model'.";
+	close;
+
+L_4:
+	mes "All holes are filled with keymodels.";
+	next;
+	menu "Leave it alone.",-,"Open the box.",L4_1;
+	close;
+
+L4_1:
+	mes "There is a small card inside of it.";
+	next;
+	mes "You acquired the 'Laboratory Permit'.";
+	set @gotLPkey,1;
+	getitem 2657,1;
+	close;
+
+L_DONE:
+	mes "There is an opened box.";
+	mes "There is nothing inside.";
+	close;
+}
+
+//--------------------------Test tube--------------------------
+
+lhz_cube.gat,224,197,0	script	Test Tube	111,{
+	if (MISC_QUEST&512) goto L_DONE;
+	if (countitem(2657) > 0) goto L_3;
+	if (cubekey&32768) goto L_2;
+	mes "There is a weird test tube.";
+	mes "It seems like there is something inside.";
+	mes "There' a keyhole and a hole that fits a thin object.";
+	next;
+	input @key$;
+
+	if (cubekey&16 && (@key$ == "black key" || @key$ == "Black Key")) goto L_1;
+	mes "Nothing happened.";
+	close;
+
+L_1:
+	mes "You inserted the 'black key' and turned it.";
+	mes "The glass window at the front of the machine opened,";
+	mes "Revealing an ellipse model.";
+	next;
+	mes "You acquired the '^FF0000ellipse model^000000'.";
+	set cubekey,cubekey|32768;
+	close;
+
+L_2:
+	mes "This is where you got '^FF0000ellipse model^000000'.";
+	mes "There is a weird symbol on the bottom of the machine.";
+	mes "It looks like it could open as it has hinges on one side.";
+	close;
+
+L_3:
+	mes "There is a rectangular hole in the front of the machine.";
+	next;
+	input @answer$;
+
+	if (@answer$ == "Laboratory Permit" || @answer$ == "permit" || @answer$ == "laboratory permit" || @answer$ == "Permit") goto L_4;
+	mes "Nothing happened.";
+	close;
+
+L_4:
+	mes "You inserted the 'Laboratory Keycard' in the hole,";
+	mes "and the stair leading down appeared on the floor.";
+	next;
+	menu "Go down.",L4_1,"Do not go down.",-;
+	close;
+
+L4_1:
+	mes "It connected to a long staircase.";
+	set cubekey,0;	
+	set num1,0;	set num2,0;	set num3,0;	set num4,0;	set num5,0;
+	set num6,0;	set num7,0;	set num8,0;	set num9,0;
+	set piciburn,0;
+	set MISC_QUEST,MISC_QUEST|512;
+	close2;
+L_DONE:
+	warp "lhz_cube.gat",177,13;
+	end;
+}
+
+//============================================================
+// Lighthalzen Pickpocket Mini-Quest
+//============================================================
+
+lighthalzen.gat,240,216,4	script	Man#Pickpocket1	870,2,2,{
+	end;
+OnTouch:
+	callfunc "F_LHZPick",33,1;
+	close;
+}
+
+lighthalzen.gat,220,169,4	script	Man#Pickpocket2	870,2,2,{
+	end;
+OnTouch:
+	callfunc "F_LHZPick",33,2;
+	close;
+}
+
+lighthalzen.gat,164,127,4	script	Man#Pickpocket3	870,2,2,{
+	end;
+OnTouch:
+	callfunc "F_LHZPick",20,3;
+	if(@caught!=1) close;
+	mes "[Strange Man]";
+	mes "Ayee! I'm trapped.";
+	mes "If you will forgive me,";
+	mes "I can give you something good.";
+	mes "["+strcharinfo(0)+"]";
+	mes "You're forgiven, now what is this";
+	mes "good thing you mentioned?";
+	next;
+	mes "[Strange Man]";
+	mes "The lower part of your body,";
+	mes "will produce a strong power";
+	mes "once you've taken the secret potion.";
+	mes "It's very useful";
+	mes "when you want to run quickly";
+	next;
+	mes "[Strange Man]";
+	mes "I will sell you them for a bargin";
+	mes "price of 15,000 zeny to a maximum";
+	mes "of three potions.";
+	mes "How many do you want?";
+	next;
+	input @number;
+	if(@number>3) set @number,3;
+	set @cost,15000*@number;
+	if(Zeny<@cost) goto L_Zeny;
+	//please check that you add the script to it.
+	set Zeny,zeny-@cost;
+	getitem 12016,@number; //Speed Potion
+	mes "[Strange Man]";
+	mes "Thanks for your money.";
+	if(rand(1,2)==1) goto L_Reset;
+	disablenpc "Man#Pickpocket3";
+	enablenpc "Man#Pickpocket2";
+	close;
+L_Reset:
+	disablenpc "Man#Pickpocket3";
+	enablenpc "Man#Pickpocket1";
+	close;
+L_Zeny:
+	mes "[Strange Man]";
+	mes "Too bad.";
+	mes "No zeny makes you a poor man.";
+	close;
+OnInit:
+	disablenpc "Man#Pickpocket2";
+	disablenpc "Man#Pickpocket3";
+}
+
+function	script	F_LHZPick	{
+	if(Zeny<100) set Zeny,0;
+	if(Zeny>=100) set Zeny,zeny-100;
+	mes "Pickpocket";
+	next;
+	if(rand(0,100)<getarg(0)) goto L_Caught;
+	mes "Hehehehe....";
+	return;
+L_Caught:
+	mes "(You notice the man put his";
+	mes "hand in your pocket!)";
+	mes "["+strcharinfo(0)+"]";
+	mes "Eh!? What are you doing!";
+	mes "You are!! Stealing my money?!";
+	mes "[Strange Man]";
+	mes "Ah! I'm caught!";
+	mes "["+strcharinfo(0)+"]";
+	mes "You're a pickpocket?!?";
+	mes "[Strange Man]";
+	mes "Hehehehe....";
+	next;
+	set @rand,rand(1,4);
+	if(getarg(1)==1 && @rand<4) goto L_MoveB;
+	if(getarg(1)==2 && @rand<4) goto L_MoveA;
+	if(getarg(1)==1 && @rand==4) goto L_MoveC1;
+	if(getarg(1)==2 && @rand==4) goto L_MoveC2;
+	set @caught,1;
+	return;
+L_MoveA:
+	disablenpc "Man#Pickpocket2";
+	enablenpc "Man#Pickpocket1";
+	return;
+L_MoveB:
+	disablenpc "Man#Pickpocket1";
+	enablenpc "Man#Pickpocket2";
+	return;
+L_MoveC1:
+	disablenpc "Man#Pickpocket1";
+	enablenpc "Man#Pickpocket3";
+	return;
+L_MoveC2:
+	disablenpc "Man#Pickpocket2";
+	enablenpc "Man#Pickpocket3";
+	return;
+}
+
+//==============================================================
+// Friendship
+//==============================================================
+
+lhz_in02.gat,201,210,3	script	Digotz	869,{
+
+	if(friendship > 9)goto s_Dead;
+	if(friendship == 9)goto s_Wounded;
+	if(friendship == 8)goto s_Cont7;
+	if(friendship == 6 && friendship2 || friendship == 7)goto s_Cont6;
+	if(friendship == 6)goto s_Cont5;
+	if(friendship == 4 || friendship == 5)goto s_Cont4;
+	if(friendship == 3)goto s_Cont3;
+	if(friendship == 2)goto s_Cont2;
+	mes "[Digotz]";
+	mes "Oh, an adventurer?";
+	mes "Welcome to Uptown";
+	mes "Lighthalzen. However,";
+	mes "I'm afraid this area won't";
+	mes "have much to offer you";
+	mes "in the way of excitement.";
+	next;
+	if(friendship == 1)goto s_Cont;
+	mes "[Digotz]";
+	mes "Feel free to take";
+	mes "a look around if you";
+	mes "so wish. I'm actually";
+	mes "glad to see somebody";
+	mes "aside from the stuck up";
+	mes "rich people who live here.";
+	close;
+
+s_Cont:
+	mes "[Digotz]";
+	mes "My name is Digotz,";
+	mes "just another citizen";
+	mes "of Upper Lighthalzen.";
+	mes "I hope that you enjoy";
+	mes "your stay in my hometown";
+	next;
+	menu "Do you know someone named Maku?",-;
+
+	mes "[Digotz]";
+	mes "Maku? Maku. Yes, he's my";
+	mes "childhood friend. Or he was,";
+	mes "anyway. Now he's just a jerk.";
+	mes "In an case, we can't hang";
+	mes "out, even if we wanted to,";
+	mes "for several reasons.";
+	next;
+	mes "[Digotz]";
+	mes "Hey, why am I even";
+	mes "talking about this? It's";
+	mes "not like I'm bothered by";
+	mes "the fact that me and Maku aren't";
+	mes "pals anymore. You know what?";
+	mes "Just forget everything I said.";
+	set friendship,2;
+	close;
+
+s_Cont2:
+	mes "[Digotz]";
+	mes "What are you still";
+	mes "doing hanging around";
+	mes "here? There's nothing";
+	mes "interesting in Uptown";
+	mes "for you to see, adventurer.";
+	next;
+	mes "[Digotz]";
+	mes "Gosh...!";
+	mes "Just hearing about";
+	mes "Maku makes me so feel";
+	mes "so upset for some reason!";
+	close;
+
+s_Cont3:
+	mes "[Digotz]";
+	mes "I know that the";
+	mes "opulence of Uptown";
+	mes "seems rather attractive,";
+	mes "but trust me. This place";
+	mes "is colorless. Now, have";
+	mes "you visited the poor district?";
+	next;
+	menu "Yes, I did already...",-;
+
+	mes "[" + strcharinfo(0) + "]";
+	mes "Yes, I did already...";
+	mes "And I met someone";
+	mes "named Maku there.";
+	next;
+	mes "[Digotz]";
+	mes "Maku?! Oh, he must have";
+	mes "mentioned something about";
+	mes "me. But I don't care what he";
+	mes "says, unless it's an apology";
+	mes "for being a fully blown jerk.";
+	mes "Ever since we were kids...";
+	next;
+	mes "[Digotz]";
+	mes "Anyway, we used to be close,";
+	mes "but that guy was never a true";
+	mes "friend of mine! Like that one";
+	mes "time he cheated to beat me at";
+	mes "arm wrestling! Or when he never";
+	mes "thanked me for buying us lunch!";
+	next;
+	mes "[Digotz]";
+	mes "Sure, he might have helped";
+	mes "me a little in meeting my first";
+	mes "girlfriend, but I'll never ever";
+	mes "forgive him for fixing me up";
+	mes "on the worst blind dates a";
+	mes "man can possible experience!";
+	next;
+	mes "[Digotz]";
+	mes "Maku doesn't know a damn";
+	mes "about friendship! Even if I did";
+	mes "want to see him, there are these";
+	mes "people who don't want the rich";
+	mes "to ever meet with the poor.";
+	next;
+	mes "If Maku's fine, that's";
+	mes "good enough to hear for";
+	mes "me! There's no need for me";
+	mes "to go all the way over there";
+	mes "and check up on him! I only";
+	mes "have one regret though...";
+	next;
+	mes "[Digotz]";
+	mes "I only wish I had one";
+	mes "last chance to see Maku...";
+	mes "So that I could kick his sorry";
+	mes "ass myself! Yeah, that's right!";
+	mes "Arrogant bastard! But still,";
+	mes "I'm not able to do that...";
+	next;
+	mes "[Digotz]";
+	mes "The security guards here";
+	mes "will never allow the rich and";
+	mes "poor to meet, fearing that";
+	mes "the poor will disturb the peace";
+	mes "and order of the city. It's a dumb";
+	mes "rule made for dumb people.";
+	next;
+	mes "[Digotz]";
+	mes "Still, it's pretty scary that";
+	mes "someone can get punished";
+	mes "for violating such a stupid";
+	mes "taboo, actually. Anyway, if";
+	mes "you see Maku again, tell";
+	mes "him this for me, got it?";
+	next;
+	mes "[Digotz]";
+	mes "^FF0000Hopeless bastard!";
+	mes "You're still a stubborn jerk!";
+	mes "You owe me at least 3 lunches!";
+	mes "Not to mention an apology!";
+	mes "But who cares what you think?!";
+	mes "I'm so goddamn happy without you!";
+	set friendship,4;
+	close;
+
+s_Cont4:
+	mes "[Digotz]";
+	mes "Still checking out";
+	mes "Uptown Lighthalzen?";
+	mes "Not like I'd care, but if you";
+	mes "do happen to see Maku,";
+	mes "deliver this little message";
+	mes "for me, sentence by sentence.";
+	next;
+	mes "[Digotz]";
+	mes "^FF0000Hopeless bastard!";
+	mes "You're still a stubborn jerk!";
+	mes "You owe me at least 3 lunches!";
+	mes "Not to mention an apology!";
+	mes "But who cares what you think?!";
+	mes "I'm so goddamn happy without you!";
+	close;
+
+s_Cont5:
+	mes "[Digotz]";
+	mes "Oh, it's been a while.";
+	mes "What are you doing back";
+	mes "over here? And, um, did";
+	mes "you deliver that message";
+	mes "to Maku? Now when I think";
+	mes "about it, I was kind of--";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "I delivered your message";
+	mes "word for word, and Maku";
+	mes "got angry, called you names";
+	mes "and has been threatening to";
+	mes "beat you up pretty badly.";
+	next;
+	mes "[Digotz]";
+	mes "That no-good, dirty";
+	mes "lying rotten scoundrel!";
+	mes "If it weren't for those";
+	mes "guards, I'd head over to";
+	mes "the ghetto and beat Maku";
+	mes "up myself! That stupid guy!";
+	next;
+	mes "[Digotz]";
+	mes "During times like this,";
+	mes "I really miss ^FF0000Benkaistein^000000";
+	mes "That guy would always have";
+	mes "an answer for this kind of";
+	mes "situation. Yeah, I think he's";
+	mes "in some far off town, studying.";
+	next;
+	mes "[Digotz]";
+	mes "Supposedly he's in that";
+	mes "place, whatever it's called,";
+	mes "since there's a ton of books";
+	mes "there that he can use. But";
+	mes "yeah, Benkaistein would";
+	mes "always be the mediator...";
+	next;
+	mes "[Digotz]";
+	mes "Even back then, when";
+	mes "me, him and Maku used to";
+	mes "hang out, Benkastein would";
+	mes "mediate if we got into some";
+	mes "argument. Still, he couldn't";
+	mes "do anything about Maku now...";
+	next;
+	mes "[Digotz]";
+	mes "I don't know why,";
+	mes "but I'm so angry!";
+	mes "Why am I stressing";
+	mes "out so much over this?!";
+	set friendship2,1;
+	close;
+
+s_Cont6:
+	mes "[Digotz]";
+	mes "Even if Benkaistein came";
+	mes "back from wherever he was";
+	mes "studying, I don't think he'd be";
+	mes "able to get Maku to apologize";
+	mes "to me. That guy is just way";
+	mes "too stubborn for his own good!";
+	if(friendship != 7)close;
+	next;
+	menu "Show Benkastein's Journal",s_Journal,"Don't show Benkastein's Journal.",-;
+
+	mes "[Digotz]";
+	mes "I don't understand";
+	mes "why I'm so angry!";
+	mes "I'm starting to act";
+	mes "more like Maku, though,";
+	mes "don't get me wrong, it's";
+	mes "not like I care about the guy.";
+	close;
+
+s_Journal:
+	mes "[Digotz]";
+	mes "Why am I so ticked off?";
+	mes "^3131FF*Sigh*^000000 You have something";
+	mes "to show me? Huh? Benkastein";
+	mes "wanted me to read this diary";
+	mes "of his? Sure, why not? I do";
+	mes "owe him a lot over the years...";
+	next;
+	mes "[Benkastein's Journal]";
+	mes "^AD9595Today, me, Digotz and";
+	mes "Maku played this crazy flying";
+	mes "game. Basically, we make";
+	mes "these wings out of wood and";
+	mes "paper, jump of these hills";
+	mes "and try to fly. Dumb, I know.";
+	next;
+	mes "^000000[Benkastein's Journal]";
+	mes "^AD9595Today it was my turn to";
+	mes "jump and flap my arms with";
+	mes "these fake, badly made wings.";
+	mes "It's not really a fun game when";
+	mes "I think about it. Boy, I hope";
+	mes "we don't do that again.";
+	next;
+	mes "^000000[Digotz]";
+	mes "Oh yeah, I remember that!";
+	mes "Maky wore the wings most";
+	mes "of the time, but I still hold";
+	mes "the record for staying in the";
+	mes "air the longest! Yeah, I was";
+	mes "a regular Kid Pegasus~";
+	next;
+	mes "[Benkastein's Journal]";
+	mes "^AD9595Maku, Digotz and me went";
+	mes "outside of town. Of course,";
+	mes "we didn't tell anyone or else";
+	mes "we'd get in trouble. It was";
+	mes "a really exciting day. But";
+	mes "then, we ran into a monster!";
+	next;
+	mes "^000000[Benkastein's Journal]";
+	mes "^AD9595I wanted to run away but Maku";
+	mes "and Digotz wanted to beat it so";
+	mes "that we could become heroes.";
+	mes "Of course, we got hurt pretty";
+	mes "bad and the monster got away.";
+	mes "Boy, mom was not happy...";
+	next;
+	mes "^000000[Digotz]";
+	mes "Huh. I don't remember";
+	mes "that so well. But I know that";
+	mes "Benkastein, me and Maku";
+	mes "weren't afraid of anything back";
+	mes "then. We must have been totally";
+	mes "nuts to fight a monster, though.";
+	next;
+	mes "[Benkastein's Journal]";
+	mes "^AD9595Digotz's been sick for three";
+	mes "days now. It's just a normal";
+	mes "cold and Maku keeps saying";
+	mes "it's Digotz's fault he got sick.";
+	mes "But he's always asking me to";
+	mes "go visit him and see if he's okay.";
+	next;
+	mes "^000000[Digotz]";
+	mes "I think I remember being";
+	mes "pretty sick. Maku was worried?";
+	mes "I... I must have had a horrible";
+	mes "life threatening disease like,";
+	mes "um, Gonorrhitis. You know.";
+	mes "That might have been it.";
+	next;
+	mes "[Benkastein's Journal]";
+	mes "^AD9595Mom and dad keep telling";
+	mes "me not to hang out with Maku";
+	mes "anymore. Their reason is really";
+	mes "dumb, and I don't care if he is";
+	mes "poor. He's one of the best guys";
+	mes "that I'll ever know.";
+	next;
+	mes "^000000[Benkastein's Journal]";
+	mes "^AD9595Digotz's family is really";
+	mes "rich and they don't want him";
+	mes "to see Maku anymore either.";
+	mes "But Digotz doesn't care.";
+	mes "I know he likes Maku a lot.";
+	next;
+	mes "^000000[Digotz]";
+	mes "Well, we were a lot";
+	mes "younger and closer back";
+	mes "then, so... ^111111*Ahem!*^000000Why did";
+	mes "Benkastein even write that?!";
+	next;
+	mes "[Benkastein's Journal]";
+	mes "^AD9595Today, the three of us";
+	mes "made an oath of brotherhood,";
+	mes "just like we read in the comic";
+	mes "book. We swore we'd always";
+	mes "be friends no matter what.";
+	mes "For always and for always.";
+	next;
+	mes "^000000[Digotz]";
+	mes "I... I was forced to make";
+	mes "that oath! And people do";
+	mes "change, you know! I mean,";
+	mes "we were basically just kids,";
+	mes "it's not like that oath really";
+	mes "means anything now, does it?";
+	next;
+	mes "[Digotz]";
+	mes "That does it. I'm gonna";
+	mes "go see that Maku. I don't";
+	mes "miss him or anything, but";
+	mes "I gotta get him to cancel";
+	mes "that oath. And maybe I'll";
+	mes "beat up him a little bit.";
+	set friendship,8;
+	close;
+
+s_Cont7:
+	mes "[Digotz]";
+	mes "Wh-whoa, I need to";
+	mes "get ready! That Maku's";
+	mes "gonna make fun of me if";
+	mes "I look too rich and pampered.";
+	mes "Damn! Where did I put all of";
+	mes "my fashionable street clothes?";
+	close;
+
+s_Wounded:
+	mes "^3131FFDigotz is seriously";
+	mes "injured from a wound";
+	mes "by a knife that is still";
+	mes "embedded in his belly.^000000";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Digotz...?";
+	mes "Oh no, let me";
+	mes "get you some help!";
+	next;
+	mes "[Digotz]";
+	mes "H-het... It's the";
+	mes "adventurer... Man,";
+	mes "that Maku. He always";
+	mes "did bring me bad luck...";
+	mes "It's too late for me and";
+	mes "I don't have much time...";
+	next;
+	mes "[Digotz]";
+	mes "Those guards I told you";
+	mes "about... The ones who don't";
+	mes "want the poor and the rich to";
+	mes "mingle? I... Guess they found";
+	mes "out I was gonna meet my old";
+	mes "pal. I just wanted to see him...";
+	next;
+	mes "[Digotz]";
+	mes "This guy... In a black";
+	mes "suit... He just... He just";
+	mes "stabbed me! I... God. It's";
+	mes "been so long since I've talked";
+	mes "to him. We'll hang out and have";
+	mes "fun, just like the good old days.";
+	next;
+	mes "[Digotz]";
+	mes "I missed my buddies, but now...";
+	mes "Now I can hear them calling me.";
+	mes "Now we can all be together just";
+	mes "like we all promised. Yeah...";
+	mes "I was wrong. Life's too short";
+	mes "to be angry with your frie--";
+	next;
+	mes "[Digotz]";
+	mes "..............";
+	next;
+	mes "[Digotz]";
+	mes "..............";
+	mes ".......................";
+	next;
+	mes "[Digotz]";
+	mes "..............";
+	mes ".......................";
+	mes "................................";
+	next;
+	mes "^3131FFDigotz stopped breating.";
+	mes "You remove the Knife from";
+	mes "his lifeless body as a final";
+	mes "courtesy to a man who";
+	mes "dearly loved his friends.";
+	next;
+	set friendship,10;
+	getitem 1201,1;
+	close;
+
+s_Dead:
+	mes "^3131FFDigotz has passed";
+	mes "away, but the look on";
+	mes "his face seems very";
+	mes "peaceful and content.";
+	close;
+
+}
+
+lighthalzen.gat,337,232,3	script	Maku	870,{
+
+	if(friendship > 1)goto Switches;
+	mes "[Maku]";
+	mes "Hey, you're on of";
+	mes "those adventurers, eh?";
+	mes "Welcome to the ghetto.";
+	mes "Nothing too adventurous";
+	mes "here, but hey, you can";
+	mes "explore all you want.";
+	next;
+	mes "[Maku]";
+	mes "I don't know if you know";
+	mes "but actually, the people who";
+	mes "live here ain't allowed to";
+	mes "explore this whole city. It's";
+	mes "kind of taboo to talk about,";
+	mes "but what do I care, right?";
+	next;
+	mes "[Maku]";
+	mes "Yeah, basically the rich";
+	mes "people here are too afraid";
+	mes "of the poor people comin' to";
+	mes "see them, so the security in";
+	mes "this city is pretty tight! Those";
+	mes "upper class guys are trash...";
+	next;
+	mes "[Maku]";
+	mes "I didn't use to think";
+	mes "this way. I actually used";
+	mes "to have a pretty rich friend";
+	mes "till I found out he's not all";
+	mes "I thought he was. That";
+	mes "moron! Why's he like that?!";
+	next;
+	mes "[Maku]";
+	mes "Eh, forget about it.";
+	mes "Why am I even talking";
+	mes "about my personal life";
+	mes "to someone I just met";
+	mes "anyway? Sure, we all";
+	mes "do it, but still...";
+	next;
+	mes "[Maku]";
+	mes "Well, when you get";
+	mes "bored of the ghetto,";
+	mes "you really oughta check";
+	mes "out the rich section of town.";
+	mes "I'm bitter, but I'll also admit";
+	mes "it's way nicer than this place.";
+	if(BaseLevel > 29) set friendship,1;
+	close;
+
+
+Switches:
+	switch(friendship)
+	{
+	
+	case 2:
+		mes "[Maku]";
+		mes "Hey, what are you";
+		mes "doing back over here?";
+		mes "I thought I recommended";
+		mes "going over to check out";
+		mes "Uptown Lighthalzen. This";
+		mes "place is pretty run-down...";
+		next;
+		menu "I actually met Digotz and...",-;
+
+		mes "[Maku]";
+		mes "You what...?!";
+		mes "You saw my old pal,";
+		mes "Digotz?! Er, I mean,";
+		mes "Mister Alexander Digotz,";
+		mes "who used to be my buddy,";
+		mes "but obviously not anymore.";
+		next;
+		mes "[Maku]";
+		mes "Sure, we were real close";
+		mes "at one time, but that was";
+		mes "too long ago. It's been a";
+		mes "long time since we hung";
+		mes "out and he probable hates";
+		mes "my penniless guts and...";
+		next;
+		mes "[Maku]";
+		mes "Crud, just listen to";
+		mes "me, I sound like a wuss.";
+		mes "I don't miss Digotz! In fact,";
+		mes "I hate the guy, one hundred";
+		mes "percent! The next time I see";
+		mes "him, I'll beat him to a pulp!";
+		set friendship,3;
+		close;
+	break;
+
+	case 3:
+		mes "[Maku]";
+		mes "Man, I need to blow off some";
+		mes "steam! Sure, me and Digotz";
+		mes "were buds before and maybe";
+		mes "we might seem like friends now,";
+		mes "but not anymore, though we used";
+		mes "to be closer than this. Argh!";
+		next;
+		mes "[Maku]";
+		mes "Don't get me wrong, I don't";
+		mes "miss the guy or anything like";
+		mes "that and I don't feel sorry about";
+		mes "what happened. But if he ever";
+		mes "came to apologize to me, I'd";
+		mes "probably accept, you know.";
+		next;
+		mes "[Maku]";
+		mes "Well, after thinking";
+		mes "about it, of course.";
+		mes "I mean, I'm not the one";
+		mes "holding a grudge. It's all";
+		mes "that guy's fault! Sheeeesh!";
+		close;
+	break;
+
+	case 4:
+		mes "[Maku]";
+		mes "What the hell are you";
+		mes "still doing around here?";
+		mes "You must have better things";
+		mes "to do than talk to a ruffian";
+		mes "like me or that snobby and";
+		mes "totally prickish Digotz.";
+		next;
+		menu "Speaking of which...",-;
+		mes "[" + strcharinfo(0) + "]";
+		mes "Speaking of which...";
+		mes "I spoke to Digotz again.";
+		mes "He told me to give you a";
+		mes "message, but I'm not sure th--";
+		next;
+		mes "[Maku]";
+		mes "That no-good bastard";
+		mes "has a message for me?!";
+		mes "Oh, I'm soooo honored~";
+		mes "Tell me what that fink";
+		mes "has to say, line by line!";
+		next;
+		input @digotzstr$;
+		if(@digotzstr$ != "Hopeless bastard!")goto failstr;
+		mes "[Maku]";
+		mes "\"Hopeless Bastard?!\"";
+		mes "Well, at least he had";
+		mes "the stomach to say that.";
+		mes "Through somebody else";
+		mes "anyway! What else'd he say?!";
+		next;
+		input @digotzstr$;
+		if(@digotzstr$ != "You're still a stubborn jerk!")goto failstr;
+		mes "[Maku]";
+		mes "\"Stubborn Jerk?!\"";
+		mes "Takes no one to know one,";
+		mes "bastard! Why I oughta--";
+		mes "Grrr! What'd he say next?!";
+		next;
+		input @digotzstr$;
+		if(@digotzstr$ != "You owe me at least 3 lunches!")goto failstr;
+		mes "[Maku]";
+		mes "Three lunches?!";
+		mes "I treated that guy to";
+		mes "lunch like, fifteen times!";
+		mes "I tell you, the guy does not";
+		mes "know the meaning of friendship!";
+		mes "What else did that moron say?!";
+		next;
+		input @digotzstr$;	
+		if(@digotzstr$ != "Not to mention an apology!")goto failstr;
+		mes "[Maku]";
+		mes "Me, apologize?!";
+		mes "He should be on his hands";
+		mes "and knees begging for my";
+		mes "frickin' forgiveness! That...";
+		mes "That selfish no-good stupid...";
+		mes "W-what else did he tell you?!";
+		next;
+		input @digotzstr$;
+		if(@digotzstr$ != "But who cares what you think?!")goto failstr;
+		mes "[Maku]";
+		mes "Who cares what I think?!";
+		mes "GRRRAAH~!! Who cares";
+		mes "what he thinks!! ^111111*Pant Pant*^000000";
+		mes "I'm gonna murderlize that";
+		mes "dumb creep! He can't possibly";
+		mes "make me angrier than I am now!";
+		next;
+		input @digotzstr$;
+		if(@digotzstr$ != "I'm so goddamn happy without you!")goto failstr;
+		mes "[Maku]";
+		mes "That's it.";
+		mes "It's decided. The";
+		mes "next time I see Digotz,";
+		mes "I'm gonna plaster his";
+		mes "face all over the floor.";
+		set friendship,5;
+		close;
+	break;
+
+	case 5:
+		mes "[Maku]";
+		mes "RrrrRrrrr.....";
+		mes "RrrrrRRRrrRR.....";
+		mes "GGGGGRRRRR...";
+		next;
+		mes "^3131FFUh oh...";
+		mes "It looks like Maku";
+		mes "is starting to rage";
+		mes "just a bit too much.^000000";
+		next;
+		mes "[Maku]";
+		mes "...";
+		mes "......";
+		mes ".........";
+		next;
+		mes "[Maku]";
+		mes "Gggrrrr...";
+		next;
+		mes "[Maku]";
+		mes "GRAAAAAAAAH~!";
+		mes "Who the hell does he";
+		mes "think he is, telling me";
+		mes "all sorts of crap!? Digotz,";
+		mes "you're not getting away";
+		mes "with this! Gonna wreck you!!";
+		next;
+		set Hp,MaxHp/2;
+		mes "^3131FFMaku's seething quickly";
+		mes "explodes into pure, violent";
+		mes "rage. You manage to calm";
+		mes "him down after a while, but";
+		mes "barely keep yourself from";
+		mes "getting killed in this outburst^000000";
+		next;
+		mes "[Maku]";
+		mes "^111111*Pant pant* *Whew~*^000000";
+		mes "D-don't worry, I've got";
+		mes "a grip on myself now.";
+		mes "Thanks for not letting me";
+		mes "get too crazy. Times like";
+		mes "this, I really miss ^FF0000Benkaistein^000000.";
+		next;
+		mes "[Maku]";
+		mes "Benkastein would always";
+		mes "make sure that I'd stay out";
+		mes "of fights. I really miss that";
+		mes "guy. Still, he ain't around...";
+		next;
+		mes "[Maku]";
+		mes "Damn those guards!";
+		mes "If they weren't there,";
+		mes "I could just go over and";
+		mes "kick Digotz's ass! I swear,";
+		mes "if it weren't for them...!";		
+		set friendship,6;
+		close;
+	break;
+
+	case 6:
+		mes "[Maku]";
+		mes "Arrrrgh! Whenever I hear";
+		mes "about that Digotz, I get so";
+		mes "peeved! Is that guy giving";
+		mes "me the brushoff just because";
+		mes "I'm not a rich guy like he is?!";
+		next;
+		mes "[Maku]";
+		mes "I can't...";
+		mes "I can't even beat him up";
+		mes "all properly because of";
+		mes "all those freakin' guards!";
+		mes "Arrrrrrrgh! Man, where's";
+		mes "Benkastein when I need him?";
+		close;
+	break;
+
+	case 7:
+		mes "[Maku]";
+		mes "Arrrrgh! Whenever I hear";
+		mes "about that Digotz, I get so";
+		mes "peeved! Is that guy giving";
+		mes "me the brushoff just because";
+		mes "I'm not a rich guy like he is?!";
+		next;
+		mes "[Maku]";
+		mes "I can't...";
+		mes "I can't even beat him up";
+		mes "all properly because of";
+		mes "all those freakin' guards!";
+		mes "Arrrrrrrgh! Man, where's";
+		mes "Benkastein when I need him?";
+		close;
+	break;
+
+	case 8:
+		mes "[Maku]";
+		mes "Hey, what is that? You want";
+		mes "me to read this journal?";
+		mes "Er, okay, but I'm none too";
+		mes "comfortable going through";
+		mes "somebody's diary. It's just";
+		mes "kinda... creepy, you know?";
+		next;
+		mes "[Maku]";
+		mes "Hey, this think is";
+		mes "Benkastein's. I haven't";
+		mes "seen that guy in a long while.";
+		mes "Ah, so he gave it to you for me";
+		mes "to read? Alright, I owe him a";
+		mes "favor or two, so I oughta...";
+		next;
+		mes "[Benkastein's Journal]";
+		mes "^AD9595Today, me, Digotz and";
+		mes "Maku played this crazy flying";
+		mes "game. Basically, we make";
+		mes "these wings out of wood and";
+		mes "paper, jump of these hills";
+		mes "and try to fly. Dumb, I know.";
+		next;
+		mes "^000000[Benkastein's Journal]";
+		mes "^AD9595Today it was my turn to";
+		mes "jump and flap my arms with";
+		mes "these fake, badly made wings.";
+		mes "It's not really a fun game when";
+		mes "I think about it. Boy, I hope";
+		mes "we don't do that again.";
+		next;
+		mes "^000000[Maku]";
+		mes "What is he talking about?!";
+		mes "That game was real fun!";
+		mes "Yeah, I usually wore the";
+		mes "wings and Digotz always";
+		mes "wanted to wear them too.";
+		next;
+		mes "[Benkastein's Journal]";
+		mes "^AD9595Maku, Digotz and me went";
+		mes "outside of town. Of course,";
+		mes "we didn't tell anyone or else";
+		mes "we'd get in trouble. It was";
+		mes "a really exciting day. But";
+		mes "then, we ran into a monster!";
+		next;
+		mes "^000000[Benkastein's Journal]";
+		mes "^AD9595I wanted to run away but Maku";
+		mes "and Digotz wanted to beat it so";
+		mes "that we could become heroes.";
+		mes "Of course, we got hurt pretty";
+		mes "bad and the monster got away.";
+		mes "Boy, mom was not happy...";
+		next;
+		mes "^000000[Maku]";
+		mes "That's right! Back then,";
+		mes "the three of us weren't";
+		mes "afraid of anything! Of course,";
+		mes "Digotz got beat up the most.";
+		mes "But I gotta say, he was also";
+		mes "the most fearless of us.";
+		next;
+		mes "[Benkastein's Journal]";
+		mes "^AD9595Digotz's been sick for three";
+		mes "days now. It's just a normal";
+		mes "cold and Maku keeps saying";
+		mes "it's Digotz's fault he got sick.";
+		mes "But he's always asking me to";
+		mes "go visit him and see if he's okay.";
+		next;
+		mes "^000000[Maku]";
+		mes "Wh-what?! No, I wasn't";
+		mes "worried at all! That must";
+		mes "have been the time Digotz";
+		mes "caught Clymonia. You know,";
+		mes "that, uh, horrible disease. No";
+		mes "one should have that one!";
+		next;
+		mes "[Benkastein's Journal]";
+		mes "^AD9595Mom and dad keep telling";
+		mes "me not to hang out with Maku";
+		mes "anymore. Their reason is really";
+		mes "dumb, and I don't care if he is";
+		mes "poor. He's one of the best guys";
+		mes "that I'll ever know.";
+		next;
+		mes "^000000[Benkastein's Journal]";
+		mes "^AD9595Digotz's family is really";
+		mes "rich and they don't want him";
+		mes "to see Maku anymore either.";
+		mes "But Digotz doesn't care.";
+		mes "I know he likes Maku a lot.";
+		next;
+		mes "^000000[Maku]";
+		mes "...";
+		mes "......";
+		next;
+		mes "[Benkastein's Journal]";
+		mes "^AD9595Today, the three of us";
+		mes "made an oath of brotherhood,";
+		mes "just like we read in the comic";
+		mes "book. We swore we'd always";
+		mes "be friends no matter what.";
+		mes "For always and for always.";
+		next;
+		mes "^000000[Maku]";
+		mes "Well, that's true,";
+		mes "I guess, but people";
+		mes "change! Besides, we got";
+		mes "that idea from a comic book!";
+		mes "Well, if he apologizes first,";
+		mes "I guess I better forgive him.";
+		next;
+		mes "[" + strcharinfo(0) + "]";
+		mes "Good...";
+		mes "Because Digotz said";
+		mes "that he'll be coming";
+		mes "by in a few days.";
+		next;
+		mes "[Maku]";
+		mes "What?! He's really coming";
+		mes "here? What for? It's too late";
+		mes "to patch things up! Still, I'd be";
+		mes "a real prick if I didn't see him";
+		mes "Alright, fine! I'll teach that guy";
+		mes "a lesson once he's here!";
+		next;
+		mes "[Maku]";
+		mes "And, um, gimme that";
+		mes "journal! I'm gonna read";
+		mes "more of it so I can make";
+		mes "fun of Digotz. Bwahahaha!";
+		mes "But yeah, um, thanks. Not";
+		mes "that I'm grateful or anything.";
+		next;
+		mes "[Maku]";
+		mes "So, uh, I guess";
+		mes "I'll see you later.";
+		mes "Um, now I gotta get";
+		mes "ready for something.";
+		mes "^111111(But not to see Digotz!)";
+		if(countitem(7351))delitem 7351,1;
+		set friendship,9;
+		close;
+	break;
+
+	case 9:
+		mes "[Maku]";
+		mes "Why is Digotz";
+		mes "so late? This isn't";
+		mes "like him at all. Maybe";
+		mes "something's wrong?";
+		close;
+	break;
+
+	case 10:
+		mes "[Maku]";
+		mes "Why is Digotz";
+		mes "so late? This isn't";
+		mes "like him at all. Maybe";
+		mes "something's wrong?";
+		next;
+		mes "[Maku]";
+		mes "Eh, he might have";
+		mes "some kinda reason for";
+		mes "being late, but if he don't,";
+		mes "i've been saving a whole";
+		mes "six pack of kickass to open,";
+		mes "just for him. Heh heh heh~";
+		close;
+	break;
+
+	case 11:
+		mes "[Maku]";
+		mes "Why is Digotz";
+		mes "so late? This isn't";
+		mes "like him at all. Maybe";
+		mes "something's wrong?";
+		next;
+		mes "[Maku]";
+		mes "Eh, he might have";
+		mes "some kinda reason for";
+		mes "being late, but if he don't,";
+		mes "i've been saving a whole";
+		mes "six pack of kickass to open,";
+		mes "just for him. Heh heh heh~";
+		close;
+	break;
+	}
+
+failstr:
+	mes "[Maku]";
+	mes "Wha...? I dunno if Digotz";
+	mes "would say something like";
+	mes "that. You sure you heard";
+	mes "him carefully enough? It's";
+	mes "been a while, but I know";
+	mes "how Digotz talks, man.";
+	close;
+}
+
+yuno_in04.gat,107,14,4	script	Student	754,{
+
+	mes "[Joey Choryee]";
+	mes "This is a study area where";
+	mes "you're not supposed to speak,";
+	mes "walk or even breathe loudly.";
+	mes "Still, students like Benkastein";
+	mes "can tune out the whole world";
+	mes "when they study hard enough...";
+	if(friendship != 6)close;
+	next;
+	mes "[Joey Choryee]";
+	mes "Benkastein...?";
+	mes "He's in the north part.";
+	mes "of this room. He's a real";
+	mes "nice guy, but a little anal.";
+	mes "Well, he's too organized";
+	mes "and he labels everything!";
+	close;
+
+}
+
+yuno_in04.gat,96,106,4	script	Passionate Student	754,{
+
+	if(friendship == 10)goto s_Ask;
+	if(friendship3 == 2 || friendship3 == 3)goto s_Cont2;
+	if(friendship3 == 1)goto s_Cont;
+	mes "[Passionate Student]";
+	mes "Let's see, now.";
+	mes "Wind Magic, Black Magic,";
+	mes "Porings, ah, there it is";
+	mes "Monster race properties.";
+	mes "Hopefully this contains";
+	mes "the information I need...";
+	next;
+	if(friendship != 6)goto s_Dialog;
+	mes "Upon briefly glancing at";
+	mes "this student's belongings,";
+	mes "you notice that the name";
+	mes "\"Benkastein\" is printed";
+	mes "on them. This is the friend";
+	mes "mentioned by Maku and Digotz!";
+	next;
+	menu "Excuse me...",-;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Excuse me...";
+	mes "Benkastein?";
+	next;
+	mes "[Passionate Student]";
+	mes "...The world of humans";
+	mes "and the world of demons,";
+	mes "yes, yes... No, what I'm";
+	mes "looking for is a reference";
+	mes "to the heavens of Asgard.";
+	mes "Hmm, this here might help...";
+	next;
+	menu "Hey...",-;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Hey...";
+	mes "Over here.";
+	mes "Benkastein!";
+	next;
+	mes "[Passionate Student]";
+	mes "...Oh, now that's a very";
+	mes "interesting observation.";
+	mes "If I can incorporate that";
+	mes "into my thesis without too";
+	mes "much trouble, my standpoint";
+	mes "would look much more solid...";
+	next;
+	menu "HEY YOU...!",-;
+	mes "[" + strcharinfo(0) + "]";
+	mes "HEY YOU...!";
+	mes "BENKASTEIN~!";
+	next;
+	mes "[Passionate Student]";
+	mes "Oh, good heavens!";
+	mes "C-can't you keep";
+	mes "your voice down?";
+	mes "I-I'm trying to study!";
+	mes "No, wait. Have you been";
+	mes "calling me all this time?";
+	set friendship3,1;
+	close;
+
+s_Cont:
+	mes "[Passionate Student]";
+	mes "Oh, you startled me!";
+	mes "Still, I'm aware that it's";
+	mes "hard to get my attention";
+	mes "once I immerse myself";
+	mes "in a book. So, how can";
+	mes "I help you, adventurer?";
+	next;
+	menu "Tell him about Maku and Digotz.",-;
+	mes "[Benkastein]";
+	mes "Oh, how are my friends";
+	mes "doing? Oh, what? They're";
+	mes "having a huge fight just";
+	mes "because one's rich and";
+	mes "the other one's poor?";
+	mes "That's pretty childish!";
+	next;
+	mes "[Benkastein]";
+	mes "But then again, that's just";
+	mes "like them. ^111111*Sigh*^000000 I really want";
+	mes "to go back home and get those";
+	mes "two to make up, but I also need";
+	mes "to finish this thesis. Let's see...";
+	mes "What can I possibly do from here?";
+	next;
+	mes "[Benkastein]";
+	mes "Oh, I know what I can do!";
+	mes "Wait, but where did I put it?";
+	mes "Oh, how cold I lose something";
+	mes "so important? Wait! Would you";
+	mes "please wait a second while";
+	mes "I look for something?";
+	set friendship3,2;
+	close;
+
+s_Cont2:
+	mes "[Benkastein]";
+	mes "Aw nuts, this is";
+	mes "taking much longer";
+	mes "than I had expected.";
+	mes "Now where did I put";
+	mes "that thing? Hmmmm...";
+	if(friendship3 == 3)goto s_Cont3;
+	next;
+	mes "^3131FFPerhaps it would";
+	mes "be best if you help";
+	mes "Benkastein to look for";
+	mes "what he's searching for.";
+	close;
+
+s_Cont3:
+	next;
+	mes "[Benkastein]";
+	mes "Oh, is that it?";
+	mes "Did you find my";
+	mes "journal? Quick, let";
+	mes "me check. Yes, yes...";
+	mes "This is it! Thank you";
+	mes "for finding this for me!";
+	next;
+	mes "[Benkastein]";
+	mes "Would you mind doing";
+	mes "a favor for me? It'd be";
+	mes "better if I talk to them";
+	mes "myself, but I'm too busy";
+	mes "working on this thesis...";
+	next;
+	mes "[Benkastein]";
+	mes "Would you please give this";
+	mes "journal to Digotz and Maku?";
+	mes "I wrote it in when we were";
+	mes "really young, so it should";
+	mes "remind them of all the good";
+	mes "times we used to share.";
+	next;
+	mes "[Benkastein]";
+	mes "Anyway, this should at";
+	mes "least help them realize";
+	mes "how stupid they've been";
+	mes "acting. Thanks in advance,";
+	mes "and please take care of";
+	mes "Maku and Digotz for me.";
+	if(friendship == 6)set friendship,7;
+	close;
+
+s_Dialog:
+	mes "^3131FFThis student seems to";
+	mes "be dilligently conducting";
+	mes "intensive research on some";
+	mes "academic subject. For now,";
+	mes "it would be best to leave him";
+	mes "alone so that he can study.";
+	close;
+
+s_Ask:
+	mes "[Benkastein]";
+	mes "Were you able to bring";
+	mes "my journal to Digotz and";
+	mes "Maku? I'm pretty sure it'd";
+	mes "remind them of all the good";
+	mes "times we had. I know they";
+	mes "sure can be stubborn...";
+	next;
+	mes "[Benkastein]";
+	mes "Anyway, I really";
+	mes "appreciate all your";
+	mes "help. When I go back";
+	mes "home, I look forward to";
+	mes "seeing the two of them again.";
+	next;
+	mes "[Benkastein]";
+	mes "Until then, I need to research,";
+	mes "finish my thesis and accomplish";
+	mes "my academic goals. Oh, please";
+	mes "take this pass which will let you";
+	mes "go back and forth between the";
+	mes "rich and poor areas as my thanks.";
+	next;
+	mes "[Benkastein]";
+	mes "Anyway, I wish you";
+	mes "safety in your travels,";
+	mes "adventurer. When the three";
+	mes "of us get together, I'll be";
+	mes "sure to let you know~";
+	if(BaseLevel < 41)set BaseExp,BaseExp+49500;
+	else if(BaseLevel > 40 && BaseLevel < 61)set BaseExp,BaseExp+99000;
+	else if(BaseLevel > 60 && BaseLevel < 71)set BaseExp,BaseExp+198000;
+	else if(BaseLevel > 70 && BaseLevel < 81)set BaseExp,BaseExp+396000;
+	else if(BaseLevel > 80 && BaseLevel < 91)set BaseExp,BaseExp+594000;
+	else if(BaseLevel > 90)set BaseExp,BaseExp+792000;
+	getitem 7350,1;
+	set friendship,11;
+	set friendship3,0;
+	close;
+
+}
+
+yuno_in04.gat,168,117,1	script	Book	111,{
+
+	if(friendship3 >= 3)goto Book2;
+	if(friendship3 == 2)goto Book;
+	mes "^3131FFThis book is labeled,";
+	mes "\"Benkastein's Journal";
+	mes "Vol. 6.\".";
+	close;
+Book:
+	mes "^3131FFThis book is labeled,";
+	mes "\"Benkastein's Journal";
+	mes "Vol. 6.\". This is probably";
+	mes "what Benkastein was trying";
+	mes "to find, so it might be best to";
+	mes "bring this and show it to him";
+	set friendship3,3;
+	getitem 7351,1;
+	close;
+Book2:
+	mes "^3131FFThis is where you found";
+	mes "the book that Benkastein";
+	mes "was looking for.";
+	close;
+
+}
+
+yuno_in04.gat,169,109,1	script	Ambitious Hollgrehenn	111,{
+
+	mes "*Hollgrehenn: The Ambition*";
+	mes "By Aragham Caul*";
+	mes "";
+	mes "";
+	mes "";
+	mes "";
+	mes "Publisher:";
+	mes "Muha Books, Co.";
+	next;
+	mes "...";
+	mes "He would stop at nothing";
+	mes "to have the greatest weapon";
+	mes "in the world in his possession.";
+	mes "He became a smith so that he";
+	mes "could discern which weapons";
+	mes "were the most powerful...";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "That's strange...";
+	mes "The next page";
+	mes "has been torn out.";
+	close;
+
+}
+
+yuno_in04.gat,171,117,1	script	List of Books	111,{
+
+	mes "^3131FFYou find a series";
+	mes "of paperback books";
+	mes "with titles, printed";
+	mes "on the binding in an";
+	mes "elegantly decorative";
+	mes "cursive style font.";
+	mes "The titles include...";
+	next;
+	mes "*Volcanic Passion*";
+	mes "*Midnight Crescendo*";
+	mes "*A Paris Affair*";
+	mes "*Fever Pitch*";
+	mes "*The Cowyboy Next Door*";
+	mes "*Platonic Romance*";
+	mes "*How Lara Got Her Groove Back*";
+	next;
+	mes "^000000[" + strcharinfo(0) + "]";
+	mes "What the...?!";
+	mes "This place even has";
+	mes "a romance novel section?";
+	close;
+
 }
\ No newline at end of file
diff --git a/npc/quests/quests_louyang.txt b/npc/quests/quests_louyang.txt
index 09eb261a0..e24a48650 100644
--- a/npc/quests/quests_louyang.txt
+++ b/npc/quests/quests_louyang.txt
@@ -1,3159 +1,3159 @@
-//===== eAthena Script ======================================= 

-//= Quest NPCs related to Louyang

-//===== By: ================================================== 

-//= Evera and The eAthena Dev Team

-//===== Current Version: ===================================== 

-//= 1.1

-//===== Compatible With: ===================================== 

-//= eAthena 1.0

-//===== Description: ========================================= 

-//= Soup Quest, Tool Master Quest, Doctor Quest,

-//= Poison King  Quest

-//===== Additional Comments: ================================= 

-//= 1.0 Initial Release [Evera]

-//= 1.1 Fixed double levelup bug [Lupus]

-//============================================================ 

-

-//============================================================

-//======================================================= Soup

-//====================================================== Quest

-lou_fild01.gat,195,177,4	script	Jiu Lian Bu#01	819,{

-	if(QL_SOUP2) goto L_DONE;

-	if(QL_SOUPQUEST)goto L_WHERE;

-	if(QL_GOTFAKESOUP) goto L_FAKE;

-	if(QL_GOTDRAGONSOUP) goto L_SOUP;

-	if(QL_ACCEPTSOUP) goto L_GORESTA;

-	mes "[Jiu Lian Bu]";

-	mes "Hey~";

-	mes "What's up?";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "I don't like hanging around too many people, so I came here. Listening to this strean really puts my mind to ease.";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "No offense, but I'm upset";

-	mes "at the sheer number of tourists coming over to Louyang";

-	mes "Sure, I can understand that our town is attractive and has beautiful sights.";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "But I just can't stand crowds of people. People gather like sheep to any place they hear is popular, and that really bugs me!";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "Speaking of which, there's even";

-	mes "a place in Louyang that's just like";

-	mes "that. Man, I hate that restaurant!";

-	next;

-	menu "What restaurant?",-,"Ignore him.",M_IGNORE;

-

-	mes "[Jiu Lian Bu]";

-	mes "In the east side of Louyang, there's a restaurant built on a pond. It's been around for a long time, selling food for ridiculous prices!";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "Oh sure, the food and flavors";

-	mes "there have a long history, but I";

-	mes "don't think that justifies how they";

-	mes "charge their patrons!";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "As a young man";

-	mes "who loves his town,";

-	mes "I can't let them manipulate my";

-	mes "people like that!";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "But everyone here already knows who I am, so I can't do anything! I've already had one too many, shall we say, 'incidents' with the people living here already.";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "I've been caught for tagging walls, shoplifting, camming, stealing a few girlfriends... So yeah, I'm not exactly known as a sterling citizen.";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "Say, wait a minute. The local";

-	mes "people around here aren't too";

-	mes "familiar with you. Hmmm...";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "Would you sneak into that restaurant and steal the ^3131FFDragon Soup Broth^000000 for me?";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "The Dragon Soup Broth is the";

-	mes "backbone for the restaurant";

-	mes "owner's secret recipe.";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "But they've been cheating their";

-	mes "customers by watering that broth";

-	mes "down and selling it for a";

-	mes "ridiculous price! Serves them right";

-	mes "if their secrets were stolen!";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "If you can steal some of the broth,";

-	mes "I'll pay you back. Whaddaya say?";

-	next;

-	menu "I'll do it!",-,"No, stealing is wrong.",M_NO;

-

-	mes "[Jiu Lian Bu]";

-	mes "Great!";

-	mes "I knew you'd";

-	mes "see things my way!";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "Okay, the restaurant is at the East side of Louyang. But you got to be careful. The workers there watch over that broth like freakin' hawks!";

-	set QL_ACCEPTSOUP,1;

-	close;

-

-M_NO:

-	mes "[Jiu Lian Bu]";

-	mes "Stealing?";

-	mes "You may have";

-	mes "a point there.";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "But then, that restaurant has been doing that to their customers for years! So, technically. we'd just be stealing back.";

-	close;	

-

-M_IGNORE:

-	mes "[Jiu Lian Bu]";

-	mes "That join isn't even that great. I mean, it's so obvious that they rip off their customers! Dragon Soup?! More like... Dragon Crap Soup!";

-	close;

-

-L_GORESTA:

-	mes "[Jiu Lian Bu]";

-	mes "Huh...?";

-	mes "Whoa, I thought you were on you way to the restaurant. You better get a move on.";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "Alright then, pal. Make sure the";

-	mes "guys who work there don't catch you. Good luck~";

-	close;

-

-L_FAKE:

-	mes "[Jiu Lian Bu]";

-	mes "Wow! You made it!";

-	mes "Let me see...";

-	next;

-	mes "^445BA7Jiu Lian Bu takes a hearty sip of the broth you've managed to steal for him.";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "Ohhhh man....";

-	mes "This is so not Dragon Soup Broth. Sorry, but would you go and try to get it again?";

-	set QL_GOTFAKESOUP,0;

-	close;

-

-L_SOUP:

-	mes "[Jiu Lian Bu]";

-	mes "Wow! You made it!";

-	mes "Let me see...";

-	next;

-	mes "^445BA7Jiu Lian Bu takes a hearty sip of the broth you've managed to steal for him.";

-	next;	

-	mes "Ooooh. Ooh yeah.";

-	mes "This is the stuff.";

-	mes "Muhahahahahaha~!";

-	mes "This'll put the chef";

-	mes "in agony for a while!";

-	next;

-	set QL_GOTDRAGONSOUP,0;

-	set QL_ACCEPTSOUP,0;

-	set QL_SOUPQUEST,1;

-	mes "[Jiu Lian Bu]";

-	mes "Good job, chum! Heh heh heh, because you risked your neck for me, I'm gonna show you an awesome place! Just follow me~";

-	close2;

-	warp "lou_fild01.gat",180,171;

-	end;

-

-L_DONE:

-	mes "[Jiu Lian Bu]";

-	mes "Hey~";

-	mes "So how ya been, ya smooth criminal?";

-	mes "You want to visit that place again?";

-	next;

-	menu "Sure, let's go~",-,"Nah, maybe next time.",M_NAH;

-

-	mes "[Jiu Lian Bu]";

-	mes "Alright~";

-	mes "Let's get";

-	mes "a groove on.";

-	close2;

-	warp "lou_fild01.gat",180,171;

-	end;

-

-M_NAH:

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "Not in the mood, eh?";

-	mes "No prob. But feel free";

-	mes "to come see me whenever";

-	mes "you want.";

-	close;

-L_WHERE:

-	mes "[Jiu Lian Bu]";

-	mes "Hey where did you go?";

-	mes "Come up again and I'll";

-	mes "give you your reward.";

-	close2;

-	warp "lou_fild01.gat",180,171;

-	end;

-}

-

-lou_fild01.gat,175,174,4	script	Jiu Lian Bu#02	819,{

-	if(QL_SOUPQUEST < 1) goto L_DOQUEST;

-	if(QL_SOUP2 < 1) goto L_1STTIME;

-	mes "[Jiu Lian Bu]";

-	mes "So...";

-	mes "Whaddya want to do?";

-	emotion e_heh;

-	next;

-	menu "Shout.",-,"Leave.",M_LEAVE;

-

-	mes "[Jiu Lian Bu]";

-	mes "Ready~!";

-	mes "Say it out loud!";

-	next;

-	input @loushout$;

-	mapannounce "lou_fild01.gat","'" + strcharinfo(0) + "' shouts: " + @loushout$ ,1,0x9CFF00;

-	mes "[" + strcharinfo(0) + "]";

-	mes @loushout$;

-	close;

-	

-M_LEAVE:

-	mes "[Jiu Lian Bu]";

-	mes "Ahhh...";

-	mes "Alright, let's";	

-	mes "get a groove on.";

-	close2;

-	warp "lou_fild01.gat",197,174;

-	end;

-

-L_DOQUEST:

-	mes "[Jiu Lian Bu]";

-	mes "Who are you?";

-	mes "Get off my turf!";

-	close2;

-	warp "lou_fild01.gat",197,174;

-	end;

-

-L_1STTIME:

-	mes "[Jiu Lian Bu]";

-	mes "So...";

-	mes "Whaddya think?";

-	mes "Prettiest place in Louyang, isn't it?";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "Whenever I'm depressed or need to relax, I just sit here and enjoy the breeze. It helps me forget all my worries.";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "Heh heh, the best part is, this place is far away from my older siste. Man, that woman can nag, nag, nag, all day long.";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "Why don't you sit down and close your eyes, and feel that soothing wind. It's pretty refreshing";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "Also...";

-	mes "I'm a little";

-	mes "embarrassed to";

-	mes "say this but...";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "I'm the kind of guy who speaks his mind. If there's something you just wanna say, but can't, it's kind of like poison in your mind.";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "You know what I'm talking about, right? If you bottle something up inside of you, it just causes you anxiety you don't need.";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "So..";

-	mes "This is what you do.";

-	mes "Clench your first, take";

-	mes "a deep breath.";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "And just yell";

-	mes "Whatever you want!";

-	mes "If you don't know";

-	mes "the words, just";

-	mes "screaming will do.";

-	mes "Let everything out!";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "Ready~!";

-	mes "Say it out loud!";

-	next;

-	input @loushout$;

-	mapannounce "lou_fild01.gat","'" + strcharinfo(0) + "' shouts: " + @loushout$ ,1,0x9CFF00;

-	mes "[" + strcharinfo(0) + "]";

-	mes @loushout$;

-	set QL_SOUP2,1;

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "So, how do you feel?";

-	mes "Don't you feel better now? Hahaha~";

-	next;

-	mes "[Jiu Lian Bu]";

-	mes "So from now on, whenever you";

-	mes "want to relieve yourself of stress,";

-	mes "come see me and we'll come back to";

-	mes "this place. Call it my way of";

-	mes "saying thanks.";

-	close;	

-}

-

-lou_in02.gat,61,175,2	script	Employee#01	818,2,2{

-	mes "[Ya Hua]";

-	mes "^6A6A6A*Yawn...*";

-	close;

-

-OnTouch:

-	if(QL_GOTDRAGONSOUP == 1 || QL_GOTFAKESOUP == 1) goto S_CAUGHT;

-	end;

-

-S_CAUGHT:

-	mes "[Ya Hua]";

-	mes "^6A6A6A*Yawn...*";

-	mes "^000000Eyelids...";

-	mes "Getting...";

-	mes "Heavier...";

-	next;

-	mes "[Ya Hua]";

-	mes "Wait a sec...";

-	mes "Are you a thief?!";

-	mes "Get out of here!!";

-	if(QL_GOTFAKESOUP == 1) set QL_GOTFAKESOUP,0;

-	if(QL_GOTDRAGONSOUP == 1) set QL_GOTDRAGONSOUP,0;

-	next;

-	mes "^3131FFYou have failed";

-	mes "^3131FFto steal the pot.";

-	close;

-}

-

-lou_in02.gat,54,174,6	script	Employee#02	822,{

-	mes "[Chang Pai]";

-	mes "^6A6A6A*Yawn...*";

-	close;

-}

-

-lou_in02.gat,50,185,4	script	Pot#01	111,{

-	if(QL_SOUPQUEST == 1) goto L_EMPTY;

-	if(QL_ACCEPTSOUP < 1) goto L_NORMAL;

-	mes "^3131FFBeneath the shadows, you find a large pot filled with dark, red liquid. What do you want to do?";

-	next;

-	menu "Take the pot.",-,"Look for another pot.",M_LOOK;

-

-	if (QL_GOTDRAGONSOUP == 1) set QL_GOTDRAGONSOUP,0;

-	mes "^3131FFYou take a careful look around. It wouldn't be wise to steal this now if anyone is watching.";

-	next;

-	mes "^3131FFSince the restaurant is closed, the whole place is completely quiet. The employees are all asleep.";

-	next;

-	mes "^3131FFYou carefully lift the pot, and although it's heavy, you think you can carry it.";

-	next;

-	mes "^3131FFAll you have";

-	mes "^3131FFto do now is get";

-	mes "^3131FFaway from this restaurant";

-	mes "^3131FFwithout getting caught...";

-	set QL_GOTFAKESOUP,1;

-	close;

-

-M_LOOK:

-	mes "^3131FFYou decide to";

-	mes "look for another pot.";

-	close;

-

-L_NORMAL:

-	mes "[Chef]";

-	mes "Ah...";

-	mes "Please, do not";

-	mes "touch the pots!";

-	close;

-

-L_EMPTY:

-	mes "^3131FFYou found a pot, however it's empty.";

-	close;

-}

-

-lou_in02.gat,49,185,4	script	Pot#02	111,{

-	if(QL_SOUPQUEST == 1) goto L_EMPTY;

-	if(QL_ACCEPTSOUP < 1) goto L_NORMAL;

-	mes "^3131FFBeneath the shadows, you find a large pot filled with dark, red liquid. What do you want to do?";

-	next;

-	menu "Take the pot.",-,"Look for another pot.",M_LOOK;

-

-	if (QL_GOTFAKESOUP == 1) set QL_GOTFAKESOUP,0;

-	mes "^3131FFYou take a careful look around. It wouldn't be wise to steal this now if anyone is watching.";

-	next;

-	mes "^3131FFSince the restaurant is closed, the whole place is completely quiet. The employees are all asleep.";

-	next;

-	mes "^3131FFYou carefully lift the pot, and although it's heavy, you think you can carry it.";

-	next;

-	mes "^3131FFAll you have";

-	mes "^3131FFto do now is get";

-	mes "^3131FFaway from this restaurant";

-	mes "^3131FFwithout getting caught...";

-	set QL_GOTDRAGONSOUP,1;

-	close;

-

-M_LOOK:

-	mes "^3131FFYou decide to";

-	mes "look for another pot.";

-	close;

-

-L_NORMAL:

-	mes "[Chef]";

-	mes "Ah...";

-	mes "Please, do not";

-	mes "touch the pots!";

-	close;

-

-L_EMPTY:

-	mes "^3131FFYou found an empty pot.";

-	close;

-}

-

-lou_in02.gat,62,183,4	script	Chef	820,{

-	if(QL_SOUPQUEST == 1) goto L_FINISHED;

-	mes "[Wang Shi Long]";

-	mes "Hello, are you";

-	mes "one of our customers?";

-	mes "I am Wang Shi Long";

-	mes "the chef of this restaurant.";

-	next;

-	mes "[Wang Shi Long]";

-	mes "My family has server food";

-	mes "to Lord Bai Long for a long time.";

-	mes "This restaurant has been handed";

-	mes "down the family line, and I am the successor~";

-	next;

-	mes "[Wang Shi Long]";

-	mes "Our specialty, Dragon Soup,";

-	mes "won especially high praise from";

-	mes "Lord Bai Long, who is known for";

-	mes "his extremely discerning sense of taste.";

-	next;

-	mes "[Wang Shi Long]";

-	mes "I'm also proud to say that we cook";

-	mes "with only the freshest and highest";

-	mes "quality ingredients.";	

-	next;	

-	mes "[Wang Shi Long]";

-	mes "We've always been popular in";

-	mes "Louyang for hundreds and hundreds";

-	mes "of years because of our high";

-	mes "quality gourmet cuisine.";

-	next;

-	mes "[Wang Shi Long]";

-	mes "In this dry and hot weather,";

-	mes "Dragon Soup is the best food for";

-	mes "any appetite. I suggest that you";

-	mes "try a bowl. You'll be quite";

-	mes "pleased!";

-	close;

-

-L_FINISHED:

-	mes "[Wang Shi Long]";

-	mes "^6A6A6A*Moans and Cries*^000000";

-	mes "I guess this is it...!";

-	mes "The end of my family's glory.";

-	mes "Someone stole the base broth";

-	mes "of my Dragon Soup!";

-	next;

-	mes "[Wang Shi Long]";

-	mes "What should I do, now?";

-	mes "Without Dragon Soup, my family's";

-	mes "restaurant will now just be like";

-	mes "all the others...";

-	close;

-}

-

-lou_in02.gat,42,186,4	script	Liu Jia Lim	816,{

-	if(QL_SOUPQUEST == 1) goto L_FINISHED;

-	mes "[Liu Jia Lim]";

-	mes "Do you know what's the best dish at this restaurant? It's Dragon Soup! They've been selling it here for as long as this restaurant has been around";

-	next;

-	mes "[Liu Jia Lim]";

-	mes "It's delicate taste comes from a broth extracted from pure meat that doesn't contain any fat. So it's also a very popular diet food for the ladies.";

-	next;

-	mes "It's tasty and really good for your health. Why don't you order a bowl? I've never known anyone to taste Dragon Soup and not love it!";

-	close;

-

-L_FINISHED:

-	mes "[Liu Jia Lim]";

-	mes "Do you know what was this restaurant's best dish throughout all of its history? Dragon Soup!";

-	next;

-	mes "[Liu Jia Lim]";

-	mes "It's delicate taste comes from a broth extracted from pure meat that doesn't contain any fat. So it's also a very popular diet food for the ladies.";

-	next;

-	mes "[Liu Jia Lim]";

-	mes "I'm not sure what happened, but people say this restaurant no longer sells Dragon Soup.";

-	mes "Was it because of the price...?";

-	close;

-}

-

-lou_in02.gat,80,173,2	script	Li Min	746,{

-	if(QL_SOUPQUEST == 1) goto L_FINISHED;

-	mes "[Li Min]";

-	mes "Well, I don't really";

-	mes "live here in Louyang.";

-	mes "Still, I come here often";

-	mes "enough to visit.";

-	next;

-	mes "[Li Min]";

-	mes "I just returned";

-	mes "because I've got";

-	mes "a huge craving for the";

-	mes "food I tasted here";

-	mes "a while ago.";

-	next;

-	mes "[Li Min]";

-	mes "For some reason, I can't forget it.";

-	mes "I can't get it out of my mind!";

-	next;

-	mes "[Li Min]";

-	mes "The taste, the texture.";

-	mes "The sweetness, melting down into my";

-	mes "mouth, and it's tempting scent";

-	mes "lingering on my lips...";

-	next;

-	mes "[Li Min]";

-	mes "Ummmmm...";

-	mes "Royal Jelly!";

-	mes "It makes my";

-	mes "mouth water~";

-	close;

-

-L_FINISHED:

-	mes "[Li Min]";

-	mes "^6A6A6A*Sigh*^000000 I am so disappointed. I came";

-	mes "all the way down here to taste the";

-	mes "food! I can't believe they don't";

-	mes "sell it anymore!";

-	next;

-	mes "[Li Min]";

-	mes "The worst part is that I'm already";

-	mes "addicted to the taste! ^6A6A6A*Sob...*^000000";

-	close;

-}

-

-louyang.gat,174,150,4	script	Liu Chi Ling	815,{

-	if(QL_SOUPQUEST == 1) goto L_RUMOR;

-	mes "[Jiu Chi Ling]";

-	mes "I'm worried about my brother.";

-	mes "He's young, rebellious and doesn't";

-	mes "listen to anybody...";

-	next;

-	mes "[Jiu Chi Ling]";

-	mes "He just left the";

-	mes "house while he was";

-	mes "complaining about";

-	mes "that restaurant...";

-	next;

-	mes "[Jiu Chi Ling]";

-	mes "^6A6A6A*Sigh~~*^000000";

-	mes "I'm not going to let him get";

-	mes "away this time!";

-	close;

-

-L_RUMOR:

-	mes "[Jiu Chi Ling]";

-	mes "There's a strange rumor going";

-	mes "around that the restaurant is no";

-	mes "longer selling Dragon Soup...";

-	next;

-	mes "[Jiu Chi Ling]";

-	mes "Do you think";

-	mes "my brother did";

-	mes "something bad again!?";

-	mes "I hope not! If he did...";

-	mes "What am I supposed to do?!";

-	close;

-}

-

-

-//============================================================

-//================================================ Tool Master

-//====================================================== Quest

-lou_in02.gat,210,47,8	script	City Hall Officer	825,{

-	if(QL_GOTCOMPROP == 1)goto L_BEENTOHIM;

-	if(QL_LOUBRIBE == 1)goto L_OFFICER;

-	if(QL_BEENTOSTORAGE == 1)goto L_QUEST;

-	mes "[Jin Chiyuan]";

-	mes "^6A6A6A*Yawn~*^000000";

-	mes "Gosh, this hot weather is such a pain. Oh? You look like a tourist. Are you enjoying your stay?";

-	next;

-	mes "[Jin Chiyuan]";

-	mes "Although we've been having bad weather recently, there are many good places to visit in Louyang. I hope you have a good time.";

-	close;	

-

-L_QUEST:

-	mes "[Jin Chiyuan]";

-	mes "Hm? A Rune-Midgardian? Now, how may I help you?";

-	next;

-	menu "I need a document.",-,"I just dropped by",M_DROP;

-

-	mes "[Jin Chiyuan]";

-	mes "Ah, you do?";

-	mes "Unfortunately, there are many people waiting in line to procure goverment forms, so it will take a while to handle your request.";

-	next;

-	mes "[Jin Chiyuan]";

-	mes "^6A6A6A*whispers*";

-	mes "^2A2A2AWell, there is a way that you can, shall we say, expedite our processing of your request...^000000";

-	next;

-	menu "Huh? Come again?",-,"A little zeny to cut the red tape, eh?",M_BRIBE;

-

-	mes "[Jin Chiyuan]";

-	mes "^6A6A6A*Ahem!*^000000 Nothing.";

-	mes "Nothing of importance. Now, I'm very busy, so if you would go fill the application over there...";

-	close;

-

-M_BRIBE:

-	input @loubribe;

-	if(@loubribe < 10000)goto L_POOR;

-	if(zeny < @loubribe)goto L_NOTENOUGH;

-	set Zeny, Zeny - @loubribe;

-	set QL_LOUBRIBE,1;

-	mes "[Jin Chiyuan]";

-	mes "What...?!";

-	mes "That's not what I meant, but if you insist on donating to our government...";

-	next;

-	mes "[Jin Chiyuan]";	

-	mes "^6A6A6A*Whispers*";

-	mes "^2A2A2AWhen you go upstairs, another officer will give you the document you want.^6A6A6A *Ahem* ^000000Louyang thanks you!";

-	close;

-

-L_POOR:

-	mes "[Jin Chiyuan]";

-	mes "Good lord,";

-	mes "What are you thinking? What am I, a beggar?! That's a poor excuse for a bribe!";

-	next;

-	emotion e_pif;

-	mes "[Jin Chiyuan]";

-	mes "I mean...";

-	mes "How dare you bribe an officer of the law! I hope other outsiders are not like you! Please leave immediately.";

-	close;

-

-M_DROP:

-	mes "[Jin Chiyuan]";

-	mes "Oh well...";

-	mes "Let me tell you that this is not a good time for tourists. I hope you don't wander into places you're not supposed to be.";

-	next;

-	mes "[Jin Chiyuan]";

-	mes "Quite frankly,";

-	mes "it's a dangerous climate for curiosity right now. Please, be careful.";

-	close;

-

-L_NOTENOUGH:

-	mes "[Jin Chiyuan]";

-	mes "You don't even have that much money.";

-	close;

-

-L_OFFICER:

-	mes "[Jin Chiyuan]";

-	mes "Haven't you met the officer I told you about? I've contacted him about the matter, so you may meet him upstairs.";

-	next;

-	mes "[Jin Chiyuan]";

-	mes "Hahahaha...";

-	mes "Take care,";

-	mes "Rune-Midgardian.";

-	close;

-

-L_BEENTOHIM:

-	emotion e_heh;

-	mes "[Jin Chiyuan]";

-	mes "Ah~";

-	mes "You met him,";

-	mes "didn't you?";

-	mes "Hahaha...";

-	mes "Enjoy your stay";

-	mes "in Louyang!";

-	close;

-}

-

-lou_in02.gat,156,38,8	script	Studying Officer	822,{

-	if(QL_GOTCOMPROP == 1)goto L_RANT2;

-	if(QL_LOUBRIBE == 1)goto L_BRIBED;

-	if(QL_BEENTOSTORAGE == 1)goto L_RANT;

-	mes "[Huang Zhishu]";

-	mes ".....";

-	mes "^6A6A6A*Mumble mumble*^000000";

-	next;

-	mes "^3131FFHe appears to be rummaging around for some documents and takes no notice of you.";

-	next;

-	menu "Excuse me.",-,"Pass him.",M_PASS;

-	

-	mes "[Huang Zhishu]";

-	mes "Hmmm...?";

-	mes "Well...";

-	mes "...";

-	mes "I see...";

-	mes "^6A6A6A*Mumble mumble...*^000000";

-	close;

-

-M_PASS:

-	mes "[Huang Zhishu]";

-	mes ".....";

-	mes "^6A6A6A*Mumble mumble*^000000";

-	close;

-

-L_RANT:

-	mes "[Huang Zhishu]";

-	mes "Books contain the spirit and ideas of their authors. Any work of are can be considered a window into the soul of its creator.";

-	next;

-	mes "[Huang Zhishu]";

-	mes "^6A6A6A*Mumble mumble...*^000000";

-	mes "Hmm... I see...";

-	mes "Ah, I see....";

-	mes "^6A6A6A*Mumble mumble...*^000000";

-	close;

-

-L_BRIBED:

-	mes "^3131FF*Rummage rummage...*^000000";

-	next;

-	menu "Sorry about that.",-,"I came to pick up my documents.",L_DOCU;

-

-	mes "[Huang Zhishu]";

-	mes "Apology accepted.";

-	mes "Hmmm....";

-	mes "Oh I see, I see...";

-	next;

-	emotion e_gasp;

-	mes "^3131FF*Rummage rummage...*";

-	mes "^3131FF..........";

-	close;	

-

-L_DOCU:

-	mes "[Huang Zhishu]";

-	mes "Huh?";

-	mes "Ah...";

-	mes "You're the one I'm waiting for. So what kind of document did you need?";

-	input @loudocument$;

-	next;

-	mes "[Huang Zhishu]";

-	mes "Let's see now.";

-	mes "You want..";

-	mes "a " + @loudocument$ + "?";

-	next;

-	if(@loudocument$ != "Communication Proposal")goto L_WHAT;

-	mes "[Huang Zhishu]";

-	mes "Now where did I put that? You want a Communication Proposal, huh? I think I'll need some time to find it. Ah, right. I think I know where I put that.";

-	next;

-	mes "...";

-	next;

-	mes "...";

-	mes "......";

-	next;

-	mes "...";

-	mes "......";

-	mes ".........";

-	next;

-	mes "...";

-	mes "......";

-	mes ".........";

-	mes "............";

-	next;

-	mes "...";

-	mes "......";

-	mes ".........";

-	mes "............";

-	mes "...............";

-	next;

-	mes "[Huang Zhishu]";

-	mes "Here it is. Someone asked me for the same document a few days ago so I was able to find it again pretty easily. I hope it's useful to you.";			

-	set QL_GOTCOMPROP,1;

-	set QL_LOUBRIBE,0;

-	set QL_BEENTOSTORAGE,0;

-	close;

-

-L_WHAT:

-	mes "[Huang Zhishu]";

-	mes "Huh?";

-	mes "Wha...";

-	next;

-	mes "[Huang Zhishu]";

-	mes "I'm sorry but I don't think we have that one. You might want to check the name of the document once more, and then come back to me.";

-	close;

-

-L_RANT2:

-	emotion e_ok;

-	mes "[Huang Zhishu]";

-	mes "Hmmm...?";

-	mes "Do you think I need to go outside more often? Well, I guess for some reason, I don't feel well. I guess I really should get some fresh air.";

-	mes "^6A6A6A*Yawn...*^000000";

-	next;

-	mes "[Huang Zhishu]";

-	mes "But you should get out more often yourself! It's not a good idea to always stay home. If you don't get some exercise when you're young, it could affect your health later.";

-	close;

-}

-

-lou_in02.gat,248,166,2	script	Tool Shop Master	824,{

-	if(QL_GOTHERB == 1)goto L_HERB;

-	if(QL_TOOLMASTER == 1)goto L_STORAGE;

-	if(QL_DOCQUEST == 1)goto L_QUEST;

-L_HERB:

-	mes "[Wang Chuiyi]";

-	mes "My business hasn't been doing well recently. And what is wrong with this weather? I don't know what's going on with the world...";

-	close;

-

-L_QUEST:

-	mes "[Wang Chuiyi]";

-	mes "Darn it!";

-	mes "I hate this";

-	mes "weather...!";

-	next;

-	emotion e_what;

-	mes "[Wang Chuiyi]";

-	mes "Um? Can I help";

-	mes "you with anything?";

-	next;

-	menu "I'm here to get something for the doctor...",-,"I agree, the weather really is bad.",M_WEATHER;

-

-	mes "[Wang Chuiyi]";

-	mes "Huh?";

-	mes "An errand for the doctor? She must have run out of medicine again. Go ahead and check the storage.";

-	next;

-	mes "[Wang Chuiyi]";

-	mes "You can find the storage on the opposite side of this building. There, you'll see a guy named Jiang Xiayou. Go ahead and ask him for the stuff you need.";

-	set QL_TOOLMASTER,1;

-	close;

-

-M_WEATHER:

-	mes "[Wang Chuiyi]";

-	mes "Tell me about it. This weather keeps stressing me out. Damn, I don't think I'll live very long if I keep getting aggravated like this by the weather...";

-	close;

-

-L_STORAGE:

-	mes "[Wang Chuiyi]";

-	mes "You can find the storage on the opposite side of this building. There, you'll see a guy named Jiang Xiayou. Go ahead and ask him for the stuff you need.";

-	close;

-}

-

-lou_in02.gat,201,166,5	script	Storage Keeper	819,{

-	if(QL_GOTCOMPROP == 1)goto L_FINALLY;

-	if(QL_BEENTOSTORAGE == 1)goto L_LAZY;

-	if(QL_TOOLMASTER == 1)goto L_QUEST;

-	mes "[Jiang Xiayou]";

-	mes "^6A6A6A*Yawn...*^000000";

-	mes "This is boring...";

-	mes "So boring, it's ridiculous. I don't want to waste any more time here, I've got important things to do...";

-	close;

-

-L_QUEST:

-	mes "[Jiang Xiayou]";

-	mes "Huh?";

-	mes "What, what are you doing here? If you don't need anything, you better get a move on.";

-	next;

-	menu "Sorry about that.",-,"It's hot isn't it?",M_HOT,"I'm on an errand for the doctor.",M_ERRAND;

-

-	mes "[Jiang Xiayou]";

-	mes "That's right!";

-	mes "You don't mess with a person in this hot weather! Now, go away. Can't you see I'm busy!";

-	close;

-

-M_HOT:

-	mes "[Jiang Xiayou]";

-	mes "You don't have to ask me that. I can feel if for myself! Now, I got a bunch of things to take care of, so quit bugging me. Damn, it's hot!";

-	close;

-

-M_ERRAND:

-	mes "[Jiang Xiayou]";

-	emotion e_gasp;

-	mes "Oh yeah?";

-	mes "Well, why didn't you say so? Let's see.";

-	mes "Hmmm...";

-	next;

-	mes "[Jiang Xiayou]";

-	mes "Actually, could you help me out first? Don't worry, it's not so hard but it's pretty important for me. Once you help me out, I'll get what you need.";

-	next;

-	menu "Um, what is it?",-,"Sorry, I'm busy.",L_BUSY;

-

-	mes "[Jiang Xiayou]";

-	mes "Cool, thanks. I have to go get some official documents from City Hall, but I can't leave this storage area since no one can take over my shift.";

-	next;

-	mes "[Jiang Xiayou]";

-	mes "So I want you to go get the documents from City Hall for me. I don't think it'll take much of your time.";

-	next;

-	mes "[Jiang Xiayou]";

-	mes "Just go east from here and look for the building that looks sort of like it was made in gauge form. That's City Hall.";

-	next;

-	mes "[Jiang Xiayou]";

-	mes "I don't get why the government spent so much money making that building, but anyway, I hope you can do that for me.";

-	next;

-	mes "[Jiang Xiayou]";

-	mes "Oh, I almost forgot.";

-	mes "You have to ask for a specific type of document, so let me tell you right now.";

-	next;

-	mes "[Jiang Xiayou]";	

-	mes "This is important,";

-	mes "so don't forget this.";

-	mes "When the guy asks what you need, you tell him: '^FF0000Communication Proposal^000000' Just like that?";

-	next;

-	mes "[Jiang Xiayou]";

-	mes "If you don't specify the documents you need, they won't give you anything. So be careful and don't forget!";

-	set QL_BEENTOSTORAGE,1;

-	close;

-

-L_BUSY:

-	mes "[Jiang Xiayou]";

-	mes "Bah~!";

-	mes "Forget it, then!";

-	next;

-	mes "[Jiang Xiayou]";

-	mes "The medicines you're looking for might be around here. so look around. If it weren't for the doctor, I wouldn't even let you hang around, you know that?";

-	close;

-

-L_LAZY:

-	mes "[Jiang Xiayou]";

-	mes "Huh?";

-	mes "Haven't you gone to City Hall yet?";

-	mes "What a lazy ass";

-	next;

-	mes "[Jiang Xiayou]";

-	mes "Shouldn't you hurry to get that medicine to the doc? We're talking a man's life at stake, that mean anything to you?";

-	next;

-	mes "[Jiang Xiayou]";

-	mes "I guess you're";

-	mes "the forgetful type...";

-	mes "When the guy asks what you need, you tell him:";

-	mes "'^FF0000Communication Proposal^000000'.";

-	next;

-	mes "[Jiang Xiayou]";

-	mes "Just like that.";

-	mes "Now, go to it, tiger.";

-	close;

-

-L_FINALLY:

-	mes "[Jiang Xiayou]";

-	mes "You finally brought it! Haha, I just got everything you need, too. Let me see...";

-	mes "Yup this is it!";

-	mes "Good, good...";

-	next;

-	mes "^3131FF*Rummage rummage...*";

-	mes "^3131FF......";

-	next;

-	menu "Excuse me.",-;

-	mes "[Jiang Xiayou]";

-	mes "Huh?";

-	mes "Ah....";

-	mes "Haha...";

-	mes "Sorry about";

-	mes "that. Hahaha~";

-	next;

-	getitem	7252,1; //Herbal Medicine

-	mes "[Jiang Xiayou]";

-	mes "Ah! Here you go. Even if it was kind of annoying to do, I guess we gotta help each other, right? Alright then, I'll see ya around.";

-	set QL_GOTHERB,1;

-	set QL_BEENTOSTORAGE,0;

-	set QL_GOTCOMPROP,0;

-	set QL_TOOLMASTER,0;

-	close;

-}

-

-

-//============================================================

-//===================================================== Doctor

-//====================================================== Quest

-lou_in02.gat,265,69,4	script	Doctor	814,{

-	if(QL_DOCQUEST == 1) goto L_MED;

-	if(QL_DOCQUEST == 2) goto L_RANT;

-	if(QL_DOCQUEST == 3) goto L_CHECKITM;

-	if(QL_DOC1STTIME == 1) goto L_QUEST;

-	mes "[Hua Tuo]";

-	mes "There are many pressure points on the human body. Ever since ancient times, it has been believed that each pressure point was limited to its role and functions.";

-	next;

-	mes "[Hua Tuo]";

-	mes "However, as I studied and experimented with every pressure point, I came to the conclusion that the use of pressure points, depending on the circumstances, can produce different results.";

-	next;

-	mes "[Hua Tuo]";

-	mes "Few pressure points tend to show the same symptoms, regardless of the problem. Most of the time, the effects of pressure points will differ depending on the body's health or time of day.";

-	next;

-	mes "[Hua Tuo]";

-	mes "For instance, the pressure point located on the upper side of the navel is the most vulnerable point.";

-	next;

-	mes "[Hua Tuo]";

-	mes "If pressed the wrong way, it can cause death. But between 5:15 am and 7:15 am, it's just a weak point.";

-	set QL_DOC1STTIME,1;

-	close;

-				

-L_QUEST:

-	mes "[Hua Tuo]";

-	mes "Hmmm...";

-	mes "I'm in trouble";

-	next;

-	emotion e_swt2;

-	mes "[Hua Tuo]";

-	mes "I cannot do anything without my medicine. But one of my patients needs immediate treatment and I can't leave the office...";

-	next;

-	menu "I can help you",-,"What a shame!",M_SHAME;

-

-	mes "[Hua Tuo]";

-	mes "Huh...?";

-	mes "Are...";

-	mes "Are you serious?";

-	next;

-	mes "[Hua Tuo]";

-	mes "This won't take much effort, but it may be too much to ask of you, especially since we have just met.";

-	next;

-	menu "If you feel burdened...",-,"I don't mind, I'd be glad to help.",M_HELP2;

-

-	mes "[Hua Tuo]";

-	mes "Thank you so";

-	mes "much for saying that.";

-	mes "I feel very uncomfortable asking a favor of someone I have only just met.";

-	next;

-	emotion e_thx;

-	mes "[Hua Tuo]";

-	mes "However, I will ask you if we meet another time. Now, if you'll excuse me...";

-	close;

-

-M_HELP2:

-	mes "[Hua Tuo]";

-	mes "Hmm, I see.";

-	mes "Well then, let me";

-	mes "ask a favor of you.";

-	next;

-	mes "[Hua Tuo]";

-	mes "As you heard earlier, I need a special medicine to treat this patient. However, I'm running out of the medicine I need.";

-	next;

-	mes "[Hua Tuo]";

-	mes "I will need you to get it for me since I cannot leave the patients that are waiting for me right now.";

-	next;

-	mes "[Hua Tuo]";

-	mes "^6A6A6A*Sigh*^000000";

-	mes "Misfortunes always seem to occur one after another, don't they? My staff is currently too busy doing other errands.";

-	next;

-	mes "[Hua Tuo]";		

-	mes "Please visit the";

-	mes "Tool Shop in town and bring me the medicine that I need. Master will understand if you tell him you've been sent by me.";

-	next;

-	mes "[Hua Tuo]";

-	mes "I am sorry for causing you so much trouble, but if you'll excuse me, I have other patients waiting. Please hurry back with the medicine!";

-	set QL_DOCQUEST,1;

-	close;

-

-M_SHAME:

-	mes "[Hua Tuo]";

-	mes "^6A6A6A*Sigh*^000000 For some reason, I never seem to have enough in stock. Is there no one I can ask to help me?";

-	close;

-

-L_MED:

-	if(countitem(7252) == 0)goto L_NOMED;

-	delitem 7252,1; //Herbal Medicine

-	mes "[Hua Tuo]";

-	mes "Ah, finally...";

-	mes "You've brought what I need. Thank you so much, it's such a relief to have this medicine on hand again.";

-	next;

-	mes "[Hua Tuo]";

-	mes "I apologize in advance, but may I ask you for another favor? I am asking for your help once, since I know I can depend on you. Of course, I will compensate you for your trouble.";

-	next;

-	menu "I'm sorry...",L_DONE,"No problem.",-;

-

-	mes "[Hua Tuo]";

-	mes "Thank you, thank you so much!";

-	mes "I've just run out of other medicines that my patients will be needing. I don't need too much, but you would be doing me a great favor.";

-	next;		

-	mes "[Hua Tuo]";

-	mes "The medicines I need are ^0000FF2 Leopard Claw^000000 which supports the bones, ^0000FF10 Solid Peach^000000 which strengthens the muscle, ^0000FF5 Poisonous Toad Skin which replenishes the skin...";

-	next;

-	mes "[Hua Tuo]";

-	mes "^0000FF20 Brown Root^000000 which regulates the heart, ^0000FF10 Sprout^000000 which eases the abdomen and ^0000FF5 Honey Pot^000000 which provides nutrition.";

-	next;		

-	mes "[Hua Tuo]";

-	mes "I hope you've memorized it all.";

-	mes "Once again, that's...";

-	set QL_DOCQUEST,3;

-	next;

-L_INGREDIENT:

-	mes "[Hua Tuo]";

-	mes "^3131FF2 Leopard Claw^000000,";

-	mes "^3131FF10 Solid Peach^000000,";

-	mes "^3131FF5 Poisonous Toad Skin^000000,";

-	mes "^3131FF20 Brown Root^000000,";

-	mes "^3131FF10 Sprout^000000 and";

-	mes "^3131FF5 Honey Pot^000000.";

-	close;	

-

-L_DONE:

-	mes "[Hua Tuo]";

-	mes "Alright...";

-	mes "I understand.";

-	mes "But thank you for helping me out. please take this...";

-	next;

-	mes "[Hua Tuo]";

-	mes "It's not much, but this medicine is an old family secret. I hope that it will be of use to you in dangerous situations.";

-	set QL_GOTHERB,0;

-	set QL_DOC1STTIME,0;

-	set QL_DOCQUEST,2;

-	getitem 679,2; //Pilule

-	set BaseExp,BaseExp + 10000;

-	next;

-	mes "[Hua Tuo]";

-	mes "Well then, I will see you around. Once again, I'd like to thank you for your help.";

-	close;

-

-L_NOMED:

-	mes "[Hua Tuo]";	

-	mes "You haven't gotten the medicine yet...? I hope you can get it as soon as possible...";

-	close;

-

-L_RANT:

-	mes "[Hua Tuo]";

-	mes "Being strong as a person is not defined as mere physical strength.";

-	next;

-	mes "[Hua Tuo]";

-	mes "Factors such as intelligence, experience and knowledge are also considered when judging one's strength.";

-	next;

-	mes "[Hua Tuo]";

-	mes "Let's say you're very strong and given the most powerful weapon.";

-	next;

-	mes "[Hua Tuo]";

-	mes "If you don't know how to use the weapon's power, you will not be strong... You will be weak.";

-	next;

-	mes "[Hua Tuo]";

-	mes "When the tools or weapons overwhelm your capabilities, the worst situations result.";

-	close;

-

-L_CHECKITM:

-	if(countitem(7172) < 2)goto L_NOTENOUGH; //Leopard Claw

-	if(countitem(7164) < 10)goto L_NOTENOUGH; //Solid Peach

-	if(countitem(7155) < 5)goto L_NOTENOUGH; //Poisonous Toad Skin

-	if(countitem(7188) < 20)goto L_NOTENOUGH; //Brown Root

-	if(countitem(7193) < 10)goto L_NOTENOUGH; //Sprout

-	if(countitem(7121) < 5)goto L_NOTENOUGH; //Honey Pot

-	delitem 7172,2; //Leopard Claw

-	delitem 7164,10; //Solid Peach

-	delitem 7155,5; //Poisonous Toad Skin

-	delitem 7188,20; //Brown Root

-	delitem 7193,10; //Sprout

-	delitem 7121,5; //Honey Pot

-	//These following dialogs are made up, I didn't finish the quest =/

-	mes "[Hua Tuo]";

-	mes "Thank you so much, now I can treat my patients.";

-	next;

-	mes "[Hua Tuo]";

-	mes "Ah...";

-	mes "Of course!";

-	mes "Here's your reward. Use this medicine when you feel weary.";

-	getitem 679,5; //Pilule

-	set BaseExp,BaseExp + 30000;

-	set QL_GOTHERB,0;

-	set QL_DOC1STTIME,0;

-	set QL_DOCQUEST,2;

-	close;

-	

-L_NOTENOUGH:

-	mes "[Hua Tuo]";

-	mes "Hmm....";

-	mes "Unfortunately, you haven't collected everything that I need yet. Once again, please gather...";

-	next;

-	goto L_INGREDIENT;

-}

-

-

-//============================================================

-//================================================ Poison King

-//====================================================== Quest

-lou_fild01.gat,224,348,7	script	Lady#04	817,{

-

-	emotion 30;

-	mes "[Lady]";

-	mes "You're at the entrance of Louyang.";

-	if(QL_POISONKING > 8)

-	{

-	mes "I hope you have a good time~";

-	close;

-	}

-	next;

-	mes "[Lady]";

-	mes "Louyang is well known";

-	mes "for its various firecrackers.";

-	mes "Would you like to see one?";

-	next;

-	menu "Sure!",s_Firework,"No thanks~",-;

-

-	if(QL_POISONKING == 8)goto s_PKQuest;

-	mes "[Lady]";

-	mes "Hmpf...!";

-	emotion 9;

-	close;

-

-s_PKQuest:

-	mes "[Lady]";

-	mes "Hmm, if not firecrackers,";

-	mes "then you must want something";

-	mes "else. Did someone send you?";

-	next;

-	menu "Yes.",s_Sent,"No.",-;

-

-	mes "[Lady]";

-	mes "No...?";

-	if(!Sex)close;

-	next;

-	mes "[Lady]";

-	mes "Are you...";

-	mes "Coming on to me?";

-	close;

-

-s_Sent:

-	mes "[Lady]";

-	mes "Who was it?";

-	mes "Please tell me";

-	mes "his name.";

-	next;

-	input @PKstr$;

-	if(@PKstr$ != "Song Zhi Du")goto s_Dunno;

-

-	mes "[Lady]";

-	mes "Oh, I see.";

-	mes "Let me give";

-	mes "you the package.";

-	next;

-	mes "[Lady]";

-	mes "Ah, wait! I forgot!";

-	mes "You must first pay the";

-	mes "delivery fee of 1,000 zeny.";

-	next;

-	mes "[Lady]";

-	if(Zeny < 1000)goto s_NEnoughZeny;

-	mes "Thank you~";

-	mes "Now that the fee is paid,";

-	mes "please bring this to";

-	mes "Song Zhi Du.";

-	mes "Take care!";

-	set Zeny,Zeny-1000;

-	getitem 7126,1;

-	set QL_POISONKING,9;

-	close;

-

-s_NEnoughZeny:

-	mes "Sorry, you don't have";

-	mes "enough zeny to pay the";

-	mes "delivery fee.";

-	close;

-

-s_Dunno:

-	mes "[Lady]";

-	mes "Hmmm?";

-	mes "I don't know who that is.";

-	mes "So I definitely don't have";

-	mes "a package for whoever you're";

-	mes "talking about.";

-	close;

-

-s_Firework:

-	mes "[Lady]";

-	mes "Alright, there you go!";

-	close2;

-	donpcevent "LouFireWrk::OnExplosion";

-	end;

-

-}

-

-lou_fild01.gat,225,349,1	script	LouFireWrk	139,{

-

-OnExplosion:

-	misceffect 183;

-	end;

-

-}

-

-lou_in01.gat,99,158,4	script	Lord	821,{

-	mes "[Lord Bai Long]";

-	mes "Hahahaha!";

-	mes "Welcome to Louyang!";

-	next;

-	mes "[Lord Bai Long]";

-	mes "Louyang is such a great city.";

-	mes "We're protected this land for forty";

-	mes "years from the invasions of evil";

-	mes "creatures!";

-	next;

-	mes "[Lord Bai Long]";

-	mes "I hope you enjoy";

-	mes "your stay here,";

-	mes "Rune-Midgardian!";

-	next;

-	if(QL_POISONKING == 15)goto s_Journal;

-	mes "[Lord Bai Long]";

-	mes "How could I have lost my friend";

-	mes "from our glory days? Hmm...?";

-	mes "Oh, I didn't realize you were still";

-	mes "there...Listening to me.";

-	next;

-	mes "[Lord Bai Long]";

-	mes "I'm sorry, I was just talking to";

-	mes "myself. I hope you have a good time";

-	mes "while you stay here in Louyang.";

-	close;

-

-s_Journal:

-	mes "^3131FFYou give Nagash Arses' Journal";

-	mes "to Bai Long. He reads it intently,";

-	mes "slowly turnin each page.";

-	next;

-	mes "^3131FFHe's completely silent for about";

-	mes "fifteen minutes, and focuses all";

-	mes "of his attention on the journal.";

-	next;

-	mes "^3131FFA single tear trickles";

-	mes "from his eye as he reads";

-	mes "the words of Nagash Arses...^000000";

-	next;

-	mes "[Lord Bai Long]";

-	mes "Thank you..";

-	mes "Adventurer...";

-	next;

-	mes "[Lord Bai Long]";

-	mes "Thank you so much.";

-	mes "You've helped me make";

-	mes "up with an old friend!";

-	next;

-	mes "[Lord Bai Long]";

-	mes "I, Bai Long, will work on giving";

-	mes "fair treatment to all of martial";

-	mes "arts organizations, regardless of";

-	mes "their methods or philosophies!";

-	next;

-	mes "[Lord Bai Long]";

-	mes "I will also forgive Song Zhi Du,";

-	mes "even if he tried to poison me.";

-	mes "He is innocent...";

-	next;

-	mes "[Lord Bai Long]";

-	mes "As a matter of fact, it was";

-	mes "reported to me that Nagash was";

-	mes "deported to his homeland after";

-	mes "that incident. I had no idea";

-	mes "he was in jail!";

-	next;

-	mes "[Lord Bai Long]";

-	mes "Thank you so";

-	mes "much for your help!";

-	next;

-	mes "[Lord Bai Long]";

-	mes "Please take this as a token of";

-	mes "gratitude. And please deliver this";

-	mes "letter to Nagash and Song Zhi Du";

-	mes "for me.";

-	getitem 603,1;

-	set QL_POISONKING,16;

-	next;

-	mes "^3131FFYou obtained ^0000FFBai Long's letter.^000000";

-	next;

-	mes "[Lord Bai Long]";

-	mes "Thank you in advance.";

-	close;

-

-}

-lou_in02.gat,253,45,4	script	Employee#04	822,{

-

-	if(QL_POISONKING == 30)goto s_NoGoodIdea;

-	if(QL_POISONKING == 18)goto s_Busy;

-	if(QL_POISONKING == 17)goto s_Told;

-	if(QL_POISONKING == 14 && QL_POISONPATH < 2)goto s_CameBack;

-	if(QL_POISONKING > 13)goto s_Proud;

-	if(QL_POISONKING > 12)goto s_Security;

-	if(QL_POISONKING == 12)goto s_LordDie;

-	if(QL_POISONKING == 11)goto s_MaterialCheck;

-	if(QL_POISONKING == 10)goto s_NotSure;

-	if(QL_POISONKING == 9)goto s_Thanked;

-	if(QL_POISONKING == 7 && QL_POISONDISLIKED)goto s_Materials2;

-	if(QL_POISONKING > 6)goto s_DeliveryMes;

-	if(QL_POISONKING == 6 && QL_POISONDISLIKED)goto s_Pity;

-	if(QL_POISONKING == 6)goto s_Talked;

-	if(QL_DOCQUEST != 2)goto s_NotPoison;

-	mes "[Song Zhi Du]";

-	mes "Well, well. Thank you for you're";

-	mes "trouble. I didn't expect you to";

-	mes "gather all these herbs for us...";

-	next;

-	mes "[Song Zhi Du]";

-	mes "I suppose I underestimated you. By";

-	mes "the way, do you know anything about";

-	mes "poison?";

-	next;

-	menu "Yes, I am kind of interested in it",-,"No, not at all",s_No;

-	mes "[Song Zhi Du]";

-	mes "Oh, I see. Well, if you have some";

-	mes "time, why don't you go visit my old";

-	mes "master in the slums?";

-	next;

-	mes "[Song Zhi Du]";

-	mes "If you two get along, I will tell";

-	mes "you something important.";

-	set QL_POISONKING,1;

-	close;

-s_No:

-	mes "[Song Zhi Du]";

-	mes "Huh? I see. Well, thank you for";

-	mes "your troubles once again. I hope you";

-	mes "have a good time in Louyang.";

-	close;

-

-s_NotPoison:

-	mes "[Song Zhi Du]";

-	mes "^111111*Sigh*^000000.....";

-	mes "I wish there was someone who";

-	mes "could help me carry my revenge out.";

-	close;

-

-s_Talked:

-	mes "[Song Zhi Du]";

-	mes "...";

-	mes "So, did you talk";

-	mes "to my old master?";

-	mes "It seems he really";

-	mes "likes you.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "As you know, my master has been";

-	mes "accused of something he didn't do!";

-	mes "And they crippled his use of the";

-	mes "martial arts!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "I can't forgive what";

-	mes "they've done to my master!";

-	mes "I want to grind their bones";

-	mes "to powder! And that's before";

-	mes "I kill them!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "He's innocent and all he did";

-	mes "was research poison with all";

-	mes "of his effort! And for that,";

-	mes "they destroyed him!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "I was yound";

-	mes "when it happened...";

-	mes "Too young to know";

-	mes "any martial arts.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "I could protect him.";

-	mes "All I could do was hide and";

-	mes "watch other people get killed.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "I hate myself";

-	mes "for not being strong!";

-	mes "But, my body isn't suited";

-	mes "for martial arts.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "All I can do is maintain my weak";

-	mes "body and make sure it's reasonably";

-	mes "healthy. Even so, if it weren't for";

-	mes "my master, I'd be dead";

-	mes "in the streets...";

-	next;

-	mes "[Song Zhi Du]";

-	mes "It was my master who picked me up";

-	mes "from the streets and cured me. So,";

-	mes "I've decided to become a doctor and";

-	mes "save as many lives as I can.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "But before";

-	mes "I do that,";

-	mes "I want ^FF0000revenge^000000!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "As I told you, I am weak.";

-	mes "Too weak... I know that from";

-	mes "the bottom of my heart.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "But...";

-	next;

-	mes "[Song Zhi Du]";

-	mes "I am knowledged about medicine,";

-	mes "especially the use of poison. I can";

-	mes "tell you that I'm one of the best.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Poison can kill people but it can";

-	mes "also be used to save lives. The";

-	mes "people who destroyed my master";

-	mes "will pay the price.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Do you understand";

-	mes "why I'm furious!?";

-	next;

-	menu "But Revenge isn't good.",-,"Yes, I fully understand",s_Understand;

-

-	mes "[Song Zhi Du]";

-	mes "Hmm...";

-	mes "I see.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "I supposed you couldn't";

-	mes "understand the way I feel.";

-	mes "After all, you didn't have";

-	mes "to go through the same";

-	mes "things I did.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "I suppose I expected too much";

-	mes "since my master likes you. How";

-	mes "could you know the rage and";

-	mes "sadness that I feel!?";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Fine.";

-	mes "Go do whatever";

-	mes "you were going to do.";

-	mes "I'm just disappointed...";

-	set QL_POISONDISLIKED,1;

-	close;

-

-s_Understand:

-	mes "[Song Zhi Du]";

-	mes "Yes! Yes!";

-	mes "You do understand!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "I volunteered for this medicine";

-	mes "storage position so that I can";

-	mes "secretly study poison! Now, the";

-	mes "time for action has come!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Still, I'll need some materials to";

-	mes "complete my research. Then, when";

-	mes "I succeeed and create a poison pill,";

-	mes "I'll need someone to carry my";

-	mes "revenge out for me.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Since my body is so frail, I can't";

-	mes "bear the tension and rage of seeing";

-	mes "my lifelong enemy face to face.";

-	set QL_POISONKING,7;

-	close;

-

-s_Pity:

-	mes "[Song Zhi Du]";

-	mes "I'm so disappointed.";

-	mes "You've even seen the";

-	mes "pitiable state of my";

-	mes "master for yourself!";

-	mes "How could you not";

-	mes "understand me?!";

-	next;

-	menu "I'm sorry for the last time",s_Sorry,"No matter what, revenge isn't good.",-;

-

-	specialeffect 11;

-	mes "[Song Zhi Du]";

-	mes "Oh, forget about it";

-	mes "I don't think I can ever";

-	mes "make you understand how I feel.";

-	close;

-

-s_Sorry:

-	mes "[Song Zhi Du]";

-	mes "If you really";

-	mes "feel sorry for me,";

-	mes "then you must help me";

-	mes "carry out my revenge!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "I still need to complete the";

-	mes "poison potion I'm creating. I hope";

-	mes "you can bring what I need to finish";

-	mes "it. Go and get me...";

-	next;

-	mes "[Song Zhi Du]";

-	mes "^0000FF4 Bee Sting^000000,";

-	mes "^0000FF10 Venom Canine^000000,";

-	mes "^0000FF10 Empty Potion Bottle^000000,";

-	mes "^0000FF30 Green Potion^000000.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "An apology is fine, but you must";

-	mes "also show me that you are sorry and";

-	mes "help me carry out my plan. Do you";

-	mes "have any problem with this?";

-	set QL_POISONKING,7;

-	close;

-

-s_Materials2:

-	mes "[Song Zhi Du]";

-	mes "So, did you";

-	mes "gather everything";

-	mes "I asked of you?";

-	next;

-	menu "Yes.",s_Items,"What do you need again?",-;

-

-	mes "[Song Zhi Du]";

-	mes "^111111*Sigh...*^000000";

-	mes "Go and get me...";

-	next;

-	specialeffect 11;

-	mes "[Song Zhi Du]";

-	mes "^0000FF4 Bee Sting^000000,";

-	mes "^0000FF10 Venom Canine^000000,";

-	mes "^0000FF10 Empty Potion Bottle^000000,";

-	mes "^0000FF30 Green Potion^000000.";

-	close;

-

-s_Items:

-	if(countitem(939) < 4 || countitem(937) < 10 || countitem(1093) < 10 || countitem(506) < 30)goto s_NEnoughItems;

-	delitem 939,4; //Bee Sting

-	delitem 937,10; //Venom Canine

-	delitem 1093,10; //Empty Potion Bottle

-	delitem 506,30; //Green Potion

-	set QL_POISONDISLIKED,0;

-	mes "[Song Zhi Du]";

-	mes "Ah...";

-	mes "With these, I accept your apology";

-	mes "Thank you for all the trouble you";

-	mes "went through to get this stuff";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Now that you're this involved,";

-	mes "you're in this with me all the way!";

-	mes "I've been waiting for this";

-	mes "day for years...";

-	next;

-	mes "[Song Zhi Du]";

-	mes "All that's left is to create this";

-	mes "poison, and then to get the";

-	mes "lord of Louyang to drink it..";

-	close;

-

-

-s_NEnoughItems:

-	mes "[Song Zhi Du]";

-	mes "Where are the things";

-	mes "I asked you to bring?";

-	mes "Are you testing my";

-	mes "patience or what?";

-	next;

-	specialeffect 11;

-	mes "[Song Zhi Du]";

-	mes "You're still missing some of the";

-	mes "items I need. I must have them all";

-	mes "in order to finish making this";

-	mes "poison!";

-	close;

-

-s_DeliveryMes:

-	emotion 0;

-	mes "[Song Zhi Du]";

-	mes "Ah, hello.";

-	mes "Please give me a minute,";

-	mes "I've just received a message.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Ah!";

-	mes "It says here";

-	mes "that my delivery";

-	mes "has finally arrived!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Would you bring me the";

-	mes "box from the firecracker";

-	mes "lady at the entrance";

-	mes "to Louyang? Thanks";

-	mes "in advance.";

-	set QL_POISONKING,8;

-	close;

-

-s_Thanked:

-	if(countitem(7126) == 0)goto s_WheresJellopy;

-	delitem 7126,1;

-	mes "[Song Zhi Du]";

-	mes "Ah. Thank you,";

-	mes "I needed this. Now,";

-	mes "shall we begin?";

-	next;

-	mes "[Song Zhi Du]";

-	mes "First, I shall mix a poison";

-	mes "extraced from Venom Canine";

-	mes "with a foreign liquid named";

-	mes "Karvodailnirol.";

-	next;

-	specialeffect 12;

-	mes "[Song Zhi Du]";

-	mes "Then, I add Green Herb extract,";

-	mes "poison extracted from Bee Sting and";

-	mes "a Large Jellopy into the liquid!";

-	mes "Finally, I must heat them all!";

-	next;

-	specialeffect 124;

-	specialeffect 20;

-	mes "[Song Zhi Du]";

-	mes "Finally, I have to carefully heat";

-	mes "the mixture and collect it all into";

-	mes "a Potion Bottle.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Now I've got to do this just";

-	mes "right. This is a very delicate";

-	mes "procedure...";

-	next;

-	specialeffect 17;

-	emotion 23;			

-	mes "[Song Zhi Du]";

-	mes "No!! I failed again! ^656565*Sigh...*^000000 And";

-	mes "I spent a long time preparing all";

-	mes "of those materials...";

-	set QL_POISONKING,10;

-	close;

-

-s_WheresJellopy:

-	//Made up Dialog

-	emotion 0;

-	mes "[Song Zhi Du]";

-	mes "I was told by the lady at";

-	mes "the gate that she gave you";

-	mes "the ^0000FFLarge Jellopy^000000...";

-	mes "Yet you don't have it?";

-	next;

-	mes "[Song Zhi Du]";

-	mes "I can't make the poison without";

-	mes "it. You'll have to find a new one";

-	mes "somehow.";

-	close;

-

-s_NotSure:

-	mes "[Song Zhi Du]";

-	mes "I'm not sure what went wrong.";

-	mes "Hmm, would you please help me";

-	mes "again? I've used all the materials";

-	mes "from last time.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "^0000FF4 Bee Sting^000000,";

-	mes "^0000FF10 Venom Canine^000000,";

-	mes "^0000FF10 Empty Potion Bottle^000000,";

-	mes "^0000FF30 Green Potion^000000 and";

-	mes "^0000FF1 Large Jellopy^000000.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "That's everything I'll need.";

-	mes "I would apologize, but since you've";

-	mes "shown that you'll help carry out my";

-	mes "revenge, I know you'll understand.";

-	set QL_POISONKING,11;

-	close;

-

-s_MaterialCheck:

-	if(countitem(939) < 4 || countitem(937) < 10 || countitem(1093) < 10 || countitem(506) < 30 || countitem(7126) < 1 )goto s_NEnoughItems2;

-	delitem 939,countitem(939); //Bee Sting

-	delitem 937,countitem(937); //Venom Canine

-	delitem 1093,countitem(1093); //Empty Potion Bottle

-	delitem 506,countitem(506); //Green Potion

-	delitem 7126,countitem(7126); //Large Jellopy

-	mes "[Song Zhi Du]";

-	mes "Oh! You brought";

-	mes "me everything I need!";

-	mes "I'm very impressed!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "You're the only one";

-	mes "who actually understands how";

-	mes "I feel. Thank you for gathering all";

-	mes "of these ^0000FFmaterials^000000.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Alright, now";

-	mes "to create the poison.";

-	mes "This is going to be tough.";

-	mes "Here we go...";

-	next;

-	mes "[Song Zhi Du]";

-	mes "First, I shall mix a poison";

-	mes "extraced from Venom Canine";

-	mes "with a foreign liquid named";

-	mes "Karvodailnirol.";

-	next;

-	specialeffect 12;

-	mes "[Song Zhi Du]";

-	mes "Then, I add Green Herb extract,";

-	mes "poison extracted from Bee Sting and";

-	mes "a Large Jellopy into the liquid!";

-	mes "Finally, I must heat them all!";

-	next;

-	specialeffect 124;

-	specialeffect 20;

-	mes "[Song Zhi Du]";

-	mes "Finally, I have to carefully heat";

-	mes "the mixture and collect it all into";

-	mes "a Potion Bottle.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "^111111*Phew...*";

-	mes "Did...";

-	mes "Did I make it?";

-	next;

-

-	set @PKSuccessRate,rand(1,1000);

-	if(@PKSuccessRate > 700)

-	{

-	emotion 23;

-	specialeffect 20;

-	mes "[Song Zhi Du]";

-	mes "Hahaha~!";

-	mes "Success!";

-	mes "It works!";

-	mes "I finally created it!";

-	mes "Mwahahahahahaha!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Muhahahahaha!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Muhahahahaha!";

-	mes "Hahahahahahahahahahahaha!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "I made it!";

-	mes "I made it!";

-	mes "Now, revenge will be mine!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Hahaha! Now, please";

-	mes "take this bottle. But be careful.";

-	mes "Even if you smell it just a little,";

-	mes "it can cause your body to";

-	mes "decompose, leading to death.";

-	getitem 678,2; //Poison Bottle

-	set QL_POISONKING,12;

-	close;

-	}

-	else

-	{

-	emotion 23;

-	specialeffect 17;

-	mes "[Song Zhi Du]";

-	mes "NO! I... I've failed again! And I";

-	mes "spent a long time getting";

-	mes "everything ready...";

-	close;

-	}

-

-s_NEnoughItems2:

-	//Made up dialog

-	mes "[Song Zhi Du]";

-	mes "You seem to be missing some";

-	mes "of the materials that I need,";

-	mes "don't come back until you get";

-	mes "them!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "I will need the following:";

-	mes "^0000FF4 Bee Sting^000000,";

-	mes "^0000FF10 Venom Canine^000000,";

-	mes "^0000FF10 Empty Potion Bottle^000000,";

-	mes "^0000FF30 Green Potion^000000 and";

-	mes "^0000FF1 Large Jellopy^000000.";

-	close;

-

-s_LordDie:

-	mes "[Song Zhi Du]";

-	mes "Hahahaha...!";

-	mes "Now, time has come.";

-	mes "With this poison, Louyang's";

-	mes "lord will be cast into hell!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "If they lied about my master,";

-	mes "then I'll simply make their lies";

-	mes "into truth. Then, my master";

-	mes "won't feel victimized!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Lord Bai Long!";

-	mes "You will die!";

-	mes "Ha HA HA HA HA!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Muhahahahaha!";

-	mes "Hahaha...Haha..hahaha..haha..hahah";

-	mes "ahaha...mmmmuhahahahahahahahahaha!!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Muhahahahahaha!";

-	mes "............";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Ah, forgive me.";

-	mes "I was overly excited.";

-	mes "Yes, I must calm down...";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Now, I have one last favor to ask";

-	mes "of you. Please sneak into the";

-	mes "Castle of the Dragon.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "I want you to put this poison some";

-	mes "place where Lord Bai Long might";

-	mes "stay. But be careful, the castle";

-	mes "has a lot of security.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Still, you're an adventurer from";

-	mes "Rune-Midgard. You've probably had";

-	mes "challenges like this before, so I'm";

-	mes "sure you'll find a way.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Anyway, I'm sure my master";

-	mes "will be happy to know that";

-	mes "I finally created the ^0000FFpoison";

-	mes "he wished to create^000000!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Hahaha...!";

-	mes "Master, I did it!";

-	mes "Your disciple Song Zhi Du made the";

-	mes "world's deadliest poison for you!";

-	set QL_POISONKING,13;

-	close;

-

-s_Security:

-	mes "[Song Zhi Du]";

-	mes "Remember...";

-	mes "The Castle of the Dragon";

-	mes "is under heavy surveillance.";

-	mes "I guess Lord Bai Long is";

-	mes "insecure. Heh heh.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Anyways, I hope you'll be";

-	mes "really careful. When you go in,";

-	mes "don't forget to use this poison";

-	mes "somewhere the Lord Bai Long";

-	mes "can ingest it.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Anyway, I'm sure my master";

-	mes "will be happy to know that";

-	mes "I finally created the ^0000FFpoison";

-	mes "he wished to create^000000!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Hahaha...!";

-	mes "Master, I did it!";

-	mes "Your disciple Song Zhi Du made the";

-	mes "world's deadliest poison for you!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Leave now,";

-	mes "my friend!";

-	mes "For my revenge!";

-	mes "Go and kill Lord Bai Long!";

-	close;

-

-s_CameBack:

-	mes "[Song Zhi Du]";

-	mes "Ah!";

-	mes "You came back!";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Ah yes.";

-	mes "All I have to do now";

-	mes "is wait and hear news";

-	mes "of Lord Bai Long's death.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Thank you so much, my friend.";

-	mes "You've satisfied my old grudge.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Now, I am getting tired.";

-	mes "Let me rest... Take care, my";

-	mes "friend, and travel in safety.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "But before you go, let me give you";

-	mes "some poison and a medicinal pill.";

-	mes "I made these with the leftover";

-	mes "materials and medicine in the";

-	mes "storage.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Please take the";

-	mes "medicine pill";

-	mes "right away.";

-	next;

-	mes "^3131FFYou swallowed a strange pill";

-	mes "that shines with a gold color.";

-	mes "it tastes bitter...";

-	next;

-	mes "^3131FFThe nasty taste lingers in your";

-	mes "mouth but then you feel a great";

-	mes "warmth flowing throughout your";

-	mes "body. Eventually, you pass out.";

-	close2;

-	set QL_POISONKING,30;

-	set QL_POISONPATH,0;

-	getitem 678,3;

-	if(BaseLevel < 56)set BaseExp,BaseExp+8909;

-	else if(BaseLevel > 55 && BaseLevel < 61)set BaseExp,BaseExp+10213;

-	else if(BaseLevel > 60 && BaseLevel < 66)set BaseExp,BaseExp+17684;

-	else if(BaseLevel > 65 && BaseLevel < 71)set BaseExp,BaseExp+25411;

-	else if(BaseLevel > 70 && BaseLevel < 76)set BaseExp,BaseExp+68757;

-	else if(BaseLevel > 75 && BaseLevel < 81)set BaseExp,BaseExp+128246;

-	else if(BaseLevel > 80 && BaseLevel < 86)set BaseExp,BaseExp+142340;

-	else if(BaseLevel > 85 && BaseLevel < 91)set BaseExp,BaseExp+152052;

-	else if(BaseLevel > 90)set BaseExp,BaseExp+366786;

-	warp "louyang.gat",270,136;

-	end;

-

-s_Proud:

-	mes "[Song Zhi Du]";

-	mes "Nagash Arses is also the name of";

-	mes "the Poison King in a legend of";

-	mes "Arcturus. There's good reasons for";

-	mes "my master to be proud of hise name!";

-	close;

-

-s_Told:

-	mes "[Song Zhi Du]";

-	mes "Ah...";

-	mes "Welcome.";

-	mes "My master told";

-	mes "me everything.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Somehow, I feel relieved, but sorry";

-	mes "at the same time. Still, now I can";

-	mes "forget everything that's happened";

-	mes "in the past.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Now, I've decided to focus more on";

-	mes "my medical studies so that I can";

-	mes "really save as many lives as I can.";

-	mes "I'm sorry I've been so rude to you";

-	mes "before.";

-	next;

-	mes "[Song Zhi Du]";

-	mes "Also, I hope you will";

-	mes "take these, since I don't";

-	mes "need them any longer.";

-	getitem 678,5; //Poison Bottle

-	set QL_POISONKING,18;

-	set QL_POISONPATH,0;

-	next;

-	mes "[Song Zhi Du]";

-	mes "Thank you";

-	mes "once again, friend.";

-	mes "Now if you'll excuse me,";

-	mes "i have many things to do...";

-	close;

-

-s_Busy:

-	mes "^3131FFSong Zhi Du is busily engaged with";

-	mes "organizing medicinal herbs. The";

-	mes "faint look of sadness that used to";

-	mes "be on his face now seems drained.";

-	next;

-	mes "^3131FFStill, from his movements and the";

-	mes "pace at which he is working, you";

-	mes "can tell that he loves what he is";

-	mes "doing. It seems that Song Zhi Du";

-	mes "has finally found his life's path.";

-	close;

-

-s_NoGoodIdea:

-	mes "[Song Zhi Du]";

-	mes "...................";

-	next;

-	mes "^3131FFSong Zhi Du looks blankly at the";

-	mes "ceiling. With his revenge, it seems";

-	mes "he's lost his motivation in life.";

-	mes "Was it a good idea to help him,";

-	mes "after all?";

-	next;

-	mes "^3131FFBy hearsay, the poisoned drink";

-	mes "didn't work so well, as a Thief";

-	mes "from a foreign land actually stole";

-	mes "the bottle.";

-	close;

-

-}

-

-lou_in02.gat,122,38,4	script	Poison King	824,{

-

-	if(QL_POISONKING > 16 && QL_POISONKING != 30)goto s_Proud;

-	if(QL_POISONKING == 16)goto s_Letter;

-	if(QL_POISONKING == 15)goto s_Hope;

-	if(QL_POISONKING == 14 && QL_POISONPATH > 1)goto s_Happened;

-	if(QL_POISONKING == 30)goto s_Emo;

-	if(QL_POISONPATH == 2)goto s_StopHim;

-	if(QL_POISONKING == 13 || QL_POISONKING == 14)goto s_MetDisciple;

-	mes "[Nagash Arses]";

-	mes "It's been 40 years since I came";

-	mes "here. Hahaha, but it doesn't feel";

-	mes "like it's been that long.";

-	next;

-	mes "[Nagash Arses]";

-	mes "In the past, I was one of the";

-	mes "most renowned experts in the use";

-	mes "of poison. I even created a martial";

-	mes "art based on it's use, and formed my";

-	mes "own martial arts organization.";

-	next;

-	mes "[Nagash Arses]";

-	mes "Now, those memories";

-	mes "don't even seem real";

-	mes "anymore. This poem is";

-	mes "all I can remember...";

-	next;

-	mes "[Nagash Arses]";

-	mes "As I lay in bed looking";

-	mes "up at the moonlight,";

-	mes " ";

-	mes "It looks like the ";

-	mes "frost on the ground.";

-	next;

-	mes "[Nagash Arses]";

-	mes "I lift head up to look";

-	mes "at the bright moon,";

-	mes " ";

-	mes "I lower my head";

-	mes "feeling homesick.";

-	if(!QL_POISONKING)close;

-	next;

-	if(QL_POISONKING > 1)goto s_Menu2;

-	menu "Grin at him.",-,"Lament on his grief.",s_Grief,"Reprove him.",s_Reprove,"Listen to the poem again.",s_Again,"Show him a sad look.",s_Sad;

-

-	mes "[Nagash Arses]";

-	mes "Yeah, I don't blame you.";

-	mes "I know I look stupid. Legally,";

-	mes "I'm a criminal after all.";

-	mes "I don't have any friends and";

-	mes "there's no one I can trust.";

-	close;

-

-s_Grief:

-	mes "[Nagash Arses]";

-	mes "How can you sympathize?";

-	mes "I doubt anyone has had";

-	mes "experiences that are";

-	mes "much worse than mine...";

-	close;

-

-s_Reprove:

-	mes "What--? I haven't wrongers you in any";

-	mes "way! Why must you be so mean to an";

-	mes "old man? You don't even know half";

-	mes "of what I've gone though.";

-	close;

-

-s_Again:

-	mes "[Nagash Arses]";

-	mes "As I lay in bed looking";

-	mes "up at the moonlight,";

-	mes " ";

-	mes "It looks like the ";

-	mes "frost on the ground.";

-	next;

-	mes "[Nagash Arses]";

-	mes "I lift head up to look";

-	mes "at the bright moon,";

-	mes " ";

-	mes "I lower my head";

-	mes "feeling homesick.";

-	close;

-

-s_Sad:

-	mes "[Nagash Arses]";

-	mes "Do you miss your hometown";

-	mes "as much as I do? I'm envious";

-	mes "of you, youngster. You have";

-	mes "the freedom to go";

-	mes "wherever you want.";

-	next;

-	mes "[Nagash Arses]";

-	mes "I'm a wanted criminal.";

-	mes "Even if I were free to";

-	mes "travel, I may not have";

-	mes "the strength to try.";

-	next;

-	mes "[Nagash Arses]";

-	mes "Let's not talk about this any";

-	mes "longer. It's reminded me of";

-	mes "my worst memories.";

-	next;

-	mes "[Nagash Arses]";

-	mes "I'm too old to remember anything.";

-	mes "Ha ha ha. Maybe if I saw something";

-	mes "related to poison, I might remember";

-	mes "something.";

-	next;

-	mes "[Nagash Arses]";

-	mes "...";

-	next;

-	mes "[Nagash Arses]";

-	mes "No, no...";

-	mes "I think I'm too old";

-	mes "to remember anything.";

-	mes "Anything at all.";

-	set QL_POISONKING,2;

-	close;

-

-s_Menu2:

-	menu "Ask about the poem.",-,"Ask about his hometown.",s_Hometown,"Ask him about use of poison.",s_Poison,"Ask about his situation.",s_Situation;

-

-	mes "[Nagash Arses]";

-	mes "Ah, have you";

-	mes "heard of this poem?";

-	mes "As I grow older, my";

-	mes "memory also drows worse,";

-	mes "but I really like this poem";

-	mes "and don't want to forget it.";

-	next;

-	mes "[Nagash Arses]";

-	mes "I hope you don't";

-	mes "mind helping me";

-	mes "memorize this poem...";

-	next;

-	set @PKrand,rand(0,2);

-	if(@PKrand == 0)

-{

-	mes "[Nagash Arses]";

-	mes "^3131FF'As I lay ^000000[ ]^3131FF looking up at the";

-	mes "moonlight.'^000000 In this first line,";

-	mes "what word should be in [ ]?";

-	next;

-	menu "on the ground",s_1,"with you",s_1,"in bed",-,"in the stars",s_1;

-	set @PKtest,@PKtest+1;

-

-s_1:

-	mes "[Nagash Arses]";

-	mes "^3131FF'It looks like the ^000000[ ]^3131FF on the";

-	mes "ground.'^000000 In the second line, which";

-	mes "word should be in [ ]?";

-	next;

-	menu "Frost",-,"Dew",s_2,"Pebbles",s_2,"Snow",s_2;

-	set @PKtest,@PKtest+1;

-

-s_2:

-	mes "[Nagash Arses]";

-	mes "Now to see if you really";

-	mes "understand the poem. It's no";

-	mes "use to just know the words. They";

-	mes "must be a part of you as well.";

-	next;

-	mes "[Nagash Arses]";

-	mes "How would you describe the overall";

-	mes "mood and tone of the speaker of";

-	mes "this poem?";

-	next;

-	menu "Romantic",s_3,"Wistful",s_3,"Regretful",-,"Passionate",s_3;

-	set @PKtest,@PKtest+1;

-

-s_3:

-	set @PKrand2,rand(0,1);

-	if(!@PKrand2)

-	{

-	mes "[Nagash Arses]";

-	mes "What do you think is the major";

-	mes "theme of this poem?";

-	next;

-	menu "Tragedy",s_4,"Seperation",-,"Love",s_4,"Revenge",s_4,"Buddy Cop Film",s_4;

-	}

-	if(@PKrand2)

-	{

-	mes "[Nagash Arses]";

-	mes "According to the poem,";

-	mes "where is the location";

-	mes "of the speaker as he is";

-	mes "gazing at the moon?";

-	next;

-	menu "In his hometown",s_4,"In jail",s_4,"In the depths of the cosmos.",s_4,"In bed",-;

-	}

-	set @PKtest,@PKtest+1;

-

-s_4:

-	mes "[Nagash Arses]";

-	mes "Ha ha ha! You undestand this poem";

-	mes "well! Now, would you repeat the";

-	mes "first line for me again?";

-	next;

-	menu "When I lay in bed looking up at the moonlight",s_5,"When I lay in bed thinking of the moonlight",s_5,"As I lay in bed looking up at the moonlight",-,"As I lay in bed thinking of the moonlight",s_5;

-	set @PKtest,@PKtest+1;

-

-s_5:

-}

-	if(@PKrand == 1)

-{

-	mes "[Nagash Arses]";

-	mes "^3131FF'It looks like the ^000000[ ]^3131FF on the";

-	mes "ground.'^000000 In the second line, which";

-	mes "word should be in [ ]?";

-	next;

-	menu "Frost",-,"Dew",s_6,"Pebbles",s_6,"Snow",s_6;

-	set @PKtest,@PKtest+1;

-

-s_6:

-	mes "[Nagash Arses]";

-	mes "^3131FFI lower my head feeling ^000000[ ]^3131FF.^000000'";

-	mes "Which word should be in [ ]?";

-	next;

-	menu "Homesick",-,"Drowsy",s_7,"Loneliness",s_7,"Heartbroken",s_7;

-	set @PKtest,@PKtest+1;

-

-s_7:

-	mes "[Nagash Arses]";

-	mes "Now to see if you really";

-	mes "understand the poem. It's no";

-	mes "use to just know the words. They";

-	mes "must be a part of you as well.";

-	next;

-	mes "[Nagash Arses]";

-	mes "in the first two lines, what";

-	mes "is being linked by the poet?";

-	next;

-	menu "Bed and ground.",s_8,"Frost and hometown.",-,"Gloomy.",s_8,"Smokey.",s_8,"Moonlight and Frost.",s_8;

-	set @PKtest,@PKtest+1;

-

-s_8:

-	mes "[Nagash Arses]";

-	mes "In this land, the image of the moon";

-	mes "often appears in poems expressing";

-	mes "seperation, longing and";

-	mes "homesickness. Why would gazing at";

-	mes "the moon offer comfort?";

-	next;

-	menu "The rabbit on the moon grants wishes.",s_9,"It's sheer beauty eases anxiety",s_9,"Because it wanes and waxes",s_9,"All people and places share the same moon",-;

-	set @PKtest,@PKtest+1;

-

-s_9:

-	mes "[Nagash Arses]";

-	mes "Ha ha ha! You understand this poem";

-	mes "well! Now, would you repeat the";

-	mes "third line for me again?";

-	next;

-	menu "I look upon the bright moon",s_10,"I lift my head to look at the bright moon.",-,"I turn my head to look at the bright moon.",s_10,"I face the bright moon.",s_10;

-	set @PKtest,@PKtest+1;

-

-s_10:

-}

-	if(@PKrand == 2)

-{

-	mes "[Nagash Arses]";

-	mes "^3131FF'It looks like the ^000000[ ]^3131FF on the";

-	mes "ground.'^000000 In the second line, which";

-	mes "word should be in [ ]?";

-	next;

-	menu "Frost",-,"Dew",s_11,"Pebbles",s_11,"Snow",s_11;

-	set @PKtest,@PKtest+1;

-

-s_11:

-	mes "[Nagash Arses]";

-	mes "^3131FF'I lift my ^000000[ ]^3131FF to look at the";

-	mes "bright moon.'^000000 In the third line,";

-	mes "which word should be in [ ]?";

-	next;

-	menu "eyes",s_12,"head",-,"gaze",s_12,"sights",s_12;

-	set @PKtest,@PKtest+1;

-

-s_12:

-	mes "[Nagash Arses]";

-	mes "Now to see if you really";

-	mes "understand this poem. It's no";

-	mes "use to just know the words. They";

-	mes "must be a part of you as well.";

-	next;

-	mes "[Nagash Arses]";

-	mes "What do you think is the major";

-	mes "theme of this poem?";

-	next;

-	menu "Tragedy",s_13,"Seperation",-,"Love",s_13,"Revenge",s_13,"Buddy Cop Film",s_13;

-	set @PKtest,@PKtest+1;

-

-s_13:

-	set @PKrand2,rand(0,1);

-	if(!@PKrand2)

-	{

-	mes "[Nagash Arses]";

-	mes "What might be one reason why the";

-	mes "bright moonlight looks like frost";

-	mes "on the ground to the poet?";

-	next;

-	menu "He's looking though a frosty window",s_14,"A bright moon glimmers like icicles",-,"He's homesick, so the moonlight looks cold.",s_14,"It's called 'Poetic Lisense.'",s_14;

-	}

-	if(@PKrand2)

-	{

-	mes "[Nagash Arses]";

-	mes "Although this poem is only four";

-	mes "lines long, it's structure can be";

-	mes "easily classified. How would you";

-	mes "describe this poem's structure?";

-	next;

-	menu "Why it's a sonnet",s_14,"It's a prose with erratic caesuras",s_14,"It's a quatrain of course",-,"Lambic Pentameter?",s_14;

-	}

-	set @PKtest,@PKtest+1;

-

-s_14:

-	mes "[Nagash Arses]";

-	mes "Ha ha ha! You understand this poem";

-	mes "well! Now, would you repeat the";

-	mes "last line for me again?";

-	next;

-	menu "I cry for my home town.",s_15,"I lower my head feeling homesick.",-,"I miss my home town",s_15,"I sob feeling homesick.",s_15;

-	set @PKtest,@PKtest+1;

-

-s_15:

-}

-	if(@PKtest == 5 && QL_POISONKING == 2)set QL_POISONKING,3;

-	mes "[Nagash Arses]";

-	mes "Thank you for yout time,";

-	mes "youngster. Oh, and this is";

-	mes "an old, famous poem written";

-	mes "by Li Tai Bai. You know that,";

-	mes "don't you?";

-	close;

-

-s_Hometown:

-	mes "[Nagash Arses]";

-	mes "Are you asking me";

-	mes "about my hometown...?";

-	mes "As a Rune-Midgardian,";

-	mes "I'm sure you've at least";

-	mes "heard of Morroc...";

-	next;

-	mes "[Nagash Arses]";

-	mes "A city built in the middle of the";

-	mes "desert, its founders had to combat";

-	mes "the harsh and unforgiving forces of";

-	mes "nature everyday.";

-	next;

-	mes "[Nagash Arses]";

-	mes "Yeah, the blazing sun never";

-	mes "seems to leave, and it's a dry,";

-	mes "desert area, but people still";

-	mes "manage to live there.";

-	next;

-	mes "[Nagash Arses]";

-	mes "Ah~ I miss Morroc, my hometown.";

-	mes "I used to be a member of the";

-	mes "Assassin organization known as the";

-	mes "'Canine of Desert.' Long ago, I was";

-	mes "their poison expert.";

-	next;

-	if(QL_POISONKING == 3)goto s_AltMenu;

-	menu "Tell him news of Morroc",s_News,"Info about 'Canine of Desert'",s_Canine;

-

-s_AltMenu:

-	menu "Tell him news of Morroc",s_News,"Info about 'Canine of Desert'",s_Canine,"Just listen",s_Listen;

-

-s_News:

-	mes "[Nagash Arses]";

-	mes "Hm...?";

-	mes "Is there anything";

-	mes "you want to say?";

-	next;

-	mes "[" + strcharinfo(0) +"]";

-	mes "I have news";

-	mes "of Morroc...";

-	input @PKstr$;

-	mes "[" + strcharinfo(0) +"]";

-	mes @PKstr$;

-	next;

-	mes "[Nagash Arses]";

-	mes "I see...";

-	mes "Thank you for";

-	mes "telling me that.";

-	close;

-

-s_Canine:

-	mes "[Nagash Arses]";

-	mes "I just told you what the 'Canine";

-	mes "of Desert' is. If you can't remember what";

-	mes "I just told you, it's no use for me";

-	mes "to explain further. You go ahead";

-	mes "and tell me what it is.";

-	next;

-	input @PKstr$;

-	mes "[Nagash Arses]";

-	mes "Well, I suppose I can't blame you";

-	mes "for not knowing or remembering.";

-	mes "When you get the chance, find";

-	mes "someone wearing a purple suit...";

-	next;

-	mes "[Nagash Arses]";

-	mes "Any Assassin worth his salt should";

-	mes "know what the 'Canine of Desert'";

-	mes "is.";

-	close;

-

-s_Listen:

-	mes "[Nagash Arses]";

-	mes "I tried Many things to develop my";

-	mes "poison skills when I was young.";

-	mes "I tried to extract poison from";

-	mes "Muka's needles and from purple";

-	mes "mushrooms. Eventually, I became";

-	mes "an expert of toxins from my";

-	mes "efforts. ";

-	next;

-	mes "[Nagash Arses]";

-	mes "One time I even injected";

-	mes "a poison into my own body";

-	mes "to fully test it. Yeah...";

-	mes "It almost killed me.";

-	next;

-	mes "[Nagash Arses]";

-	mes "I was recognized as the man who";

-	mes "was most highly skilled in the use";

-	mes "of poison in the 'Canine of";

-	mes "Desert,' and I was sent on the most";

-	mes "crucial and dangerous missions.";

-	next;

-	mes "[Nagash Arses]";

-	mes "One day, I was hired by the Alberta";

-	mes "Merchant Guild to assassinate an";

-	mes "enemy that had been threatening";

-	mes "them. However, I never got to";

-	mes "complete that missions.";

-	next;

-	mes "[Nagash Arses]";

-	mes "While I was on the ship to proceed";

-	mes "with my mission, we encountered";

-	mes "heavy wind and waves, and the ship";

-	mes "sank. I believe I was the only";

-	mes "survivor of that accident.";

-	next;

-	mes "[Nagash Arses]";

-	mes "I was floated helplessly on the";

-	mes "ocean and somehow managed";

-	mes "to arrive here, in Louyang. That";

-	mes "was forty years ago.";

-	next;

-	mes "[Nagash Arses]";

-	mes "It seemed that my arrival was";

-	mes "rather timely. Louyang was intruded";

-	mes "by huge mobs of dangerous monsters";

-	mes "that were able to infiltrate";

-	mes "the Castle of the Dragon.";

-	next;

-	mes "[Nagash Arses]";

-	mes "Since I was one of the best";

-	mes "assassins of the 'Canine of";

-	mes "Desert.’ I did far more than my";

-	mes "share fair of monster killing.";

-	next;

-	mes "[Nagash Arses]";

-	mes "It was on the battlefield that";

-	mes "I met Bai Long who is now the Lord of";

-	mes "this town. But back then, he was";

-	mes "known as the 'Street Knight.'";

-	next;

-	mes "[Nagash Arses]";

-	mes "I remember seeing him surrounded";

-	mes "by enemies, and I dove into thick";

-	mes "of battle to keep him from getting";

-	mes "killed. We fought back to back and";

-	mes "managed to stay alive back then.";

-	next;

-	mes "[Nagash Arses]";

-	mes "You have to understand that it's";

-	mes "not easy to let someone back you";

-	mes "up in battle unless there's a solid";

-	mes "trust. Those sights... where the";

-	mes "greatest moments in my life.";

-	next;

-	mes "[Nagash Arses]";

-	mes "Sadly, Many of our comrades,";

-	mes "all of them respectable and highly";

-	mes "skilled in martial artists, fell in";

-	mes "battle. The number of monsters we";

-	mes "had to contend with was just";

-	mes "overwhelming.";

-	next;

-	mes "[Nagash Arses]";

-	mes "Still, I manage to continue my";

-	mes "poison research, even during those";

-	mes "tough times. I studied medicine in";

-	mes "this town and was able to use that";

-	mes "knowledge to enhance my";

-	mes "understanding of poisons.";

-	next;

-	mes "[Nagash Arses]";

-	mes "I created a new skill based on all";

-	mes "of my knowledge, and learned how";

-	mes "to put poison on weapons.";

-	next;

-	mes "[Nagash Arses]";

-	mes "I even learned martial arts in";

-	mes "Louyang, and combined that";

-	mes "knowledge with my poison expertise";

-	mes "to create my own unique fighting";

-	mes "style.";

-	next;

-	mes "[Nagash Arses]";

-	mes "Well, that's my story.";

-	mes "But now, I just miss my";

-	mes "home town. I miss the heat";

-	mes "of the desert, and the glare";

-	mes "of the blazing sun.";

-	set QL_POISONKING,4;

-	close;

-

-s_Poison:

-	mes "[Nagash Arses]";

-	mes "Did you just say you";

-	mes "want to learn about the";

-	mes "use of poison?";

-	next;

-	mes "[Nagash Arses]";

-	mes "Why would you want";

-	mes "to learn about it?";

-	mes "Even if I wanted to";

-	mes "teach, I'm too old to";

-	mes "remember everything";

-	mes "clearly...";

-	if(QL_POISONKING > 4)goto s_Disciple;

-	close;

-

-s_Disciple:

-	next;

-	mes "[Nagash Arses]";

-	mes "Go find my last disciple,";

-	mes "^0000FFSong Zhi Du^000000, as he may tell you";

-	mes "something useful. He's working at";

-	mes "the doctor's office. If it weren't";

-	mes "for him, I'd be starving now.";

-	if(QL_POISONKING == 5)set QL_POISONKING,6;

-	close;

-

-s_Situation:

-	if(QL_POISONKING == 4)goto s_Situation2;

-	mes "[Nagash Arses]";

-	mes "I...";

-	mes "I don't want";

-	mes "to talk about that.";

-	mes "Let's not talk about it.";

-	close;

-

-s_Situation2:

-	mes "[Nagash Arses]";

-	mes "You're asking me how";

-	mes "things came to be like";

-	mes "this? Life used to be good.";

-	next;

-	mes "[Nagash Arses]";

-	mes "Ah I told you, I distinguished";

-	mes "myself in the battles with";

-	mes "monsters. I was rewarded with";

-	mes "Louyang citizenship and given";

-	mes "gifts of money.";

-	next;

-	mes "[Nagash Arses]";

-	mes "I was invited to join a martial";

-	mes "arts organization that specialized";

-	mes "in the use of poison. I joined";

-	mes "them, excited about further";

-	mes "broadening my knowldege.";

-	next;

-	mes "[Nagash Arses]";

-	mes "I was stunned by the enormous body";

-	mes "of knowledge about toxins that they";

-	mes "provided. I tried to learn as much";

-	mes "as I could so I could develop my";

-	mes "own, unique poisoning skills.";

-	next;

-	mes "[Nagash Arses]";

-	mes "As I studied with them, together we";

-	mes "started to clear the town of the";

-	mes "remaining monsters. Can you guess";

-	mes "the results of our effors to clean";

-	mes "up the city?";

-	next;

-	menu "..??",-,"It must have been good.",s_Good,"I guess it was okay.",s_Okay,"I don't know, but how did it go?",s_Dunno;

-

-	mes "[Nagash Arses]";

-	mes "Did you even listen to me? It's no";

-	mes "use talking to you if you don't";

-	mes "even care about what I have to";

-	mes "say.";

-	next;

-	goto s_False;

-

-s_Good:

-	mes "[Nagash Arses]";

-	mes "You're right!";

-	mes "We got rid of every";

-	mes "single monster in the city!";

-	next;

-	goto s_Right;

-

-s_Okay:

-	mes "[Nagash Arses]";

-	mes "Just okay...?";

-	mes "I don't think you realized how";

-	mes "powerful we were back then! Eh...";

-	next;

-	goto s_False;

-

-s_Dunno:

-	mes "[Nagash Arses]";

-	mes "We got rid of every single monster";

-	mes "in the city!";

-	next;

-

-s_Right:

-	mes "[Nagash Arses]";

-	mes "We managed to eliminate every";

-	mes "monster that was wandering around";

-	mes "Louyang. At the time, we were the";

-	mes "only people brave enough to take on";

-	mes "this sort of task.";

-	next;

-	mes "[Nagash Arses]";

-	mes "Unfortunately, other martial arts";

-	mes "organizations grew envious of our";

-	mes "success, insisting that we were";

-	mes "dishonorable for using poison to";

-	mes "attack our enemies.";

-	next;

-	mes "[Nagash Arses]";

-	mes "Although we can accept criticism";

-	mes "for our use of poison, we were";

-	mes "finally blamed for something we";

-	mes "never would have done.";

-	next;

-	mes "[Nagash Arses]";

-	mes "Someone put poison into a meal";

-	mes "which was eaten by a son of the";

-	mes "lord and then falsely accused us!";

-	next;

-	mes "[Nagash Arses]";

-	mes "in the end, our organization was";

-	mes "disbanded and I was put in jail.";

-	mes "I suffered through much to escape";

-	mes "from prison...";

-	next;

-	mes "[Nagash Arses]";

-	mes "However, because of all the";

-	mes "injuries I've had to endure in jail";

-	mes "and in my escape attempts,";

-	mes "I can no longer use my";

-	mes "martial arts.";

-	next;

-	mes "[Nagash Arses]";

-	mes "Even to this day, the police are";

-	mes "hounding after me. I really want to";

-	mes "tell the lord of Louyang that I'm";

-	mes "innocent, but it may be";

-	mes "too late now...";

-	set QL_POISONKING,5;

-	close;

-

-s_False:

-	mes "[Nagash Arses]";

-	mes "Sorry for keeping you from what you";

-	mes "wanted to do. Take care of";

-	mes "yourself, youngster.";

-	close;

-

-s_MetDisciple:

-	mes "[Nagash Arses]";

-	mes "Aren't you the youngster";

-	mes "I talked to a while ago?";

-	mes "Did you get a chance";

-	mes "to meet my disciple?";

-	mes "How was he?";

-	next;

-	mes "[Nagash Arses]";

-	mes "He was sick all the time when he";

-	mes "was young, so he worried me a lot.";

-	mes "But now I'm proud of him and he's";

-	mes "doing as well as just any other fine";

-	mes "young man.";

-	next;

-	mes "[Nagash Arses]";

-	mes "I am living only for him,";

-	mes "and hope that he becomes a great";

-	mes "healer someday. Recently, I've";

-	mes "found that my sole comfort is in";

-	mes "treating diseases for other";

-	mes "people...";

-	next;

-	mes "[Nagash Arses]";

-	mes "By the way...";

-	mes "You look pale...";

-	mes "Did something happen?";

-	next;

-	menu "Nothing",-,"I want to talk about your disciple",s_TalkDisciple,"I don't feel good.",s_DontFeelG;

-

-	mes "[Nagash Arses]";

-	mes "Oh...";

-	mes "I see...";

-	mes "But take care";

-	mes "of yourself.";

-	next;

-	mes "[Nagash Arses]";

-	mes "You better enjoy your physical";

-	mes "strength when you're young. When";

-	mes "you're my age, it's tough to regain";

-	mes "your health once you lose it.";

-	close;

-

-s_TalkDisciple:

-	mes "[Nagash Arses]";

-	mes "Did something happen to him?";

-	mes "I've been worried since he hasn't";

-	mes "come to visit me since you last";

-	mes "came to speak with me.";

-	next;

-	if(QL_POISONPATH == 1)goto s_BeFine;

-	if(countitem(678))menu "Give him Poison Bottle.",s_Bottle,"Cancel and go to 'Song Zhi Du'.",-;

-	else

-	{

-	mes "[" + strcharinfo(0) + "]";

-	mes "...Nothing much.";

-	close;

-	} 

-

-	mes "[" + strcharinfo(0) + "]";

-	mes "...Nothing much.";

-	next;

-s_BeFine:

-	mes "[Nagash Arses]";

-	mes "Hmm...?";

-	mes "I guess you don't know what is";

-	mes "going on. I've heard some bad";

-	mes "rumors about him, which is why I'm";

-	mes "asking.";

-	next;

-	mes "[Nagash Arses]";

-	mes "I hope he'll be fine.";

-	mes "After all, he's truly";

-	mes "kind at heart.";

-	close;

-

-s_Bottle:

-	delitem 678,1;

-	mes "[Nagash Arses]";

-	mes "Huh!?";

-	mes "Isn't this...!?";

-	next;

-	mes "[Nagash Arses]";

-	mes "I've dreamed of creating";

-	mes "a poison of such potency!";

-	mes "W-where did you find this?";

-	next;

-	menu "It's common nowadays.",-,"Explain to him what happened.",s_Explain;

-

-	mes "[Nagash Arses]";

-	mes "Really...?";

-	mes "Then someone finally figured it out.";

-	next;

-	mes "[Nagash Arses]";

-	mes "I shared all of my knowledge with";

-	mes "others, so I guess a doctor might";

-	mes "have figured out how to creat this.";

-	next;

-	mes "[Nagash Arses]";

-	mes "^666666*Sigh...*^000000";

-	mes "Now I feel depressed";

-	mes "for some reason..";

-	set QL_POISONPATH,1;

-	close;

-

-s_Explain:

-	mes "^3131FFYou tell Nagash Arses how";

-	mes "Song Zhi Du created this Deadly";

-	mes "Poison Bottle and his plan to get";

-	mes "his revenge on the lord of";

-	mes "Louyang.^000000";

-	next;

-	mes "[Nagash Arses]";

-	mes "^666666*Sigh...*^000000";

-	next;

-	mes "[Nagash Arses]";

-	mes "Will you...";

-	mes "Will you excuse";

-	mes "me for a second...?";

-	set QL_POISONPATH,2;

-	close;

-

-s_DontFeelG:

-	mes "[Nagash Arses]";

-	mes "Oh, you don't?";

-	mes "Well, that can happen";

-	mes "sometimes when you're";

-	mes "in a foreign land for";

-	mes "too long. I hope you";

-	mes "feel better soon.";

-	close;

-

-s_StopHim:

-	mes "[Nagash Arses]";

-	mes "Youngster...";

-	mes "I beg of you.";

-	mes "Please don not let him";

-	mes "bring any harm to the lord.";

-	next;

-	mes "[Nagash Arses]";

-	mes "If you cannot stop him,";

-	mes "then please interrupt him";

-	mes "from carrying out his plan.";

-	next;

-	mes "[Nagash Arses]";

-	mes "I tried...";

-	mes "To convince myself";

-	mes "that what I had heard";

-	mes "were just ugly rumors.";

-	mes "I was wrong...";

-	next;

-	mes "[Nagash Arses]";

-	mes "I am pretty sure he's been asking";

-	mes "you, as well as others, for aid.";

-	mes "Even if you do not agree to carry";

-	mes "out his plan, I'm sure he will find";

-	mes "someone to poison Lord Bai Long.";

-	next;

-	mes "[Nagash Arses]";

-	mes "There is only one way he can";

-	mes "poison the lord. He likes";

-	mes "drinking, and has a favorite";

-	mes "drink bottle he keeps with him";

-	mes "all the time. You must get rid";

-	mes "of his drink.";

-	next;

-	mes "[Nagash Arses]";

-	mes "Please, I beg you.";

-	mes "for my sake, as well";

-	mes "as that of my disciple,";

-	mes "Louyang's leader must live...";

-	close;

-

-s_Emo:

-	mes "^3131FFNagash Arses. He is no longer a";

-	mes "well-known Assassin of the martial";

-	mes "arts organization of which he was";

-	mes "once master has lon since";

-	mes "disbanded.";

-	next;

-	mes "^3131FFNow he is but a poor old man";

-	mes "who is in anguish over his";

-	mes "disciple. No matter what you say,";

-	mes "he continues to talk about";

-	mes "something totally unrelated, as if";

-	mes "in a dream.";

-	close;

-

-s_Happened:

-	mes "[Nagash Arses]";

-	mes "So...";

-	mes "What..";

-	mes "What happened?";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "i made it.";

-	next;

-	emotion 6;

-	mes "[Nagash Arses]";

-	mes "You did?!";

-	mes "Oh~ thank you,";

-	mes "thank you so much!";

-	next;

-	mes "[Nagash Arses]";

-	mes "Thank God I've";

-	mes "lived this long.";

-	mes "And... I just realized";

-	mes "something while you were away.";

-	next;

-	mes "[Nagash Arses]";

-	mes "This is a journal that I have been";

-	mes "writing for 15 years about my";

-	mes "feelings of guild, and what really";

-	mes "happened in the past. I hope you";

-	mes "can deliver this to the lord for";

-	mes "me.";

-	next;

-	mes "^3131FFYou obtained";

-	mes "^0000FFPoison King,";

-	mes "Nagash Arses' Journal.";

-	set QL_POISONKING,15;

-	close;

-

-s_Hope:

-	mes "[Nagash Arses]";

-	mes "I hope you";

-	mes "can deliver this";

-	mes "to Lord Bai Long...";

-	close;

-

-s_Letter:

-	mes "^3131FFYou gave him the";

-	mes "^0000FFLetter from Bai Long.^000000";

-	next;

-	mes "[Nagash Arses]";

-	mes "What's this...?";

-	next;

-	mes "[Nagash Arses]";

-	mes "Why, he's invited me";

-	mes "to take the position of";

-	mes "a government official!";

-	mes "I'm truly grateful!";

-	next;

-	mes "[Nagash Arses]";

-	mes "However, please let him";

-	mes "know that I must respectfully";

-	mes "decline his offer. I'm afraid that";

-	mes "I may be a burden to him once";

-	mes "again.";

-	next;

-	mes "[Nagash Arses]";

-	mes "Please tell him that I wish to";

-	mes "enjoy the rest of my life here.";

-	mes "Also, there are people here";

-	mes "who still need me...";

-	next;

-	mes "[Nagash Arses]";

-	mes "Thank you, youngster.";

-	mes "You've stopped my disciple";

-	mes "and helped me make up";

-	mes "with an old friend...";

-	next;

-	mes "^3131FFNagash Arses put his palm on your";

-	mes "back, and you can feel his strength";

-	mes "flowing into you.";

-	percentheal 100,100;

-	next;

-	mes "^3131FFYou grow dizzy, but you can also feel";

-	mes "like you're becoming more powerful";

-	mes "and gaining experience.";

-	if(BaseLevel < 56)set BaseExp,BaseExp+9000;

-	else if(BaseLevel > 55 && BaseLevel < 61)set BaseExp,BaseExp+10500;

-	else if(BaseLevel > 60 && BaseLevel < 66)set BaseExp,BaseExp+18684;

-	else if(BaseLevel > 65 && BaseLevel < 71)set BaseExp,BaseExp+27411;

-	else if(BaseLevel > 70 && BaseLevel < 76)set BaseExp,BaseExp+70757;

-	else if(BaseLevel > 75 && BaseLevel < 81)set BaseExp,BaseExp+130246;

-	else if(BaseLevel > 80 && BaseLevel < 86)set BaseExp,BaseExp+150340;

-	else if(BaseLevel > 85 && BaseLevel < 91)set BaseExp,BaseExp+182052;

-	else if(BaseLevel > 90)set BaseExp,BaseExp+406786;

-	set QL_POISONKING,17;

-	close2;

-	warp "louyang.gat",270,136;

-	end;

-

-s_Proud:

-	mes "[Nagash Arses]";

-	mes "My name, Nagash Arses,";

-	mes "is also the name of the poison king";

-	mes "in the legend of Arcturus. I have";

-	mes "a good reason to be proud of my";

-	mes "name!";

-	close;

-

-}

-

-lou_in01.gat,101,124,0	script	#LouSoldChk	139,100,0,{

-	if(QL_POISONKING == 13)goto s_SoldChk;

-	end;

-

-s_SoldChk:

-	mes "[Soldier]";

-	mes "Who goes there!";

-	next;

-	mes "^3131FFYou ran away as quickly as you";

-	mes "could!";

-	close2;

-	warp "louyang.gat",218,249;

-	end;

-

-}

-

-lou_in01.gat,115,163,0	script	#LouSoldChk2	139,0,2,{

-	if(QL_POISONKING == 13)goto s_SoldChk;

-	end;

-

-s_SoldChk:

-	mes "[Soldier]";

-	mes "Who goes there!";

-	next;

-	mes "^3131FFYou escape before the soldier can";

-	mes "find you.";

-	close2;

-	warp "louyang.gat",217,278;

-	end;

-

-}

-

-lou_in01.gat,115,163,0	script	#LouSoldChk3	139,25,0,{

-	if(QL_POISONKING == 13)goto s_SoldChk;

-	end;

-

-s_SoldChk:

-	mes "[Soldier]";

-	mes "Who goes there!";

-	next;

-	mes "^3131FFYou escape before the soldier can";

-	mes "find you.";

-	close2;

-	warp "louyang.gat",217,278;

-	end;

-

-}

-louyang.gat,218,278,0	script	#LouSecEntrnc	111,{

-

-	mes "[" + strcharinfo(0) + "]";

-	mes "What's this?";

-	mes "A crack in the wall?";

-	next;

-	mes "^3131FFYou jump to the stone wall and peek into the crack. It looks big enough for someone to squeeze through.";

-	next;

-	mes "You move through the crack as";

-	mes "quickly as you can.";

-	close2;

-	warp "lou_in01.gat",119,167;

-	end;

-

-}

-

-lou_in01.gat,117,167,0	script	#LouSecExit	111,{

-

-	mes "[" + strcharinfo(0) + "]";

-	mes "What's this?";

-	mes "A crack in the wall?";

-	next;

-	mes "^3131FFYou jump to the stone wall and peek into the crack. It looks big enough for someone to squeeze through.";

-	next;

-	mes "You move through the crack as";

-	mes "quickly as you can.";

-	close2;

-	warp "louyang.gat",217,278;

-	end;

-

-}

-

-lou_in01.gat,106,162,0	script	#BaiLongBottle	111,{

-

-	if(QL_POISONPATH > 1 && countitem(713) && countitem(938))goto s_Save;

-	if(QL_POISONKING != 13)goto s_Fancy;

-	mes "^3131FFYou found a drink bottle that's";

-	mes "possibly owned by Bai Long, lord of";

-	mes "Louyang.^000000";

-	if(QL_POISONPATH < 2 && countitem(678))goto s_Assassinate;

-	close;

-

-s_Assassinate:

-	next;

-	delitem 678,1; //Poison Bottle

-	mes "^3131FFYou put the deadly poison into the bottle.";

-	set QL_POISONKING,14;

-	next;

-	mes "^3131FFIt would be smart to get out of this place as soon as you can.";

-	close;

-

-s_Fancy:

-	mes "^3131FFYou found a drink bottle. It's fancy enough that the only possible owner could be Bai Long, lord of Louyang.";

-	close;

-

-s_Save:

-	mes "^3131FFYou take the drink bottle and replace it with a bottle filled with sticky mucus. Hopefully Bai Long won't notice!";

-	delitem 713,1; //Empty Bottle

-	delitem 938,1; //Stick Mucus

-	set QL_POISONKING,14;

-	close;

-

-}

+//===== eAthena Script ======================================= 
+//= Quest NPCs related to Louyang
+//===== By: ================================================== 
+//= Evera and The eAthena Dev Team
+//===== Current Version: ===================================== 
+//= 1.1
+//===== Compatible With: ===================================== 
+//= eAthena 1.0
+//===== Description: ========================================= 
+//= Soup Quest, Tool Master Quest, Doctor Quest,
+//= Poison King  Quest
+//===== Additional Comments: ================================= 
+//= 1.0 Initial Release [Evera]
+//= 1.1 Fixed double levelup bug [Lupus]
+//============================================================ 
+
+//============================================================
+//======================================================= Soup
+//====================================================== Quest
+lou_fild01.gat,195,177,4	script	Jiu Lian Bu#01	819,{
+	if(QL_SOUP2) goto L_DONE;
+	if(QL_SOUPQUEST)goto L_WHERE;
+	if(QL_GOTFAKESOUP) goto L_FAKE;
+	if(QL_GOTDRAGONSOUP) goto L_SOUP;
+	if(QL_ACCEPTSOUP) goto L_GORESTA;
+	mes "[Jiu Lian Bu]";
+	mes "Hey~";
+	mes "What's up?";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "I don't like hanging around too many people, so I came here. Listening to this strean really puts my mind to ease.";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "No offense, but I'm upset";
+	mes "at the sheer number of tourists coming over to Louyang";
+	mes "Sure, I can understand that our town is attractive and has beautiful sights.";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "But I just can't stand crowds of people. People gather like sheep to any place they hear is popular, and that really bugs me!";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "Speaking of which, there's even";
+	mes "a place in Louyang that's just like";
+	mes "that. Man, I hate that restaurant!";
+	next;
+	menu "What restaurant?",-,"Ignore him.",M_IGNORE;
+
+	mes "[Jiu Lian Bu]";
+	mes "In the east side of Louyang, there's a restaurant built on a pond. It's been around for a long time, selling food for ridiculous prices!";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "Oh sure, the food and flavors";
+	mes "there have a long history, but I";
+	mes "don't think that justifies how they";
+	mes "charge their patrons!";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "As a young man";
+	mes "who loves his town,";
+	mes "I can't let them manipulate my";
+	mes "people like that!";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "But everyone here already knows who I am, so I can't do anything! I've already had one too many, shall we say, 'incidents' with the people living here already.";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "I've been caught for tagging walls, shoplifting, camming, stealing a few girlfriends... So yeah, I'm not exactly known as a sterling citizen.";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "Say, wait a minute. The local";
+	mes "people around here aren't too";
+	mes "familiar with you. Hmmm...";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "Would you sneak into that restaurant and steal the ^3131FFDragon Soup Broth^000000 for me?";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "The Dragon Soup Broth is the";
+	mes "backbone for the restaurant";
+	mes "owner's secret recipe.";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "But they've been cheating their";
+	mes "customers by watering that broth";
+	mes "down and selling it for a";
+	mes "ridiculous price! Serves them right";
+	mes "if their secrets were stolen!";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "If you can steal some of the broth,";
+	mes "I'll pay you back. Whaddaya say?";
+	next;
+	menu "I'll do it!",-,"No, stealing is wrong.",M_NO;
+
+	mes "[Jiu Lian Bu]";
+	mes "Great!";
+	mes "I knew you'd";
+	mes "see things my way!";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "Okay, the restaurant is at the East side of Louyang. But you got to be careful. The workers there watch over that broth like freakin' hawks!";
+	set QL_ACCEPTSOUP,1;
+	close;
+
+M_NO:
+	mes "[Jiu Lian Bu]";
+	mes "Stealing?";
+	mes "You may have";
+	mes "a point there.";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "But then, that restaurant has been doing that to their customers for years! So, technically. we'd just be stealing back.";
+	close;	
+
+M_IGNORE:
+	mes "[Jiu Lian Bu]";
+	mes "That join isn't even that great. I mean, it's so obvious that they rip off their customers! Dragon Soup?! More like... Dragon Crap Soup!";
+	close;
+
+L_GORESTA:
+	mes "[Jiu Lian Bu]";
+	mes "Huh...?";
+	mes "Whoa, I thought you were on you way to the restaurant. You better get a move on.";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "Alright then, pal. Make sure the";
+	mes "guys who work there don't catch you. Good luck~";
+	close;
+
+L_FAKE:
+	mes "[Jiu Lian Bu]";
+	mes "Wow! You made it!";
+	mes "Let me see...";
+	next;
+	mes "^445BA7Jiu Lian Bu takes a hearty sip of the broth you've managed to steal for him.";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "Ohhhh man....";
+	mes "This is so not Dragon Soup Broth. Sorry, but would you go and try to get it again?";
+	set QL_GOTFAKESOUP,0;
+	close;
+
+L_SOUP:
+	mes "[Jiu Lian Bu]";
+	mes "Wow! You made it!";
+	mes "Let me see...";
+	next;
+	mes "^445BA7Jiu Lian Bu takes a hearty sip of the broth you've managed to steal for him.";
+	next;	
+	mes "Ooooh. Ooh yeah.";
+	mes "This is the stuff.";
+	mes "Muhahahahahaha~!";
+	mes "This'll put the chef";
+	mes "in agony for a while!";
+	next;
+	set QL_GOTDRAGONSOUP,0;
+	set QL_ACCEPTSOUP,0;
+	set QL_SOUPQUEST,1;
+	mes "[Jiu Lian Bu]";
+	mes "Good job, chum! Heh heh heh, because you risked your neck for me, I'm gonna show you an awesome place! Just follow me~";
+	close2;
+	warp "lou_fild01.gat",180,171;
+	end;
+
+L_DONE:
+	mes "[Jiu Lian Bu]";
+	mes "Hey~";
+	mes "So how ya been, ya smooth criminal?";
+	mes "You want to visit that place again?";
+	next;
+	menu "Sure, let's go~",-,"Nah, maybe next time.",M_NAH;
+
+	mes "[Jiu Lian Bu]";
+	mes "Alright~";
+	mes "Let's get";
+	mes "a groove on.";
+	close2;
+	warp "lou_fild01.gat",180,171;
+	end;
+
+M_NAH:
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "Not in the mood, eh?";
+	mes "No prob. But feel free";
+	mes "to come see me whenever";
+	mes "you want.";
+	close;
+L_WHERE:
+	mes "[Jiu Lian Bu]";
+	mes "Hey where did you go?";
+	mes "Come up again and I'll";
+	mes "give you your reward.";
+	close2;
+	warp "lou_fild01.gat",180,171;
+	end;
+}
+
+lou_fild01.gat,175,174,4	script	Jiu Lian Bu#02	819,{
+	if(QL_SOUPQUEST < 1) goto L_DOQUEST;
+	if(QL_SOUP2 < 1) goto L_1STTIME;
+	mes "[Jiu Lian Bu]";
+	mes "So...";
+	mes "Whaddya want to do?";
+	emotion e_heh;
+	next;
+	menu "Shout.",-,"Leave.",M_LEAVE;
+
+	mes "[Jiu Lian Bu]";
+	mes "Ready~!";
+	mes "Say it out loud!";
+	next;
+	input @loushout$;
+	mapannounce "lou_fild01.gat","'" + strcharinfo(0) + "' shouts: " + @loushout$ ,1,0x9CFF00;
+	mes "[" + strcharinfo(0) + "]";
+	mes @loushout$;
+	close;
+	
+M_LEAVE:
+	mes "[Jiu Lian Bu]";
+	mes "Ahhh...";
+	mes "Alright, let's";	
+	mes "get a groove on.";
+	close2;
+	warp "lou_fild01.gat",197,174;
+	end;
+
+L_DOQUEST:
+	mes "[Jiu Lian Bu]";
+	mes "Who are you?";
+	mes "Get off my turf!";
+	close2;
+	warp "lou_fild01.gat",197,174;
+	end;
+
+L_1STTIME:
+	mes "[Jiu Lian Bu]";
+	mes "So...";
+	mes "Whaddya think?";
+	mes "Prettiest place in Louyang, isn't it?";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "Whenever I'm depressed or need to relax, I just sit here and enjoy the breeze. It helps me forget all my worries.";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "Heh heh, the best part is, this place is far away from my older siste. Man, that woman can nag, nag, nag, all day long.";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "Why don't you sit down and close your eyes, and feel that soothing wind. It's pretty refreshing";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "Also...";
+	mes "I'm a little";
+	mes "embarrassed to";
+	mes "say this but...";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "I'm the kind of guy who speaks his mind. If there's something you just wanna say, but can't, it's kind of like poison in your mind.";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "You know what I'm talking about, right? If you bottle something up inside of you, it just causes you anxiety you don't need.";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "So..";
+	mes "This is what you do.";
+	mes "Clench your first, take";
+	mes "a deep breath.";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "And just yell";
+	mes "Whatever you want!";
+	mes "If you don't know";
+	mes "the words, just";
+	mes "screaming will do.";
+	mes "Let everything out!";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "Ready~!";
+	mes "Say it out loud!";
+	next;
+	input @loushout$;
+	mapannounce "lou_fild01.gat","'" + strcharinfo(0) + "' shouts: " + @loushout$ ,1,0x9CFF00;
+	mes "[" + strcharinfo(0) + "]";
+	mes @loushout$;
+	set QL_SOUP2,1;
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "So, how do you feel?";
+	mes "Don't you feel better now? Hahaha~";
+	next;
+	mes "[Jiu Lian Bu]";
+	mes "So from now on, whenever you";
+	mes "want to relieve yourself of stress,";
+	mes "come see me and we'll come back to";
+	mes "this place. Call it my way of";
+	mes "saying thanks.";
+	close;	
+}
+
+lou_in02.gat,61,175,2	script	Employee#01	818,2,2{
+	mes "[Ya Hua]";
+	mes "^6A6A6A*Yawn...*";
+	close;
+
+OnTouch:
+	if(QL_GOTDRAGONSOUP == 1 || QL_GOTFAKESOUP == 1) goto S_CAUGHT;
+	end;
+
+S_CAUGHT:
+	mes "[Ya Hua]";
+	mes "^6A6A6A*Yawn...*";
+	mes "^000000Eyelids...";
+	mes "Getting...";
+	mes "Heavier...";
+	next;
+	mes "[Ya Hua]";
+	mes "Wait a sec...";
+	mes "Are you a thief?!";
+	mes "Get out of here!!";
+	if(QL_GOTFAKESOUP == 1) set QL_GOTFAKESOUP,0;
+	if(QL_GOTDRAGONSOUP == 1) set QL_GOTDRAGONSOUP,0;
+	next;
+	mes "^3131FFYou have failed";
+	mes "^3131FFto steal the pot.";
+	close;
+}
+
+lou_in02.gat,54,174,6	script	Employee#02	822,{
+	mes "[Chang Pai]";
+	mes "^6A6A6A*Yawn...*";
+	close;
+}
+
+lou_in02.gat,50,185,4	script	Pot#01	111,{
+	if(QL_SOUPQUEST == 1) goto L_EMPTY;
+	if(QL_ACCEPTSOUP < 1) goto L_NORMAL;
+	mes "^3131FFBeneath the shadows, you find a large pot filled with dark, red liquid. What do you want to do?";
+	next;
+	menu "Take the pot.",-,"Look for another pot.",M_LOOK;
+
+	if (QL_GOTDRAGONSOUP == 1) set QL_GOTDRAGONSOUP,0;
+	mes "^3131FFYou take a careful look around. It wouldn't be wise to steal this now if anyone is watching.";
+	next;
+	mes "^3131FFSince the restaurant is closed, the whole place is completely quiet. The employees are all asleep.";
+	next;
+	mes "^3131FFYou carefully lift the pot, and although it's heavy, you think you can carry it.";
+	next;
+	mes "^3131FFAll you have";
+	mes "^3131FFto do now is get";
+	mes "^3131FFaway from this restaurant";
+	mes "^3131FFwithout getting caught...";
+	set QL_GOTFAKESOUP,1;
+	close;
+
+M_LOOK:
+	mes "^3131FFYou decide to";
+	mes "look for another pot.";
+	close;
+
+L_NORMAL:
+	mes "[Chef]";
+	mes "Ah...";
+	mes "Please, do not";
+	mes "touch the pots!";
+	close;
+
+L_EMPTY:
+	mes "^3131FFYou found a pot, however it's empty.";
+	close;
+}
+
+lou_in02.gat,49,185,4	script	Pot#02	111,{
+	if(QL_SOUPQUEST == 1) goto L_EMPTY;
+	if(QL_ACCEPTSOUP < 1) goto L_NORMAL;
+	mes "^3131FFBeneath the shadows, you find a large pot filled with dark, red liquid. What do you want to do?";
+	next;
+	menu "Take the pot.",-,"Look for another pot.",M_LOOK;
+
+	if (QL_GOTFAKESOUP == 1) set QL_GOTFAKESOUP,0;
+	mes "^3131FFYou take a careful look around. It wouldn't be wise to steal this now if anyone is watching.";
+	next;
+	mes "^3131FFSince the restaurant is closed, the whole place is completely quiet. The employees are all asleep.";
+	next;
+	mes "^3131FFYou carefully lift the pot, and although it's heavy, you think you can carry it.";
+	next;
+	mes "^3131FFAll you have";
+	mes "^3131FFto do now is get";
+	mes "^3131FFaway from this restaurant";
+	mes "^3131FFwithout getting caught...";
+	set QL_GOTDRAGONSOUP,1;
+	close;
+
+M_LOOK:
+	mes "^3131FFYou decide to";
+	mes "look for another pot.";
+	close;
+
+L_NORMAL:
+	mes "[Chef]";
+	mes "Ah...";
+	mes "Please, do not";
+	mes "touch the pots!";
+	close;
+
+L_EMPTY:
+	mes "^3131FFYou found an empty pot.";
+	close;
+}
+
+lou_in02.gat,62,183,4	script	Chef	820,{
+	if(QL_SOUPQUEST == 1) goto L_FINISHED;
+	mes "[Wang Shi Long]";
+	mes "Hello, are you";
+	mes "one of our customers?";
+	mes "I am Wang Shi Long";
+	mes "the chef of this restaurant.";
+	next;
+	mes "[Wang Shi Long]";
+	mes "My family has server food";
+	mes "to Lord Bai Long for a long time.";
+	mes "This restaurant has been handed";
+	mes "down the family line, and I am the successor~";
+	next;
+	mes "[Wang Shi Long]";
+	mes "Our specialty, Dragon Soup,";
+	mes "won especially high praise from";
+	mes "Lord Bai Long, who is known for";
+	mes "his extremely discerning sense of taste.";
+	next;
+	mes "[Wang Shi Long]";
+	mes "I'm also proud to say that we cook";
+	mes "with only the freshest and highest";
+	mes "quality ingredients.";	
+	next;	
+	mes "[Wang Shi Long]";
+	mes "We've always been popular in";
+	mes "Louyang for hundreds and hundreds";
+	mes "of years because of our high";
+	mes "quality gourmet cuisine.";
+	next;
+	mes "[Wang Shi Long]";
+	mes "In this dry and hot weather,";
+	mes "Dragon Soup is the best food for";
+	mes "any appetite. I suggest that you";
+	mes "try a bowl. You'll be quite";
+	mes "pleased!";
+	close;
+
+L_FINISHED:
+	mes "[Wang Shi Long]";
+	mes "^6A6A6A*Moans and Cries*^000000";
+	mes "I guess this is it...!";
+	mes "The end of my family's glory.";
+	mes "Someone stole the base broth";
+	mes "of my Dragon Soup!";
+	next;
+	mes "[Wang Shi Long]";
+	mes "What should I do, now?";
+	mes "Without Dragon Soup, my family's";
+	mes "restaurant will now just be like";
+	mes "all the others...";
+	close;
+}
+
+lou_in02.gat,42,186,4	script	Liu Jia Lim	816,{
+	if(QL_SOUPQUEST == 1) goto L_FINISHED;
+	mes "[Liu Jia Lim]";
+	mes "Do you know what's the best dish at this restaurant? It's Dragon Soup! They've been selling it here for as long as this restaurant has been around";
+	next;
+	mes "[Liu Jia Lim]";
+	mes "It's delicate taste comes from a broth extracted from pure meat that doesn't contain any fat. So it's also a very popular diet food for the ladies.";
+	next;
+	mes "It's tasty and really good for your health. Why don't you order a bowl? I've never known anyone to taste Dragon Soup and not love it!";
+	close;
+
+L_FINISHED:
+	mes "[Liu Jia Lim]";
+	mes "Do you know what was this restaurant's best dish throughout all of its history? Dragon Soup!";
+	next;
+	mes "[Liu Jia Lim]";
+	mes "It's delicate taste comes from a broth extracted from pure meat that doesn't contain any fat. So it's also a very popular diet food for the ladies.";
+	next;
+	mes "[Liu Jia Lim]";
+	mes "I'm not sure what happened, but people say this restaurant no longer sells Dragon Soup.";
+	mes "Was it because of the price...?";
+	close;
+}
+
+lou_in02.gat,80,173,2	script	Li Min	746,{
+	if(QL_SOUPQUEST == 1) goto L_FINISHED;
+	mes "[Li Min]";
+	mes "Well, I don't really";
+	mes "live here in Louyang.";
+	mes "Still, I come here often";
+	mes "enough to visit.";
+	next;
+	mes "[Li Min]";
+	mes "I just returned";
+	mes "because I've got";
+	mes "a huge craving for the";
+	mes "food I tasted here";
+	mes "a while ago.";
+	next;
+	mes "[Li Min]";
+	mes "For some reason, I can't forget it.";
+	mes "I can't get it out of my mind!";
+	next;
+	mes "[Li Min]";
+	mes "The taste, the texture.";
+	mes "The sweetness, melting down into my";
+	mes "mouth, and it's tempting scent";
+	mes "lingering on my lips...";
+	next;
+	mes "[Li Min]";
+	mes "Ummmmm...";
+	mes "Royal Jelly!";
+	mes "It makes my";
+	mes "mouth water~";
+	close;
+
+L_FINISHED:
+	mes "[Li Min]";
+	mes "^6A6A6A*Sigh*^000000 I am so disappointed. I came";
+	mes "all the way down here to taste the";
+	mes "food! I can't believe they don't";
+	mes "sell it anymore!";
+	next;
+	mes "[Li Min]";
+	mes "The worst part is that I'm already";
+	mes "addicted to the taste! ^6A6A6A*Sob...*^000000";
+	close;
+}
+
+louyang.gat,174,150,4	script	Liu Chi Ling	815,{
+	if(QL_SOUPQUEST == 1) goto L_RUMOR;
+	mes "[Jiu Chi Ling]";
+	mes "I'm worried about my brother.";
+	mes "He's young, rebellious and doesn't";
+	mes "listen to anybody...";
+	next;
+	mes "[Jiu Chi Ling]";
+	mes "He just left the";
+	mes "house while he was";
+	mes "complaining about";
+	mes "that restaurant...";
+	next;
+	mes "[Jiu Chi Ling]";
+	mes "^6A6A6A*Sigh~~*^000000";
+	mes "I'm not going to let him get";
+	mes "away this time!";
+	close;
+
+L_RUMOR:
+	mes "[Jiu Chi Ling]";
+	mes "There's a strange rumor going";
+	mes "around that the restaurant is no";
+	mes "longer selling Dragon Soup...";
+	next;
+	mes "[Jiu Chi Ling]";
+	mes "Do you think";
+	mes "my brother did";
+	mes "something bad again!?";
+	mes "I hope not! If he did...";
+	mes "What am I supposed to do?!";
+	close;
+}
+
+
+//============================================================
+//================================================ Tool Master
+//====================================================== Quest
+lou_in02.gat,210,47,8	script	City Hall Officer	825,{
+	if(QL_GOTCOMPROP == 1)goto L_BEENTOHIM;
+	if(QL_LOUBRIBE == 1)goto L_OFFICER;
+	if(QL_BEENTOSTORAGE == 1)goto L_QUEST;
+	mes "[Jin Chiyuan]";
+	mes "^6A6A6A*Yawn~*^000000";
+	mes "Gosh, this hot weather is such a pain. Oh? You look like a tourist. Are you enjoying your stay?";
+	next;
+	mes "[Jin Chiyuan]";
+	mes "Although we've been having bad weather recently, there are many good places to visit in Louyang. I hope you have a good time.";
+	close;	
+
+L_QUEST:
+	mes "[Jin Chiyuan]";
+	mes "Hm? A Rune-Midgardian? Now, how may I help you?";
+	next;
+	menu "I need a document.",-,"I just dropped by",M_DROP;
+
+	mes "[Jin Chiyuan]";
+	mes "Ah, you do?";
+	mes "Unfortunately, there are many people waiting in line to procure goverment forms, so it will take a while to handle your request.";
+	next;
+	mes "[Jin Chiyuan]";
+	mes "^6A6A6A*whispers*";
+	mes "^2A2A2AWell, there is a way that you can, shall we say, expedite our processing of your request...^000000";
+	next;
+	menu "Huh? Come again?",-,"A little zeny to cut the red tape, eh?",M_BRIBE;
+
+	mes "[Jin Chiyuan]";
+	mes "^6A6A6A*Ahem!*^000000 Nothing.";
+	mes "Nothing of importance. Now, I'm very busy, so if you would go fill the application over there...";
+	close;
+
+M_BRIBE:
+	input @loubribe;
+	if(@loubribe < 10000)goto L_POOR;
+	if(zeny < @loubribe)goto L_NOTENOUGH;
+	set Zeny, Zeny - @loubribe;
+	set QL_LOUBRIBE,1;
+	mes "[Jin Chiyuan]";
+	mes "What...?!";
+	mes "That's not what I meant, but if you insist on donating to our government...";
+	next;
+	mes "[Jin Chiyuan]";	
+	mes "^6A6A6A*Whispers*";
+	mes "^2A2A2AWhen you go upstairs, another officer will give you the document you want.^6A6A6A *Ahem* ^000000Louyang thanks you!";
+	close;
+
+L_POOR:
+	mes "[Jin Chiyuan]";
+	mes "Good lord,";
+	mes "What are you thinking? What am I, a beggar?! That's a poor excuse for a bribe!";
+	next;
+	emotion e_pif;
+	mes "[Jin Chiyuan]";
+	mes "I mean...";
+	mes "How dare you bribe an officer of the law! I hope other outsiders are not like you! Please leave immediately.";
+	close;
+
+M_DROP:
+	mes "[Jin Chiyuan]";
+	mes "Oh well...";
+	mes "Let me tell you that this is not a good time for tourists. I hope you don't wander into places you're not supposed to be.";
+	next;
+	mes "[Jin Chiyuan]";
+	mes "Quite frankly,";
+	mes "it's a dangerous climate for curiosity right now. Please, be careful.";
+	close;
+
+L_NOTENOUGH:
+	mes "[Jin Chiyuan]";
+	mes "You don't even have that much money.";
+	close;
+
+L_OFFICER:
+	mes "[Jin Chiyuan]";
+	mes "Haven't you met the officer I told you about? I've contacted him about the matter, so you may meet him upstairs.";
+	next;
+	mes "[Jin Chiyuan]";
+	mes "Hahahaha...";
+	mes "Take care,";
+	mes "Rune-Midgardian.";
+	close;
+
+L_BEENTOHIM:
+	emotion e_heh;
+	mes "[Jin Chiyuan]";
+	mes "Ah~";
+	mes "You met him,";
+	mes "didn't you?";
+	mes "Hahaha...";
+	mes "Enjoy your stay";
+	mes "in Louyang!";
+	close;
+}
+
+lou_in02.gat,156,38,8	script	Studying Officer	822,{
+	if(QL_GOTCOMPROP == 1)goto L_RANT2;
+	if(QL_LOUBRIBE == 1)goto L_BRIBED;
+	if(QL_BEENTOSTORAGE == 1)goto L_RANT;
+	mes "[Huang Zhishu]";
+	mes ".....";
+	mes "^6A6A6A*Mumble mumble*^000000";
+	next;
+	mes "^3131FFHe appears to be rummaging around for some documents and takes no notice of you.";
+	next;
+	menu "Excuse me.",-,"Pass him.",M_PASS;
+	
+	mes "[Huang Zhishu]";
+	mes "Hmmm...?";
+	mes "Well...";
+	mes "...";
+	mes "I see...";
+	mes "^6A6A6A*Mumble mumble...*^000000";
+	close;
+
+M_PASS:
+	mes "[Huang Zhishu]";
+	mes ".....";
+	mes "^6A6A6A*Mumble mumble*^000000";
+	close;
+
+L_RANT:
+	mes "[Huang Zhishu]";
+	mes "Books contain the spirit and ideas of their authors. Any work of are can be considered a window into the soul of its creator.";
+	next;
+	mes "[Huang Zhishu]";
+	mes "^6A6A6A*Mumble mumble...*^000000";
+	mes "Hmm... I see...";
+	mes "Ah, I see....";
+	mes "^6A6A6A*Mumble mumble...*^000000";
+	close;
+
+L_BRIBED:
+	mes "^3131FF*Rummage rummage...*^000000";
+	next;
+	menu "Sorry about that.",-,"I came to pick up my documents.",L_DOCU;
+
+	mes "[Huang Zhishu]";
+	mes "Apology accepted.";
+	mes "Hmmm....";
+	mes "Oh I see, I see...";
+	next;
+	emotion e_gasp;
+	mes "^3131FF*Rummage rummage...*";
+	mes "^3131FF..........";
+	close;	
+
+L_DOCU:
+	mes "[Huang Zhishu]";
+	mes "Huh?";
+	mes "Ah...";
+	mes "You're the one I'm waiting for. So what kind of document did you need?";
+	input @loudocument$;
+	next;
+	mes "[Huang Zhishu]";
+	mes "Let's see now.";
+	mes "You want..";
+	mes "a " + @loudocument$ + "?";
+	next;
+	if(@loudocument$ != "Communication Proposal")goto L_WHAT;
+	mes "[Huang Zhishu]";
+	mes "Now where did I put that? You want a Communication Proposal, huh? I think I'll need some time to find it. Ah, right. I think I know where I put that.";
+	next;
+	mes "...";
+	next;
+	mes "...";
+	mes "......";
+	next;
+	mes "...";
+	mes "......";
+	mes ".........";
+	next;
+	mes "...";
+	mes "......";
+	mes ".........";
+	mes "............";
+	next;
+	mes "...";
+	mes "......";
+	mes ".........";
+	mes "............";
+	mes "...............";
+	next;
+	mes "[Huang Zhishu]";
+	mes "Here it is. Someone asked me for the same document a few days ago so I was able to find it again pretty easily. I hope it's useful to you.";			
+	set QL_GOTCOMPROP,1;
+	set QL_LOUBRIBE,0;
+	set QL_BEENTOSTORAGE,0;
+	close;
+
+L_WHAT:
+	mes "[Huang Zhishu]";
+	mes "Huh?";
+	mes "Wha...";
+	next;
+	mes "[Huang Zhishu]";
+	mes "I'm sorry but I don't think we have that one. You might want to check the name of the document once more, and then come back to me.";
+	close;
+
+L_RANT2:
+	emotion e_ok;
+	mes "[Huang Zhishu]";
+	mes "Hmmm...?";
+	mes "Do you think I need to go outside more often? Well, I guess for some reason, I don't feel well. I guess I really should get some fresh air.";
+	mes "^6A6A6A*Yawn...*^000000";
+	next;
+	mes "[Huang Zhishu]";
+	mes "But you should get out more often yourself! It's not a good idea to always stay home. If you don't get some exercise when you're young, it could affect your health later.";
+	close;
+}
+
+lou_in02.gat,248,166,2	script	Tool Shop Master	824,{
+	if(QL_GOTHERB == 1)goto L_HERB;
+	if(QL_TOOLMASTER == 1)goto L_STORAGE;
+	if(QL_DOCQUEST == 1)goto L_QUEST;
+L_HERB:
+	mes "[Wang Chuiyi]";
+	mes "My business hasn't been doing well recently. And what is wrong with this weather? I don't know what's going on with the world...";
+	close;
+
+L_QUEST:
+	mes "[Wang Chuiyi]";
+	mes "Darn it!";
+	mes "I hate this";
+	mes "weather...!";
+	next;
+	emotion e_what;
+	mes "[Wang Chuiyi]";
+	mes "Um? Can I help";
+	mes "you with anything?";
+	next;
+	menu "I'm here to get something for the doctor...",-,"I agree, the weather really is bad.",M_WEATHER;
+
+	mes "[Wang Chuiyi]";
+	mes "Huh?";
+	mes "An errand for the doctor? She must have run out of medicine again. Go ahead and check the storage.";
+	next;
+	mes "[Wang Chuiyi]";
+	mes "You can find the storage on the opposite side of this building. There, you'll see a guy named Jiang Xiayou. Go ahead and ask him for the stuff you need.";
+	set QL_TOOLMASTER,1;
+	close;
+
+M_WEATHER:
+	mes "[Wang Chuiyi]";
+	mes "Tell me about it. This weather keeps stressing me out. Damn, I don't think I'll live very long if I keep getting aggravated like this by the weather...";
+	close;
+
+L_STORAGE:
+	mes "[Wang Chuiyi]";
+	mes "You can find the storage on the opposite side of this building. There, you'll see a guy named Jiang Xiayou. Go ahead and ask him for the stuff you need.";
+	close;
+}
+
+lou_in02.gat,201,166,5	script	Storage Keeper	819,{
+	if(QL_GOTCOMPROP == 1)goto L_FINALLY;
+	if(QL_BEENTOSTORAGE == 1)goto L_LAZY;
+	if(QL_TOOLMASTER == 1)goto L_QUEST;
+	mes "[Jiang Xiayou]";
+	mes "^6A6A6A*Yawn...*^000000";
+	mes "This is boring...";
+	mes "So boring, it's ridiculous. I don't want to waste any more time here, I've got important things to do...";
+	close;
+
+L_QUEST:
+	mes "[Jiang Xiayou]";
+	mes "Huh?";
+	mes "What, what are you doing here? If you don't need anything, you better get a move on.";
+	next;
+	menu "Sorry about that.",-,"It's hot isn't it?",M_HOT,"I'm on an errand for the doctor.",M_ERRAND;
+
+	mes "[Jiang Xiayou]";
+	mes "That's right!";
+	mes "You don't mess with a person in this hot weather! Now, go away. Can't you see I'm busy!";
+	close;
+
+M_HOT:
+	mes "[Jiang Xiayou]";
+	mes "You don't have to ask me that. I can feel if for myself! Now, I got a bunch of things to take care of, so quit bugging me. Damn, it's hot!";
+	close;
+
+M_ERRAND:
+	mes "[Jiang Xiayou]";
+	emotion e_gasp;
+	mes "Oh yeah?";
+	mes "Well, why didn't you say so? Let's see.";
+	mes "Hmmm...";
+	next;
+	mes "[Jiang Xiayou]";
+	mes "Actually, could you help me out first? Don't worry, it's not so hard but it's pretty important for me. Once you help me out, I'll get what you need.";
+	next;
+	menu "Um, what is it?",-,"Sorry, I'm busy.",L_BUSY;
+
+	mes "[Jiang Xiayou]";
+	mes "Cool, thanks. I have to go get some official documents from City Hall, but I can't leave this storage area since no one can take over my shift.";
+	next;
+	mes "[Jiang Xiayou]";
+	mes "So I want you to go get the documents from City Hall for me. I don't think it'll take much of your time.";
+	next;
+	mes "[Jiang Xiayou]";
+	mes "Just go east from here and look for the building that looks sort of like it was made in gauge form. That's City Hall.";
+	next;
+	mes "[Jiang Xiayou]";
+	mes "I don't get why the government spent so much money making that building, but anyway, I hope you can do that for me.";
+	next;
+	mes "[Jiang Xiayou]";
+	mes "Oh, I almost forgot.";
+	mes "You have to ask for a specific type of document, so let me tell you right now.";
+	next;
+	mes "[Jiang Xiayou]";	
+	mes "This is important,";
+	mes "so don't forget this.";
+	mes "When the guy asks what you need, you tell him: '^FF0000Communication Proposal^000000' Just like that?";
+	next;
+	mes "[Jiang Xiayou]";
+	mes "If you don't specify the documents you need, they won't give you anything. So be careful and don't forget!";
+	set QL_BEENTOSTORAGE,1;
+	close;
+
+L_BUSY:
+	mes "[Jiang Xiayou]";
+	mes "Bah~!";
+	mes "Forget it, then!";
+	next;
+	mes "[Jiang Xiayou]";
+	mes "The medicines you're looking for might be around here. so look around. If it weren't for the doctor, I wouldn't even let you hang around, you know that?";
+	close;
+
+L_LAZY:
+	mes "[Jiang Xiayou]";
+	mes "Huh?";
+	mes "Haven't you gone to City Hall yet?";
+	mes "What a lazy ass";
+	next;
+	mes "[Jiang Xiayou]";
+	mes "Shouldn't you hurry to get that medicine to the doc? We're talking a man's life at stake, that mean anything to you?";
+	next;
+	mes "[Jiang Xiayou]";
+	mes "I guess you're";
+	mes "the forgetful type...";
+	mes "When the guy asks what you need, you tell him:";
+	mes "'^FF0000Communication Proposal^000000'.";
+	next;
+	mes "[Jiang Xiayou]";
+	mes "Just like that.";
+	mes "Now, go to it, tiger.";
+	close;
+
+L_FINALLY:
+	mes "[Jiang Xiayou]";
+	mes "You finally brought it! Haha, I just got everything you need, too. Let me see...";
+	mes "Yup this is it!";
+	mes "Good, good...";
+	next;
+	mes "^3131FF*Rummage rummage...*";
+	mes "^3131FF......";
+	next;
+	menu "Excuse me.",-;
+	mes "[Jiang Xiayou]";
+	mes "Huh?";
+	mes "Ah....";
+	mes "Haha...";
+	mes "Sorry about";
+	mes "that. Hahaha~";
+	next;
+	getitem	7252,1; //Herbal Medicine
+	mes "[Jiang Xiayou]";
+	mes "Ah! Here you go. Even if it was kind of annoying to do, I guess we gotta help each other, right? Alright then, I'll see ya around.";
+	set QL_GOTHERB,1;
+	set QL_BEENTOSTORAGE,0;
+	set QL_GOTCOMPROP,0;
+	set QL_TOOLMASTER,0;
+	close;
+}
+
+
+//============================================================
+//===================================================== Doctor
+//====================================================== Quest
+lou_in02.gat,265,69,4	script	Doctor	814,{
+	if(QL_DOCQUEST == 1) goto L_MED;
+	if(QL_DOCQUEST == 2) goto L_RANT;
+	if(QL_DOCQUEST == 3) goto L_CHECKITM;
+	if(QL_DOC1STTIME == 1) goto L_QUEST;
+	mes "[Hua Tuo]";
+	mes "There are many pressure points on the human body. Ever since ancient times, it has been believed that each pressure point was limited to its role and functions.";
+	next;
+	mes "[Hua Tuo]";
+	mes "However, as I studied and experimented with every pressure point, I came to the conclusion that the use of pressure points, depending on the circumstances, can produce different results.";
+	next;
+	mes "[Hua Tuo]";
+	mes "Few pressure points tend to show the same symptoms, regardless of the problem. Most of the time, the effects of pressure points will differ depending on the body's health or time of day.";
+	next;
+	mes "[Hua Tuo]";
+	mes "For instance, the pressure point located on the upper side of the navel is the most vulnerable point.";
+	next;
+	mes "[Hua Tuo]";
+	mes "If pressed the wrong way, it can cause death. But between 5:15 am and 7:15 am, it's just a weak point.";
+	set QL_DOC1STTIME,1;
+	close;
+				
+L_QUEST:
+	mes "[Hua Tuo]";
+	mes "Hmmm...";
+	mes "I'm in trouble";
+	next;
+	emotion e_swt2;
+	mes "[Hua Tuo]";
+	mes "I cannot do anything without my medicine. But one of my patients needs immediate treatment and I can't leave the office...";
+	next;
+	menu "I can help you",-,"What a shame!",M_SHAME;
+
+	mes "[Hua Tuo]";
+	mes "Huh...?";
+	mes "Are...";
+	mes "Are you serious?";
+	next;
+	mes "[Hua Tuo]";
+	mes "This won't take much effort, but it may be too much to ask of you, especially since we have just met.";
+	next;
+	menu "If you feel burdened...",-,"I don't mind, I'd be glad to help.",M_HELP2;
+
+	mes "[Hua Tuo]";
+	mes "Thank you so";
+	mes "much for saying that.";
+	mes "I feel very uncomfortable asking a favor of someone I have only just met.";
+	next;
+	emotion e_thx;
+	mes "[Hua Tuo]";
+	mes "However, I will ask you if we meet another time. Now, if you'll excuse me...";
+	close;
+
+M_HELP2:
+	mes "[Hua Tuo]";
+	mes "Hmm, I see.";
+	mes "Well then, let me";
+	mes "ask a favor of you.";
+	next;
+	mes "[Hua Tuo]";
+	mes "As you heard earlier, I need a special medicine to treat this patient. However, I'm running out of the medicine I need.";
+	next;
+	mes "[Hua Tuo]";
+	mes "I will need you to get it for me since I cannot leave the patients that are waiting for me right now.";
+	next;
+	mes "[Hua Tuo]";
+	mes "^6A6A6A*Sigh*^000000";
+	mes "Misfortunes always seem to occur one after another, don't they? My staff is currently too busy doing other errands.";
+	next;
+	mes "[Hua Tuo]";		
+	mes "Please visit the";
+	mes "Tool Shop in town and bring me the medicine that I need. Master will understand if you tell him you've been sent by me.";
+	next;
+	mes "[Hua Tuo]";
+	mes "I am sorry for causing you so much trouble, but if you'll excuse me, I have other patients waiting. Please hurry back with the medicine!";
+	set QL_DOCQUEST,1;
+	close;
+
+M_SHAME:
+	mes "[Hua Tuo]";
+	mes "^6A6A6A*Sigh*^000000 For some reason, I never seem to have enough in stock. Is there no one I can ask to help me?";
+	close;
+
+L_MED:
+	if(countitem(7252) == 0)goto L_NOMED;
+	delitem 7252,1; //Herbal Medicine
+	mes "[Hua Tuo]";
+	mes "Ah, finally...";
+	mes "You've brought what I need. Thank you so much, it's such a relief to have this medicine on hand again.";
+	next;
+	mes "[Hua Tuo]";
+	mes "I apologize in advance, but may I ask you for another favor? I am asking for your help once, since I know I can depend on you. Of course, I will compensate you for your trouble.";
+	next;
+	menu "I'm sorry...",L_DONE,"No problem.",-;
+
+	mes "[Hua Tuo]";
+	mes "Thank you, thank you so much!";
+	mes "I've just run out of other medicines that my patients will be needing. I don't need too much, but you would be doing me a great favor.";
+	next;		
+	mes "[Hua Tuo]";
+	mes "The medicines I need are ^0000FF2 Leopard Claw^000000 which supports the bones, ^0000FF10 Solid Peach^000000 which strengthens the muscle, ^0000FF5 Poisonous Toad Skin which replenishes the skin...";
+	next;
+	mes "[Hua Tuo]";
+	mes "^0000FF20 Brown Root^000000 which regulates the heart, ^0000FF10 Sprout^000000 which eases the abdomen and ^0000FF5 Honey Pot^000000 which provides nutrition.";
+	next;		
+	mes "[Hua Tuo]";
+	mes "I hope you've memorized it all.";
+	mes "Once again, that's...";
+	set QL_DOCQUEST,3;
+	next;
+L_INGREDIENT:
+	mes "[Hua Tuo]";
+	mes "^3131FF2 Leopard Claw^000000,";
+	mes "^3131FF10 Solid Peach^000000,";
+	mes "^3131FF5 Poisonous Toad Skin^000000,";
+	mes "^3131FF20 Brown Root^000000,";
+	mes "^3131FF10 Sprout^000000 and";
+	mes "^3131FF5 Honey Pot^000000.";
+	close;	
+
+L_DONE:
+	mes "[Hua Tuo]";
+	mes "Alright...";
+	mes "I understand.";
+	mes "But thank you for helping me out. please take this...";
+	next;
+	mes "[Hua Tuo]";
+	mes "It's not much, but this medicine is an old family secret. I hope that it will be of use to you in dangerous situations.";
+	set QL_GOTHERB,0;
+	set QL_DOC1STTIME,0;
+	set QL_DOCQUEST,2;
+	getitem 679,2; //Pilule
+	set BaseExp,BaseExp + 10000;
+	next;
+	mes "[Hua Tuo]";
+	mes "Well then, I will see you around. Once again, I'd like to thank you for your help.";
+	close;
+
+L_NOMED:
+	mes "[Hua Tuo]";	
+	mes "You haven't gotten the medicine yet...? I hope you can get it as soon as possible...";
+	close;
+
+L_RANT:
+	mes "[Hua Tuo]";
+	mes "Being strong as a person is not defined as mere physical strength.";
+	next;
+	mes "[Hua Tuo]";
+	mes "Factors such as intelligence, experience and knowledge are also considered when judging one's strength.";
+	next;
+	mes "[Hua Tuo]";
+	mes "Let's say you're very strong and given the most powerful weapon.";
+	next;
+	mes "[Hua Tuo]";
+	mes "If you don't know how to use the weapon's power, you will not be strong... You will be weak.";
+	next;
+	mes "[Hua Tuo]";
+	mes "When the tools or weapons overwhelm your capabilities, the worst situations result.";
+	close;
+
+L_CHECKITM:
+	if(countitem(7172) < 2)goto L_NOTENOUGH; //Leopard Claw
+	if(countitem(7164) < 10)goto L_NOTENOUGH; //Solid Peach
+	if(countitem(7155) < 5)goto L_NOTENOUGH; //Poisonous Toad Skin
+	if(countitem(7188) < 20)goto L_NOTENOUGH; //Brown Root
+	if(countitem(7193) < 10)goto L_NOTENOUGH; //Sprout
+	if(countitem(7121) < 5)goto L_NOTENOUGH; //Honey Pot
+	delitem 7172,2; //Leopard Claw
+	delitem 7164,10; //Solid Peach
+	delitem 7155,5; //Poisonous Toad Skin
+	delitem 7188,20; //Brown Root
+	delitem 7193,10; //Sprout
+	delitem 7121,5; //Honey Pot
+	//These following dialogs are made up, I didn't finish the quest =/
+	mes "[Hua Tuo]";
+	mes "Thank you so much, now I can treat my patients.";
+	next;
+	mes "[Hua Tuo]";
+	mes "Ah...";
+	mes "Of course!";
+	mes "Here's your reward. Use this medicine when you feel weary.";
+	getitem 679,5; //Pilule
+	set BaseExp,BaseExp + 30000;
+	set QL_GOTHERB,0;
+	set QL_DOC1STTIME,0;
+	set QL_DOCQUEST,2;
+	close;
+	
+L_NOTENOUGH:
+	mes "[Hua Tuo]";
+	mes "Hmm....";
+	mes "Unfortunately, you haven't collected everything that I need yet. Once again, please gather...";
+	next;
+	goto L_INGREDIENT;
+}
+
+
+//============================================================
+//================================================ Poison King
+//====================================================== Quest
+lou_fild01.gat,224,348,7	script	Lady#04	817,{
+
+	emotion 30;
+	mes "[Lady]";
+	mes "You're at the entrance of Louyang.";
+	if(QL_POISONKING > 8)
+	{
+	mes "I hope you have a good time~";
+	close;
+	}
+	next;
+	mes "[Lady]";
+	mes "Louyang is well known";
+	mes "for its various firecrackers.";
+	mes "Would you like to see one?";
+	next;
+	menu "Sure!",s_Firework,"No thanks~",-;
+
+	if(QL_POISONKING == 8)goto s_PKQuest;
+	mes "[Lady]";
+	mes "Hmpf...!";
+	emotion 9;
+	close;
+
+s_PKQuest:
+	mes "[Lady]";
+	mes "Hmm, if not firecrackers,";
+	mes "then you must want something";
+	mes "else. Did someone send you?";
+	next;
+	menu "Yes.",s_Sent,"No.",-;
+
+	mes "[Lady]";
+	mes "No...?";
+	if(!Sex)close;
+	next;
+	mes "[Lady]";
+	mes "Are you...";
+	mes "Coming on to me?";
+	close;
+
+s_Sent:
+	mes "[Lady]";
+	mes "Who was it?";
+	mes "Please tell me";
+	mes "his name.";
+	next;
+	input @PKstr$;
+	if(@PKstr$ != "Song Zhi Du")goto s_Dunno;
+
+	mes "[Lady]";
+	mes "Oh, I see.";
+	mes "Let me give";
+	mes "you the package.";
+	next;
+	mes "[Lady]";
+	mes "Ah, wait! I forgot!";
+	mes "You must first pay the";
+	mes "delivery fee of 1,000 zeny.";
+	next;
+	mes "[Lady]";
+	if(Zeny < 1000)goto s_NEnoughZeny;
+	mes "Thank you~";
+	mes "Now that the fee is paid,";
+	mes "please bring this to";
+	mes "Song Zhi Du.";
+	mes "Take care!";
+	set Zeny,Zeny-1000;
+	getitem 7126,1;
+	set QL_POISONKING,9;
+	close;
+
+s_NEnoughZeny:
+	mes "Sorry, you don't have";
+	mes "enough zeny to pay the";
+	mes "delivery fee.";
+	close;
+
+s_Dunno:
+	mes "[Lady]";
+	mes "Hmmm?";
+	mes "I don't know who that is.";
+	mes "So I definitely don't have";
+	mes "a package for whoever you're";
+	mes "talking about.";
+	close;
+
+s_Firework:
+	mes "[Lady]";
+	mes "Alright, there you go!";
+	close2;
+	donpcevent "LouFireWrk::OnExplosion";
+	end;
+
+}
+
+lou_fild01.gat,225,349,1	script	LouFireWrk	139,{
+
+OnExplosion:
+	misceffect 183;
+	end;
+
+}
+
+lou_in01.gat,99,158,4	script	Lord	821,{
+	mes "[Lord Bai Long]";
+	mes "Hahahaha!";
+	mes "Welcome to Louyang!";
+	next;
+	mes "[Lord Bai Long]";
+	mes "Louyang is such a great city.";
+	mes "We're protected this land for forty";
+	mes "years from the invasions of evil";
+	mes "creatures!";
+	next;
+	mes "[Lord Bai Long]";
+	mes "I hope you enjoy";
+	mes "your stay here,";
+	mes "Rune-Midgardian!";
+	next;
+	if(QL_POISONKING == 15)goto s_Journal;
+	mes "[Lord Bai Long]";
+	mes "How could I have lost my friend";
+	mes "from our glory days? Hmm...?";
+	mes "Oh, I didn't realize you were still";
+	mes "there...Listening to me.";
+	next;
+	mes "[Lord Bai Long]";
+	mes "I'm sorry, I was just talking to";
+	mes "myself. I hope you have a good time";
+	mes "while you stay here in Louyang.";
+	close;
+
+s_Journal:
+	mes "^3131FFYou give Nagash Arses' Journal";
+	mes "to Bai Long. He reads it intently,";
+	mes "slowly turnin each page.";
+	next;
+	mes "^3131FFHe's completely silent for about";
+	mes "fifteen minutes, and focuses all";
+	mes "of his attention on the journal.";
+	next;
+	mes "^3131FFA single tear trickles";
+	mes "from his eye as he reads";
+	mes "the words of Nagash Arses...^000000";
+	next;
+	mes "[Lord Bai Long]";
+	mes "Thank you..";
+	mes "Adventurer...";
+	next;
+	mes "[Lord Bai Long]";
+	mes "Thank you so much.";
+	mes "You've helped me make";
+	mes "up with an old friend!";
+	next;
+	mes "[Lord Bai Long]";
+	mes "I, Bai Long, will work on giving";
+	mes "fair treatment to all of martial";
+	mes "arts organizations, regardless of";
+	mes "their methods or philosophies!";
+	next;
+	mes "[Lord Bai Long]";
+	mes "I will also forgive Song Zhi Du,";
+	mes "even if he tried to poison me.";
+	mes "He is innocent...";
+	next;
+	mes "[Lord Bai Long]";
+	mes "As a matter of fact, it was";
+	mes "reported to me that Nagash was";
+	mes "deported to his homeland after";
+	mes "that incident. I had no idea";
+	mes "he was in jail!";
+	next;
+	mes "[Lord Bai Long]";
+	mes "Thank you so";
+	mes "much for your help!";
+	next;
+	mes "[Lord Bai Long]";
+	mes "Please take this as a token of";
+	mes "gratitude. And please deliver this";
+	mes "letter to Nagash and Song Zhi Du";
+	mes "for me.";
+	getitem 603,1;
+	set QL_POISONKING,16;
+	next;
+	mes "^3131FFYou obtained ^0000FFBai Long's letter.^000000";
+	next;
+	mes "[Lord Bai Long]";
+	mes "Thank you in advance.";
+	close;
+
+}
+lou_in02.gat,253,45,4	script	Employee#04	822,{
+
+	if(QL_POISONKING == 30)goto s_NoGoodIdea;
+	if(QL_POISONKING == 18)goto s_Busy;
+	if(QL_POISONKING == 17)goto s_Told;
+	if(QL_POISONKING == 14 && QL_POISONPATH < 2)goto s_CameBack;
+	if(QL_POISONKING > 13)goto s_Proud;
+	if(QL_POISONKING > 12)goto s_Security;
+	if(QL_POISONKING == 12)goto s_LordDie;
+	if(QL_POISONKING == 11)goto s_MaterialCheck;
+	if(QL_POISONKING == 10)goto s_NotSure;
+	if(QL_POISONKING == 9)goto s_Thanked;
+	if(QL_POISONKING == 7 && QL_POISONDISLIKED)goto s_Materials2;
+	if(QL_POISONKING > 6)goto s_DeliveryMes;
+	if(QL_POISONKING == 6 && QL_POISONDISLIKED)goto s_Pity;
+	if(QL_POISONKING == 6)goto s_Talked;
+	if(QL_DOCQUEST != 2)goto s_NotPoison;
+	mes "[Song Zhi Du]";
+	mes "Well, well. Thank you for you're";
+	mes "trouble. I didn't expect you to";
+	mes "gather all these herbs for us...";
+	next;
+	mes "[Song Zhi Du]";
+	mes "I suppose I underestimated you. By";
+	mes "the way, do you know anything about";
+	mes "poison?";
+	next;
+	menu "Yes, I am kind of interested in it",-,"No, not at all",s_No;
+	mes "[Song Zhi Du]";
+	mes "Oh, I see. Well, if you have some";
+	mes "time, why don't you go visit my old";
+	mes "master in the slums?";
+	next;
+	mes "[Song Zhi Du]";
+	mes "If you two get along, I will tell";
+	mes "you something important.";
+	set QL_POISONKING,1;
+	close;
+s_No:
+	mes "[Song Zhi Du]";
+	mes "Huh? I see. Well, thank you for";
+	mes "your troubles once again. I hope you";
+	mes "have a good time in Louyang.";
+	close;
+
+s_NotPoison:
+	mes "[Song Zhi Du]";
+	mes "^111111*Sigh*^000000.....";
+	mes "I wish there was someone who";
+	mes "could help me carry my revenge out.";
+	close;
+
+s_Talked:
+	mes "[Song Zhi Du]";
+	mes "...";
+	mes "So, did you talk";
+	mes "to my old master?";
+	mes "It seems he really";
+	mes "likes you.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "As you know, my master has been";
+	mes "accused of something he didn't do!";
+	mes "And they crippled his use of the";
+	mes "martial arts!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "I can't forgive what";
+	mes "they've done to my master!";
+	mes "I want to grind their bones";
+	mes "to powder! And that's before";
+	mes "I kill them!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "He's innocent and all he did";
+	mes "was research poison with all";
+	mes "of his effort! And for that,";
+	mes "they destroyed him!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "I was yound";
+	mes "when it happened...";
+	mes "Too young to know";
+	mes "any martial arts.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "I could protect him.";
+	mes "All I could do was hide and";
+	mes "watch other people get killed.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "I hate myself";
+	mes "for not being strong!";
+	mes "But, my body isn't suited";
+	mes "for martial arts.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "All I can do is maintain my weak";
+	mes "body and make sure it's reasonably";
+	mes "healthy. Even so, if it weren't for";
+	mes "my master, I'd be dead";
+	mes "in the streets...";
+	next;
+	mes "[Song Zhi Du]";
+	mes "It was my master who picked me up";
+	mes "from the streets and cured me. So,";
+	mes "I've decided to become a doctor and";
+	mes "save as many lives as I can.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "But before";
+	mes "I do that,";
+	mes "I want ^FF0000revenge^000000!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "As I told you, I am weak.";
+	mes "Too weak... I know that from";
+	mes "the bottom of my heart.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "But...";
+	next;
+	mes "[Song Zhi Du]";
+	mes "I am knowledged about medicine,";
+	mes "especially the use of poison. I can";
+	mes "tell you that I'm one of the best.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Poison can kill people but it can";
+	mes "also be used to save lives. The";
+	mes "people who destroyed my master";
+	mes "will pay the price.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Do you understand";
+	mes "why I'm furious!?";
+	next;
+	menu "But Revenge isn't good.",-,"Yes, I fully understand",s_Understand;
+
+	mes "[Song Zhi Du]";
+	mes "Hmm...";
+	mes "I see.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "I supposed you couldn't";
+	mes "understand the way I feel.";
+	mes "After all, you didn't have";
+	mes "to go through the same";
+	mes "things I did.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "I suppose I expected too much";
+	mes "since my master likes you. How";
+	mes "could you know the rage and";
+	mes "sadness that I feel!?";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Fine.";
+	mes "Go do whatever";
+	mes "you were going to do.";
+	mes "I'm just disappointed...";
+	set QL_POISONDISLIKED,1;
+	close;
+
+s_Understand:
+	mes "[Song Zhi Du]";
+	mes "Yes! Yes!";
+	mes "You do understand!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "I volunteered for this medicine";
+	mes "storage position so that I can";
+	mes "secretly study poison! Now, the";
+	mes "time for action has come!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Still, I'll need some materials to";
+	mes "complete my research. Then, when";
+	mes "I succeeed and create a poison pill,";
+	mes "I'll need someone to carry my";
+	mes "revenge out for me.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Since my body is so frail, I can't";
+	mes "bear the tension and rage of seeing";
+	mes "my lifelong enemy face to face.";
+	set QL_POISONKING,7;
+	close;
+
+s_Pity:
+	mes "[Song Zhi Du]";
+	mes "I'm so disappointed.";
+	mes "You've even seen the";
+	mes "pitiable state of my";
+	mes "master for yourself!";
+	mes "How could you not";
+	mes "understand me?!";
+	next;
+	menu "I'm sorry for the last time",s_Sorry,"No matter what, revenge isn't good.",-;
+
+	specialeffect 11;
+	mes "[Song Zhi Du]";
+	mes "Oh, forget about it";
+	mes "I don't think I can ever";
+	mes "make you understand how I feel.";
+	close;
+
+s_Sorry:
+	mes "[Song Zhi Du]";
+	mes "If you really";
+	mes "feel sorry for me,";
+	mes "then you must help me";
+	mes "carry out my revenge!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "I still need to complete the";
+	mes "poison potion I'm creating. I hope";
+	mes "you can bring what I need to finish";
+	mes "it. Go and get me...";
+	next;
+	mes "[Song Zhi Du]";
+	mes "^0000FF4 Bee Sting^000000,";
+	mes "^0000FF10 Venom Canine^000000,";
+	mes "^0000FF10 Empty Potion Bottle^000000,";
+	mes "^0000FF30 Green Potion^000000.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "An apology is fine, but you must";
+	mes "also show me that you are sorry and";
+	mes "help me carry out my plan. Do you";
+	mes "have any problem with this?";
+	set QL_POISONKING,7;
+	close;
+
+s_Materials2:
+	mes "[Song Zhi Du]";
+	mes "So, did you";
+	mes "gather everything";
+	mes "I asked of you?";
+	next;
+	menu "Yes.",s_Items,"What do you need again?",-;
+
+	mes "[Song Zhi Du]";
+	mes "^111111*Sigh...*^000000";
+	mes "Go and get me...";
+	next;
+	specialeffect 11;
+	mes "[Song Zhi Du]";
+	mes "^0000FF4 Bee Sting^000000,";
+	mes "^0000FF10 Venom Canine^000000,";
+	mes "^0000FF10 Empty Potion Bottle^000000,";
+	mes "^0000FF30 Green Potion^000000.";
+	close;
+
+s_Items:
+	if(countitem(939) < 4 || countitem(937) < 10 || countitem(1093) < 10 || countitem(506) < 30)goto s_NEnoughItems;
+	delitem 939,4; //Bee Sting
+	delitem 937,10; //Venom Canine
+	delitem 1093,10; //Empty Potion Bottle
+	delitem 506,30; //Green Potion
+	set QL_POISONDISLIKED,0;
+	mes "[Song Zhi Du]";
+	mes "Ah...";
+	mes "With these, I accept your apology";
+	mes "Thank you for all the trouble you";
+	mes "went through to get this stuff";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Now that you're this involved,";
+	mes "you're in this with me all the way!";
+	mes "I've been waiting for this";
+	mes "day for years...";
+	next;
+	mes "[Song Zhi Du]";
+	mes "All that's left is to create this";
+	mes "poison, and then to get the";
+	mes "lord of Louyang to drink it..";
+	close;
+
+
+s_NEnoughItems:
+	mes "[Song Zhi Du]";
+	mes "Where are the things";
+	mes "I asked you to bring?";
+	mes "Are you testing my";
+	mes "patience or what?";
+	next;
+	specialeffect 11;
+	mes "[Song Zhi Du]";
+	mes "You're still missing some of the";
+	mes "items I need. I must have them all";
+	mes "in order to finish making this";
+	mes "poison!";
+	close;
+
+s_DeliveryMes:
+	emotion 0;
+	mes "[Song Zhi Du]";
+	mes "Ah, hello.";
+	mes "Please give me a minute,";
+	mes "I've just received a message.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Ah!";
+	mes "It says here";
+	mes "that my delivery";
+	mes "has finally arrived!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Would you bring me the";
+	mes "box from the firecracker";
+	mes "lady at the entrance";
+	mes "to Louyang? Thanks";
+	mes "in advance.";
+	set QL_POISONKING,8;
+	close;
+
+s_Thanked:
+	if(countitem(7126) == 0)goto s_WheresJellopy;
+	delitem 7126,1;
+	mes "[Song Zhi Du]";
+	mes "Ah. Thank you,";
+	mes "I needed this. Now,";
+	mes "shall we begin?";
+	next;
+	mes "[Song Zhi Du]";
+	mes "First, I shall mix a poison";
+	mes "extraced from Venom Canine";
+	mes "with a foreign liquid named";
+	mes "Karvodailnirol.";
+	next;
+	specialeffect 12;
+	mes "[Song Zhi Du]";
+	mes "Then, I add Green Herb extract,";
+	mes "poison extracted from Bee Sting and";
+	mes "a Large Jellopy into the liquid!";
+	mes "Finally, I must heat them all!";
+	next;
+	specialeffect 124;
+	specialeffect 20;
+	mes "[Song Zhi Du]";
+	mes "Finally, I have to carefully heat";
+	mes "the mixture and collect it all into";
+	mes "a Potion Bottle.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Now I've got to do this just";
+	mes "right. This is a very delicate";
+	mes "procedure...";
+	next;
+	specialeffect 17;
+	emotion 23;			
+	mes "[Song Zhi Du]";
+	mes "No!! I failed again! ^656565*Sigh...*^000000 And";
+	mes "I spent a long time preparing all";
+	mes "of those materials...";
+	set QL_POISONKING,10;
+	close;
+
+s_WheresJellopy:
+	//Made up Dialog
+	emotion 0;
+	mes "[Song Zhi Du]";
+	mes "I was told by the lady at";
+	mes "the gate that she gave you";
+	mes "the ^0000FFLarge Jellopy^000000...";
+	mes "Yet you don't have it?";
+	next;
+	mes "[Song Zhi Du]";
+	mes "I can't make the poison without";
+	mes "it. You'll have to find a new one";
+	mes "somehow.";
+	close;
+
+s_NotSure:
+	mes "[Song Zhi Du]";
+	mes "I'm not sure what went wrong.";
+	mes "Hmm, would you please help me";
+	mes "again? I've used all the materials";
+	mes "from last time.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "^0000FF4 Bee Sting^000000,";
+	mes "^0000FF10 Venom Canine^000000,";
+	mes "^0000FF10 Empty Potion Bottle^000000,";
+	mes "^0000FF30 Green Potion^000000 and";
+	mes "^0000FF1 Large Jellopy^000000.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "That's everything I'll need.";
+	mes "I would apologize, but since you've";
+	mes "shown that you'll help carry out my";
+	mes "revenge, I know you'll understand.";
+	set QL_POISONKING,11;
+	close;
+
+s_MaterialCheck:
+	if(countitem(939) < 4 || countitem(937) < 10 || countitem(1093) < 10 || countitem(506) < 30 || countitem(7126) < 1 )goto s_NEnoughItems2;
+	delitem 939,countitem(939); //Bee Sting
+	delitem 937,countitem(937); //Venom Canine
+	delitem 1093,countitem(1093); //Empty Potion Bottle
+	delitem 506,countitem(506); //Green Potion
+	delitem 7126,countitem(7126); //Large Jellopy
+	mes "[Song Zhi Du]";
+	mes "Oh! You brought";
+	mes "me everything I need!";
+	mes "I'm very impressed!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "You're the only one";
+	mes "who actually understands how";
+	mes "I feel. Thank you for gathering all";
+	mes "of these ^0000FFmaterials^000000.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Alright, now";
+	mes "to create the poison.";
+	mes "This is going to be tough.";
+	mes "Here we go...";
+	next;
+	mes "[Song Zhi Du]";
+	mes "First, I shall mix a poison";
+	mes "extraced from Venom Canine";
+	mes "with a foreign liquid named";
+	mes "Karvodailnirol.";
+	next;
+	specialeffect 12;
+	mes "[Song Zhi Du]";
+	mes "Then, I add Green Herb extract,";
+	mes "poison extracted from Bee Sting and";
+	mes "a Large Jellopy into the liquid!";
+	mes "Finally, I must heat them all!";
+	next;
+	specialeffect 124;
+	specialeffect 20;
+	mes "[Song Zhi Du]";
+	mes "Finally, I have to carefully heat";
+	mes "the mixture and collect it all into";
+	mes "a Potion Bottle.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "^111111*Phew...*";
+	mes "Did...";
+	mes "Did I make it?";
+	next;
+
+	set @PKSuccessRate,rand(1,1000);
+	if(@PKSuccessRate > 700)
+	{
+	emotion 23;
+	specialeffect 20;
+	mes "[Song Zhi Du]";
+	mes "Hahaha~!";
+	mes "Success!";
+	mes "It works!";
+	mes "I finally created it!";
+	mes "Mwahahahahahaha!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Muhahahahaha!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Muhahahahaha!";
+	mes "Hahahahahahahahahahahaha!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "I made it!";
+	mes "I made it!";
+	mes "Now, revenge will be mine!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Hahaha! Now, please";
+	mes "take this bottle. But be careful.";
+	mes "Even if you smell it just a little,";
+	mes "it can cause your body to";
+	mes "decompose, leading to death.";
+	getitem 678,2; //Poison Bottle
+	set QL_POISONKING,12;
+	close;
+	}
+	else
+	{
+	emotion 23;
+	specialeffect 17;
+	mes "[Song Zhi Du]";
+	mes "NO! I... I've failed again! And I";
+	mes "spent a long time getting";
+	mes "everything ready...";
+	close;
+	}
+
+s_NEnoughItems2:
+	//Made up dialog
+	mes "[Song Zhi Du]";
+	mes "You seem to be missing some";
+	mes "of the materials that I need,";
+	mes "don't come back until you get";
+	mes "them!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "I will need the following:";
+	mes "^0000FF4 Bee Sting^000000,";
+	mes "^0000FF10 Venom Canine^000000,";
+	mes "^0000FF10 Empty Potion Bottle^000000,";
+	mes "^0000FF30 Green Potion^000000 and";
+	mes "^0000FF1 Large Jellopy^000000.";
+	close;
+
+s_LordDie:
+	mes "[Song Zhi Du]";
+	mes "Hahahaha...!";
+	mes "Now, time has come.";
+	mes "With this poison, Louyang's";
+	mes "lord will be cast into hell!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "If they lied about my master,";
+	mes "then I'll simply make their lies";
+	mes "into truth. Then, my master";
+	mes "won't feel victimized!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Lord Bai Long!";
+	mes "You will die!";
+	mes "Ha HA HA HA HA!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Muhahahahaha!";
+	mes "Hahaha...Haha..hahaha..haha..hahah";
+	mes "ahaha...mmmmuhahahahahahahahahaha!!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Muhahahahahaha!";
+	mes "............";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Ah, forgive me.";
+	mes "I was overly excited.";
+	mes "Yes, I must calm down...";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Now, I have one last favor to ask";
+	mes "of you. Please sneak into the";
+	mes "Castle of the Dragon.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "I want you to put this poison some";
+	mes "place where Lord Bai Long might";
+	mes "stay. But be careful, the castle";
+	mes "has a lot of security.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Still, you're an adventurer from";
+	mes "Rune-Midgard. You've probably had";
+	mes "challenges like this before, so I'm";
+	mes "sure you'll find a way.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Anyway, I'm sure my master";
+	mes "will be happy to know that";
+	mes "I finally created the ^0000FFpoison";
+	mes "he wished to create^000000!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Hahaha...!";
+	mes "Master, I did it!";
+	mes "Your disciple Song Zhi Du made the";
+	mes "world's deadliest poison for you!";
+	set QL_POISONKING,13;
+	close;
+
+s_Security:
+	mes "[Song Zhi Du]";
+	mes "Remember...";
+	mes "The Castle of the Dragon";
+	mes "is under heavy surveillance.";
+	mes "I guess Lord Bai Long is";
+	mes "insecure. Heh heh.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Anyways, I hope you'll be";
+	mes "really careful. When you go in,";
+	mes "don't forget to use this poison";
+	mes "somewhere the Lord Bai Long";
+	mes "can ingest it.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Anyway, I'm sure my master";
+	mes "will be happy to know that";
+	mes "I finally created the ^0000FFpoison";
+	mes "he wished to create^000000!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Hahaha...!";
+	mes "Master, I did it!";
+	mes "Your disciple Song Zhi Du made the";
+	mes "world's deadliest poison for you!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Leave now,";
+	mes "my friend!";
+	mes "For my revenge!";
+	mes "Go and kill Lord Bai Long!";
+	close;
+
+s_CameBack:
+	mes "[Song Zhi Du]";
+	mes "Ah!";
+	mes "You came back!";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Ah yes.";
+	mes "All I have to do now";
+	mes "is wait and hear news";
+	mes "of Lord Bai Long's death.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Thank you so much, my friend.";
+	mes "You've satisfied my old grudge.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Now, I am getting tired.";
+	mes "Let me rest... Take care, my";
+	mes "friend, and travel in safety.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "But before you go, let me give you";
+	mes "some poison and a medicinal pill.";
+	mes "I made these with the leftover";
+	mes "materials and medicine in the";
+	mes "storage.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Please take the";
+	mes "medicine pill";
+	mes "right away.";
+	next;
+	mes "^3131FFYou swallowed a strange pill";
+	mes "that shines with a gold color.";
+	mes "it tastes bitter...";
+	next;
+	mes "^3131FFThe nasty taste lingers in your";
+	mes "mouth but then you feel a great";
+	mes "warmth flowing throughout your";
+	mes "body. Eventually, you pass out.";
+	close2;
+	set QL_POISONKING,30;
+	set QL_POISONPATH,0;
+	getitem 678,3;
+	if(BaseLevel < 56)set BaseExp,BaseExp+8909;
+	else if(BaseLevel > 55 && BaseLevel < 61)set BaseExp,BaseExp+10213;
+	else if(BaseLevel > 60 && BaseLevel < 66)set BaseExp,BaseExp+17684;
+	else if(BaseLevel > 65 && BaseLevel < 71)set BaseExp,BaseExp+25411;
+	else if(BaseLevel > 70 && BaseLevel < 76)set BaseExp,BaseExp+68757;
+	else if(BaseLevel > 75 && BaseLevel < 81)set BaseExp,BaseExp+128246;
+	else if(BaseLevel > 80 && BaseLevel < 86)set BaseExp,BaseExp+142340;
+	else if(BaseLevel > 85 && BaseLevel < 91)set BaseExp,BaseExp+152052;
+	else if(BaseLevel > 90)set BaseExp,BaseExp+366786;
+	warp "louyang.gat",270,136;
+	end;
+
+s_Proud:
+	mes "[Song Zhi Du]";
+	mes "Nagash Arses is also the name of";
+	mes "the Poison King in a legend of";
+	mes "Arcturus. There's good reasons for";
+	mes "my master to be proud of hise name!";
+	close;
+
+s_Told:
+	mes "[Song Zhi Du]";
+	mes "Ah...";
+	mes "Welcome.";
+	mes "My master told";
+	mes "me everything.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Somehow, I feel relieved, but sorry";
+	mes "at the same time. Still, now I can";
+	mes "forget everything that's happened";
+	mes "in the past.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Now, I've decided to focus more on";
+	mes "my medical studies so that I can";
+	mes "really save as many lives as I can.";
+	mes "I'm sorry I've been so rude to you";
+	mes "before.";
+	next;
+	mes "[Song Zhi Du]";
+	mes "Also, I hope you will";
+	mes "take these, since I don't";
+	mes "need them any longer.";
+	getitem 678,5; //Poison Bottle
+	set QL_POISONKING,18;
+	set QL_POISONPATH,0;
+	next;
+	mes "[Song Zhi Du]";
+	mes "Thank you";
+	mes "once again, friend.";
+	mes "Now if you'll excuse me,";
+	mes "i have many things to do...";
+	close;
+
+s_Busy:
+	mes "^3131FFSong Zhi Du is busily engaged with";
+	mes "organizing medicinal herbs. The";
+	mes "faint look of sadness that used to";
+	mes "be on his face now seems drained.";
+	next;
+	mes "^3131FFStill, from his movements and the";
+	mes "pace at which he is working, you";
+	mes "can tell that he loves what he is";
+	mes "doing. It seems that Song Zhi Du";
+	mes "has finally found his life's path.";
+	close;
+
+s_NoGoodIdea:
+	mes "[Song Zhi Du]";
+	mes "...................";
+	next;
+	mes "^3131FFSong Zhi Du looks blankly at the";
+	mes "ceiling. With his revenge, it seems";
+	mes "he's lost his motivation in life.";
+	mes "Was it a good idea to help him,";
+	mes "after all?";
+	next;
+	mes "^3131FFBy hearsay, the poisoned drink";
+	mes "didn't work so well, as a Thief";
+	mes "from a foreign land actually stole";
+	mes "the bottle.";
+	close;
+
+}
+
+lou_in02.gat,122,38,4	script	Poison King	824,{
+
+	if(QL_POISONKING > 16 && QL_POISONKING != 30)goto s_Proud;
+	if(QL_POISONKING == 16)goto s_Letter;
+	if(QL_POISONKING == 15)goto s_Hope;
+	if(QL_POISONKING == 14 && QL_POISONPATH > 1)goto s_Happened;
+	if(QL_POISONKING == 30)goto s_Emo;
+	if(QL_POISONPATH == 2)goto s_StopHim;
+	if(QL_POISONKING == 13 || QL_POISONKING == 14)goto s_MetDisciple;
+	mes "[Nagash Arses]";
+	mes "It's been 40 years since I came";
+	mes "here. Hahaha, but it doesn't feel";
+	mes "like it's been that long.";
+	next;
+	mes "[Nagash Arses]";
+	mes "In the past, I was one of the";
+	mes "most renowned experts in the use";
+	mes "of poison. I even created a martial";
+	mes "art based on it's use, and formed my";
+	mes "own martial arts organization.";
+	next;
+	mes "[Nagash Arses]";
+	mes "Now, those memories";
+	mes "don't even seem real";
+	mes "anymore. This poem is";
+	mes "all I can remember...";
+	next;
+	mes "[Nagash Arses]";
+	mes "As I lay in bed looking";
+	mes "up at the moonlight,";
+	mes " ";
+	mes "It looks like the ";
+	mes "frost on the ground.";
+	next;
+	mes "[Nagash Arses]";
+	mes "I lift head up to look";
+	mes "at the bright moon,";
+	mes " ";
+	mes "I lower my head";
+	mes "feeling homesick.";
+	if(!QL_POISONKING)close;
+	next;
+	if(QL_POISONKING > 1)goto s_Menu2;
+	menu "Grin at him.",-,"Lament on his grief.",s_Grief,"Reprove him.",s_Reprove,"Listen to the poem again.",s_Again,"Show him a sad look.",s_Sad;
+
+	mes "[Nagash Arses]";
+	mes "Yeah, I don't blame you.";
+	mes "I know I look stupid. Legally,";
+	mes "I'm a criminal after all.";
+	mes "I don't have any friends and";
+	mes "there's no one I can trust.";
+	close;
+
+s_Grief:
+	mes "[Nagash Arses]";
+	mes "How can you sympathize?";
+	mes "I doubt anyone has had";
+	mes "experiences that are";
+	mes "much worse than mine...";
+	close;
+
+s_Reprove:
+	mes "What--? I haven't wrongers you in any";
+	mes "way! Why must you be so mean to an";
+	mes "old man? You don't even know half";
+	mes "of what I've gone though.";
+	close;
+
+s_Again:
+	mes "[Nagash Arses]";
+	mes "As I lay in bed looking";
+	mes "up at the moonlight,";
+	mes " ";
+	mes "It looks like the ";
+	mes "frost on the ground.";
+	next;
+	mes "[Nagash Arses]";
+	mes "I lift head up to look";
+	mes "at the bright moon,";
+	mes " ";
+	mes "I lower my head";
+	mes "feeling homesick.";
+	close;
+
+s_Sad:
+	mes "[Nagash Arses]";
+	mes "Do you miss your hometown";
+	mes "as much as I do? I'm envious";
+	mes "of you, youngster. You have";
+	mes "the freedom to go";
+	mes "wherever you want.";
+	next;
+	mes "[Nagash Arses]";
+	mes "I'm a wanted criminal.";
+	mes "Even if I were free to";
+	mes "travel, I may not have";
+	mes "the strength to try.";
+	next;
+	mes "[Nagash Arses]";
+	mes "Let's not talk about this any";
+	mes "longer. It's reminded me of";
+	mes "my worst memories.";
+	next;
+	mes "[Nagash Arses]";
+	mes "I'm too old to remember anything.";
+	mes "Ha ha ha. Maybe if I saw something";
+	mes "related to poison, I might remember";
+	mes "something.";
+	next;
+	mes "[Nagash Arses]";
+	mes "...";
+	next;
+	mes "[Nagash Arses]";
+	mes "No, no...";
+	mes "I think I'm too old";
+	mes "to remember anything.";
+	mes "Anything at all.";
+	set QL_POISONKING,2;
+	close;
+
+s_Menu2:
+	menu "Ask about the poem.",-,"Ask about his hometown.",s_Hometown,"Ask him about use of poison.",s_Poison,"Ask about his situation.",s_Situation;
+
+	mes "[Nagash Arses]";
+	mes "Ah, have you";
+	mes "heard of this poem?";
+	mes "As I grow older, my";
+	mes "memory also drows worse,";
+	mes "but I really like this poem";
+	mes "and don't want to forget it.";
+	next;
+	mes "[Nagash Arses]";
+	mes "I hope you don't";
+	mes "mind helping me";
+	mes "memorize this poem...";
+	next;
+	set @PKrand,rand(0,2);
+	if(@PKrand == 0)
+{
+	mes "[Nagash Arses]";
+	mes "^3131FF'As I lay ^000000[ ]^3131FF looking up at the";
+	mes "moonlight.'^000000 In this first line,";
+	mes "what word should be in [ ]?";
+	next;
+	menu "on the ground",s_1,"with you",s_1,"in bed",-,"in the stars",s_1;
+	set @PKtest,@PKtest+1;
+
+s_1:
+	mes "[Nagash Arses]";
+	mes "^3131FF'It looks like the ^000000[ ]^3131FF on the";
+	mes "ground.'^000000 In the second line, which";
+	mes "word should be in [ ]?";
+	next;
+	menu "Frost",-,"Dew",s_2,"Pebbles",s_2,"Snow",s_2;
+	set @PKtest,@PKtest+1;
+
+s_2:
+	mes "[Nagash Arses]";
+	mes "Now to see if you really";
+	mes "understand the poem. It's no";
+	mes "use to just know the words. They";
+	mes "must be a part of you as well.";
+	next;
+	mes "[Nagash Arses]";
+	mes "How would you describe the overall";
+	mes "mood and tone of the speaker of";
+	mes "this poem?";
+	next;
+	menu "Romantic",s_3,"Wistful",s_3,"Regretful",-,"Passionate",s_3;
+	set @PKtest,@PKtest+1;
+
+s_3:
+	set @PKrand2,rand(0,1);
+	if(!@PKrand2)
+	{
+	mes "[Nagash Arses]";
+	mes "What do you think is the major";
+	mes "theme of this poem?";
+	next;
+	menu "Tragedy",s_4,"Seperation",-,"Love",s_4,"Revenge",s_4,"Buddy Cop Film",s_4;
+	}
+	if(@PKrand2)
+	{
+	mes "[Nagash Arses]";
+	mes "According to the poem,";
+	mes "where is the location";
+	mes "of the speaker as he is";
+	mes "gazing at the moon?";
+	next;
+	menu "In his hometown",s_4,"In jail",s_4,"In the depths of the cosmos.",s_4,"In bed",-;
+	}
+	set @PKtest,@PKtest+1;
+
+s_4:
+	mes "[Nagash Arses]";
+	mes "Ha ha ha! You undestand this poem";
+	mes "well! Now, would you repeat the";
+	mes "first line for me again?";
+	next;
+	menu "When I lay in bed looking up at the moonlight",s_5,"When I lay in bed thinking of the moonlight",s_5,"As I lay in bed looking up at the moonlight",-,"As I lay in bed thinking of the moonlight",s_5;
+	set @PKtest,@PKtest+1;
+
+s_5:
+}
+	if(@PKrand == 1)
+{
+	mes "[Nagash Arses]";
+	mes "^3131FF'It looks like the ^000000[ ]^3131FF on the";
+	mes "ground.'^000000 In the second line, which";
+	mes "word should be in [ ]?";
+	next;
+	menu "Frost",-,"Dew",s_6,"Pebbles",s_6,"Snow",s_6;
+	set @PKtest,@PKtest+1;
+
+s_6:
+	mes "[Nagash Arses]";
+	mes "^3131FFI lower my head feeling ^000000[ ]^3131FF.^000000'";
+	mes "Which word should be in [ ]?";
+	next;
+	menu "Homesick",-,"Drowsy",s_7,"Loneliness",s_7,"Heartbroken",s_7;
+	set @PKtest,@PKtest+1;
+
+s_7:
+	mes "[Nagash Arses]";
+	mes "Now to see if you really";
+	mes "understand the poem. It's no";
+	mes "use to just know the words. They";
+	mes "must be a part of you as well.";
+	next;
+	mes "[Nagash Arses]";
+	mes "in the first two lines, what";
+	mes "is being linked by the poet?";
+	next;
+	menu "Bed and ground.",s_8,"Frost and hometown.",-,"Gloomy.",s_8,"Smokey.",s_8,"Moonlight and Frost.",s_8;
+	set @PKtest,@PKtest+1;
+
+s_8:
+	mes "[Nagash Arses]";
+	mes "In this land, the image of the moon";
+	mes "often appears in poems expressing";
+	mes "seperation, longing and";
+	mes "homesickness. Why would gazing at";
+	mes "the moon offer comfort?";
+	next;
+	menu "The rabbit on the moon grants wishes.",s_9,"It's sheer beauty eases anxiety",s_9,"Because it wanes and waxes",s_9,"All people and places share the same moon",-;
+	set @PKtest,@PKtest+1;
+
+s_9:
+	mes "[Nagash Arses]";
+	mes "Ha ha ha! You understand this poem";
+	mes "well! Now, would you repeat the";
+	mes "third line for me again?";
+	next;
+	menu "I look upon the bright moon",s_10,"I lift my head to look at the bright moon.",-,"I turn my head to look at the bright moon.",s_10,"I face the bright moon.",s_10;
+	set @PKtest,@PKtest+1;
+
+s_10:
+}
+	if(@PKrand == 2)
+{
+	mes "[Nagash Arses]";
+	mes "^3131FF'It looks like the ^000000[ ]^3131FF on the";
+	mes "ground.'^000000 In the second line, which";
+	mes "word should be in [ ]?";
+	next;
+	menu "Frost",-,"Dew",s_11,"Pebbles",s_11,"Snow",s_11;
+	set @PKtest,@PKtest+1;
+
+s_11:
+	mes "[Nagash Arses]";
+	mes "^3131FF'I lift my ^000000[ ]^3131FF to look at the";
+	mes "bright moon.'^000000 In the third line,";
+	mes "which word should be in [ ]?";
+	next;
+	menu "eyes",s_12,"head",-,"gaze",s_12,"sights",s_12;
+	set @PKtest,@PKtest+1;
+
+s_12:
+	mes "[Nagash Arses]";
+	mes "Now to see if you really";
+	mes "understand this poem. It's no";
+	mes "use to just know the words. They";
+	mes "must be a part of you as well.";
+	next;
+	mes "[Nagash Arses]";
+	mes "What do you think is the major";
+	mes "theme of this poem?";
+	next;
+	menu "Tragedy",s_13,"Seperation",-,"Love",s_13,"Revenge",s_13,"Buddy Cop Film",s_13;
+	set @PKtest,@PKtest+1;
+
+s_13:
+	set @PKrand2,rand(0,1);
+	if(!@PKrand2)
+	{
+	mes "[Nagash Arses]";
+	mes "What might be one reason why the";
+	mes "bright moonlight looks like frost";
+	mes "on the ground to the poet?";
+	next;
+	menu "He's looking though a frosty window",s_14,"A bright moon glimmers like icicles",-,"He's homesick, so the moonlight looks cold.",s_14,"It's called 'Poetic Lisense.'",s_14;
+	}
+	if(@PKrand2)
+	{
+	mes "[Nagash Arses]";
+	mes "Although this poem is only four";
+	mes "lines long, it's structure can be";
+	mes "easily classified. How would you";
+	mes "describe this poem's structure?";
+	next;
+	menu "Why it's a sonnet",s_14,"It's a prose with erratic caesuras",s_14,"It's a quatrain of course",-,"Lambic Pentameter?",s_14;
+	}
+	set @PKtest,@PKtest+1;
+
+s_14:
+	mes "[Nagash Arses]";
+	mes "Ha ha ha! You understand this poem";
+	mes "well! Now, would you repeat the";
+	mes "last line for me again?";
+	next;
+	menu "I cry for my home town.",s_15,"I lower my head feeling homesick.",-,"I miss my home town",s_15,"I sob feeling homesick.",s_15;
+	set @PKtest,@PKtest+1;
+
+s_15:
+}
+	if(@PKtest == 5 && QL_POISONKING == 2)set QL_POISONKING,3;
+	mes "[Nagash Arses]";
+	mes "Thank you for yout time,";
+	mes "youngster. Oh, and this is";
+	mes "an old, famous poem written";
+	mes "by Li Tai Bai. You know that,";
+	mes "don't you?";
+	close;
+
+s_Hometown:
+	mes "[Nagash Arses]";
+	mes "Are you asking me";
+	mes "about my hometown...?";
+	mes "As a Rune-Midgardian,";
+	mes "I'm sure you've at least";
+	mes "heard of Morroc...";
+	next;
+	mes "[Nagash Arses]";
+	mes "A city built in the middle of the";
+	mes "desert, its founders had to combat";
+	mes "the harsh and unforgiving forces of";
+	mes "nature everyday.";
+	next;
+	mes "[Nagash Arses]";
+	mes "Yeah, the blazing sun never";
+	mes "seems to leave, and it's a dry,";
+	mes "desert area, but people still";
+	mes "manage to live there.";
+	next;
+	mes "[Nagash Arses]";
+	mes "Ah~ I miss Morroc, my hometown.";
+	mes "I used to be a member of the";
+	mes "Assassin organization known as the";
+	mes "'Canine of Desert.' Long ago, I was";
+	mes "their poison expert.";
+	next;
+	if(QL_POISONKING == 3)goto s_AltMenu;
+	menu "Tell him news of Morroc",s_News,"Info about 'Canine of Desert'",s_Canine;
+
+s_AltMenu:
+	menu "Tell him news of Morroc",s_News,"Info about 'Canine of Desert'",s_Canine,"Just listen",s_Listen;
+
+s_News:
+	mes "[Nagash Arses]";
+	mes "Hm...?";
+	mes "Is there anything";
+	mes "you want to say?";
+	next;
+	mes "[" + strcharinfo(0) +"]";
+	mes "I have news";
+	mes "of Morroc...";
+	input @PKstr$;
+	mes "[" + strcharinfo(0) +"]";
+	mes @PKstr$;
+	next;
+	mes "[Nagash Arses]";
+	mes "I see...";
+	mes "Thank you for";
+	mes "telling me that.";
+	close;
+
+s_Canine:
+	mes "[Nagash Arses]";
+	mes "I just told you what the 'Canine";
+	mes "of Desert' is. If you can't remember what";
+	mes "I just told you, it's no use for me";
+	mes "to explain further. You go ahead";
+	mes "and tell me what it is.";
+	next;
+	input @PKstr$;
+	mes "[Nagash Arses]";
+	mes "Well, I suppose I can't blame you";
+	mes "for not knowing or remembering.";
+	mes "When you get the chance, find";
+	mes "someone wearing a purple suit...";
+	next;
+	mes "[Nagash Arses]";
+	mes "Any Assassin worth his salt should";
+	mes "know what the 'Canine of Desert'";
+	mes "is.";
+	close;
+
+s_Listen:
+	mes "[Nagash Arses]";
+	mes "I tried Many things to develop my";
+	mes "poison skills when I was young.";
+	mes "I tried to extract poison from";
+	mes "Muka's needles and from purple";
+	mes "mushrooms. Eventually, I became";
+	mes "an expert of toxins from my";
+	mes "efforts. ";
+	next;
+	mes "[Nagash Arses]";
+	mes "One time I even injected";
+	mes "a poison into my own body";
+	mes "to fully test it. Yeah...";
+	mes "It almost killed me.";
+	next;
+	mes "[Nagash Arses]";
+	mes "I was recognized as the man who";
+	mes "was most highly skilled in the use";
+	mes "of poison in the 'Canine of";
+	mes "Desert,' and I was sent on the most";
+	mes "crucial and dangerous missions.";
+	next;
+	mes "[Nagash Arses]";
+	mes "One day, I was hired by the Alberta";
+	mes "Merchant Guild to assassinate an";
+	mes "enemy that had been threatening";
+	mes "them. However, I never got to";
+	mes "complete that missions.";
+	next;
+	mes "[Nagash Arses]";
+	mes "While I was on the ship to proceed";
+	mes "with my mission, we encountered";
+	mes "heavy wind and waves, and the ship";
+	mes "sank. I believe I was the only";
+	mes "survivor of that accident.";
+	next;
+	mes "[Nagash Arses]";
+	mes "I was floated helplessly on the";
+	mes "ocean and somehow managed";
+	mes "to arrive here, in Louyang. That";
+	mes "was forty years ago.";
+	next;
+	mes "[Nagash Arses]";
+	mes "It seemed that my arrival was";
+	mes "rather timely. Louyang was intruded";
+	mes "by huge mobs of dangerous monsters";
+	mes "that were able to infiltrate";
+	mes "the Castle of the Dragon.";
+	next;
+	mes "[Nagash Arses]";
+	mes "Since I was one of the best";
+	mes "assassins of the 'Canine of";
+	mes "Desert.’ I did far more than my";
+	mes "share fair of monster killing.";
+	next;
+	mes "[Nagash Arses]";
+	mes "It was on the battlefield that";
+	mes "I met Bai Long who is now the Lord of";
+	mes "this town. But back then, he was";
+	mes "known as the 'Street Knight.'";
+	next;
+	mes "[Nagash Arses]";
+	mes "I remember seeing him surrounded";
+	mes "by enemies, and I dove into thick";
+	mes "of battle to keep him from getting";
+	mes "killed. We fought back to back and";
+	mes "managed to stay alive back then.";
+	next;
+	mes "[Nagash Arses]";
+	mes "You have to understand that it's";
+	mes "not easy to let someone back you";
+	mes "up in battle unless there's a solid";
+	mes "trust. Those sights... where the";
+	mes "greatest moments in my life.";
+	next;
+	mes "[Nagash Arses]";
+	mes "Sadly, Many of our comrades,";
+	mes "all of them respectable and highly";
+	mes "skilled in martial artists, fell in";
+	mes "battle. The number of monsters we";
+	mes "had to contend with was just";
+	mes "overwhelming.";
+	next;
+	mes "[Nagash Arses]";
+	mes "Still, I manage to continue my";
+	mes "poison research, even during those";
+	mes "tough times. I studied medicine in";
+	mes "this town and was able to use that";
+	mes "knowledge to enhance my";
+	mes "understanding of poisons.";
+	next;
+	mes "[Nagash Arses]";
+	mes "I created a new skill based on all";
+	mes "of my knowledge, and learned how";
+	mes "to put poison on weapons.";
+	next;
+	mes "[Nagash Arses]";
+	mes "I even learned martial arts in";
+	mes "Louyang, and combined that";
+	mes "knowledge with my poison expertise";
+	mes "to create my own unique fighting";
+	mes "style.";
+	next;
+	mes "[Nagash Arses]";
+	mes "Well, that's my story.";
+	mes "But now, I just miss my";
+	mes "home town. I miss the heat";
+	mes "of the desert, and the glare";
+	mes "of the blazing sun.";
+	set QL_POISONKING,4;
+	close;
+
+s_Poison:
+	mes "[Nagash Arses]";
+	mes "Did you just say you";
+	mes "want to learn about the";
+	mes "use of poison?";
+	next;
+	mes "[Nagash Arses]";
+	mes "Why would you want";
+	mes "to learn about it?";
+	mes "Even if I wanted to";
+	mes "teach, I'm too old to";
+	mes "remember everything";
+	mes "clearly...";
+	if(QL_POISONKING > 4)goto s_Disciple;
+	close;
+
+s_Disciple:
+	next;
+	mes "[Nagash Arses]";
+	mes "Go find my last disciple,";
+	mes "^0000FFSong Zhi Du^000000, as he may tell you";
+	mes "something useful. He's working at";
+	mes "the doctor's office. If it weren't";
+	mes "for him, I'd be starving now.";
+	if(QL_POISONKING == 5)set QL_POISONKING,6;
+	close;
+
+s_Situation:
+	if(QL_POISONKING == 4)goto s_Situation2;
+	mes "[Nagash Arses]";
+	mes "I...";
+	mes "I don't want";
+	mes "to talk about that.";
+	mes "Let's not talk about it.";
+	close;
+
+s_Situation2:
+	mes "[Nagash Arses]";
+	mes "You're asking me how";
+	mes "things came to be like";
+	mes "this? Life used to be good.";
+	next;
+	mes "[Nagash Arses]";
+	mes "Ah I told you, I distinguished";
+	mes "myself in the battles with";
+	mes "monsters. I was rewarded with";
+	mes "Louyang citizenship and given";
+	mes "gifts of money.";
+	next;
+	mes "[Nagash Arses]";
+	mes "I was invited to join a martial";
+	mes "arts organization that specialized";
+	mes "in the use of poison. I joined";
+	mes "them, excited about further";
+	mes "broadening my knowldege.";
+	next;
+	mes "[Nagash Arses]";
+	mes "I was stunned by the enormous body";
+	mes "of knowledge about toxins that they";
+	mes "provided. I tried to learn as much";
+	mes "as I could so I could develop my";
+	mes "own, unique poisoning skills.";
+	next;
+	mes "[Nagash Arses]";
+	mes "As I studied with them, together we";
+	mes "started to clear the town of the";
+	mes "remaining monsters. Can you guess";
+	mes "the results of our effors to clean";
+	mes "up the city?";
+	next;
+	menu "..??",-,"It must have been good.",s_Good,"I guess it was okay.",s_Okay,"I don't know, but how did it go?",s_Dunno;
+
+	mes "[Nagash Arses]";
+	mes "Did you even listen to me? It's no";
+	mes "use talking to you if you don't";
+	mes "even care about what I have to";
+	mes "say.";
+	next;
+	goto s_False;
+
+s_Good:
+	mes "[Nagash Arses]";
+	mes "You're right!";
+	mes "We got rid of every";
+	mes "single monster in the city!";
+	next;
+	goto s_Right;
+
+s_Okay:
+	mes "[Nagash Arses]";
+	mes "Just okay...?";
+	mes "I don't think you realized how";
+	mes "powerful we were back then! Eh...";
+	next;
+	goto s_False;
+
+s_Dunno:
+	mes "[Nagash Arses]";
+	mes "We got rid of every single monster";
+	mes "in the city!";
+	next;
+
+s_Right:
+	mes "[Nagash Arses]";
+	mes "We managed to eliminate every";
+	mes "monster that was wandering around";
+	mes "Louyang. At the time, we were the";
+	mes "only people brave enough to take on";
+	mes "this sort of task.";
+	next;
+	mes "[Nagash Arses]";
+	mes "Unfortunately, other martial arts";
+	mes "organizations grew envious of our";
+	mes "success, insisting that we were";
+	mes "dishonorable for using poison to";
+	mes "attack our enemies.";
+	next;
+	mes "[Nagash Arses]";
+	mes "Although we can accept criticism";
+	mes "for our use of poison, we were";
+	mes "finally blamed for something we";
+	mes "never would have done.";
+	next;
+	mes "[Nagash Arses]";
+	mes "Someone put poison into a meal";
+	mes "which was eaten by a son of the";
+	mes "lord and then falsely accused us!";
+	next;
+	mes "[Nagash Arses]";
+	mes "in the end, our organization was";
+	mes "disbanded and I was put in jail.";
+	mes "I suffered through much to escape";
+	mes "from prison...";
+	next;
+	mes "[Nagash Arses]";
+	mes "However, because of all the";
+	mes "injuries I've had to endure in jail";
+	mes "and in my escape attempts,";
+	mes "I can no longer use my";
+	mes "martial arts.";
+	next;
+	mes "[Nagash Arses]";
+	mes "Even to this day, the police are";
+	mes "hounding after me. I really want to";
+	mes "tell the lord of Louyang that I'm";
+	mes "innocent, but it may be";
+	mes "too late now...";
+	set QL_POISONKING,5;
+	close;
+
+s_False:
+	mes "[Nagash Arses]";
+	mes "Sorry for keeping you from what you";
+	mes "wanted to do. Take care of";
+	mes "yourself, youngster.";
+	close;
+
+s_MetDisciple:
+	mes "[Nagash Arses]";
+	mes "Aren't you the youngster";
+	mes "I talked to a while ago?";
+	mes "Did you get a chance";
+	mes "to meet my disciple?";
+	mes "How was he?";
+	next;
+	mes "[Nagash Arses]";
+	mes "He was sick all the time when he";
+	mes "was young, so he worried me a lot.";
+	mes "But now I'm proud of him and he's";
+	mes "doing as well as just any other fine";
+	mes "young man.";
+	next;
+	mes "[Nagash Arses]";
+	mes "I am living only for him,";
+	mes "and hope that he becomes a great";
+	mes "healer someday. Recently, I've";
+	mes "found that my sole comfort is in";
+	mes "treating diseases for other";
+	mes "people...";
+	next;
+	mes "[Nagash Arses]";
+	mes "By the way...";
+	mes "You look pale...";
+	mes "Did something happen?";
+	next;
+	menu "Nothing",-,"I want to talk about your disciple",s_TalkDisciple,"I don't feel good.",s_DontFeelG;
+
+	mes "[Nagash Arses]";
+	mes "Oh...";
+	mes "I see...";
+	mes "But take care";
+	mes "of yourself.";
+	next;
+	mes "[Nagash Arses]";
+	mes "You better enjoy your physical";
+	mes "strength when you're young. When";
+	mes "you're my age, it's tough to regain";
+	mes "your health once you lose it.";
+	close;
+
+s_TalkDisciple:
+	mes "[Nagash Arses]";
+	mes "Did something happen to him?";
+	mes "I've been worried since he hasn't";
+	mes "come to visit me since you last";
+	mes "came to speak with me.";
+	next;
+	if(QL_POISONPATH == 1)goto s_BeFine;
+	if(countitem(678))menu "Give him Poison Bottle.",s_Bottle,"Cancel and go to 'Song Zhi Du'.",-;
+	else
+	{
+	mes "[" + strcharinfo(0) + "]";
+	mes "...Nothing much.";
+	close;
+	} 
+
+	mes "[" + strcharinfo(0) + "]";
+	mes "...Nothing much.";
+	next;
+s_BeFine:
+	mes "[Nagash Arses]";
+	mes "Hmm...?";
+	mes "I guess you don't know what is";
+	mes "going on. I've heard some bad";
+	mes "rumors about him, which is why I'm";
+	mes "asking.";
+	next;
+	mes "[Nagash Arses]";
+	mes "I hope he'll be fine.";
+	mes "After all, he's truly";
+	mes "kind at heart.";
+	close;
+
+s_Bottle:
+	delitem 678,1;
+	mes "[Nagash Arses]";
+	mes "Huh!?";
+	mes "Isn't this...!?";
+	next;
+	mes "[Nagash Arses]";
+	mes "I've dreamed of creating";
+	mes "a poison of such potency!";
+	mes "W-where did you find this?";
+	next;
+	menu "It's common nowadays.",-,"Explain to him what happened.",s_Explain;
+
+	mes "[Nagash Arses]";
+	mes "Really...?";
+	mes "Then someone finally figured it out.";
+	next;
+	mes "[Nagash Arses]";
+	mes "I shared all of my knowledge with";
+	mes "others, so I guess a doctor might";
+	mes "have figured out how to creat this.";
+	next;
+	mes "[Nagash Arses]";
+	mes "^666666*Sigh...*^000000";
+	mes "Now I feel depressed";
+	mes "for some reason..";
+	set QL_POISONPATH,1;
+	close;
+
+s_Explain:
+	mes "^3131FFYou tell Nagash Arses how";
+	mes "Song Zhi Du created this Deadly";
+	mes "Poison Bottle and his plan to get";
+	mes "his revenge on the lord of";
+	mes "Louyang.^000000";
+	next;
+	mes "[Nagash Arses]";
+	mes "^666666*Sigh...*^000000";
+	next;
+	mes "[Nagash Arses]";
+	mes "Will you...";
+	mes "Will you excuse";
+	mes "me for a second...?";
+	set QL_POISONPATH,2;
+	close;
+
+s_DontFeelG:
+	mes "[Nagash Arses]";
+	mes "Oh, you don't?";
+	mes "Well, that can happen";
+	mes "sometimes when you're";
+	mes "in a foreign land for";
+	mes "too long. I hope you";
+	mes "feel better soon.";
+	close;
+
+s_StopHim:
+	mes "[Nagash Arses]";
+	mes "Youngster...";
+	mes "I beg of you.";
+	mes "Please don not let him";
+	mes "bring any harm to the lord.";
+	next;
+	mes "[Nagash Arses]";
+	mes "If you cannot stop him,";
+	mes "then please interrupt him";
+	mes "from carrying out his plan.";
+	next;
+	mes "[Nagash Arses]";
+	mes "I tried...";
+	mes "To convince myself";
+	mes "that what I had heard";
+	mes "were just ugly rumors.";
+	mes "I was wrong...";
+	next;
+	mes "[Nagash Arses]";
+	mes "I am pretty sure he's been asking";
+	mes "you, as well as others, for aid.";
+	mes "Even if you do not agree to carry";
+	mes "out his plan, I'm sure he will find";
+	mes "someone to poison Lord Bai Long.";
+	next;
+	mes "[Nagash Arses]";
+	mes "There is only one way he can";
+	mes "poison the lord. He likes";
+	mes "drinking, and has a favorite";
+	mes "drink bottle he keeps with him";
+	mes "all the time. You must get rid";
+	mes "of his drink.";
+	next;
+	mes "[Nagash Arses]";
+	mes "Please, I beg you.";
+	mes "for my sake, as well";
+	mes "as that of my disciple,";
+	mes "Louyang's leader must live...";
+	close;
+
+s_Emo:
+	mes "^3131FFNagash Arses. He is no longer a";
+	mes "well-known Assassin of the martial";
+	mes "arts organization of which he was";
+	mes "once master has lon since";
+	mes "disbanded.";
+	next;
+	mes "^3131FFNow he is but a poor old man";
+	mes "who is in anguish over his";
+	mes "disciple. No matter what you say,";
+	mes "he continues to talk about";
+	mes "something totally unrelated, as if";
+	mes "in a dream.";
+	close;
+
+s_Happened:
+	mes "[Nagash Arses]";
+	mes "So...";
+	mes "What..";
+	mes "What happened?";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "i made it.";
+	next;
+	emotion 6;
+	mes "[Nagash Arses]";
+	mes "You did?!";
+	mes "Oh~ thank you,";
+	mes "thank you so much!";
+	next;
+	mes "[Nagash Arses]";
+	mes "Thank God I've";
+	mes "lived this long.";
+	mes "And... I just realized";
+	mes "something while you were away.";
+	next;
+	mes "[Nagash Arses]";
+	mes "This is a journal that I have been";
+	mes "writing for 15 years about my";
+	mes "feelings of guild, and what really";
+	mes "happened in the past. I hope you";
+	mes "can deliver this to the lord for";
+	mes "me.";
+	next;
+	mes "^3131FFYou obtained";
+	mes "^0000FFPoison King,";
+	mes "Nagash Arses' Journal.";
+	set QL_POISONKING,15;
+	close;
+
+s_Hope:
+	mes "[Nagash Arses]";
+	mes "I hope you";
+	mes "can deliver this";
+	mes "to Lord Bai Long...";
+	close;
+
+s_Letter:
+	mes "^3131FFYou gave him the";
+	mes "^0000FFLetter from Bai Long.^000000";
+	next;
+	mes "[Nagash Arses]";
+	mes "What's this...?";
+	next;
+	mes "[Nagash Arses]";
+	mes "Why, he's invited me";
+	mes "to take the position of";
+	mes "a government official!";
+	mes "I'm truly grateful!";
+	next;
+	mes "[Nagash Arses]";
+	mes "However, please let him";
+	mes "know that I must respectfully";
+	mes "decline his offer. I'm afraid that";
+	mes "I may be a burden to him once";
+	mes "again.";
+	next;
+	mes "[Nagash Arses]";
+	mes "Please tell him that I wish to";
+	mes "enjoy the rest of my life here.";
+	mes "Also, there are people here";
+	mes "who still need me...";
+	next;
+	mes "[Nagash Arses]";
+	mes "Thank you, youngster.";
+	mes "You've stopped my disciple";
+	mes "and helped me make up";
+	mes "with an old friend...";
+	next;
+	mes "^3131FFNagash Arses put his palm on your";
+	mes "back, and you can feel his strength";
+	mes "flowing into you.";
+	percentheal 100,100;
+	next;
+	mes "^3131FFYou grow dizzy, but you can also feel";
+	mes "like you're becoming more powerful";
+	mes "and gaining experience.";
+	if(BaseLevel < 56)set BaseExp,BaseExp+9000;
+	else if(BaseLevel > 55 && BaseLevel < 61)set BaseExp,BaseExp+10500;
+	else if(BaseLevel > 60 && BaseLevel < 66)set BaseExp,BaseExp+18684;
+	else if(BaseLevel > 65 && BaseLevel < 71)set BaseExp,BaseExp+27411;
+	else if(BaseLevel > 70 && BaseLevel < 76)set BaseExp,BaseExp+70757;
+	else if(BaseLevel > 75 && BaseLevel < 81)set BaseExp,BaseExp+130246;
+	else if(BaseLevel > 80 && BaseLevel < 86)set BaseExp,BaseExp+150340;
+	else if(BaseLevel > 85 && BaseLevel < 91)set BaseExp,BaseExp+182052;
+	else if(BaseLevel > 90)set BaseExp,BaseExp+406786;
+	set QL_POISONKING,17;
+	close2;
+	warp "louyang.gat",270,136;
+	end;
+
+s_Proud:
+	mes "[Nagash Arses]";
+	mes "My name, Nagash Arses,";
+	mes "is also the name of the poison king";
+	mes "in the legend of Arcturus. I have";
+	mes "a good reason to be proud of my";
+	mes "name!";
+	close;
+
+}
+
+lou_in01.gat,101,124,0	script	#LouSoldChk	139,100,0,{
+	if(QL_POISONKING == 13)goto s_SoldChk;
+	end;
+
+s_SoldChk:
+	mes "[Soldier]";
+	mes "Who goes there!";
+	next;
+	mes "^3131FFYou ran away as quickly as you";
+	mes "could!";
+	close2;
+	warp "louyang.gat",218,249;
+	end;
+
+}
+
+lou_in01.gat,115,163,0	script	#LouSoldChk2	139,0,2,{
+	if(QL_POISONKING == 13)goto s_SoldChk;
+	end;
+
+s_SoldChk:
+	mes "[Soldier]";
+	mes "Who goes there!";
+	next;
+	mes "^3131FFYou escape before the soldier can";
+	mes "find you.";
+	close2;
+	warp "louyang.gat",217,278;
+	end;
+
+}
+
+lou_in01.gat,115,163,0	script	#LouSoldChk3	139,25,0,{
+	if(QL_POISONKING == 13)goto s_SoldChk;
+	end;
+
+s_SoldChk:
+	mes "[Soldier]";
+	mes "Who goes there!";
+	next;
+	mes "^3131FFYou escape before the soldier can";
+	mes "find you.";
+	close2;
+	warp "louyang.gat",217,278;
+	end;
+
+}
+louyang.gat,218,278,0	script	#LouSecEntrnc	111,{
+
+	mes "[" + strcharinfo(0) + "]";
+	mes "What's this?";
+	mes "A crack in the wall?";
+	next;
+	mes "^3131FFYou jump to the stone wall and peek into the crack. It looks big enough for someone to squeeze through.";
+	next;
+	mes "You move through the crack as";
+	mes "quickly as you can.";
+	close2;
+	warp "lou_in01.gat",119,167;
+	end;
+
+}
+
+lou_in01.gat,117,167,0	script	#LouSecExit	111,{
+
+	mes "[" + strcharinfo(0) + "]";
+	mes "What's this?";
+	mes "A crack in the wall?";
+	next;
+	mes "^3131FFYou jump to the stone wall and peek into the crack. It looks big enough for someone to squeeze through.";
+	next;
+	mes "You move through the crack as";
+	mes "quickly as you can.";
+	close2;
+	warp "louyang.gat",217,278;
+	end;
+
+}
+
+lou_in01.gat,106,162,0	script	#BaiLongBottle	111,{
+
+	if(QL_POISONPATH > 1 && countitem(713) && countitem(938))goto s_Save;
+	if(QL_POISONKING != 13)goto s_Fancy;
+	mes "^3131FFYou found a drink bottle that's";
+	mes "possibly owned by Bai Long, lord of";
+	mes "Louyang.^000000";
+	if(QL_POISONPATH < 2 && countitem(678))goto s_Assassinate;
+	close;
+
+s_Assassinate:
+	next;
+	delitem 678,1; //Poison Bottle
+	mes "^3131FFYou put the deadly poison into the bottle.";
+	set QL_POISONKING,14;
+	next;
+	mes "^3131FFIt would be smart to get out of this place as soon as you can.";
+	close;
+
+s_Fancy:
+	mes "^3131FFYou found a drink bottle. It's fancy enough that the only possible owner could be Bai Long, lord of Louyang.";
+	close;
+
+s_Save:
+	mes "^3131FFYou take the drink bottle and replace it with a bottle filled with sticky mucus. Hopefully Bai Long won't notice!";
+	delitem 713,1; //Empty Bottle
+	delitem 938,1; //Stick Mucus
+	set QL_POISONKING,14;
+	close;
+
+}
diff --git a/npc/quests/quests_lutie.txt b/npc/quests/quests_lutie.txt
index 8be6282e0..d32da5cd7 100644
--- a/npc/quests/quests_lutie.txt
+++ b/npc/quests/quests_lutie.txt
@@ -1,178 +1,178 @@
-//===== eAthena Script ======================================= 

-//= Quest NPCs related to Lutie

-//===== By: ================================================== 

-//= TonyMan

-//===== Current Version: ===================================== 

-//= 1.2

-//===== Compatible With: ===================================== 

-//= eAthena 1.0

-//===== Description: ========================================= 

-//= Blush, Cake Hat, Candle, Chef Hat, Raccoon Hat, Rainbow Eggshell,

-//= Spore Hat, Wonder Nutshell Quests

-//===== Additional Comments: ================================= 

-//= 1.1 Optimized [Lupus]

-//= 1.2 Fixed Chef Hat items [Lupus]

-//============================================================ 

-

-xmas.gat,117,295,3	script	Titicupe	704,{

-	mes "[^469ED2Titicupe^000000]";

-	mes "I am the well known ^27BEB7Vending Machine Man Titicupe^000000, I am also a Wizard of the great ^9A3CA2Geffen Mage Guild^000000. I can use my special magic to make some rare items, but I need ingridients. Choose an item you want.";

-	next;

-	menu "Blush",-,"Cake Hat",cake_hat,"Candle",candle,"Chef Hat",chef_hat,"Raccoon Hat",raccoon_hat,"Rainbow Eggshell",rainbow_egg,"Spore Hat",spore_hat,"Wonder Nutshell",wonder_nut,"Cancel",M_Cancel;

-	

-	mes "[^469ED2Titicupe^000000]";

-	mes "Hmm... spell ingridients are...";

- 	mes "100 Alice's Apron";

- 	next;

-	menu "Here. Now do your magic!",-,"Cancel",M_Cancel;

-	

-	if(countitem(7047)<100) goto L_NoItem;

-	delitem 7047,100;

-	getitem 5040,1;

-	mes "[^469ED2Titicupe^000000]";

-	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^D6294BBlush^000000, it's yours.";

-	close;

-	

-cake_hat:

-	mes "[^469ED2Titicupe^000000]";

-	mes "Hmm... spell ingridients are...";

- 	mes "10 Candy";

- 	mes "5 Candy Cane";

- 	mes "20 Piece of Cake";

- 	mes "10 Steel";

- 	mes "15 Well-baked Cookie";

- 	next;

-	menu "Here. Now do your magic!",-,"Cancel",M_Cancel;

-	

-	if(countitem(529)<10 || countitem(530)<5 || countitem(539)<20 || countitem(999)<10 || countitem(538)<15) goto L_NoItem;

-	delitem 529,10;

-	delitem 530,5;

-	delitem 539,20;

-	delitem 999,10;

-	delitem 538,15;

-	getitem 5024,1;

-	mes "[^469ED2Titicupe^000000]";

-	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^BD3CBACake Hat^000000, it's yours.";

-	close;

-	

-candle:

-	mes "[^469ED2Titicupe^000000]";

-	mes "Hmm... spell ingridients are...";

-	mes "1 Bomb Wick";

- 	mes "50 Matchstick";

- 	mes "100 Royal Jelly";

- 	next;

-	menu "Here. Now do your magic!",-,"Cancel",M_Cancel;

-	

-	if(countitem(2279)<1 || countitem(7035)<50 || countitem(526)<100) goto L_NoItem;

-	delitem 2279,1;

-	delitem 7035,50;

-	delitem 526,100;

-	getitem 5028,1;

-	mes "[^469ED2Titicupe^000000]";

-	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^BD3CBACandle^000000, it's yours.";

-	close;

-	

-chef_hat:

-	mes "[^469ED2Titicupe^000000]";

-	mes "Hmm... spell ingridients are...";

-	mes "450 Dragon Scale";

- 	mes "330 Feather";

- 	mes "120 Piece of Cake";

- 	mes "  1 White Dyestuffs";

- 	next;

-	menu "Here. Now do your magic!",-,"Cancel",M_Cancel;

-	

-	if(countitem(1036)<450 || countitem(949)<330 || countitem(539)<120 || countitem(982)<1) goto L_NoItem;

-	delitem 1036,450;

-	delitem 949,330;

-	delitem 539,120;

-	delitem 982,1;

-	getitem 5026,1;

-	mes "[^469ED2Titicupe^000000]";

-	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^BD3CBAChef Hat^000000, it's yours.";

-	close;

-

-raccoon_hat:

-	mes "[^469ED2Titicupe^000000]";

-	mes "Hmm... spell ingridients are...";

-	mes "20 Dragon Scale";

- 	mes "1 Kitty Band";

- 	mes "300 Sea-otter Fur";

- 	mes "200 Tough Scalelike Stem";

- 	next;

-	menu "Here. Now do your magic!",-,"Cancel",M_Cancel;

-	

-	if(countitem(1036)<20 || countitem(2213)<1 || countitem(7065)<300 || countitem(7012)<200) goto L_NoItem;

-	delitem 1036,20;

-	delitem 2213,1;

-	delitem 7065,300;

-	delitem 7012,200;

-	getitem 5033,1;

-	mes "[^469ED2Titicupe^000000]";

-	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^7D4E31Raccoon Hat^000000, it's yours.";

-	close;

-	

-rainbow_egg:

-	mes "[^469ED2Titicupe^000000]";

-	mes "Hmm... spell ingridients are...";

-	mes "50 Claw of Desert Wolf";

- 	mes "1 Cobaltblue Dyestuffs";

- 	mes "1 Egg Shell";

- 	next;

-	menu "Here. Now do your magic!",-,"Cancel",M_Cancel;

-	

-	if(countitem(7030)<50 || countitem(978)<1 || countitem(5015)<1) goto L_NoItem;

-	delitem 7030,50;

-	delitem 978,1;

-	delitem 5015,1;

-	getitem 5039,1;

-	mes "[^469ED2Titicupe^000000]";

-	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^8D4178Rainbow Egg^000000, it's yours.";

-	close;

-	

-spore_hat:

-	mes "[^469ED2Titicupe^000000]";

-	mes "Hmm... spell ingridients are...";

-	mes "300 Burnt Tree";

- 	mes "850 Poison Spore";

- 	mes "1 Tongue";

- 	next;

-	menu "Here. Now do your magic!",-,"Cancel",M_Cancel;

-	

-	if(countitem(7068)<300 || countitem(7033)<850 || countitem(1015)<1) goto L_NoItem;

-	delitem 7068,300;

-	delitem 7033,850;

-	delitem 1015,1;

-	getitem 5029,1;

-	mes "[^469ED2Titicupe^000000]";

-	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^7D4E31Spore Hat^000000, it's yours.";

-	close;

-	

-wonder_nut:

-	mes "[^469ED2Titicupe^000000]";

-	mes "Hmm... spell ingridients are...";

-	mes "1 Nut Shell";

- 	mes "500 Wing of Dragonfly";

-

- 	next;

-	menu "Here. Now do your magic!",-,"Cancel",M_Cancel;

-	

-	if(countitem(5037)<1 || countitem(7064)<500) goto L_NoItem;

-	delitem 5037,1;

-	delitem 7064,500;

-	getitem 5050,1;

-	mes "[^469ED2Titicupe^000000]";

-	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^7D4E31Wonder Nutshell^000000, it's yours.";

-	close;

-	

-M_Cancel:

-	mes "[^469ED2Titicupe^000000]";

-	mes "I bid you farewell, try not to catch a cold out here. It's ^5A9FD8freezing out here!^000000";

-	close;

-	

-L_NoItem:

-	mes "[^469ED2Titicupe^000000]";

-	mes "I can't cast since you don't seem to have all I need...";

-	close;

-}

+//===== eAthena Script ======================================= 
+//= Quest NPCs related to Lutie
+//===== By: ================================================== 
+//= TonyMan
+//===== Current Version: ===================================== 
+//= 1.2
+//===== Compatible With: ===================================== 
+//= eAthena 1.0
+//===== Description: ========================================= 
+//= Blush, Cake Hat, Candle, Chef Hat, Raccoon Hat, Rainbow Eggshell,
+//= Spore Hat, Wonder Nutshell Quests
+//===== Additional Comments: ================================= 
+//= 1.1 Optimized [Lupus]
+//= 1.2 Fixed Chef Hat items [Lupus]
+//============================================================ 
+
+xmas.gat,117,295,3	script	Titicupe	704,{
+	mes "[^469ED2Titicupe^000000]";
+	mes "I am the well known ^27BEB7Vending Machine Man Titicupe^000000, I am also a Wizard of the great ^9A3CA2Geffen Mage Guild^000000. I can use my special magic to make some rare items, but I need ingridients. Choose an item you want.";
+	next;
+	menu "Blush",-,"Cake Hat",cake_hat,"Candle",candle,"Chef Hat",chef_hat,"Raccoon Hat",raccoon_hat,"Rainbow Eggshell",rainbow_egg,"Spore Hat",spore_hat,"Wonder Nutshell",wonder_nut,"Cancel",M_Cancel;
+	
+	mes "[^469ED2Titicupe^000000]";
+	mes "Hmm... spell ingridients are...";
+ 	mes "100 Alice's Apron";
+ 	next;
+	menu "Here. Now do your magic!",-,"Cancel",M_Cancel;
+	
+	if(countitem(7047)<100) goto L_NoItem;
+	delitem 7047,100;
+	getitem 5040,1;
+	mes "[^469ED2Titicupe^000000]";
+	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^D6294BBlush^000000, it's yours.";
+	close;
+	
+cake_hat:
+	mes "[^469ED2Titicupe^000000]";
+	mes "Hmm... spell ingridients are...";
+ 	mes "10 Candy";
+ 	mes "5 Candy Cane";
+ 	mes "20 Piece of Cake";
+ 	mes "10 Steel";
+ 	mes "15 Well-baked Cookie";
+ 	next;
+	menu "Here. Now do your magic!",-,"Cancel",M_Cancel;
+	
+	if(countitem(529)<10 || countitem(530)<5 || countitem(539)<20 || countitem(999)<10 || countitem(538)<15) goto L_NoItem;
+	delitem 529,10;
+	delitem 530,5;
+	delitem 539,20;
+	delitem 999,10;
+	delitem 538,15;
+	getitem 5024,1;
+	mes "[^469ED2Titicupe^000000]";
+	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^BD3CBACake Hat^000000, it's yours.";
+	close;
+	
+candle:
+	mes "[^469ED2Titicupe^000000]";
+	mes "Hmm... spell ingridients are...";
+	mes "1 Bomb Wick";
+ 	mes "50 Matchstick";
+ 	mes "100 Royal Jelly";
+ 	next;
+	menu "Here. Now do your magic!",-,"Cancel",M_Cancel;
+	
+	if(countitem(2279)<1 || countitem(7035)<50 || countitem(526)<100) goto L_NoItem;
+	delitem 2279,1;
+	delitem 7035,50;
+	delitem 526,100;
+	getitem 5028,1;
+	mes "[^469ED2Titicupe^000000]";
+	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^BD3CBACandle^000000, it's yours.";
+	close;
+	
+chef_hat:
+	mes "[^469ED2Titicupe^000000]";
+	mes "Hmm... spell ingridients are...";
+	mes "450 Dragon Scale";
+ 	mes "330 Feather";
+ 	mes "120 Piece of Cake";
+ 	mes "  1 White Dyestuffs";
+ 	next;
+	menu "Here. Now do your magic!",-,"Cancel",M_Cancel;
+	
+	if(countitem(1036)<450 || countitem(949)<330 || countitem(539)<120 || countitem(982)<1) goto L_NoItem;
+	delitem 1036,450;
+	delitem 949,330;
+	delitem 539,120;
+	delitem 982,1;
+	getitem 5026,1;
+	mes "[^469ED2Titicupe^000000]";
+	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^BD3CBAChef Hat^000000, it's yours.";
+	close;
+
+raccoon_hat:
+	mes "[^469ED2Titicupe^000000]";
+	mes "Hmm... spell ingridients are...";
+	mes "20 Dragon Scale";
+ 	mes "1 Kitty Band";
+ 	mes "300 Sea-otter Fur";
+ 	mes "200 Tough Scalelike Stem";
+ 	next;
+	menu "Here. Now do your magic!",-,"Cancel",M_Cancel;
+	
+	if(countitem(1036)<20 || countitem(2213)<1 || countitem(7065)<300 || countitem(7012)<200) goto L_NoItem;
+	delitem 1036,20;
+	delitem 2213,1;
+	delitem 7065,300;
+	delitem 7012,200;
+	getitem 5033,1;
+	mes "[^469ED2Titicupe^000000]";
+	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^7D4E31Raccoon Hat^000000, it's yours.";
+	close;
+	
+rainbow_egg:
+	mes "[^469ED2Titicupe^000000]";
+	mes "Hmm... spell ingridients are...";
+	mes "50 Claw of Desert Wolf";
+ 	mes "1 Cobaltblue Dyestuffs";
+ 	mes "1 Egg Shell";
+ 	next;
+	menu "Here. Now do your magic!",-,"Cancel",M_Cancel;
+	
+	if(countitem(7030)<50 || countitem(978)<1 || countitem(5015)<1) goto L_NoItem;
+	delitem 7030,50;
+	delitem 978,1;
+	delitem 5015,1;
+	getitem 5039,1;
+	mes "[^469ED2Titicupe^000000]";
+	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^8D4178Rainbow Egg^000000, it's yours.";
+	close;
+	
+spore_hat:
+	mes "[^469ED2Titicupe^000000]";
+	mes "Hmm... spell ingridients are...";
+	mes "300 Burnt Tree";
+ 	mes "850 Poison Spore";
+ 	mes "1 Tongue";
+ 	next;
+	menu "Here. Now do your magic!",-,"Cancel",M_Cancel;
+	
+	if(countitem(7068)<300 || countitem(7033)<850 || countitem(1015)<1) goto L_NoItem;
+	delitem 7068,300;
+	delitem 7033,850;
+	delitem 1015,1;
+	getitem 5029,1;
+	mes "[^469ED2Titicupe^000000]";
+	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^7D4E31Spore Hat^000000, it's yours.";
+	close;
+	
+wonder_nut:
+	mes "[^469ED2Titicupe^000000]";
+	mes "Hmm... spell ingridients are...";
+	mes "1 Nut Shell";
+ 	mes "500 Wing of Dragonfly";
+
+ 	next;
+	menu "Here. Now do your magic!",-,"Cancel",M_Cancel;
+	
+	if(countitem(5037)<1 || countitem(7064)<500) goto L_NoItem;
+	delitem 5037,1;
+	delitem 7064,500;
+	getitem 5050,1;
+	mes "[^469ED2Titicupe^000000]";
+	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^7D4E31Wonder Nutshell^000000, it's yours.";
+	close;
+	
+M_Cancel:
+	mes "[^469ED2Titicupe^000000]";
+	mes "I bid you farewell, try not to catch a cold out here. It's ^5A9FD8freezing out here!^000000";
+	close;
+	
+L_NoItem:
+	mes "[^469ED2Titicupe^000000]";
+	mes "I can't cast since you don't seem to have all I need...";
+	close;
+}
diff --git a/npc/quests/quests_morocc.txt b/npc/quests/quests_morocc.txt
index 4e469d603..dacc0e1af 100644
--- a/npc/quests/quests_morocc.txt
+++ b/npc/quests/quests_morocc.txt
@@ -1,123 +1,123 @@
-//===== eAthena Script ======================================= 

-//= Quest NPCs related to Morroc

-//===== By: ================================================== 

-//= kobra_k88

-//===== Current Version: ===================================== 

-//= 1.1

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//= Stop Post and Binoculars Quest.

-//===== Additional Comments: ================================= 

-//= 1.1 Fixed exploits [Lupus]

-//============================================================ 

-

-

-

-//==================================================================================//

-// 				Stop Post Quest

-//==================================================================================//

-morocc_in.gat,142,100,4	script	William	89,{

-	mes "[William]";

-	mes "Welcome to MacMillan's ^3355FF'Post'^000000 Workshop .";

-	next;

-	mes "[William]";

-	mes "My Clan, MacMillan, Has been producing professional grade Traffic Signal Posts for more than 250 years.";

-	mes "Nowadays we are taking special orders for our very unique, ^3355FF'Stop Post'^000000.";

-	next;

-	menu "Could I order a ^3355FF'Stop Post'^000000?",-, "I'm not interested.",M_End;

-

-		mes "[William]";

-		mes "MacMillan's one of a kind ^3355FF'Stop Post'^000000 fits comfortably on a persons head.";

-		mes "Not only does it make an interesting head accessory, but it can actually be used as a stop sign as well.";

-		next;

-		mes "[William]";

-		mes "I garauntee that our ^3355FF'Stop Post'^000000 will last for well over 100 years, or my name isn't MacMillan!!";

-		next;

-		mes "[William]";

-		mes "For us to make you a ^3355FF'Stop Post'^000000, we will need:";

-		mes "^3355FF91100 Zeny,";

-		mes "50 Trunks,";

-		mes "and 1 Black Dyestuff^000000.";

-		next;

-		if(countitem(1019) >= 50 && countitem(983) >= 1 && Zeny >= 91100) goto sL_GetPost;

-		mes "[William]";

-		mes "Come back when you have all of the items.";

-		close;

-

-		sL_GetPost:

-			delitem 1019,50;

-			delitem 983,1;

-			set Zeny, Zeny - 91100;

-			mes "[William]";

-			mes "Here you are! A hand made, one of a kind, ^3355FF'Stop Post '^000000! Thank you for your patronage!";

-			getitem 2272,1;

-			emotion e_thx;

-			close;

-

-	M_End:

-		mes "[William]";

-		mes "Thanks for stopping by the MacMillan's Workshop.  I hope to see you soon.";

-		close;

-}

-

-

-//==================================================================================//

-//				Binoculars Quest

-//==================================================================================//

-morocc_in.gat,76,163,4	script	Alchemist	64,{

-	mes "[Marius]";

-	mes "Howdy! A new customer........ Wait!!! I know what you're here for....... You're interested in those magical goggles aren't you?";

-	next;

-	menu "What is that ?",-, "Make",M_Make, "Ignore him",M_End;

-

-		mes "[Marius]";

-		mes "It is actually called ^3355FF'Binoculars'^000000! It is an opitcal device that allows the wearer to see far away objects.";

-		next;

-		mes "[Marius]";

-		mes "You see, when two lens are placed next to each other in front of your eyes, your brain interperets this image........ blah blah...... blah....";

-		next;

-		mes "[Marius]";

-		mes "............... What's this? You don't seem interested in what I have to say?? I don't think you realize what I'm talking about!";

-		emotion e_hmm;

-		next;

-		mes "[Marius]";

-		mes "For us to make you a ^3355FF'Binoculars'^000000, we will need:";

-		mes "^3355FF50,000 Zeny,";

-		mes "100 Steel,";

-		mes "and 1 Geek Glasses.^000000.";

-		next;

-		mes "[Marius]";

-		mes "Oh c'mon! Don't be a jerk! What I'm talking about is REALLY COOL!!";

-		close;

-

-	M_Make:

-		mes "[Marius]";

-		if(countitem(2243) < 1 || countitem(999) < 100 || Zeny < 50000) goto sL_NotEnuf;

-		delitem 2243,1;

-		delitem 999,100;

-		set Zeny, Zeny - 50000;

-		mes "Gr~~~~eat ! You'll definitely enjoy a pair of these!";

-		next;

-		mes "[Marius]";

-		mes "Here it is ! The Binoculars!";

-		getitem 2296,1;

-		next;

-		mes "[Marius]";

-		mes "But before you go out and use them I have to tell you......";

-		if(sex==0) mes "DON'T USE THEM TO BE A PEEPING TOM!!!";

-		if(sex==1) mes "Becarefull where you look..... you might see someting you didn't want to........";

-		close;

-

-		sL_NotEnuf:

-			mes "Argggghhhhhhh !! You didn't bring enough items!! You need:";

-			mes "^3355FF1 pair of Geek Glasses, 50,000 Zeny and 100 Steel^000000.";

-			emotion e_an;

-			close;

-

-	M_End:

-		mes "[Marius]";

-		mes "Hey you! You DARE IGNORE ME!! I am MARIUS the alchemist of ALCHEMISTS!!!!!";

-		emotion e_omg;

-		close;

-}

+//===== eAthena Script ======================================= 
+//= Quest NPCs related to Morroc
+//===== By: ================================================== 
+//= kobra_k88
+//===== Current Version: ===================================== 
+//= 1.1
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//= Stop Post and Binoculars Quest.
+//===== Additional Comments: ================================= 
+//= 1.1 Fixed exploits [Lupus]
+//============================================================ 
+
+
+
+//==================================================================================//
+// 				Stop Post Quest
+//==================================================================================//
+morocc_in.gat,142,100,4	script	William	89,{
+	mes "[William]";
+	mes "Welcome to MacMillan's ^3355FF'Post'^000000 Workshop .";
+	next;
+	mes "[William]";
+	mes "My Clan, MacMillan, Has been producing professional grade Traffic Signal Posts for more than 250 years.";
+	mes "Nowadays we are taking special orders for our very unique, ^3355FF'Stop Post'^000000.";
+	next;
+	menu "Could I order a ^3355FF'Stop Post'^000000?",-, "I'm not interested.",M_End;
+
+		mes "[William]";
+		mes "MacMillan's one of a kind ^3355FF'Stop Post'^000000 fits comfortably on a persons head.";
+		mes "Not only does it make an interesting head accessory, but it can actually be used as a stop sign as well.";
+		next;
+		mes "[William]";
+		mes "I garauntee that our ^3355FF'Stop Post'^000000 will last for well over 100 years, or my name isn't MacMillan!!";
+		next;
+		mes "[William]";
+		mes "For us to make you a ^3355FF'Stop Post'^000000, we will need:";
+		mes "^3355FF91100 Zeny,";
+		mes "50 Trunks,";
+		mes "and 1 Black Dyestuff^000000.";
+		next;
+		if(countitem(1019) >= 50 && countitem(983) >= 1 && Zeny >= 91100) goto sL_GetPost;
+		mes "[William]";
+		mes "Come back when you have all of the items.";
+		close;
+
+		sL_GetPost:
+			delitem 1019,50;
+			delitem 983,1;
+			set Zeny, Zeny - 91100;
+			mes "[William]";
+			mes "Here you are! A hand made, one of a kind, ^3355FF'Stop Post '^000000! Thank you for your patronage!";
+			getitem 2272,1;
+			emotion e_thx;
+			close;
+
+	M_End:
+		mes "[William]";
+		mes "Thanks for stopping by the MacMillan's Workshop.  I hope to see you soon.";
+		close;
+}
+
+
+//==================================================================================//
+//				Binoculars Quest
+//==================================================================================//
+morocc_in.gat,76,163,4	script	Alchemist	64,{
+	mes "[Marius]";
+	mes "Howdy! A new customer........ Wait!!! I know what you're here for....... You're interested in those magical goggles aren't you?";
+	next;
+	menu "What is that ?",-, "Make",M_Make, "Ignore him",M_End;
+
+		mes "[Marius]";
+		mes "It is actually called ^3355FF'Binoculars'^000000! It is an opitcal device that allows the wearer to see far away objects.";
+		next;
+		mes "[Marius]";
+		mes "You see, when two lens are placed next to each other in front of your eyes, your brain interperets this image........ blah blah...... blah....";
+		next;
+		mes "[Marius]";
+		mes "............... What's this? You don't seem interested in what I have to say?? I don't think you realize what I'm talking about!";
+		emotion e_hmm;
+		next;
+		mes "[Marius]";
+		mes "For us to make you a ^3355FF'Binoculars'^000000, we will need:";
+		mes "^3355FF50,000 Zeny,";
+		mes "100 Steel,";
+		mes "and 1 Geek Glasses.^000000.";
+		next;
+		mes "[Marius]";
+		mes "Oh c'mon! Don't be a jerk! What I'm talking about is REALLY COOL!!";
+		close;
+
+	M_Make:
+		mes "[Marius]";
+		if(countitem(2243) < 1 || countitem(999) < 100 || Zeny < 50000) goto sL_NotEnuf;
+		delitem 2243,1;
+		delitem 999,100;
+		set Zeny, Zeny - 50000;
+		mes "Gr~~~~eat ! You'll definitely enjoy a pair of these!";
+		next;
+		mes "[Marius]";
+		mes "Here it is ! The Binoculars!";
+		getitem 2296,1;
+		next;
+		mes "[Marius]";
+		mes "But before you go out and use them I have to tell you......";
+		if(sex==0) mes "DON'T USE THEM TO BE A PEEPING TOM!!!";
+		if(sex==1) mes "Becarefull where you look..... you might see someting you didn't want to........";
+		close;
+
+		sL_NotEnuf:
+			mes "Argggghhhhhhh !! You didn't bring enough items!! You need:";
+			mes "^3355FF1 pair of Geek Glasses, 50,000 Zeny and 100 Steel^000000.";
+			emotion e_an;
+			close;
+
+	M_End:
+		mes "[Marius]";
+		mes "Hey you! You DARE IGNORE ME!! I am MARIUS the alchemist of ALCHEMISTS!!!!!";
+		emotion e_omg;
+		close;
+}
diff --git a/npc/quests/quests_niflheim.txt b/npc/quests/quests_niflheim.txt
index 97074a709..fccb58e66 100644
--- a/npc/quests/quests_niflheim.txt
+++ b/npc/quests/quests_niflheim.txt
@@ -1,300 +1,300 @@
-//===== eAthena Script ======================================= 

-//= Quest NPCs related to Niflheim

-//===== By: ================================================== 

-//= The eAthena Dev Team

-//===== Current Version: ===================================== 

-//= 1.1

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//= Book of Devil		(MISC_QUEST | 256)

-//= Piano Key Ouest		(MISC_QUEST | 32)

-//===== Additional Comments: ================================= 

-//= 1.0 Initial release, moved Book of Devil and Piano quest

-//=	from npc/cities/niflheim.txt [Evera]

-//= 1.1 Optimized Book of Devil quest. used bit-wise var,

-//=	Optimized Piano Quest - now uses 1 variable [Lupus]

-//============================================================ 

-

-//=============================================================

-//Quest for Book of Devil

-//=============================================================

-niflheim.gat,184,199,5	script	Little Girl#02	793,{

-	mes "[Sairin]";

-	if(MISC_QUEST & 256){

-		mes "Thanks again!";

-		close;

-	}

-	if(@niflheimlost == 2){

-		mes "You found him?";

-		mes "Oh thank you!";

-		mes "Please, take this as a token of my appreciation.";

-		getitem 642,1;//Items: Book of Devil,

-		set MISC_QUEST,MISC_QUEST | 256;

-		set @niflheimlost,0;

-		close;

-	}

-	if(@niflheimlost == 1){

-M_YES:

-		set @niflheimlost,1;

-		mes "Please find him and tell him where I am! I saw him last in Niflheim Field, the first one...";

-		close;

-	}

-	mes "Sir, will you please help me?";

-	if(BaseJob==Job_Novice){

-		mes "Oh... you are lost, too...";

-		close;

-	}

-	next;

-	menu "Yes",-, "No",M_NO;

-

-	mes "[Sairin]";

-	mes "My friend and I went for a hike and ended up wandering into a strange field.";

-	next;

-	mes "[Sairin]";

-	mes "Suddenly, I found a doll. I picked it up, and it turned into a ghost!";

-	next;

-	mes "[Sairin]";

-	mes "I screamed and ran as fast as I could. When I stopped running, I ended up in this strange town..";

-	next;

-	mes "[Sairin]";

-	mes "No one here will help me, and there are ghosts everywhere! Could you help me find my friend?";

-	next;

-	menu "Sure",M_YES, "No",M_NO;

-M_NO:

-	close;

-}

-

-nif_fild01.gat,213,268,5	script	Little Boy	797,{

-	if(MISC_QUEST & 256){

-L_DONE:

-		set @niflheimlost,2;

-		mes "[Marius]";

-		mes "Thank you for helping us!";

-		close;

-	}

-	if(@niflheimlost == 2) goto L_PART2;

-	if(@niflheimlost == 1){

-		mes "[Marius]";

-		mes "Who are you?";

-		mes "...";

-		mes "You found Sairin?";

-		mes "She ran to Niflheim?";

-		next;

-L_PART2:

-		mes "[Marius]";

-		mes "Could you tell her that I am on my way?";

-		mes "I am a little slow, and its very important that she knows.";

-		next;

-		menu "Yes",L_DONE, "No",-;

-		close;	

-	}

-	mes "[Marius]";

-	mes "Sairin... where are you?";

-	close;

-}

-

-//=============================================================

-//Piano Quest

-//=============================================================

-niflheim.gat,224,243,3	script	Alager	795,{

-	mes "[Alager]";

-	mes "Muahaha, I love to eat meat...";

-	mes "You look... delicious!";

-	next;

-	mes "[Alager]";

-	mes "I'm going to eat you...";

-	next;

-	mes "-Chomp bite slurp-";

-	if(nif_piano&1 || (MISC_QUEST & 32)) goto L_end;

-	percentheal -60,0;

-	next;

-	mes "[Alager]";

-	mes "Ahhh, it's been some time since I had such delicious meat!";

-	// 50% made up, not the slightest idea how to translate these ^^;

-	mes "as an ex-barbeque chef, my favourite meat";

-	mes "would be like preparing beef fillet,";

-	mes "crossed and grilled to perfection";

-	mes "that would be really delicious... ";

-	next;

-	mes "[Alager]";

-	mes "Ah, let me thank you with this,";

-	mes "I found it on the ground, hoho~";

-	getitem 7184,1;//Items: Piano Key,

-	set nif_piano, nif_piano|1;

-	close;

-L_end:

-	percentheal -30,0;

- 	close;

-}

-

-nif_in.gat,105,81,3	script	Crayu	794,{

-	mes "[Crayu]";

-	mes "Ah, there was this poem...";

-	mes "in which author and time of writing was unknown,";

-	mes "and has been circulating since long ago...";

-	next;

-	mes "[Crayu]";

-	mes "^FF0000When the sun sets in the western hills,^000000";

-	mes "^FF0000Where points the velvet gloom of dawn,^000000";

-	mes "^FF0000The beautiful melody surrounding thy soul,^000000";

-	mes "^FF0000Is the key from Lord Death's wrath.^000000";

-	next;

-	mes "[Crayu]";

-	if(nif_piano&2 || (MISC_QUEST & 32)){

-		mes "I wonder what does it mean...";

-		mes "If you read it carefully,";

-		mes "it seems to have a deep meaning,";

-		mes "as if there is a mysterious secret";

-		mes "hidden within these words...";

-		close;

-	}

-	set @nif_random,rand(1,4);

-	mes "Heh, let me give you a little exam!";

-	mes "Repeat line no. " + @nif_random + " of the poem";

-	mes "that you have just heard to me!";

-	next;

-	input @inputstr1$;

-	switch(@nif_random){

-	case 1:

-		set @str1$,"When the sun sets in the western hills,";

-		break;

-	case 2:

-		set @str1$,"Where points the velvet gloom of dawn,";

-		break;

-	case 3:

-		set @str1$,"The beautiful melody surrounding thy soul,";

-		break;

-	case 4:

-		set @str1$,"Is the key from Lord Death's wrath.";

-		break;

-	}

-	mes "[Crayu]";

-	if(@inputstr1$ == @str1$){

-		mes "Hoho... I see you have paid attention!";

-		mes "I am Grey, a wandering poet of yore,";

-		mes "you are the best audience I have had so far,";

-		mes "here, take this as a reward.";

-		getitem 7184,1;//Items: Piano Key,

-		set nif_piano, nif_piano|2;

-		next;

-		mes "[Crayu]";

-		mes "I hope you will treat other poets";

-		mes "as well as you treated me, farewell.";

-		close;

-	}

-	mes "Aih... If you had paid more attention,";

-	mes "you would have known the correct answer!";

-	mes "Come back for the challenge again,";

-	mes "when you have thought over it!";

-	close;

-}

-

-nif_in.gat,31,20,3	script	Kurtz	794,{

-	mes "[Kurtz]";

-	mes "Business nowadays is really bad...";

-	mes "Back when I used to be alive,";

-	mes "my business was this bad too~!";

-	if(nif_piano&4 || (MISC_QUEST & 32)) close;

-	next;

-	mes "[Kurtz]";

-	mes "Hey! You there! Dump this for me";

-	mes "on the way out will you!";

-	getitem 7184,1;//Items: Piano Key,

-	set nif_piano, nif_piano|4;

-	next;

-	mes "[Kurtz]";

-	mes "Why is business so bad lately...";

-	mes "(mumble mumble)";

-	close;

-}

-

-niflheim.gat,169,71,5	script	#1	111,2,2{

-	if(MISC_QUEST & 32 || nif_piano&8) end;

-

-	mes "- In the nearby tombs -";

-	mes "- you see something -";

-	mes "- half buried in the ground -";

-	mes "- What is it? -";

-	mes "- Looks like it broke off something -";

-	next;

-	mes "- Pick it up? -";

-	menu "Yes",-,"No",L_end;

-	getitem 7184,1;//Items: Piano Key,

-	set nif_piano, nif_piano|8;

-L_end:

-	close;

-}

-

-niflheim.gat,208,103,5	script	#2	111,2,2{

-	if(MISC_QUEST & 32 || nif_piano&32) end;

-	if(nif_piano&16){

-		mes "- In the hole you have dug -";

-		mes "- there is something else -";

-		mes "- buried deep in the ground -";

-		mes "- Looks like its another fragment -";

-		next;

-		mes "- Pick it up? -";

-		menu "Yes",-,"No",L_end;

-		getitem 7184,1;//Items: Piano Key,

-		set nif_piano, nif_piano|32;

-	L_end:

-		close;

-	}

-	mes "- In the nearby tombs -";

-	mes "- you see something -";

-	mes "- half buried in the ground -";

-	mes "- What is it? -";

-	mes "- Looks like it broke off something -";

-	next;

-	mes "- Pick it up? -";

-	menu "Yes",-,"No",L_end;

-	getitem 7184,1;//Items: Piano Key,

-	set nif_piano, nif_piano|16;

-	close;

-}

-

-nif_in.gat,115,181,5	script	#4	111,3,3{

-	mes "- You see a huge old piano -";

-	if((MISC_QUEST & 32)==0) mes "- with a few keys missing  -";

-	if(MISC_QUEST & 32) mes "- with one key missing -";

-	if(MISC_QUEST & 32 || countitem(7184) < 6) close;

-

-	delitem 7184,countitem(7184);//Items: Piano Key,

-	set MISC_QUEST,MISC_QUEST | 32;

-	set nif_piano, 0;

-	mes "- You slide the 6 piano keys one -";

-	mes "- by one into the missing slots  -";

-	mes "- on the piano, but you realize  -";

-	mes "- the left-most side seems to be -";

-	mes "- missing one more key. -";

-	close;

-}

-

-nif_in.gat,118,151,5	script	#5	111,3,3{

-	if((MISC_QUEST & 32)==0) end;

-	mes "- The very moment the long shadow -";

-	mes "- of your body falls on the piano -";

-	next;

-	mes "- You suddenly seem to feel lighter -";

-	mes "- and your vision starts to blur... -";

-	next;

-	warp "nif_in.gat",179,163;

-	close;

-}

-

-nif_in.gat,188,168,3	script	Witch	792,{

-	mes "[Kirkena]";

-	mes "Hmm?... Aren't you a living human?";

-	mes "Must have took you some effort";

-	mes "to get to this place...";

-	mes "Whatever reason though, this is not a place";

-	mes "the living shall belong...";

-	next;

-	mes "[Kirkena]";

-	mes "I shall use my powers to send you back";

-	mes "but you should not return in the future.";

-	close2;

-	warp "umbala.gat",138,208;

-	end;

+//===== eAthena Script ======================================= 
+//= Quest NPCs related to Niflheim
+//===== By: ================================================== 
+//= The eAthena Dev Team
+//===== Current Version: ===================================== 
+//= 1.1
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//= Book of Devil		(MISC_QUEST | 256)
+//= Piano Key Ouest		(MISC_QUEST | 32)
+//===== Additional Comments: ================================= 
+//= 1.0 Initial release, moved Book of Devil and Piano quest
+//=	from npc/cities/niflheim.txt [Evera]
+//= 1.1 Optimized Book of Devil quest. used bit-wise var,
+//=	Optimized Piano Quest - now uses 1 variable [Lupus]
+//============================================================ 
+
+//=============================================================
+//Quest for Book of Devil
+//=============================================================
+niflheim.gat,184,199,5	script	Little Girl#02	793,{
+	mes "[Sairin]";
+	if(MISC_QUEST & 256){
+		mes "Thanks again!";
+		close;
+	}
+	if(@niflheimlost == 2){
+		mes "You found him?";
+		mes "Oh thank you!";
+		mes "Please, take this as a token of my appreciation.";
+		getitem 642,1;//Items: Book of Devil,
+		set MISC_QUEST,MISC_QUEST | 256;
+		set @niflheimlost,0;
+		close;
+	}
+	if(@niflheimlost == 1){
+M_YES:
+		set @niflheimlost,1;
+		mes "Please find him and tell him where I am! I saw him last in Niflheim Field, the first one...";
+		close;
+	}
+	mes "Sir, will you please help me?";
+	if(BaseJob==Job_Novice){
+		mes "Oh... you are lost, too...";
+		close;
+	}
+	next;
+	menu "Yes",-, "No",M_NO;
+
+	mes "[Sairin]";
+	mes "My friend and I went for a hike and ended up wandering into a strange field.";
+	next;
+	mes "[Sairin]";
+	mes "Suddenly, I found a doll. I picked it up, and it turned into a ghost!";
+	next;
+	mes "[Sairin]";
+	mes "I screamed and ran as fast as I could. When I stopped running, I ended up in this strange town..";
+	next;
+	mes "[Sairin]";
+	mes "No one here will help me, and there are ghosts everywhere! Could you help me find my friend?";
+	next;
+	menu "Sure",M_YES, "No",M_NO;
+M_NO:
+	close;
+}
+
+nif_fild01.gat,213,268,5	script	Little Boy	797,{
+	if(MISC_QUEST & 256){
+L_DONE:
+		set @niflheimlost,2;
+		mes "[Marius]";
+		mes "Thank you for helping us!";
+		close;
+	}
+	if(@niflheimlost == 2) goto L_PART2;
+	if(@niflheimlost == 1){
+		mes "[Marius]";
+		mes "Who are you?";
+		mes "...";
+		mes "You found Sairin?";
+		mes "She ran to Niflheim?";
+		next;
+L_PART2:
+		mes "[Marius]";
+		mes "Could you tell her that I am on my way?";
+		mes "I am a little slow, and its very important that she knows.";
+		next;
+		menu "Yes",L_DONE, "No",-;
+		close;	
+	}
+	mes "[Marius]";
+	mes "Sairin... where are you?";
+	close;
+}
+
+//=============================================================
+//Piano Quest
+//=============================================================
+niflheim.gat,224,243,3	script	Alager	795,{
+	mes "[Alager]";
+	mes "Muahaha, I love to eat meat...";
+	mes "You look... delicious!";
+	next;
+	mes "[Alager]";
+	mes "I'm going to eat you...";
+	next;
+	mes "-Chomp bite slurp-";
+	if(nif_piano&1 || (MISC_QUEST & 32)) goto L_end;
+	percentheal -60,0;
+	next;
+	mes "[Alager]";
+	mes "Ahhh, it's been some time since I had such delicious meat!";
+	// 50% made up, not the slightest idea how to translate these ^^;
+	mes "as an ex-barbeque chef, my favourite meat";
+	mes "would be like preparing beef fillet,";
+	mes "crossed and grilled to perfection";
+	mes "that would be really delicious... ";
+	next;
+	mes "[Alager]";
+	mes "Ah, let me thank you with this,";
+	mes "I found it on the ground, hoho~";
+	getitem 7184,1;//Items: Piano Key,
+	set nif_piano, nif_piano|1;
+	close;
+L_end:
+	percentheal -30,0;
+ 	close;
+}
+
+nif_in.gat,105,81,3	script	Crayu	794,{
+	mes "[Crayu]";
+	mes "Ah, there was this poem...";
+	mes "in which author and time of writing was unknown,";
+	mes "and has been circulating since long ago...";
+	next;
+	mes "[Crayu]";
+	mes "^FF0000When the sun sets in the western hills,^000000";
+	mes "^FF0000Where points the velvet gloom of dawn,^000000";
+	mes "^FF0000The beautiful melody surrounding thy soul,^000000";
+	mes "^FF0000Is the key from Lord Death's wrath.^000000";
+	next;
+	mes "[Crayu]";
+	if(nif_piano&2 || (MISC_QUEST & 32)){
+		mes "I wonder what does it mean...";
+		mes "If you read it carefully,";
+		mes "it seems to have a deep meaning,";
+		mes "as if there is a mysterious secret";
+		mes "hidden within these words...";
+		close;
+	}
+	set @nif_random,rand(1,4);
+	mes "Heh, let me give you a little exam!";
+	mes "Repeat line no. " + @nif_random + " of the poem";
+	mes "that you have just heard to me!";
+	next;
+	input @inputstr1$;
+	switch(@nif_random){
+	case 1:
+		set @str1$,"When the sun sets in the western hills,";
+		break;
+	case 2:
+		set @str1$,"Where points the velvet gloom of dawn,";
+		break;
+	case 3:
+		set @str1$,"The beautiful melody surrounding thy soul,";
+		break;
+	case 4:
+		set @str1$,"Is the key from Lord Death's wrath.";
+		break;
+	}
+	mes "[Crayu]";
+	if(@inputstr1$ == @str1$){
+		mes "Hoho... I see you have paid attention!";
+		mes "I am Grey, a wandering poet of yore,";
+		mes "you are the best audience I have had so far,";
+		mes "here, take this as a reward.";
+		getitem 7184,1;//Items: Piano Key,
+		set nif_piano, nif_piano|2;
+		next;
+		mes "[Crayu]";
+		mes "I hope you will treat other poets";
+		mes "as well as you treated me, farewell.";
+		close;
+	}
+	mes "Aih... If you had paid more attention,";
+	mes "you would have known the correct answer!";
+	mes "Come back for the challenge again,";
+	mes "when you have thought over it!";
+	close;
+}
+
+nif_in.gat,31,20,3	script	Kurtz	794,{
+	mes "[Kurtz]";
+	mes "Business nowadays is really bad...";
+	mes "Back when I used to be alive,";
+	mes "my business was this bad too~!";
+	if(nif_piano&4 || (MISC_QUEST & 32)) close;
+	next;
+	mes "[Kurtz]";
+	mes "Hey! You there! Dump this for me";
+	mes "on the way out will you!";
+	getitem 7184,1;//Items: Piano Key,
+	set nif_piano, nif_piano|4;
+	next;
+	mes "[Kurtz]";
+	mes "Why is business so bad lately...";
+	mes "(mumble mumble)";
+	close;
+}
+
+niflheim.gat,169,71,5	script	#1	111,2,2{
+	if(MISC_QUEST & 32 || nif_piano&8) end;
+
+	mes "- In the nearby tombs -";
+	mes "- you see something -";
+	mes "- half buried in the ground -";
+	mes "- What is it? -";
+	mes "- Looks like it broke off something -";
+	next;
+	mes "- Pick it up? -";
+	menu "Yes",-,"No",L_end;
+	getitem 7184,1;//Items: Piano Key,
+	set nif_piano, nif_piano|8;
+L_end:
+	close;
+}
+
+niflheim.gat,208,103,5	script	#2	111,2,2{
+	if(MISC_QUEST & 32 || nif_piano&32) end;
+	if(nif_piano&16){
+		mes "- In the hole you have dug -";
+		mes "- there is something else -";
+		mes "- buried deep in the ground -";
+		mes "- Looks like its another fragment -";
+		next;
+		mes "- Pick it up? -";
+		menu "Yes",-,"No",L_end;
+		getitem 7184,1;//Items: Piano Key,
+		set nif_piano, nif_piano|32;
+	L_end:
+		close;
+	}
+	mes "- In the nearby tombs -";
+	mes "- you see something -";
+	mes "- half buried in the ground -";
+	mes "- What is it? -";
+	mes "- Looks like it broke off something -";
+	next;
+	mes "- Pick it up? -";
+	menu "Yes",-,"No",L_end;
+	getitem 7184,1;//Items: Piano Key,
+	set nif_piano, nif_piano|16;
+	close;
+}
+
+nif_in.gat,115,181,5	script	#4	111,3,3{
+	mes "- You see a huge old piano -";
+	if((MISC_QUEST & 32)==0) mes "- with a few keys missing  -";
+	if(MISC_QUEST & 32) mes "- with one key missing -";
+	if(MISC_QUEST & 32 || countitem(7184) < 6) close;
+
+	delitem 7184,countitem(7184);//Items: Piano Key,
+	set MISC_QUEST,MISC_QUEST | 32;
+	set nif_piano, 0;
+	mes "- You slide the 6 piano keys one -";
+	mes "- by one into the missing slots  -";
+	mes "- on the piano, but you realize  -";
+	mes "- the left-most side seems to be -";
+	mes "- missing one more key. -";
+	close;
+}
+
+nif_in.gat,118,151,5	script	#5	111,3,3{
+	if((MISC_QUEST & 32)==0) end;
+	mes "- The very moment the long shadow -";
+	mes "- of your body falls on the piano -";
+	next;
+	mes "- You suddenly seem to feel lighter -";
+	mes "- and your vision starts to blur... -";
+	next;
+	warp "nif_in.gat",179,163;
+	close;
+}
+
+nif_in.gat,188,168,3	script	Witch	792,{
+	mes "[Kirkena]";
+	mes "Hmm?... Aren't you a living human?";
+	mes "Must have took you some effort";
+	mes "to get to this place...";
+	mes "Whatever reason though, this is not a place";
+	mes "the living shall belong...";
+	next;
+	mes "[Kirkena]";
+	mes "I shall use my powers to send you back";
+	mes "but you should not return in the future.";
+	close2;
+	warp "umbala.gat",138,208;
+	end;
 }
\ No newline at end of file
diff --git a/npc/quests/quests_payon.txt b/npc/quests/quests_payon.txt
index c7e9cb89a..d17dc9acd 100644
--- a/npc/quests/quests_payon.txt
+++ b/npc/quests/quests_payon.txt
@@ -1,293 +1,293 @@
-//===== eAthena Script ======================================= 

-//= Quest NPCs related to Payon

-//===== By: ================================================== 

-//= kobra_k88

-//===== Current Version: ===================================== 

-//= 1.4

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//= Pretend Murder, Ear Muffs, Oxygen, Derivuchi Cap, Helm of Angel Quests.

-//===== Additional Comments: ================================= 

-//= Fully working

-//= 1.1 Helm of Angel bug fixed [Lupus]

-//= 1.2 Fixed skirt of virgin [Lupus]

-//= 1.3 Fixed exploits [Lupus]

-//= 1.4 Removed Duplicates [Silent]

-//============================================================ 

-

-

-

-//==========================================================================================//

-//				Pretend Murdered quest

-//==========================================================================================//

-payon.gat,154,170,4	script	Granny	78,{

-	mes "[Granny]";

-	if(countitem(1049) >= 4) goto L_Get;

-

-	mes "Oh deary me.  What to do... what to do........  You see I want to nitt some special clothes for my family but I don't have the right cloth to do so.";

-	next;

-	mes "[Granny]";

-	mes ".....sigggghhhhhh........";

-	next;

-	mes "[Granny]";

-	mes "Why what's this? Mushrooms? Oh yes I remember now, I pick these mushrooms on the Payon Mountain side.";

-	mes "Ho ho, I have such a hard time remembering things now.";

-	next;

-	mes "[Granny]";

-	mes "What was I saying before? Oh yes! I need some special cloth to make clothes for my family.";

-	mes "If you happen to come across some ^5555FF'Skirt of Virgin'^000000, please let me know.";

-	emotion e_hmm;

-	next;

-	mes "[Granny]";

-	mes "I need ^5555FF'4 Skirt of Virgin'^000000 to make the clothes.  I will be very greatfull if you could bring me some.";

-	close;

-

-L_Get:

-	mes "Oh! You have 4 Skirt of Virgin.  Would you be willing to give them to me dear?";

-	next;

-	menu "Why of course granny",-,"Heck no ya old bag!",M_No;

-

-		if(countitem(1049) < 4) goto M_No;

-		mes "[Granny]";

-		mes "Bless your kind heart.  Now I can make some special clothes for my family.  Let me give you a reward for being so genrous dear.";

-		emotion e_lv2;

-		next;

-		getitem 2293,1;

-		delitem 1049,4;

-		mes "[Granny]";

-		mes "There you are.  It's something I kept from my younger days as an actress.  I was quite fetching and very popular back then.";

-		mes "I've kept it as a reminder of my days as an actress, but with my memory as bad as it is, it's really of no use to me anymore.";

-		next;

-		mes "[Granny]";

-		mes "I'm sure you'll have fun using it at parties."; 

-		close;

-		

-	M_No:

-		mes "[Granny]";

-		mes "Well I never!!! Kids these days just have no respect or compasion for their elders!";

-		emotion e_pif;

-		close;

-

-}

-

-

-//========================================================================================//

-//					Ear Muffs Quest

-//========================================================================================//

-payon_in01.gat,18,10,4	script	Mystic Lady	75,{

-	mes "[Mystic Lady]";

-	mes "Hi there.";

-	next;

-	menu "Hello.",-,"Please make me a pair of Ear Muffs.",M_Muffs, "End",M_End;

-

-		mes "[Mystic Lady]";

-		mes "My family and I recently came to Payon.";

-		mes "Where we came from the weather was very cold so we started a business hand making a special type of ^5555FF'Ear Muffs'^000000";

-		next;

-		mes "[Mystic Lady]";

-		mes "I have tried to continue the family business here in Payon but it has proven to be difficult because of the warm whether.";

-		next;

-		mes "[Mystic Lady]";

-		mes "Although the 'Ear Muffs' aren't very usefull here, if you plan on going somewhere that's cold our 'Ear Muffs' are a must have.";

-		next;

-		mes "[Mystic Lady]";

-		mes "All I need are:";

-		mes "^5555FF1 Cursed Ruby,";

-		mes "1 Headset,";

-		mes "200 Feathers,";

-		mes "and a 5,000 zeny fee^000000 for my labor.";

-		next;

-		mes "[Mystic Lady]";

-		mes "With those items I can make you a pair of 'Ear Muffs'.  Believe me, they are of the highest quality and look good on just about anybody!";

-		close;

-	

-	M_Muffs:

-		if(countitem(724)<1 || countitem(5001)<1 || countitem(949)<200 || zeny<5000) goto sL_NotEnuf;

-		delitem 724,1;

-		delitem 5001,1;

-		delitem 949,200;

-		set Zeny, Zeny-5000;

-		mes "[Mystic Lady]";

-		mes "Oh, I see that you have brought all of the required items.  Just a moment please...";

-		next;

-		mes "[Mystic Lady]";

-		mes "... this goes here... that goes there...... some glue here... a couple stitches over there..........";

-		next;

-		getitem 2283,1;

-		mes "[Mystic Lady]";

-		mes "Ah, there you are! One pair of my familys' specialty Ear Muffs.  Enjoy!";

-		close;

-

-		sL_NotEnuf:

-			mes "[Mystic Lady]";

-			mes "I'm sorry but you don't have the required items for me to make you a pair of my familys' specialty Ear Muffs.";

-			close;

-	M_End:

-		close;

-

-}

-

-

-//========================================================================================//

-//					Oxygen Mask Quest

-//========================================================================================//

-payon_in02.gat,25,71,4	script	Young Man#11	86,{

-	mes "[Young Man]";

-	if(countitem(701) >= 5) goto L_GotOra;

-	mes "Blahhhhhh! I... I... I JUST CAN'T take it anymore!! You little stinky, filthy, BASTARDS!!!";

-	emotion e_an;

-	next;

-	menu "Continue.",M_Cont, "End Conversation.",M_End;

-	

-	M_Cont:

-		mes "[Young Man]";

-		mes "~Sigh~ I've had a rough life.  You see, both my parents passed away when I was a kid, so I had to work to support myself at a young age.";

-		next;

-		mes "[Young Man]";

-		mes "It sure was rough.  But after 10 years of hard work I was able to save up and finally buy myself a home!";

-		next;

-		mes "[Young Man]";

-		mes "Unfortunately I didn't have that much money, so I couldn't buy the home I really wanted.";

-		mes "Instead, I found this house..... It was big and cheap.... so I bought without really thinking my decision through.....";

-		next;

-		mes "[Young Man]";

-		mes "Jeez was that a mistake...... The house turned out to be a HAVEN for THIEF BUGS!!!";

-		emotion e_omg;

-		next;

-		mes "[Young Man]";

-		mes "I tried EVERYTHING to get rid of them! I sprayed them, I smashed them, I lured them out with food.........";

-		mes "Finally as a last resort.... I even tried to burn the house down!!";

-		next;

-		mes "[Young Man]";

-		mes "Grrr! What will it take to get rid of these vile creatures???";

-		emotion e_pif;

-		next;

-		mes "[Young Man]";

-		mes "I've heard there is something called ^3355FF'Ora Ora'^000000, that people in other countries use to fight bugs.....";

-		mes "But will it work for my situation?";

-		next;

-		mes "[Young Man]";

-		mes "I'm willing to give anything a try at this point.  I don't have much money so I can only afford ^5555FF'5 Ora Oras'^000000.";

-		mes "If you happen to come across some 'Ora Ora' please let me know.";

-		close;

-

-	M_End:

-		mes "[Young Man]";

-		mes "I'm just so tired of fighting this never ending battle against these bugs...... those dirty scumbags!!";

-		emotion e_pif;

-		close;

-

-L_GotOra:

-		mes "ArrrGgghhh!! No!... It can't be!..... I think I'm going mad... they're starting to look so cute... ArrrGgghhh!!... Nooooooo!!";

-		emotion e_omg;

-	M_Menu:

-		next;

-		menu "Continue",M_Cont, "Show Ora Ora",-, "Give Ora Ora",M_Give, "Cancel",M_End2;

-

-		mes "[Young Man]";

-		mes "Oooooohhhh..... is.. is this... is this... Ora Ora...??? If you give it to me I'll give you my prized treasure in return!";

-		mes "What do you say?? Is it a deal?";

-		goto M_Menu;

-

-	M_Give:

-		if(countitem(701) < 5) goto L_Cheater;

-		delitem 701,5;

-		mes "[Young Man]";

-		mes "Muhahahahah!!! Finally, I have it.... Ora Ora! Stupid and distgusting Thief Bugs.... you'll pay for invading MY HOME!!!";

-		emotion e_gg;

-		next;

-		mes "[Young Man]";

-		mes "..... Eh em... sorry.  I was a little outa control there.... Ah, let me give you my valuable treasure......";	

-		emotion e_swt;

-		next;

-		getitem 5004,1;

-		mes "[Young Man]";

-		mes "By wearing this over your mouth, the air you breathe will be filltered so that you can breathe clean air.";

-		mes "I picked it up while I was a Sailor out at sea.  I really have no need for it.";

-		next;

-		mes "[Young Man]";

-		mes "Hehehehe!! I can't wait to use this Ora Ora!!!";

-		close;

-

-	L_Cheater:

-		mes "Oh... Where is it?!";

-		next;

-

-	M_End2:

-		mes "[Young Man]";

-		mes "What if I CAN'T get rid of these thief bugs???... I guess the only other thing I could do is fall in love with them...... heh... heh... heh....";

-		emotion e_swt;

-		close;

-

-}

-

-

-//========================================================================================//

-//			Derivuchi Cap(Hat of Petite Diablo), Helm of Angel

-//========================================================================================//

-payon_in01.gat,56,12,4	script	Young Man#12	89,{

-	mes "[Young Man]";

-	mes "What is it?............";

-	next;

-	menu "Can you make me a special item?",-, "Nothing.",M_End;

-

-		mes "[Young Man]";

-		mes "I see.... so you know about me huh?.... Ok, tell me what you want.";

-		next;

-		menu "-Helm of Angel",-, "-Deviruchi Hat",sM_Devir, "-I'll come back later.",M_End;

-

-			mes "[Young Man]";

-			mes "For the Helm of Angel I will need:";

-			mes "- ^5555FF1 Helm (slotted)^000000.";

-			mes "- ^5555FF1 Angel Wing^000000.";

-			mes "- ^5555FF5 Fang of Garm^000000.";

-			set @HAT, 1;

-			next;

-			goto sL_GetHat;

-		sM_Devir:

-			mes "[Young Man]";

-			mes "For the Deviruchi Hat I will need:";

-			mes "- ^5555FF600 Little Evil Horn^000000.";

-			mes "- ^5555FF40 Talon of Griffon^000000.";

-			set @HAT, 2;

-

-			sL_GetHat:

-				mes "[Young Man]";

-				mes "Wait a moment!  Be carefull about what items you give me.";

-				mes "I do not distinguish between equipment that has been forged or has cards attached to them.";

-				mes "If you don't want to loose a precious card or piece of equipment, make sure you don't have it equiped.";

-				next;

-				mes "[Young Man]";

-				mes "Do you have all of the items needed?";

-				menu "-Give him the items.",-, "Nevermind.",M_End;

-

-				if(@HAT == 2) goto ssL_Devir;

-

-					if(countitem(2229)<1 || countitem(2254)<1 || countitem(7036)<5) goto ssL_NotEnuf;

-					delitem 2229, 1;

-					delitem 2254, 1;

-					delitem 7036, 5;

-					mes "[Young Man]";

-					mes "Here is your Helm of Angel.";

-					getitem 5025, 1;

-					close;

-				ssL_Devir:

-					if(countitem(1038)<600 || countitem(7048)<40) goto ssL_NotEnuf;

-					delitem 1038, 600;

-					delitem 7048, 40;

-					mes "[Young Man]";

-					mes "Here is your Deviruchi Hat.";

-					getitem 5038, 1;

-					close;

-				ssL_NotEnuf:

-					mes "[Young Man]";

-					mes "You don't have enough items for me to make what you want.";

-					close;

-

-	M_End:

-		mes "[Young Man]";

-		mes "Fine then.....";

-		close;

-

-}

+//===== eAthena Script ======================================= 
+//= Quest NPCs related to Payon
+//===== By: ================================================== 
+//= kobra_k88
+//===== Current Version: ===================================== 
+//= 1.4
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//= Pretend Murder, Ear Muffs, Oxygen, Derivuchi Cap, Helm of Angel Quests.
+//===== Additional Comments: ================================= 
+//= Fully working
+//= 1.1 Helm of Angel bug fixed [Lupus]
+//= 1.2 Fixed skirt of virgin [Lupus]
+//= 1.3 Fixed exploits [Lupus]
+//= 1.4 Removed Duplicates [Silent]
+//============================================================ 
+
+
+
+//==========================================================================================//
+//				Pretend Murdered quest
+//==========================================================================================//
+payon.gat,154,170,4	script	Granny	78,{
+	mes "[Granny]";
+	if(countitem(1049) >= 4) goto L_Get;
+
+	mes "Oh deary me.  What to do... what to do........  You see I want to nitt some special clothes for my family but I don't have the right cloth to do so.";
+	next;
+	mes "[Granny]";
+	mes ".....sigggghhhhhh........";
+	next;
+	mes "[Granny]";
+	mes "Why what's this? Mushrooms? Oh yes I remember now, I pick these mushrooms on the Payon Mountain side.";
+	mes "Ho ho, I have such a hard time remembering things now.";
+	next;
+	mes "[Granny]";
+	mes "What was I saying before? Oh yes! I need some special cloth to make clothes for my family.";
+	mes "If you happen to come across some ^5555FF'Skirt of Virgin'^000000, please let me know.";
+	emotion e_hmm;
+	next;
+	mes "[Granny]";
+	mes "I need ^5555FF'4 Skirt of Virgin'^000000 to make the clothes.  I will be very greatfull if you could bring me some.";
+	close;
+
+L_Get:
+	mes "Oh! You have 4 Skirt of Virgin.  Would you be willing to give them to me dear?";
+	next;
+	menu "Why of course granny",-,"Heck no ya old bag!",M_No;
+
+		if(countitem(1049) < 4) goto M_No;
+		mes "[Granny]";
+		mes "Bless your kind heart.  Now I can make some special clothes for my family.  Let me give you a reward for being so genrous dear.";
+		emotion e_lv2;
+		next;
+		getitem 2293,1;
+		delitem 1049,4;
+		mes "[Granny]";
+		mes "There you are.  It's something I kept from my younger days as an actress.  I was quite fetching and very popular back then.";
+		mes "I've kept it as a reminder of my days as an actress, but with my memory as bad as it is, it's really of no use to me anymore.";
+		next;
+		mes "[Granny]";
+		mes "I'm sure you'll have fun using it at parties."; 
+		close;
+		
+	M_No:
+		mes "[Granny]";
+		mes "Well I never!!! Kids these days just have no respect or compasion for their elders!";
+		emotion e_pif;
+		close;
+
+}
+
+
+//========================================================================================//
+//					Ear Muffs Quest
+//========================================================================================//
+payon_in01.gat,18,10,4	script	Mystic Lady	75,{
+	mes "[Mystic Lady]";
+	mes "Hi there.";
+	next;
+	menu "Hello.",-,"Please make me a pair of Ear Muffs.",M_Muffs, "End",M_End;
+
+		mes "[Mystic Lady]";
+		mes "My family and I recently came to Payon.";
+		mes "Where we came from the weather was very cold so we started a business hand making a special type of ^5555FF'Ear Muffs'^000000";
+		next;
+		mes "[Mystic Lady]";
+		mes "I have tried to continue the family business here in Payon but it has proven to be difficult because of the warm whether.";
+		next;
+		mes "[Mystic Lady]";
+		mes "Although the 'Ear Muffs' aren't very usefull here, if you plan on going somewhere that's cold our 'Ear Muffs' are a must have.";
+		next;
+		mes "[Mystic Lady]";
+		mes "All I need are:";
+		mes "^5555FF1 Cursed Ruby,";
+		mes "1 Headset,";
+		mes "200 Feathers,";
+		mes "and a 5,000 zeny fee^000000 for my labor.";
+		next;
+		mes "[Mystic Lady]";
+		mes "With those items I can make you a pair of 'Ear Muffs'.  Believe me, they are of the highest quality and look good on just about anybody!";
+		close;
+	
+	M_Muffs:
+		if(countitem(724)<1 || countitem(5001)<1 || countitem(949)<200 || zeny<5000) goto sL_NotEnuf;
+		delitem 724,1;
+		delitem 5001,1;
+		delitem 949,200;
+		set Zeny, Zeny-5000;
+		mes "[Mystic Lady]";
+		mes "Oh, I see that you have brought all of the required items.  Just a moment please...";
+		next;
+		mes "[Mystic Lady]";
+		mes "... this goes here... that goes there...... some glue here... a couple stitches over there..........";
+		next;
+		getitem 2283,1;
+		mes "[Mystic Lady]";
+		mes "Ah, there you are! One pair of my familys' specialty Ear Muffs.  Enjoy!";
+		close;
+
+		sL_NotEnuf:
+			mes "[Mystic Lady]";
+			mes "I'm sorry but you don't have the required items for me to make you a pair of my familys' specialty Ear Muffs.";
+			close;
+	M_End:
+		close;
+
+}
+
+
+//========================================================================================//
+//					Oxygen Mask Quest
+//========================================================================================//
+payon_in02.gat,25,71,4	script	Young Man#11	86,{
+	mes "[Young Man]";
+	if(countitem(701) >= 5) goto L_GotOra;
+	mes "Blahhhhhh! I... I... I JUST CAN'T take it anymore!! You little stinky, filthy, BASTARDS!!!";
+	emotion e_an;
+	next;
+	menu "Continue.",M_Cont, "End Conversation.",M_End;
+	
+	M_Cont:
+		mes "[Young Man]";
+		mes "~Sigh~ I've had a rough life.  You see, both my parents passed away when I was a kid, so I had to work to support myself at a young age.";
+		next;
+		mes "[Young Man]";
+		mes "It sure was rough.  But after 10 years of hard work I was able to save up and finally buy myself a home!";
+		next;
+		mes "[Young Man]";
+		mes "Unfortunately I didn't have that much money, so I couldn't buy the home I really wanted.";
+		mes "Instead, I found this house..... It was big and cheap.... so I bought without really thinking my decision through.....";
+		next;
+		mes "[Young Man]";
+		mes "Jeez was that a mistake...... The house turned out to be a HAVEN for THIEF BUGS!!!";
+		emotion e_omg;
+		next;
+		mes "[Young Man]";
+		mes "I tried EVERYTHING to get rid of them! I sprayed them, I smashed them, I lured them out with food.........";
+		mes "Finally as a last resort.... I even tried to burn the house down!!";
+		next;
+		mes "[Young Man]";
+		mes "Grrr! What will it take to get rid of these vile creatures???";
+		emotion e_pif;
+		next;
+		mes "[Young Man]";
+		mes "I've heard there is something called ^3355FF'Ora Ora'^000000, that people in other countries use to fight bugs.....";
+		mes "But will it work for my situation?";
+		next;
+		mes "[Young Man]";
+		mes "I'm willing to give anything a try at this point.  I don't have much money so I can only afford ^5555FF'5 Ora Oras'^000000.";
+		mes "If you happen to come across some 'Ora Ora' please let me know.";
+		close;
+
+	M_End:
+		mes "[Young Man]";
+		mes "I'm just so tired of fighting this never ending battle against these bugs...... those dirty scumbags!!";
+		emotion e_pif;
+		close;
+
+L_GotOra:
+		mes "ArrrGgghhh!! No!... It can't be!..... I think I'm going mad... they're starting to look so cute... ArrrGgghhh!!... Nooooooo!!";
+		emotion e_omg;
+	M_Menu:
+		next;
+		menu "Continue",M_Cont, "Show Ora Ora",-, "Give Ora Ora",M_Give, "Cancel",M_End2;
+
+		mes "[Young Man]";
+		mes "Oooooohhhh..... is.. is this... is this... Ora Ora...??? If you give it to me I'll give you my prized treasure in return!";
+		mes "What do you say?? Is it a deal?";
+		goto M_Menu;
+
+	M_Give:
+		if(countitem(701) < 5) goto L_Cheater;
+		delitem 701,5;
+		mes "[Young Man]";
+		mes "Muhahahahah!!! Finally, I have it.... Ora Ora! Stupid and distgusting Thief Bugs.... you'll pay for invading MY HOME!!!";
+		emotion e_gg;
+		next;
+		mes "[Young Man]";
+		mes "..... Eh em... sorry.  I was a little outa control there.... Ah, let me give you my valuable treasure......";	
+		emotion e_swt;
+		next;
+		getitem 5004,1;
+		mes "[Young Man]";
+		mes "By wearing this over your mouth, the air you breathe will be filltered so that you can breathe clean air.";
+		mes "I picked it up while I was a Sailor out at sea.  I really have no need for it.";
+		next;
+		mes "[Young Man]";
+		mes "Hehehehe!! I can't wait to use this Ora Ora!!!";
+		close;
+
+	L_Cheater:
+		mes "Oh... Where is it?!";
+		next;
+
+	M_End2:
+		mes "[Young Man]";
+		mes "What if I CAN'T get rid of these thief bugs???... I guess the only other thing I could do is fall in love with them...... heh... heh... heh....";
+		emotion e_swt;
+		close;
+
+}
+
+
+//========================================================================================//
+//			Derivuchi Cap(Hat of Petite Diablo), Helm of Angel
+//========================================================================================//
+payon_in01.gat,56,12,4	script	Young Man#12	89,{
+	mes "[Young Man]";
+	mes "What is it?............";
+	next;
+	menu "Can you make me a special item?",-, "Nothing.",M_End;
+
+		mes "[Young Man]";
+		mes "I see.... so you know about me huh?.... Ok, tell me what you want.";
+		next;
+		menu "-Helm of Angel",-, "-Deviruchi Hat",sM_Devir, "-I'll come back later.",M_End;
+
+			mes "[Young Man]";
+			mes "For the Helm of Angel I will need:";
+			mes "- ^5555FF1 Helm (slotted)^000000.";
+			mes "- ^5555FF1 Angel Wing^000000.";
+			mes "- ^5555FF5 Fang of Garm^000000.";
+			set @HAT, 1;
+			next;
+			goto sL_GetHat;
+		sM_Devir:
+			mes "[Young Man]";
+			mes "For the Deviruchi Hat I will need:";
+			mes "- ^5555FF600 Little Evil Horn^000000.";
+			mes "- ^5555FF40 Talon of Griffon^000000.";
+			set @HAT, 2;
+
+			sL_GetHat:
+				mes "[Young Man]";
+				mes "Wait a moment!  Be carefull about what items you give me.";
+				mes "I do not distinguish between equipment that has been forged or has cards attached to them.";
+				mes "If you don't want to loose a precious card or piece of equipment, make sure you don't have it equiped.";
+				next;
+				mes "[Young Man]";
+				mes "Do you have all of the items needed?";
+				menu "-Give him the items.",-, "Nevermind.",M_End;
+
+				if(@HAT == 2) goto ssL_Devir;
+
+					if(countitem(2229)<1 || countitem(2254)<1 || countitem(7036)<5) goto ssL_NotEnuf;
+					delitem 2229, 1;
+					delitem 2254, 1;
+					delitem 7036, 5;
+					mes "[Young Man]";
+					mes "Here is your Helm of Angel.";
+					getitem 5025, 1;
+					close;
+				ssL_Devir:
+					if(countitem(1038)<600 || countitem(7048)<40) goto ssL_NotEnuf;
+					delitem 1038, 600;
+					delitem 7048, 40;
+					mes "[Young Man]";
+					mes "Here is your Deviruchi Hat.";
+					getitem 5038, 1;
+					close;
+				ssL_NotEnuf:
+					mes "[Young Man]";
+					mes "You don't have enough items for me to make what you want.";
+					close;
+
+	M_End:
+		mes "[Young Man]";
+		mes "Fine then.....";
+		close;
+
+}
diff --git a/npc/quests/quests_prontera.txt b/npc/quests/quests_prontera.txt
index 92096a9f8..49afb1b62 100644
--- a/npc/quests/quests_prontera.txt
+++ b/npc/quests/quests_prontera.txt
@@ -1,177 +1,177 @@
-//===== eAthena Script ======================================= 

-//= Quest NPCs related to Prontera

-//===== By: ================================================== 

-//= kobra_k88

-//===== Current Version: ===================================== 

-//= 1.4

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//= Ph.D Hat Quest + Culvert

-//===== Additional Comments: ================================= 

-//= Fixed flower name Dreamy -> Illusion

-//= 1.2 Fixed exploit [Lupus]

-//= 1.3 Removed Duplicates [Silent]

-//= 1.4 Moved Culvert from cities/prontera.txt [Evera]

-//============================================================ 

-

-

-// Ph.D Hat Quest-------------------------------------------------------

-prt_in.gat,38,108,4	script	Teacher#01	53,{

-	if(countitem(710) >= 1 && countitem(703) >= 1 && countitem(704) >= 1 && countitem(708) >= 1) goto L_Start;//Items: Illusion Flower, Hinalle, Aloe, Ment,

-	mes "Don't you think.... ^4444FF'flowers'^000000 are pretty?";

-	next;

-	menu "Talk.",-, "End Conversation.",M_End;

-	

-		mes "[Teacher]";

-		mes "When I was young, I didn't play with friends like the other children.  Instead, I spent time studing by myself.";

-		next;

-		mes "[Teacher]";

-		mes "Sometimes I regret that decision.... but it doesn't really matter now.  Through hard work, I was able to finish school earlier than my classmates.";

-		next;

-		mes "[Teacher]";

-		mes "I was very lonely however..... when things got rough I had no one to talk to about my feelings.";

-		next;

-		mes "[Teacher]";

-		mes "Then one day, I found my best friend.";

-		next;

-		mes "[Teacher]";

-		mes "It was when I saw this pretty flower blooming in an abandoned garden.... I realised that it was just like me and in it, I found my best friend.";

-		next;

-		mes "[Teacher]";

-		mes "Even though, to others it was just a common flower.... for me this flower meant much more.  This flower gave me the strength to continue my studies.";

-		mes "I could achieve my goals because of her.";

-		next;

-		mes "[Teacher]";

-		mes "So.. now... I am trying to repay to her.  I have started studying Flowers, and It is my goal to cover the whole world in Flowers!";

-		next;

-		mes "[Teacher]";

-		mes "To accomplish my work.. I need a great deal of flowers. Unfortunately because of my studies, I can rarely go outside.";

-		mes "It is really hard to find as many flowers as I need.";

-		next;

-		mes "[Teacher]";

-		mes "I need 1 ^3355FFIllusion Flower^000000 ,1 ^3355FFHinalle^000000,1 ^3355FFAloe^000000 and 1 ^3355FFMent^000000...";

-		mes "If you can bring these flowers to me, I would be willing to give you a special item...";

-		close;

-	

-	M_End:

-		mes "[Teacher]";

-		mes "One of these days I will cover whole world in Flowers!.....";

-		close;

-

-L_Start:

-	mes "[Teacher]";

-	mes "Oh... Those Flowers in your hand are....";

-	M_Menu:

-	next;

-	menu "Show Flowers",-, "Give Flowers",M_Give, "Cancel",M_End;

-

-		mes "[Teacher]";

-		mes "Ah... How wonderful!! These are definately the 4 kinds of Flowers I was looking for ..";

-		mes "The ^3355FFIllusion Flower, Hinalle, Aloe, and Ment^000000.  Would you give them to me?...";

-		next;

-		mes "[Teacher]";

-		mes "If you do I'd be willing to give you a special item.....";

-		goto M_Menu;

-

-	M_Give:

-		if(countitem(710) < 1 || countitem(703) < 1 || countitem(704) < 1 || countitem(708) < 1) goto L_Cheater;//Items: Illusion Flower, Hinalle, Aloe, Ment,

-		delitem 710,1;//Items: Illusion Flower,

-		delitem 703,1;//Items: Hinalle,

-		delitem 704,1;//Items: Aloe,

-		delitem 708,1;//Items: Ment,

-		mes "[Teacher]";

-		mes "I really, really appreciate what you've done for me!! I trully am grateful! I will give you a very special item as I promised.";

-		emotion e_thx;

-		next;

-		mes "[Teacher]";

-		mes "This is the hat I wore at my Graduation Ceremony.  It is a reminder of my joyfull school days at the University.";

-		mes "Please take it...";

-		getitem 5012,1;//Items: Ph.D Hat,

-		close;

-

-	L_Cheater:

-		mes "[Teacher]";

-		mes "I won't give a special item to a cheater...";

-		mes "Now go away!";

-		emotion e_bzz;

-		close;

-}

-

-// ------------------------------------------------------------------------------------------- Culvert -------------------------------------------------------------------------------\\

-// Culvert Guardian ----------------------------------------------------

-prt_fild05.gat,270,212,5	script	Culvert Guardian	105,{

-	mes "[Culvert Guardian]";

-	if(MISC_QUEST & 8) {

-		mes "Here you are. The entrance of the Culvert. Are you sure you want to Go inside?";

-		next;

-		menu "Sure.",-,"Quit.",M_END;

-

-			warp "prt_sewb1.gat",131,247;

-		M_END:

-			close;

-	}

-	mes "Sorry, but only volunteers for the Culvert Campaign can go inside.";

-	mes "Speak with the ^000077Recruiter^000000 about volunteering.  He's located in the ^ff0000Prontera Chivalry^000000.";

-	close;

-}

-

-// Recruiter -----------------------------------------------------------

-prt_in.gat,88,105,2	script	Recruiter	105,{

-	mes "[Recruiter]";

-	if(MISC_QUEST & 8) goto L_WARP;

-	mes "Let me inform about the official Notice from the Capital Defence Headquarter of Rune-Midgard Kingdom";

-	next;

-	mes "[Recruiter]";

-	mes "We decided to recruit volunteers to deal with the 'issues' that have been plauging our cities' sewers.";

-	next;

-	menu "Volunteer.",M_VOL,"Issues...?",-,"Quit",L_END;

-	

-		mes "[Recruiter]";

-		mes "Didn't you hear yet? The Culvert is infested with noxious insects. We found bugs, maggots, and other creatures there.";

-		mes "They've become a huge problem... You've Never heard of this?";

-		emotion e_what;

-		next;

-		mes "[Recruiter]";

-		mes "Because of the severity of these 'issues',it is forbidden for the people to use the water supply for the time being.";

-		next;

-		mes "[Recruiter]";

-		mes "Needless to say, the people have been greatly inconvenienced by this. If this were to linger on it would cause great ill will among the people of the Prontera.";

-		next;

-		mes "[Recruiter]";

-		mes "The situation is becoming critical! There is restlessness among the people!!";

-		next;

-		mes "[Recruiter]";

-		mes "Mighty Warrior!! The People NEED YOU!! Let's EXPEL these VILE creatures from our land!!!";

-		emotion e_go;

-		next;

-		mes "[Recruiter]";

-		mes "WILL YOU volunteer????";

-		next;

-		menu "Volunteer.",M_VOL,"Quit.",-;

-		

-			mes "[Recruiter]";

-			mes "..............";

-			emotion e_swt;

-			close;

-	M_VOL:

-		mes "[Recruiter]";

-		mes "Very good!!! Your Registration is confirmed. We will try to maintain peace and order in Rune-Midgard Kingdom.";

-		mes "I appreciate your support of the Capital Defence Headquarter.  Here are some subsidies....";

-		next;

-		mes "[Recruiter]";

-		mes "3 Red Potions, 1 Milk, and 1 Orange Potion for an emergency.";

-		set MISC_QUEST,MISC_QUEST | 8;

-		getitem 501,3;

-		getitem 519,1;

-		getitem 502,1;

-		next;

-		mes "[Recruiter]";

-	L_WARP:

-		mes "Are you ready? I will warp you to the Culvert.";

-		next;

-		warp "prt_fild05.gat",274,208;

-	L_END:

-		close;

-

-}

+//===== eAthena Script ======================================= 
+//= Quest NPCs related to Prontera
+//===== By: ================================================== 
+//= kobra_k88
+//===== Current Version: ===================================== 
+//= 1.4
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//= Ph.D Hat Quest + Culvert
+//===== Additional Comments: ================================= 
+//= Fixed flower name Dreamy -> Illusion
+//= 1.2 Fixed exploit [Lupus]
+//= 1.3 Removed Duplicates [Silent]
+//= 1.4 Moved Culvert from cities/prontera.txt [Evera]
+//============================================================ 
+
+
+// Ph.D Hat Quest-------------------------------------------------------
+prt_in.gat,38,108,4	script	Teacher#01	53,{
+	if(countitem(710) >= 1 && countitem(703) >= 1 && countitem(704) >= 1 && countitem(708) >= 1) goto L_Start;//Items: Illusion Flower, Hinalle, Aloe, Ment,
+	mes "Don't you think.... ^4444FF'flowers'^000000 are pretty?";
+	next;
+	menu "Talk.",-, "End Conversation.",M_End;
+	
+		mes "[Teacher]";
+		mes "When I was young, I didn't play with friends like the other children.  Instead, I spent time studing by myself.";
+		next;
+		mes "[Teacher]";
+		mes "Sometimes I regret that decision.... but it doesn't really matter now.  Through hard work, I was able to finish school earlier than my classmates.";
+		next;
+		mes "[Teacher]";
+		mes "I was very lonely however..... when things got rough I had no one to talk to about my feelings.";
+		next;
+		mes "[Teacher]";
+		mes "Then one day, I found my best friend.";
+		next;
+		mes "[Teacher]";
+		mes "It was when I saw this pretty flower blooming in an abandoned garden.... I realised that it was just like me and in it, I found my best friend.";
+		next;
+		mes "[Teacher]";
+		mes "Even though, to others it was just a common flower.... for me this flower meant much more.  This flower gave me the strength to continue my studies.";
+		mes "I could achieve my goals because of her.";
+		next;
+		mes "[Teacher]";
+		mes "So.. now... I am trying to repay to her.  I have started studying Flowers, and It is my goal to cover the whole world in Flowers!";
+		next;
+		mes "[Teacher]";
+		mes "To accomplish my work.. I need a great deal of flowers. Unfortunately because of my studies, I can rarely go outside.";
+		mes "It is really hard to find as many flowers as I need.";
+		next;
+		mes "[Teacher]";
+		mes "I need 1 ^3355FFIllusion Flower^000000 ,1 ^3355FFHinalle^000000,1 ^3355FFAloe^000000 and 1 ^3355FFMent^000000...";
+		mes "If you can bring these flowers to me, I would be willing to give you a special item...";
+		close;
+	
+	M_End:
+		mes "[Teacher]";
+		mes "One of these days I will cover whole world in Flowers!.....";
+		close;
+
+L_Start:
+	mes "[Teacher]";
+	mes "Oh... Those Flowers in your hand are....";
+	M_Menu:
+	next;
+	menu "Show Flowers",-, "Give Flowers",M_Give, "Cancel",M_End;
+
+		mes "[Teacher]";
+		mes "Ah... How wonderful!! These are definately the 4 kinds of Flowers I was looking for ..";
+		mes "The ^3355FFIllusion Flower, Hinalle, Aloe, and Ment^000000.  Would you give them to me?...";
+		next;
+		mes "[Teacher]";
+		mes "If you do I'd be willing to give you a special item.....";
+		goto M_Menu;
+
+	M_Give:
+		if(countitem(710) < 1 || countitem(703) < 1 || countitem(704) < 1 || countitem(708) < 1) goto L_Cheater;//Items: Illusion Flower, Hinalle, Aloe, Ment,
+		delitem 710,1;//Items: Illusion Flower,
+		delitem 703,1;//Items: Hinalle,
+		delitem 704,1;//Items: Aloe,
+		delitem 708,1;//Items: Ment,
+		mes "[Teacher]";
+		mes "I really, really appreciate what you've done for me!! I trully am grateful! I will give you a very special item as I promised.";
+		emotion e_thx;
+		next;
+		mes "[Teacher]";
+		mes "This is the hat I wore at my Graduation Ceremony.  It is a reminder of my joyfull school days at the University.";
+		mes "Please take it...";
+		getitem 5012,1;//Items: Ph.D Hat,
+		close;
+
+	L_Cheater:
+		mes "[Teacher]";
+		mes "I won't give a special item to a cheater...";
+		mes "Now go away!";
+		emotion e_bzz;
+		close;
+}
+
+// ------------------------------------------------------------------------------------------- Culvert -------------------------------------------------------------------------------\\
+// Culvert Guardian ----------------------------------------------------
+prt_fild05.gat,270,212,5	script	Culvert Guardian	105,{
+	mes "[Culvert Guardian]";
+	if(MISC_QUEST & 8) {
+		mes "Here you are. The entrance of the Culvert. Are you sure you want to Go inside?";
+		next;
+		menu "Sure.",-,"Quit.",M_END;
+
+			warp "prt_sewb1.gat",131,247;
+		M_END:
+			close;
+	}
+	mes "Sorry, but only volunteers for the Culvert Campaign can go inside.";
+	mes "Speak with the ^000077Recruiter^000000 about volunteering.  He's located in the ^ff0000Prontera Chivalry^000000.";
+	close;
+}
+
+// Recruiter -----------------------------------------------------------
+prt_in.gat,88,105,2	script	Recruiter	105,{
+	mes "[Recruiter]";
+	if(MISC_QUEST & 8) goto L_WARP;
+	mes "Let me inform about the official Notice from the Capital Defence Headquarter of Rune-Midgard Kingdom";
+	next;
+	mes "[Recruiter]";
+	mes "We decided to recruit volunteers to deal with the 'issues' that have been plauging our cities' sewers.";
+	next;
+	menu "Volunteer.",M_VOL,"Issues...?",-,"Quit",L_END;
+	
+		mes "[Recruiter]";
+		mes "Didn't you hear yet? The Culvert is infested with noxious insects. We found bugs, maggots, and other creatures there.";
+		mes "They've become a huge problem... You've Never heard of this?";
+		emotion e_what;
+		next;
+		mes "[Recruiter]";
+		mes "Because of the severity of these 'issues',it is forbidden for the people to use the water supply for the time being.";
+		next;
+		mes "[Recruiter]";
+		mes "Needless to say, the people have been greatly inconvenienced by this. If this were to linger on it would cause great ill will among the people of the Prontera.";
+		next;
+		mes "[Recruiter]";
+		mes "The situation is becoming critical! There is restlessness among the people!!";
+		next;
+		mes "[Recruiter]";
+		mes "Mighty Warrior!! The People NEED YOU!! Let's EXPEL these VILE creatures from our land!!!";
+		emotion e_go;
+		next;
+		mes "[Recruiter]";
+		mes "WILL YOU volunteer????";
+		next;
+		menu "Volunteer.",M_VOL,"Quit.",-;
+		
+			mes "[Recruiter]";
+			mes "..............";
+			emotion e_swt;
+			close;
+	M_VOL:
+		mes "[Recruiter]";
+		mes "Very good!!! Your Registration is confirmed. We will try to maintain peace and order in Rune-Midgard Kingdom.";
+		mes "I appreciate your support of the Capital Defence Headquarter.  Here are some subsidies....";
+		next;
+		mes "[Recruiter]";
+		mes "3 Red Potions, 1 Milk, and 1 Orange Potion for an emergency.";
+		set MISC_QUEST,MISC_QUEST | 8;
+		getitem 501,3;
+		getitem 519,1;
+		getitem 502,1;
+		next;
+		mes "[Recruiter]";
+	L_WARP:
+		mes "Are you ready? I will warp you to the Culvert.";
+		next;
+		warp "prt_fild05.gat",274,208;
+	L_END:
+		close;
+
+}
diff --git a/npc/quests/quests_umbala.txt b/npc/quests/quests_umbala.txt
index b4a539b81..e9213d9f7 100644
--- a/npc/quests/quests_umbala.txt
+++ b/npc/quests/quests_umbala.txt
@@ -1,921 +1,921 @@
-//===== eAthena Script ======================================= 

-//= Quest NPCs related to Umbala

-//===== By: ================================================== 

-//= sabernet09 & eAthena Team

-//===== Current Version: ===================================== 

-//= 1.8

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//= Umbalian Language Quest, Umbala Skeletal Gate Quest,

-//= Umbala Event, Create Essence/Dismantle Stone

-//	Phase1.Learning the Language

-//	1	(Elder)First discussion

-//	2	(Elder)Asking about learning the language

-//	3	(Elder)Final step (understanding NPC speech)

-//	------------------------------------------

-//	Phase2.Create Essence/Dismantle Stone

-//	4	(Shaman)Get permission to speak with her from the chief

-//	5	(Elder)Ask about conditions needed to be fulfilled to get permission

-//	6	(Elder)Get permission

-//	7	(Shaman)Use the shaman to create essences and dismantle elemental stones.

-//===== Additional Comments: ================================= 

-//= fixed by x[tsk], Lupus, PoW

-//= Quest completion is now registered

-//= 1.1 fixed Poporing Egg ID -> Poring Egg, fixed condition

-//= 1.2-1.6 fixed some Umbalian Language quests [Lupus]

-//= 1.7 Moved Umbala Event, Create Essence/Dismantle Stone, and Skeletal Gate from npc/cities/umbala.txt [Evera]

-//= 1.7a Removed all custom quests to custom folder [Lupus]

-//= 1.8 Added official chance of failure to Create Essence/Dismantle Stone [Lupus]

-//============================================================ 

-

-

-//========================================================================================================================\\

-//                       Little Quest NPC to enter the dungeon

-//========================================================================================================================\\

-umbala.gat,65,253,4	script	Tree Guardian	752,{ 

-	mes "[Tree Guardian]"; 

-	mes "Stop, stranger, here is the entrance to the ancient tree!"; 

-	next; 

-	mes "[Tree Guardian]"; 

-	mes "I cannot allow you to enter, you look pretty weak!"; 

-	next; 

-L_MENU:

-	menu "Talk about tree",-, "Talk about Umbala",M_TALKUMB, "Enter Dungeon",M_DUN, "Leave",M_Leave; 

-

-	mes "[Tree Guardian]"; 

-	mes "The tree is an ancient relique of our culture!"; 

-	next; 

-	mes "[Tree Guardian]"; 

-	mes "But recently some monsters overwhelmed the tree and are now"; 

-	mes "slowly killing the tree...like a poison...from inside.."; 

-	next; 

-	goto L_MENU;

-M_TALKUMB: 

-	mes "[Tree Guardian]"; 

-	mes "We don't have many visitors in our small town.."; 

-	next; 

-	mes "[Tree Guardian]"; 

-	mes "Most people don't find us or are just afraid of us!"; 

-	next; 

-	mes "[Tree Guardian]"; 

-	mes "And now, we are even more unpopular, because of that damn beast!"; 

-	next; 

-	menu "What beast?",- ,"Leave",M_Leave; 

-

-	mes "[Tree Guardian]"; 

-	mes "The Werewolf of course!!"; 

-	next; 

-	mes "[Tree Guardian]"; 

-	mes "He is sneaking around our town and killing our soldiers at night!"; 

-	next; 

-	mes "[Tree Guardian]"; 

-	mes "Hey...if you could get rid of that beast!"; 

-	next; 

-	mes "[Tree Guardian]"; 

-	mes "I'll let you in!"; 

-	next; 

-	mes "[Tree Guardian]"; 

-	mes "From now on we can live in peace again, thanks to you!"; 

-	next; 

-	mes "[Tree Guardian]"; 

-	mes "You may enter the dungeon now!"; 

-	set umbdun,1;

-	close; 

-M_DUN: 

-	mes "[Tree Guardian]"; 

-	if(umbdun != 1) mes "We do not permit weak people to enter!";

-	if(umbdun != 1) close;

-	mes "Come on in, brave warrior!"; 

-	warp "um_dun01.gat",42,30; 

-M_Leave:  

-	close; 

-}

-

-//==============================================================================

-//Skeletal Gate

-//==============================================================================

-umbala.gat,221,193,1	script	 #Skeletal Gate	111,{

-	if(event_umbala==7) goto LwarpNoText;

-	set @ryumon,0;

-	mes "^3355FFThe gate is shaped like a skeleton";

-	mes "You cannot pass this point as the gate is";

-	mes "locked.  You hear sounds coming from the";

-	mes "inside.^000000";

-	next;

-	menu "Examine the skeleton",-,"Nothing",Lend;

-		mes "^3355FFWhen you examine the gate";

-		mes "carefully, you notice that there";

-		mes "is a hole about the size of a gemstone";

-		mes "on the left side of the gate about where";

-		mes "the skeleton's left eye should be.  There is";

-		mes "a matching hole on the other side.^000000";

-		next;

-		mes "^3355FFWhat you would like to";

-		mes "to do with the left socket?^000000";

-		next;

-		menu "Nothing",-,"Insert a Blue Gemstone",L1_2,"Insert a Yellow Gemstone",L1_3,"Insert a Red Gemstone",L1_4;

-			mes "^3355FFNothing was inserted into the left socket.^000000";

-			next;

-			goto LRight;

-		L1_2:

-			//Blue

-			if(countitem(717) < 1) goto L1_2_e;//Items: Blue Gemstone,

-				mes "^3355FFYou inserted a Blue Gemstone into the";

-				mes "left socket.^000000";

-				next;

-				delitem 717,1;//Items: Blue Gemstone,

-				getitem 717,1;//Items: Blue Gemstone,

-				set @ryumon,1;

-				mes "^3355FFA rolling sound can be heard, and";

-				mes "the gemstone comes out of the skeleton's                                 mouth.^000000";

-				next;

-				goto LRight;

-		L1_3:

-			//Yellow

-			if(countitem(715) < 1) goto L1_3_e;//Items: Yellow Gemstone,

-				mes "^3355FFYou inserted a Yellow Gemstone into the";

-				mes "left socket.^000000";

-				next;

-				delitem 715,1;//Items: Yellow Gemstone,

-				getitem 715,1;//Items: Yellow Gemstone,

-				set @ryumon,2;

-				mes "^3355FFA rolling sound can be heard, and";

-				mes "the gemstone comes out of the skeleton's                                 mouth.^000000";

-				next;

-				goto LRight;

-		L1_4:

-			//Red

-			if(countitem(716) < 1) goto L1_4_e;//Items: Red Gemstone,

-				mes "^3355FFYou inserted a Red Gemstone into the";

-				mes "left socket.^000000";

-				next;

-				delitem 716,1;//Items: Red Gemstone,

-				getitem 716,1;//Items: Red Gemstone,

-				set @ryumon,3;

-				mes "^3355FFA rolling sound can be heard, and";

-				mes "the gemstone comes out of the skeleton's                                 mouth.^000000";

-				next;

-				goto LRight;

-			L1_2_e:

-				mes "^3355FFYou don't have a Blue Gemstone.";

-				goto L1_e;

-			L1_3_e:

-				mes "^3355FFYou don't have a Yellow Gemstone.";

-				goto L1_e;

-			L1_4_e:

-				mes "^3355FFYou don't have a Red Gemstone.";

-			L1_e:

-				mes "Therefore, nothing was inserted into";

-				mes "the left socket.^000000";

-				next;

-	LRight:

-		mes "^3355FFWhat about the right";

-		mes "socket?^000000";

-		next;

-		menu "Nothing",-,"Insert a Blue Gemstone",L2_2,"Insert a Yellow Gemstone",L2_3,"Insert a Red Gemstone",L2_4;

-			mes "^3355FFNothing was inserted into the right socket.^000000";

-			next;

-			goto Lfin;

-		L2_2:

-			//Blue

-			if(countitem(717) < 1) goto L2_2_e;//Items: Blue Gemstone,

-				mes "^3355FFYou inserted a Blue Gemstone into the";

-				mes "right socket.^000000";

-				next;

-				delitem 717,1;//Items: Blue Gemstone,

-				getitem 717,1;//Items: Blue Gemstone,

-				set @ryumon,@ryumon+10;

-				mes "^3355FFA rolling sound can be heard, and";

-				mes "the gemstone comes out of the skeleton's                                 mouth.^000000";

-				next;

-				goto Lfin;

-		L2_3:

-			//Yellow

-			if(countitem(715) < 1) goto L2_3_e;//Items: Yellow Gemstone,

-				mes "^3355FFYou inserted a Yellow Gemstone into the";

-				mes "right socket.^000000";

-				next;

-				delitem 715,1;//Items: Yellow Gemstone,

-				getitem 715,1;//Items: Yellow Gemstone,

-				set @ryumon,@ryumon+20;

-				mes "^3355FFA rolling sound can be heard, and";

-				mes "the gemstone comes out of the skeleton's                                 mouth.^000000";

-				next;

-				goto Lfin;

-		L2_4:

-			//Red

-			if(countitem(716) < 1) goto L2_4_e;//Items: Red Gemstone,

-				mes "^3355FFYou inserted a Red Gemstone into the";

-				mes "right socket.^000000";

-				next;

-				delitem 716,1;//Items: Red Gemstone,

-				getitem 716,1;//Items: Red Gemstone,

-				set @ryumon,@ryumon+30;

-				mes "^3355FFA rolling sound can be heard, and";

-				mes "the gemstone comes out of the skeleton's                                 mouth.^000000";

-				next;

-				goto Lfin;

-			L2_2_e:

-				mes "^3355FFYou don't have a Blue Gemstone.";

-				goto L2_e;

-			L2_3_e:

-				mes "^3355FFYou don't have a Yellow Gemstone.";

-				goto L2_e;

-			L2_4_e:

-				mes "^3355FFYou don't have a Red Gemstone.";

-			L2_e:

-				mes "Therefore, nothing was inserted into";

-				mes "the right socket.^000000";

-				next;

-			Lfin:

-				mes "^3355FF..........^000000";

-				next;

-				mes "^3355FF...................";

-				mes ".....................^000000";

-				next;

-				mes "^3355FF.......................";

-				mes ".........................";

-				mes ".........................^000000";

-				next;

-				if(event_umbala < 6) goto LSecondCheck;

-					if(@ryumon == 33) goto Lwarp;

-				LSecondCheck:

-				if(event_umbala >= 6) goto LNewEnd;

-					if(@ryumon == 13) goto Lwarp;

-					LNewEnd:

-						mes "^3355FFNothing happened.";

-						mes "You hear a faint laugh, but";

-						mes "decide that it's all in";

-						mes "your head.^000000";

-						close;

-				Lwarp:

-					mes "^3355FFA rumbling sound can be";

-					mes "heard as the gate opens.";

-					mes "As you step across the threshold.";

-					mes "you feel as if you're walking in";

-					mes "into the arms of death itself.^000000";

-					next;

-				LwarpNoText:

-					warp "um_in.gat",32,71;

-					close;

-Lend:

-	mes "^3355FFAfter hitting the gate a few";

-	mes "times with no result, you decide to give";

-	mes "up.^000000";

-	close;

-}

-

-//==============================================================================

-//Umbala Event

-//==============================================================================

-um_in.gat,39,122,5	script	Utan Tribal Elder	784,{

-	if(event_umbala == 1) goto LStart2;	

-	if(event_umbala == 2) goto LStart3;

-	if(event_umbala == 3) goto LStart4;

-	if(event_umbala == 4) goto LStart5;

-	if(event_umbala == 5) goto LStart6;

-	if(event_umbala == 6) goto LStart4;

-	if(event_umbala == 7) goto LStart4;

-	mes "[Karukatan]";

-	mes "Aha, You're new to the Utan";

-	mes "family's little village, aren't";

-	mes "you?  I would remember such a face";

-	mes "had I met you before.";

-	next;

-	mes "[Karukatan]";

-	mes "We know there is a wide world around";

-	mes "us, but the there is something to";

-	mes "be appreciated in the simple life";

-	mes "we lead here.";

-	next;

-	mes "[Karukatan]";

-	mes "All decisions in the village are made";

-	mes "by me or with my input";

-	next;

-	mes "[Karukatan]";

-	mes "You want to know how I speak your";

-	mes "language when it seems no one else in";

-	mes "the village does?  A fair question.";

-	mes "I picked up your tongue from the";

-	mes "adventurers who sometimes pass";

-	mes "through this village.";

-	next;

-	mes "[Karukatan]";

-	mes "Some outsiders have also settled near here";

-	mes "over time.  In exchange for information";

-	mes "about their customs and culture, I";

-	mes "teach them the language and customs";

-	mes "of the Utan tribe.";

-	next;

-	mes "[Karukatan]";

-	mes "If you want to learn our language,";

-	mes "you must immerse yourselves in";

-	mes "our customs and cultural traditions.";

-	mes "You should even try and look as much";

-	mes "like us as you can.";

-	next;

-	mes "[Karukatan]";

-	mes "I hope you're worthy of my confidence.";

-	mes "Some members of the tribe have expressed";

-	mes "the sentiment that welcoming outsiders";

-	mes "is dangerous to the village.";

-	next;

-	mes "[Karukatan]";

-	mes "When you want to begin learning the";

-	mes "language, come and visit me.  Don't";

-	mes "forget to make yourself appear as";

-	mes "much like us as you can.";

-	set event_umbala,1;

-	close;

-LStart2:

-	mes "[Karukatan]";

-	mes "Ahh, have you looked around the";

-	mes "village a bit?  Did other people";

-	mes "from the tribe hide from you when";

-	mes "they saw you?  Don't worry.  They";

-	mes "were just surprised to see a new face.";

-	next;

-	mes "[Karukatan]";

-	mes "Hmm?  You need something from me?";

-	mes "How can I make your stay in the village";

-	mes "more pleasant?";

-	next;

-	menu "I want to learn the tribal language",-,"Umbaumbaba?",L2,"Forget it",L3;

-		if ((getequipisequiped(9)>0) && (getequipisequiped(10)>0)) goto L1_mask;

-		mes "[Karukatan]";

-		mes "Well, in order to understand our";

-		mes "language, you need to assimilate";

-		mes "our cultural values, too.  Trying to";

-		mes "understand a language in the context of an";

-		mes "alien culture is foolish, right?";

-		next;

-		mes "[Karukatan]";

-		mes "Besides, if the tribesmen in the";

-		mes "village fear you, how will you";

-		mes "ever get them to speak with you?";

-		mes "You should try making yourself";

-		mes "look like us in order to be more";

-		mes "accepted.";

-		close;

-	L1_mask:

-		mes "[Karukatan]";

-		mes "What a cute mask.  The Utan tribe";

-		mes "appreciates its traditional masks";

-		mes "because sometimes by hiding your";

-		mes "face, you can express more genuine";

-		mes "feelings.";

-		next;

-		mes "[Karukatan]";

-		mes "Over time, the mask itself";

-		mes "has come to symbolize trust among";

-		mes "the members of the Utan tribe.";

-		next;

-		mes "[Karukatan]";

-		mes "Now that you're prepared, I will";

-		mes "begin teaching you the Utan";

-		mes "language as promised.  First,";

-		mes "you need to make some preparations,";

-		mes "however...";

-		next;

-		mes "[Karukatan]";

-		mes "First, I need some paper.  With";

-		mes "paper, I can write down the words";

-		mes "I intend to teach.";

-		next;

-		mes "[Karukatan]";

-		mes "I need ^3377FF10x Oil Paper^000000, and ^3377FF5x Slick Paper^000000.";

-		mes "I also need something to write with.";

-		mes "of course.";

-		mes "For that, ^3377FF1x Squid Ink^000000 and ^3377FF1x Feather of Birds^000000";

-		mes "will do nicely.";

-		next;

-		mes "[Karukatan]";

-		mes "Once you get these, I can start";

-		mes "teaching you the language.";

-		set event_umbala,2;

-		close;

-	L2:

-		mes "[Karukatan]";

-		mes "Haha.  Only imitating the sound";

-		mes "of the words is useless.  Even";

-		mes "though it sounds random, there is";

-		mes "a specific way of combining the";

-		mes "words.";

-		next;

-		mes "[Karukatan]";

-		mes "Also, our language has depends a";

-		mes "a lot on emotion to convey its";

-		mes "meaning.  Outsiders can't pick up";

-		mes "the subtlety right away, even though";

-		mes "we're the same race, ";

-		next;

-		mes "[Karukatan]";

-		mes "It seems you have an interest";

-		mes "in learning the language of the";

-		mes "Utan tribe.  If that's the case,";

-		mes "come visit me and I'll teach you.";

-		next;

-		mes "[Karukatan]";

-		mes "Then, you won't sound so silly.";

-		close;

-	L3:

-		mes "[Karukatan]";

-		mes "Ah.  If you want to continue your";

-		mes "trip, please keep this village in";

-		mes "your memories.";

-		close;

-LStart3:

-	if ((countitem(7151)>=10) && (countitem(7111)>=5) && (countitem(1024)>=1) && (countitem(916)>=1)) goto Lchkok;//Items: Oiled Paper, String Paper, Squid Ink, Feather of Birds,

-	mes "[Karukatan]";

-	mes "It seems you've not yet prepared the";

-	mes "proper items.  Did you forget what";

-	mes "you need to gather before I can";

-	mes "teach you the language?  You need to gather";

-	next;

-	mes "[Karukatan]";

-	mes "^3377FF10x Oil Paper^000000,";

-	mes "^3377FF5x Slick Paper^000000,";

-	mes "^3377FF1x Squid Ink^000000, and";

-	mes "^3377FF1x Feather of Bird^000000.";

-	mes "Once you have gathered those, I can teach";

-	mes "you Utan tribal language.";

-	close;

-Lchkok:

-	delitem 7151,10;//Items: Oiled Paper,

-	delitem 7111,5;//Items: String Paper,

-	delitem 1024,1;//Items: Squid Ink,

-	delitem 916,1;//Items: Feather of Birds,

-	mes "[Karukatan]";

-	mes "Good.  You've prepared all the";

-	mes "necessary materials.  Now, I can";

-	mes "begin to teach you the Utan tribal";

-	mes "language.";

-	next;

-	mes "[Karukatan]";

-	mes "............";

-	next;

-	mes "[Karukatan]";

-	mes "............";

-	mes "............";

-	next;

-	mes "[Karukatan]";

-	mes "............";

-	mes "............";

-	mes "............";

-	next;

-	mes "[Karukatan]";

-	mes "Do you feel more enlightened now?";

-	mes "Try talking to others in the Utan";

-	mes "tribe.  They'll warm up to your quickly";

-	mes "now that you speak the language.";

-	set event_umbala,3;

-	next;

-	mes "[Karukatan]";

-	mes "If you need something while you're";

-	mes "here, don't hesitate to visit me.";

-	close;

-LStart4:

-//fin

-	mes "[Karukatan]";

-	mes "Do you need something?";

-	mes "If you need someone to guide you around";

-	mes "the village, you should ask someone else.";

-	mes "I can't leave here right now.";

-	next;

-	mes "[Karukatan]";

-	mes "The best way to get a feel for";

-	mes "the village is to just walk";

-	mes "around and see the sights.  By doing";

-	mes "that, you can form a personal";

-	mes "bond with the village.";

-	close;

-LStart5:

-	mes "[Karukatan]";

-	mes "Oh, it seems you're enjoying yourself here.";

-	mes "You need something else?";

-	next;

-	mes "[Karukatan]";

-	mes "It seems you want to ask the";

-	mes "shaman Putsuchiratan something";

-	mes "and you're seeking my permission";

-	mes "to do so.";

-	next;

-	mes "[Karukatan]";

-	mes "Well...There's a mask from";

-	mes "abroad that Putsuchiratan and I";

-	mes "have both always desired.  Putsuchiratan";

-	mes "heard about it some time ago.";

-	next;

-	mes "[Karukatan]";

-	mes "If I could have the ^3377FFSmile Mask^000000,";

-	mes "it would be a great honour, but";

-	mes "I promised I would give it to";

-	mes "to Putsuchiratan as a gift if I ever";

-	mes "came across one.  If you can find a Smile Mask for me,";

-	mes "I'll give you permission to speak with her.";

-	set event_umbala,5;

-	close;

-LStart6:

-	if(countitem(2278) > 0) goto Lsmileok;//Items: Mr. Smile,

-	mes "[Karukatan]";

-	mes "Did you find the ^3377FFSmile Mask^000000 yet?";

-	mes "In order to let you see the shaman,";

-	mes "you need to collect one.";

-	mes "A gift will put Putsuchiritan in";

-	mes "a good mood, also.";

-	close;

-Lsmileok:

-	delitem 2278,1;//Items: Mr. Smile,

-	mes "[Karukatan]";

-	mes "Ahh!  It's a Smile Mask!";

-	mes "I would really like to put this";

-	mes "on just once, but I promised to";

-	mes "give this to Putsuchiritan as";

-	mes "a gift.";

-	set event_umbala,6;

-	next;

-	mes "[Karukatan]";

-	mes "I'll tell Putsuchiritan to allow you";

-	mes "to meet with her.  I'm certain that you";

-	mes "will find her talents to be a tremendous";

-	mes "help on your journey.";

-	close;

-}

-

-//=====================================================================

-//                    Create Essence/Dismantle Stone

-//=====================================================================

-um_in.gat,44,71,2	script	Utan Tribe Shaman	782,{

-

-	switch(event_umbala) {

-	default:	

-		mes "[?????]";

-		mes "Umbaumbaumbaba Utan Umbaba";

-		mes "Umbaumbaumbafumbabauma...";

-		mes "Umbabaumbaumbabaumbabaumba";

-		mes "Umbabaumbabaumbaumbabaumba";

-		mes "Fumbaumba.";

-		next;

-		warp "umbala.gat",217,186;

-		close;

-	case 3:	

-		mes "[Putsuchiritan]";

-		mes "I will not see outsiders that are";

-		mes "not from the Utan tribe.";

-		mes "...There are many things about the";

-		mes "nature of our society that you do";

-		mes "not yet understand.";

-		next;

-		mes "[Putsuchiritan]";

-		mes "Others of your type will do anything";

-		mes "to set foot on land which is sacred";

-		mes "to the Utan tribe.  We fear that";

-		mes "revealing our secrets will expose";

-		mes "use to danger.";

-		next;

-		mes "[Putsuchiritan]";

-		mes "What's worse, I don't think that";

-		mes "outsiders understand our desire";

-		mes "to preserve our tribal culture.";

-		next;

-		mes "[Putsuchiritan]";

-		mes "As my talents are foremost for";

-		mes "the use of the Utan tribe, you";

-		mes "must get permission from the elder";

-		mes "if you want my assistance.";

-		mes "Also, don't be stirring up trouble";

-		mes "among the tribesmen.";

-		set event_umbala,4;

-		close;

-	case 4:

-	case 5:

-		mes "[Putsuchiritan]";

-		mes "Didn't you hear me?  You need";

-		mes "to get the elder's permission before";

-		mes "I can help you.";

-		close;

-	case 6:

-		mes "[Putsuchiritan]";

-		mes "You seem to have gotten permission from";

-		mes "the elder.  Fine, I'll help you, though";

-		mes "I don't really want to.";

-		next;

-		mes "[Putsuchiritan]";

-		mes "I can call forth hidden talents";

-		mes "buried deep within your psyche";

-		mes "and tap the power hidden in";

-		mes "elemental stones.";

-		next;

-		mes "[Putsuchiritan]";

-		mes "I need to prepare my rituals.";

-		mes "When you're ready to proceed, please";

-		mes "talk to me again.";

-		set event_umbala,7;

-		close;

-	case 7:

-		mes "[Putsuchiritan]";

-		mes "I don't know whether my talents";

-		mes "will be useful to you, but I'll";

-		mes "help you anyway.";

-		next;

-		mes "[Putsuchiritan]";

-		mes "I can create elemental essence from natural objects,";

-		mes "or, dismantle elemental stones into their component essences.";

-		mes "Which would you like to do?";

-	}

-	

-	next;

-

-	set .@need,0;

-

-	switch (select("Create Essence","Dismantle Elemental Stone","Nothing")) {

-	case 1:

-		mes "[Putsuchiritan]";

-		mes "Which elemental essence would you";

-		mes "like to create?  I can create earth, water,";

-		mes "fire, and wind essence.";

-		next;

-		switch (select("Earth","Water","Fire","Wind")) {

-			case 1:

-				if(countitem(947)<15) {

-					mes "[Putsuchiritan]";

-					mes "Earth...You need that which is";

-					mes "a friend of the earth.  Explore";

-					mes "the verdant forest and find";

-					mes "^3377FF15x Horn^000000 for the ritual.";

-				}

-				else {

-					set .@need,947;

-					set .@amount,15;

-					set .@gain,993;

-				}

-				break;

-			case 2:

-				if(countitem(946)<20) {

-					mes "[Putsuchiritan]";

-					mes "Water...You need that which is";

-					mes "saturated with water.  Explore";

-					mes "the area around here and find";

-					mes "^3377FF20x Snails Shell^000000 for the ritual.";

-				}

-				else {

-					set .@need,946;

-					set .@amount,20;

-					set .@gain,991;

-				}

-				break;

-			case 3:

-				if(countitem(904)<20) {

-					mes "[Putsuchiritan]";

-					mes "Fire...You need that which";

-					mes "can withstand the roiling heat";

-					mes "of perpetual flame.  Explore the";

-					mes "desert and find ^3377FF20x Scorpion Tail^000000";

-					mes "for the ritual.";

-				}

-				else {

-					set .@need,904;

-					set .@amount,20;

-					set .@gain,990;

-				}

-				break;

-			case 4:

-				if(countitem(1013)<25) {

-					mes "[Putsuchiritan]";

-					mes "Wind...You need that which";

-					mes "has an easy camaraderie with";

-					mes "the sky itself.";

-					mes "You need ^3377FF25x Rainbow Shell^000000";

-					mes "to complete the ritual.";

-				}

-				else {

-					set .@need,1013;

-					set .@amount,25;

-					set .@gain,992;

-				}

-				break;

-		}

-		if(.@need == 0) {

-			next;

-			mes "[Putsuchiritan]";

-			mes "Once you've prepared these";

-			mes "objects from nature, please return here";

-			mes "so we can complete the ritual.";

-			close;

-		}

-		mes "[Putsuchiritan]";

-		mes "Now, I will try to tap the";

-		mes "source of power hidden deep within";

-		mes "you.  Choose a number between 1 and 9.";

-		mes "If you don't want to create essence";

-		mes "after all, choose 0.";

-		while(1) {

-			next;

-			input .@num;

-			if(.@num<=0) {

-				mes "[Putsuchiritan]";

-				mes "If you don't wish my help at the moment,";

-				mes "that's fine.  When you do, please come";

-				mes "by again.";

-				close;

-			}

-			if(.@num>9) {

-				mes "[Putsuchiritan]";

-				mes "You must choose a number between";

-				mes "1 and 9.  It is very important that";

-				mes "you choose the number most dear to";

-				mes "your heart.";

-				continue;

-			}

-			break;

-		}

-		mes "[Putsuchiritan]";

-		switch(.@need) {

-			case 947: mes "The horn begins to vibrate."; break;

-			case 904: mes "The tail begins to vibrate."; break;

-			default: mes "The shell begins to vibrate."; break;

-		}

-		mes "I will now chant a holy mantra.";

-		mes "Imagine the number in your mind";

-		mes "and imagine power radiating forth from";

-		mes "your body.";

-		next;

-		mes "[Putsuchiritan]";

-		mes "Amba Omba Sanba!  Unba Chi!";

-		mes "Wanbatauma Eurukaba!  Unba!  Ba!";

-		mes "Jyur!  Fumuba  Rurara!  Wamba!  Ra!";

-		mes "Damtsuha Ombabaraka! Unba! Shi!";

-		mes "Sukatamba Aburumba! Umba! Shi!";

-		next;

-		mes "[Putsuchiritan]";

-		if(countitem(.@need)<.@amount){

-			mes "You're An Amba HacK0R!";

-			mes "I'm clearing your mind!";

-			//we reset the whole quest for the hacker			

-			set event_umbala,0;

-			emotion e_swt,1;

-			close;

-		}

-		delitem .@need,.@amount;

-		if(!rand(10)){

-			getitem 910,1; //if failed get Garlet

-			mes "Your inner power has failed";

-			mes "to convert these objects";

-			mes "from nature into elemental essence...";

-			next;

-			mes "[Putsuchiritan]";

-			mes "Purify your mind and try again.";

-        		close;

-		}

-		getitem .@gain,1;

-		mes "There.  Your inner power has converted";

-		mes "these objects from nature into";

-		mes "elemental essence.  Put";

-		mes "it to good use.";

-		close;

-	case 2:

-		mes "[Putsuchiritan]";

-		mes "What type of stone would you like to";

-		mes "dismantle?  Please choose earth, water,";

-		mes "fire, or wind.";

-		next;

-		switch (select("Earth","Water","Fire","Wind")) {

-			case 1:

-				if(countitem(997)==0) {

-					mes "[Putsuchiritan]";

-					mes "You need to have";

-					mes "^3377FF1x Great Nature^000000";

-					mes "to disassemble into its";

-					mes "component essence.";

-				}

-				else {

-					set .@need,997;

-					set .@gain,993;

-				}

-				break;

-			case 2:

-				if(countitem(995)==0) {

-					mes "[Putsuchiritan]";

-					mes "You need to have";

-					mes "^3377FF1x Mystic Frozen^000000";

-					mes "to disassemble into its";

-					mes "component essence.";

-				}

-				else {

-					set .@need,995;

-					set .@gain,991;

-				}

-				break;

-			case 3:

-				if(countitem(994)==0) {

-					mes "[Putsuchiritan]";

-					mes "You need to have";

-					mes "^3377FF1x Flaming Heart^000000";

-					mes "to disassemble into its";

-					mes "component essence.";

-				}

-				else {

-					set .@need,994;

-					set .@gain,990;

-				}

-				break;

-			case 4:

-				if(countitem(996)==0) {

-					mes "[Putsuchiritan]";

-					mes "You need to have";

-					mes "^3377FF1x Rough Wind^000000";

-					mes "to disassemble into its";

-					mes "component essence.";

-				}

-				else {

-					set .@need,996;

-					set .@gain,992;

-				}

-				break;

-		}

-		next;

-		if(.@need == 0) {

-			mes "[Putsuchiritan]";

-			mes "Once you have the necessary stone,";

-			mes "please come back and visit me";

-			mes "so that the ritual can be completed.";

-			close;

-		}

-		mes "[Putsuchiritan]";

-		switch(.@need) {

-			case 997: mes "I will dismantle your earth crystal";	break;

-			case 995: mes "I will dismantle your frozen crystal";	break;

-			case 994: mes "I will dismantle your heart of flame"; 	break;

-			case 996: mes "I will dismantle your rough wind stone"; break;

-		}

-		mes "into its component essence.";

-		mes "Choose a number between 1 and 9.";

-		mes "If you don't want me to dismantle the";

-		mes "stone, choose 0.";

-		while(1) {

-			next;

-			input .@num;

-			if(.@num<=0) {

-				mes "[Putsuchiritan]";

-				mes "If you don't wish my help at the moment,";

-				mes "that's fine.  When you do, please come";

-				mes "by again.";

-				close;

-			}

-			if(.@num>9) {

-				mes "[Putsuchiritan]";

-				mes "You must choose a number between";

-				mes "1 and 9.  It is very important that";

-				mes "you choose the number most dear to";

-				mes "your heart.";

-				continue;

-			}

-			break;

-		}

-		set .@num,rand(1,10);	//official amount chance

-		if(.@num == 1)

-			set .@num,10;

-		else if(.@num == 2 || .@num == 3)

-			set .@num,8;

-		else if(.@num < 7)

-			set .@num,7;

-		else

-			set .@num,6;

-		mes "[Putsuchiritan]";

-		mes "Please place the elemental stone";

-		mes "inside this holy circle.  I will chant a";

-		mes "a mantra.  I don't know if I can";

-		mes "completely dismantle the stone,";

-		mes "but here goes...";

-		next;

-		mes "[Putsuchiritan]";

-		mes "Unba Unba Karama!  Unba!  Ta!";

-		mes "Rukara!  Ukarere!  Un!  Unba!  Ka!";

-		mes "Anburaka Taburaka Taburakan!  Unba Ra!";

-		mes "Onbaruzu Zan Kata!  Unba Ka!";

-		next;

-		mes "[Putsuchiritan]";

-		if(countitem(.@need)<1){

-			mes "You're An Amba HacK0R!";

-			mes "I'm clearing your mind!";

-			//we reset the whole quest for the hacker			

-			set event_umbala,0;

-			emotion e_swt,1;

-			close;

-		}

-		delitem .@need,1;

-		getitem .@gain,.@num;

-		mes "The elemental stone has been";

-		mes "dismantled into its natural";

-		mes "essence.  Please put it to";

-		mes "good use.";

-		close;

-	case 3:

-		mes "[Putsuchiritan]";

-		mes "If you don't wish my help at the moment,";

-		mes "that's fine.  When you do, please come";

-		mes "by again.";

-		close;

-	}

+//===== eAthena Script ======================================= 
+//= Quest NPCs related to Umbala
+//===== By: ================================================== 
+//= sabernet09 & eAthena Team
+//===== Current Version: ===================================== 
+//= 1.8
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//= Umbalian Language Quest, Umbala Skeletal Gate Quest,
+//= Umbala Event, Create Essence/Dismantle Stone
+//	Phase1.Learning the Language
+//	1	(Elder)First discussion
+//	2	(Elder)Asking about learning the language
+//	3	(Elder)Final step (understanding NPC speech)
+//	------------------------------------------
+//	Phase2.Create Essence/Dismantle Stone
+//	4	(Shaman)Get permission to speak with her from the chief
+//	5	(Elder)Ask about conditions needed to be fulfilled to get permission
+//	6	(Elder)Get permission
+//	7	(Shaman)Use the shaman to create essences and dismantle elemental stones.
+//===== Additional Comments: ================================= 
+//= fixed by x[tsk], Lupus, PoW
+//= Quest completion is now registered
+//= 1.1 fixed Poporing Egg ID -> Poring Egg, fixed condition
+//= 1.2-1.6 fixed some Umbalian Language quests [Lupus]
+//= 1.7 Moved Umbala Event, Create Essence/Dismantle Stone, and Skeletal Gate from npc/cities/umbala.txt [Evera]
+//= 1.7a Removed all custom quests to custom folder [Lupus]
+//= 1.8 Added official chance of failure to Create Essence/Dismantle Stone [Lupus]
+//============================================================ 
+
+
+//========================================================================================================================\\
+//                       Little Quest NPC to enter the dungeon
+//========================================================================================================================\\
+umbala.gat,65,253,4	script	Tree Guardian	752,{ 
+	mes "[Tree Guardian]"; 
+	mes "Stop, stranger, here is the entrance to the ancient tree!"; 
+	next; 
+	mes "[Tree Guardian]"; 
+	mes "I cannot allow you to enter, you look pretty weak!"; 
+	next; 
+L_MENU:
+	menu "Talk about tree",-, "Talk about Umbala",M_TALKUMB, "Enter Dungeon",M_DUN, "Leave",M_Leave; 
+
+	mes "[Tree Guardian]"; 
+	mes "The tree is an ancient relique of our culture!"; 
+	next; 
+	mes "[Tree Guardian]"; 
+	mes "But recently some monsters overwhelmed the tree and are now"; 
+	mes "slowly killing the tree...like a poison...from inside.."; 
+	next; 
+	goto L_MENU;
+M_TALKUMB: 
+	mes "[Tree Guardian]"; 
+	mes "We don't have many visitors in our small town.."; 
+	next; 
+	mes "[Tree Guardian]"; 
+	mes "Most people don't find us or are just afraid of us!"; 
+	next; 
+	mes "[Tree Guardian]"; 
+	mes "And now, we are even more unpopular, because of that damn beast!"; 
+	next; 
+	menu "What beast?",- ,"Leave",M_Leave; 
+
+	mes "[Tree Guardian]"; 
+	mes "The Werewolf of course!!"; 
+	next; 
+	mes "[Tree Guardian]"; 
+	mes "He is sneaking around our town and killing our soldiers at night!"; 
+	next; 
+	mes "[Tree Guardian]"; 
+	mes "Hey...if you could get rid of that beast!"; 
+	next; 
+	mes "[Tree Guardian]"; 
+	mes "I'll let you in!"; 
+	next; 
+	mes "[Tree Guardian]"; 
+	mes "From now on we can live in peace again, thanks to you!"; 
+	next; 
+	mes "[Tree Guardian]"; 
+	mes "You may enter the dungeon now!"; 
+	set umbdun,1;
+	close; 
+M_DUN: 
+	mes "[Tree Guardian]"; 
+	if(umbdun != 1) mes "We do not permit weak people to enter!";
+	if(umbdun != 1) close;
+	mes "Come on in, brave warrior!"; 
+	warp "um_dun01.gat",42,30; 
+M_Leave:  
+	close; 
+}
+
+//==============================================================================
+//Skeletal Gate
+//==============================================================================
+umbala.gat,221,193,1	script	 #Skeletal Gate	111,{
+	if(event_umbala==7) goto LwarpNoText;
+	set @ryumon,0;
+	mes "^3355FFThe gate is shaped like a skeleton";
+	mes "You cannot pass this point as the gate is";
+	mes "locked.  You hear sounds coming from the";
+	mes "inside.^000000";
+	next;
+	menu "Examine the skeleton",-,"Nothing",Lend;
+		mes "^3355FFWhen you examine the gate";
+		mes "carefully, you notice that there";
+		mes "is a hole about the size of a gemstone";
+		mes "on the left side of the gate about where";
+		mes "the skeleton's left eye should be.  There is";
+		mes "a matching hole on the other side.^000000";
+		next;
+		mes "^3355FFWhat you would like to";
+		mes "to do with the left socket?^000000";
+		next;
+		menu "Nothing",-,"Insert a Blue Gemstone",L1_2,"Insert a Yellow Gemstone",L1_3,"Insert a Red Gemstone",L1_4;
+			mes "^3355FFNothing was inserted into the left socket.^000000";
+			next;
+			goto LRight;
+		L1_2:
+			//Blue
+			if(countitem(717) < 1) goto L1_2_e;//Items: Blue Gemstone,
+				mes "^3355FFYou inserted a Blue Gemstone into the";
+				mes "left socket.^000000";
+				next;
+				delitem 717,1;//Items: Blue Gemstone,
+				getitem 717,1;//Items: Blue Gemstone,
+				set @ryumon,1;
+				mes "^3355FFA rolling sound can be heard, and";
+				mes "the gemstone comes out of the skeleton's                                 mouth.^000000";
+				next;
+				goto LRight;
+		L1_3:
+			//Yellow
+			if(countitem(715) < 1) goto L1_3_e;//Items: Yellow Gemstone,
+				mes "^3355FFYou inserted a Yellow Gemstone into the";
+				mes "left socket.^000000";
+				next;
+				delitem 715,1;//Items: Yellow Gemstone,
+				getitem 715,1;//Items: Yellow Gemstone,
+				set @ryumon,2;
+				mes "^3355FFA rolling sound can be heard, and";
+				mes "the gemstone comes out of the skeleton's                                 mouth.^000000";
+				next;
+				goto LRight;
+		L1_4:
+			//Red
+			if(countitem(716) < 1) goto L1_4_e;//Items: Red Gemstone,
+				mes "^3355FFYou inserted a Red Gemstone into the";
+				mes "left socket.^000000";
+				next;
+				delitem 716,1;//Items: Red Gemstone,
+				getitem 716,1;//Items: Red Gemstone,
+				set @ryumon,3;
+				mes "^3355FFA rolling sound can be heard, and";
+				mes "the gemstone comes out of the skeleton's                                 mouth.^000000";
+				next;
+				goto LRight;
+			L1_2_e:
+				mes "^3355FFYou don't have a Blue Gemstone.";
+				goto L1_e;
+			L1_3_e:
+				mes "^3355FFYou don't have a Yellow Gemstone.";
+				goto L1_e;
+			L1_4_e:
+				mes "^3355FFYou don't have a Red Gemstone.";
+			L1_e:
+				mes "Therefore, nothing was inserted into";
+				mes "the left socket.^000000";
+				next;
+	LRight:
+		mes "^3355FFWhat about the right";
+		mes "socket?^000000";
+		next;
+		menu "Nothing",-,"Insert a Blue Gemstone",L2_2,"Insert a Yellow Gemstone",L2_3,"Insert a Red Gemstone",L2_4;
+			mes "^3355FFNothing was inserted into the right socket.^000000";
+			next;
+			goto Lfin;
+		L2_2:
+			//Blue
+			if(countitem(717) < 1) goto L2_2_e;//Items: Blue Gemstone,
+				mes "^3355FFYou inserted a Blue Gemstone into the";
+				mes "right socket.^000000";
+				next;
+				delitem 717,1;//Items: Blue Gemstone,
+				getitem 717,1;//Items: Blue Gemstone,
+				set @ryumon,@ryumon+10;
+				mes "^3355FFA rolling sound can be heard, and";
+				mes "the gemstone comes out of the skeleton's                                 mouth.^000000";
+				next;
+				goto Lfin;
+		L2_3:
+			//Yellow
+			if(countitem(715) < 1) goto L2_3_e;//Items: Yellow Gemstone,
+				mes "^3355FFYou inserted a Yellow Gemstone into the";
+				mes "right socket.^000000";
+				next;
+				delitem 715,1;//Items: Yellow Gemstone,
+				getitem 715,1;//Items: Yellow Gemstone,
+				set @ryumon,@ryumon+20;
+				mes "^3355FFA rolling sound can be heard, and";
+				mes "the gemstone comes out of the skeleton's                                 mouth.^000000";
+				next;
+				goto Lfin;
+		L2_4:
+			//Red
+			if(countitem(716) < 1) goto L2_4_e;//Items: Red Gemstone,
+				mes "^3355FFYou inserted a Red Gemstone into the";
+				mes "right socket.^000000";
+				next;
+				delitem 716,1;//Items: Red Gemstone,
+				getitem 716,1;//Items: Red Gemstone,
+				set @ryumon,@ryumon+30;
+				mes "^3355FFA rolling sound can be heard, and";
+				mes "the gemstone comes out of the skeleton's                                 mouth.^000000";
+				next;
+				goto Lfin;
+			L2_2_e:
+				mes "^3355FFYou don't have a Blue Gemstone.";
+				goto L2_e;
+			L2_3_e:
+				mes "^3355FFYou don't have a Yellow Gemstone.";
+				goto L2_e;
+			L2_4_e:
+				mes "^3355FFYou don't have a Red Gemstone.";
+			L2_e:
+				mes "Therefore, nothing was inserted into";
+				mes "the right socket.^000000";
+				next;
+			Lfin:
+				mes "^3355FF..........^000000";
+				next;
+				mes "^3355FF...................";
+				mes ".....................^000000";
+				next;
+				mes "^3355FF.......................";
+				mes ".........................";
+				mes ".........................^000000";
+				next;
+				if(event_umbala < 6) goto LSecondCheck;
+					if(@ryumon == 33) goto Lwarp;
+				LSecondCheck:
+				if(event_umbala >= 6) goto LNewEnd;
+					if(@ryumon == 13) goto Lwarp;
+					LNewEnd:
+						mes "^3355FFNothing happened.";
+						mes "You hear a faint laugh, but";
+						mes "decide that it's all in";
+						mes "your head.^000000";
+						close;
+				Lwarp:
+					mes "^3355FFA rumbling sound can be";
+					mes "heard as the gate opens.";
+					mes "As you step across the threshold.";
+					mes "you feel as if you're walking in";
+					mes "into the arms of death itself.^000000";
+					next;
+				LwarpNoText:
+					warp "um_in.gat",32,71;
+					close;
+Lend:
+	mes "^3355FFAfter hitting the gate a few";
+	mes "times with no result, you decide to give";
+	mes "up.^000000";
+	close;
+}
+
+//==============================================================================
+//Umbala Event
+//==============================================================================
+um_in.gat,39,122,5	script	Utan Tribal Elder	784,{
+	if(event_umbala == 1) goto LStart2;	
+	if(event_umbala == 2) goto LStart3;
+	if(event_umbala == 3) goto LStart4;
+	if(event_umbala == 4) goto LStart5;
+	if(event_umbala == 5) goto LStart6;
+	if(event_umbala == 6) goto LStart4;
+	if(event_umbala == 7) goto LStart4;
+	mes "[Karukatan]";
+	mes "Aha, You're new to the Utan";
+	mes "family's little village, aren't";
+	mes "you?  I would remember such a face";
+	mes "had I met you before.";
+	next;
+	mes "[Karukatan]";
+	mes "We know there is a wide world around";
+	mes "us, but the there is something to";
+	mes "be appreciated in the simple life";
+	mes "we lead here.";
+	next;
+	mes "[Karukatan]";
+	mes "All decisions in the village are made";
+	mes "by me or with my input";
+	next;
+	mes "[Karukatan]";
+	mes "You want to know how I speak your";
+	mes "language when it seems no one else in";
+	mes "the village does?  A fair question.";
+	mes "I picked up your tongue from the";
+	mes "adventurers who sometimes pass";
+	mes "through this village.";
+	next;
+	mes "[Karukatan]";
+	mes "Some outsiders have also settled near here";
+	mes "over time.  In exchange for information";
+	mes "about their customs and culture, I";
+	mes "teach them the language and customs";
+	mes "of the Utan tribe.";
+	next;
+	mes "[Karukatan]";
+	mes "If you want to learn our language,";
+	mes "you must immerse yourselves in";
+	mes "our customs and cultural traditions.";
+	mes "You should even try and look as much";
+	mes "like us as you can.";
+	next;
+	mes "[Karukatan]";
+	mes "I hope you're worthy of my confidence.";
+	mes "Some members of the tribe have expressed";
+	mes "the sentiment that welcoming outsiders";
+	mes "is dangerous to the village.";
+	next;
+	mes "[Karukatan]";
+	mes "When you want to begin learning the";
+	mes "language, come and visit me.  Don't";
+	mes "forget to make yourself appear as";
+	mes "much like us as you can.";
+	set event_umbala,1;
+	close;
+LStart2:
+	mes "[Karukatan]";
+	mes "Ahh, have you looked around the";
+	mes "village a bit?  Did other people";
+	mes "from the tribe hide from you when";
+	mes "they saw you?  Don't worry.  They";
+	mes "were just surprised to see a new face.";
+	next;
+	mes "[Karukatan]";
+	mes "Hmm?  You need something from me?";
+	mes "How can I make your stay in the village";
+	mes "more pleasant?";
+	next;
+	menu "I want to learn the tribal language",-,"Umbaumbaba?",L2,"Forget it",L3;
+		if ((getequipisequiped(9)>0) && (getequipisequiped(10)>0)) goto L1_mask;
+		mes "[Karukatan]";
+		mes "Well, in order to understand our";
+		mes "language, you need to assimilate";
+		mes "our cultural values, too.  Trying to";
+		mes "understand a language in the context of an";
+		mes "alien culture is foolish, right?";
+		next;
+		mes "[Karukatan]";
+		mes "Besides, if the tribesmen in the";
+		mes "village fear you, how will you";
+		mes "ever get them to speak with you?";
+		mes "You should try making yourself";
+		mes "look like us in order to be more";
+		mes "accepted.";
+		close;
+	L1_mask:
+		mes "[Karukatan]";
+		mes "What a cute mask.  The Utan tribe";
+		mes "appreciates its traditional masks";
+		mes "because sometimes by hiding your";
+		mes "face, you can express more genuine";
+		mes "feelings.";
+		next;
+		mes "[Karukatan]";
+		mes "Over time, the mask itself";
+		mes "has come to symbolize trust among";
+		mes "the members of the Utan tribe.";
+		next;
+		mes "[Karukatan]";
+		mes "Now that you're prepared, I will";
+		mes "begin teaching you the Utan";
+		mes "language as promised.  First,";
+		mes "you need to make some preparations,";
+		mes "however...";
+		next;
+		mes "[Karukatan]";
+		mes "First, I need some paper.  With";
+		mes "paper, I can write down the words";
+		mes "I intend to teach.";
+		next;
+		mes "[Karukatan]";
+		mes "I need ^3377FF10x Oil Paper^000000, and ^3377FF5x Slick Paper^000000.";
+		mes "I also need something to write with.";
+		mes "of course.";
+		mes "For that, ^3377FF1x Squid Ink^000000 and ^3377FF1x Feather of Birds^000000";
+		mes "will do nicely.";
+		next;
+		mes "[Karukatan]";
+		mes "Once you get these, I can start";
+		mes "teaching you the language.";
+		set event_umbala,2;
+		close;
+	L2:
+		mes "[Karukatan]";
+		mes "Haha.  Only imitating the sound";
+		mes "of the words is useless.  Even";
+		mes "though it sounds random, there is";
+		mes "a specific way of combining the";
+		mes "words.";
+		next;
+		mes "[Karukatan]";
+		mes "Also, our language has depends a";
+		mes "a lot on emotion to convey its";
+		mes "meaning.  Outsiders can't pick up";
+		mes "the subtlety right away, even though";
+		mes "we're the same race, ";
+		next;
+		mes "[Karukatan]";
+		mes "It seems you have an interest";
+		mes "in learning the language of the";
+		mes "Utan tribe.  If that's the case,";
+		mes "come visit me and I'll teach you.";
+		next;
+		mes "[Karukatan]";
+		mes "Then, you won't sound so silly.";
+		close;
+	L3:
+		mes "[Karukatan]";
+		mes "Ah.  If you want to continue your";
+		mes "trip, please keep this village in";
+		mes "your memories.";
+		close;
+LStart3:
+	if ((countitem(7151)>=10) && (countitem(7111)>=5) && (countitem(1024)>=1) && (countitem(916)>=1)) goto Lchkok;//Items: Oiled Paper, String Paper, Squid Ink, Feather of Birds,
+	mes "[Karukatan]";
+	mes "It seems you've not yet prepared the";
+	mes "proper items.  Did you forget what";
+	mes "you need to gather before I can";
+	mes "teach you the language?  You need to gather";
+	next;
+	mes "[Karukatan]";
+	mes "^3377FF10x Oil Paper^000000,";
+	mes "^3377FF5x Slick Paper^000000,";
+	mes "^3377FF1x Squid Ink^000000, and";
+	mes "^3377FF1x Feather of Bird^000000.";
+	mes "Once you have gathered those, I can teach";
+	mes "you Utan tribal language.";
+	close;
+Lchkok:
+	delitem 7151,10;//Items: Oiled Paper,
+	delitem 7111,5;//Items: String Paper,
+	delitem 1024,1;//Items: Squid Ink,
+	delitem 916,1;//Items: Feather of Birds,
+	mes "[Karukatan]";
+	mes "Good.  You've prepared all the";
+	mes "necessary materials.  Now, I can";
+	mes "begin to teach you the Utan tribal";
+	mes "language.";
+	next;
+	mes "[Karukatan]";
+	mes "............";
+	next;
+	mes "[Karukatan]";
+	mes "............";
+	mes "............";
+	next;
+	mes "[Karukatan]";
+	mes "............";
+	mes "............";
+	mes "............";
+	next;
+	mes "[Karukatan]";
+	mes "Do you feel more enlightened now?";
+	mes "Try talking to others in the Utan";
+	mes "tribe.  They'll warm up to your quickly";
+	mes "now that you speak the language.";
+	set event_umbala,3;
+	next;
+	mes "[Karukatan]";
+	mes "If you need something while you're";
+	mes "here, don't hesitate to visit me.";
+	close;
+LStart4:
+//fin
+	mes "[Karukatan]";
+	mes "Do you need something?";
+	mes "If you need someone to guide you around";
+	mes "the village, you should ask someone else.";
+	mes "I can't leave here right now.";
+	next;
+	mes "[Karukatan]";
+	mes "The best way to get a feel for";
+	mes "the village is to just walk";
+	mes "around and see the sights.  By doing";
+	mes "that, you can form a personal";
+	mes "bond with the village.";
+	close;
+LStart5:
+	mes "[Karukatan]";
+	mes "Oh, it seems you're enjoying yourself here.";
+	mes "You need something else?";
+	next;
+	mes "[Karukatan]";
+	mes "It seems you want to ask the";
+	mes "shaman Putsuchiratan something";
+	mes "and you're seeking my permission";
+	mes "to do so.";
+	next;
+	mes "[Karukatan]";
+	mes "Well...There's a mask from";
+	mes "abroad that Putsuchiratan and I";
+	mes "have both always desired.  Putsuchiratan";
+	mes "heard about it some time ago.";
+	next;
+	mes "[Karukatan]";
+	mes "If I could have the ^3377FFSmile Mask^000000,";
+	mes "it would be a great honour, but";
+	mes "I promised I would give it to";
+	mes "to Putsuchiratan as a gift if I ever";
+	mes "came across one.  If you can find a Smile Mask for me,";
+	mes "I'll give you permission to speak with her.";
+	set event_umbala,5;
+	close;
+LStart6:
+	if(countitem(2278) > 0) goto Lsmileok;//Items: Mr. Smile,
+	mes "[Karukatan]";
+	mes "Did you find the ^3377FFSmile Mask^000000 yet?";
+	mes "In order to let you see the shaman,";
+	mes "you need to collect one.";
+	mes "A gift will put Putsuchiritan in";
+	mes "a good mood, also.";
+	close;
+Lsmileok:
+	delitem 2278,1;//Items: Mr. Smile,
+	mes "[Karukatan]";
+	mes "Ahh!  It's a Smile Mask!";
+	mes "I would really like to put this";
+	mes "on just once, but I promised to";
+	mes "give this to Putsuchiritan as";
+	mes "a gift.";
+	set event_umbala,6;
+	next;
+	mes "[Karukatan]";
+	mes "I'll tell Putsuchiritan to allow you";
+	mes "to meet with her.  I'm certain that you";
+	mes "will find her talents to be a tremendous";
+	mes "help on your journey.";
+	close;
+}
+
+//=====================================================================
+//                    Create Essence/Dismantle Stone
+//=====================================================================
+um_in.gat,44,71,2	script	Utan Tribe Shaman	782,{
+
+	switch(event_umbala) {
+	default:	
+		mes "[?????]";
+		mes "Umbaumbaumbaba Utan Umbaba";
+		mes "Umbaumbaumbafumbabauma...";
+		mes "Umbabaumbaumbabaumbabaumba";
+		mes "Umbabaumbabaumbaumbabaumba";
+		mes "Fumbaumba.";
+		next;
+		warp "umbala.gat",217,186;
+		close;
+	case 3:	
+		mes "[Putsuchiritan]";
+		mes "I will not see outsiders that are";
+		mes "not from the Utan tribe.";
+		mes "...There are many things about the";
+		mes "nature of our society that you do";
+		mes "not yet understand.";
+		next;
+		mes "[Putsuchiritan]";
+		mes "Others of your type will do anything";
+		mes "to set foot on land which is sacred";
+		mes "to the Utan tribe.  We fear that";
+		mes "revealing our secrets will expose";
+		mes "use to danger.";
+		next;
+		mes "[Putsuchiritan]";
+		mes "What's worse, I don't think that";
+		mes "outsiders understand our desire";
+		mes "to preserve our tribal culture.";
+		next;
+		mes "[Putsuchiritan]";
+		mes "As my talents are foremost for";
+		mes "the use of the Utan tribe, you";
+		mes "must get permission from the elder";
+		mes "if you want my assistance.";
+		mes "Also, don't be stirring up trouble";
+		mes "among the tribesmen.";
+		set event_umbala,4;
+		close;
+	case 4:
+	case 5:
+		mes "[Putsuchiritan]";
+		mes "Didn't you hear me?  You need";
+		mes "to get the elder's permission before";
+		mes "I can help you.";
+		close;
+	case 6:
+		mes "[Putsuchiritan]";
+		mes "You seem to have gotten permission from";
+		mes "the elder.  Fine, I'll help you, though";
+		mes "I don't really want to.";
+		next;
+		mes "[Putsuchiritan]";
+		mes "I can call forth hidden talents";
+		mes "buried deep within your psyche";
+		mes "and tap the power hidden in";
+		mes "elemental stones.";
+		next;
+		mes "[Putsuchiritan]";
+		mes "I need to prepare my rituals.";
+		mes "When you're ready to proceed, please";
+		mes "talk to me again.";
+		set event_umbala,7;
+		close;
+	case 7:
+		mes "[Putsuchiritan]";
+		mes "I don't know whether my talents";
+		mes "will be useful to you, but I'll";
+		mes "help you anyway.";
+		next;
+		mes "[Putsuchiritan]";
+		mes "I can create elemental essence from natural objects,";
+		mes "or, dismantle elemental stones into their component essences.";
+		mes "Which would you like to do?";
+	}
+	
+	next;
+
+	set .@need,0;
+
+	switch (select("Create Essence","Dismantle Elemental Stone","Nothing")) {
+	case 1:
+		mes "[Putsuchiritan]";
+		mes "Which elemental essence would you";
+		mes "like to create?  I can create earth, water,";
+		mes "fire, and wind essence.";
+		next;
+		switch (select("Earth","Water","Fire","Wind")) {
+			case 1:
+				if(countitem(947)<15) {
+					mes "[Putsuchiritan]";
+					mes "Earth...You need that which is";
+					mes "a friend of the earth.  Explore";
+					mes "the verdant forest and find";
+					mes "^3377FF15x Horn^000000 for the ritual.";
+				}
+				else {
+					set .@need,947;
+					set .@amount,15;
+					set .@gain,993;
+				}
+				break;
+			case 2:
+				if(countitem(946)<20) {
+					mes "[Putsuchiritan]";
+					mes "Water...You need that which is";
+					mes "saturated with water.  Explore";
+					mes "the area around here and find";
+					mes "^3377FF20x Snails Shell^000000 for the ritual.";
+				}
+				else {
+					set .@need,946;
+					set .@amount,20;
+					set .@gain,991;
+				}
+				break;
+			case 3:
+				if(countitem(904)<20) {
+					mes "[Putsuchiritan]";
+					mes "Fire...You need that which";
+					mes "can withstand the roiling heat";
+					mes "of perpetual flame.  Explore the";
+					mes "desert and find ^3377FF20x Scorpion Tail^000000";
+					mes "for the ritual.";
+				}
+				else {
+					set .@need,904;
+					set .@amount,20;
+					set .@gain,990;
+				}
+				break;
+			case 4:
+				if(countitem(1013)<25) {
+					mes "[Putsuchiritan]";
+					mes "Wind...You need that which";
+					mes "has an easy camaraderie with";
+					mes "the sky itself.";
+					mes "You need ^3377FF25x Rainbow Shell^000000";
+					mes "to complete the ritual.";
+				}
+				else {
+					set .@need,1013;
+					set .@amount,25;
+					set .@gain,992;
+				}
+				break;
+		}
+		if(.@need == 0) {
+			next;
+			mes "[Putsuchiritan]";
+			mes "Once you've prepared these";
+			mes "objects from nature, please return here";
+			mes "so we can complete the ritual.";
+			close;
+		}
+		mes "[Putsuchiritan]";
+		mes "Now, I will try to tap the";
+		mes "source of power hidden deep within";
+		mes "you.  Choose a number between 1 and 9.";
+		mes "If you don't want to create essence";
+		mes "after all, choose 0.";
+		while(1) {
+			next;
+			input .@num;
+			if(.@num<=0) {
+				mes "[Putsuchiritan]";
+				mes "If you don't wish my help at the moment,";
+				mes "that's fine.  When you do, please come";
+				mes "by again.";
+				close;
+			}
+			if(.@num>9) {
+				mes "[Putsuchiritan]";
+				mes "You must choose a number between";
+				mes "1 and 9.  It is very important that";
+				mes "you choose the number most dear to";
+				mes "your heart.";
+				continue;
+			}
+			break;
+		}
+		mes "[Putsuchiritan]";
+		switch(.@need) {
+			case 947: mes "The horn begins to vibrate."; break;
+			case 904: mes "The tail begins to vibrate."; break;
+			default: mes "The shell begins to vibrate."; break;
+		}
+		mes "I will now chant a holy mantra.";
+		mes "Imagine the number in your mind";
+		mes "and imagine power radiating forth from";
+		mes "your body.";
+		next;
+		mes "[Putsuchiritan]";
+		mes "Amba Omba Sanba!  Unba Chi!";
+		mes "Wanbatauma Eurukaba!  Unba!  Ba!";
+		mes "Jyur!  Fumuba  Rurara!  Wamba!  Ra!";
+		mes "Damtsuha Ombabaraka! Unba! Shi!";
+		mes "Sukatamba Aburumba! Umba! Shi!";
+		next;
+		mes "[Putsuchiritan]";
+		if(countitem(.@need)<.@amount){
+			mes "You're An Amba HacK0R!";
+			mes "I'm clearing your mind!";
+			//we reset the whole quest for the hacker			
+			set event_umbala,0;
+			emotion e_swt,1;
+			close;
+		}
+		delitem .@need,.@amount;
+		if(!rand(10)){
+			getitem 910,1; //if failed get Garlet
+			mes "Your inner power has failed";
+			mes "to convert these objects";
+			mes "from nature into elemental essence...";
+			next;
+			mes "[Putsuchiritan]";
+			mes "Purify your mind and try again.";
+        		close;
+		}
+		getitem .@gain,1;
+		mes "There.  Your inner power has converted";
+		mes "these objects from nature into";
+		mes "elemental essence.  Put";
+		mes "it to good use.";
+		close;
+	case 2:
+		mes "[Putsuchiritan]";
+		mes "What type of stone would you like to";
+		mes "dismantle?  Please choose earth, water,";
+		mes "fire, or wind.";
+		next;
+		switch (select("Earth","Water","Fire","Wind")) {
+			case 1:
+				if(countitem(997)==0) {
+					mes "[Putsuchiritan]";
+					mes "You need to have";
+					mes "^3377FF1x Great Nature^000000";
+					mes "to disassemble into its";
+					mes "component essence.";
+				}
+				else {
+					set .@need,997;
+					set .@gain,993;
+				}
+				break;
+			case 2:
+				if(countitem(995)==0) {
+					mes "[Putsuchiritan]";
+					mes "You need to have";
+					mes "^3377FF1x Mystic Frozen^000000";
+					mes "to disassemble into its";
+					mes "component essence.";
+				}
+				else {
+					set .@need,995;
+					set .@gain,991;
+				}
+				break;
+			case 3:
+				if(countitem(994)==0) {
+					mes "[Putsuchiritan]";
+					mes "You need to have";
+					mes "^3377FF1x Flaming Heart^000000";
+					mes "to disassemble into its";
+					mes "component essence.";
+				}
+				else {
+					set .@need,994;
+					set .@gain,990;
+				}
+				break;
+			case 4:
+				if(countitem(996)==0) {
+					mes "[Putsuchiritan]";
+					mes "You need to have";
+					mes "^3377FF1x Rough Wind^000000";
+					mes "to disassemble into its";
+					mes "component essence.";
+				}
+				else {
+					set .@need,996;
+					set .@gain,992;
+				}
+				break;
+		}
+		next;
+		if(.@need == 0) {
+			mes "[Putsuchiritan]";
+			mes "Once you have the necessary stone,";
+			mes "please come back and visit me";
+			mes "so that the ritual can be completed.";
+			close;
+		}
+		mes "[Putsuchiritan]";
+		switch(.@need) {
+			case 997: mes "I will dismantle your earth crystal";	break;
+			case 995: mes "I will dismantle your frozen crystal";	break;
+			case 994: mes "I will dismantle your heart of flame"; 	break;
+			case 996: mes "I will dismantle your rough wind stone"; break;
+		}
+		mes "into its component essence.";
+		mes "Choose a number between 1 and 9.";
+		mes "If you don't want me to dismantle the";
+		mes "stone, choose 0.";
+		while(1) {
+			next;
+			input .@num;
+			if(.@num<=0) {
+				mes "[Putsuchiritan]";
+				mes "If you don't wish my help at the moment,";
+				mes "that's fine.  When you do, please come";
+				mes "by again.";
+				close;
+			}
+			if(.@num>9) {
+				mes "[Putsuchiritan]";
+				mes "You must choose a number between";
+				mes "1 and 9.  It is very important that";
+				mes "you choose the number most dear to";
+				mes "your heart.";
+				continue;
+			}
+			break;
+		}
+		set .@num,rand(1,10);	//official amount chance
+		if(.@num == 1)
+			set .@num,10;
+		else if(.@num == 2 || .@num == 3)
+			set .@num,8;
+		else if(.@num < 7)
+			set .@num,7;
+		else
+			set .@num,6;
+		mes "[Putsuchiritan]";
+		mes "Please place the elemental stone";
+		mes "inside this holy circle.  I will chant a";
+		mes "a mantra.  I don't know if I can";
+		mes "completely dismantle the stone,";
+		mes "but here goes...";
+		next;
+		mes "[Putsuchiritan]";
+		mes "Unba Unba Karama!  Unba!  Ta!";
+		mes "Rukara!  Ukarere!  Un!  Unba!  Ka!";
+		mes "Anburaka Taburaka Taburakan!  Unba Ra!";
+		mes "Onbaruzu Zan Kata!  Unba Ka!";
+		next;
+		mes "[Putsuchiritan]";
+		if(countitem(.@need)<1){
+			mes "You're An Amba HacK0R!";
+			mes "I'm clearing your mind!";
+			//we reset the whole quest for the hacker			
+			set event_umbala,0;
+			emotion e_swt,1;
+			close;
+		}
+		delitem .@need,1;
+		getitem .@gain,.@num;
+		mes "The elemental stone has been";
+		mes "dismantled into its natural";
+		mes "essence.  Please put it to";
+		mes "good use.";
+		close;
+	case 3:
+		mes "[Putsuchiritan]";
+		mes "If you don't wish my help at the moment,";
+		mes "that's fine.  When you do, please come";
+		mes "by again.";
+		close;
+	}
 }
\ No newline at end of file
diff --git a/npc/quests/quests_yuno.txt b/npc/quests/quests_yuno.txt
index d9a82cf5c..672d65c01 100644
--- a/npc/quests/quests_yuno.txt
+++ b/npc/quests/quests_yuno.txt
@@ -1,128 +1,128 @@
-//===== eAthena Script ======================================= 

-//= Quest NPCs related to Yuno

-//===== By: ================================================== 

-//= eAthena Dev Team

-//===== Current Version: ===================================== 

-//= 1.4

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//= Help the bros and get some rubies or gold. This quest is

-//= also used in part of the Alchemist job quest.

-//===== Additional Comments: ================================= 

-//= v1.1 Re-did the text and re-organized the script.  Corrected some items. [kobra_k88]

-//= v1.2 Added part to Bro's for alchemist quest [Darkchild]

-//= 1.3 fixed that part of Alch Job Quest. [Lupus]

-//= 1.4 Fixed exploit [Lupus]

-//============================================================ 

-

-

-//===========================================================================

-yuno_in01.gat,103,158,4	script	Bain	98,{

-	set @name$, "[Bain]";

-	

-OnStart:

-	mes @name$;

-	if(bros_q == 1) goto L_Check;

-	mes "We are going to invent a doll that can talk and communicate! Well, at least that's what I'm trying to do....";

-	mes "The idea came from an old tale about a doll that acted like a real person.";

-	next;

-	mes @name$;

-	mes "I figure if someone had the ability to make such a doll back then, then it should definitely be possible today.";

-	next;

-	mes @name$;

-	mes "Unfortunately I lack the proper supplies and parts to actually try and build the doll.";

-	mes "Although I can buy some of the things I need, many of these items can only be taken from monsters......";

-	next;

-	mes @name$;

-	mes "I am much to weak to defeat these monsters....... How will I be able to continue this project??.....";

-	next;

-	menu "I'll get the items for you.",-, "Good luck.",M_End;

-

-		mes @name$;

-		mes "Really? Such benevolence is rare in this day and age.  We would be grateful for you assisstance.";

-		mes "Here are the items that we will be needing.......";

-		callsub sF_List;

-		set bros_q, 1;

-		close;

-

-	M_End:

-		mes @name$;

-		mes "We'll need a lot of luck if this is going to happen.  If you know of anyone who can help us, please let us know.";

-		close;

-

-L_Check:

-	if(countitem(974) < 1 || countitem(612) < 5 || countitem(7068) < 5 || countitem(1003) < 5 || countitem(7043) < 5 || 

-		countitem(757) < 3 || countitem(756) < 3 || Zeny < 2000) goto L_NotEnuf;

-	delitem 974,1;

-	delitem 612,5;

-	delitem 7068,5;

-	delitem 1003,5;

-	delitem 7043,5;

-	delitem 757,3;

-	delitem 756,3;

-	set Zeny, Zeny-2000;

-	mes "Thank you very much! You found all of the items I needed.  We could not have completed this project without your help";

-	next;

-	mes @name$;

-	mes "Okay, let's try this out!";

-	mes "Hold on for just a second!";

-	next;

-	mes "-Vrrrmrmrmrmrmrmrrmrmrmmrmrmrmrmmm";

-	next;

-	mes "-Pakakakakakakakakakakakakakak";

-	next;

-	mes "-Shakakakakakakakakakakaakakak";

-	next;

-	mes @name$;

-	mes "AHHH it is a success!";

-	mes "I don't know if we can do anything else, but this time we have created";

-	set @wowitem,rand(2);

-	if(@wowitem == 0) mes "5 Ruby!";

-	if(@wowitem == 0) getitem 723,5;

-	if(@wowitem == 1) mes "3 Gold!";

-	if(@wowitem == 1) getitem 969,3;

-	if(ALCH_Q == 6) set ALCH_Q2, 2;	//for Alchemist Job Quest

-	set bros_q, 0;

-	next;

-	mes @name$;

-	mes "Now that we know that it works,";

-	mes "I don't have any need for this.";

-	mes "Why don't you take it? Oh,";

-	mes "and if you find anymore parts,";

-	mes "bring them to me again. Heheheheh.";

-	next;

-	mes @name$;

-	mes "Thanks for helping me out.";

-	mes "You have my eternal gratitude.";

-	mes "I wish you luck in your journeys!";

-	close;

-

-	L_NotEnuf:

-		mes "In case you forgot, these are the items that we will need.  I suggest you write them down......";

-		callsub sF_List;

-		close;

-

-sF_List:

-	next;

-	mes @name$;

-	mes "^5533FF1 Mixture";

-	mes "5 Mini-Furnaces";

-	mes "5 Burnt Trees";

-	mes "5 Coal";

-	mes "5 Fine Sand";

-	mes "3 Rough Elunium";

-	mes "3 Rough Oridecon^000000";

-	next;

-	mes @name$;

-	mes "We will also need ^5533FF2,000 zeny^000000.";

-	mes "The money will help pay for the minor expenses invovled in the undertaking of this project.  Good luck and please be safe.";

-	return;

-}

-

-//=====================================================================

-yuno_in01.gat,99,153,4	script	Bajin	47,{

-	set @name$, "[Bajin]";

-	doevent "Bain::OnStart";

-	close;

-}

+//===== eAthena Script ======================================= 
+//= Quest NPCs related to Yuno
+//===== By: ================================================== 
+//= eAthena Dev Team
+//===== Current Version: ===================================== 
+//= 1.4
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//= Help the bros and get some rubies or gold. This quest is
+//= also used in part of the Alchemist job quest.
+//===== Additional Comments: ================================= 
+//= v1.1 Re-did the text and re-organized the script.  Corrected some items. [kobra_k88]
+//= v1.2 Added part to Bro's for alchemist quest [Darkchild]
+//= 1.3 fixed that part of Alch Job Quest. [Lupus]
+//= 1.4 Fixed exploit [Lupus]
+//============================================================ 
+
+
+//===========================================================================
+yuno_in01.gat,103,158,4	script	Bain	98,{
+	set @name$, "[Bain]";
+	
+OnStart:
+	mes @name$;
+	if(bros_q == 1) goto L_Check;
+	mes "We are going to invent a doll that can talk and communicate! Well, at least that's what I'm trying to do....";
+	mes "The idea came from an old tale about a doll that acted like a real person.";
+	next;
+	mes @name$;
+	mes "I figure if someone had the ability to make such a doll back then, then it should definitely be possible today.";
+	next;
+	mes @name$;
+	mes "Unfortunately I lack the proper supplies and parts to actually try and build the doll.";
+	mes "Although I can buy some of the things I need, many of these items can only be taken from monsters......";
+	next;
+	mes @name$;
+	mes "I am much to weak to defeat these monsters....... How will I be able to continue this project??.....";
+	next;
+	menu "I'll get the items for you.",-, "Good luck.",M_End;
+
+		mes @name$;
+		mes "Really? Such benevolence is rare in this day and age.  We would be grateful for you assisstance.";
+		mes "Here are the items that we will be needing.......";
+		callsub sF_List;
+		set bros_q, 1;
+		close;
+
+	M_End:
+		mes @name$;
+		mes "We'll need a lot of luck if this is going to happen.  If you know of anyone who can help us, please let us know.";
+		close;
+
+L_Check:
+	if(countitem(974) < 1 || countitem(612) < 5 || countitem(7068) < 5 || countitem(1003) < 5 || countitem(7043) < 5 || 
+		countitem(757) < 3 || countitem(756) < 3 || Zeny < 2000) goto L_NotEnuf;
+	delitem 974,1;
+	delitem 612,5;
+	delitem 7068,5;
+	delitem 1003,5;
+	delitem 7043,5;
+	delitem 757,3;
+	delitem 756,3;
+	set Zeny, Zeny-2000;
+	mes "Thank you very much! You found all of the items I needed.  We could not have completed this project without your help";
+	next;
+	mes @name$;
+	mes "Okay, let's try this out!";
+	mes "Hold on for just a second!";
+	next;
+	mes "-Vrrrmrmrmrmrmrmrrmrmrmmrmrmrmrmmm";
+	next;
+	mes "-Pakakakakakakakakakakakakakak";
+	next;
+	mes "-Shakakakakakakakakakakaakakak";
+	next;
+	mes @name$;
+	mes "AHHH it is a success!";
+	mes "I don't know if we can do anything else, but this time we have created";
+	set @wowitem,rand(2);
+	if(@wowitem == 0) mes "5 Ruby!";
+	if(@wowitem == 0) getitem 723,5;
+	if(@wowitem == 1) mes "3 Gold!";
+	if(@wowitem == 1) getitem 969,3;
+	if(ALCH_Q == 6) set ALCH_Q2, 2;	//for Alchemist Job Quest
+	set bros_q, 0;
+	next;
+	mes @name$;
+	mes "Now that we know that it works,";
+	mes "I don't have any need for this.";
+	mes "Why don't you take it? Oh,";
+	mes "and if you find anymore parts,";
+	mes "bring them to me again. Heheheheh.";
+	next;
+	mes @name$;
+	mes "Thanks for helping me out.";
+	mes "You have my eternal gratitude.";
+	mes "I wish you luck in your journeys!";
+	close;
+
+	L_NotEnuf:
+		mes "In case you forgot, these are the items that we will need.  I suggest you write them down......";
+		callsub sF_List;
+		close;
+
+sF_List:
+	next;
+	mes @name$;
+	mes "^5533FF1 Mixture";
+	mes "5 Mini-Furnaces";
+	mes "5 Burnt Trees";
+	mes "5 Coal";
+	mes "5 Fine Sand";
+	mes "3 Rough Elunium";
+	mes "3 Rough Oridecon^000000";
+	next;
+	mes @name$;
+	mes "We will also need ^5533FF2,000 zeny^000000.";
+	mes "The money will help pay for the minor expenses invovled in the undertaking of this project.  Good luck and please be safe.";
+	return;
+}
+
+//=====================================================================
+yuno_in01.gat,99,153,4	script	Bajin	47,{
+	set @name$, "[Bajin]";
+	doevent "Bain::OnStart";
+	close;
+}
diff --git a/npc/quests/quiz/quiz_qt.txt b/npc/quests/quiz/quiz_qt.txt
index 6d5347db5..584465804 100644
--- a/npc/quests/quiz/quiz_qt.txt
+++ b/npc/quests/quiz/quiz_qt.txt
@@ -1,2139 +1,2139 @@
-//===== eAthena Script ======================================= 

-//= Quiz (Revolution) Part 1

-//===== By: ================================================== 

-//= CAHTXHuK

-//===== Current Version: ===================================== 

-//= 1.0

-//===== Compatible With: ===================================== 

-//= eAthena 1.0

-//===== Description: ========================================= 

-//= 

-//===== Additional Comments: ================================= 

-//= 

-//============================================================ 

-

-//=========================================================================================================================================

-prontera.gat,152,286,4	script	Receptionist::RecepQuiz	755,{

-

-if (countitem(1201) > 3) goto M_MaxItem;

-if (checkweight(1201,3) == 0 ) goto L_OverWeight;

-

-

-if(BaseLevel < 20){

-			mes "^2f4f4f[Tsuji]^000000";

-			mes "Hello";

-			mes "This is Tsuji who is in charge of";

-			mes "receiving application forms for";

-			mes "Quiz Revolution event.";

-			next;

-			mes "^2f4f4f[Tsuji]^000000";

-			mes "Zonda corporation has prepared";

-			mes "^0000ffQuiz Revolution^000000 event to";

-			mes "provide fun and excitement";

-			mes "to all of you.";

-			mes "Please read the following explanation and";

-			mes "participate in this event.";

-			next;

-			mes "^2f4f4f[Tsuji]^000000";

-			mes "This Quiz Revolution event is..";

-			mes "operated in a different way compared to the previous one.";

-			mes "The event will only be open for those who wish to participate in the game.";

-			mes "Also, the ^006400Quiz Tickets^000000 will be given to those who";

-			mes "pass simple tests to check if the player is worthy of";

-			mes "playing the game.";

-			next;

-			mes "^2f4f4f[Tsuji]^000000";

-			mes "The assessment will be made through";

-			mes "^006400four simple tests^000000";

-			mes "For the ones who pass all four tests";

-			mes "will receive the quiz ticket of the";

-			mes "Quiz Revolution event.";

-			next;

-			mes "^2f4f4f[Tsuji]^000000";

-			mes "Hmm?! Wait a sec.";

-			mes "If you wish to join Quiz Revolution event";

-			mes "you should have base level";

-			mes "20 or above.";

-			mes "Please go and return after raising the";

-			mes "level to the expected point.";

-			close;

-

-} else if (quiz_rvl > 2) {

-

-			mes "^2f4f4f[Tsuji]^000000";

-			mes "The event for all of you!";

-			mes "Quiz Revolution is about to start.";

-			mes "Please show us a lot of";

-			mes "participation.";

-			mes "And don't forget to bring the admission ticket~~";

-			close;

-

-} else if (quiz_rvl == 2) {

-

-			mes "^2f4f4f[Tsuji]^000000";

-			mes "You have already passed the first test.";

-			mes "Please visit 'Payon' and find";

-			mes "'Seeil'.";

-			mes "Seeil will give the second test.";

-			close;

-

-} else if (quiz_rvl == 1) {

-

-			mes "^2f4f4f[Tsuji]^000000";

-			mes "^0000ff" +strcharinfo(0)+ "^000000.";

-			mes "You have to take the retest";

-			mes "to pass the test.";

-			mes "Will you accept it?";

-			next;

-				menu "Yes",-,"No",sM1_No;

-

-

-						mes "^2f4f4f[Tsuji]^000000";

-						mes "Very well.";

-						mes "I hope you pass the test this time..";

-						mes "Here are the questions.";

-						set @test_soonsu, rand(2);

-						set @score_test, 0;

-						next;

-

-							if (@test_soonsu == 0){

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "1st question.";

-								mes "Ragnarok is a MMORPG game.";

-								mes "Please choose O and X.";

-

-								next;

-									menu "O",-,"X",X1;

-

-									set @score_test, @score_test + 10;

-

-								X1:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "2nd question.";

-								mes "Ragnarok's monetary unit is 'Zeny'.";

-								next;

-									menu "O",-,"X",X2;

-

-									set @score_test, @score_test + 10;

-

-								X2:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "3rd question.";

-								mes "If an unknown person is attacking a monster";

-								mes "you have to attack the same monster together.";

-								next;

-									menu "O",X3,"X",-;

-

-									set @score_test, @score_test + 10;

-								X3:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "4th question.";

-								mes "'Payon' is the capital of 'Rune Midgarts'.";

-								next;

-									menu "O",X4,"X",-;

-

-									set @score_test, @score_test + 10;

-

-								X4:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "5th question.";

-								mes "There are ships in 'Alberta'.";

-								next;

-									menu "O",-,"X",X5;

-

-									set @score_test, @score_test + 10;

-

-								X5:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "6th question.";

-								mes "A job class that can use";

-								mes "'Grand Cross' is";

-								mes "'Lord Knight'.";

-								next;

-									menu "O",X6,"X",-;

-

-									set @score_test, @score_test + 10;

-

-								X6:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "7th question.";

-								mes "When 'Bard' screams, the oppenet can be 'sturn status'";

-								mes "in regular probability.";

-								next;

-									menu "O",X7,"X",-;

-

-									set @score_test, @score_test + 10;

-

-								X7:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "8th question.";

-								mes "'Baphomet'is a tool";

-								mes "for killing mosquitos.";

-								next;

-									menu "O",X8,"X",-;

-

-									set @score_test, @score_test + 10;

-

-								X8:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "9th question.";

-								mes "'Swordman' can class change to";

-								mes "'Ambernite'.";

-								next;

-									menu "O",X9,"X",-;

-

-									set @score_test, @score_test + 10;

-

-								X9:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "The last question.";

-								mes "A fine horse, which appears in North european Myth";

-								mes "'Sleipnir' has five legs.";

-								next;

-									menu "O",X0,"X",-;

-

-									set @score_test, @score_test + 10;

-

-								goto X0;

-

-

-							} else if (@test_soonsu == 1){

-

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "1st question.";

-								mes "Ragnarok is a MMORPG game.";

-								mes "Please choose O and X.";

-								next;

-									menu "O",-, "X",X1_1;

-

-									set @score_test, @score_test + 10;

-

-								X1_1:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "2nd question.";

-								mes "'Valkyrie' who appears in North european Myth";

-								mes "is the godess of Love.";

-								next;

-									menu "O",X1_2,"X",-;

-										set @score_test, @score_test + 10;

-

-								X1_2:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "3rd question.";

-								mes "'Bethoven' composed the classic";

-								mes "'Moon Light sonata'.";

-								next;

-									menu "O",-, "X",X1_3;

-

-									set @score_test, @score_test + 10;

-

-								X1_3:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "4th question.";

-								mes "Orcs that exsits in the world of Ragnarok";

-								mes "are divided into 7 types.";

-								next;

-									menu "O",X1_4,"X",-;

-										set @score_test, @score_test + 10;

-

-								X1_4:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "5th question.";

-								mes "'Cobolt Card' can be installed";

-								mes "into";

-								mes "shield items.";

-									next;

-									menu "O",X1_5,"X",-;

-										set @score_test, @score_test + 10;

-

-								X1_5:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "6th question.";

-								mes "'Katar'is exclusive use of Assassins.";

-								next;

-									menu "O",-, "X",X1_6;

-

-									set @score_test, @score_test + 10;

-

-								X1_6:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "7th questino.";

-								mes "'Emperium' is a material for";

-								mes "refining.";

-									next;

-									menu "O",X1_7,"X",-;

-										set @score_test, @score_test + 10;

-

-								X1_7:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "8th question.";

-								mes "'Payon' is a village of bandits.";

-									next;

-									menu "O",X1_8,"X",-;

-										set @score_test, @score_test + 10;

-

-								X1_8:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "9th question.";

-								mes "'Prontera' is the only place where";

-								mes "to class change into 'Swordman'.";

-								next;

-									menu "O",X1_9,"X",-;

-										set @score_test, @score_test + 10;

-

-								X1_9:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "The last question.";

-								mes "A monster 'Merman' is a human type.";

-								next;

-									menu "O",-, "X",X0;

-

-									set @score_test, @score_test + 10;

-

-								goto X0;

-

-								} else if (@test_soonsu == 2){

-

-								mes "1st question.";

-								mes "Ragnarok is a MMORPG game.";

-								mes "Please choose O and X.";

-								next;

-									menu "O",-, "X",X2_1;

-

-									set @score_test, @score_test + 10;

-

-								X2_1:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "2nd question.";

-								mes "The cloesest village from Pyramid Dugeon is 'Morroc'.";

-								next;

-									menu "O",-, "X",X2_2;

-

-									set @score_test, @score_test + 10;

-

-								X2_2:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "3rd question.";

-								mes "A merchant association is located in 'Al De Baran'.";

-								next;

-									menu "O",X2_3,"X",-;

-										set @score_test, @score_test + 10;

-

-								X2_3:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "4th question.";

-								mes "Acolyte can";

-								mes "class change to";

-								mes "'Sage' and 'Priest'.";

-								next;

-									menu "O",X2_4,"X",-;

-										set @score_test, @score_test + 10;

-

-								X2_4:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "5th question.";

-								mes "When reached base level 10";

-								mes "can be class changed to 1st job10.";

-								next;

-									menu "O",X2_5,"X",-;

-										set @score_test, @score_test + 10;

-

-								X2_5:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "6th question.";

-								mes "'Bowling Bash' can not be activated";

-								mes "without equip";

-								mes "'Two handed sword'.";

-								next;

-									menu "O",X2_6,"X",-;

-										set @score_test, @score_test + 10;

-

-								X2_6:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "7th question.";

-								mes "When Priest uses 'Signum Crusis'";

-								mes "all monsters' defense will decrease";

-								mes "in regular probability.";

-								next;

-									menu "O",X2_7,"X",-;

-										set @score_test, @score_test + 10;

-

-								X2_7:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "8th question.";

-								mes "'Wizard' will use a Blue gemstone";

-								mes "when casts 'Fire Pillar'.";

-								next;

-									menu "O",-, "X",X2_8;

-

-									set @score_test, @score_test + 10;

-

-								X2_8:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "9th question.";

-								mes "A name of Assassin's exclusive weapon'";

-								mes "'Katar' that gives";

-								mes "additional 50% damage to human type";

-								mes "is 'Infiltrator'.";

-								next;

-									menu "O",X2_9,"X",-;

-										set @score_test, @score_test + 10;

-

-								X2_9:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "10th question.";

-								mes "'Fire' is the most effective";

-								mes "property against to 'water'.";

-								next;

-									menu "O",X0,"X",-;

-										set @score_test, @score_test + 10;

-

-

-							X0:

-							mes "^2f4f4f[Tsuji]^000000";

-							mes "Well done~";

-							mes "You have solved all the 10 questions.";

-							mes "Let me check";

-							mes "how many you got?";

-							mes "^ff0000If you don't get a perfect score, you have to re-test~^000000";

-							next;

-							mes "^2f4f4f[Tsuji]^000000";

-							mes "Wait a moment please.";

-							mes "Grading.";

-							mes ". . . . . . . . . . . . . . .";

-							mes ". . . . . . . . . . . . . . .";

-							mes ". . . . . . . . . . . . . . .";

-							next;

-							mes "^2f4f4f[Tsuji]^000000";

-							mes "Hum . . . . . . . . . . . . .";

-							mes ". . . . . . . . . . . . . . .";

-							mes ". . . . . . . . . . . . . . .";

-							next;

-							mes "^2f4f4f[Tsuji]^000000";

-							mes "OK, finished grading.";

-							mes "I will tell your score.";

-							next;

-								if (@score_test > 99) {

-									mes "^2f4f4f[Tsuji]^000000";

-									mes "Your score is ^2f4f4f" + @score_test + "^000000!";

-									mes "You have";

-									mes "qualified to participate in";

-									mes "Quiz Revolution.";

-									mes "You have cleared the 1st test!";

-									next;

-									mes "^2f4f4f[Tsuji]^000000";

-									mes "This is a reward";

-									mes "from us.";

-									mes "Please accept it.";

-									set quiz_rvl,2;

-									getitem 501,10; //Red_Potion

-									next;

-									mes "^2f4f4f[Tsuji]^000000";

-									mes "Now, the 2nd test is";

-									mes "ready.";

-									mes "Go to 'Payon' and meet";

-									mes "'Seeil'.";

-									mes "You can get the 2nd test";

-									mes "from him.";

-									next;

-									mes "^2f4f4f[Tsuji]^000000";

-									mes "You have no business with me";

-									mes "Have a good day.";

-									close;

-									}

-								} else	{

-									set quiz_rvl,1;

-									mes "^2f4f4f[Tsuji]^000000";

-									mes "You score is ^2f4f4f" + @score_test + "^000000.";

-									mes "You did not get a perfect score.";

-									mes "I do not tell you";

-									mes "where you got wrong.";

-									mes "You have to take the test again.";

-									close;

-									}

-

-					sM1_No:

-						mes "^2f4f4f[Tsuji]^000000";

-						mes "Oh, really?";

-						mes "Well, it's up to you.";

-						mes "Too bad.";

-						mes "If you change your mind,";

-						mes "let me know.";

-						close;

-

-

-} else if (quiz_rvl == 0) && (BaseLevel > 19) {

-

-

-			mes "^2f4f4f[Tsuji]^000000";

-			mes "Hello";

-			mes "This is Tsuji who is in charge of";

-			mes "receiving application forms for";

-			mes "Quiz Revolution event.";

-			next;

-			mes "^2f4f4f[Tsuji]^000000";

-			mes "Zonda corporation has prepared";

-			mes "^0000ffQuiz Revolution^000000 event to";

-			mes "provide fun and excitement";

-			mes "to all of you.";

-			mes "Please read the following explanation and";

-			mes "participate in this event.";

-			next;

-			mes "^2f4f4f[Tsuji]^000000";

-			mes "This Quiz Revolution event is..";

-			mes "operated in a different way compared to the previous one.";

-			mes "The event will only be open for those who wish to participate in the game.";

-			mes "Also, the ^006400Quiz Tickets^000000 will be given to those who";

-			mes "pass simple tests to check if the player is worthy of";

-			mes "playing the game.";

-			next;

-			mes "^2f4f4f[Tsuji]^000000";

-			mes "The assessment will be made through";

-			mes "^006400four simple tests^000000";

-			mes "For the ones who pass all four tests";

-			mes "will receive the quiz ticket of the";

-			mes "Quiz Revolution event.";

-			next;

-			mes "^2f4f4f[Tsuji]^000000";

-			mes "There is a saying,";

-			mes "^dc143c'No pain no gain!'^000000";

-			mes "Hmm.. I don't think I know exactly what it means.";

-			mes "Anyway, I hope you pass all the tests";

-			mes "and receive the quiz ticket";

-			mes "required for the Quiz Revolution event.";

-			next;

-			mes "^2f4f4f[Tsuji]^000000";

-			mes "So~ Will you now take the";

-			mes "four test to attain the quiz ticket for";

-			mes "the Quiz Revolution event?";

-			next;

-				menu "Yes",-,"No",sM2_No;

-

-

-						mes "^2f4f4f[Tsuji]^000000";

-						mes "Good.";

-						mes "The first one is the ^191970'knowledge test'^000000.";

-						mes "I give out the questions and the player has to choose";

-						mes "an answer using O and X.";

-						next;

-						mes "^2f4f4f[Tsuji]^000000";

-						mes "For your information, the player must get ^dc143ceverything right^000000, ";

-						mes "to become eligible for the quiz event";

-						mes "so please take your time solving questions.";

-						next;

-						mes "^2f4f4f[Tsuji]^000000";

-						mes "I wish many players participate";

-						mes "Quiz Revolution event.";

-						mes "I will try to give out easy";

-						mes "questions. Muhaha!";

-						next;

-						mes "^2f4f4f[Tsuji]^000000";

-						mes "Then let us start.";

-						mes "Read the question carefully and choose";

-						mes "the right answer.";

-						set @test_soonsu, rand(2);

-						set @score_test, 0;

-						next;

-

-

-							if (@test_soonsu == 0) {

-							mes "^2f4f4f[Tsuji]^000000";

-								mes "1st question.";

-								mes "Ragnarok is a MMORPG game.";

-								mes "Please choose O and X.";

-								next;

-									menu "O",-, "X",X3_1;

-

-									set @score_test, @score_test + 10;

-

-								X3_1:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "2nd question.";

-								mes "Ragnarok's monetary unit is 'Zeny'.";

-									next;

-									menu "O",-, "X",X3_2;

-

-									set @score_test, @score_test + 10;

-

-								X3_2:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "3rd question.";

-								mes "If an unknown person is attacking a monster";

-								mes "you have to attack the same monster together.";

-									next;

-									menu "O",X3_3, "X",-;

-

-									set @score_test, @score_test + 10;

-

-								X3_3:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "4th question.";

-								mes "'Payon' is the capital of 'Rune Midgarts'.";

-									next;

-									menu "O",-, "X",X3_4;

-

-									set @score_test, @score_test + 10;

-

-								X3_4:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "5th question.";

-								mes "There are ships in 'Alberta'.";

-									next;

-									menu "O",-, "X",X3_5;

-

-									set @score_test, @score_test + 10;

-

-								X3_5:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "6th question.";

-								mes "A job class that can use";

-								mes "'Grand Cross' is";

-								mes "'Lord Knight'.";

-								next;

-									menu "O",X3_6, "X",-;

-

-									set @score_test, @score_test + 10;

-

-								X3_6:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "7th question.";

-								mes "When 'Bard' screams, the oppenet can be 'sturn status'";

-								mes "in regular probability.";

-									next;

-									menu "O",X3_7, "X",-;

-

-									set @score_test, @score_test + 10;

-

-								X3_7:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "8th question.";

-								mes "'Baphomet'is a tool";

-								mes "for killing mosquitos.";

-									next;

-									menu "O",X3_8, "X",-;

-

-									set @score_test, @score_test + 10;

-

-								X3_8:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "9th question.";

-								mes "'Swordman' can class change to";

-								mes "'Ambernite'.";

-									next;

-									menu "O",X3_9, "X",-;

-

-									set @score_test, @score_test + 10;

-

-								X3_9:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "The last question.";

-								mes "A fine horse, which appears in North european Myth";

-								mes "'Sleipnir' has five legs.";

-									next;

-									menu "O",Y0, "X",-;

-

-									set @score_test, @score_test + 10;

-

-								goto Y0;

-

-

-							} else if (@test_soonsu == 1) {

-

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "1st question.";

-								mes "Ragnarok is a MMORPG game.";

-								mes "Please choose O and X.";

-									next;

-									menu "O",-, "X",X4_1;

-

-									set @score_test, @score_test + 10;

-

-								X4_1:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "2nd question.";

-								mes "'Valkyrie' who appears in North european Myth";

-								mes "is the godess of Love.";

-									next;

-									menu "O",X4_2, "X",-;

-

-									set @score_test, @score_test + 10;

-

-								X4_2:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "3rd question.";

-								mes "'Bethoven' composed the classic";

-								mes "'Moon Light sonata'.";

-									next;

-									menu "O",-, "X",X4_3;

-

-									set @score_test, @score_test + 10;

-

-								X4_3:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "4th question.";

-								mes "Orcs that exsits in the world of Ragnarok";

-								mes "are divided into 7 types.";

-									next;

-									menu "O",X4_4, "X",-;

-

-									set @score_test, @score_test + 10;

-

-								X4_4:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "5th question.";

-								mes "'Cobolt Card' can be installed";

-								mes "into";

-								mes "shield items.";

-									next;

-									menu "O",X4_5, "X",-;

-

-									set @score_test, @score_test + 10;

-

-								X4_5:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "6th question.";

-								mes "'Katar'is exclusive use of Assassins.";

-									next;

-									menu "O",-, "X",X4_6;

-

-									set @score_test, @score_test + 10;

-

-								X4_6:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "7th questino.";

-								mes "'Emperium' is a material for";

-								mes "refining.";

-									next;

-									menu "O",X4_7, "X",-;

-

-									set @score_test, @score_test + 10;

-

-								X4_7:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "8th question.";

-								mes "'Payon' is a village of bandits.";

-									next;

-									menu "O",X4_8, "X",-;

-

-									set @score_test, @score_test + 10;

-

-								X4_8:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "9th question.";

-								mes "'Prontera' is the only place where";

-								mes "to class change into 'Swordman'.";

-									next;

-									menu "O",X4_9, "X",-;

-

-									set @score_test, @score_test + 10;

-

-								X4_9:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "The last question.";

-								mes "A monster 'Merman' is a human type.";

-									next;

-									menu "O",-, "X",Y0;

-

-									set @score_test, @score_test + 10;

-

-								goto Y0;

-

-							} else if (@test_soonsu == 2) {

-

-

-								mes "1st question.";

-								mes "Ragnarok is a MMORPG game.";

-								mes "Please choose O and X.";

-									next;

-									menu "O",-, "X",X5_1;

-

-									set @score_test, @score_test + 10;

-

-								X5_1:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "2nd question.";

-								mes "The cloesest village from Pyramid Dugeon is 'Morroc'.";

-								next;

-									menu "O",-, "X",X5_2;

-

-									set @score_test, @score_test + 10;

-

-								X5_2:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "3rd question.";

-								mes "A merchant association is located in 'Al De Baran'.";

-								next;

-									menu "O",X5_3, "X",-;

-

-									set @score_test, @score_test + 10;

-

-								X5_3:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "4th question.";

-								mes "Acolyte can";

-								mes "class change to";

-								mes "'Sage' and 'Priest'.";

-								next;

-									menu "O",X5_4, "X",-;

-

-									set @score_test, @score_test + 10;

-

-								X5_4:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "5th question.";

-								mes "When reached base level 10";

-								mes "can be class changed to 1st job10.";

-								next;

-									menu "O",X5_5, "X",-;

-

-									set @score_test, @score_test + 10;

-

-								X5_5:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "6th question.";

-								mes "'Bowling Bash' can not be activated";

-								mes "without equip";

-								mes "'Two handed sword'.";

-								next;

-									menu "O",X5_6, "X",-;

-

-									set @score_test, @score_test + 10;

-

-								X5_6:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "7th question.";

-								mes "When Priest uses 'Signum Crusis'";

-								mes "all monsters' defense will decrease";

-								mes "in regular probability.";

-								next;

-									menu "O",X5_7, "X",-;

-

-									set @score_test, @score_test + 10;

-

-								X5_7:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "8th question.";

-								mes "'Wizard' will use a Blue gemstone";

-								mes "when casts 'Fire Pillar'.";

-								next;

-									menu "O",-, "X",X5_8;

-

-									set @score_test, @score_test + 10;

-

-								X5_8:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "9th question.";

-								mes "A name of Assassin's exclusive weapon'";

-								mes "'Katar' that gives";

-								mes "additional 50% damage to human type";

-								mes "is 'Infiltrator'.";

-								next;

-									menu "O",X5_9, "X",-;

-

-									set @score_test, @score_test + 10;

-

-								X5_9:

-								mes "^2f4f4f[Tsuji]^000000";

-								mes "10th question.";

-								mes "'Fire' is the most effective";

-								mes "property against to 'water'.";

-								next;

-									menu "O",Y0, "X",-;

-

-									set @score_test, @score_test + 10;

-

-

-

-							Y0:

-							mes "^2f4f4f[Tsuji]^000000";

-							mes "Well done~";

-							mes "You have solved all the 10 questions.";

-							mes "Let me check";

-							mes "how many you got?";

-							mes "^ff0000If you don't get a perfect score, you have to re-test~^000000";

-							next;

-							mes "^2f4f4f[Tsuji]^000000";

-							mes "Wait a moment please.";

-							mes "Grading.";

-							mes ". . . . . . . . . . . . . . .";

-							mes ". . . . . . . . . . . . . . .";

-							mes ". . . . . . . . . . . . . . .";

-							next;

-							mes "^2f4f4f[Tsuji]^000000";

-							mes "Hum . . . . . . . . . . . . .";

-							mes ". . . . . . . . . . . . . . .";

-							mes ". . . . . . . . . . . . . . .";

-							next;

-							mes "^2f4f4f[Tsuji]^000000";

-							mes "OK, finished grading.";

-							mes "I will tell your score.";

-							next;

-								if (@score_test > 99) {

-									mes "^2f4f4f[Tsuji]^000000";

-									mes "Your score is ^2f4f4f" + @score_test + "^000000!";

-									mes "You have";

-									mes "qualified to participate in";

-									mes "Quiz Revolution.";

-									mes "You have cleared the 1st test!";

-									next;

-									mes "^2f4f4f[Tsuji]^000000";

-									mes "This is a reward";

-									mes "from us.";

-									mes "Please accept it.";

-									set quiz_rvl,2;

-									getitem 501,10; //Red_Potion

-									next;

-									mes "^2f4f4f[Tsuji]^000000";

-									mes "Now, the 2nd test is";

-									mes "ready.";

-									mes "Go to 'Payon' and meet";

-									mes "'Seeil'.";

-									mes "You can get the 2nd test";

-									mes "from him.";

-									next;

-									mes "^2f4f4f[Tsuji]^000000";

-									mes "You have no business with me";

-									mes "Have a good day.";

-									close;

-								} else {

-									set quiz_rvl,1;

-									mes "^2f4f4f[Tsuji]^000000";

-									mes "You score is ^2f4f4f" + @score_test + "^000000.";

-									mes "You did not get a perfect score.";

-									mes "I do not tell you";

-									mes "where you got wrong.";

-									mes "You have to take the test again.";

-									close;

-									}

-

-

-					sM2_No:

-						mes "^2f4f4f[Tsuji]^000000";

-						mes "Oh, really?";

-						mes "Well, it's up to you.";

-						mes "Too bad.";

-						mes "If you change your mind,";

-						mes "let me know.";

-						close;

-	}

-}

-M_MaxItem:

-			mes "^2f4f4f[Tsuji]^000000";

-	  		mes "- Wait a minute !! -";

-		 	mes "- You currently have too many items that -";

-	   		mes "- you can't receive an item. -";

-			mes "- Please loose some weight -";

-	   		mes "- and try again. -";

-			close;

-

-L_OverWeight:

-			mes "^2f4f4f[Tsuji]^000000";

-	  		mes "- Wait a minute !! -";

-		 	mes "- You currently have too many items that -";

-	   		mes "- you can't receive an item. -";

-			mes "- Please loose some weight -";

-	   		mes "- and try again. -";

-			close;

-}

-

-//======================================payon=================================

-payon.gat,85,133,4	duplicate(RecepQuiz)	Receptionist#2	755

-//======================================geffen================================

-geffen.gat,111,104,4	duplicate(RecepQuiz)	Receptionist#3	755

-//====================================morocc==================================

-morocc.gat,148,272,5	duplicate(RecepQuiz)	Receptionist#4	755

-//=============================Alberta========================================

-alberta.gat,29,241,4	duplicate(RecepQuiz)	Receptionist#5	755

-//============================================================================

-

-//===================Quiz Revolution 2nd quest collecting job items==================

-payon.gat,111,117,3	script	Seeil	89,{

-if (countitem(1201) > 3) goto M_MaxItem;

-if (checkweight(1201,3) == 0 ) goto L_OverWeight;

-

-	if (quiz_rvl > 13) {

-		mes "[Seeil]";

-		mes "How was the last test? I hope you do this";

-		mes "one well.";

-		close;

-	} else if (quiz_rvl == 13) {

-		mes "[Seeil]";

-		mes "Since you have cleared the conditions to receive the";

-		mes "last test, please go and visit Radeng in Prontera.";

-		mes "During that time, I will transfer";

-		mes "will transfer all";

-		mes "your data.";

-		next;

-		mes "[Seeil]";

-		mes "So this is the last one. Show me some spirit!";

-		mes "This is a present to encourage you! Take it!";		

-		set quiz_rvl,14;

-		getitem 503,10; //Yellow_Potion

-		close;

-

-	} else if (quiz_rvl > 6) && (quiz_rvl < 13) {

-		mes "[Seeil]";

-		mes "Eh? You didn't finish the marathon test and";

-		mes "came out in the middle of the test.";

-		mes "Oh my.. I don't know how you came out, but";

-		mes "this can't be like this. I will send you";

-		mes "once again!";

-		close2;

-		set quiz_rvl,6;

-		warp "quiz_test.gat",385,388;

-		end;

-

-	} else if (quiz_rvl == 6) {

-		mes "[Seeil]";

-		mes "Ho.. You are fast. Well...";

-		mes "All the preparations have been made so I can send";

-		mes "you to the next stage. This will test your patience";

-		mes "and endurance. It will not be require to use your brain";

-		mes "this time. All you have to do is.. just run.";

-		next;

-		mes "[Seeil]";

-		mes "You can't come back from there until";

-		mes "you finish. Are you ready?";

-		mes "Will you take the third test";

-		mes "now?";

-		next;

-		menu "Take the test",-,"Refuse to take the test",M2_S;

-

-				mes "[Seeil]";

-				mes "Okay! I hope you do well and";

-				mes "pass the test.";

-				mes "Go for it!";

-				close2;

-				warp "quiz_test.gat",385,388;

-				end;

-

-			M2_S:

-				mes "[Seeil]";

-				mes "Oh my gosh, you are not ready";

-				mes "yet. I don't have any intention to";

-				mes "force you so whenever you are ready";

-				mes "please come back to me. Ha ha ha.";

-				close;

-

-				

-	} else if (quiz_rvl == 3) {

-		if (countitem(902) > 39) && (countitem(908) > 39) && (countitem(909) > 39) {

-			mes "[Seeil]";

-			mes "Wow. You have collected the requested items.";

-			mes "So I will keep my promise. Before that";

-			mes "this is a present for you.. Please";

-			mes "take it.";

-			delitem 902,40;

-			delitem 908,40;

-			delitem 909,40;

-			set quiz_rvl,6;

-			getitem 502,10; //Orange_Potion

-			next;

-			mes "[Seeil]";

-			mes "Then come back after a while and talk to me.";

-			mes "I need to prepare somethings for the third test";

-			mes "so... please go and do something";

-			mes "to kill some time.";

-			close;

-		}

-

-		mes "[Seeil]";

-		mes "You are under a test which you are required to bring";

-		mes "^FF0000Tree Root^000000, ^FF0000Spawn^000000,";

-		mes "^FF0000Jellopy^000000, 40ea each.";

-		mes "Go for it!";

-		close;

-

-	} else if (quiz_rvl == 4) {

-		if (countitem(905) > 39) && (countitem(920) > 39) && (countitem(909) > 39) {

-			mes "[Seeil]";

-			mes "Ho. You have collected the required items.";

-			mes "I will keep my promise too. Before that";

-			mes "this is a present for you. Please";

-			mes "take it.";

-			delitem 905,40;

-			delitem 920,40;

-			delitem 909,40;

-			set quiz_rvl,6;

-			getitem 502,10;  //Orange_Potion

-			next;

-			mes "[Seeil]";

-			mes "Then come back to me after a while.";

-			mes "I have somethings to prepare so";

-			mes "please go and do somethings to kill";

-			mes "time.";

-			close;

-		}

-

-		mes "[Seeil]";

-		mes "You are under a test which you are required to bring";

-		mes "^FF0000Stem^000000, ^FF0000Claw of Wolves^000000, ^FF0000Jellopy^000000";

-		mes "40 ea each.";

-		mes "Go for it.";

-		close;

-

-	} else if (quiz_rvl == 5) {

-		if (countitem(940) > 39) && (countitem(916) > 39) && (countitem(909) > 39) {

-

-			mes "[Seeil]";

-			mes "Ho. You have collected the required items.";

-			mes "I will keep my promise too. Before that";

-			mes "this is a present for you. Please";

-			mes "take it.";

-			delitem 940,40;

-			delitem 916,40;

-			delitem 909,40;

-			set quiz_rvl,6;

-			getitem 502,10;  //Orange_Potion

-			next;

-			mes "[Seeil]";

-			mes "Then come back to me after a while.";

-			mes "I have somethings to prepare so";

-			mes "please go and do somethings to kill";

-			mes "time.";

-			close;

-			}

-

-		mes "[Seeil]";

-		mes "You are under a test which you are required to bring";

-		mes "^FF0000Grasshopper's Leg^000000, FF0000Feather of Birds^000000, ^FF0000Jellopy^000000";

-		mes "40ea each.";

-		mes "Go for it!";

-		close;

-

-

-	} else if (quiz_rvl == 2) {

-

-		mes "[Seeil]";

-		mes "Hmm? You are the one Tsuji sent?";

-		mes "Your name is... " +strcharinfo(0)+ " Right? Okay...";

-		mes "Confirmed. You look about the same as Tsuji";

-		mes "described to me. Well, shall we start the";

-		mes "test?";

-		next;

-		mes "[Seeil]";

-		mes "It isn't that tough. All you have";

-		mes "to do is bring specified items";

-		mes "Life isn't that hard~";

-		set @japtem,rand(2);

-		next;

-		

-			if (@japtem == 0) {

-				set quiz_rvl,3;

-				mes "[Seeil]";

-				mes "Bring ^FF0000Tree Root ^000000 40ea, ^FF0000Spawn";

-				mes "^000000 40ea, and ^FF0000Jellopy^000000 40ea";

-				mes "I told ya. It's is not so hard, is it?";

-				mes "I would like to specify some items hard to find";

-				mes "but seniors told me not ";

-				mes "to do so~ Hehe.";

-				next;

-				mes "[Seeil]";

-				mes "Well, bring it as soon as you can. This is";

-				mes "an easy test, but there is a time limit.";

-				mes "Sooner the better, that is what";

-				mes "I mean~";

-				close;

-				}

-

-			else if (@japtem == 1) {

-				set quiz_rvl,4;

-				mes "[Seeil]";

-				mes "Bring ^FF0000Stem^000000 40ea, ^FF0000Wolf Claw^000000 40ea,";

-				mes "and ^FF0000Jellopy^000000 40ea.";

-				mes "I told ya. It's is not so hard, is it?";

-				mes "I would like to specify some items hard to find";

-				mes "but seniors told me not ";

-				mes "to do so~ Hehe.";

-				next;

-				mes "[Seeil]";

-				mes "Well, bring it as soon as you can. This is";

-				mes "an easy test, but there is a time limit.";

-				mes "Sooner the better, that is what";

-				mes "I mean~";

-				close;

-				}

-

-			else if (@japtem == 2) {

-				set quiz_rvl,5;

-				mes "[Seeil]";

-				mes "^FF0000Grasshopper's Leg^000000 40ea, ^FF0000Feather of Birds^000000 40ea,";

-				mes "and ^FF0000Jellopy^000000 40ea.";

-				mes "I told ya. It's is not so hard, is it?";

-				mes "I would like to specify some items hard to find";

-				mes "but seniors told me not ";

-				mes "to do so~ Hehe.";

-				next;

-				mes "[Seeil]";

-				mes "Well, bring it as soon as you can. This is";

-				mes "an easy test, but there is a time limit.";

-				mes "Sooner the better, that is what";

-				mes "I mean~";

-				close;

-				}

-	} else {

-

-	mes "[Seeil]";

-	mes "Call me Seeil=Lanchest";

-	mes "I am here to test the ones who";

-	mes "wishes to join in the quiz event.";

-	next;

-	mes "[Seeil]";

-	mes "I am in charge of second and third test";

-	mes "so in order to get a test from me, you have to";

-	mes "pass the first test which is given";

-	mes "by Tsuji.";

-	close;

-}

-M_MaxItem:

-			mes "^800000[Seeil]^000000";

-	  		mes "- Wait a minute !! -";

-		 	mes "- You currently have too many items that -";

-	   		mes "- you can't receive an item. -";

-			mes "- Please loose some weight -";

-	   		mes "- and try again. -";

-			close;

-

-L_OverWeight:

-			mes "^800000[Seeil]^000000";

-	  		mes "- Wait a minute !! -";

-		 	mes "- You currently have too many items that -";

-	   		mes "- you can't receive an item. -";

-			mes "- Please loose some weight -";

-	   		mes "- and try again. -";

-			close;

-}

-

-//=========================================================================================================================================================

-prontera.gat,116,266,5	script	Receptionist	109,{

-

-if (countitem(1201) > 3) goto M_MaxItem;

-if (checkweight(1201,3) == 0 ) goto L_OverWeight;

-

-

-if(quiz_rvl == 18) {

-

-			mes "^800000[Radeng]^000000";

-			mes "^6b8e23" + strcharinfo(0)+ "^000000?";

-			mes "'Go look for ^b8860b'Kantryl'^000000 ";

-			mes "at Izlude.";

-			close;

-

-

-

-} else if(quiz_rvl == 17) {

-

-			if (countitem(955) > 19) && (countitem(913) > 19) && (countitem(729) > 0) {

-

-				mes "^800000[Radeng]^000000";

-				mes "Oh~";

-				mes "You are here!";

-				mes "Let me check whether";

-				mes "you brought the right thing.";

-				next;

-				mes "^800000[Radeng]^000000";

-				mes "Yes,that's right.";

-				mes "You brought the right thing.";

-				mes "Please, wait a second and..";

-				mes "I have to";

-				mes "put you on the list.";

-				next;

-				mes "^800000[Radeng]^000000";

-				mes "You are..^6b8e23" + strcharinfo(0)+ "^000000 ..right?";

-				mes "Hm...";

-				mes "Well done.";

-				mes "And this is compensation for the";

-				mes "ones who have passed the test.";

-				next;

-				mes "^800000[Radeng]^000000";

-				mes "All you have to do is";

-				mes "meeting ^b8860b'Kantryl'^000000";

-				mes "at Izlude.";

-				delitem 955,20;

-				delitem 913,20;

-				delitem 729,1;

-				set quiz_rvl,18;

-				getitem 504,10;  //White_Potion

-				next;

-				mes "^800000[Radeng]^000000";

-				mes "Goodbye~~.";

-				close;

-			}

-			mes "^800000[Radeng]^000000";

-			mes "Oh~~";

-			mes "You are here!";

-			mes "Let me check whether";

-			mes "You brought the right thing.";

-			next;

-			mes "^800000[Radeng]^000000";

-			mes "oh my....";

-			next;

-			mes "^800000[Radeng]^000000";

-			mes "Seems like you didn't prepare";

-			mes "what I asked you for.";

-			mes "I'll tell you what items you have to bring.";

-			mes "I'm not going to tell you again.";

-			mes "So please remember.";

-			next;

-			mes "^800000[Radeng]^000000";

-			mes "The items are";

-			mes "^19197020 Warm peeling^000000";

-			mes "^19197020Tooth of Bat^000000";

-			mes "^1919701 Zircon^000000";

-			close;

-

-

-

-

-		

-

-} if(quiz_rvl == 16) {

-			if (countitem(1055) > 29) && (countitem(940) > 29) && (countitem(948) > 29) && (countitem(730) > 0) {

-				mes "^800000[Radeng]^000000";

-				mes "Oh~~~";

-				mes "You are here!";

-				mes "Let me check whether ";

-				mes "you brought the right thing.";

-				next;

-				mes "^800000[Radeng]^000000";

-				mes "Yes,that's right.";

-				mes "You brought the right thing.";

-				mes "Please, wait a second and..";

-				mes "I have to";

-				mes "put you on the list.";

-				next;

-				set quiz_rvl,18;

-				getitem 504,10;  //White_Potion

-				delitem 1055,30;

-				delitem 940,30;

-				delitem 948,30;

-				delitem 730,1;

-				mes "^800000[Radeng]^000000";

-				mes "You are..^6b8e23" + strcharinfo(0)+ "^000000..right?";

-				mes "Hm...";

-				mes "Well done.";

-				mes "And this is compensation for the";

-				mes "ones who have passed the test.";

-				next;

-				mes "^800000[Radeng]^000000";

-				mes "All you have to do is";

-				mes "meeting ^b8860b'Kantryl'^000000";

-				mes "at Izlude.";

-				next;

-				mes "^800000[Radeng]^000000";

-				mes "Goodbye";

-				close;

-			}

-			mes "^800000[Radeng]^000000";

-			mes "Oh~~~";

-			mes "You are here!";

-			mes "Let me check whether";

-			mes "you brought the right thing.";

-			next;

-			mes "^800000[Radeng]^000000";

-			mes "Oh my....";

-			next;

-			mes "^800000[Radeng]^000000";

-			mes "Seems like you didn't prepare";

-			mes "what I asked you for..";

-			mes "I'll tell you what items you have to bring..";

-			mes "I'm not going to tell you again.";

-			mes "So please remember..";

-			next;

-			mes "^800000[Radeng]^000000";

-			mes "^191970Earthwarm Peeling^000000 30";

-			mes "^191970Grasshopper's Leg^000000 30";

-			mes "^191970Bear's Footskin^000000 30";

-			mes "^1919701carat Diamond^000000 1.";

-			mes "Try hard.";

-			close;

-

-

-

-

-	

-} else if(quiz_rvl == 15) {

-			mes "^800000[Radeng]^000000";

-			mes "You are....";

-			mes "the one who left before I tell you the score";

-			mes "Aren't you?";

-			mes "Can't tell you failed. So...";

-			next;

-			mes "If ^800000[Radeng]^000000";

-			mes "^191970Earthwarm Peeling^000000 30";

-			mes "^191970Grasshopper's Leg^000000 30";

-			mes "^191970Bear's Footskin^000000 30";

-			mes "^1919701carat Diamond^000000 1";

-			mes "is prepared,";

-			mes "You are pass.";

-			set quiz_rvl,16;

-			close;

-

-} else if(quiz_rvl == 14) {

-			mes "^800000[Radeng]^000000";

-			mes "Hello";

-			mes "I'm 'Radeng'.";

-			mes "I'm in charge of 4th test.";

-			mes "You seem to have finished";

-			mes "3rd test!";

-			next;

-			mes "^800000[Radeng]^000000";

-			mes "Then,let's start 4th test.";

-			mes "the last barrier of quiz revolution.";

-			mes "First of all,";

-			mes "I will briefly go over about the test.";

-			next;

-			mes "^800000[Radeng]^000000";

-			mes "you have to do quiz and collect items";

-			mes " ";

-			mes "You have to answer 10 mulptiple choice questions";

-			mes "and the amount of required items changes ";

-			mes "depending on score you acheive.";

-			mes " ";

-			next;

-			mes "^800000[Radeng]^000000";

-			mes "First,";

-			mes "If you clear all 10 questions";

-			mes "you are pass with";

-			mes "pretest of collecting items.";

-			next;

-			mes "^800000[Radeng]^000000";

-			mes "Second,";

-			mes "If you score between 50~90";

-			mes "required items are";

-			mes "not so much.";

-			next;

-			mes "^800000[Radeng]^000000";

-			mes "Third,";

-			mes "If you score between 0~40";

-			mes "required items will be";

-			mes "vast.";

-			next;

-			mes "^800000[Radeng]^000000";

-			mes "Well, this is all about";

-			mes "4th test.";

-			mes "Then, let's start!";

-			next;

-				menu "Yes",-,"No",M_No;

-

-						mes "^800000[Radeng]^000000";

-						mes "Well,now";

-						mes "10 questions will be presented.";

-						mes "Look carefully through ";

-						mes "questions and";

-						mes "choose the right answer.";

-						next;

-						mes "^800000[Radeng]^000000";

-						mes "1st question.";

-						mes "How many jobs";

-						mes "are in the game?";

-						set @score_test2, 0;

-						next;

-							menu "22",sM1_1,"28",sM1_1,"32",sM1_1,"34",-;

-				

-								set @score_test2, @score_test2 + 10;

-

-						sM1_1:

-	

-						mes "^800000[Radeng]^000000";

-						mes "2nd question.";

-						mes "The name of santa NPC";

-						mes "which links christmas town";

-						mes "'Lutie' and 'Aldebaran'?";

-						next;

-							menu "Warp Santa",sM1_2, "Link Santa",-, "Lutie Santa",sM1_2, "Hulk Santa",sM1_2;

-								

-								set @score_test2, @score_test2 + 10;

-

-						sM1_2:

-						mes "^800000[Radeng]^000000";

-						mes "3rd question.";

-						mes "What job level at least you have to be";

-						mes "to learn novice skill";

-						mes "'Pretend dead'?";

-						next;

-							menu "Job level4",sM1_3,"Job level5",sM1_3,"Job level6",sM1_3,"Job level7",-;

-								

-								set @score_test2, @score_test2 + 10;

-

-						sM1_3:

-						mes "^800000[Radeng]^000000";

-						mes "4th question.";

-						mes "Require items";

-						mes "to raise Poring?";

-						next;

-							menu "Unripe Apple",-,"Rippen Apple",sM1_4, "Delicious looking Apple",sM1_4, "Apple",sM1_4;

-					

-								set @score_test2, @score_test2 + 10;

-

-						sM1_4:

-						mes "^800000[Radeng]^000000";

-						mes "5th question";

-						mes "What doll can you buy";

-						mes "from NPC?";

-						next;

-							menu "Doll",-,"Baphomet Doll",sM1_5,"Yoyo Doll",sM1_5,"Rocker Doll",sM1_5;

-							

-								set @score_test2, @score_test2 + 10;

-

-						sM1_5:

-						mes "^800000[Radeng]^000000";

-						mes "6th question.";

-						mes "Name of monster which drop";

-						mes "'Big Ribbon'?";

-						next;

-							menu "Eclipse",sM1_6,"Dragon Fly",sM1_6,"Vocal",sM1_6,"Toad,",-;

-							

-								set @score_test2, @score_test2 + 10;

-

-						sM1_6:

-						mes "^800000[Radeng]^000000";

-						mes "Choose the monster that has smiliar size and form of";

-						mes "Pring.";

-						next;

-							menu "Pupa",sM1_7,"Fabre",sM1_7,"Wander Man",-,"Golem",sM1_7;

-						

-								set @score_test2, @score_test2 + 10;

-

-						sM1_7:

-						mes "^800000[Radeng]^000000";

-						mes "8th question.";

-						mes "When can Green Herb work";

-						mes "it's efficacy?";

-						next;

-							menu "Silence",sM1_8,"Sleep",sM1_8,"Poison",-,"Chaos",sM1_8;

-							

-								set @score_test2, @score_test2 + 10;

-

-						sM1_8:

-						mes "^800000[Radeng]^000000";

-						mes "9th question.";

-						mes "Which weapon gives biggest damages";

-						mes "to small sized monsters?";

-						next;

-							menu "Dagger",-,"Two hand Sword",sM1_9,"Katar",sM1_9,"One hand Sword",sM1_9;

-							

-								set @score_test2, @score_test2 + 10;

-

-						sM1_9:

-						mes "^800000[Radeng]^000000";

-						mes "Last question!!";

-						mes "What is not neccesary when learnig";

-						mes "First-aid treatment?";

-						next;

-							menu "Clover",sM1_0,"Red Herb",sM1_0,"Novice Nametag",-,"Sterilized Bandages",sM1_0;

-							

-								set @score_test2, @score_test2 + 10;

-

-						sM1_0:

-						mes "^800000[Radeng]^000000";

-						mes "You finished answering all questions.";

-						mes "Wonder what your score is.";

-						mes "10points for 1 question.";

-						mes "Please wait a second.";

-						next;

-						mes "^800000[Radeng]^000000";

-						mes "Please, wait a second and..";

-						mes "Grading.";

-						mes ". . . . . . . . . . . . . . .";

-						mes ". . . . . . . . . . . . . . .";

-						next;

-						mes "^800000[Radeng]^000000";

-						mes "OK.";

-						mes "Your score is" + strcharinfo(0)+ "";

-						mes "" + @score_test2 + "!" ;

-						set quiz_rvl,15;

-						next;

-							if (@score_test2 > 40) && (@score_test2 < 90)goto L_Passed;

-							if (@score_test2 >= 90)goto L_Perfect;

-								mes "^800000[Radeng]^000000";

-								mes "Your score is too low.";

-								mes "Like as I told you before,";

-								mes "you have to bring a lot of";

-								mes "items to pass the test.";

-								mes " ";

-								next;

-								mes "^800000[Radeng]^000000";

-								mes "Required items are";

-								mes "^191970Earthworm Peeling^000000 30";

-								mes "^191970Grasshopper's Leg^000000 30";

-								mes "^191970Bear's Footskin^000000 30";

-								mes "^1919701Carat Diamond^000000 1";

-								mes "";

-								next;

-								mes "^800000[Radeng]^000000";

-								mes "I'm sorry.";

-								mes "If you have scored just a little bit higher..";

-								mes ".........";

-								mes "Then,go look for items..";

-								set quiz_rvl,16;

-								close;

-

-						L_Passed:

-

-								mes "^800000[Radeng]^000000";

-								mes "You did fine. ";

-								mes "But as I told you before";

-								mes "you need to bring";

-								mes "some more items.";

-								mes " ";

-								next;

-								mes "^800000[Radeng]^000000";

-								mes "Required items are";

-								mes "^191970Worm Peeling^000000 20";

-								mes "^191970Tooth of Bat^000000 20";

-								mes "^191970Zircon^000000 1.";

-								next;

-								mes "^800000[Radeng]^000000";

-								mes "I'm sorry~";

-								mes "If you have scored just a little bit higher..";

-								mes "you could have passed.";

-								mes "(KeKeke)";

-								mes "Then,go look for items..";

-								set quiz_rvl,17;

-								close;

-

-						L_Perfect:

-								mes "^800000[Radeng]^000000";

-								mes "Wow!You got it all right!.";

-								mes "Fantastic!!!!";

-								mes "For those of who ";

-								mes "got all right need no assignment";

-								mes " ";

-								next;	

-								mes "^800000[Radeng]^000000";

-								mes "" + strcharinfo(0)+ "";

-								mes "Have passed all tests.";

-								mes "Congratulations";

-								mes "And this is your compensation ";

-								mes "";

-								set quiz_rvl,18;

-								getitem 504,10;  //White_Potion

-								next;

-								mes "^800000[Radeng]^000000";

-								mes "Now, go look for";

-								mes "^b8860b'Kantryl'^000000.";

-								mes "at Izlude.";

-								close;

-	

-

-					M_No:

-						mes "^800000[Radeng]^000000";

-						mes "Come back if you change your mind.";

-						close;

-} else {

-			mes "^800000[Radeng]^000000";

-			mes "Hello~~~";

-			mes "Please join at comming";

-			mes "Quiz Revolution~";

-			mes "Register will be made";

-			mes "by receptionist in every town.";

-			close;

-}

-M_MaxItem:

-			mes "^800000[Radeng]^000000";		

-	  		mes "- Wait a minute !! -";

-		 	mes "- You currently have too many items that -";

-	   		mes "- you can't receive an item. -";

-			mes "- Please loose some weight -";

-	   		mes "- and try again. -";

-			close;

-

-L_OverWeight:

-			mes "^800000[Radeng]^000000";

-	  		mes "- Wait a minute !! -";

-		 	mes "- You currently have too many items that -";

-	   		mes "- you can't receive an item. -";

-			mes "- Please loose some weight -";

-	   		mes "- and try again. -";

-			close;

-}

-

-//=======================================================================================================================================================

-izlude.gat,106,220,5	script	Kantryl	98,{

-	

-if (countitem(1201) > 3) goto M_MaxItem;

-if (checkweight(1201,3) == 0 ) goto L_OverWeight;

-

-

-if(quiz_rvl == 20) {

-		mes "[Kantryl]";

-		mes "I see that you have already givin me a";

-		mes "notice of absence...";

-		mes "Well,  but I can't give you entry ticket.";

-		mes "who Knows~~";

-		mes "Wait untill quiz starts";

-		mes "You may catch a fortune.";

-		close;

-

-}else if(quiz_rvl == 19) {

-		mes "[Kantryl]";

-		mes "You have already received an entry ticket.";

-		mes "It's impossible getting";

-		mes "another one.";

-		next; 

-		mes "[Kantryl]";

-		mes "For reference, number of particapants are";

-		next;

-		mes "[Kantryl]";

-		mes "1st Quiz Revolution - " + quiz1 + "/200";

-		mes "2nd Quiz Revolution - " + quiz2 + "/200";

-		mes "3rd Quiz Revolution - " + quiz3 + "/200";

-		mes "4th Quiz Revolution - " + quiz4 + "/200";

-		mes "5th Quiz Revolution - " + quiz5 + "/200";

-		mes "keep it in your mind.";

-		close;

-

-

-} else if(quiz_rvl == 18) {

-

-		mes "[Kantryl]";

-		mes "You are " + strcharinfo(0)+ ".";

-		mes "Who finished the test.right?";

-		mes "Would you please make a decision ";

-		mes "whether you will join or not join the";

-		mes "Quiz Revolution.";

-		next;

-		mes "[Kantryl]";

-		mes "Would you like to join?";

-		mes "If you say yes, you can register at";

-		mes "Quiz Revolution";

-		mes "If you choose ^FF0000'NO,I won't join'^000000";

-		mes " then ^FF0000'You can't join'^000000";

-		mes "Please make a right decision.";

-		next;

-		mes "[Kantryl]";

-		mes "If you haven't made up your mind,";

-		mes "say yes for now";

-		mes "and can change later on.";

-		mes "Take it easy.";

-		next;

-			menu "Join", -, "Not join.",NJ;

-

-

-				mes "[Kantryl]";

-				mes "Itis to 1~5 round";

-				mes "first 200 have chance.";

-				mes ""+ strcharinfo(0)+ ",when do you want to join?";

-				mes "It is ^FF0000Impossible to cancel^000000";

-				mes "So please make right decision.";

-				next;

-				mes "[Kantryl]";

-				mes "1st Quiz Revolution - " + quiz1 + "/200";

-				mes "2nd Quiz Revolution - " + quiz2 + "/200";

-				mes "3rd Quiz Revolution - " + quiz3 + "/200";

-				mes "4th Quiz Revolution - " + quiz4 + "/200";

-				mes "5th Quiz Revolution - " + quiz5 + "/200";

-				next;

-				menu "Join 1st round",-,"Join 2nd round",s2nd,"Join 3rd round",s3nd,"Join 4th round",s4nd,"Join 5th round",s5nd;

-				

-						if(quiz1 > 199){

-							mes "[Kantryl]";

-							mes "I'm sorry. We are all full at";

-							mes "1st round of quiz revolution";

-							mes "No more applicants for 1st round.";

-							close;

-

-      						}

-						mes "[Kantryl]";

-						mes "Hm..."+ strcharinfo(0)+" ";

-						mes "I have received your application";

-						mes "Try hard and study hard.";

-						set quiz_rvl,19;

-						set quiz1,quiz1 + 1;

-						getitem 7280,1; //Quiz_Ticket01

-						close;

-

-

-

-

-					s2nd:

-						if(quiz2 > 199){

-								mes "[Kantryl]";

-							mes "I'm sorry. We are all full at";

-							mes "2nd round of quiz revolution";

-							mes "No more applicants for 2nd round.";

-							close;

-						}

-					

-						mes "[Kantryl]";

-						mes "Hm..."+ strcharinfo(0)+"";

-						mes "I have received your application";

-						mes "Try hard and study hard.";

-						set quiz_rvl,19;

-						set quiz2,quiz2 + 1;

-						getitem 7281,1;  //Quiz_Ticket02

-						close;

-					

-

-

-					s3nd:

-						if(quiz3 > 199){

-								mes "[Kantryl]";

-							mes "I'm sorry. We are all full at";

-							mes "3rd round of quiz revolution.";

-							mes "No more applicants for 3rd round.";

-							close;

-						}

-						

-						

-						mes "[Kantryl]";

-						mes "Hm..." + strcharinfo(0)+ "";

-						mes "I have received your application.";

-						mes "Try hard and study hard.";

-						set quiz_rvl,19;

-						set quiz3,quiz3 + 1;

-						getitem 7282,1;  //Quiz_Ticket03

-						close;

-					

-

-

-							

-					s4nd:

-						if(quiz4 > 199){

-								mes "[Kantryl]";

-							mes "I'm sorry. We are all full at";

-							mes "4th round of quiz revolution.";

-							mes "No more applicants for 4th round..";

-							close;

-						}

-					

-						mes "[Kantryl]";

-						mes "Hm..." + strcharinfo(0)+ "";

-						mes "I have received your application.";

-						mes "Try hard and study hard.";

-						set quiz_rvl,19;

-						set quiz4,quiz4 + 1;

-						getitem 7283,1;  //Quiz_Ticket04

-						close;

-						

-

-

-					

-					s5nd:

-						if(quiz5 > 199){

-								mes "[Kantryl]";

-							mes "I'm sorry. We are all full at";

-							mes "5th round of quiz revolution.";

-							mes "No more applicants for 5th round..";

-							close;

-						}

-

-						mes "[Kantryl]";

-						mes "Hm..." + strcharinfo(0)+ "";

-						mes "I have received your application.";

-						mes "Try hard and study hard.";

-						set quiz_rvl,19;

-						set quiz5,quiz5 + 1;

-						getitem 7284,1;  //Quiz_Ticket05

-						close;

-						

-

-

-

-			NJ:

-				mes "[Kantryl]";

-				mes "Ok,if that's how you think.";

-				mes "Choice is on you";

-				mes "Good job any way.";

-				set quiz_rvl,20;

-				next;

-				mes "[Kantryl]";

-				mes "Actually,we have plan to";

-				mes "allowed for those of who didn't ";

-				mes "apply previously unless they have an entry ticket.";

-				mes "If you have any chance to get an entry ticket,";

-				mes "you are always welcome.";

-				next;

-				mes "[Kantryl]";

-				mes "Go ask for the ones";

-				mes "who changed their mind.";

-				mes "If you are lucky,";

-				mes "you'll get the chance.";

-				close;

-} else {

-		mes "[Kantryl]";

-		mes "Hello~";

-		mes "I'm Kantryl=Ranegalf.";

-		mes "I help the ones who have passsed the test";

-		mes "to take a formal step.";

-		next;

-		mes "[Kantryl]";

-		mes "It is impossible  to accept";

-		mes "applications from those of who didn't";

-		mes "finish the test.";

-		mes "Go look for our staff in every";

-		mes "Midgarts";

-		mes "and take a test.";

-		next;

-		mes "[Kantryl]";

-		mes "At that time, I'll gladly";

-		mes "welcome you and accept the application.";

-		close;

-}

-M_MaxItem:

-			mes "[Kantryl]";		

-	  		mes "- Wait a minute !! -";

-		 	mes "- You currently have too many items that -";

-	   		mes "- you can't receive an item. -";

-			mes "- Please loose some weight -";

-	   		mes "- and try again. -";

-			close;

-

-L_OverWeight:

-			mes "[Kantryl]";

-	  		mes "- Wait a minute !! -";

-		 	mes "- You currently have too many items that -";

-	   		mes "- you can't receive an item. -";

-			mes "- Please loose some weight -";

-	   		mes "- and try again. -";

-			close;

-}

-

-//============================================================================================================================

-quiz_test.gat,387,350,4	script	"From somewhere::race_monk	45,2,2,{

-OnTouch:

-

-	if (quiz_rvl == 6) {

-	 	set quiz_rvl,7;

-		warp "quiz_test.gat",385,388;

-		end;

-	}else if (quiz_rvl == 7) {

-		set quiz_rvl,8;

-		warp "quiz_test.gat",385,388;

-		end;

-	}else if (quiz_rvl == 8) {

-		set quiz_rvl,9;

-		warp "quiz_test.gat",385,388;

-		end;

-	}else if (quiz_rvl == 9) {

-		set quiz_rvl,10;

-		warp "quiz_test.gat",385,388;

-		end;

-	}else if (quiz_rvl == 10) {

-		announce "You are almost there. Show me your spirit.",bc_blue|bc_map;

-		set quiz_rvl,11;

-		warp "quiz_test.gat",385,388;

-		end;

-	}else if (quiz_rvl == 11) {

-		set quiz_rvl,12;

-		warp "quiz_test.gat",385,388;

-		end;

-	}else if (quiz_rvl == 12) {

-		mes "[Seeil]";

-		mes "You have worked hard and finished.";

-		mes "It wasn't that hard as you thought, huh?";

-		mes "All you have to do is run in circle... Well,";

-		mes "come in front of me.";

-		announce "Congratulations! " +strcharinfo(0)+ ", you have passed the test!",bc_blue|bc_map;

-		close2;

-		set quiz_rvl,13;

-		warp "payon.gat",109,115;

-		end;

- }

-

-}

-//=============================hiddenwarp=================================================================

-

-//-----------------------------1111-----------------------------------------------------------------------

-quiz_test.gat,82,384,4	script	Pit::ham_quiz#1-1	-1,0,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,83,384,4	script	Pit::ham_quiz#1-2	-1,0,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,82,385,4	script	Pit::ham_quiz#1-3	-1,0,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,83,385,4	script	Pit::ham_quiz#1-4	-1,0,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-//-----------------------------2222-----------------------------------------------------------------------

-quiz_test.gat,38,388,4	script	Pit::ham_quiz#2-1	-1,0,1,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,39,388,4	script	Pit::ham_quiz#2-2	-1,0,1,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,38,386,4	script	Pit::ham_quiz#2-3	-1,0,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,39,386,4	script	Pit::ham_quiz#2-4	-1,0,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-//-----------------------------3333-----------------------------------------------------------------------

-quiz_test.gat,11,158,4	script	Pit::ham_quiz#3-1	-1,1,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,11,159,4	script	Pit::ham_quiz#3-2	-1,1,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,13,159,4	script	Pit::ham_quiz#3-3	-1,0,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,13,158,4	script	Pit::ham_quiz#3-4	-1,0,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-//-----------------------------4444-----------------------------------------------------------------------

-quiz_test.gat,11,30,4	script	Pit::ham_quiz#4-1	-1,3,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,11,31,4	script	Pit::ham_quiz#4-2	-1,3,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,15,30,4	script	Pit::ham_quiz#4-3	-1,0,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,15,30,4	script	Pit::ham_quiz#4-4	-1,0,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-//-----------------------------5555-----------------------------------------------------------------------

-quiz_test.gat,70,12,4	script	Pit::ham_quiz#5-1	-1,0,1,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,71,12,4	script	Pit::ham_quiz#5-2	-1,0,1,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,70,10,4	script	Pit::ham_quiz#5-3	-1,0,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,71,10,4	script	Pit::ham_quiz#5-4	-1,0,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-//---------------------------6666-------------------------------------------------------------------------

-quiz_test.gat,186,11,4	script	Pit::ham_quiz#6-1	-1,2,3,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,189,11,4	script	Pit::ham_quiz#6-2	-1,0,3,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-//---------------------------7777-------------------------------------------------------------------------

-quiz_test.gat,387,43,4	script	Pit::ham_quiz#7-1	-1,1,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,387,42,4	script	Pit::ham_quiz#7-2	-1,1,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,389,43,4	script	Pit::ham_quiz#7-3	-1,0,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-quiz_test.gat,389,42,4	script	Pit::ham_quiz#7-4	-1,0,0,{

-OnTouch:

-	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;

-	warp "quiz_test.gat",387,387;

-	end;

-}

-

-//-------------------------------------------------------------------------------------------------------------

-// Comments

-// 0 = Didn't receive a quest from Tsuji

-// 1 = Failed Tsuji's quest

-// 2 = Pass Tsuji's quest and to 2nd round

-// 3 = Seeil's randomly collecting job item quest 1

-// 4 = Seeil's randomly collecting job item quest 

-// 5 = Seeil's randomly collecting job item quest 

-// 6 = Clear with collecting job item. start Marathon test

-// 7~12 =Checking Marathon quest occasionally.

-// 13 = Use after clearing Marathon quest

-// 14 = Clear 3rd quest, start Radeng(4th) quest

-// 15 = check after reporting errors of Radeng

-// 16 = randomly collecting job items at Radeng quest 1

-// 17 = randomly collecting job items at Radeng quest 2

-// 18 = Radeng quest clear. Possible time to apply. Begin Kantryl apply.

-// 19 = checked if you show intention to join 

-// 20 = checked If you don't show intention to join 

-// 21 = 3 items for the one who gets compansation

+//===== eAthena Script ======================================= 
+//= Quiz (Revolution) Part 1
+//===== By: ================================================== 
+//= CAHTXHuK
+//===== Current Version: ===================================== 
+//= 1.0
+//===== Compatible With: ===================================== 
+//= eAthena 1.0
+//===== Description: ========================================= 
+//= 
+//===== Additional Comments: ================================= 
+//= 
+//============================================================ 
+
+//=========================================================================================================================================
+prontera.gat,152,286,4	script	Receptionist::RecepQuiz	755,{
+
+if (countitem(1201) > 3) goto M_MaxItem;
+if (checkweight(1201,3) == 0 ) goto L_OverWeight;
+
+
+if(BaseLevel < 20){
+			mes "^2f4f4f[Tsuji]^000000";
+			mes "Hello";
+			mes "This is Tsuji who is in charge of";
+			mes "receiving application forms for";
+			mes "Quiz Revolution event.";
+			next;
+			mes "^2f4f4f[Tsuji]^000000";
+			mes "Zonda corporation has prepared";
+			mes "^0000ffQuiz Revolution^000000 event to";
+			mes "provide fun and excitement";
+			mes "to all of you.";
+			mes "Please read the following explanation and";
+			mes "participate in this event.";
+			next;
+			mes "^2f4f4f[Tsuji]^000000";
+			mes "This Quiz Revolution event is..";
+			mes "operated in a different way compared to the previous one.";
+			mes "The event will only be open for those who wish to participate in the game.";
+			mes "Also, the ^006400Quiz Tickets^000000 will be given to those who";
+			mes "pass simple tests to check if the player is worthy of";
+			mes "playing the game.";
+			next;
+			mes "^2f4f4f[Tsuji]^000000";
+			mes "The assessment will be made through";
+			mes "^006400four simple tests^000000";
+			mes "For the ones who pass all four tests";
+			mes "will receive the quiz ticket of the";
+			mes "Quiz Revolution event.";
+			next;
+			mes "^2f4f4f[Tsuji]^000000";
+			mes "Hmm?! Wait a sec.";
+			mes "If you wish to join Quiz Revolution event";
+			mes "you should have base level";
+			mes "20 or above.";
+			mes "Please go and return after raising the";
+			mes "level to the expected point.";
+			close;
+
+} else if (quiz_rvl > 2) {
+
+			mes "^2f4f4f[Tsuji]^000000";
+			mes "The event for all of you!";
+			mes "Quiz Revolution is about to start.";
+			mes "Please show us a lot of";
+			mes "participation.";
+			mes "And don't forget to bring the admission ticket~~";
+			close;
+
+} else if (quiz_rvl == 2) {
+
+			mes "^2f4f4f[Tsuji]^000000";
+			mes "You have already passed the first test.";
+			mes "Please visit 'Payon' and find";
+			mes "'Seeil'.";
+			mes "Seeil will give the second test.";
+			close;
+
+} else if (quiz_rvl == 1) {
+
+			mes "^2f4f4f[Tsuji]^000000";
+			mes "^0000ff" +strcharinfo(0)+ "^000000.";
+			mes "You have to take the retest";
+			mes "to pass the test.";
+			mes "Will you accept it?";
+			next;
+				menu "Yes",-,"No",sM1_No;
+
+
+						mes "^2f4f4f[Tsuji]^000000";
+						mes "Very well.";
+						mes "I hope you pass the test this time..";
+						mes "Here are the questions.";
+						set @test_soonsu, rand(2);
+						set @score_test, 0;
+						next;
+
+							if (@test_soonsu == 0){
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "1st question.";
+								mes "Ragnarok is a MMORPG game.";
+								mes "Please choose O and X.";
+
+								next;
+									menu "O",-,"X",X1;
+
+									set @score_test, @score_test + 10;
+
+								X1:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "2nd question.";
+								mes "Ragnarok's monetary unit is 'Zeny'.";
+								next;
+									menu "O",-,"X",X2;
+
+									set @score_test, @score_test + 10;
+
+								X2:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "3rd question.";
+								mes "If an unknown person is attacking a monster";
+								mes "you have to attack the same monster together.";
+								next;
+									menu "O",X3,"X",-;
+
+									set @score_test, @score_test + 10;
+								X3:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "4th question.";
+								mes "'Payon' is the capital of 'Rune Midgarts'.";
+								next;
+									menu "O",X4,"X",-;
+
+									set @score_test, @score_test + 10;
+
+								X4:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "5th question.";
+								mes "There are ships in 'Alberta'.";
+								next;
+									menu "O",-,"X",X5;
+
+									set @score_test, @score_test + 10;
+
+								X5:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "6th question.";
+								mes "A job class that can use";
+								mes "'Grand Cross' is";
+								mes "'Lord Knight'.";
+								next;
+									menu "O",X6,"X",-;
+
+									set @score_test, @score_test + 10;
+
+								X6:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "7th question.";
+								mes "When 'Bard' screams, the oppenet can be 'sturn status'";
+								mes "in regular probability.";
+								next;
+									menu "O",X7,"X",-;
+
+									set @score_test, @score_test + 10;
+
+								X7:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "8th question.";
+								mes "'Baphomet'is a tool";
+								mes "for killing mosquitos.";
+								next;
+									menu "O",X8,"X",-;
+
+									set @score_test, @score_test + 10;
+
+								X8:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "9th question.";
+								mes "'Swordman' can class change to";
+								mes "'Ambernite'.";
+								next;
+									menu "O",X9,"X",-;
+
+									set @score_test, @score_test + 10;
+
+								X9:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "The last question.";
+								mes "A fine horse, which appears in North european Myth";
+								mes "'Sleipnir' has five legs.";
+								next;
+									menu "O",X0,"X",-;
+
+									set @score_test, @score_test + 10;
+
+								goto X0;
+
+
+							} else if (@test_soonsu == 1){
+
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "1st question.";
+								mes "Ragnarok is a MMORPG game.";
+								mes "Please choose O and X.";
+								next;
+									menu "O",-, "X",X1_1;
+
+									set @score_test, @score_test + 10;
+
+								X1_1:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "2nd question.";
+								mes "'Valkyrie' who appears in North european Myth";
+								mes "is the godess of Love.";
+								next;
+									menu "O",X1_2,"X",-;
+										set @score_test, @score_test + 10;
+
+								X1_2:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "3rd question.";
+								mes "'Bethoven' composed the classic";
+								mes "'Moon Light sonata'.";
+								next;
+									menu "O",-, "X",X1_3;
+
+									set @score_test, @score_test + 10;
+
+								X1_3:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "4th question.";
+								mes "Orcs that exsits in the world of Ragnarok";
+								mes "are divided into 7 types.";
+								next;
+									menu "O",X1_4,"X",-;
+										set @score_test, @score_test + 10;
+
+								X1_4:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "5th question.";
+								mes "'Cobolt Card' can be installed";
+								mes "into";
+								mes "shield items.";
+									next;
+									menu "O",X1_5,"X",-;
+										set @score_test, @score_test + 10;
+
+								X1_5:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "6th question.";
+								mes "'Katar'is exclusive use of Assassins.";
+								next;
+									menu "O",-, "X",X1_6;
+
+									set @score_test, @score_test + 10;
+
+								X1_6:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "7th questino.";
+								mes "'Emperium' is a material for";
+								mes "refining.";
+									next;
+									menu "O",X1_7,"X",-;
+										set @score_test, @score_test + 10;
+
+								X1_7:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "8th question.";
+								mes "'Payon' is a village of bandits.";
+									next;
+									menu "O",X1_8,"X",-;
+										set @score_test, @score_test + 10;
+
+								X1_8:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "9th question.";
+								mes "'Prontera' is the only place where";
+								mes "to class change into 'Swordman'.";
+								next;
+									menu "O",X1_9,"X",-;
+										set @score_test, @score_test + 10;
+
+								X1_9:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "The last question.";
+								mes "A monster 'Merman' is a human type.";
+								next;
+									menu "O",-, "X",X0;
+
+									set @score_test, @score_test + 10;
+
+								goto X0;
+
+								} else if (@test_soonsu == 2){
+
+								mes "1st question.";
+								mes "Ragnarok is a MMORPG game.";
+								mes "Please choose O and X.";
+								next;
+									menu "O",-, "X",X2_1;
+
+									set @score_test, @score_test + 10;
+
+								X2_1:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "2nd question.";
+								mes "The cloesest village from Pyramid Dugeon is 'Morroc'.";
+								next;
+									menu "O",-, "X",X2_2;
+
+									set @score_test, @score_test + 10;
+
+								X2_2:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "3rd question.";
+								mes "A merchant association is located in 'Al De Baran'.";
+								next;
+									menu "O",X2_3,"X",-;
+										set @score_test, @score_test + 10;
+
+								X2_3:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "4th question.";
+								mes "Acolyte can";
+								mes "class change to";
+								mes "'Sage' and 'Priest'.";
+								next;
+									menu "O",X2_4,"X",-;
+										set @score_test, @score_test + 10;
+
+								X2_4:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "5th question.";
+								mes "When reached base level 10";
+								mes "can be class changed to 1st job10.";
+								next;
+									menu "O",X2_5,"X",-;
+										set @score_test, @score_test + 10;
+
+								X2_5:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "6th question.";
+								mes "'Bowling Bash' can not be activated";
+								mes "without equip";
+								mes "'Two handed sword'.";
+								next;
+									menu "O",X2_6,"X",-;
+										set @score_test, @score_test + 10;
+
+								X2_6:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "7th question.";
+								mes "When Priest uses 'Signum Crusis'";
+								mes "all monsters' defense will decrease";
+								mes "in regular probability.";
+								next;
+									menu "O",X2_7,"X",-;
+										set @score_test, @score_test + 10;
+
+								X2_7:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "8th question.";
+								mes "'Wizard' will use a Blue gemstone";
+								mes "when casts 'Fire Pillar'.";
+								next;
+									menu "O",-, "X",X2_8;
+
+									set @score_test, @score_test + 10;
+
+								X2_8:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "9th question.";
+								mes "A name of Assassin's exclusive weapon'";
+								mes "'Katar' that gives";
+								mes "additional 50% damage to human type";
+								mes "is 'Infiltrator'.";
+								next;
+									menu "O",X2_9,"X",-;
+										set @score_test, @score_test + 10;
+
+								X2_9:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "10th question.";
+								mes "'Fire' is the most effective";
+								mes "property against to 'water'.";
+								next;
+									menu "O",X0,"X",-;
+										set @score_test, @score_test + 10;
+
+
+							X0:
+							mes "^2f4f4f[Tsuji]^000000";
+							mes "Well done~";
+							mes "You have solved all the 10 questions.";
+							mes "Let me check";
+							mes "how many you got?";
+							mes "^ff0000If you don't get a perfect score, you have to re-test~^000000";
+							next;
+							mes "^2f4f4f[Tsuji]^000000";
+							mes "Wait a moment please.";
+							mes "Grading.";
+							mes ". . . . . . . . . . . . . . .";
+							mes ". . . . . . . . . . . . . . .";
+							mes ". . . . . . . . . . . . . . .";
+							next;
+							mes "^2f4f4f[Tsuji]^000000";
+							mes "Hum . . . . . . . . . . . . .";
+							mes ". . . . . . . . . . . . . . .";
+							mes ". . . . . . . . . . . . . . .";
+							next;
+							mes "^2f4f4f[Tsuji]^000000";
+							mes "OK, finished grading.";
+							mes "I will tell your score.";
+							next;
+								if (@score_test > 99) {
+									mes "^2f4f4f[Tsuji]^000000";
+									mes "Your score is ^2f4f4f" + @score_test + "^000000!";
+									mes "You have";
+									mes "qualified to participate in";
+									mes "Quiz Revolution.";
+									mes "You have cleared the 1st test!";
+									next;
+									mes "^2f4f4f[Tsuji]^000000";
+									mes "This is a reward";
+									mes "from us.";
+									mes "Please accept it.";
+									set quiz_rvl,2;
+									getitem 501,10; //Red_Potion
+									next;
+									mes "^2f4f4f[Tsuji]^000000";
+									mes "Now, the 2nd test is";
+									mes "ready.";
+									mes "Go to 'Payon' and meet";
+									mes "'Seeil'.";
+									mes "You can get the 2nd test";
+									mes "from him.";
+									next;
+									mes "^2f4f4f[Tsuji]^000000";
+									mes "You have no business with me";
+									mes "Have a good day.";
+									close;
+									}
+								} else	{
+									set quiz_rvl,1;
+									mes "^2f4f4f[Tsuji]^000000";
+									mes "You score is ^2f4f4f" + @score_test + "^000000.";
+									mes "You did not get a perfect score.";
+									mes "I do not tell you";
+									mes "where you got wrong.";
+									mes "You have to take the test again.";
+									close;
+									}
+
+					sM1_No:
+						mes "^2f4f4f[Tsuji]^000000";
+						mes "Oh, really?";
+						mes "Well, it's up to you.";
+						mes "Too bad.";
+						mes "If you change your mind,";
+						mes "let me know.";
+						close;
+
+
+} else if (quiz_rvl == 0) && (BaseLevel > 19) {
+
+
+			mes "^2f4f4f[Tsuji]^000000";
+			mes "Hello";
+			mes "This is Tsuji who is in charge of";
+			mes "receiving application forms for";
+			mes "Quiz Revolution event.";
+			next;
+			mes "^2f4f4f[Tsuji]^000000";
+			mes "Zonda corporation has prepared";
+			mes "^0000ffQuiz Revolution^000000 event to";
+			mes "provide fun and excitement";
+			mes "to all of you.";
+			mes "Please read the following explanation and";
+			mes "participate in this event.";
+			next;
+			mes "^2f4f4f[Tsuji]^000000";
+			mes "This Quiz Revolution event is..";
+			mes "operated in a different way compared to the previous one.";
+			mes "The event will only be open for those who wish to participate in the game.";
+			mes "Also, the ^006400Quiz Tickets^000000 will be given to those who";
+			mes "pass simple tests to check if the player is worthy of";
+			mes "playing the game.";
+			next;
+			mes "^2f4f4f[Tsuji]^000000";
+			mes "The assessment will be made through";
+			mes "^006400four simple tests^000000";
+			mes "For the ones who pass all four tests";
+			mes "will receive the quiz ticket of the";
+			mes "Quiz Revolution event.";
+			next;
+			mes "^2f4f4f[Tsuji]^000000";
+			mes "There is a saying,";
+			mes "^dc143c'No pain no gain!'^000000";
+			mes "Hmm.. I don't think I know exactly what it means.";
+			mes "Anyway, I hope you pass all the tests";
+			mes "and receive the quiz ticket";
+			mes "required for the Quiz Revolution event.";
+			next;
+			mes "^2f4f4f[Tsuji]^000000";
+			mes "So~ Will you now take the";
+			mes "four test to attain the quiz ticket for";
+			mes "the Quiz Revolution event?";
+			next;
+				menu "Yes",-,"No",sM2_No;
+
+
+						mes "^2f4f4f[Tsuji]^000000";
+						mes "Good.";
+						mes "The first one is the ^191970'knowledge test'^000000.";
+						mes "I give out the questions and the player has to choose";
+						mes "an answer using O and X.";
+						next;
+						mes "^2f4f4f[Tsuji]^000000";
+						mes "For your information, the player must get ^dc143ceverything right^000000, ";
+						mes "to become eligible for the quiz event";
+						mes "so please take your time solving questions.";
+						next;
+						mes "^2f4f4f[Tsuji]^000000";
+						mes "I wish many players participate";
+						mes "Quiz Revolution event.";
+						mes "I will try to give out easy";
+						mes "questions. Muhaha!";
+						next;
+						mes "^2f4f4f[Tsuji]^000000";
+						mes "Then let us start.";
+						mes "Read the question carefully and choose";
+						mes "the right answer.";
+						set @test_soonsu, rand(2);
+						set @score_test, 0;
+						next;
+
+
+							if (@test_soonsu == 0) {
+							mes "^2f4f4f[Tsuji]^000000";
+								mes "1st question.";
+								mes "Ragnarok is a MMORPG game.";
+								mes "Please choose O and X.";
+								next;
+									menu "O",-, "X",X3_1;
+
+									set @score_test, @score_test + 10;
+
+								X3_1:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "2nd question.";
+								mes "Ragnarok's monetary unit is 'Zeny'.";
+									next;
+									menu "O",-, "X",X3_2;
+
+									set @score_test, @score_test + 10;
+
+								X3_2:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "3rd question.";
+								mes "If an unknown person is attacking a monster";
+								mes "you have to attack the same monster together.";
+									next;
+									menu "O",X3_3, "X",-;
+
+									set @score_test, @score_test + 10;
+
+								X3_3:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "4th question.";
+								mes "'Payon' is the capital of 'Rune Midgarts'.";
+									next;
+									menu "O",-, "X",X3_4;
+
+									set @score_test, @score_test + 10;
+
+								X3_4:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "5th question.";
+								mes "There are ships in 'Alberta'.";
+									next;
+									menu "O",-, "X",X3_5;
+
+									set @score_test, @score_test + 10;
+
+								X3_5:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "6th question.";
+								mes "A job class that can use";
+								mes "'Grand Cross' is";
+								mes "'Lord Knight'.";
+								next;
+									menu "O",X3_6, "X",-;
+
+									set @score_test, @score_test + 10;
+
+								X3_6:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "7th question.";
+								mes "When 'Bard' screams, the oppenet can be 'sturn status'";
+								mes "in regular probability.";
+									next;
+									menu "O",X3_7, "X",-;
+
+									set @score_test, @score_test + 10;
+
+								X3_7:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "8th question.";
+								mes "'Baphomet'is a tool";
+								mes "for killing mosquitos.";
+									next;
+									menu "O",X3_8, "X",-;
+
+									set @score_test, @score_test + 10;
+
+								X3_8:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "9th question.";
+								mes "'Swordman' can class change to";
+								mes "'Ambernite'.";
+									next;
+									menu "O",X3_9, "X",-;
+
+									set @score_test, @score_test + 10;
+
+								X3_9:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "The last question.";
+								mes "A fine horse, which appears in North european Myth";
+								mes "'Sleipnir' has five legs.";
+									next;
+									menu "O",Y0, "X",-;
+
+									set @score_test, @score_test + 10;
+
+								goto Y0;
+
+
+							} else if (@test_soonsu == 1) {
+
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "1st question.";
+								mes "Ragnarok is a MMORPG game.";
+								mes "Please choose O and X.";
+									next;
+									menu "O",-, "X",X4_1;
+
+									set @score_test, @score_test + 10;
+
+								X4_1:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "2nd question.";
+								mes "'Valkyrie' who appears in North european Myth";
+								mes "is the godess of Love.";
+									next;
+									menu "O",X4_2, "X",-;
+
+									set @score_test, @score_test + 10;
+
+								X4_2:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "3rd question.";
+								mes "'Bethoven' composed the classic";
+								mes "'Moon Light sonata'.";
+									next;
+									menu "O",-, "X",X4_3;
+
+									set @score_test, @score_test + 10;
+
+								X4_3:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "4th question.";
+								mes "Orcs that exsits in the world of Ragnarok";
+								mes "are divided into 7 types.";
+									next;
+									menu "O",X4_4, "X",-;
+
+									set @score_test, @score_test + 10;
+
+								X4_4:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "5th question.";
+								mes "'Cobolt Card' can be installed";
+								mes "into";
+								mes "shield items.";
+									next;
+									menu "O",X4_5, "X",-;
+
+									set @score_test, @score_test + 10;
+
+								X4_5:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "6th question.";
+								mes "'Katar'is exclusive use of Assassins.";
+									next;
+									menu "O",-, "X",X4_6;
+
+									set @score_test, @score_test + 10;
+
+								X4_6:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "7th questino.";
+								mes "'Emperium' is a material for";
+								mes "refining.";
+									next;
+									menu "O",X4_7, "X",-;
+
+									set @score_test, @score_test + 10;
+
+								X4_7:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "8th question.";
+								mes "'Payon' is a village of bandits.";
+									next;
+									menu "O",X4_8, "X",-;
+
+									set @score_test, @score_test + 10;
+
+								X4_8:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "9th question.";
+								mes "'Prontera' is the only place where";
+								mes "to class change into 'Swordman'.";
+									next;
+									menu "O",X4_9, "X",-;
+
+									set @score_test, @score_test + 10;
+
+								X4_9:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "The last question.";
+								mes "A monster 'Merman' is a human type.";
+									next;
+									menu "O",-, "X",Y0;
+
+									set @score_test, @score_test + 10;
+
+								goto Y0;
+
+							} else if (@test_soonsu == 2) {
+
+
+								mes "1st question.";
+								mes "Ragnarok is a MMORPG game.";
+								mes "Please choose O and X.";
+									next;
+									menu "O",-, "X",X5_1;
+
+									set @score_test, @score_test + 10;
+
+								X5_1:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "2nd question.";
+								mes "The cloesest village from Pyramid Dugeon is 'Morroc'.";
+								next;
+									menu "O",-, "X",X5_2;
+
+									set @score_test, @score_test + 10;
+
+								X5_2:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "3rd question.";
+								mes "A merchant association is located in 'Al De Baran'.";
+								next;
+									menu "O",X5_3, "X",-;
+
+									set @score_test, @score_test + 10;
+
+								X5_3:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "4th question.";
+								mes "Acolyte can";
+								mes "class change to";
+								mes "'Sage' and 'Priest'.";
+								next;
+									menu "O",X5_4, "X",-;
+
+									set @score_test, @score_test + 10;
+
+								X5_4:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "5th question.";
+								mes "When reached base level 10";
+								mes "can be class changed to 1st job10.";
+								next;
+									menu "O",X5_5, "X",-;
+
+									set @score_test, @score_test + 10;
+
+								X5_5:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "6th question.";
+								mes "'Bowling Bash' can not be activated";
+								mes "without equip";
+								mes "'Two handed sword'.";
+								next;
+									menu "O",X5_6, "X",-;
+
+									set @score_test, @score_test + 10;
+
+								X5_6:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "7th question.";
+								mes "When Priest uses 'Signum Crusis'";
+								mes "all monsters' defense will decrease";
+								mes "in regular probability.";
+								next;
+									menu "O",X5_7, "X",-;
+
+									set @score_test, @score_test + 10;
+
+								X5_7:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "8th question.";
+								mes "'Wizard' will use a Blue gemstone";
+								mes "when casts 'Fire Pillar'.";
+								next;
+									menu "O",-, "X",X5_8;
+
+									set @score_test, @score_test + 10;
+
+								X5_8:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "9th question.";
+								mes "A name of Assassin's exclusive weapon'";
+								mes "'Katar' that gives";
+								mes "additional 50% damage to human type";
+								mes "is 'Infiltrator'.";
+								next;
+									menu "O",X5_9, "X",-;
+
+									set @score_test, @score_test + 10;
+
+								X5_9:
+								mes "^2f4f4f[Tsuji]^000000";
+								mes "10th question.";
+								mes "'Fire' is the most effective";
+								mes "property against to 'water'.";
+								next;
+									menu "O",Y0, "X",-;
+
+									set @score_test, @score_test + 10;
+
+
+
+							Y0:
+							mes "^2f4f4f[Tsuji]^000000";
+							mes "Well done~";
+							mes "You have solved all the 10 questions.";
+							mes "Let me check";
+							mes "how many you got?";
+							mes "^ff0000If you don't get a perfect score, you have to re-test~^000000";
+							next;
+							mes "^2f4f4f[Tsuji]^000000";
+							mes "Wait a moment please.";
+							mes "Grading.";
+							mes ". . . . . . . . . . . . . . .";
+							mes ". . . . . . . . . . . . . . .";
+							mes ". . . . . . . . . . . . . . .";
+							next;
+							mes "^2f4f4f[Tsuji]^000000";
+							mes "Hum . . . . . . . . . . . . .";
+							mes ". . . . . . . . . . . . . . .";
+							mes ". . . . . . . . . . . . . . .";
+							next;
+							mes "^2f4f4f[Tsuji]^000000";
+							mes "OK, finished grading.";
+							mes "I will tell your score.";
+							next;
+								if (@score_test > 99) {
+									mes "^2f4f4f[Tsuji]^000000";
+									mes "Your score is ^2f4f4f" + @score_test + "^000000!";
+									mes "You have";
+									mes "qualified to participate in";
+									mes "Quiz Revolution.";
+									mes "You have cleared the 1st test!";
+									next;
+									mes "^2f4f4f[Tsuji]^000000";
+									mes "This is a reward";
+									mes "from us.";
+									mes "Please accept it.";
+									set quiz_rvl,2;
+									getitem 501,10; //Red_Potion
+									next;
+									mes "^2f4f4f[Tsuji]^000000";
+									mes "Now, the 2nd test is";
+									mes "ready.";
+									mes "Go to 'Payon' and meet";
+									mes "'Seeil'.";
+									mes "You can get the 2nd test";
+									mes "from him.";
+									next;
+									mes "^2f4f4f[Tsuji]^000000";
+									mes "You have no business with me";
+									mes "Have a good day.";
+									close;
+								} else {
+									set quiz_rvl,1;
+									mes "^2f4f4f[Tsuji]^000000";
+									mes "You score is ^2f4f4f" + @score_test + "^000000.";
+									mes "You did not get a perfect score.";
+									mes "I do not tell you";
+									mes "where you got wrong.";
+									mes "You have to take the test again.";
+									close;
+									}
+
+
+					sM2_No:
+						mes "^2f4f4f[Tsuji]^000000";
+						mes "Oh, really?";
+						mes "Well, it's up to you.";
+						mes "Too bad.";
+						mes "If you change your mind,";
+						mes "let me know.";
+						close;
+	}
+}
+M_MaxItem:
+			mes "^2f4f4f[Tsuji]^000000";
+	  		mes "- Wait a minute !! -";
+		 	mes "- You currently have too many items that -";
+	   		mes "- you can't receive an item. -";
+			mes "- Please loose some weight -";
+	   		mes "- and try again. -";
+			close;
+
+L_OverWeight:
+			mes "^2f4f4f[Tsuji]^000000";
+	  		mes "- Wait a minute !! -";
+		 	mes "- You currently have too many items that -";
+	   		mes "- you can't receive an item. -";
+			mes "- Please loose some weight -";
+	   		mes "- and try again. -";
+			close;
+}
+
+//======================================payon=================================
+payon.gat,85,133,4	duplicate(RecepQuiz)	Receptionist#2	755
+//======================================geffen================================
+geffen.gat,111,104,4	duplicate(RecepQuiz)	Receptionist#3	755
+//====================================morocc==================================
+morocc.gat,148,272,5	duplicate(RecepQuiz)	Receptionist#4	755
+//=============================Alberta========================================
+alberta.gat,29,241,4	duplicate(RecepQuiz)	Receptionist#5	755
+//============================================================================
+
+//===================Quiz Revolution 2nd quest collecting job items==================
+payon.gat,111,117,3	script	Seeil	89,{
+if (countitem(1201) > 3) goto M_MaxItem;
+if (checkweight(1201,3) == 0 ) goto L_OverWeight;
+
+	if (quiz_rvl > 13) {
+		mes "[Seeil]";
+		mes "How was the last test? I hope you do this";
+		mes "one well.";
+		close;
+	} else if (quiz_rvl == 13) {
+		mes "[Seeil]";
+		mes "Since you have cleared the conditions to receive the";
+		mes "last test, please go and visit Radeng in Prontera.";
+		mes "During that time, I will transfer";
+		mes "will transfer all";
+		mes "your data.";
+		next;
+		mes "[Seeil]";
+		mes "So this is the last one. Show me some spirit!";
+		mes "This is a present to encourage you! Take it!";		
+		set quiz_rvl,14;
+		getitem 503,10; //Yellow_Potion
+		close;
+
+	} else if (quiz_rvl > 6) && (quiz_rvl < 13) {
+		mes "[Seeil]";
+		mes "Eh? You didn't finish the marathon test and";
+		mes "came out in the middle of the test.";
+		mes "Oh my.. I don't know how you came out, but";
+		mes "this can't be like this. I will send you";
+		mes "once again!";
+		close2;
+		set quiz_rvl,6;
+		warp "quiz_test.gat",385,388;
+		end;
+
+	} else if (quiz_rvl == 6) {
+		mes "[Seeil]";
+		mes "Ho.. You are fast. Well...";
+		mes "All the preparations have been made so I can send";
+		mes "you to the next stage. This will test your patience";
+		mes "and endurance. It will not be require to use your brain";
+		mes "this time. All you have to do is.. just run.";
+		next;
+		mes "[Seeil]";
+		mes "You can't come back from there until";
+		mes "you finish. Are you ready?";
+		mes "Will you take the third test";
+		mes "now?";
+		next;
+		menu "Take the test",-,"Refuse to take the test",M2_S;
+
+				mes "[Seeil]";
+				mes "Okay! I hope you do well and";
+				mes "pass the test.";
+				mes "Go for it!";
+				close2;
+				warp "quiz_test.gat",385,388;
+				end;
+
+			M2_S:
+				mes "[Seeil]";
+				mes "Oh my gosh, you are not ready";
+				mes "yet. I don't have any intention to";
+				mes "force you so whenever you are ready";
+				mes "please come back to me. Ha ha ha.";
+				close;
+
+				
+	} else if (quiz_rvl == 3) {
+		if (countitem(902) > 39) && (countitem(908) > 39) && (countitem(909) > 39) {
+			mes "[Seeil]";
+			mes "Wow. You have collected the requested items.";
+			mes "So I will keep my promise. Before that";
+			mes "this is a present for you.. Please";
+			mes "take it.";
+			delitem 902,40;
+			delitem 908,40;
+			delitem 909,40;
+			set quiz_rvl,6;
+			getitem 502,10; //Orange_Potion
+			next;
+			mes "[Seeil]";
+			mes "Then come back after a while and talk to me.";
+			mes "I need to prepare somethings for the third test";
+			mes "so... please go and do something";
+			mes "to kill some time.";
+			close;
+		}
+
+		mes "[Seeil]";
+		mes "You are under a test which you are required to bring";
+		mes "^FF0000Tree Root^000000, ^FF0000Spawn^000000,";
+		mes "^FF0000Jellopy^000000, 40ea each.";
+		mes "Go for it!";
+		close;
+
+	} else if (quiz_rvl == 4) {
+		if (countitem(905) > 39) && (countitem(920) > 39) && (countitem(909) > 39) {
+			mes "[Seeil]";
+			mes "Ho. You have collected the required items.";
+			mes "I will keep my promise too. Before that";
+			mes "this is a present for you. Please";
+			mes "take it.";
+			delitem 905,40;
+			delitem 920,40;
+			delitem 909,40;
+			set quiz_rvl,6;
+			getitem 502,10;  //Orange_Potion
+			next;
+			mes "[Seeil]";
+			mes "Then come back to me after a while.";
+			mes "I have somethings to prepare so";
+			mes "please go and do somethings to kill";
+			mes "time.";
+			close;
+		}
+
+		mes "[Seeil]";
+		mes "You are under a test which you are required to bring";
+		mes "^FF0000Stem^000000, ^FF0000Claw of Wolves^000000, ^FF0000Jellopy^000000";
+		mes "40 ea each.";
+		mes "Go for it.";
+		close;
+
+	} else if (quiz_rvl == 5) {
+		if (countitem(940) > 39) && (countitem(916) > 39) && (countitem(909) > 39) {
+
+			mes "[Seeil]";
+			mes "Ho. You have collected the required items.";
+			mes "I will keep my promise too. Before that";
+			mes "this is a present for you. Please";
+			mes "take it.";
+			delitem 940,40;
+			delitem 916,40;
+			delitem 909,40;
+			set quiz_rvl,6;
+			getitem 502,10;  //Orange_Potion
+			next;
+			mes "[Seeil]";
+			mes "Then come back to me after a while.";
+			mes "I have somethings to prepare so";
+			mes "please go and do somethings to kill";
+			mes "time.";
+			close;
+			}
+
+		mes "[Seeil]";
+		mes "You are under a test which you are required to bring";
+		mes "^FF0000Grasshopper's Leg^000000, FF0000Feather of Birds^000000, ^FF0000Jellopy^000000";
+		mes "40ea each.";
+		mes "Go for it!";
+		close;
+
+
+	} else if (quiz_rvl == 2) {
+
+		mes "[Seeil]";
+		mes "Hmm? You are the one Tsuji sent?";
+		mes "Your name is... " +strcharinfo(0)+ " Right? Okay...";
+		mes "Confirmed. You look about the same as Tsuji";
+		mes "described to me. Well, shall we start the";
+		mes "test?";
+		next;
+		mes "[Seeil]";
+		mes "It isn't that tough. All you have";
+		mes "to do is bring specified items";
+		mes "Life isn't that hard~";
+		set @japtem,rand(2);
+		next;
+		
+			if (@japtem == 0) {
+				set quiz_rvl,3;
+				mes "[Seeil]";
+				mes "Bring ^FF0000Tree Root ^000000 40ea, ^FF0000Spawn";
+				mes "^000000 40ea, and ^FF0000Jellopy^000000 40ea";
+				mes "I told ya. It's is not so hard, is it?";
+				mes "I would like to specify some items hard to find";
+				mes "but seniors told me not ";
+				mes "to do so~ Hehe.";
+				next;
+				mes "[Seeil]";
+				mes "Well, bring it as soon as you can. This is";
+				mes "an easy test, but there is a time limit.";
+				mes "Sooner the better, that is what";
+				mes "I mean~";
+				close;
+				}
+
+			else if (@japtem == 1) {
+				set quiz_rvl,4;
+				mes "[Seeil]";
+				mes "Bring ^FF0000Stem^000000 40ea, ^FF0000Wolf Claw^000000 40ea,";
+				mes "and ^FF0000Jellopy^000000 40ea.";
+				mes "I told ya. It's is not so hard, is it?";
+				mes "I would like to specify some items hard to find";
+				mes "but seniors told me not ";
+				mes "to do so~ Hehe.";
+				next;
+				mes "[Seeil]";
+				mes "Well, bring it as soon as you can. This is";
+				mes "an easy test, but there is a time limit.";
+				mes "Sooner the better, that is what";
+				mes "I mean~";
+				close;
+				}
+
+			else if (@japtem == 2) {
+				set quiz_rvl,5;
+				mes "[Seeil]";
+				mes "^FF0000Grasshopper's Leg^000000 40ea, ^FF0000Feather of Birds^000000 40ea,";
+				mes "and ^FF0000Jellopy^000000 40ea.";
+				mes "I told ya. It's is not so hard, is it?";
+				mes "I would like to specify some items hard to find";
+				mes "but seniors told me not ";
+				mes "to do so~ Hehe.";
+				next;
+				mes "[Seeil]";
+				mes "Well, bring it as soon as you can. This is";
+				mes "an easy test, but there is a time limit.";
+				mes "Sooner the better, that is what";
+				mes "I mean~";
+				close;
+				}
+	} else {
+
+	mes "[Seeil]";
+	mes "Call me Seeil=Lanchest";
+	mes "I am here to test the ones who";
+	mes "wishes to join in the quiz event.";
+	next;
+	mes "[Seeil]";
+	mes "I am in charge of second and third test";
+	mes "so in order to get a test from me, you have to";
+	mes "pass the first test which is given";
+	mes "by Tsuji.";
+	close;
+}
+M_MaxItem:
+			mes "^800000[Seeil]^000000";
+	  		mes "- Wait a minute !! -";
+		 	mes "- You currently have too many items that -";
+	   		mes "- you can't receive an item. -";
+			mes "- Please loose some weight -";
+	   		mes "- and try again. -";
+			close;
+
+L_OverWeight:
+			mes "^800000[Seeil]^000000";
+	  		mes "- Wait a minute !! -";
+		 	mes "- You currently have too many items that -";
+	   		mes "- you can't receive an item. -";
+			mes "- Please loose some weight -";
+	   		mes "- and try again. -";
+			close;
+}
+
+//=========================================================================================================================================================
+prontera.gat,116,266,5	script	Receptionist	109,{
+
+if (countitem(1201) > 3) goto M_MaxItem;
+if (checkweight(1201,3) == 0 ) goto L_OverWeight;
+
+
+if(quiz_rvl == 18) {
+
+			mes "^800000[Radeng]^000000";
+			mes "^6b8e23" + strcharinfo(0)+ "^000000?";
+			mes "'Go look for ^b8860b'Kantryl'^000000 ";
+			mes "at Izlude.";
+			close;
+
+
+
+} else if(quiz_rvl == 17) {
+
+			if (countitem(955) > 19) && (countitem(913) > 19) && (countitem(729) > 0) {
+
+				mes "^800000[Radeng]^000000";
+				mes "Oh~";
+				mes "You are here!";
+				mes "Let me check whether";
+				mes "you brought the right thing.";
+				next;
+				mes "^800000[Radeng]^000000";
+				mes "Yes,that's right.";
+				mes "You brought the right thing.";
+				mes "Please, wait a second and..";
+				mes "I have to";
+				mes "put you on the list.";
+				next;
+				mes "^800000[Radeng]^000000";
+				mes "You are..^6b8e23" + strcharinfo(0)+ "^000000 ..right?";
+				mes "Hm...";
+				mes "Well done.";
+				mes "And this is compensation for the";
+				mes "ones who have passed the test.";
+				next;
+				mes "^800000[Radeng]^000000";
+				mes "All you have to do is";
+				mes "meeting ^b8860b'Kantryl'^000000";
+				mes "at Izlude.";
+				delitem 955,20;
+				delitem 913,20;
+				delitem 729,1;
+				set quiz_rvl,18;
+				getitem 504,10;  //White_Potion
+				next;
+				mes "^800000[Radeng]^000000";
+				mes "Goodbye~~.";
+				close;
+			}
+			mes "^800000[Radeng]^000000";
+			mes "Oh~~";
+			mes "You are here!";
+			mes "Let me check whether";
+			mes "You brought the right thing.";
+			next;
+			mes "^800000[Radeng]^000000";
+			mes "oh my....";
+			next;
+			mes "^800000[Radeng]^000000";
+			mes "Seems like you didn't prepare";
+			mes "what I asked you for.";
+			mes "I'll tell you what items you have to bring.";
+			mes "I'm not going to tell you again.";
+			mes "So please remember.";
+			next;
+			mes "^800000[Radeng]^000000";
+			mes "The items are";
+			mes "^19197020 Warm peeling^000000";
+			mes "^19197020Tooth of Bat^000000";
+			mes "^1919701 Zircon^000000";
+			close;
+
+
+
+
+		
+
+} if(quiz_rvl == 16) {
+			if (countitem(1055) > 29) && (countitem(940) > 29) && (countitem(948) > 29) && (countitem(730) > 0) {
+				mes "^800000[Radeng]^000000";
+				mes "Oh~~~";
+				mes "You are here!";
+				mes "Let me check whether ";
+				mes "you brought the right thing.";
+				next;
+				mes "^800000[Radeng]^000000";
+				mes "Yes,that's right.";
+				mes "You brought the right thing.";
+				mes "Please, wait a second and..";
+				mes "I have to";
+				mes "put you on the list.";
+				next;
+				set quiz_rvl,18;
+				getitem 504,10;  //White_Potion
+				delitem 1055,30;
+				delitem 940,30;
+				delitem 948,30;
+				delitem 730,1;
+				mes "^800000[Radeng]^000000";
+				mes "You are..^6b8e23" + strcharinfo(0)+ "^000000..right?";
+				mes "Hm...";
+				mes "Well done.";
+				mes "And this is compensation for the";
+				mes "ones who have passed the test.";
+				next;
+				mes "^800000[Radeng]^000000";
+				mes "All you have to do is";
+				mes "meeting ^b8860b'Kantryl'^000000";
+				mes "at Izlude.";
+				next;
+				mes "^800000[Radeng]^000000";
+				mes "Goodbye";
+				close;
+			}
+			mes "^800000[Radeng]^000000";
+			mes "Oh~~~";
+			mes "You are here!";
+			mes "Let me check whether";
+			mes "you brought the right thing.";
+			next;
+			mes "^800000[Radeng]^000000";
+			mes "Oh my....";
+			next;
+			mes "^800000[Radeng]^000000";
+			mes "Seems like you didn't prepare";
+			mes "what I asked you for..";
+			mes "I'll tell you what items you have to bring..";
+			mes "I'm not going to tell you again.";
+			mes "So please remember..";
+			next;
+			mes "^800000[Radeng]^000000";
+			mes "^191970Earthwarm Peeling^000000 30";
+			mes "^191970Grasshopper's Leg^000000 30";
+			mes "^191970Bear's Footskin^000000 30";
+			mes "^1919701carat Diamond^000000 1.";
+			mes "Try hard.";
+			close;
+
+
+
+
+	
+} else if(quiz_rvl == 15) {
+			mes "^800000[Radeng]^000000";
+			mes "You are....";
+			mes "the one who left before I tell you the score";
+			mes "Aren't you?";
+			mes "Can't tell you failed. So...";
+			next;
+			mes "If ^800000[Radeng]^000000";
+			mes "^191970Earthwarm Peeling^000000 30";
+			mes "^191970Grasshopper's Leg^000000 30";
+			mes "^191970Bear's Footskin^000000 30";
+			mes "^1919701carat Diamond^000000 1";
+			mes "is prepared,";
+			mes "You are pass.";
+			set quiz_rvl,16;
+			close;
+
+} else if(quiz_rvl == 14) {
+			mes "^800000[Radeng]^000000";
+			mes "Hello";
+			mes "I'm 'Radeng'.";
+			mes "I'm in charge of 4th test.";
+			mes "You seem to have finished";
+			mes "3rd test!";
+			next;
+			mes "^800000[Radeng]^000000";
+			mes "Then,let's start 4th test.";
+			mes "the last barrier of quiz revolution.";
+			mes "First of all,";
+			mes "I will briefly go over about the test.";
+			next;
+			mes "^800000[Radeng]^000000";
+			mes "you have to do quiz and collect items";
+			mes " ";
+			mes "You have to answer 10 mulptiple choice questions";
+			mes "and the amount of required items changes ";
+			mes "depending on score you acheive.";
+			mes " ";
+			next;
+			mes "^800000[Radeng]^000000";
+			mes "First,";
+			mes "If you clear all 10 questions";
+			mes "you are pass with";
+			mes "pretest of collecting items.";
+			next;
+			mes "^800000[Radeng]^000000";
+			mes "Second,";
+			mes "If you score between 50~90";
+			mes "required items are";
+			mes "not so much.";
+			next;
+			mes "^800000[Radeng]^000000";
+			mes "Third,";
+			mes "If you score between 0~40";
+			mes "required items will be";
+			mes "vast.";
+			next;
+			mes "^800000[Radeng]^000000";
+			mes "Well, this is all about";
+			mes "4th test.";
+			mes "Then, let's start!";
+			next;
+				menu "Yes",-,"No",M_No;
+
+						mes "^800000[Radeng]^000000";
+						mes "Well,now";
+						mes "10 questions will be presented.";
+						mes "Look carefully through ";
+						mes "questions and";
+						mes "choose the right answer.";
+						next;
+						mes "^800000[Radeng]^000000";
+						mes "1st question.";
+						mes "How many jobs";
+						mes "are in the game?";
+						set @score_test2, 0;
+						next;
+							menu "22",sM1_1,"28",sM1_1,"32",sM1_1,"34",-;
+				
+								set @score_test2, @score_test2 + 10;
+
+						sM1_1:
+	
+						mes "^800000[Radeng]^000000";
+						mes "2nd question.";
+						mes "The name of santa NPC";
+						mes "which links christmas town";
+						mes "'Lutie' and 'Aldebaran'?";
+						next;
+							menu "Warp Santa",sM1_2, "Link Santa",-, "Lutie Santa",sM1_2, "Hulk Santa",sM1_2;
+								
+								set @score_test2, @score_test2 + 10;
+
+						sM1_2:
+						mes "^800000[Radeng]^000000";
+						mes "3rd question.";
+						mes "What job level at least you have to be";
+						mes "to learn novice skill";
+						mes "'Pretend dead'?";
+						next;
+							menu "Job level4",sM1_3,"Job level5",sM1_3,"Job level6",sM1_3,"Job level7",-;
+								
+								set @score_test2, @score_test2 + 10;
+
+						sM1_3:
+						mes "^800000[Radeng]^000000";
+						mes "4th question.";
+						mes "Require items";
+						mes "to raise Poring?";
+						next;
+							menu "Unripe Apple",-,"Rippen Apple",sM1_4, "Delicious looking Apple",sM1_4, "Apple",sM1_4;
+					
+								set @score_test2, @score_test2 + 10;
+
+						sM1_4:
+						mes "^800000[Radeng]^000000";
+						mes "5th question";
+						mes "What doll can you buy";
+						mes "from NPC?";
+						next;
+							menu "Doll",-,"Baphomet Doll",sM1_5,"Yoyo Doll",sM1_5,"Rocker Doll",sM1_5;
+							
+								set @score_test2, @score_test2 + 10;
+
+						sM1_5:
+						mes "^800000[Radeng]^000000";
+						mes "6th question.";
+						mes "Name of monster which drop";
+						mes "'Big Ribbon'?";
+						next;
+							menu "Eclipse",sM1_6,"Dragon Fly",sM1_6,"Vocal",sM1_6,"Toad,",-;
+							
+								set @score_test2, @score_test2 + 10;
+
+						sM1_6:
+						mes "^800000[Radeng]^000000";
+						mes "Choose the monster that has smiliar size and form of";
+						mes "Pring.";
+						next;
+							menu "Pupa",sM1_7,"Fabre",sM1_7,"Wander Man",-,"Golem",sM1_7;
+						
+								set @score_test2, @score_test2 + 10;
+
+						sM1_7:
+						mes "^800000[Radeng]^000000";
+						mes "8th question.";
+						mes "When can Green Herb work";
+						mes "it's efficacy?";
+						next;
+							menu "Silence",sM1_8,"Sleep",sM1_8,"Poison",-,"Chaos",sM1_8;
+							
+								set @score_test2, @score_test2 + 10;
+
+						sM1_8:
+						mes "^800000[Radeng]^000000";
+						mes "9th question.";
+						mes "Which weapon gives biggest damages";
+						mes "to small sized monsters?";
+						next;
+							menu "Dagger",-,"Two hand Sword",sM1_9,"Katar",sM1_9,"One hand Sword",sM1_9;
+							
+								set @score_test2, @score_test2 + 10;
+
+						sM1_9:
+						mes "^800000[Radeng]^000000";
+						mes "Last question!!";
+						mes "What is not neccesary when learnig";
+						mes "First-aid treatment?";
+						next;
+							menu "Clover",sM1_0,"Red Herb",sM1_0,"Novice Nametag",-,"Sterilized Bandages",sM1_0;
+							
+								set @score_test2, @score_test2 + 10;
+
+						sM1_0:
+						mes "^800000[Radeng]^000000";
+						mes "You finished answering all questions.";
+						mes "Wonder what your score is.";
+						mes "10points for 1 question.";
+						mes "Please wait a second.";
+						next;
+						mes "^800000[Radeng]^000000";
+						mes "Please, wait a second and..";
+						mes "Grading.";
+						mes ". . . . . . . . . . . . . . .";
+						mes ". . . . . . . . . . . . . . .";
+						next;
+						mes "^800000[Radeng]^000000";
+						mes "OK.";
+						mes "Your score is" + strcharinfo(0)+ "";
+						mes "" + @score_test2 + "!" ;
+						set quiz_rvl,15;
+						next;
+							if (@score_test2 > 40) && (@score_test2 < 90)goto L_Passed;
+							if (@score_test2 >= 90)goto L_Perfect;
+								mes "^800000[Radeng]^000000";
+								mes "Your score is too low.";
+								mes "Like as I told you before,";
+								mes "you have to bring a lot of";
+								mes "items to pass the test.";
+								mes " ";
+								next;
+								mes "^800000[Radeng]^000000";
+								mes "Required items are";
+								mes "^191970Earthworm Peeling^000000 30";
+								mes "^191970Grasshopper's Leg^000000 30";
+								mes "^191970Bear's Footskin^000000 30";
+								mes "^1919701Carat Diamond^000000 1";
+								mes "";
+								next;
+								mes "^800000[Radeng]^000000";
+								mes "I'm sorry.";
+								mes "If you have scored just a little bit higher..";
+								mes ".........";
+								mes "Then,go look for items..";
+								set quiz_rvl,16;
+								close;
+
+						L_Passed:
+
+								mes "^800000[Radeng]^000000";
+								mes "You did fine. ";
+								mes "But as I told you before";
+								mes "you need to bring";
+								mes "some more items.";
+								mes " ";
+								next;
+								mes "^800000[Radeng]^000000";
+								mes "Required items are";
+								mes "^191970Worm Peeling^000000 20";
+								mes "^191970Tooth of Bat^000000 20";
+								mes "^191970Zircon^000000 1.";
+								next;
+								mes "^800000[Radeng]^000000";
+								mes "I'm sorry~";
+								mes "If you have scored just a little bit higher..";
+								mes "you could have passed.";
+								mes "(KeKeke)";
+								mes "Then,go look for items..";
+								set quiz_rvl,17;
+								close;
+
+						L_Perfect:
+								mes "^800000[Radeng]^000000";
+								mes "Wow!You got it all right!.";
+								mes "Fantastic!!!!";
+								mes "For those of who ";
+								mes "got all right need no assignment";
+								mes " ";
+								next;	
+								mes "^800000[Radeng]^000000";
+								mes "" + strcharinfo(0)+ "";
+								mes "Have passed all tests.";
+								mes "Congratulations";
+								mes "And this is your compensation ";
+								mes "";
+								set quiz_rvl,18;
+								getitem 504,10;  //White_Potion
+								next;
+								mes "^800000[Radeng]^000000";
+								mes "Now, go look for";
+								mes "^b8860b'Kantryl'^000000.";
+								mes "at Izlude.";
+								close;
+	
+
+					M_No:
+						mes "^800000[Radeng]^000000";
+						mes "Come back if you change your mind.";
+						close;
+} else {
+			mes "^800000[Radeng]^000000";
+			mes "Hello~~~";
+			mes "Please join at comming";
+			mes "Quiz Revolution~";
+			mes "Register will be made";
+			mes "by receptionist in every town.";
+			close;
+}
+M_MaxItem:
+			mes "^800000[Radeng]^000000";		
+	  		mes "- Wait a minute !! -";
+		 	mes "- You currently have too many items that -";
+	   		mes "- you can't receive an item. -";
+			mes "- Please loose some weight -";
+	   		mes "- and try again. -";
+			close;
+
+L_OverWeight:
+			mes "^800000[Radeng]^000000";
+	  		mes "- Wait a minute !! -";
+		 	mes "- You currently have too many items that -";
+	   		mes "- you can't receive an item. -";
+			mes "- Please loose some weight -";
+	   		mes "- and try again. -";
+			close;
+}
+
+//=======================================================================================================================================================
+izlude.gat,106,220,5	script	Kantryl	98,{
+	
+if (countitem(1201) > 3) goto M_MaxItem;
+if (checkweight(1201,3) == 0 ) goto L_OverWeight;
+
+
+if(quiz_rvl == 20) {
+		mes "[Kantryl]";
+		mes "I see that you have already givin me a";
+		mes "notice of absence...";
+		mes "Well,  but I can't give you entry ticket.";
+		mes "who Knows~~";
+		mes "Wait untill quiz starts";
+		mes "You may catch a fortune.";
+		close;
+
+}else if(quiz_rvl == 19) {
+		mes "[Kantryl]";
+		mes "You have already received an entry ticket.";
+		mes "It's impossible getting";
+		mes "another one.";
+		next; 
+		mes "[Kantryl]";
+		mes "For reference, number of particapants are";
+		next;
+		mes "[Kantryl]";
+		mes "1st Quiz Revolution - " + quiz1 + "/200";
+		mes "2nd Quiz Revolution - " + quiz2 + "/200";
+		mes "3rd Quiz Revolution - " + quiz3 + "/200";
+		mes "4th Quiz Revolution - " + quiz4 + "/200";
+		mes "5th Quiz Revolution - " + quiz5 + "/200";
+		mes "keep it in your mind.";
+		close;
+
+
+} else if(quiz_rvl == 18) {
+
+		mes "[Kantryl]";
+		mes "You are " + strcharinfo(0)+ ".";
+		mes "Who finished the test.right?";
+		mes "Would you please make a decision ";
+		mes "whether you will join or not join the";
+		mes "Quiz Revolution.";
+		next;
+		mes "[Kantryl]";
+		mes "Would you like to join?";
+		mes "If you say yes, you can register at";
+		mes "Quiz Revolution";
+		mes "If you choose ^FF0000'NO,I won't join'^000000";
+		mes " then ^FF0000'You can't join'^000000";
+		mes "Please make a right decision.";
+		next;
+		mes "[Kantryl]";
+		mes "If you haven't made up your mind,";
+		mes "say yes for now";
+		mes "and can change later on.";
+		mes "Take it easy.";
+		next;
+			menu "Join", -, "Not join.",NJ;
+
+
+				mes "[Kantryl]";
+				mes "Itis to 1~5 round";
+				mes "first 200 have chance.";
+				mes ""+ strcharinfo(0)+ ",when do you want to join?";
+				mes "It is ^FF0000Impossible to cancel^000000";
+				mes "So please make right decision.";
+				next;
+				mes "[Kantryl]";
+				mes "1st Quiz Revolution - " + quiz1 + "/200";
+				mes "2nd Quiz Revolution - " + quiz2 + "/200";
+				mes "3rd Quiz Revolution - " + quiz3 + "/200";
+				mes "4th Quiz Revolution - " + quiz4 + "/200";
+				mes "5th Quiz Revolution - " + quiz5 + "/200";
+				next;
+				menu "Join 1st round",-,"Join 2nd round",s2nd,"Join 3rd round",s3nd,"Join 4th round",s4nd,"Join 5th round",s5nd;
+				
+						if(quiz1 > 199){
+							mes "[Kantryl]";
+							mes "I'm sorry. We are all full at";
+							mes "1st round of quiz revolution";
+							mes "No more applicants for 1st round.";
+							close;
+
+      						}
+						mes "[Kantryl]";
+						mes "Hm..."+ strcharinfo(0)+" ";
+						mes "I have received your application";
+						mes "Try hard and study hard.";
+						set quiz_rvl,19;
+						set quiz1,quiz1 + 1;
+						getitem 7280,1; //Quiz_Ticket01
+						close;
+
+
+
+
+					s2nd:
+						if(quiz2 > 199){
+								mes "[Kantryl]";
+							mes "I'm sorry. We are all full at";
+							mes "2nd round of quiz revolution";
+							mes "No more applicants for 2nd round.";
+							close;
+						}
+					
+						mes "[Kantryl]";
+						mes "Hm..."+ strcharinfo(0)+"";
+						mes "I have received your application";
+						mes "Try hard and study hard.";
+						set quiz_rvl,19;
+						set quiz2,quiz2 + 1;
+						getitem 7281,1;  //Quiz_Ticket02
+						close;
+					
+
+
+					s3nd:
+						if(quiz3 > 199){
+								mes "[Kantryl]";
+							mes "I'm sorry. We are all full at";
+							mes "3rd round of quiz revolution.";
+							mes "No more applicants for 3rd round.";
+							close;
+						}
+						
+						
+						mes "[Kantryl]";
+						mes "Hm..." + strcharinfo(0)+ "";
+						mes "I have received your application.";
+						mes "Try hard and study hard.";
+						set quiz_rvl,19;
+						set quiz3,quiz3 + 1;
+						getitem 7282,1;  //Quiz_Ticket03
+						close;
+					
+
+
+							
+					s4nd:
+						if(quiz4 > 199){
+								mes "[Kantryl]";
+							mes "I'm sorry. We are all full at";
+							mes "4th round of quiz revolution.";
+							mes "No more applicants for 4th round..";
+							close;
+						}
+					
+						mes "[Kantryl]";
+						mes "Hm..." + strcharinfo(0)+ "";
+						mes "I have received your application.";
+						mes "Try hard and study hard.";
+						set quiz_rvl,19;
+						set quiz4,quiz4 + 1;
+						getitem 7283,1;  //Quiz_Ticket04
+						close;
+						
+
+
+					
+					s5nd:
+						if(quiz5 > 199){
+								mes "[Kantryl]";
+							mes "I'm sorry. We are all full at";
+							mes "5th round of quiz revolution.";
+							mes "No more applicants for 5th round..";
+							close;
+						}
+
+						mes "[Kantryl]";
+						mes "Hm..." + strcharinfo(0)+ "";
+						mes "I have received your application.";
+						mes "Try hard and study hard.";
+						set quiz_rvl,19;
+						set quiz5,quiz5 + 1;
+						getitem 7284,1;  //Quiz_Ticket05
+						close;
+						
+
+
+
+			NJ:
+				mes "[Kantryl]";
+				mes "Ok,if that's how you think.";
+				mes "Choice is on you";
+				mes "Good job any way.";
+				set quiz_rvl,20;
+				next;
+				mes "[Kantryl]";
+				mes "Actually,we have plan to";
+				mes "allowed for those of who didn't ";
+				mes "apply previously unless they have an entry ticket.";
+				mes "If you have any chance to get an entry ticket,";
+				mes "you are always welcome.";
+				next;
+				mes "[Kantryl]";
+				mes "Go ask for the ones";
+				mes "who changed their mind.";
+				mes "If you are lucky,";
+				mes "you'll get the chance.";
+				close;
+} else {
+		mes "[Kantryl]";
+		mes "Hello~";
+		mes "I'm Kantryl=Ranegalf.";
+		mes "I help the ones who have passsed the test";
+		mes "to take a formal step.";
+		next;
+		mes "[Kantryl]";
+		mes "It is impossible  to accept";
+		mes "applications from those of who didn't";
+		mes "finish the test.";
+		mes "Go look for our staff in every";
+		mes "Midgarts";
+		mes "and take a test.";
+		next;
+		mes "[Kantryl]";
+		mes "At that time, I'll gladly";
+		mes "welcome you and accept the application.";
+		close;
+}
+M_MaxItem:
+			mes "[Kantryl]";		
+	  		mes "- Wait a minute !! -";
+		 	mes "- You currently have too many items that -";
+	   		mes "- you can't receive an item. -";
+			mes "- Please loose some weight -";
+	   		mes "- and try again. -";
+			close;
+
+L_OverWeight:
+			mes "[Kantryl]";
+	  		mes "- Wait a minute !! -";
+		 	mes "- You currently have too many items that -";
+	   		mes "- you can't receive an item. -";
+			mes "- Please loose some weight -";
+	   		mes "- and try again. -";
+			close;
+}
+
+//============================================================================================================================
+quiz_test.gat,387,350,4	script	"From somewhere::race_monk	45,2,2,{
+OnTouch:
+
+	if (quiz_rvl == 6) {
+	 	set quiz_rvl,7;
+		warp "quiz_test.gat",385,388;
+		end;
+	}else if (quiz_rvl == 7) {
+		set quiz_rvl,8;
+		warp "quiz_test.gat",385,388;
+		end;
+	}else if (quiz_rvl == 8) {
+		set quiz_rvl,9;
+		warp "quiz_test.gat",385,388;
+		end;
+	}else if (quiz_rvl == 9) {
+		set quiz_rvl,10;
+		warp "quiz_test.gat",385,388;
+		end;
+	}else if (quiz_rvl == 10) {
+		announce "You are almost there. Show me your spirit.",bc_blue|bc_map;
+		set quiz_rvl,11;
+		warp "quiz_test.gat",385,388;
+		end;
+	}else if (quiz_rvl == 11) {
+		set quiz_rvl,12;
+		warp "quiz_test.gat",385,388;
+		end;
+	}else if (quiz_rvl == 12) {
+		mes "[Seeil]";
+		mes "You have worked hard and finished.";
+		mes "It wasn't that hard as you thought, huh?";
+		mes "All you have to do is run in circle... Well,";
+		mes "come in front of me.";
+		announce "Congratulations! " +strcharinfo(0)+ ", you have passed the test!",bc_blue|bc_map;
+		close2;
+		set quiz_rvl,13;
+		warp "payon.gat",109,115;
+		end;
+ }
+
+}
+//=============================hiddenwarp=================================================================
+
+//-----------------------------1111-----------------------------------------------------------------------
+quiz_test.gat,82,384,4	script	Pit::ham_quiz#1-1	-1,0,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,83,384,4	script	Pit::ham_quiz#1-2	-1,0,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,82,385,4	script	Pit::ham_quiz#1-3	-1,0,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,83,385,4	script	Pit::ham_quiz#1-4	-1,0,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+//-----------------------------2222-----------------------------------------------------------------------
+quiz_test.gat,38,388,4	script	Pit::ham_quiz#2-1	-1,0,1,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,39,388,4	script	Pit::ham_quiz#2-2	-1,0,1,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,38,386,4	script	Pit::ham_quiz#2-3	-1,0,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,39,386,4	script	Pit::ham_quiz#2-4	-1,0,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+//-----------------------------3333-----------------------------------------------------------------------
+quiz_test.gat,11,158,4	script	Pit::ham_quiz#3-1	-1,1,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,11,159,4	script	Pit::ham_quiz#3-2	-1,1,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,13,159,4	script	Pit::ham_quiz#3-3	-1,0,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,13,158,4	script	Pit::ham_quiz#3-4	-1,0,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+//-----------------------------4444-----------------------------------------------------------------------
+quiz_test.gat,11,30,4	script	Pit::ham_quiz#4-1	-1,3,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,11,31,4	script	Pit::ham_quiz#4-2	-1,3,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,15,30,4	script	Pit::ham_quiz#4-3	-1,0,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,15,30,4	script	Pit::ham_quiz#4-4	-1,0,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+//-----------------------------5555-----------------------------------------------------------------------
+quiz_test.gat,70,12,4	script	Pit::ham_quiz#5-1	-1,0,1,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,71,12,4	script	Pit::ham_quiz#5-2	-1,0,1,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,70,10,4	script	Pit::ham_quiz#5-3	-1,0,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,71,10,4	script	Pit::ham_quiz#5-4	-1,0,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+//---------------------------6666-------------------------------------------------------------------------
+quiz_test.gat,186,11,4	script	Pit::ham_quiz#6-1	-1,2,3,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,189,11,4	script	Pit::ham_quiz#6-2	-1,0,3,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+//---------------------------7777-------------------------------------------------------------------------
+quiz_test.gat,387,43,4	script	Pit::ham_quiz#7-1	-1,1,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,387,42,4	script	Pit::ham_quiz#7-2	-1,1,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,389,43,4	script	Pit::ham_quiz#7-3	-1,0,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+quiz_test.gat,389,42,4	script	Pit::ham_quiz#7-4	-1,0,0,{
+OnTouch:
+	announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map;
+	warp "quiz_test.gat",387,387;
+	end;
+}
+
+//-------------------------------------------------------------------------------------------------------------
+// Comments
+// 0 = Didn't receive a quest from Tsuji
+// 1 = Failed Tsuji's quest
+// 2 = Pass Tsuji's quest and to 2nd round
+// 3 = Seeil's randomly collecting job item quest 1
+// 4 = Seeil's randomly collecting job item quest 
+// 5 = Seeil's randomly collecting job item quest 
+// 6 = Clear with collecting job item. start Marathon test
+// 7~12 =Checking Marathon quest occasionally.
+// 13 = Use after clearing Marathon quest
+// 14 = Clear 3rd quest, start Radeng(4th) quest
+// 15 = check after reporting errors of Radeng
+// 16 = randomly collecting job items at Radeng quest 1
+// 17 = randomly collecting job items at Radeng quest 2
+// 18 = Radeng quest clear. Possible time to apply. Begin Kantryl apply.
+// 19 = checked if you show intention to join 
+// 20 = checked If you don't show intention to join 
+// 21 = 3 items for the one who gets compansation
diff --git a/npc/quests/seals/brisingamen_seal.txt b/npc/quests/seals/brisingamen_seal.txt
index 8e79d74ad..618ea54fe 100644
--- a/npc/quests/seals/brisingamen_seal.txt
+++ b/npc/quests/seals/brisingamen_seal.txt
@@ -1,5536 +1,5536 @@
-//===== eAthena Script ======================================= 

-//= Brisingamen seal unlocking NPCs.

-//===== By: ================================================== 

-//= SinSloth

-//===== Current Version: ===================================== 

-//= 1.0a

-//===== Compatible With: ===================================== 

-//= eAthena

-//===== Description: ========================================= 

-//= Quest for breaking the seal of Brisingamen.

-//===== Additional Comments: =================================

-// 1.0 First version. Thanks to SinSloth for scripting it. [MasterOfMuppets]

-// 1.0a Removed duplicates [Toms]

-//============================================================

-

-prt_fild08.gat,175,374,3	script	Bard#brising	51,{

-

-	if ($God2 > 49 && $God3 < 100)

-{

-		if (god_brising > 49)

-	{

-		mes "[Nelliorde]";

-		mes "Oh, I guess you found what you wanted, huh? So how's it been going lately?";

-		next;

-		mes "[Nelliorde]";

-		mes "Recently I've been feeling strange, like something might happen soon. Aaah, forget, it's no big deal. Maybe I'm just being jumpy.";

-		next;

-		mes "[Nelliorde]";

-		mes "Right, right, let me play a song for you. Would you care to listen?";

-		next;

-		menu "Sure, why not~",L_Song,"How about some news?",L_News,"No thanks.",L_NoThx;

-			L_Song:

-				mes "[Nelliorde]";

-				mes "So, which song";

-				mes "would you like to hear?";

-				mes "Go ahead, pick one~";

-				next;

-				menu "Bragi's Poem",-,"Eternal Chaos",L_Chaos,"Assassin in the Sunset",L_Sunset,"Der Ring des Nibelungen",L_Nibel;

-						mes "[Nelliorde]";

-						mes "Bragi's Poem!";

-						mes "What a good choice!";

-						mes "I must say this song";

-						mes "represents the heart";

-						mes "of a poet!";

-						soundeffect "bragis_poem.wav",1;

-						close;

-

-					L_Chaos:

-						mes "[Nelliorde]";

-						mes "Eternal Chaos...";

-						mes "Sounds too chaotic.";

-						mes "By the way, I wonder";

-						mes "what the title really";

-						mes "means. Is it the chaos";

-						mes "of hell or our own reality?";

-						soundeffect "chaos_of_eternity.wav",1;

-						close;

-					L_Sunset:

-						mes "[Nelliorde]";

-						mes "Assassin in";

-						mes "the Sunset!";

-						mes "Yes, no one looks cooler than an Assassin, the bringer of death, standing alone in the sunset! Heh heh~";

-						soundeffect "assassin_of_sunset.wav",1;

-						close;

-					L_Nibel:

-						mes "[Nelliorde]";

-						mes "Der Ring des Nibelungen.....";

-						mes "Okay, are you ready to listen?";

-						mes "Hum hum hum....";

-						next;

-						soundeffect "ring_of_nibelungen.wav",1;

-						mes "^4D4DFFRheingold...";

-						mes "Hidden in the Rhein river.";

-						mes "If made into a ring,";

-						mes "Could rule the world~^000000";

-						next;

-						mes "^4D4DFFProtected by a spell";

-						mes "Cursing its thief";

-						mes "To never find love.";

-						mes "Alberich had known";

-						mes "Nonetheless stole it.";

-						mes "Love was forsaken for power.^000000";

-						next;

-						mes "^4D4DFFGiants built beautiful Valhalla";

-						mes "Matrimony with Freya";

-						mes "Goddess of beauty";

-						mes "Their supposed payment.";

-						mes "In not receiving it";

-						mes "They forcefully took her.^000000";

-						next;

-						mes "^4D4DFFThe gods would";

-						mes "give Alberich's treasure";

-						mes "To the Giants for Freya's return.";

-						mes "Loki tricked Alberich,";

-						mes "Stealing his ring or power.^000000";

-						next;

-						mes "^4D4DFFBut Alberich cursed his ring";

-						mes "Before it was returned to him,";

-						mes "Envy and death would";

-						mes "befall its wearers.^000000";

-						next;

-						mes "^4D4DFFThe ring was given to the giants";

-						mes "Freya was returned to the gods";

-						mes "The giants killed themselves";

-						mes "Fighting over the rheingold,";

-						mes "Victims of";

-						mes "Alberich's curse~^000000";

-						close;

-			

-			L_News:

-				mes "[Nelliorde]";

-				mes "You wish to";

-				mes "hear of some news?";

-				mes "What kind of news do";

-				mes "you wish to know about?";

-				next;

-

-				menu "About Prontera!",-,"About seaside areas.",L_NewsSea,"Is the desert still hot?",L_NewsDes,"How about the borderlands?",L_NewsBord;

-						mes "[Nelliorde]";

-						mes "What?! Prontera?!";

-						mes "Can you not see that the front gate of Prontera is right before you? You should at least know where you are, adventurer.";

-						next;

-						mes "[Nelliorde]";

-						mes "Anyways, I know one interesting news about Prontera. But, it's a secret. Shh! Are you... Single?";

-						next;

-						mes "[Nelliorde]";

-						mes "If so, go visit the tavern. I met a guy there who took me a nice place. Oh yes. He took me 'the place' where singles are forbidden~!";

-						close;

-					L_NewsSea:

-						mes "[Nelliorde]";

-						mes "Seaside areas?";

-						mes "That's a funny question. I mean, there's Alberta and a few other places where you can see the sea.";

-						next;

-						mes "[Nelliorde]";

-						mes "To the SouthWest there's Kokomo Beach. But, I suppose it's too dangerous just to go there to take a stroll.";

-						next;

-						mes "[Nelliorde]";

-						mes "Kokomo beach is a large expanse of sand. The nearby water is filled with sea animals, so you can enjoy catching Shellfishes.";

-						next;

-						mes "[Nelliorde]";

-						mes "However, there are always bullies in that kind of place. Once, I met a threatening looking hoodlum with red spiky hair.";

-						next;

-						mes "[Nelliorde]";

-						mes "He was chewing on something and spat on the ground. He big buffoon managed to intimidate me into giving him all of my Zeny!";

-						next;

-						mes "[Nelliorde]";

-						mes "^333333*Sigh...*^000000";

-						mes "This world is too";

-						mes "dangerous for a young";

-						mes "and fragile Bard.";

-						next;

-						mes "[Nelliorde]";

-						mes "By the way, Alberta doesn't seem to have changed. The Sunken Ship looks the same as well, with all of its Skeleton Pirates and whatnot. You know how it is.";

-						next;

-						mes "[Nelliorde]";

-						mes "The event agency in charge of expeditions into the Sunken Ship is still making tons of money. If you have nothing to do, why don't you hunt for monsters down there?";

-						close;

-					L_NewsDes:

-						mes "[Nelliorde]";

-						mes "Oh, hell yes!";

-						mes "When is it not?";

-						mes "The desert is hot, has";

-						mes "been hot and probably";

-						mes "always will be...!";

-						next;

-						mes "[Nelliorde]";

-						mes "Giant worms still jump out of nowhere, freaking out innocent travellers like myself, and the Sandmen still kick people in the ass!";

-						next;

-						mes "[Nelliorde]";

-						mes "Even if the desert is filled with hideous monsters, the view of the ocean there is so magnificent. Hah, it makes me want to play a song.";

-						next;

-						mes "[Nelliorde]";

-						mes "I must say there is";

-						mes "one place you may wish";

-						mes "to see in the desert.";

-						next;

-						mes "[Nelliorde]";

-						mes "I'm talking about the Assassin Guild. Supposedly, it's hidden behind a sandstorm in the Morroc Desert!";

-

-						if (Class == Job_Assassin || Class == Job_Assassin_Cross) mes "But you should know what I am talking about! So when are you gonna take me to the guild, eh?";

-						else mes "Have you ever been there before?";

-						close;

-					L_NewsBord:

-						mes "[Nelliorde]";

-						mes "Well, to the north is the Schwaltzwald Republic.";

-						mes "There, you'll find Juno,";

-						mes "the 'City of Sages.'";

-						next;

-						mes "[Nelliorde]";

-						mes "The people there say that there is one major nuisance, a man known as the 'Mad Scientist.' He's antisocial and creates a lot of public disturbances with his experiments.";

-						next;

-						mes "[Nelliorde]";

-						mes "It seems everyone in Juno hates him with passion. Even one of the Tool Shop owners begged a passing adventurer to stop this Mad Scientist's research!";

-						next;

-						mes "[Nelliorde]";

-						mes "But I have a different opinion about him. I believe it's not a good idea to interrupt the work of any scientist. After all, he might just discover something important, even if his experiments are a little hazardous.";

-						next;

-						mes "[Nelliorde]";

-						mes "Speaking of discoveries, you know how Juno floats in the air, right?";

-						next;

-						mes "[Nelliorde]";

-						mes "It's said that a piece of Ymir's Heart generates enough power to keep the entire city aloft in the sky. Isn't that amazing?";

-						next;

-						mes "[Nelliorde]";

-						mes "Even more recent is the news about the discovery of Ymir's Book. You can read it in Juno's Sage Castle. I hear that it contains the secret to meeting Valkyrie...";

-						close;

-			L_NoThx:

-				mes "[Nelliorde]";

-				mes "Huh? Okay then, talk to you later. May Bragi bless you on your journeys.";

-				close;

-	}

-		else if(god_brising > 0 && god_brising < 50)

-	{

-		mes "[Nelliorde]";

-		mes "So, have you met Mr. Kaili? Please do your best. After all, I especially recommended you~";

-		next;

-

-		menu "Tell me a story.",-,"Sing a song for me.",L_Sing;

-				mes "[Nelliorde]";

-				mes "Hmm. What would be a good story for you this time...? Ah yes, I've got it. Let me tell you about one of my own adventures. It was a pretty amazing experience.";

-				next;

-				mes "[Nelliorde]";

-				mes "I went to Morroc, the city of the desert. On my way there, I became exhausted from the heat. Luckily, I found a hole beneath the shadows and climbed in to rest.";

-				next;

-				mes "[Nelliorde]";

-				mes "Oh my God...";

-				mes "If I had known";

-				mes "better, I never";

-				mes "would have gone";

-				mes "inside that place...";

-				next;

-				mes "[Nelliorde]";

-				mes "I actually crawled into the infamous ^FF0000Ant Hell^000000! I don't sound like a coward to you, do I?";

-				next;

-				mes "[Nelliorde]";

-				mes "Well, the ants aren't the only ones living there. I wasn't afraid of them at all. Except, of course, when they attacked in groups.";

-				next;

-				mes "[Nelliorde]";

-				mes "What I was really afraid of was this some sort of strawberry colored... tongue thing. Phreeoni!";

-				next;

-				mes "[Nelliorde]";

-				mes "Fortunately, I survived intact, although I still have nightmares of that man-sized tongue.";

-				next;

-				mes "[Nelliorde]";

-				mes "Once I got out of there, I craved human companionship and to restore my sense of normalcy. The closest place that I knew was Paros Lighthouse.";

-				next;

-				mes "[Nelliorde]";

-				mes "Yet again, I decided to traverse the desert, despite the fact that the Kafra Ladies provide a very convenient teleport service there.";

-				next;

-				mes "[Nelliorde]";

-				mes "Anyway, the fortress of Sandaruman is on the way to Paros Lighthouse. I remember Serutero, a guy I met in south Morroc, telling me about its scenic beauty.";

-				next;

-				mes "[Nelliorde]";

-				mes "I was so excited about seeing it for myself. After all, doesn't 'Sandaruman' sound like the name of a beautiful place?";

-				next;

-				mes "[Nelliorde]";

-				mes "But I immediately regret my decision once I arrived. Of course, the view was breathtaking: the sandy hills near the ocean, as well as the ruins.";

-				next;

-				mes "[Nelliorde]";

-				mes "Of course I forgot Serutero's warning about all the monsters. Argh! It was a nightmare! Instead of enjoying the scenary, I ended up running for my life.";

-				next;

-				mes "[Nelliorde]";

-				mes "I was still trying to escape those monsters when I stumbled upon an old house to the West of Sandaruman, that seemed to be in a state of decay.";

-				next;

-				mes "[Nelliorde]";

-				mes "I recalled that Serutero said that no one was living in that area, so I began to worry a bit. Still, I was desperate and needed refuge.";

-				next;

-				mes "[Nelliorde]";

-				mes "In my panic, I violently knocked on the door and screamed for someone to let me inside. Then do you know what I heard?";

-				next;

-				mes "[Nelliorde]";

-				mes "^FF0000Who's there?!";

-				mes "Who would dare";

-				mes "intrude my territory?^000000";

-				mes "I was freaked out! However owned that house must have been some kind of lunatic!";

-				next;

-				mes "[Nelliorde]";

-				mes "Th-then, with the specter of Death nipping at my heels, he told me to get lost! Luckily, I was saved by a mysterious, wandering SuperNovice, but that's another story.";

-				next;

-				mes "[Nelliorde]";

-				mes "In any case, I finally arrived at Paros Lighthouse. There, I learned that the old house was a secret camp for the Rogue Guild. ";

-				next;

-				mes "[Nelliorde]";

-				mes "It's amazing, how they can live in such dangerous areas. Only Rogues would be able to survive there, you know?";

-				next;

-				mes "[Nelliorde]";

-				mes "Ah...";

-				mes "I'm so tired from talking so much. But if I happen to have another adventure, I shall share that tale to you.";

-				close;

-

-			L_Sing:

-				mes "[Nelliorde]";

-				mes "Ah, you wish";

-				mes "to hear a song?";

-				mes "Okay! I shall then";

-				mes "perform my favorite.";

-				next;

-				mes "[Nelliorde]";

-				mes "I chased after fame.";

-				mes "It eluded me.";

-				mes "I ran after happiness";

-				mes "But never caught it.";

-				next;

-				mes "[Nelliorde]";

-				mes "But tomorrow will still";

-				mes "Be there, I'm sure.";

-				mes "Like the Water Mill";

-				mes "In Al De Baran";

-				mes "Which turns as";

-				mes "Life goes on.";

-				next;

-				mes "[Nelliorde]";

-				mes "Cheer up! Life goes on.";

-				mes "As surely as the Water";

-				mes "Mill turns, tomorrow";

-				mes "Will come.";

-				close;

-	}

-		else

-	{

-		mes "[Nelliorde]";

-		mes "Say...";

-		mes "Have we met before?";

-		mes "Hmm? Never? Well...";

-		mes "That's rather odd.";

-		next;

-		mes "[Nelliorde]";

-		mes "I seem to recall that you've asked me to give you some information if I ever have any. Well, now I have and shall share it with you~";

-		next;

-		mes "[Nelliorde]";

-		mes "The usefulness of this information all depends on you. Now, have you heard of the ^3333CCMonster Research Organization^000000?";

-		next;

-		mes "[Nelliorde]";

-		mes "I happened to get this information from its headquarters in Juno. So how does that sound?";

-		next;

-

-		menu "Wee~ I want to hear!",-,"Booooring~",L_Boring;

-				mes "[Nelliorde]";

-				mes "Well...!";

-				mes "You seem to be";

-				mes "very excited about";

-				mes "this new tidbit of";

-				mes "knowledge I have~";

-				next;

-

-					if(BaseLevel < 70)

-				{

-					mes "[Nelliorde]";

-					mes "Alas, this information doesn't seem to be very valuable to someone such as yourself.";

-					next;

-					mes "[Nelliorde]";

-					mes "I'm so very sorry to have excited you, but only people that are strong enough to handle grueling work can benefit from this.";

-					next;

-					mes "[Nelliorde]";

-					mes "Why don't you travel around and gain more experiences? I will let you know when you're ready, you know~";

-					close;

-				}

-					else

-				{

-					mes "[Nelliorde]";

-					mes "Ooh...";

-					mes "And you look";

-					mes "like you can handle";

-					mes "this kind of information.";

-					mes "I'll share everything I know!";

-					next;

-					mes "[Nelliorde]";

-					mes "One day, an adventurer discovered a strange, mysterious object. Unable to figure out what it could do, he visited the Monster Organization.";

-					next;

-					mes "[Nelliorde]";

-					mes "There, it was entrusted to a scholar by the name of Mr. Kaili. He still hasn't uncovered the truth about that item and wishes for assistance in his investigation.";

-					next;

-					mes "[Nelliorde]";

-					mes "Mr. Kaili suspects that the item might be part of an undiscovered ancient relic. Fortunately, he is also researching ancient relics as a project assigned by the royal court.";

-					next;

-					mes "[Nelliorde]";

-					mes "So what do you think? Isn't that interesting? Of course, you'd better speak to Mr. Kaili if you wish to learn more. If you'd like, I shall write you a letter or recommendation.";

-					next;

-

-					menu "Sure! Sounds good.",-,"Sorry, I am not that interested.",L_NoInterest;

-							mes "[Nelliorde]";

-							mes "Excellent..!";

-							mes "So you name is...";

-							mes "" + strcharinfo(0) + "?";

-							next;

-							mes "[Nelliorde]";

-							mes "Alright, I shall contact him, right away! Oh, and you can find the Monster Organization west of Juno's central plaza. It shouldn't be hard to find. Good luck!";

-							set god_brising,1;

-							close;

-						L_NoInterest:

-							mes "[Nelliorde]";

-							mes "Ah, it's disappointing to hear that. I thought that you'd be perfect to help out Mr. Kaili. Oh well, talk to you later~";

-							close;

-				}

-			L_Boring:

-				mes "[Nelliorde]";

-				mes "Boring, you say?";

-				mes "Perhaps, but not as";

-				mes "boring as an adventurer";

-				mes "that passes up a chance";

-				mes "for an adventure, yes?";

-				next;

-				menu "Tell me a story.",-,"Sing a song for me.",L_Sing2;

-						mes "[Nelliorde]";

-						mes "Hmm. What would be a good story for you this time...? Ah yes, I've got it. Let me tell you about one of my own adventures. It was a pretty amazing experience.";

-						next;

-						mes "[Nelliorde]";

-						mes "I went to Morroc, the city of the desert. On my way there, I became exhausted from the heat. Luckily, I found a hole beneath the shadows and climbed in to rest.";

-						next;

-						mes "[Nelliorde]";

-						mes "Oh my God...";

-						mes "If I had known";

-						mes "better, I never";

-						mes "would have gone";

-						mes "inside that place...";

-						next;

-						mes "[Nelliorde]";

-						mes "I actually crawled into the infamous ^FF0000Ant Hell^000000! I don't sound like a coward to you, do I?";

-						next;

-						mes "[Nelliorde]";

-						mes "Well, the ants aren't the only ones living there. I wasn't afraid of them at all. Except, of course, when they attacked in groups.";

-						next;

-						mes "[Nelliorde]";

-						mes "What I was really afraid of was this some sort of strawberry colored... tongue thing. Phreeoni!";

-						next;

-						mes "[Nelliorde]";

-						mes "Fortunately, I survived intact, although I still have nightmares of that man-sized tongue.";

-						next;

-						mes "[Nelliorde]";

-						mes "Once I got out of there, I craved human companionship and to restore my sense of normalcy. The closest place that I knew was Paros Lighthouse.";

-						next;

-						mes "[Nelliorde]";

-						mes "Yet again, I decided to traverse the desert, despite the fact that the Kafra Ladies provide a very convenient teleport service there.";

-						next;

-						mes "[Nelliorde]";

-						mes "Anyway, the fortress of Sandaruman is on the way to Paros Lighthouse. I remember Serutero, a guy I met in south Morroc, telling me about its scenic beauty.";

-						next;

-						mes "[Nelliorde]";

-						mes "I was so excited about seeing it for myself. After all, doesn't 'Sandaruman' sound like the name of a beautiful place?";

-						next;

-						mes "[Nelliorde]";

-						mes "But I immediately regret my decision once I arrived. Of course, the view was breathtaking: the sandy hills near the ocean, as well as the ruins.";

-						next;

-						mes "[Nelliorde]";

-						mes "Of course I forgot Serutero's warning about all the monsters. Argh! It was a nightmare! Instead of enjoying the scenary, I ended up running for my life.";

-						next;

-						mes "[Nelliorde]";

-						mes "I was still trying to escape those monsters when I stumbled upon an old house to the West of Sandaruman, that seemed to be in a state of decay.";

-						next;

-						mes "[Nelliorde]";

-						mes "I recalled that Serutero said that no one was living in that area, so I began to worry a bit. Still, I was desperate and needed refuge.";

-						next;

-						mes "[Nelliorde]";

-						mes "In my panic, I violently knocked on the door and screamed for someone to let me inside. Then do you know what I heard?";

-						next;

-						mes "[Nelliorde]";

-						mes "^FF0000Who's there?!";

-						mes "Who would dare";

-						mes "intrude my territory?^000000";

-						mes "I was freaked out! However owned that house must have been some kind of lunatic!";

-						next;

-						mes "[Nelliorde]";

-						mes "Th-then, with the specter of Death nipping at my heels, he told me to get lost! Luckily, I was saved by a mysterious, wandering SuperNovice, but that's another story.";

-						next;

-						mes "[Nelliorde]";

-						mes "In any case, I finally arrived at Paros Lighthouse. There, I learned that the old house was a secret camp for the Rogue Guild. ";

-						next;

-						mes "[Nelliorde]";

-						mes "It's amazing, how they can live in such dangerous areas. Only Rogues would be able to survive there, you know?";

-						next;

-						mes "[Nelliorde]";

-						mes "Ah...";

-						mes "I'm so tired from talking so much. But if I happen to have another adventure, I shall share that tale to you.";

-						close;

-

-					L_Sing2:

-						mes "[Nelliorde]";

-						mes "Ah, you wish";

-						mes "to hear a song?";

-						mes "Okay! I shall then";

-						mes "perform my favorite.";

-						next;

-						mes "[Nelliorde]";

-						mes "I chased after fame.";

-						mes "It eluded me.";

-						mes "I ran after happiness";

-						mes "But never caught it.";

-						next;

-						mes "[Nelliorde]";

-						mes "But tomorrow will still";

-						mes "Be there, I'm sure.";

-						mes "Like the Water Mill";

-						mes "In Al De Baran";

-						mes "Which turns as";

-						mes "Life goes on.";

-						next;

-						mes "[Nelliorde]";

-						mes "Cheer up! Life goes on.";

-						mes "As surely as the Water";

-						mes "Mill turns, tomorrow";

-						mes "Will come.";

-						close;

-	}

-}

-	else

-{

-	mes "[Nelliorde]";

-	mes "Hello there!";

-	mes "Isn't it such";

-	mes "a glorious day?";

-	mes "You know of me,";

-	mes "do you not?";

-	next;

-	mes "[Nelliorde]";

-		if (Sex) mes "Hahahaha, forgive my rudeness, but I fail to remember your name, although your face does seem rather familiar.";

-		else

-	{

-		mes "Oh well well...";

-		mes "How could I ever";

-		mes "forget the lovely";

-		mes ""+ strcharinfo(0) +"?";

-	}

-        mes "Whatever, hahahaha!";

-	next;

-	mes "[Nelliorde]";

-	mes "So, aren't you curious about me? Feel free to ask me whatever you like! I'm the vagabond that will wander the earth till the end of his days, your friend who loves to sing under the moonlight~";

-	next;

-	menu "Who are you?",-,"What's new?",L_New,"Can you sing?",L_Sing3;

-			mes "[Nelliorde]";

-			mes "Why, I am Nelliorde, the Bard. In truth, my real name is Elliorde.";

-			next;

-			mes "[Nelliorde]";

-			mes "However, while I was singing at a Tavern, as per usual, a man with long blonde hair angrily demanded that I change my name!";

-			next;

-			mes "[Nelliorde]";

-			mes "Never before have I seen such a flailing and a fuss over someone coincidentally sharing the same name!";

-			next;

-			mes "[Nelliorde]";

-			mes "And so, that little altercation was settled with me being named Nelliorde.";

-			next;

-			mes "[Nelliorde]";

-			mes "I don't sound like a coward to you, do I? Do you believe I should have fought for the right to keep my original name?";

-			next;

-			mes "[Nelliorde]";

-			mes "If so, you're wrong! I just don't believe that violence can solve anything as the romantic Bard that cherishes peace...";

-			next;

-			mes "^3355FFSeeing as it's not worth";

-			mes "listening to Nelliorde's lies, you decide to simply tune him out.^000000";

-			next;

-			mes "^3355FF...";

-			mes "......^000000";

-			next;

-			mes "^3355FF...";

-			mes "......";

-			mes ".........^000000";

-			next;

-			mes "[Nelliorde]";

-			mes "And that's how I convinced wise and benevolent King Tristram III to build a paradise where married lovers could enjo- Hm? Are you even listening?!";

-			close;

-		

-		L_New:

-				mes "[Nelliorde]";

-				mes "You wish to";

-				mes "hear of some news?";

-				mes "What kind of news do";

-				mes "you wish to know about?";

-				next;

-

-				menu "About Prontera!",-,"About seaside areas.",L_NewsSea2,"Is the desert still hot?",L_NewsDes2,"How about the borderlands?",L_NewsBord2;

-						mes "[Nelliorde]";

-						mes "What?! Prontera?!";

-						mes "Can you not see that the front gate of Prontera is right before you? You should at least know where you are, adventurer.";

-						next;

-						mes "[Nelliorde]";

-						mes "Anyways, I know one interesting news about Prontera. But, it's a secret. Shh! Are you... Single?";

-						next;

-						mes "[Nelliorde]";

-						mes "If so, go visit the tavern. I met a guy there who took me a nice place. Oh yes. He took me 'the place' where singles are forbidden~!";

-						close;

-					L_NewsSea2:

-						mes "[Nelliorde]";

-						mes "Seaside areas?";

-						mes "That's a funny question. I mean, there's Alberta and a few other places where you can see the sea.";

-						next;

-						mes "[Nelliorde]";

-						mes "To the SouthWest there's Kokomo Beach. But, I suppose it's too dangerous just to go there to take a stroll.";

-						next;

-						mes "[Nelliorde]";

-						mes "Kokomo beach is a large expanse of sand. The nearby water is filled with sea animals, so you can enjoy catching Shellfishes.";

-						next;

-						mes "[Nelliorde]";

-						mes "However, there are always bullies in that kind of place. Once, I met a threatening looking hoodlum with red spiky hair.";

-						next;

-						mes "[Nelliorde]";

-						mes "He was chewing on something and spat on the ground. He big buffoon managed to intimidate me into giving him all of my Zeny!";

-						next;

-						mes "[Nelliorde]";

-						mes "^333333*Sigh...*^000000";

-						mes "This world is too";

-						mes "dangerous for a young";

-						mes "and fragile Bard.";

-						next;

-						mes "[Nelliorde]";

-						mes "By the way, Alberta doesn't seem to have changed. The Sunken Ship looks the same as well, with all of its Skeleton Pirates and whatnot. You know how it is.";

-						next;

-						mes "[Nelliorde]";

-						mes "The event agency in charge of expeditions into the Sunken Ship is still making tons of money. If you have nothing to do, why don't you hunt for monsters down there?";

-						close;

-					L_NewsDes2:

-						mes "[Nelliorde]";

-						mes "Oh, hell yes!";

-						mes "When is it not?";

-						mes "The desert is hot, has";

-						mes "been hot and probably";

-						mes "always will be...!";

-						next;

-						mes "[Nelliorde]";

-						mes "Giant worms still jump out of nowhere, freaking out innocent travellers like myself, and the Sandmen still kick people in the ass!";

-						next;

-						mes "[Nelliorde]";

-						mes "Even if the desert is filled with hideous monsters, the view of the ocean there is so magnificent. Hah, it makes me want to play a song.";

-						next;

-						mes "[Nelliorde]";

-						mes "I must say there is";

-						mes "one place you may wish";

-						mes "to see in the desert.";

-						next;

-						mes "[Nelliorde]";

-						mes "I'm talking about the Assassin Guild. Supposedly, it's hidden behind a sandstorm in the Morroc Desert!";

-

-						if (Class == Job_Assassin || Class == Job_Assassin_Cross) mes "But you should know what I am talking about! So when are you gonna take me to the guild, eh?";

-						else mes "Have you ever been there before?";

-						close;

-					L_NewsBord2:

-						mes "[Nelliorde]";

-						mes "Well, to the north is the Schwaltzwald Republic.";

-						mes "There, you'll find Juno,";

-						mes "the 'City of Sages.'";

-						next;

-						mes "[Nelliorde]";

-						mes "The people there say that there is one major nuisance, a man known as the 'Mad Scientist.' He's antisocial and creates a lot of public disturbances with his experiments.";

-						next;

-						mes "[Nelliorde]";

-						mes "It seems everyone in Juno hates him with passion. Even one of the Tool Shop owners begged a passing adventurer to stop this Mad Scientist's research!";

-						next;

-						mes "[Nelliorde]";

-						mes "But I have a different opinion about him. I believe it's not a good idea to interrupt the work of any scientist. After all, he might just discover something important, even if his experiments are a little hazardous.";

-						next;

-						mes "[Nelliorde]";

-						mes "Speaking of discoveries, you know how Juno floats in the air, right?";

-						next;

-						mes "[Nelliorde]";

-						mes "It's said that a piece of Ymir's Heart generates enough power to keep the entire city aloft in the sky. Isn't that amazing?";

-						next;

-						mes "[Nelliorde]";

-						mes "Even more recent is the news about the discovery of Ymir's Book. You can read it in Juno's Sage Castle. I hear that it contains the secret to meeting Valkyrie...";

-						close;

-			

-		L_Sing3:

-			mes "[Nelliorde]";

-			mes "Can I sing, you ask? Certainly, and if I may say so, pleasureably. Which song would you care to hear?";

-			next;

-			menu "Bragi's Poem",-,"Eternal Chaos",L_Chaos2,"Assassin in the Sunset",L_Sunset2;

-				

-						if(Zeny > 499)

-					{

-						mes "[Nelliorde]";

-						mes "Bragi's Poem!";

-						mes "What a good choice!";

-						mes "I must say this song represents the heart of a poet!";

-						soundeffect "bragis_poem.wav",1;

-						set Zeny,Zeny - 500;

-						close;

-					}

-						else

-					{

-						mes "[Nelliorde]";

-						mes "Please forgive me, but I cannot play a song for free. The world is harsh, and a frail Bard such as myself must have some means to survive~";

-						close;

-					}

-				

- 				L_Chaos2:

-						if(Zeny > 499)

-					{

-						mes "[Nelliorde]";

-						mes "You must like robust and energetic music, eh? As you wish~";

-						soundeffect "chaos_of_eternity.wav",1;

-						set Zeny,Zeny - 500;

-						close;

-					}

-						else

-					{

-						mes "[Nelliorde]";

-						mes "Please forgive me, but I cannot play a song for free. The world is harsh, and a frail Bard such as myself must have some means to survive~";

-						close;

-					}

-				

-				L_Sunset2:

-						if(Zeny > 499)

-					{

-						mes "[Nelliorde]";

-						mes "Excellent choice!";

-						mes "Somehow, the image of the setting sun fits well with Assassins. Don't you agree?";

-						soundeffect "assassin_of_sunset.wav",1;

-						set Zeny,Zeny - 500;

-						close;

-					}

-						else

-					{

-						mes "[Nelliorde]";

-						mes "Please forgive me, but I cannot play a song for free. The world is harsh, and a frail Bard such as myself must have some means to survive~";

-						close;

-					}

-}

-

-}

-

-yuno_in04.gat,47,113,1	script	Studying Scholar#1	749,{

-

-	if($God3 == 100)

-{

-	mes "[Studying Scholar]";

-	mes "Hmmm...";

-	mes "The highest quality Red Potion ever...";

-	next;

-	mes "[Studying Scholar]";

-	mes "If only I could figure a way to balance the consistency of the ground Red Herbs mixed with the water. That part is most crucial...";

-	close;

-}

- 

-	if($God2 > 49)

-{

-		if(god_brising == 50)

-	{

-		mes "[Enrico Kaili]";

-		mes "Ah, " + strcharinfo(0) + ",";

-		mes "you've returned.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "Learning about Brisingamen was truly fascinating. But since we've hit a plateau for now, I've started a new research project.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "Hahahaha~";

-		mes "I'm sorry, but I cannot tell you about it for now, since it's confidential. But once I get a chance, I'll ask you for help.";

-		close;

-	}

-		else if(god_brising == 49)

-	{

-		mes "[Enrico Kaili]";

-		mes "Ah, I see. So it's true that Berling sealed himself in the ripple where the goddess' tear fell into the waters.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "Oh! I'm so excited! I don't know what to do first! Should I report to His Majesty or publish my findings or...";

-		next;

-		menu "^333333*Ahem!*^000000 My reward!",-;

-				mes "[Enrico Kaili]";

-				mes "Oh, right.";

-				mes "Thank you for all the trouble you have endured for my sake. You are truly one of the best researchers I've ever met.";

-				next;

-				mes "[Enrico Kaili]";

-				mes "Then as promised...";

-				mes "I will give you something from my precious collection! Now, let me see what we have here...";

-				next;

-				mes "[Enrico Kaili]";

-				mes "Please...";

-				mes "Take this";

-				set @card,rand(1,1210);

-				if ((@card > 0 ) && (@card < 11))

-				{

-					mes "Poring Card.";

-					set god_brising,50;

-					getitem "Poring_Card",1;

-				}

-				else if ((@card > 10) && (@card < 21))

-				{

-					mes "Fabre Card.";

-					set god_brising,50;

-					getitem "Fabre_Card",1;

-				}

-				else if ((@card > 20) && (@card < 26))

-				{

-					mes "Pupa Card.";

-					set god_brising,50;

-					getitem "Pupa_Card",1;

-				}

-				else if ((@card > 25) && (@card < 41))

-				{

-					mes "Drops Card.";

-					set god_brising,50;

-					getitem "Drops_Card",1;

-				}

-				else if ((@card > 40) && (@card < 51))

-				{

-					mes "Lunatic Card.";

-					set god_brising,50;

-					getitem "Lunatic_Card",1;

-				}

-				else if ((@card > 50) && (@card < 56))

-				{

-					mes "Peco Peco Egg Card.";

-					set god_brising,50;

-					getitem "Pecopeco_Egg_Card",1;

-				}

-				else if ((@card > 55) && (@card < 71))

-				{

-					mes "Picky Card.";

-					set god_brising,50;

-					getitem "Picky_Card",1;

-				}

-				else if ((@card > 70) && (@card < 81))

-				{

-					mes "Chonchon Card.";

-					set god_brising,50;

-					getitem "Chonchon_Card",1;

-				}

-				else if ((@card > 80) && (@card < 91))

-				{

-					mes "Willow Card.";

-					set god_brising,50;

-					getitem "Wilow_Card",1;

-				}

-				else if ((@card > 90) && (@card < 101))

-				{

-					mes "Thief Bug Egg Card.";

-					set god_brising,50;

-					getitem "Thief_Bug_Egg_Card",1;

-				}

-				else if ((@card > 100) && (@card < 111))

-				{

-					mes "Andre Egg Card.";

-					set god_brising,50;

-					getitem "Andre_Egg_Card",1;

-				}

-				else if ((@card > 110) && (@card < 121))

-				{

-					mes "Roda Frog Card.";

-					set god_brising,50;

-					getitem "Roda_Frog_Card",1;

-				}

-				else if ((@card > 120) && (@card < 131))

-				{

-					mes "Condor Card.";

-					set god_brising,50;

-					getitem "Condor_Card",1;

-				}

-				else if ((@card > 130) && (@card < 141))

-				{

-					mes "Thief Bug Card.";

-					set god_brising,50;

-					getitem "Thief_Bug_Card",1;

-				}

-				else if ((@card > 140) && (@card < 151))

-				{

-					mes "Savage Bebe Card.";

-					set god_brising,50;

-					getitem "Savage_Babe_Card",1;

-				}

-				else if ((@card > 150) && (@card < 161))

-				{

-					mes "Hornet Card.";

-					set god_brising,50;

-					getitem "Hornet_Card",1;

-				}

-				else if ((@card > 160) && (@card < 171))

-				{

-					mes "Hornet Card.";

-					set god_brising,50;

-					getitem "Hornet_Card",1;

-				}

-				else if ((@card > 170) && (@card < 181))

-				{

-					mes "Familiar Card.";

-					set god_brising,50;

-					getitem "Farmiliar_Card",1;

-				}

-				else if ((@card > 180) && (@card < 191))

-				{

-					mes "Rocker Card.";

-					set god_brising,50;

-					getitem "Rocker_Card",1;

-				}

-				else if ((@card > 190) && (@card < 201))

-				{

-					mes "Spore Card.";

-					set god_brising,50;

-					getitem "Spore_Card",1;

-				}

-				else if ((@card > 200) && (@card < 211))

-				{

-					mes "Baby Desert Wolf Card.";

-					set god_brising,50;

-					getitem "Desert_Wolf_Babe_Card",1;

-				}

-				else if ((@card > 210) && (@card < 221))

-				{

-					mes "Plankton Card.";

-					set god_brising,50;

-					getitem "Plankton_Card",1;

-				}

-				else if ((@card > 220) && (@card < 231))

-				{

-					mes "Skeleton Card.";

-					set god_brising,50;

-					getitem "Skeleton_Card",1;

-				}

-				else if ((@card > 230) && (@card < 241))

-				{

-					mes "Female Thief Bug Card.";

-					set god_brising,50;

-					getitem "Thief_Bug_Female_Card",1;

-				}

-				else if ((@card > 240) && (@card < 251))

-				{

-					mes "Kukre Card.";

-					set god_brising,50;

-					getitem "Kukre_Card",1;

-				}

-				else if ((@card > 250) && (@card < 261))

-				{

-					mes "Tarou Card.";

-					set god_brising,50;

-					getitem "Tarou_Card",1;

-				}

-				else if ((@card > 260) && (@card < 271))

-				{

-					mes "Wolf Card.";

-					set god_brising,50;

-					getitem "Wolf_Card",1;

-				}

-				else if ((@card > 270) && (@card < 281))

-				{

-					mes "Mandragora Card.";

-					set god_brising,50;

-					getitem "Mandragora_Card",1;

-				}

-				else if ((@card > 280) && (@card < 291))

-				{

-					mes "Peco Peco Card.";

-					set god_brising,50;

-					getitem "Pecopeco_Card",1;

-				}

-				else if ((@card > 290) && (@card < 301))

-				{

-					mes "Ambernite Card.";

-					set god_brising,50;

-					getitem "Ambernite_Card",1;

-				}

-				else if ((@card > 300) && (@card < 311))

-				{

-					mes "Poporing Card.";

-					set god_brising,50;

-					getitem "Poporing_Card",1;

-				}

-				else if ((@card > 310) && (@card < 321))

-				{

-					mes "Worm Tail Card.";

-					set god_brising,50;

-					getitem "Worm_Tail_Card",1;

-				}

-				else if ((@card > 320) && (@card < 326))

-				{

-					mes "Hydra Card.";

-					set god_brising,50;

-					getitem "Hydra_Card",1;

-				}

-				else if ((@card > 325) && (@card < 341))

-				{

-					mes "Muka Card.";

-					set god_brising,50;

-					getitem "Muka_Card",1;

-				}

-				else if ((@card > 340) && (@card < 351))

-				{

-					mes "Snake Card.";

-					set god_brising,50;

-					getitem "Snake_Card",1;

-				}

-				else if ((@card > 350) && (@card < 361))

-				{

-					mes "Zombie Card.";

-					set god_brising,50;

-					getitem "Zombie_Card",1;

-				}

-				else if ((@card > 360) && (@card < 371))

-				{

-					mes "Stainer Card.";

-					set god_brising,50;

-					getitem "Stainer_Card",1;

-				}

-				else if ((@card > 370) && (@card < 376))

-				{

-					mes "Creamy Card.";

-					set god_brising,50;

-					getitem "Creamy_Card",1;

-				}

-				else if ((@card > 375) && (@card < 391))

-				{

-					mes "Coco Card.";

-					set god_brising,50;

-					getitem "Coco_Card",1;

-				}

-				else if ((@card > 390) && (@card < 401))

-				{

-					mes "Steel Chonchon Card.";

-					set god_brising,50;

-					getitem "Steel_Chonchon_Card",1;

-				}

-				else if ((@card > 400) && (@card < 411))

-				{

-					mes "Andre Card.";

-					set god_brising,50;

-					getitem "Andre_Card",1;

-				}

-				else if ((@card > 410) && (@card < 421))

-				{

-					mes "Smokie Card.";

-					set god_brising,50;

-					getitem "Smokie_Card",1;

-				}

-				else if ((@card > 420) && (@card < 431))

-				{

-					mes "Horn Card.";

-					set god_brising,50;

-					getitem "Horn_Card",1;

-				}

-				else if ((@card > 430) && (@card < 441))

-				{

-					mes "Martin Card.";

-					set god_brising,50;

-					getitem "Martin_Card",1;

-				}

-				else if ((@card > 440) && (@card < 451))

-				{

-					mes "Poison Spore Card.";

-					set god_brising,50;

-					getitem "Poison_Spore_Card",1;

-				}

-				else if ((@card > 450) && (@card < 461))

-				{

-					mes "Vadon Card.";

-					set god_brising,50;

-					getitem "Vadon_Card",1;

-				}

-				else if ((@card > 460) && (@card < 466))

-				{

-					mes "Male Thief Bug Card.";

-					set god_brising,50;

-					getitem "Thief_Bug_Male_Card",1;

-				}

-				else if ((@card > 465) && (@card < 481))

-				{

-					mes "Yoyo Card.";

-					set god_brising,50;

-					getitem "Yoyo_Card",1;

-				}

-				else if ((@card > 480) && (@card < 491))

-				{

-					mes "Elder Willow Card.";

-					set god_brising,50;

-					getitem "Elder_Wilow_Card",1;

-				}

-				else if ((@card > 490) && (@card < 496))

-				{

-					mes "Vitata Card.";

-					set god_brising,50;

-					getitem "Vitata_Card",1;

-				}

-				else if ((@card > 495) && (@card < 511))

-				{

-					mes "Marina Card.";

-					set god_brising,50;

-					getitem "Marina_Card",1;

-				}

-				else if ((@card > 510) && (@card < 521))

-				{

-					mes "Dustiness Card.";

-					set god_brising,50;

-					getitem "Dustiness_Card",1;

-				}

-				else if ((@card > 520) && (@card < 536))

-				{

-					mes "Metaller Card.";

-					set god_brising,50;

-					getitem "Metaller_Card",1;

-				}

-				else if ((@card > 535) && (@card < 541))

-				{

-					mes "Thara Frog Card.";

-					set god_brising,50;

-					getitem "Thara_Frog_Card",1;

-				}

-				else if ((@card > 540) && (@card < 551))

-				{

-					mes "Drops Card.";

-					set god_brising,50;

-					getitem "Drops_Card",1;

-				}

-				else if ((@card > 550) && (@card < 561))

-				{

-					mes "Goblin Card.";

-					set god_brising,50;

-					getitem "Goblin_Card",1;					

-				}

-				else if ((@card > 560) && (@card < 571))

-				{

-					mes "Cornutus Card.";

-					set god_brising,50;

-					getitem "Cornutus_Card",1;

-				}

-				else if ((@card > 570) && (@card < 581))

-				{

-					mes "Anacondaq Card.";

-					set god_brising,50;

-					getitem "Anacondaq_Card",1;

-				}

-				else if ((@card > 580) && (@card < 596))

-				{

-					mes "Caramel Card.";

-					set god_brising,50;

-					getitem "Caramel_Card",1;

-				}

-				else if ((@card > 595) && (@card < 601))

-				{

-					mes "Zerom Card.";

-					set god_brising,50;

-					getitem "Zerom_Card",1;

-				}

-				else if ((@card > 600) && (@card < 606))

-				{

-					mes "Kaho Card.";

-					set god_brising,50;

-					getitem "Kaho_Card",1;

-				}

-				else if ((@card > 605) && (@card < 621))

-				{

-					mes "Orc Warrior Card.";

-					set god_brising,50;

-					getitem "Orc_Warrior_Card",1;

-				}

-				else if ((@card > 620) && (@card < 631))

-				{

-					mes "Megalodon Card.";

-					set god_brising,50;

-					getitem "Megalodon_Card",1;

-				}

-				else if ((@card > 630) && (@card < 641))

-				{

-					mes "Scorpion Card.";

-					set god_brising,50;

-					getitem "Scorpion_Card",1;

-				}

-				else if ((@card > 640) && (@card < 651))

-				{

-					mes "Drainliar Card.";

-					set god_brising,50;

-					getitem "Drainliar_Card",1;

-				}

-				else if ((@card > 650) && (@card < 661))

-				{

-					mes "Orc Zombie Card.";

-					set god_brising,50;

-					getitem "Orc_Zombie_Card",1;

-				}

-				else if ((@card > 660) && (@card < 671))

-				{

-					mes "Golem Card.";

-					set god_brising,50;

-					getitem "Golem_Card",1;

-				}

-				else if ((@card > 670) && (@card < 681))

-				{

-					mes "Pirate Skel Card.";

-					set god_brising,50;

-					getitem "Pirate_Skel_Card",1;

-				}

-				else if ((@card > 680) && (@card < 691))

-				{

-					mes "Bigfoot Card.";

-					set god_brising,50;

-					getitem "BigFoot_Card",1;

-				}

-				else if ((@card > 690) && (@card < 701))

-				{

-					mes "Argos Card.";

-					set god_brising,50;

-					getitem "Argos_Card",1;

-				}

-				else if ((@card > 700) && (@card < 716))

-				{

-					mes "Magnolia Card.";

-					set god_brising,50;

-					getitem "Magnolia_Card",1;

-				}

-				else if ((@card > 715) && (@card < 721))

-				{

-					mes "Phen Card.";

-					set god_brising,50;

-					getitem "Phen_Card",1;

-				}

-				else if ((@card > 720) && (@card < 726))

-				{

-					mes "Mantis Card.";

-					set god_brising,50;

-					getitem "Mantis_Card",1;

-				}

-				else if ((@card > 725) && (@card < 741))

-				{

-					mes "Flora Card.";

-					set god_brising,50;

-					getitem "Flora_Card",1;

-				}

-				else if ((@card > 740) && (@card < 751))

-				{

-					mes "Hode Card.";

-					set god_brising,50;

-					getitem "Hode_Card",1;

-				}

-				else if ((@card > 750) && (@card < 761))

-				{

-					mes "Desert Wolf Card.";

-					set god_brising,50;

-					getitem "Desert_Wolf_Card",1;

-				}

-				else if ((@card > 760) && (@card < 766))

-				{

-					mes "Rafflesia Card.";

-					set god_brising,50;

-					getitem "Rafflesia_Card",1;

-				}

-				else if ((@card > 765) && (@card < 781))

-				{

-					mes "Marine Sphere Card.";

-					set god_brising,50;

-					getitem "Marine_Sphere_Card",1;

-				}

-				else if ((@card > 780) && (@card < 791))

-				{

-					mes "Orc Skeleton Card.";

-					set god_brising,50;

-					getitem "Orc_Skeleton_Card",1;

-				}

-				else if ((@card > 790) && (@card < 796))

-				{

-					mes "Soldier Skeleton Card.";

-					set god_brising,50;

-					getitem "Soldier_Skeleton_Card",1;

-				}

-				else if ((@card > 795) && (@card < 811))

-				{

-					mes "Giearth Card.";

-					set god_brising,50;

-					getitem "Giearth_Card",1;

-				}

-				else if ((@card > 810) && (@card < 816))

-				{

-					mes "Frilldora Card.";

-					set god_brising,50;

-					getitem "Frilldora_Card",1;

-				}

-				else if ((@card > 815) && (@card < 831))

-				{

-					mes "Swordfish Card.";

-					set god_brising,50;

-					getitem "Sword_Fish_Card",1;

-				}

-				else if ((@card > 830) && (@card < 841))

-				{

-					mes "Munak Card.";

-					set god_brising,50;

-					getitem "Munak_Card",1;

-				}

-				else if ((@card > 840) && (@card < 851))

-				{

-					mes "Kobold Card.";

-					set god_brising,50;

-					getitem "Kobold_Card",1;

-				}

-				else if ((@card > 850) && (@card < 861))

-				{

-					mes "Skel Worker Card.";

-					set god_brising,50;

-					getitem "Skel_Worker_Card",1;

-				}

-				else if ((@card > 860) && (@card < 871))

-				{

-					mes "Obeaune Card.";

-					set god_brising,50;

-					getitem "Obeaune_Card",1;

-				}

-				else if ((@card > 870) && (@card < 881))

-				{

-					mes "Archer Skeleton Card.";

-					set god_brising,50;

-					getitem "Archer_Skeleton_Card",1;

-				}

-				else if ((@card > 880) && (@card < 891))

-				{

-					mes "Marse Card.";

-					set god_brising,50;

-					getitem " Marse_Card",1;

-				}

-				else if ((@card > 890) && (@card < 901))

-				{

-					mes "Zenorc Card.";

-					set god_brising,50;

-					getitem "Zenorc_Card",1;

-				}

-				else if ((@card > 900) && (@card < 906))

-				{

-					mes "Matyr Card.";

-					set god_brising,50;

-					getitem "Matyr_Card",1;

-				}

-				else if ((@card > 905) && (@card < 921))

-				{

-					mes "Dokebi Card.";

-					set god_brising,50;

-					getitem "Dokebi_Card",1;

-				}

-				else if ((@card > 920) && (@card < 931))

-				{

-					mes "Pasana Card.";

-					set god_brising,50;

-					getitem "Pasana_Card",1;

-				}

-				else if ((@card > 930) && (@card < 941))

-				{

-					mes "Sohee Card.";

-					set god_brising,50;

-					getitem "Sohee_Card",1;

-				}

-				else if ((@card > 940) && (@card < 951))

-				{

-					mes "Sandman Card.";

-					set god_brising,50;

-					getitem "Sand_Man_Card",1;

-				}

-				else if ((@card > 950) && (@card < 956))

-				{

-					mes "Whisper Card.";

-					set god_brising,50;

-					getitem "Whisper_Card",1;

-				}

-				else if ((@card > 965) && (@card < 971))

-				{

-					mes "Horong Card.";

-					set god_brising,50;

-					getitem "Horong_Card",1;

-				}

-				else if ((@card > 970) && (@card < 981))

-				{

-					mes "Requiem Card.";

-					set god_brising,50;

-					getitem "Requiem_Card",1;

-				}

-				else if ((@card > 980) && (@card < 986))

-				{

-					mes "Marc Card.";

-					set god_brising,50;

-					getitem "Marc_Card",1;

-				}

-				else if ((@card > 985) && (@card < 991))

-				{

-					mes "Mummy Card.";

-					set god_brising,50;

-					getitem "Mummy_Card",1;

-				}

-				else if ((@card > 990) && (@card < 996))

-				{

-					mes "Verit Card.";

-					set god_brising,50;

-					getitem "Verit_Card",1;

-				}

-				else if ((@card > 995) && (@card < 1001))

-				{

-					mes "Myst Card.";

-					set god_brising,50;

-					getitem "Myst_Card",1;

-				}

-				else if ((@card > 1000) && (@card < 1011))

-				{

-					mes "Jakk Card.";

-					set god_brising,50;

-					getitem "Jakk_Card",1;

-				}

-				else if ((@card > 1010) && (@card < 1021))

-				{

-					mes "Ghoul Card.";

-					set god_brising,50;

-					getitem "Ghoul_Card",1;

-				}

-				else if ((@card > 1020) && (@card < 1031))

-				{

-					mes "Strouf Card.";

-					set god_brising,50;

-					getitem "Strouf_Card",1;

-				}

-				else if ((@card > 1030) && (@card < 1041))

-				{

-					mes "Marduk Card.";

-					set god_brising,50;

-					getitem "Marduk_Card",1;

-				}

-				else if ((@card > 1040) && (@card < 1051))

-				{

-					mes "Marionette Card.";

-					set god_brising,50;

-					getitem "Marionette_Card",1;

-				}

-				else if ((@card > 1050) && (@card < 1061))

-				{

-					mes "Here is an Argiope Card.";

-					set god_brising,50;

-					getitem "Argiope_Card",1;

-				}

-				else if ((@card > 1060) && (@card < 1071))

-				{

-					mes "Hunter Fly Card.";

-					set god_brising,50;

-					getitem "Hunter_Fly_Card",1;

-				}

-				else if ((@card > 1070) && (@card < 1081))

-				{

-					mes "Here is an Isis Card.";

-					set god_brising,50;

-					getitem "Isis_Card",1;

-				}

-				else if ((@card > 1080) && (@card < 1091))

-				{

-					mes "Sidewinder Card.";

-					set god_brising,50;

-					getitem "Side_Winder_Card",1;

-				}

-				else if ((@card > 1090) && (@card < 1101))

-				{

-					mes "Walking Petite Card.";

-					set god_brising,50;

-					getitem "Petit_Card",1;

-				}

-				else if ((@card > 1100) && (@card < 1111))

-				{

-					mes "Bathory Card.";

-					set god_brising,50;

-					getitem "Bathory_Card",1;

-				}

-				else if ((@card > 1110) && (@card < 1121))

-				{

-					mes "Flying Petite Card.";

-					set god_brising,50;

-					getitem "Petit__Card",1;

-				}

-				else if ((@card > 1120) && (@card < 1131))

-				{

-					mes "Deviruchi Card.";

-					set god_brising,50;

-					getitem "Deviruchi_Card",1;

-				}

-				else if ((@card > 1130) && (@card < 1141))

-				{

-					mes "Medusa Card.";

-					set god_brising,50;

-					getitem "Medusa_Card",1;

-				}

-				else if ((@card > 1140) && (@card < 1151))

-				{

-					mes "Deviace Card.";

-					set god_brising,50;

-					getitem "Deviace_Card",1;

-				}

-				else if ((@card > 1150) && (@card < 1161))

-				{

-					mes "Minorous Card.";

-					set god_brising,50;

-					getitem "Minorous_Card",1;

-				}

-				else if ((@card > 1160) && (@card < 1171))

-				{

-					mes "Nightmare Card.";

-					set god_brising,50;

-					getitem "Nightmare_Card",1;

-				}

-				else if ((@card > 1170) && (@card < 1176))

-				{

-					mes "Baphomet Jr. Card.";

-					set god_brising,50;

-					getitem "Baphomet__Card",1;

-				}

-				else if ((@card > 1175) && (@card < 1181))

-				{

-					mes "Raydric Card.";

-					set god_brising,50;

-					getitem "Daydric_Card",1;

-				}

-				else if ((@card > 1180) && (@card < 1186))

-				{

-					mes "Khalitzburg Card.";

-					set god_brising,50;

-					getitem "Khalitzburg_Card",1;

-				}

-				else if ((@card > 1185) && (@card < 1191))

-				{

-					mes "Joker Card.";

-					set god_brising,50;

-					getitem "Joker_Card",1;

-				}

-				else if ((@card > 1190) && (@card < 1196))

-				{

-					mes "Abysmal Knight Card.";

-					set god_brising,50;

-					getitem "Knight_Of_Abyss_Card",1;

-				}

-				else if ((@card > 1195) && (@card < 1201))

-				{

-					mes "Druid Card.";

-					set god_brising,50;

-					getitem "Evil_Druid_Card",1;

-				}

-				else if ((@card > 1200) && (@card < 1206))

-				{

-					mes "Santa Poring Card.";

-					set god_brising,50;

-					getitem "Poring__Card",1;

-				}

-					else

-				{

-					mes "Poring Card.";

-					set god_brising,50;

-					getitem "Poring_Card",1;

-				}

-				next;

-				mes "[Enrico Kaili]";

-				mes "Please accept this as my way of thanking you for assisting in my research.";

-				next;

-				mes "[Enrico Kaili]";

-				mes "If the opportunity arises, I would like to ask you for your help once again. Now please, take care.";

-				

-				if ($God3 < 100) set $God3,$God3 +1;

-				

-					if ($God3 == 50) announce "The 3rd Seal of [Brisingamen] has appeared.",bc_all;

-					else if ($God3 == 100)

-				{				

-					if ($God1 == 100 && $God2 == 100 && $God3 == 100 && $God4 == 100) announce "All 4 Seals of [Brisingamen] have been released.",bc_all;

-					else announce "A Seal of [Brisingamen] has been released.",bc_all;

-				}

-				close;

-	}

-		else if(god_brising == 48)

-	{

-		mes "[Enrico Kaili]";

-		mes "Why are you still here?";

-		mes "I asked you to go find him.";

-		mes "Ah~ I cannot wait...";

-		emotion e_flash;

-		close;

-	}

-		else if(god_brising == 47)

-	{

-		mes "[Enrico Kaili]";

-		mes "I guess that's true that the four have been awakened. Does this mean that Brisingamen can now be created?";

-		next;

-		mes "[Enrico Kaili]";

-		mes "If such a thing is possible, what do we need in order to create it? Let's review the information you've gathered...";

-		next;

-		mes "[Enrico Kaili]";

-		mes "There's Freya's Tear Drop Crystal, Freya's Jewel, the Never-Melting Snow Crystal found where Alfrik used to stay...";

-		next;

-		mes "[Enrico Kaili]";

-		mes "The Drifting Air from the path where Dvalin slept. Hmm.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "Perhaps we could find something from the pond of Freya's Gold Tears where Berling is sleeping, though I am unsure.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "I also assume that the splendid Silver Ornament constructed by Gher is also needed to create Brisingamen.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "So what";

-		mes "do you think?";

-		next;

-		menu "I'm not sure...",-,"I suppose you're right.",L_Right;

-				mes "[" + strcharinfo(0) + "]";

-				mes "I...";

-				mes "I mean, maybe Alfrik would probably know, bu--";

-				next;

-				mes "[Enrico Kaili]";

-				mes "Of course!";

-				mes "That's a great idea! I'll wait here while you go and ask Alfrik. You're my only hope in completing this research!";

-				next;

-				emotion e_hmm,1;

-				mes "[" + strcharinfo(0) + "]";

-				mes "(^333333I should've not said anything...^000000)";

-				next;

-				mes "[Enrico Kaili]";

-				mes "Well, what are";

-				mes "waiting for? Please";

-				mes "come back as soon as";

-				mes "possible.";

-				set god_brising,48;

-				close;

-			

-			L_Right:

-				mes "[" + strcharinfo(0) + "]";

-				mes "I suppose";

-				mes "you're right.";

-				next;

-				mes "[" + strcharinfo(0) + "]";

-				mes "Still, who knows what exactly is in the Pond of Frey's Golden Tears.";

-				next;

-				mes "[Enrico Kaili]";

-				mes "Yes.";

-				mes "Ah! Right.";

-				mes "Hm, perhaps it would be best to ask Alfrik first?";

-				next;

-				mes "[Enrico Kaili]";

-				mes "Hurry and seek him";

-				mes "out! And I thank you";

-				mes "in advance.";

-				set god_brising,48;

-				close;

-	}

-		else if(god_brising == 46)

-	{

-		mes "[Enrico Kaili]";

-		mes "I guess he finally sang for you? By the way, why didn't you speak to Grer the Dwarf? Oh right, the mine is heavily populated with monsters.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "I know it won't be easy, but please seek him out and get more information.";

-		mes "Thank you in advance.";

-		close;

-	}

-		else if(god_brising == 45)

-	{

-		mes "[Enrico Kaili]";

-		mes "Hm...?";

-		mes "Did you forget the words to the song? Well, I didn't write them down either. Hahahaha! I guess there's only one thing you can do~";

-		next;

-		mes "[Enrico Kaili]";

-		mes "You've got to go back to Berling and ask him for the lyrics again. Good luck, and don't forget to memorize them this time.";

-		close;

-	}

-		else if(god_brising == 44)

-	{

-		mes "[Enrico Kaili]";

-		mes "It looks like you were able to answer that riddle. Good work!";

-		next;

-		mes "[Enrico Kaili]";

-		mes "That strange, unearthly feeling of dampness. Ah, you've brought Freya's Tear Drops! That means Grer must have awakened on his own now.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "I suppose your next course of action should be to enter the mine. I'm sorry for the trouble, but I grow more excited with each new thing we learn.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "It's only with your help that I've been able to make such progress with my research. Anyway, I shall share my conclusions with you later.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "So are you heading for the mine now? Be careful around those monsters.";

-		close;

-	}

-		else if(god_brising == 43)

-	{

-		mes "[Enrico Kaili]";

-		mes "Oh...I have not waited in vain.";

-		mes "I guess Dvalin meant the endless war by the riddle.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "There were two kings. Each king had 20 knights.";

-		mes "Those knights fought until they died and revived to fight again.";

-		mes "They repeated the endless war over and over again.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "If they gathered and occurred a war again,";

-		mes "there would be enormous dead in the battlefield.";

-		mes "Valkyries selected the strongest";

-		mes "among warriors in Valhala to organize Einherjar.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "Yes, that's an old story that everyone knows.";

-		mes "...and it turned out to be true.";

-		mes "Interesting.";

-		mes "Anyways...";

-		next;

-		mes "[Enrico Kaili]";

-		mes "I guess it is the time to investigate the story about Berling.";

-		mes "There is a stream that starts from north west of Prontera";

-		mes "and passes a mine in Mountain Mjolnir.";

-		mes "I assume that maybe Berling meant the place.";

-		mes "However, stream never stays in a place...";

-		mes "he might meant a puddle instead of stream...";

-		next;

-		mes "[Enrico Kaili]";

-		mes "I am so confused.";

-		mes "I wonder what the riddle means as well...";

-		mes "Anyways, come back as soon as possible!";

-		close;

-	}

-		else if(god_brising == 42)

-	{

-		mes "[Enrico Kaili]";

-		mes "Are you sure?!";

-		mes "Were they really for Freya's Necklace...";

-		mes "Brisingamen...?!";

-		next;

-		mes "[Enrico Kaili]";

-		mes "If the four dwarves wake up...";

-		mes "would Brisingamen appear to people's eyes?!";

-		mes "Ah...you...God must send you to me for the research.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "...I cannot believe that I might be able to experience the power of God...";

-		mes "Ah......";

-		mes ".....anyway...the place where Dvalin is sleeping...";

-		next;

-		mes "[Enrico Kaili]";

-		mes "It says the patch is at the east forest...";

-		mes "....I assume maybe it is near the monastic vows...";

-		mes "......Ah, it is just my assumption. We don't know until we go find out...";

-		next;

-		mes "[Enrico Kaili]";

-		mes "I hope you can help me for that.";

-		mes "I am still not sure about what the research will lead us but";

-		mes "I know you want to find out as much as I do.";

-		mes "Hahahaha	ha...";

-		next;

-		mes "[Enrico Kaili]";

-		mes "Please leave to the monastic vows in the east.";

-		mes "The godly power....how it will be to possess it as a human being...?!";

-		mes "What if it destroyes the human world....?! Hahahaha...";

-		close;

-	}

-		else if(god_brising == 41)

-	{

-		mes "[Enrico Kaili]";

-		mes "What? What did you just say?";

-		mes "You met Alfrik...?";

-		mes "Oh my god, you're the chosen one!";

-		mes "I cannot believe that legendary Alfrik is still alive...";

-		next;

-		mes "[Enrico Kaili]";

-		mes "Alfrik is one of the four dwarves";

-		mes "who made a shining neklace for goddess Freya.";

-		mes "Of course, Dvalin is also one of them.";

-		mes "Oh my god...";

-		mes "I cannot believe we're talking about Brisingamen...";

-		next;

-		mes "[Enrico Kaili]";

-		mes "Now I realise what we have been doing!";

-		mes "We have been searching for an item with the power of God!";

-		mes "...Dvalin...";

-		mes "I am wondering where he is sleeping...";

-		next;

-		mes "[Enrico Kaili]";

-		mes "....by the way,";

-		mes "why didn't you ask Alfrik";

-		mes "if he knows where Dvalin stays...?";

-		mes "Errr...";

-		close;

-	}

-		else if(god_brising == 40)

-	{

-		mes "[Enrico Kaili]";

-		mes "I suggest you to go check Lutie.";

-		mes "I am pretty sure you will find a trace of the goddess somewhere.";

-		mes "Also you already met Valkyrie.";

-		mes "I have no doubt you will find the trace.";

-		mes "And...";

-		next;

-		mes "[Enrico Kaili]";

-		mes "I have been thinking about these words...";

-		mes "^4d4dff to the steps in";

-		mes "to that beautiful hair";

-		mes "to those dazzling eyes";

-		mes "we gave all of our hearts in^000000";

-		next;

-		mes "[Enrico Kaili]";

-		mes "I have no clue what they means...";

-		mes "I seriously started doubting that what I know";

-		mes "could be different from the truth.";

-		mes "Anyway, I am going to study other stuffs for now.";

-		close;

-	}

-		else if(god_brising == 35)

-	{

-		mes "[Enrico Kaili]";

-		mes "I can tell you have gone through many difficulties.";

-		mes "Please come this way.";

-		mes "So what did you hear from Hermite?";

-		next;

-		mes " - You told him what you were told from Hermite -";

-		mes " - and from Valkyrie. -";

-		next;

-		mes "[Enrico Kaili]";

-		mes "Great! I cannot believe it actually happened!";

-		mes "....hmm....as I guessed";

-		mes "it is possible to possess the godly power...";

-		next;

-		mes "[Enrico Kaili]";

-		mes "It is resonant with a thing sent from the royal court";

-		mes "for some reason. Now, come closer and look at this.";

-		next;

-		mes "- Enrico opened a locked chest and -";

-		mes "- took out a jewel that was so beautiful to believe its actual existance. -";

-		mes "- The jewel dazzling like a tear drop of a goddess -";

-		mes "- started responding with the Snow Crystal as it's closer. -";

-		next;

-		mes "[Enrico Kaili]";

-		mes "...so? Isn't it amazing?";

-		mes "If what Valkyrie said is true,";

-		mes "this jewel must be the crystal of a Freya's tear drop.";

-		mes "Hmmmm.....";

-		mes "Power of Gods...";

-		next;

-		mes "[Enrico Kaili]";

-		mes "I don't understand why all these indications";

-		mes "have appeared in this age...";

-		mes "....anyways, I appreciate you for helping me so far.";

-		mes "I am going to think about the poem";

-		mes "that you have heard from Valkyrie.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "It says...a cold snowy path";

-		mes "the blue river that the goddess walked cross";

-		mes "a narrow path and four dwarves.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "The four dwarves must mean the four dwarves who were well-known for their craft skill...";

-		mes "....I cannot pinpoint what the river and the paths means.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "Now, there is something you can help me again!";

-		next;

-		menu "Wah? I thought it's already over?",-,"What is it this time?",L_What;

-				mes "[Enrico Kaili]";

-				mes "Hell no!";

-				mes "You are supposed to help me for my research, aren't you?";

-				mes "Unfortunately, my research has never been over.";

-				mes "Hahahaha.";

-				next;

-				mes "[Enrico Kaili]";

-				mes "Now, you are going to leave to Lutie!";

-				mes "Find out some clues there.";

-				mes "The legend says,";

-				next;

-				mes "[Enrico Kaili]";

-				mes "Goddess had to walk on the cold snowy path alone";

-				mes "without the cat of obedience.";

-				mes "She shed tears because of piercing cold.";

-				next;

-				mes "[Enrico Kaili]";

-				mes "As a matter of fact, this Freya's Jewel was";

-				mes "firstly founded in Lutie.";

-				mes "That shows the legend tells us the truth by indicating the cold snowy path.";

-				next;

-				mes "[Enrico Kaili]";

-				mes "Please go start your journey to find the trace of goddess";

-				mes "from Lutie, as what Valkyrie said.";

-				mes "I hope we will find out what the goddess";

-				mes "left in this world together.";

-				set god_brising,40;

-				close;

-			

-			L_What:

-				mes "[Enrico Kaili]";

-				mes "Hahahaha...I like your attitute!";

-				mes "Yes, Nelliorde has an eye to see a man.";

-				mes "Somehow you decided to help me out";

-				mes "for this research, I hope you will do your best";

-				mes "until the last moment.";

-				next;

-				mes "[Enrico Kaili]";

-				mes "Now, you are going to leave to Lutie!";

-				mes "Find out some clues there.";

-				mes "The legend says,";

-				next;

-				mes "[Enrico Kaili]";

-				mes "Goddess had to walk on the cold snowy path alone";

-				mes "without the cat of obedience.";

-				mes "She shed tears because of piercing cold.";

-				next;

-				mes "[Enrico Kaili]";

-				mes "As a matter of fact, this Freya's Jewel was";

-				mes "firstly founded in Lutie.";

-				mes "That shows the legend tells us the truth by indicating the cold snowy path.";

-				next;

-				mes "[Enrico Kaili]";

-				mes "Please go start your journey to find the trace of goddess";

-				mes "from Lutie, as what Valkyrie said.";

-				mes "I hope we will find out what the goddess";

-				mes "left in this world together.";

-				set god_brising,40;

-				close;

-	}

-		else if(god_brising > 9 && god_brising < 35)

-	{

-		mes "[Enrico Kaili]";

-		mes "Hmm... I see...";

-		mes "I know that I have been such a burden to you.";

-		mes "But I will not forget what you have done for me.";

-		mes "I will give you one of my precious collections";

-		mes "as the token of my gratitude.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "I wish you good luck.";

-		mes "And please take care.";

-		close;

-	}

-		else if(god_brising > 3 && god_brising < 10)

-	{

-		mes "[Enrico Kaili]";

-		mes "So, have you met Hermite?";

-		mes "What...? Did he really ask you to do that...?";

-		mes "....hmmm....I must say...I know it's not an easy thing to do";

-		mes "but I hope you will do what he wants.";

-		mes "And I will next; for a good news from you for the time being.";

-		close;

-	}

-		else if(god_brising == 3)

-	{

-		mes "[Enrico Kaili]";

-		mes "Hermite? Do you need any information about him?";

-		mes "Let me think. Hmm...in my memory";

-		mes "he was a young man in an urban atmosphere...";

-		next;

-		mes "[Enrico Kaili]";

-		mes "Oh, that's right! Why don't you go ask";

-		mes "the lady ahead?";

-		mes "She might have some registration information.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "What? Are you wondering why I don't do it on my own?";

-		mes "Because! I am too old to go on an expedition...";

-		mes "and also I have some research requests from the royal court.";

-		mes "I am not supposed to leave this organization.";

-		mes "That was why I had sought";

-		mes "for a young and reliable adventurer like you";

-		mes "who can do what I am unable to do.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "Ah...of course I will reward you later.";

-		mes "Do not think of me as a penny pincher";

-		mes "who does not like to 'Hire' professionals.";

-		mes "Anyways, thank you in advance.";

-		close;

-	}

-		else if(god_brising == 2)

-	{

-		mes "[Enrico Kaili]";

-		mes "So, have you considered my proposal?";

-		mes "If this thing works out,";

-		mes "I will pay you back.";

-		mes "What do you say?";

-		next;

-		menu "No, thanks.",-,"Sure, why not.",L_Sure;

-				mes "[Enrico Kaili]";

-				mes "What...?! You are too mean!";

-				mes "Why did you even get bothered to speak to me";

-				mes "when you don't want to help me?";

-				mes "I do not wish to talk to you.";

-				mes "Please leave.";

-				close;

-			L_Sure:

-				mes "[Enrico Kaili]";

-				mes "Are you sure you want to help me?";

-				mes "That's great.";

-				mes "Before we start, would like to see this thing first?";

-				next;

-				mes "- The old scholar showed you -";

-				mes "- a small white crystallization within a box. -";

-				mes "- It looked very thin and freezing cold. -";

-				next;

-				mes "[Enrico Kaili]";

-				mes "This is the snow crystal...";

-				mes "at least that's what I think.";

-				mes "Look at this shape and texture.";

-				mes "Doesn't it look like a snow flake?";

-				mes "The strange thing is...this never gets molten.";

-				next;

-				mes "[Enrico Kaili]";

-				mes "Few years ago, a young adventurer gave me this.";

-				mes "I have not figured out what actually this is...";

-				mes "I want to know what this is and where it came from.";

-				next;

-				mes "[Enrico Kaili]";

-				mes "Yes, I am looking for a person.";

-				mes "The person who brought me this Snow Crystal.";

-				mes "Let me check his name...yes, here it is.";

-				mes "His name is ...Hermite Charles.";

-				next;

-				mes "[Enrico Kaili]";

-				mes "When you find him,";

-				mes "please give him this letter.";

-				next;

-				mes "^4d4dff - Enrico gave you -";

-				mes "- a thin letter sealed with red wax. -";

-				mes "- 'Dear Hermite Charles' was written on the front.-";

-				set god_brising,3;

-				close;

-	}

-		else if(god_brising == 1)

-	{

-		mes "[Enrico Kaili]";

-		mes "How are you...ah! It is you, " + strcharinfo(0) + "!";

-		mes "Yes, I was told by Nelliorde that you will visit me.";

-		mes "He always tells me that he will";

-		mes "a good assistance for my research.";

-		mes "So, how was your travel?";

-		next;

-		mes "[Enrico Kaili]";

-		mes "Hahaha, I guess you would not have a hard time to come";

-		mes "to Juno...since there are various convenience travelling";

-		mes "methods as warp portal and kafra teleport service!";

-		mes "So, how was my joke? Hahahaha!";

-		next;

-		mes "[Enrico Kaili]";

-		mes "As you were told by Nelliorde,";

-		mes "I would like to ask you to help my research...";

-		mes "specifically finding a person.";

-		next;

-		mes "[Enrico Kaili]";

-		mes "Since you are an adventurer, I assume";

-		mes "you like to travel a lot?";

-		mes "Why don't you find the person I am looking for";

-		mes "during your travel? It is not that hard.";

-		mes "And I was told by Nelliorde that";

-		mes "you are a pretty well-experienced adventurer.";

-		next;

-		menu "I am no good at finding people.",-,"I can do that!",L_Ok;

-				mes "[Enrico Kaili]";

-				mes "......bah...";

-				mes "I was convinced that you would help me for sure...";

-				mes "...but I understand if you don't want to do it.";

-				mes "I can find another adventurer.";

-				mes "...sigh...if I was a little bit younger,";

-				mes "I would not have to ask a favor...";

-				next;

-				mes "[Enrico Kaili]";

-				mes "I see. But if you change your mind later";

-				mes "please come back.";

-				mes "And I am so sorry to make you travel this far.";

-				mes "Take care.";

-				set god_brising,2;

-				close;

-			L_Ok:

-				mes "[Enrico Kaili]";

-				mes "Are you sure you want to help me?";

-				mes "That's great.";

-				mes "Before we start, would like to see this thing first?";

-				next;

-				mes "- The old scholar showed you -";

-				mes "- a small white crystallization within a box. -";

-				mes "- It looked very thin and freezing cold. -";

-				next;

-				mes "[Enrico Kaili]";

-				mes "This is the snow crystal...";

-				mes "at least that's what I think.";

-				mes "Look at this shape and texture.";

-				mes "Doesn't it look like a snow flake?";

-				mes "The strange thing is...this never gets molten.";

-				next;

-				mes "[Enrico Kaili]";

-				mes "Few years ago, a young adventurer gave me this.";

-				mes "I have not figured out what actually this is...";

-				mes "I want to know what this is and where it came from.";

-				next;

-				mes "[Enrico Kaili]";

-				mes "Yes, I am looking for a person.";

-				mes "The person who brought me this Snow Crystal.";

-				mes "Let me check his name...yes, here it is.";

-				mes "His name is ...Hermite Charles.";

-				next;

-				mes "[Enrico Kaili]";

-				mes "When you find him,";

-				mes "please give him this letter.";

-				next;

-				mes "^4d4dff - Enrico gave you -";

-				mes "- a thin letter sealed with red wax. -";

-				mes "- 'Dear Hermite Charles' was written on the front.-";

-				set god_brising,3;

-				close;

-	}

-		else

-	{

-		mes "[Enrico Kaili]";

-		mes "I am not sure what purpose you have in here, but I am busy at this moment.";

-		mes "Please leave me with my research.";

-		close;

-	}

-}							

-	else

-{

-	mes "[Studying Scholar]";

-	mes "Do you know how to make red potions?";

-	mes "You grind a lot of red herbs";

-	mes "and shake the liquid with care until it become a red potion.";

-	mes "If I could only shake them faster....";

-	mes "I would be able to rich in no time...";

-	close;

-}

-

-}

-

-prt_church.gat,113,103,1	script	Praying Man	798,{

- 

-	if($God2 < 50)

-{

-	mes "[Praying Man]";

-	mes "Let everyone live a life of happiness. Let there be peace in the world...";

-	next;

-	mes "[Praying Man]";

-	mes "May I hit it rich with this Old Blue Box that I spend this month's paycheck on...";

-	close;

-}

-	if($God3 > 99)

-{

-	mes "[Praying Man]";

-	mes "Now is the time to reflect upon the past to prepare for the future.";

-	next;

-	mes "[Praying Man]";

-	mes "It is in stillness that we find the wisdom to know which steps we must take to move forward. Let's pray.";

-	close;

-}

-	if(god_brising > 34)

-{

-	mes "^3355FFHermite Charles continues to fervently pray. His eyes are closed and his hands are clasped to his chest. There seems to be an air of faint sadness about him.^000000";

-	close;

-}

-	else if(god_brising == 34)

-{

-	mes "[Hermite Charles]";

-	mes "What did you just say? Did she really become an Einherjar? That's the greatest honor for any warrior...";

-	next;

-	mes "[Hermite Charles]";

-	mes "She must be so happy.";

-	mes "I guess in the end,";

-	mes "I never really had";

-	mes "any place in her heart.";

-	mes "Lowen...";

-	next;

-	mes "[Hermite Charles]";

-	mes "But I know one thing for sure. She roamed for two years because I made her run away.";

-	next;

-	mes "[Hermite Charles]";

-	mes "She should have blamed me for what happened. Why did she take everything upon herself? It was me...";

-	next;

-	mes "[Hermite Charles]";

-	mes "I guess she just saw me as a little  brother. She obviously didn't take me very seriously.";

-	next;

-	mes "[Hermite Charles]";

-	mes "Haha....hahaha...";

-	mes "Now I feel better!";

-	mes "So, what did you say?";

-	next;

-	mes "[Hermite Charles]";

-	mes "Yes, right.";

-	mes "Please tell Enrico this.";

-	mes "The object he's interested in was given by His Majesty to a guild that possessed a castle.";

-	next;

-	mes "[Hermite Charles]";

-	mes "It can never be made through just human technology. But I guess that His Majesty will let scholars study it, and let men possess it if they prove capable.";

-	next;

-	mes "[Hermite Charles]";

-	mes "I wasn't powerful enough to earn it. Frankly I stole it. But soon I began to fear its presense and my heart would pound with trepidation when I saw it.";

-	next;

-	mes "[Hermite Charles]";

-	mes "One day, I think it actually possessed me and I ended up going on a journey. I'm not really sure exactly where though...";

-	next;

-	mes "[Hermite Charles]";

-	mes "All I remember was that I was in Lutie, the town of snow. I went over a bridge to a hill to the West...";

-	next;

-	mes "[Hermite Charles]";

-	mes "But once I arrived there, I was seized with this feeling of terror I can't explain.";

-	next;

-	mes "[Hermite Charles]";

-	mes "I ended up running away. That's why I gave it to Mr. Enrico. You can laugh at me for being a coward if you want.";

-	next;

-	mes "[Hermite Charles]";

-	mes "You know everything now.";

-	mes "Please leave me alone.";

-	mes "^333333*Sigh...*^000000";

-	set god_brising,35;

-	close;

-}

-	else if(god_brising > 19 && god_brising < 34)

-{

-	mes "[Hermite Charles]";

-	mes "I'll be waiting.";

-	mes "For some reason, I believe you'll be able to find some sort of clue about what happened these past two years one of these days.";

-	close;

-}

-	else if(god_brising == 12)

-{

-	mes "[Hermite Charles]";

-	mes "Lohen Phelicia?";

-	mes "The person I asked you to find is Lowen, not Lohen. Lowen Ellenen.";

-	next;

-	mes "[Hermite Charles]";

-	mes "I'm sorry for the trouble, but I think you better try again.";

-	set god_brising,10;

-	close;

-}

-	else if(god_brising == 11)

-{

-	mes "[Hermite Charles]";

-	mes "What...?";

-	mes "How could you";

-	mes "talk to her?!";

-	mes "She's dead!";

-	next;

-	mes "[Hermite Charles]";

-	mes "I've heard those rumors, but she's definitely passed away. I was even at her funeral. She can't be alive. That's not true at all.";

-	next;

-	mes "[Hermite Charles]";

-	mes "The last time I saw her alive was in Geffen. Two years after that, I saw her buried in her grave. Didn't I tell you this?";

-	next;

-	mes "[Hermite Charles]";

-	mes "I wanted you to find out what happened in those two years before she died. I wanted to know what led her to her death.";

-	next;

-	mes "[Hermite Charles]";

-	mes "What the hell";

-	mes "killed her?!";

-	mes "Don't you understand";

-	mes "the way I feel?";

-	set god_brising,20;

-	close;

-}

-	else if(god_brising == 10)

-{

-	mes "[Hermite Charles]";

-	mes "Lowen was a Crusader, a knight in the service of holiness preparing for the Holy War.";

-	next;

-	mes "[Hermite Charles]";

-	mes "I always expected her to become a Knight in the Prontera Chivalry, but suddenly she changed her mind and became a Crusader. I saw her for the last time in Geffen.";

-	next;

-	mes "[Hermite Charles]";

-	mes "I beg you, please learn anything you can about what happened to her.";

-	close;

-}

-	else if(god_brising == 5)

-{

-	set @brising_try,rand(1,4);

-		if(@brising_try == 1)

-	{

-		mes "[Hermite Charles]";

-		mes "You're still here.";

-		mes "Does that mean you";

-		mes "want to hear my";

-		mes "story after all?";

-		next;

- 		menu "Yes, I would like to.",-,"No, thanks.",L_NoThx;

-				mes "[Hermite Charles]";

-				mes "Thank you...";

-				mes "Perhaps you're doing this merely out of consideration, but I still appreciate your kindness. The story I will tell you is very old.";

-				next;

-				mes "[Hermite Charles]";

-				mes "Long ago, there was a little boy who never knew his parents. Just to survive, he became a Thief and eventually joined the Rogue Guild.";

-				next;

-				mes "[Hermite Charles]";

-				mes "Without any goals or dreams, his life was pretty aimless. He pretty much only lived so that he could see tomorrow.";

-				next;

-				mes "[Hermite Charles]";

-				mes "However, the little boy met someone who was full of hope and kindess. He admired her and she became his reason for living.";

-				next;

-				mes "[Hermite Charles]";

-				mes "She will never know that the little boy loved her more than anything else. Unlike the boy, her dream was devote her life to God.";

-				next;

-				mes "[Hermite Charles]";

-				mes "Although he never understood that, he knew that he would be happy to just be near her, watching from a distance.";

-				next;

-				mes "[Hermite Charles]";

-				mes "But one day, because of one fatal mistake, he lost her and she never came back.";

-				next;

-				mes "[Hermite Charles]";

-				mes "Ever since, that boy has been coming to the Sanctuary everyday to pray for her safety, even into adulthood.";

-				next;

-				mes "[Hermite Charles]";

-				mes "...";

-				mes "......^333333*Sob*^000000";

-				mes "Please find";

-				mes "her for me.";

-				mes "Find Lowen.";

-				next;

-				mes "[Hermite Charles]";

-				mes "I know that Enrico has sent you. I'm guessing he needs something from me. Am I wrong?";

-				next;

-				mes "[Hermite Charles]";

-				mes "I'll do whatever you want if you do what I want you to do. It's simple: find out anything you can about Lowen.";

-				next;

-				mes "[Hermite Charles]";

-				mes "It's doesn't matter how insignificant the traces may be, anything will do. I want to know everything related to her!";

-				next;

-				menu "Uhhhhh...",-,"Sorry, I can't.",L_Sorry,"When was the last time you saw her?",L_Last;

-						mes "[Hermite Charles]";

-						mes "Please consider my proposal. If you can find Lowen for me, I'll give you what you want.";

-						next;

-						mes "[Hermite Charles]";

-						mes "Please, I beg you.";

-						mes "You are a strong and well-experienced adventurer. Isn't this a simple thing for you to do?";

-						next;

-						mes "[Hermite Charles]";

-						mes "If you've ever dearly loved someone, then you'd know how desperate I am. Please find Lowen for me.";

-						next;

-						menu "...Alright.",-,"I'm sorry, I don't think I can do it.",L_Think;

-								mes "[" + strcharinfo(0) + "]";

-								mes "Alright.";

-								mes "I'll try my best to find her. Would you tell me more about Lowen?";

-								next;

-								mes "[Hermite Charles]";

-								mes "She is a crusader.";

-								mes "The last time I saw her was deep inside Geffen Dungeon.";

-								next;

-								mes "[Hermite Charles]";

-								mes "Long ago, some Crusaders entered the Geffen Dungeon on a monster subjugation expedition.";

-								next;

-								mes "[Hermite Charles]";

-								mes "Please find";

-								mes "anything that";

-								mes "you can. I beg";

-								mes "of you...";

-								set god_brising,10;

-								close;

-							L_Think:

-								mes "[Hermite Charles]";

-								mes "^333333*Sigh*^000000";

-								mes "I understand.";

-								mes "But if you don't help me, then Kaili won't get the help he needs...";

-								set god_brising,9;

-								close;

-					L_Sorry:

-						mes "[Hermite Charles]";

-						mes "You don't understand!";

-						mes "If I weren't this much of a coward, I would already have gone out to find out what I could for myself.";

-						next;

-						mes "[Hermite Charles]";

-						mes "I'm not afraid of monsters or dying. It's the fact that she might hate me now. That's what I fear: Lowen's reproach.";

-						next;

-						mes "[Hermite Charles]";

-						mes "I have no idea how she has been and how she would react upon seeing me once more. Go ahead and laugh if you want.";

-						mes "how she would react to my appearance.";

-						next;

-						mes "[Hermite Charles]";

-						mes "All I can do for her is just earnestly pray. I had no idea it'd be so horrible not to be able to see her anymore...";

-						set god_brising,9;

-						close;

-					L_Last:

-						mes "[Hermite Charles]";

-						mes "The last time I saw her was deep inside the Geffen Dungeon.";

-						next;

-						mes "[Hermite Charles]";

-						mes "Although it was created by humans, that dungeon is now cursed and inhabited with horrific monsters.";

-						next;

-						mes "[Hermite Charles]";

-						mes "I'm guessing the Crusaders saw that it was necessary to exterminate the monsters there to keep it from getting even worse.";

-						next;

-						mes "[Hermite Charles]";

-						mes "Lowen accompanied a group of other Crusaders for the good of the people, but I haven't heard from anything about her since...";

-						next;

-						mes "[Hermite Charles]";

-						mes "That was the last time...";

-						mes "Please find out anything you can about her...";

-						mes "I beg you.";

-						set god_brising,10;

-						close;

-			L_NoThx:

-				mes "[Hermite Charles]";

-				mes "I misunderstood you.";

-				mes "I should have realized that people never really listen unless it's of some benefit to them.";

-				next;

-				mes "[Hermite Charles]";

-				mes "I won't waste any more of your time. I'll accept Kaili's letter and wait until I find someone who'll listen to my story and help me.";

-				set god_brising,5;

-				close;

-	}

-		else

-	{

-		mes "[Hermite Charles]";

-		mes "...";

-		mes "^333333*Sob...*^000000";

-		mes "I'm sorry.";

-		mes "I'm so sorry, Lowen.";

-		mes "It was all my fault...";

-		close;

-	}

-}

-	else if(god_brising == 4)

-{

-	mes "[Hermite Charles]";

-	mes "What do you";

-	mes "want from me?";

-	mes "Were you sent by";

-	mes "the Rogue Guild?";

-	next;

-	mes "[Hermite Charles]";

-	mes "Tell them";

-	mes "I quit already.";

-	mes "Leave me alone!";

-	next;

-	menu "Leave him alone.",-,"Give him Kaila's Letter.",L_Letter;

-			mes "^3355FFYou're not sure why he's so upset, but it doesn't seem to be the best time to try to speak with him. Perhaps later would be better...^000000";

-			set god_brising,4;

-			close;

-		L_Letter:

-			mes "[Hermite Charles]";

-			mes "Huh...";

-			mes "Enrico Kaili.";

-			mes "Yeah, I remember";

-			mes "him. So what..?";

-			next;

-			mes "^3355FFHermite nonchalantly tosses the letter back to you.^000000";

-			next;

-			mes "[Hermite Charles]";

-			mes "...";

-			mes "^333333*Sigh...*^000000";

-			next;

-			mes "[Hermite Charles]";

-			mes "You...";

-			mes "Would you like to";

-			mes "listen to my story?";

-			next;

-			menu "Sure!",-,"I'm busy, actually.",L_Busy;

-					mes "[Hermite Charles]";

-					mes "Thank you...I know you're just being generous.";

-					mes "But still I am glad for your generosity.";

-					mes "I am going to tell you an old story.";

-					next;

-					mes "[Hermite Charles]";

-					mes "Long ago, there was a little boy.";

-					mes "He lost his parents so there was";

-					mes "no home for him. He was just wandering";

-					mes "from thie thief guild to that rogue guild";

-					mes "...just to survive. He didn't have any goal";

-					mes "or any purpose of life other than being alive everyday.";

-					next;

-					mes "[Hermite Charles]";

-					mes "Even so, the little boy";

-					mes "had one person who he admired with full of hope.";

-					mes ".... ... ";

-					next;

-					mes "[Hermite Charles]";

-					mes "She will never know that";

-					mes "the little boy loved her more than anything else.";

-					mes "She was totally different from the boy.";

-					mes "She had a goal that she would devote her life to God.";

-					next;

-					mes "[Hermite Charles]";

-					mes "...he was just happy...";

-					mes "he's just happy for watching her in a distance.";

-					mes "One day...";

-					mes "because of one mistake, he lost her.";

-					next;

-					mes "[Hermite Charles]";

-					mes "She has never come back.";

-					mes "And the boy has been praying for her safety";

-					mes "even after he was fully grown up.";

-					mes "He always comes to the church and prays for her.";

-					next;

-					mes "[Hermite Charles]";

-					mes "... .. .. .... ... . .";

-					mes "...........";

-					mes "...";

-					next;

-					mes "[Hermite Charles]";

-					mes "....................";

-					mes ".......*sob*.........";

-					mes "Please find her for me.";

-					mes "...find Lowen for me.......";

-					mes "..................*sob*..";

-					next;

-					mes "[Hermite Charles]";

-					mes "You...";

-					mes " ";

-					mes "I know that Enrico has sent you to me.";

-					mes "I guess you must need something from me.";

-					mes "......";

-					mes "Am I wrong?";

-					next;

-					mes "[Hermite Charles]";

-					mes "....if you do what I want you to do,";

-					mes "I will give you what you want.";

-					mes "All I want is simple.";

-					mes ".......please find Lowen for me.";

-					mes "Find anything, anything that are belong to her,";

-					mes "her trace and locations where she used to say...";

-					mes "I want everything related to her!";

-					next;

-					menu "... ....umm...",-,"Sorry, I can't.",L_Sorry2,"When was the last time you saw her?",L_Last2;

-							mes "[Hermite Charles]";

-							mes "....have a heart, I beg you.";

-							mes "Please consider my proposal.";

-							mes "You find Lowen for me,";

-							mes "then I am going to give you what you want.";

-							next;

-							mes "[Hermite Charles]";

-							mes ".......please, I beg you.";

-							mes "You are a strong and well-experienced adventurer.";

-							mes "Isn't this so easy for you to do?";

-							mes "If you have a person in your mind,";

-							mes "you will know how desperate I have been.";

-							mes "Please, please find Lowen for me.";

-							next;

-							menu "....alright.",-,"...I am sorry, I don't think I can make it.",L_Think2;

-									mes "[" + strcharinfo(0) + "]";

-									mes "Alright.";

-									mes "I will try my best to find her.";

-									mes "Will you tell me more about the lady, Lowen?";

-									next;

-									mes "[Hermite Charles]";

-									mes "She is a crusader.";

-									mes "Last time I saw her deep inside of the Geffen dungeon.";

-									mes "Long time ago, crusaders went on";

-									mes "a monster subjugation to the Geffen dungeon.";

-									mes "That was the last time...";

-									mes "Please find anything that once used to belong to her...";

-									mes "I beg you.";

-									set god_brising,10;

-									close;

-								L_Think2:

-									mes "[Hermite Charles]";

-									mes "... ... ..";

-									mes ".......... .......";

-									mes "..........sigh..";

-									mes "I understand.";

-									mes "Then there will be no help for you now.";

-									set god_brising,9;

-									close;

-						L_Sorry2:

-							mes "[Hermite Charles]";

-							mes "What a selfish answer!";

-							mes "I am this desperate...";

-							mes "....if I am not this coward,";

-							mes "... .. I would...";

-							mes "......";

-							mes "I would already go try to find her...";

-							next;

-							mes "[Hermite Charles]";

-							mes "I am not afraid of monsters or anything.";

-							mes "But I am for the fact that she might hate me by now...";

-							mes "That's what Ifear...";

-							mes "I fear that I have no idea how she has been and";

-							mes "how she would react to my appearance.";

-							next;

-							mes "[Hermite Charles]";

-							mes "You can mock me as much as you want.";

-							mes "Yes, I don't have any guts to do anything.";

-							mes "...all I can do for her is";

-							mes "....just praying...";

-							next;

-							mes "[Hermite Charles]";

-							mes "I am weak, I am weak.";

-							mes "........";

-							mes "I had no idea that it would be so horrible not to see her any longer.";

-							mes ".....I will continue praying for her.";

-							mes "That is all I can do for her at this moment.";

-							set god_brising,9;

-							close;

-						L_Last2:

-							mes "[Hermite Charles]";

-							mes "She is a crusader.";

-							mes "Last time I saw her deep inside of the Geffen dungeon.";

-							mes "Long time ago, crusaders went on";

-							mes "a monster subjugation to the Geffen dungeon.";

-							next;

-							mes "[Hermite Charles]";

-							mes "The dungeon hidden under the Geffen Tower";

-							mes "was so horrible...";

-							mes "It must be created by human beings....";

-							mes "but now it is conquered by hideous monsters.";

-							mes "That place is cursed...that's all I can say.";

-							next;

-							mes "[Hermite Charles]";

-							mes "Maybe that's why other people";

-							mes "decided to bring an end to the dreadful place.";

-							mes "That's why crusaders went into";

-							mes "the dungeon on behalf of other people...";

-							next;

-							mes "[Hermite Charles]";

-							mes "That was the last time...";

-							mes "Please find anything that once used to belong to her...";

-							mes "I beg you.";

-							set god_brising,10;

-							close;

-				L_Busy:

-					mes "[Hermite Charles]";

-					mes "....I misunderstood you.";

-					mes "I should have realised that people...";

-					mes "never listen to other people unless...";

-					mes "they have some purpose or they want something from them.";

-					next;

-					mes "[Hermite Charles]";

-					mes "Let's not waste our precious time any longer.";

-					mes ".... ... also......";

-					mes "I am going to accept Mr. Enrico's letter";

-					mes "when I meet a person who is willing to listen to my story";

-					mes "and to help me....who is not you.";

-					set god_brising,5;

-					close;

-}

-	else if(god_brising == 3)

-{

-	mes "[Sad-looking Man]";

-	mes "...";

-	mes "^333333*Sob...*^000000";

-	mes "I am so";

-	mes "sorry, Lowen.";

-	mes "It's all fault...";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Excuse me.";

-	mes "I am looking";

-	mes "for someone named...";

-	mes "Hermite?";

-	next;

-	mes "[Hermite Charles]";

-	mes "Hm...?";

-	mes "Hermite? That's me.";

-	mes "But if you don't mind,";

-	mes "I want to be alone...";

-	next;

-	menu "Leave him alone.",-,"Give him Kaili's Letter.",L_Letter2;

-			mes "- You were unsure why he's upset - ";

-			mes "- but it didn't seem to be a right time to speak to him. -";

-			mes "- Let's come back later. -";

-			set god_brising,4;

-			close;

-		L_Letter2:

-			mes "[Hermite Charles]";

-			mes ".......huh....?!";

-			mes "Ah, I remember him.";

-			mes "So what..?";

-			next;

-			mes "- Hermite gave you the letter back - ";

-			mes "- as though he didn't care about it. -";

-			next;

-			mes "[Hermite Charles]";

-			mes " .... ... ... ";

-			mes " ..... ...... .....";

-			mes " .. .. ..*sigh*...";

-			next;

-			mes "[Hermite Charles]";

-			mes " ....... ..........";

-			mes "....... .........";

-			mes " ....... you..";

-			mes "Would you like to listen to my story?";

-			next;

-			menu "Sure!",-,"No, I am busy.",L_Busy2;

-					mes "[Hermite Charles]";

-					mes "Thank you...I know you're just being generous.";

-					mes "But still I am glad for your generosity.";

-					mes "I am going to tell you an old story.";

-					next;

-					mes "[Hermite Charles]";

-					mes "Long ago, there was a little boy.";

-					mes "He lost his parents so there was";

-					mes "no home for him. He was just wandering";

-					mes "from thie thief guild to that rogue guild";

-					mes "...just to survive. He didn't have any goal";

-					mes "or any purpose of life other than being alive everyday.";

-					next;

-					mes "[Hermite Charles]";

-					mes "Even so, the little boy";

-					mes "had one person who he admired with full of hope.";

-					mes ".... ... ";

-					next;

-					mes "[Hermite Charles]";

-					mes "She will never know that";

-					mes "the little boy loved her more than anything else.";

-					mes "She was totally different from the boy.";

-					mes "She had a goal that she would devote her life to God.";

-					next;

-					mes "[Hermite Charles]";

-					mes "...he was just happy...";

-					mes "he's just happy for watching her in a distance.";

-					mes "One day...";

-					mes "because of one mistake, he lost her.";

-					next;

-					mes "[Hermite Charles]";

-					mes "She has never come back.";

-					mes "And the boy has been praying for her safety";

-					mes "even after he was fully grown up.";

-					mes "He always comes to the church and prays for her.";

-					next;

-					mes "[Hermite Charles]";

-					mes "... .. .. .... ... . .";

-					mes "...........";

-					mes "...";

-					next;

-					mes "[Hermite Charles]";

-					mes "....................";

-					mes ".......*sob*.........";

-					mes "Please find her for me.";

-					mes "...find Lowen for me.......";

-					mes "..................*sob*..";

-					next;

-					mes "[Hermite Charles]";

-					mes "You...";

-					mes " ";

-					mes "I know that Enrico has sent you to me.";

-					mes "I guess you must need something from me.";

-					mes "......";

-					mes "Am I wrong?";

-					next;

-					mes "[Hermite Charles]";

-					mes "....if you do what I want you to do,";

-					mes "I will give you what you want.";

-					mes "All I want is simple.";

-					mes ".......please find Lowen for me.";

-					mes "Find anything, anything that are belong to her,";

-					mes "her trace and locations where she used to say...";

-					mes "I want everything related to her!";

-					next;

-					menu "... ....umm...",-,"Sorry, I can't.",L_Sorry3,"When was the last time you saw her?",L_Last3;

-							mes "[Hermite Charles]";

-							mes "....have a heart, I beg you.";

-							mes "Please consider my proposal.";

-							mes "You find Lowen for me,";

-							mes "then I am going to give you what you want.";

-							next;

-							mes "[Hermite Charles]";

-							mes ".......please, I beg you.";

-							mes "You are a strong and well-experienced adventurer.";

-							mes "Isn't this so easy for you to do?";

-							mes "If you have a person in your mind,";

-							mes "you will know how desperate I have been.";

-							mes "Please, please find Lowen for me.";

-							next;

-							menu "....alright.",-,"...I am sorry, I don't think I can make it.",L_Think3;

-									mes "[" + strcharinfo(0) + "]";

-									mes "Alright.";

-									mes "I will try my best to find her.";

-									mes "Will you tell me more about the lady, Lowen?";

-									next;

-									mes "[Hermite Charles]";

-									mes "She is a crusader.";

-									mes "Last time I saw her deep inside of the Geffen dungeon.";

-									mes "Long time ago, crusaders went on";

-									mes "a monster subjugation to the Geffen dungeon.";

-									mes "That was the last time...";

-									mes "Please find anything that once used to belong to her...";

-									mes "I beg you.";

-									set god_brising,10;

-									close;

-								L_Think3:

-									mes "[Hermite Charles]";

-									mes "... ... ..";

-									mes ".......... .......";

-									mes "..........sigh..";

-									mes "I understand.";

-									mes "Then there will be no help for you now.";

-									set god_brising,9;

-									close;

-						L_Sorry3:

-							mes "[Hermite Charles]";

-							mes "What a selfish answer!";

-							mes "I am this desperate...";

-							mes "....if I am not this coward,";

-							mes "... .. I would...";

-							mes "......";

-							mes "I would already go try to find her...";

-							next;

-							mes "[Hermite Charles]";

-							mes "I am not afraid of monsters or anything.";

-							mes "But I am for the fact that she might hate me by now...";

-							mes "That's what Ifear...";

-							mes "I fear that I have no idea how she has been and";

-							mes "how she would react to my appearance.";

-							next;

-							mes "[Hermite Charles]";

-							mes "You can mock me as much as you want.";

-							mes "Yes, I don't have any guts to do anything.";

-							mes "...all I can do for her is";

-							mes "....just praying...";

-							next;

-							mes "[Hermite Charles]";

-							mes "I am weak, I am weak.";

-							mes "........";

-							mes "I had no idea that it would be so horrible not to see her any longer.";

-							mes ".....I will continue praying for her.";

-							mes "That is all I can do for her at this moment.";

-							set god_brising,9;

-							close;

-						L_Last3:

-							mes "[Hermite Charles]";

-							mes "She is a crusader.";

-							mes "Last time I saw her deep inside of the Geffen dungeon.";

-							mes "Long time ago, crusaders went on";

-							mes "a monster subjugation to the Geffen dungeon.";

-							next;

-							mes "[Hermite Charles]";

-							mes "The dungeon hidden under the Geffen Tower";

-							mes "was so horrible...";

-							mes "It must be created by human beings....";

-							mes "but now it is conquered by hideous monsters.";

-							mes "That place is cursed...that's all I can say.";

-							next;

-							mes "[Hermite Charles]";

-							mes "Maybe that's why other people";

-							mes "decided to bring an end to the dreadful place.";

-							mes "That's why crusaders went into";

-							mes "the dungeon on behalf of other people...";

-							next;

-							mes "[Hermite Charles]";

-							mes "That was the last time...";

-							mes "Please find anything that once used to belong to her...";

-							mes "I beg you.";

-							set god_brising,10;

-							close;

-				L_Busy2:

-					mes "[Hermite Charles]";

-					mes "....I misunderstood you.";

-					mes "I should have realised that people...";

-					mes "never listen to other people unless...";

-					mes "they have some purpose or they want something from them.";

-					next;

-					mes "[Hermite Charles]";

-					mes "Let's not waste our precious time any longer.";

-					mes ".... ... also......";

-					mes "I am going to accept Mr. Enrico's letter";

-					mes "when I meet a person who is willing to listen to my story";

-					mes "and to help me....who is not you.";

-					set god_brising,5;

-					close;

-} 

-	else

-{

-	mes "[Sad-looking Man]";

-	mes "...";

-	mes "^333333*Sob...*";

-	mes "Lowen...";

-	mes "I'm so sorry.";

-	mes "It's all my fault.";

-	mes "Please be okay...";

-	close;

-}

-

-}

-

-prt_castle.gat,80,52,0	script	Personnel Record#hiddenbook1	111,{

-

-	if($God2 < 50)

-{

-	mes "[Librarian]";

-	mes "What are you doing now?";

-	mes "Don't touch anything, please!";

-	close;

-}

- 

-	if($God3 > 99)

-{

-	mes "[Librarian]";

-	mes "What are you doing?";

-	mes "Don't touch anything!";

-	close;

-}

- 

-	if(god_brising == 26)

-{

-	mes "[" + strcharinfo(0) + "]";

-	mes "I should read this from the point where I left off...";

-	next;

-	mes "["+ strcharinfo(0) +"]";

-	mes "Huh...?";

-	mes "What's this mark";

-	mes "here at the bottom?";

-	mes "A secret?";

-	next;

-	mes "["+ strcharinfo(0) +"]";

-	mes "No wonder the librarian seemed to hesitate before saying anything. Now let's see...";

-	next;

-	set @bookrand,rand(1,3);

-		if(@bookrand == 1)

-	{

-		mes "...(omitted) Lowen, of the 2nd squad, returned to her detachment 3 days after the incident.";

-		next;

-		mes "A trial was held, and she was judged guilty of fleeing when ordered to fight. Despite the severity of this offense, she was only discharged from the Crusaders and the holy power granted to her was removed...";

-		mes "We collected the holy power granted to her...(omitted)";

-		next;

-		mes "[" + strcharinfo(0) + "]";

-		mes "She was forced to leave the Crusaders?! That's ridiculous!";

-		next;

-		mes "["+ strcharinfo(0) +"]";

-		mes "Did they want to sentence her to death or what? That's almost too cruel. She must have been humiliated...";

-		next;

-		mes "2 years later after the incident, an expedition team found rusty armor shards, a broken sword and some effects belonging to Lowen Ellenen.";

-		next;

-		mes "["+ strcharinfo(0) +"]";

-		mes "However, this information is classified. Officially, Lowen Ellenen died during the mission.";

-		next;

-		mes "[" + strcharinfo(0) + "]";

-		mes "They thought she brought disgrace to the Crusaders? This sounds messy. Should I try to meet her again?";

-		next;

-		mes "[Librarian]";

-		mes "^666666*Yawn...*^000000";

-		mes "What the...?";

-		mes "who are you!";

-		mes "Get the hell";

-		mes "out of here!";

-		set god_brising,30;

-		close2;

-		warp "prt_castle.gat",94,37;

-		end;

-	}

-		else

-	{

-		mes "[Librarian]";

-		mes "^666666*Yawn...*^000000";

-		mes "What the...?";

-		mes "who are you!";

-		mes "Get the hell";

-		mes "out of here!";

-		close2;

-		warp "prt_castle.gat",94,37;

-		end;

-	}

-}

-	else if(god_brising == 25)

-{

-	mes "^3355FFYou took the book from the shelf while the librarian was dozing. According to the Crusader Personnel Records, there's only one recruit that was named Lowen Ellenen.";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Lowen Ellenen...";

-	mes "Member of the";

-	mes "2nd squad...";

-	mes "Age 22...";

-	mes "Female...";

-	next;

-	mes "["+ strcharinfo(0) +"]";

-	mes "Became a fugitive?";

-	mes "Announced death?";

-	mes "This is the same information the soldier told me.";

-	next;

-	set @bookrand,rand(1,3);

-		if(@bookrand == 1)

-	{

-		mes "[" + strcharinfo(0) + "]";

-		mes "...umm let's read again from the page that I read last time.";

-		mes "Umm? What is this mark on the bottom?";

-		mes "A secret? Ah...now I see why the librarian was hesitating to say something.";

-		mes "Let's see...";

-		next;

-		mes "...(omitted) Lowen in the second squad";

-		mes "was sent back to her detachment in 3 days after the accident.";

-		mes "In order to interrogate her responsibility on the absence";

-		mes "during the mission, a trial was hold.";

-		mes "She was supposed to be severely punished";

-		mes "however, with a power of the commandant,";

-		mes "she was order to be discharged from service.";

-		mes "We collected the holy power granted to her...(omitted)";

-		next;

-		mes "[" + strcharinfo(0) + "]";

-		mes "...what?! She was taken her ability and forced to be discharged?";

-		mes "It was ridiculous.";

-		mes "Was she sentenced to death on the trial or what?";

-		mes "Jesus christ, that was so mean.";

-		mes "...she must feel humiliated when it happened...";

-		next;

-		mes "...2 years later after the accident,";

-		mes "an expedition team found rusty armors, a broken sword and some belongings";

-		mes "which were suspected to he Lowen Ellenen's.";

-		mes "However, this information was realsed to only members in charge.";

-		mes "Officially she died during the mission.";

-		next;

-		mes "[" + strcharinfo(0) + "]";

-		mes "........ .... did they think she disgraced crusaders?";

-		mes "....sounds confusing and messy...";

-		mes "Now...what should I do...";

-		mes "Should I go ahead and meet her again?";

-		next;

-		mes "[Librarian]";

-		mes "*yawn*...?!";

-		mes "What the...who are you!";

-		mes "Get the hell out of here!";

-		set god_brising,30;

-		close2;

-		warp "prt_castle.gat",94,37;

-		end;

-	}

-		else

-	{

-		mes "[Librarian]";

-		mes "*yawn*...?!";

-		mes "What the...who are you!";

-		mes "Get the hell out of here!";

-		set god_brising,26;

-                mes "["+ strcharinfo(0) +"]";

-		mes "(Nuts...!";

-		mes "I didn't get";

-		mes "to finish reading!)";

-		close2;

-		warp "prt_castle.gat",94,37;

-		end;

-	}

-}

-	else 

-{

-	mes "[Librarian]";

-	mes "What are you doing here?";

-	mes "Don't touch anything!";

-	close;

-}

-

-}

-

-//-----------librarian----------------------------------------------------------

- 

-prt_castle.gat,84,51,5	script	Librarian#2	105,{

-

-	if($God2 < 50)

-{

-	mes "[Librarian]";

-	mes "What are you doing here?";

-	mes "Don't touch anything. please!";

-	close;

-}

- 

-	if($God3 > 99)

-{

-	mes "[Librarian]";

-	mes "What are you doing now?";

-	mes "Don't touch anything!";

-	close;

-}

- 

-	if (god_brising > 24 && god_brising < 27)

-{

-	mes "[Librarian]";

-	mes ".... . ..... ....";

-	mes "...........Zzzzz..";

-	mes "Zzzz....Zzzzz...";

-	next;

-	mes "^3355FFThis librarian seems to be deeply asleep. It'd be smarter not to wake him if you want to check the Crusader Personnel Records.^000000";

-	close;

-}

- 	else if(god_brising == 10)

-{

-	mes "[Librarian]";

-	mes "All confidential personnel records are kept here in the royal library. However, you need authorization for full access.";

-	next;

-	mes "[Librarian]";

-	mes "Did you say that you need to find a person? Please give me that person's name, as well as your relationship with that person.";

-	next;

-	menu "Lowen, Sibling",-,"Lowen, Spouse",L_Spouse,"Lowen, Enemy",L_Enemy,"Lowen, a Friend",L_Friend;

-				if(Sex)

-			{

-				mes "[Librarian]";

-				mes "How dare you lie to the royal librarian!";

-				next;

-				mes "[Librarian]";

-				mes "It says here in the records that Lowen did not have any male siblings!";

-				next;

-				mes "[Librarian]";

-				mes "^333333(Crap! I just disclosed ^666666classified^000000 ^333333info!)^000000.";

-				next;

-				mes "[Librarian]";

-				mes "The Royal Library won't";

-				mes "tolerate identity fraud!";

-				mes "Please leave!";

-				close;

-			}

-				else

-			{

-				mes "[Librarian]";

-				mes "You're related to Miss Lowen? How have you not received any news about her before?";

-				next;

-				mes "[Librarian]";

-				mes "I see...";

-				mes "Separated at birth,";

-				mes "that's truly tragic.";

-				mes "Okay, let me check.";

-				next;

-				mes "[Librarian]";

-				mes "I feel terrible telling you this, but it's too late to find Lowe Ellenen, according to the records.";

-				next;

-				mes "[Librarian]";

-				mes "During the monster subjugation mission in Geffen dungeon she reportedly disappeared and... um, later pronounced dead.";

-				next;

-				mes "[Librarian]";

-				mes "I'm sorry, but";

-				mes "that's all I know.";

-				mes "Thank you...";

-				set god_brising,11;

-				close;

-			}

-

-		L_Spouse:		

-				if(Sex)

-			{

-				mes "[Librarian]";

-				mes "Spouse...?";

-				mes "Well, I guess you look like a husband. Heh, I've got a girlfriend myself. Well, at least I think so. Anyway...";

-				mes "right, give me";

-				mes "a minute.";

-				next;

-				mes "[Librarian]";

-				mes "Lowen Ellenen";

-				mes "the Crusader, right?";

-				mes "I'm so... sorry.";

-				mes "You might want";

-				mes "to have a seat.";

-				next;

-				mes "[Librarian]";

-				mes "Please listen to me. During the monster subjugation in Geffen Dungeon, she reportedly disappeared. And later, she was pronounced dead.";

-				next;

-				mes "[Librarian]";

-				mes "That's all the information I have, sir. I'm truly sorry for your loss.";

-				set god_brising,11;

-				close;

-			}

-				else

-			{

-				mes "[Librarian]";

-				mes "Hmmm...?";

-				mes "Spouse?";

-				mes "Or ^333333*Ahem*^000000";

-				mes "cohabitational partners?";

-				next;

-				mes "^3355FFThe librarian";

-				mes "now seems awfully";

-				mes "distracted, as if";

-				mes "he were lost in";

-				mes "vivid daydream...^000000";

-				close;

-			}

-		

-		L_Enemy:

-			mes "["+ strcharinfo(0) +"]";

-			mes "I'm looking";

-			mes "for Ellenen.";

-			mes "Lowen Ellenen.";

-			mes "My sworn arch-enemy.";

-			next;

-			mes "[Librarian]";

-			mes "Arch-enemy...?";

-			mes "Um, uh ^666666*Ahem!*^000000";

-			mes "All I can tell you is that there was a Crusader by that name.";

-			next;

-			mes "[Librarian]";

-			mes "I'm sorry, but";

-			mes "I can't tell you";

-			mes "more than that.";

-			next;

-			mes "[Librarian]";

-			mes "^333333*Cough*^000000";

-			mes "^666666Nutcase!^000000";

-			close;

-		

-		L_Friend:

-			mes "[Librarian]";

-			mes "A friend...?";

-			mes "Well, we have record of someone named Lohen Phelica.";

-			next;

-			mes "[Librarian]";

-			mes "He retired from the service a few years ago. I'd like to give you his address, but we don't have any of that information.";

-			set god_brising,12;

-			close;

-}

-	else if(god_brising > 10 && god_brising < 13)

-{

-	mes "[Librarian]";

-	mes "Now, may";

-	mes "I excuse myself?";

-	mes "Thank you!";

-	close;

-}

-	else 

-{

-	mes "[Librarian]";

-	mes "All confidential personnel records are kept here in the royal library. However, you need authorization for full access.";

-	close;

-}

-

-}

-

-prontera.gat,260,354,4	script	Woman#Rosa Ellenen	101,{

-

-	if($God2 < 50)

-{

-	mes "[Woman]";

-	mes "Hm?";

-	mes "What brings";

-	mes "you here? It's";

-	mes "kind of strange";

-	mes "to come just to";

-	mes "take a walk.";

-	close;

-}

-	if($God3 > 99)

-{

-	mes "[Woman]";

-	mes "Hm?";

-	mes "What brings";

-	mes "you here? It's";

-	mes "kind of strange";

-	mes "to come just to";

-	mes "take a walk.";

-	close;

-}

-	if(god_brising > 33)

-{

-	mes "[Rosa Ellenen]";

-	mes "Are you the one who visited me before? Ah, of course.";

-	next;

-	mes "[Rosa Ellenen]";

-	mes "I'm not sure how to tell you this, but... This is Lowen's grave. Thank you.";

-	mes "Ah....I am not sure how I can tell you this...";

-	close;

-}

-	else if(god_brising == 21)

-{

-	mes "[Rosa Ellenen]";

-	mes "What are you";

-	mes "talking about?";

-	mes "A message from Lowen?";

-	next;

-	mes "[Rosa Ellenen]";

-	mes "What?!";

-	mes "Why hasn't she";

-	mes "gone to heaven yet?";

-	next;

-	mes "[Rosa Ellenen]";

-	mes "I hope you remember everything I'm going to tell you. She should go to heaven now! I still don't understand...";

-	next;

-	mes "[Rosa Ellenen]";

-	mes "And please tell that praying fool that he shouldn't waste his time blaming himself. ^333333*Sigh*^000000 I still don't know why she chose to speak to you.";

-	next;

-	mes "[Rosa Ellenen]";

-	mes "Let me tell you something. Lowen was fencing prodigy. However, she always had trouble enduring the rigorous training and bearing the weight of armor...";

-	next;

-	mes "[Rosa Ellenen]";

-	mes "But she loved fencing and always tried twice as hard to develop her physical strength so that she could serve God in battle.";

-	next;

-	mes "[Rosa Ellenen]";

-	mes "Finally, she became a Crusader. For a while things were great. But then she suddenly disappeared while on a mission to Geffen Dungeon.";

-	next;

-	mes "[Rosa Ellenen]";

-	mes "Two years later, she was buried in this grave after her body was found by some adventurers. I was given the broken shards of armor and a blood stained ribbon she left behind.";

-	next;

-	mes "[Rosa Ellenen]";

-	mes "I never really learned what exactly happened. And Hermite was always following her like she was his real sister. Ever since she died, he's changed. I hope he doesn't hurt himself...";

-	next;

-	mes "[Rosa Ellenen]";

-	mes "But something suspicious seems to have happened in the military, but they won't even talk to me about it.";

-	next;

-	mes "[Rosa Ellenen]";

-	mes "In the end, I gave up trying to find the truth. After all, nothing can bring her back...";

-	next;

-	mes "[Rosa Ellenen]";

-	mes "If you meet her again,";

-	mes "please tell her I'm fine and that I hope her soul passes from this realm into heaven.";

-	set god_brising,25;

-	close;

-}

- 	else if(god_brising > 9 && god_brising < 20)

-{

-	mes "[Rosa Ellenen]";

-	mes "This is my little";

-	mes "sister's grave...";

-	mes "Her name was Lowen.";

-	next;

-	mes "[Rosa Ellenen]";

-	mes "Are you a friend of Lowen's? Hm? The man in the Sanctuary? That must be Hermite.";

-	next;

-	mes "[Rosa Ellenen]";

-	mes "He was shocked when Lowen died, but he doesn't have to blame himself for her death. I don't want him to suffer from the guilt.";

-	next;

-	mes "[Rosa Ellenen]";

-	mes "Anyway, thank you for visiting my little sister. It's good to know she has friends, even after she's passed on.";

-	set god_brising,11;

-	close;

-}

-	else

-{

-	mes "[Rosa Ellenen]";

-	mes "Oh hello...";

-	mes "Have you come";

-	mes "to pay your respects";

-	mes "to someone here as well?";

-	close;

-}

-

-}

-

-prontera.gat,262,353,0	script	Gravestone	111,{

-

-	if($God2 > 49)

-{

-		if(god_brising > 33)

-	{

-		mes "Lowen Ellenen";

-		mes " ";

-		mes " XXXX. XX. XX.";

-		mes "";

-		mes " Her noble spirit";

-		mes "was sent to the holy place";

-		mes " by will of the Valkyrie.";

-		close;

-	}

-		else

-	{

-		mes "^3355FFYou couldn't read the rest of the epitaph since the tombstone has been eroded.^000000";

-		close;

-	}

-}

-	else

-{

-	mes "^3355FFIt's just an";

-	mes "ordinary gravestone.^000000";

-	next;

-	mes "^3355FFNothing really";

-	mes "sets it apart from the rest of the tombstones here in the Prontera cemetary.^000000";

-	close;

-}

-

-}

- 

-gef_dun01.gat,89,192,0	script	#lowentrace	111,3,3,{

-

-	if($God2 < 50)

-{

-	mes "^3355FFIt's just an old,";

-	mes "dry piece of wood.^000000";

-	close;

-}

-	if($God3 > 99)

-{

-	mes "^3355FFIt's just an old,";

-	mes "dry piece of wood.^000000";

-	close;

-}

-	if (god_brising > 20 && god_brising < 34)

-{

-	mes "Will you";

-	mes "summon her? ";

-	next;

-	menu "Yes",-,"No",L_No;

-		input @lowenstring$;

-			if(@lowenstring$ == "Lowen")

-		{

-				if(god_brising == 30)

-			{

-					mes "[Lowen Ellenen]";

-					mes "^6E7B8B...Y-you're...";

-					mes "I-I can't stay long,";

-					mes "I'm feeling too weak.";

-					mes "Come closer, I want";

-					mes "to show you something...^000000";

-					next;

-					mes "^3355FFHer voice grew";

-					mes "softer and softer";

-					mes "until you could no";

-					mes "longer hear her.^000000";

-					close;

-			}

-				else if(god_brising == 21)

-			{

-					mes "[Lowen Ellenen]";

-					mes "^6E7B8BPlease tell Rosa";

-					mes "not to worry about me anymore. You might be able to find her beside my grave. I don't want her to suffer anymore...^000000";

-					close;

-			}

-				else if(god_brising == 25)

-			{

-					mes "[Lowen Ellenen]";

-					mes "^6E7B8BYou've come back.";

-					mes "Have you met Rosa?";

-					mes "Hm, yes, it sounds like she'd say that. But thank you for sending her my message.^000000";

-					next;

-					mes "[Lowen Ellenen]";

-					mes "^6E7B8BAh, it's too dangero--";

-					mes "This place is too dangerous for you. I hate myself for not being able to help protect you from these evil creatures. Please be careful...^000000";

-					close;

-			}

-				else

-			{

-					mes "[Lowen Ellenen]";

-					mes "^6E7B8BMy spirit is";

-					mes "growing weaker...";

-					mes "Please be careful...";

-					mes "This place is too dangerous.^000000";

-					close;

-			}

-		}

-			else

-		{

-			close;

-		}

-		L_No:

-			close;

-}

-	else if(god_brising == 20)

-{

-	mes "[The voice of a female]";

-	mes "^6E7B8BI-It's dangerous...";

-	mes "Be careful...^000000";

-	next;

-	menu "Ignore it.",-,"What are you talking about?",L_What;

-		close;

-		L_What:

-			mes "[The voice of a female]";

-			mes "^6E7B8B...No way...";

-			mes "You can hear me?";

-			mes "I can't believe this.";

-			mes "It's impossible. But if you don't mind, may I talk to you...?^000000";

-			mes "can I talk to you for a while?";

-			next;

-			menu "Holy...! Run!",-,"What are you?!",L_Who;

-				close;

-				L_Who:

-					mes "[The voice of a female]";

-					mes "^6E7B8BI...";

-					mes "I don't have my body anymore, so... I think I'm a ghost. Yes, I've been wandering in this place ever since I got here.^000000";

-					next;

-					mes "[The voice of a female]";

-					mes "^6E7B8BI'm still not sure why I'm bound to this realm. If you don't mind, would you visit my sister for me?";

-					next;

-					mes "[The voice of a female]";

-					mes "^6E7B8BPlease tell her...";

-					mes "Please tell her that her little sister Lowen is fine.^000000";

-					next;

-					mes "[The voice of a female]";

-					mes "^6E7B8BUm...";

-					mes "If you want to meet me again, just say my name out loud. '^000000Lowen^6E7B8B.'^000000";

-					set god_brising,21;

-					close;

-}

-	else

-{

-	mes "^3355FFYou find a piece of twisted, dry wood. Looking at it seems to bring out a feeling of sadness within you for some reason.^000000";

-	close;

-}

-

-OnTouch:

-	if(god_brising > 9 && god_brising < 34)

-{

-	emotion e_gasp;

-	end;

-}

-

-}

-

-gef_dun01.gat,203,48,0	script	#lowentrace1	111,3,3,{

-

-	if($God2 < 50)

-{

-	mes "^3355FFIt's just an old,";

-	mes "dry piece of wood.^000000";

-	close;

-}

- 

-	if($God3 > 99)

-{

-	mes "^3355FFIt's just an old,";

-	mes "dry piece of wood.^000000";

-	close;

-}

-

-	if(god_brising > 20 && god_brising < 34)

-{

-	mes "Would you";

-	mes "like to summon her? ";

-	next;

-	menu "Yes",-,"No",L_No;

-		input @lowenstring$;

-			if(@lowenstring$ == "Lowen")

-		{

-				if(god_brising == 31)

-			{

-					mes "[Lowen Ellenen]";

-					mes "^6E7B8BYou came back!";

-					mes "You'll be with me";

-					mes "...Won't you?^000000";

-					next;

-					menu "Of course.",-,"Sorry, I don't think I can...",L_Sorry;

-							mes "[Lowen Ellenen]";

-							mes "^6E7B8BThank you,";

-							mes "thank you so much...^000000";

-							close2;

-							warp "que_god02.gat",47,53;

-							end;

-						L_Sorry:

-							mes "[Lowen Ellenen]";

-							mes "^6E7B8BI understand.";

-							mes "Please take";

-							mes "care of yourself...^000000";

-							close;

-			}

-				else if(god_brising == 30)

-			{

-					mes "[Lowen Ellenen]";

-					mes "^6E7B8BAh yes. This is it.";

-					mes "You look very curious about me, yet I am amazed that you can hear my voice. Please let me tell you an old story.^000000";

-					close2;

-					warp "que_god02.gat",47,53;

-					end;

-			}

-				else if(god_brising == 25)

-			{

-					mes "[Lowen Ellenen]";

-					mes "You came back.";

-					mes "....have you met Rosa?";

-					mes "...yes...I expected her to say so.....";

-					mes "Thank you for sending my message to her.";

-					mes "....I wish I could do what she wants me to do...";

-					next;

-					mes "[Lowen Ellenen]";

-					mes "Ah...it's too danger.";

-					mes "This place is too dangerous for you.";

-					mes "I hate myself for not protecting you from evil creatures.";

-					mes "Please be careful.";

-					close;

-			}

-				else

-			{

-					mes "[Lowen Ellenen]";

-					mes "I hope you will not summon me for fun.";

-					mes "And please be careful...this place is too dangerous for you.";

-					close;

-			}

-		}

-			else

-		{

-			close;

-		}

-		L_No:

-			close;

-}

-	else if(god_brising == 20)

-{

-	mes "[The voice of a female]";

-	mes "...it's dangerous...be careful.";

-	next;

-	menu "Ignore it.",-,"What are you talking about?",L_What;

-		close;

-		L_What:

-			mes "[The voice of a female]";

-			mes ".... no way........are you...?";

-			mes "Can you hear me?";

-			mes "...I can't...believe this..";

-			mes "I can't belive this...but if you don't mind";

-			mes "can I talk to you for a while?";

-			next;

-			menu "Sorry, I am busy!",-,"What are you?!",L_Who;

-				close;

-				L_Who:

-					mes "[The voice of a female]";

-					mes "Ah, no need to be surprised.";

-					mes "Actually I am the one who was surprised.";

-					mes "Ah...ah...I don't have a physical form...";

-					mes "Err...technically I am a ghost.....";

-					mes "Yes, I think I am a ghost.";

-					mes "Since when I have been wandering around here.";

-					next;

-					mes "[Lowen]";

-					mes "I don't know why I haven't gone beyond the realm.";

-					mes "If you don't mind...I hope you can go visit my sister.";

-					mes "And please tell her that I am fine.";

-					mes "....tell her that Lowen, her little sister is fine...";

-					next;

-					mes "[Lowen]";

-					mes "If you want to meet me again,";

-					mes "please call my name out loud.";

-					mes " 'Lowen'...";

-					set god_brising,21;

-					close;

-}

-	else

-{

-	mes "- You found a twisted and dry wood. -";

-	mes "- It looked dismal but sad at the same time. -";

-	close;

-}

-

-OnTouch:

-	if (god_brising > 9 && god_brising < 34)

-{

-	emotion e_gasp;

-	end;

-}

-

-}

-

-que_god02.gat,48,55,3	script	Lowen Ellenen	745,{

-

-	if(god_brising == 30)

-{

-	mes "[Lowen Ellenen]";

-	mes "Can you see me now?";

-	mes "You must be surprised.";

-	mes "This is the story I will share with you.";

-	next;

-	mes "[Lowen Ellenen]";

-	mes "Look around.";

-	mes "Recognize it?";

-	mes "We're still in the same place, except now we're in my past.";

-	next;

-	mes "[Lowen Ellenen]";

-	mes "All of us came here to Geffen to cleanse this area of evil spirits. You asked for the reason I stayed here?";

-	next;

-	mes "[Lowen Ellenen]";

-	mes "I couldn't forgive myself for what I've done to my comrades. They were killed because of me.";

-	next;

-	menu "You were cursed...?",-,"You still have something to do.",L_Still;

-			mes "["+ strcharinfo(0) +"]";

-			mes "You're saying...";

-			mes "The anger of your";

-			mes "comrades manifested";

-			mes "into a curse?";

-			next;

-			mes "[Lowen Ellenen]";

-			mes "Cursed by my fallen comrades... Yes, that's what I thought at first. So I tried to redeem myself as well as avenge their deaths.";

-			next;

-			mes "[Lowen Ellenen]";

-			mes "I have been trying my best to comfort their spirits for 2 years.";

-			next;

-			mes "[" + strcharinfo(0) + "]";

-			mes "Ever since you guys failed on a mission, you've spent two years here killing monsters?";

-			next;

-			mes "[Lowen Ellenen]";

-			mes "Yes, that's right.";

-			mes "I thought it would bring comfort to the spirits of my comrades.";

-			next;

-			mes "[Lowen Ellenen]";

-			mes "But once I died, I met all of my old friends in Nifflheim, the town of the dead. You've heard of it, haven't you?";

-			next;

-			mes "[Lowen Ellenen]";

-			mes "No one seemed to blame me for what had happened. In fact, they all seemed worried about me.";

-			next;

-			menu "Then why?",-;

-					mes "[Lowen Ellenen]";

-					mes "They waited for me in Nifflheim for two years, since they didn't want me to misunderstand them. They never blamed me for what happened.";

-					next;

-					mes "[Lowen Ellenen]";

-					mes "But I still feel like something is wrong. Out of all of us, I'm the only one unable to rest in peace. Everyone else was selected to go to Valhalla.";

-					next;

-					mes "[Lowen Ellenen]";

-					mes "But Valhalla is where all honorable Crusaders are supposed to go. What have I done wrong?";

-					close;

-		L_Still:

-			mes "[Lowen Ellenen]";

-			mes "I don't think I have any unfinished business. But who knows, maybe there is something I have to do.";

-			next;

-			mes "[Lowen Ellenen]";

-			mes "All of my late comrades that I met in Nifflheim were selected by Valkyrie and sent to Valhalla. That's how honorable Crusaders spend the afterlife. But it looks like I don't deserve it...";

-			next;

-			menu "I can help you!",-;

-					mes "[Lowen Ellenen]";

-					mes "You can";

-					mes "help me?";

-					mes "How...?";

-					next;

-					mes "[" + strcharinfo(0) + "]";

-					mes "You said this is the place where the subjugation mission happened, right? I'll fight with you!";

-					next;

-					mes "["+ strcharinfo(0) +"]";

-					mes "Now come on, you deserve to feel guilty like this. Let's think about how we're gonna fight these monsters!";

-					next;

-					mes "[Lowen Ellenen]";

-					mes "...";

-					mes "Thank you.";

-					mes "Thank you so much.";

-					next;

-					mes "[" + strcharinfo(0) + "]";

-					mes "Now,";

-					mes "shall we go in?";

-					set god_brising,31;

-					close;

-}

-	else if(god_brising == 31)

-{

-	mes "[Lowen Ellenen]";

-	mes "Walk down the stairs ahead. From this point on, I can only travel with you in your mind...";

-	close;

-}

-	else

-{

-	mes "[Lowen Ellenen]";

-	mes "How come...";

-	mes "You're here?";

-	close2;

-	warp "geffen.gat",120,101;

-	end;

-}

-

-}

-

-que_god02.gat,54,64,4	script	Soldier#1_brising	105,1,1,{

- 

-	if(god_brising == 31)

-{

-	mes "[Soldier]";

-	mes "Have you volunteered for monster subjugation? Would you like to start the mission now?";

-	next;

-	menu "Yes.",-,"I need more time.",L_Time;

-			mes "[Soldier]";

-			mes "We're you're ready,";

-			mes "come and stand in";

-			mes "front of me.";

-			close;

-		

-		L_Time:

-			mes "[Soldier]";

-			mes "No problem, just come back when your preparations are completed.";

-			close;

-}

-	else

-{

-	mes "[Soldier]";

-	mes "Please back away.";

-	mes "You are not permitted";

-	mes "to enter!";

-	close;

-}

-

-OnTouch:

-	if(god_brising == 31)

-{

-	warp "que_god02.gat",174,49;

-	donpcevent "#brisinsold::OnSold1Off";

-	donpcevent "#brisinsold2::OnSold2On";

-	end;

-}

-	else

-{

-	mes "[Soldier]";

-	mes "Please back away.";

-	mes "You are not permitted";

-	mes "to enter!";

-	close2;

-	warp "que_god02.gat",51,59;

-	end;

-}

-

-}

-

-que_god02.gat,55,64,4	script	Soldier#2_brising	105,1,1,{

-

-	mes "[Soldier]";

-	mes "Please back away.";

-	mes "You are not permitted";

-	mes "to enter!";

-	close;

-}

-

-que_god02.gat,1,1,1	script	#brisinsold1	-1,{

-

-OnSold1On:

-	enablenpc "Soldier#1_brising";

-	end;

-

-OnSold1Off:

-	disablenpc "Soldier#1_brising";

-	end;

-}

-

-que_god02.gat,1,1,1	script	#brisinsold2	-1,{

-

-OnInit:

-	disablenpc "Soldier#2_brising";

-	areawarp "que_god02.gat",100,128,85,3,"geffen.gat",120,100;

-	end;

-

-OnSold2On:

-	enablenpc "Soldier#2_brising";

-	initnpctimer;

-	end;

-

-OnTimer420000:

-	mapannounce "que_god02.gat","Lowen's spirit is beginning to weaken...",0,0x70DBDB;

-	end;

-

-OnTimer480000:

-	mapannounce "que_god02.gat","Your presense in her past can't be maintained for much longer...",0,0x70DBDB;

-	end;

-

-OnTimer540000:

-	mapannounce "que_god02.gat","Lowen's spirit can't keep you in the past any longer.",0,0x70DBDB;

-	end;

-

-OnTimer542000:

-	areawarp "que_god02.gat",1,1,400,400,"geffen.gat",120,100;

-	end;

-

-OnTimer550000:

-	donpcevent "#brisinsummon::OnReset";

-	end;

-

-OnTimer550500:

-	stopnpctimer;

-	end;

-

-}

-	

-que_god02.gat,1,1,1	script	#Warp_brising	-1,{

-

-OnWarp:

-

-	end;

-}

-

-que_god02.gat,1,1,1	script	#brisinsummon	-1,{

-

-OnInit:

-	disablenpc "#doppelganger1";

-	disablenpc "#doppelganger2";

-	disablenpc "#knight1";

-	disablenpc "#knight2";

-	disablenpc "#knight3";

-	disablenpc "#lowen";

-	disablenpc "Valkyrie#1";

-	enablenpc "#hermite";

-	end;

-

-OnDoppel1On:

-	enablenpc "#doppelganger1";

-	end;

-

-OnDoppel1Off:

-	disablenpc "#doppelganger1";

-	end;

-

-OnDoppel2On:

-	enablenpc "#doppelganger2";

-	end;

-

-OnDoppel2Off:

-	disablenpc "#doppelganger2";

-	end;

-

-OnKnight1On:

-	enablenpc "#knight1";

-	end;

-

-OnKnight2On:

-	enablenpc "#knight2";

-	end;

-

-OnKnight3On:

-	enablenpc "#knight3";

-	end;

-

-OnKnight1Off:

-	disablenpc "#knight1";

-	end;

-

-OnKnight2Off:

-	disablenpc "#knight2";

-	end;

-

-OnKnight3Off:

-	disablenpc "#knight3";

-	end;

-

-OnLowenOn:

-	enablenpc "#lowen";

-	end;

-

-OnLowenOff:

-	disablenpc "#lowen";

-	end;

-

-OnHermiteOff:

-	disablenpc "#hermite";

-	end;

-

-OnLowen2Off:

-	disablenpc "Lowen Ellenen#2";

-	end;

-

-OnSummon:

-	attachrid $@BrisinRID$;

-	monster "que_god02.gat",34,128,"",1015,1,"#brisinsummon::OnMobDeath";

-	monster "que_god02.gat",34,127,"",1015,1,"#brisinsummon::OnMobDeath";

-	monster "que_god02.gat",80,127,"",1015,1,"#brisinsummon::OnMobDeath";

-	monster "que_god02.gat",102,128,"",1036,1,"#brisinsummon::OnMobDeath";

-	monster "que_god02.gat",130,128,"",1036,1,"#brisinsummon::OnMobDeath";

-	monster "que_god02.gat",62,128,"",1041,1,"#brisinsummon::OnMobDeath";

-	monster "que_god02.gat",64,127,"",1041,1,"#brisinsummon::OnMobDeath";

-	monster "que_god02.gat",150,127,"",1041,1,"#brisinsummon::OnMobDeath";

-	monster "que_god02.gat",176,127,"",1041,1,"#brisinsummon::OnMobDeath";

-	set brisinmobdead,9;

-	end;

-

-OnMobDeath:

-	set brisinmobdead,brisinmobdead -1;

-	if(brisinmobdead > 0) end;

-	set god_brising,31;

-	enablenpc "Valkyrie#1";

-	detachrid;

-	end;

-

-OnReset:

-	disablenpc "#doppelganger1";

-	disablenpc "#doppelganger2";

-	disablenpc "#knight1";

-	disablenpc "#knight2";

-	disablenpc "#knight3";

-	disablenpc "#lowen";

-	enablenpc "Soldier#1_brising";

-	disablenpc "Soldier#2_brising";

-	enablenpc "#hermite";

-	enablenpc "Lowen Ellenen#2";

-	disablenpc "Valkyrie#1";

-	killmonster "que_god02.gat","#brisinsummon::OnMobDeath";

-}

-

-que_god02.gat,173,58,4	script	#doppelganger1	739,{

-

-OnEmoGasp:

-	emotion e_gasp;

-	end;

-}

-

-que_god02.gat,175,55,4	script	#doppelganger2	739,{

-

-OnCast:

-	specialeffect 59;

-	end;

-}

-

-que_god02.gat,175,54,1	script	#lowen	745,{

-

-OnEmoGasp:

-	emotion e_gasp;

-	end;

-

-OnCast:

-	specialeffect 59;

-	end;

-}

-

-que_god02.gat,178,49,1	script	#knight1	751,{

-

-OnEmoGasp:

-	emotion e_gasp;

-	end;

-

-OnEmoGo:

-	emotion e_go;

-	end;

-}

-

-que_god02.gat,168,53,7	script	#knight2	734,{

-

-OnEmoGasp:

-	emotion e_gasp;

-	end;

-

-OnEmoGo:

-	emotion e_go;

-	end;

-}

-

-que_god02.gat,167,58,4	script	#knight3	752,{

-

-OnEmoGasp:

-	emotion e_gasp;

-	end;

-

-OnEmoGo:

-	emotion e_go;

-	end;

-}

-

-que_god02.gat,174,49,0	script	#lowenone	139,0,0,{

-

-OnTouch:

-	donpcevent "brisinsold2::OnSold2On";

-	mes "[" + strcharinfo(0) + "]";

-	mes "Where am I?";

-	mes "Isn't this...?!";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Ah, I see.";

-	mes "This must be the place where everything happened two years ago. Good, good...";

-	next;

-	mes "[Lowen Ellenen]";

-	mes "Shshh...";

-	mes "This is just a reflection of the past. Here, you'll see what happened at the time for yourself.";

-	next;

-	mes "[Lowen Ellenen]";

-	mes "It wasn't any";

-	mes "trouble getting down here. But... We've got problems now.";

-	next;

-	mapannounce "que_god02.gat","D...Doppelganger!!!",0,0x9CFF00;

-	mes "[" + strcharinfo(0) + "]";

-	mes "What...?!";

-	mes "Doppelganger?!";

-	next;

-	donpcevent "#brisinsummon::OnDoppel1On";

-	donpcevent "#brisinsummon::OnKnight1On";

-	donpcevent "#brisinsummon::OnKnight2On";

-	donpcevent "#brisinsummon::OnKnight3On";

-	donpcevent "#brisinsummon::OnLowenOn";

-	mes "[" + strcharinfo(0) + "]";

-	mes "What's going on?";

-	mes "Did you really fight with that creature? H-hey! Answer me!";

-	next;

-	mes "[Lowen Ellenen]";

-	mes "Yes, this was the place...";

-	mes "The commendant gave us the order...";

-	mes "And then..? And then what happened to me..?";

-	next;

-	mapannounce "que_god02.gat","Everyone, stay calm! Get into your positions!",0,0x9CFF00;

-	mes "^4E2F2F[Crusader Commander]";

-	mes "Everyone, get into your positions! Front line, block its movement! Rear line, support the defense!^000000";

-	donpcevent "#knight1::OnEmoGo";

-	donpcevent "#knight2::OnEmoGo";

-	donpcevent "#knight3::OnEmoGo";

-	donpcevent "#doppelganger1::OnEmoGasp";

-	next;

-	mes "[Lowen Ellenen]";

-	mes "N-no!";

-	mes "I'm not running away!";

-	next;

-	mes "^3355FFYou're filled with a great anxiety, and you experience for yourself the fear and pressure Lowen felt during those very moments.^000000";

-	next;

-	mes "^4E2F2F[Crusader Commander]";

-	mes "Go, Lowen!";

-	mes "Cast Grand Cross, now!^000000";

-	next;

-	donpcevent "#lowen::OnCast";

-	mapannounce "que_god02.gat","Mwahaha! Mortals are such fools...",0,0xA8A8A8;

-	donpcevent "#brisinsummon::OnDoppel1Off";

-	donpcevent "#brisinsummon::OnDoppel2On";

-	donpcevent "#knight1::OnEmoGasp";

-	donpcevent "#knight2::OnEmoGasp";

-	donpcevent "#knight3::OnEmoGasp";

-	donpcevent "#lowen::OnEmoGasp";

-	mes "[" + strcharinfo(0) + "]";

-	mes " ??!!!";

-	next;

-	donpcevent "#doppelganger2::OnCast";

-	mes "[Male Voice]";

-	mes "Lowen!";

-	mes "Noooooooooo!!!";

-	close2;

-	warp "que_god02.gat",120,52;

-	donpcevent "#brisinsummon::OnDoppel2Off";

-	donpcevent "#brisinsummon::OnKnight1Off";

-	donpcevent "#brisinsummon::OnKnight2Off";

-	donpcevent "#brisinsummon::OnKnight3Off";

-	donpcevent "#brisinsummon::OnLowenOff";

-	end;

-}

-

-que_god02.gat,124,59,7	script	#hermite	798,{ end; }

- 

-que_god02.gat,120,52,0	script	#monologue	139,0,0,{

-

-OnTouch:

-	mes "[" + strcharinfo(0) + "]";

-	mes "Where am I?";

-	mes "Isn't that...";

-	mes "What's Hermite";

-	mes "doing here?!";

-	next;

-	mes "[Hermite Charles]";

-	mes "No, no, no!";

-	mes "Lowen don't it!";

-	mes "He's gonna kill you!";

-	next;

-	mes "[Hermite Charles]";

-	mes "Grand Cross...";

-	mes "Using that's committing suicide! Lowen, don't do it!";

-	mes "Don't do that, Lowen!";

-	next;

-	mapannounce "que_god02.gat","Mwahaha! Mortals are such fools...",0,0xA8A8A8;

-	mes "[Hermite Charles]";

-	mes "Lowen!";

-	mes "Noooooooooo!!!";

-	next;

-	donpcevent "#brisinsummon::OnHermiteOff";

-	mes "[" + strcharinfo(0) + "]";

-	mes "Where did he go?";

-	mes "Was... Was that";

-	mes "from his mind?";

-	mapannounce "que_god02.gat","What happened?! L-Lowen's gone!!",0,0xA8A8A8;

-	next;

-	mes "[Lowen Ellenen]";

-	mes "...";

-	mes "I see now.";

-	mes "I know...";

-	mes "What happened...";

-	close2;

-	warp "que_god02.gat",18,127;

-	end;

-

-}

-

-que_god02.gat,21,127,3	script	Lowen Ellenen#2	745,{

-

-	mes "[Lowen Ellenen]";

-	mes "I was a fool.";

-	mes "Now I remember Hermite. He must have been the one who rescued me. But when I came to my senses, no one was there.";

-	next;

-	mes "[Lowen Ellenen]";

-	mes "I blamed myself for surviving alone. I should have died there with my friends. I felt so useless.";

-	next;

-	mes "[Lowen Ellenen]";

-	mes "Now I realize that there were many people who loved me. But at the time, I felt only guilt.";

-	next;

-	mes "[Lowen Ellenen]";

-	mes "I returned 3 days later to my commander. It was stupid, but at the moment I couldn't think of anything else.";

-	next;

-	mes "[Lowen Ellenen]";

-	mes "The higher ups and the politicians were looking for a scapegoat for the failure of the mission.";

-	next;

-	mes "[Lowen Ellenen]";

-	mes "So I was the one who was blamed. Then, they took away everything I had. My status, the holy power granted to me...";

-	next;

-	mes "[Lowen Ellenen]";

-	mes "I thought I deserved that punishment. After all, why should I have survived when all my comrades died?";

-	next;

-	mes "[Lowen Ellenen]";

-	mes "It was then that I decided to avenge my friends, and salvage what was left of my sense of honor.";

-	next;

-	mes "[Lowen Ellenen]";

-	mes "I went back to that place. I fought and I fought, trying to make penance for what I had done wrong...";

-	next;

-	mapannounce "que_god02.gat","If you wish, continue your battle. I promise you the winner will become an Einherjar...",0,0x70DB93;

-	mes "[Lowen Ellenen]";

-	mes "That voice...";

-	mes "Isn't this...?";

-	next;

-	mes "[Lowen Ellenen]";

-	mes "Are you giving me another chance? But I no longer have a body to fight monsters any longer...";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Don't worry,";

-	mes "I'm with you!";

-	mes "Let's do it!";

-	close2;

-	set $@BrisinRID$,getcharid(3);

-	donpcevent "#brisinsummon::OnSummon";

-	donpcevent "#brisinsummon::OnLowen2Off";

-	end;

-

-}

-

-que_god02.gat,178,127,3	script	Valkyrie#1	811,{

-

-	if(god_brising == 31)

-{

-	mes "[Valkyrie]";

-	mes "You have passed the test, Lowen. I don't have much talk to speak.";

-	next;

-	mes "[Valkyrie]";

-	mes "Have you found the strength to release yourself from the guilt and the pain? I have been waiting for you. Will you accept my invitation to Valhalla?";

-	next;

-	menu "Yes, I will follow you.",-,"Um... I'm not Lowen.",L_No;

-			mes "[Valkyrie]";

-			mes "Lowen Ellenen, misunderstood hero. I will now promote you to Einherjar with the will of God.";

-			next;

-			mes "[Valkyrie]";

-			mes "Your soul and spirit will be reborn in Valhalla as a holy warrior preparing for the holy war.";

-			specialeffect2 42;

-			next;

-			mes "[Valkyrie]";

-			mes "And...";

-			mes ""+ strcharinfo(0) +",";

-			mes "Your exploits are known to me. But I am curious as to what has brought you here?";

-			next;

-			mes "^3355FFYou explained what happened to the Valkyrie, starting from the Snow Crystal which never melts.^000000";

-			next;

-			mes "[Valkyrie]";

-			mes "I understand.";

-			mes "The story begins a long, long time ago with Freya, the patron goddess of beauty and love.";

-			next;

-			mes "[Valkyrie]";

-			mes "Her teardrop became a beautiful jewel. The snow on which Freya's teardrops have fallen will always retain its crystalline beauty.";

-			next;

-			mes "[Valkyrie]";

-			mes "You seek traces of the goddess? Perhaps this is a sign of the end of the thousand year peace. When the time comes, I hope humans will not abandon their faith.";

-			next;

-			mes "[Valkyrie]";

-			mes "Perhaps, I was also sent to meet you. I wish that humans will use the power derived from the traces of the gods to protect justice.";

-			next;

-			mes "[Valkyrie]";

-			mes ""+ strcharinfo(0) +"...";

-			mes "Listen. This is";

-			mes "what you must find.";

-			next;

-			mes "[Valkyrie]";

-			mes "A cold snowy path that the goddess walked across";

-			mes "A blue river that the goddess walked across";

-			mes "A narrow path that the goddess passed";

-			mes "Four dwarves that the goddess met...";

-			next;

-			mes "[Valkyrie]";

-			mes "^4d4dff We lost our hearts";

-			mes "to that golden hair";

-			mes "and those dazzling eyes.^000000";

-			next;

-			mes "[Valkyrie]";

-			mes "Remember this.";

-			mes "I shall send you";

-			mes "back to where you";

-			mes "belong.";

-			set god_brising,34;

-			next;

-			mes "[Valkyrie]";

-			mes "For Odin's honor...";

-			close2;

-			disablenpc "#doppelganger1";

-			disablenpc "#doppelganger2";

-			disablenpc "#knight1";

-			disablenpc "#knight2";

-			disablenpc "#knight3";

-			disablenpc "#lowen";

-			enablenpc "Soldier#1_brising";

-			disablenpc "Soldier#2_brising";

-			enablenpc "#hermite";

-			enablenpc "Lowen Ellenen#2";

-			disablenpc "Valkyrie#1";

-			warp "geffen.gat",120,101;

-			end;

-		L_No:

-			mes "[Valkyrie]";

-			mes "Hahahaha...";

-			mes "It has been";

-			mes "a while since";

-			mes "a mortal has";

-			mes "made me laugh.";

-			next;

-			mes "[Valkyrie]";

-			mes ""+ strcharinfo(0) +",";

-			mes "I am speaking to the spirit of the girl that rests within you, the girl to whom you lent your body so that she may learn the truth of the past.";

-			next;

-			mes "[Valkyrie]";

-			mes "Lowen Ellenen, misunderstood hero. I will now promote you to Einherjar with the will of God.";

-			next;

-			mes "[Valkyrie]";

-			mes "Your soul and spirit will be reborn in Valhalla as a holy warrior preparing for the holy war.";

-			specialeffect2 42;

-			next;

-			mes "[Valkyrie]";

-			mes "And...";

-			mes ""+ strcharinfo(0) +",";

-			mes "Your exploits are known to me. But I am curious as to what has brought you here?";

-			next;

-			mes "^3355FFYou explained what happened to the Valkyrie, starting from the Snow Crystal which never melts.^000000";

-			next;

-			mes "[Valkyrie]";

-			mes "I understand.";

-			mes "The story begins a long, long time ago with Freya, the patron goddess of beauty and love.";

-			next;

-			mes "[Valkyrie]";

-			mes "Her teardrop became a beautiful jewel. The snow on which Freya's teardrops have fallen will always retain its crystalline beauty.";

-			next;

-			mes "[Valkyrie]";

-			mes "You seek traces of the goddess? Perhaps this is a sign of the end of the thousand year peace. When the time comes, I hope humans will not abandon their faith.";

-			next;

-			mes "[Valkyrie]";

-			mes "Perhaps, I was also sent to meet you. I wish that humans will use the power derived from the traces of the gods to protect justice.";

-			next;

-			mes "[Valkyrie]";

-			mes ""+ strcharinfo(0) +"...";

-			mes "Listen. This is";

-			mes "what you must find.";

-			next;

-			mes "[Valkyrie]";

-			mes "A cold snowy path that the goddess walked across";

-			mes "A blue river that the goddess walked across";

-			mes "A narrow path that the goddess passed";

-			mes "Four dwarves that the goddess met...";

-			next;

-			mes "[Valkyrie]";

-			mes "^4d4dffThe beauty of the stars";

-			mes "Wanes in comparison.";

-			mes "We lost our hearts";

-			mes "To that golden hair";

-			mes "And those dazzling eyes.^000000";

-			next;

-			mes "[Valkyrie]";

-			mes "Remember this.";

-			mes "I shall send you";

-			mes "back to where you";

-			mes "belong.";

-			set god_brising,34;

-			next;

-			mes "[Valkyrie]";

-			mes "For Odin's honor...";

-			close2;

-			disablenpc "#doppelganger1";

-			disablenpc "#doppelganger2";

-			disablenpc "#knight1";

-			disablenpc "#knight2";

-			disablenpc "#knight3";

-			disablenpc "#lowen";

-			enablenpc "Soldier#1_brising";

-			disablenpc "Soldier#2_brising";

-			enablenpc "#hermite";

-			enablenpc "Lowen Ellenen#2";

-			disablenpc "Valkyrie#1";

-			warp "geffen.gat",120,101;

-			end;

-}

-

-}

-

-xmas.gat,38,105,0	script	#brisindwarf1	111,3,3,{

-

-	if($God2 < 50)

-{

-	mes "^3355FFA lot of snow";

-	mes "is heavily piled";

-	mes "here on the ground.^000000";

-	close;

-}

-	if($God3 > 99)

-{

-	mes "^3355FFA lot of snow";

-	mes "is heavily piled";

-	mes "here on the ground.^000000";

-	close;

-}

-	if (god_brising > 39 && god_brising < 50)

-{

-	mes "^3355FFA lot of snow";

-	mes "is heavily piled";

-	mes "here on the ground.^000000";

-	next;

-	mes "^3355FFHowever, this particular mound strikes you as curious for some reason.^000000";

-	next;

-	menu "Sweep the snow away with your hand.",-,"Poke the snow with your finger.",L_Poke,"Cancel.",L_No;

-			mes "^3355FFAs you sweep the snow with the palm of your hand, some of the snow melts, revealing a strange puzzle cube. It's multi-faceted, but you can read that each facet is inscribed with a lyric.";

-			set @point,0;

-			next;

-			menu "Adjust the puzzle.",-,"Quit.",L_Quit;

-					mes "[" + strcharinfo(0) + "]";

-					mes "Okay, um...";

-					mes "I guess I should";

-					mes "choose a lyric...";

-					next;

-					Menu1:

-					menu "Wanes in comparison",case11,"To that beautiful hair",case12,"All of our hearts",case13,"The beauty of the stars",case14,"to those dazzling eyes",case15;

-						case11:

-							mes "[" + strcharinfo(0) + "]";

-							mes "we gave...";

-							goto Menu2;

-						

-						case12:

-							mes "[" + strcharinfo(0) + "]";

-							mes "to that beautiful hair";

-							goto Menu2;

-						case13:

-							mes "[" + strcharinfo(0) + "]";

-							mes "all of our hearts in";

-							goto Menu2;

-						case14:

-							mes "[" + strcharinfo(0) + "]";

-							mes "The beauty of the stars";

-							set @point,@point +1;

-							goto Menu2;

-						case15:

-							mes "[" + strcharinfo(0) + "]";

-							mes "to those dazzling eyes";

-							goto Menu2;

-					Menu2:		

-					menu "we gave",case21,"Wanes in comparison.",case22,"all of our hearts in",case23,"to the steps in",case24,"to those dazzling eyes",case25;

-						case21:

-							mes "we gave..";

-							goto Menu3;

-						case22:

-							mes "Wanes in comparison.";

-							set @point,@point +1;

-							goto Menu3;

-						case23:

-							mes "all of our hearts in";

-							goto Menu3;

-						case24:

-							mes "to the steps in";

-							goto Menu3;

-						case25:

-							mes "to those dazzling eyes";

-							goto Menu3;

-					Menu3:

-					menu "we gave",case31,"to that beautiful hair",case32,"all of our hearts in",case33,"to the steps in",case34,"We lost our hearts",case35;

-						case31:

-							mes "we gave..";

-							goto Menu4;

-						case32:

-							mes "to that beautiful hair";

-							goto Menu4;

-						case33 :

-							mes "all of our hearts in";

-							goto Menu4;

-						case34:

-							mes "to the steps in";

-							goto Menu4;

-						case35:

-							mes "We lost our hearts";

-							set @point,@point +1;

-							goto Menu4;

-					Menu4:

-					menu "To that golden hair",case41,"to that beautiful hair",case42,"all of our hearts in",case43,"to the steps in",case44,"to those dazzling eyes",case45;

-						case41:

-							mes "To that golden hair";

-							set @point,@point +1;

-							goto Menu5;

-						case42:

-							mes "to that beautiful hair";

-							goto Menu5;

-						case43:

-							mes "all of our hearts in";

-							goto Menu5;

-						case44:

-							mes "to the steps in";

-							goto Menu5;

-						case45:

-							mes "to those dazzling eyes";

-							goto Menu5;

-					Menu5:

-					menu "we gave",case51,"to that beautiful hair",case52,"And those dazzling eyes.",case53,"to the steps in",case54,"to those dazzling eyes",case55;

-						case51:

-							mes "we gave..";

-							goto Check;

-						case52:

-							mes "to that beautiful hair";

-							goto Check;

-						case53:

-							mes "And those dazzling eyes.";

-							set @point,@point +1;

-							goto Check;

-						case54:

-							mes "to the steps in";

-							goto Check;

-						case55:

-							mes "to those dazzling eyes";

-							goto Check;

-					Check:

-					next;

-						if(@point > 4)

-					{

-						donpcevent "#brisindwarf1::OnAlfrikOn";

-						mes "[Old dwarf]";

-						mes "Who are you?!";

-						mes "And why the hell";

-						mes "did you wake me up?";

-						close;

-					}

-				

-				L_Quit:

-					mes "[" + strcharinfo(0) + "]";

-					mes "Huh...?";

-					mes "Nothing happened.";

-					mes "Did I do something wrong, or is this just a completely ordinary puzzle cube?";

-					close;         

-               	L_No:

-                                        mes "["+ strcharinfo(0) +"]";

-					mes "This...";

-					mes "This better not";

-					mes "be just some regular";

-					mes "puzzle cube that someone";

-					mes "just dropped in the snow!";

-					close;

-			

-		L_Poke:

-			mes "^3355FFYou use your finger to poke the pile of snow. However, you hurt your finger a little bit after hitting something really solid.^000000";

-			emotion e_ag,1;

-			set Hp,Hp -20;

-			close;

-}

-	else

-{

-	mes "- There was a pile of snow under a tree. -";

-	close;

-}

-

-OnTouch:

-	if(god_brising > 39) emotion e_gasp,1;

-	end;

-

-OnInit:

-	disablenpc "Alfrik#1";

-	end;

-

-OnAlfrikOn:

-	enablenpc "Alfrik#1";

-	end;

-

-OnAlfrikOff:

-	disablenpc "Alfrik#1";

-	end;

-

-}

-

-xmas.gat,36,103,4	script	Alfrik#1	826,{

-

-	if (god_brising == 49)

-{

-	mes "[Alfrik]";

-	mes "I've got nothing more to say! Now get out of here! I don't want to be found!";

-	close2;

-	donpcevent "#brisindwarf1::OnAlfrikOff";

-	end;

-}

-	else if(god_brising == 48)

-{

-	mes "[Alfrik]";

-	mes "What's up, human?";

-	mes "All of us have awakened.";

-	next;

-	menu "I just wanted to say hello.",-,"What are materials for Brisingamen?",L_Material;

-			mes "[Alfrik]";

-			mes "Your gesture is appreciated, but I'd rather hide than socialize. I don't want to be found by the crows of Odin!";

-			close2;

-			donpcevent "#brisindwarf1::OnAlfrikOff";

-			end;

-		L_Material:

-			mes "[Alfrik]";

-			mes "Materials for Brisingamen? For the human imitation, the materials are pretty easy to gather...";

-			next;

-			mes "[Alfrik]";

-			mes "The power of weapons used by gods, when they battled demons a thousand years ago, and everything detached from Brisingamen. That's basically what you need.";

-			next;

-			mes "[Alfrik]";

-			mes "If you want to create a Brisingamen you will need.....";

-			mes "^4d4dffFreya's Jewel";

-			mes "Silver Ornament";

-			mes "Snow Crystal";

-			mes "Ripple";

-			mes "Drifting Air^000000";

-			next;

-			mes "[Alfrik]";

-			mes "You might need some gems, like Saphire, Peal, Opal, Curse Ruby, and maybe even some Gold to decorate the necklace.";

-			next;

-			mes "[Alfrik]";

-			mes "Although I give freely of my advice, we four dwarves will no longer do smithing work unless it be Freya's command.";

-			next;

-			mes "[Alfrik]";

-			mes "But I can promise you one thing. Since the four of us have awakened, humans will obtain the Brisingamen for sure.";

-			next;

-			mes "[Alfrik]";

-			mes "Now...";

-			mes "Leave me";

-			mes "in peace.";

-			set god_brising,49;

-			close2;

-			donpcevent "#brisindwarf1::OnAlfrikOff";

-			end;

-}

-	else if(god_brising == 40)

-{

-	mes "[Alfrik]";

-	mes "^333333*Yawn...*^000000";

-	mes "It's been a long time since I've seen the sun! W-wait! You're not...";

-	next;

-	mes "[Alfrik]";

-	mes "Who sent you?!";

-	mes "Loki? Heimdall?";

-	mes "Or was it Freya?";

-	next;

-	menu "No one, it was an accident!",-,"It was Valkyrie.",L_Valkyrie;

-			mes "[Alfrik]";

-			mes "Don't even think of lying to me, human! There's no way you could have awoken me without knowing the password! Now, speak!";

-			next;

-			menu "Valkyrie told me.",-,"It was a coincidence!",L_Coincidence;

-					mes "[Alfrik]";

-					mes "Valkyrie...?";

-					mes "Odin's warmonger? What could Odin want, I haven't done anything wrong!";

-					next;

-					mes "^3355FFYou explained everything to Alfrik, who seems to worry about being targeted by Odin.^000000";

-					next;

-					mes "[Alfrik]";

-					mes "So that's it.";

-					mes "Seeking out our masterpiece? You humans must desire the power of the gods. Interesting.";

-					next;

-					mes "[Alfrik]";

-					mes "The time for us to revive may actually have come! Alright then, I Alfrik shall cooperate with you humans.";

-					next;

-					mes "[Alfrik]";

-					mes "After all, getting on Odin's good side like this is much better than being tortured by Loki.";

-					next;

-					mes "[Alfrik]";

-					mes "Now, about the masterpiece we made for Freya. There can only be one in the world.";

-					next;

-					mes "[Alfrik]";

-					mes "However, that doesn't mean an imitation, with the same power as that godly item, can't be made. Isn't it tempting, the power of a god?";

-					next;

-					mes "[Alfrik]";

-					mes "First things first. If you want to make the necklace, you must awaken all four of us. Because of Loki's threat, we all hid ourselves in different places.";

-					next;

-					mes "[Alfrik]";

-					mes "Go wake my brothers! Let's see if the Brisingamen can be made once again!";

-					next;

-					mes "[Alfrik]";

-					mes "Now go and wake Dvalin, before the gods and giants can find out!";

-					set god_brising,41;

-					close2;

-					donpcevent "#brisindwarf1::OnAlfrikOff";

-					end;

-				L_Coincidence:

-					mes "[Alfrik]";

-					mes "Coincidence?";

-					mes "Impossible! How dare you lie! Don't ever come back, or the gods will find me!";

-					close2;

-					donpcevent "#brisindwarf1::OnAlfrikOff";

-					end;

-		L_Valkyrie:

-			mes "[Alfrik]";

-			mes "...did you just speak of Valkyrie!";

-			mes "That Odin's maiden...that war monger..";

-			mes "...I see, Odin must want me.";

-			mes "...but...but I haven't done anything wrong.";

-			mes "I haven't!";

-			next;

-			mes "- You explained everything -";

-			mes "- to Alfrik who seemed to fear Odin. -";

-			next;

-			mes "[Alfrik]";

-			mes "Errr...? Was that it?";

-			mes "Do humans desire the power of God?";

-			mes "..heheheh....";

-			mes "It's interesting.";

-			mes "Besides, you're looking for a thing";

-			mes "that was made by me and my brothers long time ago.";

-			next;

-			mes "[Alfrik]";

-			mes "....giggle...giggle...giggle...";

-			mes "It may be the time for revive!";

-			mes "...giggle giggle...okay. Good.";

-			mes "I, Alfrik shall cooperate with you humans.";

-			mes "After all, it will be way better than being tortured by Loki or Heimdall.";

-			next;

-			mes "[Alfrik]";

-			mes "Giggle...giggle...giggle...oh by the way...";

-			mes "I don't think that Freya will like my idea...?";

-			mes "Giggle...giggle....";

-			mes "Hey, human.";

-			mes "Aren't you curious about the Freya's Necklace?";

-			next;

-			mes "[Alfrik]";

-			mes "Of course only one Brisingamen exists in the world.";

-			mes "However, you can create a similar thing";

-			mes "...which has the same power as the godly item.";

-			mes "The power of god...isn't it tempting?";

-			next;

-			mes "[Alfrik]";

-			mes "If you want to make the necklace,";

-			mes "you must wake up all of us.";

-			mes "....I hate Loki and Odin...";

-			mes "My brothers were put into sleep";

-			mes "in seperate places.";

-			next;

-			mes "[Alfrik]";

-			mes "Freaking Heimdall...";

-			mes "We could not win over the smart and fast guy.";

-			mes "Go wake my brothers!";

-			mes "Let's see if we can bring up the Brisingamen";

-			mes "once again!";

-			next;

-			mes "[Alfrik]";

-			mes "Now, before gods and giants get to know about it,";

-			mes "go wake Dvalin!";

-			set god_brising,41;

-			close2;

-			donpcevent "#brisindwarf1::OnAlfrikOff";

-			end;

-}

-	else if(god_brising == 41)

-{

-	mes "[Alfrik]";

-	mes "Why are you still here?";

-	mes "I told you go wake Dvalin!";

-	next;

-	menu "Where is he?",-,"Tell me more about Brisingamen.",L_More;

-			mes "[Alfrik]";

-			mes "Ah. Right.";

-			mes "I forgot to tell you. Poor Dvalin. Now, where was it?";

-			next;

-			mes "[Alfrik]";

-			mes "We were afraid that Odin and Heimdall would punish us because, well, in their eyes we disgraced the goddess.";

-			next;

-			mes "[Alfrik]";

-			mes "Oh course, they never would have been angered if it weren't for Loki's trickery.";

-			next;

-			mes "[Alfrik]";

-			mes "We loved Freya so much that we decided to hide ourselves beneath the path that she walked. To be as close to any trace of her as we could.";

-			next;

-			mes "[Alfrik]";

-			mes "Poor Dvalin is sleeping under the path in the East. Once there, you'll feel the scent the goddess.";

-			next;

-			mes "[Alfrik]";

-			mes "I can't remember where the others are sleeping, but you cannot forget these words...";

-			next;

-			mes "[Alfrik]";

-			mes "^4d4dffHer lovely scent";

-			mes "Still lingers in the wind.";

-			mes "We surrendered our hearts";

-			mes "To those tender teardrops";

-			mes "Those seductive red lips.^000000";

-			set god_brising,42;

-			close2;

-			donpcevent "#brisindwarf1::OnAlfrikOff";

-			end;

-		L_More:

-			mes "[Alfrik]";

-			mes "Brisingamen is our masterpiece, a necklace we forged for Freya. Even if we tried making it again, I doubt it would be as good.";

-			next;

-			mes "[Alfrik]";

-			mes "It looked perfect on Freya. Very difficult to create jewelry that actually enhances the attractiveness of the goddess of beauty.";

-			next;

-			mes "[Alfrik]";

-			mes "Perhaps our greatest reward was that beautiful smile of satisfaction she gave us when that we gave her that necklace. We loved her so.";

-			next;

-			mes "[Alfrik]";

-			mes "Is it that wrong for dwarves to love a goddess? Perhaps we were punished because the gods, even Odin, loved her as well.";

-			next;

-			mes "[Alfrik]";

-			mes "In any case, we've never seen the true Brisingamen again. But something very similar to it can be created...";

-			next;

-			mes "[Alfrik]";

-			mes "You'll need materials that have been graced by the goddess' presense. Traces of the goddess in the earth, water and the wind.";

-			next;

-			mes "[Alfrik]";

-			mes "And if the Brisingamen is recreated, the power of a god will be in the hands of a human. That human could be you!";

-			next;

-			mes "[Alfrik]";

-			mes "Poor Dvalin is sleeping under the path in the East. Once there, you'll feel the scent the goddess.";

-			next;

-			mes "[Alfrik]";

-			mes "I can't remember where the others are sleeping, but you cannot forget these words...";

-			next;

-			mes "[Alfrik]";

-			mes "^4d4dffHer lovely scent";

-			mes "Still lingers in the wind.";

-			mes "We surrendered our hearts";

-			mes "To those tender teardrops";

-			mes "Those seductive red lips.^000000";

-			set god_brising,42;

-			close2;

-			donpcevent "#brisindwarf1::OnAlfrikOff";

-			end;

-}

-	else if(god_brising == 42)

-{

-	mes "[Alfrik]";

-	mes "Will you please!";

-	mes "Get lost before Loki and Heimdall find out I've awakened! Now hurry, find Dvalin, and wake him up!";

-	close2;

-	donpcevent "#brisindwarf1::OnAlfrikOff";

-	end;

-}

-	else if(god_brising > 42 && god_brising < 48)

-{

-	mes "[Alfrik]";

-	mes "Oh, finally all of us have awakened! Now, the power of the goddess can be retrieved from the earth, water and the wind!";

-	next;

-	mes "[Alfrik]";

-	mes "Hahahahaha!";

-	mes "This should be";

-	mes "interesting!";

-	close2;

-	donpcevent "#brisindwarf1::OnAlfrikOff";

-	end;

-}

-	else

-{

-	mes "[Alfrik]";

-	mes "Mmm...?";

-	mes "I've got no business with you.";

-	close2;

-	donpcevent "#brisindwarf1::OnAlfrikOff";

-	end;

-}

-

-}

-

-prt_fild02.gat,185,269,0	script	#brisindwarf2	111,3,3,{

-

-	if($God2 < 50)

-{

-	mes "^3355FFIt's just an";

-	mes "ordinary rock.^000000";

-	close;

-}

-

-	if($God3 > 99)

-{

-	mes "^3355FFIt's just an";

-	mes "ordinary rock.^000000";

-	close;

-}

-

-	if(god_brising > 41)

-{

-	mes "^3355FFIt's just an ordinary rock underneath the shadow of a tree. But on closer inspection, you notice that the moss on top of the rock looks perfectly flat.^000000";

-	next;

-	menu "Step on it.",-,"Sweep the surface.",L_Sweep,"Scratch the surface.",L_Scratch,"Kick it.",L_Kick;

-			mes "^3355FFYou gingerly place your foot on the top of the stone. The entire rock suddenly swings downward into the ground, and you fall downward...^000000";

-			close2;

-			warp "prt_fild02.gat",165,224;

-			end;

-		L_Sweep:

-			mes "^3355FFAs you sweep away the moss with your hand, you scratch your palm from the sharp edges of the rock.^000000";

-			emotion e_gasp,1;

-			next;

-			mes "[" + strcharinfo(0) + "]";

-			mes "Damn...!";

-			mes "I'm bleeding!";

-			mes "But why didn't anything else happen?!";

-			next;

-			mes "["+ strcharinfo(0) +"]";

-			mes "This rock had";

-			mes "better be one of";

-			mes "those secret rocks!";

-			mes "Or else...!";

-			close;

-		L_Scratch:

-			mes "^3355FFYou scratch away at the moss, and feel that the surface of the rock has even recesses.";

-			next;

-			mes "^3355FFAfter peeling off the moss, a series of tiles, etched with faint words, are revealed on top of the rock.^000000";

-			next;

-			mes "^3355FFThese tiles could be moved around, like in a puzzle.^000000";

-			next;

-			mes "[" + strcharinfo(0) + "]";

-			mes "Another puzzle?";

-			mes "This was just like when I had to give Alfrik's password. Okay, let me see...";

-			set @point,0;

-			next;

-			Menu1:

-			menu "to the tear drops dripping on the way",case11,"Her lovely scent",case12,"we gave",case13,"to the seducing red lips",case14,"our hearts in",case15;

-				case11:

-					mes "[" + strcharinfo(0) + "]";

-					mes "to the tear drops dripping on the way";

-					goto Menu2;

-				case12:

-					mes "[" + strcharinfo(0) + "]";

-					mes "Her lovely scent";

-					set @point,@point +1;

-					goto Menu2;

-				case13:

-					mes "[" + strcharinfo(0) + "]";

-					mes "we gave";

-					goto Menu2;

-				case14:

-					mes "[" + strcharinfo(0) + "]";

-					mes "to the seducing red lips";

-					goto Menu2;

-				case15:

-					mes "[" + strcharinfo(0) + "]";

-					mes "our hearts in";

-					goto Menu2;

-			Menu2:

-			menu "Still lingers in the wind.",case21,"to the scent drifted in the wind",case22,"we gave",case23,"to the seducing red lips",case24,"our hearts in",case25;

-				case21:

-					mes "Still lingers in the wind.";

-					set @point,@point +1;

-					goto Menu3;

-				case22:

-					mes "to the scent drifted in the wind";

-					goto Menu3;

-				case23:

-					mes "we gave";

-					goto Menu3;

-				case24:

-					mes "to the seducing red lips";

-					goto Menu3;

-				case25:

-					mes "our hearts in";

-					goto Menu3;

-			Menu3:

-			menu "to the tear drops dripping on the way",case31,"to the scent drifted in the wind",case32,"we gave",case33,"We surrendered our hearts",case34,"our hearts in",case35;

-				case31:

-					mes "to the tear drops dripping on the way";

-					goto Menu4;

-				case32:

-					mes "to the scent drifted in the wind";

-					goto Menu4;

-				case33:

-					mes "we gave";

-					goto Menu4;

-				case34:

-					mes "We surrendered our hearts";

-					set @point,@point +1;

-					goto Menu4;

-				case35:

-					mes "our hearts in";

-					goto Menu4;

-			Menu4:

-			menu "to the tear drops dripping on the way",case41,"to the scent drifted in the wind",case42,"To those tender teardrops",case43,"to the seducing red lips",case44,"our hearts in",case45;

-				case41:

-					mes "to the tear drops dripping on the way";

-					goto Menu5;

-				case42:

-					mes "to the scent drifted in the wind";

-					goto Menu5;

-				case43:

-					mes "To those tender teardrops";

-					set @point,@point +1;

-					goto Menu5;

-				case44:

-					mes "to the seducing red lips";

-					goto Menu5;

-				case45:

-					mes "our hearts in";

-					goto Menu5;

-			Menu5:

-			menu "to the tear drops dripping on the way",case51,"to the scent drifted in the wind",case52,"we gave",case53,"to the seducing red lips",case54,"Those seductive red lips",case55;

-				case51:

-					mes "to the tear drops dripping on the way";

-					goto Check;

-				case52:

-					mes "to the scent drifted in the wind";

-					goto Check;

-				case53:

-					mes "we gave";

-					goto Check;

-				case54:

-					mes "to the seducing red lips";

-					goto Check;

-				case55:

-					mes "Those seductive red lips";

-					set @point,@point +1;

-					goto Check;

-			Check:

-			next;

-				if(@point > 4)

-			{

-				donpcevent "#brisindwarf2::OnDvalinOn";

-				mes "[Dvalin]";

-				mes "...?";

-				mes "Alfrik?";

-				mes "Is that you?";

-				close;

-			}

-		L_Kick:

-			mes "[" + name + "]";

-			mes "^333333*Cough cough!*";

-			mes "Aaaack!";

-			mes "It's so dusty!";

-			close;

-}

-	else

-{

-	mes "^3355FFJust a normal";

-	mes "rock, covered in moss.^000000";

-	close;

-}

-

-OnTouch:

-	if(god_brising > 41) emotion e_gasp,1;

-	end;

-

-OnInit:

-	disablenpc "Dvalin#1";

-	end;

-

-OnDvalinOn:

-	enablenpc "Dvalin#1";

-	end;

-

-OnDvalinOff:

-	disablenpc "Dvalin#1";

-	end;

-}

-

-prt_fild02.gat,185,270,3	script	Dvalin#1	826,{

-

-	if (god_brising > 43)

-{

-	mes "[Dvalin]";

-	mes "A human?";

-	mes "You woke me up?";

-	next;

-	mes "[Dvalin]";

-	mes "Hmm...";

-	mes "And you'd be acting pretty pushy right about now if you were acting on behalf of a god. What could you want...?";

-	next;

-	mes "[Dvalin]";

-	mes "It makes sense that you want a replica of Brisingamen for its power. But remember, we originally made Brisingamen as a necklace fit for a goddess.";

-	next;

-	mes "[Dvalin]";

-	mes "Some might say that we seduced Freya with the necklace, but we really loved her with all of our hearts.";

-	close2;

-	donpcevent "#brisindwarf2::OnDvalinOff";

-	end;

-}

-	else if(god_brising == 42)

-{

-	mes "[Dvalin]";

-	mes "Wah, it's not Alfrik?";

-	mes "Who are you to wake Dvalin?";

-	mes "Tell me right now, or I am gonna kick your ass!";

-	next;

-	menu "Help!",-,"Alfrik sent me to wake you up!",L_Alfrik;

-			mes "[Dvalin]";

-			mes "I don't know what the hell you're doing here,";

-			mes "but leave!";

-			close2;

-			donpcevent "#brisindwarf2::OnDvalinOff";

-			end;

-		L_Alfrik:

-			mes "[Dvalin]";

-			mes "Did you just say Alfrik sent you? How do you know my brother?!";

-			next;

-			mes "[Dvalin]";

-			mes "Brisingamen?!";

-			mes "Then, that means we could meet Freya again?!";

-			next;

-			mes "[" + strcharinfo(0) + "]";

-			mes "Umm...";

-			mes "I'm afraid not.";

-			mes "Or, at least, that's";

-			mes "not why I'm here.";

-			next;

-			mes "[Dvalin]";

-			mes "Okay. I understand. Sorry, I was just hoping you were a herald of Freya.";

-			next;

-			mes "[Dvalin]";

-			mes "So, an imitation of Brisingamen. Even if it's not the original, I'm sure it can possess power comparable to the original. Yes...";

-			next;

-			mes "[Dvalin]";

-			mes "It's no use trying to predict the future, but I can't help but wonder what would mankind do with the power of the gods?";

-			next;

-			mes "[Dvalin]";

-			mes "If my brother Alfrik already approved of you, then I'll help you out. I'll tell you how to wake my brother Berling.";

-			next;

-			mes "[Dvalin]";

-			mes "We hid ourselves near traces of Freya. The path where I am staying is one that my goddess has walked through.";

-			next;

-			mes "[Dvalin]";

-			mes "The air that quietly drifts here holds her fragrant scent. You can use this wind to borrow her power.";

-			next;

-			mes "[Dvalin]";

-			mes "Aside from Freya, I have no special love for the gods or giants. But I am intrigued by you humans. Your race is one of both love and hatred, life and destruction.";

-			next;

-			mes "[Dvalin]";

-			mes "Go now and seek Berling. He is sleeping near a river connect to Mount Mjolnir. Travel West to find the river were Freya's Teardrops have fallen.";

-			next;

-			mes "[Dvalin]";

-			mes "If the phantom of water gives you a question, answer it. The answer is the punishment that Odin gave to our goddess.";

-			next;

-			mes "[Dvalin]";

-			mes "Until thousands of Valkyries filled up Valhala, they had to repeatedly live, die, then be reborn the next day only to die again.";

-			next;

-			mes "[Dvalin]";

-			mes "Think about who they were. That's all I can tell you.";

-			next;

-			mes "[Dvalin]";

-			mes "Somehow, I know";

-			mes "you are the one who";

-			mes "can answer the question.";

-			mes "Hahahaha!";

-			set god_brising,43;

-			close2;

-			donpcevent "#brisindwarf2::OnDvalinOff";

-			end;

-}

-	else if(god_brising == 43)

-{

-	mes "[Dvalin]";

-	mes "Why do you keep calling me? I did everything I can do for you. I even gave you the key of the question.";

-	next;

-	mes "[Dvalin]";

-	mes "From now on,";

-	mes "it's all up to you.";

-	mes "Now, go wake Berling...";

-	close2;

-	donpcevent "#brisindwarf2::OnDvalinOff";

-	end;

-}

-

-}

-

-mjolnir_09.gat,85,129,0	script	#brisindwarf3	111,3,3,{

-

-	if($God2 < 50)

-{

-	mes "^3355FFThe sight of this bubbling stream refreshes you just by looking at it.^000000";

-	close;

-}

-	if($God3 > 99)

-{

-	mes "^3355FFThe sight of this bubbling stream refreshes you just by looking at it.^000000";

-	close;

-}

-	if (god_brising > 42 && god_brising < 50)

-{

-	specialeffect 109;

-	mes "[Echoing Voice]";

-	mes "Alfrik: confirmed.";

-	mes "Dvalin: confirmed.";

-	next;

-	mes "[Echoing Voice]";

-	mes "Please answer me.";

-	mes "Odin punished beautiful Freya, and made her curse humans with her powers.";

-	next;

-	mes "[Echoing Voice]";

-	mes "Freya cursed many human beings to repeatedly die and be reborn in an eternal battle.";

-	mes "How many are they?";

-	next;

-	switch( select( "20!","How should I know?!","40!","42!" ))

-	{

-		case 1:

-			specialeffect 109;

-			mes "[Echoing Voice]";

-			mes "Failed.";

-			mes "Failed...";

-			close;

-		break;

-		case 2:

-			specialeffect 109;

-			mes "[Echoing Voice]";

-			mes "Failed.";

-			mes "Failed...";

-			close;

-		break;

-		case 3:

-			specialeffect 109;

-			mes "[Echoing Voice]";

-			mes "Failed.";

-			mes "Failed...";

-			close;

-		break;

-		case 4:

-			specialeffect 109;

-			mes "[Echoing Voice]";

-			mes "...Confirmed.";

-			mes "Shutting down barrier. Initiating summoning.";

-			next;

-			enablenpc "Berling#1";

-			mes "[Berling]";

-			mes "^333333*Gasp--!*^000000";

-			mes "Thought I was";

-			mes "gonna drown to death!";

-			mes "Who woke me up?";

-			close;

-		break;

-	}

-}

-	else

-{

-	mes "^3355FFThe sight of this bubbling stream refreshes you just by looking at it.^000000";

-	close;

-}

-

-OnTouch:

-	if(god_brising > 42) emotion e_gasp,1;

-	end;

-

-OnInit:

-	disablenpc "Berling#1";

-	end;

-

-OnBerlingOn:

-	enablenpc "Berling#1";

-	end;

-

-OnBerlingOff:

-	disablenpc "Berling#1";

-	end;

-}

-

-mjolnir_09.gat,87,129,3	script	Berling#1	826,{

-

-	if(god_brising > 44)

-{

-	mes "[Berling]";

-	mes "You're the one that's awakened us? Hahaha, perhaps that's a sign we may see Freya again! Hahahaha!";

-	next;

-	mes "[Berling]";

-	mes "We are indebted to you for reviving us. Okay, I know what you want, and will help you obtain the power of the gods.";

-	close2;

-	donpcevent "#brisindwarf3::OnBerlingOff";

-	end;

-}

-	else if(god_brising == 43)

-{

-	mes "[Berling]";

-	mes "What the...?";

-	mes "It's a human?!";

-	mes "What do you want?";

-	mes "Wh-who are you?";

-	next;

-	menu "Dvalin wants you to wake up!",-,"Tell me who you are first!",L_Who;

-			mes "[Berling]";

-			mes "Dvalin?! You mean my brother! But he can only be revived if Alfrik is revived. What happened?";

-			next;

-			mes "[" + strcharinfo(0) + "]";

-			mes "Umm...";

-			mes "Let me explain...";

-			next;

-			mes "...";

-			mes "......";

-			mes ".........";

-			next;

-			mes "["+ strcharinfo(0) +"]";

-			mes "...So if I guess I need to wake up all four of you dwarves so that Brisingamen, which holds Freya's power, can be made again.";

-			next;

-			mes "[Berling]";

-			mes "Oh! Say that name once again! Freya, the goddess who took my body and soul! Did you just say you want to make her necklace?";

-			next;

-			mes "[Berling]";

-			mes "Hahahaha, stop joking around. The Brisingamen is a one of a kind masterpiece!";

-			next;

-			menu "I don't mean the original one, but...",-;

-					mes "[Berling]";

-					mes "Ah, now I see! You want a replica that has roughly the same power. A Brisingamen used by humans!";

-					next;

-					mes "[Berling]";

-					mes "I, on the other hand, do not desire power. If would be happy to own but a strand of her hair.";

-					next;

-					mes "[Berling]";

-					mes "Oh Freya...";

-					mes "The more of her beauty exists in this world, the happier I'll be. I'm more than willing to help you recreate this memento of Freya.";

-					next;

-					mes "[Berling]";

-					mes "Now, please go and find the last one of my brothers! Poor Grer, perhaps he is still digging silver in that mine for her...";

-					next;

-					mes "[Berling]";

-					mes "Go and find Grer. I will give you Freya's golden teardrop, but he might have revived on his own...";

-					next;

-					mes "[Berling]";

-					mes "If he doesn't trust you, sing this song. You must remember each and every word...";

-					next;

-					mes "[Berling]";

-					mes "^4d4dffNo jewel in the world can compare.^000000";

-					next;

-					mes "[Berling]";

-					mes "^4d4dffOur masterpiece made from love.^000000";

-					next;

-					mes "[Berling]";

-					mes "^4d4dffShe wanted the dazzling necklace.^000000";

-					next;

-					mes "[Berling]";

-					mes "^4d4dffWe wanted the goddess of beauty.^000000";

-					next;

-					mes "[Berling]";

-					mes "^4d4dffOur happiest times were with her.^000000";

-					next;

-					mes "[Berling]";

-					mes "Memorize all five lines of this song exactly. Now take this golden teardrop and please seek out Grer.";

-					specialeffect2 84;

-					set god_brising,44;

-					close2;

-					donpcevent "#brisindwarf3::OnBerlingOff";

-					end;

-		L_Who:

-			mes "[Berling]";

-			mes "Where the hell did you come from?";

-			mes "I am Berling the greatest dwarf in ages!";

-			mes "I regret to tell you this, but I do not have a name";

-			mes "to introduce to such an ill-bred lad like you!";

-			next;

-			mes "[" + strcharinfo(0) + "]";

-			mes "Heh, you just said you're Berling...";

-			next;

-			mes "[Berling]";

-			mes "Baaaaahhh!";

-			mes "Quiet you!";

-			mes "Mind your own business!";

-			close2;

-			donpcevent "#brisindwarf3::OnBerlingOff";

-			end;

-}

-	else if(god_brising == 44)

-{

-	mes "[Berling]";

-	mes "Did you already forget the lyrics? Let me tell them to you again, so don't forget this time.";

-	next;

-	mes "[Berling]";

-	mes "^4d4dffNo jewel in the world can compare.^000000";

-	next;

-	mes "[Berling]";

-	mes "^4d4dffOur masterpiece made from love.^000000";

-	next;

-	mes "[Berling]";

-	mes "^4d4dffShe wanted the dazzling necklace.^000000";

-	next;

-	mes "[Berling]";

-	mes "^4d4dffWe wanted the goddess of beauty.^000000";

-	next;

-	mes "[Berling]";

-	mes "^4d4dffOur happiest times were with her.^000000";

-	close2;

-	donpcevent "#brisindwarf3::OnBerlingOff";

-	end;

-}

-

-}

-

-mjo_dun02.gat,126,36,0	script	#brisindwarf4	111,3,3,{

-

-	if($God2 < 50)

-{

-	mes "[" + strcharinfo(0) + "]";

-	mes "Bah, no way out.";

-	close;

-}

-	if($God3 > 99)

-{

-	mes "[" + strcharinfo(0) + "]";

-	mes "Bah, no way out.";

-	close;

-}

-	if(god_brising > 45 && god_brising < 50)

-{

-	mes "[Grer]";

-	mes "What!";

-	enablenpc "Grer#1";

-	close;

-}

-	else if(god_brising == 45)

-{

-        mes "- A charcoal was dropped from the sky' -";

-        mes "- with a voice, 'Show me!'. -";

-        mes "- Let's scribble...-";

-	set @point,0;

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "Let's see.";

-	mes "Um, that song.";

-	mes "What was the first line...?";

-	next;

-	input @dwarfsong1$;

-	if(@dwarfsong1$ == "No jewel in the world can compare.") set @point,@point +1;

-	mes "[" + strcharinfo(0) + "]";

-	mes " " + @dwarfsong1$ + "";

-	mes "Then...ummm..";

-	mes "The second line?";

-	next;

-	input @dwarfsong2$;

-	if(@dwarfsong2$ == "Our masterpiece made from love.") set @point,@point +1;

-	mes "[" + strcharinfo(0) + "]";

-	mes " " + @dwarfsong2$ + "";

-	mes "Now, what was";

-	mes "the third line...?";

-	next;

-	input @dwarfsong3$;

-	if(@dwarfsong3$ == "She wanted the dazzling necklace.") set @point,@point +1;

-	mes "[" + strcharinfo(0) + "]";

-	mes " " + @dwarfsong3$ + "";

-	mes "Now, the fourth";

-	mes "line after that...";

-	next;

-	input @dwarfsong4$;

-	if(@dwarfsong4$ == "We wanted the goddess of beauty.") set @point,@point +1;

-	mes "[" + strcharinfo(0) + "]";

-	mes " " + @dwarfsong4$ + "";

-	mes "Alright, now";

-	mes "for the last line...";

-	next;

-	input @dwarfsong5$;

-	if(@dwarfsong5$ == "Our happiest times were with her.") set @point,@point +1;

-	mes "[" + strcharinfo(0) + "]";

-	mes " " + @dwarfsong5$ + "";

-	mes "Alright, let's give it a try.";

-	next;

-	mes "[" + strcharinfo(0) + "]";

-	mes "" + @dwarfsong1$ + "";

-	mes "" + @dwarfsong2$ + "";

-	mes "" + @dwarfsong3$ + "";

-	mes "" + @dwarfsong4$ + "";

-	mes "" + @dwarfsong5$ + "";

-	next;

-		if(@point > 4)

-	{

-		enablenpc "Grer#1";

-		mes "[Grer]";

-		mes "Wha--?";

-		mes "Berling";

-		mes "did send you!";

-		set god_brising,46;

-		stopnpctimer;

-		close;

-	}

-		else

-	{

-		mes "[Grer]";

-		mes "Bah!";

-		mes "I knew it!";

-		mes "I can't trust you!";

-		close2;

-		warp "mjo_dun02",118,56;

-		end;

-	}

-}

-	else

-{

-	mes "^3355FFYou found a hole filled with some clod and a lump of coal.^000000";

-	close;

-}

-

-OnTouch:

-	if($God2 < 50)

-{

-	mes "[" + strcharinfo(0) + "]";

-	mes "Beh, no way out.";

-	close;

-}

-	if($God3 > 99)

-{

-	mes "[" + strcharinfo(0) + "]";

-	mes "Beh, no way out.";

-	close;

-}

-	if(god_brising == 44)

-{

-	emotion e_gasp,1;

-	mes "[Male Voice]";

-	mes "Don't come any closer! How the hell do I feel Freya's presense on you? Tell me who you are!";

-	next;

-	menu "I am sent by Berling.",-,"Wah, you freaked me out!",L_Freak;

-			mes "[Male Voice]";

-			mes "Lies! Lies!";

-			mes "Prove it!";

-			mes "Prove yourself!";

-			set god_brising,45;

-			initnpctimer;

-			close;

-		L_Freak:

-			mes "[Male Voice]";

-			mes "Get out of here!";

-			close;

-}

-	else if(god_brising == 45)

-{

-	mes "[Male Voice]";

-	mes "Prove it!";

-	mes "Otherwise, leave me alone and let me mine silver. Silver...! Heh heh heh...";

-	stopnpctimer;

-	startnpctimer;

-	close;

-}

-	else

-{

-	warp "mjo_dun02.gat",118,56;

-	end;

-}

-

-OnTimer1000:

-	mapannounce "mjo_dun02.gat","Grer: Hurry and show that I can trust you!",0,0x70DBDB;

-	end;

-

-OnTimer240000:

-	mapannounce "mjo_dun02.gat","Grer: Grrr, I won't wait much longer!",0,0x70DBDB;

-	end;

-

-OnTimer298000:

-	mapannounce "mjo_dun02.gat","Grer: Farewell, human!",0,0x70DBDB;

-	end;

-

-OnTimer300000:

-	warp "mjo_dun02.gat",118,56;

-	disablenpc "Grer#1";

-	end;

-

-OnTimer301000:

-	stopnpctimer;

-	end;

-

-OnInit:

-	disablenpc "Grer#1";

-	end;

-

-OnGrerOn:

-	enablenpc "Grer#1";

-	end;

-

-OnGrerOff:

-	disablenpc "Grer#1";

-	end;

-}

-

-mjo_dun02.gat,126,34,1	script	Grer#1	826,{

-

-	if(god_brising > 47)

-{

-	mes "[Grer]";

-	mes "As we promised,";

-	mes "Brisingamen will appear in front of human's eyes. But until then, I shall make jewelry of silver. Mwahahaha~";

-	close2;

-	donpcevent "#brisindwarf4::OnGrerOff";

-	end;

-}

-	else if(god_brising == 46)

-{

-	mes "[Grer]";

-	mes "My name is Grer.";

-	mes "I should have been the last one to be awakened. Now I see that I haven't mined as much silver as I may need.";

-	next;

-	mes "[Grer]";

-	mes "You might think gold would better suit a goddess, but no. Silver is what makes her golden hair more beautiful.";

-	next;

-	mes "[Grer]";

-	mes "Human, you must planned something fun. Hmm? You didn't plan anything at all? No matter.";

-	next;

-	mes "[Grer]";

-	mes "Now that we're revived, there's a good chance that we may see her again. I don't really mind anything else.";

-	next;

-	mes "[Grer]";

-	mes "I want her spirit and scent to fill this world. I don't want Odin or Heimdall to know our plan.";

-	next;

-	mes "[Grer]";

-	mes "Now, this doesn't mean that I prefer humans over gods or giants, but if it's for Freya, I'll do anything.";

-	next;

-	mes "[Grer]";

-	mes "Anyway, now my brothers have been revived. For that, I give you my thanks. Someday, you will have the power to challenge the gods.";

-	next;

-	mes "[Grer]";

-	mes "Now, I need to go back to my business. You'll need a silver ornament for the necklace, so I'll continue to mine silver.";

-	next;

-	mes "[Grer]";

-	mes "I shall be working hard to make the most beautiful ornament in the world.";

-	next;

-	mes "[Grer]";

-	mes "Okay, you";

-	mes "may go back now!";

-	mes "Farewell.";

-	set god_brising,47;

-	close2;

-	donpcevent "#brisindwarf4::OnGrerOff";

-	end;

-}

-	else if(god_brising == 47)

-{

-	mes "[Grer]";

-	mes "Heh heh...";

-	mes "Why are you still";

-	mes "here? Your job is done.";

-	mes "Now, go back to where";

-	mes "you came from!";

-	close2;

-	donpcevent "#brisindwarf4::OnGrerOff";

-	end;

-}

-	else

-{

-	mes "[Grer]";

-	mes "Who the";

-	mes "hell are you?!";

-	close2;

-	donpcevent "#brisindwarf4::OnGrerOff";

-	end;

-}

-

+//===== eAthena Script ======================================= 
+//= Brisingamen seal unlocking NPCs.
+//===== By: ================================================== 
+//= SinSloth
+//===== Current Version: ===================================== 
+//= 1.0a
+//===== Compatible With: ===================================== 
+//= eAthena
+//===== Description: ========================================= 
+//= Quest for breaking the seal of Brisingamen.
+//===== Additional Comments: =================================
+// 1.0 First version. Thanks to SinSloth for scripting it. [MasterOfMuppets]
+// 1.0a Removed duplicates [Toms]
+//============================================================
+
+prt_fild08.gat,175,374,3	script	Bard#brising	51,{
+
+	if ($God2 > 49 && $God3 < 100)
+{
+		if (god_brising > 49)
+	{
+		mes "[Nelliorde]";
+		mes "Oh, I guess you found what you wanted, huh? So how's it been going lately?";
+		next;
+		mes "[Nelliorde]";
+		mes "Recently I've been feeling strange, like something might happen soon. Aaah, forget, it's no big deal. Maybe I'm just being jumpy.";
+		next;
+		mes "[Nelliorde]";
+		mes "Right, right, let me play a song for you. Would you care to listen?";
+		next;
+		menu "Sure, why not~",L_Song,"How about some news?",L_News,"No thanks.",L_NoThx;
+			L_Song:
+				mes "[Nelliorde]";
+				mes "So, which song";
+				mes "would you like to hear?";
+				mes "Go ahead, pick one~";
+				next;
+				menu "Bragi's Poem",-,"Eternal Chaos",L_Chaos,"Assassin in the Sunset",L_Sunset,"Der Ring des Nibelungen",L_Nibel;
+						mes "[Nelliorde]";
+						mes "Bragi's Poem!";
+						mes "What a good choice!";
+						mes "I must say this song";
+						mes "represents the heart";
+						mes "of a poet!";
+						soundeffect "bragis_poem.wav",1;
+						close;
+
+					L_Chaos:
+						mes "[Nelliorde]";
+						mes "Eternal Chaos...";
+						mes "Sounds too chaotic.";
+						mes "By the way, I wonder";
+						mes "what the title really";
+						mes "means. Is it the chaos";
+						mes "of hell or our own reality?";
+						soundeffect "chaos_of_eternity.wav",1;
+						close;
+					L_Sunset:
+						mes "[Nelliorde]";
+						mes "Assassin in";
+						mes "the Sunset!";
+						mes "Yes, no one looks cooler than an Assassin, the bringer of death, standing alone in the sunset! Heh heh~";
+						soundeffect "assassin_of_sunset.wav",1;
+						close;
+					L_Nibel:
+						mes "[Nelliorde]";
+						mes "Der Ring des Nibelungen.....";
+						mes "Okay, are you ready to listen?";
+						mes "Hum hum hum....";
+						next;
+						soundeffect "ring_of_nibelungen.wav",1;
+						mes "^4D4DFFRheingold...";
+						mes "Hidden in the Rhein river.";
+						mes "If made into a ring,";
+						mes "Could rule the world~^000000";
+						next;
+						mes "^4D4DFFProtected by a spell";
+						mes "Cursing its thief";
+						mes "To never find love.";
+						mes "Alberich had known";
+						mes "Nonetheless stole it.";
+						mes "Love was forsaken for power.^000000";
+						next;
+						mes "^4D4DFFGiants built beautiful Valhalla";
+						mes "Matrimony with Freya";
+						mes "Goddess of beauty";
+						mes "Their supposed payment.";
+						mes "In not receiving it";
+						mes "They forcefully took her.^000000";
+						next;
+						mes "^4D4DFFThe gods would";
+						mes "give Alberich's treasure";
+						mes "To the Giants for Freya's return.";
+						mes "Loki tricked Alberich,";
+						mes "Stealing his ring or power.^000000";
+						next;
+						mes "^4D4DFFBut Alberich cursed his ring";
+						mes "Before it was returned to him,";
+						mes "Envy and death would";
+						mes "befall its wearers.^000000";
+						next;
+						mes "^4D4DFFThe ring was given to the giants";
+						mes "Freya was returned to the gods";
+						mes "The giants killed themselves";
+						mes "Fighting over the rheingold,";
+						mes "Victims of";
+						mes "Alberich's curse~^000000";
+						close;
+			
+			L_News:
+				mes "[Nelliorde]";
+				mes "You wish to";
+				mes "hear of some news?";
+				mes "What kind of news do";
+				mes "you wish to know about?";
+				next;
+
+				menu "About Prontera!",-,"About seaside areas.",L_NewsSea,"Is the desert still hot?",L_NewsDes,"How about the borderlands?",L_NewsBord;
+						mes "[Nelliorde]";
+						mes "What?! Prontera?!";
+						mes "Can you not see that the front gate of Prontera is right before you? You should at least know where you are, adventurer.";
+						next;
+						mes "[Nelliorde]";
+						mes "Anyways, I know one interesting news about Prontera. But, it's a secret. Shh! Are you... Single?";
+						next;
+						mes "[Nelliorde]";
+						mes "If so, go visit the tavern. I met a guy there who took me a nice place. Oh yes. He took me 'the place' where singles are forbidden~!";
+						close;
+					L_NewsSea:
+						mes "[Nelliorde]";
+						mes "Seaside areas?";
+						mes "That's a funny question. I mean, there's Alberta and a few other places where you can see the sea.";
+						next;
+						mes "[Nelliorde]";
+						mes "To the SouthWest there's Kokomo Beach. But, I suppose it's too dangerous just to go there to take a stroll.";
+						next;
+						mes "[Nelliorde]";
+						mes "Kokomo beach is a large expanse of sand. The nearby water is filled with sea animals, so you can enjoy catching Shellfishes.";
+						next;
+						mes "[Nelliorde]";
+						mes "However, there are always bullies in that kind of place. Once, I met a threatening looking hoodlum with red spiky hair.";
+						next;
+						mes "[Nelliorde]";
+						mes "He was chewing on something and spat on the ground. He big buffoon managed to intimidate me into giving him all of my Zeny!";
+						next;
+						mes "[Nelliorde]";
+						mes "^333333*Sigh...*^000000";
+						mes "This world is too";
+						mes "dangerous for a young";
+						mes "and fragile Bard.";
+						next;
+						mes "[Nelliorde]";
+						mes "By the way, Alberta doesn't seem to have changed. The Sunken Ship looks the same as well, with all of its Skeleton Pirates and whatnot. You know how it is.";
+						next;
+						mes "[Nelliorde]";
+						mes "The event agency in charge of expeditions into the Sunken Ship is still making tons of money. If you have nothing to do, why don't you hunt for monsters down there?";
+						close;
+					L_NewsDes:
+						mes "[Nelliorde]";
+						mes "Oh, hell yes!";
+						mes "When is it not?";
+						mes "The desert is hot, has";
+						mes "been hot and probably";
+						mes "always will be...!";
+						next;
+						mes "[Nelliorde]";
+						mes "Giant worms still jump out of nowhere, freaking out innocent travellers like myself, and the Sandmen still kick people in the ass!";
+						next;
+						mes "[Nelliorde]";
+						mes "Even if the desert is filled with hideous monsters, the view of the ocean there is so magnificent. Hah, it makes me want to play a song.";
+						next;
+						mes "[Nelliorde]";
+						mes "I must say there is";
+						mes "one place you may wish";
+						mes "to see in the desert.";
+						next;
+						mes "[Nelliorde]";
+						mes "I'm talking about the Assassin Guild. Supposedly, it's hidden behind a sandstorm in the Morroc Desert!";
+
+						if (Class == Job_Assassin || Class == Job_Assassin_Cross) mes "But you should know what I am talking about! So when are you gonna take me to the guild, eh?";
+						else mes "Have you ever been there before?";
+						close;
+					L_NewsBord:
+						mes "[Nelliorde]";
+						mes "Well, to the north is the Schwaltzwald Republic.";
+						mes "There, you'll find Juno,";
+						mes "the 'City of Sages.'";
+						next;
+						mes "[Nelliorde]";
+						mes "The people there say that there is one major nuisance, a man known as the 'Mad Scientist.' He's antisocial and creates a lot of public disturbances with his experiments.";
+						next;
+						mes "[Nelliorde]";
+						mes "It seems everyone in Juno hates him with passion. Even one of the Tool Shop owners begged a passing adventurer to stop this Mad Scientist's research!";
+						next;
+						mes "[Nelliorde]";
+						mes "But I have a different opinion about him. I believe it's not a good idea to interrupt the work of any scientist. After all, he might just discover something important, even if his experiments are a little hazardous.";
+						next;
+						mes "[Nelliorde]";
+						mes "Speaking of discoveries, you know how Juno floats in the air, right?";
+						next;
+						mes "[Nelliorde]";
+						mes "It's said that a piece of Ymir's Heart generates enough power to keep the entire city aloft in the sky. Isn't that amazing?";
+						next;
+						mes "[Nelliorde]";
+						mes "Even more recent is the news about the discovery of Ymir's Book. You can read it in Juno's Sage Castle. I hear that it contains the secret to meeting Valkyrie...";
+						close;
+			L_NoThx:
+				mes "[Nelliorde]";
+				mes "Huh? Okay then, talk to you later. May Bragi bless you on your journeys.";
+				close;
+	}
+		else if(god_brising > 0 && god_brising < 50)
+	{
+		mes "[Nelliorde]";
+		mes "So, have you met Mr. Kaili? Please do your best. After all, I especially recommended you~";
+		next;
+
+		menu "Tell me a story.",-,"Sing a song for me.",L_Sing;
+				mes "[Nelliorde]";
+				mes "Hmm. What would be a good story for you this time...? Ah yes, I've got it. Let me tell you about one of my own adventures. It was a pretty amazing experience.";
+				next;
+				mes "[Nelliorde]";
+				mes "I went to Morroc, the city of the desert. On my way there, I became exhausted from the heat. Luckily, I found a hole beneath the shadows and climbed in to rest.";
+				next;
+				mes "[Nelliorde]";
+				mes "Oh my God...";
+				mes "If I had known";
+				mes "better, I never";
+				mes "would have gone";
+				mes "inside that place...";
+				next;
+				mes "[Nelliorde]";
+				mes "I actually crawled into the infamous ^FF0000Ant Hell^000000! I don't sound like a coward to you, do I?";
+				next;
+				mes "[Nelliorde]";
+				mes "Well, the ants aren't the only ones living there. I wasn't afraid of them at all. Except, of course, when they attacked in groups.";
+				next;
+				mes "[Nelliorde]";
+				mes "What I was really afraid of was this some sort of strawberry colored... tongue thing. Phreeoni!";
+				next;
+				mes "[Nelliorde]";
+				mes "Fortunately, I survived intact, although I still have nightmares of that man-sized tongue.";
+				next;
+				mes "[Nelliorde]";
+				mes "Once I got out of there, I craved human companionship and to restore my sense of normalcy. The closest place that I knew was Paros Lighthouse.";
+				next;
+				mes "[Nelliorde]";
+				mes "Yet again, I decided to traverse the desert, despite the fact that the Kafra Ladies provide a very convenient teleport service there.";
+				next;
+				mes "[Nelliorde]";
+				mes "Anyway, the fortress of Sandaruman is on the way to Paros Lighthouse. I remember Serutero, a guy I met in south Morroc, telling me about its scenic beauty.";
+				next;
+				mes "[Nelliorde]";
+				mes "I was so excited about seeing it for myself. After all, doesn't 'Sandaruman' sound like the name of a beautiful place?";
+				next;
+				mes "[Nelliorde]";
+				mes "But I immediately regret my decision once I arrived. Of course, the view was breathtaking: the sandy hills near the ocean, as well as the ruins.";
+				next;
+				mes "[Nelliorde]";
+				mes "Of course I forgot Serutero's warning about all the monsters. Argh! It was a nightmare! Instead of enjoying the scenary, I ended up running for my life.";
+				next;
+				mes "[Nelliorde]";
+				mes "I was still trying to escape those monsters when I stumbled upon an old house to the West of Sandaruman, that seemed to be in a state of decay.";
+				next;
+				mes "[Nelliorde]";
+				mes "I recalled that Serutero said that no one was living in that area, so I began to worry a bit. Still, I was desperate and needed refuge.";
+				next;
+				mes "[Nelliorde]";
+				mes "In my panic, I violently knocked on the door and screamed for someone to let me inside. Then do you know what I heard?";
+				next;
+				mes "[Nelliorde]";
+				mes "^FF0000Who's there?!";
+				mes "Who would dare";
+				mes "intrude my territory?^000000";
+				mes "I was freaked out! However owned that house must have been some kind of lunatic!";
+				next;
+				mes "[Nelliorde]";
+				mes "Th-then, with the specter of Death nipping at my heels, he told me to get lost! Luckily, I was saved by a mysterious, wandering SuperNovice, but that's another story.";
+				next;
+				mes "[Nelliorde]";
+				mes "In any case, I finally arrived at Paros Lighthouse. There, I learned that the old house was a secret camp for the Rogue Guild. ";
+				next;
+				mes "[Nelliorde]";
+				mes "It's amazing, how they can live in such dangerous areas. Only Rogues would be able to survive there, you know?";
+				next;
+				mes "[Nelliorde]";
+				mes "Ah...";
+				mes "I'm so tired from talking so much. But if I happen to have another adventure, I shall share that tale to you.";
+				close;
+
+			L_Sing:
+				mes "[Nelliorde]";
+				mes "Ah, you wish";
+				mes "to hear a song?";
+				mes "Okay! I shall then";
+				mes "perform my favorite.";
+				next;
+				mes "[Nelliorde]";
+				mes "I chased after fame.";
+				mes "It eluded me.";
+				mes "I ran after happiness";
+				mes "But never caught it.";
+				next;
+				mes "[Nelliorde]";
+				mes "But tomorrow will still";
+				mes "Be there, I'm sure.";
+				mes "Like the Water Mill";
+				mes "In Al De Baran";
+				mes "Which turns as";
+				mes "Life goes on.";
+				next;
+				mes "[Nelliorde]";
+				mes "Cheer up! Life goes on.";
+				mes "As surely as the Water";
+				mes "Mill turns, tomorrow";
+				mes "Will come.";
+				close;
+	}
+		else
+	{
+		mes "[Nelliorde]";
+		mes "Say...";
+		mes "Have we met before?";
+		mes "Hmm? Never? Well...";
+		mes "That's rather odd.";
+		next;
+		mes "[Nelliorde]";
+		mes "I seem to recall that you've asked me to give you some information if I ever have any. Well, now I have and shall share it with you~";
+		next;
+		mes "[Nelliorde]";
+		mes "The usefulness of this information all depends on you. Now, have you heard of the ^3333CCMonster Research Organization^000000?";
+		next;
+		mes "[Nelliorde]";
+		mes "I happened to get this information from its headquarters in Juno. So how does that sound?";
+		next;
+
+		menu "Wee~ I want to hear!",-,"Booooring~",L_Boring;
+				mes "[Nelliorde]";
+				mes "Well...!";
+				mes "You seem to be";
+				mes "very excited about";
+				mes "this new tidbit of";
+				mes "knowledge I have~";
+				next;
+
+					if(BaseLevel < 70)
+				{
+					mes "[Nelliorde]";
+					mes "Alas, this information doesn't seem to be very valuable to someone such as yourself.";
+					next;
+					mes "[Nelliorde]";
+					mes "I'm so very sorry to have excited you, but only people that are strong enough to handle grueling work can benefit from this.";
+					next;
+					mes "[Nelliorde]";
+					mes "Why don't you travel around and gain more experiences? I will let you know when you're ready, you know~";
+					close;
+				}
+					else
+				{
+					mes "[Nelliorde]";
+					mes "Ooh...";
+					mes "And you look";
+					mes "like you can handle";
+					mes "this kind of information.";
+					mes "I'll share everything I know!";
+					next;
+					mes "[Nelliorde]";
+					mes "One day, an adventurer discovered a strange, mysterious object. Unable to figure out what it could do, he visited the Monster Organization.";
+					next;
+					mes "[Nelliorde]";
+					mes "There, it was entrusted to a scholar by the name of Mr. Kaili. He still hasn't uncovered the truth about that item and wishes for assistance in his investigation.";
+					next;
+					mes "[Nelliorde]";
+					mes "Mr. Kaili suspects that the item might be part of an undiscovered ancient relic. Fortunately, he is also researching ancient relics as a project assigned by the royal court.";
+					next;
+					mes "[Nelliorde]";
+					mes "So what do you think? Isn't that interesting? Of course, you'd better speak to Mr. Kaili if you wish to learn more. If you'd like, I shall write you a letter or recommendation.";
+					next;
+
+					menu "Sure! Sounds good.",-,"Sorry, I am not that interested.",L_NoInterest;
+							mes "[Nelliorde]";
+							mes "Excellent..!";
+							mes "So you name is...";
+							mes "" + strcharinfo(0) + "?";
+							next;
+							mes "[Nelliorde]";
+							mes "Alright, I shall contact him, right away! Oh, and you can find the Monster Organization west of Juno's central plaza. It shouldn't be hard to find. Good luck!";
+							set god_brising,1;
+							close;
+						L_NoInterest:
+							mes "[Nelliorde]";
+							mes "Ah, it's disappointing to hear that. I thought that you'd be perfect to help out Mr. Kaili. Oh well, talk to you later~";
+							close;
+				}
+			L_Boring:
+				mes "[Nelliorde]";
+				mes "Boring, you say?";
+				mes "Perhaps, but not as";
+				mes "boring as an adventurer";
+				mes "that passes up a chance";
+				mes "for an adventure, yes?";
+				next;
+				menu "Tell me a story.",-,"Sing a song for me.",L_Sing2;
+						mes "[Nelliorde]";
+						mes "Hmm. What would be a good story for you this time...? Ah yes, I've got it. Let me tell you about one of my own adventures. It was a pretty amazing experience.";
+						next;
+						mes "[Nelliorde]";
+						mes "I went to Morroc, the city of the desert. On my way there, I became exhausted from the heat. Luckily, I found a hole beneath the shadows and climbed in to rest.";
+						next;
+						mes "[Nelliorde]";
+						mes "Oh my God...";
+						mes "If I had known";
+						mes "better, I never";
+						mes "would have gone";
+						mes "inside that place...";
+						next;
+						mes "[Nelliorde]";
+						mes "I actually crawled into the infamous ^FF0000Ant Hell^000000! I don't sound like a coward to you, do I?";
+						next;
+						mes "[Nelliorde]";
+						mes "Well, the ants aren't the only ones living there. I wasn't afraid of them at all. Except, of course, when they attacked in groups.";
+						next;
+						mes "[Nelliorde]";
+						mes "What I was really afraid of was this some sort of strawberry colored... tongue thing. Phreeoni!";
+						next;
+						mes "[Nelliorde]";
+						mes "Fortunately, I survived intact, although I still have nightmares of that man-sized tongue.";
+						next;
+						mes "[Nelliorde]";
+						mes "Once I got out of there, I craved human companionship and to restore my sense of normalcy. The closest place that I knew was Paros Lighthouse.";
+						next;
+						mes "[Nelliorde]";
+						mes "Yet again, I decided to traverse the desert, despite the fact that the Kafra Ladies provide a very convenient teleport service there.";
+						next;
+						mes "[Nelliorde]";
+						mes "Anyway, the fortress of Sandaruman is on the way to Paros Lighthouse. I remember Serutero, a guy I met in south Morroc, telling me about its scenic beauty.";
+						next;
+						mes "[Nelliorde]";
+						mes "I was so excited about seeing it for myself. After all, doesn't 'Sandaruman' sound like the name of a beautiful place?";
+						next;
+						mes "[Nelliorde]";
+						mes "But I immediately regret my decision once I arrived. Of course, the view was breathtaking: the sandy hills near the ocean, as well as the ruins.";
+						next;
+						mes "[Nelliorde]";
+						mes "Of course I forgot Serutero's warning about all the monsters. Argh! It was a nightmare! Instead of enjoying the scenary, I ended up running for my life.";
+						next;
+						mes "[Nelliorde]";
+						mes "I was still trying to escape those monsters when I stumbled upon an old house to the West of Sandaruman, that seemed to be in a state of decay.";
+						next;
+						mes "[Nelliorde]";
+						mes "I recalled that Serutero said that no one was living in that area, so I began to worry a bit. Still, I was desperate and needed refuge.";
+						next;
+						mes "[Nelliorde]";
+						mes "In my panic, I violently knocked on the door and screamed for someone to let me inside. Then do you know what I heard?";
+						next;
+						mes "[Nelliorde]";
+						mes "^FF0000Who's there?!";
+						mes "Who would dare";
+						mes "intrude my territory?^000000";
+						mes "I was freaked out! However owned that house must have been some kind of lunatic!";
+						next;
+						mes "[Nelliorde]";
+						mes "Th-then, with the specter of Death nipping at my heels, he told me to get lost! Luckily, I was saved by a mysterious, wandering SuperNovice, but that's another story.";
+						next;
+						mes "[Nelliorde]";
+						mes "In any case, I finally arrived at Paros Lighthouse. There, I learned that the old house was a secret camp for the Rogue Guild. ";
+						next;
+						mes "[Nelliorde]";
+						mes "It's amazing, how they can live in such dangerous areas. Only Rogues would be able to survive there, you know?";
+						next;
+						mes "[Nelliorde]";
+						mes "Ah...";
+						mes "I'm so tired from talking so much. But if I happen to have another adventure, I shall share that tale to you.";
+						close;
+
+					L_Sing2:
+						mes "[Nelliorde]";
+						mes "Ah, you wish";
+						mes "to hear a song?";
+						mes "Okay! I shall then";
+						mes "perform my favorite.";
+						next;
+						mes "[Nelliorde]";
+						mes "I chased after fame.";
+						mes "It eluded me.";
+						mes "I ran after happiness";
+						mes "But never caught it.";
+						next;
+						mes "[Nelliorde]";
+						mes "But tomorrow will still";
+						mes "Be there, I'm sure.";
+						mes "Like the Water Mill";
+						mes "In Al De Baran";
+						mes "Which turns as";
+						mes "Life goes on.";
+						next;
+						mes "[Nelliorde]";
+						mes "Cheer up! Life goes on.";
+						mes "As surely as the Water";
+						mes "Mill turns, tomorrow";
+						mes "Will come.";
+						close;
+	}
+}
+	else
+{
+	mes "[Nelliorde]";
+	mes "Hello there!";
+	mes "Isn't it such";
+	mes "a glorious day?";
+	mes "You know of me,";
+	mes "do you not?";
+	next;
+	mes "[Nelliorde]";
+		if (Sex) mes "Hahahaha, forgive my rudeness, but I fail to remember your name, although your face does seem rather familiar.";
+		else
+	{
+		mes "Oh well well...";
+		mes "How could I ever";
+		mes "forget the lovely";
+		mes ""+ strcharinfo(0) +"?";
+	}
+        mes "Whatever, hahahaha!";
+	next;
+	mes "[Nelliorde]";
+	mes "So, aren't you curious about me? Feel free to ask me whatever you like! I'm the vagabond that will wander the earth till the end of his days, your friend who loves to sing under the moonlight~";
+	next;
+	menu "Who are you?",-,"What's new?",L_New,"Can you sing?",L_Sing3;
+			mes "[Nelliorde]";
+			mes "Why, I am Nelliorde, the Bard. In truth, my real name is Elliorde.";
+			next;
+			mes "[Nelliorde]";
+			mes "However, while I was singing at a Tavern, as per usual, a man with long blonde hair angrily demanded that I change my name!";
+			next;
+			mes "[Nelliorde]";
+			mes "Never before have I seen such a flailing and a fuss over someone coincidentally sharing the same name!";
+			next;
+			mes "[Nelliorde]";
+			mes "And so, that little altercation was settled with me being named Nelliorde.";
+			next;
+			mes "[Nelliorde]";
+			mes "I don't sound like a coward to you, do I? Do you believe I should have fought for the right to keep my original name?";
+			next;
+			mes "[Nelliorde]";
+			mes "If so, you're wrong! I just don't believe that violence can solve anything as the romantic Bard that cherishes peace...";
+			next;
+			mes "^3355FFSeeing as it's not worth";
+			mes "listening to Nelliorde's lies, you decide to simply tune him out.^000000";
+			next;
+			mes "^3355FF...";
+			mes "......^000000";
+			next;
+			mes "^3355FF...";
+			mes "......";
+			mes ".........^000000";
+			next;
+			mes "[Nelliorde]";
+			mes "And that's how I convinced wise and benevolent King Tristram III to build a paradise where married lovers could enjo- Hm? Are you even listening?!";
+			close;
+		
+		L_New:
+				mes "[Nelliorde]";
+				mes "You wish to";
+				mes "hear of some news?";
+				mes "What kind of news do";
+				mes "you wish to know about?";
+				next;
+
+				menu "About Prontera!",-,"About seaside areas.",L_NewsSea2,"Is the desert still hot?",L_NewsDes2,"How about the borderlands?",L_NewsBord2;
+						mes "[Nelliorde]";
+						mes "What?! Prontera?!";
+						mes "Can you not see that the front gate of Prontera is right before you? You should at least know where you are, adventurer.";
+						next;
+						mes "[Nelliorde]";
+						mes "Anyways, I know one interesting news about Prontera. But, it's a secret. Shh! Are you... Single?";
+						next;
+						mes "[Nelliorde]";
+						mes "If so, go visit the tavern. I met a guy there who took me a nice place. Oh yes. He took me 'the place' where singles are forbidden~!";
+						close;
+					L_NewsSea2:
+						mes "[Nelliorde]";
+						mes "Seaside areas?";
+						mes "That's a funny question. I mean, there's Alberta and a few other places where you can see the sea.";
+						next;
+						mes "[Nelliorde]";
+						mes "To the SouthWest there's Kokomo Beach. But, I suppose it's too dangerous just to go there to take a stroll.";
+						next;
+						mes "[Nelliorde]";
+						mes "Kokomo beach is a large expanse of sand. The nearby water is filled with sea animals, so you can enjoy catching Shellfishes.";
+						next;
+						mes "[Nelliorde]";
+						mes "However, there are always bullies in that kind of place. Once, I met a threatening looking hoodlum with red spiky hair.";
+						next;
+						mes "[Nelliorde]";
+						mes "He was chewing on something and spat on the ground. He big buffoon managed to intimidate me into giving him all of my Zeny!";
+						next;
+						mes "[Nelliorde]";
+						mes "^333333*Sigh...*^000000";
+						mes "This world is too";
+						mes "dangerous for a young";
+						mes "and fragile Bard.";
+						next;
+						mes "[Nelliorde]";
+						mes "By the way, Alberta doesn't seem to have changed. The Sunken Ship looks the same as well, with all of its Skeleton Pirates and whatnot. You know how it is.";
+						next;
+						mes "[Nelliorde]";
+						mes "The event agency in charge of expeditions into the Sunken Ship is still making tons of money. If you have nothing to do, why don't you hunt for monsters down there?";
+						close;
+					L_NewsDes2:
+						mes "[Nelliorde]";
+						mes "Oh, hell yes!";
+						mes "When is it not?";
+						mes "The desert is hot, has";
+						mes "been hot and probably";
+						mes "always will be...!";
+						next;
+						mes "[Nelliorde]";
+						mes "Giant worms still jump out of nowhere, freaking out innocent travellers like myself, and the Sandmen still kick people in the ass!";
+						next;
+						mes "[Nelliorde]";
+						mes "Even if the desert is filled with hideous monsters, the view of the ocean there is so magnificent. Hah, it makes me want to play a song.";
+						next;
+						mes "[Nelliorde]";
+						mes "I must say there is";
+						mes "one place you may wish";
+						mes "to see in the desert.";
+						next;
+						mes "[Nelliorde]";
+						mes "I'm talking about the Assassin Guild. Supposedly, it's hidden behind a sandstorm in the Morroc Desert!";
+
+						if (Class == Job_Assassin || Class == Job_Assassin_Cross) mes "But you should know what I am talking about! So when are you gonna take me to the guild, eh?";
+						else mes "Have you ever been there before?";
+						close;
+					L_NewsBord2:
+						mes "[Nelliorde]";
+						mes "Well, to the north is the Schwaltzwald Republic.";
+						mes "There, you'll find Juno,";
+						mes "the 'City of Sages.'";
+						next;
+						mes "[Nelliorde]";
+						mes "The people there say that there is one major nuisance, a man known as the 'Mad Scientist.' He's antisocial and creates a lot of public disturbances with his experiments.";
+						next;
+						mes "[Nelliorde]";
+						mes "It seems everyone in Juno hates him with passion. Even one of the Tool Shop owners begged a passing adventurer to stop this Mad Scientist's research!";
+						next;
+						mes "[Nelliorde]";
+						mes "But I have a different opinion about him. I believe it's not a good idea to interrupt the work of any scientist. After all, he might just discover something important, even if his experiments are a little hazardous.";
+						next;
+						mes "[Nelliorde]";
+						mes "Speaking of discoveries, you know how Juno floats in the air, right?";
+						next;
+						mes "[Nelliorde]";
+						mes "It's said that a piece of Ymir's Heart generates enough power to keep the entire city aloft in the sky. Isn't that amazing?";
+						next;
+						mes "[Nelliorde]";
+						mes "Even more recent is the news about the discovery of Ymir's Book. You can read it in Juno's Sage Castle. I hear that it contains the secret to meeting Valkyrie...";
+						close;
+			
+		L_Sing3:
+			mes "[Nelliorde]";
+			mes "Can I sing, you ask? Certainly, and if I may say so, pleasureably. Which song would you care to hear?";
+			next;
+			menu "Bragi's Poem",-,"Eternal Chaos",L_Chaos2,"Assassin in the Sunset",L_Sunset2;
+				
+						if(Zeny > 499)
+					{
+						mes "[Nelliorde]";
+						mes "Bragi's Poem!";
+						mes "What a good choice!";
+						mes "I must say this song represents the heart of a poet!";
+						soundeffect "bragis_poem.wav",1;
+						set Zeny,Zeny - 500;
+						close;
+					}
+						else
+					{
+						mes "[Nelliorde]";
+						mes "Please forgive me, but I cannot play a song for free. The world is harsh, and a frail Bard such as myself must have some means to survive~";
+						close;
+					}
+				
+ 				L_Chaos2:
+						if(Zeny > 499)
+					{
+						mes "[Nelliorde]";
+						mes "You must like robust and energetic music, eh? As you wish~";
+						soundeffect "chaos_of_eternity.wav",1;
+						set Zeny,Zeny - 500;
+						close;
+					}
+						else
+					{
+						mes "[Nelliorde]";
+						mes "Please forgive me, but I cannot play a song for free. The world is harsh, and a frail Bard such as myself must have some means to survive~";
+						close;
+					}
+				
+				L_Sunset2:
+						if(Zeny > 499)
+					{
+						mes "[Nelliorde]";
+						mes "Excellent choice!";
+						mes "Somehow, the image of the setting sun fits well with Assassins. Don't you agree?";
+						soundeffect "assassin_of_sunset.wav",1;
+						set Zeny,Zeny - 500;
+						close;
+					}
+						else
+					{
+						mes "[Nelliorde]";
+						mes "Please forgive me, but I cannot play a song for free. The world is harsh, and a frail Bard such as myself must have some means to survive~";
+						close;
+					}
+}
+
+}
+
+yuno_in04.gat,47,113,1	script	Studying Scholar#1	749,{
+
+	if($God3 == 100)
+{
+	mes "[Studying Scholar]";
+	mes "Hmmm...";
+	mes "The highest quality Red Potion ever...";
+	next;
+	mes "[Studying Scholar]";
+	mes "If only I could figure a way to balance the consistency of the ground Red Herbs mixed with the water. That part is most crucial...";
+	close;
+}
+ 
+	if($God2 > 49)
+{
+		if(god_brising == 50)
+	{
+		mes "[Enrico Kaili]";
+		mes "Ah, " + strcharinfo(0) + ",";
+		mes "you've returned.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "Learning about Brisingamen was truly fascinating. But since we've hit a plateau for now, I've started a new research project.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "Hahahaha~";
+		mes "I'm sorry, but I cannot tell you about it for now, since it's confidential. But once I get a chance, I'll ask you for help.";
+		close;
+	}
+		else if(god_brising == 49)
+	{
+		mes "[Enrico Kaili]";
+		mes "Ah, I see. So it's true that Berling sealed himself in the ripple where the goddess' tear fell into the waters.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "Oh! I'm so excited! I don't know what to do first! Should I report to His Majesty or publish my findings or...";
+		next;
+		menu "^333333*Ahem!*^000000 My reward!",-;
+				mes "[Enrico Kaili]";
+				mes "Oh, right.";
+				mes "Thank you for all the trouble you have endured for my sake. You are truly one of the best researchers I've ever met.";
+				next;
+				mes "[Enrico Kaili]";
+				mes "Then as promised...";
+				mes "I will give you something from my precious collection! Now, let me see what we have here...";
+				next;
+				mes "[Enrico Kaili]";
+				mes "Please...";
+				mes "Take this";
+				set @card,rand(1,1210);
+				if ((@card > 0 ) && (@card < 11))
+				{
+					mes "Poring Card.";
+					set god_brising,50;
+					getitem "Poring_Card",1;
+				}
+				else if ((@card > 10) && (@card < 21))
+				{
+					mes "Fabre Card.";
+					set god_brising,50;
+					getitem "Fabre_Card",1;
+				}
+				else if ((@card > 20) && (@card < 26))
+				{
+					mes "Pupa Card.";
+					set god_brising,50;
+					getitem "Pupa_Card",1;
+				}
+				else if ((@card > 25) && (@card < 41))
+				{
+					mes "Drops Card.";
+					set god_brising,50;
+					getitem "Drops_Card",1;
+				}
+				else if ((@card > 40) && (@card < 51))
+				{
+					mes "Lunatic Card.";
+					set god_brising,50;
+					getitem "Lunatic_Card",1;
+				}
+				else if ((@card > 50) && (@card < 56))
+				{
+					mes "Peco Peco Egg Card.";
+					set god_brising,50;
+					getitem "Pecopeco_Egg_Card",1;
+				}
+				else if ((@card > 55) && (@card < 71))
+				{
+					mes "Picky Card.";
+					set god_brising,50;
+					getitem "Picky_Card",1;
+				}
+				else if ((@card > 70) && (@card < 81))
+				{
+					mes "Chonchon Card.";
+					set god_brising,50;
+					getitem "Chonchon_Card",1;
+				}
+				else if ((@card > 80) && (@card < 91))
+				{
+					mes "Willow Card.";
+					set god_brising,50;
+					getitem "Wilow_Card",1;
+				}
+				else if ((@card > 90) && (@card < 101))
+				{
+					mes "Thief Bug Egg Card.";
+					set god_brising,50;
+					getitem "Thief_Bug_Egg_Card",1;
+				}
+				else if ((@card > 100) && (@card < 111))
+				{
+					mes "Andre Egg Card.";
+					set god_brising,50;
+					getitem "Andre_Egg_Card",1;
+				}
+				else if ((@card > 110) && (@card < 121))
+				{
+					mes "Roda Frog Card.";
+					set god_brising,50;
+					getitem "Roda_Frog_Card",1;
+				}
+				else if ((@card > 120) && (@card < 131))
+				{
+					mes "Condor Card.";
+					set god_brising,50;
+					getitem "Condor_Card",1;
+				}
+				else if ((@card > 130) && (@card < 141))
+				{
+					mes "Thief Bug Card.";
+					set god_brising,50;
+					getitem "Thief_Bug_Card",1;
+				}
+				else if ((@card > 140) && (@card < 151))
+				{
+					mes "Savage Bebe Card.";
+					set god_brising,50;
+					getitem "Savage_Babe_Card",1;
+				}
+				else if ((@card > 150) && (@card < 161))
+				{
+					mes "Hornet Card.";
+					set god_brising,50;
+					getitem "Hornet_Card",1;
+				}
+				else if ((@card > 160) && (@card < 171))
+				{
+					mes "Hornet Card.";
+					set god_brising,50;
+					getitem "Hornet_Card",1;
+				}
+				else if ((@card > 170) && (@card < 181))
+				{
+					mes "Familiar Card.";
+					set god_brising,50;
+					getitem "Farmiliar_Card",1;
+				}
+				else if ((@card > 180) && (@card < 191))
+				{
+					mes "Rocker Card.";
+					set god_brising,50;
+					getitem "Rocker_Card",1;
+				}
+				else if ((@card > 190) && (@card < 201))
+				{
+					mes "Spore Card.";
+					set god_brising,50;
+					getitem "Spore_Card",1;
+				}
+				else if ((@card > 200) && (@card < 211))
+				{
+					mes "Baby Desert Wolf Card.";
+					set god_brising,50;
+					getitem "Desert_Wolf_Babe_Card",1;
+				}
+				else if ((@card > 210) && (@card < 221))
+				{
+					mes "Plankton Card.";
+					set god_brising,50;
+					getitem "Plankton_Card",1;
+				}
+				else if ((@card > 220) && (@card < 231))
+				{
+					mes "Skeleton Card.";
+					set god_brising,50;
+					getitem "Skeleton_Card",1;
+				}
+				else if ((@card > 230) && (@card < 241))
+				{
+					mes "Female Thief Bug Card.";
+					set god_brising,50;
+					getitem "Thief_Bug_Female_Card",1;
+				}
+				else if ((@card > 240) && (@card < 251))
+				{
+					mes "Kukre Card.";
+					set god_brising,50;
+					getitem "Kukre_Card",1;
+				}
+				else if ((@card > 250) && (@card < 261))
+				{
+					mes "Tarou Card.";
+					set god_brising,50;
+					getitem "Tarou_Card",1;
+				}
+				else if ((@card > 260) && (@card < 271))
+				{
+					mes "Wolf Card.";
+					set god_brising,50;
+					getitem "Wolf_Card",1;
+				}
+				else if ((@card > 270) && (@card < 281))
+				{
+					mes "Mandragora Card.";
+					set god_brising,50;
+					getitem "Mandragora_Card",1;
+				}
+				else if ((@card > 280) && (@card < 291))
+				{
+					mes "Peco Peco Card.";
+					set god_brising,50;
+					getitem "Pecopeco_Card",1;
+				}
+				else if ((@card > 290) && (@card < 301))
+				{
+					mes "Ambernite Card.";
+					set god_brising,50;
+					getitem "Ambernite_Card",1;
+				}
+				else if ((@card > 300) && (@card < 311))
+				{
+					mes "Poporing Card.";
+					set god_brising,50;
+					getitem "Poporing_Card",1;
+				}
+				else if ((@card > 310) && (@card < 321))
+				{
+					mes "Worm Tail Card.";
+					set god_brising,50;
+					getitem "Worm_Tail_Card",1;
+				}
+				else if ((@card > 320) && (@card < 326))
+				{
+					mes "Hydra Card.";
+					set god_brising,50;
+					getitem "Hydra_Card",1;
+				}
+				else if ((@card > 325) && (@card < 341))
+				{
+					mes "Muka Card.";
+					set god_brising,50;
+					getitem "Muka_Card",1;
+				}
+				else if ((@card > 340) && (@card < 351))
+				{
+					mes "Snake Card.";
+					set god_brising,50;
+					getitem "Snake_Card",1;
+				}
+				else if ((@card > 350) && (@card < 361))
+				{
+					mes "Zombie Card.";
+					set god_brising,50;
+					getitem "Zombie_Card",1;
+				}
+				else if ((@card > 360) && (@card < 371))
+				{
+					mes "Stainer Card.";
+					set god_brising,50;
+					getitem "Stainer_Card",1;
+				}
+				else if ((@card > 370) && (@card < 376))
+				{
+					mes "Creamy Card.";
+					set god_brising,50;
+					getitem "Creamy_Card",1;
+				}
+				else if ((@card > 375) && (@card < 391))
+				{
+					mes "Coco Card.";
+					set god_brising,50;
+					getitem "Coco_Card",1;
+				}
+				else if ((@card > 390) && (@card < 401))
+				{
+					mes "Steel Chonchon Card.";
+					set god_brising,50;
+					getitem "Steel_Chonchon_Card",1;
+				}
+				else if ((@card > 400) && (@card < 411))
+				{
+					mes "Andre Card.";
+					set god_brising,50;
+					getitem "Andre_Card",1;
+				}
+				else if ((@card > 410) && (@card < 421))
+				{
+					mes "Smokie Card.";
+					set god_brising,50;
+					getitem "Smokie_Card",1;
+				}
+				else if ((@card > 420) && (@card < 431))
+				{
+					mes "Horn Card.";
+					set god_brising,50;
+					getitem "Horn_Card",1;
+				}
+				else if ((@card > 430) && (@card < 441))
+				{
+					mes "Martin Card.";
+					set god_brising,50;
+					getitem "Martin_Card",1;
+				}
+				else if ((@card > 440) && (@card < 451))
+				{
+					mes "Poison Spore Card.";
+					set god_brising,50;
+					getitem "Poison_Spore_Card",1;
+				}
+				else if ((@card > 450) && (@card < 461))
+				{
+					mes "Vadon Card.";
+					set god_brising,50;
+					getitem "Vadon_Card",1;
+				}
+				else if ((@card > 460) && (@card < 466))
+				{
+					mes "Male Thief Bug Card.";
+					set god_brising,50;
+					getitem "Thief_Bug_Male_Card",1;
+				}
+				else if ((@card > 465) && (@card < 481))
+				{
+					mes "Yoyo Card.";
+					set god_brising,50;
+					getitem "Yoyo_Card",1;
+				}
+				else if ((@card > 480) && (@card < 491))
+				{
+					mes "Elder Willow Card.";
+					set god_brising,50;
+					getitem "Elder_Wilow_Card",1;
+				}
+				else if ((@card > 490) && (@card < 496))
+				{
+					mes "Vitata Card.";
+					set god_brising,50;
+					getitem "Vitata_Card",1;
+				}
+				else if ((@card > 495) && (@card < 511))
+				{
+					mes "Marina Card.";
+					set god_brising,50;
+					getitem "Marina_Card",1;
+				}
+				else if ((@card > 510) && (@card < 521))
+				{
+					mes "Dustiness Card.";
+					set god_brising,50;
+					getitem "Dustiness_Card",1;
+				}
+				else if ((@card > 520) && (@card < 536))
+				{
+					mes "Metaller Card.";
+					set god_brising,50;
+					getitem "Metaller_Card",1;
+				}
+				else if ((@card > 535) && (@card < 541))
+				{
+					mes "Thara Frog Card.";
+					set god_brising,50;
+					getitem "Thara_Frog_Card",1;
+				}
+				else if ((@card > 540) && (@card < 551))
+				{
+					mes "Drops Card.";
+					set god_brising,50;
+					getitem "Drops_Card",1;
+				}
+				else if ((@card > 550) && (@card < 561))
+				{
+					mes "Goblin Card.";
+					set god_brising,50;
+					getitem "Goblin_Card",1;					
+				}
+				else if ((@card > 560) && (@card < 571))
+				{
+					mes "Cornutus Card.";
+					set god_brising,50;
+					getitem "Cornutus_Card",1;
+				}
+				else if ((@card > 570) && (@card < 581))
+				{
+					mes "Anacondaq Card.";
+					set god_brising,50;
+					getitem "Anacondaq_Card",1;
+				}
+				else if ((@card > 580) && (@card < 596))
+				{
+					mes "Caramel Card.";
+					set god_brising,50;
+					getitem "Caramel_Card",1;
+				}
+				else if ((@card > 595) && (@card < 601))
+				{
+					mes "Zerom Card.";
+					set god_brising,50;
+					getitem "Zerom_Card",1;
+				}
+				else if ((@card > 600) && (@card < 606))
+				{
+					mes "Kaho Card.";
+					set god_brising,50;
+					getitem "Kaho_Card",1;
+				}
+				else if ((@card > 605) && (@card < 621))
+				{
+					mes "Orc Warrior Card.";
+					set god_brising,50;
+					getitem "Orc_Warrior_Card",1;
+				}
+				else if ((@card > 620) && (@card < 631))
+				{
+					mes "Megalodon Card.";
+					set god_brising,50;
+					getitem "Megalodon_Card",1;
+				}
+				else if ((@card > 630) && (@card < 641))
+				{
+					mes "Scorpion Card.";
+					set god_brising,50;
+					getitem "Scorpion_Card",1;
+				}
+				else if ((@card > 640) && (@card < 651))
+				{
+					mes "Drainliar Card.";
+					set god_brising,50;
+					getitem "Drainliar_Card",1;
+				}
+				else if ((@card > 650) && (@card < 661))
+				{
+					mes "Orc Zombie Card.";
+					set god_brising,50;
+					getitem "Orc_Zombie_Card",1;
+				}
+				else if ((@card > 660) && (@card < 671))
+				{
+					mes "Golem Card.";
+					set god_brising,50;
+					getitem "Golem_Card",1;
+				}
+				else if ((@card > 670) && (@card < 681))
+				{
+					mes "Pirate Skel Card.";
+					set god_brising,50;
+					getitem "Pirate_Skel_Card",1;
+				}
+				else if ((@card > 680) && (@card < 691))
+				{
+					mes "Bigfoot Card.";
+					set god_brising,50;
+					getitem "BigFoot_Card",1;
+				}
+				else if ((@card > 690) && (@card < 701))
+				{
+					mes "Argos Card.";
+					set god_brising,50;
+					getitem "Argos_Card",1;
+				}
+				else if ((@card > 700) && (@card < 716))
+				{
+					mes "Magnolia Card.";
+					set god_brising,50;
+					getitem "Magnolia_Card",1;
+				}
+				else if ((@card > 715) && (@card < 721))
+				{
+					mes "Phen Card.";
+					set god_brising,50;
+					getitem "Phen_Card",1;
+				}
+				else if ((@card > 720) && (@card < 726))
+				{
+					mes "Mantis Card.";
+					set god_brising,50;
+					getitem "Mantis_Card",1;
+				}
+				else if ((@card > 725) && (@card < 741))
+				{
+					mes "Flora Card.";
+					set god_brising,50;
+					getitem "Flora_Card",1;
+				}
+				else if ((@card > 740) && (@card < 751))
+				{
+					mes "Hode Card.";
+					set god_brising,50;
+					getitem "Hode_Card",1;
+				}
+				else if ((@card > 750) && (@card < 761))
+				{
+					mes "Desert Wolf Card.";
+					set god_brising,50;
+					getitem "Desert_Wolf_Card",1;
+				}
+				else if ((@card > 760) && (@card < 766))
+				{
+					mes "Rafflesia Card.";
+					set god_brising,50;
+					getitem "Rafflesia_Card",1;
+				}
+				else if ((@card > 765) && (@card < 781))
+				{
+					mes "Marine Sphere Card.";
+					set god_brising,50;
+					getitem "Marine_Sphere_Card",1;
+				}
+				else if ((@card > 780) && (@card < 791))
+				{
+					mes "Orc Skeleton Card.";
+					set god_brising,50;
+					getitem "Orc_Skeleton_Card",1;
+				}
+				else if ((@card > 790) && (@card < 796))
+				{
+					mes "Soldier Skeleton Card.";
+					set god_brising,50;
+					getitem "Soldier_Skeleton_Card",1;
+				}
+				else if ((@card > 795) && (@card < 811))
+				{
+					mes "Giearth Card.";
+					set god_brising,50;
+					getitem "Giearth_Card",1;
+				}
+				else if ((@card > 810) && (@card < 816))
+				{
+					mes "Frilldora Card.";
+					set god_brising,50;
+					getitem "Frilldora_Card",1;
+				}
+				else if ((@card > 815) && (@card < 831))
+				{
+					mes "Swordfish Card.";
+					set god_brising,50;
+					getitem "Sword_Fish_Card",1;
+				}
+				else if ((@card > 830) && (@card < 841))
+				{
+					mes "Munak Card.";
+					set god_brising,50;
+					getitem "Munak_Card",1;
+				}
+				else if ((@card > 840) && (@card < 851))
+				{
+					mes "Kobold Card.";
+					set god_brising,50;
+					getitem "Kobold_Card",1;
+				}
+				else if ((@card > 850) && (@card < 861))
+				{
+					mes "Skel Worker Card.";
+					set god_brising,50;
+					getitem "Skel_Worker_Card",1;
+				}
+				else if ((@card > 860) && (@card < 871))
+				{
+					mes "Obeaune Card.";
+					set god_brising,50;
+					getitem "Obeaune_Card",1;
+				}
+				else if ((@card > 870) && (@card < 881))
+				{
+					mes "Archer Skeleton Card.";
+					set god_brising,50;
+					getitem "Archer_Skeleton_Card",1;
+				}
+				else if ((@card > 880) && (@card < 891))
+				{
+					mes "Marse Card.";
+					set god_brising,50;
+					getitem " Marse_Card",1;
+				}
+				else if ((@card > 890) && (@card < 901))
+				{
+					mes "Zenorc Card.";
+					set god_brising,50;
+					getitem "Zenorc_Card",1;
+				}
+				else if ((@card > 900) && (@card < 906))
+				{
+					mes "Matyr Card.";
+					set god_brising,50;
+					getitem "Matyr_Card",1;
+				}
+				else if ((@card > 905) && (@card < 921))
+				{
+					mes "Dokebi Card.";
+					set god_brising,50;
+					getitem "Dokebi_Card",1;
+				}
+				else if ((@card > 920) && (@card < 931))
+				{
+					mes "Pasana Card.";
+					set god_brising,50;
+					getitem "Pasana_Card",1;
+				}
+				else if ((@card > 930) && (@card < 941))
+				{
+					mes "Sohee Card.";
+					set god_brising,50;
+					getitem "Sohee_Card",1;
+				}
+				else if ((@card > 940) && (@card < 951))
+				{
+					mes "Sandman Card.";
+					set god_brising,50;
+					getitem "Sand_Man_Card",1;
+				}
+				else if ((@card > 950) && (@card < 956))
+				{
+					mes "Whisper Card.";
+					set god_brising,50;
+					getitem "Whisper_Card",1;
+				}
+				else if ((@card > 965) && (@card < 971))
+				{
+					mes "Horong Card.";
+					set god_brising,50;
+					getitem "Horong_Card",1;
+				}
+				else if ((@card > 970) && (@card < 981))
+				{
+					mes "Requiem Card.";
+					set god_brising,50;
+					getitem "Requiem_Card",1;
+				}
+				else if ((@card > 980) && (@card < 986))
+				{
+					mes "Marc Card.";
+					set god_brising,50;
+					getitem "Marc_Card",1;
+				}
+				else if ((@card > 985) && (@card < 991))
+				{
+					mes "Mummy Card.";
+					set god_brising,50;
+					getitem "Mummy_Card",1;
+				}
+				else if ((@card > 990) && (@card < 996))
+				{
+					mes "Verit Card.";
+					set god_brising,50;
+					getitem "Verit_Card",1;
+				}
+				else if ((@card > 995) && (@card < 1001))
+				{
+					mes "Myst Card.";
+					set god_brising,50;
+					getitem "Myst_Card",1;
+				}
+				else if ((@card > 1000) && (@card < 1011))
+				{
+					mes "Jakk Card.";
+					set god_brising,50;
+					getitem "Jakk_Card",1;
+				}
+				else if ((@card > 1010) && (@card < 1021))
+				{
+					mes "Ghoul Card.";
+					set god_brising,50;
+					getitem "Ghoul_Card",1;
+				}
+				else if ((@card > 1020) && (@card < 1031))
+				{
+					mes "Strouf Card.";
+					set god_brising,50;
+					getitem "Strouf_Card",1;
+				}
+				else if ((@card > 1030) && (@card < 1041))
+				{
+					mes "Marduk Card.";
+					set god_brising,50;
+					getitem "Marduk_Card",1;
+				}
+				else if ((@card > 1040) && (@card < 1051))
+				{
+					mes "Marionette Card.";
+					set god_brising,50;
+					getitem "Marionette_Card",1;
+				}
+				else if ((@card > 1050) && (@card < 1061))
+				{
+					mes "Here is an Argiope Card.";
+					set god_brising,50;
+					getitem "Argiope_Card",1;
+				}
+				else if ((@card > 1060) && (@card < 1071))
+				{
+					mes "Hunter Fly Card.";
+					set god_brising,50;
+					getitem "Hunter_Fly_Card",1;
+				}
+				else if ((@card > 1070) && (@card < 1081))
+				{
+					mes "Here is an Isis Card.";
+					set god_brising,50;
+					getitem "Isis_Card",1;
+				}
+				else if ((@card > 1080) && (@card < 1091))
+				{
+					mes "Sidewinder Card.";
+					set god_brising,50;
+					getitem "Side_Winder_Card",1;
+				}
+				else if ((@card > 1090) && (@card < 1101))
+				{
+					mes "Walking Petite Card.";
+					set god_brising,50;
+					getitem "Petit_Card",1;
+				}
+				else if ((@card > 1100) && (@card < 1111))
+				{
+					mes "Bathory Card.";
+					set god_brising,50;
+					getitem "Bathory_Card",1;
+				}
+				else if ((@card > 1110) && (@card < 1121))
+				{
+					mes "Flying Petite Card.";
+					set god_brising,50;
+					getitem "Petit__Card",1;
+				}
+				else if ((@card > 1120) && (@card < 1131))
+				{
+					mes "Deviruchi Card.";
+					set god_brising,50;
+					getitem "Deviruchi_Card",1;
+				}
+				else if ((@card > 1130) && (@card < 1141))
+				{
+					mes "Medusa Card.";
+					set god_brising,50;
+					getitem "Medusa_Card",1;
+				}
+				else if ((@card > 1140) && (@card < 1151))
+				{
+					mes "Deviace Card.";
+					set god_brising,50;
+					getitem "Deviace_Card",1;
+				}
+				else if ((@card > 1150) && (@card < 1161))
+				{
+					mes "Minorous Card.";
+					set god_brising,50;
+					getitem "Minorous_Card",1;
+				}
+				else if ((@card > 1160) && (@card < 1171))
+				{
+					mes "Nightmare Card.";
+					set god_brising,50;
+					getitem "Nightmare_Card",1;
+				}
+				else if ((@card > 1170) && (@card < 1176))
+				{
+					mes "Baphomet Jr. Card.";
+					set god_brising,50;
+					getitem "Baphomet__Card",1;
+				}
+				else if ((@card > 1175) && (@card < 1181))
+				{
+					mes "Raydric Card.";
+					set god_brising,50;
+					getitem "Daydric_Card",1;
+				}
+				else if ((@card > 1180) && (@card < 1186))
+				{
+					mes "Khalitzburg Card.";
+					set god_brising,50;
+					getitem "Khalitzburg_Card",1;
+				}
+				else if ((@card > 1185) && (@card < 1191))
+				{
+					mes "Joker Card.";
+					set god_brising,50;
+					getitem "Joker_Card",1;
+				}
+				else if ((@card > 1190) && (@card < 1196))
+				{
+					mes "Abysmal Knight Card.";
+					set god_brising,50;
+					getitem "Knight_Of_Abyss_Card",1;
+				}
+				else if ((@card > 1195) && (@card < 1201))
+				{
+					mes "Druid Card.";
+					set god_brising,50;
+					getitem "Evil_Druid_Card",1;
+				}
+				else if ((@card > 1200) && (@card < 1206))
+				{
+					mes "Santa Poring Card.";
+					set god_brising,50;
+					getitem "Poring__Card",1;
+				}
+					else
+				{
+					mes "Poring Card.";
+					set god_brising,50;
+					getitem "Poring_Card",1;
+				}
+				next;
+				mes "[Enrico Kaili]";
+				mes "Please accept this as my way of thanking you for assisting in my research.";
+				next;
+				mes "[Enrico Kaili]";
+				mes "If the opportunity arises, I would like to ask you for your help once again. Now please, take care.";
+				
+				if ($God3 < 100) set $God3,$God3 +1;
+				
+					if ($God3 == 50) announce "The 3rd Seal of [Brisingamen] has appeared.",bc_all;
+					else if ($God3 == 100)
+				{				
+					if ($God1 == 100 && $God2 == 100 && $God3 == 100 && $God4 == 100) announce "All 4 Seals of [Brisingamen] have been released.",bc_all;
+					else announce "A Seal of [Brisingamen] has been released.",bc_all;
+				}
+				close;
+	}
+		else if(god_brising == 48)
+	{
+		mes "[Enrico Kaili]";
+		mes "Why are you still here?";
+		mes "I asked you to go find him.";
+		mes "Ah~ I cannot wait...";
+		emotion e_flash;
+		close;
+	}
+		else if(god_brising == 47)
+	{
+		mes "[Enrico Kaili]";
+		mes "I guess that's true that the four have been awakened. Does this mean that Brisingamen can now be created?";
+		next;
+		mes "[Enrico Kaili]";
+		mes "If such a thing is possible, what do we need in order to create it? Let's review the information you've gathered...";
+		next;
+		mes "[Enrico Kaili]";
+		mes "There's Freya's Tear Drop Crystal, Freya's Jewel, the Never-Melting Snow Crystal found where Alfrik used to stay...";
+		next;
+		mes "[Enrico Kaili]";
+		mes "The Drifting Air from the path where Dvalin slept. Hmm.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "Perhaps we could find something from the pond of Freya's Gold Tears where Berling is sleeping, though I am unsure.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "I also assume that the splendid Silver Ornament constructed by Gher is also needed to create Brisingamen.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "So what";
+		mes "do you think?";
+		next;
+		menu "I'm not sure...",-,"I suppose you're right.",L_Right;
+				mes "[" + strcharinfo(0) + "]";
+				mes "I...";
+				mes "I mean, maybe Alfrik would probably know, bu--";
+				next;
+				mes "[Enrico Kaili]";
+				mes "Of course!";
+				mes "That's a great idea! I'll wait here while you go and ask Alfrik. You're my only hope in completing this research!";
+				next;
+				emotion e_hmm,1;
+				mes "[" + strcharinfo(0) + "]";
+				mes "(^333333I should've not said anything...^000000)";
+				next;
+				mes "[Enrico Kaili]";
+				mes "Well, what are";
+				mes "waiting for? Please";
+				mes "come back as soon as";
+				mes "possible.";
+				set god_brising,48;
+				close;
+			
+			L_Right:
+				mes "[" + strcharinfo(0) + "]";
+				mes "I suppose";
+				mes "you're right.";
+				next;
+				mes "[" + strcharinfo(0) + "]";
+				mes "Still, who knows what exactly is in the Pond of Frey's Golden Tears.";
+				next;
+				mes "[Enrico Kaili]";
+				mes "Yes.";
+				mes "Ah! Right.";
+				mes "Hm, perhaps it would be best to ask Alfrik first?";
+				next;
+				mes "[Enrico Kaili]";
+				mes "Hurry and seek him";
+				mes "out! And I thank you";
+				mes "in advance.";
+				set god_brising,48;
+				close;
+	}
+		else if(god_brising == 46)
+	{
+		mes "[Enrico Kaili]";
+		mes "I guess he finally sang for you? By the way, why didn't you speak to Grer the Dwarf? Oh right, the mine is heavily populated with monsters.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "I know it won't be easy, but please seek him out and get more information.";
+		mes "Thank you in advance.";
+		close;
+	}
+		else if(god_brising == 45)
+	{
+		mes "[Enrico Kaili]";
+		mes "Hm...?";
+		mes "Did you forget the words to the song? Well, I didn't write them down either. Hahahaha! I guess there's only one thing you can do~";
+		next;
+		mes "[Enrico Kaili]";
+		mes "You've got to go back to Berling and ask him for the lyrics again. Good luck, and don't forget to memorize them this time.";
+		close;
+	}
+		else if(god_brising == 44)
+	{
+		mes "[Enrico Kaili]";
+		mes "It looks like you were able to answer that riddle. Good work!";
+		next;
+		mes "[Enrico Kaili]";
+		mes "That strange, unearthly feeling of dampness. Ah, you've brought Freya's Tear Drops! That means Grer must have awakened on his own now.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "I suppose your next course of action should be to enter the mine. I'm sorry for the trouble, but I grow more excited with each new thing we learn.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "It's only with your help that I've been able to make such progress with my research. Anyway, I shall share my conclusions with you later.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "So are you heading for the mine now? Be careful around those monsters.";
+		close;
+	}
+		else if(god_brising == 43)
+	{
+		mes "[Enrico Kaili]";
+		mes "Oh...I have not waited in vain.";
+		mes "I guess Dvalin meant the endless war by the riddle.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "There were two kings. Each king had 20 knights.";
+		mes "Those knights fought until they died and revived to fight again.";
+		mes "They repeated the endless war over and over again.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "If they gathered and occurred a war again,";
+		mes "there would be enormous dead in the battlefield.";
+		mes "Valkyries selected the strongest";
+		mes "among warriors in Valhala to organize Einherjar.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "Yes, that's an old story that everyone knows.";
+		mes "...and it turned out to be true.";
+		mes "Interesting.";
+		mes "Anyways...";
+		next;
+		mes "[Enrico Kaili]";
+		mes "I guess it is the time to investigate the story about Berling.";
+		mes "There is a stream that starts from north west of Prontera";
+		mes "and passes a mine in Mountain Mjolnir.";
+		mes "I assume that maybe Berling meant the place.";
+		mes "However, stream never stays in a place...";
+		mes "he might meant a puddle instead of stream...";
+		next;
+		mes "[Enrico Kaili]";
+		mes "I am so confused.";
+		mes "I wonder what the riddle means as well...";
+		mes "Anyways, come back as soon as possible!";
+		close;
+	}
+		else if(god_brising == 42)
+	{
+		mes "[Enrico Kaili]";
+		mes "Are you sure?!";
+		mes "Were they really for Freya's Necklace...";
+		mes "Brisingamen...?!";
+		next;
+		mes "[Enrico Kaili]";
+		mes "If the four dwarves wake up...";
+		mes "would Brisingamen appear to people's eyes?!";
+		mes "Ah...you...God must send you to me for the research.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "...I cannot believe that I might be able to experience the power of God...";
+		mes "Ah......";
+		mes ".....anyway...the place where Dvalin is sleeping...";
+		next;
+		mes "[Enrico Kaili]";
+		mes "It says the patch is at the east forest...";
+		mes "....I assume maybe it is near the monastic vows...";
+		mes "......Ah, it is just my assumption. We don't know until we go find out...";
+		next;
+		mes "[Enrico Kaili]";
+		mes "I hope you can help me for that.";
+		mes "I am still not sure about what the research will lead us but";
+		mes "I know you want to find out as much as I do.";
+		mes "Hahahaha	ha...";
+		next;
+		mes "[Enrico Kaili]";
+		mes "Please leave to the monastic vows in the east.";
+		mes "The godly power....how it will be to possess it as a human being...?!";
+		mes "What if it destroyes the human world....?! Hahahaha...";
+		close;
+	}
+		else if(god_brising == 41)
+	{
+		mes "[Enrico Kaili]";
+		mes "What? What did you just say?";
+		mes "You met Alfrik...?";
+		mes "Oh my god, you're the chosen one!";
+		mes "I cannot believe that legendary Alfrik is still alive...";
+		next;
+		mes "[Enrico Kaili]";
+		mes "Alfrik is one of the four dwarves";
+		mes "who made a shining neklace for goddess Freya.";
+		mes "Of course, Dvalin is also one of them.";
+		mes "Oh my god...";
+		mes "I cannot believe we're talking about Brisingamen...";
+		next;
+		mes "[Enrico Kaili]";
+		mes "Now I realise what we have been doing!";
+		mes "We have been searching for an item with the power of God!";
+		mes "...Dvalin...";
+		mes "I am wondering where he is sleeping...";
+		next;
+		mes "[Enrico Kaili]";
+		mes "....by the way,";
+		mes "why didn't you ask Alfrik";
+		mes "if he knows where Dvalin stays...?";
+		mes "Errr...";
+		close;
+	}
+		else if(god_brising == 40)
+	{
+		mes "[Enrico Kaili]";
+		mes "I suggest you to go check Lutie.";
+		mes "I am pretty sure you will find a trace of the goddess somewhere.";
+		mes "Also you already met Valkyrie.";
+		mes "I have no doubt you will find the trace.";
+		mes "And...";
+		next;
+		mes "[Enrico Kaili]";
+		mes "I have been thinking about these words...";
+		mes "^4d4dff to the steps in";
+		mes "to that beautiful hair";
+		mes "to those dazzling eyes";
+		mes "we gave all of our hearts in^000000";
+		next;
+		mes "[Enrico Kaili]";
+		mes "I have no clue what they means...";
+		mes "I seriously started doubting that what I know";
+		mes "could be different from the truth.";
+		mes "Anyway, I am going to study other stuffs for now.";
+		close;
+	}
+		else if(god_brising == 35)
+	{
+		mes "[Enrico Kaili]";
+		mes "I can tell you have gone through many difficulties.";
+		mes "Please come this way.";
+		mes "So what did you hear from Hermite?";
+		next;
+		mes " - You told him what you were told from Hermite -";
+		mes " - and from Valkyrie. -";
+		next;
+		mes "[Enrico Kaili]";
+		mes "Great! I cannot believe it actually happened!";
+		mes "....hmm....as I guessed";
+		mes "it is possible to possess the godly power...";
+		next;
+		mes "[Enrico Kaili]";
+		mes "It is resonant with a thing sent from the royal court";
+		mes "for some reason. Now, come closer and look at this.";
+		next;
+		mes "- Enrico opened a locked chest and -";
+		mes "- took out a jewel that was so beautiful to believe its actual existance. -";
+		mes "- The jewel dazzling like a tear drop of a goddess -";
+		mes "- started responding with the Snow Crystal as it's closer. -";
+		next;
+		mes "[Enrico Kaili]";
+		mes "...so? Isn't it amazing?";
+		mes "If what Valkyrie said is true,";
+		mes "this jewel must be the crystal of a Freya's tear drop.";
+		mes "Hmmmm.....";
+		mes "Power of Gods...";
+		next;
+		mes "[Enrico Kaili]";
+		mes "I don't understand why all these indications";
+		mes "have appeared in this age...";
+		mes "....anyways, I appreciate you for helping me so far.";
+		mes "I am going to think about the poem";
+		mes "that you have heard from Valkyrie.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "It says...a cold snowy path";
+		mes "the blue river that the goddess walked cross";
+		mes "a narrow path and four dwarves.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "The four dwarves must mean the four dwarves who were well-known for their craft skill...";
+		mes "....I cannot pinpoint what the river and the paths means.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "Now, there is something you can help me again!";
+		next;
+		menu "Wah? I thought it's already over?",-,"What is it this time?",L_What;
+				mes "[Enrico Kaili]";
+				mes "Hell no!";
+				mes "You are supposed to help me for my research, aren't you?";
+				mes "Unfortunately, my research has never been over.";
+				mes "Hahahaha.";
+				next;
+				mes "[Enrico Kaili]";
+				mes "Now, you are going to leave to Lutie!";
+				mes "Find out some clues there.";
+				mes "The legend says,";
+				next;
+				mes "[Enrico Kaili]";
+				mes "Goddess had to walk on the cold snowy path alone";
+				mes "without the cat of obedience.";
+				mes "She shed tears because of piercing cold.";
+				next;
+				mes "[Enrico Kaili]";
+				mes "As a matter of fact, this Freya's Jewel was";
+				mes "firstly founded in Lutie.";
+				mes "That shows the legend tells us the truth by indicating the cold snowy path.";
+				next;
+				mes "[Enrico Kaili]";
+				mes "Please go start your journey to find the trace of goddess";
+				mes "from Lutie, as what Valkyrie said.";
+				mes "I hope we will find out what the goddess";
+				mes "left in this world together.";
+				set god_brising,40;
+				close;
+			
+			L_What:
+				mes "[Enrico Kaili]";
+				mes "Hahahaha...I like your attitute!";
+				mes "Yes, Nelliorde has an eye to see a man.";
+				mes "Somehow you decided to help me out";
+				mes "for this research, I hope you will do your best";
+				mes "until the last moment.";
+				next;
+				mes "[Enrico Kaili]";
+				mes "Now, you are going to leave to Lutie!";
+				mes "Find out some clues there.";
+				mes "The legend says,";
+				next;
+				mes "[Enrico Kaili]";
+				mes "Goddess had to walk on the cold snowy path alone";
+				mes "without the cat of obedience.";
+				mes "She shed tears because of piercing cold.";
+				next;
+				mes "[Enrico Kaili]";
+				mes "As a matter of fact, this Freya's Jewel was";
+				mes "firstly founded in Lutie.";
+				mes "That shows the legend tells us the truth by indicating the cold snowy path.";
+				next;
+				mes "[Enrico Kaili]";
+				mes "Please go start your journey to find the trace of goddess";
+				mes "from Lutie, as what Valkyrie said.";
+				mes "I hope we will find out what the goddess";
+				mes "left in this world together.";
+				set god_brising,40;
+				close;
+	}
+		else if(god_brising > 9 && god_brising < 35)
+	{
+		mes "[Enrico Kaili]";
+		mes "Hmm... I see...";
+		mes "I know that I have been such a burden to you.";
+		mes "But I will not forget what you have done for me.";
+		mes "I will give you one of my precious collections";
+		mes "as the token of my gratitude.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "I wish you good luck.";
+		mes "And please take care.";
+		close;
+	}
+		else if(god_brising > 3 && god_brising < 10)
+	{
+		mes "[Enrico Kaili]";
+		mes "So, have you met Hermite?";
+		mes "What...? Did he really ask you to do that...?";
+		mes "....hmmm....I must say...I know it's not an easy thing to do";
+		mes "but I hope you will do what he wants.";
+		mes "And I will next; for a good news from you for the time being.";
+		close;
+	}
+		else if(god_brising == 3)
+	{
+		mes "[Enrico Kaili]";
+		mes "Hermite? Do you need any information about him?";
+		mes "Let me think. Hmm...in my memory";
+		mes "he was a young man in an urban atmosphere...";
+		next;
+		mes "[Enrico Kaili]";
+		mes "Oh, that's right! Why don't you go ask";
+		mes "the lady ahead?";
+		mes "She might have some registration information.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "What? Are you wondering why I don't do it on my own?";
+		mes "Because! I am too old to go on an expedition...";
+		mes "and also I have some research requests from the royal court.";
+		mes "I am not supposed to leave this organization.";
+		mes "That was why I had sought";
+		mes "for a young and reliable adventurer like you";
+		mes "who can do what I am unable to do.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "Ah...of course I will reward you later.";
+		mes "Do not think of me as a penny pincher";
+		mes "who does not like to 'Hire' professionals.";
+		mes "Anyways, thank you in advance.";
+		close;
+	}
+		else if(god_brising == 2)
+	{
+		mes "[Enrico Kaili]";
+		mes "So, have you considered my proposal?";
+		mes "If this thing works out,";
+		mes "I will pay you back.";
+		mes "What do you say?";
+		next;
+		menu "No, thanks.",-,"Sure, why not.",L_Sure;
+				mes "[Enrico Kaili]";
+				mes "What...?! You are too mean!";
+				mes "Why did you even get bothered to speak to me";
+				mes "when you don't want to help me?";
+				mes "I do not wish to talk to you.";
+				mes "Please leave.";
+				close;
+			L_Sure:
+				mes "[Enrico Kaili]";
+				mes "Are you sure you want to help me?";
+				mes "That's great.";
+				mes "Before we start, would like to see this thing first?";
+				next;
+				mes "- The old scholar showed you -";
+				mes "- a small white crystallization within a box. -";
+				mes "- It looked very thin and freezing cold. -";
+				next;
+				mes "[Enrico Kaili]";
+				mes "This is the snow crystal...";
+				mes "at least that's what I think.";
+				mes "Look at this shape and texture.";
+				mes "Doesn't it look like a snow flake?";
+				mes "The strange thing is...this never gets molten.";
+				next;
+				mes "[Enrico Kaili]";
+				mes "Few years ago, a young adventurer gave me this.";
+				mes "I have not figured out what actually this is...";
+				mes "I want to know what this is and where it came from.";
+				next;
+				mes "[Enrico Kaili]";
+				mes "Yes, I am looking for a person.";
+				mes "The person who brought me this Snow Crystal.";
+				mes "Let me check his name...yes, here it is.";
+				mes "His name is ...Hermite Charles.";
+				next;
+				mes "[Enrico Kaili]";
+				mes "When you find him,";
+				mes "please give him this letter.";
+				next;
+				mes "^4d4dff - Enrico gave you -";
+				mes "- a thin letter sealed with red wax. -";
+				mes "- 'Dear Hermite Charles' was written on the front.-";
+				set god_brising,3;
+				close;
+	}
+		else if(god_brising == 1)
+	{
+		mes "[Enrico Kaili]";
+		mes "How are you...ah! It is you, " + strcharinfo(0) + "!";
+		mes "Yes, I was told by Nelliorde that you will visit me.";
+		mes "He always tells me that he will";
+		mes "a good assistance for my research.";
+		mes "So, how was your travel?";
+		next;
+		mes "[Enrico Kaili]";
+		mes "Hahaha, I guess you would not have a hard time to come";
+		mes "to Juno...since there are various convenience travelling";
+		mes "methods as warp portal and kafra teleport service!";
+		mes "So, how was my joke? Hahahaha!";
+		next;
+		mes "[Enrico Kaili]";
+		mes "As you were told by Nelliorde,";
+		mes "I would like to ask you to help my research...";
+		mes "specifically finding a person.";
+		next;
+		mes "[Enrico Kaili]";
+		mes "Since you are an adventurer, I assume";
+		mes "you like to travel a lot?";
+		mes "Why don't you find the person I am looking for";
+		mes "during your travel? It is not that hard.";
+		mes "And I was told by Nelliorde that";
+		mes "you are a pretty well-experienced adventurer.";
+		next;
+		menu "I am no good at finding people.",-,"I can do that!",L_Ok;
+				mes "[Enrico Kaili]";
+				mes "......bah...";
+				mes "I was convinced that you would help me for sure...";
+				mes "...but I understand if you don't want to do it.";
+				mes "I can find another adventurer.";
+				mes "...sigh...if I was a little bit younger,";
+				mes "I would not have to ask a favor...";
+				next;
+				mes "[Enrico Kaili]";
+				mes "I see. But if you change your mind later";
+				mes "please come back.";
+				mes "And I am so sorry to make you travel this far.";
+				mes "Take care.";
+				set god_brising,2;
+				close;
+			L_Ok:
+				mes "[Enrico Kaili]";
+				mes "Are you sure you want to help me?";
+				mes "That's great.";
+				mes "Before we start, would like to see this thing first?";
+				next;
+				mes "- The old scholar showed you -";
+				mes "- a small white crystallization within a box. -";
+				mes "- It looked very thin and freezing cold. -";
+				next;
+				mes "[Enrico Kaili]";
+				mes "This is the snow crystal...";
+				mes "at least that's what I think.";
+				mes "Look at this shape and texture.";
+				mes "Doesn't it look like a snow flake?";
+				mes "The strange thing is...this never gets molten.";
+				next;
+				mes "[Enrico Kaili]";
+				mes "Few years ago, a young adventurer gave me this.";
+				mes "I have not figured out what actually this is...";
+				mes "I want to know what this is and where it came from.";
+				next;
+				mes "[Enrico Kaili]";
+				mes "Yes, I am looking for a person.";
+				mes "The person who brought me this Snow Crystal.";
+				mes "Let me check his name...yes, here it is.";
+				mes "His name is ...Hermite Charles.";
+				next;
+				mes "[Enrico Kaili]";
+				mes "When you find him,";
+				mes "please give him this letter.";
+				next;
+				mes "^4d4dff - Enrico gave you -";
+				mes "- a thin letter sealed with red wax. -";
+				mes "- 'Dear Hermite Charles' was written on the front.-";
+				set god_brising,3;
+				close;
+	}
+		else
+	{
+		mes "[Enrico Kaili]";
+		mes "I am not sure what purpose you have in here, but I am busy at this moment.";
+		mes "Please leave me with my research.";
+		close;
+	}
+}							
+	else
+{
+	mes "[Studying Scholar]";
+	mes "Do you know how to make red potions?";
+	mes "You grind a lot of red herbs";
+	mes "and shake the liquid with care until it become a red potion.";
+	mes "If I could only shake them faster....";
+	mes "I would be able to rich in no time...";
+	close;
+}
+
+}
+
+prt_church.gat,113,103,1	script	Praying Man	798,{
+ 
+	if($God2 < 50)
+{
+	mes "[Praying Man]";
+	mes "Let everyone live a life of happiness. Let there be peace in the world...";
+	next;
+	mes "[Praying Man]";
+	mes "May I hit it rich with this Old Blue Box that I spend this month's paycheck on...";
+	close;
+}
+	if($God3 > 99)
+{
+	mes "[Praying Man]";
+	mes "Now is the time to reflect upon the past to prepare for the future.";
+	next;
+	mes "[Praying Man]";
+	mes "It is in stillness that we find the wisdom to know which steps we must take to move forward. Let's pray.";
+	close;
+}
+	if(god_brising > 34)
+{
+	mes "^3355FFHermite Charles continues to fervently pray. His eyes are closed and his hands are clasped to his chest. There seems to be an air of faint sadness about him.^000000";
+	close;
+}
+	else if(god_brising == 34)
+{
+	mes "[Hermite Charles]";
+	mes "What did you just say? Did she really become an Einherjar? That's the greatest honor for any warrior...";
+	next;
+	mes "[Hermite Charles]";
+	mes "She must be so happy.";
+	mes "I guess in the end,";
+	mes "I never really had";
+	mes "any place in her heart.";
+	mes "Lowen...";
+	next;
+	mes "[Hermite Charles]";
+	mes "But I know one thing for sure. She roamed for two years because I made her run away.";
+	next;
+	mes "[Hermite Charles]";
+	mes "She should have blamed me for what happened. Why did she take everything upon herself? It was me...";
+	next;
+	mes "[Hermite Charles]";
+	mes "I guess she just saw me as a little  brother. She obviously didn't take me very seriously.";
+	next;
+	mes "[Hermite Charles]";
+	mes "Haha....hahaha...";
+	mes "Now I feel better!";
+	mes "So, what did you say?";
+	next;
+	mes "[Hermite Charles]";
+	mes "Yes, right.";
+	mes "Please tell Enrico this.";
+	mes "The object he's interested in was given by His Majesty to a guild that possessed a castle.";
+	next;
+	mes "[Hermite Charles]";
+	mes "It can never be made through just human technology. But I guess that His Majesty will let scholars study it, and let men possess it if they prove capable.";
+	next;
+	mes "[Hermite Charles]";
+	mes "I wasn't powerful enough to earn it. Frankly I stole it. But soon I began to fear its presense and my heart would pound with trepidation when I saw it.";
+	next;
+	mes "[Hermite Charles]";
+	mes "One day, I think it actually possessed me and I ended up going on a journey. I'm not really sure exactly where though...";
+	next;
+	mes "[Hermite Charles]";
+	mes "All I remember was that I was in Lutie, the town of snow. I went over a bridge to a hill to the West...";
+	next;
+	mes "[Hermite Charles]";
+	mes "But once I arrived there, I was seized with this feeling of terror I can't explain.";
+	next;
+	mes "[Hermite Charles]";
+	mes "I ended up running away. That's why I gave it to Mr. Enrico. You can laugh at me for being a coward if you want.";
+	next;
+	mes "[Hermite Charles]";
+	mes "You know everything now.";
+	mes "Please leave me alone.";
+	mes "^333333*Sigh...*^000000";
+	set god_brising,35;
+	close;
+}
+	else if(god_brising > 19 && god_brising < 34)
+{
+	mes "[Hermite Charles]";
+	mes "I'll be waiting.";
+	mes "For some reason, I believe you'll be able to find some sort of clue about what happened these past two years one of these days.";
+	close;
+}
+	else if(god_brising == 12)
+{
+	mes "[Hermite Charles]";
+	mes "Lohen Phelicia?";
+	mes "The person I asked you to find is Lowen, not Lohen. Lowen Ellenen.";
+	next;
+	mes "[Hermite Charles]";
+	mes "I'm sorry for the trouble, but I think you better try again.";
+	set god_brising,10;
+	close;
+}
+	else if(god_brising == 11)
+{
+	mes "[Hermite Charles]";
+	mes "What...?";
+	mes "How could you";
+	mes "talk to her?!";
+	mes "She's dead!";
+	next;
+	mes "[Hermite Charles]";
+	mes "I've heard those rumors, but she's definitely passed away. I was even at her funeral. She can't be alive. That's not true at all.";
+	next;
+	mes "[Hermite Charles]";
+	mes "The last time I saw her alive was in Geffen. Two years after that, I saw her buried in her grave. Didn't I tell you this?";
+	next;
+	mes "[Hermite Charles]";
+	mes "I wanted you to find out what happened in those two years before she died. I wanted to know what led her to her death.";
+	next;
+	mes "[Hermite Charles]";
+	mes "What the hell";
+	mes "killed her?!";
+	mes "Don't you understand";
+	mes "the way I feel?";
+	set god_brising,20;
+	close;
+}
+	else if(god_brising == 10)
+{
+	mes "[Hermite Charles]";
+	mes "Lowen was a Crusader, a knight in the service of holiness preparing for the Holy War.";
+	next;
+	mes "[Hermite Charles]";
+	mes "I always expected her to become a Knight in the Prontera Chivalry, but suddenly she changed her mind and became a Crusader. I saw her for the last time in Geffen.";
+	next;
+	mes "[Hermite Charles]";
+	mes "I beg you, please learn anything you can about what happened to her.";
+	close;
+}
+	else if(god_brising == 5)
+{
+	set @brising_try,rand(1,4);
+		if(@brising_try == 1)
+	{
+		mes "[Hermite Charles]";
+		mes "You're still here.";
+		mes "Does that mean you";
+		mes "want to hear my";
+		mes "story after all?";
+		next;
+ 		menu "Yes, I would like to.",-,"No, thanks.",L_NoThx;
+				mes "[Hermite Charles]";
+				mes "Thank you...";
+				mes "Perhaps you're doing this merely out of consideration, but I still appreciate your kindness. The story I will tell you is very old.";
+				next;
+				mes "[Hermite Charles]";
+				mes "Long ago, there was a little boy who never knew his parents. Just to survive, he became a Thief and eventually joined the Rogue Guild.";
+				next;
+				mes "[Hermite Charles]";
+				mes "Without any goals or dreams, his life was pretty aimless. He pretty much only lived so that he could see tomorrow.";
+				next;
+				mes "[Hermite Charles]";
+				mes "However, the little boy met someone who was full of hope and kindess. He admired her and she became his reason for living.";
+				next;
+				mes "[Hermite Charles]";
+				mes "She will never know that the little boy loved her more than anything else. Unlike the boy, her dream was devote her life to God.";
+				next;
+				mes "[Hermite Charles]";
+				mes "Although he never understood that, he knew that he would be happy to just be near her, watching from a distance.";
+				next;
+				mes "[Hermite Charles]";
+				mes "But one day, because of one fatal mistake, he lost her and she never came back.";
+				next;
+				mes "[Hermite Charles]";
+				mes "Ever since, that boy has been coming to the Sanctuary everyday to pray for her safety, even into adulthood.";
+				next;
+				mes "[Hermite Charles]";
+				mes "...";
+				mes "......^333333*Sob*^000000";
+				mes "Please find";
+				mes "her for me.";
+				mes "Find Lowen.";
+				next;
+				mes "[Hermite Charles]";
+				mes "I know that Enrico has sent you. I'm guessing he needs something from me. Am I wrong?";
+				next;
+				mes "[Hermite Charles]";
+				mes "I'll do whatever you want if you do what I want you to do. It's simple: find out anything you can about Lowen.";
+				next;
+				mes "[Hermite Charles]";
+				mes "It's doesn't matter how insignificant the traces may be, anything will do. I want to know everything related to her!";
+				next;
+				menu "Uhhhhh...",-,"Sorry, I can't.",L_Sorry,"When was the last time you saw her?",L_Last;
+						mes "[Hermite Charles]";
+						mes "Please consider my proposal. If you can find Lowen for me, I'll give you what you want.";
+						next;
+						mes "[Hermite Charles]";
+						mes "Please, I beg you.";
+						mes "You are a strong and well-experienced adventurer. Isn't this a simple thing for you to do?";
+						next;
+						mes "[Hermite Charles]";
+						mes "If you've ever dearly loved someone, then you'd know how desperate I am. Please find Lowen for me.";
+						next;
+						menu "...Alright.",-,"I'm sorry, I don't think I can do it.",L_Think;
+								mes "[" + strcharinfo(0) + "]";
+								mes "Alright.";
+								mes "I'll try my best to find her. Would you tell me more about Lowen?";
+								next;
+								mes "[Hermite Charles]";
+								mes "She is a crusader.";
+								mes "The last time I saw her was deep inside Geffen Dungeon.";
+								next;
+								mes "[Hermite Charles]";
+								mes "Long ago, some Crusaders entered the Geffen Dungeon on a monster subjugation expedition.";
+								next;
+								mes "[Hermite Charles]";
+								mes "Please find";
+								mes "anything that";
+								mes "you can. I beg";
+								mes "of you...";
+								set god_brising,10;
+								close;
+							L_Think:
+								mes "[Hermite Charles]";
+								mes "^333333*Sigh*^000000";
+								mes "I understand.";
+								mes "But if you don't help me, then Kaili won't get the help he needs...";
+								set god_brising,9;
+								close;
+					L_Sorry:
+						mes "[Hermite Charles]";
+						mes "You don't understand!";
+						mes "If I weren't this much of a coward, I would already have gone out to find out what I could for myself.";
+						next;
+						mes "[Hermite Charles]";
+						mes "I'm not afraid of monsters or dying. It's the fact that she might hate me now. That's what I fear: Lowen's reproach.";
+						next;
+						mes "[Hermite Charles]";
+						mes "I have no idea how she has been and how she would react upon seeing me once more. Go ahead and laugh if you want.";
+						mes "how she would react to my appearance.";
+						next;
+						mes "[Hermite Charles]";
+						mes "All I can do for her is just earnestly pray. I had no idea it'd be so horrible not to be able to see her anymore...";
+						set god_brising,9;
+						close;
+					L_Last:
+						mes "[Hermite Charles]";
+						mes "The last time I saw her was deep inside the Geffen Dungeon.";
+						next;
+						mes "[Hermite Charles]";
+						mes "Although it was created by humans, that dungeon is now cursed and inhabited with horrific monsters.";
+						next;
+						mes "[Hermite Charles]";
+						mes "I'm guessing the Crusaders saw that it was necessary to exterminate the monsters there to keep it from getting even worse.";
+						next;
+						mes "[Hermite Charles]";
+						mes "Lowen accompanied a group of other Crusaders for the good of the people, but I haven't heard from anything about her since...";
+						next;
+						mes "[Hermite Charles]";
+						mes "That was the last time...";
+						mes "Please find out anything you can about her...";
+						mes "I beg you.";
+						set god_brising,10;
+						close;
+			L_NoThx:
+				mes "[Hermite Charles]";
+				mes "I misunderstood you.";
+				mes "I should have realized that people never really listen unless it's of some benefit to them.";
+				next;
+				mes "[Hermite Charles]";
+				mes "I won't waste any more of your time. I'll accept Kaili's letter and wait until I find someone who'll listen to my story and help me.";
+				set god_brising,5;
+				close;
+	}
+		else
+	{
+		mes "[Hermite Charles]";
+		mes "...";
+		mes "^333333*Sob...*^000000";
+		mes "I'm sorry.";
+		mes "I'm so sorry, Lowen.";
+		mes "It was all my fault...";
+		close;
+	}
+}
+	else if(god_brising == 4)
+{
+	mes "[Hermite Charles]";
+	mes "What do you";
+	mes "want from me?";
+	mes "Were you sent by";
+	mes "the Rogue Guild?";
+	next;
+	mes "[Hermite Charles]";
+	mes "Tell them";
+	mes "I quit already.";
+	mes "Leave me alone!";
+	next;
+	menu "Leave him alone.",-,"Give him Kaila's Letter.",L_Letter;
+			mes "^3355FFYou're not sure why he's so upset, but it doesn't seem to be the best time to try to speak with him. Perhaps later would be better...^000000";
+			set god_brising,4;
+			close;
+		L_Letter:
+			mes "[Hermite Charles]";
+			mes "Huh...";
+			mes "Enrico Kaili.";
+			mes "Yeah, I remember";
+			mes "him. So what..?";
+			next;
+			mes "^3355FFHermite nonchalantly tosses the letter back to you.^000000";
+			next;
+			mes "[Hermite Charles]";
+			mes "...";
+			mes "^333333*Sigh...*^000000";
+			next;
+			mes "[Hermite Charles]";
+			mes "You...";
+			mes "Would you like to";
+			mes "listen to my story?";
+			next;
+			menu "Sure!",-,"I'm busy, actually.",L_Busy;
+					mes "[Hermite Charles]";
+					mes "Thank you...I know you're just being generous.";
+					mes "But still I am glad for your generosity.";
+					mes "I am going to tell you an old story.";
+					next;
+					mes "[Hermite Charles]";
+					mes "Long ago, there was a little boy.";
+					mes "He lost his parents so there was";
+					mes "no home for him. He was just wandering";
+					mes "from thie thief guild to that rogue guild";
+					mes "...just to survive. He didn't have any goal";
+					mes "or any purpose of life other than being alive everyday.";
+					next;
+					mes "[Hermite Charles]";
+					mes "Even so, the little boy";
+					mes "had one person who he admired with full of hope.";
+					mes ".... ... ";
+					next;
+					mes "[Hermite Charles]";
+					mes "She will never know that";
+					mes "the little boy loved her more than anything else.";
+					mes "She was totally different from the boy.";
+					mes "She had a goal that she would devote her life to God.";
+					next;
+					mes "[Hermite Charles]";
+					mes "...he was just happy...";
+					mes "he's just happy for watching her in a distance.";
+					mes "One day...";
+					mes "because of one mistake, he lost her.";
+					next;
+					mes "[Hermite Charles]";
+					mes "She has never come back.";
+					mes "And the boy has been praying for her safety";
+					mes "even after he was fully grown up.";
+					mes "He always comes to the church and prays for her.";
+					next;
+					mes "[Hermite Charles]";
+					mes "... .. .. .... ... . .";
+					mes "...........";
+					mes "...";
+					next;
+					mes "[Hermite Charles]";
+					mes "....................";
+					mes ".......*sob*.........";
+					mes "Please find her for me.";
+					mes "...find Lowen for me.......";
+					mes "..................*sob*..";
+					next;
+					mes "[Hermite Charles]";
+					mes "You...";
+					mes " ";
+					mes "I know that Enrico has sent you to me.";
+					mes "I guess you must need something from me.";
+					mes "......";
+					mes "Am I wrong?";
+					next;
+					mes "[Hermite Charles]";
+					mes "....if you do what I want you to do,";
+					mes "I will give you what you want.";
+					mes "All I want is simple.";
+					mes ".......please find Lowen for me.";
+					mes "Find anything, anything that are belong to her,";
+					mes "her trace and locations where she used to say...";
+					mes "I want everything related to her!";
+					next;
+					menu "... ....umm...",-,"Sorry, I can't.",L_Sorry2,"When was the last time you saw her?",L_Last2;
+							mes "[Hermite Charles]";
+							mes "....have a heart, I beg you.";
+							mes "Please consider my proposal.";
+							mes "You find Lowen for me,";
+							mes "then I am going to give you what you want.";
+							next;
+							mes "[Hermite Charles]";
+							mes ".......please, I beg you.";
+							mes "You are a strong and well-experienced adventurer.";
+							mes "Isn't this so easy for you to do?";
+							mes "If you have a person in your mind,";
+							mes "you will know how desperate I have been.";
+							mes "Please, please find Lowen for me.";
+							next;
+							menu "....alright.",-,"...I am sorry, I don't think I can make it.",L_Think2;
+									mes "[" + strcharinfo(0) + "]";
+									mes "Alright.";
+									mes "I will try my best to find her.";
+									mes "Will you tell me more about the lady, Lowen?";
+									next;
+									mes "[Hermite Charles]";
+									mes "She is a crusader.";
+									mes "Last time I saw her deep inside of the Geffen dungeon.";
+									mes "Long time ago, crusaders went on";
+									mes "a monster subjugation to the Geffen dungeon.";
+									mes "That was the last time...";
+									mes "Please find anything that once used to belong to her...";
+									mes "I beg you.";
+									set god_brising,10;
+									close;
+								L_Think2:
+									mes "[Hermite Charles]";
+									mes "... ... ..";
+									mes ".......... .......";
+									mes "..........sigh..";
+									mes "I understand.";
+									mes "Then there will be no help for you now.";
+									set god_brising,9;
+									close;
+						L_Sorry2:
+							mes "[Hermite Charles]";
+							mes "What a selfish answer!";
+							mes "I am this desperate...";
+							mes "....if I am not this coward,";
+							mes "... .. I would...";
+							mes "......";
+							mes "I would already go try to find her...";
+							next;
+							mes "[Hermite Charles]";
+							mes "I am not afraid of monsters or anything.";
+							mes "But I am for the fact that she might hate me by now...";
+							mes "That's what Ifear...";
+							mes "I fear that I have no idea how she has been and";
+							mes "how she would react to my appearance.";
+							next;
+							mes "[Hermite Charles]";
+							mes "You can mock me as much as you want.";
+							mes "Yes, I don't have any guts to do anything.";
+							mes "...all I can do for her is";
+							mes "....just praying...";
+							next;
+							mes "[Hermite Charles]";
+							mes "I am weak, I am weak.";
+							mes "........";
+							mes "I had no idea that it would be so horrible not to see her any longer.";
+							mes ".....I will continue praying for her.";
+							mes "That is all I can do for her at this moment.";
+							set god_brising,9;
+							close;
+						L_Last2:
+							mes "[Hermite Charles]";
+							mes "She is a crusader.";
+							mes "Last time I saw her deep inside of the Geffen dungeon.";
+							mes "Long time ago, crusaders went on";
+							mes "a monster subjugation to the Geffen dungeon.";
+							next;
+							mes "[Hermite Charles]";
+							mes "The dungeon hidden under the Geffen Tower";
+							mes "was so horrible...";
+							mes "It must be created by human beings....";
+							mes "but now it is conquered by hideous monsters.";
+							mes "That place is cursed...that's all I can say.";
+							next;
+							mes "[Hermite Charles]";
+							mes "Maybe that's why other people";
+							mes "decided to bring an end to the dreadful place.";
+							mes "That's why crusaders went into";
+							mes "the dungeon on behalf of other people...";
+							next;
+							mes "[Hermite Charles]";
+							mes "That was the last time...";
+							mes "Please find anything that once used to belong to her...";
+							mes "I beg you.";
+							set god_brising,10;
+							close;
+				L_Busy:
+					mes "[Hermite Charles]";
+					mes "....I misunderstood you.";
+					mes "I should have realised that people...";
+					mes "never listen to other people unless...";
+					mes "they have some purpose or they want something from them.";
+					next;
+					mes "[Hermite Charles]";
+					mes "Let's not waste our precious time any longer.";
+					mes ".... ... also......";
+					mes "I am going to accept Mr. Enrico's letter";
+					mes "when I meet a person who is willing to listen to my story";
+					mes "and to help me....who is not you.";
+					set god_brising,5;
+					close;
+}
+	else if(god_brising == 3)
+{
+	mes "[Sad-looking Man]";
+	mes "...";
+	mes "^333333*Sob...*^000000";
+	mes "I am so";
+	mes "sorry, Lowen.";
+	mes "It's all fault...";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Excuse me.";
+	mes "I am looking";
+	mes "for someone named...";
+	mes "Hermite?";
+	next;
+	mes "[Hermite Charles]";
+	mes "Hm...?";
+	mes "Hermite? That's me.";
+	mes "But if you don't mind,";
+	mes "I want to be alone...";
+	next;
+	menu "Leave him alone.",-,"Give him Kaili's Letter.",L_Letter2;
+			mes "- You were unsure why he's upset - ";
+			mes "- but it didn't seem to be a right time to speak to him. -";
+			mes "- Let's come back later. -";
+			set god_brising,4;
+			close;
+		L_Letter2:
+			mes "[Hermite Charles]";
+			mes ".......huh....?!";
+			mes "Ah, I remember him.";
+			mes "So what..?";
+			next;
+			mes "- Hermite gave you the letter back - ";
+			mes "- as though he didn't care about it. -";
+			next;
+			mes "[Hermite Charles]";
+			mes " .... ... ... ";
+			mes " ..... ...... .....";
+			mes " .. .. ..*sigh*...";
+			next;
+			mes "[Hermite Charles]";
+			mes " ....... ..........";
+			mes "....... .........";
+			mes " ....... you..";
+			mes "Would you like to listen to my story?";
+			next;
+			menu "Sure!",-,"No, I am busy.",L_Busy2;
+					mes "[Hermite Charles]";
+					mes "Thank you...I know you're just being generous.";
+					mes "But still I am glad for your generosity.";
+					mes "I am going to tell you an old story.";
+					next;
+					mes "[Hermite Charles]";
+					mes "Long ago, there was a little boy.";
+					mes "He lost his parents so there was";
+					mes "no home for him. He was just wandering";
+					mes "from thie thief guild to that rogue guild";
+					mes "...just to survive. He didn't have any goal";
+					mes "or any purpose of life other than being alive everyday.";
+					next;
+					mes "[Hermite Charles]";
+					mes "Even so, the little boy";
+					mes "had one person who he admired with full of hope.";
+					mes ".... ... ";
+					next;
+					mes "[Hermite Charles]";
+					mes "She will never know that";
+					mes "the little boy loved her more than anything else.";
+					mes "She was totally different from the boy.";
+					mes "She had a goal that she would devote her life to God.";
+					next;
+					mes "[Hermite Charles]";
+					mes "...he was just happy...";
+					mes "he's just happy for watching her in a distance.";
+					mes "One day...";
+					mes "because of one mistake, he lost her.";
+					next;
+					mes "[Hermite Charles]";
+					mes "She has never come back.";
+					mes "And the boy has been praying for her safety";
+					mes "even after he was fully grown up.";
+					mes "He always comes to the church and prays for her.";
+					next;
+					mes "[Hermite Charles]";
+					mes "... .. .. .... ... . .";
+					mes "...........";
+					mes "...";
+					next;
+					mes "[Hermite Charles]";
+					mes "....................";
+					mes ".......*sob*.........";
+					mes "Please find her for me.";
+					mes "...find Lowen for me.......";
+					mes "..................*sob*..";
+					next;
+					mes "[Hermite Charles]";
+					mes "You...";
+					mes " ";
+					mes "I know that Enrico has sent you to me.";
+					mes "I guess you must need something from me.";
+					mes "......";
+					mes "Am I wrong?";
+					next;
+					mes "[Hermite Charles]";
+					mes "....if you do what I want you to do,";
+					mes "I will give you what you want.";
+					mes "All I want is simple.";
+					mes ".......please find Lowen for me.";
+					mes "Find anything, anything that are belong to her,";
+					mes "her trace and locations where she used to say...";
+					mes "I want everything related to her!";
+					next;
+					menu "... ....umm...",-,"Sorry, I can't.",L_Sorry3,"When was the last time you saw her?",L_Last3;
+							mes "[Hermite Charles]";
+							mes "....have a heart, I beg you.";
+							mes "Please consider my proposal.";
+							mes "You find Lowen for me,";
+							mes "then I am going to give you what you want.";
+							next;
+							mes "[Hermite Charles]";
+							mes ".......please, I beg you.";
+							mes "You are a strong and well-experienced adventurer.";
+							mes "Isn't this so easy for you to do?";
+							mes "If you have a person in your mind,";
+							mes "you will know how desperate I have been.";
+							mes "Please, please find Lowen for me.";
+							next;
+							menu "....alright.",-,"...I am sorry, I don't think I can make it.",L_Think3;
+									mes "[" + strcharinfo(0) + "]";
+									mes "Alright.";
+									mes "I will try my best to find her.";
+									mes "Will you tell me more about the lady, Lowen?";
+									next;
+									mes "[Hermite Charles]";
+									mes "She is a crusader.";
+									mes "Last time I saw her deep inside of the Geffen dungeon.";
+									mes "Long time ago, crusaders went on";
+									mes "a monster subjugation to the Geffen dungeon.";
+									mes "That was the last time...";
+									mes "Please find anything that once used to belong to her...";
+									mes "I beg you.";
+									set god_brising,10;
+									close;
+								L_Think3:
+									mes "[Hermite Charles]";
+									mes "... ... ..";
+									mes ".......... .......";
+									mes "..........sigh..";
+									mes "I understand.";
+									mes "Then there will be no help for you now.";
+									set god_brising,9;
+									close;
+						L_Sorry3:
+							mes "[Hermite Charles]";
+							mes "What a selfish answer!";
+							mes "I am this desperate...";
+							mes "....if I am not this coward,";
+							mes "... .. I would...";
+							mes "......";
+							mes "I would already go try to find her...";
+							next;
+							mes "[Hermite Charles]";
+							mes "I am not afraid of monsters or anything.";
+							mes "But I am for the fact that she might hate me by now...";
+							mes "That's what Ifear...";
+							mes "I fear that I have no idea how she has been and";
+							mes "how she would react to my appearance.";
+							next;
+							mes "[Hermite Charles]";
+							mes "You can mock me as much as you want.";
+							mes "Yes, I don't have any guts to do anything.";
+							mes "...all I can do for her is";
+							mes "....just praying...";
+							next;
+							mes "[Hermite Charles]";
+							mes "I am weak, I am weak.";
+							mes "........";
+							mes "I had no idea that it would be so horrible not to see her any longer.";
+							mes ".....I will continue praying for her.";
+							mes "That is all I can do for her at this moment.";
+							set god_brising,9;
+							close;
+						L_Last3:
+							mes "[Hermite Charles]";
+							mes "She is a crusader.";
+							mes "Last time I saw her deep inside of the Geffen dungeon.";
+							mes "Long time ago, crusaders went on";
+							mes "a monster subjugation to the Geffen dungeon.";
+							next;
+							mes "[Hermite Charles]";
+							mes "The dungeon hidden under the Geffen Tower";
+							mes "was so horrible...";
+							mes "It must be created by human beings....";
+							mes "but now it is conquered by hideous monsters.";
+							mes "That place is cursed...that's all I can say.";
+							next;
+							mes "[Hermite Charles]";
+							mes "Maybe that's why other people";
+							mes "decided to bring an end to the dreadful place.";
+							mes "That's why crusaders went into";
+							mes "the dungeon on behalf of other people...";
+							next;
+							mes "[Hermite Charles]";
+							mes "That was the last time...";
+							mes "Please find anything that once used to belong to her...";
+							mes "I beg you.";
+							set god_brising,10;
+							close;
+				L_Busy2:
+					mes "[Hermite Charles]";
+					mes "....I misunderstood you.";
+					mes "I should have realised that people...";
+					mes "never listen to other people unless...";
+					mes "they have some purpose or they want something from them.";
+					next;
+					mes "[Hermite Charles]";
+					mes "Let's not waste our precious time any longer.";
+					mes ".... ... also......";
+					mes "I am going to accept Mr. Enrico's letter";
+					mes "when I meet a person who is willing to listen to my story";
+					mes "and to help me....who is not you.";
+					set god_brising,5;
+					close;
+} 
+	else
+{
+	mes "[Sad-looking Man]";
+	mes "...";
+	mes "^333333*Sob...*";
+	mes "Lowen...";
+	mes "I'm so sorry.";
+	mes "It's all my fault.";
+	mes "Please be okay...";
+	close;
+}
+
+}
+
+prt_castle.gat,80,52,0	script	Personnel Record#hiddenbook1	111,{
+
+	if($God2 < 50)
+{
+	mes "[Librarian]";
+	mes "What are you doing now?";
+	mes "Don't touch anything, please!";
+	close;
+}
+ 
+	if($God3 > 99)
+{
+	mes "[Librarian]";
+	mes "What are you doing?";
+	mes "Don't touch anything!";
+	close;
+}
+ 
+	if(god_brising == 26)
+{
+	mes "[" + strcharinfo(0) + "]";
+	mes "I should read this from the point where I left off...";
+	next;
+	mes "["+ strcharinfo(0) +"]";
+	mes "Huh...?";
+	mes "What's this mark";
+	mes "here at the bottom?";
+	mes "A secret?";
+	next;
+	mes "["+ strcharinfo(0) +"]";
+	mes "No wonder the librarian seemed to hesitate before saying anything. Now let's see...";
+	next;
+	set @bookrand,rand(1,3);
+		if(@bookrand == 1)
+	{
+		mes "...(omitted) Lowen, of the 2nd squad, returned to her detachment 3 days after the incident.";
+		next;
+		mes "A trial was held, and she was judged guilty of fleeing when ordered to fight. Despite the severity of this offense, she was only discharged from the Crusaders and the holy power granted to her was removed...";
+		mes "We collected the holy power granted to her...(omitted)";
+		next;
+		mes "[" + strcharinfo(0) + "]";
+		mes "She was forced to leave the Crusaders?! That's ridiculous!";
+		next;
+		mes "["+ strcharinfo(0) +"]";
+		mes "Did they want to sentence her to death or what? That's almost too cruel. She must have been humiliated...";
+		next;
+		mes "2 years later after the incident, an expedition team found rusty armor shards, a broken sword and some effects belonging to Lowen Ellenen.";
+		next;
+		mes "["+ strcharinfo(0) +"]";
+		mes "However, this information is classified. Officially, Lowen Ellenen died during the mission.";
+		next;
+		mes "[" + strcharinfo(0) + "]";
+		mes "They thought she brought disgrace to the Crusaders? This sounds messy. Should I try to meet her again?";
+		next;
+		mes "[Librarian]";
+		mes "^666666*Yawn...*^000000";
+		mes "What the...?";
+		mes "who are you!";
+		mes "Get the hell";
+		mes "out of here!";
+		set god_brising,30;
+		close2;
+		warp "prt_castle.gat",94,37;
+		end;
+	}
+		else
+	{
+		mes "[Librarian]";
+		mes "^666666*Yawn...*^000000";
+		mes "What the...?";
+		mes "who are you!";
+		mes "Get the hell";
+		mes "out of here!";
+		close2;
+		warp "prt_castle.gat",94,37;
+		end;
+	}
+}
+	else if(god_brising == 25)
+{
+	mes "^3355FFYou took the book from the shelf while the librarian was dozing. According to the Crusader Personnel Records, there's only one recruit that was named Lowen Ellenen.";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Lowen Ellenen...";
+	mes "Member of the";
+	mes "2nd squad...";
+	mes "Age 22...";
+	mes "Female...";
+	next;
+	mes "["+ strcharinfo(0) +"]";
+	mes "Became a fugitive?";
+	mes "Announced death?";
+	mes "This is the same information the soldier told me.";
+	next;
+	set @bookrand,rand(1,3);
+		if(@bookrand == 1)
+	{
+		mes "[" + strcharinfo(0) + "]";
+		mes "...umm let's read again from the page that I read last time.";
+		mes "Umm? What is this mark on the bottom?";
+		mes "A secret? Ah...now I see why the librarian was hesitating to say something.";
+		mes "Let's see...";
+		next;
+		mes "...(omitted) Lowen in the second squad";
+		mes "was sent back to her detachment in 3 days after the accident.";
+		mes "In order to interrogate her responsibility on the absence";
+		mes "during the mission, a trial was hold.";
+		mes "She was supposed to be severely punished";
+		mes "however, with a power of the commandant,";
+		mes "she was order to be discharged from service.";
+		mes "We collected the holy power granted to her...(omitted)";
+		next;
+		mes "[" + strcharinfo(0) + "]";
+		mes "...what?! She was taken her ability and forced to be discharged?";
+		mes "It was ridiculous.";
+		mes "Was she sentenced to death on the trial or what?";
+		mes "Jesus christ, that was so mean.";
+		mes "...she must feel humiliated when it happened...";
+		next;
+		mes "...2 years later after the accident,";
+		mes "an expedition team found rusty armors, a broken sword and some belongings";
+		mes "which were suspected to he Lowen Ellenen's.";
+		mes "However, this information was realsed to only members in charge.";
+		mes "Officially she died during the mission.";
+		next;
+		mes "[" + strcharinfo(0) + "]";
+		mes "........ .... did they think she disgraced crusaders?";
+		mes "....sounds confusing and messy...";
+		mes "Now...what should I do...";
+		mes "Should I go ahead and meet her again?";
+		next;
+		mes "[Librarian]";
+		mes "*yawn*...?!";
+		mes "What the...who are you!";
+		mes "Get the hell out of here!";
+		set god_brising,30;
+		close2;
+		warp "prt_castle.gat",94,37;
+		end;
+	}
+		else
+	{
+		mes "[Librarian]";
+		mes "*yawn*...?!";
+		mes "What the...who are you!";
+		mes "Get the hell out of here!";
+		set god_brising,26;
+                mes "["+ strcharinfo(0) +"]";
+		mes "(Nuts...!";
+		mes "I didn't get";
+		mes "to finish reading!)";
+		close2;
+		warp "prt_castle.gat",94,37;
+		end;
+	}
+}
+	else 
+{
+	mes "[Librarian]";
+	mes "What are you doing here?";
+	mes "Don't touch anything!";
+	close;
+}
+
+}
+
+//-----------librarian----------------------------------------------------------
+ 
+prt_castle.gat,84,51,5	script	Librarian#2	105,{
+
+	if($God2 < 50)
+{
+	mes "[Librarian]";
+	mes "What are you doing here?";
+	mes "Don't touch anything. please!";
+	close;
+}
+ 
+	if($God3 > 99)
+{
+	mes "[Librarian]";
+	mes "What are you doing now?";
+	mes "Don't touch anything!";
+	close;
+}
+ 
+	if (god_brising > 24 && god_brising < 27)
+{
+	mes "[Librarian]";
+	mes ".... . ..... ....";
+	mes "...........Zzzzz..";
+	mes "Zzzz....Zzzzz...";
+	next;
+	mes "^3355FFThis librarian seems to be deeply asleep. It'd be smarter not to wake him if you want to check the Crusader Personnel Records.^000000";
+	close;
+}
+ 	else if(god_brising == 10)
+{
+	mes "[Librarian]";
+	mes "All confidential personnel records are kept here in the royal library. However, you need authorization for full access.";
+	next;
+	mes "[Librarian]";
+	mes "Did you say that you need to find a person? Please give me that person's name, as well as your relationship with that person.";
+	next;
+	menu "Lowen, Sibling",-,"Lowen, Spouse",L_Spouse,"Lowen, Enemy",L_Enemy,"Lowen, a Friend",L_Friend;
+				if(Sex)
+			{
+				mes "[Librarian]";
+				mes "How dare you lie to the royal librarian!";
+				next;
+				mes "[Librarian]";
+				mes "It says here in the records that Lowen did not have any male siblings!";
+				next;
+				mes "[Librarian]";
+				mes "^333333(Crap! I just disclosed ^666666classified^000000 ^333333info!)^000000.";
+				next;
+				mes "[Librarian]";
+				mes "The Royal Library won't";
+				mes "tolerate identity fraud!";
+				mes "Please leave!";
+				close;
+			}
+				else
+			{
+				mes "[Librarian]";
+				mes "You're related to Miss Lowen? How have you not received any news about her before?";
+				next;
+				mes "[Librarian]";
+				mes "I see...";
+				mes "Separated at birth,";
+				mes "that's truly tragic.";
+				mes "Okay, let me check.";
+				next;
+				mes "[Librarian]";
+				mes "I feel terrible telling you this, but it's too late to find Lowe Ellenen, according to the records.";
+				next;
+				mes "[Librarian]";
+				mes "During the monster subjugation mission in Geffen dungeon she reportedly disappeared and... um, later pronounced dead.";
+				next;
+				mes "[Librarian]";
+				mes "I'm sorry, but";
+				mes "that's all I know.";
+				mes "Thank you...";
+				set god_brising,11;
+				close;
+			}
+
+		L_Spouse:		
+				if(Sex)
+			{
+				mes "[Librarian]";
+				mes "Spouse...?";
+				mes "Well, I guess you look like a husband. Heh, I've got a girlfriend myself. Well, at least I think so. Anyway...";
+				mes "right, give me";
+				mes "a minute.";
+				next;
+				mes "[Librarian]";
+				mes "Lowen Ellenen";
+				mes "the Crusader, right?";
+				mes "I'm so... sorry.";
+				mes "You might want";
+				mes "to have a seat.";
+				next;
+				mes "[Librarian]";
+				mes "Please listen to me. During the monster subjugation in Geffen Dungeon, she reportedly disappeared. And later, she was pronounced dead.";
+				next;
+				mes "[Librarian]";
+				mes "That's all the information I have, sir. I'm truly sorry for your loss.";
+				set god_brising,11;
+				close;
+			}
+				else
+			{
+				mes "[Librarian]";
+				mes "Hmmm...?";
+				mes "Spouse?";
+				mes "Or ^333333*Ahem*^000000";
+				mes "cohabitational partners?";
+				next;
+				mes "^3355FFThe librarian";
+				mes "now seems awfully";
+				mes "distracted, as if";
+				mes "he were lost in";
+				mes "vivid daydream...^000000";
+				close;
+			}
+		
+		L_Enemy:
+			mes "["+ strcharinfo(0) +"]";
+			mes "I'm looking";
+			mes "for Ellenen.";
+			mes "Lowen Ellenen.";
+			mes "My sworn arch-enemy.";
+			next;
+			mes "[Librarian]";
+			mes "Arch-enemy...?";
+			mes "Um, uh ^666666*Ahem!*^000000";
+			mes "All I can tell you is that there was a Crusader by that name.";
+			next;
+			mes "[Librarian]";
+			mes "I'm sorry, but";
+			mes "I can't tell you";
+			mes "more than that.";
+			next;
+			mes "[Librarian]";
+			mes "^333333*Cough*^000000";
+			mes "^666666Nutcase!^000000";
+			close;
+		
+		L_Friend:
+			mes "[Librarian]";
+			mes "A friend...?";
+			mes "Well, we have record of someone named Lohen Phelica.";
+			next;
+			mes "[Librarian]";
+			mes "He retired from the service a few years ago. I'd like to give you his address, but we don't have any of that information.";
+			set god_brising,12;
+			close;
+}
+	else if(god_brising > 10 && god_brising < 13)
+{
+	mes "[Librarian]";
+	mes "Now, may";
+	mes "I excuse myself?";
+	mes "Thank you!";
+	close;
+}
+	else 
+{
+	mes "[Librarian]";
+	mes "All confidential personnel records are kept here in the royal library. However, you need authorization for full access.";
+	close;
+}
+
+}
+
+prontera.gat,260,354,4	script	Woman#Rosa Ellenen	101,{
+
+	if($God2 < 50)
+{
+	mes "[Woman]";
+	mes "Hm?";
+	mes "What brings";
+	mes "you here? It's";
+	mes "kind of strange";
+	mes "to come just to";
+	mes "take a walk.";
+	close;
+}
+	if($God3 > 99)
+{
+	mes "[Woman]";
+	mes "Hm?";
+	mes "What brings";
+	mes "you here? It's";
+	mes "kind of strange";
+	mes "to come just to";
+	mes "take a walk.";
+	close;
+}
+	if(god_brising > 33)
+{
+	mes "[Rosa Ellenen]";
+	mes "Are you the one who visited me before? Ah, of course.";
+	next;
+	mes "[Rosa Ellenen]";
+	mes "I'm not sure how to tell you this, but... This is Lowen's grave. Thank you.";
+	mes "Ah....I am not sure how I can tell you this...";
+	close;
+}
+	else if(god_brising == 21)
+{
+	mes "[Rosa Ellenen]";
+	mes "What are you";
+	mes "talking about?";
+	mes "A message from Lowen?";
+	next;
+	mes "[Rosa Ellenen]";
+	mes "What?!";
+	mes "Why hasn't she";
+	mes "gone to heaven yet?";
+	next;
+	mes "[Rosa Ellenen]";
+	mes "I hope you remember everything I'm going to tell you. She should go to heaven now! I still don't understand...";
+	next;
+	mes "[Rosa Ellenen]";
+	mes "And please tell that praying fool that he shouldn't waste his time blaming himself. ^333333*Sigh*^000000 I still don't know why she chose to speak to you.";
+	next;
+	mes "[Rosa Ellenen]";
+	mes "Let me tell you something. Lowen was fencing prodigy. However, she always had trouble enduring the rigorous training and bearing the weight of armor...";
+	next;
+	mes "[Rosa Ellenen]";
+	mes "But she loved fencing and always tried twice as hard to develop her physical strength so that she could serve God in battle.";
+	next;
+	mes "[Rosa Ellenen]";
+	mes "Finally, she became a Crusader. For a while things were great. But then she suddenly disappeared while on a mission to Geffen Dungeon.";
+	next;
+	mes "[Rosa Ellenen]";
+	mes "Two years later, she was buried in this grave after her body was found by some adventurers. I was given the broken shards of armor and a blood stained ribbon she left behind.";
+	next;
+	mes "[Rosa Ellenen]";
+	mes "I never really learned what exactly happened. And Hermite was always following her like she was his real sister. Ever since she died, he's changed. I hope he doesn't hurt himself...";
+	next;
+	mes "[Rosa Ellenen]";
+	mes "But something suspicious seems to have happened in the military, but they won't even talk to me about it.";
+	next;
+	mes "[Rosa Ellenen]";
+	mes "In the end, I gave up trying to find the truth. After all, nothing can bring her back...";
+	next;
+	mes "[Rosa Ellenen]";
+	mes "If you meet her again,";
+	mes "please tell her I'm fine and that I hope her soul passes from this realm into heaven.";
+	set god_brising,25;
+	close;
+}
+ 	else if(god_brising > 9 && god_brising < 20)
+{
+	mes "[Rosa Ellenen]";
+	mes "This is my little";
+	mes "sister's grave...";
+	mes "Her name was Lowen.";
+	next;
+	mes "[Rosa Ellenen]";
+	mes "Are you a friend of Lowen's? Hm? The man in the Sanctuary? That must be Hermite.";
+	next;
+	mes "[Rosa Ellenen]";
+	mes "He was shocked when Lowen died, but he doesn't have to blame himself for her death. I don't want him to suffer from the guilt.";
+	next;
+	mes "[Rosa Ellenen]";
+	mes "Anyway, thank you for visiting my little sister. It's good to know she has friends, even after she's passed on.";
+	set god_brising,11;
+	close;
+}
+	else
+{
+	mes "[Rosa Ellenen]";
+	mes "Oh hello...";
+	mes "Have you come";
+	mes "to pay your respects";
+	mes "to someone here as well?";
+	close;
+}
+
+}
+
+prontera.gat,262,353,0	script	Gravestone	111,{
+
+	if($God2 > 49)
+{
+		if(god_brising > 33)
+	{
+		mes "Lowen Ellenen";
+		mes " ";
+		mes " XXXX. XX. XX.";
+		mes "";
+		mes " Her noble spirit";
+		mes "was sent to the holy place";
+		mes " by will of the Valkyrie.";
+		close;
+	}
+		else
+	{
+		mes "^3355FFYou couldn't read the rest of the epitaph since the tombstone has been eroded.^000000";
+		close;
+	}
+}
+	else
+{
+	mes "^3355FFIt's just an";
+	mes "ordinary gravestone.^000000";
+	next;
+	mes "^3355FFNothing really";
+	mes "sets it apart from the rest of the tombstones here in the Prontera cemetary.^000000";
+	close;
+}
+
+}
+ 
+gef_dun01.gat,89,192,0	script	#lowentrace	111,3,3,{
+
+	if($God2 < 50)
+{
+	mes "^3355FFIt's just an old,";
+	mes "dry piece of wood.^000000";
+	close;
+}
+	if($God3 > 99)
+{
+	mes "^3355FFIt's just an old,";
+	mes "dry piece of wood.^000000";
+	close;
+}
+	if (god_brising > 20 && god_brising < 34)
+{
+	mes "Will you";
+	mes "summon her? ";
+	next;
+	menu "Yes",-,"No",L_No;
+		input @lowenstring$;
+			if(@lowenstring$ == "Lowen")
+		{
+				if(god_brising == 30)
+			{
+					mes "[Lowen Ellenen]";
+					mes "^6E7B8B...Y-you're...";
+					mes "I-I can't stay long,";
+					mes "I'm feeling too weak.";
+					mes "Come closer, I want";
+					mes "to show you something...^000000";
+					next;
+					mes "^3355FFHer voice grew";
+					mes "softer and softer";
+					mes "until you could no";
+					mes "longer hear her.^000000";
+					close;
+			}
+				else if(god_brising == 21)
+			{
+					mes "[Lowen Ellenen]";
+					mes "^6E7B8BPlease tell Rosa";
+					mes "not to worry about me anymore. You might be able to find her beside my grave. I don't want her to suffer anymore...^000000";
+					close;
+			}
+				else if(god_brising == 25)
+			{
+					mes "[Lowen Ellenen]";
+					mes "^6E7B8BYou've come back.";
+					mes "Have you met Rosa?";
+					mes "Hm, yes, it sounds like she'd say that. But thank you for sending her my message.^000000";
+					next;
+					mes "[Lowen Ellenen]";
+					mes "^6E7B8BAh, it's too dangero--";
+					mes "This place is too dangerous for you. I hate myself for not being able to help protect you from these evil creatures. Please be careful...^000000";
+					close;
+			}
+				else
+			{
+					mes "[Lowen Ellenen]";
+					mes "^6E7B8BMy spirit is";
+					mes "growing weaker...";
+					mes "Please be careful...";
+					mes "This place is too dangerous.^000000";
+					close;
+			}
+		}
+			else
+		{
+			close;
+		}
+		L_No:
+			close;
+}
+	else if(god_brising == 20)
+{
+	mes "[The voice of a female]";
+	mes "^6E7B8BI-It's dangerous...";
+	mes "Be careful...^000000";
+	next;
+	menu "Ignore it.",-,"What are you talking about?",L_What;
+		close;
+		L_What:
+			mes "[The voice of a female]";
+			mes "^6E7B8B...No way...";
+			mes "You can hear me?";
+			mes "I can't believe this.";
+			mes "It's impossible. But if you don't mind, may I talk to you...?^000000";
+			mes "can I talk to you for a while?";
+			next;
+			menu "Holy...! Run!",-,"What are you?!",L_Who;
+				close;
+				L_Who:
+					mes "[The voice of a female]";
+					mes "^6E7B8BI...";
+					mes "I don't have my body anymore, so... I think I'm a ghost. Yes, I've been wandering in this place ever since I got here.^000000";
+					next;
+					mes "[The voice of a female]";
+					mes "^6E7B8BI'm still not sure why I'm bound to this realm. If you don't mind, would you visit my sister for me?";
+					next;
+					mes "[The voice of a female]";
+					mes "^6E7B8BPlease tell her...";
+					mes "Please tell her that her little sister Lowen is fine.^000000";
+					next;
+					mes "[The voice of a female]";
+					mes "^6E7B8BUm...";
+					mes "If you want to meet me again, just say my name out loud. '^000000Lowen^6E7B8B.'^000000";
+					set god_brising,21;
+					close;
+}
+	else
+{
+	mes "^3355FFYou find a piece of twisted, dry wood. Looking at it seems to bring out a feeling of sadness within you for some reason.^000000";
+	close;
+}
+
+OnTouch:
+	if(god_brising > 9 && god_brising < 34)
+{
+	emotion e_gasp;
+	end;
+}
+
+}
+
+gef_dun01.gat,203,48,0	script	#lowentrace1	111,3,3,{
+
+	if($God2 < 50)
+{
+	mes "^3355FFIt's just an old,";
+	mes "dry piece of wood.^000000";
+	close;
+}
+ 
+	if($God3 > 99)
+{
+	mes "^3355FFIt's just an old,";
+	mes "dry piece of wood.^000000";
+	close;
+}
+
+	if(god_brising > 20 && god_brising < 34)
+{
+	mes "Would you";
+	mes "like to summon her? ";
+	next;
+	menu "Yes",-,"No",L_No;
+		input @lowenstring$;
+			if(@lowenstring$ == "Lowen")
+		{
+				if(god_brising == 31)
+			{
+					mes "[Lowen Ellenen]";
+					mes "^6E7B8BYou came back!";
+					mes "You'll be with me";
+					mes "...Won't you?^000000";
+					next;
+					menu "Of course.",-,"Sorry, I don't think I can...",L_Sorry;
+							mes "[Lowen Ellenen]";
+							mes "^6E7B8BThank you,";
+							mes "thank you so much...^000000";
+							close2;
+							warp "que_god02.gat",47,53;
+							end;
+						L_Sorry:
+							mes "[Lowen Ellenen]";
+							mes "^6E7B8BI understand.";
+							mes "Please take";
+							mes "care of yourself...^000000";
+							close;
+			}
+				else if(god_brising == 30)
+			{
+					mes "[Lowen Ellenen]";
+					mes "^6E7B8BAh yes. This is it.";
+					mes "You look very curious about me, yet I am amazed that you can hear my voice. Please let me tell you an old story.^000000";
+					close2;
+					warp "que_god02.gat",47,53;
+					end;
+			}
+				else if(god_brising == 25)
+			{
+					mes "[Lowen Ellenen]";
+					mes "You came back.";
+					mes "....have you met Rosa?";
+					mes "...yes...I expected her to say so.....";
+					mes "Thank you for sending my message to her.";
+					mes "....I wish I could do what she wants me to do...";
+					next;
+					mes "[Lowen Ellenen]";
+					mes "Ah...it's too danger.";
+					mes "This place is too dangerous for you.";
+					mes "I hate myself for not protecting you from evil creatures.";
+					mes "Please be careful.";
+					close;
+			}
+				else
+			{
+					mes "[Lowen Ellenen]";
+					mes "I hope you will not summon me for fun.";
+					mes "And please be careful...this place is too dangerous for you.";
+					close;
+			}
+		}
+			else
+		{
+			close;
+		}
+		L_No:
+			close;
+}
+	else if(god_brising == 20)
+{
+	mes "[The voice of a female]";
+	mes "...it's dangerous...be careful.";
+	next;
+	menu "Ignore it.",-,"What are you talking about?",L_What;
+		close;
+		L_What:
+			mes "[The voice of a female]";
+			mes ".... no way........are you...?";
+			mes "Can you hear me?";
+			mes "...I can't...believe this..";
+			mes "I can't belive this...but if you don't mind";
+			mes "can I talk to you for a while?";
+			next;
+			menu "Sorry, I am busy!",-,"What are you?!",L_Who;
+				close;
+				L_Who:
+					mes "[The voice of a female]";
+					mes "Ah, no need to be surprised.";
+					mes "Actually I am the one who was surprised.";
+					mes "Ah...ah...I don't have a physical form...";
+					mes "Err...technically I am a ghost.....";
+					mes "Yes, I think I am a ghost.";
+					mes "Since when I have been wandering around here.";
+					next;
+					mes "[Lowen]";
+					mes "I don't know why I haven't gone beyond the realm.";
+					mes "If you don't mind...I hope you can go visit my sister.";
+					mes "And please tell her that I am fine.";
+					mes "....tell her that Lowen, her little sister is fine...";
+					next;
+					mes "[Lowen]";
+					mes "If you want to meet me again,";
+					mes "please call my name out loud.";
+					mes " 'Lowen'...";
+					set god_brising,21;
+					close;
+}
+	else
+{
+	mes "- You found a twisted and dry wood. -";
+	mes "- It looked dismal but sad at the same time. -";
+	close;
+}
+
+OnTouch:
+	if (god_brising > 9 && god_brising < 34)
+{
+	emotion e_gasp;
+	end;
+}
+
+}
+
+que_god02.gat,48,55,3	script	Lowen Ellenen	745,{
+
+	if(god_brising == 30)
+{
+	mes "[Lowen Ellenen]";
+	mes "Can you see me now?";
+	mes "You must be surprised.";
+	mes "This is the story I will share with you.";
+	next;
+	mes "[Lowen Ellenen]";
+	mes "Look around.";
+	mes "Recognize it?";
+	mes "We're still in the same place, except now we're in my past.";
+	next;
+	mes "[Lowen Ellenen]";
+	mes "All of us came here to Geffen to cleanse this area of evil spirits. You asked for the reason I stayed here?";
+	next;
+	mes "[Lowen Ellenen]";
+	mes "I couldn't forgive myself for what I've done to my comrades. They were killed because of me.";
+	next;
+	menu "You were cursed...?",-,"You still have something to do.",L_Still;
+			mes "["+ strcharinfo(0) +"]";
+			mes "You're saying...";
+			mes "The anger of your";
+			mes "comrades manifested";
+			mes "into a curse?";
+			next;
+			mes "[Lowen Ellenen]";
+			mes "Cursed by my fallen comrades... Yes, that's what I thought at first. So I tried to redeem myself as well as avenge their deaths.";
+			next;
+			mes "[Lowen Ellenen]";
+			mes "I have been trying my best to comfort their spirits for 2 years.";
+			next;
+			mes "[" + strcharinfo(0) + "]";
+			mes "Ever since you guys failed on a mission, you've spent two years here killing monsters?";
+			next;
+			mes "[Lowen Ellenen]";
+			mes "Yes, that's right.";
+			mes "I thought it would bring comfort to the spirits of my comrades.";
+			next;
+			mes "[Lowen Ellenen]";
+			mes "But once I died, I met all of my old friends in Nifflheim, the town of the dead. You've heard of it, haven't you?";
+			next;
+			mes "[Lowen Ellenen]";
+			mes "No one seemed to blame me for what had happened. In fact, they all seemed worried about me.";
+			next;
+			menu "Then why?",-;
+					mes "[Lowen Ellenen]";
+					mes "They waited for me in Nifflheim for two years, since they didn't want me to misunderstand them. They never blamed me for what happened.";
+					next;
+					mes "[Lowen Ellenen]";
+					mes "But I still feel like something is wrong. Out of all of us, I'm the only one unable to rest in peace. Everyone else was selected to go to Valhalla.";
+					next;
+					mes "[Lowen Ellenen]";
+					mes "But Valhalla is where all honorable Crusaders are supposed to go. What have I done wrong?";
+					close;
+		L_Still:
+			mes "[Lowen Ellenen]";
+			mes "I don't think I have any unfinished business. But who knows, maybe there is something I have to do.";
+			next;
+			mes "[Lowen Ellenen]";
+			mes "All of my late comrades that I met in Nifflheim were selected by Valkyrie and sent to Valhalla. That's how honorable Crusaders spend the afterlife. But it looks like I don't deserve it...";
+			next;
+			menu "I can help you!",-;
+					mes "[Lowen Ellenen]";
+					mes "You can";
+					mes "help me?";
+					mes "How...?";
+					next;
+					mes "[" + strcharinfo(0) + "]";
+					mes "You said this is the place where the subjugation mission happened, right? I'll fight with you!";
+					next;
+					mes "["+ strcharinfo(0) +"]";
+					mes "Now come on, you deserve to feel guilty like this. Let's think about how we're gonna fight these monsters!";
+					next;
+					mes "[Lowen Ellenen]";
+					mes "...";
+					mes "Thank you.";
+					mes "Thank you so much.";
+					next;
+					mes "[" + strcharinfo(0) + "]";
+					mes "Now,";
+					mes "shall we go in?";
+					set god_brising,31;
+					close;
+}
+	else if(god_brising == 31)
+{
+	mes "[Lowen Ellenen]";
+	mes "Walk down the stairs ahead. From this point on, I can only travel with you in your mind...";
+	close;
+}
+	else
+{
+	mes "[Lowen Ellenen]";
+	mes "How come...";
+	mes "You're here?";
+	close2;
+	warp "geffen.gat",120,101;
+	end;
+}
+
+}
+
+que_god02.gat,54,64,4	script	Soldier#1_brising	105,1,1,{
+ 
+	if(god_brising == 31)
+{
+	mes "[Soldier]";
+	mes "Have you volunteered for monster subjugation? Would you like to start the mission now?";
+	next;
+	menu "Yes.",-,"I need more time.",L_Time;
+			mes "[Soldier]";
+			mes "We're you're ready,";
+			mes "come and stand in";
+			mes "front of me.";
+			close;
+		
+		L_Time:
+			mes "[Soldier]";
+			mes "No problem, just come back when your preparations are completed.";
+			close;
+}
+	else
+{
+	mes "[Soldier]";
+	mes "Please back away.";
+	mes "You are not permitted";
+	mes "to enter!";
+	close;
+}
+
+OnTouch:
+	if(god_brising == 31)
+{
+	warp "que_god02.gat",174,49;
+	donpcevent "#brisinsold::OnSold1Off";
+	donpcevent "#brisinsold2::OnSold2On";
+	end;
+}
+	else
+{
+	mes "[Soldier]";
+	mes "Please back away.";
+	mes "You are not permitted";
+	mes "to enter!";
+	close2;
+	warp "que_god02.gat",51,59;
+	end;
+}
+
+}
+
+que_god02.gat,55,64,4	script	Soldier#2_brising	105,1,1,{
+
+	mes "[Soldier]";
+	mes "Please back away.";
+	mes "You are not permitted";
+	mes "to enter!";
+	close;
+}
+
+que_god02.gat,1,1,1	script	#brisinsold1	-1,{
+
+OnSold1On:
+	enablenpc "Soldier#1_brising";
+	end;
+
+OnSold1Off:
+	disablenpc "Soldier#1_brising";
+	end;
+}
+
+que_god02.gat,1,1,1	script	#brisinsold2	-1,{
+
+OnInit:
+	disablenpc "Soldier#2_brising";
+	areawarp "que_god02.gat",100,128,85,3,"geffen.gat",120,100;
+	end;
+
+OnSold2On:
+	enablenpc "Soldier#2_brising";
+	initnpctimer;
+	end;
+
+OnTimer420000:
+	mapannounce "que_god02.gat","Lowen's spirit is beginning to weaken...",0,0x70DBDB;
+	end;
+
+OnTimer480000:
+	mapannounce "que_god02.gat","Your presense in her past can't be maintained for much longer...",0,0x70DBDB;
+	end;
+
+OnTimer540000:
+	mapannounce "que_god02.gat","Lowen's spirit can't keep you in the past any longer.",0,0x70DBDB;
+	end;
+
+OnTimer542000:
+	areawarp "que_god02.gat",1,1,400,400,"geffen.gat",120,100;
+	end;
+
+OnTimer550000:
+	donpcevent "#brisinsummon::OnReset";
+	end;
+
+OnTimer550500:
+	stopnpctimer;
+	end;
+
+}
+	
+que_god02.gat,1,1,1	script	#Warp_brising	-1,{
+
+OnWarp:
+
+	end;
+}
+
+que_god02.gat,1,1,1	script	#brisinsummon	-1,{
+
+OnInit:
+	disablenpc "#doppelganger1";
+	disablenpc "#doppelganger2";
+	disablenpc "#knight1";
+	disablenpc "#knight2";
+	disablenpc "#knight3";
+	disablenpc "#lowen";
+	disablenpc "Valkyrie#1";
+	enablenpc "#hermite";
+	end;
+
+OnDoppel1On:
+	enablenpc "#doppelganger1";
+	end;
+
+OnDoppel1Off:
+	disablenpc "#doppelganger1";
+	end;
+
+OnDoppel2On:
+	enablenpc "#doppelganger2";
+	end;
+
+OnDoppel2Off:
+	disablenpc "#doppelganger2";
+	end;
+
+OnKnight1On:
+	enablenpc "#knight1";
+	end;
+
+OnKnight2On:
+	enablenpc "#knight2";
+	end;
+
+OnKnight3On:
+	enablenpc "#knight3";
+	end;
+
+OnKnight1Off:
+	disablenpc "#knight1";
+	end;
+
+OnKnight2Off:
+	disablenpc "#knight2";
+	end;
+
+OnKnight3Off:
+	disablenpc "#knight3";
+	end;
+
+OnLowenOn:
+	enablenpc "#lowen";
+	end;
+
+OnLowenOff:
+	disablenpc "#lowen";
+	end;
+
+OnHermiteOff:
+	disablenpc "#hermite";
+	end;
+
+OnLowen2Off:
+	disablenpc "Lowen Ellenen#2";
+	end;
+
+OnSummon:
+	attachrid $@BrisinRID$;
+	monster "que_god02.gat",34,128,"",1015,1,"#brisinsummon::OnMobDeath";
+	monster "que_god02.gat",34,127,"",1015,1,"#brisinsummon::OnMobDeath";
+	monster "que_god02.gat",80,127,"",1015,1,"#brisinsummon::OnMobDeath";
+	monster "que_god02.gat",102,128,"",1036,1,"#brisinsummon::OnMobDeath";
+	monster "que_god02.gat",130,128,"",1036,1,"#brisinsummon::OnMobDeath";
+	monster "que_god02.gat",62,128,"",1041,1,"#brisinsummon::OnMobDeath";
+	monster "que_god02.gat",64,127,"",1041,1,"#brisinsummon::OnMobDeath";
+	monster "que_god02.gat",150,127,"",1041,1,"#brisinsummon::OnMobDeath";
+	monster "que_god02.gat",176,127,"",1041,1,"#brisinsummon::OnMobDeath";
+	set brisinmobdead,9;
+	end;
+
+OnMobDeath:
+	set brisinmobdead,brisinmobdead -1;
+	if(brisinmobdead > 0) end;
+	set god_brising,31;
+	enablenpc "Valkyrie#1";
+	detachrid;
+	end;
+
+OnReset:
+	disablenpc "#doppelganger1";
+	disablenpc "#doppelganger2";
+	disablenpc "#knight1";
+	disablenpc "#knight2";
+	disablenpc "#knight3";
+	disablenpc "#lowen";
+	enablenpc "Soldier#1_brising";
+	disablenpc "Soldier#2_brising";
+	enablenpc "#hermite";
+	enablenpc "Lowen Ellenen#2";
+	disablenpc "Valkyrie#1";
+	killmonster "que_god02.gat","#brisinsummon::OnMobDeath";
+}
+
+que_god02.gat,173,58,4	script	#doppelganger1	739,{
+
+OnEmoGasp:
+	emotion e_gasp;
+	end;
+}
+
+que_god02.gat,175,55,4	script	#doppelganger2	739,{
+
+OnCast:
+	specialeffect 59;
+	end;
+}
+
+que_god02.gat,175,54,1	script	#lowen	745,{
+
+OnEmoGasp:
+	emotion e_gasp;
+	end;
+
+OnCast:
+	specialeffect 59;
+	end;
+}
+
+que_god02.gat,178,49,1	script	#knight1	751,{
+
+OnEmoGasp:
+	emotion e_gasp;
+	end;
+
+OnEmoGo:
+	emotion e_go;
+	end;
+}
+
+que_god02.gat,168,53,7	script	#knight2	734,{
+
+OnEmoGasp:
+	emotion e_gasp;
+	end;
+
+OnEmoGo:
+	emotion e_go;
+	end;
+}
+
+que_god02.gat,167,58,4	script	#knight3	752,{
+
+OnEmoGasp:
+	emotion e_gasp;
+	end;
+
+OnEmoGo:
+	emotion e_go;
+	end;
+}
+
+que_god02.gat,174,49,0	script	#lowenone	139,0,0,{
+
+OnTouch:
+	donpcevent "brisinsold2::OnSold2On";
+	mes "[" + strcharinfo(0) + "]";
+	mes "Where am I?";
+	mes "Isn't this...?!";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Ah, I see.";
+	mes "This must be the place where everything happened two years ago. Good, good...";
+	next;
+	mes "[Lowen Ellenen]";
+	mes "Shshh...";
+	mes "This is just a reflection of the past. Here, you'll see what happened at the time for yourself.";
+	next;
+	mes "[Lowen Ellenen]";
+	mes "It wasn't any";
+	mes "trouble getting down here. But... We've got problems now.";
+	next;
+	mapannounce "que_god02.gat","D...Doppelganger!!!",0,0x9CFF00;
+	mes "[" + strcharinfo(0) + "]";
+	mes "What...?!";
+	mes "Doppelganger?!";
+	next;
+	donpcevent "#brisinsummon::OnDoppel1On";
+	donpcevent "#brisinsummon::OnKnight1On";
+	donpcevent "#brisinsummon::OnKnight2On";
+	donpcevent "#brisinsummon::OnKnight3On";
+	donpcevent "#brisinsummon::OnLowenOn";
+	mes "[" + strcharinfo(0) + "]";
+	mes "What's going on?";
+	mes "Did you really fight with that creature? H-hey! Answer me!";
+	next;
+	mes "[Lowen Ellenen]";
+	mes "Yes, this was the place...";
+	mes "The commendant gave us the order...";
+	mes "And then..? And then what happened to me..?";
+	next;
+	mapannounce "que_god02.gat","Everyone, stay calm! Get into your positions!",0,0x9CFF00;
+	mes "^4E2F2F[Crusader Commander]";
+	mes "Everyone, get into your positions! Front line, block its movement! Rear line, support the defense!^000000";
+	donpcevent "#knight1::OnEmoGo";
+	donpcevent "#knight2::OnEmoGo";
+	donpcevent "#knight3::OnEmoGo";
+	donpcevent "#doppelganger1::OnEmoGasp";
+	next;
+	mes "[Lowen Ellenen]";
+	mes "N-no!";
+	mes "I'm not running away!";
+	next;
+	mes "^3355FFYou're filled with a great anxiety, and you experience for yourself the fear and pressure Lowen felt during those very moments.^000000";
+	next;
+	mes "^4E2F2F[Crusader Commander]";
+	mes "Go, Lowen!";
+	mes "Cast Grand Cross, now!^000000";
+	next;
+	donpcevent "#lowen::OnCast";
+	mapannounce "que_god02.gat","Mwahaha! Mortals are such fools...",0,0xA8A8A8;
+	donpcevent "#brisinsummon::OnDoppel1Off";
+	donpcevent "#brisinsummon::OnDoppel2On";
+	donpcevent "#knight1::OnEmoGasp";
+	donpcevent "#knight2::OnEmoGasp";
+	donpcevent "#knight3::OnEmoGasp";
+	donpcevent "#lowen::OnEmoGasp";
+	mes "[" + strcharinfo(0) + "]";
+	mes " ??!!!";
+	next;
+	donpcevent "#doppelganger2::OnCast";
+	mes "[Male Voice]";
+	mes "Lowen!";
+	mes "Noooooooooo!!!";
+	close2;
+	warp "que_god02.gat",120,52;
+	donpcevent "#brisinsummon::OnDoppel2Off";
+	donpcevent "#brisinsummon::OnKnight1Off";
+	donpcevent "#brisinsummon::OnKnight2Off";
+	donpcevent "#brisinsummon::OnKnight3Off";
+	donpcevent "#brisinsummon::OnLowenOff";
+	end;
+}
+
+que_god02.gat,124,59,7	script	#hermite	798,{ end; }
+ 
+que_god02.gat,120,52,0	script	#monologue	139,0,0,{
+
+OnTouch:
+	mes "[" + strcharinfo(0) + "]";
+	mes "Where am I?";
+	mes "Isn't that...";
+	mes "What's Hermite";
+	mes "doing here?!";
+	next;
+	mes "[Hermite Charles]";
+	mes "No, no, no!";
+	mes "Lowen don't it!";
+	mes "He's gonna kill you!";
+	next;
+	mes "[Hermite Charles]";
+	mes "Grand Cross...";
+	mes "Using that's committing suicide! Lowen, don't do it!";
+	mes "Don't do that, Lowen!";
+	next;
+	mapannounce "que_god02.gat","Mwahaha! Mortals are such fools...",0,0xA8A8A8;
+	mes "[Hermite Charles]";
+	mes "Lowen!";
+	mes "Noooooooooo!!!";
+	next;
+	donpcevent "#brisinsummon::OnHermiteOff";
+	mes "[" + strcharinfo(0) + "]";
+	mes "Where did he go?";
+	mes "Was... Was that";
+	mes "from his mind?";
+	mapannounce "que_god02.gat","What happened?! L-Lowen's gone!!",0,0xA8A8A8;
+	next;
+	mes "[Lowen Ellenen]";
+	mes "...";
+	mes "I see now.";
+	mes "I know...";
+	mes "What happened...";
+	close2;
+	warp "que_god02.gat",18,127;
+	end;
+
+}
+
+que_god02.gat,21,127,3	script	Lowen Ellenen#2	745,{
+
+	mes "[Lowen Ellenen]";
+	mes "I was a fool.";
+	mes "Now I remember Hermite. He must have been the one who rescued me. But when I came to my senses, no one was there.";
+	next;
+	mes "[Lowen Ellenen]";
+	mes "I blamed myself for surviving alone. I should have died there with my friends. I felt so useless.";
+	next;
+	mes "[Lowen Ellenen]";
+	mes "Now I realize that there were many people who loved me. But at the time, I felt only guilt.";
+	next;
+	mes "[Lowen Ellenen]";
+	mes "I returned 3 days later to my commander. It was stupid, but at the moment I couldn't think of anything else.";
+	next;
+	mes "[Lowen Ellenen]";
+	mes "The higher ups and the politicians were looking for a scapegoat for the failure of the mission.";
+	next;
+	mes "[Lowen Ellenen]";
+	mes "So I was the one who was blamed. Then, they took away everything I had. My status, the holy power granted to me...";
+	next;
+	mes "[Lowen Ellenen]";
+	mes "I thought I deserved that punishment. After all, why should I have survived when all my comrades died?";
+	next;
+	mes "[Lowen Ellenen]";
+	mes "It was then that I decided to avenge my friends, and salvage what was left of my sense of honor.";
+	next;
+	mes "[Lowen Ellenen]";
+	mes "I went back to that place. I fought and I fought, trying to make penance for what I had done wrong...";
+	next;
+	mapannounce "que_god02.gat","If you wish, continue your battle. I promise you the winner will become an Einherjar...",0,0x70DB93;
+	mes "[Lowen Ellenen]";
+	mes "That voice...";
+	mes "Isn't this...?";
+	next;
+	mes "[Lowen Ellenen]";
+	mes "Are you giving me another chance? But I no longer have a body to fight monsters any longer...";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Don't worry,";
+	mes "I'm with you!";
+	mes "Let's do it!";
+	close2;
+	set $@BrisinRID$,getcharid(3);
+	donpcevent "#brisinsummon::OnSummon";
+	donpcevent "#brisinsummon::OnLowen2Off";
+	end;
+
+}
+
+que_god02.gat,178,127,3	script	Valkyrie#1	811,{
+
+	if(god_brising == 31)
+{
+	mes "[Valkyrie]";
+	mes "You have passed the test, Lowen. I don't have much talk to speak.";
+	next;
+	mes "[Valkyrie]";
+	mes "Have you found the strength to release yourself from the guilt and the pain? I have been waiting for you. Will you accept my invitation to Valhalla?";
+	next;
+	menu "Yes, I will follow you.",-,"Um... I'm not Lowen.",L_No;
+			mes "[Valkyrie]";
+			mes "Lowen Ellenen, misunderstood hero. I will now promote you to Einherjar with the will of God.";
+			next;
+			mes "[Valkyrie]";
+			mes "Your soul and spirit will be reborn in Valhalla as a holy warrior preparing for the holy war.";
+			specialeffect2 42;
+			next;
+			mes "[Valkyrie]";
+			mes "And...";
+			mes ""+ strcharinfo(0) +",";
+			mes "Your exploits are known to me. But I am curious as to what has brought you here?";
+			next;
+			mes "^3355FFYou explained what happened to the Valkyrie, starting from the Snow Crystal which never melts.^000000";
+			next;
+			mes "[Valkyrie]";
+			mes "I understand.";
+			mes "The story begins a long, long time ago with Freya, the patron goddess of beauty and love.";
+			next;
+			mes "[Valkyrie]";
+			mes "Her teardrop became a beautiful jewel. The snow on which Freya's teardrops have fallen will always retain its crystalline beauty.";
+			next;
+			mes "[Valkyrie]";
+			mes "You seek traces of the goddess? Perhaps this is a sign of the end of the thousand year peace. When the time comes, I hope humans will not abandon their faith.";
+			next;
+			mes "[Valkyrie]";
+			mes "Perhaps, I was also sent to meet you. I wish that humans will use the power derived from the traces of the gods to protect justice.";
+			next;
+			mes "[Valkyrie]";
+			mes ""+ strcharinfo(0) +"...";
+			mes "Listen. This is";
+			mes "what you must find.";
+			next;
+			mes "[Valkyrie]";
+			mes "A cold snowy path that the goddess walked across";
+			mes "A blue river that the goddess walked across";
+			mes "A narrow path that the goddess passed";
+			mes "Four dwarves that the goddess met...";
+			next;
+			mes "[Valkyrie]";
+			mes "^4d4dff We lost our hearts";
+			mes "to that golden hair";
+			mes "and those dazzling eyes.^000000";
+			next;
+			mes "[Valkyrie]";
+			mes "Remember this.";
+			mes "I shall send you";
+			mes "back to where you";
+			mes "belong.";
+			set god_brising,34;
+			next;
+			mes "[Valkyrie]";
+			mes "For Odin's honor...";
+			close2;
+			disablenpc "#doppelganger1";
+			disablenpc "#doppelganger2";
+			disablenpc "#knight1";
+			disablenpc "#knight2";
+			disablenpc "#knight3";
+			disablenpc "#lowen";
+			enablenpc "Soldier#1_brising";
+			disablenpc "Soldier#2_brising";
+			enablenpc "#hermite";
+			enablenpc "Lowen Ellenen#2";
+			disablenpc "Valkyrie#1";
+			warp "geffen.gat",120,101;
+			end;
+		L_No:
+			mes "[Valkyrie]";
+			mes "Hahahaha...";
+			mes "It has been";
+			mes "a while since";
+			mes "a mortal has";
+			mes "made me laugh.";
+			next;
+			mes "[Valkyrie]";
+			mes ""+ strcharinfo(0) +",";
+			mes "I am speaking to the spirit of the girl that rests within you, the girl to whom you lent your body so that she may learn the truth of the past.";
+			next;
+			mes "[Valkyrie]";
+			mes "Lowen Ellenen, misunderstood hero. I will now promote you to Einherjar with the will of God.";
+			next;
+			mes "[Valkyrie]";
+			mes "Your soul and spirit will be reborn in Valhalla as a holy warrior preparing for the holy war.";
+			specialeffect2 42;
+			next;
+			mes "[Valkyrie]";
+			mes "And...";
+			mes ""+ strcharinfo(0) +",";
+			mes "Your exploits are known to me. But I am curious as to what has brought you here?";
+			next;
+			mes "^3355FFYou explained what happened to the Valkyrie, starting from the Snow Crystal which never melts.^000000";
+			next;
+			mes "[Valkyrie]";
+			mes "I understand.";
+			mes "The story begins a long, long time ago with Freya, the patron goddess of beauty and love.";
+			next;
+			mes "[Valkyrie]";
+			mes "Her teardrop became a beautiful jewel. The snow on which Freya's teardrops have fallen will always retain its crystalline beauty.";
+			next;
+			mes "[Valkyrie]";
+			mes "You seek traces of the goddess? Perhaps this is a sign of the end of the thousand year peace. When the time comes, I hope humans will not abandon their faith.";
+			next;
+			mes "[Valkyrie]";
+			mes "Perhaps, I was also sent to meet you. I wish that humans will use the power derived from the traces of the gods to protect justice.";
+			next;
+			mes "[Valkyrie]";
+			mes ""+ strcharinfo(0) +"...";
+			mes "Listen. This is";
+			mes "what you must find.";
+			next;
+			mes "[Valkyrie]";
+			mes "A cold snowy path that the goddess walked across";
+			mes "A blue river that the goddess walked across";
+			mes "A narrow path that the goddess passed";
+			mes "Four dwarves that the goddess met...";
+			next;
+			mes "[Valkyrie]";
+			mes "^4d4dffThe beauty of the stars";
+			mes "Wanes in comparison.";
+			mes "We lost our hearts";
+			mes "To that golden hair";
+			mes "And those dazzling eyes.^000000";
+			next;
+			mes "[Valkyrie]";
+			mes "Remember this.";
+			mes "I shall send you";
+			mes "back to where you";
+			mes "belong.";
+			set god_brising,34;
+			next;
+			mes "[Valkyrie]";
+			mes "For Odin's honor...";
+			close2;
+			disablenpc "#doppelganger1";
+			disablenpc "#doppelganger2";
+			disablenpc "#knight1";
+			disablenpc "#knight2";
+			disablenpc "#knight3";
+			disablenpc "#lowen";
+			enablenpc "Soldier#1_brising";
+			disablenpc "Soldier#2_brising";
+			enablenpc "#hermite";
+			enablenpc "Lowen Ellenen#2";
+			disablenpc "Valkyrie#1";
+			warp "geffen.gat",120,101;
+			end;
+}
+
+}
+
+xmas.gat,38,105,0	script	#brisindwarf1	111,3,3,{
+
+	if($God2 < 50)
+{
+	mes "^3355FFA lot of snow";
+	mes "is heavily piled";
+	mes "here on the ground.^000000";
+	close;
+}
+	if($God3 > 99)
+{
+	mes "^3355FFA lot of snow";
+	mes "is heavily piled";
+	mes "here on the ground.^000000";
+	close;
+}
+	if (god_brising > 39 && god_brising < 50)
+{
+	mes "^3355FFA lot of snow";
+	mes "is heavily piled";
+	mes "here on the ground.^000000";
+	next;
+	mes "^3355FFHowever, this particular mound strikes you as curious for some reason.^000000";
+	next;
+	menu "Sweep the snow away with your hand.",-,"Poke the snow with your finger.",L_Poke,"Cancel.",L_No;
+			mes "^3355FFAs you sweep the snow with the palm of your hand, some of the snow melts, revealing a strange puzzle cube. It's multi-faceted, but you can read that each facet is inscribed with a lyric.";
+			set @point,0;
+			next;
+			menu "Adjust the puzzle.",-,"Quit.",L_Quit;
+					mes "[" + strcharinfo(0) + "]";
+					mes "Okay, um...";
+					mes "I guess I should";
+					mes "choose a lyric...";
+					next;
+					Menu1:
+					menu "Wanes in comparison",case11,"To that beautiful hair",case12,"All of our hearts",case13,"The beauty of the stars",case14,"to those dazzling eyes",case15;
+						case11:
+							mes "[" + strcharinfo(0) + "]";
+							mes "we gave...";
+							goto Menu2;
+						
+						case12:
+							mes "[" + strcharinfo(0) + "]";
+							mes "to that beautiful hair";
+							goto Menu2;
+						case13:
+							mes "[" + strcharinfo(0) + "]";
+							mes "all of our hearts in";
+							goto Menu2;
+						case14:
+							mes "[" + strcharinfo(0) + "]";
+							mes "The beauty of the stars";
+							set @point,@point +1;
+							goto Menu2;
+						case15:
+							mes "[" + strcharinfo(0) + "]";
+							mes "to those dazzling eyes";
+							goto Menu2;
+					Menu2:		
+					menu "we gave",case21,"Wanes in comparison.",case22,"all of our hearts in",case23,"to the steps in",case24,"to those dazzling eyes",case25;
+						case21:
+							mes "we gave..";
+							goto Menu3;
+						case22:
+							mes "Wanes in comparison.";
+							set @point,@point +1;
+							goto Menu3;
+						case23:
+							mes "all of our hearts in";
+							goto Menu3;
+						case24:
+							mes "to the steps in";
+							goto Menu3;
+						case25:
+							mes "to those dazzling eyes";
+							goto Menu3;
+					Menu3:
+					menu "we gave",case31,"to that beautiful hair",case32,"all of our hearts in",case33,"to the steps in",case34,"We lost our hearts",case35;
+						case31:
+							mes "we gave..";
+							goto Menu4;
+						case32:
+							mes "to that beautiful hair";
+							goto Menu4;
+						case33 :
+							mes "all of our hearts in";
+							goto Menu4;
+						case34:
+							mes "to the steps in";
+							goto Menu4;
+						case35:
+							mes "We lost our hearts";
+							set @point,@point +1;
+							goto Menu4;
+					Menu4:
+					menu "To that golden hair",case41,"to that beautiful hair",case42,"all of our hearts in",case43,"to the steps in",case44,"to those dazzling eyes",case45;
+						case41:
+							mes "To that golden hair";
+							set @point,@point +1;
+							goto Menu5;
+						case42:
+							mes "to that beautiful hair";
+							goto Menu5;
+						case43:
+							mes "all of our hearts in";
+							goto Menu5;
+						case44:
+							mes "to the steps in";
+							goto Menu5;
+						case45:
+							mes "to those dazzling eyes";
+							goto Menu5;
+					Menu5:
+					menu "we gave",case51,"to that beautiful hair",case52,"And those dazzling eyes.",case53,"to the steps in",case54,"to those dazzling eyes",case55;
+						case51:
+							mes "we gave..";
+							goto Check;
+						case52:
+							mes "to that beautiful hair";
+							goto Check;
+						case53:
+							mes "And those dazzling eyes.";
+							set @point,@point +1;
+							goto Check;
+						case54:
+							mes "to the steps in";
+							goto Check;
+						case55:
+							mes "to those dazzling eyes";
+							goto Check;
+					Check:
+					next;
+						if(@point > 4)
+					{
+						donpcevent "#brisindwarf1::OnAlfrikOn";
+						mes "[Old dwarf]";
+						mes "Who are you?!";
+						mes "And why the hell";
+						mes "did you wake me up?";
+						close;
+					}
+				
+				L_Quit:
+					mes "[" + strcharinfo(0) + "]";
+					mes "Huh...?";
+					mes "Nothing happened.";
+					mes "Did I do something wrong, or is this just a completely ordinary puzzle cube?";
+					close;         
+               	L_No:
+                                        mes "["+ strcharinfo(0) +"]";
+					mes "This...";
+					mes "This better not";
+					mes "be just some regular";
+					mes "puzzle cube that someone";
+					mes "just dropped in the snow!";
+					close;
+			
+		L_Poke:
+			mes "^3355FFYou use your finger to poke the pile of snow. However, you hurt your finger a little bit after hitting something really solid.^000000";
+			emotion e_ag,1;
+			set Hp,Hp -20;
+			close;
+}
+	else
+{
+	mes "- There was a pile of snow under a tree. -";
+	close;
+}
+
+OnTouch:
+	if(god_brising > 39) emotion e_gasp,1;
+	end;
+
+OnInit:
+	disablenpc "Alfrik#1";
+	end;
+
+OnAlfrikOn:
+	enablenpc "Alfrik#1";
+	end;
+
+OnAlfrikOff:
+	disablenpc "Alfrik#1";
+	end;
+
+}
+
+xmas.gat,36,103,4	script	Alfrik#1	826,{
+
+	if (god_brising == 49)
+{
+	mes "[Alfrik]";
+	mes "I've got nothing more to say! Now get out of here! I don't want to be found!";
+	close2;
+	donpcevent "#brisindwarf1::OnAlfrikOff";
+	end;
+}
+	else if(god_brising == 48)
+{
+	mes "[Alfrik]";
+	mes "What's up, human?";
+	mes "All of us have awakened.";
+	next;
+	menu "I just wanted to say hello.",-,"What are materials for Brisingamen?",L_Material;
+			mes "[Alfrik]";
+			mes "Your gesture is appreciated, but I'd rather hide than socialize. I don't want to be found by the crows of Odin!";
+			close2;
+			donpcevent "#brisindwarf1::OnAlfrikOff";
+			end;
+		L_Material:
+			mes "[Alfrik]";
+			mes "Materials for Brisingamen? For the human imitation, the materials are pretty easy to gather...";
+			next;
+			mes "[Alfrik]";
+			mes "The power of weapons used by gods, when they battled demons a thousand years ago, and everything detached from Brisingamen. That's basically what you need.";
+			next;
+			mes "[Alfrik]";
+			mes "If you want to create a Brisingamen you will need.....";
+			mes "^4d4dffFreya's Jewel";
+			mes "Silver Ornament";
+			mes "Snow Crystal";
+			mes "Ripple";
+			mes "Drifting Air^000000";
+			next;
+			mes "[Alfrik]";
+			mes "You might need some gems, like Saphire, Peal, Opal, Curse Ruby, and maybe even some Gold to decorate the necklace.";
+			next;
+			mes "[Alfrik]";
+			mes "Although I give freely of my advice, we four dwarves will no longer do smithing work unless it be Freya's command.";
+			next;
+			mes "[Alfrik]";
+			mes "But I can promise you one thing. Since the four of us have awakened, humans will obtain the Brisingamen for sure.";
+			next;
+			mes "[Alfrik]";
+			mes "Now...";
+			mes "Leave me";
+			mes "in peace.";
+			set god_brising,49;
+			close2;
+			donpcevent "#brisindwarf1::OnAlfrikOff";
+			end;
+}
+	else if(god_brising == 40)
+{
+	mes "[Alfrik]";
+	mes "^333333*Yawn...*^000000";
+	mes "It's been a long time since I've seen the sun! W-wait! You're not...";
+	next;
+	mes "[Alfrik]";
+	mes "Who sent you?!";
+	mes "Loki? Heimdall?";
+	mes "Or was it Freya?";
+	next;
+	menu "No one, it was an accident!",-,"It was Valkyrie.",L_Valkyrie;
+			mes "[Alfrik]";
+			mes "Don't even think of lying to me, human! There's no way you could have awoken me without knowing the password! Now, speak!";
+			next;
+			menu "Valkyrie told me.",-,"It was a coincidence!",L_Coincidence;
+					mes "[Alfrik]";
+					mes "Valkyrie...?";
+					mes "Odin's warmonger? What could Odin want, I haven't done anything wrong!";
+					next;
+					mes "^3355FFYou explained everything to Alfrik, who seems to worry about being targeted by Odin.^000000";
+					next;
+					mes "[Alfrik]";
+					mes "So that's it.";
+					mes "Seeking out our masterpiece? You humans must desire the power of the gods. Interesting.";
+					next;
+					mes "[Alfrik]";
+					mes "The time for us to revive may actually have come! Alright then, I Alfrik shall cooperate with you humans.";
+					next;
+					mes "[Alfrik]";
+					mes "After all, getting on Odin's good side like this is much better than being tortured by Loki.";
+					next;
+					mes "[Alfrik]";
+					mes "Now, about the masterpiece we made for Freya. There can only be one in the world.";
+					next;
+					mes "[Alfrik]";
+					mes "However, that doesn't mean an imitation, with the same power as that godly item, can't be made. Isn't it tempting, the power of a god?";
+					next;
+					mes "[Alfrik]";
+					mes "First things first. If you want to make the necklace, you must awaken all four of us. Because of Loki's threat, we all hid ourselves in different places.";
+					next;
+					mes "[Alfrik]";
+					mes "Go wake my brothers! Let's see if the Brisingamen can be made once again!";
+					next;
+					mes "[Alfrik]";
+					mes "Now go and wake Dvalin, before the gods and giants can find out!";
+					set god_brising,41;
+					close2;
+					donpcevent "#brisindwarf1::OnAlfrikOff";
+					end;
+				L_Coincidence:
+					mes "[Alfrik]";
+					mes "Coincidence?";
+					mes "Impossible! How dare you lie! Don't ever come back, or the gods will find me!";
+					close2;
+					donpcevent "#brisindwarf1::OnAlfrikOff";
+					end;
+		L_Valkyrie:
+			mes "[Alfrik]";
+			mes "...did you just speak of Valkyrie!";
+			mes "That Odin's maiden...that war monger..";
+			mes "...I see, Odin must want me.";
+			mes "...but...but I haven't done anything wrong.";
+			mes "I haven't!";
+			next;
+			mes "- You explained everything -";
+			mes "- to Alfrik who seemed to fear Odin. -";
+			next;
+			mes "[Alfrik]";
+			mes "Errr...? Was that it?";
+			mes "Do humans desire the power of God?";
+			mes "..heheheh....";
+			mes "It's interesting.";
+			mes "Besides, you're looking for a thing";
+			mes "that was made by me and my brothers long time ago.";
+			next;
+			mes "[Alfrik]";
+			mes "....giggle...giggle...giggle...";
+			mes "It may be the time for revive!";
+			mes "...giggle giggle...okay. Good.";
+			mes "I, Alfrik shall cooperate with you humans.";
+			mes "After all, it will be way better than being tortured by Loki or Heimdall.";
+			next;
+			mes "[Alfrik]";
+			mes "Giggle...giggle...giggle...oh by the way...";
+			mes "I don't think that Freya will like my idea...?";
+			mes "Giggle...giggle....";
+			mes "Hey, human.";
+			mes "Aren't you curious about the Freya's Necklace?";
+			next;
+			mes "[Alfrik]";
+			mes "Of course only one Brisingamen exists in the world.";
+			mes "However, you can create a similar thing";
+			mes "...which has the same power as the godly item.";
+			mes "The power of god...isn't it tempting?";
+			next;
+			mes "[Alfrik]";
+			mes "If you want to make the necklace,";
+			mes "you must wake up all of us.";
+			mes "....I hate Loki and Odin...";
+			mes "My brothers were put into sleep";
+			mes "in seperate places.";
+			next;
+			mes "[Alfrik]";
+			mes "Freaking Heimdall...";
+			mes "We could not win over the smart and fast guy.";
+			mes "Go wake my brothers!";
+			mes "Let's see if we can bring up the Brisingamen";
+			mes "once again!";
+			next;
+			mes "[Alfrik]";
+			mes "Now, before gods and giants get to know about it,";
+			mes "go wake Dvalin!";
+			set god_brising,41;
+			close2;
+			donpcevent "#brisindwarf1::OnAlfrikOff";
+			end;
+}
+	else if(god_brising == 41)
+{
+	mes "[Alfrik]";
+	mes "Why are you still here?";
+	mes "I told you go wake Dvalin!";
+	next;
+	menu "Where is he?",-,"Tell me more about Brisingamen.",L_More;
+			mes "[Alfrik]";
+			mes "Ah. Right.";
+			mes "I forgot to tell you. Poor Dvalin. Now, where was it?";
+			next;
+			mes "[Alfrik]";
+			mes "We were afraid that Odin and Heimdall would punish us because, well, in their eyes we disgraced the goddess.";
+			next;
+			mes "[Alfrik]";
+			mes "Oh course, they never would have been angered if it weren't for Loki's trickery.";
+			next;
+			mes "[Alfrik]";
+			mes "We loved Freya so much that we decided to hide ourselves beneath the path that she walked. To be as close to any trace of her as we could.";
+			next;
+			mes "[Alfrik]";
+			mes "Poor Dvalin is sleeping under the path in the East. Once there, you'll feel the scent the goddess.";
+			next;
+			mes "[Alfrik]";
+			mes "I can't remember where the others are sleeping, but you cannot forget these words...";
+			next;
+			mes "[Alfrik]";
+			mes "^4d4dffHer lovely scent";
+			mes "Still lingers in the wind.";
+			mes "We surrendered our hearts";
+			mes "To those tender teardrops";
+			mes "Those seductive red lips.^000000";
+			set god_brising,42;
+			close2;
+			donpcevent "#brisindwarf1::OnAlfrikOff";
+			end;
+		L_More:
+			mes "[Alfrik]";
+			mes "Brisingamen is our masterpiece, a necklace we forged for Freya. Even if we tried making it again, I doubt it would be as good.";
+			next;
+			mes "[Alfrik]";
+			mes "It looked perfect on Freya. Very difficult to create jewelry that actually enhances the attractiveness of the goddess of beauty.";
+			next;
+			mes "[Alfrik]";
+			mes "Perhaps our greatest reward was that beautiful smile of satisfaction she gave us when that we gave her that necklace. We loved her so.";
+			next;
+			mes "[Alfrik]";
+			mes "Is it that wrong for dwarves to love a goddess? Perhaps we were punished because the gods, even Odin, loved her as well.";
+			next;
+			mes "[Alfrik]";
+			mes "In any case, we've never seen the true Brisingamen again. But something very similar to it can be created...";
+			next;
+			mes "[Alfrik]";
+			mes "You'll need materials that have been graced by the goddess' presense. Traces of the goddess in the earth, water and the wind.";
+			next;
+			mes "[Alfrik]";
+			mes "And if the Brisingamen is recreated, the power of a god will be in the hands of a human. That human could be you!";
+			next;
+			mes "[Alfrik]";
+			mes "Poor Dvalin is sleeping under the path in the East. Once there, you'll feel the scent the goddess.";
+			next;
+			mes "[Alfrik]";
+			mes "I can't remember where the others are sleeping, but you cannot forget these words...";
+			next;
+			mes "[Alfrik]";
+			mes "^4d4dffHer lovely scent";
+			mes "Still lingers in the wind.";
+			mes "We surrendered our hearts";
+			mes "To those tender teardrops";
+			mes "Those seductive red lips.^000000";
+			set god_brising,42;
+			close2;
+			donpcevent "#brisindwarf1::OnAlfrikOff";
+			end;
+}
+	else if(god_brising == 42)
+{
+	mes "[Alfrik]";
+	mes "Will you please!";
+	mes "Get lost before Loki and Heimdall find out I've awakened! Now hurry, find Dvalin, and wake him up!";
+	close2;
+	donpcevent "#brisindwarf1::OnAlfrikOff";
+	end;
+}
+	else if(god_brising > 42 && god_brising < 48)
+{
+	mes "[Alfrik]";
+	mes "Oh, finally all of us have awakened! Now, the power of the goddess can be retrieved from the earth, water and the wind!";
+	next;
+	mes "[Alfrik]";
+	mes "Hahahahaha!";
+	mes "This should be";
+	mes "interesting!";
+	close2;
+	donpcevent "#brisindwarf1::OnAlfrikOff";
+	end;
+}
+	else
+{
+	mes "[Alfrik]";
+	mes "Mmm...?";
+	mes "I've got no business with you.";
+	close2;
+	donpcevent "#brisindwarf1::OnAlfrikOff";
+	end;
+}
+
+}
+
+prt_fild02.gat,185,269,0	script	#brisindwarf2	111,3,3,{
+
+	if($God2 < 50)
+{
+	mes "^3355FFIt's just an";
+	mes "ordinary rock.^000000";
+	close;
+}
+
+	if($God3 > 99)
+{
+	mes "^3355FFIt's just an";
+	mes "ordinary rock.^000000";
+	close;
+}
+
+	if(god_brising > 41)
+{
+	mes "^3355FFIt's just an ordinary rock underneath the shadow of a tree. But on closer inspection, you notice that the moss on top of the rock looks perfectly flat.^000000";
+	next;
+	menu "Step on it.",-,"Sweep the surface.",L_Sweep,"Scratch the surface.",L_Scratch,"Kick it.",L_Kick;
+			mes "^3355FFYou gingerly place your foot on the top of the stone. The entire rock suddenly swings downward into the ground, and you fall downward...^000000";
+			close2;
+			warp "prt_fild02.gat",165,224;
+			end;
+		L_Sweep:
+			mes "^3355FFAs you sweep away the moss with your hand, you scratch your palm from the sharp edges of the rock.^000000";
+			emotion e_gasp,1;
+			next;
+			mes "[" + strcharinfo(0) + "]";
+			mes "Damn...!";
+			mes "I'm bleeding!";
+			mes "But why didn't anything else happen?!";
+			next;
+			mes "["+ strcharinfo(0) +"]";
+			mes "This rock had";
+			mes "better be one of";
+			mes "those secret rocks!";
+			mes "Or else...!";
+			close;
+		L_Scratch:
+			mes "^3355FFYou scratch away at the moss, and feel that the surface of the rock has even recesses.";
+			next;
+			mes "^3355FFAfter peeling off the moss, a series of tiles, etched with faint words, are revealed on top of the rock.^000000";
+			next;
+			mes "^3355FFThese tiles could be moved around, like in a puzzle.^000000";
+			next;
+			mes "[" + strcharinfo(0) + "]";
+			mes "Another puzzle?";
+			mes "This was just like when I had to give Alfrik's password. Okay, let me see...";
+			set @point,0;
+			next;
+			Menu1:
+			menu "to the tear drops dripping on the way",case11,"Her lovely scent",case12,"we gave",case13,"to the seducing red lips",case14,"our hearts in",case15;
+				case11:
+					mes "[" + strcharinfo(0) + "]";
+					mes "to the tear drops dripping on the way";
+					goto Menu2;
+				case12:
+					mes "[" + strcharinfo(0) + "]";
+					mes "Her lovely scent";
+					set @point,@point +1;
+					goto Menu2;
+				case13:
+					mes "[" + strcharinfo(0) + "]";
+					mes "we gave";
+					goto Menu2;
+				case14:
+					mes "[" + strcharinfo(0) + "]";
+					mes "to the seducing red lips";
+					goto Menu2;
+				case15:
+					mes "[" + strcharinfo(0) + "]";
+					mes "our hearts in";
+					goto Menu2;
+			Menu2:
+			menu "Still lingers in the wind.",case21,"to the scent drifted in the wind",case22,"we gave",case23,"to the seducing red lips",case24,"our hearts in",case25;
+				case21:
+					mes "Still lingers in the wind.";
+					set @point,@point +1;
+					goto Menu3;
+				case22:
+					mes "to the scent drifted in the wind";
+					goto Menu3;
+				case23:
+					mes "we gave";
+					goto Menu3;
+				case24:
+					mes "to the seducing red lips";
+					goto Menu3;
+				case25:
+					mes "our hearts in";
+					goto Menu3;
+			Menu3:
+			menu "to the tear drops dripping on the way",case31,"to the scent drifted in the wind",case32,"we gave",case33,"We surrendered our hearts",case34,"our hearts in",case35;
+				case31:
+					mes "to the tear drops dripping on the way";
+					goto Menu4;
+				case32:
+					mes "to the scent drifted in the wind";
+					goto Menu4;
+				case33:
+					mes "we gave";
+					goto Menu4;
+				case34:
+					mes "We surrendered our hearts";
+					set @point,@point +1;
+					goto Menu4;
+				case35:
+					mes "our hearts in";
+					goto Menu4;
+			Menu4:
+			menu "to the tear drops dripping on the way",case41,"to the scent drifted in the wind",case42,"To those tender teardrops",case43,"to the seducing red lips",case44,"our hearts in",case45;
+				case41:
+					mes "to the tear drops dripping on the way";
+					goto Menu5;
+				case42:
+					mes "to the scent drifted in the wind";
+					goto Menu5;
+				case43:
+					mes "To those tender teardrops";
+					set @point,@point +1;
+					goto Menu5;
+				case44:
+					mes "to the seducing red lips";
+					goto Menu5;
+				case45:
+					mes "our hearts in";
+					goto Menu5;
+			Menu5:
+			menu "to the tear drops dripping on the way",case51,"to the scent drifted in the wind",case52,"we gave",case53,"to the seducing red lips",case54,"Those seductive red lips",case55;
+				case51:
+					mes "to the tear drops dripping on the way";
+					goto Check;
+				case52:
+					mes "to the scent drifted in the wind";
+					goto Check;
+				case53:
+					mes "we gave";
+					goto Check;
+				case54:
+					mes "to the seducing red lips";
+					goto Check;
+				case55:
+					mes "Those seductive red lips";
+					set @point,@point +1;
+					goto Check;
+			Check:
+			next;
+				if(@point > 4)
+			{
+				donpcevent "#brisindwarf2::OnDvalinOn";
+				mes "[Dvalin]";
+				mes "...?";
+				mes "Alfrik?";
+				mes "Is that you?";
+				close;
+			}
+		L_Kick:
+			mes "[" + name + "]";
+			mes "^333333*Cough cough!*";
+			mes "Aaaack!";
+			mes "It's so dusty!";
+			close;
+}
+	else
+{
+	mes "^3355FFJust a normal";
+	mes "rock, covered in moss.^000000";
+	close;
+}
+
+OnTouch:
+	if(god_brising > 41) emotion e_gasp,1;
+	end;
+
+OnInit:
+	disablenpc "Dvalin#1";
+	end;
+
+OnDvalinOn:
+	enablenpc "Dvalin#1";
+	end;
+
+OnDvalinOff:
+	disablenpc "Dvalin#1";
+	end;
+}
+
+prt_fild02.gat,185,270,3	script	Dvalin#1	826,{
+
+	if (god_brising > 43)
+{
+	mes "[Dvalin]";
+	mes "A human?";
+	mes "You woke me up?";
+	next;
+	mes "[Dvalin]";
+	mes "Hmm...";
+	mes "And you'd be acting pretty pushy right about now if you were acting on behalf of a god. What could you want...?";
+	next;
+	mes "[Dvalin]";
+	mes "It makes sense that you want a replica of Brisingamen for its power. But remember, we originally made Brisingamen as a necklace fit for a goddess.";
+	next;
+	mes "[Dvalin]";
+	mes "Some might say that we seduced Freya with the necklace, but we really loved her with all of our hearts.";
+	close2;
+	donpcevent "#brisindwarf2::OnDvalinOff";
+	end;
+}
+	else if(god_brising == 42)
+{
+	mes "[Dvalin]";
+	mes "Wah, it's not Alfrik?";
+	mes "Who are you to wake Dvalin?";
+	mes "Tell me right now, or I am gonna kick your ass!";
+	next;
+	menu "Help!",-,"Alfrik sent me to wake you up!",L_Alfrik;
+			mes "[Dvalin]";
+			mes "I don't know what the hell you're doing here,";
+			mes "but leave!";
+			close2;
+			donpcevent "#brisindwarf2::OnDvalinOff";
+			end;
+		L_Alfrik:
+			mes "[Dvalin]";
+			mes "Did you just say Alfrik sent you? How do you know my brother?!";
+			next;
+			mes "[Dvalin]";
+			mes "Brisingamen?!";
+			mes "Then, that means we could meet Freya again?!";
+			next;
+			mes "[" + strcharinfo(0) + "]";
+			mes "Umm...";
+			mes "I'm afraid not.";
+			mes "Or, at least, that's";
+			mes "not why I'm here.";
+			next;
+			mes "[Dvalin]";
+			mes "Okay. I understand. Sorry, I was just hoping you were a herald of Freya.";
+			next;
+			mes "[Dvalin]";
+			mes "So, an imitation of Brisingamen. Even if it's not the original, I'm sure it can possess power comparable to the original. Yes...";
+			next;
+			mes "[Dvalin]";
+			mes "It's no use trying to predict the future, but I can't help but wonder what would mankind do with the power of the gods?";
+			next;
+			mes "[Dvalin]";
+			mes "If my brother Alfrik already approved of you, then I'll help you out. I'll tell you how to wake my brother Berling.";
+			next;
+			mes "[Dvalin]";
+			mes "We hid ourselves near traces of Freya. The path where I am staying is one that my goddess has walked through.";
+			next;
+			mes "[Dvalin]";
+			mes "The air that quietly drifts here holds her fragrant scent. You can use this wind to borrow her power.";
+			next;
+			mes "[Dvalin]";
+			mes "Aside from Freya, I have no special love for the gods or giants. But I am intrigued by you humans. Your race is one of both love and hatred, life and destruction.";
+			next;
+			mes "[Dvalin]";
+			mes "Go now and seek Berling. He is sleeping near a river connect to Mount Mjolnir. Travel West to find the river were Freya's Teardrops have fallen.";
+			next;
+			mes "[Dvalin]";
+			mes "If the phantom of water gives you a question, answer it. The answer is the punishment that Odin gave to our goddess.";
+			next;
+			mes "[Dvalin]";
+			mes "Until thousands of Valkyries filled up Valhala, they had to repeatedly live, die, then be reborn the next day only to die again.";
+			next;
+			mes "[Dvalin]";
+			mes "Think about who they were. That's all I can tell you.";
+			next;
+			mes "[Dvalin]";
+			mes "Somehow, I know";
+			mes "you are the one who";
+			mes "can answer the question.";
+			mes "Hahahaha!";
+			set god_brising,43;
+			close2;
+			donpcevent "#brisindwarf2::OnDvalinOff";
+			end;
+}
+	else if(god_brising == 43)
+{
+	mes "[Dvalin]";
+	mes "Why do you keep calling me? I did everything I can do for you. I even gave you the key of the question.";
+	next;
+	mes "[Dvalin]";
+	mes "From now on,";
+	mes "it's all up to you.";
+	mes "Now, go wake Berling...";
+	close2;
+	donpcevent "#brisindwarf2::OnDvalinOff";
+	end;
+}
+
+}
+
+mjolnir_09.gat,85,129,0	script	#brisindwarf3	111,3,3,{
+
+	if($God2 < 50)
+{
+	mes "^3355FFThe sight of this bubbling stream refreshes you just by looking at it.^000000";
+	close;
+}
+	if($God3 > 99)
+{
+	mes "^3355FFThe sight of this bubbling stream refreshes you just by looking at it.^000000";
+	close;
+}
+	if (god_brising > 42 && god_brising < 50)
+{
+	specialeffect 109;
+	mes "[Echoing Voice]";
+	mes "Alfrik: confirmed.";
+	mes "Dvalin: confirmed.";
+	next;
+	mes "[Echoing Voice]";
+	mes "Please answer me.";
+	mes "Odin punished beautiful Freya, and made her curse humans with her powers.";
+	next;
+	mes "[Echoing Voice]";
+	mes "Freya cursed many human beings to repeatedly die and be reborn in an eternal battle.";
+	mes "How many are they?";
+	next;
+	switch( select( "20!","How should I know?!","40!","42!" ))
+	{
+		case 1:
+			specialeffect 109;
+			mes "[Echoing Voice]";
+			mes "Failed.";
+			mes "Failed...";
+			close;
+		break;
+		case 2:
+			specialeffect 109;
+			mes "[Echoing Voice]";
+			mes "Failed.";
+			mes "Failed...";
+			close;
+		break;
+		case 3:
+			specialeffect 109;
+			mes "[Echoing Voice]";
+			mes "Failed.";
+			mes "Failed...";
+			close;
+		break;
+		case 4:
+			specialeffect 109;
+			mes "[Echoing Voice]";
+			mes "...Confirmed.";
+			mes "Shutting down barrier. Initiating summoning.";
+			next;
+			enablenpc "Berling#1";
+			mes "[Berling]";
+			mes "^333333*Gasp--!*^000000";
+			mes "Thought I was";
+			mes "gonna drown to death!";
+			mes "Who woke me up?";
+			close;
+		break;
+	}
+}
+	else
+{
+	mes "^3355FFThe sight of this bubbling stream refreshes you just by looking at it.^000000";
+	close;
+}
+
+OnTouch:
+	if(god_brising > 42) emotion e_gasp,1;
+	end;
+
+OnInit:
+	disablenpc "Berling#1";
+	end;
+
+OnBerlingOn:
+	enablenpc "Berling#1";
+	end;
+
+OnBerlingOff:
+	disablenpc "Berling#1";
+	end;
+}
+
+mjolnir_09.gat,87,129,3	script	Berling#1	826,{
+
+	if(god_brising > 44)
+{
+	mes "[Berling]";
+	mes "You're the one that's awakened us? Hahaha, perhaps that's a sign we may see Freya again! Hahahaha!";
+	next;
+	mes "[Berling]";
+	mes "We are indebted to you for reviving us. Okay, I know what you want, and will help you obtain the power of the gods.";
+	close2;
+	donpcevent "#brisindwarf3::OnBerlingOff";
+	end;
+}
+	else if(god_brising == 43)
+{
+	mes "[Berling]";
+	mes "What the...?";
+	mes "It's a human?!";
+	mes "What do you want?";
+	mes "Wh-who are you?";
+	next;
+	menu "Dvalin wants you to wake up!",-,"Tell me who you are first!",L_Who;
+			mes "[Berling]";
+			mes "Dvalin?! You mean my brother! But he can only be revived if Alfrik is revived. What happened?";
+			next;
+			mes "[" + strcharinfo(0) + "]";
+			mes "Umm...";
+			mes "Let me explain...";
+			next;
+			mes "...";
+			mes "......";
+			mes ".........";
+			next;
+			mes "["+ strcharinfo(0) +"]";
+			mes "...So if I guess I need to wake up all four of you dwarves so that Brisingamen, which holds Freya's power, can be made again.";
+			next;
+			mes "[Berling]";
+			mes "Oh! Say that name once again! Freya, the goddess who took my body and soul! Did you just say you want to make her necklace?";
+			next;
+			mes "[Berling]";
+			mes "Hahahaha, stop joking around. The Brisingamen is a one of a kind masterpiece!";
+			next;
+			menu "I don't mean the original one, but...",-;
+					mes "[Berling]";
+					mes "Ah, now I see! You want a replica that has roughly the same power. A Brisingamen used by humans!";
+					next;
+					mes "[Berling]";
+					mes "I, on the other hand, do not desire power. If would be happy to own but a strand of her hair.";
+					next;
+					mes "[Berling]";
+					mes "Oh Freya...";
+					mes "The more of her beauty exists in this world, the happier I'll be. I'm more than willing to help you recreate this memento of Freya.";
+					next;
+					mes "[Berling]";
+					mes "Now, please go and find the last one of my brothers! Poor Grer, perhaps he is still digging silver in that mine for her...";
+					next;
+					mes "[Berling]";
+					mes "Go and find Grer. I will give you Freya's golden teardrop, but he might have revived on his own...";
+					next;
+					mes "[Berling]";
+					mes "If he doesn't trust you, sing this song. You must remember each and every word...";
+					next;
+					mes "[Berling]";
+					mes "^4d4dffNo jewel in the world can compare.^000000";
+					next;
+					mes "[Berling]";
+					mes "^4d4dffOur masterpiece made from love.^000000";
+					next;
+					mes "[Berling]";
+					mes "^4d4dffShe wanted the dazzling necklace.^000000";
+					next;
+					mes "[Berling]";
+					mes "^4d4dffWe wanted the goddess of beauty.^000000";
+					next;
+					mes "[Berling]";
+					mes "^4d4dffOur happiest times were with her.^000000";
+					next;
+					mes "[Berling]";
+					mes "Memorize all five lines of this song exactly. Now take this golden teardrop and please seek out Grer.";
+					specialeffect2 84;
+					set god_brising,44;
+					close2;
+					donpcevent "#brisindwarf3::OnBerlingOff";
+					end;
+		L_Who:
+			mes "[Berling]";
+			mes "Where the hell did you come from?";
+			mes "I am Berling the greatest dwarf in ages!";
+			mes "I regret to tell you this, but I do not have a name";
+			mes "to introduce to such an ill-bred lad like you!";
+			next;
+			mes "[" + strcharinfo(0) + "]";
+			mes "Heh, you just said you're Berling...";
+			next;
+			mes "[Berling]";
+			mes "Baaaaahhh!";
+			mes "Quiet you!";
+			mes "Mind your own business!";
+			close2;
+			donpcevent "#brisindwarf3::OnBerlingOff";
+			end;
+}
+	else if(god_brising == 44)
+{
+	mes "[Berling]";
+	mes "Did you already forget the lyrics? Let me tell them to you again, so don't forget this time.";
+	next;
+	mes "[Berling]";
+	mes "^4d4dffNo jewel in the world can compare.^000000";
+	next;
+	mes "[Berling]";
+	mes "^4d4dffOur masterpiece made from love.^000000";
+	next;
+	mes "[Berling]";
+	mes "^4d4dffShe wanted the dazzling necklace.^000000";
+	next;
+	mes "[Berling]";
+	mes "^4d4dffWe wanted the goddess of beauty.^000000";
+	next;
+	mes "[Berling]";
+	mes "^4d4dffOur happiest times were with her.^000000";
+	close2;
+	donpcevent "#brisindwarf3::OnBerlingOff";
+	end;
+}
+
+}
+
+mjo_dun02.gat,126,36,0	script	#brisindwarf4	111,3,3,{
+
+	if($God2 < 50)
+{
+	mes "[" + strcharinfo(0) + "]";
+	mes "Bah, no way out.";
+	close;
+}
+	if($God3 > 99)
+{
+	mes "[" + strcharinfo(0) + "]";
+	mes "Bah, no way out.";
+	close;
+}
+	if(god_brising > 45 && god_brising < 50)
+{
+	mes "[Grer]";
+	mes "What!";
+	enablenpc "Grer#1";
+	close;
+}
+	else if(god_brising == 45)
+{
+        mes "- A charcoal was dropped from the sky' -";
+        mes "- with a voice, 'Show me!'. -";
+        mes "- Let's scribble...-";
+	set @point,0;
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "Let's see.";
+	mes "Um, that song.";
+	mes "What was the first line...?";
+	next;
+	input @dwarfsong1$;
+	if(@dwarfsong1$ == "No jewel in the world can compare.") set @point,@point +1;
+	mes "[" + strcharinfo(0) + "]";
+	mes " " + @dwarfsong1$ + "";
+	mes "Then...ummm..";
+	mes "The second line?";
+	next;
+	input @dwarfsong2$;
+	if(@dwarfsong2$ == "Our masterpiece made from love.") set @point,@point +1;
+	mes "[" + strcharinfo(0) + "]";
+	mes " " + @dwarfsong2$ + "";
+	mes "Now, what was";
+	mes "the third line...?";
+	next;
+	input @dwarfsong3$;
+	if(@dwarfsong3$ == "She wanted the dazzling necklace.") set @point,@point +1;
+	mes "[" + strcharinfo(0) + "]";
+	mes " " + @dwarfsong3$ + "";
+	mes "Now, the fourth";
+	mes "line after that...";
+	next;
+	input @dwarfsong4$;
+	if(@dwarfsong4$ == "We wanted the goddess of beauty.") set @point,@point +1;
+	mes "[" + strcharinfo(0) + "]";
+	mes " " + @dwarfsong4$ + "";
+	mes "Alright, now";
+	mes "for the last line...";
+	next;
+	input @dwarfsong5$;
+	if(@dwarfsong5$ == "Our happiest times were with her.") set @point,@point +1;
+	mes "[" + strcharinfo(0) + "]";
+	mes " " + @dwarfsong5$ + "";
+	mes "Alright, let's give it a try.";
+	next;
+	mes "[" + strcharinfo(0) + "]";
+	mes "" + @dwarfsong1$ + "";
+	mes "" + @dwarfsong2$ + "";
+	mes "" + @dwarfsong3$ + "";
+	mes "" + @dwarfsong4$ + "";
+	mes "" + @dwarfsong5$ + "";
+	next;
+		if(@point > 4)
+	{
+		enablenpc "Grer#1";
+		mes "[Grer]";
+		mes "Wha--?";
+		mes "Berling";
+		mes "did send you!";
+		set god_brising,46;
+		stopnpctimer;
+		close;
+	}
+		else
+	{
+		mes "[Grer]";
+		mes "Bah!";
+		mes "I knew it!";
+		mes "I can't trust you!";
+		close2;
+		warp "mjo_dun02",118,56;
+		end;
+	}
+}
+	else
+{
+	mes "^3355FFYou found a hole filled with some clod and a lump of coal.^000000";
+	close;
+}
+
+OnTouch:
+	if($God2 < 50)
+{
+	mes "[" + strcharinfo(0) + "]";
+	mes "Beh, no way out.";
+	close;
+}
+	if($God3 > 99)
+{
+	mes "[" + strcharinfo(0) + "]";
+	mes "Beh, no way out.";
+	close;
+}
+	if(god_brising == 44)
+{
+	emotion e_gasp,1;
+	mes "[Male Voice]";
+	mes "Don't come any closer! How the hell do I feel Freya's presense on you? Tell me who you are!";
+	next;
+	menu "I am sent by Berling.",-,"Wah, you freaked me out!",L_Freak;
+			mes "[Male Voice]";
+			mes "Lies! Lies!";
+			mes "Prove it!";
+			mes "Prove yourself!";
+			set god_brising,45;
+			initnpctimer;
+			close;
+		L_Freak:
+			mes "[Male Voice]";
+			mes "Get out of here!";
+			close;
+}
+	else if(god_brising == 45)
+{
+	mes "[Male Voice]";
+	mes "Prove it!";
+	mes "Otherwise, leave me alone and let me mine silver. Silver...! Heh heh heh...";
+	stopnpctimer;
+	startnpctimer;
+	close;
+}
+	else
+{
+	warp "mjo_dun02.gat",118,56;
+	end;
+}
+
+OnTimer1000:
+	mapannounce "mjo_dun02.gat","Grer: Hurry and show that I can trust you!",0,0x70DBDB;
+	end;
+
+OnTimer240000:
+	mapannounce "mjo_dun02.gat","Grer: Grrr, I won't wait much longer!",0,0x70DBDB;
+	end;
+
+OnTimer298000:
+	mapannounce "mjo_dun02.gat","Grer: Farewell, human!",0,0x70DBDB;
+	end;
+
+OnTimer300000:
+	warp "mjo_dun02.gat",118,56;
+	disablenpc "Grer#1";
+	end;
+
+OnTimer301000:
+	stopnpctimer;
+	end;
+
+OnInit:
+	disablenpc "Grer#1";
+	end;
+
+OnGrerOn:
+	enablenpc "Grer#1";
+	end;
+
+OnGrerOff:
+	disablenpc "Grer#1";
+	end;
+}
+
+mjo_dun02.gat,126,34,1	script	Grer#1	826,{
+
+	if(god_brising > 47)
+{
+	mes "[Grer]";
+	mes "As we promised,";
+	mes "Brisingamen will appear in front of human's eyes. But until then, I shall make jewelry of silver. Mwahahaha~";
+	close2;
+	donpcevent "#brisindwarf4::OnGrerOff";
+	end;
+}
+	else if(god_brising == 46)
+{
+	mes "[Grer]";
+	mes "My name is Grer.";
+	mes "I should have been the last one to be awakened. Now I see that I haven't mined as much silver as I may need.";
+	next;
+	mes "[Grer]";
+	mes "You might think gold would better suit a goddess, but no. Silver is what makes her golden hair more beautiful.";
+	next;
+	mes "[Grer]";
+	mes "Human, you must planned something fun. Hmm? You didn't plan anything at all? No matter.";
+	next;
+	mes "[Grer]";
+	mes "Now that we're revived, there's a good chance that we may see her again. I don't really mind anything else.";
+	next;
+	mes "[Grer]";
+	mes "I want her spirit and scent to fill this world. I don't want Odin or Heimdall to know our plan.";
+	next;
+	mes "[Grer]";
+	mes "Now, this doesn't mean that I prefer humans over gods or giants, but if it's for Freya, I'll do anything.";
+	next;
+	mes "[Grer]";
+	mes "Anyway, now my brothers have been revived. For that, I give you my thanks. Someday, you will have the power to challenge the gods.";
+	next;
+	mes "[Grer]";
+	mes "Now, I need to go back to my business. You'll need a silver ornament for the necklace, so I'll continue to mine silver.";
+	next;
+	mes "[Grer]";
+	mes "I shall be working hard to make the most beautiful ornament in the world.";
+	next;
+	mes "[Grer]";
+	mes "Okay, you";
+	mes "may go back now!";
+	mes "Farewell.";
+	set god_brising,47;
+	close2;
+	donpcevent "#brisindwarf4::OnGrerOff";
+	end;
+}
+	else if(god_brising == 47)
+{
+	mes "[Grer]";
+	mes "Heh heh...";
+	mes "Why are you still";
+	mes "here? Your job is done.";
+	mes "Now, go back to where";
+	mes "you came from!";
+	close2;
+	donpcevent "#brisindwarf4::OnGrerOff";
+	end;
+}
+	else
+{
+	mes "[Grer]";
+	mes "Who the";
+	mes "hell are you?!";
+	close2;
+	donpcevent "#brisindwarf4::OnGrerOff";
+	end;
+}
+
 }
\ No newline at end of file
diff --git a/npc/quests/seals/god_global.txt b/npc/quests/seals/god_global.txt
index 863b99ab4..1a367e13d 100644
--- a/npc/quests/seals/god_global.txt
+++ b/npc/quests/seals/god_global.txt
@@ -1,123 +1,123 @@
-//===== eAthena Script ======================================= 

-//= Variable Management NPC for the god item quest

-//===== By: ================================================== 

-//= MasterOfMuppets

-//===== Current Version: ===================================== 

-//= 1.0

-//===== Compatible With: ===================================== 

-//= eAthena

-//===== Description: ========================================= 

-//= Use this NPC if the seals quest variables get messed up.

-//===== Additional Comments: =================================

-// 1.0 First version. [MasterOfMuppets]

-//============================================================

-

-sec_in02.gat,15,170,0	script	Seals Quest Vars	817,{

-

-	if(getgmlevel() > 98)

-	{

-	mes "[Variable Management]";

-	mes "Welcome to the God Item Quest";

-	mes "Global Variable Management";

-	mes "function.";

-	next;

-	  while(1)

-	  {

-	menu "Check current variable values",s_Values,"Change variable values",s_Change,"Cancel",-;

-	close;

-

-s_Change:

-	mes "[Variable Management]";

-	mes "Which variable would you";

-	mes "like to change?";

-	next;

-	menu "$God1",-,"$God2",s_2,"$God3",s_3,"$God4",s_4;

-

-	mes "[Variable Management]";

-	mes "^0000FF$God1^000000 is currently ^FF0000" + $God1 + "^000000.";

-	mes "What would you like to";

-	mes "change it to? (Enter";

-	mes "101 to cancel)";

-	next;

-	input @temp;

-	if(@temp == 101)goto s_Canceled;

-	if(@temp < 0 || @temp > 100)goto s_BadValue;

-	set $God1,@temp;

-	mes "[Variable Management]";

-	mes "^0000FF$God1^000000 was changed to ^FF0000" + $God1 + "^000000.";

-	close;

-

-s_2:

-	mes "[Variable Management]";

-	mes "^0000FF$God2^000000 is currently ^FF0000" + $God2 + "^000000.";

-	mes "What would you like to";

-	mes "change it to? (Enter";

-	mes "101 to cancel)";

-	next;

-	input @temp;

-	if(@temp == 101)goto s_Canceled;

-	if(@temp < 0 || @temp > 100)goto s_BadValue;

-	set $God2,@temp;

-	mes "[Variable Management]";

-	mes "^0000FF$God2^000000 was changed to ^FF0000" + $God2 + "^000000.";

-	close;

-

-s_3:

-	mes "[Variable Management]";

-	mes "^0000FF$God3^000000 is currently ^FF0000" + $God3 + "^000000.";

-	mes "What would you like to";

-	mes "change it to? (Enter";

-	mes "101 to cancel)";

-	next;

-	input @temp;

-	if(@temp == 101)goto s_Canceled;

-	if(@temp < 0 || @temp > 100)goto s_BadValue;

-	set $God3,@temp;

-	mes "[Variable Management]";

-	mes "^0000FF$God3^000000 was changed to ^FF0000" + $God3 + "^000000.";

-	close;

-

-s_4:

-	mes "[Variable Management]";

-	mes "^0000FF$God4^000000 is currently ^FF0000" + $God4 + "^000000.";

-	mes "What would you like to";

-	mes "change it to? (Enter";

-	mes "101 to cancel)";

-	next;

-	input @temp;

-	if(@temp == 101)goto s_Canceled;

-	if(@temp < 0 || @temp > 100)goto s_BadValue;

-	set $God4,@temp;

-	mes "[Variable Management]";

-	mes "^0000FF$God4^000000 was changed to ^FF0000" + $God4 + "^000000.";

-	close;

-

-s_Canceled:

-	close;

-

-s_BadValue:

-	mes "[Variable Management]";

-	mes "Please enter a value";

-	mes "between 0-100.";

-	close;

-

-s_Values:

-	mes "[Variable Management]";

-	mes "Current variable values are:";

-	mes "^0000FF$God1^000000 = ^FF0000" + $God1 + "^000000.";

-	mes "^0000FF$God2^000000 = ^FF0000" + $God2 + "^000000.";

-	mes "^0000FF$God3^000000 = ^FF0000" + $God3 + "^000000.";

-	mes "^0000FF$God4^000000 = ^FF0000" + $God4 + "^000000.";

-	next;

-	  }

-	}

-	else

-	{

-	mes "[Variable Management]";

-	mes "Sorry. You don't have";

-	mes "authorization to use this";

-	mes "npc.";

-	close;

-	}

-

-}

+//===== eAthena Script ======================================= 
+//= Variable Management NPC for the god item quest
+//===== By: ================================================== 
+//= MasterOfMuppets
+//===== Current Version: ===================================== 
+//= 1.0
+//===== Compatible With: ===================================== 
+//= eAthena
+//===== Description: ========================================= 
+//= Use this NPC if the seals quest variables get messed up.
+//===== Additional Comments: =================================
+// 1.0 First version. [MasterOfMuppets]
+//============================================================
+
+sec_in02.gat,15,170,0	script	Seals Quest Vars	817,{
+
+	if(getgmlevel() > 98)
+	{
+	mes "[Variable Management]";
+	mes "Welcome to the God Item Quest";
+	mes "Global Variable Management";
+	mes "function.";
+	next;
+	  while(1)
+	  {
+	menu "Check current variable values",s_Values,"Change variable values",s_Change,"Cancel",-;
+	close;
+
+s_Change:
+	mes "[Variable Management]";
+	mes "Which variable would you";
+	mes "like to change?";
+	next;
+	menu "$God1",-,"$God2",s_2,"$God3",s_3,"$God4",s_4;
+
+	mes "[Variable Management]";
+	mes "^0000FF$God1^000000 is currently ^FF0000" + $God1 + "^000000.";
+	mes "What would you like to";
+	mes "change it to? (Enter";
+	mes "101 to cancel)";
+	next;
+	input @temp;
+	if(@temp == 101)goto s_Canceled;
+	if(@temp < 0 || @temp > 100)goto s_BadValue;
+	set $God1,@temp;
+	mes "[Variable Management]";
+	mes "^0000FF$God1^000000 was changed to ^FF0000" + $God1 + "^000000.";
+	close;
+
+s_2:
+	mes "[Variable Management]";
+	mes "^0000FF$God2^000000 is currently ^FF0000" + $God2 + "^000000.";
+	mes "What would you like to";
+	mes "change it to? (Enter";
+	mes "101 to cancel)";
+	next;
+	input @temp;
+	if(@temp == 101)goto s_Canceled;
+	if(@temp < 0 || @temp > 100)goto s_BadValue;
+	set $God2,@temp;
+	mes "[Variable Management]";
+	mes "^0000FF$God2^000000 was changed to ^FF0000" + $God2 + "^000000.";
+	close;
+
+s_3:
+	mes "[Variable Management]";
+	mes "^0000FF$God3^000000 is currently ^FF0000" + $God3 + "^000000.";
+	mes "What would you like to";
+	mes "change it to? (Enter";
+	mes "101 to cancel)";
+	next;
+	input @temp;
+	if(@temp == 101)goto s_Canceled;
+	if(@temp < 0 || @temp > 100)goto s_BadValue;
+	set $God3,@temp;
+	mes "[Variable Management]";
+	mes "^0000FF$God3^000000 was changed to ^FF0000" + $God3 + "^000000.";
+	close;
+
+s_4:
+	mes "[Variable Management]";
+	mes "^0000FF$God4^000000 is currently ^FF0000" + $God4 + "^000000.";
+	mes "What would you like to";
+	mes "change it to? (Enter";
+	mes "101 to cancel)";
+	next;
+	input @temp;
+	if(@temp == 101)goto s_Canceled;
+	if(@temp < 0 || @temp > 100)goto s_BadValue;
+	set $God4,@temp;
+	mes "[Variable Management]";
+	mes "^0000FF$God4^000000 was changed to ^FF0000" + $God4 + "^000000.";
+	close;
+
+s_Canceled:
+	close;
+
+s_BadValue:
+	mes "[Variable Management]";
+	mes "Please enter a value";
+	mes "between 0-100.";
+	close;
+
+s_Values:
+	mes "[Variable Management]";
+	mes "Current variable values are:";
+	mes "^0000FF$God1^000000 = ^FF0000" + $God1 + "^000000.";
+	mes "^0000FF$God2^000000 = ^FF0000" + $God2 + "^000000.";
+	mes "^0000FF$God3^000000 = ^FF0000" + $God3 + "^000000.";
+	mes "^0000FF$God4^000000 = ^FF0000" + $God4 + "^000000.";
+	next;
+	  }
+	}
+	else
+	{
+	mes "[Variable Management]";
+	mes "Sorry. You don't have";
+	mes "authorization to use this";
+	mes "npc.";
+	close;
+	}
+
+}
diff --git a/npc/quests/seals/god_weapon_creation.txt b/npc/quests/seals/god_weapon_creation.txt
index aabf1a86d..f062051f7 100644
--- a/npc/quests/seals/god_weapon_creation.txt
+++ b/npc/quests/seals/god_weapon_creation.txt
@@ -1,1595 +1,1595 @@
-//===== eAthena Script ======================================= 

-//= God items creation NPCs

-//===== By: ================================================== 

-//= SinSloth

-//===== Current Version: ===================================== 

-//= 1.0

-//===== Compatible With: ===================================== 

-//= eAthena

-//===== Description: ========================================= 

-//= 

-//===== Additional Comments: =================================

-// 1.0 First version. Thanks to SinSloth for scripting it. [MasterOfMuppets]

-//============================================================

-

-gld_dun01.gat,28,85,0	script	Grunburti	826,{

-

-	mes "[Dwarf Grunburti]";

-	mes "Hmmhah! What brought you here, human!";

-	mes "Living in Midgard and away from my home town is painful enough, let alone facing a whiney human. Leave me alone!";

-	next;

-		switch( select( "Ask him about dwarves.", "Ask him what he is doing.", "Request a weapon creation.", "Cancel." ) )

-	{

-

-	case 1:

-		mes "[Dwarf Grunburti]";

-		mes "Ah, what an annoying human! What do you want to know about us, huh?";

-		mes "We are the toughest race that have bare to live in the barren land. Feeble-minded midgardians can not imagine how sterile our land is!";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "All the knowledge and skills that you are proud of were used to be ours.";

-		mes "Even weapons used by ancient Gods were made by our ancestors. Do you know that?";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "We have the greatest knowlege and skills yet we have taken our fate to live in the barren land of Giants, that's who we are!";

-		close;

-	break;

-

-	case 2:

-		mes "[Dwarf Grunburti]";

-		mes "Did you just ask what I am doing here?";

-		mes "Muhahahaha....I was waiting for the time to kick your ass!";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "Heheheheh, don't you worry. In fact, I will only humiliate myself by fighting with such a weakling like you.";

-		mes "Humans are so weak yet are too arrogant and love power struggling each other. You are just helpless...";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "My home town....I will never be able to go back...from this Midgard.";

-		mes "Because Yggdrasil tree, the only way to my home town have dissappeared during the war in 1000 years ago.";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "That is why I have been staying in Midgard!";

-		mes "At least I am lucky because I found this cave where the environment is similar as my home town...";

-		close;

-	break;

-

-	case 3:

-		set @god_guild,getcharid(2);

-			if ($God1 < 100 || $God2 < 100 || $God3 < 100 || $God4 < 100)

-		{

-				if ($God1 > 49 && $God2 > 49 && $God3 > 49 && $God4 > 49 && strcharinfo(0) == getguildmaster(@god_guild))

-			{

-				mes "[Dwarf Grunburti]";

-				mes "Hmm...I need some materials to make a weapon.";

-				mes "Which weapon do you want to have?";

-				next;

-					switch( select(	 "Brisingamen", "Megingjard", "Sleipnir", "Mjolnir" ) )

-				{

-					case 1:

-						mes "[Dwarf Grunburti]";

-              				        mes "I will need...";

-						mes "^0000FF4 Freya's Jewel";

-						mes "4 Silver Ornament";

-						mes "3 Snow Crystal";

-						mes "3 Ripple";

-						mes "3 Drifting Air";

-						mes "2 Sapphire";

-						mes "3 Pearl";

-						mes "10 Opal";

-						mes "5 Cursed Ruby";

-						mes "20 Gold and";

-						mes "1 Necklace^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "...";

-						mes "However, the time has not come yet. So wait until then. Muhahaha!";

-						close;

-					break;

-

-					case 2:

-						mes "[Dwarf Grunburti]";

-					        mes "I will need...";

-						mes "^0000FF1 Gleipnir";

-						mes "20 Gold";

-						mes "10 Sapphire";

-						mes "10 Oridecon";

-						mes "and 1 Belt^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "...";

-						mes "However, the time has not come yet. So wait until then. Muhahaha!";

-						close;

-					break;

-

-					case 3:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF3 Wheel of the Unknown";

-						mes "5 Feather of Angel Wing";

-						mes "3 Sprit of Fish";

-						mes "4 Emblem of the Sun God";

-						mes "3 Breath of Spirit";

-						mes "20 Gold";

-						mes "10 Elunium";

-						mes "and 1 Slotted Boots^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "...";

-						mes "However, the time has not come yet. So wait until then. Muhahaha!";

-						close;

-					break;

-

-					case 4:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF2 Thor's Gauntlets";

-						mes "4 Iron Maiden";

-						mes "5 Wrath of Valkyrie";

-						mes "5 Omen of Tempest";

-						mes "5 Billow";

-						mes "20 Oridecon";

-						mes "5 Elunium";

-						mes "40 Gold and";

-						mes "1 Stunner^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "...";

-						mes "However, the time has not come yet. So wait until then. Muhahaha!";

-						close;

-					break;

-				}

-			}

-				else

-			{

-				mes "[Dwarf Grunburti]";

-				mes "We, dwarves have too high pride to share own skills with such a low race like human!";

-				mes "Stop interrupting me and leave immediately! Go play with monsters, your favorite toys!";

-				close;

-			}

-		}

-			if (strcharinfo(0) != getguildmaster(@god_guild))

-		{

-			mes "[Dwarf Grunburti]";

-			mes "I will only present my significant skills to humans of high social standing!";

-			mes "Go bring your ^0000FFguildmaster^000000!";

-			close;

-		}

-		mes "[Dwarf Grunburti]";

-		mes "Although it is very humiliating to present my valuable skills to a human being...";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "since you are a master of guild and all the seals have been released, I think I can give you a chance to look at.";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "First of all, I shall confirm if you have brought all the necessary materials to forge a godly item or not!";

-		mes "I hate to see humans wandering about my home without any purpose!";

-		next;

-					if (countitem(7073) > 3 && countitem(7077) > 3 && countitem(7088) > 2 && countitem(7090) > 2 && countitem(7092) > 2 && countitem(726) > 1 && countitem(722) > 2 && countitem(727) > 9 && countitem(724) > 4 && countitem(969) > 19 && countitem(2603) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Hmm, I guess you want to have ^0000FFBrisingamen^000000!";

-					mes "Okay...then.";

-					next;

-				}

-					else if (countitem(7058) > 0 && countitem(969) > 19 && countitem(726) > 9 && countitem(984) > 9 && countitem(2627) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Hmm, I guess you want to have ^0000FFMegingjard^000000!";

-					mes "Okay...then.";

-					next;

-				}

-					else if (countitem(7076) > 2 && countitem(7079) > 4 && countitem(7083) > 2 && countitem(7086) > 3 && countitem(7087) > 2 && countitem(969) > 19 && countitem(985) > 9 && countitem(2406) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Hmm, I guess you want to have ^0000FFSleipnir^000000!";

-					mes "Okay...then.";

-					next;

-				}

-					else if (countitem(7074) > 1 && countitem(7075) > 3 && countitem(7078) > 4 && countitem(7089) > 4 && countitem(7091) > 4 && countitem(984) > 19 && countitem(985) > 4 && countitem(969) > 39 && countitem(1522) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Hmm, I guess you want to have ^0000FFMjolnir^000000!";

-					mes "Okay...then.";

-					next;

-				}

-					else

-				{

-					mes "[Dwarf Grunburti]";

-					mes "...........";

-					next;

-					mes "[Dwarf Grunburti]";

-					mes "........";

-					next;

-					mes "[Dwarf Grunburti]";

-					mes "....";

-					next;

-					mes "[Dwarf Grunburti]";

-					mes "?! You have not brought all the necessary materials!";

-					mes "...did you forget what you need?";

-					mes "Listen carefully this time!";

-					next;

-						switch( select( "Brisingamen", "Megingjard", "Sleipnir", "Mjolnir" ) )

-					{

-					case 1:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF4 Freya's Jewel";

-						mes "4 Silver Ornament";

-						mes "3 Snow Crystal";

-						mes "3 Ripple";

-						mes "3 Drifting Air";

-						mes "2 Sapphire";

-						mes "3 Pearl";

-						mes "10 Opal";

-						mes "5 Cursed Ruby";

-						mes "20 Gold and";

-						mes "1 Necklace^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "....however, you seem to be slower than other human...";

-						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";

-						close;

-					break;

-

-					case 2:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF1 Gleipnir";

-						mes "20 Gold";

-						mes "10 Sapphire";

-						mes "10 Oridecon";

-						mes "and 1 Belt^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "....however, you seem to be slower than other human...";

-						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";

-						close;

-					break;

-

-					case 3:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF3 Wheel of the Unknown";

-						mes "5 Feather of Angel Wing";

-						mes "3 Sprit of Fish";

-						mes "4 Emblem of the Sun God";

-						mes "3 Breath of Spirit";

-						mes "20 Gold";

-						mes "10 Elunium";

-						mes "and 1 Slotted Boots^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "....however, you seem to be slower than other human...";

-						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";

-						close;

-					break;

-

-					case 4:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF2 Thor's Gauntlets";

-						mes "4 Iron Maiden";

-						mes "5 Wrath of Valkyrie";

-						mes "5 Omen of Tempest";

-						mes "5 Billow";

-						mes "20 Oridecon";

-						mes "5 Elunium";

-						mes "40 Gold and";

-						mes "1 Stunner^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "....however, you seem to be slower than other human...";

-						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";

-						close;

-					break;

-					}

-				}

-		mes "[Dwarf Grunburti]";

-		mes "I will do a favor for you this time.";

-		mes "I cannot start to work in here. Come to ^0000FFthe underground laboratory^000000.";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "Now, you must hurry up! ^0000FFOnly one of each godly item^000000 will be given to humans ^FF0000right after all the seals are released^000000!";

-		close2;

-		warp "que_god01.gat",214,63;

-		end;

-	break;

-

-	case 4:

-		mes "[Dwarf Grunburti]";

-		mes "Muhahahahahaha!";

-		mes "Go grow up first!";

-		close;

-	break;

-

-	}

-}

-

-gld_dun02.gat,85,84,0	script	Grunburti#2	826,{

-

-	mes "[Dwarf Grunburti]";

-	mes "Hmmhah! What brought you here, human!";

-	mes "Living in Midgard and away from my home town is painful enough, let alone facing a whiney human. Leave me alone!";

-	next;

-		switch( select( "Ask him about dwarves.", "Ask him what he is doing.", "Request a weapon creation.", "Cancel." ) )

-	{

-

-	case 1:

-		mes "[Dwarf Grunburti]";

-		mes "Ah, what an annoying human! What do you want to know about us, huh?";

-		mes "We are the toughest race that have bare to live in the barren land. Feeble-minded midgardians can not imagine how sterile our land is!";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "All the knowledge and skills that you are proud of were used to be ours.";

-		mes "Even weapons used by ancient Gods were made by our ancestors. Do you know that?";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "We have the greatest knowlege and skills yet we have taken our fate to live in the barren land of Giants, that's who we are!";

-		close;

-	break;

-

-	case 2:

-		mes "[Dwarf Grunburti]";

-		mes "Did you just ask what I am doing here?";

-		mes "Muhahahaha....I was waiting for the time to kick your ass!";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "Heheheheh, don't you worry. In fact, I will only humiliate myself by fighting with such a weakling like you.";

-		mes "Humans are so weak yet are too arrogant and love power struggling each other. You are just helpless...";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "My home town....I will never be able to go back...from this Midgard.";

-		mes "Because Yggdrasil tree, the only way to my home town have dissappeared during the war in 1000 years ago.";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "That is why I have been staying in Midgard!";

-		mes "At least I am lucky because I found this cave where the environment is similar as my home town...";

-		close;

-	break;

-

-	case 3:

-		set @god_guild,getcharid(2);

-			if ($God1 < 100 || $God2 < 100 || $God3 < 100 || $God4 < 100)

-		{

-				if ($God1 > 49 && $God2 > 49 && $God3 > 49 && $God4 > 49 && strcharinfo(0) == getguildmaster(@god_guild))

-			{

-				mes "[Dwarf Grunburti]";

-				mes "Hmm...I need some materials to make a weapon.";

-				mes "Which weapon do you want to have?";

-				next;

-					switch( select(	 "Brisingamen", "Megingjard", "Sleipnir", "Mjolnir" ) )

-				{

-					case 1:

-						mes "[Dwarf Grunburti]";

-              				        mes "I will need...";

-						mes "^0000FF4 Freya's Jewel";

-						mes "4 Silver Ornament";

-						mes "3 Snow Crystal";

-						mes "3 Ripple";

-						mes "3 Drifting Air";

-						mes "2 Sapphire";

-						mes "3 Pearl";

-						mes "10 Opal";

-						mes "5 Cursed Ruby";

-						mes "20 Gold and";

-						mes "1 Necklace^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "...";

-						mes "However, the time has not come yet. So wait until then. Muhahaha!";

-						close;

-					break;

-

-					case 2:

-						mes "[Dwarf Grunburti]";

-					        mes "I will need...";

-						mes "^0000FF1 Gleipnir";

-						mes "20 Gold";

-						mes "10 Sapphire";

-						mes "10 Oridecon";

-						mes "and 1 Belt^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "...";

-						mes "However, the time has not come yet. So wait until then. Muhahaha!";

-						close;

-					break;

-

-					case 3:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF3 Wheel of the Unknown";

-						mes "5 Feather of Angel Wing";

-						mes "3 Sprit of Fish";

-						mes "4 Emblem of the Sun God";

-						mes "3 Breath of Spirit";

-						mes "20 Gold";

-						mes "10 Elunium";

-						mes "and 1 Slotted Boots^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "...";

-						mes "However, the time has not come yet. So wait until then. Muhahaha!";

-						close;

-					break;

-

-					case 4:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF2 Thor's Gauntlets";

-						mes "4 Iron Maiden";

-						mes "5 Wrath of Valkyrie";

-						mes "5 Omen of Tempest";

-						mes "5 Billow";

-						mes "20 Oridecon";

-						mes "5 Elunium";

-						mes "40 Gold and";

-						mes "1 Stunner^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "...";

-						mes "However, the time has not come yet. So wait until then. Muhahaha!";

-						close;

-					break;

-				}

-			}

-				else

-			{

-				mes "[Dwarf Grunburti]";

-				mes "We, dwarves have too high pride to share own skills with such a low race like human!";

-				mes "Stop interrupting me and leave immediately! Go play with monsters, your favorite toys!";

-				close;

-			}

-		}

-			if (strcharinfo(0) != getguildmaster(@god_guild))

-		{

-			mes "[Dwarf Grunburti]";

-			mes "I will only present my significant skills to humans of high social standing!";

-			mes "Go bring your ^0000FFguildmaster^000000!";

-			close;

-		}

-		mes "[Dwarf Grunburti]";

-		mes "Although it is very humiliating to present my valuable skills to a human being...";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "since you are a master of guild and all the seals have been released, I think I can give you a chance to look at.";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "First of all, I shall confirm if you have brought all the necessary materials to forge a godly item or not!";

-		mes "I hate to see humans wandering about my home without any purpose!";

-		next;

-					if (countitem(7073) > 3 && countitem(7077) > 3 && countitem(7088) > 2 && countitem(7090) > 2 && countitem(7092) > 2 && countitem(726) > 1 && countitem(722) > 2 && countitem(727) > 9 && countitem(724) > 4 && countitem(969) > 19 && countitem(2603) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Hmm, I guess you want to have ^0000FFBrisingamen^000000!";

-					mes "Okay...then.";

-					next;

-				}

-					else if (countitem(7058) > 0 && countitem(969) > 19 && countitem(726) > 9 && countitem(984) > 9 && countitem(2627) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Hmm, I guess you want to have ^0000FFMegingjard^000000!";

-					mes "Okay...then.";

-					next;

-				}

-					else if (countitem(7076) > 2 && countitem(7079) > 4 && countitem(7083) > 2 && countitem(7086) > 3 && countitem(7087) > 2 && countitem(969) > 19 && countitem(985) > 9 && countitem(2406) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Hmm, I guess you want to have ^0000FFSleipnir^000000!";

-					mes "Okay...then.";

-					next;

-				}

-					else if (countitem(7074) > 1 && countitem(7075) > 3 && countitem(7078) > 4 && countitem(7089) > 4 && countitem(7091) > 4 && countitem(984) > 19 && countitem(985) > 4 && countitem(969) > 39 && countitem(1522) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Hmm, I guess you want to have ^0000FFMjolnir^000000!";

-					mes "Okay...then.";

-					next;

-				}

-					else

-				{

-					mes "[Dwarf Grunburti]";

-					mes "...........";

-					next;

-					mes "[Dwarf Grunburti]";

-					mes "........";

-					next;

-					mes "[Dwarf Grunburti]";

-					mes "....";

-					next;

-					mes "[Dwarf Grunburti]";

-					mes "?! You have not brought all the necessary materials!";

-					mes "...did you forget what you need?";

-					mes "Listen carefully this time!";

-					next;

-						switch( select( "Brisingamen", "Megingjard", "Sleipnir", "Mjolnir" ) )

-					{

-					case 1:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF4 Freya's Jewel";

-						mes "4 Silver Ornament";

-						mes "3 Snow Crystal";

-						mes "3 Ripple";

-						mes "3 Drifting Air";

-						mes "2 Sapphire";

-						mes "3 Pearl";

-						mes "10 Opal";

-						mes "5 Cursed Ruby";

-						mes "20 Gold and";

-						mes "1 Necklace^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "....however, you seem to be slower than other human...";

-						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";

-						close;

-					break;

-

-					case 2:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF1 Gleipnir";

-						mes "20 Gold";

-						mes "10 Sapphire";

-						mes "10 Oridecon";

-						mes "and 1 Belt^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "....however, you seem to be slower than other human...";

-						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";

-						close;

-					break;

-

-					case 3:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF3 Wheel of the Unknown";

-						mes "5 Feather of Angel Wing";

-						mes "3 Sprit of Fish";

-						mes "4 Emblem of the Sun God";

-						mes "3 Breath of Spirit";

-						mes "20 Gold";

-						mes "10 Elunium";

-						mes "and 1 Slotted Boots^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "....however, you seem to be slower than other human...";

-						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";

-						close;

-					break;

-

-					case 4:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF2 Thor's Gauntlets";

-						mes "4 Iron Maiden";

-						mes "5 Wrath of Valkyrie";

-						mes "5 Omen of Tempest";

-						mes "5 Billow";

-						mes "20 Oridecon";

-						mes "5 Elunium";

-						mes "40 Gold and";

-						mes "1 Stunner^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "....however, you seem to be slower than other human...";

-						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";

-						close;

-					break;

-					}

-				}

-		mes "[Dwarf Grunburti]";

-		mes "I will do a favor for you this time.";

-		mes "I cannot start to work in here. Come to ^0000FFthe underground laboratory^000000.";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "Now, you must hurry up! ^0000FFOnly one of each godly item^000000 will be given to humans ^FF0000right after all the seals are released^000000!";

-		close2;

-		warp "que_god01.gat",214,63;

-		end;

-	break;

-

-	case 4:

-		mes "[Dwarf Grunburti]";

-		mes "Muhahahahahaha!";

-		mes "Go grow up first!";

-		close;

-	break;

-

-	}

-}

-

-gld_dun03.gat,92,105,0	script	Grunburti#3	826,{

-

-	mes "[Dwarf Grunburti]";

-	mes "Hmmhah! What brought you here, human!";

-	mes "Living in Midgard and away from my home town is painful enough, let alone facing a whiney human. Leave me alone!";

-	next;

-		switch( select( "Ask him about dwarves.", "Ask him what he is doing.", "Request a weapon creation.", "Cancel." ) )

-	{

-

-	case 1:

-		mes "[Dwarf Grunburti]";

-		mes "Ah, what an annoying human! What do you want to know about us, huh?";

-		mes "We are the toughest race that have bare to live in the barren land. Feeble-minded midgardians can not imagine how sterile our land is!";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "All the knowledge and skills that you are proud of were used to be ours.";

-		mes "Even weapons used by ancient Gods were made by our ancestors. Do you know that?";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "We have the greatest knowlege and skills yet we have taken our fate to live in the barren land of Giants, that's who we are!";

-		close;

-	break;

-

-	case 2:

-		mes "[Dwarf Grunburti]";

-		mes "Did you just ask what I am doing here?";

-		mes "Muhahahaha....I was waiting for the time to kick your ass!";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "Heheheheh, don't you worry. In fact, I will only humiliate myself by fighting with such a weakling like you.";

-		mes "Humans are so weak yet are too arrogant and love power struggling each other. You are just helpless...";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "My home town....I will never be able to go back...from this Midgard.";

-		mes "Because Yggdrasil tree, the only way to my home town have dissappeared during the war in 1000 years ago.";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "That is why I have been staying in Midgard!";

-		mes "At least I am lucky because I found this cave where the environment is similar as my home town...";

-		close;

-	break;

-

-	case 3:

-		set @god_guild,getcharid(2);

-			if ($God1 < 100 || $God2 < 100 || $God3 < 100 || $God4 < 100)

-		{

-				if ($God1 > 49 && $God2 > 49 && $God3 > 49 && $God4 > 49 && strcharinfo(0) == getguildmaster(@god_guild))

-			{

-				mes "[Dwarf Grunburti]";

-				mes "Hmm...I need some materials to make a weapon.";

-				mes "Which weapon do you want to have?";

-				next;

-					switch( select(	 "Brisingamen", "Megingjard", "Sleipnir", "Mjolnir" ) )

-				{

-					case 1:

-						mes "[Dwarf Grunburti]";

-              				        mes "I will need...";

-						mes "^0000FF4 Freya's Jewel";

-						mes "4 Silver Ornament";

-						mes "3 Snow Crystal";

-						mes "3 Ripple";

-						mes "3 Drifting Air";

-						mes "2 Sapphire";

-						mes "3 Pearl";

-						mes "10 Opal";

-						mes "5 Cursed Ruby";

-						mes "20 Gold and";

-						mes "1 Necklace^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "...";

-						mes "However, the time has not come yet. So wait until then. Muhahaha!";

-						close;

-					break;

-

-					case 2:

-						mes "[Dwarf Grunburti]";

-					        mes "I will need...";

-						mes "^0000FF1 Gleipnir";

-						mes "20 Gold";

-						mes "10 Sapphire";

-						mes "10 Oridecon";

-						mes "and 1 Belt^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "...";

-						mes "However, the time has not come yet. So wait until then. Muhahaha!";

-						close;

-					break;

-

-					case 3:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF3 Wheel of the Unknown";

-						mes "5 Feather of Angel Wing";

-						mes "3 Sprit of Fish";

-						mes "4 Emblem of the Sun God";

-						mes "3 Breath of Spirit";

-						mes "20 Gold";

-						mes "10 Elunium";

-						mes "and 1 Slotted Boots^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "...";

-						mes "However, the time has not come yet. So wait until then. Muhahaha!";

-						close;

-					break;

-

-					case 4:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF2 Thor's Gauntlets";

-						mes "4 Iron Maiden";

-						mes "5 Wrath of Valkyrie";

-						mes "5 Omen of Tempest";

-						mes "5 Billow";

-						mes "20 Oridecon";

-						mes "5 Elunium";

-						mes "40 Gold and";

-						mes "1 Stunner^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "...";

-						mes "However, the time has not come yet. So wait until then. Muhahaha!";

-						close;

-					break;

-				}

-			}

-				else

-			{

-				mes "[Dwarf Grunburti]";

-				mes "We, dwarves have too high pride to share own skills with such a low race like human!";

-				mes "Stop interrupting me and leave immediately! Go play with monsters, your favorite toys!";

-				close;

-			}

-		}

-			if (strcharinfo(0) != getguildmaster(@god_guild))

-		{

-			mes "[Dwarf Grunburti]";

-			mes "I will only present my significant skills to humans of high social standing!";

-			mes "Go bring your ^0000FFguildmaster^000000!";

-			close;

-		}

-		mes "[Dwarf Grunburti]";

-		mes "Although it is very humiliating to present my valuable skills to a human being...";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "since you are a master of guild and all the seals have been released, I think I can give you a chance to look at.";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "First of all, I shall confirm if you have brought all the necessary materials to forge a godly item or not!";

-		mes "I hate to see humans wandering about my home without any purpose!";

-		next;

-					if (countitem(7073) > 3 && countitem(7077) > 3 && countitem(7088) > 2 && countitem(7090) > 2 && countitem(7092) > 2 && countitem(726) > 1 && countitem(722) > 2 && countitem(727) > 9 && countitem(724) > 4 && countitem(969) > 19 && countitem(2603) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Hmm, I guess you want to have ^0000FFBrisingamen^000000!";

-					mes "Okay...then.";

-					next;

-				}

-					else if (countitem(7058) > 0 && countitem(969) > 19 && countitem(726) > 9 && countitem(984) > 9 && countitem(2627) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Hmm, I guess you want to have ^0000FFMegingjard^000000!";

-					mes "Okay...then.";

-					next;

-				}

-					else if (countitem(7076) > 2 && countitem(7079) > 4 && countitem(7083) > 2 && countitem(7086) > 3 && countitem(7087) > 2 && countitem(969) > 19 && countitem(985) > 9 && countitem(2406) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Hmm, I guess you want to have ^0000FFSleipnir^000000!";

-					mes "Okay...then.";

-					next;

-				}

-					else if (countitem(7074) > 1 && countitem(7075) > 3 && countitem(7078) > 4 && countitem(7089) > 4 && countitem(7091) > 4 && countitem(984) > 19 && countitem(985) > 4 && countitem(969) > 39 && countitem(1522) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Hmm, I guess you want to have ^0000FFMjolnir^000000!";

-					mes "Okay...then.";

-					next;

-				}

-					else

-				{

-					mes "[Dwarf Grunburti]";

-					mes "...........";

-					next;

-					mes "[Dwarf Grunburti]";

-					mes "........";

-					next;

-					mes "[Dwarf Grunburti]";

-					mes "....";

-					next;

-					mes "[Dwarf Grunburti]";

-					mes "?! You have not brought all the necessary materials!";

-					mes "...did you forget what you need?";

-					mes "Listen carefully this time!";

-					next;

-						switch( select( "Brisingamen", "Megingjard", "Sleipnir", "Mjolnir" ) )

-					{

-					case 1:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF4 Freya's Jewel";

-						mes "4 Silver Ornament";

-						mes "3 Snow Crystal";

-						mes "3 Ripple";

-						mes "3 Drifting Air";

-						mes "2 Sapphire";

-						mes "3 Pearl";

-						mes "10 Opal";

-						mes "5 Cursed Ruby";

-						mes "20 Gold and";

-						mes "1 Necklace^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "....however, you seem to be slower than other human...";

-						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";

-						close;

-					break;

-

-					case 2:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF1 Gleipnir";

-						mes "20 Gold";

-						mes "10 Sapphire";

-						mes "10 Oridecon";

-						mes "and 1 Belt^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "....however, you seem to be slower than other human...";

-						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";

-						close;

-					break;

-

-					case 3:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF3 Wheel of the Unknown";

-						mes "5 Feather of Angel Wing";

-						mes "3 Sprit of Fish";

-						mes "4 Emblem of the Sun God";

-						mes "3 Breath of Spirit";

-						mes "20 Gold";

-						mes "10 Elunium";

-						mes "and 1 Slotted Boots^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "....however, you seem to be slower than other human...";

-						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";

-						close;

-					break;

-

-					case 4:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF2 Thor's Gauntlets";

-						mes "4 Iron Maiden";

-						mes "5 Wrath of Valkyrie";

-						mes "5 Omen of Tempest";

-						mes "5 Billow";

-						mes "20 Oridecon";

-						mes "5 Elunium";

-						mes "40 Gold and";

-						mes "1 Stunner^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "....however, you seem to be slower than other human...";

-						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";

-						close;

-					break;

-					}

-				}

-		mes "[Dwarf Grunburti]";

-		mes "I will do a favor for you this time.";

-		mes "I cannot start to work in here. Come to ^0000FFthe underground laboratory^000000.";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "Now, you must hurry up! ^0000FFOnly one of each godly item^000000 will be given to humans ^FF0000right after all the seals are released^000000!";

-		close2;

-		warp "que_god01.gat",214,63;

-		end;

-	break;

-

-	case 4:

-		mes "[Dwarf Grunburti]";

-		mes "Muhahahahahaha!";

-		mes "Go grow up first!";

-		close;

-	break;

-

-	}

-}

-

-gld_dun04.gat,268,230,0	script	Grunburti#4	826,{

-

-	mes "[Dwarf Grunburti]";

-	mes "Hmmhah! What brought you here, human!";

-	mes "Living in Midgard and away from my home town is painful enough, let alone facing a whiney human. Leave me alone!";

-	next;

-		switch( select( "Ask him about dwarves.", "Ask him what he is doing.", "Request a weapon creation.", "Cancel." ) )

-	{

-

-	case 1:

-		mes "[Dwarf Grunburti]";

-		mes "Ah, what an annoying human! What do you want to know about us, huh?";

-		mes "We are the toughest race that have bare to live in the barren land. Feeble-minded midgardians can not imagine how sterile our land is!";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "All the knowledge and skills that you are proud of were used to be ours.";

-		mes "Even weapons used by ancient Gods were made by our ancestors. Do you know that?";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "We have the greatest knowlege and skills yet we have taken our fate to live in the barren land of Giants, that's who we are!";

-		close;

-	break;

-

-	case 2:

-		mes "[Dwarf Grunburti]";

-		mes "Did you just ask what I am doing here?";

-		mes "Muhahahaha....I was waiting for the time to kick your ass!";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "Heheheheh, don't you worry. In fact, I will only humiliate myself by fighting with such a weakling like you.";

-		mes "Humans are so weak yet are too arrogant and love power struggling each other. You are just helpless...";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "My home town....I will never be able to go back...from this Midgard.";

-		mes "Because Yggdrasil tree, the only way to my home town have dissappeared during the war in 1000 years ago.";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "That is why I have been staying in Midgard!";

-		mes "At least I am lucky because I found this cave where the environment is similar as my home town...";

-		close;

-	break;

-

-	case 3:

-		set @god_guild,getcharid(2);

-			if ($God1 < 100 || $God2 < 100 || $God3 < 100 || $God4 < 100)

-		{

-				if ($God1 > 49 && $God2 > 49 && $God3 > 49 && $God4 > 49 && strcharinfo(0) == getguildmaster(@god_guild))

-			{

-				mes "[Dwarf Grunburti]";

-				mes "Hmm...I need some materials to make a weapon.";

-				mes "Which weapon do you want to have?";

-				next;

-					switch( select(	 "Brisingamen", "Megingjard", "Sleipnir", "Mjolnir" ) )

-				{

-					case 1:

-						mes "[Dwarf Grunburti]";

-              				        mes "I will need...";

-						mes "^0000FF4 Freya's Jewel";

-						mes "4 Silver Ornament";

-						mes "3 Snow Crystal";

-						mes "3 Ripple";

-						mes "3 Drifting Air";

-						mes "2 Sapphire";

-						mes "3 Pearl";

-						mes "10 Opal";

-						mes "5 Cursed Ruby";

-						mes "20 Gold and";

-						mes "1 Necklace^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "...";

-						mes "However, the time has not come yet. So wait until then. Muhahaha!";

-						close;

-					break;

-

-					case 2:

-						mes "[Dwarf Grunburti]";

-					        mes "I will need...";

-						mes "^0000FF1 Gleipnir";

-						mes "20 Gold";

-						mes "10 Sapphire";

-						mes "10 Oridecon";

-						mes "and 1 Belt^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "...";

-						mes "However, the time has not come yet. So wait until then. Muhahaha!";

-						close;

-					break;

-

-					case 3:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF3 Wheel of the Unknown";

-						mes "5 Feather of Angel Wing";

-						mes "3 Sprit of Fish";

-						mes "4 Emblem of the Sun God";

-						mes "3 Breath of Spirit";

-						mes "20 Gold";

-						mes "10 Elunium";

-						mes "and 1 Slotted Boots^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "...";

-						mes "However, the time has not come yet. So wait until then. Muhahaha!";

-						close;

-					break;

-

-					case 4:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF2 Thor's Gauntlets";

-						mes "4 Iron Maiden";

-						mes "5 Wrath of Valkyrie";

-						mes "5 Omen of Tempest";

-						mes "5 Billow";

-						mes "20 Oridecon";

-						mes "5 Elunium";

-						mes "40 Gold and";

-						mes "1 Stunner^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "...";

-						mes "However, the time has not come yet. So wait until then. Muhahaha!";

-						close;

-					break;

-				}

-			}

-				else

-			{

-				mes "[Dwarf Grunburti]";

-				mes "We, dwarves have too high pride to share own skills with such a low race like human!";

-				mes "Stop interrupting me and leave immediately! Go play with monsters, your favorite toys!";

-				close;

-			}

-		}

-			if (strcharinfo(0) != getguildmaster(@god_guild))

-		{

-			mes "[Dwarf Grunburti]";

-			mes "I will only present my significant skills to humans of high social standing!";

-			mes "Go bring your ^0000FFguildmaster^000000!";

-			close;

-		}

-		mes "[Dwarf Grunburti]";

-		mes "Although it is very humiliating to present my valuable skills to a human being...";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "since you are a master of guild and all the seals have been released, I think I can give you a chance to look at.";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "First of all, I shall confirm if you have brought all the necessary materials to forge a godly item or not!";

-		mes "I hate to see humans wandering about my home without any purpose!";

-		next;

-					if (countitem(7073) > 3 && countitem(7077) > 3 && countitem(7088) > 2 && countitem(7090) > 2 && countitem(7092) > 2 && countitem(726) > 1 && countitem(722) > 2 && countitem(727) > 9 && countitem(724) > 4 && countitem(969) > 19 && countitem(2603) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Hmm, I guess you want to have ^0000FFBrisingamen^000000!";

-					mes "Okay...then.";

-					next;

-				}

-					else if (countitem(7058) > 0 && countitem(969) > 19 && countitem(726) > 9 && countitem(984) > 9 && countitem(2627) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Hmm, I guess you want to have ^0000FFMegingjard^000000!";

-					mes "Okay...then.";

-					next;

-				}

-					else if (countitem(7076) > 2 && countitem(7079) > 4 && countitem(7083) > 2 && countitem(7086) > 3 && countitem(7087) > 2 && countitem(969) > 19 && countitem(985) > 9 && countitem(2406) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Hmm, I guess you want to have ^0000FFSleipnir^000000!";

-					mes "Okay...then.";

-					next;

-				}

-					else if (countitem(7074) > 1 && countitem(7075) > 3 && countitem(7078) > 4 && countitem(7089) > 4 && countitem(7091) > 4 && countitem(984) > 19 && countitem(985) > 4 && countitem(969) > 39 && countitem(1522) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Hmm, I guess you want to have ^0000FFMjolnir^000000!";

-					mes "Okay...then.";

-					next;

-				}

-					else

-				{

-					mes "[Dwarf Grunburti]";

-					mes "...........";

-					next;

-					mes "[Dwarf Grunburti]";

-					mes "........";

-					next;

-					mes "[Dwarf Grunburti]";

-					mes "....";

-					next;

-					mes "[Dwarf Grunburti]";

-					mes "?! You have not brought all the necessary materials!";

-					mes "...did you forget what you need?";

-					mes "Listen carefully this time!";

-					next;

-						switch( select( "Brisingamen", "Megingjard", "Sleipnir", "Mjolnir" ) )

-					{

-					case 1:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF4 Freya's Jewel";

-						mes "4 Silver Ornament";

-						mes "3 Snow Crystal";

-						mes "3 Ripple";

-						mes "3 Drifting Air";

-						mes "2 Sapphire";

-						mes "3 Pearl";

-						mes "10 Opal";

-						mes "5 Cursed Ruby";

-						mes "20 Gold and";

-						mes "1 Necklace^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "....however, you seem to be slower than other human...";

-						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";

-						close;

-					break;

-

-					case 2:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF1 Gleipnir";

-						mes "20 Gold";

-						mes "10 Sapphire";

-						mes "10 Oridecon";

-						mes "and 1 Belt^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "....however, you seem to be slower than other human...";

-						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";

-						close;

-					break;

-

-					case 3:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF3 Wheel of the Unknown";

-						mes "5 Feather of Angel Wing";

-						mes "3 Sprit of Fish";

-						mes "4 Emblem of the Sun God";

-						mes "3 Breath of Spirit";

-						mes "20 Gold";

-						mes "10 Elunium";

-						mes "and 1 Slotted Boots^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "....however, you seem to be slower than other human...";

-						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";

-						close;

-					break;

-

-					case 4:

-						mes "[Dwarf Grunburti]";

-                                                mes "I will need...";

-						mes "^0000FF2 Thor's Gauntlets";

-						mes "4 Iron Maiden";

-						mes "5 Wrath of Valkyrie";

-						mes "5 Omen of Tempest";

-						mes "5 Billow";

-						mes "20 Oridecon";

-						mes "5 Elunium";

-						mes "40 Gold and";

-						mes "1 Stunner^000000...";

-						next;

-						mes "[Dwarf Grunburti]";

-						mes "....however, you seem to be slower than other human...";

-						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";

-						close;

-					break;

-					}

-				}

-		mes "[Dwarf Grunburti]";

-		mes "I will do a favor for you this time.";

-		mes "I cannot start to work in here. Come to ^0000FFthe underground laboratory^000000.";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "Now, you must hurry up! ^0000FFOnly one of each godly item^000000 will be given to humans ^FF0000right after all the seals are released^000000!";

-		close2;

-		warp "que_god01.gat",214,63;

-		end;

-	break;

-

-	case 4:

-		mes "[Dwarf Grunburti]";

-		mes "Muhahahahahaha!";

-		mes "Go grow up first!";

-		close;

-	break;

-

-	}

-}

-

-que_god01.gat,215,127,0	script	#god_hopewarp1	111,{

-	end;

-

-	OnInit:

-		waitingroom "Laboratory Entrance",2,"#god_hopewarp1::OnWarp",1;

-		end;

-	

-	OnWarp:

-		warpwaitingpc "que_god01.gat",155,63;

-		donpcevent "Grunburti#god::OnRun";

-		delwaitingroom;

-		end;

-}

-

-que_god01.gat,214,128,0	script	#que_godnpc1	111,{

-

-		mes "[Entrance Notice]";

-		mes "Only the quickest human being will possess the power of God.";

-		close;

-

-}

-

-que_god01.gat,215,128,0	script	#que_godnpc2"	111,{

-

-		mes "[Entrance Notice]";

-		mes "Only the quickest human being will possess the power of God.";

-		close;

-

-}

-

-que_god01.gat,213,128,0	script	#que_godnpc3	111,{

-

-		mes "[Entrance Notice]";

-		mes "Only the quickest human being will possess the power of God.";

-		close;

-

-}

-

-que_god01.gat,154,112,4	script	Grunburti#god	826,{

-

-		if ($God1 < 100 || $God2 < 100 || $God3 < 100 || $God4 < 100)

-	{

-		mes "[Dwarf Grunburti]";

-		mes "The godly item has been created already.";

-		mes "You must wait until all the seals are released again! Hahahaha!";

-		close;

-	}

-		set @god_guild,getcharid(2);

-		if (strcharinfo(0) != getguildmaster(@god_guild))

-	{

-			mes "[Dwarf Grunburti]";

-			mes "?! How did you come in here?";

-			mes "Get out immediately! I will only speak to humans of high social standing!";

-			close;

-	}

-		mes "[Dwarf Grunburti]";

-		mes "Although it is very humiliating to present my valuable skills to a human being...";

-		mes "I will do a favor for you this time.";

-		next;

-		mes "[Dwarf Grunburti]";

-		mes "Now! Choose an item that you wish to have! You have only ^FF000010 minutes to complete the weapon creation process^000000!";

-		mes "I am busy of course, also ^0000FFall the seals will be sealed up again shortly^000000!";

-		mes "^FF0000Don't be too slow^000000, otherwise ^FF0000I will give the chance to another human^000000 right away!";

-		next;

-			switch( select( "Brisingamen", "Megingjard", "Sleipnir", "Mjolnir" ) )

-		{

-

-		case 1:

-			mes "[Dwarf Grunburti]";

-			mes "Brisingamen!";

-			mes "How dare an insignificant man to own such a precious treasure!";

-			next;

-			mes "[Dwarf Grunburti]";

-			mes "I must say, this necklace will possess no meaning unless it is worn by the goddess Freya!";

-			mes "Treasure will select its owner with its will. Let's see if it recognizes you as the owner or not!";

-			next;

-			mes "[Dwarf Grunburti]";

-			mes "Once again, I need following materials in order to reproduce the godly item.";

-			mes "^0000FF4 Freya's Jewel";

-			mes "4 Silver Ornament";

-			mes "3 Snow Crystal";

-			mes "3 Ripple";

-			mes "3 Drifting Air";

-			mes "2 Sapphire";

-			mes "3 Pearl";

-			mes "10 Opal";

-			mes "5 Cursed Ruby";

-			mes "20 Gold and";

-			mes "1 Necklace^000000...";

-			next;

-

-				switch( select( "Make Brisingamen.", "Cancel." ) )

-			{

-

-			case 1:

-					if (countitem(7073) > 3 && countitem(7077) > 3 && countitem(7088) > 2 && countitem(7090) > 2 && countitem(7092) > 2 && countitem(726) > 1 && countitem(722) > 2 && countitem(727) > 9 && countitem(724) > 4 && countitem(969) > 19 && countitem(2603) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Muhahahahaha!";

-					mes "I didn't imagine that I would use my skills for a human being...give me a moment!";

-					next;

-						if ($God1 < 100 || $God2 < 100 || $God3 < 100 || $God4 < 100)

-					{

-						mes "[Dwarf Grunburti]";

-						mes "The godly item has been created already.";

-						mes "You must wait until all the seals are released again! Hahahaha!";

-						close;

-					}

-					delitem 7073,4;

-					delitem 7077,4;

-					delitem 7088,3;

-					delitem 7090,3;

-					delitem 7092,3;

-					delitem 726,2;

-					delitem 722,3;

-					delitem 726,10;

-					delitem 724,5;

-					delitem 969,20;

-					delitem 2603,1;

-					getitem 2630,1;

-					set $God1,0;

-					set $God2,0;

-					set $God3,0;

-					set $God4,0;

-					announce "[Brisingamen] the godly item has been given to [" + strcharinfo(0) + "], the master of the guild [" + getguildname(@god_guild) + "].",bc_all;

-					mes "[Dwarf Grunburti]";

-					mes "Look at this dazzling necklace, isn't it beautiful!";

-					mes "Ah~ surely there is no existance that can compete this item in this world.";

-					close;

-				}

-					else

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Bah! You idiotic human being! You have not brought all the necessary materials! Go hurry up, be quick!";

-					close;

-				}

-			break;

-

-			case 2:

-				mes "[Dwarf Grunburti]";

-				mes "Muhahahaha~ somehow I figured that!";

-				close;

-			break;

-

-			}

-

-		break;

-

-		case 2:

-			mes "[Dwarf Grunburti]";

-			mes "Me.. Megingjard!";

-			mes "How dare an insignificant man to own such a precious treasure!";

-			next;

-			mes "[Dwarf Grunburti]";

-			mes "This belt used to be worn by the greatest warrior Thor long time ago!";

-			mes "Treasure will select its owner with its will. Let's see if it recognizes you as the owner or not!";

-			next;

-			mes "[Dwarf Grunburti]";

-			mes "Once again, I need following materials in order to reproduce the godly item.";

-                        mes "^0000FF1 Gleipnir";

-			mes "20 Gold";

-			mes "10 Sapphire";

-			mes "10 Oridecon";

-			mes "and 1 Belt^000000...";

-			next;

-

-				switch( select( "Make Megingjard.", "Cancel." ) )

-			{

-

-			case 1:

-					if (countitem(7058) > 0 && countitem(969) > 19 && countitem(726) > 9 && countitem(984) > 9 && countitem(2627) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Muhahahahaha!";

-					mes "I didn't imagine that I would use my skills for a human being...give me a moment!";

-					next;

-						if ($God1 < 100 || $God2 < 100 || $God3 < 100 || $God4 < 100)

-					{

-						mes "[Dwarf Grunburti]";

-						mes "The godly item has been created already.";

-						mes "You must wait until all the seals are released again! Hahahaha!";

-						close;

-					}

-					

-					delitem 7058,1;

-					delitem 969,20;

-					delitem 726,10;

-					delitem 984,10;

-					delitem 2627,1;

-					getitem 2629,1;

-					set $God1,0;

-					set $God2,0;

-					set $God3,0;

-					set $God4,0;

-					announce "[Megingjard] the godly item has been given to [" + strcharinfo(0) + "], the master of the guild [" + getguildname(@god_guild) + "].",bc_all;

-					mes "[Dwarf Grunburti]";

-					mes "Here you go!";

-					mes "Ah~ look at this majestic appearance...! I am overwhelmed already...";

-					close;

-				}

-					else

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Bah! You idiotic human being! You have not brought all the necessary materials! Go hurry up, be quick!";

-					close;

-				}

-			break;

-

-			case 2:

-				mes "[Dwarf Grunburti]";

-				mes "Muhahahaha~ somehow I figured that!";

-				close;

-			break;

-

-			}

-

-		break;

-

-		case 3:

-			mes "[Dwarf Grunburti]";

-			mes "....the eight legged stallion, Sleipnir?!";

-			mes "How dare an insignificant man to own such a precious treasure!";

-			next;

-			mes "[Dwarf Grunburti]";

-			mes "Unfortunately I can only produce an object...not a life.";

-			mes "However, I can craft a pair of shoes that possess the power of Sleipnir.";

-			next;

-			mes "[Dwarf Grunburti]";

-			mes "Of course, even the shoes are too valuable to be given out to a human.";

-			mes "Once again, I need following materials in order to reproduce the godly item.";

-			next;

-			mes "[Dwarf Grunburti]";

-			mes "^0000FF3 Wheel of the Unknown";

-			mes "5 Feather of Angel Wing";

-			mes "3 Spirit of Fish";

-			mes "4 Emblem of the Sun God";

-			mes "3 Breath of Spirit";

-			mes "20 Gold";

-			mes "10 Elunium";

-			mes "and 1 Slotted Boots^000000...";

-			next;

-				switch( select( "Make Sleipnir.", "Cancel." ) )

-			{

-

-			case 1:

-					if (countitem(7076) > 2 && countitem(7079) > 4 && countitem(7083) > 2 && countitem(7086) > 3 && countitem(7087) > 2 && countitem(969) > 19 && countitem(985) > 9 && countitem(2406) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Muhahahahaha!";

-					mes "I didn't imagine that I would use my skills for a human being...give me a moment!";

-					next;

-						if ($God1 < 100 || $God2 < 100 || $God3 < 100 || $God4 < 100)

-					{

-						mes "[Dwarf Grunburti]";

-						mes "The godly item has been created already.";

-						mes "You must wait until all the seals are released again! Hahahaha!";

-						close;

-					}

-					delitem 7076,3;

-					delitem 7079,5;

-					delitem 7083,3;

-					delitem 7086,4;

-					delitem 7087,3;

-					delitem 969,20;

-					delitem 985,10;

-					delitem 2406,1;

-					getitem 2410,1;

-					set $God1,0;

-					set $God2,0;

-					set $God3,0;

-					set $God4,0;

-					announce "[Sleipnir] the godly item has been given to [" + strcharinfo(0) + "], the master of the guild [" + getguildname(@god_guild) + "].",bc_all;

-					mes "[Dwarf Grunburti]";

-					mes "Here you go!";

-					mes "This pair of shoes are so light, you will never feel like wearing anything on your feet with this shoes!";

-					close;

-				}

-					else

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Bah! You idiotic human being! You have not brought all the necessary materials! Go hurry up, be quick!";

-					close;

-				}

-			break;

-

-			case 2:

-				mes "[Dwarf Grunburti]";

-				mes "Muhahahaha~ somehow I figured that!";

-				close;

-			break;

-

-			}

-

-		break;

-

-		case 4:

-			mes "[Dwarf Grunburti]";

-			mes "Mjo!...Mjo....Mjolnir!";

-			mes "How dare an insignificant man to own such a precious treasure!";

-			next;

-			mes "[Dwarf Grunburti]";

-			mes "I haven't assured if you are qualified to possess this yet.";

-			mes "Are you confident that you would not disgrace Thor, the greatest warrior?";

-			next;

-			mes "[Dwarf Grunburti]";

-			mes "....sigh...";

-			mes "Somehow humans are too greedy to listen to my concern.";

-			mes "I will create it for you though. However you will realise how limitted you are to handle this item...";

-			mes "Once again, I need following materials in order to reproduce the godly item.";

-			next;

-			mes "[Dwarf Grunburti]";

-                        mes "^0000FF2 Thor's Gauntlets";

-			mes "4 Iron Maiden";

-			mes "5 Wrath of Valkyrie";

-			mes "5 Omen of Tempest";

-			mes "5 Billow";

-			mes "20 Oridecon";

-			mes "5 Elunium";

-			mes "40 Gold and";

-			mes "1 Stunner^000000...";

-			next;

-				switch( select( "Make Mjolnir.", "Cancel." ) )

-			{

-

-			case 1:

-					if (countitem(7074) > 1 && countitem(7075) > 3 && countitem(7078) > 4 && countitem(7089) > 4 && countitem(7091) > 4 && countitem(984) > 19 && countitem(985) > 4 && countitem(969) > 39 && countitem(1522) > 0)

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Muhahahahaha!";

-					mes "I didn't imagine that I would use my skills for a human being...give me a moment!";

-					next;

-						if ($God1 < 100 || $God2 < 100 || $God3 < 100 || $God4 < 100)

-					{

-						mes "[Dwarf Grunburti]";

-						mes "The godly item has been created already.";

-						mes "You must wait until all the seals are released again! Hahahaha!";

-						close;

-					}

-					delitem 7074,2;

-					delitem 7075,4;

-					delitem 7078,5;

-					delitem 7089,5;

-					delitem 7091,5;

-					delitem 984,20;

-					delitem 985,5;

-					delitem 969,40;

-					delitem 1522,1;

-					getitem 1530,1;

-					set $God1,0;

-					set $God2,0;

-					set $God3,0;

-					set $God4,0;

-					announce "[Mjolnir] the godly item has been given to [" + strcharinfo(0) + "], the master of the guild [" + getguildname(@god_guild) + "].",bc_all;

-					mes "[Dwarf Grunburti]";

-					mes "Here you go!";

-					mes "Although it may appear too small to be such a powerful hammer, there is no weapon that can compete to Mjolnir!";

-					close;

-				}

-					else

-				{

-					mes "[Dwarf Grunburti]";

-					mes "Bah! You idiotic human being! You have not brought all the necessary materials! Go hurry up, be quick!";

-					close;

-				}

-			break;

-

-			case 2:

-				mes "[Dwarf Grunburti]";

-				mes "Muhahahaha~ somehow I figured that!";

-				close;

-			break;

-

-			}

-

-		break;

-

-		}

-

-OnRun:

-	initnpctimer;

-	end;

-

-OnTimer10000:

-	mapannounce "que_god01.gat","Remember that you only have 10 minutes for this! Hurry up!",0;

-	end;

-

-OnTimer610000:

-	mapannounce "que_god01.gat","You are too slow! I am going to give the chance to the other! Next!",0;

-	end;

-

-OnTimer612000:

-	areawarp "que_god01.gat",154,67,4,7,"prontera.gat",156,324;

-	areawarp "que_god01.gat",154,82,4,7,"prontera.gat",156,324;

-	areawarp "que_god01.gat",145,99,9,9,"prontera.gat",156,324;

-	areawarp "que_god01.gat",164,99,9,9,"prontera.gat",156,324;

-	areawarp "que_god01.gat",145,118,9,9,"prontera.gat",156,324;

-	areawarp "que_god01.gat",164,118,9,9,"prontera.gat",156,324;

-	end;

-

-OnTimer615000:

-	donpcevent "#god_hopewarp1::OnInit";

-	stopnpctimer;

-	end;

-

+//===== eAthena Script ======================================= 
+//= God items creation NPCs
+//===== By: ================================================== 
+//= SinSloth
+//===== Current Version: ===================================== 
+//= 1.0
+//===== Compatible With: ===================================== 
+//= eAthena
+//===== Description: ========================================= 
+//= 
+//===== Additional Comments: =================================
+// 1.0 First version. Thanks to SinSloth for scripting it. [MasterOfMuppets]
+//============================================================
+
+gld_dun01.gat,28,85,0	script	Grunburti	826,{
+
+	mes "[Dwarf Grunburti]";
+	mes "Hmmhah! What brought you here, human!";
+	mes "Living in Midgard and away from my home town is painful enough, let alone facing a whiney human. Leave me alone!";
+	next;
+		switch( select( "Ask him about dwarves.", "Ask him what he is doing.", "Request a weapon creation.", "Cancel." ) )
+	{
+
+	case 1:
+		mes "[Dwarf Grunburti]";
+		mes "Ah, what an annoying human! What do you want to know about us, huh?";
+		mes "We are the toughest race that have bare to live in the barren land. Feeble-minded midgardians can not imagine how sterile our land is!";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "All the knowledge and skills that you are proud of were used to be ours.";
+		mes "Even weapons used by ancient Gods were made by our ancestors. Do you know that?";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "We have the greatest knowlege and skills yet we have taken our fate to live in the barren land of Giants, that's who we are!";
+		close;
+	break;
+
+	case 2:
+		mes "[Dwarf Grunburti]";
+		mes "Did you just ask what I am doing here?";
+		mes "Muhahahaha....I was waiting for the time to kick your ass!";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "Heheheheh, don't you worry. In fact, I will only humiliate myself by fighting with such a weakling like you.";
+		mes "Humans are so weak yet are too arrogant and love power struggling each other. You are just helpless...";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "My home town....I will never be able to go back...from this Midgard.";
+		mes "Because Yggdrasil tree, the only way to my home town have dissappeared during the war in 1000 years ago.";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "That is why I have been staying in Midgard!";
+		mes "At least I am lucky because I found this cave where the environment is similar as my home town...";
+		close;
+	break;
+
+	case 3:
+		set @god_guild,getcharid(2);
+			if ($God1 < 100 || $God2 < 100 || $God3 < 100 || $God4 < 100)
+		{
+				if ($God1 > 49 && $God2 > 49 && $God3 > 49 && $God4 > 49 && strcharinfo(0) == getguildmaster(@god_guild))
+			{
+				mes "[Dwarf Grunburti]";
+				mes "Hmm...I need some materials to make a weapon.";
+				mes "Which weapon do you want to have?";
+				next;
+					switch( select(	 "Brisingamen", "Megingjard", "Sleipnir", "Mjolnir" ) )
+				{
+					case 1:
+						mes "[Dwarf Grunburti]";
+              				        mes "I will need...";
+						mes "^0000FF4 Freya's Jewel";
+						mes "4 Silver Ornament";
+						mes "3 Snow Crystal";
+						mes "3 Ripple";
+						mes "3 Drifting Air";
+						mes "2 Sapphire";
+						mes "3 Pearl";
+						mes "10 Opal";
+						mes "5 Cursed Ruby";
+						mes "20 Gold and";
+						mes "1 Necklace^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "...";
+						mes "However, the time has not come yet. So wait until then. Muhahaha!";
+						close;
+					break;
+
+					case 2:
+						mes "[Dwarf Grunburti]";
+					        mes "I will need...";
+						mes "^0000FF1 Gleipnir";
+						mes "20 Gold";
+						mes "10 Sapphire";
+						mes "10 Oridecon";
+						mes "and 1 Belt^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "...";
+						mes "However, the time has not come yet. So wait until then. Muhahaha!";
+						close;
+					break;
+
+					case 3:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF3 Wheel of the Unknown";
+						mes "5 Feather of Angel Wing";
+						mes "3 Sprit of Fish";
+						mes "4 Emblem of the Sun God";
+						mes "3 Breath of Spirit";
+						mes "20 Gold";
+						mes "10 Elunium";
+						mes "and 1 Slotted Boots^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "...";
+						mes "However, the time has not come yet. So wait until then. Muhahaha!";
+						close;
+					break;
+
+					case 4:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF2 Thor's Gauntlets";
+						mes "4 Iron Maiden";
+						mes "5 Wrath of Valkyrie";
+						mes "5 Omen of Tempest";
+						mes "5 Billow";
+						mes "20 Oridecon";
+						mes "5 Elunium";
+						mes "40 Gold and";
+						mes "1 Stunner^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "...";
+						mes "However, the time has not come yet. So wait until then. Muhahaha!";
+						close;
+					break;
+				}
+			}
+				else
+			{
+				mes "[Dwarf Grunburti]";
+				mes "We, dwarves have too high pride to share own skills with such a low race like human!";
+				mes "Stop interrupting me and leave immediately! Go play with monsters, your favorite toys!";
+				close;
+			}
+		}
+			if (strcharinfo(0) != getguildmaster(@god_guild))
+		{
+			mes "[Dwarf Grunburti]";
+			mes "I will only present my significant skills to humans of high social standing!";
+			mes "Go bring your ^0000FFguildmaster^000000!";
+			close;
+		}
+		mes "[Dwarf Grunburti]";
+		mes "Although it is very humiliating to present my valuable skills to a human being...";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "since you are a master of guild and all the seals have been released, I think I can give you a chance to look at.";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "First of all, I shall confirm if you have brought all the necessary materials to forge a godly item or not!";
+		mes "I hate to see humans wandering about my home without any purpose!";
+		next;
+					if (countitem(7073) > 3 && countitem(7077) > 3 && countitem(7088) > 2 && countitem(7090) > 2 && countitem(7092) > 2 && countitem(726) > 1 && countitem(722) > 2 && countitem(727) > 9 && countitem(724) > 4 && countitem(969) > 19 && countitem(2603) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Hmm, I guess you want to have ^0000FFBrisingamen^000000!";
+					mes "Okay...then.";
+					next;
+				}
+					else if (countitem(7058) > 0 && countitem(969) > 19 && countitem(726) > 9 && countitem(984) > 9 && countitem(2627) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Hmm, I guess you want to have ^0000FFMegingjard^000000!";
+					mes "Okay...then.";
+					next;
+				}
+					else if (countitem(7076) > 2 && countitem(7079) > 4 && countitem(7083) > 2 && countitem(7086) > 3 && countitem(7087) > 2 && countitem(969) > 19 && countitem(985) > 9 && countitem(2406) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Hmm, I guess you want to have ^0000FFSleipnir^000000!";
+					mes "Okay...then.";
+					next;
+				}
+					else if (countitem(7074) > 1 && countitem(7075) > 3 && countitem(7078) > 4 && countitem(7089) > 4 && countitem(7091) > 4 && countitem(984) > 19 && countitem(985) > 4 && countitem(969) > 39 && countitem(1522) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Hmm, I guess you want to have ^0000FFMjolnir^000000!";
+					mes "Okay...then.";
+					next;
+				}
+					else
+				{
+					mes "[Dwarf Grunburti]";
+					mes "...........";
+					next;
+					mes "[Dwarf Grunburti]";
+					mes "........";
+					next;
+					mes "[Dwarf Grunburti]";
+					mes "....";
+					next;
+					mes "[Dwarf Grunburti]";
+					mes "?! You have not brought all the necessary materials!";
+					mes "...did you forget what you need?";
+					mes "Listen carefully this time!";
+					next;
+						switch( select( "Brisingamen", "Megingjard", "Sleipnir", "Mjolnir" ) )
+					{
+					case 1:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF4 Freya's Jewel";
+						mes "4 Silver Ornament";
+						mes "3 Snow Crystal";
+						mes "3 Ripple";
+						mes "3 Drifting Air";
+						mes "2 Sapphire";
+						mes "3 Pearl";
+						mes "10 Opal";
+						mes "5 Cursed Ruby";
+						mes "20 Gold and";
+						mes "1 Necklace^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "....however, you seem to be slower than other human...";
+						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";
+						close;
+					break;
+
+					case 2:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF1 Gleipnir";
+						mes "20 Gold";
+						mes "10 Sapphire";
+						mes "10 Oridecon";
+						mes "and 1 Belt^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "....however, you seem to be slower than other human...";
+						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";
+						close;
+					break;
+
+					case 3:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF3 Wheel of the Unknown";
+						mes "5 Feather of Angel Wing";
+						mes "3 Sprit of Fish";
+						mes "4 Emblem of the Sun God";
+						mes "3 Breath of Spirit";
+						mes "20 Gold";
+						mes "10 Elunium";
+						mes "and 1 Slotted Boots^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "....however, you seem to be slower than other human...";
+						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";
+						close;
+					break;
+
+					case 4:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF2 Thor's Gauntlets";
+						mes "4 Iron Maiden";
+						mes "5 Wrath of Valkyrie";
+						mes "5 Omen of Tempest";
+						mes "5 Billow";
+						mes "20 Oridecon";
+						mes "5 Elunium";
+						mes "40 Gold and";
+						mes "1 Stunner^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "....however, you seem to be slower than other human...";
+						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";
+						close;
+					break;
+					}
+				}
+		mes "[Dwarf Grunburti]";
+		mes "I will do a favor for you this time.";
+		mes "I cannot start to work in here. Come to ^0000FFthe underground laboratory^000000.";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "Now, you must hurry up! ^0000FFOnly one of each godly item^000000 will be given to humans ^FF0000right after all the seals are released^000000!";
+		close2;
+		warp "que_god01.gat",214,63;
+		end;
+	break;
+
+	case 4:
+		mes "[Dwarf Grunburti]";
+		mes "Muhahahahahaha!";
+		mes "Go grow up first!";
+		close;
+	break;
+
+	}
+}
+
+gld_dun02.gat,85,84,0	script	Grunburti#2	826,{
+
+	mes "[Dwarf Grunburti]";
+	mes "Hmmhah! What brought you here, human!";
+	mes "Living in Midgard and away from my home town is painful enough, let alone facing a whiney human. Leave me alone!";
+	next;
+		switch( select( "Ask him about dwarves.", "Ask him what he is doing.", "Request a weapon creation.", "Cancel." ) )
+	{
+
+	case 1:
+		mes "[Dwarf Grunburti]";
+		mes "Ah, what an annoying human! What do you want to know about us, huh?";
+		mes "We are the toughest race that have bare to live in the barren land. Feeble-minded midgardians can not imagine how sterile our land is!";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "All the knowledge and skills that you are proud of were used to be ours.";
+		mes "Even weapons used by ancient Gods were made by our ancestors. Do you know that?";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "We have the greatest knowlege and skills yet we have taken our fate to live in the barren land of Giants, that's who we are!";
+		close;
+	break;
+
+	case 2:
+		mes "[Dwarf Grunburti]";
+		mes "Did you just ask what I am doing here?";
+		mes "Muhahahaha....I was waiting for the time to kick your ass!";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "Heheheheh, don't you worry. In fact, I will only humiliate myself by fighting with such a weakling like you.";
+		mes "Humans are so weak yet are too arrogant and love power struggling each other. You are just helpless...";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "My home town....I will never be able to go back...from this Midgard.";
+		mes "Because Yggdrasil tree, the only way to my home town have dissappeared during the war in 1000 years ago.";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "That is why I have been staying in Midgard!";
+		mes "At least I am lucky because I found this cave where the environment is similar as my home town...";
+		close;
+	break;
+
+	case 3:
+		set @god_guild,getcharid(2);
+			if ($God1 < 100 || $God2 < 100 || $God3 < 100 || $God4 < 100)
+		{
+				if ($God1 > 49 && $God2 > 49 && $God3 > 49 && $God4 > 49 && strcharinfo(0) == getguildmaster(@god_guild))
+			{
+				mes "[Dwarf Grunburti]";
+				mes "Hmm...I need some materials to make a weapon.";
+				mes "Which weapon do you want to have?";
+				next;
+					switch( select(	 "Brisingamen", "Megingjard", "Sleipnir", "Mjolnir" ) )
+				{
+					case 1:
+						mes "[Dwarf Grunburti]";
+              				        mes "I will need...";
+						mes "^0000FF4 Freya's Jewel";
+						mes "4 Silver Ornament";
+						mes "3 Snow Crystal";
+						mes "3 Ripple";
+						mes "3 Drifting Air";
+						mes "2 Sapphire";
+						mes "3 Pearl";
+						mes "10 Opal";
+						mes "5 Cursed Ruby";
+						mes "20 Gold and";
+						mes "1 Necklace^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "...";
+						mes "However, the time has not come yet. So wait until then. Muhahaha!";
+						close;
+					break;
+
+					case 2:
+						mes "[Dwarf Grunburti]";
+					        mes "I will need...";
+						mes "^0000FF1 Gleipnir";
+						mes "20 Gold";
+						mes "10 Sapphire";
+						mes "10 Oridecon";
+						mes "and 1 Belt^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "...";
+						mes "However, the time has not come yet. So wait until then. Muhahaha!";
+						close;
+					break;
+
+					case 3:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF3 Wheel of the Unknown";
+						mes "5 Feather of Angel Wing";
+						mes "3 Sprit of Fish";
+						mes "4 Emblem of the Sun God";
+						mes "3 Breath of Spirit";
+						mes "20 Gold";
+						mes "10 Elunium";
+						mes "and 1 Slotted Boots^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "...";
+						mes "However, the time has not come yet. So wait until then. Muhahaha!";
+						close;
+					break;
+
+					case 4:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF2 Thor's Gauntlets";
+						mes "4 Iron Maiden";
+						mes "5 Wrath of Valkyrie";
+						mes "5 Omen of Tempest";
+						mes "5 Billow";
+						mes "20 Oridecon";
+						mes "5 Elunium";
+						mes "40 Gold and";
+						mes "1 Stunner^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "...";
+						mes "However, the time has not come yet. So wait until then. Muhahaha!";
+						close;
+					break;
+				}
+			}
+				else
+			{
+				mes "[Dwarf Grunburti]";
+				mes "We, dwarves have too high pride to share own skills with such a low race like human!";
+				mes "Stop interrupting me and leave immediately! Go play with monsters, your favorite toys!";
+				close;
+			}
+		}
+			if (strcharinfo(0) != getguildmaster(@god_guild))
+		{
+			mes "[Dwarf Grunburti]";
+			mes "I will only present my significant skills to humans of high social standing!";
+			mes "Go bring your ^0000FFguildmaster^000000!";
+			close;
+		}
+		mes "[Dwarf Grunburti]";
+		mes "Although it is very humiliating to present my valuable skills to a human being...";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "since you are a master of guild and all the seals have been released, I think I can give you a chance to look at.";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "First of all, I shall confirm if you have brought all the necessary materials to forge a godly item or not!";
+		mes "I hate to see humans wandering about my home without any purpose!";
+		next;
+					if (countitem(7073) > 3 && countitem(7077) > 3 && countitem(7088) > 2 && countitem(7090) > 2 && countitem(7092) > 2 && countitem(726) > 1 && countitem(722) > 2 && countitem(727) > 9 && countitem(724) > 4 && countitem(969) > 19 && countitem(2603) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Hmm, I guess you want to have ^0000FFBrisingamen^000000!";
+					mes "Okay...then.";
+					next;
+				}
+					else if (countitem(7058) > 0 && countitem(969) > 19 && countitem(726) > 9 && countitem(984) > 9 && countitem(2627) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Hmm, I guess you want to have ^0000FFMegingjard^000000!";
+					mes "Okay...then.";
+					next;
+				}
+					else if (countitem(7076) > 2 && countitem(7079) > 4 && countitem(7083) > 2 && countitem(7086) > 3 && countitem(7087) > 2 && countitem(969) > 19 && countitem(985) > 9 && countitem(2406) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Hmm, I guess you want to have ^0000FFSleipnir^000000!";
+					mes "Okay...then.";
+					next;
+				}
+					else if (countitem(7074) > 1 && countitem(7075) > 3 && countitem(7078) > 4 && countitem(7089) > 4 && countitem(7091) > 4 && countitem(984) > 19 && countitem(985) > 4 && countitem(969) > 39 && countitem(1522) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Hmm, I guess you want to have ^0000FFMjolnir^000000!";
+					mes "Okay...then.";
+					next;
+				}
+					else
+				{
+					mes "[Dwarf Grunburti]";
+					mes "...........";
+					next;
+					mes "[Dwarf Grunburti]";
+					mes "........";
+					next;
+					mes "[Dwarf Grunburti]";
+					mes "....";
+					next;
+					mes "[Dwarf Grunburti]";
+					mes "?! You have not brought all the necessary materials!";
+					mes "...did you forget what you need?";
+					mes "Listen carefully this time!";
+					next;
+						switch( select( "Brisingamen", "Megingjard", "Sleipnir", "Mjolnir" ) )
+					{
+					case 1:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF4 Freya's Jewel";
+						mes "4 Silver Ornament";
+						mes "3 Snow Crystal";
+						mes "3 Ripple";
+						mes "3 Drifting Air";
+						mes "2 Sapphire";
+						mes "3 Pearl";
+						mes "10 Opal";
+						mes "5 Cursed Ruby";
+						mes "20 Gold and";
+						mes "1 Necklace^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "....however, you seem to be slower than other human...";
+						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";
+						close;
+					break;
+
+					case 2:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF1 Gleipnir";
+						mes "20 Gold";
+						mes "10 Sapphire";
+						mes "10 Oridecon";
+						mes "and 1 Belt^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "....however, you seem to be slower than other human...";
+						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";
+						close;
+					break;
+
+					case 3:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF3 Wheel of the Unknown";
+						mes "5 Feather of Angel Wing";
+						mes "3 Sprit of Fish";
+						mes "4 Emblem of the Sun God";
+						mes "3 Breath of Spirit";
+						mes "20 Gold";
+						mes "10 Elunium";
+						mes "and 1 Slotted Boots^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "....however, you seem to be slower than other human...";
+						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";
+						close;
+					break;
+
+					case 4:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF2 Thor's Gauntlets";
+						mes "4 Iron Maiden";
+						mes "5 Wrath of Valkyrie";
+						mes "5 Omen of Tempest";
+						mes "5 Billow";
+						mes "20 Oridecon";
+						mes "5 Elunium";
+						mes "40 Gold and";
+						mes "1 Stunner^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "....however, you seem to be slower than other human...";
+						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";
+						close;
+					break;
+					}
+				}
+		mes "[Dwarf Grunburti]";
+		mes "I will do a favor for you this time.";
+		mes "I cannot start to work in here. Come to ^0000FFthe underground laboratory^000000.";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "Now, you must hurry up! ^0000FFOnly one of each godly item^000000 will be given to humans ^FF0000right after all the seals are released^000000!";
+		close2;
+		warp "que_god01.gat",214,63;
+		end;
+	break;
+
+	case 4:
+		mes "[Dwarf Grunburti]";
+		mes "Muhahahahahaha!";
+		mes "Go grow up first!";
+		close;
+	break;
+
+	}
+}
+
+gld_dun03.gat,92,105,0	script	Grunburti#3	826,{
+
+	mes "[Dwarf Grunburti]";
+	mes "Hmmhah! What brought you here, human!";
+	mes "Living in Midgard and away from my home town is painful enough, let alone facing a whiney human. Leave me alone!";
+	next;
+		switch( select( "Ask him about dwarves.", "Ask him what he is doing.", "Request a weapon creation.", "Cancel." ) )
+	{
+
+	case 1:
+		mes "[Dwarf Grunburti]";
+		mes "Ah, what an annoying human! What do you want to know about us, huh?";
+		mes "We are the toughest race that have bare to live in the barren land. Feeble-minded midgardians can not imagine how sterile our land is!";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "All the knowledge and skills that you are proud of were used to be ours.";
+		mes "Even weapons used by ancient Gods were made by our ancestors. Do you know that?";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "We have the greatest knowlege and skills yet we have taken our fate to live in the barren land of Giants, that's who we are!";
+		close;
+	break;
+
+	case 2:
+		mes "[Dwarf Grunburti]";
+		mes "Did you just ask what I am doing here?";
+		mes "Muhahahaha....I was waiting for the time to kick your ass!";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "Heheheheh, don't you worry. In fact, I will only humiliate myself by fighting with such a weakling like you.";
+		mes "Humans are so weak yet are too arrogant and love power struggling each other. You are just helpless...";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "My home town....I will never be able to go back...from this Midgard.";
+		mes "Because Yggdrasil tree, the only way to my home town have dissappeared during the war in 1000 years ago.";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "That is why I have been staying in Midgard!";
+		mes "At least I am lucky because I found this cave where the environment is similar as my home town...";
+		close;
+	break;
+
+	case 3:
+		set @god_guild,getcharid(2);
+			if ($God1 < 100 || $God2 < 100 || $God3 < 100 || $God4 < 100)
+		{
+				if ($God1 > 49 && $God2 > 49 && $God3 > 49 && $God4 > 49 && strcharinfo(0) == getguildmaster(@god_guild))
+			{
+				mes "[Dwarf Grunburti]";
+				mes "Hmm...I need some materials to make a weapon.";
+				mes "Which weapon do you want to have?";
+				next;
+					switch( select(	 "Brisingamen", "Megingjard", "Sleipnir", "Mjolnir" ) )
+				{
+					case 1:
+						mes "[Dwarf Grunburti]";
+              				        mes "I will need...";
+						mes "^0000FF4 Freya's Jewel";
+						mes "4 Silver Ornament";
+						mes "3 Snow Crystal";
+						mes "3 Ripple";
+						mes "3 Drifting Air";
+						mes "2 Sapphire";
+						mes "3 Pearl";
+						mes "10 Opal";
+						mes "5 Cursed Ruby";
+						mes "20 Gold and";
+						mes "1 Necklace^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "...";
+						mes "However, the time has not come yet. So wait until then. Muhahaha!";
+						close;
+					break;
+
+					case 2:
+						mes "[Dwarf Grunburti]";
+					        mes "I will need...";
+						mes "^0000FF1 Gleipnir";
+						mes "20 Gold";
+						mes "10 Sapphire";
+						mes "10 Oridecon";
+						mes "and 1 Belt^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "...";
+						mes "However, the time has not come yet. So wait until then. Muhahaha!";
+						close;
+					break;
+
+					case 3:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF3 Wheel of the Unknown";
+						mes "5 Feather of Angel Wing";
+						mes "3 Sprit of Fish";
+						mes "4 Emblem of the Sun God";
+						mes "3 Breath of Spirit";
+						mes "20 Gold";
+						mes "10 Elunium";
+						mes "and 1 Slotted Boots^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "...";
+						mes "However, the time has not come yet. So wait until then. Muhahaha!";
+						close;
+					break;
+
+					case 4:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF2 Thor's Gauntlets";
+						mes "4 Iron Maiden";
+						mes "5 Wrath of Valkyrie";
+						mes "5 Omen of Tempest";
+						mes "5 Billow";
+						mes "20 Oridecon";
+						mes "5 Elunium";
+						mes "40 Gold and";
+						mes "1 Stunner^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "...";
+						mes "However, the time has not come yet. So wait until then. Muhahaha!";
+						close;
+					break;
+				}
+			}
+				else
+			{
+				mes "[Dwarf Grunburti]";
+				mes "We, dwarves have too high pride to share own skills with such a low race like human!";
+				mes "Stop interrupting me and leave immediately! Go play with monsters, your favorite toys!";
+				close;
+			}
+		}
+			if (strcharinfo(0) != getguildmaster(@god_guild))
+		{
+			mes "[Dwarf Grunburti]";
+			mes "I will only present my significant skills to humans of high social standing!";
+			mes "Go bring your ^0000FFguildmaster^000000!";
+			close;
+		}
+		mes "[Dwarf Grunburti]";
+		mes "Although it is very humiliating to present my valuable skills to a human being...";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "since you are a master of guild and all the seals have been released, I think I can give you a chance to look at.";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "First of all, I shall confirm if you have brought all the necessary materials to forge a godly item or not!";
+		mes "I hate to see humans wandering about my home without any purpose!";
+		next;
+					if (countitem(7073) > 3 && countitem(7077) > 3 && countitem(7088) > 2 && countitem(7090) > 2 && countitem(7092) > 2 && countitem(726) > 1 && countitem(722) > 2 && countitem(727) > 9 && countitem(724) > 4 && countitem(969) > 19 && countitem(2603) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Hmm, I guess you want to have ^0000FFBrisingamen^000000!";
+					mes "Okay...then.";
+					next;
+				}
+					else if (countitem(7058) > 0 && countitem(969) > 19 && countitem(726) > 9 && countitem(984) > 9 && countitem(2627) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Hmm, I guess you want to have ^0000FFMegingjard^000000!";
+					mes "Okay...then.";
+					next;
+				}
+					else if (countitem(7076) > 2 && countitem(7079) > 4 && countitem(7083) > 2 && countitem(7086) > 3 && countitem(7087) > 2 && countitem(969) > 19 && countitem(985) > 9 && countitem(2406) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Hmm, I guess you want to have ^0000FFSleipnir^000000!";
+					mes "Okay...then.";
+					next;
+				}
+					else if (countitem(7074) > 1 && countitem(7075) > 3 && countitem(7078) > 4 && countitem(7089) > 4 && countitem(7091) > 4 && countitem(984) > 19 && countitem(985) > 4 && countitem(969) > 39 && countitem(1522) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Hmm, I guess you want to have ^0000FFMjolnir^000000!";
+					mes "Okay...then.";
+					next;
+				}
+					else
+				{
+					mes "[Dwarf Grunburti]";
+					mes "...........";
+					next;
+					mes "[Dwarf Grunburti]";
+					mes "........";
+					next;
+					mes "[Dwarf Grunburti]";
+					mes "....";
+					next;
+					mes "[Dwarf Grunburti]";
+					mes "?! You have not brought all the necessary materials!";
+					mes "...did you forget what you need?";
+					mes "Listen carefully this time!";
+					next;
+						switch( select( "Brisingamen", "Megingjard", "Sleipnir", "Mjolnir" ) )
+					{
+					case 1:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF4 Freya's Jewel";
+						mes "4 Silver Ornament";
+						mes "3 Snow Crystal";
+						mes "3 Ripple";
+						mes "3 Drifting Air";
+						mes "2 Sapphire";
+						mes "3 Pearl";
+						mes "10 Opal";
+						mes "5 Cursed Ruby";
+						mes "20 Gold and";
+						mes "1 Necklace^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "....however, you seem to be slower than other human...";
+						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";
+						close;
+					break;
+
+					case 2:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF1 Gleipnir";
+						mes "20 Gold";
+						mes "10 Sapphire";
+						mes "10 Oridecon";
+						mes "and 1 Belt^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "....however, you seem to be slower than other human...";
+						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";
+						close;
+					break;
+
+					case 3:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF3 Wheel of the Unknown";
+						mes "5 Feather of Angel Wing";
+						mes "3 Sprit of Fish";
+						mes "4 Emblem of the Sun God";
+						mes "3 Breath of Spirit";
+						mes "20 Gold";
+						mes "10 Elunium";
+						mes "and 1 Slotted Boots^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "....however, you seem to be slower than other human...";
+						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";
+						close;
+					break;
+
+					case 4:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF2 Thor's Gauntlets";
+						mes "4 Iron Maiden";
+						mes "5 Wrath of Valkyrie";
+						mes "5 Omen of Tempest";
+						mes "5 Billow";
+						mes "20 Oridecon";
+						mes "5 Elunium";
+						mes "40 Gold and";
+						mes "1 Stunner^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "....however, you seem to be slower than other human...";
+						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";
+						close;
+					break;
+					}
+				}
+		mes "[Dwarf Grunburti]";
+		mes "I will do a favor for you this time.";
+		mes "I cannot start to work in here. Come to ^0000FFthe underground laboratory^000000.";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "Now, you must hurry up! ^0000FFOnly one of each godly item^000000 will be given to humans ^FF0000right after all the seals are released^000000!";
+		close2;
+		warp "que_god01.gat",214,63;
+		end;
+	break;
+
+	case 4:
+		mes "[Dwarf Grunburti]";
+		mes "Muhahahahahaha!";
+		mes "Go grow up first!";
+		close;
+	break;
+
+	}
+}
+
+gld_dun04.gat,268,230,0	script	Grunburti#4	826,{
+
+	mes "[Dwarf Grunburti]";
+	mes "Hmmhah! What brought you here, human!";
+	mes "Living in Midgard and away from my home town is painful enough, let alone facing a whiney human. Leave me alone!";
+	next;
+		switch( select( "Ask him about dwarves.", "Ask him what he is doing.", "Request a weapon creation.", "Cancel." ) )
+	{
+
+	case 1:
+		mes "[Dwarf Grunburti]";
+		mes "Ah, what an annoying human! What do you want to know about us, huh?";
+		mes "We are the toughest race that have bare to live in the barren land. Feeble-minded midgardians can not imagine how sterile our land is!";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "All the knowledge and skills that you are proud of were used to be ours.";
+		mes "Even weapons used by ancient Gods were made by our ancestors. Do you know that?";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "We have the greatest knowlege and skills yet we have taken our fate to live in the barren land of Giants, that's who we are!";
+		close;
+	break;
+
+	case 2:
+		mes "[Dwarf Grunburti]";
+		mes "Did you just ask what I am doing here?";
+		mes "Muhahahaha....I was waiting for the time to kick your ass!";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "Heheheheh, don't you worry. In fact, I will only humiliate myself by fighting with such a weakling like you.";
+		mes "Humans are so weak yet are too arrogant and love power struggling each other. You are just helpless...";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "My home town....I will never be able to go back...from this Midgard.";
+		mes "Because Yggdrasil tree, the only way to my home town have dissappeared during the war in 1000 years ago.";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "That is why I have been staying in Midgard!";
+		mes "At least I am lucky because I found this cave where the environment is similar as my home town...";
+		close;
+	break;
+
+	case 3:
+		set @god_guild,getcharid(2);
+			if ($God1 < 100 || $God2 < 100 || $God3 < 100 || $God4 < 100)
+		{
+				if ($God1 > 49 && $God2 > 49 && $God3 > 49 && $God4 > 49 && strcharinfo(0) == getguildmaster(@god_guild))
+			{
+				mes "[Dwarf Grunburti]";
+				mes "Hmm...I need some materials to make a weapon.";
+				mes "Which weapon do you want to have?";
+				next;
+					switch( select(	 "Brisingamen", "Megingjard", "Sleipnir", "Mjolnir" ) )
+				{
+					case 1:
+						mes "[Dwarf Grunburti]";
+              				        mes "I will need...";
+						mes "^0000FF4 Freya's Jewel";
+						mes "4 Silver Ornament";
+						mes "3 Snow Crystal";
+						mes "3 Ripple";
+						mes "3 Drifting Air";
+						mes "2 Sapphire";
+						mes "3 Pearl";
+						mes "10 Opal";
+						mes "5 Cursed Ruby";
+						mes "20 Gold and";
+						mes "1 Necklace^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "...";
+						mes "However, the time has not come yet. So wait until then. Muhahaha!";
+						close;
+					break;
+
+					case 2:
+						mes "[Dwarf Grunburti]";
+					        mes "I will need...";
+						mes "^0000FF1 Gleipnir";
+						mes "20 Gold";
+						mes "10 Sapphire";
+						mes "10 Oridecon";
+						mes "and 1 Belt^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "...";
+						mes "However, the time has not come yet. So wait until then. Muhahaha!";
+						close;
+					break;
+
+					case 3:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF3 Wheel of the Unknown";
+						mes "5 Feather of Angel Wing";
+						mes "3 Sprit of Fish";
+						mes "4 Emblem of the Sun God";
+						mes "3 Breath of Spirit";
+						mes "20 Gold";
+						mes "10 Elunium";
+						mes "and 1 Slotted Boots^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "...";
+						mes "However, the time has not come yet. So wait until then. Muhahaha!";
+						close;
+					break;
+
+					case 4:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF2 Thor's Gauntlets";
+						mes "4 Iron Maiden";
+						mes "5 Wrath of Valkyrie";
+						mes "5 Omen of Tempest";
+						mes "5 Billow";
+						mes "20 Oridecon";
+						mes "5 Elunium";
+						mes "40 Gold and";
+						mes "1 Stunner^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "...";
+						mes "However, the time has not come yet. So wait until then. Muhahaha!";
+						close;
+					break;
+				}
+			}
+				else
+			{
+				mes "[Dwarf Grunburti]";
+				mes "We, dwarves have too high pride to share own skills with such a low race like human!";
+				mes "Stop interrupting me and leave immediately! Go play with monsters, your favorite toys!";
+				close;
+			}
+		}
+			if (strcharinfo(0) != getguildmaster(@god_guild))
+		{
+			mes "[Dwarf Grunburti]";
+			mes "I will only present my significant skills to humans of high social standing!";
+			mes "Go bring your ^0000FFguildmaster^000000!";
+			close;
+		}
+		mes "[Dwarf Grunburti]";
+		mes "Although it is very humiliating to present my valuable skills to a human being...";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "since you are a master of guild and all the seals have been released, I think I can give you a chance to look at.";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "First of all, I shall confirm if you have brought all the necessary materials to forge a godly item or not!";
+		mes "I hate to see humans wandering about my home without any purpose!";
+		next;
+					if (countitem(7073) > 3 && countitem(7077) > 3 && countitem(7088) > 2 && countitem(7090) > 2 && countitem(7092) > 2 && countitem(726) > 1 && countitem(722) > 2 && countitem(727) > 9 && countitem(724) > 4 && countitem(969) > 19 && countitem(2603) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Hmm, I guess you want to have ^0000FFBrisingamen^000000!";
+					mes "Okay...then.";
+					next;
+				}
+					else if (countitem(7058) > 0 && countitem(969) > 19 && countitem(726) > 9 && countitem(984) > 9 && countitem(2627) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Hmm, I guess you want to have ^0000FFMegingjard^000000!";
+					mes "Okay...then.";
+					next;
+				}
+					else if (countitem(7076) > 2 && countitem(7079) > 4 && countitem(7083) > 2 && countitem(7086) > 3 && countitem(7087) > 2 && countitem(969) > 19 && countitem(985) > 9 && countitem(2406) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Hmm, I guess you want to have ^0000FFSleipnir^000000!";
+					mes "Okay...then.";
+					next;
+				}
+					else if (countitem(7074) > 1 && countitem(7075) > 3 && countitem(7078) > 4 && countitem(7089) > 4 && countitem(7091) > 4 && countitem(984) > 19 && countitem(985) > 4 && countitem(969) > 39 && countitem(1522) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Hmm, I guess you want to have ^0000FFMjolnir^000000!";
+					mes "Okay...then.";
+					next;
+				}
+					else
+				{
+					mes "[Dwarf Grunburti]";
+					mes "...........";
+					next;
+					mes "[Dwarf Grunburti]";
+					mes "........";
+					next;
+					mes "[Dwarf Grunburti]";
+					mes "....";
+					next;
+					mes "[Dwarf Grunburti]";
+					mes "?! You have not brought all the necessary materials!";
+					mes "...did you forget what you need?";
+					mes "Listen carefully this time!";
+					next;
+						switch( select( "Brisingamen", "Megingjard", "Sleipnir", "Mjolnir" ) )
+					{
+					case 1:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF4 Freya's Jewel";
+						mes "4 Silver Ornament";
+						mes "3 Snow Crystal";
+						mes "3 Ripple";
+						mes "3 Drifting Air";
+						mes "2 Sapphire";
+						mes "3 Pearl";
+						mes "10 Opal";
+						mes "5 Cursed Ruby";
+						mes "20 Gold and";
+						mes "1 Necklace^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "....however, you seem to be slower than other human...";
+						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";
+						close;
+					break;
+
+					case 2:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF1 Gleipnir";
+						mes "20 Gold";
+						mes "10 Sapphire";
+						mes "10 Oridecon";
+						mes "and 1 Belt^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "....however, you seem to be slower than other human...";
+						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";
+						close;
+					break;
+
+					case 3:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF3 Wheel of the Unknown";
+						mes "5 Feather of Angel Wing";
+						mes "3 Sprit of Fish";
+						mes "4 Emblem of the Sun God";
+						mes "3 Breath of Spirit";
+						mes "20 Gold";
+						mes "10 Elunium";
+						mes "and 1 Slotted Boots^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "....however, you seem to be slower than other human...";
+						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";
+						close;
+					break;
+
+					case 4:
+						mes "[Dwarf Grunburti]";
+                                                mes "I will need...";
+						mes "^0000FF2 Thor's Gauntlets";
+						mes "4 Iron Maiden";
+						mes "5 Wrath of Valkyrie";
+						mes "5 Omen of Tempest";
+						mes "5 Billow";
+						mes "20 Oridecon";
+						mes "5 Elunium";
+						mes "40 Gold and";
+						mes "1 Stunner^000000...";
+						next;
+						mes "[Dwarf Grunburti]";
+						mes "....however, you seem to be slower than other human...";
+						mes "I start to wonder if you can have the godly item this time or not. Anyways, go for it!";
+						close;
+					break;
+					}
+				}
+		mes "[Dwarf Grunburti]";
+		mes "I will do a favor for you this time.";
+		mes "I cannot start to work in here. Come to ^0000FFthe underground laboratory^000000.";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "Now, you must hurry up! ^0000FFOnly one of each godly item^000000 will be given to humans ^FF0000right after all the seals are released^000000!";
+		close2;
+		warp "que_god01.gat",214,63;
+		end;
+	break;
+
+	case 4:
+		mes "[Dwarf Grunburti]";
+		mes "Muhahahahahaha!";
+		mes "Go grow up first!";
+		close;
+	break;
+
+	}
+}
+
+que_god01.gat,215,127,0	script	#god_hopewarp1	111,{
+	end;
+
+	OnInit:
+		waitingroom "Laboratory Entrance",2,"#god_hopewarp1::OnWarp",1;
+		end;
+	
+	OnWarp:
+		warpwaitingpc "que_god01.gat",155,63;
+		donpcevent "Grunburti#god::OnRun";
+		delwaitingroom;
+		end;
+}
+
+que_god01.gat,214,128,0	script	#que_godnpc1	111,{
+
+		mes "[Entrance Notice]";
+		mes "Only the quickest human being will possess the power of God.";
+		close;
+
+}
+
+que_god01.gat,215,128,0	script	#que_godnpc2"	111,{
+
+		mes "[Entrance Notice]";
+		mes "Only the quickest human being will possess the power of God.";
+		close;
+
+}
+
+que_god01.gat,213,128,0	script	#que_godnpc3	111,{
+
+		mes "[Entrance Notice]";
+		mes "Only the quickest human being will possess the power of God.";
+		close;
+
+}
+
+que_god01.gat,154,112,4	script	Grunburti#god	826,{
+
+		if ($God1 < 100 || $God2 < 100 || $God3 < 100 || $God4 < 100)
+	{
+		mes "[Dwarf Grunburti]";
+		mes "The godly item has been created already.";
+		mes "You must wait until all the seals are released again! Hahahaha!";
+		close;
+	}
+		set @god_guild,getcharid(2);
+		if (strcharinfo(0) != getguildmaster(@god_guild))
+	{
+			mes "[Dwarf Grunburti]";
+			mes "?! How did you come in here?";
+			mes "Get out immediately! I will only speak to humans of high social standing!";
+			close;
+	}
+		mes "[Dwarf Grunburti]";
+		mes "Although it is very humiliating to present my valuable skills to a human being...";
+		mes "I will do a favor for you this time.";
+		next;
+		mes "[Dwarf Grunburti]";
+		mes "Now! Choose an item that you wish to have! You have only ^FF000010 minutes to complete the weapon creation process^000000!";
+		mes "I am busy of course, also ^0000FFall the seals will be sealed up again shortly^000000!";
+		mes "^FF0000Don't be too slow^000000, otherwise ^FF0000I will give the chance to another human^000000 right away!";
+		next;
+			switch( select( "Brisingamen", "Megingjard", "Sleipnir", "Mjolnir" ) )
+		{
+
+		case 1:
+			mes "[Dwarf Grunburti]";
+			mes "Brisingamen!";
+			mes "How dare an insignificant man to own such a precious treasure!";
+			next;
+			mes "[Dwarf Grunburti]";
+			mes "I must say, this necklace will possess no meaning unless it is worn by the goddess Freya!";
+			mes "Treasure will select its owner with its will. Let's see if it recognizes you as the owner or not!";
+			next;
+			mes "[Dwarf Grunburti]";
+			mes "Once again, I need following materials in order to reproduce the godly item.";
+			mes "^0000FF4 Freya's Jewel";
+			mes "4 Silver Ornament";
+			mes "3 Snow Crystal";
+			mes "3 Ripple";
+			mes "3 Drifting Air";
+			mes "2 Sapphire";
+			mes "3 Pearl";
+			mes "10 Opal";
+			mes "5 Cursed Ruby";
+			mes "20 Gold and";
+			mes "1 Necklace^000000...";
+			next;
+
+				switch( select( "Make Brisingamen.", "Cancel." ) )
+			{
+
+			case 1:
+					if (countitem(7073) > 3 && countitem(7077) > 3 && countitem(7088) > 2 && countitem(7090) > 2 && countitem(7092) > 2 && countitem(726) > 1 && countitem(722) > 2 && countitem(727) > 9 && countitem(724) > 4 && countitem(969) > 19 && countitem(2603) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Muhahahahaha!";
+					mes "I didn't imagine that I would use my skills for a human being...give me a moment!";
+					next;
+						if ($God1 < 100 || $God2 < 100 || $God3 < 100 || $God4 < 100)
+					{
+						mes "[Dwarf Grunburti]";
+						mes "The godly item has been created already.";
+						mes "You must wait until all the seals are released again! Hahahaha!";
+						close;
+					}
+					delitem 7073,4;
+					delitem 7077,4;
+					delitem 7088,3;
+					delitem 7090,3;
+					delitem 7092,3;
+					delitem 726,2;
+					delitem 722,3;
+					delitem 726,10;
+					delitem 724,5;
+					delitem 969,20;
+					delitem 2603,1;
+					getitem 2630,1;
+					set $God1,0;
+					set $God2,0;
+					set $God3,0;
+					set $God4,0;
+					announce "[Brisingamen] the godly item has been given to [" + strcharinfo(0) + "], the master of the guild [" + getguildname(@god_guild) + "].",bc_all;
+					mes "[Dwarf Grunburti]";
+					mes "Look at this dazzling necklace, isn't it beautiful!";
+					mes "Ah~ surely there is no existance that can compete this item in this world.";
+					close;
+				}
+					else
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Bah! You idiotic human being! You have not brought all the necessary materials! Go hurry up, be quick!";
+					close;
+				}
+			break;
+
+			case 2:
+				mes "[Dwarf Grunburti]";
+				mes "Muhahahaha~ somehow I figured that!";
+				close;
+			break;
+
+			}
+
+		break;
+
+		case 2:
+			mes "[Dwarf Grunburti]";
+			mes "Me.. Megingjard!";
+			mes "How dare an insignificant man to own such a precious treasure!";
+			next;
+			mes "[Dwarf Grunburti]";
+			mes "This belt used to be worn by the greatest warrior Thor long time ago!";
+			mes "Treasure will select its owner with its will. Let's see if it recognizes you as the owner or not!";
+			next;
+			mes "[Dwarf Grunburti]";
+			mes "Once again, I need following materials in order to reproduce the godly item.";
+                        mes "^0000FF1 Gleipnir";
+			mes "20 Gold";
+			mes "10 Sapphire";
+			mes "10 Oridecon";
+			mes "and 1 Belt^000000...";
+			next;
+
+				switch( select( "Make Megingjard.", "Cancel." ) )
+			{
+
+			case 1:
+					if (countitem(7058) > 0 && countitem(969) > 19 && countitem(726) > 9 && countitem(984) > 9 && countitem(2627) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Muhahahahaha!";
+					mes "I didn't imagine that I would use my skills for a human being...give me a moment!";
+					next;
+						if ($God1 < 100 || $God2 < 100 || $God3 < 100 || $God4 < 100)
+					{
+						mes "[Dwarf Grunburti]";
+						mes "The godly item has been created already.";
+						mes "You must wait until all the seals are released again! Hahahaha!";
+						close;
+					}
+					
+					delitem 7058,1;
+					delitem 969,20;
+					delitem 726,10;
+					delitem 984,10;
+					delitem 2627,1;
+					getitem 2629,1;
+					set $God1,0;
+					set $God2,0;
+					set $God3,0;
+					set $God4,0;
+					announce "[Megingjard] the godly item has been given to [" + strcharinfo(0) + "], the master of the guild [" + getguildname(@god_guild) + "].",bc_all;
+					mes "[Dwarf Grunburti]";
+					mes "Here you go!";
+					mes "Ah~ look at this majestic appearance...! I am overwhelmed already...";
+					close;
+				}
+					else
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Bah! You idiotic human being! You have not brought all the necessary materials! Go hurry up, be quick!";
+					close;
+				}
+			break;
+
+			case 2:
+				mes "[Dwarf Grunburti]";
+				mes "Muhahahaha~ somehow I figured that!";
+				close;
+			break;
+
+			}
+
+		break;
+
+		case 3:
+			mes "[Dwarf Grunburti]";
+			mes "....the eight legged stallion, Sleipnir?!";
+			mes "How dare an insignificant man to own such a precious treasure!";
+			next;
+			mes "[Dwarf Grunburti]";
+			mes "Unfortunately I can only produce an object...not a life.";
+			mes "However, I can craft a pair of shoes that possess the power of Sleipnir.";
+			next;
+			mes "[Dwarf Grunburti]";
+			mes "Of course, even the shoes are too valuable to be given out to a human.";
+			mes "Once again, I need following materials in order to reproduce the godly item.";
+			next;
+			mes "[Dwarf Grunburti]";
+			mes "^0000FF3 Wheel of the Unknown";
+			mes "5 Feather of Angel Wing";
+			mes "3 Spirit of Fish";
+			mes "4 Emblem of the Sun God";
+			mes "3 Breath of Spirit";
+			mes "20 Gold";
+			mes "10 Elunium";
+			mes "and 1 Slotted Boots^000000...";
+			next;
+				switch( select( "Make Sleipnir.", "Cancel." ) )
+			{
+
+			case 1:
+					if (countitem(7076) > 2 && countitem(7079) > 4 && countitem(7083) > 2 && countitem(7086) > 3 && countitem(7087) > 2 && countitem(969) > 19 && countitem(985) > 9 && countitem(2406) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Muhahahahaha!";
+					mes "I didn't imagine that I would use my skills for a human being...give me a moment!";
+					next;
+						if ($God1 < 100 || $God2 < 100 || $God3 < 100 || $God4 < 100)
+					{
+						mes "[Dwarf Grunburti]";
+						mes "The godly item has been created already.";
+						mes "You must wait until all the seals are released again! Hahahaha!";
+						close;
+					}
+					delitem 7076,3;
+					delitem 7079,5;
+					delitem 7083,3;
+					delitem 7086,4;
+					delitem 7087,3;
+					delitem 969,20;
+					delitem 985,10;
+					delitem 2406,1;
+					getitem 2410,1;
+					set $God1,0;
+					set $God2,0;
+					set $God3,0;
+					set $God4,0;
+					announce "[Sleipnir] the godly item has been given to [" + strcharinfo(0) + "], the master of the guild [" + getguildname(@god_guild) + "].",bc_all;
+					mes "[Dwarf Grunburti]";
+					mes "Here you go!";
+					mes "This pair of shoes are so light, you will never feel like wearing anything on your feet with this shoes!";
+					close;
+				}
+					else
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Bah! You idiotic human being! You have not brought all the necessary materials! Go hurry up, be quick!";
+					close;
+				}
+			break;
+
+			case 2:
+				mes "[Dwarf Grunburti]";
+				mes "Muhahahaha~ somehow I figured that!";
+				close;
+			break;
+
+			}
+
+		break;
+
+		case 4:
+			mes "[Dwarf Grunburti]";
+			mes "Mjo!...Mjo....Mjolnir!";
+			mes "How dare an insignificant man to own such a precious treasure!";
+			next;
+			mes "[Dwarf Grunburti]";
+			mes "I haven't assured if you are qualified to possess this yet.";
+			mes "Are you confident that you would not disgrace Thor, the greatest warrior?";
+			next;
+			mes "[Dwarf Grunburti]";
+			mes "....sigh...";
+			mes "Somehow humans are too greedy to listen to my concern.";
+			mes "I will create it for you though. However you will realise how limitted you are to handle this item...";
+			mes "Once again, I need following materials in order to reproduce the godly item.";
+			next;
+			mes "[Dwarf Grunburti]";
+                        mes "^0000FF2 Thor's Gauntlets";
+			mes "4 Iron Maiden";
+			mes "5 Wrath of Valkyrie";
+			mes "5 Omen of Tempest";
+			mes "5 Billow";
+			mes "20 Oridecon";
+			mes "5 Elunium";
+			mes "40 Gold and";
+			mes "1 Stunner^000000...";
+			next;
+				switch( select( "Make Mjolnir.", "Cancel." ) )
+			{
+
+			case 1:
+					if (countitem(7074) > 1 && countitem(7075) > 3 && countitem(7078) > 4 && countitem(7089) > 4 && countitem(7091) > 4 && countitem(984) > 19 && countitem(985) > 4 && countitem(969) > 39 && countitem(1522) > 0)
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Muhahahahaha!";
+					mes "I didn't imagine that I would use my skills for a human being...give me a moment!";
+					next;
+						if ($God1 < 100 || $God2 < 100 || $God3 < 100 || $God4 < 100)
+					{
+						mes "[Dwarf Grunburti]";
+						mes "The godly item has been created already.";
+						mes "You must wait until all the seals are released again! Hahahaha!";
+						close;
+					}
+					delitem 7074,2;
+					delitem 7075,4;
+					delitem 7078,5;
+					delitem 7089,5;
+					delitem 7091,5;
+					delitem 984,20;
+					delitem 985,5;
+					delitem 969,40;
+					delitem 1522,1;
+					getitem 1530,1;
+					set $God1,0;
+					set $God2,0;
+					set $God3,0;
+					set $God4,0;
+					announce "[Mjolnir] the godly item has been given to [" + strcharinfo(0) + "], the master of the guild [" + getguildname(@god_guild) + "].",bc_all;
+					mes "[Dwarf Grunburti]";
+					mes "Here you go!";
+					mes "Although it may appear too small to be such a powerful hammer, there is no weapon that can compete to Mjolnir!";
+					close;
+				}
+					else
+				{
+					mes "[Dwarf Grunburti]";
+					mes "Bah! You idiotic human being! You have not brought all the necessary materials! Go hurry up, be quick!";
+					close;
+				}
+			break;
+
+			case 2:
+				mes "[Dwarf Grunburti]";
+				mes "Muhahahaha~ somehow I figured that!";
+				close;
+			break;
+
+			}
+
+		break;
+
+		}
+
+OnRun:
+	initnpctimer;
+	end;
+
+OnTimer10000:
+	mapannounce "que_god01.gat","Remember that you only have 10 minutes for this! Hurry up!",0;
+	end;
+
+OnTimer610000:
+	mapannounce "que_god01.gat","You are too slow! I am going to give the chance to the other! Next!",0;
+	end;
+
+OnTimer612000:
+	areawarp "que_god01.gat",154,67,4,7,"prontera.gat",156,324;
+	areawarp "que_god01.gat",154,82,4,7,"prontera.gat",156,324;
+	areawarp "que_god01.gat",145,99,9,9,"prontera.gat",156,324;
+	areawarp "que_god01.gat",164,99,9,9,"prontera.gat",156,324;
+	areawarp "que_god01.gat",145,118,9,9,"prontera.gat",156,324;
+	areawarp "que_god01.gat",164,118,9,9,"prontera.gat",156,324;
+	end;
+
+OnTimer615000:
+	donpcevent "#god_hopewarp1::OnInit";
+	stopnpctimer;
+	end;
+
 }
\ No newline at end of file
diff --git a/npc/quests/seals/megingard_seal.txt b/npc/quests/seals/megingard_seal.txt
index 48d427c07..d0b1c5d00 100644
--- a/npc/quests/seals/megingard_seal.txt
+++ b/npc/quests/seals/megingard_seal.txt
@@ -1,3458 +1,3458 @@
-//===== eAthena Script ======================================= 

-//= Megingjard seal unlocking NPCs.

-//===== By: ================================================== 

-//= SinSloth

-//===== Current Version: ===================================== 

-//= 1.01

-//===== Compatible With: ===================================== 

-//= eAthena

-//===== Description: ========================================= 

-//= Quest for breaking the seal of Megingjard.

-//===== Additional Comments: =================================

-// 1.0 First version. Thanks to SinSloth for scripting it. [MasterOfMuppets]

-// 1.1 fixed exploit [Lupus]

-//============================================================

-

-prt_castle.gat,44,151,0	script	Rebarev Doug	56,{

-

-if(countitem(7080) > 3 && countitem(7081) > 4 && countitem(7082) > 3 && countitem(7084) > 2 && countitem(7085) > 2)

-{

-	mes "[Rebarev Doug]";

-	mes "What's this?";

-	mes "You...! You have";

-	mes "everything I need to";

-	mes "create Gleipnir!";

-	next;

-	switch( select( "Make Gleipnir.", "Cancel." ) )

-	{

-

-		case 1:

-			mes "[Rebarev Doug]";

-			mes "I'm the only human on earth blessed with the ability to create Gleipnir. Aside from Dwarves, I'm the only person that can make this item!";

-			next;

-			delitem 7080,4;

-			delitem 7081,5;

-			delitem 7082,4;

-			delitem 7084,3;

-			delitem 7085,3;

-			getitem 7058,1;

-			mes "[Rebarev Doug]";

-			mes "There you go!";

-			next;

-			mes "[Rebarev Doug]";

-			mes "Gleipnir is said to be so strong that not even the Fenrir Wolf could break it! I'm so proud that I could make this item!";

-			close;

-		break;

-

-		case 2:

-			close;

-		break;

-

-	}

-}

-

-if($God1 < 50)

-{

-	mes "[Rebarev Doug]";

-	mes "We are Crusaders that have been training in preparation for the Holy War that is to come.";

-	next;

-	mes "[Rebarev Doug]";

-	mes "As we our forefathers have done a thousand years ago, we shall vanquish the hordes of Demons when the day comes.";

-	next;

-	mes "[Rebarev Doug]";

-	mes "If you have any questions about Crusaders, feel free to ask me. I may be too old and weak for fighting, but I will spread our message as much as I can.";

-	mes "feel free to ask me.";

-	next;

-	switch( select( "What is Holy Cross?", "What is Grand Cross?", "What is Sacrifice?", "What is Gleipnir?" ) )

-	{

-		case 1:

-			mes "[Rebarev Doug]";

-			mes "Holy Cross is the first manifestation of a Crusader's faith. By making the sign of the cross, Crusader's can inflict a holy attack on their enemies.";

-			next;

-			mes "[Rebarev Doug]";

-			mes "Monsters that are weak against holiness, particularly the Undead, will be blinded by the light of the Holy Cross. All they can do is next; for holy judgment.";

-			next;

-			mes "[Rebarev Doug]";

-			mes "Based on our latest research, the Holy Cross can inflict 4.5 times more damage than a normal attack once it is mastered.";

-			close;

-		break;

-

-		case 2:

-			mes "[Rebarev Doug]";

-			mes "Grand Cross...!";

-			mes "The righteous fury of God is given form in this destructive skill.";

-			next;

-			mes "[Rebarev Doug]";

-			mes "God grants us his power so that we may punish the forces of evil, and one's rage is embodied in a giant crucifix of power.";

-			next;

-			mes "[Rebarev Doug]";

-			mes "The power of the crucifix of light can damage the enemy three times. Each strike will have five times the strength of your normal attacks.";

-			next;

-			mes "[Rebarev Doug]";

-			mes "However, when Crusaders use Grand Cross, they must exercise extreme caution. The human body is too weak to fully embrace the will of God.";

-			next;

-			mes "[Rebarev Doug]";

-			mes "Therefore, using this skill, will cause the Crusader to suffer from damage. However, this damage can be reduced to half with Faith.";

-			close;

-		break;

-

-		case 3:

-			mes "[Rebarev Doug]";

-			mes "In practicing what we preach, Crusaders choose to protect others by bearing the suffering of others.";

-			next;

-			mes "[Rebarev Doug]";

-			mes "The Sacrifice skill allows Crusaders to keep their comrades safe from harm by receiving the damage that was intended for them.";

-			next;

-			mes "[Rebarev Doug]";

-			mes "It is the greatest demonstration of faith, as well as of love for your fellow man. Such an attitude is essential for a servant of God!";

-			next;

-			mes "[Rebarev Doug]";

-			mes "However, if the people you want to protect become stray away from you, you cannot use the Sacrifice skill for them unless they are close to you again.";

-			next;

-			mes "[Rebarev Doug]";

-			mes "As you visualize the suffering of those you want to protect, you'll never hesitate to sacrifice yourself.";

-			next;

-			mes "[Rebarev Doug]";

-			mes "Thank you, God, for granting me with a power to protect my people.";

-			close;

-		break;

-

-		case 4:

-			mes "[Rebarev Doug]";

-			mes "Gleipnir is the essence of Megingjard which I have been researching.";

-			next;

-			mes "[Rebarev Doug]";

-			mes "It's the only binding strong enough that will allow a human to wear Megingjard around his waist.";

-			next;

-			mes "[Rebarev Doug]";

-			mes "Although I can no longer fight, I've been studying how to create Gleipnir for years. I will be more than willing to create it for you if you can bring me...";

-			next;

-			mes "[Rebarev Doug]";

-			mes "^0000FF4 Cat Tread^000000,";

-			mes "^0000FF5 Woman's Moustache^000000,";

-			mes "^0000FF4 Root of Stone^000000,";

-			mes "^0000FF3 Sputum of Bird^000000 and";

-			mes "^0000FF3 Sinew of Bear^000000,";

-			close;

-		break;

-	}

-}

-else if($God1 > 49 && $God2 < 100)

-{

-	if(BaseLevel > 59)

-	{

-		if(god_eremes == 0)

-		{

-			mes "[Rebarev Doug]";

-			mes "...";

-			next;

-			mes "[Rebarev Doug]";

-			mes "Why are you wandering around this sacred place? Do you not understand that we must prepare for the Holy War?";

-			next;

-			mes "[Rebarev Doug]";

-			mes "No matter how much I explain, the ignorant never fully understand the importance of our task. The balance of power will shift when we least expect it!";

-			next;

-			mes "[Rebarev Doug]";

-			mes "I wish I could go back to those times when I would train Crusaders, rather than preach to the ignorant.";

-			next;

-			mes "[Rebarev Doug]";

-			mes "I miss my Crusaders who were enthusiastic to listen to what I had to say, and carried out their orders with loyalty.";

-			next;

-			mes "[Rebarev Doug]";

-			mes "I am wonder";

-			mes "where they have";

-			mes "all gone now...";

-			next;

-			mes "[Rebarev Doug]";

-			mes "...";

-			mes "......";

-			mes ".........";

-			next;

-			mes "[Rebarev Doug]";

-			mes "Adventurer, if you the time to listen to me speak to myself, why don't you perform a task for me?";

-			next;

-			mes "[Rebarev Doug]";

-			mes "If may be an enriching experience for you. It's possible that you'll even have a greater appreciation for Crusaders.";

-			next;

-			switch( select( "What is it?", "I'm sick and tired of doin' favors." ) )

-			{

-				case 1:

-					mes "[Rebarev Doug]";

-					mes "I want you to find the members of the 3rd squad in the 1st platoon of the 3rd company. If you happen to encounter them in your travels, please ask them how they are doing.";

-					next;

-					mes "[Rebarev Doug]";

-					mes "It shouldn't be that difficult to do, and won't be a waste of your time if you are already planning to explore the world.";

-					next;

-					switch( select( "Sure, why not.", "I'm sorry, but no." ) )

-					{

-						case 1:

-							mes "[Rebarev Doug]";

-							mes "Excellent!";

-							mes "All I want you to do is find my old comrades, and inform me of how they are doing.";

-							next;

-							mes "[Rebarev Doug]";

-							mes "However...";

-							mes "There is one problem.";

-							mes "I don't know where they are.";

-							next;

-							mes "[Rebarev Doug]";

-							mes "You could try to find a record of residency changes by citizens of the Rune-Midgarts Kingdom in the Prontera Library...";

-							next;

-							mes "[Rebarev Doug]";

-							mes "However, the records of Crusader personnel is considered confidential, so I am not sure of whether or not you can view them.";

-							next;

-							mes "[Rebarev Doug]";

-							mes "Thank you in advance anyways.";

-							mes ".........";

-							next;

-							mes "[Rebarev Doug]";

-							mes "You must understand, my position requires me to remain in this area 24 hours, 7 days a week. I cannot leave without the consent of the upper hierarchy.";

-							next;

-							mes "[Rebarev Doug]";

-							mes "However, I know you have the freedom and the time to go wherever you please. I'd appreciate if you would do this for me.";

-							next;

-							mes "[Rebarev Doug]";

-							mes "My old comrades in arms. You have no idea how much I miss them...";

-							set god_eremes,1;

-							close;

-						break;

-

-						case 2:

-							mes "[Rebarev Doug]";

-							mes "^333333*Sigh...*^000000";

-							mes "Please understand that I would not be asking this of you if it were not for the restraints of my position.";

-							next;

-							mes "[Rebarev Doug]";

-							mes "I have an obligation to this Kingdom to keep my post and inform adventurers about the Crusader class. Because of this awesome responsibility, I must remain here, ever vigilant.";

-							next;

-							mes "[Rebarev Doug]";

-							mes "If you can't understand, then you must be taking your freedom for granted...";

-							close;

-						break;

-					}

-				break;

-

-				case 2:

-					mes "[Rebarev Doug]";

-					mes "As far as I remember, this is the first time I have asked you to do me a favor.";

-					next;

-					mes "[Rebarev Doug]";

-					mes "Unlike you, I know the meaning of responsibility. I remain here, helping inquisitive adventurers for the sake of King and country.";

-					next;

-					mes "[Rebarev Doug]";

-					mes "Still...";

-					mes "Know this.";

-					mes "Although the results may not be immediate, you will always be rewarded when you help others.";

-					next;

-					mes "[Rebarev Doug]";

-					mes "Please reconsider when you get the chance.";

-					close;

-				break;

-			}

-		}

-		else if(god_eremes > 0 && god_eremes < 4)

-		{

-

-			if(rand(1,10) > 6 && god_eremes == 2)

-			{

-				mes "[Rebarev Doug]";

-				mes "I am wondering how my members are doing by now...";

-				mes "I cannot even remember when was the last time I saw them...";

-				next;

-				mes "[Rebarev Doug]";

-				mes "Hmm? Why are you still here?";

-				next;

-				switch( select( "Where should I go?", "I am about to leave.", "What do you mean by the last mission?" ) )

-				{

-					case 1:

-						mes "[Rebarev Doug]";

-						mes "Well...I have no clue where they are.";

-						mes "You might be able to find the information from";

-						mes "^0000FFThe 3rd company personnel in&out record crews^000000 in the library?";

-						close;

-					break;

-

-					case 2:

-						mes "[Rebarev Doug]";

-						mes "Oh, are you? I see... I am wondering what they have been doing ever since we're disbanded after the ^0000FFlast mission^000000...";

-						close;

-					break;

-

-					case 3:

-						mes "[Rebarev Doug]";

-						mes "The last mission...? That gave the reason to disband the 1st squad of the 3rd platoon...";

-						mes "I cannot think of this seprately from the memory...bah..";

-						next;

-						mes "[Rebarev Doug]";

-						mes "You know, hmm.";

-						mes "We crusaders have heirarchy...basically we have to listen to higher officers.";

-						next;

-						mes "[Rebarev Doug]";

-						mes "............";

-						mes "...If......there wasn't him at the time...";

-						next;

-						mes "[Rebarev Doug]";

-						mes ".............";

-						next;

-						mes "";

-						mes "- After a while, he spoke to me as if he was mad. -";

-						next;

-						mes "[Rebarev Doug]";

-						mes "Let's not talk about it. Just remember it as the reason to disband my squad.";

-						next;

-						mes "[Rebarev Doug]";

-						mes "Now, will you please go find ^0000FFThe 3rd company personnel in&out record crews^000000 in the library for me?";

-						set god_eremes,3;

-						close;

-					break;

-				}

-			}

-			else

-			{

-				mes "[Rebarev Doug]";

-				mes "I am wondering how my members are doing by now...";

-				mes "I cannot even remember when was the last time I saw them...";

-				next;

-				mes "[Rebarev Doug]";

-				mes "Hmm? Why are you still here?";

-				next;

-				switch( select( "Where should I go?", "I am about to leave." ) )

-				{

-					case 1:

-						mes "[Rebarev Doug]";

-						mes "Well...I have no clue where they are.";

-						mes "You might be able to find the information from the library.";

-						close;

-					break;

-

-					case 2:

-						mes "[Rebarev Doug]";

-						mes "Oh, are you? I see... I am wondering what they have been doing ever since we're disbanded after the ^0000FFlast mission^000000...";

-						set god_eremes,2;

-						close;

-					break;

-				}

-			}

-		}

-		else if(god_eremes > 3 && god_eremes < 18)

-		{

-			mes "[Rebarev Doug]";

-			mes "Huh? Librarian didn't let you read the record?";

-			mes "Umm...I guess if you try your best to convince him, he might change his mind.";

-			next;

-			mes "[Rebarev Doug]";

-			mes "Even if things are tough nowadays, he's just a man with a heart...";

-			next;

-			mes "[Rebarev Doug]";

-			mes "Please I beg you, please find how my members are doing...";

-			close;

-		}

-		else if(god_eremes > 17 && god_eremes < 20)

-		{

-			if(god_megin_1 > 0 || god_megin_2 > 0 || god_megin_3 > 0 || god_megin_4 > 0 || god_megin_5 > 0 || god_megin_6 > 0)

-			{

-				mes "[Rebarev Doug]";

-				mes "Oh...";

-				mes "So did you meet them?";

-				mes "Are they all okay?";

-				next;

-				mes "- You told him they are all okay other than lost their meomory and having migraines.-";

-				close;

-			}

-			mes "- You told him what you have read from the record -";

-			next;

-			mes "- that where they are and how they are. -";

-			next;

-			mes "[Rebarev Doug]";

-			mes "Oh! Have you read the record? I am glad to hear that!";

-			mes "By the way...I don't trust what was wrote on paper since it's out of date...";

-			next;

-			mes "[Rebarev Doug]";

-			mes "If it's possible, I hope you could go meet my members to find the latest news about them...";

-			mes "I mean with your ^0000FFown eyes^000000!";

-			next;

-			mes "[Rebarev Doug]";

-			mes "Please I beg you...please go find them.";

-			next;

-			mes "[Rebarev Doug]";

-			mes "I beg you...please go find them.";

-			mes "I cannot trust the old record...I am just being a poor old man who misses his friends.";

-			close;

-		}

-		else if(god_eremes > 19 && god_eremes < 23)

-		{

-			mes "[Rebarev Doug]";

-			mes "Oh~ welcome back.";

-			mes "So did you see them all? It's been a while since I saw you last time.";

-			mes "Umm? What? Why are you looking at me strange?";

-			next;

-			switch( select( "Ask him about the suspicion.", "This is not a right time to ask about the suspicion. wait." ) )

-			{

-				case 1:

-					mes "- You tried to organize your thoughts about all those suspicions you have had -";

-					next;

-					mes "- such as all the members are not on the normal condition, -";

-					next;

-					mes "- they lost their memory partially -";

-					next;

-					mes "- and about Royal Myst's comment...-";

-					next;

-					mes "- Or who is Egnigem that all members talked about? -";

-					next;

-					mes "- All these thoughts clogged your brain so you were just talking aboutissues regarding the members that were not that important.-";

-					next;

-					mes "[Rebarev Doug]";

-					mes "?!...I cannot understand what you're talking about...you're all over the place.";

-					next;

-					mes "[Rebarev Doug]";

-					mes "Stop looking at me like that, talk to me something!";

-					mes "If you are done with talking, let me excuse myself. I need to think of something.";

-					next;

-					mes "[Rebarev Doug]";

-					mes "I appreciate you for delivering me the news of my members -";

-					mes "Now, I need to go continue my research...under the commend of His Majesty.";

-					mes "May God bless you.";

-					set god_eremes,21;

-					close;

-				break;

-

-				case 2:

-					mes "- You pretended as nothing happened -";

-					next;

-					mes "- and told him about the members of the 1st squad in the 3rd platoon.-";

-					next;

-					mes "- Of course, you didn't tell him the whole truth but the stuffs you have read from the record plus some real news. -";

-					next;

-					mes "[Rebarev Doug]";

-					mes "Hmm~ I see. I am so relieved to hear they are doing okay! Hahaha...";

-					next;

-					mes "- You felt the way of him looking at you have been slightly changed. It seemed he started guarding against you?-";

-					next;

-					mes "[Rebarev Doug]";

-					mes "I appreciate you for delivering me the news of my members -";

-					mes "Now, I need to go continue my research...under the commend of His Majesty.";

-					mes "May God bless you.";

-					next;

-					mes "- You felt detestableness from his smile.-";

-					set god_eremes,22;

-					close;

-				break;

-			}

-		}

-		else if(god_eremes > 22 && god_eremes < 25)

-		{

-			mes "- While you were talking about the result of your travel, you mentioned of Egnigem.-";

-			next;

-			mes "- He didn't seem to be agitated as though he knew something more than I did.-";

-			next;

-			mes "[Rebarev Doug]";

-			mes "It is too late to talk about the issue...";

-			mes "even if I felt sorry for you to know that...?";

-			mes "However...there is nothing left that you can prove.";

-			mes "Giggle giggle giggle....";

-			next;

-			mes "[Rebarev Doug]";

-			mes "No matter how hard you struggle,";

-			mes "after all, the elite as me rules the world.";

-			mes "Giggle giggle...let them roll over the floor as cold and rotten corpses! I do not care about the low!";

-			next;

-			mes "[Rebarev Doug]";

-			mes "Do you hate me? Do you really hate me?";

-			mes "Let me tell you what you can do.";

-			next;

-			mes "[Rebarev Doug]";

-			mes "Take a look at my back. You will see a judge who is in charge of all the military crimes.";

-			next;

-			mes "[Rebarev Doug]";

-			mes "It seems he will hold a trial if at least 100 people report a same crime...";

-			mes "So, you can do it if you really want to reveal the issue to the public!";

-			mes "Muhahahahaha!";

-			close;

-		}

-		else if(god_eremes > 23 && god_eremes < 26)

-		{

-			mes "[Rebarev Doug]";

-			mes "Bah...I didn't know you would actually did it.";

-			mes "Hey...you will be sorry later...";

-			mes "After all, the elite as me rules the world.";

-			close;

-		}

-		else

-		{

-			mes "[Rebarev Doug]";

-			mes "No matter how hard you struggle,";

-			mes "after all, the elite as me rules the world.";

-			mes "Giggle giggle...let them roll over the floor as cold and rotten corpses! I do not care about the low!";

-			close;

-		}

-	}

-	else

-	{

-		mes "[Rebarev Doug]";

-		mes "You are not even at a level to speak to me.";

-		mes "Even if you are an adventurer, you are supposed to have some experience and knowledge to have a conversation with me.";

-		mes "don't you agree?";

-		close;

-	}

-}

-else

-{

-	mes "[Rebarev Doug]";

-	mes "We are crusaders who prepare a holy war under the will of Odin.";

-	mes "As we did a thousand years ago, we are waiting for the day to eliminate demons from the world.";

-	close;

-}

-

-}

-

-prt_castle.gat,48,164,0	script	Crusader#God	734,{

-

-if($God1 > 49 && $God2 < 100)

-{

-	if(god_eremes > 22 && god_eremes < 25)

-	{

-		mes "[Max Von Shedough]";

-		mes "Welcome, friend!";

-		mes "Here in the Prontera Castle, we Crusaders are busily preparing for the Holy War that is to come.";

-		next;

-		mes "[Max Von Shedough]";

-		mes "Let me introduce myself. My name is Max Von Shedough, the military judge! Do you have any business with me?";

-		next;

-		mes "^3355FFYou handed Max Von Shedough the petition against Rebarev Doug based on your investigation with Egnigem.^000000";

-		next;

-		mes "[Max Von Shedough]";

-		mes "Hm? This is serious.";

-		mes "Alright, I will investigate your claim to the best of my ability.";

-		next;

-		mes "[Max Von Shedough]";

-		mes "However, as of now, the petition you've just given me is considered classified information. Please keep this a military secret.";

-

-		set $God2,$God2+1;

-

-		if($God2 == 50)

-			announce "The 2nd seal of [Megingjard] has appeared.",bc_all;

-		else if($God1 > 99 && $God2 > 99 && $God3 > 99 && $God4 > 99)

-			announce "The four seals have been released at the same time with the seals of [Megingjard].",bc_all;

-		else if($God2 > 99)

-			announce "The seals of [Megingjard] have been released.",bc_all;

-

-		if(god_eremes == 23)

-			set god_eremes,25;

-		else if(god_eremes == 24)

-			set god_eremes,26;

-		close;

-	}

-	else if(god_eremes > 26)

-	{

-		mes "[Max Von Shedough]";

-		mes "Unfortunately, I'm not sure if it's possible to hold a trial against Rebarev Doug.";

-		next;

-		mes "[Max Von Shedough]";

-		mes "Regrettably, it seems that he still has too much influence. Still, let me assure you that I will be trying my best I am not sure if we will hold a trial with the document you have submitted or not...";

-		next;

-		mes "[Max Von Shedough]";

-		mes "But count on me, I am trying my best to get him indicted.";

-		close;

-	}

-	else

-	{

-		mes "[Max Von Shedough]";

-		mes "Welcome, my friend! This is a sacred place to prepare the holy war, the crusader commander's room.";

-		mes "Anyone who wishes to participate in the holy war will be welcomed!";

-		close;

-	}

-}

-else

-{

-	mes "[Max Von Shedough]";

-	mes "Welcome, my friend! This is a sacred place to prepare the holy war, the crusader commander's room.";

-	mes "Anyone who wishes to participate in the holy war will be welcomed!";

-	close;

-}

-

-}

-

-prt_in.gat,172,109,0	script	A File#God1	111,{

-

-if(god_eremes == 12)

-{

-	mes "You have found ^0000FF- The 3rd company personnel in&out record crews -^000000!";

-	close;

-}

-else if(god_eremes > 6 && god_eremes < 12)

-{

-	if(rand(1,10) > 6 && god_eremes > 6)

-	{

-		mes "You found a shelf filled with many files.";

-		mes "You started searching files one by one.";

-		set god_eremes,god_eremes+1;

-		close;

-	}

-	else

-	{

-		mes "You found a shelf filled with many files.";

-		mes "You started searching files one by one.";

-		close;

-	}

-}

-else if(god_eremes < 7)

-{

-	mes "[Librarian Jekan]";

-	if(Sex)

-		mes "I'm sorry sir,";

-	else

-		mes "I'm sorry ma'am,";

-	mes "but special authorization is required to browse that section. Otherwise, it's off limits.";

-	close;

-}

-else

-{

-	mes "[Librarian Jekan]";

-	mes "Please do not enter that section.";

-	next;

-	mes "- You stepped back as he told you to -";

-	close;

-}

-

-}

-

-prt_in.gat,170,109,0	script	A File#God2	111,{

-

-if(god_eremes == 12)

-{

-	mes "You have found ^0000FF- The 3rd company personnel in&out record crews -^000000!";

-	close;

-}

-else if(god_eremes > 6 && god_eremes < 12)

-{

-	if (rand(1,10) > 6 && god_eremes > 6)

-	{

-		mes "You found a shelf filled with many files.";

-		mes "You started searching files one by one.";

-		set god_eremes,god_eremes+1;

-		close;

-	}

-	else

-	{

-		mes "You found a shelf filled with many files.";

-		mes "You started searching files one by one.";

-		close;

-	}

-}

-else if(god_eremes < 7)

-{

-	mes "[Librarian Jekan]";

-	mes "Please do not enter that section.";

-	next;

-	mes "- You stepped back as he told you to -";

-	close;

-}

-else

-{

-	mes "[Librarian Jekan]";

-	mes "Please do not enter that section.";

-	next;

-	mes "- You stepped back as he told you to -";

-	close;

-}

-

-}

-

-prt_in.gat,168,109,0	script	A File#God3	111,{

-

-if(god_eremes == 12)

-{

-	mes "You have found ^0000FF- The 3rd company personnel in&out record crews -^000000!";

-	close;

-}

-else if(god_eremes > 6 && god_eremes < 12)

-{

-	if (rand(1,10) > 6 && god_eremes > 6)

-	{

-		mes "You found a shelf filled with many files.";

-		mes "You started searching files one by one.";

-		set god_eremes,god_eremes+1;

-		close;

-	}

-	else

-	{

-		mes "You found a shelf filled with many files.";

-		mes "You started searching files one by one.";

-		close;

-	}

-}

-else if(god_eremes < 7)

-{

-	mes "[Librarian Jekan]";

-	mes "Please do not enter that section.";

-	next;

-	mes "- You stepped back as he told you to -";

-	close;

-}

-else

-{

-	mes "[Librarian Jekan]";

-	mes "Please do not enter that section.";

-	next;

-	mes "- You stepped back as he told you to -";

-	close;

-}

-

-}

-

-prt_in.gat,169,109,0	script	A File#God4	111,{

-

-if(god_eremes == 12)

-{

-	mes "You have found ^0000FF- The 3rd company personnel in&out record crews -^000000!";

-	close;

-}

-else if(god_eremes > 6 && god_eremes < 12)

-{

-	if (rand(1,10) > 6 && god_eremes > 6)

-	{

-		mes "You found a shelf filled with many files.";

-		mes "You started searching files one by one.";

-		set god_eremes,god_eremes+1;

-		close;

-	}

-	else

-	{

-		mes "You found a shelf filled with many files.";

-		mes "You started searching files one by one.";

-		close;

-	}

-}

-else if(god_eremes < 7)

-{

-	mes "[Librarian Jekan]";

-	mes "Please do not enter that section.";

-	next;

-	mes "- You stepped back as he told you to -";

-	close;

-}

-else

-{

-	mes "[Librarian Jekan]";

-	mes "Please do not enter that section.";

-	next;

-	mes "- You stepped back as he told you to -";

-	close;

-}

-

-}

-

-prt_in.gat,166,109,0	script	A File#God5	111,{

-

-if(god_eremes == 12)

-{

-	mes "You have found ^0000FF- The 3rd company personnel in&out record crews -^000000!";

-	close;

-}

-else if(god_eremes > 6 && god_eremes < 12)

-{

-	if (rand(1,10) > 6 && god_eremes > 6)

-	{

-		mes "You found a shelf filled with many files.";

-		mes "You started searching files one by one.";

-		set god_eremes,god_eremes+1;

-		close;

-	}

-	else

-	{

-		mes "You found a shelf filled with many files.";

-		mes "You started searching files one by one.";

-		close;

-	}

-}

-else if(god_eremes < 7)

-{

-	mes "[Librarian Jekan]";

-	mes "Please do not enter that section.";

-	next;

-	mes "- You stepped back as he told you to -";

-	close;

-}

-else

-{

-	mes "[Librarian Jekan]";

-	mes "Please do not enter that section.";

-	next;

-	mes "- You stepped back as he told you to -";

-	close;

-}

-

-}

-

-prt_in.gat,172,106,0	script	Librarian#God	833,{

-

-if($God1 > 49 && $God2 < 100)

-{

-	if(god_eremes > 2 && god_eremes < 7)

-	{

-		mes "[Librarian Jekan]";

-		mes "Ah, please do not touch the files at this section.";

-		next;

-		mes "[Librarian Jekan]";

-		mes "Some of the information there is classified, and it is therefore prohibited by the Prontera Military to browse through them.";

-		next;

-		mes "[Librarian Jekan]";

-		mes "I'm currently in the process of searching for the classified files in that section, so that I can separate it from the information that is public domain, so I'd appreciate it if you didn't interfere with my work.";

-		next;

-		mes "[Librarian Jekan]";

-		mes "Darn it! I can't read anything when the light is this dim! It's bad enough my eyes have gone bad...";

-		next;

-		mes "[Librarian Jekan]";

-		mes "If you're looking for a book, you ought to go search through another section.";

-		next;

-			switch( select( "You have bad eyes?", "I want to read some documents.", "Let me help you find those files...", "What kind of files are you looking for?" ) )

-			{

-				case 1:

-					mes "[Librarian Jekan]";

-					mes "Since I have worked under a dim light for a long time, my eyes have gone bad.";

-					mes "They should get me ^0000FFa new light^000000, otherwise I will be gone blind sooner or later...";

-					if(god_eremes == 5 && ( countitem(2203) > 0 || countitem(1041) > 0 ) )

-					{

-						next;

-						mes "[Librarian Jekan]";

-						mes "?! Oh~ you have very useful stuff with you!";

-						mes "Do you mind if I use the stuff for a while? It will be very helpful for me to find the files!";

-						next;

-						switch( select( "Yes, I do mind.", "No, I don't mind." ) )

-						{

-							case 1:

-								mes "[Librarian Jekan]";

-								mes "...bah. Never mind then.";

-								close;

-							break;

-

-							case 2:

-								mes "[Librarian Jekan]";

-								mes "What a kind person you are!";

-								mes "Now I can believe that you really meant to help me!";

-								if(countitem(2203) && countitem(1041))

-								{

-									delitem 1041,countitem(1041);

-									delitem 2203,1;

-								}

-								else if(countitem(2203))

-									delitem 2203,1;

-								else if(countitem(1041))

-									delitem 1041,countitem(1041);

-								set god_eremes,6;

-								next;

-								mes "[Librarian Jekan]";

-								mes "Thank you, thank you so much. Now I can find the file with less worry.";

-								mes "...if it's possible, I wish you could help me to find the file...can you?";

-							break;

-

-						}

-					}

-					else if(god_eremes > 5)

-					{

-						mes "[Librarian Jekan]";

-						mes "Thank you. It will be a good help to find the file.";

-					}

-					close;

-				break;

-

-				case 2:

-					if(god_eremes == 6)

-					{

-						mes "[Librarian Jekan]";

-						mes "Read some documents? Well, you've come here to the Library. That's a good start.";

-						next;

-						mes "[Librarian Jekan]";

-						mes "Well, as long as you know what kind of document you're looking for, you might be able to find it.";

-						next;

-						mes "[Librarian Jekin]";

-						mes "Just keep in mind that this particular section is off limits for now. Why don't you check the files at the front?";

-						next;

-						mes "[Librarian Jekin]";

-						mes "I've got to find that classified file as soon as I can!";

-						set god_eremes,7;

-						close;

-					}

-					else

-					{

-						mes "[Librarian Jekan]";

-						mes "Hmm...?";

-						mes "Hey, haven't";

-						mes "I told you already?";

-						next;

-						mes "[Librarian Jekan]";

-						mes "The public is prohibited from browsing the files in this section! How many times do I need to repeat myself?";

-						close;

-					}

-				break;

-

-				case 3:

-					if(god_eremes == 4)

-					{

-						mes "[Librarian Jekan]";

-						mes "Hmm. Well, I'd gladly accept your help if it weren't for the fact that I cannot allow classified information to be released to the public.";

-						next;

-						mes "[Librarian Jekan]";

-						mes "I have no idea how something so important was shuffled into the files here in Prontera Library, but we can't allow the public to access it.";

-						next;

-						mes "[Librarian Jekan]";

-						mes "Still, that file doesn't seem to be that important, but I still have to waste my time on finding it...";

-						next;

-						mes "[Librarian Jekan]";

-						mes "Damn, my eyes are sore. Working as a government official is easy except for the times when the bureaucrats make you do stuff like this.";

-						set god_eremes,5;

-						close;

-					}

-					else if(god_eremes > 4)

-					{

-						mes "[Librarian Jekan]";

-						mes "I think I'm going to go insane looking for this file...!";

-						next;

-						mes "[Librarian Jekan]";

-						mes "Huh...?";

-						mes "Did you just say that you wanted to help me? Sure, I'd appreciate it.";

-						close;

-					}

-					else

-					{

-						mes "[Librarian Jekan]";

-						mes "Um, you're not even supposed to know what kind of file I'm looking for. Even if you did, I'm not allowed to show you what's inside!";

-						close;

-					}

-				break;

-

-				case 4:

-					mes "[Librarian Jekan]";

-					mes "Hmm. I'm not really allowed to disclose any information related to that file. I'm sorry about that.";

-					next;

-					mes "[" + strcharinfo(0) + "]";

-					mes "But isn't";

-					mes "the file about...";

-					input @str$;

-					mes "^0000FF" + @str$ + "?";

-					next;

-					if (@str$ == "The 3rd company personnel in&out record crews" || @str$ == "the 3rd company personnel in&out record crews")

-					{

-						mes "[Librarian Jekan]";

-						mes "Hmm...?";

-						mes "How did you";

-						mes "know about that?";

-						set god_eremes,4;

-						close;

-					}

-					else

-					{

-						mes "[Librarian Jekan]";

-						mes "Errmmm...";

-						mes "I don't think so....?";

-						close;

-					}	

-				break;

-			}

-	}

-	else if(god_eremes == 2)

-	{

-		mes "[Librarian Jekan]";

-		mes "Ah, please do not touch files in this section. Usually, it's public domain but it seems that a classified file managed to get misplaced there.";

-		next;

-		mes "[Librarian Jekan]";

-		mes "For now, I cannot let anyone without special authorization to look through that section. I must find that file and send it to the Prontera military as soon as I can.";

-		next;

-		mes "[Librarian Jekan]";

-		mes "Ergh! This light isn't bright enough for my eyes. They're starting to get sore again...";

-		next;

-		mes "[Librarian Jekan]";

-		mes "So what brings you here? If you're looking for something in particular, you should try another section.";

-		next;

-		switch( select( "I want to read some documents.", "Do you have bad eyes?", "Let me help you to find the files.", "What kind of files are you looking for?" ) )

-		{

-			case 1:

-				mes "[Librarian Jekan]";

-				mes "Grrrrrrr~ I told you already!";

-				mes "Files at this section are not for public exhibition, okay?";

-				mes "Why do you make me repeat the same thing over and over again?";

-				close;

-			break;

-

-			case 2:

-				mes "[Librarian Jekan]";

-				mes "Since I have worked under a dim light for a long time, my eyes have gone bad.";

-				mes "They should get me a new light, otherwise I will be gone blind sooner or later...";

-				close;

-			break;

-

-			case 3:

-				mes "[Librarian Jekan]";

-				mes "Um? How do you know what file I am looking for?";

-				mes "You don't even know what is written inside?";

-				mes "Stop interrupting me, leave!";

-				close;

-			break;

-

-			case 4:

-				mes "[Librarian Jekan]";

-				mes "Hmm. I am not supposed to reveal anything related to the file.";

-				next;

-				mes "[" + strcharinfo(0) + "]";

-				mes "Isn't the file about...";

-				input @str$;

-				mes "[" + strcharinfo(0) + "]";

-				mes "^0000FF" + @str$ + "?";

-				next;

-				mes "[Librarian Jekan]";

-				mes "Maybe...";

-				mes "Maybe not~";

-				close;

-			break;

-

-		}

-	}

-	else if(god_eremes > 6 && god_eremes < 12)

-	{

-		if(rand(1,10) > 4)

-		{

-			mes "[Librarian Jekan]";

-			mes "Hmm? So did you find it? I've been searching for that file for a long time, but I haven't been able to find it.";

-			next;

-			mes "[Librarian Jekan]";

-			mes "I'll go ahead and search the right side, so do you think you could search the left?";

-			close;

-		}

-		else

-		{

-			mes "[Librarian Jekan]";

-			mes "Did you find it yet? All this time, and I still haven't been able to dig up that file.";

-			next;

-			mes "[Librarian Jekan]";

-			mes "I'll go ahead and check the left side, so would you look for it in the middle or the right side?";

-			close;

-		}

-	}

-	else if(god_eremes == 12)

-	{

-		mes "[Librarian Jekan]";

-		mes "Ah! There it is!";

-		mes "Thank you so much! I'm glad to see that there are still kind and thoughtful people like you in the world.";

-		next;

-		mes "[Librarian Jekan]";

-		mes "I really want to give you something to show you my gratitude, but I've got to send this back to the Prontera Military right away.";

-		next;

-		menu "I want to read the document.",-;

-

-		mes "[Librarian Jekan]";

-		mes "Oh, right, you mentioned that, didn't you? It doesn't seem seem so important, but I'm not really quite sure...";

-		next;

-		mes "[Librarian Jekan]";

-		mes "Well, it couldn't hurt if I made a copy of this first for you to read, but first I'll need some materials.";

-		next;

-		mes "[Librarian Jekan]";

-		mes "I'll even cast the search magic on it, so that it'll be just like the original. All right, I need the following things to make a copy...";

-		next;

-		mes "[Librarian Jekan]";

-		mes "2 Slick Paper,";

-		mes "1 Oil Paper,";

-		mes "3 Squid Ink,";

-		mes "3 Feather of Birds and";

-		mes "20 Blue Gemstones.";

-		next;

-		mes "[Librarian Jekan]";

-		mes "Please get those as soon as possible, and I'll be here making the other preparations to make a copy.";

-		next;

-		mes "[Librarian Jekan]";

-		mes "Also, I'll keep this copy in the Library for you to read, and to prevent it from being leaked to the public. So you'll have to come visit each time you wish to read it.";

-		next;

-		mes "[Librarian Jekan]";

-		mes "Okay, now...";

-		mes "Come back here";

-		mes "as soon as you can.";

-		set god_eremes,13;

-		close;

-	}

-	else if(god_eremes == 13)

-	{

-		if(countitem(7111) > 1 && countitem(7151) && countitem(1024) > 2 && countitem(916) > 2 && countitem(717) > 19)

-		{

-			mes "[Librarian Jekan]";

-			mes "Oh, you came back. I didn't expect you to return here so quickly. Whatever's inside must be really important for you to know.";

-			next;

-			mes "[Librarian Jekan]";

-			mes "Anyway, please give me a moment while I make that copy for you.";

-			delitem 7111,2;

-			delitem 7151,1;

-			delitem 1024,3;

-			delitem 916,3;

-			delitem 717,20;

-			set god_eremes,14;

-			next;

-			mes "[Librarian Jekan]";

-			mes "Alright then...";

-			mes "I'll see you in a bit.";

-			close;

-		}

-		else

-		{

-			mes "[Librarian Jekan]";

-			mes "Have you forgotten what you need to make a copy? Alright, let me tell you again...";

-			next;

-			mes "[Librarian Jekan]";

-			mes "2 Slick Paper,";

-			mes "1 Oil Paper,";

-			mes "3 Squid Ink,";

-			mes "3 Feather of Birds and";

-			mes "20 Blue Gemstones.";

-			next;

-			mes "[Librarian Jekan]";

-			mes "Please come back with those items as soon as you can.";

-			close;

-		}

-	}

-	else if(god_eremes > 13 && god_eremes < 16)

-	{

-		if(rand(1,10) > 4)

-		{

-			mes "[Librarian Jekan]";

-			mes "Let me go over and review the document before I make a copy.";

-			close;

-		}

-		else

-		{

-			mes "[Librarian Jekan]";

-			mes "Let me go over and review the document before I make a copy.";

-			set god_eremes,god_eremes+1;

-			close;

-		}

-	}

-	else if(god_eremes == 16)

-	{

-		mes "[Librarian Jekan]";

-		mes "There you go. As I thought, the document didn't seem to contain any crucially important data.";

-		next;

-		mes "[Librarian Jekan]";

-		mes "Just remember, this copy needs to stay in the Prontera Library. That means you have to come back if you need to read the document again.";

-		set god_eremes,17;

-		close;

-	}

-	else if(god_eremes > 16)

-	{

-		mes "[Librarian Jekan]";

-		mes "Welcome, my friend!";

-		mes "So, what do you need today?";

-		next;

-			switch( select( "Search words on the document.", "Quit searching.", "Converse." ) )

-			{

-				case 1:

-					mes "- Search Magic Initiated -";

-					mes "- Please enter a keyword. -";

-					next;

-					input @str$;

-					if(@str$ == "Crusader" || @str$ == "crusader") 

-					{

-						mes "- search with the keyword : Crusader -";

-						mes "Crusader : Warriors that prepare themselves for a holy war. They are selected from well-experienced and religious swordsmen.";

-						mes "Any data regarding the military power is confidential, cannot be searched.";

-						next;

-						mes "This document is specified with the personnel in&out record of the 3rd company.";

-						set @godtemplib4,1;

-						close;

-					}

-						else if((@str$ == "The 3rd company" || @str$ == "the 3rd company" || @str$ == "The third company") && @godtemplib4)

-						{

-							mes "- search with the keyword : " + @str$ + " -";

-							mes "The 3rd company : Crusaders.";

-							mes "The 3rd comany is known as organized with the best members of crusaders,";

-							mes "there have been no report regarding the personnel in&out record of this company. However,";

-							next;

-							mes "The 3rd squad in the 1st platoon of the 3rd comany was an exception of that case,";

-							mes "the members of the 1st squad were all retired or transfered to other forces.";

-							mes "Specific information can be searched within the article about the 1st platoon.";

-							set @godtemplib1,1;

-							close;

-						}

-							else if((@str$ == "The 1st platoon" || @str$ == "the 1st platoon" || @str$ == "The first platoon") && @godtemplib1)

-							{

-								mes "- search with the keyword : " + @str$ + " -";

-								mes "The 1st platoon : The 1st platoon of the 3rd company, Crusaders.";

-								mes "Each company consists of 4 platoons, and this is only one record regarding the 3rd squad of the 1st platoon.";

-								next;

-								mes "Specific information can be searched within the article about the 3rd squad.";

-								set @godtemplib2,1;

-								close;

-							}

-								else if((@str$ == "The 3rd squad" || @str$ == "the 3rd squad" || @str$ == "The third squad") && @godtemplib2)

-								{

-									mes "- search with the keyword : " + @str$ + " -";

-									mes "The 3rd squad : Crusaders.";

-									mes "Member list who participated in ^0000FFthe last mission^000000.";

-									next;

-									mes "^0000FF : Rebarev Doug";

-									mes " : Jack O";

-									mes " : Zan.Huadoku";

-									mes " : Cuaque Donon";

-									mes " : Emma Searth";

-									mes " : Royal Myst";

-									mes " : The Nineball^000000";

-									set @godtemplib3,1;

-									if(god_eremes == 17)set god_eremes,18;

-									close;

-								}

-									else if((@str$ == "The last mission" || @str$ == "the last mission") && @godtemplib3)

-									{

-										mes "- search with the keyword : " + @str$ + " -";

-										mes "The upper part decided to disband the 3rd squad which was the best search party of the crusader force after the following mission.";

-										next;

-										mes "The 3rd squad was secretly assigned to track down ^0000FFthe signs of God^000000 under a command from the royal court.";

-										next;

-										mes "During the mission, an unexpected incident happened.";

-										mes "A member started second guessing the squad leader's leadership and ^0000FFacting on his own authority^000000.";

-										next;

-										mes "It resulted in a factional dispute. In order to solve the problem, the leader held a meeting with the others.";

-										mes "Based on other's opinions, the squad leader concluded the member's behaviour as ^0000FFinsubordination^000000,";

-										next;

-										mes "and he and other members did a physical punishment onto the member. The member was reported to be injured and dropped from the squad during the mission.";

-										next;

-										mes "Due to this disgraceful incident, the 3rd squad could not complete the mission.";

-										mes "And because of the unsatisfying mission result, the 3rd squad leader was pressed hard by the 1st platoon leader and the 3rd company commendant.";

-										next;

-										mes "The 3rd company commandant proposed disband of the 3rd squad to upper hierarchy and his proposal was accepted.";

-										mes "After the 3rd squad was disbanded, the members including the squad leader were sent to diciplinary retraining for 3 moths. After that retraining, all of them were transfered to the other squad.";

-										next;

-										mes "Currently Rebarev Doug who was the 3rd squad leader at the time have been researching the signs of God based on the mission result.";

-										mes "And the research was ordered by the King of Rune-Midgarts Kingdom.";

-										close2;

-										if(god_eremes == 18)set god_eremes,19;

-										end;

-									}

-

-						else if((@str$ == "The 1st platoon" || @str$ == "the 1st platoon" || @str$ == "The first platoon") && @godtemplib4)

-							{

-							mes "- search with the keyword : " + @str$ + " -";

-							mes "The 1st platoon : The 1st platoon of the 3rd company, Crusaders.";

-							mes "Each company consists of 4 platoons and this is the first of the four.";

-							next;

-							mes "The 1st platoon of the 1st company, Crusader force.";

-							mes "Suggested to search 'Company' a higher rank keyword.";

-							next;

-							mes "Other information is confidential, cannot be searched on this document.";

-							close;

-							}

-						else if((@str$ == "The 3rd squad" || @str$ == "the 3rd squad" || @str$ == "The third squad") && @godtemplib1) 

-							{

-							mes "- search with the keyword : " + @str$ + " -";

-							mes "The 3rd squad : Crusaders.";

-							mes "Each platoon consists of 4 squads and this is the third of the four.";

-							mes "Suggested to search 'Platoon' a higher rank keyword.";

-							next;

-							mes "Generally a squad has 8 members within.";

-							mes "Other information is confidential, cannot be searched on this document.";

-							close;

-							}

-						else if(@str$ == "The last mission" || @str$ == "the last mission") 

-						{

-							mes "- search with the keyword : " + @str$ + " -";

-							mes "- No result has been found.-";

-							mes "- Suggested to enter a specific name of the force for a better research.-";

-							close;

-						}

-					else if((@str$ == "Crusader" || @str$ == "crusader") && @godtemplib4)

-					{

-							mes "- search with a keyword : " + @str$ + " -";

-							mes "The 3rd company : Crusaders.";

-							mes "The 3rd comany is known as organized with the best members of crusaders,";

-							mes "there have been no report regarding the personnel in&out record of this company. However,";

-							next;

-							mes "The 3rd squad in the 1st platoon of the 3rd comany was an exception of that case,";

-							mes "the members of the 1st squad were all retired or transfered to other forces.";

-							mes "Specific information can be searched within the article about the 1st platoon.";

-							close;

-					}

-					else if(@str$ == "The 1st platoon" || @str$ == "the 1st platoon" || @str$ == "The first platoon")

-					{

-						mes "- search with the keyword : " + @str$ + " -";

-						mes "The 1st platoon : ";

-						mes "- No result has been found.-";

-						mes "- Suggested to enter a more specific keyword.-";

-						close;

-					}

-					else if(@str$ == "The 3rd squad" || @str$ == "the 3rd squad" || @str$ == "The third squad")

-					{

-						mes "- search with the keyword : " + @str$ + " -";

-						mes "The 3rd company : ";

-						mes "- No result has been found.-";

-						mes "- Suggested to enter a more specific keyword.-";

-						close;

-					}

-					else if((@str$ == "The last mission" || @str$ == "the last mission") && god_eremes > 17) // ¸¶Áö¸· ÀÓ¹«

-					{

-						mes "- search with the keyword : " + @str$ + " -";

-						mes "- No result has been found.-";

-						mes "- Suggested to enter a specific name of the force for a better research.-";

-						next;

-						close;

-					}

-					else if(@str$ == "Rebarev Doug")

-					{

-						mes "- search with the keyword : " + @str$ + " -";

-						mes "The former leader of the 3rd squad in the 1st platoon of the 3rd company.";

-						mes "Has been in service as an instructor of crusader boot camp with the Prontera Castle.";

-						mes "Also he's in charge of a research under a command from the royal court.";

-						close;

-					}

-					else if(@str$ == Egnigem)

-					{

-						mes "- search with the keyword : " + @str$ + " -";

-						mes "No result has been found.";

-						mes "No result has been found.";

-						mes "No result has been found.";

-						mes "No result has been found.";

-						mes "No result has been found.";

-						mes "No result has been found.";

-						mes "^FF0000This word is prohibited to research.^000000";

-						close;

-					}

-					else if(@str$ == "Zan.Huadoku")

-					{

-						mes "- search with the keyword : " + @str$ + " -";

-						mes "The former member of the 3rd squad in the 1st platoon of the 3rd company.";

-						mes "Has been in service as a weapon quartermaster in Geffen ever since the squad was disbanded.";

-						mes "Current location : Blacksmith guild, Geffen.";

-						close;

-					}

-					else if(@str$ == "Cuaque Donon")

-					{

-						mes "- search with the keyword : " + @str$ + " -";

-						mes "The former member of the 3rd squad in the 1st platoon of the 3rd company.";

-						mes "Retired from service and went back to his home town, Morroc ever since the squad was disbanded.";

-						mes "Reported to work for an inn in Morroc.";

-						close;

-					}

-					else if(@str$ == "Jack O")

-					{

-						mes "- search with the keyword : " + @str$ + " -";

-						mes "The former member of the 3rd squad in the 1st platoon of the 3rd company.";

-						mes "Has been in service as a recruiting officer in Alberta ever since the squad was disbanded.";

-						mes "Current location : Near Alberta port.";

-						close;

-					}

-					else if(@str$ == "Emma Searth")

-					{

-						mes "- search with the keyword : " + @str$ + " -";

-						mes "The former member of the 3rd squad in the 1st platoon of the 3rd company.";

-						mes "Retired from service and went to Al De Baran to do something different ever since the squad was disbanded.";

-						mes "Reported to submit a resume to the Kafra corporation.";

-						close;

-					}

-					else if(@str$ == "Royal Myst")

-					{

-						mes "- search with the keyword : " + @str$ + " -";

-						mes "The former member of the 3rd squad in the 1st platoon of the 3rd company.";

-						mes "Has been in service in Comodo ever since the squad was disbanded.";

-						mes "Current duty is unknown.";

-						mes "Current lcation : A casino in Comodo.";

-						close;

-					}

-					else if(@str$ == "The Nineball")

-					{

-						mes "- search with the keyword : " + @str$ + " -";

-						mes "The former member of the 3rd squad in the 1st platoon of the 3rd company.";

-						mes "Has been in service as the security officer of Jawaii ever since the squad was disbanded.";

-						mes "Current location : A tavern in Jawaii.";

-						close;

-					}

-					else

-					{

-						mes "- search with the keyword : " + @str$ + " -";

-						mes "- No result has been found.-";

-						close;

-					}

-				break;

-

-				case 2:

-					mes "- Search magic is being shut down.-";

-					next;

-					mes "- There is no response from the search magic.-";

-					mes "- Would you like to shut down immediately?-";

-					next;

-					mes " - If you shut down without properly closing the magic -";

-					mes "- there is a high possibility to damage unsaved data. -";

-					next;

-					mes "- ... -";

-					next;

-					mes "- ...... -";

-					next;

-					mes "- ........search magic is being shut down. -";

-					close;

-				break;

-

-				case 3:

-					mes "[Librarian Jekan]";

-					mes "You can tell our government doesn't really know how to allocate its funds and resources.";

-					next;

-					mes "[Librarian Jekan]";

-					mes "First, there's Jawaii. Do newlyweds really need an entire island for themselves? Then again, I am single so I'm probably biased.";

-					next;

-					mes "[Librarian Jekan]";

-					mes "And look at me. Geniuses aren't supposed to waste their precious time doing useless things for libraries!";

-					close;

-				break;

-			}

-	}

-	else

-	{

-		mes "[Librarian Jekan]";

-		mes "Ah, please do not touch any books in that section. ...I'm sure there's nothing there that could be useful to you.";

-		next;

-		switch( select( "Ignore him and check books.", "Step back." ) )

-		{

-			case 1:

-				mes "[Librarian Jekan]";

-				mes "Hey...!";

-				mes "I thought I said";

-				mes "not to touch those!";

-				close2;

-				warp "prontera.gat",120,264;

-				end;

-			break;

-

-			case 2:

-				mes "[Librarian Jekan]";

-				mes "Thank you. Feel free to browse through the other sections.";

-				next;

-				mes "[Librarian Jekan]";

-				mes "It's really nice to have visitors in the Library, especially when so many people don't read books nowadays.";

-				close;

-			break;

-		}

-	}

-}

-else

-{

-	mes "[Librarian Jekan]";

-	mes "Ah, please do not touch any books in that section.";

-	mes "....there is nothing much useful for you there.";

-	next;

-	switch( select( "Ignore him and check books.", "Step back." ) )

-	{

-		case 1:

-			mes "[Librarian Jekan]";

-			mes "I told you not to touch books there!";

-			close2;

-			warp "prontera.gat",120,264;

-			end;

-		break;

-

-		case 2:

-			mes "[Librarian Jekan]";

-			mes "Good, you may go check other sections though.";

-			mes "It's good to see a man visiting a library when people don't read books nowadays.";

-			close;

-		break;

-	}

-}

-

-}

-

-geffen_in.gat,109,161,3	script	Crusader#God1	751,{

-

-if($God1 > 49 && $God2 < 100)

-{

-	if(god_eremes > 17 && god_megin_1 < 2)

-	{

-		mes "[Zan.Huadoku]";

-		mes "^333333*Phew...*^000000";

-		mes "This work is really getting to me. Going on a mission with my war buddies sounds a lot better than this.";

-		next;

-		mes "[Zan.Huadoku]";

-		mes "At least in those days, I felt like I was actually doing something useful!";

-		next;

-		mes "[Zan.Huadoku]";

-		mes "Hey...";

-		mes "Can I help you";

-		mes "with anything?";

-		next;

-		switch( select( "Ask him about the 3rd squad.", "Ask him how he's been doing.", "Ask him about the 3rd Squad's last mission." ) )

-		{

-			case 1:

-				if(god_eremes == 18)

-				{

-					mes "[Zan.Huadoku]";

-					mes "Yeah, I was a member of the 3rd squad in the 1st platoon a long time ago. How did you know that?";

-					next;

-					mes "[Zan.Huadoku]";

-					mes "I miss the guys back in the squad. I wonder how our leader's been doing recently...";

-					next;

-					mes "^3355FFYou tell Zan about Rebarev Doug, and about how he is now an instructor for Crusader Boot Camp. He seems to be absorbed in his thoughts of the past.^000000";

-					close;

-				}

-				else if(god_eremes > 18)

-				{

-					mes "[Zan.Huadoku]";

-					mes "Yeah, I was a member of the 3rd squad in the 1st platoon a long time ago. How did you know that?";

-					next;

-					mes "[Zan.Huadoku]";

-					mes "I miss the guys back in the squad. I wonder how our leader's been doing recently...";

-					next;

-					mes "^3355FFYou tell Zan about Rebarev Doug, and about how he is now an instructor for Crusader Boot Camp. He seems to be absorbed in his thoughts of the past.^000000";

-					next;

-					mes "[Zan.Huadoku]";

-					mes "...";

-					mes "......";

-					next;

-					mes "[Zan.Huadoku]";

-					mes "Before we went out on our last mission, the seven of us were like brothers and sisters. If ^FF0000he^000000 didn't disobey the order, we'd still be together today.";

-					next;

-					mes "[Zan.Huadoku]";

-					mes "Wait, what was his name...? That's weird. There's no way I could forget something like that...";

-					next;

-					mes "[Zan.Huadoku]";

-					mes "H-how can I not remember his name! He's the reason my life is...!";

-					next;

-					mes "[Zan.Huadoku]";

-					mes "^333333*Groan...*^000000";

-					mes "I.... My head...";

-					mes "My head hurts...";

-					next;

-					mes "[Zan.Huadoku]";

-					mes "^3355FFZan looks very confused and his eyes begin to glaze with a dazed look. You try speaking to him again, but he doesn't respond at all.^000000";

-					if(!god_megin_1)set god_megin_1,1;

-					close;

-				}

-			break;

-

-			case 2:

-				mes "[Zan.Huadoku]";

-				mes "How am I been doing?";

-				mes "Well, I work for the Blacksmith Guild, picking out good weapons to supply the Crusaders.";

-				next;

-				mes "[Zan.Huadoku]";

-				mes "Sometimes, I get really bored with what I'm doing. I keep trying to convince myself that my job's important to future Crusaders, but...";

-				next;

-				mes "[Zan.Huadoku]";

-				mes "You know what? A lot of people have been asking me weird questions about me recently. I feel like I'm getting spied on, but maybe I'm just getting paranoid.";

-				close;

-			break;

-

-			case 3:

-				if(god_eremes == 18)

-				{

-					mes "[Zan.Huadoku]";

-					mes "Yeah, on our";

-					mes "final mission...";

-					next;

-					mes "[Zan.Huadoku]";

-					mes "Final...? What the? I know it happened, but for some reason, all I can envision is a complete blank when I try to think about it.";

-					next;

-					mes "[Zan.Huadoku]";

-					mes "I...";

-					mes "I guess I need something to remind me? I know it happened, but... I'm so confused.";

-					next;

-					mes "^3355FFZan seems to be having a very difficult time recalling that specific memory of his past.^000000";

-					close;

-				}

-				else if(god_eremes > 18 && god_megin_1 > 0)

-				{

-					mes "[Zan.Huadoku]";

-					mes "The last mission...";

-					next;

-					mes "[Zan.Huadoku]";

-					mes "Umm...I cannot recall any memory about the mission...maybe I need a clue.";

-					next;

-					mes "- He seemed to have a hard time to remember something. -";

-					next;

-					mes "- You started telling him what you have read from the document.-";

-					next;

-					mes ".....";

-					next;

-					mes "The upper part decided to disband the 3rd squad which was the best search party of the crusader force after the following mission.";

-					next;

-					mes "The 3rd squad was secretly assigned to track down ^0000FFthe signs of God^000000 under a command from the royal court.";

-					next;

-					mes "During the mission, an unexpected incident happened.";

-					mes "A member started second guessing the squad leader's leadership and ^0000FFacting on his own authority^000000.";

-					next;

-					mes "It resulted in a factional dispute. In order to solve the problem, the leader held a meeting with the others.";

-					mes "Based on other's opinions, the squad leader concluded the member's behaviour as ^0000FFinsubordination^000000,";

-					next;

-					mes "and he and other members did a physical punishment onto the member. The member was reported to be injured and dropped from the squad during the mission.";

-					next;

-					mes "Due to this disgraceful incident, the 3rd squad could not complete the mission.";

-					mes "And because of the unsatisfying mission result, the 3rd squad leader was pressed hard by the 1st platoon leader and the 3rd company commendant.";

-					next;

-					mes "The 3rd company commandant proposed disband of the 3rd squad to upper hierarchy and his proposal was accepted.";

-					mes "After the 3rd squad was disbanded, the members including the squad leader were sent to diciplinary retraining for 3 moths. After that retraining, all of them were transfered to the other squad.";

-					next;

-					mes "Currently Rebarev Doug who was the 3rd squad leader at the time have been researching the signs of God based on the mission result.";

-					mes "And the research was ordered by the King of Rune-Midgarts Kingdom.";

-					next;

-					mes ".....................";

-					next;

-					mes "............";

-					next;

-					mes ".....";

-					next;

-					mes "[Zan.Huadoku]";

-					mes "Y-yeah that's right! And then three days after we started the mission, we found some kind of...";

-					next;

-					mes "[Zan.Huadoku]";

-					mes "Well, I'm not sure what it was. But we found an ^0000FFunknown fragment^000000 that was a sign from God! And then...!";

-					next;

-					mes "[Zan.Huadoku]";

-					mes "And then...";

-					mes "Oh. Oh God.";

-					mes "I can't remember...";

-					next;

-					mes "[Zan.Huadoku]";

-					mes "I can't think about anything further than that. I can't even remember what we found. But I'm sure it was damned important.";

-					next;

-					mes "^3355FFZan stood still in silence, with a pained look on his face.^000000";

-					if(god_megin_1 == 1)set god_megin_1,2;

-					close;

-				}

-				else

-				{

-					mes "[Zan.Huadoku]";

-					mes "The last mission...";

-					next;

-					mes "[Zan.Huadoku]";

-					mes "Umm...I cannot recall any memory about the mission...maybe I need a clue.";

-					next;

-					mes "- He seemed to have a hard time to remember something. -";

-					close;

-				}

-			break;

-		}

-	}

-	else if(god_megin_1 > 1 && god_megin_1 < 3)

-	{

-		mes ".....................";

-		next;

-		mes "............";

-		next;

-		mes ".....";

-		next;

-		mes "[Zan.Huadoku]";

-		mes "I recalled something.";

-		mes "3 days later from the day we started our mission, we found ^0000FFan unknown fragment^000000 that was a sign of God!";

-		mes "And then...";

-		mes "And then...";

-		mes "And then...";

-		next;

-		mes "[Zan.Huadoku]";

-		mes "I am sorry...I cannot remember more than that...";

-		mes "I cannot even remember what it was that we found...";

-		mes "I have been suffering ^0000FFever since the 3 months^000000 later...";

-		next;

-		mes "- He stood still with a painful look on his face.-";

-		set god_megin_1,3;

-		close;

-	}

-	else if(god_megin_1 > 2)

-	{

-		mes "^3355FFGrabbing his head, tearing his hair and writhing in Agony, Zan kept repeating the same words over and over again...^000000";

-		next;

-		mes "[Zan.Huadoku]";

-		mes "3 days later! We f-found some ^0000FFfragment^000000! It was G-God's sign! But why can't I remember?! Why?!";

-		close;

-	}

-	else

-	{

-		mes "[Zan.Huadoku]";

-		mes "Hey yo.";

-		mes "Can I help you?";

-		close;

-	}

-}

-else

-{

-	mes "[Zan.Huadoku]";

-	mes "Good day!";

-	mes "Do you know the";

-	mes "importance of supply?";

-	next;

-	switch( select( "No.", "Yes!" ) )

-	{

-		case 1:

-			mes "[Zan.Huadoku]";

-			mes "Any military force or party needs their supplies to be replenished if they are to continue battling for a prolonged period of time.";

-			next;

-			mes "[Zan.Huadoku]";

-			mes "For instance, let's say your group go on hunting without a healer. In this case, everyone would consume health restoration items, like potions.";

-			next;

-			mes "[Zan.Huadoku]";

-			mes "Since you can only carry so many items at once, you'll eventually run out of potions.";

-			next;

-			mes "[Zan.Huadoku]";

-			mes "But if one of your party members traveled between town and the hunting area, he could supply your party with new healing items.";

-			next;

-			mes "[Zan.Huadoku]";

-			mes "Supplying your party in this way would let you hunt with less worry. For that duty, the Merchant class would be the best by using their Carts.";

-			next;

-			mes "[Zan.Huadoku]";

-			mes "I suppose that's why I'm working here in the Blacksmith Guild. As weapon quartermaster, I'm obligated to provide supplies for the Crusader forces.";

-			next;

-			mes "[Zan.Huadoku]";

-			mes "The Blacksmiths in this guild also help me provide high quality weapons for the Crusades as well.";

-			next;

-			mes "[Zan.Huadoku]";

-			mes "If you happen to run out of health items while hunting, why don't you ask a Merchant for help?";

-			next;

-			mes "[Zan.Huadoku]";

-			mes "Most likely, they will have some spare items and would be willing to share with you if you ask nicely enough.";

-			next;

-			mes "[Zan.Huadoku]";

-			mes "I hope to see you later again! May Odin protect you on your journeys.";

-			close;

-		break;

-

-		case 2:

-			mes "[Zan.Huadoku]";

-			mes "Oh...";

-			mes "Well then.";

-			mes "In that case.";

-			next;

-			mes "[Zan.Huadoku]";

-			mes "Let me tell you about some useful knowledge I learned while working with the Blacksmiths.";

-			next;

-			mes "[Zan.Huadoku]";

-			mes "A Blacksmith character's forging skills are affected by the DEX and LUK stats. DEX and LUK also affect the item creation skills for Alchemists.";

-			next;

-			mes "[Zan.Huadoku]";

-			mes "Since I've been staying here in the Blacksmith guild, I'm trying to better understand Blacksmiths and develop a deeper appreciation of their work.";

-			next;

-			mes "[Zan.Huadoku]";

-			mes "Alright then...";

-			mes "Take it easy.";

-			close;

-		break;

-	}

-}

-

-}

-

-morocc_in.gat,146,179,0	script	Employee#God1	66,{

-

-if($God1 > 49 && $God2 < 100)

-{

-	if(god_eremes > 17 && god_megin_2 < 1)

-	{

-		mes "^3355FFThe Inn Employee eyes you suspiciously.^000000";

-		next;

-		mes "[Inn Employee]";

-		mes "May I help you?";

-		next;

-		mes "[Inn Employee]";

-		mes "Excuse me.";

-		mes "How can I help you?";

-		next;

-		input @str$;

-		if (@str$ == "Cuaque Donon" || @str$ == "Cuaque" || @str$ == "Donon")

-		{

-			mes "[" + strcharinfo(0) + "]";

-			mes "Do you happen to know a person named " + @str$ + " ...?";

-			if (god_eremes == 18)

-			{

-				mes "[Inn Employee]";

-				mes "I don't think I know that person. I guess that guy left before I started working here, maybe?";

-				close;

-			}

-			else if(god_eremes > 18)

-			{

-				next;

-				mes "^3355FFOnce you said that name, she immediately drew closer to you and began speaking in a low, threatening tone.^000000";

-				next;

-				mes "[Scary Inn Employee]";

-				mes "Who the hell are you? If you try anything funny, I'll rip your heart out!";

-				next;

-				mes "[Ms. Scary Inn Employee]";

-				mes "Why are you so curious?! Are you one of them?! How the hell did you find me?!";

-				next;

-				switch( select( "Rebarev Doug is wondering about you.", "I am wondering why he's hiding.", "Just a curiosity." ) )

-				{

-					case 1:

-						if(rand(1,10) > 3)

-						{

-							mes "[Ms. Scary Inn Employee]";

-							mes "Hah!...yeah, I was told thousand times about that.";

-							mes "That old must be afraid of the rumor spreaded to public...";

-							mes "...he must be that desperate to send men to find me.";

-							next;

-							mes "[Ms. Scary Inn Employee]";

-							mes "However!";

-							mes "I am not in the mood for guiding you to him today!";

-							next;

-							mes "- As she released the grip of a sword, -";

-							mes "- she hit you with might by the nape of your neck. -";

-							close2;

-							percentheal -100,0;

-							end;

-						}

-						else

-						{

-							mes "[Ms. Scary Inn Employee]";

-							mes "Hah!...yeah, I was told thousand times about that.";

-							mes "That old must be afraid of the rumor spreaded to public...";

-							mes "...he must be that desperate to send men to find me.";

-							next;

-							mes "[Ms. Scary Inn Employee]";

-							mes "Okay, I think it's the time to give out a hint to the old dog. But, you got only one chance to listen to me.";

-							next;

-							mes "- She whispered to your ears.-";

-							mes "^0000FFAragham never hoarded upgrade items.^000000";

-							set god_megin_2,1;

-							close;

-						}

-					break;

-

-					case 2:

-						if(rand(1,10) > 4)

-						{

-							mes "[Ms. Scary Inn Employee]";

-							mes "Bah...since you are here, that means you know why he has hid himself in here.";

-							mes "I cannot trust you as I saw you lying.";

-							next;

-							mes "[Ms. Scary Inn Employee]";

-							mes "It's the time to go to bed!";

-							mes "I am not in the mood for guiding you to him today!";

-							next;

-							mes "- As she released the grip of a sword, -";

-							mes "- she hit you with might by the nape of your neck. -";

-							close2;

-							percentheal -100,0;

-						}

-						else

-						{

-							mes "[Ms. Scary Inn Employee]";

-							mes "Bah...since you are here, that means you know why he has hid himself in here.";

-							mes "You're a sly dog, aren't you?";

-							next;

-							mes "[Ms. Scary Inn Employee]";

-							mes "Well, I don't think a hint will do any harm. Somehow you don't look that dangerous.";

-							next;

-							mes "- She whispered to your ears.-";

-							mes "^0000FFAragham never hoarded upgrade items.^000000";

-							set god_megin_2,1;

-							close;

-						}

-					break;

-

-					case 3:

-						if (rand(1,10) > 3)

-						{

-							mes "[Ms. Scary Inn Employee]";

-							mes "Just a curiosity? Hahaha!";

-							mes "You have a lot of guts, don't you?";

-							next;

-							mes "[Ms. Scary Inn Employee]";

-							mes "I am sorry to tell you this...but";

-							next;

-							mes "[Ms. Scary Inn Employee]";

-							mes "You are the type of a man that";

-							mes "I hate the most!";

-							next;

-							mes "- As she released the grip of a sword, -";

-							mes "- she hit you with might by the nape of your neck. -";

-							close2;

-							percentheal -100,0;

-							end;

-						}

-						else

-						{

-							mes "[Ms. Scary Inn Employee]";

-							mes "Just a curiosity? Hahaha!";

-							mes "You have a lot of guts, don't you?";

-							next;

-							mes "[Ms. Scary Inn Employee]";

-							mes "Oh well, sometimes that can be looked as cute.";

-							mes "Listen to me well, I am giving you only one chance.";

-							next;

-							mes "- She whispered to your ears.-";

-							mes "^0000FFAragham never hoarded upgrade items.^000000";

-							set god_megin_2,1;

-							close;

-						}

-					break;

-				}

-			}

-		}

-		else

-		{

-			mes "[Inn Employee]";

-			mes "......?";

-			mes "I am sorry but I think you misunderstood something here.";

-			close;

-		}

-	}

-	else if(god_megin_2 > 0)

-	{

-		mes "[Inn Employee]";

-		mes "How can I help you?";

-		next;

-		mes "[Inn Employee]";

-		mes "Welcome to the inn.";

-		mes "When you move to the entrance, you can also enter a PvP zone though a PvP doorman.";

-		next;

-		mes "[Inn Employee]";

-		mes "Usually you can visit inns in big towns.";

-		mes "If you want to take some rest or to compete your power with others, this is the place where you come.";

-		next;

-		mes "- She welcomed you with professional manner as though there was nothing happened. -";

-		close;

-	}

-	else

-	{

-		mes "[Inn Employee]";

-		mes "How can I help you?";

-		next;

-		mes "[Inn Employee]";

-		mes "Welcome to the inn.";

-		mes "When you move to the entrance, you can also enter a PvP zone though a PvP doorman.";

-		next;

-		mes "[Inn Employee]";

-		mes "Usually you can visit inns in big towns.";

-		mes "If you want to take some rest or to compete your power with others, this is the place where you come.";

-		close;

-	}

-}

-else

-{

-	mes "[Inn Employee]";

-	mes "How can I help you?";

-	next;

-	mes "[Inn Employee]";

-	mes "Welcome to the inn.";

-	mes "When you move to the entrance, you can also enter a PvP zone though a PvP doorman.";

-	next;

-	mes "[Inn Employee]";

-	mes "Usually you can visit inns in big towns.";

-	mes "If you want to take some rest or to compete your power with others, this is the place where you come.";

-	next;

-	mes "[Inn Employee]";

-	mes "Oh, also I have a secret to tell you...";

-	mes "I was told that the inn master is planning some kind of shady business.";

-	next;

-	mes "[Inn Employee]";

-	mes " - I think it was called as 'the rest project for all' or something...";

-	next;

-	mes "[Inn Employee]";

-	mes "But don't tell anyone that I told you this, please!";

-	close;

-}

-

-}

-

-in_rogue.gat,243,61,0	script	Suspicious Man#God	748,{

-

-	if($God1 > 49 && $God2 < 100)

-{

-		if(god_eremes == 18)

-	{

-		mes "[Cuaque Donon]";

-		mes "Wha...what are you! How the hell did you come in here!";

-		mes "Get away, get away from me!";

-		mes "Geeeet awwwway!";

-		close;

-	}

-		else if(god_eremes > 18)

-	{

-			if(god_megin_2 > 0 && god_megin_2 < 4)

-		{

-			mes "[Cuaque Donon]";

-			mes "Wha...what are you! How the hell did you come in here!";

-			mes "Get away, get away from me!";

-			mes "Geeeet awwwway!";

-			next;

-			mes "- You tried your best to make him calm down and told him what you have found from the document.-";

-			next;

-				if (countitem(740) > 0 || countitem(741) > 0 || countitem(742) > 0 || countitem(743) > 0 || countitem(750) > 0 || countitem(751) > 0 || countitem(752) > 0 || countitem(753) > 0 || countitem(754) > 0 || countitem(7206) > 0 || countitem(7212) > 0)

-			{

-				mes "- You pulled out a doll and used it as though it spoke to him a story. -";

-			}

-				else

-			{

-				mes "The upper part decided to disband the 3rd squad which was the best search party of the crusader force after the following mission.";

-				next;

-				mes "The 3rd squad was secretly assigned to track down ^0000FFthe signs of God^000000 under a command from the royal court.";

-				next;

-				mes "During the mission, an unexpected incident happened.";

-				mes "A member started second guessing the squad leader's leadership and ^0000FFacting on his own authority^000000.";

-				next;

-				mes "It resulted in a factional dispute. In order to solve the problem, the leader held a meeting with the others.";

-				mes "Based on other's opinions, the squad leader concluded the member's behaviour as ^0000FFinsubordination^000000,";

-				next;

-				mes "and he and other members did a physical punishment onto the member. The member was reported to be injured and dropped from the squad during the mission.";

-				next;

-				mes "Due to this disgraceful incident, the 3rd squad could not complete the mission.";

-				mes "And because of the unsatisfying mission result, the 3rd squad leader was pressed hard by the 1st platoon leader and the 3rd company commendant.";

-				next;

-				mes "The 3rd company commandant proposed disband of the 3rd squad to upper hierarchy and his proposal was accepted.";

-				mes "After the 3rd squad was disbanded, the members including the squad leader were sent to diciplinary retraining for 3 moths. After that retraining, all of them were transfered to the other squad.";

-				next;

-				mes "Currently Rebarev Doug who was the 3rd squad leader at the time have been researching the signs of God based on the mission result.";

-				mes "And the research was ordered by the King of Rune-Midgarts Kingdom.";

-				next;

-				mes "-You must find something that can make him calm down.-";

-				next;

-				mes "- As you saw him acting like a child, it would be a good idea to bring something that is attractive to children. -";

-				close;

-			}

-

-			next;

-			mes "- He was nodded his head and chewing his finger happily just like children do when they're happy. -";

-			next;

-			mes "- He seemed to be fine enough to be asked few questions.-";

-			next;

-				switch( select( "Ask him about the inn maid.", "Ask him how he's been doing.", "Ask him about the last mission of the 3rd squad." ) )

-			{

-				case 1:

-					mes "[Cuaque Donon]";

-					mes "She...she's my sister.";

-					mes "And she's also a rogue.";

-					mes "When I was retired from service....";

-					next;

-					mes "[Cuaque Donon]";

-					mes ".................";

-					next;

-					mes "[Cuaque Donon]";

-					mes "My family always expected more than I could do from me ever since I was born.";

-					mes "That was why I volunteered to be a crusader.";

-					mes "Crusader is not only a highly respectable but also a well-paying job...";

-					mes "And I was retired from service.";

-					next;

-					mes "[Cuaque Donon]";

-					mes "My sister was so upset at me...at that time.";

-					mes "She is the only one I have...she was so upset";

-					mes "at the fact that I messed up...";

-					next;

-					mes "[Cuaque Donon]";

-					mes "And she got me a job in the inn";

-					mes "even after yelling at me that I am worthless, she got me a job anyway.";

-					next;

-					mes "[Cuaque Donon]";

-					mes "Since when, I have noticed that there have been many people visiting me for some reason.";

-					mes "It seemed they wanted something from me...awwwwwwwwwww....my head..! My head is hurt!";

-					next;

-					mes "[Cuaque Donon]";

-					mes "...I don't know what I have said to them.";

-					mes "They were all excited at what I said and they tried to hurt me.";

-					next;

-					mes "[Cuaque Donon]";

-					mes "So, she hid me here.";

-					mes "But, I am so bored to be alone. A guy in the downstairs always do nothing but yelling at me...";

-					mes "He always yells at me to leave.";

-					next;

-					mes "[Cuaque Donon]";

-					mes "Even the rogue guild where my sister is in sometimes come to listen to me.";

-					mes "And they are always excited just like the others and yell at me to say something I am supposed to know.";

-					next;

-					mes "[Cuaque Donon]";

-					mes "I am telling you, I cannot remember anything!";

-					mes "I know this place is safe from those dangerous people.";

-					next;

-					mes "[Cuaque Donon]";

-					mes "She is the only one I have now...still I don't want her to be upset at me.";

-					next;

-					mes "[Cuaque Donon]";

-					mes "She said I must tell the rogue guild guys what I know...otherwise they will not protect her and me any longer.";

-					mes "She looked sad when she sad that...";

-						if (god_megin_2 == 2)

-					{

-						next;

-						mes "[Cuaque Donon]";

-						mes "Oh, I remember something.";

-						mes "She told me not to tell anyone but I am gonna tell you...";

-						next;

-						mes "- He whispered to your ears.-";

-						next;

-						mes "[Cuaque Donon]";

-						mes "She said...it seems rogue guild wants something from me.";

-						mes "So she's gonna send me good people that she trust and that can help me.";

-						next;

-						mes "[Cuaque Donon]";

-						mes "But still this is the safest place to stay for a while.";

-						mes "At the same time, I am always ready to run...";

-						set god_megin_2,3;

-						close;

-					}

-					close;

-				break;

-

-				case 2:

-					mes "[Cuaque Donon]";

-					mes "How have I been doing?";

-					mes "I am afraid of the people visiting me with purpose.";

-					next;

-					mes "[Cuaque Donon]";

-					mes "Rogue guild promised to protect me...but they scared the hell out of me sometimes by coming out of the floor without a warning.";

-					mes "Ah, and my sister said she's gonna complain to my ex boss about something.";

-					next;

-					mes "[Cuaque Donon]";

-					mes "She said I was okay before. But ever since I was retired from the service, I have acted strange...";

-					next;

-					mes "[Cuaque Donon]";

-					mes "But he doesn't want to meet my sister...that's what she said. So she's gonna ask a help to her rogue guild to spread some kind of rumors...";

-					mes "Like a rumor that anyone who volunteers to crusader through my ex boss will become retarded....";

-					next;

-					mes "[Cuaque Donon]";

-					mes "That's how I have been recently.";

-					if (god_megin_2 == 1) set god_megin_2,2;

-					close;

-				break;

-

-				case 3:

-					mes "[Cuaque Donon]";

-					mes "I don't know...I cannot remember it...";

-						if (god_megin_2 == 3)

-					{

-						next;

-						mes "[Cuaque Donon]";

-						mes "?!... Wait, I just remembered a thing...";

-						mes "I saw ^0000FFMegingjard^000000. That thing looked like a fragment of something, but I knew its name was Megingjard without being told.";

-						next;

-							if (rand(1,10) > 4)

-						{

-								switch( select( "^FF0000Megingjard^000000!", "^FFFFFFListen to him quitely^000000." ) )

-							{

-								case 1:

-									mes "[Cuaque Donon]";

-									mes "Waaaaaaaaaaaaahhhhhhh!";

-									mes "You are same as others! Go away from me!";

-									set god_megin_2,0;

-									close;

-								break;

-

-								case 2:

-									mes "[Cuaque Donon]";

-									mes "And...that night...I heard ^0000FFhe^000000 had an argue with the leader.";

-									mes "I was keeping a night watch and happened to hear thm arguing.";

-									next;

-									mes "[Cuaque Donon]";

-									mes "I cannot remember anything other than that.";

-									set god_megin_2,4;

-									close;

-								break;

-							}

-						}

-							else

-						{

-								switch( select( "^FF0000Megingjard^000000!", "^FFFFFFMegingjard!^000000.", "^FFFFFFListen to him quitely^000000" ) )

-							{

-								case 1:

-									mes "[Cuaque Donon]";

-									mes "Waaaaaaaaaaaaahhhhhhh!";

-									mes "You are same as others! Go away from me!";

-									set god_megin_2,0;

-									close;

-								break;

-

-								case 2:

-									mes "[Cuaque Donon]";

-									mes "Waaaaaaaaaaaaahhhhhhh!";

-									mes "You are same as others! Go away from me!";

-									set god_megin_2,0;

-									close;

-								break;

-								case 3:

-									mes "[Cuaque Donon]";

-									mes "And...that night...I heard ^0000FFhe^000000 had an argue with the leader.";

-									mes "I was keeping a night watch and happened to hear thm arguing.";

-									next;

-									mes "[Cuaque Donon]";

-									mes "I cannot remember anything other than that.";

-									set god_megin_2,4;

-									close;

-								break;

-							}

-						}

-					}

-					close;

-				break;

-			}

-		}

-			else if(god_megin_2 == 4)

-		{

-			mes "[Cuaque Donon]";

-			mes "And...that night...I heard ^0000FFhe^000000 had an argue with the leader.";

-			mes "I was keeping a night watch and happened to hear thm arguing.";

-			next;

-			mes "[Cuaque Donon]";

-			mes "I cannot remember anything other than that.";

-			next;

-			mes "[Cuaque Donon]";

-			mes "Sleepy...my head is hurting. I want to rest now...";

-			close;

-		}

-			else

-		{

-			mes "[Cuaque Donon]";

-			mes "Wha...what are you! How the hell did you come in here!";

-			mes "Get away, get away from me!";

-			mes "Geeeet awwwway!";

-			close;

-		}

-	}

-}

-	else

-{

-	mes "[Cuaque Donon]";

-	mes "Wha...what are you! How the hell did you come in here!";

-	mes "Wahhhhh! My head...my head is hurting so bad!";

-	mes "I am scared! I am scared!";

-	close;

-}

-

-}

-

-alberta.gat,196,146,0	script	Crusader#megin2	751,{

-

-	if ($God1 > 49 && $God2 < 100)

-{

-		if(god_eremes == 18)

-	{

-		mes "[Jack O]";

-		mes "^333333*Yawn...*^000000";

-		mes "It's quiet and boring, as per usual. Let's see if there's any Swordmen I can recruit today.";

-		next;

-		mes "[Jack O]";

-		mes "Eh...?";

-		next;

-			switch( select( "Ask him about Rebarev Doug.", "Ask him how he's been doing.", "Ask him about the last mission of the 3rd squad." ) )

-		{

-			case 1:

-				mes "[Jack O]";

-				mes "Ah! Yeah, our old leader back in the 3rd Squad. Heh. I haven't seen him since we were disbanded.";

-				close;

-			break;

-

-			case 2:

-				mes "[Jack O]";

-				mes "Me? Yeah, I'm always busy recruiting future Crusaders.";

-				mes "We always welcome Swordmen";

-				mes "of great ability!";

-				next;

-				mes "[Jack O]";

-				mes "How does it sound? Why don't you volunteer to become a Crusader?";

-				close;

-			break;

-

-			case 3:

-				mes "[Jack O]";

-				mes "Last mission?";

-				mes "Eh, I don't really remember it.";

-				close;

-			break;

-		}

-	}

-		else if(god_eremes > 18)

-	{

-			if (god_megin_3 == 0 || god_megin_3 == 1)

-		{

-			mes "[Jack O]";

-			mes "*yawn*...so boring.";

-			mes "Let's see...if there is any swordsman I can recruit...?";

-			next;

-			mes "[Jack O]";

-			mes "Umm...?";

-			next;

-				switch( select( "Ask him about Rebarev Doug.", "Ask him how he's been doing.", "Ask about 3rd Squad's final mission." ) )

-			{

-				case 1:

-						if (god_megin_3 == 1)

-					{

-						mes "[Jack O]";

-						mes "Ah right. Our old leader.";

-						mes "Now I remember: He was";

-						mes "a pretty self righteous jerk";

-						mes "now that I think about it!";

-						next;

-						mes "[Jack O]";

-						mes "Can you believe he used to say that ^0000FFno one is more religious than him in this world^000000?! That's egoism right there. And maybe insanity.";

-						next;

-						mes "[Jack O]";

-						mes "Anyway, everyone in the squad";

-						mes "took pride in their faith. When";

-						mes "you're having a rough time in the";

-						mes "real world, you depend on religion, you know?";

-						next;

-						mes "[Jack O]";

-						mes "Anyways, in the records about";

-						mes "our squad, it says that one of us was punished for insubordination, rebelling or something. That's";

-						mes "a complete lie.";

-						next;

-						mes "[Jack O]";

-						mes "During our final mission,";

-						mes "our old leader had a huge argument with one us over something we found. I remember it being some kind of godly artifact, but I can't clearly remember what it was.";

-						next;

-						mes "[Jack O]";

-						mes "Although there was an obvious dispute, I think it was our squad leader who was out of line.";

-						mes "I... I can't really say...";

-						next;

-						mes "[Jack O]";

-						mes "I can't for the life of me";

-						mes "remember how the guy who";

-						mes "argued with the squad leader";

-						mes "looked like. The higher-ups";

-						mes "musta did something to me...";

-						next;

-						mes "[Jack O]";

-						mes "Anyway, I know for sure that whatever that guy did, it wasn't insubordination. In fact, I think he might've been right!";

-						next;

-						mes "[Jack O]";

-						mes "That's all I can remember.";

-						mes "I better take some Green Herbs now. My head throbs like crazy whenever I think about that time.";

-						set god_megin_3,2;

-						close;

-					}

-						else

-					{

-						mes "[Jack O]";

-						mes "Ah! Yeah, our old leader back in the 3rd Squad. Heh. I haven't seen him since we were disbanded.";

-						close;

-					}

-				break;

-

-				case 2:

-					mes "[Jack O]";

-					mes "Me? Yeah, I'm not doing so bad. Keeping busy recruiting future Crusaders. We welcome all";

-					mes "Swordmen if they show potential~";

-					close;

-				break;

-

-				case 3:

-					mes "[Jack O]";

-					mes "Huh...?";

-					mes "Why would";

-					mes "you want to know?";

-					next;

-					mes "- You told him what you have found from the document. -";

-					next;

-					mes "^0000FFThe last mission of the 3rd squad^000000";

-					mes "The upper part decided to disband the 3rd squad which was the best search party of the crusader force after the following mission.";

-					next;

-					mes "The 3rd squad was secretly assigned to track down ^0000FFthe signs of God^000000 under a command from the royal court.";

-					next;

-					mes "During the mission, an unexpected incident happened.";

-					mes "A member started second guessing the squad leader's leadership and ^0000FFacting on his own authority^000000.";

-					next;

-					mes "It resulted in a factional dispute. In order to solve the problem, the leader held a meeting with the others.";

-					mes "Based on other's opinions, the squad leader concluded the member's behaviour as ^0000FFinsubordination^000000,";

-					next;

-					mes "and he and other members did a physical punishment onto the member. The member was reported to be injured and dropped from the squad during the mission.";

-					next;

-					mes "Due to this disgraceful incident, the 3rd squad could not complete the mission.";

-					mes "And because of the unsatisfying mission result, the 3rd squad leader was pressed hard by the 1st platoon leader and the 3rd company commendant.";

-					next;

-					mes "The 3rd company commandant proposed disband of the 3rd squad to upper hierarchy and his proposal was accepted.";

-					mes "After the 3rd squad was disbanded, the members including the squad leader were sent to diciplinary retraining for 3 moths. After that retraining, all of them were transfered to the other squad.";

-					next;

-					mes "Currently Rebarev Doug who was the 3rd squad leader at the time have been researching the signs of God based on the mission result.";

-					mes "And the research was ordered by the King of Rune-Midgarts Kingdom.";

-					next;

-					mes "^3355FFAs he listened to the record of the 3rd Squad, Jack O looked a little confused.^000000";

-					next;

-					mes "[Jack O]";

-					mes "Huh...?";

-					mes "I might not be able to remember";

-					mes "a whole lot from back then, but the part about ^0000FFinsubordination^000000 can't be right. I'm sure of that.";

-					if (god_megin_3 == 0) set god_megin_3,1;

-					close;

-				break;

-			}

-		}

-			else if (god_megin_3 == 2)

-		{

-			mes "[Jack O]";

-			mes "Our old leader was";

-			mes "so arrogant to the point";

-			mes "of being a little off his rocker.";

-			next;

-			mes "[Jack O]";

-			mes "I mean, normal people";

-			mes "don't say things like '^0000FFI am the most religious man in the universe! Kneel before me!^000000' Yeah. Not a normal thing to say.";

-			next;

-			mes "[Jack O]";

-			mes "Anyway, if the squad";

-			mes "leader punished anyone for insubordination, I'm sure that it was unwarranted. I don't remember too much, but I'm sure of that.";

-			next;

-			mes "[Jack O]";

-			mes "Excuse me, I need to take some Green Herbs. Taking these seems";

-			mes "to be the only thing that works for my headache.";

-			next;

-			mes "^3355FFJack O busily chewed";

-			mes "on some Green Herbs.";

-			mes "It seemed to greatly relieve him from the pain of his headaches.^000000";

-			close;

-		}

-			else

-		{

-			mes "[Jack O]";

-			mes "^333333*Yawn...*^000000";

-			mes "It's quiet and boring, as per usual. Let's see if there's any Swordmen I can recruit today.";

-			close;

-		}

-	}

-		else

-	{

-		mes "[Jack O]";

-		mes "Hey kid!";

-		mes "Ever think about";

-		mes "bein' a Crusader?";

-		close;

-	}

-}

-	else

-{

-		if (Class == Job_Swordman)

-	{

-		mes "[Jack O]";

-		mes "Hey kid!";

-		mes "Ever think about";

-		mes "bein' a Crusader?";

-		next;

-		mes "[Jack O]";

-		mes "Basically, you'd be volunteering to be part of our military, as well as train for the Holy War.";

-		next;

-		mes "[Jack O]";

-		mes "If you have some faith and know how to wield a sword, you'll be more than welcome here.";

-		next;

-		mes "[Jack O]";

-		mes "Just think about my suggestion";

-		mes "and come back if you're interested. Alright then, see you later~";

-		close;

-	}

-		else

-	{

-		mes "[Jack O]";

-		mes "^333333*Yawn...*^000000";

-		mes "It's quiet and boring, as per usual. Let's see if there's any Swordmen I can recruit today.";

-		next;

-		mes "[Jack O]";

-		mes "Huh...?";

-		mes "Are you interested in knowing more about Crusaders? Hahaha, I guess that must be the case.";

-		next;

-		mes "[Jack O]";

-		mes "By the way, bring a doll to";

-		mes "the kid in front of me. If you're lucky, she'll give you something neat in return. What it is, I don't know. I've got no dolls.";

-		next;

-		mes "[Jack O]";

-		mes "In accordance with the Crusader code, I'm not supposed to lie. So yeah, you can trust me!";

-		close;

-	}

-}

-

-}

-

-aldebaran.gat,66,213,0	script	Lady#megin	69,{

-

-	if ($God1 > 49 && $God2 < 100)

-{

-		if(god_eremes == 18)

-	{

-		mes "[Emma Searth]";

-		mes "^333333*Sigh...*^000000 I haven't gotten any response from them. I don't know";

-		mes "if I can wait much longer to join the Kafra Corporation.";

-		close;

-	}

-		else if(god_eremes > 18 && god_eremes < 26)

-	{

-			if (god_megin_4 < 2)

-		{

-			mes "[Emma Searth]";

-			mes "^333333*Sigh...*^000000 I haven't gotten any response from them. I don't know";

-			mes "if I can wait much longer to join the Kafra Corporation.";

-			next;

-			mes "[Emma Searth]";

-			mes "Oh, an adventurer! I actually used to work in the same field that you do. More specifically, I used to be a Crusader.";

-			next;

-			mes "[Emma Searth]";

-			mes "My name is Emma Searth. Right now, I'm following my dream and applying to be a Kafra Lady. So my days of wielding a sword are over.";

-			next;

-			mes "[Emma Searth]";

-			mes "Sadly, I haven't succeeded yet because I was diagnosed with";

-			mes "some weird ^0000FFamnesia^000000.";

-			next;

-			mes "[Emma Searth]";

-			mes "Of course, I understand that";

-			mes "Kafra Corporation is a large, professional company, but";

-			mes "if I can work for them even if it's just part-time...";

-			next;

-			mes "[Emma Searth]";

-			mes "Is it that big of a problem?";

-			mes "I suppose they're worried";

-			mes "that I'd forget important customer information once I'm hired.";

-			next;

-			mes "[Emma Searth]";

-			mes "It's strange. When I was";

-			mes "a Crusader, I remembered";

-			mes "everything lucidly, and I never had any problems recalling the past.";

-			next;

-			mes "[Emma Searth]";

-			mes "But now I get these migraines whenever I try to focus on my memories from those times";

-			mes "when I used to fight in the Prontera Military.";

-			next;

-			mes "[Emma Searth]";

-			mes "^333333*Sigh...*^000000";

-			next;

-				switch( select( "About her past.", "Why be a Kafra Lady?", "About memories she can remember." ) )

-			{

-				case 1:

-						if (countitem(7015) > 0)

-					{

-						mes "^3355FFThe scent of your";

-						mes "Memory Bookmark";

-						mes "seems to bring clarity";

-						mes "to her thoughts.^000000";

-						next;

-						mes "[Emma Searth]";

-						mes "I was born in a wealthy family where I was raised to learn etiquette, fencing, Peco riding, and music lessons since I was";

-						mes "born. I suppose you can say I'm pretty well educated.";

-						next;

-						mes "[Emma Searth]";

-						mes "However, my parents weren't";

-						mes "pleased when they learned that I wanted to become a Kafra Lady.";

-						next;

-						mes "[Emma Searth]";

-						mes "My parents insisted that";

-						mes "I become a Sage or a Scholar.";

-						mes "In the end, I ended up running";

-						mes "away from them by joining the Crusaders.";

-						next;

-						mes "[Emma Searth]";

-						mes "Luckily, the Crusaders were advertising their recruitment at the time, so I took that chance. Plus, having military experience might even help me join Kafra!";

-						next;

-						mes "[Emma Searth]";

-						mes "Since I did so well in Boot Camp,";

-						mes "I got the chance to join an elite squad. My squad was often assigned difficult missions, and we never failed to complete those.";

-						next;

-						mes "[Emma Searth]";

-						mes "Eventually, my reputation as a female Crusader, and being in a respectable military position, was enough to satisfy my family.";

-						next;

-						mes "[Emma Searth]";

-						mes "But after that day,";

-						mes "everything went wrong.";

-						mes "I only remember that it";

-						mes "was very sad and depressing.";

-						mes "Somehow, I feel like we were";

-						mes "even betrayed...";

-						next;

-						mes "[Emma Searth]";

-						mes "I think I can";

-						mes "try to remember";

-						mes "my comrades...";

-						set god_megin_4,1;

-						close;

-					}

-						else

-					{

-						mes "[Emma Searth]";

-						mes "Ah, let's not talk about it. It's too depressing. Maybe if you had some sort of ^0000FFmemory^000000 aid, I might be able to recall my forgotten past. Anything, like a reminder, a scheduler, a bookmark, a string...";

-						close;

-					}

-				break;

-

-				case 2:

-					mes "[Emma Searth]";

-					mes "One day, I happened to see Ms. Leilah at work here in Al De Baran. She was shining with confidence and commanded respect, even from her customers!";

-					next;

-					mes "[Emma Searth]";

-					mes "She carried herself like a professional, no matter what the situation. Even though I knew she was tired from working in the summer heat, she made everything look effortless!";

-					next;

-					mes "[Emma Searth]";

-					mes "When the male customers try to flirt with her, she never loses her poise. She just adjusts her glasses and does what she needs to do.";

-					next;

-					mes "[Emma Searth]";

-					mes "To me, she's like a lone, guardian angel. At that moment, it seemed the world existed just to be mocked by Ms. Leila.";

-					next;

-					mes "[Emma Searth]";

-					mes "I've also heard that Kafra Ladies are always traveling around the world, which is something I've always dreamed of doing.";

-					next;

-					mes "[Emma Searth]";

-					mes "Ms. Leilah is my idol,";

-					mes "and she's the reason why";

-					mes "I want to become a Kafra Lady.";

-					close;

-				break;

-

-				case 3:

-						if (countitem(511) > 0 && god_megin_3 > 1)

-					{

-						mes "^3355FFEmma Searth clutches her head and winces as she suffers from another migraine.^000000";

-						next;

-						mes "^3355FFRemembering that a Green Herb was able to relieve Jack O, you gave a Green Herb to Emma. She takes it, and looks a little more relaxed.^000000";

-						next;

-						mes "[Emma Searth]";

-						mes "I'm not even sure";

-						mes "how much I can remember";

-						mes "and how much I've actually";

-						mes "forgotten.";

-						next;

-						mes "[Emma Searth]";

-						mes "Let me...";

-						mes "Try to remember every one in our squad. Let's see, there was Jack O, The Nineball. Z-Zan. Zan.H-Huadoku. C-Cuaque Donon. Myself. Um, E... Eni... Egni... Um...";

-						next;

-						mes "[Emma Searth]";

-						mes "Egni...";

-						mes "Egnigem?^000000";

-						mes "Who was that?";

-						mes "Oh no. I'm sure he might";

-						mes "have, no, was there someone";

-						mes "named that with us?";

-						close2;

-						set god_megin_4,2;

-						end;

-					}

-						else

-					{

-						mes "^3355FFEmma Searth clutches her head and winces as she suffers from another migraine.^000000";

-						next;

-						mes "[Emma Searth]";

-						mes "I'm not even sure";

-						mes "how much I can remember";

-						mes "and how much I've actually";

-						mes "forgotten.";

-						close;

-					}

-				break;

-			}

-		}

-			else if(god_megin_4 > 1)

-		{

-			mes "[Emma Searth]";

-			mes "^0000FFJack O, The Nineball, Zan.Huadoku, Cuaque Donon, Egnigem.^000000 Oh, I really miss those guys...";

-			close;

-		}

-			else

-		{

-			mes "[Emma Searth]";

-			mes "^333333*Sigh...*^000000 I haven't gotten any response from them. I don't know";

-			mes "if I can wait much longer to join the Kafra Corporation.";

-			close;

-		}

-	}

-		else if (god_eremes == 25)

-	{

-		mes "[Emma Searth]";

-		mes "Egnigem...";

-		mes "That name makes";

-		mes "me so sad. I'm not";

-		mes "quite sure why, but...";

-		close;

-	}

-		else if (god_eremes == 26 || god_eremes == 27)

-	{

-		mes "[Emma Searth]";

-		mes "Egnigem...";

-		mes "That name makes";

-		mes "me so sad. I'm not";

-		mes "quite sure why, but...";

-		next;

-		mes "^3355FFEmma turns away before you can see her cry. Still, her shoulders heave with each sob as you imagine the hardship she's had to endure.^000000";

-		next;

-		mes "[Emma Searth]";

-		mes "I wish I knew what that name really means. I'm sure it's linked to an important memory from my past.";

-		next;

-		mes "[Emma Searth]";

-		mes "I really appreciate you coming here to talk to me about the old days. I, I want you to have this.";

-		set god_eremes,28;

-		getitem 603,1;

-		if (BaseLevel < 56)

-			set BaseExp,BaseExp + 27000;

-		else if (BaseLevel > 55 && BaseLevel < 61)

-			set BaseExp,BaseExp + 30000;

-		else if (BaseLevel > 60 && BaseLevel < 66)

-			set BaseExp,BaseExp + 56052;

-		else if (BaseLevel > 65 && BaseLevel < 71)

-			set BaseExp,BaseExp + 82233;

-		else if (BaseLevel > 70 && BaseLevel < 76)

-			set BaseExp,BaseExp + 212271;

-		else if (BaseLevel > 75 && BaseLevel < 81)

-			set BaseExp,BaseExp + 390738;

-		else if (BaseLevel > 80 && BaseLevel < 86)

-			set BaseExp,BaseExp + 451020;

-		else if (BaseLevel > 85 && BaseLevel < 91)

-			set BaseExp,BaseExp + 546156;

-		else if (BaseLevel > 90)

-			set BaseExp,BaseExp + 1220358;

-		close;

-	}

-		else if (god_eremes == 28)

-	{

-		mes "[Emma Searth]";

-		mes "Egnigem...";

-		mes "That name makes";

-		mes "me so sad. I'm not";

-		mes "quite sure why, but...";

-		next;

-		mes "^3355FFEmma turns away before you can see her cry. Still, her shoulders heave with each sob as you imagine the hardship she's had to endure.^000000";

-		close;

-	}

-		else

-	{

-		mes "[Emma Searth]";

-		mes "^333333*Sigh...*^000000 I haven't gotten any response from them. I don't know";

-		mes "if I can wait much longer to join the Kafra Corporation.";

-		close;

-	}

-}

-	else

-{

-	mes "[Emma Searth]";

-	mes "I hear the Kafra Ladies always travel around the world, something I've always dreamed of doing! Hopefully, one of these days, I'll be able to work for the Kafra Corporation too.";

-	next;

-	mes "[Emma Searth]";

-	mes "^333333*Sigh...*^000000";

-	mes "Still, it's discouraging. I haven't heard anything from them...";

-	close;

-}

-

-}

-

-cmd_in02.gat,190,94,3	script	Man#megin	828,{

-

-	if ($God1 > 49 && $God2 < 100)

-{

-		if (god_eremes == 18)

-	{

-		mes "[Royal Myst]";

-		mes "Wha...?";

-		mes "You wanna talk?";

-		next;

-		mes "[Royal Myst]";

-		mes "What am I, your personal psychiatrist?! Lemme alone,";

-		mes "I'm busy here! Awright, now";

-		mes "which one do I bet on...?";

-		next;

-			switch( select("Speak of Rebarev Doug.", "Speak of the 3rd squad.", "Talk about gambling.", "Discuss hobbies.") )

-		{

-			case 1:

-				mes "[Royal Myst]";

-				mes "Wha--? Him again?! Tell him I'm fine! Dandy, even! Why's he gotta send all these people just to ask";

-				mes "a silly question?";

-				close;

-			break;

-			case 2:

-				mes "[Royal Myst]";

-				mes "3rd squad? Yeah, I used to be in that. All of us in the squad used to be real good buddies too.";

-				next;

-				mes "[Royal Myst]";

-				mes "Zan.Huadoku, Cuaque Donon,";

-				mes "Jack O, Emma Searth and The Nineball. Yeah... I wonder what they're all up to?";

-				close;

-			break;

-			case 3:

-				mes "[Royal Myst]";

-				mes "Gambling? I love it, you";

-				mes "know? Eh, I don't win all the time, but I love it the most when I leave with more Zeny than I came in with! Hahaha!";

-				close;

-			break;

-			case 4:

-				mes "[Royal Myst]";

-				mes "Hobbies?";

-				mes "What, you comin'";

-				mes "on to me?";

-				next;

-				mes "[Royal Myst]";

-				mes "A man's hobby is drinking, or didn't you know that? I happen to be real good at it too! Mwahahaha!";

-				close;

-			break;

-		}

-	}

-		else if (god_eremes > 18 && god_eremes < 21)

-	{

-			if (god_megin_6 == 0 && god_megin_5 > 4 && god_megin_4 > 1 && god_megin_3 > 1 && god_megin_2 > 3 && god_megin_1 > 2)

-		{

-			mes "[Royal Myst]";

-			mes "Wha...?";

-			mes "You wanna talk?";

-			next;

-			mes "[Royal Myst]";

-			mes "What am I, your personal psychiatrist?! Lemme alone,";

-			mes "I'm busy here! Awright, now";

-			mes "which one do I bet on...?";

-			next;

-		}

-			else if(god_megin_6 > 0)

-		{

-			mes "[Royal Myst]";

-			mes "Hmm?";

-			mes "What's up?";

-			next;

-		}

-			else

-		{

-			mes "[Royal Myst]";

-			mes "Wha...?";

-			mes "You wanna talk?";

-			next;

-			mes "[Royal Myst]";

-			mes "What am I, your personal psychiatrist?! Lemme alone,";

-			mes "I'm busy here! Awright, now";

-			mes "which one do I bet on...?";

-			close;

-		}

-			if (god_megin_6 < 16)

-		{

-				switch( select("Speak of Rebarev Doug.", "Speak of the 3rd squad.", "Talk about gambling.", "Discuss hobbies.") )

-			{

-				case 1:

-						if (god_megin_6 == 0)

-					{

-						mes "[Royal Myst]";

-						mes "Huh? What's that old geezer want this time? Tell 'em I'm fine, dandy even! Why the hell does he keep sending people...";

-						set god_megin_6,1;

-						close;

-					}

-						else if (god_megin_6 > 0 && god_megin_6 < 15)

-					{

-						mes "[Royal Myst]";

-						mes "What the hell!? Stop talking about him! I never wanna see his face again! Tell him to leave me the hell alone!";

-						close;

-					}

-						else if (god_megin_6 > 14)

-					{

-						mes "[Royal Myst]";

-						mes "Damn geezer...";

-						mes "How much is he being paid for studying what we all found?! Eh, somehow, I don't care as long as";

-						mes "he pays me...";

-						next;

-						mes "[Royal Myst]";

-						mes "Yeah...";

-						mes "I just don't";

-						mes "care anymore.";

-						close;

-					}

-				break;

-				case 2:

-						if (god_megin_6 < 15)

-					{

-						mes "[Royal Myst]";

-						mes "3rd squad? Yeah, I used to be in that. All of us in the squad used to be real good buddies too.";

-						next;

-						mes "[Royal Myst]";

-						mes "Zan.Huadoku, Cuaque Donon,";

-						mes "Jack O, Emma Searth and The Nineball. Yeah... I wonder what they're all up to?";

-						close;

-					}

-						else if (god_megin_6 > 14)

-					{

-						mes "[Royal Myst]";

-						mes "3rd squad?";

-						mes "Don't know, don't care~";

-						mes "Do I look like a stupid Crusader?";

-						close;

-					}

-					else

-				break;

-				case 3:

-						if (god_megin_6 < 15)

-					{

-						mes "[Royal Myst]";

-						mes "Gambling? ! Oh man...";

-						mes "I love gambling, you know!";

-						mes "Heh, but I haven't been lucky enough to win yet. Hahaha~!";

-						close;

-					}

-						else if (god_megin_6 > 14)

-					{

-						mes "[Royal Myst]";

-						mes "Gambling...!";

-						mes "Heh heh! Some risks you take,";

-						mes "and others you really shouldn't.";

-						mes "I can't help but feel sorry for that guy, E--";

-						next;

-						mes "[Royal Myst]";

-						mes "Ergh...?";

-						mes "Damn, I can never remember his name. You'd think I wouldn't forget the guy whose rap I'm taking but... Eh, I'll remember once I sober up.";

-						next;

-						mes "[Royal Myst]";

-						mes "Hey, what do you think happens to Crusaders when they're framed and killed, huh? Where exactly do they go? Niflheim, Vahalla...?";

-						set god_eremes,20;

-						close;

-					}

-				break;

-				case 4:

-						if (god_megin_6 == 0)

-					{

-						mes "Hobbies?";

-						mes "What, you comin'";

-						mes "on to me?";

-						next;

-						mes "[Royal Myst]";

-						mes "A man's hobby is drinking, or didn't you know that? I happen to be real good at it too! Mwahahaha!";

-						close;

-					}

-						else if (god_megin_6 > 0 && god_megin_6 < 15)

-					{

-							if (countitem(970) > 0)

-						{

-							mes "[Royal Myst]";

-							mes "Speaking of which,";

-							mes "I haven't had a drink";

-							mes "for a looong time. Almost";

-							mes "a couple hours now.";

-							next;

-							mes "[Royal Myst]";

-							mes "Oooh, looks like you've got a tasty beverage I can enjoy. Bwahahaha! Gimmie~!";

-							next;

-							mes "^3355FFBefore you can even think,";

-							mes "Royal Myst dips his hand into your inventory and helps himself to an Alcohol.^000000";

-							delitem 970,1;

-							set god_megin_6,god_megin_6 +2;

-							close;

-						}

-							else

-						{

-							mes "[Royal Myst]";

-							mes "Why mention it? You gonna bring me something I'll like? Cuz I'm more than willing to take it! Bwahahaha!";

-							close;

-						}

-					}

-						else if (god_megin_6 > 14)

-					{

-						mes "[Royal Myst]";

-						mes "^333333*Hiccup*^000000 Oh yeah, this is the stuff. Not like that imitation junk they've been serving at the Bars nowadays...";

-						next;

-						mes "[Royal Myst]";

-						mes "Hey! There anything you wanna";

-						mes "know about me? You did me a favor, so I'll tell you anything! Eeeeeverythiiing~~!!";

-						close;

-					}

-				break;

-			}

-		}

-	}

-		else

-	{

-		mes "[Royal Myst]";

-		mes "Eh heh heh~";

-		mes "I just know";

-		mes "I'm gonna win";

-		mes "this time!";

-		close;

-	}

-}

-	else

-{

-	mes "[Royal Myst]";

-	mes "Wha...?";

-	mes "You wanna talk?";

-	next;

-	mes "[Royal Myst]";

-	mes "What am I, your personal psychiatrist?! Lemme alone,";

-	mes "I'm busy here! Awright, now";

-	mes "which one do I bet on...?";

-	close;

-}

-

-}

-

-jawaii_in.gat,44,110,0	script	Security Officer#megin	734,{

-

-	if ($God1 > 49 && $God2 < 100)

-{

-		if (god_eremes == 18)

-	{

-		mes "[The Nineball]";

-		mes "Welcome to Jawaii,";

-		mes "the paradise resort!";

-		next;

-		mes "[The Nineball]";

-		mes "I'm the 'The Nineball, the security officer of Jawaii! If you encounter any trouble, or find any Singles, please dont hesitate to report to me as soon as you can~";

-		next;

-		mes "[The Nineball]";

-		mes "I've been told that there have";

-		mes "been many unruly drunkards here lately, but it is in our best interest to make your experience here as enjoyable as possible.";

-		close;

-	}

-		else if (god_eremes > 18)

-	{

-			if (god_megin_5 < 5)

-		{

-			mes "[The Nineball]";

-			mes "Welcome to Jawaii,";

-			mes "the paradise resort!";

-			next;

-			mes "[The Nineball]";

-			mes "I'm the 'The Nineball, the security officer of Jawaii! If you encounter any trouble, or find any Singles, please dont hesitate to report to me as soon as you can~";

-			next;

-			mes "[The Nineball]";

-			mes "I've been told that there have";

-			mes "been many unruly drunkards here lately, but it is in our best interest to make your experience here as enjoyable as possible.";

-			set god_megin_5,god_megin_5 +1;

-			close;

-		}

-			else if (god_megin_5 == 5)

-		{

-			mes "^3355FFHe acted very bright and friendly, but for a fleeting moment, you were able to glimpse a hint of sadness in his eyes.^000000";

-			next;

-			mes "^3355FFIt doesn't seem that";

-			mes "you'll be able to get him";

-			mes "to talk about what exactly";

-			mes "happened in the 3rd Squad...^000000";

-			close;

-		}

-	}

-}

-	else

-{

-	mes "[The Nineball]";

-	mes "Welcome to Jawaii,";

-	mes "the paradise resort!";

-	next;

-	mes "[The Nineball]";

-	mes "I'm the 'The Nineball, the security officer of Jawaii! If you encounter any trouble, or find any Singles, please dont hesitate to report to me as soon as you can~";

-	next;

-	mes "[The Nineball]";

-	mes "I've been told that there have";

-	mes "been many unruly drunkards here lately, but it is in our best interest to make your experience here as enjoyable as possible.";

-	close;

-}

-

-}

-

-niflheim.gat,109,254,0	script	Egnigem	796,{

-

-	if ($God1 > 49 && $God2 < 100)

-{

-		if (god_eremes > 19 && god_eremes < 25)

-	{

-			if (god_eremes > 22)

-		{

-			mes "[Egnigem]";

-			mes "Why have you returned to";

-			mes "this lonely place of darkness?";

-			next;

-			mes "[Egnigem]";

-			mes "Please go back to the world";

-			mes "of the living. To be here is to suffer, such is the nature of Nifflheim.";

-			close;

-		}

-			else

-		{

-			mes "[Egnigem]";

-			mes "Greetings...";

-			mes ""+ strcharinfo(0) +".";

-			mes "I've been watching you in the";

-			mes "world of the living. I see you've been busy looking for the truth about the 3rd Squad, haven't you?";

-			next;

-			mes "[Egnigem]";

-			mes "I can provide you with the answers. After all, I'm the only member of the 3rd Squad to retain all of my memories...";

-			next;

-			mes "[Egnigem]";

-			mes "Heh heh...";

-			mes "Let me tell you everything";

-			mes "about the 3rd Squad that's";

-			mes "been forgotten...";

-			L_Menu:

-			next;

-				switch( select( "The Mission", "Fate of the 3rd Squad", "Why are you in Nifflheim?", "Thanks, I've heard enough." ) )

-			{

-					case 1:

-						mes "[Egnigem]";

-						mes "First of all, the official record of our mission is misleading.";

-						mes "It contains some truth, based";

-						mes "on verbal evidence, but the most important details have been left out or changed.";

-						next;

-						mes "[Egnigem]";

-						mes "Now, we were secretly assigned";

-						mes "to find ^0000FFgodly artifacts^000000 by royal decree. In only three days, we succeeded and found Megingjard!";

-						next;

-						mes "[Egnigem]";

-						mes "Now, the records say the mission was unsatisfactory, correct? That would be because of me.";

-						next;

-						mes "[Egnigem]";

-						mes "Are you aware that Megingjard";

-						mes "was a belt worn by gods? It was actually one of the keys to Thor's great strength. Another name for it is the 'Girdle of Might.'";

-						next;

-						mes "[Egnigem]";

-						mes "Now, if a human were to wear";

-						mes "that, there's a possibility that Megingjard would give him strength comparable to a god. Naturally, you'd be afraid of such a thing falling into the wrong hands.";

-						next;

-						mes "[Egnigem]";

-						mes "In Rebarev Doug's mind, he";

-						mes "was the only person worthy of the belt since he considered himself the most religious person alive, and thus, closest to the gods.";

-						next;

-						mes "[Egnigem]";

-						mes "He made it clear to us that only he would wear Megingjard. Although he was our leader, some of us felt uneasy about him wearing the belt and not giving it to his superiors, our mission objective.";

-						next;

-						mes "[Egnigem]";

-						mes "Naturally, I opposed him. He was clearly unbalanced, and it would be dangerous to give him control of such power. It led to something of a fist fight between us.";

-						next;

-						mes "[Egnigem]";

-						mes "The rest of the squad couldn't";

-						mes "agree on whether or not we should simply obey our leader and let him have the belt. Some just wanted to complete the mission, while others were afraid of what might happen.";

-						next;

-						mes "[Egnigem]";

-						mes "But Rebarev didn't wait for us to decide. He destroyed Megingjard into pieces, intending to keep most of it and somehow reconstruct it later, and only bring one piece to the Prontera Military.";

-						next;

-						mes "[Egnigem]";

-						mes "He knew that he couldn't get";

-						mes "away with keeping all of Megingjard to himself, as the entire squad could easily discredit him.";

-						next;

-						mes "[Egnigem]";

-						mes "But Rebarev knew";

-						mes "that he could deceive his";

-						mes "superiors by giving them just a fragment of the artifact, and say that the rest of it was destroyed.";

-						next;

-						mes "[Egnigem]";

-						mes "I discovered his intention when";

-						mes "I found him taking Megingjard apart. Before I could stop him,";

-						mes "I was killed. That bastard had";

-						mes "a trap ready for me...";

-						next;

-						mes "[Egnigem]";

-						mes "After the mission, Rebarev Doug only gave a piece of the belt back to the higher-ups, and gave them";

-						mes "a different account than what had actually happened...";

-						goto L_Menu;

-					break;

-					case 2:

-						mes "[Egnigem]";

-						mes "Once the mission was completed, Rebarev Doug reported back to the Prontera Military with the intent of keeping most of Megingjard for himself.";

-						next;

-						mes "[Egnigem]";

-						mes "For some reason, he has a very strong influence in the military hierarchy. Now, by this time, I'm sure the squad pretty much figured out that he killed me.";

-						next;

-						mes "[Egnigem]";

-						mes "But Rebarev Doug expected this, and explained to his superiors that the squad was tempted by Megingjard's power and that I led some of us in a mutiny against him.";

-						next;

-						mes "[Egnigem]";

-						mes "He told his superiors that Megingjard was damaged as we";

-						mes "fought amongst each other, and that the fragment he gave them was all that remained.";

-						next;

-						mes "[Egnigem]";

-						mes "Because of the confidential nature of our mission, the 3rd squad was disbanded and we weren't given the story Rebarev fed the beaureaucrats until it was too late.";

-						next;

-						mes "[Egnigem]";

-						mes "The squad was punished and";

-						mes "sent for disciplinary retraining for three months. During this time, specific memories were unnaturally erased from the squad members.";

-						next;

-						mes "[Egnigem]";

-						mes "In the end, everyone was transferred to other squads and positions. My name had to be removed from all the records since hearing or reading my name might undo the brain washing.";

-						next;

-						mes "[Egnigem]";

-						mes "However, they still needed an official scapegoat, so they used Royal Myst's name in the records. That's probably why he's been going through hard times right now.";

-						next;

-						mes "[Egnigem]";

-						mes "And now Rebarev Doug has been studying godly artifacts based on the pieces of Megingjard that we found on that mission using kingdom research funds. Someday, he might be able to reconstruct the belt.";

-						next;

-						mes "[Egnigem]";

-						mes "There are also";

-						mes "a few questions that";

-						mes "I've never been able";

-						mes "to answer.";

-						next;

-						mes "[Egnigem]";

-						mes "I've never known why the King Tristram III ordered the research of godly artifacts. It also bothers me that Rebarev Doug is in charge of Megingjard's research. There must be some reason.";

-						next;

-						mes "[Egnigem]";

-						mes "In any case, for the sake of Rune-Midgard, it will be your responsibility to find the answers.";

-						next;

-						mes "[Egnigem]";

-						mes "There's not much a dead man";

-						mes "can do. But what's worse is that no one remembers me any more. I died alone and I'm still lonely in this place for the dead.";

-						goto L_Menu;

-					break;

-					case 3:

-						mes "[Egnigem]";

-						mes "The worst part of the squad";

-						mes "having their memories erased is";

-						mes "that Emma Searth has absolutely";

-						mes "no recollection of me.";

-						next;

-						mes "[Egnigem]";

-						mes "Do you mind listening";

-						mes "to me for a while? You're";

-						mes "the only person with whom";

-						mes "I can talk about this...";

-						next;

-						mes "[Egnigem]";

-						mes "From here, I've seen that Emma";

-						mes "is chasing her dream again, and";

-						mes "I'm happy for her. But it's still";

-						mes "not easy, knowing the woman you";

-						mes "love has totally forgotten you.";

-						next;

-						mes "[Egnigem]";

-						mes "I remember the first time I met her. I guess it was love at first sight. But I was too cowardly to confess my love, so I despaired when she joined the Crusaders.";

-						next;

-						mes "[Egnigem]";

-						mes "It took me a while, but I made up my mind to enlist as a Crusader";

-						mes "as well. I wanted to be closer to her so much.";

-						next;

-						mes "[Egnigem]";

-						mes "Now, after all our adventures and good times together, I'm in the worst possible scenario.";

-						next;

-						mes "[Egnigem]";

-						mes "I'm dead...";

-						mes "But I don't even have the consolation that she is";

-						mes "mourning my loss.";

-						next;

-						mes "[Egnigem]";

-						mes "I suppose that's why I'm here";

-						mes "in Nifflheim. I can't quite move on to heaven, Valhalla or anywhere else without her.";

-						next;

-						mes "[Egnigem]";

-						mes "Anyway, go and visit the Crusader Headquarters. You might be able to learn more about Rebarev Doug and stop any new shadiness he might be plotting. Good luck, my friend.";

-						goto L_Menu;

-					break;

-					case 4:

-						mes "[Egnigem]";

-						mes "Thank you for";

-						mes "listening to me...";

-						if (god_eremes == 21) set god_eremes,23;

-						else if(god_eremes == 22) set god_eremes,24;

-						close;

-					break;

-				}

-		}

-	}

-		else if (god_eremes == 25)

-	{

-		mes "[Egnigem]";

-		mes "Listen...";

-		mes "I'm going to imbue you with the ^FF0000last vestiges of my strength^000000...";

-		next;

-		mes "[Egnigem]";

-		mes "This is all I can do for you in return...";

-		set god_eremes,27;

-		if (BaseLevel < 56)

-			set BaseExp,BaseExp + 27000;

-		else if (BaseLevel > 55 && BaseLevel < 61)

-			set BaseExp,BaseExp + 30000;

-		else if (BaseLevel > 60 && BaseLevel < 66)

-			set BaseExp,BaseExp + 56052;

-		else if (BaseLevel > 65 && BaseLevel < 71)

-			set BaseExp,BaseExp + 82233;

-		else if (BaseLevel > 70 && BaseLevel < 76)

-			set BaseExp,BaseExp + 212271;

-		else if (BaseLevel > 75 && BaseLevel < 81)

-			set BaseExp,BaseExp + 390738;

-		else if (BaseLevel > 80 && BaseLevel < 86)

-			set BaseExp,BaseExp + 451020;

-		else if (BaseLevel > 85 && BaseLevel < 91)

-			set BaseExp,BaseExp + 546156;

-		else if (BaseLevel > 90)

-			set BaseExp,BaseExp + 1220358;

-		close;

-	}

-		else if (god_eremes == 26)

-	{

-		mes "[Egnigem]";

-		mes "As a Crusader...";

-		mes "This is the best thing";

-		mes "I can do in return for";

-		mes "what you have done for me.";

-		next;

-		mes "[Egnigem]";

-		mes "Listen...";

-		mes "I'm going to";

-		mes "imbue you with the";

-		mes "^666666last vestiges of my strength^000000...";

-		specialeffect 57;

-		specialeffect2 152;

-		next;

-		mes "[Egnigem]";

-		mes "May the heavens";

-		mes "answer me as  I call upon the";

-		mes "light of justice that empowers the defenders of truth, and threaten the enemies of peace.";

-		specialeffect 58;

-		specialeffect2 152;

-		next;

-		mes "[Egnigem]";

-		mes "May you always shine with";

-		mes "the light of truth. Let the light within you eradicate the shadows";

-		mes "of deception, fear and malice.";

-		specialeffect 58;

-		specialeffect2 152;

-		next;

-		mes "[Egnigem]";

-		mes "By the holy power";

-		mes "invested in me, I humbly bestow upon you my remaining strength. Fight honorably, and do not lose sight of righteousness.";

-		specialeffect 60;

-		specialeffect2 245;

-		set god_eremes,27;

-		if (BaseLevel < 56)

-			set BaseExp,BaseExp + 27000;

-		else if (BaseLevel > 55 && BaseLevel < 61)

-			set BaseExp,BaseExp + 30000;

-		else if (BaseLevel > 60 && BaseLevel < 66)

-			set BaseExp,BaseExp + 56052;

-		else if (BaseLevel > 65 && BaseLevel < 71)

-			set BaseExp,BaseExp + 82233;

-		else if (BaseLevel > 70 && BaseLevel < 76)

-			set BaseExp,BaseExp + 212271;

-		else if (BaseLevel > 75 && BaseLevel < 81)

-			set BaseExp,BaseExp + 390738;

-		else if (BaseLevel > 80 && BaseLevel < 86)

-			set BaseExp,BaseExp + 451020;

-		else if (BaseLevel > 85 && BaseLevel < 91)

-			set BaseExp,BaseExp + 546156;

-		else if (BaseLevel > 90)

-			set BaseExp,BaseExp + 1220358;

-		close;

-	}

-		else if (god_eremes < 20)

-	{

-		mes "[Egnigem]";

-		mes "Were you betrayed by fate as well, or are you simply a wanderer that's stumbled into this land of darkness?";

-		next;

-		mes "[Egnigem]";

-		mes "Hmm, the living don't deserve";

-		mes "to be in this realm of cold and suffering. But I can only help you escape by telling you what little";

-		mes "I know.";

-		next;

-			switch( select( "Ask him about buildings.", "Remove marks on mini-map.", "Cancel." ) )

-		{

-			case 1:

-				mes "[Egnigem]";

-				mes "I see. If you better understand Niflheim's layout, you have a greater chance of surviving and escaping.";

-				next;

-					switch( select( "Witch's Castle", "Tool Shop", "Weapon Shop", "Tavern", "Cancel" ) )

-				{

-					case 1:

-						mes "[Egnigem]";

-						mes "The witch of Nifflheim...";

-						mes "You can find her castle at the ^FF3355+^000000 mark I've made on your mini-map.";

-						next;

-						mes "[Egnigem]";

-						mes "Hrrrm...";

-						mes "It seems that the living who wind up in Nifflheim are seeking out the witch. But I don't quite understand what's so important about her.";

-						viewpoint 1,253,191,2,0xFFFF33;

-					break;

-					case 2:

-						mes "[Egnigem]";

-						mes "The Tool shop? Here in Nifflheim, they sell some unique items that";

-						mes "you can't buy anywhere else.";

-						next;

-						mes "[Egnigem]";

-						mes "You might want to see their";

-						mes "wares for yourself. I've drawn";

-						mes "a ^CE6300+^000000 on your mini-map to mark";

-						mes "its location.";

-						viewpoint 1,217,196,3,0xFFCE63;

-					break;

-					case 3:

-						mes "[Egnigem]";

-						mes "I've marked the location of the Weapon Shop at ^55FF33+^000000. There's nothing too special over there, though.";

-						viewpoint 1,216,171,4,0xFF55FF;

-					break;

-					case 4:

-						mes "[Egnigem]";

-						mes "Tavern is at ^3355FF+^000000. They only sell drinks to the dead, though...";

-						viewpoint 1,189,207,5,0xFF3355;

-					break;

-					case 5:

-						mes "[Egnigem]";

-						mes "Choose 'Remove marks on mini-map' from the menu to remove all the building location marks I've made.";

-						close;

-					break;

-				}

-				close;

-			break;

-			case 2:

-				viewpoint 2,253,191,2,0xFF00FF;

-				viewpoint 2,217,196,3,0xFF00FF;

-				viewpoint 2,216,171,4,0xFF00FF;

-				viewpoint 2,189,207,5,0xFF00FF;

-				mes "[Egnigem]";

-				mes "Alright, all the marks I've made have been removed from your mini-map. If you want to check the locations in Nifflheim again, go ahead and ask me.";

-				close;

-			break;

-			case 3:

-				mes "[Egnigem]";

-				mes "You're gonna explore this place on your own? Pretty brave, aren't you? Just be careful: here in Nifflheim, darkness reigns supreme.";

-				close;

-			break;

-		}

-	}

-		else

-	{

-		mes "[Egnigem]";

-		mes "I really wish that";

-		mes "Emma Searth could";

-		mes "remember me...";

-		next;

-		mes "^3355FFHis eyes seemed";

-		mes "to moisten with sadness.";

-		mes "Is it really possible for the";

-		mes "dead to shed tears?^000000";

-		close;

-	}

-}

-	else

-{

-	mes "[Egnigem]";

-	mes "Were you betrayed by fate as well, or are you simply a wanderer that's stumbled into this land of darkness?";

-	next;

-	mes "[Egnigem]";

-	mes "Hmm, the living don't deserve";

-	mes "to be in this realm of cold and suffering. But I can only help you escape by telling you what little";

-	mes "I know.";

-	next;

-		switch( select( "Ask him about buildings.", "Remove marks on mini-map.", "Cancel." ) )

-	{

-		case 1:

-			mes "[Egnigem]";

-			mes "...I see. Now, let me introduce you all buildings in Nifflheim!";

-			next;

-					switch( select( "Witch's Castle", "Tool Shop", "Weapon Shop", "Tavern", "Cancel" ) )

-				{

-					case 1:

-						mes "[Egnigem]";

-						mes "The witch of Nifflheim...";

-						mes "You can find her castle at the ^FF3355+^000000 mark I've made on your mini-map.";

-						next;

-						mes "[Egnigem]";

-						mes "Hrrrm...";

-						mes "It seems that the living who wind up in Nifflheim are seeking out the witch. But I don't quite understand what's so important about her.";

-						viewpoint 1,253,191,6,0xFFFF33;

-					break;

-					case 2:

-						mes "[Egnigem]";

-						mes "The Tool shop? Here in Nifflheim, they sell some unique items that";

-						mes "you can't buy anywhere else.";

-						next;

-						mes "[Egnigem]";

-						mes "You might want to see their";

-						mes "wares for yourself. I've drawn";

-						mes "a ^CE6300+^000000 on your mini-map to mark";

-						mes "its location.";

-						viewpoint 1,217,196,7,0xFFCE63;

-					break;

-					case 3:

-						mes "[Egnigem]";

-						mes "I've marked the location of the Weapon Shop at ^55FF33+^000000. There's nothing too special over there, though.";

-						viewpoint 1,216,171,8,0xFF55FF;

-					break;

-					case 4:

-						mes "[Egnigem]";

-						mes "Tavern is at ^3355FF+^000000. They only sell drinks to the dead, though...";

-						viewpoint 1,189,207,9,0xFF3355;

-					break;

-					case 5:

-						mes "[Egnigem]";

-						mes "Choose 'Remove marks on mini-map' from the menu to remove all the building location marks I've made.";

-						close;

-					break;

-				}

-				close;

-			break;

-			case 2:

-				viewpoint 2,253,191,6,0xFF00FF;

-				viewpoint 2,217,196,7,0xFF00FF;

-				viewpoint 2,216,171,8,0xFF00FF;

-				viewpoint 2,189,207,9,0xFF00FF;

-				mes "[Egnigem]";

-				mes "Alright, all the marks I've made have been removed from your mini-map. If you want to check the locations in Nifflheim again, go ahead and ask me.";

-				close;

-		break;

-		case 3:

-			mes "[Egnigem]";

-			mes "You're gonna explore this place on your own? Pretty brave, aren't you? Just be careful: here in Nifflheim, darkness reigns supreme.";

-			close;

-		break;

-	}

-	close;

-}

-

-}

-

-

+//===== eAthena Script ======================================= 
+//= Megingjard seal unlocking NPCs.
+//===== By: ================================================== 
+//= SinSloth
+//===== Current Version: ===================================== 
+//= 1.01
+//===== Compatible With: ===================================== 
+//= eAthena
+//===== Description: ========================================= 
+//= Quest for breaking the seal of Megingjard.
+//===== Additional Comments: =================================
+// 1.0 First version. Thanks to SinSloth for scripting it. [MasterOfMuppets]
+// 1.1 fixed exploit [Lupus]
+//============================================================
+
+prt_castle.gat,44,151,0	script	Rebarev Doug	56,{
+
+if(countitem(7080) > 3 && countitem(7081) > 4 && countitem(7082) > 3 && countitem(7084) > 2 && countitem(7085) > 2)
+{
+	mes "[Rebarev Doug]";
+	mes "What's this?";
+	mes "You...! You have";
+	mes "everything I need to";
+	mes "create Gleipnir!";
+	next;
+	switch( select( "Make Gleipnir.", "Cancel." ) )
+	{
+
+		case 1:
+			mes "[Rebarev Doug]";
+			mes "I'm the only human on earth blessed with the ability to create Gleipnir. Aside from Dwarves, I'm the only person that can make this item!";
+			next;
+			delitem 7080,4;
+			delitem 7081,5;
+			delitem 7082,4;
+			delitem 7084,3;
+			delitem 7085,3;
+			getitem 7058,1;
+			mes "[Rebarev Doug]";
+			mes "There you go!";
+			next;
+			mes "[Rebarev Doug]";
+			mes "Gleipnir is said to be so strong that not even the Fenrir Wolf could break it! I'm so proud that I could make this item!";
+			close;
+		break;
+
+		case 2:
+			close;
+		break;
+
+	}
+}
+
+if($God1 < 50)
+{
+	mes "[Rebarev Doug]";
+	mes "We are Crusaders that have been training in preparation for the Holy War that is to come.";
+	next;
+	mes "[Rebarev Doug]";
+	mes "As we our forefathers have done a thousand years ago, we shall vanquish the hordes of Demons when the day comes.";
+	next;
+	mes "[Rebarev Doug]";
+	mes "If you have any questions about Crusaders, feel free to ask me. I may be too old and weak for fighting, but I will spread our message as much as I can.";
+	mes "feel free to ask me.";
+	next;
+	switch( select( "What is Holy Cross?", "What is Grand Cross?", "What is Sacrifice?", "What is Gleipnir?" ) )
+	{
+		case 1:
+			mes "[Rebarev Doug]";
+			mes "Holy Cross is the first manifestation of a Crusader's faith. By making the sign of the cross, Crusader's can inflict a holy attack on their enemies.";
+			next;
+			mes "[Rebarev Doug]";
+			mes "Monsters that are weak against holiness, particularly the Undead, will be blinded by the light of the Holy Cross. All they can do is next; for holy judgment.";
+			next;
+			mes "[Rebarev Doug]";
+			mes "Based on our latest research, the Holy Cross can inflict 4.5 times more damage than a normal attack once it is mastered.";
+			close;
+		break;
+
+		case 2:
+			mes "[Rebarev Doug]";
+			mes "Grand Cross...!";
+			mes "The righteous fury of God is given form in this destructive skill.";
+			next;
+			mes "[Rebarev Doug]";
+			mes "God grants us his power so that we may punish the forces of evil, and one's rage is embodied in a giant crucifix of power.";
+			next;
+			mes "[Rebarev Doug]";
+			mes "The power of the crucifix of light can damage the enemy three times. Each strike will have five times the strength of your normal attacks.";
+			next;
+			mes "[Rebarev Doug]";
+			mes "However, when Crusaders use Grand Cross, they must exercise extreme caution. The human body is too weak to fully embrace the will of God.";
+			next;
+			mes "[Rebarev Doug]";
+			mes "Therefore, using this skill, will cause the Crusader to suffer from damage. However, this damage can be reduced to half with Faith.";
+			close;
+		break;
+
+		case 3:
+			mes "[Rebarev Doug]";
+			mes "In practicing what we preach, Crusaders choose to protect others by bearing the suffering of others.";
+			next;
+			mes "[Rebarev Doug]";
+			mes "The Sacrifice skill allows Crusaders to keep their comrades safe from harm by receiving the damage that was intended for them.";
+			next;
+			mes "[Rebarev Doug]";
+			mes "It is the greatest demonstration of faith, as well as of love for your fellow man. Such an attitude is essential for a servant of God!";
+			next;
+			mes "[Rebarev Doug]";
+			mes "However, if the people you want to protect become stray away from you, you cannot use the Sacrifice skill for them unless they are close to you again.";
+			next;
+			mes "[Rebarev Doug]";
+			mes "As you visualize the suffering of those you want to protect, you'll never hesitate to sacrifice yourself.";
+			next;
+			mes "[Rebarev Doug]";
+			mes "Thank you, God, for granting me with a power to protect my people.";
+			close;
+		break;
+
+		case 4:
+			mes "[Rebarev Doug]";
+			mes "Gleipnir is the essence of Megingjard which I have been researching.";
+			next;
+			mes "[Rebarev Doug]";
+			mes "It's the only binding strong enough that will allow a human to wear Megingjard around his waist.";
+			next;
+			mes "[Rebarev Doug]";
+			mes "Although I can no longer fight, I've been studying how to create Gleipnir for years. I will be more than willing to create it for you if you can bring me...";
+			next;
+			mes "[Rebarev Doug]";
+			mes "^0000FF4 Cat Tread^000000,";
+			mes "^0000FF5 Woman's Moustache^000000,";
+			mes "^0000FF4 Root of Stone^000000,";
+			mes "^0000FF3 Sputum of Bird^000000 and";
+			mes "^0000FF3 Sinew of Bear^000000,";
+			close;
+		break;
+	}
+}
+else if($God1 > 49 && $God2 < 100)
+{
+	if(BaseLevel > 59)
+	{
+		if(god_eremes == 0)
+		{
+			mes "[Rebarev Doug]";
+			mes "...";
+			next;
+			mes "[Rebarev Doug]";
+			mes "Why are you wandering around this sacred place? Do you not understand that we must prepare for the Holy War?";
+			next;
+			mes "[Rebarev Doug]";
+			mes "No matter how much I explain, the ignorant never fully understand the importance of our task. The balance of power will shift when we least expect it!";
+			next;
+			mes "[Rebarev Doug]";
+			mes "I wish I could go back to those times when I would train Crusaders, rather than preach to the ignorant.";
+			next;
+			mes "[Rebarev Doug]";
+			mes "I miss my Crusaders who were enthusiastic to listen to what I had to say, and carried out their orders with loyalty.";
+			next;
+			mes "[Rebarev Doug]";
+			mes "I am wonder";
+			mes "where they have";
+			mes "all gone now...";
+			next;
+			mes "[Rebarev Doug]";
+			mes "...";
+			mes "......";
+			mes ".........";
+			next;
+			mes "[Rebarev Doug]";
+			mes "Adventurer, if you the time to listen to me speak to myself, why don't you perform a task for me?";
+			next;
+			mes "[Rebarev Doug]";
+			mes "If may be an enriching experience for you. It's possible that you'll even have a greater appreciation for Crusaders.";
+			next;
+			switch( select( "What is it?", "I'm sick and tired of doin' favors." ) )
+			{
+				case 1:
+					mes "[Rebarev Doug]";
+					mes "I want you to find the members of the 3rd squad in the 1st platoon of the 3rd company. If you happen to encounter them in your travels, please ask them how they are doing.";
+					next;
+					mes "[Rebarev Doug]";
+					mes "It shouldn't be that difficult to do, and won't be a waste of your time if you are already planning to explore the world.";
+					next;
+					switch( select( "Sure, why not.", "I'm sorry, but no." ) )
+					{
+						case 1:
+							mes "[Rebarev Doug]";
+							mes "Excellent!";
+							mes "All I want you to do is find my old comrades, and inform me of how they are doing.";
+							next;
+							mes "[Rebarev Doug]";
+							mes "However...";
+							mes "There is one problem.";
+							mes "I don't know where they are.";
+							next;
+							mes "[Rebarev Doug]";
+							mes "You could try to find a record of residency changes by citizens of the Rune-Midgarts Kingdom in the Prontera Library...";
+							next;
+							mes "[Rebarev Doug]";
+							mes "However, the records of Crusader personnel is considered confidential, so I am not sure of whether or not you can view them.";
+							next;
+							mes "[Rebarev Doug]";
+							mes "Thank you in advance anyways.";
+							mes ".........";
+							next;
+							mes "[Rebarev Doug]";
+							mes "You must understand, my position requires me to remain in this area 24 hours, 7 days a week. I cannot leave without the consent of the upper hierarchy.";
+							next;
+							mes "[Rebarev Doug]";
+							mes "However, I know you have the freedom and the time to go wherever you please. I'd appreciate if you would do this for me.";
+							next;
+							mes "[Rebarev Doug]";
+							mes "My old comrades in arms. You have no idea how much I miss them...";
+							set god_eremes,1;
+							close;
+						break;
+
+						case 2:
+							mes "[Rebarev Doug]";
+							mes "^333333*Sigh...*^000000";
+							mes "Please understand that I would not be asking this of you if it were not for the restraints of my position.";
+							next;
+							mes "[Rebarev Doug]";
+							mes "I have an obligation to this Kingdom to keep my post and inform adventurers about the Crusader class. Because of this awesome responsibility, I must remain here, ever vigilant.";
+							next;
+							mes "[Rebarev Doug]";
+							mes "If you can't understand, then you must be taking your freedom for granted...";
+							close;
+						break;
+					}
+				break;
+
+				case 2:
+					mes "[Rebarev Doug]";
+					mes "As far as I remember, this is the first time I have asked you to do me a favor.";
+					next;
+					mes "[Rebarev Doug]";
+					mes "Unlike you, I know the meaning of responsibility. I remain here, helping inquisitive adventurers for the sake of King and country.";
+					next;
+					mes "[Rebarev Doug]";
+					mes "Still...";
+					mes "Know this.";
+					mes "Although the results may not be immediate, you will always be rewarded when you help others.";
+					next;
+					mes "[Rebarev Doug]";
+					mes "Please reconsider when you get the chance.";
+					close;
+				break;
+			}
+		}
+		else if(god_eremes > 0 && god_eremes < 4)
+		{
+
+			if(rand(1,10) > 6 && god_eremes == 2)
+			{
+				mes "[Rebarev Doug]";
+				mes "I am wondering how my members are doing by now...";
+				mes "I cannot even remember when was the last time I saw them...";
+				next;
+				mes "[Rebarev Doug]";
+				mes "Hmm? Why are you still here?";
+				next;
+				switch( select( "Where should I go?", "I am about to leave.", "What do you mean by the last mission?" ) )
+				{
+					case 1:
+						mes "[Rebarev Doug]";
+						mes "Well...I have no clue where they are.";
+						mes "You might be able to find the information from";
+						mes "^0000FFThe 3rd company personnel in&out record crews^000000 in the library?";
+						close;
+					break;
+
+					case 2:
+						mes "[Rebarev Doug]";
+						mes "Oh, are you? I see... I am wondering what they have been doing ever since we're disbanded after the ^0000FFlast mission^000000...";
+						close;
+					break;
+
+					case 3:
+						mes "[Rebarev Doug]";
+						mes "The last mission...? That gave the reason to disband the 1st squad of the 3rd platoon...";
+						mes "I cannot think of this seprately from the memory...bah..";
+						next;
+						mes "[Rebarev Doug]";
+						mes "You know, hmm.";
+						mes "We crusaders have heirarchy...basically we have to listen to higher officers.";
+						next;
+						mes "[Rebarev Doug]";
+						mes "............";
+						mes "...If......there wasn't him at the time...";
+						next;
+						mes "[Rebarev Doug]";
+						mes ".............";
+						next;
+						mes "";
+						mes "- After a while, he spoke to me as if he was mad. -";
+						next;
+						mes "[Rebarev Doug]";
+						mes "Let's not talk about it. Just remember it as the reason to disband my squad.";
+						next;
+						mes "[Rebarev Doug]";
+						mes "Now, will you please go find ^0000FFThe 3rd company personnel in&out record crews^000000 in the library for me?";
+						set god_eremes,3;
+						close;
+					break;
+				}
+			}
+			else
+			{
+				mes "[Rebarev Doug]";
+				mes "I am wondering how my members are doing by now...";
+				mes "I cannot even remember when was the last time I saw them...";
+				next;
+				mes "[Rebarev Doug]";
+				mes "Hmm? Why are you still here?";
+				next;
+				switch( select( "Where should I go?", "I am about to leave." ) )
+				{
+					case 1:
+						mes "[Rebarev Doug]";
+						mes "Well...I have no clue where they are.";
+						mes "You might be able to find the information from the library.";
+						close;
+					break;
+
+					case 2:
+						mes "[Rebarev Doug]";
+						mes "Oh, are you? I see... I am wondering what they have been doing ever since we're disbanded after the ^0000FFlast mission^000000...";
+						set god_eremes,2;
+						close;
+					break;
+				}
+			}
+		}
+		else if(god_eremes > 3 && god_eremes < 18)
+		{
+			mes "[Rebarev Doug]";
+			mes "Huh? Librarian didn't let you read the record?";
+			mes "Umm...I guess if you try your best to convince him, he might change his mind.";
+			next;
+			mes "[Rebarev Doug]";
+			mes "Even if things are tough nowadays, he's just a man with a heart...";
+			next;
+			mes "[Rebarev Doug]";
+			mes "Please I beg you, please find how my members are doing...";
+			close;
+		}
+		else if(god_eremes > 17 && god_eremes < 20)
+		{
+			if(god_megin_1 > 0 || god_megin_2 > 0 || god_megin_3 > 0 || god_megin_4 > 0 || god_megin_5 > 0 || god_megin_6 > 0)
+			{
+				mes "[Rebarev Doug]";
+				mes "Oh...";
+				mes "So did you meet them?";
+				mes "Are they all okay?";
+				next;
+				mes "- You told him they are all okay other than lost their meomory and having migraines.-";
+				close;
+			}
+			mes "- You told him what you have read from the record -";
+			next;
+			mes "- that where they are and how they are. -";
+			next;
+			mes "[Rebarev Doug]";
+			mes "Oh! Have you read the record? I am glad to hear that!";
+			mes "By the way...I don't trust what was wrote on paper since it's out of date...";
+			next;
+			mes "[Rebarev Doug]";
+			mes "If it's possible, I hope you could go meet my members to find the latest news about them...";
+			mes "I mean with your ^0000FFown eyes^000000!";
+			next;
+			mes "[Rebarev Doug]";
+			mes "Please I beg you...please go find them.";
+			next;
+			mes "[Rebarev Doug]";
+			mes "I beg you...please go find them.";
+			mes "I cannot trust the old record...I am just being a poor old man who misses his friends.";
+			close;
+		}
+		else if(god_eremes > 19 && god_eremes < 23)
+		{
+			mes "[Rebarev Doug]";
+			mes "Oh~ welcome back.";
+			mes "So did you see them all? It's been a while since I saw you last time.";
+			mes "Umm? What? Why are you looking at me strange?";
+			next;
+			switch( select( "Ask him about the suspicion.", "This is not a right time to ask about the suspicion. wait." ) )
+			{
+				case 1:
+					mes "- You tried to organize your thoughts about all those suspicions you have had -";
+					next;
+					mes "- such as all the members are not on the normal condition, -";
+					next;
+					mes "- they lost their memory partially -";
+					next;
+					mes "- and about Royal Myst's comment...-";
+					next;
+					mes "- Or who is Egnigem that all members talked about? -";
+					next;
+					mes "- All these thoughts clogged your brain so you were just talking aboutissues regarding the members that were not that important.-";
+					next;
+					mes "[Rebarev Doug]";
+					mes "?!...I cannot understand what you're talking about...you're all over the place.";
+					next;
+					mes "[Rebarev Doug]";
+					mes "Stop looking at me like that, talk to me something!";
+					mes "If you are done with talking, let me excuse myself. I need to think of something.";
+					next;
+					mes "[Rebarev Doug]";
+					mes "I appreciate you for delivering me the news of my members -";
+					mes "Now, I need to go continue my research...under the commend of His Majesty.";
+					mes "May God bless you.";
+					set god_eremes,21;
+					close;
+				break;
+
+				case 2:
+					mes "- You pretended as nothing happened -";
+					next;
+					mes "- and told him about the members of the 1st squad in the 3rd platoon.-";
+					next;
+					mes "- Of course, you didn't tell him the whole truth but the stuffs you have read from the record plus some real news. -";
+					next;
+					mes "[Rebarev Doug]";
+					mes "Hmm~ I see. I am so relieved to hear they are doing okay! Hahaha...";
+					next;
+					mes "- You felt the way of him looking at you have been slightly changed. It seemed he started guarding against you?-";
+					next;
+					mes "[Rebarev Doug]";
+					mes "I appreciate you for delivering me the news of my members -";
+					mes "Now, I need to go continue my research...under the commend of His Majesty.";
+					mes "May God bless you.";
+					next;
+					mes "- You felt detestableness from his smile.-";
+					set god_eremes,22;
+					close;
+				break;
+			}
+		}
+		else if(god_eremes > 22 && god_eremes < 25)
+		{
+			mes "- While you were talking about the result of your travel, you mentioned of Egnigem.-";
+			next;
+			mes "- He didn't seem to be agitated as though he knew something more than I did.-";
+			next;
+			mes "[Rebarev Doug]";
+			mes "It is too late to talk about the issue...";
+			mes "even if I felt sorry for you to know that...?";
+			mes "However...there is nothing left that you can prove.";
+			mes "Giggle giggle giggle....";
+			next;
+			mes "[Rebarev Doug]";
+			mes "No matter how hard you struggle,";
+			mes "after all, the elite as me rules the world.";
+			mes "Giggle giggle...let them roll over the floor as cold and rotten corpses! I do not care about the low!";
+			next;
+			mes "[Rebarev Doug]";
+			mes "Do you hate me? Do you really hate me?";
+			mes "Let me tell you what you can do.";
+			next;
+			mes "[Rebarev Doug]";
+			mes "Take a look at my back. You will see a judge who is in charge of all the military crimes.";
+			next;
+			mes "[Rebarev Doug]";
+			mes "It seems he will hold a trial if at least 100 people report a same crime...";
+			mes "So, you can do it if you really want to reveal the issue to the public!";
+			mes "Muhahahahaha!";
+			close;
+		}
+		else if(god_eremes > 23 && god_eremes < 26)
+		{
+			mes "[Rebarev Doug]";
+			mes "Bah...I didn't know you would actually did it.";
+			mes "Hey...you will be sorry later...";
+			mes "After all, the elite as me rules the world.";
+			close;
+		}
+		else
+		{
+			mes "[Rebarev Doug]";
+			mes "No matter how hard you struggle,";
+			mes "after all, the elite as me rules the world.";
+			mes "Giggle giggle...let them roll over the floor as cold and rotten corpses! I do not care about the low!";
+			close;
+		}
+	}
+	else
+	{
+		mes "[Rebarev Doug]";
+		mes "You are not even at a level to speak to me.";
+		mes "Even if you are an adventurer, you are supposed to have some experience and knowledge to have a conversation with me.";
+		mes "don't you agree?";
+		close;
+	}
+}
+else
+{
+	mes "[Rebarev Doug]";
+	mes "We are crusaders who prepare a holy war under the will of Odin.";
+	mes "As we did a thousand years ago, we are waiting for the day to eliminate demons from the world.";
+	close;
+}
+
+}
+
+prt_castle.gat,48,164,0	script	Crusader#God	734,{
+
+if($God1 > 49 && $God2 < 100)
+{
+	if(god_eremes > 22 && god_eremes < 25)
+	{
+		mes "[Max Von Shedough]";
+		mes "Welcome, friend!";
+		mes "Here in the Prontera Castle, we Crusaders are busily preparing for the Holy War that is to come.";
+		next;
+		mes "[Max Von Shedough]";
+		mes "Let me introduce myself. My name is Max Von Shedough, the military judge! Do you have any business with me?";
+		next;
+		mes "^3355FFYou handed Max Von Shedough the petition against Rebarev Doug based on your investigation with Egnigem.^000000";
+		next;
+		mes "[Max Von Shedough]";
+		mes "Hm? This is serious.";
+		mes "Alright, I will investigate your claim to the best of my ability.";
+		next;
+		mes "[Max Von Shedough]";
+		mes "However, as of now, the petition you've just given me is considered classified information. Please keep this a military secret.";
+
+		set $God2,$God2+1;
+
+		if($God2 == 50)
+			announce "The 2nd seal of [Megingjard] has appeared.",bc_all;
+		else if($God1 > 99 && $God2 > 99 && $God3 > 99 && $God4 > 99)
+			announce "The four seals have been released at the same time with the seals of [Megingjard].",bc_all;
+		else if($God2 > 99)
+			announce "The seals of [Megingjard] have been released.",bc_all;
+
+		if(god_eremes == 23)
+			set god_eremes,25;
+		else if(god_eremes == 24)
+			set god_eremes,26;
+		close;
+	}
+	else if(god_eremes > 26)
+	{
+		mes "[Max Von Shedough]";
+		mes "Unfortunately, I'm not sure if it's possible to hold a trial against Rebarev Doug.";
+		next;
+		mes "[Max Von Shedough]";
+		mes "Regrettably, it seems that he still has too much influence. Still, let me assure you that I will be trying my best I am not sure if we will hold a trial with the document you have submitted or not...";
+		next;
+		mes "[Max Von Shedough]";
+		mes "But count on me, I am trying my best to get him indicted.";
+		close;
+	}
+	else
+	{
+		mes "[Max Von Shedough]";
+		mes "Welcome, my friend! This is a sacred place to prepare the holy war, the crusader commander's room.";
+		mes "Anyone who wishes to participate in the holy war will be welcomed!";
+		close;
+	}
+}
+else
+{
+	mes "[Max Von Shedough]";
+	mes "Welcome, my friend! This is a sacred place to prepare the holy war, the crusader commander's room.";
+	mes "Anyone who wishes to participate in the holy war will be welcomed!";
+	close;
+}
+
+}
+
+prt_in.gat,172,109,0	script	A File#God1	111,{
+
+if(god_eremes == 12)
+{
+	mes "You have found ^0000FF- The 3rd company personnel in&out record crews -^000000!";
+	close;
+}
+else if(god_eremes > 6 && god_eremes < 12)
+{
+	if(rand(1,10) > 6 && god_eremes > 6)
+	{
+		mes "You found a shelf filled with many files.";
+		mes "You started searching files one by one.";
+		set god_eremes,god_eremes+1;
+		close;
+	}
+	else
+	{
+		mes "You found a shelf filled with many files.";
+		mes "You started searching files one by one.";
+		close;
+	}
+}
+else if(god_eremes < 7)
+{
+	mes "[Librarian Jekan]";
+	if(Sex)
+		mes "I'm sorry sir,";
+	else
+		mes "I'm sorry ma'am,";
+	mes "but special authorization is required to browse that section. Otherwise, it's off limits.";
+	close;
+}
+else
+{
+	mes "[Librarian Jekan]";
+	mes "Please do not enter that section.";
+	next;
+	mes "- You stepped back as he told you to -";
+	close;
+}
+
+}
+
+prt_in.gat,170,109,0	script	A File#God2	111,{
+
+if(god_eremes == 12)
+{
+	mes "You have found ^0000FF- The 3rd company personnel in&out record crews -^000000!";
+	close;
+}
+else if(god_eremes > 6 && god_eremes < 12)
+{
+	if (rand(1,10) > 6 && god_eremes > 6)
+	{
+		mes "You found a shelf filled with many files.";
+		mes "You started searching files one by one.";
+		set god_eremes,god_eremes+1;
+		close;
+	}
+	else
+	{
+		mes "You found a shelf filled with many files.";
+		mes "You started searching files one by one.";
+		close;
+	}
+}
+else if(god_eremes < 7)
+{
+	mes "[Librarian Jekan]";
+	mes "Please do not enter that section.";
+	next;
+	mes "- You stepped back as he told you to -";
+	close;
+}
+else
+{
+	mes "[Librarian Jekan]";
+	mes "Please do not enter that section.";
+	next;
+	mes "- You stepped back as he told you to -";
+	close;
+}
+
+}
+
+prt_in.gat,168,109,0	script	A File#God3	111,{
+
+if(god_eremes == 12)
+{
+	mes "You have found ^0000FF- The 3rd company personnel in&out record crews -^000000!";
+	close;
+}
+else if(god_eremes > 6 && god_eremes < 12)
+{
+	if (rand(1,10) > 6 && god_eremes > 6)
+	{
+		mes "You found a shelf filled with many files.";
+		mes "You started searching files one by one.";
+		set god_eremes,god_eremes+1;
+		close;
+	}
+	else
+	{
+		mes "You found a shelf filled with many files.";
+		mes "You started searching files one by one.";
+		close;
+	}
+}
+else if(god_eremes < 7)
+{
+	mes "[Librarian Jekan]";
+	mes "Please do not enter that section.";
+	next;
+	mes "- You stepped back as he told you to -";
+	close;
+}
+else
+{
+	mes "[Librarian Jekan]";
+	mes "Please do not enter that section.";
+	next;
+	mes "- You stepped back as he told you to -";
+	close;
+}
+
+}
+
+prt_in.gat,169,109,0	script	A File#God4	111,{
+
+if(god_eremes == 12)
+{
+	mes "You have found ^0000FF- The 3rd company personnel in&out record crews -^000000!";
+	close;
+}
+else if(god_eremes > 6 && god_eremes < 12)
+{
+	if (rand(1,10) > 6 && god_eremes > 6)
+	{
+		mes "You found a shelf filled with many files.";
+		mes "You started searching files one by one.";
+		set god_eremes,god_eremes+1;
+		close;
+	}
+	else
+	{
+		mes "You found a shelf filled with many files.";
+		mes "You started searching files one by one.";
+		close;
+	}
+}
+else if(god_eremes < 7)
+{
+	mes "[Librarian Jekan]";
+	mes "Please do not enter that section.";
+	next;
+	mes "- You stepped back as he told you to -";
+	close;
+}
+else
+{
+	mes "[Librarian Jekan]";
+	mes "Please do not enter that section.";
+	next;
+	mes "- You stepped back as he told you to -";
+	close;
+}
+
+}
+
+prt_in.gat,166,109,0	script	A File#God5	111,{
+
+if(god_eremes == 12)
+{
+	mes "You have found ^0000FF- The 3rd company personnel in&out record crews -^000000!";
+	close;
+}
+else if(god_eremes > 6 && god_eremes < 12)
+{
+	if (rand(1,10) > 6 && god_eremes > 6)
+	{
+		mes "You found a shelf filled with many files.";
+		mes "You started searching files one by one.";
+		set god_eremes,god_eremes+1;
+		close;
+	}
+	else
+	{
+		mes "You found a shelf filled with many files.";
+		mes "You started searching files one by one.";
+		close;
+	}
+}
+else if(god_eremes < 7)
+{
+	mes "[Librarian Jekan]";
+	mes "Please do not enter that section.";
+	next;
+	mes "- You stepped back as he told you to -";
+	close;
+}
+else
+{
+	mes "[Librarian Jekan]";
+	mes "Please do not enter that section.";
+	next;
+	mes "- You stepped back as he told you to -";
+	close;
+}
+
+}
+
+prt_in.gat,172,106,0	script	Librarian#God	833,{
+
+if($God1 > 49 && $God2 < 100)
+{
+	if(god_eremes > 2 && god_eremes < 7)
+	{
+		mes "[Librarian Jekan]";
+		mes "Ah, please do not touch the files at this section.";
+		next;
+		mes "[Librarian Jekan]";
+		mes "Some of the information there is classified, and it is therefore prohibited by the Prontera Military to browse through them.";
+		next;
+		mes "[Librarian Jekan]";
+		mes "I'm currently in the process of searching for the classified files in that section, so that I can separate it from the information that is public domain, so I'd appreciate it if you didn't interfere with my work.";
+		next;
+		mes "[Librarian Jekan]";
+		mes "Darn it! I can't read anything when the light is this dim! It's bad enough my eyes have gone bad...";
+		next;
+		mes "[Librarian Jekan]";
+		mes "If you're looking for a book, you ought to go search through another section.";
+		next;
+			switch( select( "You have bad eyes?", "I want to read some documents.", "Let me help you find those files...", "What kind of files are you looking for?" ) )
+			{
+				case 1:
+					mes "[Librarian Jekan]";
+					mes "Since I have worked under a dim light for a long time, my eyes have gone bad.";
+					mes "They should get me ^0000FFa new light^000000, otherwise I will be gone blind sooner or later...";
+					if(god_eremes == 5 && ( countitem(2203) > 0 || countitem(1041) > 0 ) )
+					{
+						next;
+						mes "[Librarian Jekan]";
+						mes "?! Oh~ you have very useful stuff with you!";
+						mes "Do you mind if I use the stuff for a while? It will be very helpful for me to find the files!";
+						next;
+						switch( select( "Yes, I do mind.", "No, I don't mind." ) )
+						{
+							case 1:
+								mes "[Librarian Jekan]";
+								mes "...bah. Never mind then.";
+								close;
+							break;
+
+							case 2:
+								mes "[Librarian Jekan]";
+								mes "What a kind person you are!";
+								mes "Now I can believe that you really meant to help me!";
+								if(countitem(2203) && countitem(1041))
+								{
+									delitem 1041,countitem(1041);
+									delitem 2203,1;
+								}
+								else if(countitem(2203))
+									delitem 2203,1;
+								else if(countitem(1041))
+									delitem 1041,countitem(1041);
+								set god_eremes,6;
+								next;
+								mes "[Librarian Jekan]";
+								mes "Thank you, thank you so much. Now I can find the file with less worry.";
+								mes "...if it's possible, I wish you could help me to find the file...can you?";
+							break;
+
+						}
+					}
+					else if(god_eremes > 5)
+					{
+						mes "[Librarian Jekan]";
+						mes "Thank you. It will be a good help to find the file.";
+					}
+					close;
+				break;
+
+				case 2:
+					if(god_eremes == 6)
+					{
+						mes "[Librarian Jekan]";
+						mes "Read some documents? Well, you've come here to the Library. That's a good start.";
+						next;
+						mes "[Librarian Jekan]";
+						mes "Well, as long as you know what kind of document you're looking for, you might be able to find it.";
+						next;
+						mes "[Librarian Jekin]";
+						mes "Just keep in mind that this particular section is off limits for now. Why don't you check the files at the front?";
+						next;
+						mes "[Librarian Jekin]";
+						mes "I've got to find that classified file as soon as I can!";
+						set god_eremes,7;
+						close;
+					}
+					else
+					{
+						mes "[Librarian Jekan]";
+						mes "Hmm...?";
+						mes "Hey, haven't";
+						mes "I told you already?";
+						next;
+						mes "[Librarian Jekan]";
+						mes "The public is prohibited from browsing the files in this section! How many times do I need to repeat myself?";
+						close;
+					}
+				break;
+
+				case 3:
+					if(god_eremes == 4)
+					{
+						mes "[Librarian Jekan]";
+						mes "Hmm. Well, I'd gladly accept your help if it weren't for the fact that I cannot allow classified information to be released to the public.";
+						next;
+						mes "[Librarian Jekan]";
+						mes "I have no idea how something so important was shuffled into the files here in Prontera Library, but we can't allow the public to access it.";
+						next;
+						mes "[Librarian Jekan]";
+						mes "Still, that file doesn't seem to be that important, but I still have to waste my time on finding it...";
+						next;
+						mes "[Librarian Jekan]";
+						mes "Damn, my eyes are sore. Working as a government official is easy except for the times when the bureaucrats make you do stuff like this.";
+						set god_eremes,5;
+						close;
+					}
+					else if(god_eremes > 4)
+					{
+						mes "[Librarian Jekan]";
+						mes "I think I'm going to go insane looking for this file...!";
+						next;
+						mes "[Librarian Jekan]";
+						mes "Huh...?";
+						mes "Did you just say that you wanted to help me? Sure, I'd appreciate it.";
+						close;
+					}
+					else
+					{
+						mes "[Librarian Jekan]";
+						mes "Um, you're not even supposed to know what kind of file I'm looking for. Even if you did, I'm not allowed to show you what's inside!";
+						close;
+					}
+				break;
+
+				case 4:
+					mes "[Librarian Jekan]";
+					mes "Hmm. I'm not really allowed to disclose any information related to that file. I'm sorry about that.";
+					next;
+					mes "[" + strcharinfo(0) + "]";
+					mes "But isn't";
+					mes "the file about...";
+					input @str$;
+					mes "^0000FF" + @str$ + "?";
+					next;
+					if (@str$ == "The 3rd company personnel in&out record crews" || @str$ == "the 3rd company personnel in&out record crews")
+					{
+						mes "[Librarian Jekan]";
+						mes "Hmm...?";
+						mes "How did you";
+						mes "know about that?";
+						set god_eremes,4;
+						close;
+					}
+					else
+					{
+						mes "[Librarian Jekan]";
+						mes "Errmmm...";
+						mes "I don't think so....?";
+						close;
+					}	
+				break;
+			}
+	}
+	else if(god_eremes == 2)
+	{
+		mes "[Librarian Jekan]";
+		mes "Ah, please do not touch files in this section. Usually, it's public domain but it seems that a classified file managed to get misplaced there.";
+		next;
+		mes "[Librarian Jekan]";
+		mes "For now, I cannot let anyone without special authorization to look through that section. I must find that file and send it to the Prontera military as soon as I can.";
+		next;
+		mes "[Librarian Jekan]";
+		mes "Ergh! This light isn't bright enough for my eyes. They're starting to get sore again...";
+		next;
+		mes "[Librarian Jekan]";
+		mes "So what brings you here? If you're looking for something in particular, you should try another section.";
+		next;
+		switch( select( "I want to read some documents.", "Do you have bad eyes?", "Let me help you to find the files.", "What kind of files are you looking for?" ) )
+		{
+			case 1:
+				mes "[Librarian Jekan]";
+				mes "Grrrrrrr~ I told you already!";
+				mes "Files at this section are not for public exhibition, okay?";
+				mes "Why do you make me repeat the same thing over and over again?";
+				close;
+			break;
+
+			case 2:
+				mes "[Librarian Jekan]";
+				mes "Since I have worked under a dim light for a long time, my eyes have gone bad.";
+				mes "They should get me a new light, otherwise I will be gone blind sooner or later...";
+				close;
+			break;
+
+			case 3:
+				mes "[Librarian Jekan]";
+				mes "Um? How do you know what file I am looking for?";
+				mes "You don't even know what is written inside?";
+				mes "Stop interrupting me, leave!";
+				close;
+			break;
+
+			case 4:
+				mes "[Librarian Jekan]";
+				mes "Hmm. I am not supposed to reveal anything related to the file.";
+				next;
+				mes "[" + strcharinfo(0) + "]";
+				mes "Isn't the file about...";
+				input @str$;
+				mes "[" + strcharinfo(0) + "]";
+				mes "^0000FF" + @str$ + "?";
+				next;
+				mes "[Librarian Jekan]";
+				mes "Maybe...";
+				mes "Maybe not~";
+				close;
+			break;
+
+		}
+	}
+	else if(god_eremes > 6 && god_eremes < 12)
+	{
+		if(rand(1,10) > 4)
+		{
+			mes "[Librarian Jekan]";
+			mes "Hmm? So did you find it? I've been searching for that file for a long time, but I haven't been able to find it.";
+			next;
+			mes "[Librarian Jekan]";
+			mes "I'll go ahead and search the right side, so do you think you could search the left?";
+			close;
+		}
+		else
+		{
+			mes "[Librarian Jekan]";
+			mes "Did you find it yet? All this time, and I still haven't been able to dig up that file.";
+			next;
+			mes "[Librarian Jekan]";
+			mes "I'll go ahead and check the left side, so would you look for it in the middle or the right side?";
+			close;
+		}
+	}
+	else if(god_eremes == 12)
+	{
+		mes "[Librarian Jekan]";
+		mes "Ah! There it is!";
+		mes "Thank you so much! I'm glad to see that there are still kind and thoughtful people like you in the world.";
+		next;
+		mes "[Librarian Jekan]";
+		mes "I really want to give you something to show you my gratitude, but I've got to send this back to the Prontera Military right away.";
+		next;
+		menu "I want to read the document.",-;
+
+		mes "[Librarian Jekan]";
+		mes "Oh, right, you mentioned that, didn't you? It doesn't seem seem so important, but I'm not really quite sure...";
+		next;
+		mes "[Librarian Jekan]";
+		mes "Well, it couldn't hurt if I made a copy of this first for you to read, but first I'll need some materials.";
+		next;
+		mes "[Librarian Jekan]";
+		mes "I'll even cast the search magic on it, so that it'll be just like the original. All right, I need the following things to make a copy...";
+		next;
+		mes "[Librarian Jekan]";
+		mes "2 Slick Paper,";
+		mes "1 Oil Paper,";
+		mes "3 Squid Ink,";
+		mes "3 Feather of Birds and";
+		mes "20 Blue Gemstones.";
+		next;
+		mes "[Librarian Jekan]";
+		mes "Please get those as soon as possible, and I'll be here making the other preparations to make a copy.";
+		next;
+		mes "[Librarian Jekan]";
+		mes "Also, I'll keep this copy in the Library for you to read, and to prevent it from being leaked to the public. So you'll have to come visit each time you wish to read it.";
+		next;
+		mes "[Librarian Jekan]";
+		mes "Okay, now...";
+		mes "Come back here";
+		mes "as soon as you can.";
+		set god_eremes,13;
+		close;
+	}
+	else if(god_eremes == 13)
+	{
+		if(countitem(7111) > 1 && countitem(7151) && countitem(1024) > 2 && countitem(916) > 2 && countitem(717) > 19)
+		{
+			mes "[Librarian Jekan]";
+			mes "Oh, you came back. I didn't expect you to return here so quickly. Whatever's inside must be really important for you to know.";
+			next;
+			mes "[Librarian Jekan]";
+			mes "Anyway, please give me a moment while I make that copy for you.";
+			delitem 7111,2;
+			delitem 7151,1;
+			delitem 1024,3;
+			delitem 916,3;
+			delitem 717,20;
+			set god_eremes,14;
+			next;
+			mes "[Librarian Jekan]";
+			mes "Alright then...";
+			mes "I'll see you in a bit.";
+			close;
+		}
+		else
+		{
+			mes "[Librarian Jekan]";
+			mes "Have you forgotten what you need to make a copy? Alright, let me tell you again...";
+			next;
+			mes "[Librarian Jekan]";
+			mes "2 Slick Paper,";
+			mes "1 Oil Paper,";
+			mes "3 Squid Ink,";
+			mes "3 Feather of Birds and";
+			mes "20 Blue Gemstones.";
+			next;
+			mes "[Librarian Jekan]";
+			mes "Please come back with those items as soon as you can.";
+			close;
+		}
+	}
+	else if(god_eremes > 13 && god_eremes < 16)
+	{
+		if(rand(1,10) > 4)
+		{
+			mes "[Librarian Jekan]";
+			mes "Let me go over and review the document before I make a copy.";
+			close;
+		}
+		else
+		{
+			mes "[Librarian Jekan]";
+			mes "Let me go over and review the document before I make a copy.";
+			set god_eremes,god_eremes+1;
+			close;
+		}
+	}
+	else if(god_eremes == 16)
+	{
+		mes "[Librarian Jekan]";
+		mes "There you go. As I thought, the document didn't seem to contain any crucially important data.";
+		next;
+		mes "[Librarian Jekan]";
+		mes "Just remember, this copy needs to stay in the Prontera Library. That means you have to come back if you need to read the document again.";
+		set god_eremes,17;
+		close;
+	}
+	else if(god_eremes > 16)
+	{
+		mes "[Librarian Jekan]";
+		mes "Welcome, my friend!";
+		mes "So, what do you need today?";
+		next;
+			switch( select( "Search words on the document.", "Quit searching.", "Converse." ) )
+			{
+				case 1:
+					mes "- Search Magic Initiated -";
+					mes "- Please enter a keyword. -";
+					next;
+					input @str$;
+					if(@str$ == "Crusader" || @str$ == "crusader") 
+					{
+						mes "- search with the keyword : Crusader -";
+						mes "Crusader : Warriors that prepare themselves for a holy war. They are selected from well-experienced and religious swordsmen.";
+						mes "Any data regarding the military power is confidential, cannot be searched.";
+						next;
+						mes "This document is specified with the personnel in&out record of the 3rd company.";
+						set @godtemplib4,1;
+						close;
+					}
+						else if((@str$ == "The 3rd company" || @str$ == "the 3rd company" || @str$ == "The third company") && @godtemplib4)
+						{
+							mes "- search with the keyword : " + @str$ + " -";
+							mes "The 3rd company : Crusaders.";
+							mes "The 3rd comany is known as organized with the best members of crusaders,";
+							mes "there have been no report regarding the personnel in&out record of this company. However,";
+							next;
+							mes "The 3rd squad in the 1st platoon of the 3rd comany was an exception of that case,";
+							mes "the members of the 1st squad were all retired or transfered to other forces.";
+							mes "Specific information can be searched within the article about the 1st platoon.";
+							set @godtemplib1,1;
+							close;
+						}
+							else if((@str$ == "The 1st platoon" || @str$ == "the 1st platoon" || @str$ == "The first platoon") && @godtemplib1)
+							{
+								mes "- search with the keyword : " + @str$ + " -";
+								mes "The 1st platoon : The 1st platoon of the 3rd company, Crusaders.";
+								mes "Each company consists of 4 platoons, and this is only one record regarding the 3rd squad of the 1st platoon.";
+								next;
+								mes "Specific information can be searched within the article about the 3rd squad.";
+								set @godtemplib2,1;
+								close;
+							}
+								else if((@str$ == "The 3rd squad" || @str$ == "the 3rd squad" || @str$ == "The third squad") && @godtemplib2)
+								{
+									mes "- search with the keyword : " + @str$ + " -";
+									mes "The 3rd squad : Crusaders.";
+									mes "Member list who participated in ^0000FFthe last mission^000000.";
+									next;
+									mes "^0000FF : Rebarev Doug";
+									mes " : Jack O";
+									mes " : Zan.Huadoku";
+									mes " : Cuaque Donon";
+									mes " : Emma Searth";
+									mes " : Royal Myst";
+									mes " : The Nineball^000000";
+									set @godtemplib3,1;
+									if(god_eremes == 17)set god_eremes,18;
+									close;
+								}
+									else if((@str$ == "The last mission" || @str$ == "the last mission") && @godtemplib3)
+									{
+										mes "- search with the keyword : " + @str$ + " -";
+										mes "The upper part decided to disband the 3rd squad which was the best search party of the crusader force after the following mission.";
+										next;
+										mes "The 3rd squad was secretly assigned to track down ^0000FFthe signs of God^000000 under a command from the royal court.";
+										next;
+										mes "During the mission, an unexpected incident happened.";
+										mes "A member started second guessing the squad leader's leadership and ^0000FFacting on his own authority^000000.";
+										next;
+										mes "It resulted in a factional dispute. In order to solve the problem, the leader held a meeting with the others.";
+										mes "Based on other's opinions, the squad leader concluded the member's behaviour as ^0000FFinsubordination^000000,";
+										next;
+										mes "and he and other members did a physical punishment onto the member. The member was reported to be injured and dropped from the squad during the mission.";
+										next;
+										mes "Due to this disgraceful incident, the 3rd squad could not complete the mission.";
+										mes "And because of the unsatisfying mission result, the 3rd squad leader was pressed hard by the 1st platoon leader and the 3rd company commendant.";
+										next;
+										mes "The 3rd company commandant proposed disband of the 3rd squad to upper hierarchy and his proposal was accepted.";
+										mes "After the 3rd squad was disbanded, the members including the squad leader were sent to diciplinary retraining for 3 moths. After that retraining, all of them were transfered to the other squad.";
+										next;
+										mes "Currently Rebarev Doug who was the 3rd squad leader at the time have been researching the signs of God based on the mission result.";
+										mes "And the research was ordered by the King of Rune-Midgarts Kingdom.";
+										close2;
+										if(god_eremes == 18)set god_eremes,19;
+										end;
+									}
+
+						else if((@str$ == "The 1st platoon" || @str$ == "the 1st platoon" || @str$ == "The first platoon") && @godtemplib4)
+							{
+							mes "- search with the keyword : " + @str$ + " -";
+							mes "The 1st platoon : The 1st platoon of the 3rd company, Crusaders.";
+							mes "Each company consists of 4 platoons and this is the first of the four.";
+							next;
+							mes "The 1st platoon of the 1st company, Crusader force.";
+							mes "Suggested to search 'Company' a higher rank keyword.";
+							next;
+							mes "Other information is confidential, cannot be searched on this document.";
+							close;
+							}
+						else if((@str$ == "The 3rd squad" || @str$ == "the 3rd squad" || @str$ == "The third squad") && @godtemplib1) 
+							{
+							mes "- search with the keyword : " + @str$ + " -";
+							mes "The 3rd squad : Crusaders.";
+							mes "Each platoon consists of 4 squads and this is the third of the four.";
+							mes "Suggested to search 'Platoon' a higher rank keyword.";
+							next;
+							mes "Generally a squad has 8 members within.";
+							mes "Other information is confidential, cannot be searched on this document.";
+							close;
+							}
+						else if(@str$ == "The last mission" || @str$ == "the last mission") 
+						{
+							mes "- search with the keyword : " + @str$ + " -";
+							mes "- No result has been found.-";
+							mes "- Suggested to enter a specific name of the force for a better research.-";
+							close;
+						}
+					else if((@str$ == "Crusader" || @str$ == "crusader") && @godtemplib4)
+					{
+							mes "- search with a keyword : " + @str$ + " -";
+							mes "The 3rd company : Crusaders.";
+							mes "The 3rd comany is known as organized with the best members of crusaders,";
+							mes "there have been no report regarding the personnel in&out record of this company. However,";
+							next;
+							mes "The 3rd squad in the 1st platoon of the 3rd comany was an exception of that case,";
+							mes "the members of the 1st squad were all retired or transfered to other forces.";
+							mes "Specific information can be searched within the article about the 1st platoon.";
+							close;
+					}
+					else if(@str$ == "The 1st platoon" || @str$ == "the 1st platoon" || @str$ == "The first platoon")
+					{
+						mes "- search with the keyword : " + @str$ + " -";
+						mes "The 1st platoon : ";
+						mes "- No result has been found.-";
+						mes "- Suggested to enter a more specific keyword.-";
+						close;
+					}
+					else if(@str$ == "The 3rd squad" || @str$ == "the 3rd squad" || @str$ == "The third squad")
+					{
+						mes "- search with the keyword : " + @str$ + " -";
+						mes "The 3rd company : ";
+						mes "- No result has been found.-";
+						mes "- Suggested to enter a more specific keyword.-";
+						close;
+					}
+					else if((@str$ == "The last mission" || @str$ == "the last mission") && god_eremes > 17) // ¸¶Áö¸· ÀÓ¹«
+					{
+						mes "- search with the keyword : " + @str$ + " -";
+						mes "- No result has been found.-";
+						mes "- Suggested to enter a specific name of the force for a better research.-";
+						next;
+						close;
+					}
+					else if(@str$ == "Rebarev Doug")
+					{
+						mes "- search with the keyword : " + @str$ + " -";
+						mes "The former leader of the 3rd squad in the 1st platoon of the 3rd company.";
+						mes "Has been in service as an instructor of crusader boot camp with the Prontera Castle.";
+						mes "Also he's in charge of a research under a command from the royal court.";
+						close;
+					}
+					else if(@str$ == Egnigem)
+					{
+						mes "- search with the keyword : " + @str$ + " -";
+						mes "No result has been found.";
+						mes "No result has been found.";
+						mes "No result has been found.";
+						mes "No result has been found.";
+						mes "No result has been found.";
+						mes "No result has been found.";
+						mes "^FF0000This word is prohibited to research.^000000";
+						close;
+					}
+					else if(@str$ == "Zan.Huadoku")
+					{
+						mes "- search with the keyword : " + @str$ + " -";
+						mes "The former member of the 3rd squad in the 1st platoon of the 3rd company.";
+						mes "Has been in service as a weapon quartermaster in Geffen ever since the squad was disbanded.";
+						mes "Current location : Blacksmith guild, Geffen.";
+						close;
+					}
+					else if(@str$ == "Cuaque Donon")
+					{
+						mes "- search with the keyword : " + @str$ + " -";
+						mes "The former member of the 3rd squad in the 1st platoon of the 3rd company.";
+						mes "Retired from service and went back to his home town, Morroc ever since the squad was disbanded.";
+						mes "Reported to work for an inn in Morroc.";
+						close;
+					}
+					else if(@str$ == "Jack O")
+					{
+						mes "- search with the keyword : " + @str$ + " -";
+						mes "The former member of the 3rd squad in the 1st platoon of the 3rd company.";
+						mes "Has been in service as a recruiting officer in Alberta ever since the squad was disbanded.";
+						mes "Current location : Near Alberta port.";
+						close;
+					}
+					else if(@str$ == "Emma Searth")
+					{
+						mes "- search with the keyword : " + @str$ + " -";
+						mes "The former member of the 3rd squad in the 1st platoon of the 3rd company.";
+						mes "Retired from service and went to Al De Baran to do something different ever since the squad was disbanded.";
+						mes "Reported to submit a resume to the Kafra corporation.";
+						close;
+					}
+					else if(@str$ == "Royal Myst")
+					{
+						mes "- search with the keyword : " + @str$ + " -";
+						mes "The former member of the 3rd squad in the 1st platoon of the 3rd company.";
+						mes "Has been in service in Comodo ever since the squad was disbanded.";
+						mes "Current duty is unknown.";
+						mes "Current lcation : A casino in Comodo.";
+						close;
+					}
+					else if(@str$ == "The Nineball")
+					{
+						mes "- search with the keyword : " + @str$ + " -";
+						mes "The former member of the 3rd squad in the 1st platoon of the 3rd company.";
+						mes "Has been in service as the security officer of Jawaii ever since the squad was disbanded.";
+						mes "Current location : A tavern in Jawaii.";
+						close;
+					}
+					else
+					{
+						mes "- search with the keyword : " + @str$ + " -";
+						mes "- No result has been found.-";
+						close;
+					}
+				break;
+
+				case 2:
+					mes "- Search magic is being shut down.-";
+					next;
+					mes "- There is no response from the search magic.-";
+					mes "- Would you like to shut down immediately?-";
+					next;
+					mes " - If you shut down without properly closing the magic -";
+					mes "- there is a high possibility to damage unsaved data. -";
+					next;
+					mes "- ... -";
+					next;
+					mes "- ...... -";
+					next;
+					mes "- ........search magic is being shut down. -";
+					close;
+				break;
+
+				case 3:
+					mes "[Librarian Jekan]";
+					mes "You can tell our government doesn't really know how to allocate its funds and resources.";
+					next;
+					mes "[Librarian Jekan]";
+					mes "First, there's Jawaii. Do newlyweds really need an entire island for themselves? Then again, I am single so I'm probably biased.";
+					next;
+					mes "[Librarian Jekan]";
+					mes "And look at me. Geniuses aren't supposed to waste their precious time doing useless things for libraries!";
+					close;
+				break;
+			}
+	}
+	else
+	{
+		mes "[Librarian Jekan]";
+		mes "Ah, please do not touch any books in that section. ...I'm sure there's nothing there that could be useful to you.";
+		next;
+		switch( select( "Ignore him and check books.", "Step back." ) )
+		{
+			case 1:
+				mes "[Librarian Jekan]";
+				mes "Hey...!";
+				mes "I thought I said";
+				mes "not to touch those!";
+				close2;
+				warp "prontera.gat",120,264;
+				end;
+			break;
+
+			case 2:
+				mes "[Librarian Jekan]";
+				mes "Thank you. Feel free to browse through the other sections.";
+				next;
+				mes "[Librarian Jekan]";
+				mes "It's really nice to have visitors in the Library, especially when so many people don't read books nowadays.";
+				close;
+			break;
+		}
+	}
+}
+else
+{
+	mes "[Librarian Jekan]";
+	mes "Ah, please do not touch any books in that section.";
+	mes "....there is nothing much useful for you there.";
+	next;
+	switch( select( "Ignore him and check books.", "Step back." ) )
+	{
+		case 1:
+			mes "[Librarian Jekan]";
+			mes "I told you not to touch books there!";
+			close2;
+			warp "prontera.gat",120,264;
+			end;
+		break;
+
+		case 2:
+			mes "[Librarian Jekan]";
+			mes "Good, you may go check other sections though.";
+			mes "It's good to see a man visiting a library when people don't read books nowadays.";
+			close;
+		break;
+	}
+}
+
+}
+
+geffen_in.gat,109,161,3	script	Crusader#God1	751,{
+
+if($God1 > 49 && $God2 < 100)
+{
+	if(god_eremes > 17 && god_megin_1 < 2)
+	{
+		mes "[Zan.Huadoku]";
+		mes "^333333*Phew...*^000000";
+		mes "This work is really getting to me. Going on a mission with my war buddies sounds a lot better than this.";
+		next;
+		mes "[Zan.Huadoku]";
+		mes "At least in those days, I felt like I was actually doing something useful!";
+		next;
+		mes "[Zan.Huadoku]";
+		mes "Hey...";
+		mes "Can I help you";
+		mes "with anything?";
+		next;
+		switch( select( "Ask him about the 3rd squad.", "Ask him how he's been doing.", "Ask him about the 3rd Squad's last mission." ) )
+		{
+			case 1:
+				if(god_eremes == 18)
+				{
+					mes "[Zan.Huadoku]";
+					mes "Yeah, I was a member of the 3rd squad in the 1st platoon a long time ago. How did you know that?";
+					next;
+					mes "[Zan.Huadoku]";
+					mes "I miss the guys back in the squad. I wonder how our leader's been doing recently...";
+					next;
+					mes "^3355FFYou tell Zan about Rebarev Doug, and about how he is now an instructor for Crusader Boot Camp. He seems to be absorbed in his thoughts of the past.^000000";
+					close;
+				}
+				else if(god_eremes > 18)
+				{
+					mes "[Zan.Huadoku]";
+					mes "Yeah, I was a member of the 3rd squad in the 1st platoon a long time ago. How did you know that?";
+					next;
+					mes "[Zan.Huadoku]";
+					mes "I miss the guys back in the squad. I wonder how our leader's been doing recently...";
+					next;
+					mes "^3355FFYou tell Zan about Rebarev Doug, and about how he is now an instructor for Crusader Boot Camp. He seems to be absorbed in his thoughts of the past.^000000";
+					next;
+					mes "[Zan.Huadoku]";
+					mes "...";
+					mes "......";
+					next;
+					mes "[Zan.Huadoku]";
+					mes "Before we went out on our last mission, the seven of us were like brothers and sisters. If ^FF0000he^000000 didn't disobey the order, we'd still be together today.";
+					next;
+					mes "[Zan.Huadoku]";
+					mes "Wait, what was his name...? That's weird. There's no way I could forget something like that...";
+					next;
+					mes "[Zan.Huadoku]";
+					mes "H-how can I not remember his name! He's the reason my life is...!";
+					next;
+					mes "[Zan.Huadoku]";
+					mes "^333333*Groan...*^000000";
+					mes "I.... My head...";
+					mes "My head hurts...";
+					next;
+					mes "[Zan.Huadoku]";
+					mes "^3355FFZan looks very confused and his eyes begin to glaze with a dazed look. You try speaking to him again, but he doesn't respond at all.^000000";
+					if(!god_megin_1)set god_megin_1,1;
+					close;
+				}
+			break;
+
+			case 2:
+				mes "[Zan.Huadoku]";
+				mes "How am I been doing?";
+				mes "Well, I work for the Blacksmith Guild, picking out good weapons to supply the Crusaders.";
+				next;
+				mes "[Zan.Huadoku]";
+				mes "Sometimes, I get really bored with what I'm doing. I keep trying to convince myself that my job's important to future Crusaders, but...";
+				next;
+				mes "[Zan.Huadoku]";
+				mes "You know what? A lot of people have been asking me weird questions about me recently. I feel like I'm getting spied on, but maybe I'm just getting paranoid.";
+				close;
+			break;
+
+			case 3:
+				if(god_eremes == 18)
+				{
+					mes "[Zan.Huadoku]";
+					mes "Yeah, on our";
+					mes "final mission...";
+					next;
+					mes "[Zan.Huadoku]";
+					mes "Final...? What the? I know it happened, but for some reason, all I can envision is a complete blank when I try to think about it.";
+					next;
+					mes "[Zan.Huadoku]";
+					mes "I...";
+					mes "I guess I need something to remind me? I know it happened, but... I'm so confused.";
+					next;
+					mes "^3355FFZan seems to be having a very difficult time recalling that specific memory of his past.^000000";
+					close;
+				}
+				else if(god_eremes > 18 && god_megin_1 > 0)
+				{
+					mes "[Zan.Huadoku]";
+					mes "The last mission...";
+					next;
+					mes "[Zan.Huadoku]";
+					mes "Umm...I cannot recall any memory about the mission...maybe I need a clue.";
+					next;
+					mes "- He seemed to have a hard time to remember something. -";
+					next;
+					mes "- You started telling him what you have read from the document.-";
+					next;
+					mes ".....";
+					next;
+					mes "The upper part decided to disband the 3rd squad which was the best search party of the crusader force after the following mission.";
+					next;
+					mes "The 3rd squad was secretly assigned to track down ^0000FFthe signs of God^000000 under a command from the royal court.";
+					next;
+					mes "During the mission, an unexpected incident happened.";
+					mes "A member started second guessing the squad leader's leadership and ^0000FFacting on his own authority^000000.";
+					next;
+					mes "It resulted in a factional dispute. In order to solve the problem, the leader held a meeting with the others.";
+					mes "Based on other's opinions, the squad leader concluded the member's behaviour as ^0000FFinsubordination^000000,";
+					next;
+					mes "and he and other members did a physical punishment onto the member. The member was reported to be injured and dropped from the squad during the mission.";
+					next;
+					mes "Due to this disgraceful incident, the 3rd squad could not complete the mission.";
+					mes "And because of the unsatisfying mission result, the 3rd squad leader was pressed hard by the 1st platoon leader and the 3rd company commendant.";
+					next;
+					mes "The 3rd company commandant proposed disband of the 3rd squad to upper hierarchy and his proposal was accepted.";
+					mes "After the 3rd squad was disbanded, the members including the squad leader were sent to diciplinary retraining for 3 moths. After that retraining, all of them were transfered to the other squad.";
+					next;
+					mes "Currently Rebarev Doug who was the 3rd squad leader at the time have been researching the signs of God based on the mission result.";
+					mes "And the research was ordered by the King of Rune-Midgarts Kingdom.";
+					next;
+					mes ".....................";
+					next;
+					mes "............";
+					next;
+					mes ".....";
+					next;
+					mes "[Zan.Huadoku]";
+					mes "Y-yeah that's right! And then three days after we started the mission, we found some kind of...";
+					next;
+					mes "[Zan.Huadoku]";
+					mes "Well, I'm not sure what it was. But we found an ^0000FFunknown fragment^000000 that was a sign from God! And then...!";
+					next;
+					mes "[Zan.Huadoku]";
+					mes "And then...";
+					mes "Oh. Oh God.";
+					mes "I can't remember...";
+					next;
+					mes "[Zan.Huadoku]";
+					mes "I can't think about anything further than that. I can't even remember what we found. But I'm sure it was damned important.";
+					next;
+					mes "^3355FFZan stood still in silence, with a pained look on his face.^000000";
+					if(god_megin_1 == 1)set god_megin_1,2;
+					close;
+				}
+				else
+				{
+					mes "[Zan.Huadoku]";
+					mes "The last mission...";
+					next;
+					mes "[Zan.Huadoku]";
+					mes "Umm...I cannot recall any memory about the mission...maybe I need a clue.";
+					next;
+					mes "- He seemed to have a hard time to remember something. -";
+					close;
+				}
+			break;
+		}
+	}
+	else if(god_megin_1 > 1 && god_megin_1 < 3)
+	{
+		mes ".....................";
+		next;
+		mes "............";
+		next;
+		mes ".....";
+		next;
+		mes "[Zan.Huadoku]";
+		mes "I recalled something.";
+		mes "3 days later from the day we started our mission, we found ^0000FFan unknown fragment^000000 that was a sign of God!";
+		mes "And then...";
+		mes "And then...";
+		mes "And then...";
+		next;
+		mes "[Zan.Huadoku]";
+		mes "I am sorry...I cannot remember more than that...";
+		mes "I cannot even remember what it was that we found...";
+		mes "I have been suffering ^0000FFever since the 3 months^000000 later...";
+		next;
+		mes "- He stood still with a painful look on his face.-";
+		set god_megin_1,3;
+		close;
+	}
+	else if(god_megin_1 > 2)
+	{
+		mes "^3355FFGrabbing his head, tearing his hair and writhing in Agony, Zan kept repeating the same words over and over again...^000000";
+		next;
+		mes "[Zan.Huadoku]";
+		mes "3 days later! We f-found some ^0000FFfragment^000000! It was G-God's sign! But why can't I remember?! Why?!";
+		close;
+	}
+	else
+	{
+		mes "[Zan.Huadoku]";
+		mes "Hey yo.";
+		mes "Can I help you?";
+		close;
+	}
+}
+else
+{
+	mes "[Zan.Huadoku]";
+	mes "Good day!";
+	mes "Do you know the";
+	mes "importance of supply?";
+	next;
+	switch( select( "No.", "Yes!" ) )
+	{
+		case 1:
+			mes "[Zan.Huadoku]";
+			mes "Any military force or party needs their supplies to be replenished if they are to continue battling for a prolonged period of time.";
+			next;
+			mes "[Zan.Huadoku]";
+			mes "For instance, let's say your group go on hunting without a healer. In this case, everyone would consume health restoration items, like potions.";
+			next;
+			mes "[Zan.Huadoku]";
+			mes "Since you can only carry so many items at once, you'll eventually run out of potions.";
+			next;
+			mes "[Zan.Huadoku]";
+			mes "But if one of your party members traveled between town and the hunting area, he could supply your party with new healing items.";
+			next;
+			mes "[Zan.Huadoku]";
+			mes "Supplying your party in this way would let you hunt with less worry. For that duty, the Merchant class would be the best by using their Carts.";
+			next;
+			mes "[Zan.Huadoku]";
+			mes "I suppose that's why I'm working here in the Blacksmith Guild. As weapon quartermaster, I'm obligated to provide supplies for the Crusader forces.";
+			next;
+			mes "[Zan.Huadoku]";
+			mes "The Blacksmiths in this guild also help me provide high quality weapons for the Crusades as well.";
+			next;
+			mes "[Zan.Huadoku]";
+			mes "If you happen to run out of health items while hunting, why don't you ask a Merchant for help?";
+			next;
+			mes "[Zan.Huadoku]";
+			mes "Most likely, they will have some spare items and would be willing to share with you if you ask nicely enough.";
+			next;
+			mes "[Zan.Huadoku]";
+			mes "I hope to see you later again! May Odin protect you on your journeys.";
+			close;
+		break;
+
+		case 2:
+			mes "[Zan.Huadoku]";
+			mes "Oh...";
+			mes "Well then.";
+			mes "In that case.";
+			next;
+			mes "[Zan.Huadoku]";
+			mes "Let me tell you about some useful knowledge I learned while working with the Blacksmiths.";
+			next;
+			mes "[Zan.Huadoku]";
+			mes "A Blacksmith character's forging skills are affected by the DEX and LUK stats. DEX and LUK also affect the item creation skills for Alchemists.";
+			next;
+			mes "[Zan.Huadoku]";
+			mes "Since I've been staying here in the Blacksmith guild, I'm trying to better understand Blacksmiths and develop a deeper appreciation of their work.";
+			next;
+			mes "[Zan.Huadoku]";
+			mes "Alright then...";
+			mes "Take it easy.";
+			close;
+		break;
+	}
+}
+
+}
+
+morocc_in.gat,146,179,0	script	Employee#God1	66,{
+
+if($God1 > 49 && $God2 < 100)
+{
+	if(god_eremes > 17 && god_megin_2 < 1)
+	{
+		mes "^3355FFThe Inn Employee eyes you suspiciously.^000000";
+		next;
+		mes "[Inn Employee]";
+		mes "May I help you?";
+		next;
+		mes "[Inn Employee]";
+		mes "Excuse me.";
+		mes "How can I help you?";
+		next;
+		input @str$;
+		if (@str$ == "Cuaque Donon" || @str$ == "Cuaque" || @str$ == "Donon")
+		{
+			mes "[" + strcharinfo(0) + "]";
+			mes "Do you happen to know a person named " + @str$ + " ...?";
+			if (god_eremes == 18)
+			{
+				mes "[Inn Employee]";
+				mes "I don't think I know that person. I guess that guy left before I started working here, maybe?";
+				close;
+			}
+			else if(god_eremes > 18)
+			{
+				next;
+				mes "^3355FFOnce you said that name, she immediately drew closer to you and began speaking in a low, threatening tone.^000000";
+				next;
+				mes "[Scary Inn Employee]";
+				mes "Who the hell are you? If you try anything funny, I'll rip your heart out!";
+				next;
+				mes "[Ms. Scary Inn Employee]";
+				mes "Why are you so curious?! Are you one of them?! How the hell did you find me?!";
+				next;
+				switch( select( "Rebarev Doug is wondering about you.", "I am wondering why he's hiding.", "Just a curiosity." ) )
+				{
+					case 1:
+						if(rand(1,10) > 3)
+						{
+							mes "[Ms. Scary Inn Employee]";
+							mes "Hah!...yeah, I was told thousand times about that.";
+							mes "That old must be afraid of the rumor spreaded to public...";
+							mes "...he must be that desperate to send men to find me.";
+							next;
+							mes "[Ms. Scary Inn Employee]";
+							mes "However!";
+							mes "I am not in the mood for guiding you to him today!";
+							next;
+							mes "- As she released the grip of a sword, -";
+							mes "- she hit you with might by the nape of your neck. -";
+							close2;
+							percentheal -100,0;
+							end;
+						}
+						else
+						{
+							mes "[Ms. Scary Inn Employee]";
+							mes "Hah!...yeah, I was told thousand times about that.";
+							mes "That old must be afraid of the rumor spreaded to public...";
+							mes "...he must be that desperate to send men to find me.";
+							next;
+							mes "[Ms. Scary Inn Employee]";
+							mes "Okay, I think it's the time to give out a hint to the old dog. But, you got only one chance to listen to me.";
+							next;
+							mes "- She whispered to your ears.-";
+							mes "^0000FFAragham never hoarded upgrade items.^000000";
+							set god_megin_2,1;
+							close;
+						}
+					break;
+
+					case 2:
+						if(rand(1,10) > 4)
+						{
+							mes "[Ms. Scary Inn Employee]";
+							mes "Bah...since you are here, that means you know why he has hid himself in here.";
+							mes "I cannot trust you as I saw you lying.";
+							next;
+							mes "[Ms. Scary Inn Employee]";
+							mes "It's the time to go to bed!";
+							mes "I am not in the mood for guiding you to him today!";
+							next;
+							mes "- As she released the grip of a sword, -";
+							mes "- she hit you with might by the nape of your neck. -";
+							close2;
+							percentheal -100,0;
+						}
+						else
+						{
+							mes "[Ms. Scary Inn Employee]";
+							mes "Bah...since you are here, that means you know why he has hid himself in here.";
+							mes "You're a sly dog, aren't you?";
+							next;
+							mes "[Ms. Scary Inn Employee]";
+							mes "Well, I don't think a hint will do any harm. Somehow you don't look that dangerous.";
+							next;
+							mes "- She whispered to your ears.-";
+							mes "^0000FFAragham never hoarded upgrade items.^000000";
+							set god_megin_2,1;
+							close;
+						}
+					break;
+
+					case 3:
+						if (rand(1,10) > 3)
+						{
+							mes "[Ms. Scary Inn Employee]";
+							mes "Just a curiosity? Hahaha!";
+							mes "You have a lot of guts, don't you?";
+							next;
+							mes "[Ms. Scary Inn Employee]";
+							mes "I am sorry to tell you this...but";
+							next;
+							mes "[Ms. Scary Inn Employee]";
+							mes "You are the type of a man that";
+							mes "I hate the most!";
+							next;
+							mes "- As she released the grip of a sword, -";
+							mes "- she hit you with might by the nape of your neck. -";
+							close2;
+							percentheal -100,0;
+							end;
+						}
+						else
+						{
+							mes "[Ms. Scary Inn Employee]";
+							mes "Just a curiosity? Hahaha!";
+							mes "You have a lot of guts, don't you?";
+							next;
+							mes "[Ms. Scary Inn Employee]";
+							mes "Oh well, sometimes that can be looked as cute.";
+							mes "Listen to me well, I am giving you only one chance.";
+							next;
+							mes "- She whispered to your ears.-";
+							mes "^0000FFAragham never hoarded upgrade items.^000000";
+							set god_megin_2,1;
+							close;
+						}
+					break;
+				}
+			}
+		}
+		else
+		{
+			mes "[Inn Employee]";
+			mes "......?";
+			mes "I am sorry but I think you misunderstood something here.";
+			close;
+		}
+	}
+	else if(god_megin_2 > 0)
+	{
+		mes "[Inn Employee]";
+		mes "How can I help you?";
+		next;
+		mes "[Inn Employee]";
+		mes "Welcome to the inn.";
+		mes "When you move to the entrance, you can also enter a PvP zone though a PvP doorman.";
+		next;
+		mes "[Inn Employee]";
+		mes "Usually you can visit inns in big towns.";
+		mes "If you want to take some rest or to compete your power with others, this is the place where you come.";
+		next;
+		mes "- She welcomed you with professional manner as though there was nothing happened. -";
+		close;
+	}
+	else
+	{
+		mes "[Inn Employee]";
+		mes "How can I help you?";
+		next;
+		mes "[Inn Employee]";
+		mes "Welcome to the inn.";
+		mes "When you move to the entrance, you can also enter a PvP zone though a PvP doorman.";
+		next;
+		mes "[Inn Employee]";
+		mes "Usually you can visit inns in big towns.";
+		mes "If you want to take some rest or to compete your power with others, this is the place where you come.";
+		close;
+	}
+}
+else
+{
+	mes "[Inn Employee]";
+	mes "How can I help you?";
+	next;
+	mes "[Inn Employee]";
+	mes "Welcome to the inn.";
+	mes "When you move to the entrance, you can also enter a PvP zone though a PvP doorman.";
+	next;
+	mes "[Inn Employee]";
+	mes "Usually you can visit inns in big towns.";
+	mes "If you want to take some rest or to compete your power with others, this is the place where you come.";
+	next;
+	mes "[Inn Employee]";
+	mes "Oh, also I have a secret to tell you...";
+	mes "I was told that the inn master is planning some kind of shady business.";
+	next;
+	mes "[Inn Employee]";
+	mes " - I think it was called as 'the rest project for all' or something...";
+	next;
+	mes "[Inn Employee]";
+	mes "But don't tell anyone that I told you this, please!";
+	close;
+}
+
+}
+
+in_rogue.gat,243,61,0	script	Suspicious Man#God	748,{
+
+	if($God1 > 49 && $God2 < 100)
+{
+		if(god_eremes == 18)
+	{
+		mes "[Cuaque Donon]";
+		mes "Wha...what are you! How the hell did you come in here!";
+		mes "Get away, get away from me!";
+		mes "Geeeet awwwway!";
+		close;
+	}
+		else if(god_eremes > 18)
+	{
+			if(god_megin_2 > 0 && god_megin_2 < 4)
+		{
+			mes "[Cuaque Donon]";
+			mes "Wha...what are you! How the hell did you come in here!";
+			mes "Get away, get away from me!";
+			mes "Geeeet awwwway!";
+			next;
+			mes "- You tried your best to make him calm down and told him what you have found from the document.-";
+			next;
+				if (countitem(740) > 0 || countitem(741) > 0 || countitem(742) > 0 || countitem(743) > 0 || countitem(750) > 0 || countitem(751) > 0 || countitem(752) > 0 || countitem(753) > 0 || countitem(754) > 0 || countitem(7206) > 0 || countitem(7212) > 0)
+			{
+				mes "- You pulled out a doll and used it as though it spoke to him a story. -";
+			}
+				else
+			{
+				mes "The upper part decided to disband the 3rd squad which was the best search party of the crusader force after the following mission.";
+				next;
+				mes "The 3rd squad was secretly assigned to track down ^0000FFthe signs of God^000000 under a command from the royal court.";
+				next;
+				mes "During the mission, an unexpected incident happened.";
+				mes "A member started second guessing the squad leader's leadership and ^0000FFacting on his own authority^000000.";
+				next;
+				mes "It resulted in a factional dispute. In order to solve the problem, the leader held a meeting with the others.";
+				mes "Based on other's opinions, the squad leader concluded the member's behaviour as ^0000FFinsubordination^000000,";
+				next;
+				mes "and he and other members did a physical punishment onto the member. The member was reported to be injured and dropped from the squad during the mission.";
+				next;
+				mes "Due to this disgraceful incident, the 3rd squad could not complete the mission.";
+				mes "And because of the unsatisfying mission result, the 3rd squad leader was pressed hard by the 1st platoon leader and the 3rd company commendant.";
+				next;
+				mes "The 3rd company commandant proposed disband of the 3rd squad to upper hierarchy and his proposal was accepted.";
+				mes "After the 3rd squad was disbanded, the members including the squad leader were sent to diciplinary retraining for 3 moths. After that retraining, all of them were transfered to the other squad.";
+				next;
+				mes "Currently Rebarev Doug who was the 3rd squad leader at the time have been researching the signs of God based on the mission result.";
+				mes "And the research was ordered by the King of Rune-Midgarts Kingdom.";
+				next;
+				mes "-You must find something that can make him calm down.-";
+				next;
+				mes "- As you saw him acting like a child, it would be a good idea to bring something that is attractive to children. -";
+				close;
+			}
+
+			next;
+			mes "- He was nodded his head and chewing his finger happily just like children do when they're happy. -";
+			next;
+			mes "- He seemed to be fine enough to be asked few questions.-";
+			next;
+				switch( select( "Ask him about the inn maid.", "Ask him how he's been doing.", "Ask him about the last mission of the 3rd squad." ) )
+			{
+				case 1:
+					mes "[Cuaque Donon]";
+					mes "She...she's my sister.";
+					mes "And she's also a rogue.";
+					mes "When I was retired from service....";
+					next;
+					mes "[Cuaque Donon]";
+					mes ".................";
+					next;
+					mes "[Cuaque Donon]";
+					mes "My family always expected more than I could do from me ever since I was born.";
+					mes "That was why I volunteered to be a crusader.";
+					mes "Crusader is not only a highly respectable but also a well-paying job...";
+					mes "And I was retired from service.";
+					next;
+					mes "[Cuaque Donon]";
+					mes "My sister was so upset at me...at that time.";
+					mes "She is the only one I have...she was so upset";
+					mes "at the fact that I messed up...";
+					next;
+					mes "[Cuaque Donon]";
+					mes "And she got me a job in the inn";
+					mes "even after yelling at me that I am worthless, she got me a job anyway.";
+					next;
+					mes "[Cuaque Donon]";
+					mes "Since when, I have noticed that there have been many people visiting me for some reason.";
+					mes "It seemed they wanted something from me...awwwwwwwwwww....my head..! My head is hurt!";
+					next;
+					mes "[Cuaque Donon]";
+					mes "...I don't know what I have said to them.";
+					mes "They were all excited at what I said and they tried to hurt me.";
+					next;
+					mes "[Cuaque Donon]";
+					mes "So, she hid me here.";
+					mes "But, I am so bored to be alone. A guy in the downstairs always do nothing but yelling at me...";
+					mes "He always yells at me to leave.";
+					next;
+					mes "[Cuaque Donon]";
+					mes "Even the rogue guild where my sister is in sometimes come to listen to me.";
+					mes "And they are always excited just like the others and yell at me to say something I am supposed to know.";
+					next;
+					mes "[Cuaque Donon]";
+					mes "I am telling you, I cannot remember anything!";
+					mes "I know this place is safe from those dangerous people.";
+					next;
+					mes "[Cuaque Donon]";
+					mes "She is the only one I have now...still I don't want her to be upset at me.";
+					next;
+					mes "[Cuaque Donon]";
+					mes "She said I must tell the rogue guild guys what I know...otherwise they will not protect her and me any longer.";
+					mes "She looked sad when she sad that...";
+						if (god_megin_2 == 2)
+					{
+						next;
+						mes "[Cuaque Donon]";
+						mes "Oh, I remember something.";
+						mes "She told me not to tell anyone but I am gonna tell you...";
+						next;
+						mes "- He whispered to your ears.-";
+						next;
+						mes "[Cuaque Donon]";
+						mes "She said...it seems rogue guild wants something from me.";
+						mes "So she's gonna send me good people that she trust and that can help me.";
+						next;
+						mes "[Cuaque Donon]";
+						mes "But still this is the safest place to stay for a while.";
+						mes "At the same time, I am always ready to run...";
+						set god_megin_2,3;
+						close;
+					}
+					close;
+				break;
+
+				case 2:
+					mes "[Cuaque Donon]";
+					mes "How have I been doing?";
+					mes "I am afraid of the people visiting me with purpose.";
+					next;
+					mes "[Cuaque Donon]";
+					mes "Rogue guild promised to protect me...but they scared the hell out of me sometimes by coming out of the floor without a warning.";
+					mes "Ah, and my sister said she's gonna complain to my ex boss about something.";
+					next;
+					mes "[Cuaque Donon]";
+					mes "She said I was okay before. But ever since I was retired from the service, I have acted strange...";
+					next;
+					mes "[Cuaque Donon]";
+					mes "But he doesn't want to meet my sister...that's what she said. So she's gonna ask a help to her rogue guild to spread some kind of rumors...";
+					mes "Like a rumor that anyone who volunteers to crusader through my ex boss will become retarded....";
+					next;
+					mes "[Cuaque Donon]";
+					mes "That's how I have been recently.";
+					if (god_megin_2 == 1) set god_megin_2,2;
+					close;
+				break;
+
+				case 3:
+					mes "[Cuaque Donon]";
+					mes "I don't know...I cannot remember it...";
+						if (god_megin_2 == 3)
+					{
+						next;
+						mes "[Cuaque Donon]";
+						mes "?!... Wait, I just remembered a thing...";
+						mes "I saw ^0000FFMegingjard^000000. That thing looked like a fragment of something, but I knew its name was Megingjard without being told.";
+						next;
+							if (rand(1,10) > 4)
+						{
+								switch( select( "^FF0000Megingjard^000000!", "^FFFFFFListen to him quitely^000000." ) )
+							{
+								case 1:
+									mes "[Cuaque Donon]";
+									mes "Waaaaaaaaaaaaahhhhhhh!";
+									mes "You are same as others! Go away from me!";
+									set god_megin_2,0;
+									close;
+								break;
+
+								case 2:
+									mes "[Cuaque Donon]";
+									mes "And...that night...I heard ^0000FFhe^000000 had an argue with the leader.";
+									mes "I was keeping a night watch and happened to hear thm arguing.";
+									next;
+									mes "[Cuaque Donon]";
+									mes "I cannot remember anything other than that.";
+									set god_megin_2,4;
+									close;
+								break;
+							}
+						}
+							else
+						{
+								switch( select( "^FF0000Megingjard^000000!", "^FFFFFFMegingjard!^000000.", "^FFFFFFListen to him quitely^000000" ) )
+							{
+								case 1:
+									mes "[Cuaque Donon]";
+									mes "Waaaaaaaaaaaaahhhhhhh!";
+									mes "You are same as others! Go away from me!";
+									set god_megin_2,0;
+									close;
+								break;
+
+								case 2:
+									mes "[Cuaque Donon]";
+									mes "Waaaaaaaaaaaaahhhhhhh!";
+									mes "You are same as others! Go away from me!";
+									set god_megin_2,0;
+									close;
+								break;
+								case 3:
+									mes "[Cuaque Donon]";
+									mes "And...that night...I heard ^0000FFhe^000000 had an argue with the leader.";
+									mes "I was keeping a night watch and happened to hear thm arguing.";
+									next;
+									mes "[Cuaque Donon]";
+									mes "I cannot remember anything other than that.";
+									set god_megin_2,4;
+									close;
+								break;
+							}
+						}
+					}
+					close;
+				break;
+			}
+		}
+			else if(god_megin_2 == 4)
+		{
+			mes "[Cuaque Donon]";
+			mes "And...that night...I heard ^0000FFhe^000000 had an argue with the leader.";
+			mes "I was keeping a night watch and happened to hear thm arguing.";
+			next;
+			mes "[Cuaque Donon]";
+			mes "I cannot remember anything other than that.";
+			next;
+			mes "[Cuaque Donon]";
+			mes "Sleepy...my head is hurting. I want to rest now...";
+			close;
+		}
+			else
+		{
+			mes "[Cuaque Donon]";
+			mes "Wha...what are you! How the hell did you come in here!";
+			mes "Get away, get away from me!";
+			mes "Geeeet awwwway!";
+			close;
+		}
+	}
+}
+	else
+{
+	mes "[Cuaque Donon]";
+	mes "Wha...what are you! How the hell did you come in here!";
+	mes "Wahhhhh! My head...my head is hurting so bad!";
+	mes "I am scared! I am scared!";
+	close;
+}
+
+}
+
+alberta.gat,196,146,0	script	Crusader#megin2	751,{
+
+	if ($God1 > 49 && $God2 < 100)
+{
+		if(god_eremes == 18)
+	{
+		mes "[Jack O]";
+		mes "^333333*Yawn...*^000000";
+		mes "It's quiet and boring, as per usual. Let's see if there's any Swordmen I can recruit today.";
+		next;
+		mes "[Jack O]";
+		mes "Eh...?";
+		next;
+			switch( select( "Ask him about Rebarev Doug.", "Ask him how he's been doing.", "Ask him about the last mission of the 3rd squad." ) )
+		{
+			case 1:
+				mes "[Jack O]";
+				mes "Ah! Yeah, our old leader back in the 3rd Squad. Heh. I haven't seen him since we were disbanded.";
+				close;
+			break;
+
+			case 2:
+				mes "[Jack O]";
+				mes "Me? Yeah, I'm always busy recruiting future Crusaders.";
+				mes "We always welcome Swordmen";
+				mes "of great ability!";
+				next;
+				mes "[Jack O]";
+				mes "How does it sound? Why don't you volunteer to become a Crusader?";
+				close;
+			break;
+
+			case 3:
+				mes "[Jack O]";
+				mes "Last mission?";
+				mes "Eh, I don't really remember it.";
+				close;
+			break;
+		}
+	}
+		else if(god_eremes > 18)
+	{
+			if (god_megin_3 == 0 || god_megin_3 == 1)
+		{
+			mes "[Jack O]";
+			mes "*yawn*...so boring.";
+			mes "Let's see...if there is any swordsman I can recruit...?";
+			next;
+			mes "[Jack O]";
+			mes "Umm...?";
+			next;
+				switch( select( "Ask him about Rebarev Doug.", "Ask him how he's been doing.", "Ask about 3rd Squad's final mission." ) )
+			{
+				case 1:
+						if (god_megin_3 == 1)
+					{
+						mes "[Jack O]";
+						mes "Ah right. Our old leader.";
+						mes "Now I remember: He was";
+						mes "a pretty self righteous jerk";
+						mes "now that I think about it!";
+						next;
+						mes "[Jack O]";
+						mes "Can you believe he used to say that ^0000FFno one is more religious than him in this world^000000?! That's egoism right there. And maybe insanity.";
+						next;
+						mes "[Jack O]";
+						mes "Anyway, everyone in the squad";
+						mes "took pride in their faith. When";
+						mes "you're having a rough time in the";
+						mes "real world, you depend on religion, you know?";
+						next;
+						mes "[Jack O]";
+						mes "Anyways, in the records about";
+						mes "our squad, it says that one of us was punished for insubordination, rebelling or something. That's";
+						mes "a complete lie.";
+						next;
+						mes "[Jack O]";
+						mes "During our final mission,";
+						mes "our old leader had a huge argument with one us over something we found. I remember it being some kind of godly artifact, but I can't clearly remember what it was.";
+						next;
+						mes "[Jack O]";
+						mes "Although there was an obvious dispute, I think it was our squad leader who was out of line.";
+						mes "I... I can't really say...";
+						next;
+						mes "[Jack O]";
+						mes "I can't for the life of me";
+						mes "remember how the guy who";
+						mes "argued with the squad leader";
+						mes "looked like. The higher-ups";
+						mes "musta did something to me...";
+						next;
+						mes "[Jack O]";
+						mes "Anyway, I know for sure that whatever that guy did, it wasn't insubordination. In fact, I think he might've been right!";
+						next;
+						mes "[Jack O]";
+						mes "That's all I can remember.";
+						mes "I better take some Green Herbs now. My head throbs like crazy whenever I think about that time.";
+						set god_megin_3,2;
+						close;
+					}
+						else
+					{
+						mes "[Jack O]";
+						mes "Ah! Yeah, our old leader back in the 3rd Squad. Heh. I haven't seen him since we were disbanded.";
+						close;
+					}
+				break;
+
+				case 2:
+					mes "[Jack O]";
+					mes "Me? Yeah, I'm not doing so bad. Keeping busy recruiting future Crusaders. We welcome all";
+					mes "Swordmen if they show potential~";
+					close;
+				break;
+
+				case 3:
+					mes "[Jack O]";
+					mes "Huh...?";
+					mes "Why would";
+					mes "you want to know?";
+					next;
+					mes "- You told him what you have found from the document. -";
+					next;
+					mes "^0000FFThe last mission of the 3rd squad^000000";
+					mes "The upper part decided to disband the 3rd squad which was the best search party of the crusader force after the following mission.";
+					next;
+					mes "The 3rd squad was secretly assigned to track down ^0000FFthe signs of God^000000 under a command from the royal court.";
+					next;
+					mes "During the mission, an unexpected incident happened.";
+					mes "A member started second guessing the squad leader's leadership and ^0000FFacting on his own authority^000000.";
+					next;
+					mes "It resulted in a factional dispute. In order to solve the problem, the leader held a meeting with the others.";
+					mes "Based on other's opinions, the squad leader concluded the member's behaviour as ^0000FFinsubordination^000000,";
+					next;
+					mes "and he and other members did a physical punishment onto the member. The member was reported to be injured and dropped from the squad during the mission.";
+					next;
+					mes "Due to this disgraceful incident, the 3rd squad could not complete the mission.";
+					mes "And because of the unsatisfying mission result, the 3rd squad leader was pressed hard by the 1st platoon leader and the 3rd company commendant.";
+					next;
+					mes "The 3rd company commandant proposed disband of the 3rd squad to upper hierarchy and his proposal was accepted.";
+					mes "After the 3rd squad was disbanded, the members including the squad leader were sent to diciplinary retraining for 3 moths. After that retraining, all of them were transfered to the other squad.";
+					next;
+					mes "Currently Rebarev Doug who was the 3rd squad leader at the time have been researching the signs of God based on the mission result.";
+					mes "And the research was ordered by the King of Rune-Midgarts Kingdom.";
+					next;
+					mes "^3355FFAs he listened to the record of the 3rd Squad, Jack O looked a little confused.^000000";
+					next;
+					mes "[Jack O]";
+					mes "Huh...?";
+					mes "I might not be able to remember";
+					mes "a whole lot from back then, but the part about ^0000FFinsubordination^000000 can't be right. I'm sure of that.";
+					if (god_megin_3 == 0) set god_megin_3,1;
+					close;
+				break;
+			}
+		}
+			else if (god_megin_3 == 2)
+		{
+			mes "[Jack O]";
+			mes "Our old leader was";
+			mes "so arrogant to the point";
+			mes "of being a little off his rocker.";
+			next;
+			mes "[Jack O]";
+			mes "I mean, normal people";
+			mes "don't say things like '^0000FFI am the most religious man in the universe! Kneel before me!^000000' Yeah. Not a normal thing to say.";
+			next;
+			mes "[Jack O]";
+			mes "Anyway, if the squad";
+			mes "leader punished anyone for insubordination, I'm sure that it was unwarranted. I don't remember too much, but I'm sure of that.";
+			next;
+			mes "[Jack O]";
+			mes "Excuse me, I need to take some Green Herbs. Taking these seems";
+			mes "to be the only thing that works for my headache.";
+			next;
+			mes "^3355FFJack O busily chewed";
+			mes "on some Green Herbs.";
+			mes "It seemed to greatly relieve him from the pain of his headaches.^000000";
+			close;
+		}
+			else
+		{
+			mes "[Jack O]";
+			mes "^333333*Yawn...*^000000";
+			mes "It's quiet and boring, as per usual. Let's see if there's any Swordmen I can recruit today.";
+			close;
+		}
+	}
+		else
+	{
+		mes "[Jack O]";
+		mes "Hey kid!";
+		mes "Ever think about";
+		mes "bein' a Crusader?";
+		close;
+	}
+}
+	else
+{
+		if (Class == Job_Swordman)
+	{
+		mes "[Jack O]";
+		mes "Hey kid!";
+		mes "Ever think about";
+		mes "bein' a Crusader?";
+		next;
+		mes "[Jack O]";
+		mes "Basically, you'd be volunteering to be part of our military, as well as train for the Holy War.";
+		next;
+		mes "[Jack O]";
+		mes "If you have some faith and know how to wield a sword, you'll be more than welcome here.";
+		next;
+		mes "[Jack O]";
+		mes "Just think about my suggestion";
+		mes "and come back if you're interested. Alright then, see you later~";
+		close;
+	}
+		else
+	{
+		mes "[Jack O]";
+		mes "^333333*Yawn...*^000000";
+		mes "It's quiet and boring, as per usual. Let's see if there's any Swordmen I can recruit today.";
+		next;
+		mes "[Jack O]";
+		mes "Huh...?";
+		mes "Are you interested in knowing more about Crusaders? Hahaha, I guess that must be the case.";
+		next;
+		mes "[Jack O]";
+		mes "By the way, bring a doll to";
+		mes "the kid in front of me. If you're lucky, she'll give you something neat in return. What it is, I don't know. I've got no dolls.";
+		next;
+		mes "[Jack O]";
+		mes "In accordance with the Crusader code, I'm not supposed to lie. So yeah, you can trust me!";
+		close;
+	}
+}
+
+}
+
+aldebaran.gat,66,213,0	script	Lady#megin	69,{
+
+	if ($God1 > 49 && $God2 < 100)
+{
+		if(god_eremes == 18)
+	{
+		mes "[Emma Searth]";
+		mes "^333333*Sigh...*^000000 I haven't gotten any response from them. I don't know";
+		mes "if I can wait much longer to join the Kafra Corporation.";
+		close;
+	}
+		else if(god_eremes > 18 && god_eremes < 26)
+	{
+			if (god_megin_4 < 2)
+		{
+			mes "[Emma Searth]";
+			mes "^333333*Sigh...*^000000 I haven't gotten any response from them. I don't know";
+			mes "if I can wait much longer to join the Kafra Corporation.";
+			next;
+			mes "[Emma Searth]";
+			mes "Oh, an adventurer! I actually used to work in the same field that you do. More specifically, I used to be a Crusader.";
+			next;
+			mes "[Emma Searth]";
+			mes "My name is Emma Searth. Right now, I'm following my dream and applying to be a Kafra Lady. So my days of wielding a sword are over.";
+			next;
+			mes "[Emma Searth]";
+			mes "Sadly, I haven't succeeded yet because I was diagnosed with";
+			mes "some weird ^0000FFamnesia^000000.";
+			next;
+			mes "[Emma Searth]";
+			mes "Of course, I understand that";
+			mes "Kafra Corporation is a large, professional company, but";
+			mes "if I can work for them even if it's just part-time...";
+			next;
+			mes "[Emma Searth]";
+			mes "Is it that big of a problem?";
+			mes "I suppose they're worried";
+			mes "that I'd forget important customer information once I'm hired.";
+			next;
+			mes "[Emma Searth]";
+			mes "It's strange. When I was";
+			mes "a Crusader, I remembered";
+			mes "everything lucidly, and I never had any problems recalling the past.";
+			next;
+			mes "[Emma Searth]";
+			mes "But now I get these migraines whenever I try to focus on my memories from those times";
+			mes "when I used to fight in the Prontera Military.";
+			next;
+			mes "[Emma Searth]";
+			mes "^333333*Sigh...*^000000";
+			next;
+				switch( select( "About her past.", "Why be a Kafra Lady?", "About memories she can remember." ) )
+			{
+				case 1:
+						if (countitem(7015) > 0)
+					{
+						mes "^3355FFThe scent of your";
+						mes "Memory Bookmark";
+						mes "seems to bring clarity";
+						mes "to her thoughts.^000000";
+						next;
+						mes "[Emma Searth]";
+						mes "I was born in a wealthy family where I was raised to learn etiquette, fencing, Peco riding, and music lessons since I was";
+						mes "born. I suppose you can say I'm pretty well educated.";
+						next;
+						mes "[Emma Searth]";
+						mes "However, my parents weren't";
+						mes "pleased when they learned that I wanted to become a Kafra Lady.";
+						next;
+						mes "[Emma Searth]";
+						mes "My parents insisted that";
+						mes "I become a Sage or a Scholar.";
+						mes "In the end, I ended up running";
+						mes "away from them by joining the Crusaders.";
+						next;
+						mes "[Emma Searth]";
+						mes "Luckily, the Crusaders were advertising their recruitment at the time, so I took that chance. Plus, having military experience might even help me join Kafra!";
+						next;
+						mes "[Emma Searth]";
+						mes "Since I did so well in Boot Camp,";
+						mes "I got the chance to join an elite squad. My squad was often assigned difficult missions, and we never failed to complete those.";
+						next;
+						mes "[Emma Searth]";
+						mes "Eventually, my reputation as a female Crusader, and being in a respectable military position, was enough to satisfy my family.";
+						next;
+						mes "[Emma Searth]";
+						mes "But after that day,";
+						mes "everything went wrong.";
+						mes "I only remember that it";
+						mes "was very sad and depressing.";
+						mes "Somehow, I feel like we were";
+						mes "even betrayed...";
+						next;
+						mes "[Emma Searth]";
+						mes "I think I can";
+						mes "try to remember";
+						mes "my comrades...";
+						set god_megin_4,1;
+						close;
+					}
+						else
+					{
+						mes "[Emma Searth]";
+						mes "Ah, let's not talk about it. It's too depressing. Maybe if you had some sort of ^0000FFmemory^000000 aid, I might be able to recall my forgotten past. Anything, like a reminder, a scheduler, a bookmark, a string...";
+						close;
+					}
+				break;
+
+				case 2:
+					mes "[Emma Searth]";
+					mes "One day, I happened to see Ms. Leilah at work here in Al De Baran. She was shining with confidence and commanded respect, even from her customers!";
+					next;
+					mes "[Emma Searth]";
+					mes "She carried herself like a professional, no matter what the situation. Even though I knew she was tired from working in the summer heat, she made everything look effortless!";
+					next;
+					mes "[Emma Searth]";
+					mes "When the male customers try to flirt with her, she never loses her poise. She just adjusts her glasses and does what she needs to do.";
+					next;
+					mes "[Emma Searth]";
+					mes "To me, she's like a lone, guardian angel. At that moment, it seemed the world existed just to be mocked by Ms. Leila.";
+					next;
+					mes "[Emma Searth]";
+					mes "I've also heard that Kafra Ladies are always traveling around the world, which is something I've always dreamed of doing.";
+					next;
+					mes "[Emma Searth]";
+					mes "Ms. Leilah is my idol,";
+					mes "and she's the reason why";
+					mes "I want to become a Kafra Lady.";
+					close;
+				break;
+
+				case 3:
+						if (countitem(511) > 0 && god_megin_3 > 1)
+					{
+						mes "^3355FFEmma Searth clutches her head and winces as she suffers from another migraine.^000000";
+						next;
+						mes "^3355FFRemembering that a Green Herb was able to relieve Jack O, you gave a Green Herb to Emma. She takes it, and looks a little more relaxed.^000000";
+						next;
+						mes "[Emma Searth]";
+						mes "I'm not even sure";
+						mes "how much I can remember";
+						mes "and how much I've actually";
+						mes "forgotten.";
+						next;
+						mes "[Emma Searth]";
+						mes "Let me...";
+						mes "Try to remember every one in our squad. Let's see, there was Jack O, The Nineball. Z-Zan. Zan.H-Huadoku. C-Cuaque Donon. Myself. Um, E... Eni... Egni... Um...";
+						next;
+						mes "[Emma Searth]";
+						mes "Egni...";
+						mes "Egnigem?^000000";
+						mes "Who was that?";
+						mes "Oh no. I'm sure he might";
+						mes "have, no, was there someone";
+						mes "named that with us?";
+						close2;
+						set god_megin_4,2;
+						end;
+					}
+						else
+					{
+						mes "^3355FFEmma Searth clutches her head and winces as she suffers from another migraine.^000000";
+						next;
+						mes "[Emma Searth]";
+						mes "I'm not even sure";
+						mes "how much I can remember";
+						mes "and how much I've actually";
+						mes "forgotten.";
+						close;
+					}
+				break;
+			}
+		}
+			else if(god_megin_4 > 1)
+		{
+			mes "[Emma Searth]";
+			mes "^0000FFJack O, The Nineball, Zan.Huadoku, Cuaque Donon, Egnigem.^000000 Oh, I really miss those guys...";
+			close;
+		}
+			else
+		{
+			mes "[Emma Searth]";
+			mes "^333333*Sigh...*^000000 I haven't gotten any response from them. I don't know";
+			mes "if I can wait much longer to join the Kafra Corporation.";
+			close;
+		}
+	}
+		else if (god_eremes == 25)
+	{
+		mes "[Emma Searth]";
+		mes "Egnigem...";
+		mes "That name makes";
+		mes "me so sad. I'm not";
+		mes "quite sure why, but...";
+		close;
+	}
+		else if (god_eremes == 26 || god_eremes == 27)
+	{
+		mes "[Emma Searth]";
+		mes "Egnigem...";
+		mes "That name makes";
+		mes "me so sad. I'm not";
+		mes "quite sure why, but...";
+		next;
+		mes "^3355FFEmma turns away before you can see her cry. Still, her shoulders heave with each sob as you imagine the hardship she's had to endure.^000000";
+		next;
+		mes "[Emma Searth]";
+		mes "I wish I knew what that name really means. I'm sure it's linked to an important memory from my past.";
+		next;
+		mes "[Emma Searth]";
+		mes "I really appreciate you coming here to talk to me about the old days. I, I want you to have this.";
+		set god_eremes,28;
+		getitem 603,1;
+		if (BaseLevel < 56)
+			set BaseExp,BaseExp + 27000;
+		else if (BaseLevel > 55 && BaseLevel < 61)
+			set BaseExp,BaseExp + 30000;
+		else if (BaseLevel > 60 && BaseLevel < 66)
+			set BaseExp,BaseExp + 56052;
+		else if (BaseLevel > 65 && BaseLevel < 71)
+			set BaseExp,BaseExp + 82233;
+		else if (BaseLevel > 70 && BaseLevel < 76)
+			set BaseExp,BaseExp + 212271;
+		else if (BaseLevel > 75 && BaseLevel < 81)
+			set BaseExp,BaseExp + 390738;
+		else if (BaseLevel > 80 && BaseLevel < 86)
+			set BaseExp,BaseExp + 451020;
+		else if (BaseLevel > 85 && BaseLevel < 91)
+			set BaseExp,BaseExp + 546156;
+		else if (BaseLevel > 90)
+			set BaseExp,BaseExp + 1220358;
+		close;
+	}
+		else if (god_eremes == 28)
+	{
+		mes "[Emma Searth]";
+		mes "Egnigem...";
+		mes "That name makes";
+		mes "me so sad. I'm not";
+		mes "quite sure why, but...";
+		next;
+		mes "^3355FFEmma turns away before you can see her cry. Still, her shoulders heave with each sob as you imagine the hardship she's had to endure.^000000";
+		close;
+	}
+		else
+	{
+		mes "[Emma Searth]";
+		mes "^333333*Sigh...*^000000 I haven't gotten any response from them. I don't know";
+		mes "if I can wait much longer to join the Kafra Corporation.";
+		close;
+	}
+}
+	else
+{
+	mes "[Emma Searth]";
+	mes "I hear the Kafra Ladies always travel around the world, something I've always dreamed of doing! Hopefully, one of these days, I'll be able to work for the Kafra Corporation too.";
+	next;
+	mes "[Emma Searth]";
+	mes "^333333*Sigh...*^000000";
+	mes "Still, it's discouraging. I haven't heard anything from them...";
+	close;
+}
+
+}
+
+cmd_in02.gat,190,94,3	script	Man#megin	828,{
+
+	if ($God1 > 49 && $God2 < 100)
+{
+		if (god_eremes == 18)
+	{
+		mes "[Royal Myst]";
+		mes "Wha...?";
+		mes "You wanna talk?";
+		next;
+		mes "[Royal Myst]";
+		mes "What am I, your personal psychiatrist?! Lemme alone,";
+		mes "I'm busy here! Awright, now";
+		mes "which one do I bet on...?";
+		next;
+			switch( select("Speak of Rebarev Doug.", "Speak of the 3rd squad.", "Talk about gambling.", "Discuss hobbies.") )
+		{
+			case 1:
+				mes "[Royal Myst]";
+				mes "Wha--? Him again?! Tell him I'm fine! Dandy, even! Why's he gotta send all these people just to ask";
+				mes "a silly question?";
+				close;
+			break;
+			case 2:
+				mes "[Royal Myst]";
+				mes "3rd squad? Yeah, I used to be in that. All of us in the squad used to be real good buddies too.";
+				next;
+				mes "[Royal Myst]";
+				mes "Zan.Huadoku, Cuaque Donon,";
+				mes "Jack O, Emma Searth and The Nineball. Yeah... I wonder what they're all up to?";
+				close;
+			break;
+			case 3:
+				mes "[Royal Myst]";
+				mes "Gambling? I love it, you";
+				mes "know? Eh, I don't win all the time, but I love it the most when I leave with more Zeny than I came in with! Hahaha!";
+				close;
+			break;
+			case 4:
+				mes "[Royal Myst]";
+				mes "Hobbies?";
+				mes "What, you comin'";
+				mes "on to me?";
+				next;
+				mes "[Royal Myst]";
+				mes "A man's hobby is drinking, or didn't you know that? I happen to be real good at it too! Mwahahaha!";
+				close;
+			break;
+		}
+	}
+		else if (god_eremes > 18 && god_eremes < 21)
+	{
+			if (god_megin_6 == 0 && god_megin_5 > 4 && god_megin_4 > 1 && god_megin_3 > 1 && god_megin_2 > 3 && god_megin_1 > 2)
+		{
+			mes "[Royal Myst]";
+			mes "Wha...?";
+			mes "You wanna talk?";
+			next;
+			mes "[Royal Myst]";
+			mes "What am I, your personal psychiatrist?! Lemme alone,";
+			mes "I'm busy here! Awright, now";
+			mes "which one do I bet on...?";
+			next;
+		}
+			else if(god_megin_6 > 0)
+		{
+			mes "[Royal Myst]";
+			mes "Hmm?";
+			mes "What's up?";
+			next;
+		}
+			else
+		{
+			mes "[Royal Myst]";
+			mes "Wha...?";
+			mes "You wanna talk?";
+			next;
+			mes "[Royal Myst]";
+			mes "What am I, your personal psychiatrist?! Lemme alone,";
+			mes "I'm busy here! Awright, now";
+			mes "which one do I bet on...?";
+			close;
+		}
+			if (god_megin_6 < 16)
+		{
+				switch( select("Speak of Rebarev Doug.", "Speak of the 3rd squad.", "Talk about gambling.", "Discuss hobbies.") )
+			{
+				case 1:
+						if (god_megin_6 == 0)
+					{
+						mes "[Royal Myst]";
+						mes "Huh? What's that old geezer want this time? Tell 'em I'm fine, dandy even! Why the hell does he keep sending people...";
+						set god_megin_6,1;
+						close;
+					}
+						else if (god_megin_6 > 0 && god_megin_6 < 15)
+					{
+						mes "[Royal Myst]";
+						mes "What the hell!? Stop talking about him! I never wanna see his face again! Tell him to leave me the hell alone!";
+						close;
+					}
+						else if (god_megin_6 > 14)
+					{
+						mes "[Royal Myst]";
+						mes "Damn geezer...";
+						mes "How much is he being paid for studying what we all found?! Eh, somehow, I don't care as long as";
+						mes "he pays me...";
+						next;
+						mes "[Royal Myst]";
+						mes "Yeah...";
+						mes "I just don't";
+						mes "care anymore.";
+						close;
+					}
+				break;
+				case 2:
+						if (god_megin_6 < 15)
+					{
+						mes "[Royal Myst]";
+						mes "3rd squad? Yeah, I used to be in that. All of us in the squad used to be real good buddies too.";
+						next;
+						mes "[Royal Myst]";
+						mes "Zan.Huadoku, Cuaque Donon,";
+						mes "Jack O, Emma Searth and The Nineball. Yeah... I wonder what they're all up to?";
+						close;
+					}
+						else if (god_megin_6 > 14)
+					{
+						mes "[Royal Myst]";
+						mes "3rd squad?";
+						mes "Don't know, don't care~";
+						mes "Do I look like a stupid Crusader?";
+						close;
+					}
+					else
+				break;
+				case 3:
+						if (god_megin_6 < 15)
+					{
+						mes "[Royal Myst]";
+						mes "Gambling? ! Oh man...";
+						mes "I love gambling, you know!";
+						mes "Heh, but I haven't been lucky enough to win yet. Hahaha~!";
+						close;
+					}
+						else if (god_megin_6 > 14)
+					{
+						mes "[Royal Myst]";
+						mes "Gambling...!";
+						mes "Heh heh! Some risks you take,";
+						mes "and others you really shouldn't.";
+						mes "I can't help but feel sorry for that guy, E--";
+						next;
+						mes "[Royal Myst]";
+						mes "Ergh...?";
+						mes "Damn, I can never remember his name. You'd think I wouldn't forget the guy whose rap I'm taking but... Eh, I'll remember once I sober up.";
+						next;
+						mes "[Royal Myst]";
+						mes "Hey, what do you think happens to Crusaders when they're framed and killed, huh? Where exactly do they go? Niflheim, Vahalla...?";
+						set god_eremes,20;
+						close;
+					}
+				break;
+				case 4:
+						if (god_megin_6 == 0)
+					{
+						mes "Hobbies?";
+						mes "What, you comin'";
+						mes "on to me?";
+						next;
+						mes "[Royal Myst]";
+						mes "A man's hobby is drinking, or didn't you know that? I happen to be real good at it too! Mwahahaha!";
+						close;
+					}
+						else if (god_megin_6 > 0 && god_megin_6 < 15)
+					{
+							if (countitem(970) > 0)
+						{
+							mes "[Royal Myst]";
+							mes "Speaking of which,";
+							mes "I haven't had a drink";
+							mes "for a looong time. Almost";
+							mes "a couple hours now.";
+							next;
+							mes "[Royal Myst]";
+							mes "Oooh, looks like you've got a tasty beverage I can enjoy. Bwahahaha! Gimmie~!";
+							next;
+							mes "^3355FFBefore you can even think,";
+							mes "Royal Myst dips his hand into your inventory and helps himself to an Alcohol.^000000";
+							delitem 970,1;
+							set god_megin_6,god_megin_6 +2;
+							close;
+						}
+							else
+						{
+							mes "[Royal Myst]";
+							mes "Why mention it? You gonna bring me something I'll like? Cuz I'm more than willing to take it! Bwahahaha!";
+							close;
+						}
+					}
+						else if (god_megin_6 > 14)
+					{
+						mes "[Royal Myst]";
+						mes "^333333*Hiccup*^000000 Oh yeah, this is the stuff. Not like that imitation junk they've been serving at the Bars nowadays...";
+						next;
+						mes "[Royal Myst]";
+						mes "Hey! There anything you wanna";
+						mes "know about me? You did me a favor, so I'll tell you anything! Eeeeeverythiiing~~!!";
+						close;
+					}
+				break;
+			}
+		}
+	}
+		else
+	{
+		mes "[Royal Myst]";
+		mes "Eh heh heh~";
+		mes "I just know";
+		mes "I'm gonna win";
+		mes "this time!";
+		close;
+	}
+}
+	else
+{
+	mes "[Royal Myst]";
+	mes "Wha...?";
+	mes "You wanna talk?";
+	next;
+	mes "[Royal Myst]";
+	mes "What am I, your personal psychiatrist?! Lemme alone,";
+	mes "I'm busy here! Awright, now";
+	mes "which one do I bet on...?";
+	close;
+}
+
+}
+
+jawaii_in.gat,44,110,0	script	Security Officer#megin	734,{
+
+	if ($God1 > 49 && $God2 < 100)
+{
+		if (god_eremes == 18)
+	{
+		mes "[The Nineball]";
+		mes "Welcome to Jawaii,";
+		mes "the paradise resort!";
+		next;
+		mes "[The Nineball]";
+		mes "I'm the 'The Nineball, the security officer of Jawaii! If you encounter any trouble, or find any Singles, please dont hesitate to report to me as soon as you can~";
+		next;
+		mes "[The Nineball]";
+		mes "I've been told that there have";
+		mes "been many unruly drunkards here lately, but it is in our best interest to make your experience here as enjoyable as possible.";
+		close;
+	}
+		else if (god_eremes > 18)
+	{
+			if (god_megin_5 < 5)
+		{
+			mes "[The Nineball]";
+			mes "Welcome to Jawaii,";
+			mes "the paradise resort!";
+			next;
+			mes "[The Nineball]";
+			mes "I'm the 'The Nineball, the security officer of Jawaii! If you encounter any trouble, or find any Singles, please dont hesitate to report to me as soon as you can~";
+			next;
+			mes "[The Nineball]";
+			mes "I've been told that there have";
+			mes "been many unruly drunkards here lately, but it is in our best interest to make your experience here as enjoyable as possible.";
+			set god_megin_5,god_megin_5 +1;
+			close;
+		}
+			else if (god_megin_5 == 5)
+		{
+			mes "^3355FFHe acted very bright and friendly, but for a fleeting moment, you were able to glimpse a hint of sadness in his eyes.^000000";
+			next;
+			mes "^3355FFIt doesn't seem that";
+			mes "you'll be able to get him";
+			mes "to talk about what exactly";
+			mes "happened in the 3rd Squad...^000000";
+			close;
+		}
+	}
+}
+	else
+{
+	mes "[The Nineball]";
+	mes "Welcome to Jawaii,";
+	mes "the paradise resort!";
+	next;
+	mes "[The Nineball]";
+	mes "I'm the 'The Nineball, the security officer of Jawaii! If you encounter any trouble, or find any Singles, please dont hesitate to report to me as soon as you can~";
+	next;
+	mes "[The Nineball]";
+	mes "I've been told that there have";
+	mes "been many unruly drunkards here lately, but it is in our best interest to make your experience here as enjoyable as possible.";
+	close;
+}
+
+}
+
+niflheim.gat,109,254,0	script	Egnigem	796,{
+
+	if ($God1 > 49 && $God2 < 100)
+{
+		if (god_eremes > 19 && god_eremes < 25)
+	{
+			if (god_eremes > 22)
+		{
+			mes "[Egnigem]";
+			mes "Why have you returned to";
+			mes "this lonely place of darkness?";
+			next;
+			mes "[Egnigem]";
+			mes "Please go back to the world";
+			mes "of the living. To be here is to suffer, such is the nature of Nifflheim.";
+			close;
+		}
+			else
+		{
+			mes "[Egnigem]";
+			mes "Greetings...";
+			mes ""+ strcharinfo(0) +".";
+			mes "I've been watching you in the";
+			mes "world of the living. I see you've been busy looking for the truth about the 3rd Squad, haven't you?";
+			next;
+			mes "[Egnigem]";
+			mes "I can provide you with the answers. After all, I'm the only member of the 3rd Squad to retain all of my memories...";
+			next;
+			mes "[Egnigem]";
+			mes "Heh heh...";
+			mes "Let me tell you everything";
+			mes "about the 3rd Squad that's";
+			mes "been forgotten...";
+			L_Menu:
+			next;
+				switch( select( "The Mission", "Fate of the 3rd Squad", "Why are you in Nifflheim?", "Thanks, I've heard enough." ) )
+			{
+					case 1:
+						mes "[Egnigem]";
+						mes "First of all, the official record of our mission is misleading.";
+						mes "It contains some truth, based";
+						mes "on verbal evidence, but the most important details have been left out or changed.";
+						next;
+						mes "[Egnigem]";
+						mes "Now, we were secretly assigned";
+						mes "to find ^0000FFgodly artifacts^000000 by royal decree. In only three days, we succeeded and found Megingjard!";
+						next;
+						mes "[Egnigem]";
+						mes "Now, the records say the mission was unsatisfactory, correct? That would be because of me.";
+						next;
+						mes "[Egnigem]";
+						mes "Are you aware that Megingjard";
+						mes "was a belt worn by gods? It was actually one of the keys to Thor's great strength. Another name for it is the 'Girdle of Might.'";
+						next;
+						mes "[Egnigem]";
+						mes "Now, if a human were to wear";
+						mes "that, there's a possibility that Megingjard would give him strength comparable to a god. Naturally, you'd be afraid of such a thing falling into the wrong hands.";
+						next;
+						mes "[Egnigem]";
+						mes "In Rebarev Doug's mind, he";
+						mes "was the only person worthy of the belt since he considered himself the most religious person alive, and thus, closest to the gods.";
+						next;
+						mes "[Egnigem]";
+						mes "He made it clear to us that only he would wear Megingjard. Although he was our leader, some of us felt uneasy about him wearing the belt and not giving it to his superiors, our mission objective.";
+						next;
+						mes "[Egnigem]";
+						mes "Naturally, I opposed him. He was clearly unbalanced, and it would be dangerous to give him control of such power. It led to something of a fist fight between us.";
+						next;
+						mes "[Egnigem]";
+						mes "The rest of the squad couldn't";
+						mes "agree on whether or not we should simply obey our leader and let him have the belt. Some just wanted to complete the mission, while others were afraid of what might happen.";
+						next;
+						mes "[Egnigem]";
+						mes "But Rebarev didn't wait for us to decide. He destroyed Megingjard into pieces, intending to keep most of it and somehow reconstruct it later, and only bring one piece to the Prontera Military.";
+						next;
+						mes "[Egnigem]";
+						mes "He knew that he couldn't get";
+						mes "away with keeping all of Megingjard to himself, as the entire squad could easily discredit him.";
+						next;
+						mes "[Egnigem]";
+						mes "But Rebarev knew";
+						mes "that he could deceive his";
+						mes "superiors by giving them just a fragment of the artifact, and say that the rest of it was destroyed.";
+						next;
+						mes "[Egnigem]";
+						mes "I discovered his intention when";
+						mes "I found him taking Megingjard apart. Before I could stop him,";
+						mes "I was killed. That bastard had";
+						mes "a trap ready for me...";
+						next;
+						mes "[Egnigem]";
+						mes "After the mission, Rebarev Doug only gave a piece of the belt back to the higher-ups, and gave them";
+						mes "a different account than what had actually happened...";
+						goto L_Menu;
+					break;
+					case 2:
+						mes "[Egnigem]";
+						mes "Once the mission was completed, Rebarev Doug reported back to the Prontera Military with the intent of keeping most of Megingjard for himself.";
+						next;
+						mes "[Egnigem]";
+						mes "For some reason, he has a very strong influence in the military hierarchy. Now, by this time, I'm sure the squad pretty much figured out that he killed me.";
+						next;
+						mes "[Egnigem]";
+						mes "But Rebarev Doug expected this, and explained to his superiors that the squad was tempted by Megingjard's power and that I led some of us in a mutiny against him.";
+						next;
+						mes "[Egnigem]";
+						mes "He told his superiors that Megingjard was damaged as we";
+						mes "fought amongst each other, and that the fragment he gave them was all that remained.";
+						next;
+						mes "[Egnigem]";
+						mes "Because of the confidential nature of our mission, the 3rd squad was disbanded and we weren't given the story Rebarev fed the beaureaucrats until it was too late.";
+						next;
+						mes "[Egnigem]";
+						mes "The squad was punished and";
+						mes "sent for disciplinary retraining for three months. During this time, specific memories were unnaturally erased from the squad members.";
+						next;
+						mes "[Egnigem]";
+						mes "In the end, everyone was transferred to other squads and positions. My name had to be removed from all the records since hearing or reading my name might undo the brain washing.";
+						next;
+						mes "[Egnigem]";
+						mes "However, they still needed an official scapegoat, so they used Royal Myst's name in the records. That's probably why he's been going through hard times right now.";
+						next;
+						mes "[Egnigem]";
+						mes "And now Rebarev Doug has been studying godly artifacts based on the pieces of Megingjard that we found on that mission using kingdom research funds. Someday, he might be able to reconstruct the belt.";
+						next;
+						mes "[Egnigem]";
+						mes "There are also";
+						mes "a few questions that";
+						mes "I've never been able";
+						mes "to answer.";
+						next;
+						mes "[Egnigem]";
+						mes "I've never known why the King Tristram III ordered the research of godly artifacts. It also bothers me that Rebarev Doug is in charge of Megingjard's research. There must be some reason.";
+						next;
+						mes "[Egnigem]";
+						mes "In any case, for the sake of Rune-Midgard, it will be your responsibility to find the answers.";
+						next;
+						mes "[Egnigem]";
+						mes "There's not much a dead man";
+						mes "can do. But what's worse is that no one remembers me any more. I died alone and I'm still lonely in this place for the dead.";
+						goto L_Menu;
+					break;
+					case 3:
+						mes "[Egnigem]";
+						mes "The worst part of the squad";
+						mes "having their memories erased is";
+						mes "that Emma Searth has absolutely";
+						mes "no recollection of me.";
+						next;
+						mes "[Egnigem]";
+						mes "Do you mind listening";
+						mes "to me for a while? You're";
+						mes "the only person with whom";
+						mes "I can talk about this...";
+						next;
+						mes "[Egnigem]";
+						mes "From here, I've seen that Emma";
+						mes "is chasing her dream again, and";
+						mes "I'm happy for her. But it's still";
+						mes "not easy, knowing the woman you";
+						mes "love has totally forgotten you.";
+						next;
+						mes "[Egnigem]";
+						mes "I remember the first time I met her. I guess it was love at first sight. But I was too cowardly to confess my love, so I despaired when she joined the Crusaders.";
+						next;
+						mes "[Egnigem]";
+						mes "It took me a while, but I made up my mind to enlist as a Crusader";
+						mes "as well. I wanted to be closer to her so much.";
+						next;
+						mes "[Egnigem]";
+						mes "Now, after all our adventures and good times together, I'm in the worst possible scenario.";
+						next;
+						mes "[Egnigem]";
+						mes "I'm dead...";
+						mes "But I don't even have the consolation that she is";
+						mes "mourning my loss.";
+						next;
+						mes "[Egnigem]";
+						mes "I suppose that's why I'm here";
+						mes "in Nifflheim. I can't quite move on to heaven, Valhalla or anywhere else without her.";
+						next;
+						mes "[Egnigem]";
+						mes "Anyway, go and visit the Crusader Headquarters. You might be able to learn more about Rebarev Doug and stop any new shadiness he might be plotting. Good luck, my friend.";
+						goto L_Menu;
+					break;
+					case 4:
+						mes "[Egnigem]";
+						mes "Thank you for";
+						mes "listening to me...";
+						if (god_eremes == 21) set god_eremes,23;
+						else if(god_eremes == 22) set god_eremes,24;
+						close;
+					break;
+				}
+		}
+	}
+		else if (god_eremes == 25)
+	{
+		mes "[Egnigem]";
+		mes "Listen...";
+		mes "I'm going to imbue you with the ^FF0000last vestiges of my strength^000000...";
+		next;
+		mes "[Egnigem]";
+		mes "This is all I can do for you in return...";
+		set god_eremes,27;
+		if (BaseLevel < 56)
+			set BaseExp,BaseExp + 27000;
+		else if (BaseLevel > 55 && BaseLevel < 61)
+			set BaseExp,BaseExp + 30000;
+		else if (BaseLevel > 60 && BaseLevel < 66)
+			set BaseExp,BaseExp + 56052;
+		else if (BaseLevel > 65 && BaseLevel < 71)
+			set BaseExp,BaseExp + 82233;
+		else if (BaseLevel > 70 && BaseLevel < 76)
+			set BaseExp,BaseExp + 212271;
+		else if (BaseLevel > 75 && BaseLevel < 81)
+			set BaseExp,BaseExp + 390738;
+		else if (BaseLevel > 80 && BaseLevel < 86)
+			set BaseExp,BaseExp + 451020;
+		else if (BaseLevel > 85 && BaseLevel < 91)
+			set BaseExp,BaseExp + 546156;
+		else if (BaseLevel > 90)
+			set BaseExp,BaseExp + 1220358;
+		close;
+	}
+		else if (god_eremes == 26)
+	{
+		mes "[Egnigem]";
+		mes "As a Crusader...";
+		mes "This is the best thing";
+		mes "I can do in return for";
+		mes "what you have done for me.";
+		next;
+		mes "[Egnigem]";
+		mes "Listen...";
+		mes "I'm going to";
+		mes "imbue you with the";
+		mes "^666666last vestiges of my strength^000000...";
+		specialeffect 57;
+		specialeffect2 152;
+		next;
+		mes "[Egnigem]";
+		mes "May the heavens";
+		mes "answer me as  I call upon the";
+		mes "light of justice that empowers the defenders of truth, and threaten the enemies of peace.";
+		specialeffect 58;
+		specialeffect2 152;
+		next;
+		mes "[Egnigem]";
+		mes "May you always shine with";
+		mes "the light of truth. Let the light within you eradicate the shadows";
+		mes "of deception, fear and malice.";
+		specialeffect 58;
+		specialeffect2 152;
+		next;
+		mes "[Egnigem]";
+		mes "By the holy power";
+		mes "invested in me, I humbly bestow upon you my remaining strength. Fight honorably, and do not lose sight of righteousness.";
+		specialeffect 60;
+		specialeffect2 245;
+		set god_eremes,27;
+		if (BaseLevel < 56)
+			set BaseExp,BaseExp + 27000;
+		else if (BaseLevel > 55 && BaseLevel < 61)
+			set BaseExp,BaseExp + 30000;
+		else if (BaseLevel > 60 && BaseLevel < 66)
+			set BaseExp,BaseExp + 56052;
+		else if (BaseLevel > 65 && BaseLevel < 71)
+			set BaseExp,BaseExp + 82233;
+		else if (BaseLevel > 70 && BaseLevel < 76)
+			set BaseExp,BaseExp + 212271;
+		else if (BaseLevel > 75 && BaseLevel < 81)
+			set BaseExp,BaseExp + 390738;
+		else if (BaseLevel > 80 && BaseLevel < 86)
+			set BaseExp,BaseExp + 451020;
+		else if (BaseLevel > 85 && BaseLevel < 91)
+			set BaseExp,BaseExp + 546156;
+		else if (BaseLevel > 90)
+			set BaseExp,BaseExp + 1220358;
+		close;
+	}
+		else if (god_eremes < 20)
+	{
+		mes "[Egnigem]";
+		mes "Were you betrayed by fate as well, or are you simply a wanderer that's stumbled into this land of darkness?";
+		next;
+		mes "[Egnigem]";
+		mes "Hmm, the living don't deserve";
+		mes "to be in this realm of cold and suffering. But I can only help you escape by telling you what little";
+		mes "I know.";
+		next;
+			switch( select( "Ask him about buildings.", "Remove marks on mini-map.", "Cancel." ) )
+		{
+			case 1:
+				mes "[Egnigem]";
+				mes "I see. If you better understand Niflheim's layout, you have a greater chance of surviving and escaping.";
+				next;
+					switch( select( "Witch's Castle", "Tool Shop", "Weapon Shop", "Tavern", "Cancel" ) )
+				{
+					case 1:
+						mes "[Egnigem]";
+						mes "The witch of Nifflheim...";
+						mes "You can find her castle at the ^FF3355+^000000 mark I've made on your mini-map.";
+						next;
+						mes "[Egnigem]";
+						mes "Hrrrm...";
+						mes "It seems that the living who wind up in Nifflheim are seeking out the witch. But I don't quite understand what's so important about her.";
+						viewpoint 1,253,191,2,0xFFFF33;
+					break;
+					case 2:
+						mes "[Egnigem]";
+						mes "The Tool shop? Here in Nifflheim, they sell some unique items that";
+						mes "you can't buy anywhere else.";
+						next;
+						mes "[Egnigem]";
+						mes "You might want to see their";
+						mes "wares for yourself. I've drawn";
+						mes "a ^CE6300+^000000 on your mini-map to mark";
+						mes "its location.";
+						viewpoint 1,217,196,3,0xFFCE63;
+					break;
+					case 3:
+						mes "[Egnigem]";
+						mes "I've marked the location of the Weapon Shop at ^55FF33+^000000. There's nothing too special over there, though.";
+						viewpoint 1,216,171,4,0xFF55FF;
+					break;
+					case 4:
+						mes "[Egnigem]";
+						mes "Tavern is at ^3355FF+^000000. They only sell drinks to the dead, though...";
+						viewpoint 1,189,207,5,0xFF3355;
+					break;
+					case 5:
+						mes "[Egnigem]";
+						mes "Choose 'Remove marks on mini-map' from the menu to remove all the building location marks I've made.";
+						close;
+					break;
+				}
+				close;
+			break;
+			case 2:
+				viewpoint 2,253,191,2,0xFF00FF;
+				viewpoint 2,217,196,3,0xFF00FF;
+				viewpoint 2,216,171,4,0xFF00FF;
+				viewpoint 2,189,207,5,0xFF00FF;
+				mes "[Egnigem]";
+				mes "Alright, all the marks I've made have been removed from your mini-map. If you want to check the locations in Nifflheim again, go ahead and ask me.";
+				close;
+			break;
+			case 3:
+				mes "[Egnigem]";
+				mes "You're gonna explore this place on your own? Pretty brave, aren't you? Just be careful: here in Nifflheim, darkness reigns supreme.";
+				close;
+			break;
+		}
+	}
+		else
+	{
+		mes "[Egnigem]";
+		mes "I really wish that";
+		mes "Emma Searth could";
+		mes "remember me...";
+		next;
+		mes "^3355FFHis eyes seemed";
+		mes "to moisten with sadness.";
+		mes "Is it really possible for the";
+		mes "dead to shed tears?^000000";
+		close;
+	}
+}
+	else
+{
+	mes "[Egnigem]";
+	mes "Were you betrayed by fate as well, or are you simply a wanderer that's stumbled into this land of darkness?";
+	next;
+	mes "[Egnigem]";
+	mes "Hmm, the living don't deserve";
+	mes "to be in this realm of cold and suffering. But I can only help you escape by telling you what little";
+	mes "I know.";
+	next;
+		switch( select( "Ask him about buildings.", "Remove marks on mini-map.", "Cancel." ) )
+	{
+		case 1:
+			mes "[Egnigem]";
+			mes "...I see. Now, let me introduce you all buildings in Nifflheim!";
+			next;
+					switch( select( "Witch's Castle", "Tool Shop", "Weapon Shop", "Tavern", "Cancel" ) )
+				{
+					case 1:
+						mes "[Egnigem]";
+						mes "The witch of Nifflheim...";
+						mes "You can find her castle at the ^FF3355+^000000 mark I've made on your mini-map.";
+						next;
+						mes "[Egnigem]";
+						mes "Hrrrm...";
+						mes "It seems that the living who wind up in Nifflheim are seeking out the witch. But I don't quite understand what's so important about her.";
+						viewpoint 1,253,191,6,0xFFFF33;
+					break;
+					case 2:
+						mes "[Egnigem]";
+						mes "The Tool shop? Here in Nifflheim, they sell some unique items that";
+						mes "you can't buy anywhere else.";
+						next;
+						mes "[Egnigem]";
+						mes "You might want to see their";
+						mes "wares for yourself. I've drawn";
+						mes "a ^CE6300+^000000 on your mini-map to mark";
+						mes "its location.";
+						viewpoint 1,217,196,7,0xFFCE63;
+					break;
+					case 3:
+						mes "[Egnigem]";
+						mes "I've marked the location of the Weapon Shop at ^55FF33+^000000. There's nothing too special over there, though.";
+						viewpoint 1,216,171,8,0xFF55FF;
+					break;
+					case 4:
+						mes "[Egnigem]";
+						mes "Tavern is at ^3355FF+^000000. They only sell drinks to the dead, though...";
+						viewpoint 1,189,207,9,0xFF3355;
+					break;
+					case 5:
+						mes "[Egnigem]";
+						mes "Choose 'Remove marks on mini-map' from the menu to remove all the building location marks I've made.";
+						close;
+					break;
+				}
+				close;
+			break;
+			case 2:
+				viewpoint 2,253,191,6,0xFF00FF;
+				viewpoint 2,217,196,7,0xFF00FF;
+				viewpoint 2,216,171,8,0xFF00FF;
+				viewpoint 2,189,207,9,0xFF00FF;
+				mes "[Egnigem]";
+				mes "Alright, all the marks I've made have been removed from your mini-map. If you want to check the locations in Nifflheim again, go ahead and ask me.";
+				close;
+		break;
+		case 3:
+			mes "[Egnigem]";
+			mes "You're gonna explore this place on your own? Pretty brave, aren't you? Just be careful: here in Nifflheim, darkness reigns supreme.";
+			close;
+		break;
+	}
+	close;
+}
+
+}
+
+
diff --git a/npc/quests/seals/mjolnir_seal.txt b/npc/quests/seals/mjolnir_seal.txt
index adb6b1a5f..424aafca5 100644
--- a/npc/quests/seals/mjolnir_seal.txt
+++ b/npc/quests/seals/mjolnir_seal.txt
@@ -1,3159 +1,3159 @@
-//===== eAthena Script ======================================= 

-//= Mjolnir seal unlocking NPCs.

-//===== By: ================================================== 

-//= SinSloth

-//===== Current Version: ===================================== 

-//= 1.1

-//===== Compatible With: ===================================== 

-//= eAthena

-//===== Description: ========================================= 

-//= Quest for breaking the seal of Mjolnir.

-//===== Additional Comments: =================================

-// 1.0 First version. Thanks to SinSloth for scripting it. [MasterOfMuppets]

-// 1.1 Fixed wrong label names [Luups]

-//============================================================

-

-prontera.gat,124,297,3	script	Tialfi	706,{

-

-	if ($God3 < 50)

-{

-	mes "[Tialfi]";

-	mes "Hmmm...";

-	mes "I can feel a strange force";

-	mes "growing stronger and stronger,";

-	mes "somewhere on in Rune-Midgard.";

-	next;

-	mes "[Tialfi]";

-	mes "Can you feel it?";

-	mes "Something must be";

-	mes "going on!";

-	close;

-}

-	else

-{

-		if(god_mjo_0 == 11)

-	{

-		mes "[Tialfi]";

-		mes "I'm waiting for the day";

-		mes "when I'll finally get to";

-		mes "see Thor's thunder for myself.";

-		mes "I believe that one of these days,";

-		mes "my dream will become reality.";

-		close;

-	}

-		else if(god_mjo_1 == 2 && god_mjo_2 == 2 && god_mjo_3 == 2 && god_mjo_4 == 2)

-	{

-			if (god_mjo_0 == 10)

-		{

-				if (countitem(756) > 49 && countitem(757) > 49)

-			{

-				if (Class == Job_Knight || Class == Job_Lord_Knight) set @gift,1;

-				if (Class == Job_Priest || Class == Job_High_Priest) set @gift,2;

-				if (Class == Job_Wizard || Class == Job_High_Wizard) set @gift,3;

-				if (Class == Job_Blacksmith || Class == Job_Whitesmith) set @gift,4;

-				if (Class == Job_Hunter || Class == Job_Sniper) set @gift,5;

-				if (Class == Job_Assassin || Class == Job_Assassin_Cross) set @gift,6;

-				if (Class == Job_Crusader || Class == Job_Paladin) set @gift,7;

-				if (Class == Job_Monk || Class == Job_Champion) set @gift,8;

-				if (Class == Job_Sage || Class == Job_Professor) set @gift,9;

-				if (Class == Job_Alchemist || Class == Job_Creator) set @gift,10;

-				if (Class == Job_Rogue || Class == Job_Stalker) set @gift,11;

-				if (Class == Job_Bard || Class == Job_Clown) set @gift,12;

-				if (Class == Job_Dancer || Class == Job_Gypsy) set @gift,13;

-				mes "[Tialfi]";

-				mes "You came back.";

-				mes "In exchange for the ores that";

-				mes "you have brought me, I will";

-				mes "give you one of my family";

-				mes "treasures.";

-				next;

-				mes "[Tialfi]";

-				mes "My ancestors will be glad";

-				mes "that that their treasure was";

-				mes "used for a good purpose.";

-				next;

-				mes "[Tialfi]";

-				mes "You have two options in";

-				mes "choosing a treasure. You can";

-				mes "have a treasure that will be";

-				mes "useful to yourself, or something";

-				mes "that may suit one of your friends.";

-				next;

-				mes "[Tialfi]";

-				mes "So which treasure";

-				mes "would you like to have?";

-				next;

-				menu "An item that I can use.",-,"An item that my friend can use.",L_Friend;

-						mes "[Tialfi]";

-						mes "I see. Give me a moment";

-						mes "to find a suitable item";

-						mes "for you.";

-						next;

-						goto L_Gift;

-					

-					L_Friend:

-						mes "[Tialfi]";

-						mes "I see. Give me a moment";

-						mes "to find a suitable item";

-						mes "for your friend.";

-						set @gift,rand(1,13);

-						next;

-			L_Gift:

-				mes "[Tialfi]";

-				mes "Okay, let's see...";

-				mes "I seem to recall that I put";

-				mes "it somewhere around... Hmm.";

-				mes "It must be around--Ah!";

-				mes "Here we are~";

-				next;

-				delitem 756,50;

-				delitem 757,50;

-				set god_mjo_0,11;

-				if (@gift == 1) getitem 1471,1;

-				if (@gift == 2) getitem 1526,1;

-				if (@gift == 3) getitem 1231,1;

-				if (@gift == 4) getitem 1367,1;

-				if (@gift == 5) getitem 1722,1;

-				if (@gift == 6) getitem 1230,1;

-				if (@gift == 7) getitem 1141,1;

-				if (@gift == 8) getitem 1813,1;

-				if (@gift == 9) getitem 1557,1;

-				if (@gift == 10) getitem 1235,1;

-				if (@gift == 11) getitem 1227,1;

-				if (@gift == 12) getitem 1913,1;

-				if (@gift == 13) getitem 1963,1;

-				mes "[Tialfi]";

-				mes "Once again, I thank you";

-				mes "for the trouble you've gone";

-				mes "through on my behalf.";

-				next;

-				mes "[Tialfi]";

-				mes "I'm unsure of how this";

-				mes "treasure works, but I hope it";

-				mes "will be useful to you. From";

-				mes "what I know, I believe this";

-				mes "is a rare item.";

-				next;

-				mes "[Tialfi]";

-				mes "I'll be waiting for the day";

-				mes "when I'll see Thor's thunder";

-				mes "for myself. I believe that,";

-				mes "one of these days, the dream";

-				mes "I've had will come true.";

-				close;

-			}

-				else

-			{

-				mes "[Tialfi]";

-				mes "I need";

-				mes "50 Rough Oridecon";

-				mes "and 50 Rough Elunium.";

-				next;

-				mes "[Tialfi]";

-				mes "I don't have much time, so";

-				mes "go ahead and continue on";

-				mes "your journeys if you can't";

-				mes "bring those to me.";

-				close;

-			}

-		}

-			else

-		{

-				if ($God4 > 99)

-			{

-				mes "[Tialfi]";

-				mes "I sense a strange energy";

-				mes "growing more powerful";

-				mes "somewhere on this continent...";

-				next;

-				mes "[Tialfi]";

-				mes "Can you feel it?";

-				mes "Something must be going on!";

-				next;

-				mes "[Tialfi]";

-				mes "I think we'd better wait and";

-				mes "see what's happening. Someone";

-				mes "will deliver the news to us.";

-				mes "Though, I am unsure of whether";

-				mes "or not it will be good news or bad...";

-				close;

-			}

-				else

-			{

-				set $God4,$God4 +1;

-					if($God4 == 50)

-				{

-					announce "The Fourth Seal of [Mjolnir] has appeared.",bc_all;

-				}

-				else if($God4 == 100 && $God2 == 100 && $God3 == 100 && $God1 == 100)

-				{

-					announce "All four seals have been released.",bc_all;

-				}

-				else if($God4 == 100)

-				{

-					announce "[Mjolnir] has been released.",bc_all;

-				}

-				set god_mjo_0,10;

-				mes "[Tialfi]";

-				mes "You've met the four Dwarven";

-				mes "Blacksmiths. I've heard that";

-				mes "they will rarely speak to humans.";

-				mes "So you must be special if you";

-				mes "were able to talk to them.";

-				next;

-				mes "[Tialfi]";

-				mes "Do you think that my dream";

-				mes "will come true? Do you believe";

-				mes "Thor's Mjolnir will appear before";

-				mes "the eyes of humans? I'm afraid great";

-				mes "change will come to this world.";

-				next;

-				mes "[Tialfi]";

-				mes "Thank you for going through such";

-				mes "trouble on my behalf. I wish to";

-				mes "give you one of my family";

-				mes "treasures as a token of my";

-				mes "gratitude.";

-				next;

-				mes "[Tialfi]";

-				mes "However, I hope you understand";

-				mes "that my family would grow suspicious";

-				mes "if one of the treasures were to";

-				mes "just go missing.";

-				next;

-				mes "[Tialfi]";

-				mes "Hmm, however, I don't think they'll";

-				mes "complain if I exchanged one of";

-				mes "the treasures for something else.";

-				mes "Let me think...";

-				next;

-				mes "[Tialfi]";

-				mes "I should be able to give you one";

-				mes "of our family heirlooms if you";

-				mes "can bring be 50 Rough Oridecons";

-				mes "and 50 Rough Eluniums.";

-				next;

-				mes "[Tialfi]";

-				mes "You don't have to do that if";

-				mes "you don't want to. But it seems";

-				mes "our family heirlooms would be";

-				mes "more useful to an adventurer";

-				mes "such as yourself...";

-				close;

-			}

-		}

-	}

-		else if(god_mjo_1 == 3 || god_mjo_2 == 3 || god_mjo_3 == 3 || god_mjo_4 == 3)

-	{

-		mes "[Tialfi]";

-		mes "Hmm...";

-		mes "The Dwarven Blacksmiths must be";

-		mes "upset at you for some reason.";

-		next;

-		mes "[Tialfi]";

-		mes "Remember my sister's suggestion";

-		mes "and speak to them with great";

-		mes "courtesy. Carefully choose";

-		mes "words of respect lest they be";

-		mes "insulted.";

-		next;

-		set god_mjo_1,0;

-		set god_mjo_2,0;

-		set god_mjo_3,0;

-		set god_mjo_4,0;

-		mes "[Tialfi]";

-		mes "You should be okay now. By";

-		mes "this time, they've probably";

-		mes "forgotten the insult. But make";

-		mes "sure you speak to my sister";

-		mes "for advice first.";

-		close;

-	}

-		else if(god_mjo_0 == 2 || god_mjo_0 == 1)

-	{

-		mes "[Tialfi]";

-		mes "Sorry for the trouble.";

-		mes "I wish you good luck.";

-		close;

-	}

-		else if(god_mjo_0 == 0)

-	{

-			if($God4 > 99)

-		{

-			mes "[Tialfi]";

-			mes "Listen...I can feel unknown";

-			mes "energy arising somewhere in";

-			mes "this continent.";

-			mes "Can you feel it? There must";

-			mes "be something going on...!";

-			next;

-			mes "[Tialfi]";

-			mes "I think we'd better wait to";

-			mes "see what's happening. Someone";

-			mes "will deliver the news to us.";

-			mes "I am not sure if it will be a";

-			mes "good news or a bad news.";

-			close;

-		}

-			else if(BaseLevel < 70)

-		{

-			mes "[Tialfi]";

-			mes "One of my ancestors supposedly";

-			mes "was a servant of Thor. Still,";

-			mes "I find it difficult to believe.";

-			next;

-			mes "[Tialfi]";

-			mes "If the gods have all these";

-			mes "powers, how could a mere human";

-			mes "be of any real assistance?";

-			close;

-		}

-		mes "[Tialfi]";

-		mes "Adventurer, I have an interesting";

-		mes "story to tell you. Last night,";

-		mes "I had the most amazing dream";

-		mes "where I was the servant of Thor,";

-		mes "god of thunder.";

-		next;

-		mes "[Tialfi]";

-		mes "In this dream, I traveled with";

-		mes "Thor to Jotunnheim, land of giants.";

-		mes "During our journey, he told me";

-		mes "many interesting stories about";

-		mes "gods and heroes.";

-		next;

-		mes "[Tialfi]";

-		mes "Of course, I can't remember";

-		mes "everything clearly, but it was";

-		mes "truly fantastic.";

-		next;

-		mes "[Tialfi]";

-		mes "For some reason, I can vividly";

-		mes "recall what Thor told me about";

-		mes "his weapon, Mjolnir. Mjolnir is";

-		mes "a Dwarven masterpiece.";

-		next;

-		mes "[Tialfi]";

-		mes "Thor told me that Dwarves are";

-		mes "extremely talented artisans, and";

-		mes "their works are supreme. So as";

-		mes "I was thinking about my dream,";

-		mes "I remembered...";

-		next;

-		mes "[Tialfi]";

-		mes "There is a mountain that has the";

-		mes "same name as Thor's weapon. Surely,";

-		mes "the two have some relation to";

-		mes "each other.";

-		next;

-		mes "[Tialfi]";

-		mes "I've also recently heard a rumor";

-		mes "that Dwarven Blacksmiths also";

-		mes "reside on Mount Mjolnir.";

-		next;

-		mes "[Tialfi]";

-		mes "I understand the mountain is";

-		mes "dangerous, and that I'm in no";

-		mes "position to ask such a thing...";

-		next;

-		mes "[Tialfi]";

-		mes "I can't help wanting to know";

-		mes "for myself whether or not there";

-		mes "is truth to my dream. Is it";

-		mes "possible for Mjolnir to resurface?";

-		next;

-		mes "[Tialfi]";

-		mes "If you don't mind, I'd like to ask";

-		mes "you to explore this mountain and";

-		mes "search for these Dwarven Blacksmiths.";

-		next;

-		menu "No.",-,"Okay.",L_Ok;

-			mes "[Tialfi]";

-			mes "I see. But I still appreciate";

-			mes "that you took the time to";

-			mes "listen to me.";

-			next;

-			mes "[Tialfi]";

-			mes "Hopefully someday I'll learn";

-			mes "the truth about my dreams and";

-			mes "about Mjolnir itself.";

-			close;

-		

-		L_Ok:

-			mes "[Tialfi]";

-			mes "Thank you, thank you so much!";

-			mes "Even though it won't be easy,";

-			mes "I have faith that if the Dwarven";

-			mes "Blacksmiths do exist, you'll be";

-			mes "able to find them.";

-			next;

-			mes "[Tialfi]";

-			mes "Oh, and please speak to my";

-			mes "sister Roskva first. She is";

-			mes "outside the North entrance";

-			mes "of Prontera.";

-			next;

-			mes "[Tialfi]";

-			mes "I'm sure that she can give";

-			mes "you useful information if";

-			mes "you're fortunate enough to";

-			mes "encounter the Dwarves.";

-			next;

-			set god_mjo_0,rand(1,2);

-			mes "[Tialfi]";

-			mes "I'm truly lucky to meet such";

-			mes "an adventurer like yourself.";

-			mes "I wish you the best of luck.";

-			close;

-		

-	}

-		else

-	{

-		mes "[Tialfi]";

-		mes "I believe in you.";

-		mes "Just be courageous.";

-		close;

-	}

-	

-}

-

-}

-

-prt_fild01.gat,196,47,3	script	Roskva	703,{

-

-

-	if(god_mjo_0 == 1)

-{

-	mes "[Roskva]";

-	mes "You should know that Dwarven";

-	mes "Blacksmiths are extremely";

-	mes "offended if you do not speak";

-	mes "to them with the utmost respect.";

-	next;

-	mes "[Roskva]";

-	mes "So it's really";

-	mes "important that you";

-	mes "speak to the Dwarves";

-	mes "as courteously as you can.";

-	mes "The first Dwarf you must visit";

-	mes "can be found to the East.";

-	next;

-	mes "[Roskva]";

-	mes "Travel in a clock wise direction";

-	mes "around Rune-Midgard and seek";

-	mes "out the other Dwarves in order.";

-	mes "Your final destination will be";

-	mes "to the North.";

-	next;

-	mes "[Roskva]";

-	mes "If you happen to speak to them";

-	mes "in the wrong order, please go";

-	mes "talk to my brother Tialfi again.";

-	close;

-}

-	else if(god_mjo_0 == 2)

-{

-	mes "[Roskva]";

-	mes "You should know that Dwarven";

-	mes "Blacksmiths are extremely";

-	mes "offended if you do not speak";

-	mes "to them with the utmost respect.";

-	next;

-	mes "[Roskva]";

-	mes "So it's really";

-	mes "important that you";

-	mes "speak to the Dwarves";

-	mes "as courteously as you can.";

-	mes "The first Dwarf you must visit";

-	mes "can be found to the North.";

-	next;

-        mes "[Roskva]";

-	mes "Travel in a counter clock wise";

-	mes "direction around Rune-Midgard";

-	mes "and seek out the other Dwarves";

-	mes "in order. Your final destination";

-	mes "will be to the East.";

-	next;

-	mes "[Roskva]";

-	mes "If you happen to speak to them";

-	mes "in the wrong order, please go";

-	mes "talk to my brother Tialfi again.";

-	close;

-}

-	else

-{

-	mes "[Roskva]";

-	mes "A long long time ago, many";

-	mes "people used to frequent this";

-	mes "area. Friends and families";

-	mes "would live here, sharing";

-	mes "happiness and sadness.";

-	next;

-	mes "[Roskva]";

-	mes "But they're all gone now.";

-	mes "My parents and my friends";

-	mes "have all gone to a place";

-	mes " whose name I don't even know.";

-	next;

-	mes "[Roskva]";

-	mes "I can't help";

-	mes "but feel lonesome...";

-	close;

-}

-

-}

-

-mjolnir_11.gat,149,247,5	script	Dwarf Blacksmith#east	826,{

-

-	if ($God3 < 50)

-{

-	mes "[Austri]";

-	mes "Something is happening";

-	mes "somewhere on this continent.";

-	mes "You might not believe me,";

-	mes "but keep getting visions of";

-	mes "the Fenrir-Wolf.";

-	close;

-}

-	else

-{

-		if($God4 > 99)

-	{

-		mes "[Austri]";

-		mes "Something is happening";

-		mes "somewhere on this continent.";

-		mes "You might not believe me,";

-		mes "but keep getting visions of";

-		mes "the Fenrir-Wolf.";

-		close;

-	}

-		else if(god_mjo_0 == 11)

-	{

-		mes "[Austri]";

-		mes "One day, when my people";

-		mes "retrieve their memories of";

-		mes "the past, we will be able to";

-		mes "grant the power of the gods";

-		mes "to humans.";

-		next;

-		mes "[Austri]";

-		mes "I believe that";

-		mes "time is coming...";

-		close;

-	}

-		else if(god_mjo_0 == 10)

-	{

-		mes "[Austri]";

-		mes "Ho~ you might be asked";

-		mes "something from the human child.";

-		mes "If I were you, I would do the";

-		mes "kid a favor right away. Somehow";

-		mes "he is related to us in some sense.";

-		close;

-	}

-		else if(god_mjo_0 == 1)

-	{

-			if (god_mjo_1 == 3 || god_mjo_2 == 3 || god_mjo_3 == 3 || god_mjo_4 == 3)

-		{

-			mes "[Austri]";

-			mes "What is it?! I refuse to";

-			mes "speak to human as rude";

-			mes "and contemptible as you!";

-			mes "Leave!";

-			close;

-		}

-			else if(god_mjo_1 == 2)

-		{

-			mes "[Austri]";

-			mes "What? I don't have anything";

-			mes "to talk to you.";

-			close;

-		}

-			else if (god_mjo_2 != 0 || god_mjo_3 != 0 || god_mjo_4 != 0)

-		{

-			mes "[Austri]";

-			mes "Hm...?";

-			mes "Why have you";

-			mes "come to me, human?";

-			next;

-			menu "Nothing.",-,"Hey, 'sup!",L_Sup;

-					mes "[Austri]";

-					mes "...";

-					close;

-				

-				L_Sup:

-					set god_mjo_1,3;

-					mes "[Austri]";

-					mes "What...?!";

-					mes "Do not greet the";

-					mes "Dwarves lightly,";

-					mes "mortal!";

-					close;

-		}

-			else if(god_mjo_1 == 1)

-		{

-			mes "[Austri]";

-			mes "What made you come to me?";

-			next;

-			menu "Nothing.",-,"Excuse me, sir.",L_Excuse;

-					mes "[Austri]";

-					mes "...";

-					close;

-

-				L_Excuse:

-						if(countitem(1005) > 0)

-					{

-						mes "[Austri]";

-						mes "Ah, I see that the entire human";

-						mes "race is not worthy of scorn.";

-						mes "Unlike many of your kind,";

-						mes "I see that you respect your";

-						mes "elders.";

-						next;

-						set @mjo_east,0;

-					L_EastTalk:

-							switch(@mjo_east)

-						{

-							case 0:

-								mes "[Austri]";

-								mes "So what have";

-								mes "you come to";

-								mes "ask of me?";

-								next;

-								menu "...",-,"About Mjolnir.",L_Speak;

-								goto L_Listen;

-								

-							case 1:

-								mes "[Austri]";

-								mes "Mjolnir...?";

-								mes "Thor's legendary weapon?";

-								mes "The hammer than can shake the";

-								mes "earth and tear the sky asunder?";

-								mes "All of legendary weapons,";

-								mes "Mjolnir is perhaps greatest.";

-								next;

-								mes "[Austri]";

-								mes "As a matter of fact, it was forged";

-								mes "by my ancestor. Mjolnir was the";

-								mes "perfect weapon, except for one";

-								mes "minor flaw.";

-								next;

-								mes "[Austri]";

-								mes "The hilt of Mjolnir was forged";

-								mes "shorter than intended. Are you";

-								mes "still listening to me?";

-								next;

-								menu "...",-,"Yes, sir!",L_Speak,"Huh?",-;

-								goto L_Listen;

-								

-							case 2:

-								mes "[Austri]";

-								mes "One day, Loki came to our";

-								mes "village and showed off his";

-								mes "treasures. He boasted that we";

-								mes "couldn't possibly create something";

-								mes "to surpass their quality.";

-								next;

-								mes "[Austri]";

-								mes "Frankly his treasures were made";

-								mes "by another Dwarf tribe, but we";

-								mes "couldn't tolerate his insult. So";

-								mes "my ancestors created three";

-								mes "treasures of their own.";

-								next;

-								menu "...",-,"Yes, sir!",L_Speak,"Yes?",-;

-								goto L_Listen;

-								

-							case 3:

-								mes "[Austri]";

-								mes "Of the three treasures my";

-								mes "ancestors created, Mjolnir was";

-								mes "the last and greatest.";

-								next;

-								mes "[Austri]";

-								mes "However, while it was created,";

-								mes "a strange fly bit my ancestor";

-								mes "on the hand. Because of this";

-								mes "interruption, Mjolnir's hilt";

-								mes "is a little flawed.";

-								next;

-								mes "[Austri]";

-								mes "It's very sad. Although Mjolnir";

-								mes "is the greatest weapon ever, it";

-								mes "was very close to being the";

-								mes "epitome of craftsmanship.";

-								next;

-								menu "...",-,"Epito--what?",-,"Yes sir, I agree.",L_Speak;

-								goto L_Listen;

-								

-							case 4:

-								mes "[Austri]";

-								mes "Despite this minor flaw,";

-								mes "Mjolnir is still considered";

-								mes "the greatest of legendary weapons.";

-								next;

-								mes "[Austri]";

-								mes "Mjolnir was the trusted weapon";

-								mes "Thor wielded on the battlefield";

-								mes "and every giant feared its power.";

-								next;

-								mes "[Austri]";

-								mes "I must say, a Blacksmith's";

-								mes "greatest pride comes when he";

-								mes "creates the weapon and armor";

-								mes "that can be considered his";

-								mes "life's work.";

-								next;

-								menu "...",-,"I agree, sir!",L_Speak,"Um, yeah.",-;

-								goto L_Listen;

-								

-							case 5:

-								mes "[Austri]";

-								mes "The reason this mountain is";

-								mes "called Mount Mjolnir is because";

-								mes "it was actually created by the";

-								mes "hammer.";

-								next;

-								mes "[Austri]";

-								mes "In a battle against demons a";

-								mes "thousand years ago, Thor struck";

-								mes "the earth with Mjolnir. The impact";

-								mes "caused the ground to rise,";

-								mes "creating this mountain.";

-								next;

-								mes "[Austri]";

-								mes "You can imagine just how";

-								mes "unfathomly powerful Mjolnir is.";

-								mes "However, humans can never hope";

-								mes "to see or even wield Mjolnir. Only";

-								mes "a god can handle that kind of force.";

-								next;

-								menu "...",-,"Wah wah wah~!",-,"Ah, I understand sir!",L_Speak;

-								goto L_Listen;

-								

-							case 6:

-								mes "[Austri]";

-								mes "Hmm... But perhaps an ambitious";

-								mes "dwarf can forge something similar";

-								mes "to Mjolnir so that it can actually";

-								mes "be used by humans. It would have less";

-								mes "power, but it'd be perfectly crafted.";

-								next;

-								mes "[Austri]";

-								mes "Yes, it's possible to create a";

-								mes "Mjolnir suited to humans. Still,";

-								mes "it wouldn't be very easy.";

-								next;

-								menu "...",-,"Yes, sir!",L_Speak,"Yeah, whatever.",-;

-								goto L_Listen;

-								

-							case 7:

-								mes "[Austri]";

-								mes "Well, I happened to speak much";

-								mes "longer than I intended. But I hope";

-								mes "you learned what you wished to";

-								mes "know about Mjolnir.";

-								next;

-								mes "[Austri]";

-								mes "I feel that a great change is";

-								mes "coming. I do not know what kind of";

-								mes "effect it will have on our world,";

-								mes "but something important will happen...";

-								next;

-								mes "[Austri]";

-								mes "Perhaps only the gods can be sure";

-								mes "as to what the future will bring.";

-								mes "In any case, we must prepare ourselves";

-								mes "for what will happen.";

-								next;

-								menu "...",-,"Yes?",-,"Yes, sir!",L_Speak;

-								goto L_Listen;

-								

-							case 8:

-								set god_mjo_1,2;

-								mes "[Austri]";

-								mes "Alright then...";

-								mes "If you wish to learn more, you should";

-								mes "speak to my brothers. Take care, human.";

-								close;

-						}

-						L_Listen:

-								set god_mjo_1,3;

-								mes "[Austri]";

-								mes "...you didn't listen to me, did you?";

-								mes "Why did you make me waste my time? Leave!";

-								mes "This is why I don't want to associate";

-								mes "with human beings. They always pay little";

-								mes "attention to the conversation with me.";

-								close;

-					}

-						else

-					{

-						mes "[Austri]";

-						mes "You don't seem to understand.";

-						mes "If you wish to prove to me that";

-						mes "you understand blacksmiths, you";

-						mes "should bring something related";

-						mes "to my work!";

-						close;

-					}

-		}

-			else if(god_mjo_1 == 0)

-		{

-			mes "[Austri]";

-			mes "What made you come to me?";

-			next;

-			menu "Nothing.",-,"Excuse me, sir.",L_Excuse2;

-					mes "[Austri]";

-					mes "...";

-					close;

-				

-				L_Excuse2:

-					mes "[Austri]";

-					mes "A respectable blacksmith cherishes";

-					mes "his tools and crafts with diligence";

-					mes "and care.";

-					next;

-					mes "[Austri]";

-					mes "When it comes to humans, I believe";

-					mes "the ones who can appreciate my line";

-					mes "of work are the only ones worth";

-					mes "talking to.";

-					next;

-					set god_mjo_1,1;

-					mes "[Austri]";

-					mes "Every good blacksmith knows the";

-					mes "value of a good hammer. If you can";

-					mes "understand that, I shall consider";

-					mes "speaking with you.";

-					next;

-					mes "[Austri]";

-					mes "Now go, human.";

-					mes "I wish you safety";

-					mes "in your travels.";

-					close;

-		}

-			else

-		{

-			mes "[Austri]";

-			mes "Zzzz Zzzz...";

-			close;

-		}

-	}

-		else if(god_mjo_0 == 2)

-	{

-			if(god_mjo_1 == 3 || god_mjo_2 == 3 || god_mjo_3 == 3 || god_mjo_4 == 3)

-		{

-			mes "[Austri]";

-			mes "What is it! I do not have anything to";

-			mes "to such a rude human as you!";

-			mes "Go back to where you are from!";

-			close;

-		}

-			else if(god_mjo_4 == 2)

-		{

-			mes "[Austri]";

-			mes "What? I don't have anything";

-			mes "to talk to you.";

-			close;

-		}

-			else if(god_mjo_1 == 0 || god_mjo_1 == 1 || god_mjo_2 == 0 || god_mjo_2 == 1 || god_mjo_3 == 0 || god_mjo_3 == 1)

-		{

-			mes "[Austri]";

-			mes "What made you come to me?";

-			next;

-			menu "Nothing.",-,"Hey, sup!",L_Sup2;

-					mes "[Austri]";

-					mes "...";

-					close;

-				L_Sup2:

-					set god_mjo_4,3;

-					mes "[Austri]";

-					mes "What?!";

-					mes "Leave immediately and go study";

-					mes "your english properly!";

-					close;

-		}

-			else if(god_mjo_4 == 1)

-		{

-			mes "[Austri]";

-			mes "What made you come to me?";

-			next;

-			menu "Nothing.",-,"Excuse me, sir.",L_Excuse3;

-					mes "[Austri]";

-					mes "...";

-					close;

-				L_Excuse3:

-						if(countitem(1005) > 0)

-					{

-						mes "[Austri]";

-						mes "Hmm, I like your polite manners.";

-						mes "Okay, I am willing to talk to you.";

-						mes "So ask me if you have any questions.";

-						next;

-						set @mjo_east,0;

-					L_EastTalk2:

-							switch(@mjo_east)

-						{

-							case 0:

-								mes "[Austri]";

-								mes "So, what would you like to ask?";

-								next;

-								menu "...",-,"About Mjolnir.",L_Speak2;

-									goto L_Listen2;

-							case 1:

-								mes "[Austri]";

-								mes "Mjolnir...you mean the Thor's legendary weapon?";

-								mes "There has a rumor that Mjolnir slashed the sky";

-								mes "and stunned the earth by one blow.";

-								mes "That is the greatest weapon in the legend.";

-								next;

-								mes "[Austri]";

-								mes "As a matter of fact, it was forged by my ancestor.";

-								mes "Do you know the reason why the hilt of Mjolnir";

-								mes "was forged that short...?";

-								mes "Are you listening to me?";

-								next;

-								menu "...",-,"Yes?",-,"Yes, sir!",L_Speak2;

-									goto L_Listen2;

-							case 2:

-								mes "[Austri]";

-								mes "One day, Loki came to dwarf's town";

-								mes "and showed off his three treasure.";

-								mes "He provoked us by saying";

-								mes "nobody would make better things";

-								mes "than his treasures.";

-								next;

-								mes "[Austri]";

-								mes "Frankly his treasures were made by other dwarf tribe...";

-								mes "but anyway, we could not put up with the insult.";

-								mes "So my ancestor made three treasures of our own...";

-								mes "Are you still listening to me?";

-								next;

-								menu "...",-,"Yes, sir!",L_Speak2,"Yes?",-;

-									goto L_Listen2;

-							case 3:

-								mes "[Austri]";

-								mes "Mjolnir was the last treasure among the three.";

-								mes "While blowing the bellows,";

-								mes "my ancerstor was bitten by a strange insect on his hand.";

-								mes "So he could not continue working.";

-								mes "That's how the hilt of Mjolnir became that short.";

-								mes "Ah, what a sad story!";

-								next;

-								menu "...",-,"I agree, sir!",L_Speak2,"Yes?",-;

-									goto L_Listen2;

-							case 4:

-								mes "[Austri]";

-								mes "Despite of the sad incident,";

-								mes "my ancerstor created the greatest weapon";

-								mes "in the legend. Mjolnir became Thor's the most reliable comrade";

-								mes "in the battlefield. Even giants in Utgard feared";

-								mes "the power of the godly weapon.";

-								next;

-								mes "[Austri]";

-								mes "However, since the weapon had the abnormally short hilt,";

-								mes "Thor had to wear iron gauntlets to compensate the weakness.";

-								mes "I must say, blacksmiths feel most proud when they";

-								mes "achieve to create the best weapons and armors of their life.";

-								next;

-								menu "...",-,"Yes?",-,"I agree, sir!",L_Speak2;

-									goto L_Listen2;

-							case 5:

-								mes "[Austri]";

-								mes "And I am going to tell you";

-								mes "the reason why this mountain has been called";

-								mes "as Mountain Mjolnir... during the battle against demons";

-								mes "occurred a thousand years ago, he hammered down";

-								mes "the earth using Mjolnir. Because of the impact,";

-								mes "the ground around the spot rose high";

-								mes "and formed a mountain.";

-								next;

-								mes "[Austri]";

-								mes "You can imagine how powerful Mjolnir would be.";

-								mes "It made a new mountain by one hammering.";

-								mes "Unfortunately, you wouldn't be able to see";

-								mes "the weapon in your life. Somehow it is belong to God.";

-								next;

-								menu "...",-,"I can understand, sir!",L_Speak2,"Yes?",-;

-									goto L_Listen2;

-							case 6:

-								mes "[Austri]";

-								mes "Perhaps an ambitious dwarf could forge";

-								mes "a treasure is similar to Mjolnir.";

-								mes "But it will not happen to be exactly the same as the original Mjolnir.";

-								mes "The original one cannot be held by a human being";

-								mes "due to the unimaginable power it holds within.";

-								next;

-								mes "[Austri]";

-								mes "Let's say, a modified Mjolnir which would be suited to human's power";

-								mes "can be made possibly...? But still, it will not";

-								mes "easily happen.";

-								mes "Just, never mind.";

-								next;

-								menu "...",-,"Yes, sir!",L_Speak2,"Yes?",-;

-									goto L_Listen2;

-							case 7:

-								mes "[Austri]";

-								mes "I happened to speak longer than I planned.";

-								mes "But this is it. I hope you will have a better understanding";

-								mes "about Mjolnir by now.";

-								mes "And obviously something has been happening";

-								mes "in this world...I can feel that.";

-								next;

-								mes "[Austri]";

-								mes "I cannot tell it will bring a good effect or a bad one to";

-								mes "the continent...";

-								mes "Maybe Gods would know.";

-								mes "We must prepare to survive in the changes.";

-								next;

-								menu "...",-,"Yes, sir!",L_Speak2,"Yes?",-;

-									goto L_Listen2;

-							case 8:

-								set god_mjo_4,2;

-								mes "[Austri]";

-								mes "Ok, you may leave me and visit my brothers now.";

-								mes "Take care.";

-								close;

-						}

-							L_Listen2:

-								set god_mjo_4,3;

-								mes "[Austri]";

-								mes "...you didn't listen to me, did you?";

-								mes "Why did you make me waste my time? Leave!";

-								mes "This is why I don't want to associate with human beings.";

-								mes "They always pay little attention to the conversation with me.";

-								close;

-

-					}

-						else

-					{

-						mes "[Austri]";

-						mes "You don't seem to understand.....";

-						mes "If you want to prove me that you understand how blacksmiths feel,";

-						mes "bring a thing related to blacksmiths!";

-						close;

-					}

-		}

-			else if(god_mjo_4 == 0)

-		{

-			mes "[Austri]";

-			mes "What made you come to me?";

-			next;

-			menu "Nothing.",-,"Excuse me, sir.",L_Excuse4;

-					mes "[Austri]";

-					mes "...";

-					close;

-				

-				L_Excuse4:

-					mes "[Austri]";

-					mes "A respectable blacksmith cherishes his hammer and anvil.";

-					mes "If you wish to continue a conversation with me,";

-					mes "you should understand blacksmiths.";

-					mes "Every blacksmith knows what hammer is good for themselves.";

-					next;

-					set god_mjo_4,1;

-					mes "[Austri]";

-					mes "If you understand what I meant,";

-					mes "I will consider speaking to you next time.";

-					mes "Have a good travel.";

-					close;

-		}

-			else

-		{

-			mes "[Austri]";

-			mes "Zzzz Zzzz...";

-			close;

-		}

-	}

-		else if(god_mjo_0 == 0)

-	{

-		mes "[Austri]";

-		mes "Ah...";

-		mes "It feels like today's going to be a great day.";

-		next;

-		mes "[Austri]";

-		mes "I've got the warm sun, fresh forest air, and my hammer and anvil are at the ready. It's a perfect day for smithing!";

-		close;

-	}

-		else

-	{

-		mes "[Austri]";

-		mes "Zzzz Zzzz...";

-		close;

-	}

-}

-

-L_Speak:

-	set @mjo_east,@mjo_east +1;

-	goto L_EastTalk;

-

-L_Speak2:

-	set @mjo_east,@mjo_east +1;

-	goto L_EastTalk2;

-

-}

-

-mjolnir_09.gat,209,341,3	script	Dwarf Blacksmith#south	826,{

-

-	if ($God3 < 50)

-{

-	mes "[Sudri]";

-	mes "I want to compete";

-	mes "and fight with stronger";

-	mes "and stronger opponents!";

-	next;

-	mes "[Sudri]";

-	mes "One day, I'll return to";

-	mes "Svartalfaheimr and defeat";

-	mes "Ivaldi! Mwahahaha!";

-	close;

-}

-	else

-{

-		if ($God4 > 99)

-	{

-		mes "[Sudri]";

-		mes "Wait, this is not the";

-		mes "right time to fighting...";

-		next;

-		mes "[Sudri]";

-		mes "Something that has been hidden";

-		mes "is about to be born out of the";

-		mes "sweat of determination and";

-		mes "tears of sacrifice. We must";

-		mes "wait until then.";

-		close;

-	}

-		else if(god_mjo_0 == 11)

-	{

-		mes "[Sudri]";

-		mes "I want to compete with a stronger one!";

-		mes "I will be stronger and stronger,";

-		mes "one day when I get back to Svartalfaheimr";

-		mes "I shall defeat Ivaldi!";

-		mes "Muhahahaha...!";

-		close;

-	}

-		else if(god_mjo_10 == 10)

-	{

-		mes "[Sudri]";

-		mes "I must admit that you're a";

-		mes "really strong human. Let us";

-		mes "fight again when we have a chance.";

-		mes "The next time, you may not be";

-		mes "so lucky!";

-		close;

-	}

-		else if(god_mjo_0 == 1)

-	{

-			if (god_mjo_1 == 3 || god_mjo_2 == 3 || god_mjo_3 == 3 || god_mjo_4 == 3)

-		{

-			mes "[Sudri]";

-			mes "Go back to where you belong";

-			mes "before I beat you to death!";

-			next;

-			mes "[Sudri]";

-			mes "All you can gain here are";

-			mes "a few herbs.";

-			close;

-		}

-			else if(god_mjo_2 == 2)

-		{

-			mes "[Sudri]";

-			mes "That was a great fight!";

-			mes "Mwahahaha! I'm satisfied with";

-			mes "the results. I may have lost,";

-			mes "but we fought honorably with";

-			mes "everything we had.";

-			close;

-		}

-			else if(god_mjo_1 == 0 || god_mjo_1 == 1 || god_mjo_3 != 0 || god_mjo_4 != 0)

-		{

-			mes "[Sudri]";

-			mes "So...";

-			mes "What brings";

-			mes "you here?";

-			next;

-			menu "Nothing.",-,"Excuse me, sir.",L_Excuse;

-					mes "[Sudri]";

-					mes "You have too much time on";

-					mes "your hands. Why don't you";

-					mes "log out and hang out with";

-					mes "your friends instead?";

-					close;

-				

-				L_Excuse:

-					set god_mjo_2,3;

-					mes "[Sudri]";

-					mes "Why should";

-					mes "I excuse you?";

-					next;

-					mes "[Sudri]";

-					mes "If there's anything I hate,";

-					mes "it's insincerity and sarcasm.";

-					mes "What, you wanna fight?!";

-					close;

-		}

-			else if(god_mjo_2 == 1)

-		{

-			set @sudri_vit,200;

-			set @player_vit,100;

-			set @sudri_def,0;

-			set @player_def,0;

-			set @sudri_atk,0;

-			set @player_atk,0;

-			set @counter,0;

-			set @damage,0;

-			mes "[Sudri]";

-			mes "Fine, let's fight!";

-			mes "Old school rules!";

-			next;

-			

-			L_Fight:

-				mes "Sudri : HP " + @sudri_vit + " left.";

-				mes "" + strcharinfo(0) + " : HP " + @player_vit + " left.";

-				mes "--------------------";

-				mes "" + strcharinfo(0) + " initiated an attack!";

-				next;

-				menu "...?!",case11,"Strike Head!",case12,"Strike Chest!",case13,"Strike Legs!",case14,"Take a break.",case15;

-					case11:

-						set @player_atk,0;

-						goto L_DefSudri;

-					case12:

-						set @player_atk,1;

-						goto L_DefSudri;

-					case13:

-						set @player_atk,2;

-						goto L_DefSudri;

-					case14:

-						set @player_atk,3;

-						goto L_DefSudri;

-					case15:

-						set @player_atk,4;

-						goto L_DefSudri;

-				L_DefSudri:

-				set @sudri_def,rand(1,3);

-				set @damage,rand(15,25);

-				if(@player_atk == 1) mes "" + strcharinfo(0) + " attacks Sudri's head!";

-				else if(@player_atk == 2) mes "" + strcharinfo(0) + " strikes Sudri's chest!";

-				else if(@player_atk == 3) mes "" + strcharinfo(0) + " aims for Sudri's legs!";

-				else if(@player_atk == 4) mes "" + strcharinfo(0) + " requests a break!";

-				else mes "" + strcharinfo(0) + "'s weak point revealed!";

-					if(@player_atk == @sudri_def)

-				{

-					specialeffect 336;

-						if(@sudri_def == 1)

-					{

-						mes "--------------------";

-						mes "Sudri easily dodges";

-						mes "your attack by twisting";

-						mes "his small, yet svelte, body.";

-						mes "--------------------";

-						mes "" + strcharinfo(0) + " misses!";

-					}

-						else if(@sudri_def == 2)

-					{

-						mes "--------------------";

-						mes "Sudri blocks your";

-						mes "attack by crossing";

-						mes "his stout arms.";

-						mes "--------------------";

-						mes "" + strcharinfo(0) + "'s attack is blocked!";

-					}

-						else if(@sudri_def == 3)

-					{

-						mes "--------------------";

-						mes "Sudri dodges your";

-						mes "attack with a graceful";

-						mes "leap to the heavens.";

-						mes "--------------------";

-						mes "" + strcharinfo(0) + " misses!";

-					}

-				}

-					else if(@player_atk == 4)

-				{

-					skilleffect 28,10;

-					set @player_vit,@player_vit + 10;

-					mes "--------------------";

-					mes "" + strcharinfo(0) + " has gained 10 HP!";

-				}

-					else if(@player_atk == 1)

-				{

-					specialeffect 5;

-					set @sudri_vit,@sudri_vit - @damage;

-					mes "--------------------";

-					mes "You successfully hit";

-					mes "Sudri on the head!";

-					mes "--------------------";

-					mes "Sudri has lost " + @damage + " HP!";

-				}

-					else if(@player_atk == 2)

-				{

-					specialeffect 2;

-					set @sudri_vit,@sudri_vit - @damage;

-					mes "--------------------";

-					mes "You successfully hit";

-					mes "Sudri on the chest!";

-					mes "--------------------";

-					mes "Sudri has lost " + @damage + " HP!";

-				}

-					else if(@player_atk == 3)

-				{

-					specialeffect 3;

-					set @sudri_vit,@sudri_vit - @damage;

-					mes "--------------------";

-					mes "You successfully hit";

-					mes "Sudri on the legs!";

-					mes "--------------------";

-					mes "Sudri has lost " + @damage + " HP!";

-				}

-					else if(@player_atk == 0)

-				{

-					specialeffect2 5;

-					set @player_vit,@player_vit - 10;

-					mes "--------------------";

-					mes "You were hit by";

-					mes "Sudri's counter attack!";

-					mes "--------------------";

-					mes "" + strcharinfo(0) + " has lost 10 HP!";

-						if(@player_vit < 1)

-					{

-						mes "Defeated...";

-						next;

-						goto L_Lost;

-					}

-				}

-					else

-				{

-					mes "--------------------";

-					mes "Something happened and the fight has stopped!";

-					close;

-				}

-					if(@sudri_vit < 1)

-				{

-					mes "" + strcharinfo(0) + " wins!";

-					next;

-					goto L_Win;

-				}

-				next;

-				mes "Sudri : HP " + @sudri_vit + " left.";

-				mes "" + strcharinfo(0) + " : HP " + @player_vit + " left.";

-				mes "--------------------";

-				mes "Sudri attacks...!";

-				next;

-				menu "...?!",case21,"Dodge!",case22,"Block!",case23,"Jump!",case24,"Counter back!",case25;

-					case21:

-						set @player_def,0;

-						goto L_DefPlayer;

-					case22:

-						set @player_def,1;

-						goto L_DefPlayer;

-					case23:

-						set @player_def,2;

-						goto L_DefPlayer;

-					case24:

-						set @player_def,3;

-						goto L_DefPlayer;

-					case25:

-						set @player_def,4;

-						goto L_DefPlayer;

-				L_DefPlayer:

-				set @sudri_atk,rand(1,3);

-				set @damage,rand(20,25);

-				if(@sudri_atk == 1) mes "Sudri aims for the head!";

-				else if(@sudri_atk == 2) mes "Sudri strikes the chest!";

-				else mes "Sudri attacks the legs!";

-					if(@sudri_atk == @player_def)

-				{

-					specialeffect2 336;

-						if(@player_def == 1)

-					{

-						mes "--------------------";

-						mes "" + strcharinfo(0) + " quickly dodged,";

-						mes "Sudri's arms were too short to reach at you.";

-						mes "--------------------";

-						mes "Sudri has failed to attack.";

-					}

-						else if(@player_def == 2)

-					{

-						mes "--------------------";

-						mes "" + strcharinfo(0) + " barely blocked";

-						mes "Sudri's attack.";

-						mes "--------------------";

-						mes "Sudri has failed to attack.";

-					}

-						else if(@player_def == 3)

-					{

-						mes "--------------------";

-						mes "" + strcharinfo(0) + " jumped,";

-						mes "dodged Sudri's attack at ease.";

-						mes "--------------------";

-						mes "Sudri has failed to attack.";

-					}

-				}

-					else if(@player_def == 4)

-				{

-					set @counter,rand(1,4);

-					mes "--------------------";

-					mes "" + strcharinfo(0) + " countered back!";

-						if(@counter == 1)

-					{

-						specialeffect2 131;

-						specialeffect 17;

-						set @sudri_vit,@sudri_vit - 20;

-						mes "You successfully countered back!";

-						mes "--------------------";

-						mes "Sudri has lost 20 HP!";

-							if(@sudri_vit < 1)

-						{

-							mes "" + strcharinfo(0) + " won!";

-							next;

-							goto L_Win;

-						}

-					}

-						else

-					{

-						specialeffect2 1;

-						set @player_vit,@player_vit - 30;

-						mes "You were taken a great damage on your weak spot!";

-						mes "--------------------";

-						mes "" + strcharinfo(0) + " has lost 30 HP!";

-					}

-				}

-					else if(@sudri_atk == 1)

-				{

-					specialeffect2 5;

-					set @player_vit,@player_vit - @damage;

-					mes "--------------------";

-					mes "Sudri successfully";

-					mes "hit " + strcharinfo(0) + "";

-					mes "on the head!";

-					mes "--------------------";

-					mes "" + strcharinfo(0) + " has lost " + @damage + " HP!";

-				}

-					else if(@sudri_atk == 2)

-				{

-					specialeffect2 3;

-					set @player_vit,@player_vit - @damage;

-					mes "--------------------";

-					mes "Sudri successfully";

-					mes "hit " + strcharinfo(0) + "";

-					mes "on the chest!";

-					mes "--------------------";

-					mes "" + strcharinfo(0) + " has lost " + @damage + " HP!";

-				}

-					else if(@sudri_atk == 3)

-				{

-					specialeffect2 4;

-					set @player_vit,@player_vit - @damage;

-					mes "--------------------";

-					mes "Sudri successfully";

-					mes "hit " + strcharinfo(0) + "";

-					mes "on the legs!";

-					mes "--------------------";

-					mes "" + strcharinfo(0) + " has lost " + @damage + " HP!";

-				}

-					else if(@sudri_atk == 0)

-				{

-					specialeffect2 5;

-					set @player_vit,@player_vit - @damage;

-					mes "--------------------";

-					mes "Sudri successfully";

-					mes "hits "+ strcharinfo(0) +"";

-					mes "during a moment of";

-					mes "absent-mindedness!";

-					mes "--------------------";

-					mes "" + strcharinfo(0) + " has lost " + @damage + " HP!";

-				}

-					else

-				{

-					mes "--------------------";

-					mes "Something happened and the fight has stopped!";

-					close;

-				}

-					if(@player_vit < 1)

-				{

-					mes "Sudri won!";

-					next;

-					goto L_Lost;

-				}

-				next;

-				goto L_Fight;

-

-			L_Lost:

-				mes "[Sudri]";

-				mes "Muhahahaha!";

-				mes "You're not strong enough";

-				mes "to beat me! I want someone";

-				mes "who can offer me a challenge!";

-				next;

-				mes "[Sudri]";

-				mes "Go out, train some and get";

-				mes "stronger before you even";

-				mes "think about coming back!";

-				close;

-			

-			L_Win:

-				set god_mjo_2,2;

-				mes "[Sudri]";

-				mes "You're stronger than me.";

-				mes "I never thought I'd meet";

-				mes "a human as strong as you.";

-				next;

-				mes "[Sudri]";

-				mes "I'm impressed. Alright,";

-				mes "I'll tell my friends good";

-				mes "things about you. Hopefully,";

-				mes "my brothers will give you";

-				mes "the help you're looking for.";

-				next;

-				mes "[Sudri]";

-				mes "Okay then,";

-				mes "be safe on";

-				mes "your travels!";

-				close;

-		}

-			else if(god_mjo_2 == 0)

-		{

-			mes "[Sudri]";

-			mes "So...";

-			mes "What brings";

-			mes "you here, human?";

-			next;

-			menu "Nothing.",-,"Excuse me, sir.",L_Excuse2;

-					mes "[Sudri]";

-					mes "You have too much";

-					mes "time on your hand.";

-					mes "Why don't you log out";

-					mes "and go out with your";

-					mes "friends instead?";

-					close;

-

-				L_Excuse2:

-					mes "[Sudri]";

-					mes "Huh. You're different than other";

-					mes "humans. But still, trusting you";

-					mes "because you know how to speak";

-					mes "isn't very wise.";

-					next;

-					mes "[Sudri]";

-					mes "If there's anything I love,";

-					mes "it's bare knuckle brawling,";

-					mes "old school style.";

-					next;

-					mes "[Sudri]";

-					mes "Words can be deceptive,";

-					mes "but if you can beat me in a";

-					mes "fight, I think I might just";

-					mes "talk to you. How about it?";

-					next;

-					menu ".....",-,"Yes, I accept your challenge.",L_Accept,"No, I'm scared!",L_Scared;

-							set god_mjo_2,3;

-							mes "[Sudri]";

-							mes "You didn't even answer me!";

-							mes "Fine, whatever.";

-							close;

-						

-						L_Accept:

-							set god_mjo_2,1;

-							mes "[Sudri]";

-							mes "Ah, I like you already, human!";

-							mes "Now why don't you go do some";

-							mes "warm ups, and we'll fight";

-							mes "when you're ready?";

-							close;

-						

-						L_Scared:

-							set god_mjo_2,1;

-							mes "[Sudri]";

-							mes "Eh...?";

-							mes "Why are you being such a coward?";

-							mes "Are you afraid of this old";

-							mes "and tiny Dwarf?";

-							next;

-							mes "[Sudri]";

-							mes "Come on, I'll even let you";

-							mes "have the first hit. Just come";

-							mes "to me when you're ready to fight!";

-							close;

-		}					

-			else

-		{

-			mes "[Sudri]";

-			mes "Zzzz Zzzz...";

-			close;

-		}

-	}

-		else if(god_mjo_0 == 2)

-	{

-			if (god_mjo_1 == 3 || god_mjo_2 == 3 || god_mjo_3 == 3 || god_mjo_4 == 3)

-		{

-			mes "[Sudri]";

-			mes "Go back before I beat you to death.";

-			mes "All you can gain here are few herbs.";

-			close;

-		}

-			else if(god_mjo_3 == 2)

-		{

-			mes "[Sudri]";

-			mes "That was a great fight....hahahaha...";

-			mes "I don't regret about the result.";

-			mes "I lost but I kept my dignity.";

-			close;

-		}

-			else if (god_mjo_1 == 0 || god_mjo_1 == 1 || god_mjo_2 == 0 || god_mjo_2 == 1 || god_mjo_4 != 0)

-		{

-			mes "[Sudri]";

-			mes "What made you come to me?";

-			next;

-			menu "Nothing.",-,"Excuse me, sir.",L_Excuse3;

-					mes "[Sudri]";

-					mes "You have too much time";

-					mes "on your hand.";

-					mes "Why don't you log out";

-					mes "and go out with your";

-					mes "friends instead?";

-					close;

-				

-				L_Excuse3:

-					set god_mjo_3,3;

-					mes "[Sudri]";

-					mes "Why should I excuse you?";

-					mes "What, are you challenging me now?";

-					mes "Do you want to fight with me huh?";

-					close;

-		}

-			else if(god_mjo_3 == 1)

-		{

-			set @sudri_vit,200;

-			set @player_vit,100;

-			set @sudri_def,0;

-			set @player_def,0;

-			set @sudri_atk,0;

-			set @player_atk,0;

-			set @counter,0;

-			set @damage,0;

-			mes "[Sudri]";

-			mes "Fine, let's fight!";

-			mes "Old school rules!";

-			next;

-			

-			L_Fight2:

-				mes "Sudri : HP " + @sudri_vit + " left.";

-				mes "" + strcharinfo(0) + " : HP " + @player_vit + " left.";

-				mes "--------------------";

-				mes "" + strcharinfo(0) + " initiated an attack!";

-				next;

-				menu "...?!",case31,"Strike Head!",case32,"Strike Chest!",case33,"Strike Legs!",case34,"Take a break.",case35;

-					case31:

-						set @player_atk,0;

-						goto L_DefSudri2;

-					case32:

-						set @player_atk,1;

-						goto L_DefSudri2;

-					case33:

-						set @player_atk,2;

-						goto L_DefSudri2;

-					case34:

-						set @player_atk,3;

-						goto L_DefSudri2;

-					case35:

-						set @player_atk,4;

-						goto L_DefSudri2;

-				L_DefSudri2:

-				set @sudri_def,rand(1,3);

-				set @damage,rand(15,25);

-				if(@player_atk == 1) mes "" + strcharinfo(0) + " attacks Sudri's head!";

-				else if(@player_atk == 2) mes "" + strcharinfo(0) + " strikes Sudri's chest!";

-				else if(@player_atk == 3) mes "" + strcharinfo(0) + " aims for Sudri's legs!";

-				else if(@player_atk == 4) mes "" + strcharinfo(0) + " requests a break!";

-				else mes "" + strcharinfo(0) + "'s weak point revealed!";

-					if(@player_atk == @sudri_def)

-				{

-					specialeffect 336;

-						if(@sudri_def == 1)

-					{

-						mes "--------------------";

-						mes "Sudri easily dodges";

-						mes "your attack by twisting";

-						mes "his small, yet svelte, body.";

-						mes "--------------------";

-						mes "" + strcharinfo(0) + " misses!";

-					}

-						else if(@sudri_def == 2)

-					{

-						mes "--------------------";

-						mes "Sudri blocks your";

-						mes "attack by crossing";

-						mes "his stout arms.";

-						mes "--------------------";

-						mes "" + strcharinfo(0) + "'s attack is blocked!";

-					}

-						else if(@sudri_def == 3)

-					{

-						mes "--------------------";

-						mes "Sudri dodges your";

-						mes "attack with a graceful";

-						mes "leap to the heavens.";

-						mes "--------------------";

-						mes "" + strcharinfo(0) + " misses!";

-					}

-				}

-					else if(@player_atk == 4)

-				{

-					skilleffect 28,10;

-					set @player_vit,@player_vit + 10;

-					mes "--------------------";

-					mes "" + strcharinfo(0) + " has gained 10 HP!";

-				}

-					else if(@player_atk == 1)

-				{

-					specialeffect 5;

-					set @sudri_vit,@sudri_vit - @damage;

-					mes "--------------------";

-					mes "You successfully hit";

-					mes "Sudri on the head!";

-					mes "--------------------";

-					mes "Sudri has lost " + @damage + " HP!";

-				}

-					else if(@player_atk == 2)

-				{

-					specialeffect 2;

-					set @sudri_vit,@sudri_vit - @damage;

-					mes "--------------------";

-					mes "You successfully hit";

-					mes "Sudri on the chest!";

-					mes "--------------------";

-					mes "Sudri has lost " + @damage + " HP!";

-				}

-					else if(@player_atk == 3)

-				{

-					specialeffect 3;

-					set @sudri_vit,@sudri_vit - @damage;

-					mes "--------------------";

-					mes "You successfully hit";

-					mes "Sudri on the legs!";

-					mes "--------------------";

-					mes "Sudri has lost " + @damage + " HP!";

-				}

-					else if(@player_atk == 0)

-				{

-					specialeffect2 5;

-					set @player_vit,@player_vit - 10;

-					mes "--------------------";

-					mes "You were hit by";

-					mes "Sudri's counter attack!";

-					mes "--------------------";

-					mes "" + strcharinfo(0) + " has lost 10 HP!";

-						if(@player_vit < 1)

-					{

-						mes "Defeated...";

-						next;

-						goto L_Lost2;

-					}

-				}

-					else

-				{

-					mes "--------------------";

-					mes "Something happened and the fight has stopped!";

-					close;

-				}

-					if(@sudri_vit < 1)

-				{

-					mes "" + strcharinfo(0) + " wins!";

-					next;

-					goto L_Win2;

-				}

-				next;

-				mes "Sudri : HP " + @sudri_vit + " left.";

-				mes "" + strcharinfo(0) + " : HP " + @player_vit + " left.";

-				mes "--------------------";

-				mes "Sudri attacks...!";

-				next;

-				menu "...?!",case41,"Dodge!",case42,"Block!",case43,"Jump!",case44,"Counter back!",case45;

-					case41:

-						set @player_def,0;

-						goto L_DefPlayer2;

-					case42:

-						set @player_def,1;

-						goto L_DefPlayer2;

-					case43:

-						set @player_def,2;

-						goto L_DefPlayer2;

-					case44:

-						set @player_def,3;

-						goto L_DefPlayer2;

-					case45:

-						set @player_def,4;

-						goto L_DefPlayer2;

-				L_DefPlayer2:

-				set @sudri_atk,rand(1,3);

-				set @damage,rand(20,25);

-				if(@sudri_atk == 1) mes "Sudri aims for the head!";

-				else if(@sudri_atk == 2) mes "Sudri strikes the chest!";

-				else mes "Sudri attacks the legs!";

-					if(@sudri_atk == @player_def)

-				{

-					specialeffect2 336;

-						if(@player_def == 1)

-					{

-						mes "--------------------";

-						mes "" + strcharinfo(0) + " quickly dodged,";

-						mes "Sudri's arms were too short to reach at you.";

-						mes "--------------------";

-						mes "Sudri has failed to attack.";

-					}

-						else if(@player_def == 2)

-					{

-						mes "--------------------";

-						mes "" + strcharinfo(0) + " barely blocked";

-						mes "Sudri's attack.";

-						mes "--------------------";

-						mes "Sudri has failed to attack.";

-					}

-						else if(@player_def == 3)

-					{

-						mes "--------------------";

-						mes "" + strcharinfo(0) + " jumped,";

-						mes "dodged Sudri's attack at ease.";

-						mes "--------------------";

-						mes "Sudri has failed to attack.";

-					}

-				}

-					else if(@player_def == 4)

-				{

-					set @counter,rand(1,4);

-					mes "--------------------";

-					mes "" + strcharinfo(0) + " countered back!";

-						if(@counter == 1)

-					{

-						specialeffect2 131;

-						specialeffect 17;

-						set @sudri_vit,@sudri_vit - 20;

-						mes "You successfully countered back!";

-						mes "--------------------";

-						mes "Sudri has lost 20 HP!";

-							if(@sudri_vit < 1)

-						{

-							mes "" + strcharinfo(0) + " won!";

-							next;

-							goto L_Win2;

-						}

-					}

-						else

-					{

-						specialeffect2 1;

-						set @player_vit,@player_vit - 30;

-						mes "You were taken a great damage on your weak spot!";

-						mes "--------------------";

-						mes "" + strcharinfo(0) + " has lost 30 HP!";

-					}

-				}

-					else if(@sudri_atk == 1)

-				{

-					specialeffect2 5;

-					set @player_vit,@player_vit - @damage;

-					mes "--------------------";

-					mes "Sudri successfully";

-					mes "hit " + strcharinfo(0) + "";

-					mes "on the head!";

-					mes "--------------------";

-					mes "" + strcharinfo(0) + " has lost " + @damage + " HP!";

-				}

-					else if(@sudri_atk == 2)

-				{

-					specialeffect2 3;

-					set @player_vit,@player_vit - @damage;

-					mes "--------------------";

-					mes "Sudri successfully";

-					mes "hit " + strcharinfo(0) + "";

-					mes "on the chest!";

-					mes "--------------------";

-					mes "" + strcharinfo(0) + " has lost " + @damage + " HP!";

-				}

-					else if(@sudri_atk == 3)

-				{

-					specialeffect2 4;

-					set @player_vit,@player_vit - @damage;

-					mes "--------------------";

-					mes "Sudri successfully";

-					mes "hit " + strcharinfo(0) + "";

-					mes "on the legs!";

-					mes "--------------------";

-					mes "" + strcharinfo(0) + " has lost " + @damage + " HP!";

-				}

-					else if(@sudri_atk == 0)

-				{

-					specialeffect2 5;

-					set @player_vit,@player_vit - @damage;

-					mes "--------------------";

-					mes "Sudri successfully";

-					mes "hits "+ strcharinfo(0) +"";

-					mes "during a moment of";

-					mes "absent-mindedness!";

-					mes "--------------------";

-					mes "" + strcharinfo(0) + " has lost " + @damage + " HP!";

-				}

-					else

-				{

-					mes "--------------------";

-					mes "Something happened and the fight has stopped!";

-					close;

-				}

-					if(@player_vit < 1)

-				{

-					mes "Sudri won!";

-					next;

-					goto L_Lost2;

-				}

-				next;

-				goto L_Fight2;

-

-			L_Lost2:

-				mes "[Sudri]";

-				mes "Muhahahaha, you are not strong";

-				mes "enough to beat me! I want someone";

-				mes "who I can make an even match!";

-				mes "Go practice more and come back!";

-				close;

-			

-			L_Win2:

-				set god_mjo_3,2;

-				mes "[Sudri]";

-				mes "Ah...you are stronger than me...I haven't thought";

-				mes "that there would be a strong human as you...I am impressed.";

-				mes "Great, great.";

-				mes "Okay, I will tell good things of you to my friend.";

-				mes "But don't forget the order to visit my friends and brothers.";

-				next;

-				mes "[Sudri]";

-				mes "Okay then, have a good travel!";

-				close;

-		}

-			else if(god_mjo_3 == 0)

-		{

-			mes "[Sudri]";

-			mes "What made you come to me?";

-			next;

-			menu "Nothing.",-,"Excuse me, sir.",L_Excuse4;

-						mes "[Sudri]";

-						mes "You have too much time on your hand.";

-						mes "Why don't you log out and go out";

-						mes "with your friends instead?";

-						close;

-					

-				L_Excuse4:

-					mes "[Sudri]";

-					mes "You have very sharp eyes.";

-					mes "I can tell you are different from other humans.";

-					mes "Do you want something from me?";

-					mes "I don't talk to humans.";

-					next;

-					mes "[Sudri]";

-					mes "I love bare hands fighting!";

-					mes "I believe the action comes before the words!";

-					mes "So, how about a fight with me, huh?";

-					next;

-					menu ".....",-,"Sure, please teach me well.",L_Accept2,"No, I am scared.",L_Scared2;

-							set god_mjo_3,3;

-							mes "[Sudri]";

-							mes "You didn't even answer me!";

-							mes "Fine, whatever.";

-							close;

-

-						L_Accept2:

-							set god_mjo_3,1;

-							mes "[Sudri]";

-							mes "What a quick answer! I like you already, human!";

-							mes "Why don't you go do some warm-ups?";

-							mes "Let's start a fight when you're ready!";

-							close;

-						

-						L_Scared2:

-							set god_mjo_3,1;

-							mes "[Sudri]";

-							mes "Bah, you are a hot-blooded young man!";

-							mes "Why are you being so coward?";

-							mes "Do you fear this old and tiny dwarf man?";

-							mes "I don't mind, I will yield you first hit.";

-							mes "Come back when you are ready.";

-							close;

-		}

-			else

-		{

-			mes "[Sudri]";

-			mes "Zzzz Zzzz...";

-			close;

-		}

-	}

-		else if(god_mjo_0 == 0)

-	{

-		mes "[Sudri]";

-		mes "In a one on one fight,";

-		mes "you put everything on the";

-		mes "line to show your might";

-		mes "to your opponent.";

-		next;

-		mes "[Sudri]";

-		mes "Have you ever felt the";

-		mes "same way I do, human? Win";

-		mes "or lose, just giving your";

-		mes "all is the most satisfying accomplishment.";

-		close;

-	}

-		else

-	{

-		mes "[Sudri]";

-		mes "Zzzz Zzzz...";

-		close;

-	}

-}

-

-}

-

-mjolnir_01.gat,35,136,7	script	Dwarf Blacksmith#west	826,{

-

-	if($God3 < 50)

-{

-	mes "[Vestri]";

-	mes "If you want something,";

-	mes "you should earn it through";

-	mes "your own efforts.";

-	next;

-	mes "[Vestri]";

-	mes "No matter what other people say,";

-	mes "if you're confident and your";

-	mes "will is unwavering, you'll always";

-	mes "be satisfied with the results.";

-	next;

-	mes "[Vestri]";

-	mes "What do you think?";

-	mes "The youth these days...";

-	close;

-}

-	else

-{

-

-		if($God4 > 99)

-	{

-		mes "[Vestri]";

-		mes "I don't feel like doing anything today.";

-		next;

-		mes "[Vestri]";

-		mes "Someone must have forged something";

-		mes "really monstrous, otherwise I";

-		mes "wouldn't be feeling so worthless!";

-		next;

-		mes "[Vestri]";

-		mes "Yeah, I think I need a break!";

-		mes "Don't you think I need a break,";

-		mes "human?";

-		close;

-	}

-		else if(god_mjo_0 == 11)

-	{

-		mes "[Vestri]";

-		mes "There's nothing like taking";

-		mes "a relaxing break after putting";

-		mes "your heart into your work.";

-		next;

-		mes "[Vestri]";

-		mes "What do you think, human?";

-		mes "Isn't that one of life's";

-		mes "simple pleasures?";

-		close;

-	}

-		else if(god_mjo_0 == 10)

-	{

-		mes "[Vestri]";

-		mes "If you need something, you must get it";

-		mes "on your own...no matter what people say";

-		mes "if you are confident about your will,";

-		mes "it is already good regardless of the result of your action.";

-		mes "What do you think?";

-		mes "Young generations in thesedays....";

-		close;

-	}

-		else if(god_mjo_0 == 1)

-	{

-			if(god_mjo_1 == 3 || god_mjo_2 == 3 || god_mjo_3 == 3 || god_mjo_4 == 3)

-		{

-			mes "[Vestri]";

-			mes "I really hope I meet a decent";

-			mes "human being next time. So far,";

-			mes "I haven't met one useful human.";

-			close;

-		}

-			else if(god_mjo_3 == 2)

-		{

-			mes "[Vestri]";

-			mes "Perfect preparation does not";

-			mes "always result in success.";

-			mes "There's a point when you've";

-			mes "got to just go out and do it.";

-			next;

-			mes "[Vestri]";

-			mes "I don't know how far you'll";

-			mes "go, but put all your strength";

-			mes "into it anyway~";

-			close;

-		}

-			else if(god_mjo_1 == 0 || god_mjo_1 == 1 || god_mjo_2 == 0 || god_mjo_2 == 1 || god_mjo_4 != 0)

-		{

-			mes "[Vestri]";

-			mes "What do you want?";

-			next;

-			menu "Nothing.",-,"Excuse me.",L_Excuse;

-					mes "[Vestri]";

-					mes "If you need anything, try to";

-					mes "get it on your own!";

-					mes "Nobody is responsible on you";

-					mes "but yourself!";

-					close;

-				

-				L_Excuse:

-					set god_mjo_3,3;

-					mes "[Vestri]";

-					mes "You didn't answer the question!";

-					mes "Now, you've probably got the";

-					mes "wrong Dwarf here.";

-					next;

-					mes "[Vestri]";

-					mes "Get out of here, and go to your";

-					mes "human Blacksmiths if you want";

-					mes "equipment upgrades!";

-					close;

-		}

-			else if(god_mjo_3 == 1)

-		{

-			disable_items;

-			mes "[Vestri]";

-			mes "Great! Which one should";

-			mes "I upgrade first, huh? My heart";

-			mes "is pounding with anticipation...";

-			next;

-		M_Menu:

-				menu getequipname(1),PART1,getequipname(2),PART2,getequipname(3),PART3,getequipname(4),PART4,getequipname(5),PART5,

-	     			getequipname(6),PART6,getequipname(7),PART7,getequipname(8),PART8,getequipname(9),PART9,getequipname(10),PART10;

-

-				PART1:

-					set @vestripart,1;

-					if (getequipisequiped(1)) goto L_Check11;

-					goto M_Menu;

-				PART2:

-					set @vestripart,2;

-					if (getequipisequiped(2)) goto L_Check11;

-					goto M_Menu;

-				

-				PART3:

-					set @vestripart,3;

-					if (getequipisequiped(3)) goto L_Check11;

-					goto M_Menu;

-				

-				PART4:

-					set @vestripart,4;

-					if (getequipisequiped(4)) goto L_Check11;

-					goto M_Menu;

-				PART5:

-					set @vestripart,5;

-					if (getequipisequiped(5)) goto L_Check11;

-					goto M_Menu;

-				

-				PART6:

-					set @vestripart,6;

-					if (getequipisequiped(6)) goto L_Check11;

-					goto M_Menu;

-				

-				PART7:

-					set @vestripart,7;

-					if (getequipisequiped(7)) goto L_Check11;

-					goto M_Menu;

-				

-				PART8:

-					set @vestripart,8;

-					if (getequipisequiped(8)) goto L_Check11;

-					goto M_Menu;

-				

-				PART9:

-					set @vestripart,9;

-					if (getequipisequiped(9)) goto L_Check11;

-					goto M_Menu;

-				

-				PART10:

-					set @vestripart,10;

-					if (getequipisequiped(10)) goto L_Check11;

-					goto M_Menu;

-			

-			L_Check11:

-			if(getequipisenableref(@vestripart)) goto L_Check12;

-				mes "[Vestri]";

-				mes "What, this isn't upgradable!";

-				mes "What the hell do you want me";

-				mes "to do with this?";

-				close2;

-				enable_items;

-				end;

-			

-			L_Check12:

-				if(getequipisidentify(@vestripart)) goto L_Check13;

-				mes "[Vestri]";

-				mes "You'd better identify this item";

-				mes "first. If we don't know what it";

-				mes "is, what's the point of upgrading it?";

-				close2;

-				enable_items;

-				end;

-			

-			L_Check13:

-				if(getequiprefinerycnt(@vestripart) < 10) goto L_Check14;

-				mes "[Vestri]";

-				mes "Oh, this is excellent!";

-				mes "This piece here has been";

-				mes "perfectly refined!";

-				next;

-				mes "[Vestri]";

-				mes "But this isn't what I want.";

-				mes "I can't do any work on this at all.";

-				close2;

-				enable_items;

-				end;

-			

-			L_Check14:

-				if (getequippercentrefinery(@vestripart) != 100) goto L_Check15;

-				mes "[Vestri]";

-				mes "This item isn't even a challenge";

-				mes "to upgrade. You can get humans";

-				mes "to do this kind of beginner's stuff.";

-				next;

-				mes "[Vestri]";

-				mes "Come on...";

-				mes "Bring me something that presents";

-				mes "an element of risk!";

-				close2;

-				enable_items;

-				end;

-			

-			L_Check15:

-				if (getequipweaponlv(@vestripart) == 1 || getequipweaponlv(@vestripart) == 2 || getequipweaponlv(@vestripart) == 3)

-			{

-				mes "[Vestri]";

-				mes "Hey...";

-				mes "Don't insult me by expecting me";

-				mes "to work on anything less than";

-				mes "a Level 4 weapon.";

-				next;

-				mes "[Vestri]";

-				mes "Bring me a Level 4 weapon for";

-				mes "me to work on next time, got it?";

-				close2;

-				enable_items;

-				end;

-			}

-			

-				if(getequipweaponlv(@vestripart) == 0)

-			{

-				mes "[Vestri]";

-				mes "Armor?!";

-				mes "Didn't I tell you that I only";

-				mes "work on Level 4 weapons?";

-				next;

-				mes "[Vestri]";

-				mes "You can have a human Blacksmith";

-				mes "work on that kind of stuff! Now,";

-				mes "a Dwarf like me needs something";

-				mes "that's more of a challenge!";

-				close2;

-				enable_items;

-				end;

-			}

-

-			mes "[Vestri]";

-			mes "Okay, let me give you the mandatory";

-			mes "warning. If your weapon happens";

-			mes "to be destroyed by chance during";

-			mes "the upgrade, you'll never see";

-			mes "the weapon again.";

-			next;

-			mes "[Vestri]";

-			mes "That also means that if the weapon";

-			mes "is destroyed, any ^FF0000Cards^000000";

-			mes "inserted into the weapon will also";

-			mes "be gone.";

-			next;

-			mes "[Vestri]";

-			mes "If you understand,";

-			mes "then let's get on with it!";

-			next;

-			menu "Sure, let's do it!",L_Go,"N-no, I changed my mind!",-;

-					mes "[Vestri]";

-					mes "Bah! How do you survive in this";

-					mes "world with that kind of cowardice?!";

-					next;

-					mes "[Vestri]";

-					mes "Oh, forget it.";

-					mes "I know you're just being careful.";

-					mes "Damn, I was just so eager to";

-					mes "get to work!";

-					close2;

-					enable_items;

-					end;

-			

-			L_Go:

-				if(countitem(984) > 0) delitem 984,1;

-				else

-			{

-				mes "[Vestri]";

-				mes "Huh...";

-				mes "You forgot to";

-				mes "bring an Oridecon.";

-				mes "Hurry up and get one.";

-				close;

-			}

-			

-				if (getequippercentrefinery(@vestripart) > rand(100))

-			{

-				mes "^3355FF*Clang Clang!*^000000";

-				successrefitem @vestripart;

-				next;

-				emotion e_no1;

-				mes "[Vestri]";

-				mes "Mwahahaha~";

-				mes "I've still got it!";

-				mes "So aren't you happy with an";

-				mes "even more powerful weapon?";

-				next;

-			}

-				else

-			{

-				mes "[Vestri]";

-				mes "^3355FF*Clang Clang!*^000000";

-				failedrefitem @vestripart;

-				next;

-				emotion e_omg;

-				mes "[Vestri]";

-				mes "Waaahhhhh!";

-				mes "Dear God, no!";

-				next;

-				mes "[Vestri]";

-				mes "I-It's alright!";

-				mes "Bad things happen sometimes.";

-				mes "Let's just think of it as both";

-				mes "of us having a bad day.";

-				mes "Yeah, not regrets!";

-				next;

-			}

-			set god_mjo_3,2;

-			enable_items;

-			mes "[Vestri]";

-			mes "Well, my friend,";

-			mes "if you ever visit my brothers,";

-			mes "please give them my regards.";

-			mes "Take care.";

-			close;

-		}

-			else if(god_mjo_3 == 0)

-		{

-			mes "[Vestri]";

-			mes "What do you want?";

-			next;

-			menu "Nothing.",-,"Excuse me.",L_Excuse2;

-					mes "[Vestri]";

-					mes "If you need anything, try to";

-					mes "get it on your own!";

-					mes "Nobody is responsible on you";

-					mes "but yourself!";

-					close;

-				

-				L_Excuse2:

-					mes "[Vestri]";

-					mes "Hmm, I am not sure if there is things";

-					mes "that I can help you with.";

-					mes "As you see, I am a blacksmith.";

-					next;

-					mes "[Vestri]";

-					mes "I prefer upgrading weapns more than anything else!";

-					mes "Especially I like to upgrade a weapon that has been";

-					mes "forged many times already or a high level one.";

-					mes "Because they're challengeable!";

-					next;

-					mes "[Vestri]";

-					mes "Don't you like the idea of challenging to";

-					mes "a limit? To me, upgrading items makes me feel like";

-					mes "climbing the top of a mountain that has never been touched by dwarves!";

-					next;

-					mes "[Vestri]";

-					mes "Okay, I think we're meant to meet today.";

-					mes "For that, I am going to upgrade a weapon";

-					mes "with a free of charge";

-					mes "if you bring me a weapon and a forging material.";

-					mes "Isn't it a great offer?";

-					next;

-					set god_mjo_3,1;

-					mes "[Vestri]";

-					mes "But here's a condition.";

-					mes "You must bring me a level 4 weapon.";

-					mes "Just like I said, I want something to challenge.";

-					mes "Oh, don't forget an oridecon, too!";

-					close;

-		}

-			else

-		{

-			mes "[Vestri]";

-			mes "Zzzz Zzzz Zzzz...";

-			close;

-		}

-	}

-		else if(god_mjo_0 == 2)

-	{

-			if (god_mjo_1 == 3 || god_mjo_2 == 3 || god_mjo_3 == 3 || god_mjo_4 == 3)

-		{

-			mes "[Vestri]";

-			mes "I really hope I will meet a";

-			mes "decent human being next time";

-			mes "...so far there has never been";

-			mes "at least one human useful.";

-			close;

-		}

-			else if(god_mjo_2 == 2)

-		{

-			mes "[Vestri]";

-			mes "Prefect preparation does not";

-			mes "always result in success.";

-			mes "I am not sure how far you can go,";

-			mes "but put forth your strength anyway.";

-			close;

-		}

-			else if (god_mjo_1 == 0 || god_mjo_1 == 1 || god_mjo_3 != 0 || god_mjo_4 != 0)

-		{

-			mes "[Vestri]";

-			mes "What do you want?";

-			next;

-			menu "Nothing.",-,"Excuse me.",L_Excuse3;

-					mes "[Vestri]";

-					mes "If you need anything, try to";

-					mes "get it on your own!";

-					mes "Nobody is responsible on you";

-					mes "but yourself!";

-					close;

-				

-				L_Excuse3:

-					set god_mjo_2,3;

-					mes "[Vestri]";

-					mes "You didn't listen to me and you don't even know who I am.";

-					mes "I am not excusing you!";

-					mes "You got a wrong dwarf here. Go back.";

-					mes "Ask to your human blacksmiths for item upgrade!";

-					close;

-		}

-			else if(god_mjo_2 == 1)

-		{

-			disable_items;

-			mes "[Vestri]";

-			mes "Great! Which one should I";

-			mes "upgrade first, huh?";

-			mes "My heart is throbbing with";

-			mes "excitement...";

-			next;

-			M_Menu2:

-			menu getequipname(1),PART11,getequipname(2),PART12,getequipname(3),PART13,getequipname(4),PART14,getequipname(5),PART15,

-			     getequipname(6),PART16,getequipname(7),PART17,getequipname(8),PART18,getequipname(9),PART19,getequipname(10),PART20;

-

-				PART11:

-					set @vestripart,1;

-					if (getequipisequiped(1)) goto L_Check21;

-					goto M_Menu2;

-				PART12:

-					set @vestripart,2;

-					if (getequipisequiped(2)) goto L_Check21;

-					goto M_Menu2;

-				

-				PART13:

-					set @vestripart,3;

-					if (getequipisequiped(3)) goto L_Check21;

-					goto M_Menu2;

-				

-				PART14:

-					set @vestripart,4;

-					if (getequipisequiped(4)) goto L_Check21;

-					goto M_Menu2;

-				PART15:

-					set @vestripart,5;

-					if (getequipisequiped(5)) goto L_Check21;

-					goto M_Menu2;

-				

-				PART16:

-					set @vestripart,6;

-					if (getequipisequiped(6)) goto L_Check21;

-					goto M_Menu2;

-				

-				PART17:

-					set @vestripart,7;

-					if (getequipisequiped(7)) goto L_Check21;

-					goto M_Menu2;

-				

-				PART18:

-					set @vestripart,8;

-					if (getequipisequiped(8)) goto L_Check21;

-					goto M_Menu2;

-				

-				PART19:

-					set @vestripart,9;

-					if (getequipisequiped(9)) goto L_Check21;

-					goto M_Menu2;

-				

-				PART20:

-					set @vestripart,10;

-					if (getequipisequiped(10)) goto L_Check21;

-					goto M_Menu2;

-			

-			L_Check21:

-			if(getequipisenableref(@vestripart)) goto L_Check22;

-				mes "[Vestri]";

-				mes "What, this isn't upgradable!";

-				mes "What the hell do you want me";

-				mes "to do with this?";

-				close2;

-				enable_items;

-				end;

-			

-			L_Check22:

-				if(getequipisidentify(@vestripart)) goto L_Check23;

-				mes "[Vestri]";

-				mes "You'd better identify this item";

-				mes "first. If we don't know what it";

-				mes "is, what's the point of upgrading it?";

-				close2;

-				enable_items;

-				end;

-			

-			L_Check23:

-				if(getequiprefinerycnt(@vestripart) < 10) goto L_Check24;

-				mes "[Vestri]";

-				mes "Oh, this is excellent!";

-				mes "This piece here has been";

-				mes "perfectly refined!";

-				next;

-				mes "[Vestri]";

-				mes "But this isn't what I want.";

-				mes "I can't do any work on this at all.";

-				close2;

-				enable_items;

-				end;

-			

-			L_Check24:

-				if (getequippercentrefinery(@vestripart) != 100) goto L_Check25;

-				mes "[Vestri]";

-				mes "This item isn't even a challenge";

-				mes "to upgrade. You can get humans";

-				mes "to do this kind of beginner's stuff.";

-				next;

-				mes "[Vestri]";

-				mes "Come on...";

-				mes "Bring me something that presents";

-				mes "an element of risk!";

-				close2;

-				enable_items;

-				end;

-			

-			L_Check25:

-				if (getequipweaponlv(@vestripart) == 1 || getequipweaponlv(@vestripart) == 2 || getequipweaponlv(@vestripart) == 3)

-			{

-				mes "[Vestri]";

-				mes "Hey...";

-				mes "Don't insult me by expecting me";

-				mes "to work on anything less than";

-				mes "a Level 4 weapon.";

-				next;

-				mes "[Vestri]";

-				mes "Bring me a Level 4 weapon for";

-				mes "me to work on next time, got it?";

-				close2;

-				enable_items;

-				end;

-			}

-			

-				if(getequipweaponlv(@vestripart) == 0)

-			{

-				mes "[Vestri]";

-				mes "Armor?!";

-				mes "Didn't I tell you that I only";

-				mes "work on Level 4 weapons?";

-				next;

-				mes "[Vestri]";

-				mes "You can have a human Blacksmith";

-				mes "work on that kind of stuff! Now,";

-				mes "a Dwarf like me needs something";

-				mes "that's more of a challenge!";

-				close2;

-				enable_items;

-				end;

-			}

-

-			mes "[Vestri]";

-			mes "Okay, let's check this before I start.";

-			mes "If your weapon happens to be destroyed while upgraded,";

-			mes "you will not see the weapon ever again. You know that, don't you?";

-			mes "That also applies to any item inserted to the weapon such as";

-			mes "^ff0000a monster card^000000!";

-			mes "^ff0000Your weapon will be just gone^000000, do you understand?";

-			mes "If you do, let's get it on!";

-			next;

-			menu "Sure, let's do it!",L_Go2,"...no, I am out.",-;

-					mes "[Vestri]";

-					mes "Bah, how are you gonna survive in this tough world";

-					mes "with that kind of timid attitude?";

-					mes "Yeah, yeah, yeah, forget it.";

-					mes "Forget it!";

-					close;

-					enable_items;

-					end;

-

-			L_Go2:

-				if(countitem(984) > 0) delitem 984,1;

-				else

-			{

-				mes "[Vestri]";

-				mes "Hmm, yeah you forgot to bring one thing...";

-				mes "That is an oridecon.";

-				mes "Now go bring it.";

-				close;

-			}

-

-				if (getequippercentrefinery(@vestripart) > rand(100))

-			{

-				mes "[Vestri]";

-				mes "Clang! Clang! Clang!";

-				successrefitem @vestripart;

-				next;

-				emotion e_no1;

-				mes "[Vestri]";

-				mes "Muhahaha, I am still good!";

-				mes "So, aren't you happy to have a more powerful weapon?";

-				next;

-			}

-				else

-			{

-				mes "[Vestri]";

-				mes "Clang! Clang! Clang!";

-				failedrefitem @vestripart;

-				next;

-				emotion e_omg;

-				mes "[Vestri]";

-				mes "Waaahhhhhhhhhhhhhh!";

-				next;

-				mes "[Vestri]";

-				mes "Umm, it's alright. Bad thing happens.";

-				mes "Let's think of it as we're having a bad day.";

-				mes "Yeah, I have no regrets!";

-				next;

-			}

-			set god_mjo_2,2;

-			enable_items;

-			mes "[Vestri]";

-			mes "This is it, my friend.";

-			mes "If you have a chance to meet my brothers,";

-			mes "please send my regard to them.";

-			mes "Take care.";

-			close;

-		}

-			else if(god_mjo_2 == 0)

-		{

-			mes "[Vestri]";

-			mes "What do you want?";

-			next;

-			menu "Nothing.",-,"Excuse me.",L_Excuse4;

-					mes "[Vestri]";

-					mes "If you need anything, try to get it on your own!";

-					mes "Nobody is responsible on you but yourself!";

-					close;

-				

-				L_Excuse4:

-					mes "[Vestri]";

-					mes "Hmm, I am not sure if there is things";

-					mes "that I can help you with.";

-					mes "As you see, I am a blacksmith.";

-					next;

-					mes "[Vestri]";

-					mes "I prefer upgrading weapns more than anything else!";

-					mes "Especially I like to upgrade a weapon that has been";

-					mes "forged many times already or a high level one.";

-					mes "Because they're challengeable!";				

-					next;

-					mes "[Vestri]";

-					mes "Don't you like the idea of challenging to";

-					mes "a limit? To me, upgrading items makes me feel like";

-					mes "climbing the top of a mountain that has never been touched by dwarves!";

-					next;

-					mes "[Vestri]";

-					mes "Okay, I think we're meant to meet today.";

-					mes "For that, I am going to upgrade a weapon";

-					mes "with a free of charge";

-					mes "if you bring me a weapon and a forging material.";

-					mes "Isn't it a great offer?";

-					next;

-					set god_mjo_2,1;

-					mes "[Vestri]";

-					mes "But here's a condition.";

-					mes "You must bring me a level 4 weapon.";

-					mes "Just like I said, I want something to challenge.";

-					mes "Oh, don't forget an oridecon, too!";

-					close;

-		}

-			else

-		{

-			mes "[Vestri]";

-			mes "Zzzz Zzzz Zzzz...";

-			close;

-		}

-	}

-		else if(god_mjo_0 == 0)

-	{

-		mes "[Vestri]";

-		mes "It's always a pleasure to engage";

-		mes "myself in hard work, especially";

-		mes "smithing.";

-		next;

-		mes "[Vestri]";

-		mes "Upgrading is always enjoyable!";

-		mes "I have no regrets when failure,";

-		mes "and I'm always pleased when I'm";

-		mes "successful. I'll upgrade everyday";

-		mes "o make the best of my life~";

-		close;

-	}

-		else

-	{

-		mes "[Vestri]";

-		mes "Zzzz Zzzz Zzzz...";

-		close;

-	}

-}

-

-}

-

-mjolnir_12.gat,18,18,7	script	Dwarf Blacksmith#north	826,{

-

-	if ($God3 < 50)

-{

-	mes "[Nordri]";

-	mes "What, I don't have any Eluniums";

-	mes "or Oridecons!";

-	next;

-	mes "[Nordri]";

-	mes "Vestri took them all. ^333333*Sigh*^000000";

-	mes "Those were my treasures, you know...";

-	close;

-}

-	else

-{

-		if($God4 > 99)

-	{

-		mes "[Nordri]";

-		mes "What's happening?";

-		mes "I smell something different from";

-		mes "the wind...I cannot tell what it is.";

-		mes "Should I go into a cave to fiture it out...?";

-		mes "Hmmm....this is odd.";

-		close;

-	}

-		else if(god_mjo_0 == 11)

-	{

-		mes "[Nordri]";

-		mes "Hahahahah, even Gods know that we dwarves";

-		mes "are the most talented artisans among all the existing races.";

-		mes "Maybe we don't look that way for now,";

-		mes "one day we will start our business again.";

-		close;

-	}

-		else if(god_mjo_0 == 10)

-	{

-		mes "[Nordri]";

-		mes "What, I don't have any Eluniums";

-		mes "or Oridecons!";

-		mes "Vestri took all of them....";

-		mes "Do you understand?";

-		close;

-	}

-		else if(god_mjo_0 == 1)

-	{

-			if (god_mjo_1 == 3 || god_mjo_2 == 3 || god_mjo_3 == 3 || god_mjo_4 == 3)

-		{

-			mes "[Nordri]";

-			mes "La la la la~ La la la la~";

-			mes "It is happy to be in the Mjolnir forest~";

-			mes "I am surrounded by a peaceful and quiet air~ La la la~";

-			mes "I do not worry about anything~ La la la~";

-			close;

-		}

-			else if(god_mjo_4 == 2)

-		{

-			mes "[Nordri]";

-			mes "Aren't you supposed to be going back by now...? Heh,";

-			mes "Oh well, none of my business.";

-			mes "If you have some spare zeny, have some banana on the way...";

-			mes "Isn't a pumpkin the best taste though?";

-			close;

-		}

-			else if (god_mjo_1 == 0 || god_mjo_1 == 1 || god_mjo_2 == 0 || god_mjo_2 == 1 || god_mjo_3 == 0 || god_mjo_3 == 1)

-		{

-			mes "[Nordri]";

-			mes "What kind of business do";

-			mes "you have with me?";

-			next;

-			menu "Nothing.",-,"Excuse me.",L_Excuse;

-					mes "[Nordri]";

-					mes "You're funny, leave me alone.";

-					close;

-				

-				L_Excuse:

-					set god_mjo_4,3;

-					mes "[Nordri]";

-					mes "What? I am sorry, I cannot hear";

-					mes "you at this moment.";

-					mes "I want to sing a song really loud!";

-					mes "La la la~ La la la~";

-					close;

-		}

-			else if(god_mjo_4 == 1)

-		{

-				if(countitem(501) > 0)

-			{

-				delitem 501,1;

-				mes "[Nordri]";

-				mes "Heheh, thank you. Since you gave me";

-				mes "your precious red potion, I shall";

-				mes "tell you an old story";

-				mes "in return. You will like it.";

-				next;

-				set @mjo_north,0;

-			L_NorthTalk:

-					switch(@mjo_north)

-				{

-					case 0:

-						mes "[Nordri]";

-						mes "A legend says that Thor went on an adventure to Utgard,";

-						mes "the land of giants.";

-						mes "He made a bet with the king of giants.";

-						next;

-						mes "[Nordri]";

-						mes "The first step of the bet was who ate more food than the other.";

-						mes "Thor ate all of meats on the table";

-						mes "Utgardaloki, the king ate not only meats but bones and plates as well.";

-						next;

-						mes "[Nordri]";

-						mes "The truth was Thor was hallucinated by a magic at the time,";

-						mes "so he couldn't realise that the king was not actually the king but a creature...";

-						mes "it was the thing which could eat up everything in the world...";

-						mes "I cannot remember what it was...do you?";

-						next;

-						menu "Greed",-,"Sea",-,"Blaze",L_Speak,"Hog",-;

-							goto L_Listen;

-					

-					case 1:

-						mes "[Nordri]";

-						mes "Yes, I remember now, it was the 'Blaze'.";

-						mes "After that, there was another match which competed who ran faster than the other.";

-						mes "For the match, Thor let his servant Tialfi compte with";

-						mes "the king's servant Hugi.";

-						next;

-						mes "[Nordri]";

-						mes "However, no matter how many matches they did,";

-						mes "Hugi won everytime. Thor was once again hallucinated by a magic";

-						mes "so he could not realise Hugi was as a matter of fact";

-						mes "the....do you know what it truely was?";

-						next;

-						menu "Language",-,"Thoughts",L_Speak,"Wind",-,"Wolf",-;

-							goto L_Listen;

-

-					case 2:

-						mes "[Nordri]";

-						mes "Yes, you're right! It was the 'thoughts'!";

-						mes "That defiant giants gave an order to Thor to fight with his grand mother.";

-						mes "Thor was happy for that he would finally win this time by defeating";

-						mes "an old woman....but he could not.";

-						mes "No matter how hard he tried, he could not win over the old woman.";

-						next;

-						mes "[Nordri]";

-						mes "Thor was again hallucinated by a magic";

-						mes "so he could not realise the old woman was as a matter of fact";

-						mes "the....do you know what it truely was?";

-						next;

-						menu "Curse",-,"Earth",-,"Heart",-,"Age",L_Speak;

-							goto L_Listen;

-

-					case 3:

-						mes "[Nordri]";

-						mes "Yes, it was the 'age'! No one can stop their time!";

-						mes "After Thor was lost every match, the king told him";

-						mes "the truth about the betting. And Thor became furious.";

-						mes "But it was no use, because the king and other giants were all gone";

-						mes "by then....";

-						next;

-						mes "[Nordri]";

-						mes "There are two things that give us lessons.";

-						mes "First, don't believe things as you see.";

-						mes "Second, don't be so sure of your power,";

-						mes "there are men who are more powerful than you. So you shall do your best and be humble.";

-						mes "Do you understand?";

-						next;

-						mes "[Nordri]";

-						mes "Living properly will be the most important thing.";

-						mes "You cannot have everything what you want.";

-						mes "Besides, when you're obssessive about something,";

-						mes "you cannot think rationally about the thing.";

-						next;;

-						set god_mjo_4,2;

-						mes "[Nordri]";

-						mes "Thank you for listening to my long story.";

-						mes "If you meet anyone dreaming something that cannot be true,";

-						mes "please share this story with him.";

-						mes "The story about Thor that he fought against hallucination created by the giant king.";

-						close;

-						

-				}

-					L_Listen:

-						mes "[Nordri]";

-						mes "...umm? I don't think that it was...hmm.";

-						mes "Let me think about it more.";

-						mes "Maybe I can remember it later....";

-						mes "shall we talk again with drinking a red potion?";

-						mes "Hahahahaha.";

-						close;

-			}

-				else

-			{

-				mes "[Nordri]";

-				mes "Woah, I am so thirsty. Didn't I ask you to give a red potion!?";

-				mes "I am not gonna tell you unless you bring me one.";

-				close;

-			}

-		}

-			else if(god_mjo_4 == 0)

-		{

-			mes "[Nordri]";

-			mes "What kind of business";

-			mes "do you have with me?";

-			next;

-			menu "Nothing.",-,"Excuse me.",L_Excuse2;

-					mes "[Nordri]";

-					mes "You're funny, leave me alone.";

-					close;

-

-				L_Excuse2:

-					mes "[Nordri]";

-					mes "This is odd. Recently, there have been too many";

-					mes "humans interested in dwarves.";

-					mes "Haha, of course, I am having a good time with them though.";

-					next;

-					set god_mjo_4,1;

-					mes "[Nordri]";

-					mes "I am kind of thirsty.";

-					mes "Bring me a red potion, would you?";

-					mes "If you do, I am gonna tell you an important story.";

-					mes "Heheheheh.";

-					close;

-		}

-			else

-		{

-			mes "[Nordri]";

-			mes "Zzzz Zzzz...";

-			close;

-		}

-	}

-		else if(god_mjo_0 == 2)

-	{

-			if (god_mjo_1 == 3 || god_mjo_2 == 3 || god_mjo_3 == 3 || god_mjo_4 == 3)

-		{

-			mes "[Nordri]";

-			mes "La la la la~ La la la la~";

-			mes "It is happy to be in the Mjolnir forest~";

-			mes "I am surrounded by a peaceful and quiet air~ La la la~";

-			mes "I do not worry about anything~ La la la~";

-			close;

-		}

-			else if(god_mjo_1 == 2)

-		{

-			mes "[Nordri]";

-			mes "Aren't you supposed to be going back by now...? Heh,";

-			mes "Oh well, none of my business.";

-			mes "If you have some spare zeny, have some banana on the way...";

-			mes "Isn't a pumpkin the best taste though?";

-			close;

-		}

-			else if (god_mjo_2 != 0 || god_mjo_3 != 0 || god_mjo_4 != 0)

-		{

-			mes "[Nordri]";

-			mes "What kind of business do you have with me?";

-			next;

-			menu "Nothing.",-,"Excuse me.",L_Excuse3;

-					mes "[Nordri]";

-					mes "You're funny, leave me alone.";

-					close;

-

-				L_Excuse3:

-					set god_mjo_1,3;

-					mes "[Nordri]";

-					mes "What? I am sorry, I cannot hear you at this moment.";

-					mes "I want to sing a song really loud!";

-					mes "La la la~ La la la~";

-					close;

-		}

-			else if(god_mjo_1 == 1)

-		{

-				if(countitem(501) > 0)

-			{

-				delitem 501,1;

-				mes "[Nordri]";

-				mes "Heheh, thank you. Since you gave me";

-				mes "your precious red potion, I shall tell you an old story";

-				mes "in return. You will like it.";

-				next;

-				set @mjo_north,0;

-			L_NorthTalk2:

-					switch(@mjo_north)

-				{

-					case 0:

-						mes "[Nordri]";

-						mes "A legend says that there was a brave and wise dwarf";

-						mes "named Alvis long time ago.";

-						mes "He possessed broad knowledge as a library";

-						mes "and was brave as Siegfried.";

-						next;

-						mes "[Nordri]";

-						mes "Unfortunately he was too ambitious.";

-						mes "He was in love with Thrud who was Thor's daughter at first sight.";

-						mes "So he proposed to Thor to marry with Thrud.";

-						mes "As you expected, Thor refused his proposal.";

-						mes "Alvis should have stopped there but he didn't.";

-						next;

-						mes "[Nordri]";

-						mes "So Thor asked him few questions to test him.";

-						mes "What was the first question....there was a question like this...";

-						mes "What was the name of the ground in a human's term?";

-						next;

-						menu "Ymir's body",-,"Earth",L_Speak2,"Lane",-,"Universe",-;

-							goto L_Listen2;

-

-					case 1:

-						mes "[Nordri]";

-						mes "Yes, it is the 'Earth'. So Thor gave him another question.";

-						mes "What is a  giant's term for a round shell that covers the earth?";

-						next;

-						menu "Ymir's Head",-,"Sky",-,"Cloud Factory",-,"High House",L_Speak2;

-							goto L_Listen2;

-

-					case 2:

-						mes "[Nordri]";

-						mes "That's it, 'High House'...since they're so gigantic,";

-						mes "it might looked that way.";

-						mes "So Thor gave him another question.";

-						mes "What is the god's term for a ball that arise in the night?";

-						next;

-						menu "Circling Wheel",-,"Moon",-,"False Sun",L_Speak2,"Fast Stranger",-;

-							goto L_Listen2;

-

-					case 3:

-						mes "[Nordri]";

-						mes "Yes! Gods call the moon as the 'false sun'.";

-						mes "Alvis knew every answer but he was too defiant";

-						mes "so he didn't notice that the sun was arising.";

-						mes "So he was turned into a stone statue.";

-						next;

-						mes "[Nordri]";

-						mes "There are two things we can learn from this story.";

-						mes "First, do not desire something that cannot be true.";

-						mes "Secone, do not be so proud of yourself...";

-						mes "You cannot have everything in the world.";

-						next;

-						mes "[Nordri]";

-						mes "Living properly is the most important thing.";

-						mes "Even if you wish something to be yours,";

-						mes "that does not happen every time, you know.";

-						mes "Thread of fate is of course long, but it can be cut off any time.";

-						next;

-						set god_mjo_1,2;

-						mes "[Nordri]";

-						mes "Thank you for listening to my long story.";

-						mes "If you meet anyone dreaming something that cannot be true,";

-						mes "please share this story with him.";

-						mes "The story about Alvis who was a wise and";

-						mes "brave ma but who was too defiant at the same time.";

-				}

-					L_Listen2:

-						mes "[Nordri]";

-						mes "...umm? I don't think that it was...hmm.";

-						mes "Let me think about it more.";

-						mes "Maybe I can remember it later....";

-						mes "shall we talk again with drinking a red potion?";

-						mes "Hahahahaha.";

-						close;

-			}

-				else

-			{

-				mes "[Nordri]";

-				mes "Woah, I am so thirsty. Didn't I ask you to give a red potion!?";

-				mes "I am not gonna tell you unless you bring me one.";

-				close;

-			}

-		}

-			else if(god_mjo_1 == 0)

-		{

-			mes "[Nordri]";

-			mes "What kind of business do you have with me?";

-			next;

-			menu "Nothing.",-,"Excuse me.",L_Excuse4;

-					mes "[Nordri]";

-					mes "You're funny, leave me alone.";

-					close;

-

-				L_Excuse4:

-					mes "[Nordri]";

-					mes "This is odd. Recently, there have been too many";

-					mes "humans interested in dwarves.";

-					mes "Haha, of course, I am having a good time with them though.";

-					next;

-					set god_mjo_1,1;

-					mes "[Nordri]";

-					mes "I am kind of thirsty.";

-					mes "Bring me a red potion, would you?";

-					mes "If you do, I am gonna tell you an important story.";

-					mes "Heheheheh.";

-					close;

-		}

-			else

-		{

-			mes "[Nordri]";

-			mes "Zzzz Zzzz Zzzz...";

-			close;

-		}

-	}

-		else if(god_mjo_0 == 0)

-	{

-		mes "[Nordri]";

-		mes "I am Nordri the dwarf blacksmith.";

-		mes "I am in charge of the north part of mountain Mjolnir.";

-		mes "If you want to pass me, you must ask";

-		mes "an approval to me.";

-		next;

-		mes "[Nordri]";

-		mes "Calm down, it was a joke. Hahahahaha!";

-		close;

-	}

-		else

-	{

-		mes "[Nordri]";

-		mes "Zzzz Zzzz Zzzz...";

-		close;

-	}

-

-L_Speak:

-	set @mjo_north,@mjo_north +1;

-	goto L_NorthTalk;

-

-L_Speak2:

-	set @mjo_north,@mjo_north +1;

-	goto L_NorthTalk2;

-}

-

+//===== eAthena Script ======================================= 
+//= Mjolnir seal unlocking NPCs.
+//===== By: ================================================== 
+//= SinSloth
+//===== Current Version: ===================================== 
+//= 1.1
+//===== Compatible With: ===================================== 
+//= eAthena
+//===== Description: ========================================= 
+//= Quest for breaking the seal of Mjolnir.
+//===== Additional Comments: =================================
+// 1.0 First version. Thanks to SinSloth for scripting it. [MasterOfMuppets]
+// 1.1 Fixed wrong label names [Luups]
+//============================================================
+
+prontera.gat,124,297,3	script	Tialfi	706,{
+
+	if ($God3 < 50)
+{
+	mes "[Tialfi]";
+	mes "Hmmm...";
+	mes "I can feel a strange force";
+	mes "growing stronger and stronger,";
+	mes "somewhere on in Rune-Midgard.";
+	next;
+	mes "[Tialfi]";
+	mes "Can you feel it?";
+	mes "Something must be";
+	mes "going on!";
+	close;
+}
+	else
+{
+		if(god_mjo_0 == 11)
+	{
+		mes "[Tialfi]";
+		mes "I'm waiting for the day";
+		mes "when I'll finally get to";
+		mes "see Thor's thunder for myself.";
+		mes "I believe that one of these days,";
+		mes "my dream will become reality.";
+		close;
+	}
+		else if(god_mjo_1 == 2 && god_mjo_2 == 2 && god_mjo_3 == 2 && god_mjo_4 == 2)
+	{
+			if (god_mjo_0 == 10)
+		{
+				if (countitem(756) > 49 && countitem(757) > 49)
+			{
+				if (Class == Job_Knight || Class == Job_Lord_Knight) set @gift,1;
+				if (Class == Job_Priest || Class == Job_High_Priest) set @gift,2;
+				if (Class == Job_Wizard || Class == Job_High_Wizard) set @gift,3;
+				if (Class == Job_Blacksmith || Class == Job_Whitesmith) set @gift,4;
+				if (Class == Job_Hunter || Class == Job_Sniper) set @gift,5;
+				if (Class == Job_Assassin || Class == Job_Assassin_Cross) set @gift,6;
+				if (Class == Job_Crusader || Class == Job_Paladin) set @gift,7;
+				if (Class == Job_Monk || Class == Job_Champion) set @gift,8;
+				if (Class == Job_Sage || Class == Job_Professor) set @gift,9;
+				if (Class == Job_Alchemist || Class == Job_Creator) set @gift,10;
+				if (Class == Job_Rogue || Class == Job_Stalker) set @gift,11;
+				if (Class == Job_Bard || Class == Job_Clown) set @gift,12;
+				if (Class == Job_Dancer || Class == Job_Gypsy) set @gift,13;
+				mes "[Tialfi]";
+				mes "You came back.";
+				mes "In exchange for the ores that";
+				mes "you have brought me, I will";
+				mes "give you one of my family";
+				mes "treasures.";
+				next;
+				mes "[Tialfi]";
+				mes "My ancestors will be glad";
+				mes "that that their treasure was";
+				mes "used for a good purpose.";
+				next;
+				mes "[Tialfi]";
+				mes "You have two options in";
+				mes "choosing a treasure. You can";
+				mes "have a treasure that will be";
+				mes "useful to yourself, or something";
+				mes "that may suit one of your friends.";
+				next;
+				mes "[Tialfi]";
+				mes "So which treasure";
+				mes "would you like to have?";
+				next;
+				menu "An item that I can use.",-,"An item that my friend can use.",L_Friend;
+						mes "[Tialfi]";
+						mes "I see. Give me a moment";
+						mes "to find a suitable item";
+						mes "for you.";
+						next;
+						goto L_Gift;
+					
+					L_Friend:
+						mes "[Tialfi]";
+						mes "I see. Give me a moment";
+						mes "to find a suitable item";
+						mes "for your friend.";
+						set @gift,rand(1,13);
+						next;
+			L_Gift:
+				mes "[Tialfi]";
+				mes "Okay, let's see...";
+				mes "I seem to recall that I put";
+				mes "it somewhere around... Hmm.";
+				mes "It must be around--Ah!";
+				mes "Here we are~";
+				next;
+				delitem 756,50;
+				delitem 757,50;
+				set god_mjo_0,11;
+				if (@gift == 1) getitem 1471,1;
+				if (@gift == 2) getitem 1526,1;
+				if (@gift == 3) getitem 1231,1;
+				if (@gift == 4) getitem 1367,1;
+				if (@gift == 5) getitem 1722,1;
+				if (@gift == 6) getitem 1230,1;
+				if (@gift == 7) getitem 1141,1;
+				if (@gift == 8) getitem 1813,1;
+				if (@gift == 9) getitem 1557,1;
+				if (@gift == 10) getitem 1235,1;
+				if (@gift == 11) getitem 1227,1;
+				if (@gift == 12) getitem 1913,1;
+				if (@gift == 13) getitem 1963,1;
+				mes "[Tialfi]";
+				mes "Once again, I thank you";
+				mes "for the trouble you've gone";
+				mes "through on my behalf.";
+				next;
+				mes "[Tialfi]";
+				mes "I'm unsure of how this";
+				mes "treasure works, but I hope it";
+				mes "will be useful to you. From";
+				mes "what I know, I believe this";
+				mes "is a rare item.";
+				next;
+				mes "[Tialfi]";
+				mes "I'll be waiting for the day";
+				mes "when I'll see Thor's thunder";
+				mes "for myself. I believe that,";
+				mes "one of these days, the dream";
+				mes "I've had will come true.";
+				close;
+			}
+				else
+			{
+				mes "[Tialfi]";
+				mes "I need";
+				mes "50 Rough Oridecon";
+				mes "and 50 Rough Elunium.";
+				next;
+				mes "[Tialfi]";
+				mes "I don't have much time, so";
+				mes "go ahead and continue on";
+				mes "your journeys if you can't";
+				mes "bring those to me.";
+				close;
+			}
+		}
+			else
+		{
+				if ($God4 > 99)
+			{
+				mes "[Tialfi]";
+				mes "I sense a strange energy";
+				mes "growing more powerful";
+				mes "somewhere on this continent...";
+				next;
+				mes "[Tialfi]";
+				mes "Can you feel it?";
+				mes "Something must be going on!";
+				next;
+				mes "[Tialfi]";
+				mes "I think we'd better wait and";
+				mes "see what's happening. Someone";
+				mes "will deliver the news to us.";
+				mes "Though, I am unsure of whether";
+				mes "or not it will be good news or bad...";
+				close;
+			}
+				else
+			{
+				set $God4,$God4 +1;
+					if($God4 == 50)
+				{
+					announce "The Fourth Seal of [Mjolnir] has appeared.",bc_all;
+				}
+				else if($God4 == 100 && $God2 == 100 && $God3 == 100 && $God1 == 100)
+				{
+					announce "All four seals have been released.",bc_all;
+				}
+				else if($God4 == 100)
+				{
+					announce "[Mjolnir] has been released.",bc_all;
+				}
+				set god_mjo_0,10;
+				mes "[Tialfi]";
+				mes "You've met the four Dwarven";
+				mes "Blacksmiths. I've heard that";
+				mes "they will rarely speak to humans.";
+				mes "So you must be special if you";
+				mes "were able to talk to them.";
+				next;
+				mes "[Tialfi]";
+				mes "Do you think that my dream";
+				mes "will come true? Do you believe";
+				mes "Thor's Mjolnir will appear before";
+				mes "the eyes of humans? I'm afraid great";
+				mes "change will come to this world.";
+				next;
+				mes "[Tialfi]";
+				mes "Thank you for going through such";
+				mes "trouble on my behalf. I wish to";
+				mes "give you one of my family";
+				mes "treasures as a token of my";
+				mes "gratitude.";
+				next;
+				mes "[Tialfi]";
+				mes "However, I hope you understand";
+				mes "that my family would grow suspicious";
+				mes "if one of the treasures were to";
+				mes "just go missing.";
+				next;
+				mes "[Tialfi]";
+				mes "Hmm, however, I don't think they'll";
+				mes "complain if I exchanged one of";
+				mes "the treasures for something else.";
+				mes "Let me think...";
+				next;
+				mes "[Tialfi]";
+				mes "I should be able to give you one";
+				mes "of our family heirlooms if you";
+				mes "can bring be 50 Rough Oridecons";
+				mes "and 50 Rough Eluniums.";
+				next;
+				mes "[Tialfi]";
+				mes "You don't have to do that if";
+				mes "you don't want to. But it seems";
+				mes "our family heirlooms would be";
+				mes "more useful to an adventurer";
+				mes "such as yourself...";
+				close;
+			}
+		}
+	}
+		else if(god_mjo_1 == 3 || god_mjo_2 == 3 || god_mjo_3 == 3 || god_mjo_4 == 3)
+	{
+		mes "[Tialfi]";
+		mes "Hmm...";
+		mes "The Dwarven Blacksmiths must be";
+		mes "upset at you for some reason.";
+		next;
+		mes "[Tialfi]";
+		mes "Remember my sister's suggestion";
+		mes "and speak to them with great";
+		mes "courtesy. Carefully choose";
+		mes "words of respect lest they be";
+		mes "insulted.";
+		next;
+		set god_mjo_1,0;
+		set god_mjo_2,0;
+		set god_mjo_3,0;
+		set god_mjo_4,0;
+		mes "[Tialfi]";
+		mes "You should be okay now. By";
+		mes "this time, they've probably";
+		mes "forgotten the insult. But make";
+		mes "sure you speak to my sister";
+		mes "for advice first.";
+		close;
+	}
+		else if(god_mjo_0 == 2 || god_mjo_0 == 1)
+	{
+		mes "[Tialfi]";
+		mes "Sorry for the trouble.";
+		mes "I wish you good luck.";
+		close;
+	}
+		else if(god_mjo_0 == 0)
+	{
+			if($God4 > 99)
+		{
+			mes "[Tialfi]";
+			mes "Listen...I can feel unknown";
+			mes "energy arising somewhere in";
+			mes "this continent.";
+			mes "Can you feel it? There must";
+			mes "be something going on...!";
+			next;
+			mes "[Tialfi]";
+			mes "I think we'd better wait to";
+			mes "see what's happening. Someone";
+			mes "will deliver the news to us.";
+			mes "I am not sure if it will be a";
+			mes "good news or a bad news.";
+			close;
+		}
+			else if(BaseLevel < 70)
+		{
+			mes "[Tialfi]";
+			mes "One of my ancestors supposedly";
+			mes "was a servant of Thor. Still,";
+			mes "I find it difficult to believe.";
+			next;
+			mes "[Tialfi]";
+			mes "If the gods have all these";
+			mes "powers, how could a mere human";
+			mes "be of any real assistance?";
+			close;
+		}
+		mes "[Tialfi]";
+		mes "Adventurer, I have an interesting";
+		mes "story to tell you. Last night,";
+		mes "I had the most amazing dream";
+		mes "where I was the servant of Thor,";
+		mes "god of thunder.";
+		next;
+		mes "[Tialfi]";
+		mes "In this dream, I traveled with";
+		mes "Thor to Jotunnheim, land of giants.";
+		mes "During our journey, he told me";
+		mes "many interesting stories about";
+		mes "gods and heroes.";
+		next;
+		mes "[Tialfi]";
+		mes "Of course, I can't remember";
+		mes "everything clearly, but it was";
+		mes "truly fantastic.";
+		next;
+		mes "[Tialfi]";
+		mes "For some reason, I can vividly";
+		mes "recall what Thor told me about";
+		mes "his weapon, Mjolnir. Mjolnir is";
+		mes "a Dwarven masterpiece.";
+		next;
+		mes "[Tialfi]";
+		mes "Thor told me that Dwarves are";
+		mes "extremely talented artisans, and";
+		mes "their works are supreme. So as";
+		mes "I was thinking about my dream,";
+		mes "I remembered...";
+		next;
+		mes "[Tialfi]";
+		mes "There is a mountain that has the";
+		mes "same name as Thor's weapon. Surely,";
+		mes "the two have some relation to";
+		mes "each other.";
+		next;
+		mes "[Tialfi]";
+		mes "I've also recently heard a rumor";
+		mes "that Dwarven Blacksmiths also";
+		mes "reside on Mount Mjolnir.";
+		next;
+		mes "[Tialfi]";
+		mes "I understand the mountain is";
+		mes "dangerous, and that I'm in no";
+		mes "position to ask such a thing...";
+		next;
+		mes "[Tialfi]";
+		mes "I can't help wanting to know";
+		mes "for myself whether or not there";
+		mes "is truth to my dream. Is it";
+		mes "possible for Mjolnir to resurface?";
+		next;
+		mes "[Tialfi]";
+		mes "If you don't mind, I'd like to ask";
+		mes "you to explore this mountain and";
+		mes "search for these Dwarven Blacksmiths.";
+		next;
+		menu "No.",-,"Okay.",L_Ok;
+			mes "[Tialfi]";
+			mes "I see. But I still appreciate";
+			mes "that you took the time to";
+			mes "listen to me.";
+			next;
+			mes "[Tialfi]";
+			mes "Hopefully someday I'll learn";
+			mes "the truth about my dreams and";
+			mes "about Mjolnir itself.";
+			close;
+		
+		L_Ok:
+			mes "[Tialfi]";
+			mes "Thank you, thank you so much!";
+			mes "Even though it won't be easy,";
+			mes "I have faith that if the Dwarven";
+			mes "Blacksmiths do exist, you'll be";
+			mes "able to find them.";
+			next;
+			mes "[Tialfi]";
+			mes "Oh, and please speak to my";
+			mes "sister Roskva first. She is";
+			mes "outside the North entrance";
+			mes "of Prontera.";
+			next;
+			mes "[Tialfi]";
+			mes "I'm sure that she can give";
+			mes "you useful information if";
+			mes "you're fortunate enough to";
+			mes "encounter the Dwarves.";
+			next;
+			set god_mjo_0,rand(1,2);
+			mes "[Tialfi]";
+			mes "I'm truly lucky to meet such";
+			mes "an adventurer like yourself.";
+			mes "I wish you the best of luck.";
+			close;
+		
+	}
+		else
+	{
+		mes "[Tialfi]";
+		mes "I believe in you.";
+		mes "Just be courageous.";
+		close;
+	}
+	
+}
+
+}
+
+prt_fild01.gat,196,47,3	script	Roskva	703,{
+
+
+	if(god_mjo_0 == 1)
+{
+	mes "[Roskva]";
+	mes "You should know that Dwarven";
+	mes "Blacksmiths are extremely";
+	mes "offended if you do not speak";
+	mes "to them with the utmost respect.";
+	next;
+	mes "[Roskva]";
+	mes "So it's really";
+	mes "important that you";
+	mes "speak to the Dwarves";
+	mes "as courteously as you can.";
+	mes "The first Dwarf you must visit";
+	mes "can be found to the East.";
+	next;
+	mes "[Roskva]";
+	mes "Travel in a clock wise direction";
+	mes "around Rune-Midgard and seek";
+	mes "out the other Dwarves in order.";
+	mes "Your final destination will be";
+	mes "to the North.";
+	next;
+	mes "[Roskva]";
+	mes "If you happen to speak to them";
+	mes "in the wrong order, please go";
+	mes "talk to my brother Tialfi again.";
+	close;
+}
+	else if(god_mjo_0 == 2)
+{
+	mes "[Roskva]";
+	mes "You should know that Dwarven";
+	mes "Blacksmiths are extremely";
+	mes "offended if you do not speak";
+	mes "to them with the utmost respect.";
+	next;
+	mes "[Roskva]";
+	mes "So it's really";
+	mes "important that you";
+	mes "speak to the Dwarves";
+	mes "as courteously as you can.";
+	mes "The first Dwarf you must visit";
+	mes "can be found to the North.";
+	next;
+        mes "[Roskva]";
+	mes "Travel in a counter clock wise";
+	mes "direction around Rune-Midgard";
+	mes "and seek out the other Dwarves";
+	mes "in order. Your final destination";
+	mes "will be to the East.";
+	next;
+	mes "[Roskva]";
+	mes "If you happen to speak to them";
+	mes "in the wrong order, please go";
+	mes "talk to my brother Tialfi again.";
+	close;
+}
+	else
+{
+	mes "[Roskva]";
+	mes "A long long time ago, many";
+	mes "people used to frequent this";
+	mes "area. Friends and families";
+	mes "would live here, sharing";
+	mes "happiness and sadness.";
+	next;
+	mes "[Roskva]";
+	mes "But they're all gone now.";
+	mes "My parents and my friends";
+	mes "have all gone to a place";
+	mes " whose name I don't even know.";
+	next;
+	mes "[Roskva]";
+	mes "I can't help";
+	mes "but feel lonesome...";
+	close;
+}
+
+}
+
+mjolnir_11.gat,149,247,5	script	Dwarf Blacksmith#east	826,{
+
+	if ($God3 < 50)
+{
+	mes "[Austri]";
+	mes "Something is happening";
+	mes "somewhere on this continent.";
+	mes "You might not believe me,";
+	mes "but keep getting visions of";
+	mes "the Fenrir-Wolf.";
+	close;
+}
+	else
+{
+		if($God4 > 99)
+	{
+		mes "[Austri]";
+		mes "Something is happening";
+		mes "somewhere on this continent.";
+		mes "You might not believe me,";
+		mes "but keep getting visions of";
+		mes "the Fenrir-Wolf.";
+		close;
+	}
+		else if(god_mjo_0 == 11)
+	{
+		mes "[Austri]";
+		mes "One day, when my people";
+		mes "retrieve their memories of";
+		mes "the past, we will be able to";
+		mes "grant the power of the gods";
+		mes "to humans.";
+		next;
+		mes "[Austri]";
+		mes "I believe that";
+		mes "time is coming...";
+		close;
+	}
+		else if(god_mjo_0 == 10)
+	{
+		mes "[Austri]";
+		mes "Ho~ you might be asked";
+		mes "something from the human child.";
+		mes "If I were you, I would do the";
+		mes "kid a favor right away. Somehow";
+		mes "he is related to us in some sense.";
+		close;
+	}
+		else if(god_mjo_0 == 1)
+	{
+			if (god_mjo_1 == 3 || god_mjo_2 == 3 || god_mjo_3 == 3 || god_mjo_4 == 3)
+		{
+			mes "[Austri]";
+			mes "What is it?! I refuse to";
+			mes "speak to human as rude";
+			mes "and contemptible as you!";
+			mes "Leave!";
+			close;
+		}
+			else if(god_mjo_1 == 2)
+		{
+			mes "[Austri]";
+			mes "What? I don't have anything";
+			mes "to talk to you.";
+			close;
+		}
+			else if (god_mjo_2 != 0 || god_mjo_3 != 0 || god_mjo_4 != 0)
+		{
+			mes "[Austri]";
+			mes "Hm...?";
+			mes "Why have you";
+			mes "come to me, human?";
+			next;
+			menu "Nothing.",-,"Hey, 'sup!",L_Sup;
+					mes "[Austri]";
+					mes "...";
+					close;
+				
+				L_Sup:
+					set god_mjo_1,3;
+					mes "[Austri]";
+					mes "What...?!";
+					mes "Do not greet the";
+					mes "Dwarves lightly,";
+					mes "mortal!";
+					close;
+		}
+			else if(god_mjo_1 == 1)
+		{
+			mes "[Austri]";
+			mes "What made you come to me?";
+			next;
+			menu "Nothing.",-,"Excuse me, sir.",L_Excuse;
+					mes "[Austri]";
+					mes "...";
+					close;
+
+				L_Excuse:
+						if(countitem(1005) > 0)
+					{
+						mes "[Austri]";
+						mes "Ah, I see that the entire human";
+						mes "race is not worthy of scorn.";
+						mes "Unlike many of your kind,";
+						mes "I see that you respect your";
+						mes "elders.";
+						next;
+						set @mjo_east,0;
+					L_EastTalk:
+							switch(@mjo_east)
+						{
+							case 0:
+								mes "[Austri]";
+								mes "So what have";
+								mes "you come to";
+								mes "ask of me?";
+								next;
+								menu "...",-,"About Mjolnir.",L_Speak;
+								goto L_Listen;
+								
+							case 1:
+								mes "[Austri]";
+								mes "Mjolnir...?";
+								mes "Thor's legendary weapon?";
+								mes "The hammer than can shake the";
+								mes "earth and tear the sky asunder?";
+								mes "All of legendary weapons,";
+								mes "Mjolnir is perhaps greatest.";
+								next;
+								mes "[Austri]";
+								mes "As a matter of fact, it was forged";
+								mes "by my ancestor. Mjolnir was the";
+								mes "perfect weapon, except for one";
+								mes "minor flaw.";
+								next;
+								mes "[Austri]";
+								mes "The hilt of Mjolnir was forged";
+								mes "shorter than intended. Are you";
+								mes "still listening to me?";
+								next;
+								menu "...",-,"Yes, sir!",L_Speak,"Huh?",-;
+								goto L_Listen;
+								
+							case 2:
+								mes "[Austri]";
+								mes "One day, Loki came to our";
+								mes "village and showed off his";
+								mes "treasures. He boasted that we";
+								mes "couldn't possibly create something";
+								mes "to surpass their quality.";
+								next;
+								mes "[Austri]";
+								mes "Frankly his treasures were made";
+								mes "by another Dwarf tribe, but we";
+								mes "couldn't tolerate his insult. So";
+								mes "my ancestors created three";
+								mes "treasures of their own.";
+								next;
+								menu "...",-,"Yes, sir!",L_Speak,"Yes?",-;
+								goto L_Listen;
+								
+							case 3:
+								mes "[Austri]";
+								mes "Of the three treasures my";
+								mes "ancestors created, Mjolnir was";
+								mes "the last and greatest.";
+								next;
+								mes "[Austri]";
+								mes "However, while it was created,";
+								mes "a strange fly bit my ancestor";
+								mes "on the hand. Because of this";
+								mes "interruption, Mjolnir's hilt";
+								mes "is a little flawed.";
+								next;
+								mes "[Austri]";
+								mes "It's very sad. Although Mjolnir";
+								mes "is the greatest weapon ever, it";
+								mes "was very close to being the";
+								mes "epitome of craftsmanship.";
+								next;
+								menu "...",-,"Epito--what?",-,"Yes sir, I agree.",L_Speak;
+								goto L_Listen;
+								
+							case 4:
+								mes "[Austri]";
+								mes "Despite this minor flaw,";
+								mes "Mjolnir is still considered";
+								mes "the greatest of legendary weapons.";
+								next;
+								mes "[Austri]";
+								mes "Mjolnir was the trusted weapon";
+								mes "Thor wielded on the battlefield";
+								mes "and every giant feared its power.";
+								next;
+								mes "[Austri]";
+								mes "I must say, a Blacksmith's";
+								mes "greatest pride comes when he";
+								mes "creates the weapon and armor";
+								mes "that can be considered his";
+								mes "life's work.";
+								next;
+								menu "...",-,"I agree, sir!",L_Speak,"Um, yeah.",-;
+								goto L_Listen;
+								
+							case 5:
+								mes "[Austri]";
+								mes "The reason this mountain is";
+								mes "called Mount Mjolnir is because";
+								mes "it was actually created by the";
+								mes "hammer.";
+								next;
+								mes "[Austri]";
+								mes "In a battle against demons a";
+								mes "thousand years ago, Thor struck";
+								mes "the earth with Mjolnir. The impact";
+								mes "caused the ground to rise,";
+								mes "creating this mountain.";
+								next;
+								mes "[Austri]";
+								mes "You can imagine just how";
+								mes "unfathomly powerful Mjolnir is.";
+								mes "However, humans can never hope";
+								mes "to see or even wield Mjolnir. Only";
+								mes "a god can handle that kind of force.";
+								next;
+								menu "...",-,"Wah wah wah~!",-,"Ah, I understand sir!",L_Speak;
+								goto L_Listen;
+								
+							case 6:
+								mes "[Austri]";
+								mes "Hmm... But perhaps an ambitious";
+								mes "dwarf can forge something similar";
+								mes "to Mjolnir so that it can actually";
+								mes "be used by humans. It would have less";
+								mes "power, but it'd be perfectly crafted.";
+								next;
+								mes "[Austri]";
+								mes "Yes, it's possible to create a";
+								mes "Mjolnir suited to humans. Still,";
+								mes "it wouldn't be very easy.";
+								next;
+								menu "...",-,"Yes, sir!",L_Speak,"Yeah, whatever.",-;
+								goto L_Listen;
+								
+							case 7:
+								mes "[Austri]";
+								mes "Well, I happened to speak much";
+								mes "longer than I intended. But I hope";
+								mes "you learned what you wished to";
+								mes "know about Mjolnir.";
+								next;
+								mes "[Austri]";
+								mes "I feel that a great change is";
+								mes "coming. I do not know what kind of";
+								mes "effect it will have on our world,";
+								mes "but something important will happen...";
+								next;
+								mes "[Austri]";
+								mes "Perhaps only the gods can be sure";
+								mes "as to what the future will bring.";
+								mes "In any case, we must prepare ourselves";
+								mes "for what will happen.";
+								next;
+								menu "...",-,"Yes?",-,"Yes, sir!",L_Speak;
+								goto L_Listen;
+								
+							case 8:
+								set god_mjo_1,2;
+								mes "[Austri]";
+								mes "Alright then...";
+								mes "If you wish to learn more, you should";
+								mes "speak to my brothers. Take care, human.";
+								close;
+						}
+						L_Listen:
+								set god_mjo_1,3;
+								mes "[Austri]";
+								mes "...you didn't listen to me, did you?";
+								mes "Why did you make me waste my time? Leave!";
+								mes "This is why I don't want to associate";
+								mes "with human beings. They always pay little";
+								mes "attention to the conversation with me.";
+								close;
+					}
+						else
+					{
+						mes "[Austri]";
+						mes "You don't seem to understand.";
+						mes "If you wish to prove to me that";
+						mes "you understand blacksmiths, you";
+						mes "should bring something related";
+						mes "to my work!";
+						close;
+					}
+		}
+			else if(god_mjo_1 == 0)
+		{
+			mes "[Austri]";
+			mes "What made you come to me?";
+			next;
+			menu "Nothing.",-,"Excuse me, sir.",L_Excuse2;
+					mes "[Austri]";
+					mes "...";
+					close;
+				
+				L_Excuse2:
+					mes "[Austri]";
+					mes "A respectable blacksmith cherishes";
+					mes "his tools and crafts with diligence";
+					mes "and care.";
+					next;
+					mes "[Austri]";
+					mes "When it comes to humans, I believe";
+					mes "the ones who can appreciate my line";
+					mes "of work are the only ones worth";
+					mes "talking to.";
+					next;
+					set god_mjo_1,1;
+					mes "[Austri]";
+					mes "Every good blacksmith knows the";
+					mes "value of a good hammer. If you can";
+					mes "understand that, I shall consider";
+					mes "speaking with you.";
+					next;
+					mes "[Austri]";
+					mes "Now go, human.";
+					mes "I wish you safety";
+					mes "in your travels.";
+					close;
+		}
+			else
+		{
+			mes "[Austri]";
+			mes "Zzzz Zzzz...";
+			close;
+		}
+	}
+		else if(god_mjo_0 == 2)
+	{
+			if(god_mjo_1 == 3 || god_mjo_2 == 3 || god_mjo_3 == 3 || god_mjo_4 == 3)
+		{
+			mes "[Austri]";
+			mes "What is it! I do not have anything to";
+			mes "to such a rude human as you!";
+			mes "Go back to where you are from!";
+			close;
+		}
+			else if(god_mjo_4 == 2)
+		{
+			mes "[Austri]";
+			mes "What? I don't have anything";
+			mes "to talk to you.";
+			close;
+		}
+			else if(god_mjo_1 == 0 || god_mjo_1 == 1 || god_mjo_2 == 0 || god_mjo_2 == 1 || god_mjo_3 == 0 || god_mjo_3 == 1)
+		{
+			mes "[Austri]";
+			mes "What made you come to me?";
+			next;
+			menu "Nothing.",-,"Hey, sup!",L_Sup2;
+					mes "[Austri]";
+					mes "...";
+					close;
+				L_Sup2:
+					set god_mjo_4,3;
+					mes "[Austri]";
+					mes "What?!";
+					mes "Leave immediately and go study";
+					mes "your english properly!";
+					close;
+		}
+			else if(god_mjo_4 == 1)
+		{
+			mes "[Austri]";
+			mes "What made you come to me?";
+			next;
+			menu "Nothing.",-,"Excuse me, sir.",L_Excuse3;
+					mes "[Austri]";
+					mes "...";
+					close;
+				L_Excuse3:
+						if(countitem(1005) > 0)
+					{
+						mes "[Austri]";
+						mes "Hmm, I like your polite manners.";
+						mes "Okay, I am willing to talk to you.";
+						mes "So ask me if you have any questions.";
+						next;
+						set @mjo_east,0;
+					L_EastTalk2:
+							switch(@mjo_east)
+						{
+							case 0:
+								mes "[Austri]";
+								mes "So, what would you like to ask?";
+								next;
+								menu "...",-,"About Mjolnir.",L_Speak2;
+									goto L_Listen2;
+							case 1:
+								mes "[Austri]";
+								mes "Mjolnir...you mean the Thor's legendary weapon?";
+								mes "There has a rumor that Mjolnir slashed the sky";
+								mes "and stunned the earth by one blow.";
+								mes "That is the greatest weapon in the legend.";
+								next;
+								mes "[Austri]";
+								mes "As a matter of fact, it was forged by my ancestor.";
+								mes "Do you know the reason why the hilt of Mjolnir";
+								mes "was forged that short...?";
+								mes "Are you listening to me?";
+								next;
+								menu "...",-,"Yes?",-,"Yes, sir!",L_Speak2;
+									goto L_Listen2;
+							case 2:
+								mes "[Austri]";
+								mes "One day, Loki came to dwarf's town";
+								mes "and showed off his three treasure.";
+								mes "He provoked us by saying";
+								mes "nobody would make better things";
+								mes "than his treasures.";
+								next;
+								mes "[Austri]";
+								mes "Frankly his treasures were made by other dwarf tribe...";
+								mes "but anyway, we could not put up with the insult.";
+								mes "So my ancestor made three treasures of our own...";
+								mes "Are you still listening to me?";
+								next;
+								menu "...",-,"Yes, sir!",L_Speak2,"Yes?",-;
+									goto L_Listen2;
+							case 3:
+								mes "[Austri]";
+								mes "Mjolnir was the last treasure among the three.";
+								mes "While blowing the bellows,";
+								mes "my ancerstor was bitten by a strange insect on his hand.";
+								mes "So he could not continue working.";
+								mes "That's how the hilt of Mjolnir became that short.";
+								mes "Ah, what a sad story!";
+								next;
+								menu "...",-,"I agree, sir!",L_Speak2,"Yes?",-;
+									goto L_Listen2;
+							case 4:
+								mes "[Austri]";
+								mes "Despite of the sad incident,";
+								mes "my ancerstor created the greatest weapon";
+								mes "in the legend. Mjolnir became Thor's the most reliable comrade";
+								mes "in the battlefield. Even giants in Utgard feared";
+								mes "the power of the godly weapon.";
+								next;
+								mes "[Austri]";
+								mes "However, since the weapon had the abnormally short hilt,";
+								mes "Thor had to wear iron gauntlets to compensate the weakness.";
+								mes "I must say, blacksmiths feel most proud when they";
+								mes "achieve to create the best weapons and armors of their life.";
+								next;
+								menu "...",-,"Yes?",-,"I agree, sir!",L_Speak2;
+									goto L_Listen2;
+							case 5:
+								mes "[Austri]";
+								mes "And I am going to tell you";
+								mes "the reason why this mountain has been called";
+								mes "as Mountain Mjolnir... during the battle against demons";
+								mes "occurred a thousand years ago, he hammered down";
+								mes "the earth using Mjolnir. Because of the impact,";
+								mes "the ground around the spot rose high";
+								mes "and formed a mountain.";
+								next;
+								mes "[Austri]";
+								mes "You can imagine how powerful Mjolnir would be.";
+								mes "It made a new mountain by one hammering.";
+								mes "Unfortunately, you wouldn't be able to see";
+								mes "the weapon in your life. Somehow it is belong to God.";
+								next;
+								menu "...",-,"I can understand, sir!",L_Speak2,"Yes?",-;
+									goto L_Listen2;
+							case 6:
+								mes "[Austri]";
+								mes "Perhaps an ambitious dwarf could forge";
+								mes "a treasure is similar to Mjolnir.";
+								mes "But it will not happen to be exactly the same as the original Mjolnir.";
+								mes "The original one cannot be held by a human being";
+								mes "due to the unimaginable power it holds within.";
+								next;
+								mes "[Austri]";
+								mes "Let's say, a modified Mjolnir which would be suited to human's power";
+								mes "can be made possibly...? But still, it will not";
+								mes "easily happen.";
+								mes "Just, never mind.";
+								next;
+								menu "...",-,"Yes, sir!",L_Speak2,"Yes?",-;
+									goto L_Listen2;
+							case 7:
+								mes "[Austri]";
+								mes "I happened to speak longer than I planned.";
+								mes "But this is it. I hope you will have a better understanding";
+								mes "about Mjolnir by now.";
+								mes "And obviously something has been happening";
+								mes "in this world...I can feel that.";
+								next;
+								mes "[Austri]";
+								mes "I cannot tell it will bring a good effect or a bad one to";
+								mes "the continent...";
+								mes "Maybe Gods would know.";
+								mes "We must prepare to survive in the changes.";
+								next;
+								menu "...",-,"Yes, sir!",L_Speak2,"Yes?",-;
+									goto L_Listen2;
+							case 8:
+								set god_mjo_4,2;
+								mes "[Austri]";
+								mes "Ok, you may leave me and visit my brothers now.";
+								mes "Take care.";
+								close;
+						}
+							L_Listen2:
+								set god_mjo_4,3;
+								mes "[Austri]";
+								mes "...you didn't listen to me, did you?";
+								mes "Why did you make me waste my time? Leave!";
+								mes "This is why I don't want to associate with human beings.";
+								mes "They always pay little attention to the conversation with me.";
+								close;
+
+					}
+						else
+					{
+						mes "[Austri]";
+						mes "You don't seem to understand.....";
+						mes "If you want to prove me that you understand how blacksmiths feel,";
+						mes "bring a thing related to blacksmiths!";
+						close;
+					}
+		}
+			else if(god_mjo_4 == 0)
+		{
+			mes "[Austri]";
+			mes "What made you come to me?";
+			next;
+			menu "Nothing.",-,"Excuse me, sir.",L_Excuse4;
+					mes "[Austri]";
+					mes "...";
+					close;
+				
+				L_Excuse4:
+					mes "[Austri]";
+					mes "A respectable blacksmith cherishes his hammer and anvil.";
+					mes "If you wish to continue a conversation with me,";
+					mes "you should understand blacksmiths.";
+					mes "Every blacksmith knows what hammer is good for themselves.";
+					next;
+					set god_mjo_4,1;
+					mes "[Austri]";
+					mes "If you understand what I meant,";
+					mes "I will consider speaking to you next time.";
+					mes "Have a good travel.";
+					close;
+		}
+			else
+		{
+			mes "[Austri]";
+			mes "Zzzz Zzzz...";
+			close;
+		}
+	}
+		else if(god_mjo_0 == 0)
+	{
+		mes "[Austri]";
+		mes "Ah...";
+		mes "It feels like today's going to be a great day.";
+		next;
+		mes "[Austri]";
+		mes "I've got the warm sun, fresh forest air, and my hammer and anvil are at the ready. It's a perfect day for smithing!";
+		close;
+	}
+		else
+	{
+		mes "[Austri]";
+		mes "Zzzz Zzzz...";
+		close;
+	}
+}
+
+L_Speak:
+	set @mjo_east,@mjo_east +1;
+	goto L_EastTalk;
+
+L_Speak2:
+	set @mjo_east,@mjo_east +1;
+	goto L_EastTalk2;
+
+}
+
+mjolnir_09.gat,209,341,3	script	Dwarf Blacksmith#south	826,{
+
+	if ($God3 < 50)
+{
+	mes "[Sudri]";
+	mes "I want to compete";
+	mes "and fight with stronger";
+	mes "and stronger opponents!";
+	next;
+	mes "[Sudri]";
+	mes "One day, I'll return to";
+	mes "Svartalfaheimr and defeat";
+	mes "Ivaldi! Mwahahaha!";
+	close;
+}
+	else
+{
+		if ($God4 > 99)
+	{
+		mes "[Sudri]";
+		mes "Wait, this is not the";
+		mes "right time to fighting...";
+		next;
+		mes "[Sudri]";
+		mes "Something that has been hidden";
+		mes "is about to be born out of the";
+		mes "sweat of determination and";
+		mes "tears of sacrifice. We must";
+		mes "wait until then.";
+		close;
+	}
+		else if(god_mjo_0 == 11)
+	{
+		mes "[Sudri]";
+		mes "I want to compete with a stronger one!";
+		mes "I will be stronger and stronger,";
+		mes "one day when I get back to Svartalfaheimr";
+		mes "I shall defeat Ivaldi!";
+		mes "Muhahahaha...!";
+		close;
+	}
+		else if(god_mjo_10 == 10)
+	{
+		mes "[Sudri]";
+		mes "I must admit that you're a";
+		mes "really strong human. Let us";
+		mes "fight again when we have a chance.";
+		mes "The next time, you may not be";
+		mes "so lucky!";
+		close;
+	}
+		else if(god_mjo_0 == 1)
+	{
+			if (god_mjo_1 == 3 || god_mjo_2 == 3 || god_mjo_3 == 3 || god_mjo_4 == 3)
+		{
+			mes "[Sudri]";
+			mes "Go back to where you belong";
+			mes "before I beat you to death!";
+			next;
+			mes "[Sudri]";
+			mes "All you can gain here are";
+			mes "a few herbs.";
+			close;
+		}
+			else if(god_mjo_2 == 2)
+		{
+			mes "[Sudri]";
+			mes "That was a great fight!";
+			mes "Mwahahaha! I'm satisfied with";
+			mes "the results. I may have lost,";
+			mes "but we fought honorably with";
+			mes "everything we had.";
+			close;
+		}
+			else if(god_mjo_1 == 0 || god_mjo_1 == 1 || god_mjo_3 != 0 || god_mjo_4 != 0)
+		{
+			mes "[Sudri]";
+			mes "So...";
+			mes "What brings";
+			mes "you here?";
+			next;
+			menu "Nothing.",-,"Excuse me, sir.",L_Excuse;
+					mes "[Sudri]";
+					mes "You have too much time on";
+					mes "your hands. Why don't you";
+					mes "log out and hang out with";
+					mes "your friends instead?";
+					close;
+				
+				L_Excuse:
+					set god_mjo_2,3;
+					mes "[Sudri]";
+					mes "Why should";
+					mes "I excuse you?";
+					next;
+					mes "[Sudri]";
+					mes "If there's anything I hate,";
+					mes "it's insincerity and sarcasm.";
+					mes "What, you wanna fight?!";
+					close;
+		}
+			else if(god_mjo_2 == 1)
+		{
+			set @sudri_vit,200;
+			set @player_vit,100;
+			set @sudri_def,0;
+			set @player_def,0;
+			set @sudri_atk,0;
+			set @player_atk,0;
+			set @counter,0;
+			set @damage,0;
+			mes "[Sudri]";
+			mes "Fine, let's fight!";
+			mes "Old school rules!";
+			next;
+			
+			L_Fight:
+				mes "Sudri : HP " + @sudri_vit + " left.";
+				mes "" + strcharinfo(0) + " : HP " + @player_vit + " left.";
+				mes "--------------------";
+				mes "" + strcharinfo(0) + " initiated an attack!";
+				next;
+				menu "...?!",case11,"Strike Head!",case12,"Strike Chest!",case13,"Strike Legs!",case14,"Take a break.",case15;
+					case11:
+						set @player_atk,0;
+						goto L_DefSudri;
+					case12:
+						set @player_atk,1;
+						goto L_DefSudri;
+					case13:
+						set @player_atk,2;
+						goto L_DefSudri;
+					case14:
+						set @player_atk,3;
+						goto L_DefSudri;
+					case15:
+						set @player_atk,4;
+						goto L_DefSudri;
+				L_DefSudri:
+				set @sudri_def,rand(1,3);
+				set @damage,rand(15,25);
+				if(@player_atk == 1) mes "" + strcharinfo(0) + " attacks Sudri's head!";
+				else if(@player_atk == 2) mes "" + strcharinfo(0) + " strikes Sudri's chest!";
+				else if(@player_atk == 3) mes "" + strcharinfo(0) + " aims for Sudri's legs!";
+				else if(@player_atk == 4) mes "" + strcharinfo(0) + " requests a break!";
+				else mes "" + strcharinfo(0) + "'s weak point revealed!";
+					if(@player_atk == @sudri_def)
+				{
+					specialeffect 336;
+						if(@sudri_def == 1)
+					{
+						mes "--------------------";
+						mes "Sudri easily dodges";
+						mes "your attack by twisting";
+						mes "his small, yet svelte, body.";
+						mes "--------------------";
+						mes "" + strcharinfo(0) + " misses!";
+					}
+						else if(@sudri_def == 2)
+					{
+						mes "--------------------";
+						mes "Sudri blocks your";
+						mes "attack by crossing";
+						mes "his stout arms.";
+						mes "--------------------";
+						mes "" + strcharinfo(0) + "'s attack is blocked!";
+					}
+						else if(@sudri_def == 3)
+					{
+						mes "--------------------";
+						mes "Sudri dodges your";
+						mes "attack with a graceful";
+						mes "leap to the heavens.";
+						mes "--------------------";
+						mes "" + strcharinfo(0) + " misses!";
+					}
+				}
+					else if(@player_atk == 4)
+				{
+					skilleffect 28,10;
+					set @player_vit,@player_vit + 10;
+					mes "--------------------";
+					mes "" + strcharinfo(0) + " has gained 10 HP!";
+				}
+					else if(@player_atk == 1)
+				{
+					specialeffect 5;
+					set @sudri_vit,@sudri_vit - @damage;
+					mes "--------------------";
+					mes "You successfully hit";
+					mes "Sudri on the head!";
+					mes "--------------------";
+					mes "Sudri has lost " + @damage + " HP!";
+				}
+					else if(@player_atk == 2)
+				{
+					specialeffect 2;
+					set @sudri_vit,@sudri_vit - @damage;
+					mes "--------------------";
+					mes "You successfully hit";
+					mes "Sudri on the chest!";
+					mes "--------------------";
+					mes "Sudri has lost " + @damage + " HP!";
+				}
+					else if(@player_atk == 3)
+				{
+					specialeffect 3;
+					set @sudri_vit,@sudri_vit - @damage;
+					mes "--------------------";
+					mes "You successfully hit";
+					mes "Sudri on the legs!";
+					mes "--------------------";
+					mes "Sudri has lost " + @damage + " HP!";
+				}
+					else if(@player_atk == 0)
+				{
+					specialeffect2 5;
+					set @player_vit,@player_vit - 10;
+					mes "--------------------";
+					mes "You were hit by";
+					mes "Sudri's counter attack!";
+					mes "--------------------";
+					mes "" + strcharinfo(0) + " has lost 10 HP!";
+						if(@player_vit < 1)
+					{
+						mes "Defeated...";
+						next;
+						goto L_Lost;
+					}
+				}
+					else
+				{
+					mes "--------------------";
+					mes "Something happened and the fight has stopped!";
+					close;
+				}
+					if(@sudri_vit < 1)
+				{
+					mes "" + strcharinfo(0) + " wins!";
+					next;
+					goto L_Win;
+				}
+				next;
+				mes "Sudri : HP " + @sudri_vit + " left.";
+				mes "" + strcharinfo(0) + " : HP " + @player_vit + " left.";
+				mes "--------------------";
+				mes "Sudri attacks...!";
+				next;
+				menu "...?!",case21,"Dodge!",case22,"Block!",case23,"Jump!",case24,"Counter back!",case25;
+					case21:
+						set @player_def,0;
+						goto L_DefPlayer;
+					case22:
+						set @player_def,1;
+						goto L_DefPlayer;
+					case23:
+						set @player_def,2;
+						goto L_DefPlayer;
+					case24:
+						set @player_def,3;
+						goto L_DefPlayer;
+					case25:
+						set @player_def,4;
+						goto L_DefPlayer;
+				L_DefPlayer:
+				set @sudri_atk,rand(1,3);
+				set @damage,rand(20,25);
+				if(@sudri_atk == 1) mes "Sudri aims for the head!";
+				else if(@sudri_atk == 2) mes "Sudri strikes the chest!";
+				else mes "Sudri attacks the legs!";
+					if(@sudri_atk == @player_def)
+				{
+					specialeffect2 336;
+						if(@player_def == 1)
+					{
+						mes "--------------------";
+						mes "" + strcharinfo(0) + " quickly dodged,";
+						mes "Sudri's arms were too short to reach at you.";
+						mes "--------------------";
+						mes "Sudri has failed to attack.";
+					}
+						else if(@player_def == 2)
+					{
+						mes "--------------------";
+						mes "" + strcharinfo(0) + " barely blocked";
+						mes "Sudri's attack.";
+						mes "--------------------";
+						mes "Sudri has failed to attack.";
+					}
+						else if(@player_def == 3)
+					{
+						mes "--------------------";
+						mes "" + strcharinfo(0) + " jumped,";
+						mes "dodged Sudri's attack at ease.";
+						mes "--------------------";
+						mes "Sudri has failed to attack.";
+					}
+				}
+					else if(@player_def == 4)
+				{
+					set @counter,rand(1,4);
+					mes "--------------------";
+					mes "" + strcharinfo(0) + " countered back!";
+						if(@counter == 1)
+					{
+						specialeffect2 131;
+						specialeffect 17;
+						set @sudri_vit,@sudri_vit - 20;
+						mes "You successfully countered back!";
+						mes "--------------------";
+						mes "Sudri has lost 20 HP!";
+							if(@sudri_vit < 1)
+						{
+							mes "" + strcharinfo(0) + " won!";
+							next;
+							goto L_Win;
+						}
+					}
+						else
+					{
+						specialeffect2 1;
+						set @player_vit,@player_vit - 30;
+						mes "You were taken a great damage on your weak spot!";
+						mes "--------------------";
+						mes "" + strcharinfo(0) + " has lost 30 HP!";
+					}
+				}
+					else if(@sudri_atk == 1)
+				{
+					specialeffect2 5;
+					set @player_vit,@player_vit - @damage;
+					mes "--------------------";
+					mes "Sudri successfully";
+					mes "hit " + strcharinfo(0) + "";
+					mes "on the head!";
+					mes "--------------------";
+					mes "" + strcharinfo(0) + " has lost " + @damage + " HP!";
+				}
+					else if(@sudri_atk == 2)
+				{
+					specialeffect2 3;
+					set @player_vit,@player_vit - @damage;
+					mes "--------------------";
+					mes "Sudri successfully";
+					mes "hit " + strcharinfo(0) + "";
+					mes "on the chest!";
+					mes "--------------------";
+					mes "" + strcharinfo(0) + " has lost " + @damage + " HP!";
+				}
+					else if(@sudri_atk == 3)
+				{
+					specialeffect2 4;
+					set @player_vit,@player_vit - @damage;
+					mes "--------------------";
+					mes "Sudri successfully";
+					mes "hit " + strcharinfo(0) + "";
+					mes "on the legs!";
+					mes "--------------------";
+					mes "" + strcharinfo(0) + " has lost " + @damage + " HP!";
+				}
+					else if(@sudri_atk == 0)
+				{
+					specialeffect2 5;
+					set @player_vit,@player_vit - @damage;
+					mes "--------------------";
+					mes "Sudri successfully";
+					mes "hits "+ strcharinfo(0) +"";
+					mes "during a moment of";
+					mes "absent-mindedness!";
+					mes "--------------------";
+					mes "" + strcharinfo(0) + " has lost " + @damage + " HP!";
+				}
+					else
+				{
+					mes "--------------------";
+					mes "Something happened and the fight has stopped!";
+					close;
+				}
+					if(@player_vit < 1)
+				{
+					mes "Sudri won!";
+					next;
+					goto L_Lost;
+				}
+				next;
+				goto L_Fight;
+
+			L_Lost:
+				mes "[Sudri]";
+				mes "Muhahahaha!";
+				mes "You're not strong enough";
+				mes "to beat me! I want someone";
+				mes "who can offer me a challenge!";
+				next;
+				mes "[Sudri]";
+				mes "Go out, train some and get";
+				mes "stronger before you even";
+				mes "think about coming back!";
+				close;
+			
+			L_Win:
+				set god_mjo_2,2;
+				mes "[Sudri]";
+				mes "You're stronger than me.";
+				mes "I never thought I'd meet";
+				mes "a human as strong as you.";
+				next;
+				mes "[Sudri]";
+				mes "I'm impressed. Alright,";
+				mes "I'll tell my friends good";
+				mes "things about you. Hopefully,";
+				mes "my brothers will give you";
+				mes "the help you're looking for.";
+				next;
+				mes "[Sudri]";
+				mes "Okay then,";
+				mes "be safe on";
+				mes "your travels!";
+				close;
+		}
+			else if(god_mjo_2 == 0)
+		{
+			mes "[Sudri]";
+			mes "So...";
+			mes "What brings";
+			mes "you here, human?";
+			next;
+			menu "Nothing.",-,"Excuse me, sir.",L_Excuse2;
+					mes "[Sudri]";
+					mes "You have too much";
+					mes "time on your hand.";
+					mes "Why don't you log out";
+					mes "and go out with your";
+					mes "friends instead?";
+					close;
+
+				L_Excuse2:
+					mes "[Sudri]";
+					mes "Huh. You're different than other";
+					mes "humans. But still, trusting you";
+					mes "because you know how to speak";
+					mes "isn't very wise.";
+					next;
+					mes "[Sudri]";
+					mes "If there's anything I love,";
+					mes "it's bare knuckle brawling,";
+					mes "old school style.";
+					next;
+					mes "[Sudri]";
+					mes "Words can be deceptive,";
+					mes "but if you can beat me in a";
+					mes "fight, I think I might just";
+					mes "talk to you. How about it?";
+					next;
+					menu ".....",-,"Yes, I accept your challenge.",L_Accept,"No, I'm scared!",L_Scared;
+							set god_mjo_2,3;
+							mes "[Sudri]";
+							mes "You didn't even answer me!";
+							mes "Fine, whatever.";
+							close;
+						
+						L_Accept:
+							set god_mjo_2,1;
+							mes "[Sudri]";
+							mes "Ah, I like you already, human!";
+							mes "Now why don't you go do some";
+							mes "warm ups, and we'll fight";
+							mes "when you're ready?";
+							close;
+						
+						L_Scared:
+							set god_mjo_2,1;
+							mes "[Sudri]";
+							mes "Eh...?";
+							mes "Why are you being such a coward?";
+							mes "Are you afraid of this old";
+							mes "and tiny Dwarf?";
+							next;
+							mes "[Sudri]";
+							mes "Come on, I'll even let you";
+							mes "have the first hit. Just come";
+							mes "to me when you're ready to fight!";
+							close;
+		}					
+			else
+		{
+			mes "[Sudri]";
+			mes "Zzzz Zzzz...";
+			close;
+		}
+	}
+		else if(god_mjo_0 == 2)
+	{
+			if (god_mjo_1 == 3 || god_mjo_2 == 3 || god_mjo_3 == 3 || god_mjo_4 == 3)
+		{
+			mes "[Sudri]";
+			mes "Go back before I beat you to death.";
+			mes "All you can gain here are few herbs.";
+			close;
+		}
+			else if(god_mjo_3 == 2)
+		{
+			mes "[Sudri]";
+			mes "That was a great fight....hahahaha...";
+			mes "I don't regret about the result.";
+			mes "I lost but I kept my dignity.";
+			close;
+		}
+			else if (god_mjo_1 == 0 || god_mjo_1 == 1 || god_mjo_2 == 0 || god_mjo_2 == 1 || god_mjo_4 != 0)
+		{
+			mes "[Sudri]";
+			mes "What made you come to me?";
+			next;
+			menu "Nothing.",-,"Excuse me, sir.",L_Excuse3;
+					mes "[Sudri]";
+					mes "You have too much time";
+					mes "on your hand.";
+					mes "Why don't you log out";
+					mes "and go out with your";
+					mes "friends instead?";
+					close;
+				
+				L_Excuse3:
+					set god_mjo_3,3;
+					mes "[Sudri]";
+					mes "Why should I excuse you?";
+					mes "What, are you challenging me now?";
+					mes "Do you want to fight with me huh?";
+					close;
+		}
+			else if(god_mjo_3 == 1)
+		{
+			set @sudri_vit,200;
+			set @player_vit,100;
+			set @sudri_def,0;
+			set @player_def,0;
+			set @sudri_atk,0;
+			set @player_atk,0;
+			set @counter,0;
+			set @damage,0;
+			mes "[Sudri]";
+			mes "Fine, let's fight!";
+			mes "Old school rules!";
+			next;
+			
+			L_Fight2:
+				mes "Sudri : HP " + @sudri_vit + " left.";
+				mes "" + strcharinfo(0) + " : HP " + @player_vit + " left.";
+				mes "--------------------";
+				mes "" + strcharinfo(0) + " initiated an attack!";
+				next;
+				menu "...?!",case31,"Strike Head!",case32,"Strike Chest!",case33,"Strike Legs!",case34,"Take a break.",case35;
+					case31:
+						set @player_atk,0;
+						goto L_DefSudri2;
+					case32:
+						set @player_atk,1;
+						goto L_DefSudri2;
+					case33:
+						set @player_atk,2;
+						goto L_DefSudri2;
+					case34:
+						set @player_atk,3;
+						goto L_DefSudri2;
+					case35:
+						set @player_atk,4;
+						goto L_DefSudri2;
+				L_DefSudri2:
+				set @sudri_def,rand(1,3);
+				set @damage,rand(15,25);
+				if(@player_atk == 1) mes "" + strcharinfo(0) + " attacks Sudri's head!";
+				else if(@player_atk == 2) mes "" + strcharinfo(0) + " strikes Sudri's chest!";
+				else if(@player_atk == 3) mes "" + strcharinfo(0) + " aims for Sudri's legs!";
+				else if(@player_atk == 4) mes "" + strcharinfo(0) + " requests a break!";
+				else mes "" + strcharinfo(0) + "'s weak point revealed!";
+					if(@player_atk == @sudri_def)
+				{
+					specialeffect 336;
+						if(@sudri_def == 1)
+					{
+						mes "--------------------";
+						mes "Sudri easily dodges";
+						mes "your attack by twisting";
+						mes "his small, yet svelte, body.";
+						mes "--------------------";
+						mes "" + strcharinfo(0) + " misses!";
+					}
+						else if(@sudri_def == 2)
+					{
+						mes "--------------------";
+						mes "Sudri blocks your";
+						mes "attack by crossing";
+						mes "his stout arms.";
+						mes "--------------------";
+						mes "" + strcharinfo(0) + "'s attack is blocked!";
+					}
+						else if(@sudri_def == 3)
+					{
+						mes "--------------------";
+						mes "Sudri dodges your";
+						mes "attack with a graceful";
+						mes "leap to the heavens.";
+						mes "--------------------";
+						mes "" + strcharinfo(0) + " misses!";
+					}
+				}
+					else if(@player_atk == 4)
+				{
+					skilleffect 28,10;
+					set @player_vit,@player_vit + 10;
+					mes "--------------------";
+					mes "" + strcharinfo(0) + " has gained 10 HP!";
+				}
+					else if(@player_atk == 1)
+				{
+					specialeffect 5;
+					set @sudri_vit,@sudri_vit - @damage;
+					mes "--------------------";
+					mes "You successfully hit";
+					mes "Sudri on the head!";
+					mes "--------------------";
+					mes "Sudri has lost " + @damage + " HP!";
+				}
+					else if(@player_atk == 2)
+				{
+					specialeffect 2;
+					set @sudri_vit,@sudri_vit - @damage;
+					mes "--------------------";
+					mes "You successfully hit";
+					mes "Sudri on the chest!";
+					mes "--------------------";
+					mes "Sudri has lost " + @damage + " HP!";
+				}
+					else if(@player_atk == 3)
+				{
+					specialeffect 3;
+					set @sudri_vit,@sudri_vit - @damage;
+					mes "--------------------";
+					mes "You successfully hit";
+					mes "Sudri on the legs!";
+					mes "--------------------";
+					mes "Sudri has lost " + @damage + " HP!";
+				}
+					else if(@player_atk == 0)
+				{
+					specialeffect2 5;
+					set @player_vit,@player_vit - 10;
+					mes "--------------------";
+					mes "You were hit by";
+					mes "Sudri's counter attack!";
+					mes "--------------------";
+					mes "" + strcharinfo(0) + " has lost 10 HP!";
+						if(@player_vit < 1)
+					{
+						mes "Defeated...";
+						next;
+						goto L_Lost2;
+					}
+				}
+					else
+				{
+					mes "--------------------";
+					mes "Something happened and the fight has stopped!";
+					close;
+				}
+					if(@sudri_vit < 1)
+				{
+					mes "" + strcharinfo(0) + " wins!";
+					next;
+					goto L_Win2;
+				}
+				next;
+				mes "Sudri : HP " + @sudri_vit + " left.";
+				mes "" + strcharinfo(0) + " : HP " + @player_vit + " left.";
+				mes "--------------------";
+				mes "Sudri attacks...!";
+				next;
+				menu "...?!",case41,"Dodge!",case42,"Block!",case43,"Jump!",case44,"Counter back!",case45;
+					case41:
+						set @player_def,0;
+						goto L_DefPlayer2;
+					case42:
+						set @player_def,1;
+						goto L_DefPlayer2;
+					case43:
+						set @player_def,2;
+						goto L_DefPlayer2;
+					case44:
+						set @player_def,3;
+						goto L_DefPlayer2;
+					case45:
+						set @player_def,4;
+						goto L_DefPlayer2;
+				L_DefPlayer2:
+				set @sudri_atk,rand(1,3);
+				set @damage,rand(20,25);
+				if(@sudri_atk == 1) mes "Sudri aims for the head!";
+				else if(@sudri_atk == 2) mes "Sudri strikes the chest!";
+				else mes "Sudri attacks the legs!";
+					if(@sudri_atk == @player_def)
+				{
+					specialeffect2 336;
+						if(@player_def == 1)
+					{
+						mes "--------------------";
+						mes "" + strcharinfo(0) + " quickly dodged,";
+						mes "Sudri's arms were too short to reach at you.";
+						mes "--------------------";
+						mes "Sudri has failed to attack.";
+					}
+						else if(@player_def == 2)
+					{
+						mes "--------------------";
+						mes "" + strcharinfo(0) + " barely blocked";
+						mes "Sudri's attack.";
+						mes "--------------------";
+						mes "Sudri has failed to attack.";
+					}
+						else if(@player_def == 3)
+					{
+						mes "--------------------";
+						mes "" + strcharinfo(0) + " jumped,";
+						mes "dodged Sudri's attack at ease.";
+						mes "--------------------";
+						mes "Sudri has failed to attack.";
+					}
+				}
+					else if(@player_def == 4)
+				{
+					set @counter,rand(1,4);
+					mes "--------------------";
+					mes "" + strcharinfo(0) + " countered back!";
+						if(@counter == 1)
+					{
+						specialeffect2 131;
+						specialeffect 17;
+						set @sudri_vit,@sudri_vit - 20;
+						mes "You successfully countered back!";
+						mes "--------------------";
+						mes "Sudri has lost 20 HP!";
+							if(@sudri_vit < 1)
+						{
+							mes "" + strcharinfo(0) + " won!";
+							next;
+							goto L_Win2;
+						}
+					}
+						else
+					{
+						specialeffect2 1;
+						set @player_vit,@player_vit - 30;
+						mes "You were taken a great damage on your weak spot!";
+						mes "--------------------";
+						mes "" + strcharinfo(0) + " has lost 30 HP!";
+					}
+				}
+					else if(@sudri_atk == 1)
+				{
+					specialeffect2 5;
+					set @player_vit,@player_vit - @damage;
+					mes "--------------------";
+					mes "Sudri successfully";
+					mes "hit " + strcharinfo(0) + "";
+					mes "on the head!";
+					mes "--------------------";
+					mes "" + strcharinfo(0) + " has lost " + @damage + " HP!";
+				}
+					else if(@sudri_atk == 2)
+				{
+					specialeffect2 3;
+					set @player_vit,@player_vit - @damage;
+					mes "--------------------";
+					mes "Sudri successfully";
+					mes "hit " + strcharinfo(0) + "";
+					mes "on the chest!";
+					mes "--------------------";
+					mes "" + strcharinfo(0) + " has lost " + @damage + " HP!";
+				}
+					else if(@sudri_atk == 3)
+				{
+					specialeffect2 4;
+					set @player_vit,@player_vit - @damage;
+					mes "--------------------";
+					mes "Sudri successfully";
+					mes "hit " + strcharinfo(0) + "";
+					mes "on the legs!";
+					mes "--------------------";
+					mes "" + strcharinfo(0) + " has lost " + @damage + " HP!";
+				}
+					else if(@sudri_atk == 0)
+				{
+					specialeffect2 5;
+					set @player_vit,@player_vit - @damage;
+					mes "--------------------";
+					mes "Sudri successfully";
+					mes "hits "+ strcharinfo(0) +"";
+					mes "during a moment of";
+					mes "absent-mindedness!";
+					mes "--------------------";
+					mes "" + strcharinfo(0) + " has lost " + @damage + " HP!";
+				}
+					else
+				{
+					mes "--------------------";
+					mes "Something happened and the fight has stopped!";
+					close;
+				}
+					if(@player_vit < 1)
+				{
+					mes "Sudri won!";
+					next;
+					goto L_Lost2;
+				}
+				next;
+				goto L_Fight2;
+
+			L_Lost2:
+				mes "[Sudri]";
+				mes "Muhahahaha, you are not strong";
+				mes "enough to beat me! I want someone";
+				mes "who I can make an even match!";
+				mes "Go practice more and come back!";
+				close;
+			
+			L_Win2:
+				set god_mjo_3,2;
+				mes "[Sudri]";
+				mes "Ah...you are stronger than me...I haven't thought";
+				mes "that there would be a strong human as you...I am impressed.";
+				mes "Great, great.";
+				mes "Okay, I will tell good things of you to my friend.";
+				mes "But don't forget the order to visit my friends and brothers.";
+				next;
+				mes "[Sudri]";
+				mes "Okay then, have a good travel!";
+				close;
+		}
+			else if(god_mjo_3 == 0)
+		{
+			mes "[Sudri]";
+			mes "What made you come to me?";
+			next;
+			menu "Nothing.",-,"Excuse me, sir.",L_Excuse4;
+						mes "[Sudri]";
+						mes "You have too much time on your hand.";
+						mes "Why don't you log out and go out";
+						mes "with your friends instead?";
+						close;
+					
+				L_Excuse4:
+					mes "[Sudri]";
+					mes "You have very sharp eyes.";
+					mes "I can tell you are different from other humans.";
+					mes "Do you want something from me?";
+					mes "I don't talk to humans.";
+					next;
+					mes "[Sudri]";
+					mes "I love bare hands fighting!";
+					mes "I believe the action comes before the words!";
+					mes "So, how about a fight with me, huh?";
+					next;
+					menu ".....",-,"Sure, please teach me well.",L_Accept2,"No, I am scared.",L_Scared2;
+							set god_mjo_3,3;
+							mes "[Sudri]";
+							mes "You didn't even answer me!";
+							mes "Fine, whatever.";
+							close;
+
+						L_Accept2:
+							set god_mjo_3,1;
+							mes "[Sudri]";
+							mes "What a quick answer! I like you already, human!";
+							mes "Why don't you go do some warm-ups?";
+							mes "Let's start a fight when you're ready!";
+							close;
+						
+						L_Scared2:
+							set god_mjo_3,1;
+							mes "[Sudri]";
+							mes "Bah, you are a hot-blooded young man!";
+							mes "Why are you being so coward?";
+							mes "Do you fear this old and tiny dwarf man?";
+							mes "I don't mind, I will yield you first hit.";
+							mes "Come back when you are ready.";
+							close;
+		}
+			else
+		{
+			mes "[Sudri]";
+			mes "Zzzz Zzzz...";
+			close;
+		}
+	}
+		else if(god_mjo_0 == 0)
+	{
+		mes "[Sudri]";
+		mes "In a one on one fight,";
+		mes "you put everything on the";
+		mes "line to show your might";
+		mes "to your opponent.";
+		next;
+		mes "[Sudri]";
+		mes "Have you ever felt the";
+		mes "same way I do, human? Win";
+		mes "or lose, just giving your";
+		mes "all is the most satisfying accomplishment.";
+		close;
+	}
+		else
+	{
+		mes "[Sudri]";
+		mes "Zzzz Zzzz...";
+		close;
+	}
+}
+
+}
+
+mjolnir_01.gat,35,136,7	script	Dwarf Blacksmith#west	826,{
+
+	if($God3 < 50)
+{
+	mes "[Vestri]";
+	mes "If you want something,";
+	mes "you should earn it through";
+	mes "your own efforts.";
+	next;
+	mes "[Vestri]";
+	mes "No matter what other people say,";
+	mes "if you're confident and your";
+	mes "will is unwavering, you'll always";
+	mes "be satisfied with the results.";
+	next;
+	mes "[Vestri]";
+	mes "What do you think?";
+	mes "The youth these days...";
+	close;
+}
+	else
+{
+
+		if($God4 > 99)
+	{
+		mes "[Vestri]";
+		mes "I don't feel like doing anything today.";
+		next;
+		mes "[Vestri]";
+		mes "Someone must have forged something";
+		mes "really monstrous, otherwise I";
+		mes "wouldn't be feeling so worthless!";
+		next;
+		mes "[Vestri]";
+		mes "Yeah, I think I need a break!";
+		mes "Don't you think I need a break,";
+		mes "human?";
+		close;
+	}
+		else if(god_mjo_0 == 11)
+	{
+		mes "[Vestri]";
+		mes "There's nothing like taking";
+		mes "a relaxing break after putting";
+		mes "your heart into your work.";
+		next;
+		mes "[Vestri]";
+		mes "What do you think, human?";
+		mes "Isn't that one of life's";
+		mes "simple pleasures?";
+		close;
+	}
+		else if(god_mjo_0 == 10)
+	{
+		mes "[Vestri]";
+		mes "If you need something, you must get it";
+		mes "on your own...no matter what people say";
+		mes "if you are confident about your will,";
+		mes "it is already good regardless of the result of your action.";
+		mes "What do you think?";
+		mes "Young generations in thesedays....";
+		close;
+	}
+		else if(god_mjo_0 == 1)
+	{
+			if(god_mjo_1 == 3 || god_mjo_2 == 3 || god_mjo_3 == 3 || god_mjo_4 == 3)
+		{
+			mes "[Vestri]";
+			mes "I really hope I meet a decent";
+			mes "human being next time. So far,";
+			mes "I haven't met one useful human.";
+			close;
+		}
+			else if(god_mjo_3 == 2)
+		{
+			mes "[Vestri]";
+			mes "Perfect preparation does not";
+			mes "always result in success.";
+			mes "There's a point when you've";
+			mes "got to just go out and do it.";
+			next;
+			mes "[Vestri]";
+			mes "I don't know how far you'll";
+			mes "go, but put all your strength";
+			mes "into it anyway~";
+			close;
+		}
+			else if(god_mjo_1 == 0 || god_mjo_1 == 1 || god_mjo_2 == 0 || god_mjo_2 == 1 || god_mjo_4 != 0)
+		{
+			mes "[Vestri]";
+			mes "What do you want?";
+			next;
+			menu "Nothing.",-,"Excuse me.",L_Excuse;
+					mes "[Vestri]";
+					mes "If you need anything, try to";
+					mes "get it on your own!";
+					mes "Nobody is responsible on you";
+					mes "but yourself!";
+					close;
+				
+				L_Excuse:
+					set god_mjo_3,3;
+					mes "[Vestri]";
+					mes "You didn't answer the question!";
+					mes "Now, you've probably got the";
+					mes "wrong Dwarf here.";
+					next;
+					mes "[Vestri]";
+					mes "Get out of here, and go to your";
+					mes "human Blacksmiths if you want";
+					mes "equipment upgrades!";
+					close;
+		}
+			else if(god_mjo_3 == 1)
+		{
+			disable_items;
+			mes "[Vestri]";
+			mes "Great! Which one should";
+			mes "I upgrade first, huh? My heart";
+			mes "is pounding with anticipation...";
+			next;
+		M_Menu:
+				menu getequipname(1),PART1,getequipname(2),PART2,getequipname(3),PART3,getequipname(4),PART4,getequipname(5),PART5,
+	     			getequipname(6),PART6,getequipname(7),PART7,getequipname(8),PART8,getequipname(9),PART9,getequipname(10),PART10;
+
+				PART1:
+					set @vestripart,1;
+					if (getequipisequiped(1)) goto L_Check11;
+					goto M_Menu;
+				PART2:
+					set @vestripart,2;
+					if (getequipisequiped(2)) goto L_Check11;
+					goto M_Menu;
+				
+				PART3:
+					set @vestripart,3;
+					if (getequipisequiped(3)) goto L_Check11;
+					goto M_Menu;
+				
+				PART4:
+					set @vestripart,4;
+					if (getequipisequiped(4)) goto L_Check11;
+					goto M_Menu;
+				PART5:
+					set @vestripart,5;
+					if (getequipisequiped(5)) goto L_Check11;
+					goto M_Menu;
+				
+				PART6:
+					set @vestripart,6;
+					if (getequipisequiped(6)) goto L_Check11;
+					goto M_Menu;
+				
+				PART7:
+					set @vestripart,7;
+					if (getequipisequiped(7)) goto L_Check11;
+					goto M_Menu;
+				
+				PART8:
+					set @vestripart,8;
+					if (getequipisequiped(8)) goto L_Check11;
+					goto M_Menu;
+				
+				PART9:
+					set @vestripart,9;
+					if (getequipisequiped(9)) goto L_Check11;
+					goto M_Menu;
+				
+				PART10:
+					set @vestripart,10;
+					if (getequipisequiped(10)) goto L_Check11;
+					goto M_Menu;
+			
+			L_Check11:
+			if(getequipisenableref(@vestripart)) goto L_Check12;
+				mes "[Vestri]";
+				mes "What, this isn't upgradable!";
+				mes "What the hell do you want me";
+				mes "to do with this?";
+				close2;
+				enable_items;
+				end;
+			
+			L_Check12:
+				if(getequipisidentify(@vestripart)) goto L_Check13;
+				mes "[Vestri]";
+				mes "You'd better identify this item";
+				mes "first. If we don't know what it";
+				mes "is, what's the point of upgrading it?";
+				close2;
+				enable_items;
+				end;
+			
+			L_Check13:
+				if(getequiprefinerycnt(@vestripart) < 10) goto L_Check14;
+				mes "[Vestri]";
+				mes "Oh, this is excellent!";
+				mes "This piece here has been";
+				mes "perfectly refined!";
+				next;
+				mes "[Vestri]";
+				mes "But this isn't what I want.";
+				mes "I can't do any work on this at all.";
+				close2;
+				enable_items;
+				end;
+			
+			L_Check14:
+				if (getequippercentrefinery(@vestripart) != 100) goto L_Check15;
+				mes "[Vestri]";
+				mes "This item isn't even a challenge";
+				mes "to upgrade. You can get humans";
+				mes "to do this kind of beginner's stuff.";
+				next;
+				mes "[Vestri]";
+				mes "Come on...";
+				mes "Bring me something that presents";
+				mes "an element of risk!";
+				close2;
+				enable_items;
+				end;
+			
+			L_Check15:
+				if (getequipweaponlv(@vestripart) == 1 || getequipweaponlv(@vestripart) == 2 || getequipweaponlv(@vestripart) == 3)
+			{
+				mes "[Vestri]";
+				mes "Hey...";
+				mes "Don't insult me by expecting me";
+				mes "to work on anything less than";
+				mes "a Level 4 weapon.";
+				next;
+				mes "[Vestri]";
+				mes "Bring me a Level 4 weapon for";
+				mes "me to work on next time, got it?";
+				close2;
+				enable_items;
+				end;
+			}
+			
+				if(getequipweaponlv(@vestripart) == 0)
+			{
+				mes "[Vestri]";
+				mes "Armor?!";
+				mes "Didn't I tell you that I only";
+				mes "work on Level 4 weapons?";
+				next;
+				mes "[Vestri]";
+				mes "You can have a human Blacksmith";
+				mes "work on that kind of stuff! Now,";
+				mes "a Dwarf like me needs something";
+				mes "that's more of a challenge!";
+				close2;
+				enable_items;
+				end;
+			}
+
+			mes "[Vestri]";
+			mes "Okay, let me give you the mandatory";
+			mes "warning. If your weapon happens";
+			mes "to be destroyed by chance during";
+			mes "the upgrade, you'll never see";
+			mes "the weapon again.";
+			next;
+			mes "[Vestri]";
+			mes "That also means that if the weapon";
+			mes "is destroyed, any ^FF0000Cards^000000";
+			mes "inserted into the weapon will also";
+			mes "be gone.";
+			next;
+			mes "[Vestri]";
+			mes "If you understand,";
+			mes "then let's get on with it!";
+			next;
+			menu "Sure, let's do it!",L_Go,"N-no, I changed my mind!",-;
+					mes "[Vestri]";
+					mes "Bah! How do you survive in this";
+					mes "world with that kind of cowardice?!";
+					next;
+					mes "[Vestri]";
+					mes "Oh, forget it.";
+					mes "I know you're just being careful.";
+					mes "Damn, I was just so eager to";
+					mes "get to work!";
+					close2;
+					enable_items;
+					end;
+			
+			L_Go:
+				if(countitem(984) > 0) delitem 984,1;
+				else
+			{
+				mes "[Vestri]";
+				mes "Huh...";
+				mes "You forgot to";
+				mes "bring an Oridecon.";
+				mes "Hurry up and get one.";
+				close;
+			}
+			
+				if (getequippercentrefinery(@vestripart) > rand(100))
+			{
+				mes "^3355FF*Clang Clang!*^000000";
+				successrefitem @vestripart;
+				next;
+				emotion e_no1;
+				mes "[Vestri]";
+				mes "Mwahahaha~";
+				mes "I've still got it!";
+				mes "So aren't you happy with an";
+				mes "even more powerful weapon?";
+				next;
+			}
+				else
+			{
+				mes "[Vestri]";
+				mes "^3355FF*Clang Clang!*^000000";
+				failedrefitem @vestripart;
+				next;
+				emotion e_omg;
+				mes "[Vestri]";
+				mes "Waaahhhhh!";
+				mes "Dear God, no!";
+				next;
+				mes "[Vestri]";
+				mes "I-It's alright!";
+				mes "Bad things happen sometimes.";
+				mes "Let's just think of it as both";
+				mes "of us having a bad day.";
+				mes "Yeah, not regrets!";
+				next;
+			}
+			set god_mjo_3,2;
+			enable_items;
+			mes "[Vestri]";
+			mes "Well, my friend,";
+			mes "if you ever visit my brothers,";
+			mes "please give them my regards.";
+			mes "Take care.";
+			close;
+		}
+			else if(god_mjo_3 == 0)
+		{
+			mes "[Vestri]";
+			mes "What do you want?";
+			next;
+			menu "Nothing.",-,"Excuse me.",L_Excuse2;
+					mes "[Vestri]";
+					mes "If you need anything, try to";
+					mes "get it on your own!";
+					mes "Nobody is responsible on you";
+					mes "but yourself!";
+					close;
+				
+				L_Excuse2:
+					mes "[Vestri]";
+					mes "Hmm, I am not sure if there is things";
+					mes "that I can help you with.";
+					mes "As you see, I am a blacksmith.";
+					next;
+					mes "[Vestri]";
+					mes "I prefer upgrading weapns more than anything else!";
+					mes "Especially I like to upgrade a weapon that has been";
+					mes "forged many times already or a high level one.";
+					mes "Because they're challengeable!";
+					next;
+					mes "[Vestri]";
+					mes "Don't you like the idea of challenging to";
+					mes "a limit? To me, upgrading items makes me feel like";
+					mes "climbing the top of a mountain that has never been touched by dwarves!";
+					next;
+					mes "[Vestri]";
+					mes "Okay, I think we're meant to meet today.";
+					mes "For that, I am going to upgrade a weapon";
+					mes "with a free of charge";
+					mes "if you bring me a weapon and a forging material.";
+					mes "Isn't it a great offer?";
+					next;
+					set god_mjo_3,1;
+					mes "[Vestri]";
+					mes "But here's a condition.";
+					mes "You must bring me a level 4 weapon.";
+					mes "Just like I said, I want something to challenge.";
+					mes "Oh, don't forget an oridecon, too!";
+					close;
+		}
+			else
+		{
+			mes "[Vestri]";
+			mes "Zzzz Zzzz Zzzz...";
+			close;
+		}
+	}
+		else if(god_mjo_0 == 2)
+	{
+			if (god_mjo_1 == 3 || god_mjo_2 == 3 || god_mjo_3 == 3 || god_mjo_4 == 3)
+		{
+			mes "[Vestri]";
+			mes "I really hope I will meet a";
+			mes "decent human being next time";
+			mes "...so far there has never been";
+			mes "at least one human useful.";
+			close;
+		}
+			else if(god_mjo_2 == 2)
+		{
+			mes "[Vestri]";
+			mes "Prefect preparation does not";
+			mes "always result in success.";
+			mes "I am not sure how far you can go,";
+			mes "but put forth your strength anyway.";
+			close;
+		}
+			else if (god_mjo_1 == 0 || god_mjo_1 == 1 || god_mjo_3 != 0 || god_mjo_4 != 0)
+		{
+			mes "[Vestri]";
+			mes "What do you want?";
+			next;
+			menu "Nothing.",-,"Excuse me.",L_Excuse3;
+					mes "[Vestri]";
+					mes "If you need anything, try to";
+					mes "get it on your own!";
+					mes "Nobody is responsible on you";
+					mes "but yourself!";
+					close;
+				
+				L_Excuse3:
+					set god_mjo_2,3;
+					mes "[Vestri]";
+					mes "You didn't listen to me and you don't even know who I am.";
+					mes "I am not excusing you!";
+					mes "You got a wrong dwarf here. Go back.";
+					mes "Ask to your human blacksmiths for item upgrade!";
+					close;
+		}
+			else if(god_mjo_2 == 1)
+		{
+			disable_items;
+			mes "[Vestri]";
+			mes "Great! Which one should I";
+			mes "upgrade first, huh?";
+			mes "My heart is throbbing with";
+			mes "excitement...";
+			next;
+			M_Menu2:
+			menu getequipname(1),PART11,getequipname(2),PART12,getequipname(3),PART13,getequipname(4),PART14,getequipname(5),PART15,
+			     getequipname(6),PART16,getequipname(7),PART17,getequipname(8),PART18,getequipname(9),PART19,getequipname(10),PART20;
+
+				PART11:
+					set @vestripart,1;
+					if (getequipisequiped(1)) goto L_Check21;
+					goto M_Menu2;
+				PART12:
+					set @vestripart,2;
+					if (getequipisequiped(2)) goto L_Check21;
+					goto M_Menu2;
+				
+				PART13:
+					set @vestripart,3;
+					if (getequipisequiped(3)) goto L_Check21;
+					goto M_Menu2;
+				
+				PART14:
+					set @vestripart,4;
+					if (getequipisequiped(4)) goto L_Check21;
+					goto M_Menu2;
+				PART15:
+					set @vestripart,5;
+					if (getequipisequiped(5)) goto L_Check21;
+					goto M_Menu2;
+				
+				PART16:
+					set @vestripart,6;
+					if (getequipisequiped(6)) goto L_Check21;
+					goto M_Menu2;
+				
+				PART17:
+					set @vestripart,7;
+					if (getequipisequiped(7)) goto L_Check21;
+					goto M_Menu2;
+				
+				PART18:
+					set @vestripart,8;
+					if (getequipisequiped(8)) goto L_Check21;
+					goto M_Menu2;
+				
+				PART19:
+					set @vestripart,9;
+					if (getequipisequiped(9)) goto L_Check21;
+					goto M_Menu2;
+				
+				PART20:
+					set @vestripart,10;
+					if (getequipisequiped(10)) goto L_Check21;
+					goto M_Menu2;
+			
+			L_Check21:
+			if(getequipisenableref(@vestripart)) goto L_Check22;
+				mes "[Vestri]";
+				mes "What, this isn't upgradable!";
+				mes "What the hell do you want me";
+				mes "to do with this?";
+				close2;
+				enable_items;
+				end;
+			
+			L_Check22:
+				if(getequipisidentify(@vestripart)) goto L_Check23;
+				mes "[Vestri]";
+				mes "You'd better identify this item";
+				mes "first. If we don't know what it";
+				mes "is, what's the point of upgrading it?";
+				close2;
+				enable_items;
+				end;
+			
+			L_Check23:
+				if(getequiprefinerycnt(@vestripart) < 10) goto L_Check24;
+				mes "[Vestri]";
+				mes "Oh, this is excellent!";
+				mes "This piece here has been";
+				mes "perfectly refined!";
+				next;
+				mes "[Vestri]";
+				mes "But this isn't what I want.";
+				mes "I can't do any work on this at all.";
+				close2;
+				enable_items;
+				end;
+			
+			L_Check24:
+				if (getequippercentrefinery(@vestripart) != 100) goto L_Check25;
+				mes "[Vestri]";
+				mes "This item isn't even a challenge";
+				mes "to upgrade. You can get humans";
+				mes "to do this kind of beginner's stuff.";
+				next;
+				mes "[Vestri]";
+				mes "Come on...";
+				mes "Bring me something that presents";
+				mes "an element of risk!";
+				close2;
+				enable_items;
+				end;
+			
+			L_Check25:
+				if (getequipweaponlv(@vestripart) == 1 || getequipweaponlv(@vestripart) == 2 || getequipweaponlv(@vestripart) == 3)
+			{
+				mes "[Vestri]";
+				mes "Hey...";
+				mes "Don't insult me by expecting me";
+				mes "to work on anything less than";
+				mes "a Level 4 weapon.";
+				next;
+				mes "[Vestri]";
+				mes "Bring me a Level 4 weapon for";
+				mes "me to work on next time, got it?";
+				close2;
+				enable_items;
+				end;
+			}
+			
+				if(getequipweaponlv(@vestripart) == 0)
+			{
+				mes "[Vestri]";
+				mes "Armor?!";
+				mes "Didn't I tell you that I only";
+				mes "work on Level 4 weapons?";
+				next;
+				mes "[Vestri]";
+				mes "You can have a human Blacksmith";
+				mes "work on that kind of stuff! Now,";
+				mes "a Dwarf like me needs something";
+				mes "that's more of a challenge!";
+				close2;
+				enable_items;
+				end;
+			}
+
+			mes "[Vestri]";
+			mes "Okay, let's check this before I start.";
+			mes "If your weapon happens to be destroyed while upgraded,";
+			mes "you will not see the weapon ever again. You know that, don't you?";
+			mes "That also applies to any item inserted to the weapon such as";
+			mes "^ff0000a monster card^000000!";
+			mes "^ff0000Your weapon will be just gone^000000, do you understand?";
+			mes "If you do, let's get it on!";
+			next;
+			menu "Sure, let's do it!",L_Go2,"...no, I am out.",-;
+					mes "[Vestri]";
+					mes "Bah, how are you gonna survive in this tough world";
+					mes "with that kind of timid attitude?";
+					mes "Yeah, yeah, yeah, forget it.";
+					mes "Forget it!";
+					close;
+					enable_items;
+					end;
+
+			L_Go2:
+				if(countitem(984) > 0) delitem 984,1;
+				else
+			{
+				mes "[Vestri]";
+				mes "Hmm, yeah you forgot to bring one thing...";
+				mes "That is an oridecon.";
+				mes "Now go bring it.";
+				close;
+			}
+
+				if (getequippercentrefinery(@vestripart) > rand(100))
+			{
+				mes "[Vestri]";
+				mes "Clang! Clang! Clang!";
+				successrefitem @vestripart;
+				next;
+				emotion e_no1;
+				mes "[Vestri]";
+				mes "Muhahaha, I am still good!";
+				mes "So, aren't you happy to have a more powerful weapon?";
+				next;
+			}
+				else
+			{
+				mes "[Vestri]";
+				mes "Clang! Clang! Clang!";
+				failedrefitem @vestripart;
+				next;
+				emotion e_omg;
+				mes "[Vestri]";
+				mes "Waaahhhhhhhhhhhhhh!";
+				next;
+				mes "[Vestri]";
+				mes "Umm, it's alright. Bad thing happens.";
+				mes "Let's think of it as we're having a bad day.";
+				mes "Yeah, I have no regrets!";
+				next;
+			}
+			set god_mjo_2,2;
+			enable_items;
+			mes "[Vestri]";
+			mes "This is it, my friend.";
+			mes "If you have a chance to meet my brothers,";
+			mes "please send my regard to them.";
+			mes "Take care.";
+			close;
+		}
+			else if(god_mjo_2 == 0)
+		{
+			mes "[Vestri]";
+			mes "What do you want?";
+			next;
+			menu "Nothing.",-,"Excuse me.",L_Excuse4;
+					mes "[Vestri]";
+					mes "If you need anything, try to get it on your own!";
+					mes "Nobody is responsible on you but yourself!";
+					close;
+				
+				L_Excuse4:
+					mes "[Vestri]";
+					mes "Hmm, I am not sure if there is things";
+					mes "that I can help you with.";
+					mes "As you see, I am a blacksmith.";
+					next;
+					mes "[Vestri]";
+					mes "I prefer upgrading weapns more than anything else!";
+					mes "Especially I like to upgrade a weapon that has been";
+					mes "forged many times already or a high level one.";
+					mes "Because they're challengeable!";				
+					next;
+					mes "[Vestri]";
+					mes "Don't you like the idea of challenging to";
+					mes "a limit? To me, upgrading items makes me feel like";
+					mes "climbing the top of a mountain that has never been touched by dwarves!";
+					next;
+					mes "[Vestri]";
+					mes "Okay, I think we're meant to meet today.";
+					mes "For that, I am going to upgrade a weapon";
+					mes "with a free of charge";
+					mes "if you bring me a weapon and a forging material.";
+					mes "Isn't it a great offer?";
+					next;
+					set god_mjo_2,1;
+					mes "[Vestri]";
+					mes "But here's a condition.";
+					mes "You must bring me a level 4 weapon.";
+					mes "Just like I said, I want something to challenge.";
+					mes "Oh, don't forget an oridecon, too!";
+					close;
+		}
+			else
+		{
+			mes "[Vestri]";
+			mes "Zzzz Zzzz Zzzz...";
+			close;
+		}
+	}
+		else if(god_mjo_0 == 0)
+	{
+		mes "[Vestri]";
+		mes "It's always a pleasure to engage";
+		mes "myself in hard work, especially";
+		mes "smithing.";
+		next;
+		mes "[Vestri]";
+		mes "Upgrading is always enjoyable!";
+		mes "I have no regrets when failure,";
+		mes "and I'm always pleased when I'm";
+		mes "successful. I'll upgrade everyday";
+		mes "o make the best of my life~";
+		close;
+	}
+		else
+	{
+		mes "[Vestri]";
+		mes "Zzzz Zzzz Zzzz...";
+		close;
+	}
+}
+
+}
+
+mjolnir_12.gat,18,18,7	script	Dwarf Blacksmith#north	826,{
+
+	if ($God3 < 50)
+{
+	mes "[Nordri]";
+	mes "What, I don't have any Eluniums";
+	mes "or Oridecons!";
+	next;
+	mes "[Nordri]";
+	mes "Vestri took them all. ^333333*Sigh*^000000";
+	mes "Those were my treasures, you know...";
+	close;
+}
+	else
+{
+		if($God4 > 99)
+	{
+		mes "[Nordri]";
+		mes "What's happening?";
+		mes "I smell something different from";
+		mes "the wind...I cannot tell what it is.";
+		mes "Should I go into a cave to fiture it out...?";
+		mes "Hmmm....this is odd.";
+		close;
+	}
+		else if(god_mjo_0 == 11)
+	{
+		mes "[Nordri]";
+		mes "Hahahahah, even Gods know that we dwarves";
+		mes "are the most talented artisans among all the existing races.";
+		mes "Maybe we don't look that way for now,";
+		mes "one day we will start our business again.";
+		close;
+	}
+		else if(god_mjo_0 == 10)
+	{
+		mes "[Nordri]";
+		mes "What, I don't have any Eluniums";
+		mes "or Oridecons!";
+		mes "Vestri took all of them....";
+		mes "Do you understand?";
+		close;
+	}
+		else if(god_mjo_0 == 1)
+	{
+			if (god_mjo_1 == 3 || god_mjo_2 == 3 || god_mjo_3 == 3 || god_mjo_4 == 3)
+		{
+			mes "[Nordri]";
+			mes "La la la la~ La la la la~";
+			mes "It is happy to be in the Mjolnir forest~";
+			mes "I am surrounded by a peaceful and quiet air~ La la la~";
+			mes "I do not worry about anything~ La la la~";
+			close;
+		}
+			else if(god_mjo_4 == 2)
+		{
+			mes "[Nordri]";
+			mes "Aren't you supposed to be going back by now...? Heh,";
+			mes "Oh well, none of my business.";
+			mes "If you have some spare zeny, have some banana on the way...";
+			mes "Isn't a pumpkin the best taste though?";
+			close;
+		}
+			else if (god_mjo_1 == 0 || god_mjo_1 == 1 || god_mjo_2 == 0 || god_mjo_2 == 1 || god_mjo_3 == 0 || god_mjo_3 == 1)
+		{
+			mes "[Nordri]";
+			mes "What kind of business do";
+			mes "you have with me?";
+			next;
+			menu "Nothing.",-,"Excuse me.",L_Excuse;
+					mes "[Nordri]";
+					mes "You're funny, leave me alone.";
+					close;
+				
+				L_Excuse:
+					set god_mjo_4,3;
+					mes "[Nordri]";
+					mes "What? I am sorry, I cannot hear";
+					mes "you at this moment.";
+					mes "I want to sing a song really loud!";
+					mes "La la la~ La la la~";
+					close;
+		}
+			else if(god_mjo_4 == 1)
+		{
+				if(countitem(501) > 0)
+			{
+				delitem 501,1;
+				mes "[Nordri]";
+				mes "Heheh, thank you. Since you gave me";
+				mes "your precious red potion, I shall";
+				mes "tell you an old story";
+				mes "in return. You will like it.";
+				next;
+				set @mjo_north,0;
+			L_NorthTalk:
+					switch(@mjo_north)
+				{
+					case 0:
+						mes "[Nordri]";
+						mes "A legend says that Thor went on an adventure to Utgard,";
+						mes "the land of giants.";
+						mes "He made a bet with the king of giants.";
+						next;
+						mes "[Nordri]";
+						mes "The first step of the bet was who ate more food than the other.";
+						mes "Thor ate all of meats on the table";
+						mes "Utgardaloki, the king ate not only meats but bones and plates as well.";
+						next;
+						mes "[Nordri]";
+						mes "The truth was Thor was hallucinated by a magic at the time,";
+						mes "so he couldn't realise that the king was not actually the king but a creature...";
+						mes "it was the thing which could eat up everything in the world...";
+						mes "I cannot remember what it was...do you?";
+						next;
+						menu "Greed",-,"Sea",-,"Blaze",L_Speak,"Hog",-;
+							goto L_Listen;
+					
+					case 1:
+						mes "[Nordri]";
+						mes "Yes, I remember now, it was the 'Blaze'.";
+						mes "After that, there was another match which competed who ran faster than the other.";
+						mes "For the match, Thor let his servant Tialfi compte with";
+						mes "the king's servant Hugi.";
+						next;
+						mes "[Nordri]";
+						mes "However, no matter how many matches they did,";
+						mes "Hugi won everytime. Thor was once again hallucinated by a magic";
+						mes "so he could not realise Hugi was as a matter of fact";
+						mes "the....do you know what it truely was?";
+						next;
+						menu "Language",-,"Thoughts",L_Speak,"Wind",-,"Wolf",-;
+							goto L_Listen;
+
+					case 2:
+						mes "[Nordri]";
+						mes "Yes, you're right! It was the 'thoughts'!";
+						mes "That defiant giants gave an order to Thor to fight with his grand mother.";
+						mes "Thor was happy for that he would finally win this time by defeating";
+						mes "an old woman....but he could not.";
+						mes "No matter how hard he tried, he could not win over the old woman.";
+						next;
+						mes "[Nordri]";
+						mes "Thor was again hallucinated by a magic";
+						mes "so he could not realise the old woman was as a matter of fact";
+						mes "the....do you know what it truely was?";
+						next;
+						menu "Curse",-,"Earth",-,"Heart",-,"Age",L_Speak;
+							goto L_Listen;
+
+					case 3:
+						mes "[Nordri]";
+						mes "Yes, it was the 'age'! No one can stop their time!";
+						mes "After Thor was lost every match, the king told him";
+						mes "the truth about the betting. And Thor became furious.";
+						mes "But it was no use, because the king and other giants were all gone";
+						mes "by then....";
+						next;
+						mes "[Nordri]";
+						mes "There are two things that give us lessons.";
+						mes "First, don't believe things as you see.";
+						mes "Second, don't be so sure of your power,";
+						mes "there are men who are more powerful than you. So you shall do your best and be humble.";
+						mes "Do you understand?";
+						next;
+						mes "[Nordri]";
+						mes "Living properly will be the most important thing.";
+						mes "You cannot have everything what you want.";
+						mes "Besides, when you're obssessive about something,";
+						mes "you cannot think rationally about the thing.";
+						next;;
+						set god_mjo_4,2;
+						mes "[Nordri]";
+						mes "Thank you for listening to my long story.";
+						mes "If you meet anyone dreaming something that cannot be true,";
+						mes "please share this story with him.";
+						mes "The story about Thor that he fought against hallucination created by the giant king.";
+						close;
+						
+				}
+					L_Listen:
+						mes "[Nordri]";
+						mes "...umm? I don't think that it was...hmm.";
+						mes "Let me think about it more.";
+						mes "Maybe I can remember it later....";
+						mes "shall we talk again with drinking a red potion?";
+						mes "Hahahahaha.";
+						close;
+			}
+				else
+			{
+				mes "[Nordri]";
+				mes "Woah, I am so thirsty. Didn't I ask you to give a red potion!?";
+				mes "I am not gonna tell you unless you bring me one.";
+				close;
+			}
+		}
+			else if(god_mjo_4 == 0)
+		{
+			mes "[Nordri]";
+			mes "What kind of business";
+			mes "do you have with me?";
+			next;
+			menu "Nothing.",-,"Excuse me.",L_Excuse2;
+					mes "[Nordri]";
+					mes "You're funny, leave me alone.";
+					close;
+
+				L_Excuse2:
+					mes "[Nordri]";
+					mes "This is odd. Recently, there have been too many";
+					mes "humans interested in dwarves.";
+					mes "Haha, of course, I am having a good time with them though.";
+					next;
+					set god_mjo_4,1;
+					mes "[Nordri]";
+					mes "I am kind of thirsty.";
+					mes "Bring me a red potion, would you?";
+					mes "If you do, I am gonna tell you an important story.";
+					mes "Heheheheh.";
+					close;
+		}
+			else
+		{
+			mes "[Nordri]";
+			mes "Zzzz Zzzz...";
+			close;
+		}
+	}
+		else if(god_mjo_0 == 2)
+	{
+			if (god_mjo_1 == 3 || god_mjo_2 == 3 || god_mjo_3 == 3 || god_mjo_4 == 3)
+		{
+			mes "[Nordri]";
+			mes "La la la la~ La la la la~";
+			mes "It is happy to be in the Mjolnir forest~";
+			mes "I am surrounded by a peaceful and quiet air~ La la la~";
+			mes "I do not worry about anything~ La la la~";
+			close;
+		}
+			else if(god_mjo_1 == 2)
+		{
+			mes "[Nordri]";
+			mes "Aren't you supposed to be going back by now...? Heh,";
+			mes "Oh well, none of my business.";
+			mes "If you have some spare zeny, have some banana on the way...";
+			mes "Isn't a pumpkin the best taste though?";
+			close;
+		}
+			else if (god_mjo_2 != 0 || god_mjo_3 != 0 || god_mjo_4 != 0)
+		{
+			mes "[Nordri]";
+			mes "What kind of business do you have with me?";
+			next;
+			menu "Nothing.",-,"Excuse me.",L_Excuse3;
+					mes "[Nordri]";
+					mes "You're funny, leave me alone.";
+					close;
+
+				L_Excuse3:
+					set god_mjo_1,3;
+					mes "[Nordri]";
+					mes "What? I am sorry, I cannot hear you at this moment.";
+					mes "I want to sing a song really loud!";
+					mes "La la la~ La la la~";
+					close;
+		}
+			else if(god_mjo_1 == 1)
+		{
+				if(countitem(501) > 0)
+			{
+				delitem 501,1;
+				mes "[Nordri]";
+				mes "Heheh, thank you. Since you gave me";
+				mes "your precious red potion, I shall tell you an old story";
+				mes "in return. You will like it.";
+				next;
+				set @mjo_north,0;
+			L_NorthTalk2:
+					switch(@mjo_north)
+				{
+					case 0:
+						mes "[Nordri]";
+						mes "A legend says that there was a brave and wise dwarf";
+						mes "named Alvis long time ago.";
+						mes "He possessed broad knowledge as a library";
+						mes "and was brave as Siegfried.";
+						next;
+						mes "[Nordri]";
+						mes "Unfortunately he was too ambitious.";
+						mes "He was in love with Thrud who was Thor's daughter at first sight.";
+						mes "So he proposed to Thor to marry with Thrud.";
+						mes "As you expected, Thor refused his proposal.";
+						mes "Alvis should have stopped there but he didn't.";
+						next;
+						mes "[Nordri]";
+						mes "So Thor asked him few questions to test him.";
+						mes "What was the first question....there was a question like this...";
+						mes "What was the name of the ground in a human's term?";
+						next;
+						menu "Ymir's body",-,"Earth",L_Speak2,"Lane",-,"Universe",-;
+							goto L_Listen2;
+
+					case 1:
+						mes "[Nordri]";
+						mes "Yes, it is the 'Earth'. So Thor gave him another question.";
+						mes "What is a  giant's term for a round shell that covers the earth?";
+						next;
+						menu "Ymir's Head",-,"Sky",-,"Cloud Factory",-,"High House",L_Speak2;
+							goto L_Listen2;
+
+					case 2:
+						mes "[Nordri]";
+						mes "That's it, 'High House'...since they're so gigantic,";
+						mes "it might looked that way.";
+						mes "So Thor gave him another question.";
+						mes "What is the god's term for a ball that arise in the night?";
+						next;
+						menu "Circling Wheel",-,"Moon",-,"False Sun",L_Speak2,"Fast Stranger",-;
+							goto L_Listen2;
+
+					case 3:
+						mes "[Nordri]";
+						mes "Yes! Gods call the moon as the 'false sun'.";
+						mes "Alvis knew every answer but he was too defiant";
+						mes "so he didn't notice that the sun was arising.";
+						mes "So he was turned into a stone statue.";
+						next;
+						mes "[Nordri]";
+						mes "There are two things we can learn from this story.";
+						mes "First, do not desire something that cannot be true.";
+						mes "Secone, do not be so proud of yourself...";
+						mes "You cannot have everything in the world.";
+						next;
+						mes "[Nordri]";
+						mes "Living properly is the most important thing.";
+						mes "Even if you wish something to be yours,";
+						mes "that does not happen every time, you know.";
+						mes "Thread of fate is of course long, but it can be cut off any time.";
+						next;
+						set god_mjo_1,2;
+						mes "[Nordri]";
+						mes "Thank you for listening to my long story.";
+						mes "If you meet anyone dreaming something that cannot be true,";
+						mes "please share this story with him.";
+						mes "The story about Alvis who was a wise and";
+						mes "brave ma but who was too defiant at the same time.";
+				}
+					L_Listen2:
+						mes "[Nordri]";
+						mes "...umm? I don't think that it was...hmm.";
+						mes "Let me think about it more.";
+						mes "Maybe I can remember it later....";
+						mes "shall we talk again with drinking a red potion?";
+						mes "Hahahahaha.";
+						close;
+			}
+				else
+			{
+				mes "[Nordri]";
+				mes "Woah, I am so thirsty. Didn't I ask you to give a red potion!?";
+				mes "I am not gonna tell you unless you bring me one.";
+				close;
+			}
+		}
+			else if(god_mjo_1 == 0)
+		{
+			mes "[Nordri]";
+			mes "What kind of business do you have with me?";
+			next;
+			menu "Nothing.",-,"Excuse me.",L_Excuse4;
+					mes "[Nordri]";
+					mes "You're funny, leave me alone.";
+					close;
+
+				L_Excuse4:
+					mes "[Nordri]";
+					mes "This is odd. Recently, there have been too many";
+					mes "humans interested in dwarves.";
+					mes "Haha, of course, I am having a good time with them though.";
+					next;
+					set god_mjo_1,1;
+					mes "[Nordri]";
+					mes "I am kind of thirsty.";
+					mes "Bring me a red potion, would you?";
+					mes "If you do, I am gonna tell you an important story.";
+					mes "Heheheheh.";
+					close;
+		}
+			else
+		{
+			mes "[Nordri]";
+			mes "Zzzz Zzzz Zzzz...";
+			close;
+		}
+	}
+		else if(god_mjo_0 == 0)
+	{
+		mes "[Nordri]";
+		mes "I am Nordri the dwarf blacksmith.";
+		mes "I am in charge of the north part of mountain Mjolnir.";
+		mes "If you want to pass me, you must ask";
+		mes "an approval to me.";
+		next;
+		mes "[Nordri]";
+		mes "Calm down, it was a joke. Hahahahaha!";
+		close;
+	}
+		else
+	{
+		mes "[Nordri]";
+		mes "Zzzz Zzzz Zzzz...";
+		close;
+	}
+
+L_Speak:
+	set @mjo_north,@mjo_north +1;
+	goto L_NorthTalk;
+
+L_Speak2:
+	set @mjo_north,@mjo_north +1;
+	goto L_NorthTalk2;
+}
+
 }
\ No newline at end of file
diff --git a/npc/quests/seals/sleipnir_seal.txt b/npc/quests/seals/sleipnir_seal.txt
index f6052e2fb..788a41702 100644
--- a/npc/quests/seals/sleipnir_seal.txt
+++ b/npc/quests/seals/sleipnir_seal.txt
@@ -1,2295 +1,2295 @@
-//===== eAthena Script ======================================= 

-//= Sleipnir seal unlocking NPCs.

-//===== By: ================================================== 

-//= MasterOfMuppets

-//===== Current Version: ===================================== 

-//= 1.0

-//===== Compatible With: ===================================== 

-//= eAthena

-//===== Description: ========================================= 

-//= Quest for breaking the seal of Sleipnir.

-//===== Additional Comments: =================================

-// 1.0 First version. [MasterOfMuppets]

-//============================================================

-// Juno citizen Noyee

-yuno.gat,164,200,4	script	Noyee#God	101,{

-

-    if(BaseLevel < 70)

-      {

-      mes "[Noyee]";

-      mes "Do you know that there are two different types of armor?";

-      mes "There are general armors that you can purchase from NPC shops";

-      next;

-      mes "[Noyee]";

-      mes "and ones that you can obtain by hunting monsters.";

-      mes "The difference between the two is if they're slotted or not.";

-      next;

-      mes "[Noyee]";

-      mes "Defence wise, both of them possess the same rate.";

-      mes "However, since a slotted armor allows you to put 'a monster card' in the slot,";

-      mes "it will enhance the armor with a different ability.";

-      next;

-      mes "[Noyee]";

-      mes "At the same time, both of slotted armors or monster cards";

-      mes "are very rare to obtain. Therefore, you seldom see";

-      mes "those kinds in the market.";

-      close;

-      }

-      if($God1 > 99)

-      {

-      mes "[Noyee]";

-      mes "Do you know that there are two different types of armor?";

-      mes "There are general armors that you can purchase from NPC shops";

-      next;

-      mes "[Noyee]";

-      mes "and ones that you can obtain by hunting monsters.";

-      mes "The difference between the two is if they're slotted or not.";

-      next;

-      mes "[Noyee]";

-      mes "Defence wise, both of them possess the same rate.";

-      mes "However, since a slotted armor allows you to put 'a monster card' in the slot,";

-      mes "it will enhance the armor with a different ability.";

-      next;

-      mes "[Noyee]";

-      mes "At the same time, both of slotted armors or monster cards";

-      mes "are very rare to obtain. Therefore, you seldom see";

-      mes "those kinds in the market.";

-      close;

-      }

-        mes "[Noyee]";

-        mes "Ah, I just remembered something.";

-        mes "There is a very interesting place in ...";

-        mes "It looks like a kind of laboratory but nobody knows";

-        mes "what it is....";

-        next;

-        mes "[Noyee]";

-        mes "Recently there have been many rumors going around";

-        mes "the place...? I have no idea what people are talking about.";

-        mes "Anyways, that place looks very interesting.";

-        if(god_sl_1 == 0)set god_sl_1,1;

-        close;

-

-}

-

-//Cukure Kirin

-que_god01.gat,98,98,4	script	Manager#God	69,{

-

-	set @NowWeight, MaxWeight - Weight;

-	if (@NowWeight >= 5000) goto NOT_OW;

-	mes "- Wait a minute! -";

-	mes "- Currently you are overweight. -";

-	mes "- Please lighten your weight -";

-	mes "- and try again. -";

-	close;

-

-NOT_OW:

-    if(BaseLevel < 70)

-      {

-      mes "[Cukure]";

-      mes "Awww...";

-      mes "I get too busy nowadays.";

-      mes "I don't even have times for a date.";

-      mes "Damn it....";

-      next;

-      mes "[Cukure]";

-      mes "Wait, when was the last time I went on a date...?";

-      mes "Umm....";

-      mes "Awww....I am so busy...busy!";

-      emotion 19;

-      close;

-      }

-    	

-      if($God1 < 100)

-      {

-        if(god_sl_1 == 0)

-	{

-        mes "[Cukure]";

-        mes "Awww...";

-        mes "I get too busy nowadays.";

-        mes "I don't even have times for a date.";

-        mes "Damn it....";

-        next;

-        mes "[Cukure]";

-        mes "Wait, when was the last time I went on a date...?";

-        mes "Umm....";

-        mes "Awww....I am so busy...busy!";

-        emotion 19;

-        close;

-	}

-        else if(god_sl_1 == 1)

-	{

-          mes "[Cukure]";

-          mes "We research signs of Gods that were left behind in this world long time ago.";

-          mes "Specifically, we are studying tools that represent the power of God.";

-          next;

-          mes "[Cukure]";

-          mes "...";

-          mes "Recently many of members except leaders";

-          mes "have retired due to their personal matters and whatsoever.";

-          mes "So we are running out of manpower.";

-          next;

-          mes "[Cukure]";

-          mes "Because of the problem, we have stopped";

-          mes "the most of researches on the progress.";

-          mes "Speaking of which...";

-          next;

-          mes "[Cukure]";

-          mes "Do you mind if I ask you to help our research?";

-          mes "I will reward you afterwards.";

-          next;

-          switch( select( "I am kind of busy...", "Sure, why not." ) )

-	  {

-            case 1:

-              mes "[Cukure]";

-              mes "Oh...are you?";

-              mes "I see.";

-              mes "Then, would you like to recommend someone";

-              mes "who can help us to continue researches?";

-              next;

-              mes "[Cukure]";

-              mes "I am so sorry to ask you of this, but....";

-              mes "we are that understaffed...I hope you will understand.";

-              mes ".......";

-              close;

-            break;

-

-            case 2:

-              mes "[Cukure]";

-              mes "?! Are you sure?";

-              mes "Hahahahaha~";

-              mes "I am so glad to hear that.";

-              next;

-              mes "[Cukure]";

-              mes "There are investigators inside.";

-              mes "They will need your help, please go visit them.";

-              next;

-              mes "[Cukure]";

-              mes "Oh, wait...";

-              mes "Let me give you a temporary admission pass.";

-              mes "Thank you so much for your help.";

-              next;

-              mes "^ff0000You have received a temporary admission pass.^000000";

-              set god_sl_1,2;

-              close;

-            break;

-

-	  }

-

-	}

-        else if(god_sl_1 < 10)

-	{

-         mes "[Cukure]";

-         mes "It seems very difficult to manage a laboratory.";

-         mes "Other laboratories always try to take our members away or to interrupt our business...";

-         mes "So I donnot have a personal life because of my job...";

-         mes ".......";

-         next;

-         mes "[Cukure]";

-         mes "Ah...umm....";

-         mes "Hahahaha...";

-         mes "What am I doing with a visitor...";

-         mes "Heh, please disregard what I said.";

-         mes "Hahahahaha...";

-         close;

-	}

-        else if(god_sl_1 < 50)

-	{

-          mes "[Cukure]";

-          mes "Ah, thank you for your help so far.";

-          mes "I hope you will continue to help us.";

-          mes "Although our investigators are kind of strange";

-          mes "they are all nice. I hope you will understand even if they treat you rudely.";

-         close;

-	}

-        else if(god_sl_1 == 50)

-	{

-          mes "[Cukure]";

-          mes "Ah...~";

-          mes "You gave us a great help.";

-          mes "Hahahaha...";

-          mes "We would have a harder time if you didn't help us.";

-          next;

-          mes "[Cukure]";

-          mes "As you have noticed already,";

-          mes "we have researched 'Sleipnir'";

-          mes "if we can reproduct this 'godly item' or not.";

-          next;

-          mes "[Cukure]";

-          mes "However....";

-          mes "so far, the result shows that it is almost impossible with";

-          mes "the technology we have.";

-          mes "Hmmm...";

-          next;

-          mes "[Cukure]";

-          mes "Anyways, we will continue to research";

-          mes "with a hope.";

-          next;

-          mes "[Cukure]";

-          mes "With your help, we succeeded to complete the basic reserach.";

-          mes "From now on, we will plan out further research";

-          mes "based on the result we made this time.";

-          next;

-          mes "[Cukure]";

-          mes "Oh, since you helped us, I am going to reward you.";

-          mes "Please give me a minute...";

-          next;

-          mes "[Cukure]";

-          mes "There it is.";

-          mes "It might not be a great reward but";

-          mes "I hope you will take it as a token of my gratitute.";

-          mes "Have a good travel!";

-          if($God1 < 100)set $God1,$God1+1;

-

-          if($God1 == 50)

-          	announce "The first seal of [Sleipnir] has appeared.",bc_all;

-          else if($God1 == 100)

-	  {

-            if ($God1 == 100 && $God2 == 100 && $God3 == 100 && $God4 == 100)

-            	announce "Four seals have been released at the same time with the seal of [Sleipnir].",bc_all;

-            else

-            	announce "The seal of [Sleipnir] has been released.",bc_all;

-	  }

-

-          set god_sl_1,51;

-          set @god_treasure,rand(1,900);

-          set @god_treasure1,rand(1,1000);

-

-          if(@god_treasure < 101)

-	    {

-            if(@god_treasure1 < 210)

-              getitem 2102,1;

-            else if(@god_treasure1 < 420)

-              getitem 2104,1;

-            else if(@god_treasure1 < 630)

-              getitem 2106,1;

-            else if(@god_treasure1 < 840)

-              getitem 2108,1;

-            else

-              getitem 2109,1;

-            }

-          

-          else if(@god_treasure < 201)

-	    {

-            if(@god_treasure1 < 48)

-              getitem 2207,1;

-            else if(@god_treasure1 < 96)

-              getitem 2210,1;

-            else if(@god_treasure1 < 150)

-              getitem 2213,1;

-            else if(@god_treasure1 < 190)

-              getitem 2215,1;

-            else if(@god_treasure1 < 238)

-              getitem 2217,1;

-            else if(@god_treasure1 < 290)

-              getitem 2223,1;

-            else if(@god_treasure1 < 340)

-              getitem 2227,1;

-            else if(@god_treasure1 < 348)

-              getitem 2229,1;

-            else if(@god_treasure1 < 400)

-              getitem 2231,1;

-            else if(@god_treasure1 < 448)

-              getitem 2233,1;

-            else if(@god_treasure1 < 496)

-              getitem 2236,1;

-            else if(@god_treasure1 < 544)

-              getitem 2244,1;

-            else if(@god_treasure1 < 592)

-              getitem 2245,1;

-            else if(@god_treasure1 < 640)

-              getitem 2247,1;

-            else if(@god_treasure1 < 688)

-              getitem 2248,1;

-            else if(@god_treasure1 < 736)

-              getitem 2250,1;

-            else if(@god_treasure1 < 784)

-              getitem 2251,1;

-            else if(@god_treasure1 < 832)

-              getitem 2252,1;

-            else if(@god_treasure1 < 880)

-              getitem 2253,1;

-            else if(@god_treasure1 < 940)

-              getitem 2257,1;

-            else

-              getitem 2259,1;

-            }

-            

-          else if(@god_treasure < 301)

-	    {

-            if(@god_treasure1 < 160)

-              getitem 2267,1;

-            else if(@god_treasure1 < 320)

-              getitem 2262,1;

-            else if(@god_treasure1 < 480)

-              getitem 2263,1;

-            else if(@god_treasure1 < 540)

-              getitem 2265,1;

-            else if(@god_treasure1 < 700)

-              getitem 2266,1;

-            else if(@god_treasure1 < 800)

-              getitem 2260,1;

-            else if(@god_treasure1 < 900)

-              getitem 2269,1;

-            else

-              getitem 2270,1;

-            }

-            

-          else if(@god_treasure < 401)

-	    {

-            if(@god_treasure1 < 70)

-              getitem 2298,1;

-            else if(@god_treasure1 < 140)

-              getitem 2275,1;

-            else if(@god_treasure1 < 210)

-              getitem 2276,1;

-            else if(@god_treasure1 < 280)

-              getitem 2277,1;

-            else if(@god_treasure1 < 350)

-              getitem 2279,1;

-            else if(@god_treasure1 < 420)

-              getitem 2254,1;

-            else if(@god_treasure1 < 490)

-              getitem 2299,1;

-            else if(@god_treasure1 < 560)

-              getitem 2287,1;

-            else if(@god_treasure1 < 630)

-              getitem 2289,1;

-            else if(@god_treasure1 < 700)

-              getitem 2290,1;

-            else if(@god_treasure1 < 770)

-              getitem 2291,1;

-            else if(@god_treasure1 < 840)

-              getitem 2294,1;

-            else if(@god_treasure1 < 900)

-              getitem 2295,1;

-            else if(@god_treasure1 < 950)

-              getitem 2271,1;

-            else

-              getitem 2285,1;

-            }

-              

-          else if(@god_treasure < 501)

-	    {

-            if(@god_treasure1 < 80)

-              getitem 2306,1;

-            else if(@god_treasure1 < 160)

-              getitem 2308,1;

-            else if(@god_treasure1 < 240)

-              getitem 2310,1;

-            else if(@god_treasure1 < 320)

-              getitem 2311,1;

-            else if(@god_treasure1 < 400)

-              getitem 2313,1;

-            else if(@god_treasure1 < 480)

-              getitem 2315,1;

-            else if(@god_treasure1 < 560)

-              getitem 2329,1;

-            else if(@god_treasure1 < 630)

-              getitem 2320,1;

-            else if(@god_treasure1 < 700)

-              getitem 2322,1;

-            else if(@god_treasure1 < 760)

-              getitem 2324,1;

-            else if(@god_treasure1 < 810)

-              getitem 2326,1;

-            else if(@god_treasure1 < 850)

-              getitem 2317,1;

-            else if(@god_treasure1 < 900)

-              getitem 2331,1;

-            else if(@god_treasure1 < 950)

-              getitem 2333,1;

-            else

-              getitem 2336,1;

-            }

-          

-          else if(@god_treasure < 601)

-	    {

-            if(@god_treasure1 < 200)

-              getitem 2402,1;

-            else if(@god_treasure1 < 400)

-              getitem 2404,1;

-            else if(@god_treasure1 < 600)

-              getitem 2406,1;

-            else if(@god_treasure1 < 800)

-              getitem 2407,1;

-            else

-              getitem 2409,1;

-            }

-            

-          else if(@god_treasure < 701)

-	    {

-            if(@god_treasure1 < 300)

-              getitem 2502,1;

-            else if(@god_treasure1 < 550)

-              getitem 2504,1;

-            else if(@god_treasure1 < 750)

-              getitem 2506,1;

-            else

-              getitem 2508,1;

-            }

-          

-          else if(@god_treasure < 801)

-	    {

-            if(@god_treasure1 < 110)

-              getitem 2601,1;

-            else if(@god_treasure1 < 220)

-              getitem 2602,1;

-            else if(@god_treasure1 < 330)

-              getitem 2603,1;

-            else if(@god_treasure1 < 440)

-              getitem 2604,1;

-            else if(@god_treasure1 < 550)

-              getitem 2605,1;

-            else if(@god_treasure1 < 660)

-              getitem 2607,1;

-            else if(@god_treasure1 < 770)

-              getitem 2608,1;

-            else if(@god_treasure1 < 880)

-              getitem 2617,1;

-            else

-              getitem 2618,1;

-            }

-              

-          else

-	    {

-            if(@god_treasure1 < 150)

-              getitem 2288,1;

-            else if(@god_treasure1 < 260)

-              getitem 2297,1;

-            else if(@god_treasure1 < 370)

-              getitem 5087,1;

-            else if(@god_treasure1 < 480)

-              getitem 5088,1;

-            else if(@god_treasure1 < 590)

-              getitem 5089,1;

-            else if(@god_treasure1 < 700)

-              getitem 5090,1;

-            else if(@god_treasure1 < 810)

-              getitem 5046,1;

-            else if(@god_treasure1 < 920)

-              getitem 2264,1;

-            else

-              getitem 2225,1;

-            }

-          //endif

-          next;

-          mes "[Cukure]";

-          mes "Ah....also,";

-          mes "let me retrieve the temporary pass given to you.";

-          mes "Well...";

-          close;

-	}

-        else

-	{

-        mes "[Cukure]";

-        mes "With your help, we succeeded to complete the basic reserach.";

-        mes "From now on, we will plan out further research";

-        mes "based on the result we made this time.";

-        mes "That means I can go on a date...hahaha...";

-        close;

-        }

-      }

-      else

-      {

-        if(god_sl_1 == 0)

-	{

-        mes "[Cukure]";

-        mes "Awww...";

-        mes "I get too busy nowadays.";

-        mes "I don't even have times for a date.";

-        mes "Damn it....";

-        next;

-        mes "[Cukure]";

-        mes "next;, when was the last time I went on a date...?";

-        mes "Umm....";

-        mes "Awww....I am so busy...busy!";

-        emotion 19;

-        close;

-	}

-        else if(god_sl_1 < 51)

-	{

-          mes "[Cukure]";

-          mes "Ah, you came back.";

-          mes "I know you were going to help us...";

-          mes "but someone already did the job and";

-          mes "we successfully finished the research.";

-          next;

-          mes "[Cukure]";

-          mes "Thank you anways though.";

-          mes "I hope you will come help us for the next research.";

-          close;

-	}

-        else

-	{

-          mes "[Cukure]";

-          mes "We have succeeded to complete the basic reserach.";

-          mes "From now on, we will plan out further research";

-          mes "based on the result we made this time.";

-          mes "That means I can go on a date...hahaha...";

-          close;

-        }

-      }

-

-}

-

-// Hallandaute Lagunis - Wheel of the Unknown

-que_god01.gat,66,125,6	script	Investigator#God1	89,{

-

-    if($God2 < 100)

-    {

-      if(god_sl_1 == 2)set god_sl_1,11;

-

-      if(god_sl_1 == 11 || god_sl_1 == 22 || god_sl_1 == 33 || god_sl_1 == 44)

-      {

-        if(god_sl_2  == 0)

-	{

-          mes "[Hallandaute]";

-          mes "Ah...are you the one who Ms. Kirin was talking about?";

-          mes "Yes, she said you are going to assist us for the research.";

-          mes "Hmmm...";

-          next;

-          mes "[Hallandaute]";

-          mes "Frankly, we donnot need people who are not specialised in this field";

-          mes "even if we are running out of manpower.";

-          mes "But you can support us through doing stuffs that we are too lazy to do";

-          mes "on our own....if you don't mind.";

-          next;

-          mes "[Hallandaute]";

-          mes "Oh well...";

-          mes "What would be a good job for you....";

-          mes "Let me think...";

-          mes "Ah...";

-          next;

-          mes "[Hallandaute]";

-          mes "I got it.";

-          mes "Can you go visit ^ff0000Metto^000000 for me?";

-          mes "Please bring me his news.";

-          next;

-          mes "[Hallandaute]";

-          mes "Since he is working on a similar subject as mine,";

-          mes "I guess that he might be able to help me.";

-          mes "He's in Juno, you can easily find him.";

-          set god_sl_2,1;

-          close;

-	}

-        else if(god_sl_2 == 1)

-	{

-          if (metto_q == 0)

-	  {

-            mes "[Hallandaute]";

-            mes "I guess you haven't seen him yet.";

-            mes "Although he is kind of fastidious, he is not a bad guy at all.";

-            mes "We have been friends for a long time";

-            mes "since we work in the similar field.";

-            next;

-            mes "[Hallandaute]";

-            mes "I am wondering how he has been doing.";

-            mes "You can just ask him about his research progress.";

-            mes "Thank you for your trouble.";

-            close;

-	  }

-          else if(metto_q < 9)

-	  {

-            mes "[Hallandaute]";

-            mes "Hmmm....";

-            mes "I see....";

-            mes "Thank you for your trouble...";

-            mes "Hmmm...it seems he changed...";

-            mes "hmmm..";

-            close;

-	  }

-          else

-	  {

-           mes "[Hallandaute]";

-           mes "?!";

-           mes "...........";

-           mes "Oh well.....";

-           mes "I have never expected that the situation would turn into this way.";

-           mes "Ummm....";

-           emotion 20; //ET_SCRATCH

-           next;

-           mes "[Hallandaute]";

-           mes "Oh well, it happened already. Okay, thank you for the help.";

-           mes "Please wait for a moment.";

-           mes "I have something to think about.";

-           mes "Ummmmm...";

-           emotion 9; //ET_THINK

-           set god_sl_2,2;

-           close;

-           }

-	}

-        else if(god_sl_2 == 2)

-	{

-          if(rand(1,10) == 7)

-	  {

-            mes "[Hallandaute]";

-            mes "Ah...";

-            mes "You came back.";

-            mes "...Let me give you the gist of research I am working on.";

-            next;

-            mes "[Hallandaute]";

-            mes "I am working on";

-            mes "'^ff0000a Wheel of the Unknown^000000' that was discovered to be a peace";

-            mes "of '^ff0000Sleipnir^000000'.";

-            mes "It looks like a normal cogwheel but";

-            mes "I cannot figure out how it works.";

-            next;

-            mes "[Hallandaute]";

-            mes "The most strange thing about this cogwheel is";

-            mes "its material.";

-            next;

-            mes "[Hallandaute]";

-            mes "It seems to be made out of steel but";

-            mes "no matter how long I heated it up,";

-            mes "it never responded to the heat.";

-            mes "It worked the same when I tried to freeze it.";

-            next;

-            mes "[Hallandaute]";

-            mes "Besides, it never responds to any kinds of impact either.";

-            mes "No matter how hard it was crashed or dropped,";

-            mes "it does not seem to be influenced.";

-            next;

-            mes "[Hallandaute]";

-            mes "But I found out that this thing seems to be resonant with";

-            mes "certain objects.";

-            mes "Then again, it does not seem to work the same all the time.";

-            next;

-            mes "[Hallandaute]";

-            mes "Let's say, it was resonant with an object 'A' but";

-            mes "when I try again, it does not work at all with A.";

-            mes "Surely, there should be some kind of conditions to satisfy";

-            mes "in order to make it resonant...";

-            mes "Hmm hmmm...";

-            next;

-            mes "[Hallandaute]";

-            mes "Ah....";

-            mes "I apologize for speaking things that are not important.";

-            mes "Please disregard words I said.";

-            mes "Thank you for your help anyways.";

-            mes "Other investigators might need your help as well.";

-            mes "Hmmm...";

-            set god_sl_2,0;

-            if(god_sl_1 == 11)

-              set god_sl_1,12;

-            if(god_sl_1 == 22)

-              set god_sl_1,23;

-            if(god_sl_1 == 33)

-              set god_sl_1,34;

-            if(god_sl_1 == 44)

-              set god_sl_1,50;

-            close;

-	  }

-          else

-	  {

-           mes "[Hallandaute]";

-           mes "Oh, please give me a moment.";

-           mes "I have something to organize.";

-           mes "Ummm....";

-           mes "Therefore...";

-           mes "Mumble mumble...";

-           close;

-          }

-	}

-        else

-	{

-          mes "[Hallandaute]";

-          mes "Hmmm...";

-          mes "Therefore....";

-          mes "It works this way...";

-          mes "Umm....that is...";

-          mes "Oh well, it would be better if it was in a good shape...";

-          mes "Sigh...";

-          close;

-        }

-      }

-      else

-      {

-        mes "[Hallandaute]";

-        mes "Ummm....";

-        mes "So it will be......";

-        mes "Bah! It is not easy to work on this by myself!";

-        mes "It is always good to have an assistant.";

-        next;

-        mes "[Hallandaute]";

-        mes "I can share the load of work with him.";

-        mes "However, types of work affects on the types of assistant I need.";

-        next;

-        mes "[Hallandaute]";

-        mes "For instance, if I am working on a project called 'A'";

-        mes "I will need an assistant named 'G' who is specialised in the project.";

-        mes "But if I am working on a project called 'B'";

-        mes "I will need 'H' who is specialised in the project.";

-        next;

-        mes "[Hallandaute]";

-        mes "Of course, there could be people who are good at everything.";

-        mes "But since they are hard to find, we must choose right people for each project.";

-        close;

-      }

-    }

-    else

-    {

-        mes "[Hallandaute]";

-        mes "Ummm....";

-        mes "So it will be......";

-        mes "Bah! It is not easy to work on this by myself!";

-        mes "It is always good to have an assistant.";

-        next;

-        mes "[Hallandaute]";

-        mes "I can share the load of work with him.";

-        mes "However, types of work affects on the types of assistant I need.";

-        next;

-        mes "[Hallandaute]";

-        mes "For instance, if I am working on a project called 'A'";

-        mes "I will need an assistant named 'G' who is specialised in the project.";

-        mes "But if I am working on a project called 'B'";

-        mes "I will need 'H' who is specialised in the project.";

-        next;

-        mes "[Hallandaute]";

-        mes "Of course, there could be people who are good at everything.";

-        mes "But since they are hard to find, we must choose right people for each project.";

-      close;

-    }

-}

-

-//Aadin Keil - Feather of Angel Wing

-que_god01.gat,11,136,6	script	Investigator#God2	742,{

-

-    if($God1 < 100)

-    {

-      if(god_sl_1 == 2)set god_sl_1,21;

-

-      if(god_sl_1 == 21 || god_sl_1 == 32 || god_sl_1 == 43 || god_sl_1 == 14)

-      {

-        if(god_sl_2 == 0)

-	{

-          mes "[Aadin]";

-          mes "*yawn*~";

-          mes "Umm?";

-          mes "Hmmmm....";

-          next;

-          mes "[Aadin]";

-          mes "Nice to meet you.";

-          mes "I know you are the temporary assistant joined this time.";

-          mes "That's great, I was having a hard time to do something on my own.";

-          next;

-          mes "[Aadin]";

-          mes "Okay...";

-          mes "Let me explain what I am doing at this moment.";

-          mes "I am studying 'Feather of Angel Wing' which is";

-          mes "revealed to be the material of 'Sleipnir'.";

-          next;

-          mes "[Aadin]";

-          mes "Especially I am focusing on the behind story";

-          mes "of this feather like how it became the material of 'Sleipnir'.";

-          mes "I was told that there is a person in 'Payon'";

-          mes "who knows about the story.";

-          mes "So I tried to send a staff to the village in order to";

-          mes "gather information from him....";

-          next;

-          mes "[Aadin]";

-          mes "But the situation does not allow me to use any of manpower in the laboratory...";

-          mes "so I have been debating myself if I should go there on my own or not.";

-          mes "Because I don't feel safe to leave this studying room with this feather alone.";

-          next;

-          mes "[Aadin]";

-          mes "Therefore...";

-          mes "as you might guessed already....";

-          mes "I would like to ask you to go talk to the person in Payon";

-          mes "about the story and come back to me.";

-          next;

-          mes "[Aadin]";

-          mes "I assume that it should not be that difficult to find the person.";

-          mes "But you must memorize every single word from him.";

-          mes "The result of research could be affected by words you delievered to me.";

-          next;

-          mes "[Aadin]";

-          mes "Thank you in advance.";

-          mes "There is no time limit for this, but faster will be better...";

-          mes "Have a good travel!";

-          set god_sl_2,1;

-          close;

-	}

-        else if(god_sl_2 == 1)

-	{

-          mes "[Aadin]";

-          mes "You have not gone to Payon yet.";

-          mes "Please leave to Payon as soon as possible.";

-          mes "Have a good travel!";

-          close;

-	}

-        else if(god_sl_2 == 2)

-	{

-         mes "[Aadin]";

-         mes "Ah, you came back.";

-         mes "So, have you memorized the story?";

-         mes "Yes, I know it would be really convenient";

-         mes "if they kept the story as a book.";

-         mes "But it seems that they have some kind of rules that do not allow them";

-         mes "to write down the story but to tell people by word of mouth.";

-         next;

-         mes "[Aadin]";

-         mes "Okay, I am ready to listen.";

-         mes "Please go ahead.";

-         mes ".......";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         mes "..";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         mes "..";

-         mes "...";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         mes "..";

-         mes "...";

-         mes "....";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         mes "..";

-         mes "...";

-         mes "....";

-         mes ".....";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         mes "..";

-         mes "...";

-         mes "....";

-         mes ".....";

-         mes "......";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         mes "..";

-         mes "...";

-         mes "....";

-         mes ".....";

-         mes "......";

-         mes ".......";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         mes "..";

-         mes "...";

-         mes "....";

-         mes ".....";

-         mes "......";

-         mes ".......";

-         mes "........";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         mes "..";

-         mes "...";

-         mes "....";

-         mes ".....";

-         mes "......";

-         mes ".......";

-         mes "........";

-         mes ".........";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         mes "..";

-         mes "...";

-         mes "....";

-         mes ".....";

-         mes "......";

-         mes ".......";

-         mes "........";

-         mes ".........";

-         mes "..........";

-         next;

-         mes "[Aadin]";

-         mes "Hmm......";

-         mes "I see.";

-         mes "Now I have a better understanding about it.";

-         mes "Oh next;...";

-         next;

-         mes "[Aadin]";

-         mes "It seems you missed some important part of the story!";

-         mes "I am so sorry to tell you this but do you mind going back to Payon";

-         mes "and listening the story again? I would like to listen to the story again.";

-         set god_sl_2,3;

-         close;

-	}

-        else if(god_sl_2 == 3)

-	{

-          mes "[Aadin]";

-          mes "You haven't left to Payon yet.";

-          mes "I hope you will leave as soon as possible.";

-          mes "Even with the story you have brought, I think I can";

-          mes "complete most part of the research.";

-          close;

-	}

-        else if(god_sl_2 == 4)

-	{

-         mes "[Aadin]";

-         mes "Oh, you came back.";

-         mes "Okay, I am ready to listen.";

-         mes "Please go ahead.";

-         mes ".......";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         mes "..";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         mes "..";

-         mes "...";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         mes "..";

-         mes "...";

-         mes "....";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         mes "..";

-         mes "...";

-         mes "....";

-         mes ".....";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         mes "..";

-         mes "...";

-         mes "....";

-         mes ".....";

-         mes "......";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         mes "..";

-         mes "...";

-         mes "....";

-         mes ".....";

-         mes "......";

-         mes ".......";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         mes "..";

-         mes "...";

-         mes "....";

-         mes ".....";

-         mes "......";

-         mes ".......";

-         mes "........";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         mes "..";

-         mes "...";

-         mes "....";

-         mes ".....";

-         mes "......";

-         mes ".......";

-         mes "........";

-         mes ".........";

-         next;

-         mes "[Aadin]";

-         mes ".";

-         mes "..";

-         mes "...";

-         mes "....";

-         mes ".....";

-         mes "......";

-         mes ".......";

-         mes "........";

-         mes ".........";

-         mes "..........";

-         next;

-         mes "[Aadin]";

-         mes "Hmm...I see.";

-         mes "It seems your story is almost accurate as the original one.";

-         mes "It is understandable that the story is differentiated by the person";

-         mes "who is telling it since we share the story by word of mouth.";

-         next;

-         mes "[Aadin]";

-         mes "Yes, most of my questions finally found their answers.";

-         mes "At the same time, the story gave me new questions.";

-         mes "Hmmm...this is not easy at all.";

-         mes "Thank you for your help though.";

-          set god_sl_2,0;

-          if(god_sl_1 == 21)

-            set god_sl_1,22;

-          else if(god_sl_1 == 32)

-            set god_sl_1,33;

-          else if(god_sl_1 == 43)

-            set god_sl_1,44;

-          else if(god_sl_1 == 14)

-            set god_sl_1,50;

-          close;

-        }

-      }

-      else

-      {

-        mes "[Aadin]";

-        mes "Hmmm....";

-        mes "Sometimes a legend or a myth";

-        mes "tells two different stories within that are totally conflicting each other.";

-        mes "You can find the reason by finding the origin of the stories.";

-        close;

-      }

-    }

-    else

-    {

-        mes "[Aadin]";

-        mes "Hmmm....";

-        mes "Sometimes a legend or a myth";

-        mes "tells two different stories within that are totally conflicting each other.";

-        mes "You can find the reason by finding the origin of the stories.";

-        close;

-    }

-

-}

-

-//Kurdt Jerremant - Spirit of Fish

-que_god01.gat,55,47,3	script	Investigator#God3	803,{

-

-    if ($God1 < 100)

-    {

-      if(god_sl_1 == 2)set god_sl_1,31;

-

-      if(god_sl_1 == 31 || god_sl_1 == 42 || god_sl_1 == 13 || god_sl_1 == 24)

-      {

-        if(god_sl_2 == 0)

-	{

-          mes "[Kurdt]";

-          mes "Ah, you must be the new assistant.";

-          mes "I am pleased to meet you.";

-          next;

-          mes "[Kurdt]";

-          mes "I was kind of expecting a professional assistant";

-          mes "but it is understandable since the situation does not allow us.";

-          mes "Also, sometimes ordinary people";

-          mes "make a better result than professional assistants.";

-          mes "So I hope we will make a good team together.";

-          next;

-          mes "[Kurdt]";

-          mes "In fact, I am almost at the end of the research,";

-          mes "therefore I do not need that much of help...";

-          mes "However, the last thing I need to do is pretty difficult";

-          mes "for one to do alone...I was thinking to hire an agency from outside.";

-          next;

-          mes "[Kurdt]";

-          mes "But! I don't need to do that now, since you are here.";

-          mes "What I need now are materials to reproduce";

-          mes "'Spirit of Fish'.";

-          next;

-          mes "[Kurdt]";

-          mes "I am not sure yet if I can actually reproduce it or not.";

-          mes "But we can at least try it.";

-          next;

-          mes "[Kurdt]";

-          mes "Basically, you can go ahead and gather stuffs like";

-          mes "'Fish Scales' or 'Fish Tails'";

-          mes "or anything that you can obtain from marine life.";

-          mes "I donnot need too many but about 10 of them.";

-          next;

-          mes "[Kurdt]";

-          mes "I hope you will not have a hard time to gather them.";

-          mes "Thank you for your trouble and have a good travel!";

-          set god_sl_2,1;

-          close;

-	}

-        else if(god_sl_2 == 1)

-	{

-          mes "[Kurdt]";

-          mes "Ah, you came back.";

-          mes "Okay, let me check what you have brought to me.";

-          mes "Hmmm....";

-          mes ".........";

-          next;

-          mes "[Kurdt]";

-          mes "Hmmm......";

-          mes "I could use these...";

-          mes "and these too.....";

-          mes "aaand those too......";

-          mes "Umm.....";

-	  set @itemcount,0;

-          if(countitem(918) > 8)set @itemcount,1;

-          if(countitem(950) > 8)set @itemcount,@itemcount + 1;

-          if(countitem(951) > 8)set @itemcount,@itemcount + 1;

-          if(countitem(956) > 8)set @itemcount,@itemcount + 1;

-          if(countitem(959) > 8)set @itemcount,@itemcount + 1;

-          if(countitem(960) > 8)set @itemcount,@itemcount + 1;

-          if(countitem(961) > 8)set @itemcount,@itemcount + 1;

-          if(countitem(962) > 8)set @itemcount,@itemcount + 1;

-          if(countitem(963) > 8)set @itemcount,@itemcount + 1;

-          if(countitem(964) > 8)set @itemcount,@itemcount + 1;

-          if(countitem(965) > 8)set @itemcount,@itemcount + 1;

-          if(countitem(966) > 8)set @itemcount,@itemcount + 1;

-          if(countitem(7013) > 8)set @itemcount,@itemcount + 1;

-          if(countitem(1054) > 8)set @itemcount,@itemcount + 1;

-          if(countitem(1053) > 8)set @itemcount,@itemcount + 1;

-          if(countitem(1052) > 8)set @itemcount,@itemcount + 1;

-          if(countitem(1051) > 8)set @itemcount,@itemcount + 1;

-          if(countitem(1050) > 8)set @itemcount,@itemcount + 1;

-          if(countitem(1024) > 8)set @itemcount,@itemcount + 1;

-          if(countitem(1023) > 8)set @itemcount,@itemcount + 1;

-          next;

-          if(@itemcount > 14)

-	  {

-            mes "[Kurdt]";

-            mes "Ah....!";

-            mes "You gathered everything I need.";

-            mes "Thank you so much.";

-            mes "With these, I can continue my research with no problem.";

-            next;

-            mes "[Kurdt]";

-            mes "I didn't expect you to do such a good job...";

-            mes "you are great!";

-            mes "Thank you so much!";

-            mes "Hahaha....";

-            mes "Just like me, other investigator might need you to help them.";

-

-          if(countitem(918) > 8)delitem 918,9;

-          if(countitem(950) > 8)delitem 950,9;

-          if(countitem(951) > 8)delitem 951,9;

-          if(countitem(956) > 8)delitem 956,9;

-          if(countitem(959) > 8)delitem 959,9;

-          if(countitem(960) > 8)delitem 960,9;

-          if(countitem(961) > 8)delitem 961,9;

-          if(countitem(962) > 8)delitem 962,9;

-          if(countitem(963) > 8)delitem 963,9;

-          if(countitem(964) > 8)delitem 964,9;

-          if(countitem(965) > 8)delitem 965,9;

-          if(countitem(966) > 8)delitem 966,9;

-          if(countitem(7013) > 8)delitem 7013,9;

-          if(countitem(1054) > 8)delitem 1054,9;

-          if(countitem(1053) > 8)delitem 1053,9;

-          if(countitem(1052) > 8)delitem 1052,9;

-          if(countitem(1051) > 8)delitem 1051,9;

-          if(countitem(1050) > 8)delitem 1050,9;

-          if(countitem(1024) > 8)delitem 1024,9;

-          if(countitem(1023) > 8)delitem 1023,9;

-

-              set god_sl_2,0;

-            if(god_sl_1 == 31)

-              set god_sl_1,32;

-            if(god_sl_1 == 42)

-              set god_sl_1,43;

-            if(god_sl_1 == 13)

-              set god_sl_1,14;

-            if(god_sl_1 == 24)

-              set god_sl_1,50;

-            close;

-	  }

-          else

-	  {

-            mes "[Kurdt]";

-            mes "Errr.........";

-            mes "It does not seem to be enough for the research.";

-            mes "Sorry for the trouble, please go gather some more.";

-            close;

-          }

-        }

-      }

-      else

-      {

-        mes "[Kurdt]";

-        mes "Hmmm....";

-        mes "Studying somthing does not only require";

-        mes "funds and manpower but enthusiasm and passion as well.";

-        next;

-        mes "[Kurdt]";

-        mes "Some financiers are so ignorant that they think";

-        mes "study only takes money and manpower.";

-        mes "However, even if they have enough funds and much of manpower";

-        mes "but they donnot give any motivation to the people who study";

-        mes "then the study cannot be succeeded.";

-        close;

-      }

-    }

-    else

-    {

-       mes "[Kurdt]";

-       mes "Hmmm....";

-       mes "Studying somthing does not only require";

-       mes "funds and manpower but enthusiasm and passion as well.";

-       next;

-       mes "[Kurdt]";

-       mes "Some financiers are so ignorant that they think";

-       mes "study only takes money and manpower.";

-       mes "However, even if they have enough funds and much of manpower";

-       mes "but they donnot give any motivation to the people who study";

-       mes "then the study cannot be succeeded.";

-       close;

-    }

-

-}

-

-//Pavel Stheinus Breath of Spirit

-que_god01.gat,14,47,3	script	Investigator#God4	713,{

-

-    if($God1 < 100)

-    {

-      if(god_sl_1 == 2)set god_sl_1,41;

-

-      if(god_sl_1 == 41 || god_sl_1 == 12 || god_sl_1 == 23 || god_sl_1 == 34)

-      {

-        if(god_sl_2 == 0)

-	{

-          mes "[Pavel]";

-          mes "*sniff sniff*...";

-          mes "Achoo!";

-          mes "Huh?";

-          mes "Who are you....?";

-          mes "....";

-          next;

-          mes "[Pavel]";

-          mes "Ah, my apology.";

-          mes "You must be the new assistant...Aaachoo!";

-          mes "Hmm hmm *sniff sniff*...I am sorry, I am having a flu...";

-          mes "*sniff sniff*...";

-          mes "*sniff*...hmmm...";

-          next;

-          mes "[Pavel]";

-          mes "Umm....";

-          mes "It is good to know that you are here to help me....";

-          mes "However...Aaaachooo!";

-          mes "*sniff sniff*...";

-          next;

-          mes "[Pavel]";

-          mes "Hmm...Aaachooo!";

-          mes "Anyways, go look at...Aaachoo! that...Aaachoo!";

-          mes "thing...*sniff sniff*~";

-          set god_sl_2,1;

-          close;

-	}

-        else if(god_sl_2 == 1)

-	{

-          mes "[Pavel]";

-          mes "I told you to go look at Aaachhoooo! that...Aaachoooo! Achoo!";

-          mes "*glhk glhk*...";

-          mes "Hmm hmm..";

-          close;

-	}

-        else if(god_sl_2 == 2)

-	{

-          mes "[Pavel]";

-          mes "*cough cough*...";

-          mes "*sniff sniff*...";

-          mes "So did you go look at that?";

-          mes "Yeah, I don't think you understand even if you saw it.";

-          mes "*glhk glhk*...";

-          next;

-          mes "[Pavel]";

-          mes "AAAAACHHHOOO!";

-          mes "That slab of stone...no wait...Achoo!";

-          mes "The letters engaraved on the indescribable thing";

-          mes "are ancient....Achoo! ...language that are....Achoo!";

-          mes "no longer used nowadays.";

-          next;

-          mes "[Pavel]";

-          mes "I cannot ...*glhk glhk* tell what ancient";

-          mes "language..Achoo! it is...Achoo!";

-          mes "So...err...hmm hmm *sniff sniff*";

-          next;

-          mes "[Pavel]";

-          mes "Considering...Achoo! *sniff sniff* the material";

-          mes "Achoo! Achoo! used for the slab...*sniff sniff*,";

-          mes "it is not an Achoo! Achoo! *sniff sniff*ordinary slab of stone...";

-          mes "I guess...Aaaachoo!!!!! there must be some kind of";

-          mes "device installed on *sniff sniff*...";

-          next;

-          mes "[Pavel]";

-          mes "Aachoooo!! *sniff sniff* Not only that...*sniff sniff*";

-          mes "letters are not just engraved...*sniff sniff* Achhoo!!";

-          mes "but something Achooo!! covers...Achooo!";

-          mes "AAACHHHOOOO~~ the surfaces...*sniff sniff*";

-          next;

-          mes "[Pavel]";

-          mes "I must *cough cough* remove the device for...*cough cough*";

-          mes "further research...*cough cough*...but look at me.";

-          mes "I cannot even talk...*ghlk ghlk* clearly...";

-          next;

-          mes "[Pavel]";

-          mes "Hmm *sniff sniff*...so I hope you don't";

-          mes "mind Achoo!...helping me to remove Achoo!!...the device...";

-          mes "Achoo! ~ Thank you....";

-          mes "AAAACHHHOOOO~";

-          set god_sl_2,3;

-          close;

-	}

-        else if(god_sl_2 == 3)

-	{

-          mes "[Pavel]";

-          mes "Aaaaa...Cccccchhhh...oooo..!";

-          mes "*sniff sniff*...";

-          mes "Err...what I meant was..AAACHHOOO!...";

-          mes "*sniff sniff*...";

-          close;

-	}

-        else if(god_sl_2 == 4)

-	{

-          mes "[Pavel]";

-          mes "*cough*...";

-          mes "......!!";

-          mes "Oh...Acchhhoo!~";

-          mes "Now I see...";

-          mes "*sniff sniff*...";

-          next;

-          mes "[Pavel]";

-          mes "I was~Achoo! right, Achoo!";

-          mes "there was a device installed...Achoo! on it.";

-          mes "I could...*cough cough* not...*sniff sniff*";

-          mes "investigate...Achoo! the slab thoroughly...Achoo!";

-          mes "because of this god damn flu making me sneeze.";

-          next;

-          mes "[Pavel]";

-          mes "Achoo! Achoo! ~ thank you for your help....*sniff sniff*";

-          mes "Haha....*ghlk ghlk*...you did a good job.";

-          mes "*cough cough*..";

-          set god_sl_2,0;

-          if(god_sl_1 == 41)

-	    set god_sl_1,42;

-          if(god_sl_1 == 12)

-            set god_sl_1,13;

-          if(god_sl_1 == 23)

-            set god_sl_1,24;

-          if(god_sl_1 == 34)

-            set god_sl_1,50;

-          close;

-        }

-      }

-      else

-      {

-        mes "[Pavel]";

-        mes "Umm....";

-        mes "It is not that important whether or not";

-        mes "we can embody a spirit into a shape.";

-        mes "It is important whether we";

-        mes "can prove the existance of spirit or not.";

-        close;

-      }

-    }

-    else

-    {

-        mes "[Pavel]";

-        mes "Umm....";

-        mes "It is not that important whether or not";

-        mes "we can embody a spirit into a shape.";

-        mes "It is important whether we";

-        mes "can prove the existance of spirit or not.";

-      close;

-    }

-

-}

-  

-que_god01.gat,20,48,0	script	Slab#God	111,{

-

-  if($God1 < 100)

-  {

-    if(god_sl_1 == 41 || god_sl_1 == 12 || god_sl_1 == 23 || god_sl_1 == 34)

-    {

-      if(god_sl_2 == 1 || god_sl_2 == 2)

-      {

-        mes "....whgks ^ff00ffdirdnl^000000sjs wkrdjswhgks whdtnfb";

-        mes "............djswhgks wkdusdnlrnlfn";

-        mes ".......whsjs rhf tk dmqsjs rj ehddjfn";

-        mes "wkdusgks ^ff00fftkaryf^000000dnl durjfflrhsjs wkrdjswhgks ......";

-        mes "wkrdjswhgks shfh wkrdjswhgks wkdus wkr...";

-        mes "^ff00ffghswka^000000gks ........fusjs tmld.........";

-        set god_sl_2,2;

-        next;

-        mes "Unknown letters are engraved on the slab of stone.";

-        mes "They look like an ancient language.";

-        mes "The slab of stone has been severely damaged";

-        mes "to recognize every letter.";

-        mes "As you touched the surface, it was warm.";

-        mes "Definately, the slab didn't seem to be made of an ordinary stone.";

-        close;

-      }

-      else if(god_sl_2 == 3)

-      {

-        mes "....whgks ^ff00ffdirdnl^000000sjs wkrdjswhgks whdtnfn";

-        mes "............djswhgks wkdusdnlrnlfn";

-        mes ".......whsjs rhf tk dmqsjs rj ehddjfn";

-        mes "wkdusgks ^ff00fftkaryf^000000dnl durjfflrhsjs wkrdjswhgks ......";

-        mes "wkrdjswhgks shfh wkrdjswhgks wkdus wkr...";

-        mes "^ff00ffghswka^000000gks.........fusjs tmld.........";

-        next;

-        mes "As you took a close look, you found strange traces on each letter.";

-        mes "It seemed there was a kind of device installed on letters.";

-        next;

-        mes "....whgks ^ff00ffdirdnl^000000sjs wkrdjswhgks whdtnfb";

-        mes "............djswhgks wkdusdnlrnlfn";

-        mes ".......whsjs rhf tk dmqsjs rj ehddjfn";

-        mes "wkdusgks ^ff00fftkaryf^000000dnl durjfflrhsjs wkrdjswhgks ......";

-        mes "wkrdjswhgks shfh wkrdjswhgks wkdus wkr...";

-        mes "^ff00ffghswka^000000gks ........fusjs tmld.........";

-        next;

-        input @str$;

-        if (@str$ == "dirdnl")

-	{

-          mes "Zap~";

-          mes "As you pressed a word '^ff0000dirdnl^000000',";

-          mes "the slab made a strange noise.";

-          mes "However, there were no other changes other than the noise.";

-          mes "You decided to touch other words.";

-          next;

-          mes "....whgks ^ff00ffdirdnl^000000sjs wkrdjswhgks whdtnfb";

-          mes "............djswhgks wkdusdnlrnlfn";

-          mes ".......whsjs rhf tk dmqsjs rj ehddjfn";

-          mes "wkdusgks ^ff00fftkaryf^000000dnl durjfflrhsjs wkrdjswhgks ......";

-          mes "wkrdjswhgks shfh wkrdjswhgks wkdus wkr...";

-          mes "^ff00ffghswka^000000gks ........fusjs tmld.........";

-          next;

-	}

-        else

-	{

-          mes "You touched a word ^ff0000"+@str$+"^000000, nothing happened.";

-          mes "You decided to think up something different.";

-          close;

-        }

-        input @str$;

-        if (@str$ == "tkaryf")

-	{

-          mes "Zap~";

-          mes "As you pressed a word '^ff0000tkaryf^000000',";

-          mes "the slab made a strange noise.";

-          mes "However, there were no other changes other than the noise.";

-          mes "You decided to touch other words.";

-          next;

-          mes "....whgks ^ff00ffdirdnl^000000sjs wkrdjswhgks whdtnfb";

-          mes "............djswhgks wkdusdnlrnlfn";

-          mes ".......whsjs rhf tk dmqsjs rj ehddjfn";

-          mes "wkdusgks ^ff00fftkaryf^000000dnl durjfflrhsjs wkrdjswhgks ......";

-          mes "wkrdjswhgks shfh wkrdjswhgks wkdus wkr...";

-          mes "^ff00ffghswka^000000gks ........fusjs tmld.........";

-          next;

-	}

-        else

-	{

-          mes "You touched a word ^ff0000"+@str$+"^000000, nothing happened.";

-          mes "You decided to think up something different.";

-          close;

-        }

-        input @str$;

-        if (@str$ == "ghswka")

-	{

-          mes "Zap~";

-          mes "As you pressed a word '^ff0000ghswka^000000',";

-          mes "the slab made a strange noise.";

-          mes "However, there were no other changes other than the noise.";

-          mes "You decided to touch other words.";

-          next;

-          mes "....whgks ^ff00ffdirdnl^000000sjs wkrdjswhgks whdtnfb";

-          mes "............djswhgks wkdusdnlrnlfn";

-          mes ".......whsjs rhf tk dmqsjs rj ehddjfn";

-          mes "wkdusgks ^ff00fftkaryf^000000dnl durjfflrhsjs wkrdjswhgks ......";

-          mes "wkrdjswhgks shfh wkrdjswhgks wkdus wkr...";

-          mes "^ff00ffghswka^000000gks ........fusjs tmld.........";

-          next;

-	}

-        else

-	{

-          mes "You touched a word ^ff0000"+@str$+"^000000, nothing happened.";

-          mes "You decided to think up something different.";

-          close;

-        }

-        mes "Eeeeeeeeee~";

-        mes "As you pressed the three words in order,";

-        mes "the slab started vibrating with a strange noise.";

-        mes "At the same time, the strange traces on letters slowly dissappeared";

-        mes "and different letters appeared from underneath them.";

-        next;

-        mes "wkrdjswhgks dirdnlsjs wkrdjswhgks whdtnfh";

-        mes "wkrdjswhgks dldgnsdjs wkrdjswhgks wkdusdnlrnlfn";

-        mes "thfdh duTsjswhsjs rhf tk dmqsjs rj ehddjfn";

-        mes "wkdusgks tkaryfdnl durjfflrhsjs wkrdjswhgks tkatnfu";

-        mes "wkrdjswhgks shfh wkrdjswhgks wkdus wkrdjswhgks dldgns";

-        mes "ghswkagks tkatnfusjs tmldaldgks akrnl";

-        next;

-        mes "..........";

-        mes "You still could not understand what those letters meant.";

-        mes ".........";

-        set god_sl_2,4;

-        next;

-        mes "After a while, those new letters dissappeared.";

-        mes "It seemed that you could only cancel";

-        mes "the device on the letters for a duration.";

-        close;

-      }

-      else

-      {

-        mes "....whgks dirdnlsjs wkrdjswhgks whdtnfn";

-        mes "............djswhgks wkdusdnlrnlfn";

-        mes ".......whsjs rhf tk dmqsjs rj ehddjfn";

-        mes "wkdusgks tkaryfdnl durjfflrhsjs wkrdjswhgks ......";

-        mes "wkrdjswhgks shfh wkrdjswhgks wkdus wkr...";

-        mes "ghswkagks .........fusjs tmld.........";

-        next;

-        mes "The slab of stone has been severely damaged";

-        mes "to recognize every letter.";

-        mes "As you touched the surface, it was warm.";

-        mes "Definately, the slab didn't seem to be made of an ordinary stone.";

-        mes "You decided to not care about the stone any longer.";

-        close;

-      }

-    }

-    else

-    {

-        mes "....whgks dirdnlsjs wkrdjswhgks whdtnfn";

-        mes "............djswhgks wkdusdnlrnlfn";

-        mes ".......whsjs rhf tk dmqsjs rj ehddjfn";

-        mes "wkdusgks tkaryfdnl durjfflrhsjs wkrdjswhgks ......";

-        mes "wkrdjswhgks shfh wkrdjswhgks wkdus wkr...";

-        mes "ghswkagks .........fusjs tmld.........";

-        next;

-        mes "The slab of stone has been severely damaged";

-        mes "to recognize every letter.";

-        mes "As you touched the surface, it was warm.";

-        mes "Definately, the slab didn't seem to be made of an ordinary stone.";

-      close;

-    }

-  }

-  else

-  {

-      mes "You found a slab of stone with strange letters engraved on the surface.";

-      mes "You could not identify what language it was.";

-      close;

-  }

-

-}

-

-//Lania Grunkurque

-payon.gat,79,171,4	script	Friar#God5	95,{

-

-    if($God1 < 100)

-    {

-    if(god_sl_1 == 21 || god_sl_1 == 32 || god_sl_1 == 43 || god_sl_1 == 14)

-    {

-      if(god_sl_2 == 1 || god_sl_2 == 3)

-      {

-        mes "[Lania]";

-        mes "You can find good advice for yourself from folklores and legends.";

-        mes "No matter how many years have passed and how improved people have,";

-        mes "the basic of life will never change.";

-        next;

-        switch( select( "Umm.....", "I see." ) )

-	{

-

-          case 1:

-          mes "[Lania]";

-          mes "Well......";

-          mes "You seem to have a business with me, may I ask?";

-          mes "I will help you as much as I can.";

-          next;

-          mes "[Lania]";

-          mes "It is no use to have a power to help others";

-          mes "unless you use the power in a right purpose.";

-          next;

-

-              switch( select( "Nothing. Your words helped me already.","Regarding Sleipnir." ) )

-	      {

-

-              case 1:

-                mes "[Lania]";

-                mes "I must misunderstood.";

-                mes "However, feel free to ask me a help whenever you need it.";

-                mes "It is also a training for me to help others.";

-                mes "I hope you will be generous to others as well...";

-                close;

-              break;

-

-              case 2:

-                mes "[Lania]";

-                mes "Umm.........";

-                mes "I see.";

-                mes "I think I can help you for that.";

-                mes "Please give me some time to remember it....Sleipnir...";

-                mes "Hmmm....";

-                mes "..........";

-                mes "...................";

-                next;

-                mes "[Lania]";

-                mes "Ah.........";

-                mes "I remember it now...";

-                mes "Yes, Sleipnir was the name of Odin's stallion.";

-                next;

-                mes "[Lania]";

-                mes "In the world of Gods, there were three legendary stallions.";

-                mes "They were ^ff0000'Sleipnir (A thing that ride as sliding)'";

-                mes "'Svadilfari (An unfortunate traveller)'";

-                mes "'Gullfaxi (Golden Mane)'^000000.";

-                next;

-                mes "[Lania]";

-                mes "Gullfaxi was owned by Hrungnir, the giant king and";

-                mes "Svadilfari was owned by Hrimthurs.";

-                mes "Also, 'Svadilfari' was the father of 'Sleipnir'.";

-                next;

-                mes "[Lania]";

-                mes "Okay, now let's talk about how 'Sleipnir' was born.";

-                mes "Well...we can see even Gods made mistakes";

-                mes "through this story.";

-                next;

-                mes "[Lania]";

-                mes "In Asgard the world of Gods,";

-                mes "there was a huge rampart.";

-                mes "Something happened and the rampart was destroyed.";

-                mes "Since this castle wall was too huge, Gods could";

-                mes "not dare to start mending it.";

-                next;

-                mes "[Lania]";

-                mes "One day, a very skinny man rode a dark horse into Asgard.";

-                mes "The man told Heimdall who was patrolling the wall";

-                mes "that he had something to tell Odin regarding the rampart.";

-                next;

-                mes "[Lania]";

-                mes "Since he was greatly concerned about the wall";

-                mes "Heimdall didn't hesitate to report it to Odin.";

-                mes "At the time, Odin was with other Gods in Valhala.";

-                next;

-                mes "[Lania]";

-                mes "Man promised to Odin that he could";

-                mes "build the rampart just like a new one";

-                mes "in 18 months.";

-                next;

-                mes "[Lania]";

-                mes "Although Odin felt something suspicious about the man,";

-                mes "Gods needed to repair the wall as soon as possible.";

-                mes "So, Odin asked him what he needed in return.";

-                mes "He asked to give him the goddess 'Freya' and";

-                mes "'the Sun and the Moon' as the payment.";

-                next;

-                mes "[Lania]";

-                mes ".....";

-                mes "Are you bored?";

-                mes "If you are, let's talk about this later.";

-                next;

-                switch( select( "See you later.", "No, please go ahead." ) )

-		{

-

-                  case 1:

-                    mes "[Lania]";

-                    mes "I understand that my story was not that interesting.";

-                    mes "I will try my best to satisfy you next time.";

-                    mes "Have a good travel.";

-                    close;

-                  break;

-

-                  case 2:

-                    mes "[Lania]";

-                    mes "Oh ok.";

-                    mes "Then let me continue the story.";

-                    next;

-                  break;

-

-                }

-

-                mes "[Lania]";

-                mes "Gods were all stunned and became furious";

-                mes "due to the man's request.";

-                mes "He was asking everything that Gods have.";

-                next;

-                mes "[Lania]";

-                mes "At this time, a God approached to Odin.";

-                mes "It was the infamous Loki.";

-                mes "Loki said to Odin that";

-                mes "they could manipulate the man to repair";

-                mes "the rampart without paying him anything in return.";

-                next;

-                mes "[Lania]";

-                mes "Odin decided to follow Loki's suggestion.";

-                mes "So Odin told the man that he must";

-                mes "complete to repair the wall within 6 months";

-                mes "not 18 months in order to have 'Freya' and 'the Sun and the Moon'.";

-                next;

-                mes "[Lania]";

-                mes ".....";

-                mes "Are you bored?";

-                mes "If you are, let's talk about this later.";

-                next;

-                switch( select( "Let me organize the story first.", "See you later.", "No, please go ahead." ) )

-		{

-

-                  case 1:

-                    mes "[Lania]";

-                    mes "Ah....";

-                    mes "The story must be too long.";

-                    mes "My apology...";

-                    mes "Okay, I will next; for you to finish organizing the story...";

-                    next;

-                    mes "......................";

-                    mes "..................";

-                    mes "...............";

-                    mes "............";

-                    mes ".........";

-                    mes "......";

-                    next;

-                    mes "..................";

-                    mes "...............";

-                    mes "............";

-                    mes ".........";

-                    mes "......";

-                    next;

-                    mes "...............";

-                    mes "............";

-                    mes ".........";

-                    mes "......";

-                    next;

-                    mes "............";

-                    mes ".........";

-                    mes "......";

-                    next;

-                    mes ".........";

-                    mes "......";

-                    next;

-                    mes "......";

-                    next;

-                    mes "[Lania]";

-                    mes "May I continue the story now?";

-                    next;

-                    menu "Yes, please.",-;

-                    mes "[Lania]";

-                    mes "Okay, here it goes.";

-                    next;

-                  break;

-

-                  case 2:

-                    mes "[Lania]";

-                    mes "I understand that my story was not that interesting.";

-                    mes "I will try my best to satisfy you next time.";

-                    mes "Have a good travel.";

-                    close;

-                  break;

-

-                  case 3:

-                    mes "[Lania]";

-                    mes "Oh ok.";

-                    mes "Then let me continue the story.";

-                    next;

-                  break;

-

-               }

-

-                mes "[Lania]";

-                mes "Then the man asked Odin to let him";

-                mes "use his horse for the reconstruction work.";

-                mes "Because the horse looked very base and contemptible,";

-                mes "Odin didn't think twice about his request but accepted it on right the second.";

-                next;

-                mes "[Lania]";

-                mes "However, the man and the horse started repairing";

-                mes "the rampart in an amazing speed.";

-                mes "His skill was great but the horse's skill was greater than its owner";

-                mes "to mend the wall.";

-                mes "It was the legendary horse, Svadilfari.";

-                next;

-                mes "[Lania]";

-                mes "As more time went by, more anxious Gods were.";

-                mes "Because both of the castle wall menders";

-                mes "looked like they would complete the reconstruction work";

-                mes "even before the 6 months passed.";

-                mes "So Gods took their anger and axiouty on Loki";

-                mes "for his silly suggestion.";

-                next;

-                mes "[Lania]";

-                mes "However, Loki seemed confident.";

-                mes "He assured Gods to count on him.";

-                mes "Although Gods didn't trust Loki for his slyness and wickedness,";

-                mes "they decided to give him a chance since";

-                mes "the situation was desperate.";

-                next;

-                mes "[Lania]";

-                mes "And a strange thing happened. Ever since Loki";

-                mes "assurred Gods for the result, the progress of the reconstruction";

-                mes "had stopped. Just like a magic.";

-                next;

-                mes "[Lania]";

-                mes ".....";

-                mes "Are you bored?";

-                mes "If you are, let's talk about this later.";

-                next;

-                switch( select( "See you later.", "No, please go ahead." ) )

-		{

-

-                  case 1:

-                    mes "[Lania]";

-                    mes "I understand that my story was not that interesting.";

-                    mes "I will try my best to satisfy you next time.";

-                    mes "Have a good travel.";

-                    close;

-                  break;

-

-                  case 2:

-                    mes "[Lania]";

-                    mes "Oh ok.";

-                    mes "Then let me continue the story.";

-                    next;

-                  break;

-

-                }

-

-                mes "[Lania]";

-                mes "Gods became curious so they decided to investigate the reason.";

-                mes "The found Svadilfari fell in love with a beautiful mare";

-                mes "and didn't work on repairing the rampart.";

-                mes "So when the 6 months passed, the man";

-                mes "finished everything but the castle gate to repair.";

-                next;

-                mes "[Lania]";

-                mes "Gods were so happy to tell the man";

-                mes "that they could not accept his payment request";

-                mes "since he could not keep the contract.";

-                mes "Man got into rage and claimed";

-                mes "that Gods tricked him in order to avoid giving him";

-                mes "'Freya' and 'the Sun and the Moon'.";

-                next;

-                mes "[Lania]";

-                mes "And he revealed his true identity.";

-                mes "He was a giant from Jotunnheim.";

-                mes "He was so angry and started committing an outrage.";

-                next;

-                mes "[Lania]";

-                mes ".....";

-                mes "Are you bored?";

-                mes "If you are, let's talk about this later.";

-                next;

-                switch( select( "See you later.", "No, please go ahead." ) )

-		{

-

-                  case 1:

-                    mes "[Lania]";

-                    mes "I understand that my story was not that interesting.";

-                    mes "I will try my best to satisfy you next time.";

-                    mes "Have a good travel.";

-                    close;

-                  break;

-

-                  case 2:

-                    mes "[Lania]";

-                    mes "Oh ok.";

-                    mes "Then let me continue the story.";

-                    next;

-                  break;

-

-                }

-

-                mes "[Lania]";

-                mes "Later on, this giant turned out to be Hrimthurs.";

-                mes "However, even if Hrimthurs was commiting an outrage";

-                mes "Gods did not worry about him at all.";

-                mes "Because they had Thor, the giant hunter.";

-                next;

-                mes "[Lania]";

-                mes "As Thor hurled his legendary hammer 'Mjolnir'";

-                mes "at Hrimthurs, the giant's head was bursted into fragments";

-                mes "and he fell to the hell.";

-                next;

-                mes "[Lania]";

-                mes ".....";

-                mes "Are you bored?";

-                mes "If you are, let's talk about this later.";

-                next;

-                switch( select( "Let me organize the story first.", "See you later.", "No, please go ahead." ) )

-		{

-

-                  case 1:

-                    mes "[Lania]";

-                    mes "Ah....";

-                    mes "The story must be too complicated for you to understand.";

-                    mes "My apology...";

-                    mes "Okay, I will wait for you to finish organizing the story...";

-                    next;

-                    mes "......................";

-                    mes "..................";

-                    mes "...............";

-                    mes "............";

-                    mes ".........";

-                    mes "......";

-                    next;

-                    mes "..................";

-                    mes "...............";

-                    mes "............";

-                    mes ".........";

-                    mes "......";

-                    next;

-                    mes "...............";

-                    mes "............";

-                    mes ".........";

-                    mes "......";

-                    next;

-                    mes "............";

-                    mes ".........";

-                    mes "......";

-                    next;

-                    mes ".........";

-                    mes "......";

-                    next;

-                    mes "......";

-                    next;

-                    mes "[Lania]";

-                    mes "May I continue the story now?";

-                    next;

-                    menu "Yes, please.",-;

-                        mes "[Lania]";

-                        mes "Okay, here it goes.";

-                        next;

-                  break;

-

-                  case 2:

-                    mes "[Lania]";

-                    mes "I understand that my story was not that interesting.";

-                    mes "I will try my best to satisfy you next time.";

-                    mes "Have a good travel.";

-                    close;

-                  break;

-

-                  case 3:

-                    mes "[Lania]";

-                    mes "Oh ok.";

-                    mes "Then let me continue the story.";

-                    next;

-                  break;

-

-                }

-                mes "[Lania]";

-                mes "After a while, Loki who looked tattered and worn out";

-                mes "brought a strange looking pony with eight leggs to Asgard.";

-                mes "And Loki introduced the pony as 'Sleipnir' and";

-                mes "presented it to Odin.";

-                mes "Odin thankfully accepted Loki's present.";

-                next;

-                mes "[Lania]";

-                mes "The fact was Loki transformed into the mare that";

-                mes "attracted Svadilfari and eventually he was impregnated";

-                mes "of the pony. That was the story of";

-                mes "how 'Sleipnir' was born.";

-                next;

-                mes "[Lania]";

-                mes "We, friars only hand down this story by word of mouth.";

-                mes "Therefore, small details might be different from the other.";

-                mes "However, the fundamental story line should not be different.";

-                next;

-                mes "[Lania]";

-                mes "I have not been able to practice myself that well,";

-                mes "I am not that confident if I told you the story as much as the original story.";

-                mes "But I hope you will understand that I did my best.";

-                mes "That was all I could help you.";

-                next;

-                mes "[Lania]";

-                mes "If you wish to listen to the story again,";

-                mes "you are always welcomed.";

-                mes "Have a safe travel.";

-                if(god_sl_2 == 1)

-                  set god_sl_2,2;

-                else if(god_sl_2 == 3)

-                  set god_sl_2,4;

-                close;

-              break;

-            }

-          break;

-

-          case 2:

-            mes "[Lania]";

-            mes "When you are in agony,";

-            mes "please look back on your past.";

-            mes "Just like legends or myths,";

-            mes "yours is also a story of the past.";

-            mes "You will find out a right solution from your past.";

-            close;

-          break;

-        }

-      }

-      else

-      {

-        mes "[Lania]";

-        mes "I told you everything I know.";

-        mes "I hope it will be a help for you.";

-        mes "Please be helpful for others...";

-        close;

-      }

-    }

-    else

-    {

-      mes "[Lania]";

-      mes "............";

-      mes "Training does not include only physical or mental practice.";

-      mes "Leading a life and meeting people are also considered";

-      mes "as a part of practice. Of course, everyone will have a different result.";

-      close;

-    }

-  }  

-  else

-  {

-      mes "[Lania]";

-      mes "............";

-      mes "Training does not include only physical or mental practice.";

-      mes "Leading a life and meeting people are also considered";

-      mes "as a part of practice. Of course, everyone will have a different result.";

-      close;

-  }

-

-}

-  

-// warp 0 -laboratory entrance

-que_god01.gat,84,95,0	script	Switch#God0	111,{

-

-    if(god_sl_1 > 1 && god_sl_1 < 51)

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "As you put your temporary pass onto the detector,";

-      mes "the door was open.";

-      close2;

-      warp "que_god01.gat",60,88;

-      end;

-    }

-    else

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "It seemed you need to put something onto";

-      mes "the detector in order to open the door.";

-      close;

-    }

-

-}

-

-que_god01.gat,84,92,0	script	god_sl_w0	45,1,1,{

-

-    if(god_sl_1 > 1 && god_sl_1 < 51)

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "As you put your temporary pass onto the detector,";

-      mes "the door was open.";

-      next;

-      warp "que_god01.gat",60,88;

-      end;

-    }

-    else

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "It seemed you need to put something onto";

-      mes "the detector in order to open the door.";

-      close;

-    }

-

-}

-

-// ¿öÇÁ 1¹ø -Ç϶õµµÆ®

-que_god01.gat,49,97,0	script	Switch#God1	111,{

-

-    if(god_sl_1 > 1 && god_sl_1 < 51)

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "As you put your temporary pass onto the detector,";

-      mes "the door was open.";

-      next;

-      warp "que_god01.gat",62,119;

-      end;

-    }

-    else

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "It seemed you need to put something onto";

-      mes "the detector in order to open the door.";

-      close;

-    }

-

-}

-

-que_god01.gat,46,97,0	script	god_sl_w1	45,1,1,{

-

-    if(god_sl_1 > 1 && god_sl_1 < 51)

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "As you put your temporary pass onto the detector,";

-      mes "the door was open.";

-      next;

-      warp "que_god01.gat",62,119;

-      end;

-    }

-    else

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "It seemed you need to put something onto";

-      mes "the detector in order to open the door.";

-      close;

-    }

-

-}

-

-

-// ¿öÇÁ 2¹ø -¾Æµò

-que_god01.gat,19,97,0	script	Switch#God2	111,{

-

-    if(god_sl_1 > 1 && god_sl_1 < 51)

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "As you put your temporary pass onto the detector,";

-      mes "the door was open.";

-      next;

-      warp "que_god01.gat",12,119;

-      end;

-    }

-    else

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "It seemed you need to put something onto";

-      mes "the detector in order to open the door.";

-      close;

-    }

-

-}

-

-que_god01.gat,16,97,0	script	god_sl_w2	45,1,1,{

-

-    if(god_sl_1 > 1 && god_sl_1 < 51)

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "As you put your temporary pass onto the detector,";

-      mes "the door was open.";

-      next;

-      warp "que_god01.gat",12,119;

-      end;

-    }

-    else

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "It seemed you need to put something onto";

-      mes "the detector in order to open the door.";

-      close;

-    }

-

-}

-

-que_god01.gat,14,80,0	script	Switch#God3	111,{

-

-    if(god_sl_1 > 1 && god_sl_1 < 51)

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "As you put your temporary pass onto the detector,";

-      mes "the door was open.";

-      next;

-      warp "que_god01",12,52;

-      end;

-    }

-    else

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "It seemed you need to put something onto";

-      mes "the detector in order to open the door.";

-      close;

-    }

-

-}

-

-que_god01.gat,17,80,0	script	god_sl_w3	45,1,1,{

-

-    if(god_sl_1 > 1 && god_sl_1 < 51)

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "As you put your temporary pass onto the detector,";

-      mes "the door was open.";

-      next;

-      warp "que_god01.gat",12,52;

-      end;

-    }

-    else

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "It seemed you need to put something onto";

-      mes "the detector in order to open the door.";

-      close;

-    }

-

-}

-

-// ¿öÇÁ 4¹ø Äí¸£Æ®

-que_god01.gat,44,80,0	script	Switch#God4	111,{

-

-    if(god_sl_1 > 1 && god_sl_1 < 51)

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "As you put your temporary pass onto the detector,";

-      mes "the door was open.";

-      next;

-      warp "que_god01.gat",50,52;

-      end;

-     }

-    else

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "It seemed you need to put something onto";

-      mes "the detector in order to open the door.";

-      close;

-    }

-

-}

-

-que_god01.gat,47,80,0	script	god_sl_w4	45,1,1,{

-

-    if(god_sl_1 > 1 && god_sl_1 < 51)

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "As you put your temporary pass onto the detector,";

-      mes "the door was open.";

-      next;

-      warp "que_god01.gat",50,52;

-      end;

-    }

-    else

-    {

-      mes "The door was locked.";

-      mes "You looked around and found out a detector";

-      mes "at the right side of the door.";

-      mes "It seemed you need to put something onto";

-      mes "the detector in order to open the door.";

-      close;

-    }

-

-}

+//===== eAthena Script ======================================= 
+//= Sleipnir seal unlocking NPCs.
+//===== By: ================================================== 
+//= MasterOfMuppets
+//===== Current Version: ===================================== 
+//= 1.0
+//===== Compatible With: ===================================== 
+//= eAthena
+//===== Description: ========================================= 
+//= Quest for breaking the seal of Sleipnir.
+//===== Additional Comments: =================================
+// 1.0 First version. [MasterOfMuppets]
+//============================================================
+// Juno citizen Noyee
+yuno.gat,164,200,4	script	Noyee#God	101,{
+
+    if(BaseLevel < 70)
+      {
+      mes "[Noyee]";
+      mes "Do you know that there are two different types of armor?";
+      mes "There are general armors that you can purchase from NPC shops";
+      next;
+      mes "[Noyee]";
+      mes "and ones that you can obtain by hunting monsters.";
+      mes "The difference between the two is if they're slotted or not.";
+      next;
+      mes "[Noyee]";
+      mes "Defence wise, both of them possess the same rate.";
+      mes "However, since a slotted armor allows you to put 'a monster card' in the slot,";
+      mes "it will enhance the armor with a different ability.";
+      next;
+      mes "[Noyee]";
+      mes "At the same time, both of slotted armors or monster cards";
+      mes "are very rare to obtain. Therefore, you seldom see";
+      mes "those kinds in the market.";
+      close;
+      }
+      if($God1 > 99)
+      {
+      mes "[Noyee]";
+      mes "Do you know that there are two different types of armor?";
+      mes "There are general armors that you can purchase from NPC shops";
+      next;
+      mes "[Noyee]";
+      mes "and ones that you can obtain by hunting monsters.";
+      mes "The difference between the two is if they're slotted or not.";
+      next;
+      mes "[Noyee]";
+      mes "Defence wise, both of them possess the same rate.";
+      mes "However, since a slotted armor allows you to put 'a monster card' in the slot,";
+      mes "it will enhance the armor with a different ability.";
+      next;
+      mes "[Noyee]";
+      mes "At the same time, both of slotted armors or monster cards";
+      mes "are very rare to obtain. Therefore, you seldom see";
+      mes "those kinds in the market.";
+      close;
+      }
+        mes "[Noyee]";
+        mes "Ah, I just remembered something.";
+        mes "There is a very interesting place in ...";
+        mes "It looks like a kind of laboratory but nobody knows";
+        mes "what it is....";
+        next;
+        mes "[Noyee]";
+        mes "Recently there have been many rumors going around";
+        mes "the place...? I have no idea what people are talking about.";
+        mes "Anyways, that place looks very interesting.";
+        if(god_sl_1 == 0)set god_sl_1,1;
+        close;
+
+}
+
+//Cukure Kirin
+que_god01.gat,98,98,4	script	Manager#God	69,{
+
+	set @NowWeight, MaxWeight - Weight;
+	if (@NowWeight >= 5000) goto NOT_OW;
+	mes "- Wait a minute! -";
+	mes "- Currently you are overweight. -";
+	mes "- Please lighten your weight -";
+	mes "- and try again. -";
+	close;
+
+NOT_OW:
+    if(BaseLevel < 70)
+      {
+      mes "[Cukure]";
+      mes "Awww...";
+      mes "I get too busy nowadays.";
+      mes "I don't even have times for a date.";
+      mes "Damn it....";
+      next;
+      mes "[Cukure]";
+      mes "Wait, when was the last time I went on a date...?";
+      mes "Umm....";
+      mes "Awww....I am so busy...busy!";
+      emotion 19;
+      close;
+      }
+    	
+      if($God1 < 100)
+      {
+        if(god_sl_1 == 0)
+	{
+        mes "[Cukure]";
+        mes "Awww...";
+        mes "I get too busy nowadays.";
+        mes "I don't even have times for a date.";
+        mes "Damn it....";
+        next;
+        mes "[Cukure]";
+        mes "Wait, when was the last time I went on a date...?";
+        mes "Umm....";
+        mes "Awww....I am so busy...busy!";
+        emotion 19;
+        close;
+	}
+        else if(god_sl_1 == 1)
+	{
+          mes "[Cukure]";
+          mes "We research signs of Gods that were left behind in this world long time ago.";
+          mes "Specifically, we are studying tools that represent the power of God.";
+          next;
+          mes "[Cukure]";
+          mes "...";
+          mes "Recently many of members except leaders";
+          mes "have retired due to their personal matters and whatsoever.";
+          mes "So we are running out of manpower.";
+          next;
+          mes "[Cukure]";
+          mes "Because of the problem, we have stopped";
+          mes "the most of researches on the progress.";
+          mes "Speaking of which...";
+          next;
+          mes "[Cukure]";
+          mes "Do you mind if I ask you to help our research?";
+          mes "I will reward you afterwards.";
+          next;
+          switch( select( "I am kind of busy...", "Sure, why not." ) )
+	  {
+            case 1:
+              mes "[Cukure]";
+              mes "Oh...are you?";
+              mes "I see.";
+              mes "Then, would you like to recommend someone";
+              mes "who can help us to continue researches?";
+              next;
+              mes "[Cukure]";
+              mes "I am so sorry to ask you of this, but....";
+              mes "we are that understaffed...I hope you will understand.";
+              mes ".......";
+              close;
+            break;
+
+            case 2:
+              mes "[Cukure]";
+              mes "?! Are you sure?";
+              mes "Hahahahaha~";
+              mes "I am so glad to hear that.";
+              next;
+              mes "[Cukure]";
+              mes "There are investigators inside.";
+              mes "They will need your help, please go visit them.";
+              next;
+              mes "[Cukure]";
+              mes "Oh, wait...";
+              mes "Let me give you a temporary admission pass.";
+              mes "Thank you so much for your help.";
+              next;
+              mes "^ff0000You have received a temporary admission pass.^000000";
+              set god_sl_1,2;
+              close;
+            break;
+
+	  }
+
+	}
+        else if(god_sl_1 < 10)
+	{
+         mes "[Cukure]";
+         mes "It seems very difficult to manage a laboratory.";
+         mes "Other laboratories always try to take our members away or to interrupt our business...";
+         mes "So I donnot have a personal life because of my job...";
+         mes ".......";
+         next;
+         mes "[Cukure]";
+         mes "Ah...umm....";
+         mes "Hahahaha...";
+         mes "What am I doing with a visitor...";
+         mes "Heh, please disregard what I said.";
+         mes "Hahahahaha...";
+         close;
+	}
+        else if(god_sl_1 < 50)
+	{
+          mes "[Cukure]";
+          mes "Ah, thank you for your help so far.";
+          mes "I hope you will continue to help us.";
+          mes "Although our investigators are kind of strange";
+          mes "they are all nice. I hope you will understand even if they treat you rudely.";
+         close;
+	}
+        else if(god_sl_1 == 50)
+	{
+          mes "[Cukure]";
+          mes "Ah...~";
+          mes "You gave us a great help.";
+          mes "Hahahaha...";
+          mes "We would have a harder time if you didn't help us.";
+          next;
+          mes "[Cukure]";
+          mes "As you have noticed already,";
+          mes "we have researched 'Sleipnir'";
+          mes "if we can reproduct this 'godly item' or not.";
+          next;
+          mes "[Cukure]";
+          mes "However....";
+          mes "so far, the result shows that it is almost impossible with";
+          mes "the technology we have.";
+          mes "Hmmm...";
+          next;
+          mes "[Cukure]";
+          mes "Anyways, we will continue to research";
+          mes "with a hope.";
+          next;
+          mes "[Cukure]";
+          mes "With your help, we succeeded to complete the basic reserach.";
+          mes "From now on, we will plan out further research";
+          mes "based on the result we made this time.";
+          next;
+          mes "[Cukure]";
+          mes "Oh, since you helped us, I am going to reward you.";
+          mes "Please give me a minute...";
+          next;
+          mes "[Cukure]";
+          mes "There it is.";
+          mes "It might not be a great reward but";
+          mes "I hope you will take it as a token of my gratitute.";
+          mes "Have a good travel!";
+          if($God1 < 100)set $God1,$God1+1;
+
+          if($God1 == 50)
+          	announce "The first seal of [Sleipnir] has appeared.",bc_all;
+          else if($God1 == 100)
+	  {
+            if ($God1 == 100 && $God2 == 100 && $God3 == 100 && $God4 == 100)
+            	announce "Four seals have been released at the same time with the seal of [Sleipnir].",bc_all;
+            else
+            	announce "The seal of [Sleipnir] has been released.",bc_all;
+	  }
+
+          set god_sl_1,51;
+          set @god_treasure,rand(1,900);
+          set @god_treasure1,rand(1,1000);
+
+          if(@god_treasure < 101)
+	    {
+            if(@god_treasure1 < 210)
+              getitem 2102,1;
+            else if(@god_treasure1 < 420)
+              getitem 2104,1;
+            else if(@god_treasure1 < 630)
+              getitem 2106,1;
+            else if(@god_treasure1 < 840)
+              getitem 2108,1;
+            else
+              getitem 2109,1;
+            }
+          
+          else if(@god_treasure < 201)
+	    {
+            if(@god_treasure1 < 48)
+              getitem 2207,1;
+            else if(@god_treasure1 < 96)
+              getitem 2210,1;
+            else if(@god_treasure1 < 150)
+              getitem 2213,1;
+            else if(@god_treasure1 < 190)
+              getitem 2215,1;
+            else if(@god_treasure1 < 238)
+              getitem 2217,1;
+            else if(@god_treasure1 < 290)
+              getitem 2223,1;
+            else if(@god_treasure1 < 340)
+              getitem 2227,1;
+            else if(@god_treasure1 < 348)
+              getitem 2229,1;
+            else if(@god_treasure1 < 400)
+              getitem 2231,1;
+            else if(@god_treasure1 < 448)
+              getitem 2233,1;
+            else if(@god_treasure1 < 496)
+              getitem 2236,1;
+            else if(@god_treasure1 < 544)
+              getitem 2244,1;
+            else if(@god_treasure1 < 592)
+              getitem 2245,1;
+            else if(@god_treasure1 < 640)
+              getitem 2247,1;
+            else if(@god_treasure1 < 688)
+              getitem 2248,1;
+            else if(@god_treasure1 < 736)
+              getitem 2250,1;
+            else if(@god_treasure1 < 784)
+              getitem 2251,1;
+            else if(@god_treasure1 < 832)
+              getitem 2252,1;
+            else if(@god_treasure1 < 880)
+              getitem 2253,1;
+            else if(@god_treasure1 < 940)
+              getitem 2257,1;
+            else
+              getitem 2259,1;
+            }
+            
+          else if(@god_treasure < 301)
+	    {
+            if(@god_treasure1 < 160)
+              getitem 2267,1;
+            else if(@god_treasure1 < 320)
+              getitem 2262,1;
+            else if(@god_treasure1 < 480)
+              getitem 2263,1;
+            else if(@god_treasure1 < 540)
+              getitem 2265,1;
+            else if(@god_treasure1 < 700)
+              getitem 2266,1;
+            else if(@god_treasure1 < 800)
+              getitem 2260,1;
+            else if(@god_treasure1 < 900)
+              getitem 2269,1;
+            else
+              getitem 2270,1;
+            }
+            
+          else if(@god_treasure < 401)
+	    {
+            if(@god_treasure1 < 70)
+              getitem 2298,1;
+            else if(@god_treasure1 < 140)
+              getitem 2275,1;
+            else if(@god_treasure1 < 210)
+              getitem 2276,1;
+            else if(@god_treasure1 < 280)
+              getitem 2277,1;
+            else if(@god_treasure1 < 350)
+              getitem 2279,1;
+            else if(@god_treasure1 < 420)
+              getitem 2254,1;
+            else if(@god_treasure1 < 490)
+              getitem 2299,1;
+            else if(@god_treasure1 < 560)
+              getitem 2287,1;
+            else if(@god_treasure1 < 630)
+              getitem 2289,1;
+            else if(@god_treasure1 < 700)
+              getitem 2290,1;
+            else if(@god_treasure1 < 770)
+              getitem 2291,1;
+            else if(@god_treasure1 < 840)
+              getitem 2294,1;
+            else if(@god_treasure1 < 900)
+              getitem 2295,1;
+            else if(@god_treasure1 < 950)
+              getitem 2271,1;
+            else
+              getitem 2285,1;
+            }
+              
+          else if(@god_treasure < 501)
+	    {
+            if(@god_treasure1 < 80)
+              getitem 2306,1;
+            else if(@god_treasure1 < 160)
+              getitem 2308,1;
+            else if(@god_treasure1 < 240)
+              getitem 2310,1;
+            else if(@god_treasure1 < 320)
+              getitem 2311,1;
+            else if(@god_treasure1 < 400)
+              getitem 2313,1;
+            else if(@god_treasure1 < 480)
+              getitem 2315,1;
+            else if(@god_treasure1 < 560)
+              getitem 2329,1;
+            else if(@god_treasure1 < 630)
+              getitem 2320,1;
+            else if(@god_treasure1 < 700)
+              getitem 2322,1;
+            else if(@god_treasure1 < 760)
+              getitem 2324,1;
+            else if(@god_treasure1 < 810)
+              getitem 2326,1;
+            else if(@god_treasure1 < 850)
+              getitem 2317,1;
+            else if(@god_treasure1 < 900)
+              getitem 2331,1;
+            else if(@god_treasure1 < 950)
+              getitem 2333,1;
+            else
+              getitem 2336,1;
+            }
+          
+          else if(@god_treasure < 601)
+	    {
+            if(@god_treasure1 < 200)
+              getitem 2402,1;
+            else if(@god_treasure1 < 400)
+              getitem 2404,1;
+            else if(@god_treasure1 < 600)
+              getitem 2406,1;
+            else if(@god_treasure1 < 800)
+              getitem 2407,1;
+            else
+              getitem 2409,1;
+            }
+            
+          else if(@god_treasure < 701)
+	    {
+            if(@god_treasure1 < 300)
+              getitem 2502,1;
+            else if(@god_treasure1 < 550)
+              getitem 2504,1;
+            else if(@god_treasure1 < 750)
+              getitem 2506,1;
+            else
+              getitem 2508,1;
+            }
+          
+          else if(@god_treasure < 801)
+	    {
+            if(@god_treasure1 < 110)
+              getitem 2601,1;
+            else if(@god_treasure1 < 220)
+              getitem 2602,1;
+            else if(@god_treasure1 < 330)
+              getitem 2603,1;
+            else if(@god_treasure1 < 440)
+              getitem 2604,1;
+            else if(@god_treasure1 < 550)
+              getitem 2605,1;
+            else if(@god_treasure1 < 660)
+              getitem 2607,1;
+            else if(@god_treasure1 < 770)
+              getitem 2608,1;
+            else if(@god_treasure1 < 880)
+              getitem 2617,1;
+            else
+              getitem 2618,1;
+            }
+              
+          else
+	    {
+            if(@god_treasure1 < 150)
+              getitem 2288,1;
+            else if(@god_treasure1 < 260)
+              getitem 2297,1;
+            else if(@god_treasure1 < 370)
+              getitem 5087,1;
+            else if(@god_treasure1 < 480)
+              getitem 5088,1;
+            else if(@god_treasure1 < 590)
+              getitem 5089,1;
+            else if(@god_treasure1 < 700)
+              getitem 5090,1;
+            else if(@god_treasure1 < 810)
+              getitem 5046,1;
+            else if(@god_treasure1 < 920)
+              getitem 2264,1;
+            else
+              getitem 2225,1;
+            }
+          //endif
+          next;
+          mes "[Cukure]";
+          mes "Ah....also,";
+          mes "let me retrieve the temporary pass given to you.";
+          mes "Well...";
+          close;
+	}
+        else
+	{
+        mes "[Cukure]";
+        mes "With your help, we succeeded to complete the basic reserach.";
+        mes "From now on, we will plan out further research";
+        mes "based on the result we made this time.";
+        mes "That means I can go on a date...hahaha...";
+        close;
+        }
+      }
+      else
+      {
+        if(god_sl_1 == 0)
+	{
+        mes "[Cukure]";
+        mes "Awww...";
+        mes "I get too busy nowadays.";
+        mes "I don't even have times for a date.";
+        mes "Damn it....";
+        next;
+        mes "[Cukure]";
+        mes "next;, when was the last time I went on a date...?";
+        mes "Umm....";
+        mes "Awww....I am so busy...busy!";
+        emotion 19;
+        close;
+	}
+        else if(god_sl_1 < 51)
+	{
+          mes "[Cukure]";
+          mes "Ah, you came back.";
+          mes "I know you were going to help us...";
+          mes "but someone already did the job and";
+          mes "we successfully finished the research.";
+          next;
+          mes "[Cukure]";
+          mes "Thank you anways though.";
+          mes "I hope you will come help us for the next research.";
+          close;
+	}
+        else
+	{
+          mes "[Cukure]";
+          mes "We have succeeded to complete the basic reserach.";
+          mes "From now on, we will plan out further research";
+          mes "based on the result we made this time.";
+          mes "That means I can go on a date...hahaha...";
+          close;
+        }
+      }
+
+}
+
+// Hallandaute Lagunis - Wheel of the Unknown
+que_god01.gat,66,125,6	script	Investigator#God1	89,{
+
+    if($God2 < 100)
+    {
+      if(god_sl_1 == 2)set god_sl_1,11;
+
+      if(god_sl_1 == 11 || god_sl_1 == 22 || god_sl_1 == 33 || god_sl_1 == 44)
+      {
+        if(god_sl_2  == 0)
+	{
+          mes "[Hallandaute]";
+          mes "Ah...are you the one who Ms. Kirin was talking about?";
+          mes "Yes, she said you are going to assist us for the research.";
+          mes "Hmmm...";
+          next;
+          mes "[Hallandaute]";
+          mes "Frankly, we donnot need people who are not specialised in this field";
+          mes "even if we are running out of manpower.";
+          mes "But you can support us through doing stuffs that we are too lazy to do";
+          mes "on our own....if you don't mind.";
+          next;
+          mes "[Hallandaute]";
+          mes "Oh well...";
+          mes "What would be a good job for you....";
+          mes "Let me think...";
+          mes "Ah...";
+          next;
+          mes "[Hallandaute]";
+          mes "I got it.";
+          mes "Can you go visit ^ff0000Metto^000000 for me?";
+          mes "Please bring me his news.";
+          next;
+          mes "[Hallandaute]";
+          mes "Since he is working on a similar subject as mine,";
+          mes "I guess that he might be able to help me.";
+          mes "He's in Juno, you can easily find him.";
+          set god_sl_2,1;
+          close;
+	}
+        else if(god_sl_2 == 1)
+	{
+          if (metto_q == 0)
+	  {
+            mes "[Hallandaute]";
+            mes "I guess you haven't seen him yet.";
+            mes "Although he is kind of fastidious, he is not a bad guy at all.";
+            mes "We have been friends for a long time";
+            mes "since we work in the similar field.";
+            next;
+            mes "[Hallandaute]";
+            mes "I am wondering how he has been doing.";
+            mes "You can just ask him about his research progress.";
+            mes "Thank you for your trouble.";
+            close;
+	  }
+          else if(metto_q < 9)
+	  {
+            mes "[Hallandaute]";
+            mes "Hmmm....";
+            mes "I see....";
+            mes "Thank you for your trouble...";
+            mes "Hmmm...it seems he changed...";
+            mes "hmmm..";
+            close;
+	  }
+          else
+	  {
+           mes "[Hallandaute]";
+           mes "?!";
+           mes "...........";
+           mes "Oh well.....";
+           mes "I have never expected that the situation would turn into this way.";
+           mes "Ummm....";
+           emotion 20; //ET_SCRATCH
+           next;
+           mes "[Hallandaute]";
+           mes "Oh well, it happened already. Okay, thank you for the help.";
+           mes "Please wait for a moment.";
+           mes "I have something to think about.";
+           mes "Ummmmm...";
+           emotion 9; //ET_THINK
+           set god_sl_2,2;
+           close;
+           }
+	}
+        else if(god_sl_2 == 2)
+	{
+          if(rand(1,10) == 7)
+	  {
+            mes "[Hallandaute]";
+            mes "Ah...";
+            mes "You came back.";
+            mes "...Let me give you the gist of research I am working on.";
+            next;
+            mes "[Hallandaute]";
+            mes "I am working on";
+            mes "'^ff0000a Wheel of the Unknown^000000' that was discovered to be a peace";
+            mes "of '^ff0000Sleipnir^000000'.";
+            mes "It looks like a normal cogwheel but";
+            mes "I cannot figure out how it works.";
+            next;
+            mes "[Hallandaute]";
+            mes "The most strange thing about this cogwheel is";
+            mes "its material.";
+            next;
+            mes "[Hallandaute]";
+            mes "It seems to be made out of steel but";
+            mes "no matter how long I heated it up,";
+            mes "it never responded to the heat.";
+            mes "It worked the same when I tried to freeze it.";
+            next;
+            mes "[Hallandaute]";
+            mes "Besides, it never responds to any kinds of impact either.";
+            mes "No matter how hard it was crashed or dropped,";
+            mes "it does not seem to be influenced.";
+            next;
+            mes "[Hallandaute]";
+            mes "But I found out that this thing seems to be resonant with";
+            mes "certain objects.";
+            mes "Then again, it does not seem to work the same all the time.";
+            next;
+            mes "[Hallandaute]";
+            mes "Let's say, it was resonant with an object 'A' but";
+            mes "when I try again, it does not work at all with A.";
+            mes "Surely, there should be some kind of conditions to satisfy";
+            mes "in order to make it resonant...";
+            mes "Hmm hmmm...";
+            next;
+            mes "[Hallandaute]";
+            mes "Ah....";
+            mes "I apologize for speaking things that are not important.";
+            mes "Please disregard words I said.";
+            mes "Thank you for your help anyways.";
+            mes "Other investigators might need your help as well.";
+            mes "Hmmm...";
+            set god_sl_2,0;
+            if(god_sl_1 == 11)
+              set god_sl_1,12;
+            if(god_sl_1 == 22)
+              set god_sl_1,23;
+            if(god_sl_1 == 33)
+              set god_sl_1,34;
+            if(god_sl_1 == 44)
+              set god_sl_1,50;
+            close;
+	  }
+          else
+	  {
+           mes "[Hallandaute]";
+           mes "Oh, please give me a moment.";
+           mes "I have something to organize.";
+           mes "Ummm....";
+           mes "Therefore...";
+           mes "Mumble mumble...";
+           close;
+          }
+	}
+        else
+	{
+          mes "[Hallandaute]";
+          mes "Hmmm...";
+          mes "Therefore....";
+          mes "It works this way...";
+          mes "Umm....that is...";
+          mes "Oh well, it would be better if it was in a good shape...";
+          mes "Sigh...";
+          close;
+        }
+      }
+      else
+      {
+        mes "[Hallandaute]";
+        mes "Ummm....";
+        mes "So it will be......";
+        mes "Bah! It is not easy to work on this by myself!";
+        mes "It is always good to have an assistant.";
+        next;
+        mes "[Hallandaute]";
+        mes "I can share the load of work with him.";
+        mes "However, types of work affects on the types of assistant I need.";
+        next;
+        mes "[Hallandaute]";
+        mes "For instance, if I am working on a project called 'A'";
+        mes "I will need an assistant named 'G' who is specialised in the project.";
+        mes "But if I am working on a project called 'B'";
+        mes "I will need 'H' who is specialised in the project.";
+        next;
+        mes "[Hallandaute]";
+        mes "Of course, there could be people who are good at everything.";
+        mes "But since they are hard to find, we must choose right people for each project.";
+        close;
+      }
+    }
+    else
+    {
+        mes "[Hallandaute]";
+        mes "Ummm....";
+        mes "So it will be......";
+        mes "Bah! It is not easy to work on this by myself!";
+        mes "It is always good to have an assistant.";
+        next;
+        mes "[Hallandaute]";
+        mes "I can share the load of work with him.";
+        mes "However, types of work affects on the types of assistant I need.";
+        next;
+        mes "[Hallandaute]";
+        mes "For instance, if I am working on a project called 'A'";
+        mes "I will need an assistant named 'G' who is specialised in the project.";
+        mes "But if I am working on a project called 'B'";
+        mes "I will need 'H' who is specialised in the project.";
+        next;
+        mes "[Hallandaute]";
+        mes "Of course, there could be people who are good at everything.";
+        mes "But since they are hard to find, we must choose right people for each project.";
+      close;
+    }
+}
+
+//Aadin Keil - Feather of Angel Wing
+que_god01.gat,11,136,6	script	Investigator#God2	742,{
+
+    if($God1 < 100)
+    {
+      if(god_sl_1 == 2)set god_sl_1,21;
+
+      if(god_sl_1 == 21 || god_sl_1 == 32 || god_sl_1 == 43 || god_sl_1 == 14)
+      {
+        if(god_sl_2 == 0)
+	{
+          mes "[Aadin]";
+          mes "*yawn*~";
+          mes "Umm?";
+          mes "Hmmmm....";
+          next;
+          mes "[Aadin]";
+          mes "Nice to meet you.";
+          mes "I know you are the temporary assistant joined this time.";
+          mes "That's great, I was having a hard time to do something on my own.";
+          next;
+          mes "[Aadin]";
+          mes "Okay...";
+          mes "Let me explain what I am doing at this moment.";
+          mes "I am studying 'Feather of Angel Wing' which is";
+          mes "revealed to be the material of 'Sleipnir'.";
+          next;
+          mes "[Aadin]";
+          mes "Especially I am focusing on the behind story";
+          mes "of this feather like how it became the material of 'Sleipnir'.";
+          mes "I was told that there is a person in 'Payon'";
+          mes "who knows about the story.";
+          mes "So I tried to send a staff to the village in order to";
+          mes "gather information from him....";
+          next;
+          mes "[Aadin]";
+          mes "But the situation does not allow me to use any of manpower in the laboratory...";
+          mes "so I have been debating myself if I should go there on my own or not.";
+          mes "Because I don't feel safe to leave this studying room with this feather alone.";
+          next;
+          mes "[Aadin]";
+          mes "Therefore...";
+          mes "as you might guessed already....";
+          mes "I would like to ask you to go talk to the person in Payon";
+          mes "about the story and come back to me.";
+          next;
+          mes "[Aadin]";
+          mes "I assume that it should not be that difficult to find the person.";
+          mes "But you must memorize every single word from him.";
+          mes "The result of research could be affected by words you delievered to me.";
+          next;
+          mes "[Aadin]";
+          mes "Thank you in advance.";
+          mes "There is no time limit for this, but faster will be better...";
+          mes "Have a good travel!";
+          set god_sl_2,1;
+          close;
+	}
+        else if(god_sl_2 == 1)
+	{
+          mes "[Aadin]";
+          mes "You have not gone to Payon yet.";
+          mes "Please leave to Payon as soon as possible.";
+          mes "Have a good travel!";
+          close;
+	}
+        else if(god_sl_2 == 2)
+	{
+         mes "[Aadin]";
+         mes "Ah, you came back.";
+         mes "So, have you memorized the story?";
+         mes "Yes, I know it would be really convenient";
+         mes "if they kept the story as a book.";
+         mes "But it seems that they have some kind of rules that do not allow them";
+         mes "to write down the story but to tell people by word of mouth.";
+         next;
+         mes "[Aadin]";
+         mes "Okay, I am ready to listen.";
+         mes "Please go ahead.";
+         mes ".......";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         mes "..";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         mes "..";
+         mes "...";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         mes "..";
+         mes "...";
+         mes "....";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         mes "..";
+         mes "...";
+         mes "....";
+         mes ".....";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         mes "..";
+         mes "...";
+         mes "....";
+         mes ".....";
+         mes "......";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         mes "..";
+         mes "...";
+         mes "....";
+         mes ".....";
+         mes "......";
+         mes ".......";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         mes "..";
+         mes "...";
+         mes "....";
+         mes ".....";
+         mes "......";
+         mes ".......";
+         mes "........";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         mes "..";
+         mes "...";
+         mes "....";
+         mes ".....";
+         mes "......";
+         mes ".......";
+         mes "........";
+         mes ".........";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         mes "..";
+         mes "...";
+         mes "....";
+         mes ".....";
+         mes "......";
+         mes ".......";
+         mes "........";
+         mes ".........";
+         mes "..........";
+         next;
+         mes "[Aadin]";
+         mes "Hmm......";
+         mes "I see.";
+         mes "Now I have a better understanding about it.";
+         mes "Oh next;...";
+         next;
+         mes "[Aadin]";
+         mes "It seems you missed some important part of the story!";
+         mes "I am so sorry to tell you this but do you mind going back to Payon";
+         mes "and listening the story again? I would like to listen to the story again.";
+         set god_sl_2,3;
+         close;
+	}
+        else if(god_sl_2 == 3)
+	{
+          mes "[Aadin]";
+          mes "You haven't left to Payon yet.";
+          mes "I hope you will leave as soon as possible.";
+          mes "Even with the story you have brought, I think I can";
+          mes "complete most part of the research.";
+          close;
+	}
+        else if(god_sl_2 == 4)
+	{
+         mes "[Aadin]";
+         mes "Oh, you came back.";
+         mes "Okay, I am ready to listen.";
+         mes "Please go ahead.";
+         mes ".......";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         mes "..";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         mes "..";
+         mes "...";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         mes "..";
+         mes "...";
+         mes "....";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         mes "..";
+         mes "...";
+         mes "....";
+         mes ".....";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         mes "..";
+         mes "...";
+         mes "....";
+         mes ".....";
+         mes "......";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         mes "..";
+         mes "...";
+         mes "....";
+         mes ".....";
+         mes "......";
+         mes ".......";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         mes "..";
+         mes "...";
+         mes "....";
+         mes ".....";
+         mes "......";
+         mes ".......";
+         mes "........";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         mes "..";
+         mes "...";
+         mes "....";
+         mes ".....";
+         mes "......";
+         mes ".......";
+         mes "........";
+         mes ".........";
+         next;
+         mes "[Aadin]";
+         mes ".";
+         mes "..";
+         mes "...";
+         mes "....";
+         mes ".....";
+         mes "......";
+         mes ".......";
+         mes "........";
+         mes ".........";
+         mes "..........";
+         next;
+         mes "[Aadin]";
+         mes "Hmm...I see.";
+         mes "It seems your story is almost accurate as the original one.";
+         mes "It is understandable that the story is differentiated by the person";
+         mes "who is telling it since we share the story by word of mouth.";
+         next;
+         mes "[Aadin]";
+         mes "Yes, most of my questions finally found their answers.";
+         mes "At the same time, the story gave me new questions.";
+         mes "Hmmm...this is not easy at all.";
+         mes "Thank you for your help though.";
+          set god_sl_2,0;
+          if(god_sl_1 == 21)
+            set god_sl_1,22;
+          else if(god_sl_1 == 32)
+            set god_sl_1,33;
+          else if(god_sl_1 == 43)
+            set god_sl_1,44;
+          else if(god_sl_1 == 14)
+            set god_sl_1,50;
+          close;
+        }
+      }
+      else
+      {
+        mes "[Aadin]";
+        mes "Hmmm....";
+        mes "Sometimes a legend or a myth";
+        mes "tells two different stories within that are totally conflicting each other.";
+        mes "You can find the reason by finding the origin of the stories.";
+        close;
+      }
+    }
+    else
+    {
+        mes "[Aadin]";
+        mes "Hmmm....";
+        mes "Sometimes a legend or a myth";
+        mes "tells two different stories within that are totally conflicting each other.";
+        mes "You can find the reason by finding the origin of the stories.";
+        close;
+    }
+
+}
+
+//Kurdt Jerremant - Spirit of Fish
+que_god01.gat,55,47,3	script	Investigator#God3	803,{
+
+    if ($God1 < 100)
+    {
+      if(god_sl_1 == 2)set god_sl_1,31;
+
+      if(god_sl_1 == 31 || god_sl_1 == 42 || god_sl_1 == 13 || god_sl_1 == 24)
+      {
+        if(god_sl_2 == 0)
+	{
+          mes "[Kurdt]";
+          mes "Ah, you must be the new assistant.";
+          mes "I am pleased to meet you.";
+          next;
+          mes "[Kurdt]";
+          mes "I was kind of expecting a professional assistant";
+          mes "but it is understandable since the situation does not allow us.";
+          mes "Also, sometimes ordinary people";
+          mes "make a better result than professional assistants.";
+          mes "So I hope we will make a good team together.";
+          next;
+          mes "[Kurdt]";
+          mes "In fact, I am almost at the end of the research,";
+          mes "therefore I do not need that much of help...";
+          mes "However, the last thing I need to do is pretty difficult";
+          mes "for one to do alone...I was thinking to hire an agency from outside.";
+          next;
+          mes "[Kurdt]";
+          mes "But! I don't need to do that now, since you are here.";
+          mes "What I need now are materials to reproduce";
+          mes "'Spirit of Fish'.";
+          next;
+          mes "[Kurdt]";
+          mes "I am not sure yet if I can actually reproduce it or not.";
+          mes "But we can at least try it.";
+          next;
+          mes "[Kurdt]";
+          mes "Basically, you can go ahead and gather stuffs like";
+          mes "'Fish Scales' or 'Fish Tails'";
+          mes "or anything that you can obtain from marine life.";
+          mes "I donnot need too many but about 10 of them.";
+          next;
+          mes "[Kurdt]";
+          mes "I hope you will not have a hard time to gather them.";
+          mes "Thank you for your trouble and have a good travel!";
+          set god_sl_2,1;
+          close;
+	}
+        else if(god_sl_2 == 1)
+	{
+          mes "[Kurdt]";
+          mes "Ah, you came back.";
+          mes "Okay, let me check what you have brought to me.";
+          mes "Hmmm....";
+          mes ".........";
+          next;
+          mes "[Kurdt]";
+          mes "Hmmm......";
+          mes "I could use these...";
+          mes "and these too.....";
+          mes "aaand those too......";
+          mes "Umm.....";
+	  set @itemcount,0;
+          if(countitem(918) > 8)set @itemcount,1;
+          if(countitem(950) > 8)set @itemcount,@itemcount + 1;
+          if(countitem(951) > 8)set @itemcount,@itemcount + 1;
+          if(countitem(956) > 8)set @itemcount,@itemcount + 1;
+          if(countitem(959) > 8)set @itemcount,@itemcount + 1;
+          if(countitem(960) > 8)set @itemcount,@itemcount + 1;
+          if(countitem(961) > 8)set @itemcount,@itemcount + 1;
+          if(countitem(962) > 8)set @itemcount,@itemcount + 1;
+          if(countitem(963) > 8)set @itemcount,@itemcount + 1;
+          if(countitem(964) > 8)set @itemcount,@itemcount + 1;
+          if(countitem(965) > 8)set @itemcount,@itemcount + 1;
+          if(countitem(966) > 8)set @itemcount,@itemcount + 1;
+          if(countitem(7013) > 8)set @itemcount,@itemcount + 1;
+          if(countitem(1054) > 8)set @itemcount,@itemcount + 1;
+          if(countitem(1053) > 8)set @itemcount,@itemcount + 1;
+          if(countitem(1052) > 8)set @itemcount,@itemcount + 1;
+          if(countitem(1051) > 8)set @itemcount,@itemcount + 1;
+          if(countitem(1050) > 8)set @itemcount,@itemcount + 1;
+          if(countitem(1024) > 8)set @itemcount,@itemcount + 1;
+          if(countitem(1023) > 8)set @itemcount,@itemcount + 1;
+          next;
+          if(@itemcount > 14)
+	  {
+            mes "[Kurdt]";
+            mes "Ah....!";
+            mes "You gathered everything I need.";
+            mes "Thank you so much.";
+            mes "With these, I can continue my research with no problem.";
+            next;
+            mes "[Kurdt]";
+            mes "I didn't expect you to do such a good job...";
+            mes "you are great!";
+            mes "Thank you so much!";
+            mes "Hahaha....";
+            mes "Just like me, other investigator might need you to help them.";
+
+          if(countitem(918) > 8)delitem 918,9;
+          if(countitem(950) > 8)delitem 950,9;
+          if(countitem(951) > 8)delitem 951,9;
+          if(countitem(956) > 8)delitem 956,9;
+          if(countitem(959) > 8)delitem 959,9;
+          if(countitem(960) > 8)delitem 960,9;
+          if(countitem(961) > 8)delitem 961,9;
+          if(countitem(962) > 8)delitem 962,9;
+          if(countitem(963) > 8)delitem 963,9;
+          if(countitem(964) > 8)delitem 964,9;
+          if(countitem(965) > 8)delitem 965,9;
+          if(countitem(966) > 8)delitem 966,9;
+          if(countitem(7013) > 8)delitem 7013,9;
+          if(countitem(1054) > 8)delitem 1054,9;
+          if(countitem(1053) > 8)delitem 1053,9;
+          if(countitem(1052) > 8)delitem 1052,9;
+          if(countitem(1051) > 8)delitem 1051,9;
+          if(countitem(1050) > 8)delitem 1050,9;
+          if(countitem(1024) > 8)delitem 1024,9;
+          if(countitem(1023) > 8)delitem 1023,9;
+
+              set god_sl_2,0;
+            if(god_sl_1 == 31)
+              set god_sl_1,32;
+            if(god_sl_1 == 42)
+              set god_sl_1,43;
+            if(god_sl_1 == 13)
+              set god_sl_1,14;
+            if(god_sl_1 == 24)
+              set god_sl_1,50;
+            close;
+	  }
+          else
+	  {
+            mes "[Kurdt]";
+            mes "Errr.........";
+            mes "It does not seem to be enough for the research.";
+            mes "Sorry for the trouble, please go gather some more.";
+            close;
+          }
+        }
+      }
+      else
+      {
+        mes "[Kurdt]";
+        mes "Hmmm....";
+        mes "Studying somthing does not only require";
+        mes "funds and manpower but enthusiasm and passion as well.";
+        next;
+        mes "[Kurdt]";
+        mes "Some financiers are so ignorant that they think";
+        mes "study only takes money and manpower.";
+        mes "However, even if they have enough funds and much of manpower";
+        mes "but they donnot give any motivation to the people who study";
+        mes "then the study cannot be succeeded.";
+        close;
+      }
+    }
+    else
+    {
+       mes "[Kurdt]";
+       mes "Hmmm....";
+       mes "Studying somthing does not only require";
+       mes "funds and manpower but enthusiasm and passion as well.";
+       next;
+       mes "[Kurdt]";
+       mes "Some financiers are so ignorant that they think";
+       mes "study only takes money and manpower.";
+       mes "However, even if they have enough funds and much of manpower";
+       mes "but they donnot give any motivation to the people who study";
+       mes "then the study cannot be succeeded.";
+       close;
+    }
+
+}
+
+//Pavel Stheinus Breath of Spirit
+que_god01.gat,14,47,3	script	Investigator#God4	713,{
+
+    if($God1 < 100)
+    {
+      if(god_sl_1 == 2)set god_sl_1,41;
+
+      if(god_sl_1 == 41 || god_sl_1 == 12 || god_sl_1 == 23 || god_sl_1 == 34)
+      {
+        if(god_sl_2 == 0)
+	{
+          mes "[Pavel]";
+          mes "*sniff sniff*...";
+          mes "Achoo!";
+          mes "Huh?";
+          mes "Who are you....?";
+          mes "....";
+          next;
+          mes "[Pavel]";
+          mes "Ah, my apology.";
+          mes "You must be the new assistant...Aaachoo!";
+          mes "Hmm hmm *sniff sniff*...I am sorry, I am having a flu...";
+          mes "*sniff sniff*...";
+          mes "*sniff*...hmmm...";
+          next;
+          mes "[Pavel]";
+          mes "Umm....";
+          mes "It is good to know that you are here to help me....";
+          mes "However...Aaaachooo!";
+          mes "*sniff sniff*...";
+          next;
+          mes "[Pavel]";
+          mes "Hmm...Aaachooo!";
+          mes "Anyways, go look at...Aaachoo! that...Aaachoo!";
+          mes "thing...*sniff sniff*~";
+          set god_sl_2,1;
+          close;
+	}
+        else if(god_sl_2 == 1)
+	{
+          mes "[Pavel]";
+          mes "I told you to go look at Aaachhoooo! that...Aaachoooo! Achoo!";
+          mes "*glhk glhk*...";
+          mes "Hmm hmm..";
+          close;
+	}
+        else if(god_sl_2 == 2)
+	{
+          mes "[Pavel]";
+          mes "*cough cough*...";
+          mes "*sniff sniff*...";
+          mes "So did you go look at that?";
+          mes "Yeah, I don't think you understand even if you saw it.";
+          mes "*glhk glhk*...";
+          next;
+          mes "[Pavel]";
+          mes "AAAAACHHHOOO!";
+          mes "That slab of stone...no wait...Achoo!";
+          mes "The letters engaraved on the indescribable thing";
+          mes "are ancient....Achoo! ...language that are....Achoo!";
+          mes "no longer used nowadays.";
+          next;
+          mes "[Pavel]";
+          mes "I cannot ...*glhk glhk* tell what ancient";
+          mes "language..Achoo! it is...Achoo!";
+          mes "So...err...hmm hmm *sniff sniff*";
+          next;
+          mes "[Pavel]";
+          mes "Considering...Achoo! *sniff sniff* the material";
+          mes "Achoo! Achoo! used for the slab...*sniff sniff*,";
+          mes "it is not an Achoo! Achoo! *sniff sniff*ordinary slab of stone...";
+          mes "I guess...Aaaachoo!!!!! there must be some kind of";
+          mes "device installed on *sniff sniff*...";
+          next;
+          mes "[Pavel]";
+          mes "Aachoooo!! *sniff sniff* Not only that...*sniff sniff*";
+          mes "letters are not just engraved...*sniff sniff* Achhoo!!";
+          mes "but something Achooo!! covers...Achooo!";
+          mes "AAACHHHOOOO~~ the surfaces...*sniff sniff*";
+          next;
+          mes "[Pavel]";
+          mes "I must *cough cough* remove the device for...*cough cough*";
+          mes "further research...*cough cough*...but look at me.";
+          mes "I cannot even talk...*ghlk ghlk* clearly...";
+          next;
+          mes "[Pavel]";
+          mes "Hmm *sniff sniff*...so I hope you don't";
+          mes "mind Achoo!...helping me to remove Achoo!!...the device...";
+          mes "Achoo! ~ Thank you....";
+          mes "AAAACHHHOOOO~";
+          set god_sl_2,3;
+          close;
+	}
+        else if(god_sl_2 == 3)
+	{
+          mes "[Pavel]";
+          mes "Aaaaa...Cccccchhhh...oooo..!";
+          mes "*sniff sniff*...";
+          mes "Err...what I meant was..AAACHHOOO!...";
+          mes "*sniff sniff*...";
+          close;
+	}
+        else if(god_sl_2 == 4)
+	{
+          mes "[Pavel]";
+          mes "*cough*...";
+          mes "......!!";
+          mes "Oh...Acchhhoo!~";
+          mes "Now I see...";
+          mes "*sniff sniff*...";
+          next;
+          mes "[Pavel]";
+          mes "I was~Achoo! right, Achoo!";
+          mes "there was a device installed...Achoo! on it.";
+          mes "I could...*cough cough* not...*sniff sniff*";
+          mes "investigate...Achoo! the slab thoroughly...Achoo!";
+          mes "because of this god damn flu making me sneeze.";
+          next;
+          mes "[Pavel]";
+          mes "Achoo! Achoo! ~ thank you for your help....*sniff sniff*";
+          mes "Haha....*ghlk ghlk*...you did a good job.";
+          mes "*cough cough*..";
+          set god_sl_2,0;
+          if(god_sl_1 == 41)
+	    set god_sl_1,42;
+          if(god_sl_1 == 12)
+            set god_sl_1,13;
+          if(god_sl_1 == 23)
+            set god_sl_1,24;
+          if(god_sl_1 == 34)
+            set god_sl_1,50;
+          close;
+        }
+      }
+      else
+      {
+        mes "[Pavel]";
+        mes "Umm....";
+        mes "It is not that important whether or not";
+        mes "we can embody a spirit into a shape.";
+        mes "It is important whether we";
+        mes "can prove the existance of spirit or not.";
+        close;
+      }
+    }
+    else
+    {
+        mes "[Pavel]";
+        mes "Umm....";
+        mes "It is not that important whether or not";
+        mes "we can embody a spirit into a shape.";
+        mes "It is important whether we";
+        mes "can prove the existance of spirit or not.";
+      close;
+    }
+
+}
+  
+que_god01.gat,20,48,0	script	Slab#God	111,{
+
+  if($God1 < 100)
+  {
+    if(god_sl_1 == 41 || god_sl_1 == 12 || god_sl_1 == 23 || god_sl_1 == 34)
+    {
+      if(god_sl_2 == 1 || god_sl_2 == 2)
+      {
+        mes "....whgks ^ff00ffdirdnl^000000sjs wkrdjswhgks whdtnfb";
+        mes "............djswhgks wkdusdnlrnlfn";
+        mes ".......whsjs rhf tk dmqsjs rj ehddjfn";
+        mes "wkdusgks ^ff00fftkaryf^000000dnl durjfflrhsjs wkrdjswhgks ......";
+        mes "wkrdjswhgks shfh wkrdjswhgks wkdus wkr...";
+        mes "^ff00ffghswka^000000gks ........fusjs tmld.........";
+        set god_sl_2,2;
+        next;
+        mes "Unknown letters are engraved on the slab of stone.";
+        mes "They look like an ancient language.";
+        mes "The slab of stone has been severely damaged";
+        mes "to recognize every letter.";
+        mes "As you touched the surface, it was warm.";
+        mes "Definately, the slab didn't seem to be made of an ordinary stone.";
+        close;
+      }
+      else if(god_sl_2 == 3)
+      {
+        mes "....whgks ^ff00ffdirdnl^000000sjs wkrdjswhgks whdtnfn";
+        mes "............djswhgks wkdusdnlrnlfn";
+        mes ".......whsjs rhf tk dmqsjs rj ehddjfn";
+        mes "wkdusgks ^ff00fftkaryf^000000dnl durjfflrhsjs wkrdjswhgks ......";
+        mes "wkrdjswhgks shfh wkrdjswhgks wkdus wkr...";
+        mes "^ff00ffghswka^000000gks.........fusjs tmld.........";
+        next;
+        mes "As you took a close look, you found strange traces on each letter.";
+        mes "It seemed there was a kind of device installed on letters.";
+        next;
+        mes "....whgks ^ff00ffdirdnl^000000sjs wkrdjswhgks whdtnfb";
+        mes "............djswhgks wkdusdnlrnlfn";
+        mes ".......whsjs rhf tk dmqsjs rj ehddjfn";
+        mes "wkdusgks ^ff00fftkaryf^000000dnl durjfflrhsjs wkrdjswhgks ......";
+        mes "wkrdjswhgks shfh wkrdjswhgks wkdus wkr...";
+        mes "^ff00ffghswka^000000gks ........fusjs tmld.........";
+        next;
+        input @str$;
+        if (@str$ == "dirdnl")
+	{
+          mes "Zap~";
+          mes "As you pressed a word '^ff0000dirdnl^000000',";
+          mes "the slab made a strange noise.";
+          mes "However, there were no other changes other than the noise.";
+          mes "You decided to touch other words.";
+          next;
+          mes "....whgks ^ff00ffdirdnl^000000sjs wkrdjswhgks whdtnfb";
+          mes "............djswhgks wkdusdnlrnlfn";
+          mes ".......whsjs rhf tk dmqsjs rj ehddjfn";
+          mes "wkdusgks ^ff00fftkaryf^000000dnl durjfflrhsjs wkrdjswhgks ......";
+          mes "wkrdjswhgks shfh wkrdjswhgks wkdus wkr...";
+          mes "^ff00ffghswka^000000gks ........fusjs tmld.........";
+          next;
+	}
+        else
+	{
+          mes "You touched a word ^ff0000"+@str$+"^000000, nothing happened.";
+          mes "You decided to think up something different.";
+          close;
+        }
+        input @str$;
+        if (@str$ == "tkaryf")
+	{
+          mes "Zap~";
+          mes "As you pressed a word '^ff0000tkaryf^000000',";
+          mes "the slab made a strange noise.";
+          mes "However, there were no other changes other than the noise.";
+          mes "You decided to touch other words.";
+          next;
+          mes "....whgks ^ff00ffdirdnl^000000sjs wkrdjswhgks whdtnfb";
+          mes "............djswhgks wkdusdnlrnlfn";
+          mes ".......whsjs rhf tk dmqsjs rj ehddjfn";
+          mes "wkdusgks ^ff00fftkaryf^000000dnl durjfflrhsjs wkrdjswhgks ......";
+          mes "wkrdjswhgks shfh wkrdjswhgks wkdus wkr...";
+          mes "^ff00ffghswka^000000gks ........fusjs tmld.........";
+          next;
+	}
+        else
+	{
+          mes "You touched a word ^ff0000"+@str$+"^000000, nothing happened.";
+          mes "You decided to think up something different.";
+          close;
+        }
+        input @str$;
+        if (@str$ == "ghswka")
+	{
+          mes "Zap~";
+          mes "As you pressed a word '^ff0000ghswka^000000',";
+          mes "the slab made a strange noise.";
+          mes "However, there were no other changes other than the noise.";
+          mes "You decided to touch other words.";
+          next;
+          mes "....whgks ^ff00ffdirdnl^000000sjs wkrdjswhgks whdtnfb";
+          mes "............djswhgks wkdusdnlrnlfn";
+          mes ".......whsjs rhf tk dmqsjs rj ehddjfn";
+          mes "wkdusgks ^ff00fftkaryf^000000dnl durjfflrhsjs wkrdjswhgks ......";
+          mes "wkrdjswhgks shfh wkrdjswhgks wkdus wkr...";
+          mes "^ff00ffghswka^000000gks ........fusjs tmld.........";
+          next;
+	}
+        else
+	{
+          mes "You touched a word ^ff0000"+@str$+"^000000, nothing happened.";
+          mes "You decided to think up something different.";
+          close;
+        }
+        mes "Eeeeeeeeee~";
+        mes "As you pressed the three words in order,";
+        mes "the slab started vibrating with a strange noise.";
+        mes "At the same time, the strange traces on letters slowly dissappeared";
+        mes "and different letters appeared from underneath them.";
+        next;
+        mes "wkrdjswhgks dirdnlsjs wkrdjswhgks whdtnfh";
+        mes "wkrdjswhgks dldgnsdjs wkrdjswhgks wkdusdnlrnlfn";
+        mes "thfdh duTsjswhsjs rhf tk dmqsjs rj ehddjfn";
+        mes "wkdusgks tkaryfdnl durjfflrhsjs wkrdjswhgks tkatnfu";
+        mes "wkrdjswhgks shfh wkrdjswhgks wkdus wkrdjswhgks dldgns";
+        mes "ghswkagks tkatnfusjs tmldaldgks akrnl";
+        next;
+        mes "..........";
+        mes "You still could not understand what those letters meant.";
+        mes ".........";
+        set god_sl_2,4;
+        next;
+        mes "After a while, those new letters dissappeared.";
+        mes "It seemed that you could only cancel";
+        mes "the device on the letters for a duration.";
+        close;
+      }
+      else
+      {
+        mes "....whgks dirdnlsjs wkrdjswhgks whdtnfn";
+        mes "............djswhgks wkdusdnlrnlfn";
+        mes ".......whsjs rhf tk dmqsjs rj ehddjfn";
+        mes "wkdusgks tkaryfdnl durjfflrhsjs wkrdjswhgks ......";
+        mes "wkrdjswhgks shfh wkrdjswhgks wkdus wkr...";
+        mes "ghswkagks .........fusjs tmld.........";
+        next;
+        mes "The slab of stone has been severely damaged";
+        mes "to recognize every letter.";
+        mes "As you touched the surface, it was warm.";
+        mes "Definately, the slab didn't seem to be made of an ordinary stone.";
+        mes "You decided to not care about the stone any longer.";
+        close;
+      }
+    }
+    else
+    {
+        mes "....whgks dirdnlsjs wkrdjswhgks whdtnfn";
+        mes "............djswhgks wkdusdnlrnlfn";
+        mes ".......whsjs rhf tk dmqsjs rj ehddjfn";
+        mes "wkdusgks tkaryfdnl durjfflrhsjs wkrdjswhgks ......";
+        mes "wkrdjswhgks shfh wkrdjswhgks wkdus wkr...";
+        mes "ghswkagks .........fusjs tmld.........";
+        next;
+        mes "The slab of stone has been severely damaged";
+        mes "to recognize every letter.";
+        mes "As you touched the surface, it was warm.";
+        mes "Definately, the slab didn't seem to be made of an ordinary stone.";
+      close;
+    }
+  }
+  else
+  {
+      mes "You found a slab of stone with strange letters engraved on the surface.";
+      mes "You could not identify what language it was.";
+      close;
+  }
+
+}
+
+//Lania Grunkurque
+payon.gat,79,171,4	script	Friar#God5	95,{
+
+    if($God1 < 100)
+    {
+    if(god_sl_1 == 21 || god_sl_1 == 32 || god_sl_1 == 43 || god_sl_1 == 14)
+    {
+      if(god_sl_2 == 1 || god_sl_2 == 3)
+      {
+        mes "[Lania]";
+        mes "You can find good advice for yourself from folklores and legends.";
+        mes "No matter how many years have passed and how improved people have,";
+        mes "the basic of life will never change.";
+        next;
+        switch( select( "Umm.....", "I see." ) )
+	{
+
+          case 1:
+          mes "[Lania]";
+          mes "Well......";
+          mes "You seem to have a business with me, may I ask?";
+          mes "I will help you as much as I can.";
+          next;
+          mes "[Lania]";
+          mes "It is no use to have a power to help others";
+          mes "unless you use the power in a right purpose.";
+          next;
+
+              switch( select( "Nothing. Your words helped me already.","Regarding Sleipnir." ) )
+	      {
+
+              case 1:
+                mes "[Lania]";
+                mes "I must misunderstood.";
+                mes "However, feel free to ask me a help whenever you need it.";
+                mes "It is also a training for me to help others.";
+                mes "I hope you will be generous to others as well...";
+                close;
+              break;
+
+              case 2:
+                mes "[Lania]";
+                mes "Umm.........";
+                mes "I see.";
+                mes "I think I can help you for that.";
+                mes "Please give me some time to remember it....Sleipnir...";
+                mes "Hmmm....";
+                mes "..........";
+                mes "...................";
+                next;
+                mes "[Lania]";
+                mes "Ah.........";
+                mes "I remember it now...";
+                mes "Yes, Sleipnir was the name of Odin's stallion.";
+                next;
+                mes "[Lania]";
+                mes "In the world of Gods, there were three legendary stallions.";
+                mes "They were ^ff0000'Sleipnir (A thing that ride as sliding)'";
+                mes "'Svadilfari (An unfortunate traveller)'";
+                mes "'Gullfaxi (Golden Mane)'^000000.";
+                next;
+                mes "[Lania]";
+                mes "Gullfaxi was owned by Hrungnir, the giant king and";
+                mes "Svadilfari was owned by Hrimthurs.";
+                mes "Also, 'Svadilfari' was the father of 'Sleipnir'.";
+                next;
+                mes "[Lania]";
+                mes "Okay, now let's talk about how 'Sleipnir' was born.";
+                mes "Well...we can see even Gods made mistakes";
+                mes "through this story.";
+                next;
+                mes "[Lania]";
+                mes "In Asgard the world of Gods,";
+                mes "there was a huge rampart.";
+                mes "Something happened and the rampart was destroyed.";
+                mes "Since this castle wall was too huge, Gods could";
+                mes "not dare to start mending it.";
+                next;
+                mes "[Lania]";
+                mes "One day, a very skinny man rode a dark horse into Asgard.";
+                mes "The man told Heimdall who was patrolling the wall";
+                mes "that he had something to tell Odin regarding the rampart.";
+                next;
+                mes "[Lania]";
+                mes "Since he was greatly concerned about the wall";
+                mes "Heimdall didn't hesitate to report it to Odin.";
+                mes "At the time, Odin was with other Gods in Valhala.";
+                next;
+                mes "[Lania]";
+                mes "Man promised to Odin that he could";
+                mes "build the rampart just like a new one";
+                mes "in 18 months.";
+                next;
+                mes "[Lania]";
+                mes "Although Odin felt something suspicious about the man,";
+                mes "Gods needed to repair the wall as soon as possible.";
+                mes "So, Odin asked him what he needed in return.";
+                mes "He asked to give him the goddess 'Freya' and";
+                mes "'the Sun and the Moon' as the payment.";
+                next;
+                mes "[Lania]";
+                mes ".....";
+                mes "Are you bored?";
+                mes "If you are, let's talk about this later.";
+                next;
+                switch( select( "See you later.", "No, please go ahead." ) )
+		{
+
+                  case 1:
+                    mes "[Lania]";
+                    mes "I understand that my story was not that interesting.";
+                    mes "I will try my best to satisfy you next time.";
+                    mes "Have a good travel.";
+                    close;
+                  break;
+
+                  case 2:
+                    mes "[Lania]";
+                    mes "Oh ok.";
+                    mes "Then let me continue the story.";
+                    next;
+                  break;
+
+                }
+
+                mes "[Lania]";
+                mes "Gods were all stunned and became furious";
+                mes "due to the man's request.";
+                mes "He was asking everything that Gods have.";
+                next;
+                mes "[Lania]";
+                mes "At this time, a God approached to Odin.";
+                mes "It was the infamous Loki.";
+                mes "Loki said to Odin that";
+                mes "they could manipulate the man to repair";
+                mes "the rampart without paying him anything in return.";
+                next;
+                mes "[Lania]";
+                mes "Odin decided to follow Loki's suggestion.";
+                mes "So Odin told the man that he must";
+                mes "complete to repair the wall within 6 months";
+                mes "not 18 months in order to have 'Freya' and 'the Sun and the Moon'.";
+                next;
+                mes "[Lania]";
+                mes ".....";
+                mes "Are you bored?";
+                mes "If you are, let's talk about this later.";
+                next;
+                switch( select( "Let me organize the story first.", "See you later.", "No, please go ahead." ) )
+		{
+
+                  case 1:
+                    mes "[Lania]";
+                    mes "Ah....";
+                    mes "The story must be too long.";
+                    mes "My apology...";
+                    mes "Okay, I will next; for you to finish organizing the story...";
+                    next;
+                    mes "......................";
+                    mes "..................";
+                    mes "...............";
+                    mes "............";
+                    mes ".........";
+                    mes "......";
+                    next;
+                    mes "..................";
+                    mes "...............";
+                    mes "............";
+                    mes ".........";
+                    mes "......";
+                    next;
+                    mes "...............";
+                    mes "............";
+                    mes ".........";
+                    mes "......";
+                    next;
+                    mes "............";
+                    mes ".........";
+                    mes "......";
+                    next;
+                    mes ".........";
+                    mes "......";
+                    next;
+                    mes "......";
+                    next;
+                    mes "[Lania]";
+                    mes "May I continue the story now?";
+                    next;
+                    menu "Yes, please.",-;
+                    mes "[Lania]";
+                    mes "Okay, here it goes.";
+                    next;
+                  break;
+
+                  case 2:
+                    mes "[Lania]";
+                    mes "I understand that my story was not that interesting.";
+                    mes "I will try my best to satisfy you next time.";
+                    mes "Have a good travel.";
+                    close;
+                  break;
+
+                  case 3:
+                    mes "[Lania]";
+                    mes "Oh ok.";
+                    mes "Then let me continue the story.";
+                    next;
+                  break;
+
+               }
+
+                mes "[Lania]";
+                mes "Then the man asked Odin to let him";
+                mes "use his horse for the reconstruction work.";
+                mes "Because the horse looked very base and contemptible,";
+                mes "Odin didn't think twice about his request but accepted it on right the second.";
+                next;
+                mes "[Lania]";
+                mes "However, the man and the horse started repairing";
+                mes "the rampart in an amazing speed.";
+                mes "His skill was great but the horse's skill was greater than its owner";
+                mes "to mend the wall.";
+                mes "It was the legendary horse, Svadilfari.";
+                next;
+                mes "[Lania]";
+                mes "As more time went by, more anxious Gods were.";
+                mes "Because both of the castle wall menders";
+                mes "looked like they would complete the reconstruction work";
+                mes "even before the 6 months passed.";
+                mes "So Gods took their anger and axiouty on Loki";
+                mes "for his silly suggestion.";
+                next;
+                mes "[Lania]";
+                mes "However, Loki seemed confident.";
+                mes "He assured Gods to count on him.";
+                mes "Although Gods didn't trust Loki for his slyness and wickedness,";
+                mes "they decided to give him a chance since";
+                mes "the situation was desperate.";
+                next;
+                mes "[Lania]";
+                mes "And a strange thing happened. Ever since Loki";
+                mes "assurred Gods for the result, the progress of the reconstruction";
+                mes "had stopped. Just like a magic.";
+                next;
+                mes "[Lania]";
+                mes ".....";
+                mes "Are you bored?";
+                mes "If you are, let's talk about this later.";
+                next;
+                switch( select( "See you later.", "No, please go ahead." ) )
+		{
+
+                  case 1:
+                    mes "[Lania]";
+                    mes "I understand that my story was not that interesting.";
+                    mes "I will try my best to satisfy you next time.";
+                    mes "Have a good travel.";
+                    close;
+                  break;
+
+                  case 2:
+                    mes "[Lania]";
+                    mes "Oh ok.";
+                    mes "Then let me continue the story.";
+                    next;
+                  break;
+
+                }
+
+                mes "[Lania]";
+                mes "Gods became curious so they decided to investigate the reason.";
+                mes "The found Svadilfari fell in love with a beautiful mare";
+                mes "and didn't work on repairing the rampart.";
+                mes "So when the 6 months passed, the man";
+                mes "finished everything but the castle gate to repair.";
+                next;
+                mes "[Lania]";
+                mes "Gods were so happy to tell the man";
+                mes "that they could not accept his payment request";
+                mes "since he could not keep the contract.";
+                mes "Man got into rage and claimed";
+                mes "that Gods tricked him in order to avoid giving him";
+                mes "'Freya' and 'the Sun and the Moon'.";
+                next;
+                mes "[Lania]";
+                mes "And he revealed his true identity.";
+                mes "He was a giant from Jotunnheim.";
+                mes "He was so angry and started committing an outrage.";
+                next;
+                mes "[Lania]";
+                mes ".....";
+                mes "Are you bored?";
+                mes "If you are, let's talk about this later.";
+                next;
+                switch( select( "See you later.", "No, please go ahead." ) )
+		{
+
+                  case 1:
+                    mes "[Lania]";
+                    mes "I understand that my story was not that interesting.";
+                    mes "I will try my best to satisfy you next time.";
+                    mes "Have a good travel.";
+                    close;
+                  break;
+
+                  case 2:
+                    mes "[Lania]";
+                    mes "Oh ok.";
+                    mes "Then let me continue the story.";
+                    next;
+                  break;
+
+                }
+
+                mes "[Lania]";
+                mes "Later on, this giant turned out to be Hrimthurs.";
+                mes "However, even if Hrimthurs was commiting an outrage";
+                mes "Gods did not worry about him at all.";
+                mes "Because they had Thor, the giant hunter.";
+                next;
+                mes "[Lania]";
+                mes "As Thor hurled his legendary hammer 'Mjolnir'";
+                mes "at Hrimthurs, the giant's head was bursted into fragments";
+                mes "and he fell to the hell.";
+                next;
+                mes "[Lania]";
+                mes ".....";
+                mes "Are you bored?";
+                mes "If you are, let's talk about this later.";
+                next;
+                switch( select( "Let me organize the story first.", "See you later.", "No, please go ahead." ) )
+		{
+
+                  case 1:
+                    mes "[Lania]";
+                    mes "Ah....";
+                    mes "The story must be too complicated for you to understand.";
+                    mes "My apology...";
+                    mes "Okay, I will wait for you to finish organizing the story...";
+                    next;
+                    mes "......................";
+                    mes "..................";
+                    mes "...............";
+                    mes "............";
+                    mes ".........";
+                    mes "......";
+                    next;
+                    mes "..................";
+                    mes "...............";
+                    mes "............";
+                    mes ".........";
+                    mes "......";
+                    next;
+                    mes "...............";
+                    mes "............";
+                    mes ".........";
+                    mes "......";
+                    next;
+                    mes "............";
+                    mes ".........";
+                    mes "......";
+                    next;
+                    mes ".........";
+                    mes "......";
+                    next;
+                    mes "......";
+                    next;
+                    mes "[Lania]";
+                    mes "May I continue the story now?";
+                    next;
+                    menu "Yes, please.",-;
+                        mes "[Lania]";
+                        mes "Okay, here it goes.";
+                        next;
+                  break;
+
+                  case 2:
+                    mes "[Lania]";
+                    mes "I understand that my story was not that interesting.";
+                    mes "I will try my best to satisfy you next time.";
+                    mes "Have a good travel.";
+                    close;
+                  break;
+
+                  case 3:
+                    mes "[Lania]";
+                    mes "Oh ok.";
+                    mes "Then let me continue the story.";
+                    next;
+                  break;
+
+                }
+                mes "[Lania]";
+                mes "After a while, Loki who looked tattered and worn out";
+                mes "brought a strange looking pony with eight leggs to Asgard.";
+                mes "And Loki introduced the pony as 'Sleipnir' and";
+                mes "presented it to Odin.";
+                mes "Odin thankfully accepted Loki's present.";
+                next;
+                mes "[Lania]";
+                mes "The fact was Loki transformed into the mare that";
+                mes "attracted Svadilfari and eventually he was impregnated";
+                mes "of the pony. That was the story of";
+                mes "how 'Sleipnir' was born.";
+                next;
+                mes "[Lania]";
+                mes "We, friars only hand down this story by word of mouth.";
+                mes "Therefore, small details might be different from the other.";
+                mes "However, the fundamental story line should not be different.";
+                next;
+                mes "[Lania]";
+                mes "I have not been able to practice myself that well,";
+                mes "I am not that confident if I told you the story as much as the original story.";
+                mes "But I hope you will understand that I did my best.";
+                mes "That was all I could help you.";
+                next;
+                mes "[Lania]";
+                mes "If you wish to listen to the story again,";
+                mes "you are always welcomed.";
+                mes "Have a safe travel.";
+                if(god_sl_2 == 1)
+                  set god_sl_2,2;
+                else if(god_sl_2 == 3)
+                  set god_sl_2,4;
+                close;
+              break;
+            }
+          break;
+
+          case 2:
+            mes "[Lania]";
+            mes "When you are in agony,";
+            mes "please look back on your past.";
+            mes "Just like legends or myths,";
+            mes "yours is also a story of the past.";
+            mes "You will find out a right solution from your past.";
+            close;
+          break;
+        }
+      }
+      else
+      {
+        mes "[Lania]";
+        mes "I told you everything I know.";
+        mes "I hope it will be a help for you.";
+        mes "Please be helpful for others...";
+        close;
+      }
+    }
+    else
+    {
+      mes "[Lania]";
+      mes "............";
+      mes "Training does not include only physical or mental practice.";
+      mes "Leading a life and meeting people are also considered";
+      mes "as a part of practice. Of course, everyone will have a different result.";
+      close;
+    }
+  }  
+  else
+  {
+      mes "[Lania]";
+      mes "............";
+      mes "Training does not include only physical or mental practice.";
+      mes "Leading a life and meeting people are also considered";
+      mes "as a part of practice. Of course, everyone will have a different result.";
+      close;
+  }
+
+}
+  
+// warp 0 -laboratory entrance
+que_god01.gat,84,95,0	script	Switch#God0	111,{
+
+    if(god_sl_1 > 1 && god_sl_1 < 51)
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "As you put your temporary pass onto the detector,";
+      mes "the door was open.";
+      close2;
+      warp "que_god01.gat",60,88;
+      end;
+    }
+    else
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "It seemed you need to put something onto";
+      mes "the detector in order to open the door.";
+      close;
+    }
+
+}
+
+que_god01.gat,84,92,0	script	god_sl_w0	45,1,1,{
+
+    if(god_sl_1 > 1 && god_sl_1 < 51)
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "As you put your temporary pass onto the detector,";
+      mes "the door was open.";
+      next;
+      warp "que_god01.gat",60,88;
+      end;
+    }
+    else
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "It seemed you need to put something onto";
+      mes "the detector in order to open the door.";
+      close;
+    }
+
+}
+
+// ¿öÇÁ 1¹ø -Ç϶õµµÆ®
+que_god01.gat,49,97,0	script	Switch#God1	111,{
+
+    if(god_sl_1 > 1 && god_sl_1 < 51)
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "As you put your temporary pass onto the detector,";
+      mes "the door was open.";
+      next;
+      warp "que_god01.gat",62,119;
+      end;
+    }
+    else
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "It seemed you need to put something onto";
+      mes "the detector in order to open the door.";
+      close;
+    }
+
+}
+
+que_god01.gat,46,97,0	script	god_sl_w1	45,1,1,{
+
+    if(god_sl_1 > 1 && god_sl_1 < 51)
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "As you put your temporary pass onto the detector,";
+      mes "the door was open.";
+      next;
+      warp "que_god01.gat",62,119;
+      end;
+    }
+    else
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "It seemed you need to put something onto";
+      mes "the detector in order to open the door.";
+      close;
+    }
+
+}
+
+
+// ¿öÇÁ 2¹ø -¾Æµò
+que_god01.gat,19,97,0	script	Switch#God2	111,{
+
+    if(god_sl_1 > 1 && god_sl_1 < 51)
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "As you put your temporary pass onto the detector,";
+      mes "the door was open.";
+      next;
+      warp "que_god01.gat",12,119;
+      end;
+    }
+    else
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "It seemed you need to put something onto";
+      mes "the detector in order to open the door.";
+      close;
+    }
+
+}
+
+que_god01.gat,16,97,0	script	god_sl_w2	45,1,1,{
+
+    if(god_sl_1 > 1 && god_sl_1 < 51)
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "As you put your temporary pass onto the detector,";
+      mes "the door was open.";
+      next;
+      warp "que_god01.gat",12,119;
+      end;
+    }
+    else
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "It seemed you need to put something onto";
+      mes "the detector in order to open the door.";
+      close;
+    }
+
+}
+
+que_god01.gat,14,80,0	script	Switch#God3	111,{
+
+    if(god_sl_1 > 1 && god_sl_1 < 51)
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "As you put your temporary pass onto the detector,";
+      mes "the door was open.";
+      next;
+      warp "que_god01",12,52;
+      end;
+    }
+    else
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "It seemed you need to put something onto";
+      mes "the detector in order to open the door.";
+      close;
+    }
+
+}
+
+que_god01.gat,17,80,0	script	god_sl_w3	45,1,1,{
+
+    if(god_sl_1 > 1 && god_sl_1 < 51)
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "As you put your temporary pass onto the detector,";
+      mes "the door was open.";
+      next;
+      warp "que_god01.gat",12,52;
+      end;
+    }
+    else
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "It seemed you need to put something onto";
+      mes "the detector in order to open the door.";
+      close;
+    }
+
+}
+
+// ¿öÇÁ 4¹ø Äí¸£Æ®
+que_god01.gat,44,80,0	script	Switch#God4	111,{
+
+    if(god_sl_1 > 1 && god_sl_1 < 51)
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "As you put your temporary pass onto the detector,";
+      mes "the door was open.";
+      next;
+      warp "que_god01.gat",50,52;
+      end;
+     }
+    else
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "It seemed you need to put something onto";
+      mes "the detector in order to open the door.";
+      close;
+    }
+
+}
+
+que_god01.gat,47,80,0	script	god_sl_w4	45,1,1,{
+
+    if(god_sl_1 > 1 && god_sl_1 < 51)
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "As you put your temporary pass onto the detector,";
+      mes "the door was open.";
+      next;
+      warp "que_god01.gat",50,52;
+      end;
+    }
+    else
+    {
+      mes "The door was locked.";
+      mes "You looked around and found out a detector";
+      mes "at the right side of the door.";
+      mes "It seemed you need to put something onto";
+      mes "the detector in order to open the door.";
+      close;
+    }
+
+}
diff --git a/npc/quests/skills/acolyte_skills.txt b/npc/quests/skills/acolyte_skills.txt
index 584207fc7..06f198aa2 100644
--- a/npc/quests/skills/acolyte_skills.txt
+++ b/npc/quests/skills/acolyte_skills.txt
@@ -1,129 +1,129 @@
-//===== eAthena Script =======================================

-//= Acolyte Skill Quest

-//===== By: ==================================================

-//= kobra_k88

-//===== Current Version: =====================================

-//= 1.4a

-//===== Compatible With: =====================================

-//= eAthena 7.15 +

-//===== Description: =========================================

-//= <Description> 

-//===== Additional Comments: =================================

-//= v1.0a Now using functions found in "Global_Functions.txt"

-//= for class checks.

-//= 1.2 Added Baby Class Support [Lupus]

-//= 1.3 Removed callfunc Is_####_Class in favor of baseClass [Silentdragon]

-//= 1.4 Fixed an exploit [Lupus]

-//= 1.4a changed perm. variables to temp ones [Lupus]

-//============================================================

-

-

-prt_church.gat,173,23,4	script	Acolyte Klift	79,{

-	mes "[Acolyte Klift]";

-	if (baseClass == Job_Acolyte) goto L_Start;

-

-L_Other:

-	mes "Ah, welcome to the Prontera Church also known as the Sanctuary.";

-	mes "Unfortunately I cannot be of much help to you.  For my fellow";

-	mes "Priests and Acolytes however, I can help them to find their ^5555FF'hidden";

-	mes "ability'^000000.";

-	close;

-

-L_Start:

-	if(@HOLYLIGHT) goto L_Check;

-	if(getskilllv(156)>0) goto L_GotSkill;

-	if(sex==1) mes "Ahh... Brother!";

-	if(sex==0) mes "Ahh... Sister!";

-	mes "Does the task of caring for our lost sheep tire you out? Is it too";

-	mes "much of a burden? Do not despair, I am here to assist you.";

-	next;

-	menu "About an Acolyte's ^5555FF'hidden ablitiy'^000000...",M_0, "End Conversation.",M_End;

-

-	M_0:

-		mes "[Acolyte Klift]";

-		mes "Faced with great danger in an endless struggle with evil, our";

-		mes "brethren are in much need of assistance.";

-		next;

-		mes "[Acolyte Klift]";

-		mes "As acolytes approach their senior years in the clergy, they learn to";

-		mes "call upon their inner power to use a special skill to aid them in";

-		mes "battle.";

-		next;

-		mes "[Acolyte Klift]";

-		mes "That skill is ^5555FF'Holy Light'^000000.  Holy Light does damage to";

-		mes "all foes but is even more effective on the undead.";

-		next;

-		mes "[Acolyte Klift]";

-		mes "For someone like yourself to learn this skill, takes some hard work.";

-		mes "Would you like to learn this skill?";

-		next;

-		menu "Yes, please.",-, "Let me think about it.",M_End;

-

-			mes "[Acolyte Klift]";

-			mes "Very good.  You will need to find these items in order to learn the";

-			mes "skill:";

-			mes "^5555FF1 Opal^000000,";

-			mes "^5555FF1 Crystal Blue^000000,";

-			mes "and ^5555FF1 Rosary^000000.";

-			next;

-			mes "[Acolyte Klift]";

-			mes "Of course you will also need to have a sufficient level of";

-			mes "experience.  Namely a ^5555FFjob level of at least 30^000000.  This does";

-			mes "not apply to Priests or Monks however, because of the vast amount of";

-			mes "experience they already have.";

-			next;

-			mes "[Acolyte Klift]";

-			mes "Come back when you are ready.  I will be here.";

-			set @HOLYLIGHT, 1;

-			close;

-	M_End:

-		mes "[Acolyte Klift]";

-		mes "I understand your zeal.  You have much time yet to practice and gain";

-		mes "experience.  Go forth with many blessings...";

-		close;

-

-L_Check:

-	mes "So, are you ready for the Holy Light training? Let me check....";

-	next;

-	mes "[Acolyte Klift]";

-	if(BaseJob==Job_Acolyte && JobLevel<30) goto L_LowLvl;

-	if(countitem(727)<1 || countitem(991)<1 || countitem(2608)<1) goto L_NoItems;

-	delitem 727,1;

-	delitem 991,1;

-	delitem 2608,1;

-	mes "Oh! Very good.  You have brought back all of the items I asked for.";

-	next;

-	mes "[Acolyte Klift]";

-	mes "Ok lets get started...";

-	next;

-	mes "(after hours of praying and meditation)";

-	next;

-	mes "[Acolyte Klift]";

-	mes "Yes! I feel it. You have released your hidden abilities and can now";

-	mes "use ^5555FFHoly Light^000000!";

-	skill 156,1,0;

-	set @HOLYLIGHT, 0;

-	next;

-	mes "[Priest]";

-	mes "You have done well.  May God bless you!";

-	emotion e_no1;

-	close;

-

-	L_LowLvl:

-		mes "I'm sorry but you need more training before I can teach you Holy";

-		mes "Light.  Come back when your job level is at least 30.";

-		close;

-	L_NoItems:

-		mes "I'm sorry but you don't have the required items for Holy Light.";

-		mes "You need:";

-		mes "^5555FF1 Opal^000000,";

-		mes "^5555FF1 Crystal Blue^000000,";

-		mes "and ^5555FF1 Rosary^000000.";

-		close;

-

-L_GotSkill:

-	mes "Ah, I see you have been using Holy Light.  It is such a great skill";

-	mes "that I truly believe it to be a gift from the lord himself.  May";

-	mes "God be with you always.";

-	close;

-}

+//===== eAthena Script =======================================
+//= Acolyte Skill Quest
+//===== By: ==================================================
+//= kobra_k88
+//===== Current Version: =====================================
+//= 1.4a
+//===== Compatible With: =====================================
+//= eAthena 7.15 +
+//===== Description: =========================================
+//= <Description> 
+//===== Additional Comments: =================================
+//= v1.0a Now using functions found in "Global_Functions.txt"
+//= for class checks.
+//= 1.2 Added Baby Class Support [Lupus]
+//= 1.3 Removed callfunc Is_####_Class in favor of baseClass [Silentdragon]
+//= 1.4 Fixed an exploit [Lupus]
+//= 1.4a changed perm. variables to temp ones [Lupus]
+//============================================================
+
+
+prt_church.gat,173,23,4	script	Acolyte Klift	79,{
+	mes "[Acolyte Klift]";
+	if (baseClass == Job_Acolyte) goto L_Start;
+
+L_Other:
+	mes "Ah, welcome to the Prontera Church also known as the Sanctuary.";
+	mes "Unfortunately I cannot be of much help to you.  For my fellow";
+	mes "Priests and Acolytes however, I can help them to find their ^5555FF'hidden";
+	mes "ability'^000000.";
+	close;
+
+L_Start:
+	if(@HOLYLIGHT) goto L_Check;
+	if(getskilllv(156)>0) goto L_GotSkill;
+	if(sex==1) mes "Ahh... Brother!";
+	if(sex==0) mes "Ahh... Sister!";
+	mes "Does the task of caring for our lost sheep tire you out? Is it too";
+	mes "much of a burden? Do not despair, I am here to assist you.";
+	next;
+	menu "About an Acolyte's ^5555FF'hidden ablitiy'^000000...",M_0, "End Conversation.",M_End;
+
+	M_0:
+		mes "[Acolyte Klift]";
+		mes "Faced with great danger in an endless struggle with evil, our";
+		mes "brethren are in much need of assistance.";
+		next;
+		mes "[Acolyte Klift]";
+		mes "As acolytes approach their senior years in the clergy, they learn to";
+		mes "call upon their inner power to use a special skill to aid them in";
+		mes "battle.";
+		next;
+		mes "[Acolyte Klift]";
+		mes "That skill is ^5555FF'Holy Light'^000000.  Holy Light does damage to";
+		mes "all foes but is even more effective on the undead.";
+		next;
+		mes "[Acolyte Klift]";
+		mes "For someone like yourself to learn this skill, takes some hard work.";
+		mes "Would you like to learn this skill?";
+		next;
+		menu "Yes, please.",-, "Let me think about it.",M_End;
+
+			mes "[Acolyte Klift]";
+			mes "Very good.  You will need to find these items in order to learn the";
+			mes "skill:";
+			mes "^5555FF1 Opal^000000,";
+			mes "^5555FF1 Crystal Blue^000000,";
+			mes "and ^5555FF1 Rosary^000000.";
+			next;
+			mes "[Acolyte Klift]";
+			mes "Of course you will also need to have a sufficient level of";
+			mes "experience.  Namely a ^5555FFjob level of at least 30^000000.  This does";
+			mes "not apply to Priests or Monks however, because of the vast amount of";
+			mes "experience they already have.";
+			next;
+			mes "[Acolyte Klift]";
+			mes "Come back when you are ready.  I will be here.";
+			set @HOLYLIGHT, 1;
+			close;
+	M_End:
+		mes "[Acolyte Klift]";
+		mes "I understand your zeal.  You have much time yet to practice and gain";
+		mes "experience.  Go forth with many blessings...";
+		close;
+
+L_Check:
+	mes "So, are you ready for the Holy Light training? Let me check....";
+	next;
+	mes "[Acolyte Klift]";
+	if(BaseJob==Job_Acolyte && JobLevel<30) goto L_LowLvl;
+	if(countitem(727)<1 || countitem(991)<1 || countitem(2608)<1) goto L_NoItems;
+	delitem 727,1;
+	delitem 991,1;
+	delitem 2608,1;
+	mes "Oh! Very good.  You have brought back all of the items I asked for.";
+	next;
+	mes "[Acolyte Klift]";
+	mes "Ok lets get started...";
+	next;
+	mes "(after hours of praying and meditation)";
+	next;
+	mes "[Acolyte Klift]";
+	mes "Yes! I feel it. You have released your hidden abilities and can now";
+	mes "use ^5555FFHoly Light^000000!";
+	skill 156,1,0;
+	set @HOLYLIGHT, 0;
+	next;
+	mes "[Priest]";
+	mes "You have done well.  May God bless you!";
+	emotion e_no1;
+	close;
+
+	L_LowLvl:
+		mes "I'm sorry but you need more training before I can teach you Holy";
+		mes "Light.  Come back when your job level is at least 30.";
+		close;
+	L_NoItems:
+		mes "I'm sorry but you don't have the required items for Holy Light.";
+		mes "You need:";
+		mes "^5555FF1 Opal^000000,";
+		mes "^5555FF1 Crystal Blue^000000,";
+		mes "and ^5555FF1 Rosary^000000.";
+		close;
+
+L_GotSkill:
+	mes "Ah, I see you have been using Holy Light.  It is such a great skill";
+	mes "that I truly believe it to be a gift from the lord himself.  May";
+	mes "God be with you always.";
+	close;
+}
diff --git a/npc/quests/skills/alchemist_skills.txt b/npc/quests/skills/alchemist_skills.txt
index 5e1cf0f1f..6aacfbdb2 100644
--- a/npc/quests/skills/alchemist_skills.txt
+++ b/npc/quests/skills/alchemist_skills.txt
@@ -1,453 +1,453 @@
-//===== eAthena Script ======================================= 

-//= Alchemist Skills Quests

-//===== By: ================================================== 

-//= Lupus, Reddozen

-//===== Current Version: ===================================== 

-//= 1.5a

-//===== Compatible With: ===================================== 

-//= eAthena Revision 3800+

-//===== Description: ========================================= 

-//= Temp quests for new skills for 2nd classes

-//===== Additional Comments: ================================= 

-//= 1.0 for fully working skills only [Lupus]

-//= 1.1 Added more new skill quests for more classes [Lupus]

-//= Somehow eA engine doesn't let you keep learn't skill V_V'

-//= 1.2 Added to correct locations, correct NPC's, fixed

-//= some of the items required and made them into real

-//= quests. [Reddozen] 

-//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]

-//= 1.3a fixed an item ID typo, thx 2Spiritual Kid

-//= 1.3b Splitted into different files [DracoRPG]

-//= 1.4 Added Creators + Baby Alchemists can pass Bio Ethics

-//= 	Quest too [Lupus]

-//= 1.5 Removed duplicates [Toms] 1.5a fixed typo [Lupus]

-//============================================================

-

-

-//============================================================

-// ALCHEMIST - ELEMENTAL POTION CREATION

-//============================================================

-yuno_in04.gat,33,108,5	script	Pislik	750,{

-	mes "[Pislik]";

-	if(BaseJob != Job_Alchem) goto L_noalche;

-	if(countitem(7434)) goto L_alreadyhave;//Items: Elemental_Potion_Creation_Guide,

-	if(JobLevel<40) goto L_nojob;

-

-	mes "I'll teach you all I know, but";

-	mes "you have to bring me some things";

-	mes "first.";

-	mes "5 Yellow Gemstones,";

-	mes "4 Empty Potion Bottles,";

-	mes "10 Hearts of Mermaid,";

-	mes "10 Moth Dust,";

-	mes "20 Maneater Blossoms and";

-	mes "1 Geek Glasses";

-	next;

-	

-	mes "[Pislik]";

-	mes "Let me check your items.";

-	next;

-	

-	if(countitem(715)<5 || countitem(1093)<4 || countitem(950)<10 || countitem(1057)<10 || countitem(1032)<20 || countitem(2243)<1) goto L_noitems;//Items: Yellow_Gemstone, Empty_Potion_Bottle, Heart_of_Mermaid, Moth_Dust, Maneater_Blossom, Geek_Glasses,

-	delitem 715, 5;//Items: Yellow_Gemstone,

-	delitem 1093, 4;//Items: Empty_Potion_Bottle,

-	delitem 950, 10;//Items: Heart_of_Mermaid,

-	delitem 1057, 10;//Items: Moth_Dust,

-	delitem 1032, 20;//Items: Maneater_Blossom,

-	delitem 2243, 1;//Items: Geek_Glasses,

-	getitem 7434, 1;//Items: Elemental_Potion_Creation_Guide,

-

-	mes "[Pislik]";

-	mes "I see you have what you need,";

-	mes "so I'll give you my manual.";

-	close;

-	

-L_noitems:

-	mes "[Pislik]";

-	mes "You don't have enough items.";

-	mes "Come back when you have all";

-	mes "the required items for me.";

-	close;

-	

-L_noalche:

-	mes "Sorry, but my knowledge is only about alchemy.";

-	mes "I can't help you.";

-	emotion e_gasp;

-	close;

-

-L_alreadyhave:

-	mes "I've already given you";

-	mes "my Elemental Potion Creation Guide...";

-	close;

-

-L_nojob:

-	mes "Come back when you've learned";

-	mes "more about being an Alchemist.";

-	close;

-}

-

-//============================================================

-// ALCHEMIST - Bio Ethics Quest (Homunculi Skill Branch)

-//============================================================

-

-//=====================Requires Bug Testing=====================

-lhz_in01.gat,46,125,6	script	Rekenber Guard	867,{

-	mes "[Rekenber Guard]";

-	if(isequipped(2241) && isequipped(2243)){

-		mes "......................";

-		next;

-		switch(select("Nice day, huh?","Cancel")){

-			case 1:

-				mes "[Rekenber Guard]";

-				mes "...";

-				close2;

-				warp "lhz_in01.gat",282,172;

-				end;

-				break;

-			case 2:

-				close;

-				break;

-		}

-	}

-	else{

-		mes "...";

-		close;

-	}

-}

-lhz_in01.gat,282,172,0	script	BioEthTrg1::BETrg1	-1,1,1{

-	OnTouch:

-		mes "[Researcher]";

-		mes "This is a restricted";

-		mes "area. Please leave";

-		mes "immediately.";

-		close2;

-		warp "lhz_in01.gat",199,131;

-		end;

-}

-		

-lhz_in01.gat,285,169,7	script	Researcher#2	865,{

-//Unknown Text

-	mes "[Researcher]";

-	mes "Hmm... I wonder...";

-	close;

-}

-lhz_in01.gat,199,137,8	script	Scientist#2	865,{

-	mes "[Scientist]";

-	mes "Whoa whoa~!";

-	mes "Please! Don't";

-	mes "touch anything!";

-	mes "I'm dealing with highly";

-	mes "volatile chemicals here!";

-	close;

-}

-lhz_in01.gat,204,138,6	script	Keshibien	750,{

-	if(bioeth >= 2){

-		//Unofficial text

-		mes "[Keshibien]";

-		mes "Hello there~";

-		mes "Are you looking for";

-		mes "more information about";

-		mes "homunculus?";

-		next;

-		mes "[Keshibien]";

-		mes "I shouldn't say";

-		mes "anything, but look";

-		mes "for someone named";

-		mes "Bringel in Lighthalzen.";

-		if(bioeth == 2) set bioeth,3;

-		close;

-		//Unofficial text end

-	}

-	mes "[Keshibien]";

-	mes "Hello there~";

-	mes "You must be from";

-	mes "Rune-Midgarts, right?";

-	mes "It's nice to meet you.";

-	next;

-	mes "[Keshibien]";

-	mes "I hear that the";

-	mes "Alchemists from";

-	mes "over there are pretty";

-	mes "skilled. I wonder if I'll";

-	mes "ever get the change to";

-	mes "collaborate with any of them...";

-	close;

-}

-lhz_in01.gat,203,123,8	script	Scientist#3	750,{

-	mes "[Scientist]";

-	mes "Alright. Pull one test";

-	mes "tube out of the machine,";

-	mes "replace the other test";

-	mes "tube over here and then";

-	mes "clean the first test tube?";

-	next;

-	mes "[Scientist]";

-	mes "Or do I clean the test tube,";

-	mes "put it into the machine and";

-	mes "then replace the other one?";

-	mes "I'm so confused with this";

-	mes "procedure! If only I didn't";

-	mes "lose the instructions...";

-	close;

-}

-lhz_in01.gat,221,131,3	script	Scientist#4	865,{

-	mes "[Scientist]";

-	mes "It takes so long for";

-	mes "this device to process";

-	mes "all the data and give me";

-	mes "the results. Still, the wait";

-	mes "heightens my anticipation...";

-	close;

-}

-lhz_in01.gat,218,141,0	script	Alchemist#2	98,{

-	mes "[Alchemist]";

-	mes "Out of all humans,";

-	mes "I believe Kellasus is";

-	mes "the one who has come";

-	mes "closest to discovering";

-	mes "the secrets of life. He";

-	mes "never fails to amaze me...";

-	next;

-	mes "[Alchemist]";

-	mes "I'm also impressed by the";

-	mes "fact that he doesn't let his";

-	mes "work keep him from being the";

-	mes "best father and husband that";

-	mes "he can for his family. He's";

-	mes "an example for all of us.";

-	next;

-	mes "[Alchemist]";

-	mes "Kellasus really is";

-	mes "an amazing person.";

-	mes "There isn't one Alchemist";

-	mes "that I know who doesn't look";

-	mes "up to him in the realms of";

-	mes "both science and personal life.";

-	close;

-}

-lhz_in01.gat,224,140,8	script	Kellasus	57,{

-	if(MISC_QUEST&64){

-		mes "[Kellasus]";

-		mes "I already taught you";

-		mes "skills of the homunculus...";

-		if(getskilllv(238) == 0 && BaseJob == Job_Alchem) skill 238,1,0;

-		close;

-	}

-	switch(bioeth){

-	case 4:

-		mes "[Kellasus]";

-		mes "...You're really hard to handle.";

-		mes "I don't think I should";

-		mes "teach you biotechnology.";

-		mes "Besides that, you know";

-		mes "nothing about homunculus!";

-		next;

-		menu "I've learned that",-;

-		mes "[Kellasus]";

-		mes "Oh really?";

-		mes "I will have to test you";

-		mes "on your knowledge of";

-		mes "homunculus then.";

-		next;

-		mes "[Kellasus]";

-		mes "First question.";

-		mes "What is the skill that lets the";

-		mes "homunculus stay in peace?";

-		input @kelques$;

-		next;

-		mes "[Kellasus]";

-		if(@kelques$ != "Vaporize"){

-			mes "Hmpf. I knew you had";

-			mes "no knowledge on";

-			mes "homunculus.";

-			close;

-		}

-		mes "That's right. Second question.";

-		mes "What is the item";

-		mes "that is required to";

-		mes "summon or create";

-		mes "a homunculus?";

-		input @kelques$;

-		next;

-		mes "[Kellasus]";

-		if(@kelques$ != "Embryo"){

-			mes "Hmpf. I knew you had";

-			mes "no knowledge on";

-			mes "homunculus.";

-			close;

-		}

-		mes "Correct. But this is not the end yet.";

-		mes "What is the name";

-		mes "of a skill";

-		mes "that could let you";

-		mes "revive a homunculus?";

-		input @kelques$;

-		next;

-		mes "[Kellasus]";

-		if(@kelques$ != "Homunculus Resurrection"){

-			mes "Hmpf. I knew you had";

-			mes "no knowledge on";

-			mes "homunculus.";

-			close;

-		}

-		mes "After all these discussions,";

-		mes "I won't teach anyone";

-		mes "the skills of homunculus.";

-		mes "The decision is final";

-		mes "and that's it!";

-		set bioeth,5;

-		close;

-		break;

-	case 5:

-		mes "[Kellasus]";

-		mes "After all these discussions,";

-		mes "I won't teach anyone";

-		mes "the skills of homunculus.";

-		mes "The decision is final";

-		mes "and that's it!";

-		close;

-		break;

-	case 6:

-	//Unofficial text and story -.-;

-		mes "[Kellasus]";

-		mes "Oh it's you again? You're really determined.";

-		mes "Well most of the Alchemist";

-		mes "are people who never";

-		mes "let go of their dreams";

-		next;

-		menu "Let's talk about others",-;

-		mes "[Kellasus]";

-		mes "You've spoke to my son?";

-		mes "What did he say?";

-		next;

-		mes "[Kellasus]";

-		mes "...";

-		next;

-		mes "[Kellasus]";

-		mes "He wants me to get back? Okay, well...";

-		mes "I guess you've deserved it.";

-		mes "Here you are, secrets of homunculus are yours now~";

-		if(BaseJob == Job_Alchem) skill 238,1,0;

-		set MISC_QUEST,MISC_QUEST|64;

-		set bioeth,0;

-		close;

-	default:

-		break;

-	}

-	switch(@keltalk){

-	case 1:

-	//No official text to put here, so I just repeated first text

-		mes "[Kellasus]";

-		mes "Hmm. Who decides what";

-		mes "is right and wrong? What is";

-		mes "meant to be known and what";

-		mes "secrets were never intended";

-		mes "for mankind to understand?";

-		set @keltalk,2;

-		close;

-		break;

-	case 2:

-		mes "[Kellasus]";

-		mes "Haven't I told you not to come back again?";

-		mes "Please leave now!";

-		mes "No matter what you do.";

-		mes "I won't teach you anything about homunculus";

-		set @keltalk,3;

-		set bioeth,1;

-		close;

-		break;

-	case 3:

-		mes "[Kellasus]";

-		mes "Haven't I told you not to come back again?";

-		mes "Please leave now!";

-		mes "No matter what you do.";

-		mes "I won't teach you anything about homunculus";

-		close;

-		break;

-	default:

-		mes "[Kellasus]";

-		mes "Hmm. Who decides what";

-		mes "is right and wrong? What is";

-		mes "meant to be known and what";

-		mes "secrets were never intended";

-		mes "for mankind to understand?";

-		if(BaseJob == Job_Alchem) set @keltalk,1;

-		close;

-		break;

-	}

-}

-lhz_in01.gat,217,121,6	script	Repairman	851,{

-	mes "[Repairman]";

-	mes "No wonder these things";

-	mes "break all the time! These";

-	mes "machines have been totally";

-	mes "abused! Ugh, there's no";

-	mes "appreciation for all of this";

-	mes "convenient technology...";

-	next;

-	mes "[Repairman]";

-	mes "Yeah, all of this lab";

-	mes "equipment is really sensitive,";

-	mes "not to mention expensive. If";

-	mes "you ever handle this stuff, you";

-	mes "need to be extra cautious.";

-	close;

-}

-lhz_in01.gat,225,122,4	script	Skrajiad	754,{

-	mes "[Skrajiad]";

-	mes "Alchemy is wondrous...";

-	mes "It incorporates every";

-	mes "science and many other";

-	mes "fields of knowledge that";

-	mes "it's not enough to be jack";

-	mes "of all trades... No...";

-	next;

-	mes "[Skrajiad]";

-	mes "In a sense, you must";

-	mes "be a master of all trades";

-	mes "to be proficient in Alchemy";

-	mes "But it's incredibly rewarding to";

-	mes "those of us who never stop asking";

-	mes "how and why our world works.";

-	if(bioeth == 1) set bioeth,2;

-	close;

-}

-lhz_in02.gat,269,273,4	script	Bringel	709,{

-//Unofficial Text

-	if(bioeth == 3){

-		mes "[Bringel]";

-		mes "Oh, you're here to learn about Homunculus?";

-		mes "Well, I can't really help you...";

-		next;

-		mes "[Bringel]";

-		mes "However, I've heard about a skill named";

-		mes "Homunculus Resurrection.";

-		mes "It seems it is a very important thing";

-		mes "for people working on them.";

-		set bioeth,4;

-		close;

-	}

-	mes "[Bringel]";

-	mes "Isn't this hotel great?";

-	mes "I can relax on the couch";

-	mes "And not care about what I";

-	mes "did in the past...";

-	close;

-}

-lhz_in03.gat,106,34,4	script	Golin	706,{

-//Unofficial text

-	if(bioeth == 5){

-		mes "[Golin]";

-		mes "Did you see my";

-		mes "daddy at the lab?";

-		mes "Tell him I said hi!";

-		set bioeth,6;

-		close;

-	}

-	mes "[Golin]";

-	mes "Where's daddy?";

-	mes "I really want";

-	mes "daddy to come back";

-	mes "from the lab.";

-	close;

+//===== eAthena Script ======================================= 
+//= Alchemist Skills Quests
+//===== By: ================================================== 
+//= Lupus, Reddozen
+//===== Current Version: ===================================== 
+//= 1.5a
+//===== Compatible With: ===================================== 
+//= eAthena Revision 3800+
+//===== Description: ========================================= 
+//= Temp quests for new skills for 2nd classes
+//===== Additional Comments: ================================= 
+//= 1.0 for fully working skills only [Lupus]
+//= 1.1 Added more new skill quests for more classes [Lupus]
+//= Somehow eA engine doesn't let you keep learn't skill V_V'
+//= 1.2 Added to correct locations, correct NPC's, fixed
+//= some of the items required and made them into real
+//= quests. [Reddozen] 
+//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]
+//= 1.3a fixed an item ID typo, thx 2Spiritual Kid
+//= 1.3b Splitted into different files [DracoRPG]
+//= 1.4 Added Creators + Baby Alchemists can pass Bio Ethics
+//= 	Quest too [Lupus]
+//= 1.5 Removed duplicates [Toms] 1.5a fixed typo [Lupus]
+//============================================================
+
+
+//============================================================
+// ALCHEMIST - ELEMENTAL POTION CREATION
+//============================================================
+yuno_in04.gat,33,108,5	script	Pislik	750,{
+	mes "[Pislik]";
+	if(BaseJob != Job_Alchem) goto L_noalche;
+	if(countitem(7434)) goto L_alreadyhave;//Items: Elemental_Potion_Creation_Guide,
+	if(JobLevel<40) goto L_nojob;
+
+	mes "I'll teach you all I know, but";
+	mes "you have to bring me some things";
+	mes "first.";
+	mes "5 Yellow Gemstones,";
+	mes "4 Empty Potion Bottles,";
+	mes "10 Hearts of Mermaid,";
+	mes "10 Moth Dust,";
+	mes "20 Maneater Blossoms and";
+	mes "1 Geek Glasses";
+	next;
+	
+	mes "[Pislik]";
+	mes "Let me check your items.";
+	next;
+	
+	if(countitem(715)<5 || countitem(1093)<4 || countitem(950)<10 || countitem(1057)<10 || countitem(1032)<20 || countitem(2243)<1) goto L_noitems;//Items: Yellow_Gemstone, Empty_Potion_Bottle, Heart_of_Mermaid, Moth_Dust, Maneater_Blossom, Geek_Glasses,
+	delitem 715, 5;//Items: Yellow_Gemstone,
+	delitem 1093, 4;//Items: Empty_Potion_Bottle,
+	delitem 950, 10;//Items: Heart_of_Mermaid,
+	delitem 1057, 10;//Items: Moth_Dust,
+	delitem 1032, 20;//Items: Maneater_Blossom,
+	delitem 2243, 1;//Items: Geek_Glasses,
+	getitem 7434, 1;//Items: Elemental_Potion_Creation_Guide,
+
+	mes "[Pislik]";
+	mes "I see you have what you need,";
+	mes "so I'll give you my manual.";
+	close;
+	
+L_noitems:
+	mes "[Pislik]";
+	mes "You don't have enough items.";
+	mes "Come back when you have all";
+	mes "the required items for me.";
+	close;
+	
+L_noalche:
+	mes "Sorry, but my knowledge is only about alchemy.";
+	mes "I can't help you.";
+	emotion e_gasp;
+	close;
+
+L_alreadyhave:
+	mes "I've already given you";
+	mes "my Elemental Potion Creation Guide...";
+	close;
+
+L_nojob:
+	mes "Come back when you've learned";
+	mes "more about being an Alchemist.";
+	close;
+}
+
+//============================================================
+// ALCHEMIST - Bio Ethics Quest (Homunculi Skill Branch)
+//============================================================
+
+//=====================Requires Bug Testing=====================
+lhz_in01.gat,46,125,6	script	Rekenber Guard	867,{
+	mes "[Rekenber Guard]";
+	if(isequipped(2241) && isequipped(2243)){
+		mes "......................";
+		next;
+		switch(select("Nice day, huh?","Cancel")){
+			case 1:
+				mes "[Rekenber Guard]";
+				mes "...";
+				close2;
+				warp "lhz_in01.gat",282,172;
+				end;
+				break;
+			case 2:
+				close;
+				break;
+		}
+	}
+	else{
+		mes "...";
+		close;
+	}
+}
+lhz_in01.gat,282,172,0	script	BioEthTrg1::BETrg1	-1,1,1{
+	OnTouch:
+		mes "[Researcher]";
+		mes "This is a restricted";
+		mes "area. Please leave";
+		mes "immediately.";
+		close2;
+		warp "lhz_in01.gat",199,131;
+		end;
+}
+		
+lhz_in01.gat,285,169,7	script	Researcher#2	865,{
+//Unknown Text
+	mes "[Researcher]";
+	mes "Hmm... I wonder...";
+	close;
+}
+lhz_in01.gat,199,137,8	script	Scientist#2	865,{
+	mes "[Scientist]";
+	mes "Whoa whoa~!";
+	mes "Please! Don't";
+	mes "touch anything!";
+	mes "I'm dealing with highly";
+	mes "volatile chemicals here!";
+	close;
+}
+lhz_in01.gat,204,138,6	script	Keshibien	750,{
+	if(bioeth >= 2){
+		//Unofficial text
+		mes "[Keshibien]";
+		mes "Hello there~";
+		mes "Are you looking for";
+		mes "more information about";
+		mes "homunculus?";
+		next;
+		mes "[Keshibien]";
+		mes "I shouldn't say";
+		mes "anything, but look";
+		mes "for someone named";
+		mes "Bringel in Lighthalzen.";
+		if(bioeth == 2) set bioeth,3;
+		close;
+		//Unofficial text end
+	}
+	mes "[Keshibien]";
+	mes "Hello there~";
+	mes "You must be from";
+	mes "Rune-Midgarts, right?";
+	mes "It's nice to meet you.";
+	next;
+	mes "[Keshibien]";
+	mes "I hear that the";
+	mes "Alchemists from";
+	mes "over there are pretty";
+	mes "skilled. I wonder if I'll";
+	mes "ever get the change to";
+	mes "collaborate with any of them...";
+	close;
+}
+lhz_in01.gat,203,123,8	script	Scientist#3	750,{
+	mes "[Scientist]";
+	mes "Alright. Pull one test";
+	mes "tube out of the machine,";
+	mes "replace the other test";
+	mes "tube over here and then";
+	mes "clean the first test tube?";
+	next;
+	mes "[Scientist]";
+	mes "Or do I clean the test tube,";
+	mes "put it into the machine and";
+	mes "then replace the other one?";
+	mes "I'm so confused with this";
+	mes "procedure! If only I didn't";
+	mes "lose the instructions...";
+	close;
+}
+lhz_in01.gat,221,131,3	script	Scientist#4	865,{
+	mes "[Scientist]";
+	mes "It takes so long for";
+	mes "this device to process";
+	mes "all the data and give me";
+	mes "the results. Still, the wait";
+	mes "heightens my anticipation...";
+	close;
+}
+lhz_in01.gat,218,141,0	script	Alchemist#2	98,{
+	mes "[Alchemist]";
+	mes "Out of all humans,";
+	mes "I believe Kellasus is";
+	mes "the one who has come";
+	mes "closest to discovering";
+	mes "the secrets of life. He";
+	mes "never fails to amaze me...";
+	next;
+	mes "[Alchemist]";
+	mes "I'm also impressed by the";
+	mes "fact that he doesn't let his";
+	mes "work keep him from being the";
+	mes "best father and husband that";
+	mes "he can for his family. He's";
+	mes "an example for all of us.";
+	next;
+	mes "[Alchemist]";
+	mes "Kellasus really is";
+	mes "an amazing person.";
+	mes "There isn't one Alchemist";
+	mes "that I know who doesn't look";
+	mes "up to him in the realms of";
+	mes "both science and personal life.";
+	close;
+}
+lhz_in01.gat,224,140,8	script	Kellasus	57,{
+	if(MISC_QUEST&64){
+		mes "[Kellasus]";
+		mes "I already taught you";
+		mes "skills of the homunculus...";
+		if(getskilllv(238) == 0 && BaseJob == Job_Alchem) skill 238,1,0;
+		close;
+	}
+	switch(bioeth){
+	case 4:
+		mes "[Kellasus]";
+		mes "...You're really hard to handle.";
+		mes "I don't think I should";
+		mes "teach you biotechnology.";
+		mes "Besides that, you know";
+		mes "nothing about homunculus!";
+		next;
+		menu "I've learned that",-;
+		mes "[Kellasus]";
+		mes "Oh really?";
+		mes "I will have to test you";
+		mes "on your knowledge of";
+		mes "homunculus then.";
+		next;
+		mes "[Kellasus]";
+		mes "First question.";
+		mes "What is the skill that lets the";
+		mes "homunculus stay in peace?";
+		input @kelques$;
+		next;
+		mes "[Kellasus]";
+		if(@kelques$ != "Vaporize"){
+			mes "Hmpf. I knew you had";
+			mes "no knowledge on";
+			mes "homunculus.";
+			close;
+		}
+		mes "That's right. Second question.";
+		mes "What is the item";
+		mes "that is required to";
+		mes "summon or create";
+		mes "a homunculus?";
+		input @kelques$;
+		next;
+		mes "[Kellasus]";
+		if(@kelques$ != "Embryo"){
+			mes "Hmpf. I knew you had";
+			mes "no knowledge on";
+			mes "homunculus.";
+			close;
+		}
+		mes "Correct. But this is not the end yet.";
+		mes "What is the name";
+		mes "of a skill";
+		mes "that could let you";
+		mes "revive a homunculus?";
+		input @kelques$;
+		next;
+		mes "[Kellasus]";
+		if(@kelques$ != "Homunculus Resurrection"){
+			mes "Hmpf. I knew you had";
+			mes "no knowledge on";
+			mes "homunculus.";
+			close;
+		}
+		mes "After all these discussions,";
+		mes "I won't teach anyone";
+		mes "the skills of homunculus.";
+		mes "The decision is final";
+		mes "and that's it!";
+		set bioeth,5;
+		close;
+		break;
+	case 5:
+		mes "[Kellasus]";
+		mes "After all these discussions,";
+		mes "I won't teach anyone";
+		mes "the skills of homunculus.";
+		mes "The decision is final";
+		mes "and that's it!";
+		close;
+		break;
+	case 6:
+	//Unofficial text and story -.-;
+		mes "[Kellasus]";
+		mes "Oh it's you again? You're really determined.";
+		mes "Well most of the Alchemist";
+		mes "are people who never";
+		mes "let go of their dreams";
+		next;
+		menu "Let's talk about others",-;
+		mes "[Kellasus]";
+		mes "You've spoke to my son?";
+		mes "What did he say?";
+		next;
+		mes "[Kellasus]";
+		mes "...";
+		next;
+		mes "[Kellasus]";
+		mes "He wants me to get back? Okay, well...";
+		mes "I guess you've deserved it.";
+		mes "Here you are, secrets of homunculus are yours now~";
+		if(BaseJob == Job_Alchem) skill 238,1,0;
+		set MISC_QUEST,MISC_QUEST|64;
+		set bioeth,0;
+		close;
+	default:
+		break;
+	}
+	switch(@keltalk){
+	case 1:
+	//No official text to put here, so I just repeated first text
+		mes "[Kellasus]";
+		mes "Hmm. Who decides what";
+		mes "is right and wrong? What is";
+		mes "meant to be known and what";
+		mes "secrets were never intended";
+		mes "for mankind to understand?";
+		set @keltalk,2;
+		close;
+		break;
+	case 2:
+		mes "[Kellasus]";
+		mes "Haven't I told you not to come back again?";
+		mes "Please leave now!";
+		mes "No matter what you do.";
+		mes "I won't teach you anything about homunculus";
+		set @keltalk,3;
+		set bioeth,1;
+		close;
+		break;
+	case 3:
+		mes "[Kellasus]";
+		mes "Haven't I told you not to come back again?";
+		mes "Please leave now!";
+		mes "No matter what you do.";
+		mes "I won't teach you anything about homunculus";
+		close;
+		break;
+	default:
+		mes "[Kellasus]";
+		mes "Hmm. Who decides what";
+		mes "is right and wrong? What is";
+		mes "meant to be known and what";
+		mes "secrets were never intended";
+		mes "for mankind to understand?";
+		if(BaseJob == Job_Alchem) set @keltalk,1;
+		close;
+		break;
+	}
+}
+lhz_in01.gat,217,121,6	script	Repairman	851,{
+	mes "[Repairman]";
+	mes "No wonder these things";
+	mes "break all the time! These";
+	mes "machines have been totally";
+	mes "abused! Ugh, there's no";
+	mes "appreciation for all of this";
+	mes "convenient technology...";
+	next;
+	mes "[Repairman]";
+	mes "Yeah, all of this lab";
+	mes "equipment is really sensitive,";
+	mes "not to mention expensive. If";
+	mes "you ever handle this stuff, you";
+	mes "need to be extra cautious.";
+	close;
+}
+lhz_in01.gat,225,122,4	script	Skrajiad	754,{
+	mes "[Skrajiad]";
+	mes "Alchemy is wondrous...";
+	mes "It incorporates every";
+	mes "science and many other";
+	mes "fields of knowledge that";
+	mes "it's not enough to be jack";
+	mes "of all trades... No...";
+	next;
+	mes "[Skrajiad]";
+	mes "In a sense, you must";
+	mes "be a master of all trades";
+	mes "to be proficient in Alchemy";
+	mes "But it's incredibly rewarding to";
+	mes "those of us who never stop asking";
+	mes "how and why our world works.";
+	if(bioeth == 1) set bioeth,2;
+	close;
+}
+lhz_in02.gat,269,273,4	script	Bringel	709,{
+//Unofficial Text
+	if(bioeth == 3){
+		mes "[Bringel]";
+		mes "Oh, you're here to learn about Homunculus?";
+		mes "Well, I can't really help you...";
+		next;
+		mes "[Bringel]";
+		mes "However, I've heard about a skill named";
+		mes "Homunculus Resurrection.";
+		mes "It seems it is a very important thing";
+		mes "for people working on them.";
+		set bioeth,4;
+		close;
+	}
+	mes "[Bringel]";
+	mes "Isn't this hotel great?";
+	mes "I can relax on the couch";
+	mes "And not care about what I";
+	mes "did in the past...";
+	close;
+}
+lhz_in03.gat,106,34,4	script	Golin	706,{
+//Unofficial text
+	if(bioeth == 5){
+		mes "[Golin]";
+		mes "Did you see my";
+		mes "daddy at the lab?";
+		mes "Tell him I said hi!";
+		set bioeth,6;
+		close;
+	}
+	mes "[Golin]";
+	mes "Where's daddy?";
+	mes "I really want";
+	mes "daddy to come back";
+	mes "from the lab.";
+	close;
 }
\ No newline at end of file
diff --git a/npc/quests/skills/archer_skills.txt b/npc/quests/skills/archer_skills.txt
index 42b012fa4..934916cf0 100644
--- a/npc/quests/skills/archer_skills.txt
+++ b/npc/quests/skills/archer_skills.txt
@@ -1,213 +1,213 @@
-//===== eAthena Script =======================================

-//= Archer Skill Quest

-//===== By: ==================================================

-//= eAthena dev team

-//===== Current Version: =====================================

-//= 1.4b

-//===== Compatible With: =====================================

-//= eAthena 7.15 +

-//===== Description: =========================================

-//= Arrow crafting, Arrow Repel skills

-//===== Additional Comments: =================================

-//= v1.0 Roberto message text is based off RO npc.  Jason message

-//= text is custom from old version.

-//= All items are from official quests though.[kobra_k88]

-//= v1.0a Now using functions found in "Global_Functions.txt"

-//= for class checks.[kobra_k88]

-//= 1.2 Added Baby Class Support [Lupus]

-//= 1.3 Removed callfunc Is_####_Class in favor of baseClass [Silentdragon]

-//= 1.4 Fixed exploits [Lupus]

-//= 1.4a Fixed some typos [IVBela]

-//= 1.4b changed perm. variables to temp ones [Lupus]

-//============================================================

-

-

-

-//<======================== Roberto: Arrow crafting =========================>\\

-morocc.gat,121,109,5	script	Roberto	88,{

-	mes "[Roberto]";

-	if(baseClass == Job_Archer) goto L_Start;

-

-L_Other:

-	mes "Eh?... First time seeing an archer or something? Why don't you just";

-	mes "go about your business and leave me be.  I only talk to high level";

-	mes "Archer types........";

-	emotion e_what;

-	close;

-L_Start:

-	if(BaseJob==Job_Archer && JobLevel<30) goto L_LowLvl;

-	if(getskilllv(147)>0) goto L_GotSkill;

-	if(@ARWCRFT) goto L_GetSkill;

-	mes "Hmmm?.... Oh you seem to be a high level Archer type.  Why don't we";

-	mes "converse for a while, eh? Let me start off by talking about my";

-	mes "childhood.... . . . . . . . . . . .";

-	next;

-	mes "[Roberto]";

-	mes "When I turned 15, I decided I'd work for a Blacksmith........";

-	next;

-	mes "[Roberto]";

-	mes "............... ~(blah blah blah)~...................";

-	next;

-	mes "[Roberto]";

-	mes ".... man was my Junior Prom a mess...........";

-	next;

-	mes "[Roberto]";

-	mes "..~(blah blah)~........ ~(blah blah)~.........";

-	next;

-	mes "(many grueling hours later.....)";

-	next;

-	mes "[Roberto]";

-	mes "So that's how I found out how to create all of these different";

-	mes "kinds of arrows for myself.  It definitely comes in handy.";

-	next;

-	mes "[Roberto]";

-	mes "Say, would you like me to teach you?  We've had such a nice talk";

-	mes "that I feel like can trust you with this knowledge.......";

-	next;

-	menu "Zzz... Eh!! Uh, Arrows... making... yes, teach.",M_0, "Zzzzz... Eh! Uh... where am I????",M_1;

-

-	M_0:

-		mes "[Roberto]";

-		mes "Alright then!  In order for me to teach you the art of ^5533FF'Arrow";

-		mes "Crafting'^000000, you must first bring me these items:";

-		mes "^FF335520 Resin,";

-		mes "7 Poison Spores,";

-		mes "41 Pointed Scales,";

-		mes "13 Trunks,";

-		mes "1 Red potion^000000";

-		set @ARWCRFT, 1;

-		emotion e_ic;

-		close;

-	M_1:

-		mes "[Roberto]";

-		mes "................................................................";

-		emotion e_ag;

-		next;

-		mes "[Roberto]";

-		mes "Let me teach you this special skill.... It's called, my boot up";

-		mes "your A........";

-		emotion e_pif;

-		next;

-		mes "!!!!SMACK!!!!";

-		percentheal -5,0;

-		close;

-

-L_GetSkill:

-	if((countitem(907)<20) || (countitem(7033)<7) || (countitem(906)<41) || (countitem(1019)<13) || (countitem(501)<1)) goto L_NotEnuf;

-	delitem 907, 20;

-	delitem 7033, 7;

-	delitem 906, 41;

-	delitem 1019, 13;

-	delitem 501, 1;

-	mes "You've brought all of the items... very good.  Lets begin.....";

-	next;

-	mes "~ hands you a very long list of ingredients ~";

-	next;

-	mes "[Roberto]";

-	mes "There you are.  You're all set.";

-	next;

-	mes ".......................";

-	next;

-	mes "[Roberto]";

-	mes "Hmm?...... What do you mean 'that's it'?....... What else were you";

-	mes "expecting...... With that list you will be able to make any kind of";

-	mes "arrows you want.......";

-	next;

-	mes "[Roberto]";

-	mes "I hope you didn't expect some kind of elaborate ceremony or some";

-	mes "kind of unique and lengthy training.......";

-	next;

-	skill 147,1,0;

-	set @ARWCRFT, 0;

-	mes "[Roberto]";

-	mes "...... Well good luck and have fun making arrows.  I've got other";

-	mes "things to do if you don't mind.......";

-	close;

-

-	L_NotEnuf:

-		mes "You don't have everything I need.";

-		next;

-		goto M_0;

-L_GotSkill:

-	mes "Hmmm?.... Sorry but I've got nothing left to teach you.  Just keep";

-	mes "on making those arrows..... For us Archer types there can never be";

-	mes "too many arrows.....";

-	close;

-L_LowLvl:

-	mes "Hmm?... Do you have something to say to me? Unfortunately I have";

-	mes "nothing to say to you.....";

-	emotion e_what;

-	next;

-	mes "[Roberto]";

-	mes "It's sad but conversations with people who have ^5533FFlow job levels^000000 such";

-	mes "as yourself always seem to end abruptly..... Maybe if you trained a";

-	mes "little bit longer we would have more to talk about............";

-	close;

-}

-

-

-//<============================== Arrow Repel ===============================>\\

-payon.gat,103,63,5	script	Jason	88,{

-	mes "[Jason]";

-	if(baseClass == Job_Archer) goto L_Start;

-

-L_Other:

-	mes "What does life need from a lonely lad like me?";

-	close;

-L_Start:

-	if(getskilllv(148)>0) goto L_GotSkill;

-	if(BaseJob == Job_Archer && JobLevel < 35) goto L_LowLvl;

-	if(@ARWREP) goto L_Check;

-	mes "Hi, I'm the master of the skill ^0033FFArrow Repel^000000. I might be able to";

-	mes "teach you the skill, but only if you help me get the ingredients";

-	mes "for my Grandma's soup.";

-	next;

-	mes "[Jason]";

-	mes "Arrow Repel allows you to use your arrows to repel, push back, an";

-	mes "enemy and keep them at a distance.  This is a great skill for us";

-	mes "Archer types.";

-	next;

-

-	L_List:

-	mes "[Jason]";

-	mes "I need the following:";

-	mes "- 2 ^FF0000Emeralds^000000";

-	mes "- 3 ^FF0000Yoyo tails^000000";

-	mes "- 10 ^FF0000Tentacles^000000";

-	mes "- 10 ^FF0000Bill of birds^000000";

-	mes "- 36 ^FF0000Banana Juices^000000";

-	next;

-	mes "[Jason]";

-	mes "Hurry hurry!";

-	set @ARWREP, 1;

-	close;

-

-L_LowLvl:

-	mes "Oh I think you're a bit inexperienced to learn anything from me,";

-	mes "come back later!  Maybe around ^5533FFjob level 35^000000 or so.....";

-	close;

-

-L_Check:

-	if((countitem(721)<2) || (countitem(942)<3) || (countitem(962)<10) || (countitem(925)<10) || (countitem(532)<36)) goto L_NotEnuf;

-	delitem 721,2;

-	delitem 942,3;

-	delitem 962,10;

-	delitem 925,10;

-	delitem 532,36;

-	mes "OH! Marvelous you brought me all the ingredients!";

-	mes "Now it'll be my pleasure to teach you the skill ^0033FFArrow Repel^000000";

-	next;

-	skill 148,1,0;

-	set @ARWREP, 0;

-	mes "[Jason]";

-	mes "There you go! Happy hunting in the future.";

-	close;

-

-	L_NotEnuf:

-		mes "You don't have everything I need.";

-		next;

-		goto L_List;

-L_GotSkill:

-	mes "Hey! It's you again? I'm afraid I've taught you everything I know.";

-	close;

-}

+//===== eAthena Script =======================================
+//= Archer Skill Quest
+//===== By: ==================================================
+//= eAthena dev team
+//===== Current Version: =====================================
+//= 1.4b
+//===== Compatible With: =====================================
+//= eAthena 7.15 +
+//===== Description: =========================================
+//= Arrow crafting, Arrow Repel skills
+//===== Additional Comments: =================================
+//= v1.0 Roberto message text is based off RO npc.  Jason message
+//= text is custom from old version.
+//= All items are from official quests though.[kobra_k88]
+//= v1.0a Now using functions found in "Global_Functions.txt"
+//= for class checks.[kobra_k88]
+//= 1.2 Added Baby Class Support [Lupus]
+//= 1.3 Removed callfunc Is_####_Class in favor of baseClass [Silentdragon]
+//= 1.4 Fixed exploits [Lupus]
+//= 1.4a Fixed some typos [IVBela]
+//= 1.4b changed perm. variables to temp ones [Lupus]
+//============================================================
+
+
+
+//<======================== Roberto: Arrow crafting =========================>\\
+morocc.gat,121,109,5	script	Roberto	88,{
+	mes "[Roberto]";
+	if(baseClass == Job_Archer) goto L_Start;
+
+L_Other:
+	mes "Eh?... First time seeing an archer or something? Why don't you just";
+	mes "go about your business and leave me be.  I only talk to high level";
+	mes "Archer types........";
+	emotion e_what;
+	close;
+L_Start:
+	if(BaseJob==Job_Archer && JobLevel<30) goto L_LowLvl;
+	if(getskilllv(147)>0) goto L_GotSkill;
+	if(@ARWCRFT) goto L_GetSkill;
+	mes "Hmmm?.... Oh you seem to be a high level Archer type.  Why don't we";
+	mes "converse for a while, eh? Let me start off by talking about my";
+	mes "childhood.... . . . . . . . . . . .";
+	next;
+	mes "[Roberto]";
+	mes "When I turned 15, I decided I'd work for a Blacksmith........";
+	next;
+	mes "[Roberto]";
+	mes "............... ~(blah blah blah)~...................";
+	next;
+	mes "[Roberto]";
+	mes ".... man was my Junior Prom a mess...........";
+	next;
+	mes "[Roberto]";
+	mes "..~(blah blah)~........ ~(blah blah)~.........";
+	next;
+	mes "(many grueling hours later.....)";
+	next;
+	mes "[Roberto]";
+	mes "So that's how I found out how to create all of these different";
+	mes "kinds of arrows for myself.  It definitely comes in handy.";
+	next;
+	mes "[Roberto]";
+	mes "Say, would you like me to teach you?  We've had such a nice talk";
+	mes "that I feel like can trust you with this knowledge.......";
+	next;
+	menu "Zzz... Eh!! Uh, Arrows... making... yes, teach.",M_0, "Zzzzz... Eh! Uh... where am I????",M_1;
+
+	M_0:
+		mes "[Roberto]";
+		mes "Alright then!  In order for me to teach you the art of ^5533FF'Arrow";
+		mes "Crafting'^000000, you must first bring me these items:";
+		mes "^FF335520 Resin,";
+		mes "7 Poison Spores,";
+		mes "41 Pointed Scales,";
+		mes "13 Trunks,";
+		mes "1 Red potion^000000";
+		set @ARWCRFT, 1;
+		emotion e_ic;
+		close;
+	M_1:
+		mes "[Roberto]";
+		mes "................................................................";
+		emotion e_ag;
+		next;
+		mes "[Roberto]";
+		mes "Let me teach you this special skill.... It's called, my boot up";
+		mes "your A........";
+		emotion e_pif;
+		next;
+		mes "!!!!SMACK!!!!";
+		percentheal -5,0;
+		close;
+
+L_GetSkill:
+	if((countitem(907)<20) || (countitem(7033)<7) || (countitem(906)<41) || (countitem(1019)<13) || (countitem(501)<1)) goto L_NotEnuf;
+	delitem 907, 20;
+	delitem 7033, 7;
+	delitem 906, 41;
+	delitem 1019, 13;
+	delitem 501, 1;
+	mes "You've brought all of the items... very good.  Lets begin.....";
+	next;
+	mes "~ hands you a very long list of ingredients ~";
+	next;
+	mes "[Roberto]";
+	mes "There you are.  You're all set.";
+	next;
+	mes ".......................";
+	next;
+	mes "[Roberto]";
+	mes "Hmm?...... What do you mean 'that's it'?....... What else were you";
+	mes "expecting...... With that list you will be able to make any kind of";
+	mes "arrows you want.......";
+	next;
+	mes "[Roberto]";
+	mes "I hope you didn't expect some kind of elaborate ceremony or some";
+	mes "kind of unique and lengthy training.......";
+	next;
+	skill 147,1,0;
+	set @ARWCRFT, 0;
+	mes "[Roberto]";
+	mes "...... Well good luck and have fun making arrows.  I've got other";
+	mes "things to do if you don't mind.......";
+	close;
+
+	L_NotEnuf:
+		mes "You don't have everything I need.";
+		next;
+		goto M_0;
+L_GotSkill:
+	mes "Hmmm?.... Sorry but I've got nothing left to teach you.  Just keep";
+	mes "on making those arrows..... For us Archer types there can never be";
+	mes "too many arrows.....";
+	close;
+L_LowLvl:
+	mes "Hmm?... Do you have something to say to me? Unfortunately I have";
+	mes "nothing to say to you.....";
+	emotion e_what;
+	next;
+	mes "[Roberto]";
+	mes "It's sad but conversations with people who have ^5533FFlow job levels^000000 such";
+	mes "as yourself always seem to end abruptly..... Maybe if you trained a";
+	mes "little bit longer we would have more to talk about............";
+	close;
+}
+
+
+//<============================== Arrow Repel ===============================>\\
+payon.gat,103,63,5	script	Jason	88,{
+	mes "[Jason]";
+	if(baseClass == Job_Archer) goto L_Start;
+
+L_Other:
+	mes "What does life need from a lonely lad like me?";
+	close;
+L_Start:
+	if(getskilllv(148)>0) goto L_GotSkill;
+	if(BaseJob == Job_Archer && JobLevel < 35) goto L_LowLvl;
+	if(@ARWREP) goto L_Check;
+	mes "Hi, I'm the master of the skill ^0033FFArrow Repel^000000. I might be able to";
+	mes "teach you the skill, but only if you help me get the ingredients";
+	mes "for my Grandma's soup.";
+	next;
+	mes "[Jason]";
+	mes "Arrow Repel allows you to use your arrows to repel, push back, an";
+	mes "enemy and keep them at a distance.  This is a great skill for us";
+	mes "Archer types.";
+	next;
+
+	L_List:
+	mes "[Jason]";
+	mes "I need the following:";
+	mes "- 2 ^FF0000Emeralds^000000";
+	mes "- 3 ^FF0000Yoyo tails^000000";
+	mes "- 10 ^FF0000Tentacles^000000";
+	mes "- 10 ^FF0000Bill of birds^000000";
+	mes "- 36 ^FF0000Banana Juices^000000";
+	next;
+	mes "[Jason]";
+	mes "Hurry hurry!";
+	set @ARWREP, 1;
+	close;
+
+L_LowLvl:
+	mes "Oh I think you're a bit inexperienced to learn anything from me,";
+	mes "come back later!  Maybe around ^5533FFjob level 35^000000 or so.....";
+	close;
+
+L_Check:
+	if((countitem(721)<2) || (countitem(942)<3) || (countitem(962)<10) || (countitem(925)<10) || (countitem(532)<36)) goto L_NotEnuf;
+	delitem 721,2;
+	delitem 942,3;
+	delitem 962,10;
+	delitem 925,10;
+	delitem 532,36;
+	mes "OH! Marvelous you brought me all the ingredients!";
+	mes "Now it'll be my pleasure to teach you the skill ^0033FFArrow Repel^000000";
+	next;
+	skill 148,1,0;
+	set @ARWREP, 0;
+	mes "[Jason]";
+	mes "There you go! Happy hunting in the future.";
+	close;
+
+	L_NotEnuf:
+		mes "You don't have everything I need.";
+		next;
+		goto L_List;
+L_GotSkill:
+	mes "Hey! It's you again? I'm afraid I've taught you everything I know.";
+	close;
+}
diff --git a/npc/quests/skills/assassin_skills.txt b/npc/quests/skills/assassin_skills.txt
index a48cdbb47..7b5e4fda1 100644
--- a/npc/quests/skills/assassin_skills.txt
+++ b/npc/quests/skills/assassin_skills.txt
@@ -1,71 +1,71 @@
-//===== eAthena Script ======================================= 

-//= Assassin Skills Quests

-//===== By: ================================================== 

-//= Lupus, Reddozen

-//===== Current Version: ===================================== 

-//= 1.3a

-//===== Compatible With: ===================================== 

-//= eAthena Revision 3800+

-//===== Description: ========================================= 

-//= Temp quests for new skills for 2nd classes

-//===== Additional Comments: ================================= 

-//= 1.0 for fully working skills only [Lupus]

-//= 1.1 Added more new skill quests for more classes [Lupus]

-//= Somehow eA engine doesn't let you keep learn't skill V_V'

-//= 1.2 Added to correct locations, correct NPC's, fixed

-//= some of the items required and made them into real

-//= quests. [Reddozen] 

-//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]

-//= 1.3a fixed an item ID typo, thx 2Spiritual Kid

-//= 1.3b Splitted into different files [DracoRPG]

-//============================================================

-

-

-//============================================================

-// ASSASSIN - SONIC ACCELERATION + THROW VENOM KNIFE

-//============================================================

-in_moc_16.gat,14,21,3	script	Kiltin	884,{

-	mes "[Kiltin]";

-	if(BaseJob!=Job_Assassin) goto L_nosin;

-	if(getskilllv(1003) && getskilllv(1004)) goto L_alreadyhave;

-

-	mes "I'll teach you all I know, but";

-	mes "you need to steal some things";

-	mes "for me:";

-	mes "3 Sapphires";

-	mes "1 Ruby";

-	next;

-	

-	mes "[Kiltin]";

-	mes "Let me check your items.";

-	next;

-	

-	if(countitem(726)<3 || countitem(723)<1) goto L_noitems;//Items: Sapphire, Ruby,

-	delitem 726, 3;//Items: Sapphire,

-	delitem 723, 1;//Items: Ruby,

-

-	mes "[Kiltin]";

-	mes "I see you have what you need,";

-	mes "so I'll teach you my talent.";

-	skill 1003,1,0;

-	skill 1004,1,0;

-	close;

-	

-L_noitems:

-	mes "[Kiltin]";

-	mes "You don't have enough items.";

-	mes "Come back when you have all";

-	mes "the required items for me.";

-	close;

-		

-L_nosin:

-	mes "Sorry, but I'm on service of Shadowmen.";

-	emotion e_gasp;

-	close;

-

-L_alreadyhave:

-	mes "I've already taught you";

-	mes "everything I know...";

-	close;

-}

-

+//===== eAthena Script ======================================= 
+//= Assassin Skills Quests
+//===== By: ================================================== 
+//= Lupus, Reddozen
+//===== Current Version: ===================================== 
+//= 1.3a
+//===== Compatible With: ===================================== 
+//= eAthena Revision 3800+
+//===== Description: ========================================= 
+//= Temp quests for new skills for 2nd classes
+//===== Additional Comments: ================================= 
+//= 1.0 for fully working skills only [Lupus]
+//= 1.1 Added more new skill quests for more classes [Lupus]
+//= Somehow eA engine doesn't let you keep learn't skill V_V'
+//= 1.2 Added to correct locations, correct NPC's, fixed
+//= some of the items required and made them into real
+//= quests. [Reddozen] 
+//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]
+//= 1.3a fixed an item ID typo, thx 2Spiritual Kid
+//= 1.3b Splitted into different files [DracoRPG]
+//============================================================
+
+
+//============================================================
+// ASSASSIN - SONIC ACCELERATION + THROW VENOM KNIFE
+//============================================================
+in_moc_16.gat,14,21,3	script	Kiltin	884,{
+	mes "[Kiltin]";
+	if(BaseJob!=Job_Assassin) goto L_nosin;
+	if(getskilllv(1003) && getskilllv(1004)) goto L_alreadyhave;
+
+	mes "I'll teach you all I know, but";
+	mes "you need to steal some things";
+	mes "for me:";
+	mes "3 Sapphires";
+	mes "1 Ruby";
+	next;
+	
+	mes "[Kiltin]";
+	mes "Let me check your items.";
+	next;
+	
+	if(countitem(726)<3 || countitem(723)<1) goto L_noitems;//Items: Sapphire, Ruby,
+	delitem 726, 3;//Items: Sapphire,
+	delitem 723, 1;//Items: Ruby,
+
+	mes "[Kiltin]";
+	mes "I see you have what you need,";
+	mes "so I'll teach you my talent.";
+	skill 1003,1,0;
+	skill 1004,1,0;
+	close;
+	
+L_noitems:
+	mes "[Kiltin]";
+	mes "You don't have enough items.";
+	mes "Come back when you have all";
+	mes "the required items for me.";
+	close;
+		
+L_nosin:
+	mes "Sorry, but I'm on service of Shadowmen.";
+	emotion e_gasp;
+	close;
+
+L_alreadyhave:
+	mes "I've already taught you";
+	mes "everything I know...";
+	close;
+}
+
diff --git a/npc/quests/skills/bard_skills.txt b/npc/quests/skills/bard_skills.txt
index 713d4d051..0dfb3b7ef 100644
--- a/npc/quests/skills/bard_skills.txt
+++ b/npc/quests/skills/bard_skills.txt
@@ -1,71 +1,71 @@
-//===== eAthena Script ======================================= 

-//= Bard Skills Quests

-//===== By: ================================================== 

-//= Lupus, Reddozen

-//===== Current Version: ===================================== 

-//= 1.3a

-//===== Compatible With: ===================================== 

-//= eAthena Revision 3800+

-//===== Description: ========================================= 

-//= Temp quests for new skills for 2nd classes

-//===== Additional Comments: ================================= 

-//= 1.0 for fully working skills only [Lupus]

-//= 1.1 Added more new skill quests for more classes [Lupus]

-//= Somehow eA engine doesn't let you keep learn't skill V_V'

-//= 1.2 Added to correct locations, correct NPC's, fixed

-//= some of the items required and made them into real

-//= quests. [Reddozen] 

-//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]

-//= 1.3a fixed an item ID typo, thx 2Spiritual Kid

-//= 1.3b Splitted into different files [DracoRPG]

-//============================================================

-

-

-//============================================================

-// BARD - PANG VOICE

-//============================================================

-prontera.gat,134,328,7	script	Timid man	89,{

-	mes "[Timid man]";

-	if(BaseJob!=Job_Bard) goto L_nobard;

-	if(getskilllv(1010)) goto L_alreadyhave;

-	if(JobLevel<40) goto L_nojob;

-

-	mes "I'll teach you all I know, but";

-	mes "I'm a little thirsty. Bring me";

-	mes "1 Tropical Sograt";

-	next;

-	

-	mes "[Timid man]";

-	mes "Let me check your items.";

-	next;

-	

-	if (countitem(12112)<1) goto L_noitems;//Items: Tropical_Sograt,

-	delitem 12112, 1;//Items: Tropical_Sograt,

-	mes "[Timid man]";

-	mes "I see you have what you need,";

-	mes "so I'll teach you my talent.";

-	skill 1010,1,0;

-	close;

-	

-L_noitems:

-	mes "[Timid man]";

-	mes "You don't have enough items.";

-	mes "Come back when you have all";

-	mes "the required items for me.";

-	close;

-		

-L_nobard:

-	mes "Hum... you don't seem to be a musician";

-	emotion e_gasp;

-	close;

-

-L_alreadyhave:

-	mes "I've already taught you";

-	mes "everything I know...";

-	close;

-

-L_nojob:

-	mes "Come back when you've learned";

-	mes "more about being a Bard.";

-	close;

-}

+//===== eAthena Script ======================================= 
+//= Bard Skills Quests
+//===== By: ================================================== 
+//= Lupus, Reddozen
+//===== Current Version: ===================================== 
+//= 1.3a
+//===== Compatible With: ===================================== 
+//= eAthena Revision 3800+
+//===== Description: ========================================= 
+//= Temp quests for new skills for 2nd classes
+//===== Additional Comments: ================================= 
+//= 1.0 for fully working skills only [Lupus]
+//= 1.1 Added more new skill quests for more classes [Lupus]
+//= Somehow eA engine doesn't let you keep learn't skill V_V'
+//= 1.2 Added to correct locations, correct NPC's, fixed
+//= some of the items required and made them into real
+//= quests. [Reddozen] 
+//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]
+//= 1.3a fixed an item ID typo, thx 2Spiritual Kid
+//= 1.3b Splitted into different files [DracoRPG]
+//============================================================
+
+
+//============================================================
+// BARD - PANG VOICE
+//============================================================
+prontera.gat,134,328,7	script	Timid man	89,{
+	mes "[Timid man]";
+	if(BaseJob!=Job_Bard) goto L_nobard;
+	if(getskilllv(1010)) goto L_alreadyhave;
+	if(JobLevel<40) goto L_nojob;
+
+	mes "I'll teach you all I know, but";
+	mes "I'm a little thirsty. Bring me";
+	mes "1 Tropical Sograt";
+	next;
+	
+	mes "[Timid man]";
+	mes "Let me check your items.";
+	next;
+	
+	if (countitem(12112)<1) goto L_noitems;//Items: Tropical_Sograt,
+	delitem 12112, 1;//Items: Tropical_Sograt,
+	mes "[Timid man]";
+	mes "I see you have what you need,";
+	mes "so I'll teach you my talent.";
+	skill 1010,1,0;
+	close;
+	
+L_noitems:
+	mes "[Timid man]";
+	mes "You don't have enough items.";
+	mes "Come back when you have all";
+	mes "the required items for me.";
+	close;
+		
+L_nobard:
+	mes "Hum... you don't seem to be a musician";
+	emotion e_gasp;
+	close;
+
+L_alreadyhave:
+	mes "I've already taught you";
+	mes "everything I know...";
+	close;
+
+L_nojob:
+	mes "Come back when you've learned";
+	mes "more about being a Bard.";
+	close;
+}
diff --git a/npc/quests/skills/blacksmith_skills.txt b/npc/quests/skills/blacksmith_skills.txt
index e0e6d305c..e46455771 100644
--- a/npc/quests/skills/blacksmith_skills.txt
+++ b/npc/quests/skills/blacksmith_skills.txt
@@ -1,141 +1,141 @@
-//===== eAthena Script ======================================= 

-//= Blacksmith Skills Quests

-//===== By: ================================================== 

-//= Lupus, Reddozen

-//===== Current Version: ===================================== 

-//= 1.3a

-//===== Compatible With: ===================================== 

-//= eAthena Revision 3800+

-//===== Description: ========================================= 

-//= Temp quests for new skills for 2nd classes

-//===== Additional Comments: ================================= 

-//= 1.0 for fully working skills only [Lupus]

-//= 1.1 Added more new skill quests for more classes [Lupus]

-//= Somehow eA engine doesn't let you keep learn't skill V_V'

-//= 1.2 Added to correct locations, correct NPC's, fixed

-//= some of the items required and made them into real

-//= quests. [Reddozen] 

-//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]

-//= 1.3a fixed an item ID typo, thx 2Spiritual Kid

-//= 1.3b Splitted into different files [DracoRPG]

-//============================================================

-

-

-//============================================================

-// BLACKSMITH SKILL - GREED + UNFAIR TRICK

-//============================================================

-//== GOODDAY - GREED SKILL ===================================

-geffen.gat,172,53,7	script	Goodday	826,{

-	mes "[Goodday]";

-	if(BaseJob!=Job_Blacksmith) goto L_nosmith;

-	if(getskilllv(1013)) goto L_alreadyhave;

-	if(Weight < 5000 || (Weight > MaxWeight-MaxWeight/10)) goto L_notstrong;

-

-	mes "You look pretty strong, so I'll";

-	mes "teach you a little trick I found";

-	mes "while watching some wizards move";

-	mes "things around without lifting a";

-	mes "finger!";

-	skill 1013,1,0;

-	close;

-

-L_notstrong:

-	mes "Come back when you're strong";

-	mes "enough to handle the weight";

-	mes "of my ability. You will need";

-	mes "to be able to carry over 5000";

-	mes "weight, and not be over 90%.";

-	close;

-

-L_nosmith:

-	mes "Geffen is such a great town.";

-	mes "Don't you think so too?";

-	next;

-	emotion e_omg;

-	mes "[Goodday]";

-	mes "WHAT...";

-	mes "You don't!";	

-	close;

-

-L_alreadyhave:

-	mes "I've already taught you";

-	mes "everything I know, so I";

-	mes "need to get back to my";

-	mes "work.";

-	close;

-}

-

-//== AKI - UNFAIR TRICK SKILL ==================================

-geffen.gat,178,72,7	script	Aki	726,{

-	mes "[Aki]";

-	if(BaseJob!=Job_Blacksmith) goto L_nosmith;

-	if(getskilllv(1012)) goto L_alreadyhave;

-	if(getskilllv(1013)<1) goto L_nogreed;

-	if(JobLevel<30) goto L_nojob;

-	mes "We're going to need a few things";

-	mes "for this lesson. Bring me:";

-	mes "2 Steel";

-	mes "8 Coal";

-	mes "2 Iron Hammers";

-	mes "1 Detrimindexta";

-	mes "500 Zeny";

-	next;

-	

-	mes "[Aki]";

-	mes "Let me check your items.";

-	next;

-	

-	if(countitem(999)<2 || countitem(1003)<8 || countitem(613)<2 || countitem(971)<1 || zeny<500) goto L_noitems;//Items: Steel, Coal, Iron_Hammer, Detrimindexta,

-	delitem 999, 2;//Items: Steel,

-	delitem 1003, 8;//Items: Coal,

-	delitem 613, 2;//Items: Iron_Hammer,

-	delitem 971, 1;//Items: Detrimindexta,

-	set zeny, zeny-500;

-	

-	mes "[Aki]";

-	mes "Good, You brought everything";

-	mes "with you already! We'll start";

-	mes "the process now.";

-	skill 1012,1,0;

-	next;

-	

-	specialeffect 183;

-	mes "Wow, you're a fast learner.";

-	mes "Enjoy your new talents!";

-	close;

-

-L_noitems:

-	mes "[Aki]";

-	mes "You don't have enough items.";

-	mes "Come back when you have all";

-	mes "the required items for me.";

-	close;

-	

-L_nosmith:

-	mes "Don't mind Goodday over there.";

-	mes "He thinks everyone should like";

-	mes "this boring place!";

-	emotion e_laugh;

-	close;

-

-L_nogreed:

-	mes "If you're looking for more";

-	mes "to learn, then you should";

-	mes "talk to Goodday over there";

-	close;

-

-L_alreadyhave:

-	mes "WOW, I guess you've learned";

-	mes "all that the Blacksmiths of";

-	mes "Geffen can teach. Good luck";

-	mes "with your travels.";

-	close;

-	

-L_nojob:

-	mes "Come back when you've learned";

-	mes "more about being a Blacksmith.";

-	mes "You will need a Job level of at";

-	mes "least lv 30 to learn what I";

-	mes "know.";

-	close;

-}

+//===== eAthena Script ======================================= 
+//= Blacksmith Skills Quests
+//===== By: ================================================== 
+//= Lupus, Reddozen
+//===== Current Version: ===================================== 
+//= 1.3a
+//===== Compatible With: ===================================== 
+//= eAthena Revision 3800+
+//===== Description: ========================================= 
+//= Temp quests for new skills for 2nd classes
+//===== Additional Comments: ================================= 
+//= 1.0 for fully working skills only [Lupus]
+//= 1.1 Added more new skill quests for more classes [Lupus]
+//= Somehow eA engine doesn't let you keep learn't skill V_V'
+//= 1.2 Added to correct locations, correct NPC's, fixed
+//= some of the items required and made them into real
+//= quests. [Reddozen] 
+//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]
+//= 1.3a fixed an item ID typo, thx 2Spiritual Kid
+//= 1.3b Splitted into different files [DracoRPG]
+//============================================================
+
+
+//============================================================
+// BLACKSMITH SKILL - GREED + UNFAIR TRICK
+//============================================================
+//== GOODDAY - GREED SKILL ===================================
+geffen.gat,172,53,7	script	Goodday	826,{
+	mes "[Goodday]";
+	if(BaseJob!=Job_Blacksmith) goto L_nosmith;
+	if(getskilllv(1013)) goto L_alreadyhave;
+	if(Weight < 5000 || (Weight > MaxWeight-MaxWeight/10)) goto L_notstrong;
+
+	mes "You look pretty strong, so I'll";
+	mes "teach you a little trick I found";
+	mes "while watching some wizards move";
+	mes "things around without lifting a";
+	mes "finger!";
+	skill 1013,1,0;
+	close;
+
+L_notstrong:
+	mes "Come back when you're strong";
+	mes "enough to handle the weight";
+	mes "of my ability. You will need";
+	mes "to be able to carry over 5000";
+	mes "weight, and not be over 90%.";
+	close;
+
+L_nosmith:
+	mes "Geffen is such a great town.";
+	mes "Don't you think so too?";
+	next;
+	emotion e_omg;
+	mes "[Goodday]";
+	mes "WHAT...";
+	mes "You don't!";	
+	close;
+
+L_alreadyhave:
+	mes "I've already taught you";
+	mes "everything I know, so I";
+	mes "need to get back to my";
+	mes "work.";
+	close;
+}
+
+//== AKI - UNFAIR TRICK SKILL ==================================
+geffen.gat,178,72,7	script	Aki	726,{
+	mes "[Aki]";
+	if(BaseJob!=Job_Blacksmith) goto L_nosmith;
+	if(getskilllv(1012)) goto L_alreadyhave;
+	if(getskilllv(1013)<1) goto L_nogreed;
+	if(JobLevel<30) goto L_nojob;
+	mes "We're going to need a few things";
+	mes "for this lesson. Bring me:";
+	mes "2 Steel";
+	mes "8 Coal";
+	mes "2 Iron Hammers";
+	mes "1 Detrimindexta";
+	mes "500 Zeny";
+	next;
+	
+	mes "[Aki]";
+	mes "Let me check your items.";
+	next;
+	
+	if(countitem(999)<2 || countitem(1003)<8 || countitem(613)<2 || countitem(971)<1 || zeny<500) goto L_noitems;//Items: Steel, Coal, Iron_Hammer, Detrimindexta,
+	delitem 999, 2;//Items: Steel,
+	delitem 1003, 8;//Items: Coal,
+	delitem 613, 2;//Items: Iron_Hammer,
+	delitem 971, 1;//Items: Detrimindexta,
+	set zeny, zeny-500;
+	
+	mes "[Aki]";
+	mes "Good, You brought everything";
+	mes "with you already! We'll start";
+	mes "the process now.";
+	skill 1012,1,0;
+	next;
+	
+	specialeffect 183;
+	mes "Wow, you're a fast learner.";
+	mes "Enjoy your new talents!";
+	close;
+
+L_noitems:
+	mes "[Aki]";
+	mes "You don't have enough items.";
+	mes "Come back when you have all";
+	mes "the required items for me.";
+	close;
+	
+L_nosmith:
+	mes "Don't mind Goodday over there.";
+	mes "He thinks everyone should like";
+	mes "this boring place!";
+	emotion e_laugh;
+	close;
+
+L_nogreed:
+	mes "If you're looking for more";
+	mes "to learn, then you should";
+	mes "talk to Goodday over there";
+	close;
+
+L_alreadyhave:
+	mes "WOW, I guess you've learned";
+	mes "all that the Blacksmiths of";
+	mes "Geffen can teach. Good luck";
+	mes "with your travels.";
+	close;
+	
+L_nojob:
+	mes "Come back when you've learned";
+	mes "more about being a Blacksmith.";
+	mes "You will need a Job level of at";
+	mes "least lv 30 to learn what I";
+	mes "know.";
+	close;
+}
diff --git a/npc/quests/skills/crusader_skills.txt b/npc/quests/skills/crusader_skills.txt
index fd215d761..33f16e981 100644
--- a/npc/quests/skills/crusader_skills.txt
+++ b/npc/quests/skills/crusader_skills.txt
@@ -1,107 +1,107 @@
-//===== eAthena Script ======================================= 

-//= Crusader Skills Quests

-//===== By: ================================================== 

-//= Lupus, Reddozen

-//===== Current Version: ===================================== 

-//= 1.3a

-//===== Compatible With: ===================================== 

-//= eAthena Revision 3800+

-//===== Description: ========================================= 

-//= Temp quests for new skills for 2nd classes

-//===== Additional Comments: ================================= 

-//= 1.0 for fully working skills only [Lupus]

-//= 1.1 Added more new skill quests for more classes [Lupus]

-//= Somehow eA engine doesn't let you keep learn't skill V_V'

-//= 1.2 Added to correct locations, correct NPC's, fixed

-//= some of the items required and made them into real

-//= quests. [Reddozen] 

-//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]

-//= 1.3a fixed an item ID typo, thx 2Spiritual Kid

-//= 1.3b Splitted into different files [DracoRPG]

-//============================================================

-

-

-//============================================================

-// CRUSADER SKILL - SHRINK

-//============================================================

-geffen.gat,110,118,3	script	Ford	752,{

-	mes "[Ford]";

-	if(BaseJob!=Job_Crusader) goto L_nocruz;

-	if(getskilllv(1002)) goto L_alreadyhave;

-	mes "Maybe I'll teach you a little skill";

-	mes "if you bring me a few things...";

-	mes "Bring me these items and we'll";

-	mes "see if I feel like giving it to you.";

-	next;

-	mes "[Ford]";

-	mes "1 Red Potion";

-	mes "20 Sticky Mucus";

-	mes "3 Empty Bottles";

-	mes "5 Jellopies";

-	mes "1 Unripe Apple";

-	mes "1 Grape";

-	mes "1 Coal";

-	mes "3 Cyfars";

-	next;

-	

-	mes "[Ford]";

-	mes "Let me check your items.";

-	next;

-	

-	if(countitem(501)<1 || countitem(938)<20 || countitem(713)<3 || countitem(909)<5 || countitem(619)<1 || countitem(514)<1 || countitem(1003)<1 || countitem(7053)<3)goto L_noitems;//Items: Red_Potion, Sticky_Mucus, Empty_Bottle, Jellopy, Unripe_Apple, Grape, Coal, Cyfar,

-	delitem 501, 1;//Items: Red_Potion,

-	delitem 938, 20;//Items: Sticky_Mucus,

-	delitem 713, 3;//Items: Empty_Bottle,

-	delitem 909, 5;//Items: Jellopy,

-	delitem 619, 1;//Items: Unripe_Apple,

-	delitem 514, 1;//Items: Grape,

-	delitem 1003, 1;//Items: Coal,

-	delitem 7053, 3;//Items: Cyfar,

-	mes "[Ford]";

-	mes "Time to roll my lucky dice.";

-	mes "Good luck, I almost never lose.";

-//TODO: add DICE emotions? 8)

-	emotion e_gg;

-	next;

-	if(rand(1,6)!=3) goto L_lose;

-	emotion 58;

-	next;

-	

-	skill 1002,1,0;

-	mes "[Ford]";

-	mes "I can't believe I lost!";

-	mes "I NEVER lose...";

-	emotion e_sob;

-	close;

-	

-L_noitems:

-	mes "[Ford]";

-	mes "You don't have enough items.";

-	mes "Come back when you have all";

-	mes "the required items for me.";

-	close;

-		

-L_lose:

-	emotion 63;

-	next;

-	mes "[Ford]";

-	mes "I win again!!";

-	mes "I'm not teaching you";

-	mes "anything this time. Come";

-	mes "back if you want to Try";

-	mes "again";

-	close;

-	

-L_nocruz:

-	mes "If you are not a Crusader,";

-	mes "then you have no business";

-	mes "with me...";

-	close;

-	

-L_alreadyhave:

-	mes "Hey, you were lucky I";

-	mes "even taught you the";

-	mes "skill I did! Don't press";

-	mes "your luck.";

-	close;

-}

+//===== eAthena Script ======================================= 
+//= Crusader Skills Quests
+//===== By: ================================================== 
+//= Lupus, Reddozen
+//===== Current Version: ===================================== 
+//= 1.3a
+//===== Compatible With: ===================================== 
+//= eAthena Revision 3800+
+//===== Description: ========================================= 
+//= Temp quests for new skills for 2nd classes
+//===== Additional Comments: ================================= 
+//= 1.0 for fully working skills only [Lupus]
+//= 1.1 Added more new skill quests for more classes [Lupus]
+//= Somehow eA engine doesn't let you keep learn't skill V_V'
+//= 1.2 Added to correct locations, correct NPC's, fixed
+//= some of the items required and made them into real
+//= quests. [Reddozen] 
+//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]
+//= 1.3a fixed an item ID typo, thx 2Spiritual Kid
+//= 1.3b Splitted into different files [DracoRPG]
+//============================================================
+
+
+//============================================================
+// CRUSADER SKILL - SHRINK
+//============================================================
+geffen.gat,110,118,3	script	Ford	752,{
+	mes "[Ford]";
+	if(BaseJob!=Job_Crusader) goto L_nocruz;
+	if(getskilllv(1002)) goto L_alreadyhave;
+	mes "Maybe I'll teach you a little skill";
+	mes "if you bring me a few things...";
+	mes "Bring me these items and we'll";
+	mes "see if I feel like giving it to you.";
+	next;
+	mes "[Ford]";
+	mes "1 Red Potion";
+	mes "20 Sticky Mucus";
+	mes "3 Empty Bottles";
+	mes "5 Jellopies";
+	mes "1 Unripe Apple";
+	mes "1 Grape";
+	mes "1 Coal";
+	mes "3 Cyfars";
+	next;
+	
+	mes "[Ford]";
+	mes "Let me check your items.";
+	next;
+	
+	if(countitem(501)<1 || countitem(938)<20 || countitem(713)<3 || countitem(909)<5 || countitem(619)<1 || countitem(514)<1 || countitem(1003)<1 || countitem(7053)<3)goto L_noitems;//Items: Red_Potion, Sticky_Mucus, Empty_Bottle, Jellopy, Unripe_Apple, Grape, Coal, Cyfar,
+	delitem 501, 1;//Items: Red_Potion,
+	delitem 938, 20;//Items: Sticky_Mucus,
+	delitem 713, 3;//Items: Empty_Bottle,
+	delitem 909, 5;//Items: Jellopy,
+	delitem 619, 1;//Items: Unripe_Apple,
+	delitem 514, 1;//Items: Grape,
+	delitem 1003, 1;//Items: Coal,
+	delitem 7053, 3;//Items: Cyfar,
+	mes "[Ford]";
+	mes "Time to roll my lucky dice.";
+	mes "Good luck, I almost never lose.";
+//TODO: add DICE emotions? 8)
+	emotion e_gg;
+	next;
+	if(rand(1,6)!=3) goto L_lose;
+	emotion 58;
+	next;
+	
+	skill 1002,1,0;
+	mes "[Ford]";
+	mes "I can't believe I lost!";
+	mes "I NEVER lose...";
+	emotion e_sob;
+	close;
+	
+L_noitems:
+	mes "[Ford]";
+	mes "You don't have enough items.";
+	mes "Come back when you have all";
+	mes "the required items for me.";
+	close;
+		
+L_lose:
+	emotion 63;
+	next;
+	mes "[Ford]";
+	mes "I win again!!";
+	mes "I'm not teaching you";
+	mes "anything this time. Come";
+	mes "back if you want to Try";
+	mes "again";
+	close;
+	
+L_nocruz:
+	mes "If you are not a Crusader,";
+	mes "then you have no business";
+	mes "with me...";
+	close;
+	
+L_alreadyhave:
+	mes "Hey, you were lucky I";
+	mes "even taught you the";
+	mes "skill I did! Don't press";
+	mes "your luck.";
+	close;
+}
diff --git a/npc/quests/skills/dancer_skills.txt b/npc/quests/skills/dancer_skills.txt
index 8c933a50c..0f5916094 100644
--- a/npc/quests/skills/dancer_skills.txt
+++ b/npc/quests/skills/dancer_skills.txt
@@ -1,74 +1,74 @@
-//===== eAthena Script ======================================= 

-//= Dancer Skills Quests

-//===== By: ================================================== 

-//= Lupus, Reddozen

-//===== Current Version: ===================================== 

-//= 1.3a

-//===== Compatible With: ===================================== 

-//= eAthena Revision 3800+

-//===== Description: ========================================= 

-//= Temp quests for new skills for 2nd classes

-//===== Additional Comments: ================================= 

-//= 1.0 for fully working skills only [Lupus]

-//= 1.1 Added more new skill quests for more classes [Lupus]

-//= Somehow eA engine doesn't let you keep learn't skill V_V'

-//= 1.2 Added to correct locations, correct NPC's, fixed

-//= some of the items required and made them into real

-//= quests. [Reddozen] 

-//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]

-//= 1.3a fixed an item ID typo, thx 2Spiritual Kid

-//= 1.3b Splitted into different files [DracoRPG]

-//============================================================

-

-

-//============================================================

-// DANCER - WINK OF CHARM

-//============================================================

-comodo.gat,205,171,7	script	Chanel	724,{

-	mes "[Chanel]";

-	if(BaseJob!=Job_Dancer) goto L_nodancer;

-	if(getskilllv(1011)) goto L_alreadyhave;

-	mes "I'll teach you all I know for:";

-	mes "1 Crystal Mirror";

-	mes "1 Alcohol";

-	mes "1 China";

-	mes "1 Apple";

-	mes "3 Bananas";

-	mes "5 Well-baked Cookies";

-	next;

-	

-	mes "[Chanel]";

-	mes "Let me check your items.";

-	next;

-	

-	if(countitem(747)<1 || countitem(970)<1 || countitem(736)<1 || countitem(512)<1 || countitem(513)<3 || countitem(538)<5) goto L_noitems;//Items: Crystal_Mirror, Alcohol, China, Apple, Banana, Well-baked_Cookie,

-	delitem 747, 1;//Items: Crystal_Mirror,

-	delitem 970, 1;//Items: Alcohol,

-	delitem 736, 1;//Items: China,

-	delitem 512, 1;//Items: Apple,

-	delitem 513, 3;//Items: Banana,

-	delitem 538, 5;//Items: Well-baked_Cookie,

-

-	mes "[Chanel]";

-	mes "I see you have what you need,";

-	mes "so I'll teach you my talent.";

-	skill 1011,1,0;

-	close;

-	

-L_noitems:

-	mes "[Chanel]";

-	mes "You don't have enough items.";

-	mes "Come back when you have all";

-	mes "the required items for me.";

-	close;

-		

-L_nodancer:

-	mes "Hum... you don't seem to be a musician";

-	emotion e_gasp;

-	close;

-

-L_alreadyhave:

-	mes "I've already taught you";

-	mes "everything I know...";

-	close;

-}

+//===== eAthena Script ======================================= 
+//= Dancer Skills Quests
+//===== By: ================================================== 
+//= Lupus, Reddozen
+//===== Current Version: ===================================== 
+//= 1.3a
+//===== Compatible With: ===================================== 
+//= eAthena Revision 3800+
+//===== Description: ========================================= 
+//= Temp quests for new skills for 2nd classes
+//===== Additional Comments: ================================= 
+//= 1.0 for fully working skills only [Lupus]
+//= 1.1 Added more new skill quests for more classes [Lupus]
+//= Somehow eA engine doesn't let you keep learn't skill V_V'
+//= 1.2 Added to correct locations, correct NPC's, fixed
+//= some of the items required and made them into real
+//= quests. [Reddozen] 
+//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]
+//= 1.3a fixed an item ID typo, thx 2Spiritual Kid
+//= 1.3b Splitted into different files [DracoRPG]
+//============================================================
+
+
+//============================================================
+// DANCER - WINK OF CHARM
+//============================================================
+comodo.gat,205,171,7	script	Chanel	724,{
+	mes "[Chanel]";
+	if(BaseJob!=Job_Dancer) goto L_nodancer;
+	if(getskilllv(1011)) goto L_alreadyhave;
+	mes "I'll teach you all I know for:";
+	mes "1 Crystal Mirror";
+	mes "1 Alcohol";
+	mes "1 China";
+	mes "1 Apple";
+	mes "3 Bananas";
+	mes "5 Well-baked Cookies";
+	next;
+	
+	mes "[Chanel]";
+	mes "Let me check your items.";
+	next;
+	
+	if(countitem(747)<1 || countitem(970)<1 || countitem(736)<1 || countitem(512)<1 || countitem(513)<3 || countitem(538)<5) goto L_noitems;//Items: Crystal_Mirror, Alcohol, China, Apple, Banana, Well-baked_Cookie,
+	delitem 747, 1;//Items: Crystal_Mirror,
+	delitem 970, 1;//Items: Alcohol,
+	delitem 736, 1;//Items: China,
+	delitem 512, 1;//Items: Apple,
+	delitem 513, 3;//Items: Banana,
+	delitem 538, 5;//Items: Well-baked_Cookie,
+
+	mes "[Chanel]";
+	mes "I see you have what you need,";
+	mes "so I'll teach you my talent.";
+	skill 1011,1,0;
+	close;
+	
+L_noitems:
+	mes "[Chanel]";
+	mes "You don't have enough items.";
+	mes "Come back when you have all";
+	mes "the required items for me.";
+	close;
+		
+L_nodancer:
+	mes "Hum... you don't seem to be a musician";
+	emotion e_gasp;
+	close;
+
+L_alreadyhave:
+	mes "I've already taught you";
+	mes "everything I know...";
+	close;
+}
diff --git a/npc/quests/skills/hunter_skills.txt b/npc/quests/skills/hunter_skills.txt
index e2e639c2a..eaed585d6 100644
--- a/npc/quests/skills/hunter_skills.txt
+++ b/npc/quests/skills/hunter_skills.txt
@@ -1,88 +1,88 @@
-//===== eAthena Script ======================================= 

-//= Hunter Skills Quests

-//===== By: ================================================== 

-//= Lupus, Reddozen

-//===== Current Version: ===================================== 

-//= 1.3a

-//===== Compatible With: ===================================== 

-//= eAthena Revision 3800+

-//===== Description: ========================================= 

-//= Temp quests for new skills for 2nd classes

-//===== Additional Comments: ================================= 

-//= 1.0 for fully working skills only [Lupus]

-//= 1.1 Added more new skill quests for more classes [Lupus]

-//= Somehow eA engine doesn't let you keep learn't skill V_V'

-//= 1.2 Added to correct locations, correct NPC's, fixed

-//= some of the items required and made them into real

-//= quests. [Reddozen] 

-//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]

-//= 1.3a fixed an item ID typo, thx 2Spiritual Kid

-//= 1.3b Splitted into different files [DracoRPG]

-//= 1.3c Fixed some typos [IVBela]

-//============================================================

-

-

-//============================================================

-// HUNTER SKILL - PHANTASMIC ARROW

-//============================================================

-payon_in02.gat,54,13,7	script	Master Kabac	55,{

-	mes "[Master Kabac]";

-	if(BaseJob!=Job_Hunter) goto L_hunterno;

-	if(getskilllv(1009)) goto L_alreadyhave;

-	if(JobLevel<40) goto L_nojob;

-

-	mes "I can teach you a secret";

-	mes "technique passed down through";

-	mes "my family for generations. My";

-	mes "family has guarded this secret";

-	mes "for years, but I could teach";

-	mes "for a few supplies.";

-	next;

-	mes "[Master Kabac]";

-	mes "I am running low on on a few";

-	mes "things. Here is my list:";

-	mes "5 Cursed Rubys";

-	mes "5 Harpy's Feathers";

-	mes "30 Pet Food";

-	next;

-	

-	mes "[Master Kabac]";

-	mes "Let me check your items.";

-	next;

-	

-	if(countitem(724)<5 || countitem(7115)<5 || countitem(537)<30) goto L_noitems;//Items: Cursed_Ruby, Harpy_Feather, Pet_Food,

-	delitem 724, 5;//Items: Cursed_Ruby,

-	delitem 7115, 5;//Items: Harpy_Feather,

-	delitem 537, 30;//Items: Pet_Food,

-	

-	mes "[Master Kabac]";

-	mes "I see you have what you need,";

-	mes "so I'll teach you my talent.";

-	skill 1009,1,0;

-	close;

-

-L_noitems:

-	mes "[Master Kabac]";

-	mes "You don't have enough items.";

-	mes "Come back when you have all";

-	mes "the required items for me.";

-	close;

-		

-L_nojob:

-	mes "Come back when you've Learned";

-	mes "more about being a Hunter.";

-	mes "You need to have at least 40";

-	mes "levels as a hunter first.";

-	close;

-

-L_alreadyhave:

-	mes "Ahh, my apprentice, you";

-	mes "came to visit me...";

-	close;

-	

-L_hunterno:

-	mes "Is there something I can";

-	mes "help you with? I believe";

-	mes "you have the wrong old man.";

-	close;

-}

+//===== eAthena Script ======================================= 
+//= Hunter Skills Quests
+//===== By: ================================================== 
+//= Lupus, Reddozen
+//===== Current Version: ===================================== 
+//= 1.3a
+//===== Compatible With: ===================================== 
+//= eAthena Revision 3800+
+//===== Description: ========================================= 
+//= Temp quests for new skills for 2nd classes
+//===== Additional Comments: ================================= 
+//= 1.0 for fully working skills only [Lupus]
+//= 1.1 Added more new skill quests for more classes [Lupus]
+//= Somehow eA engine doesn't let you keep learn't skill V_V'
+//= 1.2 Added to correct locations, correct NPC's, fixed
+//= some of the items required and made them into real
+//= quests. [Reddozen] 
+//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]
+//= 1.3a fixed an item ID typo, thx 2Spiritual Kid
+//= 1.3b Splitted into different files [DracoRPG]
+//= 1.3c Fixed some typos [IVBela]
+//============================================================
+
+
+//============================================================
+// HUNTER SKILL - PHANTASMIC ARROW
+//============================================================
+payon_in02.gat,54,13,7	script	Master Kabac	55,{
+	mes "[Master Kabac]";
+	if(BaseJob!=Job_Hunter) goto L_hunterno;
+	if(getskilllv(1009)) goto L_alreadyhave;
+	if(JobLevel<40) goto L_nojob;
+
+	mes "I can teach you a secret";
+	mes "technique passed down through";
+	mes "my family for generations. My";
+	mes "family has guarded this secret";
+	mes "for years, but I could teach";
+	mes "for a few supplies.";
+	next;
+	mes "[Master Kabac]";
+	mes "I am running low on on a few";
+	mes "things. Here is my list:";
+	mes "5 Cursed Rubys";
+	mes "5 Harpy's Feathers";
+	mes "30 Pet Food";
+	next;
+	
+	mes "[Master Kabac]";
+	mes "Let me check your items.";
+	next;
+	
+	if(countitem(724)<5 || countitem(7115)<5 || countitem(537)<30) goto L_noitems;//Items: Cursed_Ruby, Harpy_Feather, Pet_Food,
+	delitem 724, 5;//Items: Cursed_Ruby,
+	delitem 7115, 5;//Items: Harpy_Feather,
+	delitem 537, 30;//Items: Pet_Food,
+	
+	mes "[Master Kabac]";
+	mes "I see you have what you need,";
+	mes "so I'll teach you my talent.";
+	skill 1009,1,0;
+	close;
+
+L_noitems:
+	mes "[Master Kabac]";
+	mes "You don't have enough items.";
+	mes "Come back when you have all";
+	mes "the required items for me.";
+	close;
+		
+L_nojob:
+	mes "Come back when you've Learned";
+	mes "more about being a Hunter.";
+	mes "You need to have at least 40";
+	mes "levels as a hunter first.";
+	close;
+
+L_alreadyhave:
+	mes "Ahh, my apprentice, you";
+	mes "came to visit me...";
+	close;
+	
+L_hunterno:
+	mes "Is there something I can";
+	mes "help you with? I believe";
+	mes "you have the wrong old man.";
+	close;
+}
diff --git a/npc/quests/skills/knight_skills.txt b/npc/quests/skills/knight_skills.txt
index e5e29d781..b8431e718 100644
--- a/npc/quests/skills/knight_skills.txt
+++ b/npc/quests/skills/knight_skills.txt
@@ -1,67 +1,67 @@
-//===== eAthena Script ======================================= 

-//= Knight Skills Quests

-//===== By: ================================================== 

-//= Lupus, Reddozen

-//===== Current Version: ===================================== 

-//= 1.3a

-//===== Compatible With: ===================================== 

-//= eAthena Revision 3800+

-//===== Description: ========================================= 

-//= Temp quests for new skills for 2nd classes

-//===== Additional Comments: ================================= 

-//= 1.0 for fully working skills only [Lupus]

-//= 1.1 Added more new skill quests for more classes [Lupus]

-//= Somehow eA engine doesn't let you keep learn't skill V_V'

-//= 1.2 Added to correct locations, correct NPC's, fixed

-//= some of the items required and made them into real

-//= quests. [Reddozen] 

-//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]

-//= 1.3a fixed an item ID typo, thx 2Spiritual Kid

-//= 1.3b Splitted into different files [DracoRPG]

-//============================================================

-

-

-//============================================================

-// KNIGHT - CHARGE ATTACK

-//============================================================

-prt_in.gat,84,98,3	script	Esope	734,{

-	mes "[Esope]";

-	if(BaseJob!=Job_Knight) goto L_noknight;

-	if(getskilllv(1001)) goto L_alreadyhave;

-

-	mes "I'll teach you all I know for:";

-	mes "5 Candy canes";

-	mes "3 Witherless Roses";

-	next;

-	

-	mes "[Esope]";

-	mes "Let me check your items.";

-	next;

-	

-	if(countitem(530)<5 || countitem(748)<3)goto L_noitems;//Items: Candy_Cane, Witherless_Rose,

-	delitem 530, 5;//Items: Candy_Cane,

-	delitem 748, 3;//Items: Witherless_Rose,

-	

-	mes "[Esope]";

-	mes "I see you have what you need,";

-	mes "so I'll teach you my talent.";

-	skill 1001,1,0;

-	close;

-

-L_noitems:

-	mes "[Esope]";

-	mes "You don't have enough items.";

-	mes "Come back when you have all";

-	mes "the required items for me.";

-	close;

-		

-L_noknight:

-	mes "Looking for your master?";

-	emotion e_gasp;

-	close;

-

-L_alreadyhave:

-	mes "I've already taught you";

-	mes "everything I know...";

-	close;

-}

+//===== eAthena Script ======================================= 
+//= Knight Skills Quests
+//===== By: ================================================== 
+//= Lupus, Reddozen
+//===== Current Version: ===================================== 
+//= 1.3a
+//===== Compatible With: ===================================== 
+//= eAthena Revision 3800+
+//===== Description: ========================================= 
+//= Temp quests for new skills for 2nd classes
+//===== Additional Comments: ================================= 
+//= 1.0 for fully working skills only [Lupus]
+//= 1.1 Added more new skill quests for more classes [Lupus]
+//= Somehow eA engine doesn't let you keep learn't skill V_V'
+//= 1.2 Added to correct locations, correct NPC's, fixed
+//= some of the items required and made them into real
+//= quests. [Reddozen] 
+//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]
+//= 1.3a fixed an item ID typo, thx 2Spiritual Kid
+//= 1.3b Splitted into different files [DracoRPG]
+//============================================================
+
+
+//============================================================
+// KNIGHT - CHARGE ATTACK
+//============================================================
+prt_in.gat,84,98,3	script	Esope	734,{
+	mes "[Esope]";
+	if(BaseJob!=Job_Knight) goto L_noknight;
+	if(getskilllv(1001)) goto L_alreadyhave;
+
+	mes "I'll teach you all I know for:";
+	mes "5 Candy canes";
+	mes "3 Witherless Roses";
+	next;
+	
+	mes "[Esope]";
+	mes "Let me check your items.";
+	next;
+	
+	if(countitem(530)<5 || countitem(748)<3)goto L_noitems;//Items: Candy_Cane, Witherless_Rose,
+	delitem 530, 5;//Items: Candy_Cane,
+	delitem 748, 3;//Items: Witherless_Rose,
+	
+	mes "[Esope]";
+	mes "I see you have what you need,";
+	mes "so I'll teach you my talent.";
+	skill 1001,1,0;
+	close;
+
+L_noitems:
+	mes "[Esope]";
+	mes "You don't have enough items.";
+	mes "Come back when you have all";
+	mes "the required items for me.";
+	close;
+		
+L_noknight:
+	mes "Looking for your master?";
+	emotion e_gasp;
+	close;
+
+L_alreadyhave:
+	mes "I've already taught you";
+	mes "everything I know...";
+	close;
+}
diff --git a/npc/quests/skills/mage_skills.txt b/npc/quests/skills/mage_skills.txt
index 7b94c3deb..608c2a9b5 100644
--- a/npc/quests/skills/mage_skills.txt
+++ b/npc/quests/skills/mage_skills.txt
@@ -1,118 +1,118 @@
-//===== eAthena Script =======================================

-//= Mage Skill Quest

-//===== By: ==================================================

-//= kobra_k88

-//===== Current Version: =====================================

-//= 1.4b

-//===== Compatible With: =====================================

-//= eAthena 7.15 +

-//===== Description: =========================================

-//= <Description> 

-//===== Additional Comments: =================================

-//= v1.0a Now using functions found in "Global_Functions.txt"

-//= for class checks.[kobra_k88]

-//= 1.2 Added Baby Class Support [Lupus]

-//= 1.3 Removed callfunc Is_####_Class in favor of baseClass [Silentdragon]

-//= 1.4 Fixed exploit [Lupus]

-//= 1.4a Fixed some typos [IVBela]

-//= 1.4b changed perm. variables to temp ones [Lupus]

-//============================================================

-

-

-

-geffen_in.gat,151,119,4	script	BLIZZARDRISS	71,{

-	mes "[BLIZZARDRISS]";

-	if(baseClass == Job_Mage) goto L_Start;

-

-L_Other:

-	mes "What new magic spells will I discover today......??";

-	emotion e_hmm;

-	close;

-

-L_Start:

-	if(@ENRGYCOAT) goto L_GetSkill;

-	if(getskilllv(157)>0) goto L_GotSkill;

-	mes "Hey! My friend! I see that you are a magic user.  If you look within yourself, you'll find that you have... 'HIDDEN ABILITIES'!!";

-	next;

-	menu "'Hidden Abilities'.....?",M_0, "End Conversation.",M_End;

-

-	M_0:

-		mes "[BLIZZARDRISS]";

-		mes "For many years I studied the ancient magic of Geffen, and I recently re-discovered a forgotten magic spell that is quite useful.";

-		next;

-		mes "[BLIZZARDRISS]";

-		mes "The spell uses your 'pyschokinetic energy' to 'coat' your body in a magical shield, protecting you from enemy attacks.";

-		next;

-		mes "[BLIZZARDRISS]";

-		mes "Only highly trained magic users can learn this amazing spell.";

-		mes "Those who want to use this spell must tap into the hidden energies and abilities buried deep within!";

-		next;

-		mes "[BLIZZARDRISS]";

-		mes "The spell is called ^5555FF'Energy Coat'^000000!.  Would you like me to teach it to you?";

-		next;

-		menu "Wow! Sounds great!",sM_0, "Meh... not interested.",sM_End;

-

-		sM_0: 

-			mes "[BLIZZARDRISS]";

-			mes "In order for me to teach you this spell I will need the following items:";

-			mes "^5533FF 3 Glass Beads,";

-			mes " 1 One Carat Diamond,";

-			mes " 5 Shells,^000000";

-			mes " and ^5533FF1 Solid shell^000000.";

-			next;

-			mes "[BLIZZARDRISS]";

-			mes "You will also need to have a sufficient amount of experience.  For Mages, a job level of at least 35 is needed.";

-			mes "Wizards and Sages are high level magic users and can learn the skill at any job level.";

-			next;

-			mes "[BLIZZARDRISS]";

-			mes "When you are fully trained and have all of the required items come back and see me.";

-			set @ENRGYCOAT, 1;

-			close;

-

-		sM_End:

-			mes "[BLIZZARDRISS]";

-			mes "Hmf! Suit yourself.  Don't come complaining to me when get beat up by a bunch of spores!!";

-			emotion e_an;

-			close;

-

-	M_End:

-		mes "[BLIZZARDRISS]";

-		mes "The wise man must have patience!  Prepare yourself and return when you are ready.";

-		close;

-

-L_GetSkill:

-	if(BaseJob==Job_Mage && JobLevel < 35) goto L_JobLvl;

-	if(countitem(746)<3 || countitem(730)<1 || countitem(935)<5 || countitem(943)<1) goto L_Items;

-	delitem 746,3;

-	delitem 730,1;

-	delitem 935,5;

-	delitem 943,1;

-	mes "Ohh my, ohh my...... This is going to be swell.  Hand over the items... Thank you.";

- 	next;

-	mes "~ several hours later ~";

-	next;

-	skill 157,1,0;

-	set @ENRGYCOAT,0;

- 	mes "[BLIZZARDRISS]";

- 	mes "You can now use the spell, 'Energy Coat'!! Use it wisely my friend!";

-	emotion e_no1;

- 	close;

-

-	L_JobLvl:

-		mes "Didn't you listen to my explanation? You need a job level of at least 35 to learn 'Energy Coat'.";

-		emotion e_what;

-		close;

-

-	L_Items:

-		mes "Didn't you listen to my explanation? You need the following items for me to teach you 'Energy Coat':";

-		mes "^5533FF 3 Glass Beads,";

-		mes " 1 One Carat Diamond,";

-		mes " 5 Shells,^000000";

-		mes " and ^5533FF1 Solid shell^000000.";

-		emotion e_what;

-		close;

-

-L_GotSkill:

-	mes "Well hello there.  The 'Energy Coat' skill is great, isn't it? Anyway, good luck with your journey.";

-	close;

-}

+//===== eAthena Script =======================================
+//= Mage Skill Quest
+//===== By: ==================================================
+//= kobra_k88
+//===== Current Version: =====================================
+//= 1.4b
+//===== Compatible With: =====================================
+//= eAthena 7.15 +
+//===== Description: =========================================
+//= <Description> 
+//===== Additional Comments: =================================
+//= v1.0a Now using functions found in "Global_Functions.txt"
+//= for class checks.[kobra_k88]
+//= 1.2 Added Baby Class Support [Lupus]
+//= 1.3 Removed callfunc Is_####_Class in favor of baseClass [Silentdragon]
+//= 1.4 Fixed exploit [Lupus]
+//= 1.4a Fixed some typos [IVBela]
+//= 1.4b changed perm. variables to temp ones [Lupus]
+//============================================================
+
+
+
+geffen_in.gat,151,119,4	script	BLIZZARDRISS	71,{
+	mes "[BLIZZARDRISS]";
+	if(baseClass == Job_Mage) goto L_Start;
+
+L_Other:
+	mes "What new magic spells will I discover today......??";
+	emotion e_hmm;
+	close;
+
+L_Start:
+	if(@ENRGYCOAT) goto L_GetSkill;
+	if(getskilllv(157)>0) goto L_GotSkill;
+	mes "Hey! My friend! I see that you are a magic user.  If you look within yourself, you'll find that you have... 'HIDDEN ABILITIES'!!";
+	next;
+	menu "'Hidden Abilities'.....?",M_0, "End Conversation.",M_End;
+
+	M_0:
+		mes "[BLIZZARDRISS]";
+		mes "For many years I studied the ancient magic of Geffen, and I recently re-discovered a forgotten magic spell that is quite useful.";
+		next;
+		mes "[BLIZZARDRISS]";
+		mes "The spell uses your 'pyschokinetic energy' to 'coat' your body in a magical shield, protecting you from enemy attacks.";
+		next;
+		mes "[BLIZZARDRISS]";
+		mes "Only highly trained magic users can learn this amazing spell.";
+		mes "Those who want to use this spell must tap into the hidden energies and abilities buried deep within!";
+		next;
+		mes "[BLIZZARDRISS]";
+		mes "The spell is called ^5555FF'Energy Coat'^000000!.  Would you like me to teach it to you?";
+		next;
+		menu "Wow! Sounds great!",sM_0, "Meh... not interested.",sM_End;
+
+		sM_0: 
+			mes "[BLIZZARDRISS]";
+			mes "In order for me to teach you this spell I will need the following items:";
+			mes "^5533FF 3 Glass Beads,";
+			mes " 1 One Carat Diamond,";
+			mes " 5 Shells,^000000";
+			mes " and ^5533FF1 Solid shell^000000.";
+			next;
+			mes "[BLIZZARDRISS]";
+			mes "You will also need to have a sufficient amount of experience.  For Mages, a job level of at least 35 is needed.";
+			mes "Wizards and Sages are high level magic users and can learn the skill at any job level.";
+			next;
+			mes "[BLIZZARDRISS]";
+			mes "When you are fully trained and have all of the required items come back and see me.";
+			set @ENRGYCOAT, 1;
+			close;
+
+		sM_End:
+			mes "[BLIZZARDRISS]";
+			mes "Hmf! Suit yourself.  Don't come complaining to me when get beat up by a bunch of spores!!";
+			emotion e_an;
+			close;
+
+	M_End:
+		mes "[BLIZZARDRISS]";
+		mes "The wise man must have patience!  Prepare yourself and return when you are ready.";
+		close;
+
+L_GetSkill:
+	if(BaseJob==Job_Mage && JobLevel < 35) goto L_JobLvl;
+	if(countitem(746)<3 || countitem(730)<1 || countitem(935)<5 || countitem(943)<1) goto L_Items;
+	delitem 746,3;
+	delitem 730,1;
+	delitem 935,5;
+	delitem 943,1;
+	mes "Ohh my, ohh my...... This is going to be swell.  Hand over the items... Thank you.";
+ 	next;
+	mes "~ several hours later ~";
+	next;
+	skill 157,1,0;
+	set @ENRGYCOAT,0;
+ 	mes "[BLIZZARDRISS]";
+ 	mes "You can now use the spell, 'Energy Coat'!! Use it wisely my friend!";
+	emotion e_no1;
+ 	close;
+
+	L_JobLvl:
+		mes "Didn't you listen to my explanation? You need a job level of at least 35 to learn 'Energy Coat'.";
+		emotion e_what;
+		close;
+
+	L_Items:
+		mes "Didn't you listen to my explanation? You need the following items for me to teach you 'Energy Coat':";
+		mes "^5533FF 3 Glass Beads,";
+		mes " 1 One Carat Diamond,";
+		mes " 5 Shells,^000000";
+		mes " and ^5533FF1 Solid shell^000000.";
+		emotion e_what;
+		close;
+
+L_GotSkill:
+	mes "Well hello there.  The 'Energy Coat' skill is great, isn't it? Anyway, good luck with your journey.";
+	close;
+}
diff --git a/npc/quests/skills/merchant_skills.txt b/npc/quests/skills/merchant_skills.txt
index fb25388b0..15e1ba000 100644
--- a/npc/quests/skills/merchant_skills.txt
+++ b/npc/quests/skills/merchant_skills.txt
@@ -1,307 +1,307 @@
-//===== eAthena Script =======================================

-//= Merchant Skills Quests

-//===== By: ==================================================

-//= kobra_k88

-//===== Current Version: =====================================

-//= 1.4b

-//===== Compatible With: =====================================

-//= eAthena 7.15 +

-//===== Description: =========================================

-//= <Description> 

-//===== Additional Comments: =================================

-//= Fully working

-//= v1.1 Bug fixes

-//= v1.a Now using functions found in "Global_Functions.txt"

-//= for class checks.[kobra_k88]

-//= 1.2 Added Baby Class Support [Lupus]

-//= 1.3 Removed callfunc Is_####_Class in favor of baseClass [Silentdragon]

-//= 1.4 Fixed exploits [Lupus]

-//= 1.4a Fixed some typos [IVBela] 1.4b  Gershaun -> Gershuan

-//= 	changed perm. variables to temp ones [Lupus]

-//============================================================

-

-

-

-//--------------------------------------- Necko: Crazy Uproar--------------------------------\\

-alberta.gat,89,96,5	script	Necko#01	139,0,4,{

-	mes "[!?]";

-	mes "Muahahahahhhahahahahhahah!!";

-	mes "Pukakakakakkakakakakakakaka!!";

-	close;

-}

-

-alberta.gat,83,96,5	script	Necko#02	98,{

-	mes "[Necko]";

-	if(baseClass == Job_Merchant) goto L_Start;

-

-L_Other:

-	mes "Necko's store is closed right now.  Come back later..... Hehe....";

-	close;

-

-L_Start:

-	if(getskilllv(155)>0) goto L_GotSkill;

-	if(@CRAZYROAR) goto L_GetSkill;

-	mes "Oh! Did you come here because you were intrigued by my boisterous voice? My voice is quite loud, isn't it?";

-	mes "After all you heared it from a far off distance.";

-	emotion e_what;

-	next;

-	mes "[Necko]";

-	mes "I'll let you in on something....... My voice is more than just loud..... it's actually quite unique......";

-	next;

-	mes "[Necko]";

-	if(BaseJob==Job_Merchant && JobLevel < 15) goto L_JobLvl;

-	mes "You see, I know a skill that lets me shout in a way that actually helps me.... It is the ^3355FFCrazy Uproar^000000 skill!!!";

-	emotion e_ic;

-	next;

-	mes "[Necko]";

-	mes "Crazy Uproar uses your loud voice to boost your battle spirit!";

-	mes "The skill requires ^FF55338 sp^000000 to use and in turn you will receive an additional ^3355FF4 STR for 5 min^000000!!";

-	next;

-	mes "[Necko]";

-	mes "This skill is very useful.  To learn it you must learn the essentials of sound.  There was a singer in Payon that taught sound theory.......";

-	next;

-	mes "[Necko]";

-	mes "Unfortunately that person passed away so you can no longer learn those essentials..............";

-	mes "Aww.... you look disappointed.... Do you really want to learn Crazy Uproar??";

-	next;

-	mes "[Necko]";

-	mes "Hmm..... I will teach you then, that is, if you truly wish to learn.  You will have to train your vocal cords.";

-	mes "You will also need to gather these items:";

-	next;

-	mes "[Necko]";

-	mes "- ^3355FF7 Pearls,";

-	mes "- 1 Banana juice,";

-	mes "- 50 Mushroom spores^000000.";

-	next;

-	mes "[Necko]";

-	mes "Come back when you are ready! I think I shall do a little vocal training myself........";

-	mes "Bbooowuuuuuuuuuuuuuuuuuuuuuuuuuh!!";

-	set @CRAZYROAR, 1;

-	close;

-

-	L_JobLvl:

-		mes "Once you've reached a ^3355FFjob level of 15^000000 come back and see me.  I'll tell you all about the secret to my voice.....";

-		next;

-		mes "[Necko]";

-		mes "Uahahahahahahhahahahahahaha!";

-		mes "Kyukwakakakakkakakakakakkakaka!";

-		close;

-

-L_GetSkill:

-	if((countitem(722)<7) || (countitem(532)<1) || (countitem(921)<50)) goto L_Items;

-	delitem 722,7;

-	delitem 532,1;

-	delitem 921,50;

-	mes "Oh You've gathered the items! Very good, very good.  Now it's time to start your training.....";

-	next;

-	mes "[Necko]";

-	mes "Repeat after me: Fa fa fa fa fa.... So so so so so..... La la la la la.... Mi mi mi mi mi mi......";

-	next;

-	mes "~several hours later~";

-	next;

-	mes "[Necko]";

-	mes "Raaaaaawwwwrrrrrrrrrrr!....... Ha ha!! Excellent.  Your voice is now finely tuned for ^3355FFCrazy Uproar^000000.  Good job.";

-	skill 155,1,0;

-	set @CRAZYROAR, 0;

-	emotion e_no1;

-	close;

-

-	L_Items:

-	 	mes "You need to get these items for Crazy Uproar:";

-		mes "- ^3355FF7 Pearls,";

-		mes "- 1 Banana juice,";

-		mes "- 50 Mushroom spores^000000.";

-		close;

-

-L_GotSkill:

-	mes "Hello again.  I can tell by the sound of your mighty voice that you are becoming very good at Crazy Uproar.";

-	close;

-}

-

-

-//----------------------------------------- Charlron: Change cart ---------------------------------\\

-alberta.gat,119,221,6	script	Charlron	107,{

-	mes "[Charlron]";

-	if(baseClass == Job_Merchant) goto L_Start;

-L_Other:

-	mes "I am a merchant that deals with many things.  My name is Charlron.  If you ever find anything interesting, come back and try to negotiate a deal with me.";

-	close;

-L_Start:

-	if(getskilllv(154)>0) goto L_GotSkill;

-	if(@CHANGECART) goto L_GetSkill;

-	mes "Welcome young one.  Is selling fun for you? I am the merchant Charlron.";

-	next;

-	mes "[Charlron]";

-	mes "Aren't you tired of your old, and plain looking cart? Well I can help.";

-	next;

-	mes "[Charlon]";

-	mes "I have been doing some research on cart design recently and have come up with some new and interesting designs for the cart.";

-	next;

-	mes "[Charlon]";

-	mes "I can change the way your cart looks for you.  Of course some conditions need to be met......";

-	next;

-	mes "[Charlron]";

-	if(BaseJob==Job_Merchant && JobLevel < 30) goto L_JobLvl;

-	mes "First you will need to bring me these items:";

-	mes "^3355FF50 Trunks,";

-	mes "20 Animal Skin,";

-	mes "10 Iron^000000.";

-	set @CHANGECART, 1;

-	close;

-

-	L_JobLvl:

-		mes "I'm a pretty famous merchant, so I don't really do business with beginners but..........";

-		mes "Once you've reached ^3355FFjob level 30^000000 I may consider doing business with you.";

-		close;

-

-L_GetSkill:

-	if((countitem(1019)<50) || (countitem(998)<10) || (countitem(919)<20)) goto L_Items;

-	mes "Oh good, you have all of the items.  Well here you are..... Hmm?... Oh these are the design sheets for your cart.";

-	mes "Now that you have the proper materials, just follow these guides to make your cart look spectacular.";

-// Note: It is not supposed to take these items, just check you have collected them

-	skill 154,1,0;

-	set @CHANGECART, 0;

-	next;

-	mes "[Charlron]";

-	mes "Good luck, see you around";

-	close;

-

-	L_Items:

-		mes "Come back when you've brought me these items:";

-		mes "^3355FF50 Trunks,";

-		mes "20 Animal Skin,";

-		mes "10 Iron^000000.";

-		close;

-L_GotSkill:

-	mes "Heh heh... It's nice to see fancy looking carts like yours on the streets of town.  Well back to the drawing board....";

-	close;

-

-}

-

-

-//-------------------------====-------- Gershaun: Cart Revolution ---------------------------------\\

-alberta.gat,232,106,6	script	Gershuan	57,{

-	if(baseClass == Job_Merchant) goto L_Start;

-

-L_Other:

-	mes "[Gershuan]";

-	mes "If it doesn't work, make it work!";

-	mes "If it doesn't work, make it work!";

-	mes "If it doesn't work, make it work!";

-	close;

-

-L_Start:

-	if(getskilllv(153)>0) goto L_GotSkill;

-	if(@CARTREVO) goto L_GetSkill;

-	mes "[Gershuan]";

-	mes "Hmm... a young merchant.  You must use carts too right? Since you have to do all of that vending.....  But is that all you use your cart for?";

-	emotion e_hmm;

-	next;

-	mes "[Gershuan]";

-	mes "I researched some ways of using the cart differently.  One way involved cooking ramen and another involved jump-roping (don't ask).";

-	mes "Still none of my new ideas were satisfactory.";

-	next;

-	menu "I know what you mean.",M_0, "......???",M_1;

-

-	M_0:

-		mes "[Gershuan]";

-		mes "You KNOW what I MEAN!! HOW the HECK would YOU KNOW what I MEAN????";

-		emotion e_omg;

-		close;

-	M_1:

-		mes "[Gershuan]";

-		mes "In despair, I wandered through the fields with my cart.  Day after day I did this.... I was in a daze....";

-		next;

-		mes "[Gershuan]";

-		mes "Then I crossed paths with a very strong monster! I knew immediately that my life was in danger!";

-		mes "I thought to myself, 'Why me! A weaponless, armorless merchant!?'";

-		emotion e_gasp;

-		next;

-		mes "[Gershuan]";

-		mes "I was scared to death... hoping that this would not be the end of me.  With what strength I had left, I tried a desperation move.....";

-		emotion e_swt2;

-		next;

-		mes "[Gershuan]";

-		mes "I used my cart to attack the monster!!";

-		emotion e_gasp;

-		next;

-		mes "[Gershuan]";

-		mes "Just like that the monster was defeated!! Finally I had found another excellent use for the cart! A WEAPON!!!";

-		next;

-		mes "[Gershuan]";

-		mes "I called my newly found discovery ^3355FF'Cart Revolution'^000000!";

-		mes "By using ^FF553312 sp^000000 you can spin your cart around your body doing major damage to an enemy!";

-		emotion e_ic;

-		next;

-		mes "[Gershuan]";

-		mes "The heavier your cart is, the more damage it will do.  Would you like to learn this skill?";

-		next;

-		menu "Yes!!",sM_0, "Actually I want to learn some sushi skills...",sM_1;

-

-		sM_0:

-			mes "[Gershuan]";

-			if(BaseJob==Job_Merchant && JobLevel < 35) goto ssL_LowLvl;

-			mes "OK! I will give you the special training for Cart Revolution.  The first thing you will have to do is bring me these items:";

-			mes "^3355FF30 Sticky Mucus,";

-			mes "20 Fly wings,";

-			mes "15 Iron,";

-			mes "5 Tentacles,";

-			mes "2 Grape Juice^000000.";

-			next;

-			mes "[Gershuan]";

-			mes "Come back when you have all of these items.  Good luck.";

-			set @CARTREVO, 1;

-			close;

-

-			ssL_LowLvl:

-				mes "[Gershuan]";

-				mes "OK! I will give you the special training for Cart Revolution.";

-				mes "But first you will have to get yourself to a ^3355FFjob level of 35^000000! After you've done that, then we can talk.";

-				close;

-

-		sM_1:

-			mes "[Sushi King Gershuan]";

-			mes "Stupid!! You're waaay to young to even try your hand at sushi!!";

-			emotion e_an;

-			close;

-

-L_GetSkill:

-	if((countitem(533)<2) || (countitem(998)<15) || (countitem(938)<30) || (countitem(601)<20) || (countitem(962)<5)) goto sM_0;

-	delitem 533,2;

-	delitem 998,15;

-	delitem 938,30;

-	delitem 601,20;

-	delitem 962,5;

-	mes "[Gershuan]";

-	mes "It's good to see you again.  I'm glad you were able to get all of the items.  Take a minute to prepare, for your training is about to take place....";

-	next;

-	mes "[Gershuan]";

-	mes "First make sure your feet are shoulder width apart.  Balance is key! Now get into a good crouch... grasp the handles of the cart firmly but not too tight...";

-	next;

-	mes "[Gershuan]";

-	mes "NOW SWING!!!";

-	next;

-	mes "[Gershuan]";

-	mes "Eh....... that was terrible.... Okay, lets try again.....";

-	emotion e_swt;

-	next;

-	mes "~many hours later~";

-	next;

-	mes "[Gershuan]";

-	mes "YES!!! FINALLY! I could REALLY FEEL the power in that swing!";

-	mes "Give yourself a good pat on the back because you have just mastered Cart Revolution!";

-	emotion e_no1;

-	next;

-	skill 153,1,0;

-	set @CARTREVO, 0;

-	mes "[Gershuan]";

-	mes "Take care of yourself and remember to fill that cart up so that it can do some major damage.";

-	emotion e_gg;

-	close;

-

-L_GotSkill:

-	mes "[Gershuan]";

-	mes "So how do you like cart revolution? Remember, the ^3355FFheavier^000000 the cart, the ^3355FFgreater^000000 the damage.";

-	close;

-

-}

+//===== eAthena Script =======================================
+//= Merchant Skills Quests
+//===== By: ==================================================
+//= kobra_k88
+//===== Current Version: =====================================
+//= 1.4b
+//===== Compatible With: =====================================
+//= eAthena 7.15 +
+//===== Description: =========================================
+//= <Description> 
+//===== Additional Comments: =================================
+//= Fully working
+//= v1.1 Bug fixes
+//= v1.a Now using functions found in "Global_Functions.txt"
+//= for class checks.[kobra_k88]
+//= 1.2 Added Baby Class Support [Lupus]
+//= 1.3 Removed callfunc Is_####_Class in favor of baseClass [Silentdragon]
+//= 1.4 Fixed exploits [Lupus]
+//= 1.4a Fixed some typos [IVBela] 1.4b  Gershaun -> Gershuan
+//= 	changed perm. variables to temp ones [Lupus]
+//============================================================
+
+
+
+//--------------------------------------- Necko: Crazy Uproar--------------------------------\\
+alberta.gat,89,96,5	script	Necko#01	139,0,4,{
+	mes "[!?]";
+	mes "Muahahahahhhahahahahhahah!!";
+	mes "Pukakakakakkakakakakakakaka!!";
+	close;
+}
+
+alberta.gat,83,96,5	script	Necko#02	98,{
+	mes "[Necko]";
+	if(baseClass == Job_Merchant) goto L_Start;
+
+L_Other:
+	mes "Necko's store is closed right now.  Come back later..... Hehe....";
+	close;
+
+L_Start:
+	if(getskilllv(155)>0) goto L_GotSkill;
+	if(@CRAZYROAR) goto L_GetSkill;
+	mes "Oh! Did you come here because you were intrigued by my boisterous voice? My voice is quite loud, isn't it?";
+	mes "After all you heared it from a far off distance.";
+	emotion e_what;
+	next;
+	mes "[Necko]";
+	mes "I'll let you in on something....... My voice is more than just loud..... it's actually quite unique......";
+	next;
+	mes "[Necko]";
+	if(BaseJob==Job_Merchant && JobLevel < 15) goto L_JobLvl;
+	mes "You see, I know a skill that lets me shout in a way that actually helps me.... It is the ^3355FFCrazy Uproar^000000 skill!!!";
+	emotion e_ic;
+	next;
+	mes "[Necko]";
+	mes "Crazy Uproar uses your loud voice to boost your battle spirit!";
+	mes "The skill requires ^FF55338 sp^000000 to use and in turn you will receive an additional ^3355FF4 STR for 5 min^000000!!";
+	next;
+	mes "[Necko]";
+	mes "This skill is very useful.  To learn it you must learn the essentials of sound.  There was a singer in Payon that taught sound theory.......";
+	next;
+	mes "[Necko]";
+	mes "Unfortunately that person passed away so you can no longer learn those essentials..............";
+	mes "Aww.... you look disappointed.... Do you really want to learn Crazy Uproar??";
+	next;
+	mes "[Necko]";
+	mes "Hmm..... I will teach you then, that is, if you truly wish to learn.  You will have to train your vocal cords.";
+	mes "You will also need to gather these items:";
+	next;
+	mes "[Necko]";
+	mes "- ^3355FF7 Pearls,";
+	mes "- 1 Banana juice,";
+	mes "- 50 Mushroom spores^000000.";
+	next;
+	mes "[Necko]";
+	mes "Come back when you are ready! I think I shall do a little vocal training myself........";
+	mes "Bbooowuuuuuuuuuuuuuuuuuuuuuuuuuh!!";
+	set @CRAZYROAR, 1;
+	close;
+
+	L_JobLvl:
+		mes "Once you've reached a ^3355FFjob level of 15^000000 come back and see me.  I'll tell you all about the secret to my voice.....";
+		next;
+		mes "[Necko]";
+		mes "Uahahahahahahhahahahahahaha!";
+		mes "Kyukwakakakakkakakakakakkakaka!";
+		close;
+
+L_GetSkill:
+	if((countitem(722)<7) || (countitem(532)<1) || (countitem(921)<50)) goto L_Items;
+	delitem 722,7;
+	delitem 532,1;
+	delitem 921,50;
+	mes "Oh You've gathered the items! Very good, very good.  Now it's time to start your training.....";
+	next;
+	mes "[Necko]";
+	mes "Repeat after me: Fa fa fa fa fa.... So so so so so..... La la la la la.... Mi mi mi mi mi mi......";
+	next;
+	mes "~several hours later~";
+	next;
+	mes "[Necko]";
+	mes "Raaaaaawwwwrrrrrrrrrrr!....... Ha ha!! Excellent.  Your voice is now finely tuned for ^3355FFCrazy Uproar^000000.  Good job.";
+	skill 155,1,0;
+	set @CRAZYROAR, 0;
+	emotion e_no1;
+	close;
+
+	L_Items:
+	 	mes "You need to get these items for Crazy Uproar:";
+		mes "- ^3355FF7 Pearls,";
+		mes "- 1 Banana juice,";
+		mes "- 50 Mushroom spores^000000.";
+		close;
+
+L_GotSkill:
+	mes "Hello again.  I can tell by the sound of your mighty voice that you are becoming very good at Crazy Uproar.";
+	close;
+}
+
+
+//----------------------------------------- Charlron: Change cart ---------------------------------\\
+alberta.gat,119,221,6	script	Charlron	107,{
+	mes "[Charlron]";
+	if(baseClass == Job_Merchant) goto L_Start;
+L_Other:
+	mes "I am a merchant that deals with many things.  My name is Charlron.  If you ever find anything interesting, come back and try to negotiate a deal with me.";
+	close;
+L_Start:
+	if(getskilllv(154)>0) goto L_GotSkill;
+	if(@CHANGECART) goto L_GetSkill;
+	mes "Welcome young one.  Is selling fun for you? I am the merchant Charlron.";
+	next;
+	mes "[Charlron]";
+	mes "Aren't you tired of your old, and plain looking cart? Well I can help.";
+	next;
+	mes "[Charlon]";
+	mes "I have been doing some research on cart design recently and have come up with some new and interesting designs for the cart.";
+	next;
+	mes "[Charlon]";
+	mes "I can change the way your cart looks for you.  Of course some conditions need to be met......";
+	next;
+	mes "[Charlron]";
+	if(BaseJob==Job_Merchant && JobLevel < 30) goto L_JobLvl;
+	mes "First you will need to bring me these items:";
+	mes "^3355FF50 Trunks,";
+	mes "20 Animal Skin,";
+	mes "10 Iron^000000.";
+	set @CHANGECART, 1;
+	close;
+
+	L_JobLvl:
+		mes "I'm a pretty famous merchant, so I don't really do business with beginners but..........";
+		mes "Once you've reached ^3355FFjob level 30^000000 I may consider doing business with you.";
+		close;
+
+L_GetSkill:
+	if((countitem(1019)<50) || (countitem(998)<10) || (countitem(919)<20)) goto L_Items;
+	mes "Oh good, you have all of the items.  Well here you are..... Hmm?... Oh these are the design sheets for your cart.";
+	mes "Now that you have the proper materials, just follow these guides to make your cart look spectacular.";
+// Note: It is not supposed to take these items, just check you have collected them
+	skill 154,1,0;
+	set @CHANGECART, 0;
+	next;
+	mes "[Charlron]";
+	mes "Good luck, see you around";
+	close;
+
+	L_Items:
+		mes "Come back when you've brought me these items:";
+		mes "^3355FF50 Trunks,";
+		mes "20 Animal Skin,";
+		mes "10 Iron^000000.";
+		close;
+L_GotSkill:
+	mes "Heh heh... It's nice to see fancy looking carts like yours on the streets of town.  Well back to the drawing board....";
+	close;
+
+}
+
+
+//-------------------------====-------- Gershaun: Cart Revolution ---------------------------------\\
+alberta.gat,232,106,6	script	Gershuan	57,{
+	if(baseClass == Job_Merchant) goto L_Start;
+
+L_Other:
+	mes "[Gershuan]";
+	mes "If it doesn't work, make it work!";
+	mes "If it doesn't work, make it work!";
+	mes "If it doesn't work, make it work!";
+	close;
+
+L_Start:
+	if(getskilllv(153)>0) goto L_GotSkill;
+	if(@CARTREVO) goto L_GetSkill;
+	mes "[Gershuan]";
+	mes "Hmm... a young merchant.  You must use carts too right? Since you have to do all of that vending.....  But is that all you use your cart for?";
+	emotion e_hmm;
+	next;
+	mes "[Gershuan]";
+	mes "I researched some ways of using the cart differently.  One way involved cooking ramen and another involved jump-roping (don't ask).";
+	mes "Still none of my new ideas were satisfactory.";
+	next;
+	menu "I know what you mean.",M_0, "......???",M_1;
+
+	M_0:
+		mes "[Gershuan]";
+		mes "You KNOW what I MEAN!! HOW the HECK would YOU KNOW what I MEAN????";
+		emotion e_omg;
+		close;
+	M_1:
+		mes "[Gershuan]";
+		mes "In despair, I wandered through the fields with my cart.  Day after day I did this.... I was in a daze....";
+		next;
+		mes "[Gershuan]";
+		mes "Then I crossed paths with a very strong monster! I knew immediately that my life was in danger!";
+		mes "I thought to myself, 'Why me! A weaponless, armorless merchant!?'";
+		emotion e_gasp;
+		next;
+		mes "[Gershuan]";
+		mes "I was scared to death... hoping that this would not be the end of me.  With what strength I had left, I tried a desperation move.....";
+		emotion e_swt2;
+		next;
+		mes "[Gershuan]";
+		mes "I used my cart to attack the monster!!";
+		emotion e_gasp;
+		next;
+		mes "[Gershuan]";
+		mes "Just like that the monster was defeated!! Finally I had found another excellent use for the cart! A WEAPON!!!";
+		next;
+		mes "[Gershuan]";
+		mes "I called my newly found discovery ^3355FF'Cart Revolution'^000000!";
+		mes "By using ^FF553312 sp^000000 you can spin your cart around your body doing major damage to an enemy!";
+		emotion e_ic;
+		next;
+		mes "[Gershuan]";
+		mes "The heavier your cart is, the more damage it will do.  Would you like to learn this skill?";
+		next;
+		menu "Yes!!",sM_0, "Actually I want to learn some sushi skills...",sM_1;
+
+		sM_0:
+			mes "[Gershuan]";
+			if(BaseJob==Job_Merchant && JobLevel < 35) goto ssL_LowLvl;
+			mes "OK! I will give you the special training for Cart Revolution.  The first thing you will have to do is bring me these items:";
+			mes "^3355FF30 Sticky Mucus,";
+			mes "20 Fly wings,";
+			mes "15 Iron,";
+			mes "5 Tentacles,";
+			mes "2 Grape Juice^000000.";
+			next;
+			mes "[Gershuan]";
+			mes "Come back when you have all of these items.  Good luck.";
+			set @CARTREVO, 1;
+			close;
+
+			ssL_LowLvl:
+				mes "[Gershuan]";
+				mes "OK! I will give you the special training for Cart Revolution.";
+				mes "But first you will have to get yourself to a ^3355FFjob level of 35^000000! After you've done that, then we can talk.";
+				close;
+
+		sM_1:
+			mes "[Sushi King Gershuan]";
+			mes "Stupid!! You're waaay to young to even try your hand at sushi!!";
+			emotion e_an;
+			close;
+
+L_GetSkill:
+	if((countitem(533)<2) || (countitem(998)<15) || (countitem(938)<30) || (countitem(601)<20) || (countitem(962)<5)) goto sM_0;
+	delitem 533,2;
+	delitem 998,15;
+	delitem 938,30;
+	delitem 601,20;
+	delitem 962,5;
+	mes "[Gershuan]";
+	mes "It's good to see you again.  I'm glad you were able to get all of the items.  Take a minute to prepare, for your training is about to take place....";
+	next;
+	mes "[Gershuan]";
+	mes "First make sure your feet are shoulder width apart.  Balance is key! Now get into a good crouch... grasp the handles of the cart firmly but not too tight...";
+	next;
+	mes "[Gershuan]";
+	mes "NOW SWING!!!";
+	next;
+	mes "[Gershuan]";
+	mes "Eh....... that was terrible.... Okay, lets try again.....";
+	emotion e_swt;
+	next;
+	mes "~many hours later~";
+	next;
+	mes "[Gershuan]";
+	mes "YES!!! FINALLY! I could REALLY FEEL the power in that swing!";
+	mes "Give yourself a good pat on the back because you have just mastered Cart Revolution!";
+	emotion e_no1;
+	next;
+	skill 153,1,0;
+	set @CARTREVO, 0;
+	mes "[Gershuan]";
+	mes "Take care of yourself and remember to fill that cart up so that it can do some major damage.";
+	emotion e_gg;
+	close;
+
+L_GotSkill:
+	mes "[Gershuan]";
+	mes "So how do you like cart revolution? Remember, the ^3355FFheavier^000000 the cart, the ^3355FFgreater^000000 the damage.";
+	close;
+
+}
diff --git a/npc/quests/skills/monk_skills.txt b/npc/quests/skills/monk_skills.txt
index 48e50445e..a3ab0c539 100644
--- a/npc/quests/skills/monk_skills.txt
+++ b/npc/quests/skills/monk_skills.txt
@@ -1,77 +1,77 @@
-//===== eAthena Script ======================================= 

-//= Monk Skills Quests

-//===== By: ================================================== 

-//= Lupus, Reddozen

-//===== Current Version: ===================================== 

-//= 1.3a

-//===== Compatible With: ===================================== 

-//= eAthena Revision 3800+

-//===== Description: ========================================= 

-//= Temp quests for new skills for 2nd classes

-//===== Additional Comments: ================================= 

-//= 1.0 for fully working skills only [Lupus]

-//= 1.1 Added more new skill quests for more classes [Lupus]

-//= Somehow eA engine doesn't let you keep learn't skill V_V'

-//= 1.2 Added to correct locations, correct NPC's, fixed

-//= some of the items required and made them into real

-//= quests. [Reddozen] 

-//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]

-//= 1.3a fixed an item ID typo, thx 2Spiritual Kid

-//= 1.3b Splitted into different files [DracoRPG]

-//============================================================

-

-

-//============================================================

-// MONK - KI TRANSLATION + KI EXPLOSION

-//============================================================

-monk_test.gat,316,69,3	script	Krate	823,{

-	mes "[Krate]";

-	if(BaseJob!=Job_Monk) goto L_nomonk;

-	if(getskilllv(1015) && getskilllv(1016)) goto L_alreadyhave;

-	if(monk_skill) goto L_verif;

-	if(Weight>0) goto L_heavymonk;

-	mes "I'll teach you all I know, but you must bring me:";

-	mes "40 Stems";

-	mes "3 Shoots";

-	set monk_skill, 1;

-	next;

-	goto L_verif;

-	

-L_verif:

-	mes "Let me check your items.";

-	next;

-	if(countitem(711)<3 || countitem(905)<40) goto L_noitems;//Items: Shoot, Stem,

-	delitem 711, 3;//Items: Shoot,

-	delitem 905, 40;//Items: Stem,

-	next;

-	mes "[Krate]";

-	mes "I see you have what you need,";

-	mes "so I'll teach you my talent.";

-	skill 1015,1,0;

-	skill 1016,1,0;

-	set monk_skill, 0;

-	close;

-	

-L_noitems:

-	mes "[Krate]";

-	mes "You don't have enough items.";

-	mes "Come back when you have all";

-	mes "the required items for me.";

-	close;

-	

-L_nomonk:

-	mes "It seems that your soul is disagree with your body.";

-	mes "Come back when your body and your soul will be like Yin and Yang.";

-	emotion e_gasp;

-	close;

-	

-L_alreadyhave:

-	mes "I've already taught you";

-	mes "everything I know...";

-	close;

-

-L_heavymonk:

-	mes "Come back when you've cleansed";

-	mes "yourself of your worldly possessions.";

-	close;

-}

+//===== eAthena Script ======================================= 
+//= Monk Skills Quests
+//===== By: ================================================== 
+//= Lupus, Reddozen
+//===== Current Version: ===================================== 
+//= 1.3a
+//===== Compatible With: ===================================== 
+//= eAthena Revision 3800+
+//===== Description: ========================================= 
+//= Temp quests for new skills for 2nd classes
+//===== Additional Comments: ================================= 
+//= 1.0 for fully working skills only [Lupus]
+//= 1.1 Added more new skill quests for more classes [Lupus]
+//= Somehow eA engine doesn't let you keep learn't skill V_V'
+//= 1.2 Added to correct locations, correct NPC's, fixed
+//= some of the items required and made them into real
+//= quests. [Reddozen] 
+//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]
+//= 1.3a fixed an item ID typo, thx 2Spiritual Kid
+//= 1.3b Splitted into different files [DracoRPG]
+//============================================================
+
+
+//============================================================
+// MONK - KI TRANSLATION + KI EXPLOSION
+//============================================================
+monk_test.gat,316,69,3	script	Krate	823,{
+	mes "[Krate]";
+	if(BaseJob!=Job_Monk) goto L_nomonk;
+	if(getskilllv(1015) && getskilllv(1016)) goto L_alreadyhave;
+	if(monk_skill) goto L_verif;
+	if(Weight>0) goto L_heavymonk;
+	mes "I'll teach you all I know, but you must bring me:";
+	mes "40 Stems";
+	mes "3 Shoots";
+	set monk_skill, 1;
+	next;
+	goto L_verif;
+	
+L_verif:
+	mes "Let me check your items.";
+	next;
+	if(countitem(711)<3 || countitem(905)<40) goto L_noitems;//Items: Shoot, Stem,
+	delitem 711, 3;//Items: Shoot,
+	delitem 905, 40;//Items: Stem,
+	next;
+	mes "[Krate]";
+	mes "I see you have what you need,";
+	mes "so I'll teach you my talent.";
+	skill 1015,1,0;
+	skill 1016,1,0;
+	set monk_skill, 0;
+	close;
+	
+L_noitems:
+	mes "[Krate]";
+	mes "You don't have enough items.";
+	mes "Come back when you have all";
+	mes "the required items for me.";
+	close;
+	
+L_nomonk:
+	mes "It seems that your soul is disagree with your body.";
+	mes "Come back when your body and your soul will be like Yin and Yang.";
+	emotion e_gasp;
+	close;
+	
+L_alreadyhave:
+	mes "I've already taught you";
+	mes "everything I know...";
+	close;
+
+L_heavymonk:
+	mes "Come back when you've cleansed";
+	mes "yourself of your worldly possessions.";
+	close;
+}
diff --git a/npc/quests/skills/novice_skills.txt b/npc/quests/skills/novice_skills.txt
index 6009f9009..f23176e5a 100644
--- a/npc/quests/skills/novice_skills.txt
+++ b/npc/quests/skills/novice_skills.txt
@@ -1,246 +1,246 @@
-//===== eAthena Script ======================================= 

-//= Novice Skills Quests

-//===== By: ================================================== 

-//= kobra_k88

-//===== Current Version: ===================================== 

-//= 1.4b

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//= Customized novice skills quest

-//===== Additional Comments: ================================= 

-//= Fully working

-//= 1.2 Added Baby Class Support [Lupus]

-//= 1.3 Fixed a Zeny exploit, made more variables clear

-//= on finishing quests. [Lupus]

-//= 1.4 Fixed exploits [Lupus]

-//= 1.4a Fixed some typos [IVBela]

-//============================================================ 

-

-

-

-//<---------------------------------------------------------------------------------------------- Nurse Aid: First Aid NPC ---------------------------------------------------------------------------->\\

-prt_in.gat,235,133,4	script	Nurse Aid	90,{

-	mes "[Nurse Aid]";

-	if(FIRSTAID){

-		if((JobLevel <  3) || (countitem(507) < 5 ) || (countitem(705) < 5) || (countitem(930) < 1)) goto sM_Yes;

-		delitem 507,5;

-		delitem 705,5;

-		delitem 930,1;

-		mes "Oh good.  You have everything needed for me to teach you first aid.  Here we go...";

-		next;

-		mes "....... 1 hour later.......";

-		next;

-		skill 142,1,0;

-		set FIRSTAID,0;

-		set got_bandage,0;

-		mes "[Nurse Aid]";

-		mes "YES! You finally got it.  Now you can heal yourself and continue fighting those bad monsters.  Well, take care.";

-		emotion e_no1;

-		close;

-	}

-	if(getskilllv(142)>0){

-		mes "Well hello again.  I really hope the First Aid skill has been helpful to you.  Make sure to continue your hard work and don't forget to rest and heal!";

-		close;

-	}

-	mes "Oh hello there!  You look tired and a little worn out.  Have the monsters outside of town been giving you trouble?";

-	next;

-	menu "Ha! Me strong like BULL!!",-, "Well..um..kinda..",M_Yep;

-

-		mes "[Nurse Aid]";

-		mes "Oh I see.  You must be a mighty warrior.  Well, come back anytime if you do ever feel overwhelmed by the monsters.  I'll be able to help.";

-		close;

-	M_Yep:

-		mes "[Nurse Aid]";

-		mes "Well don't feel bad.  It can be very difficult fighting those nasty monsters in the beginning.";

-		next;

-		mes "[Nurse Aid]";

-		mes "I know because I've been treating a lot people lately who have been fighting them.";

-		mes "There are so many injured now that I don't think I can continue treating anyone.";

-		next;

-		mes "[Nurse Aid]";

-		mes "~Sigh~";

-		next;

-		mes "[Nurse Aid]";

-		mes "That's why I've decided to teach people how to heal themselves!  Would you like me to teach you?";

-		emotion e_ic;

-		next;

-		menu "Would you??",sM_Yes, "(...she's nuts!...run!!!)",-;

-

-			mes "[Nurse Aid]";

-			mes "Hey!...Where are you running too??...";

-			emotion e_swt;

-			close;

-		sM_Yes:

-			mes "[Nurse Aid]";

-			mes "In order for me to teach you First Aid you need to have at least a^0000ff Job Level of 3^000000.";

-			mes "You then need to give me:^ff0000 5 Red Herbs^000000,^00bb00 5 Clovers^000000, and an^aaaa00 Old Bandage^000000.";

-			next;

-			mes "[Nurse Aid]";

-			mes "You can get the bandage from the^0000ff 'Newbie Assistant'^000000 located on the second floor of the Castle.";

-			next;

-			mes "[Nurse Aid]";

-			mes "Once you get Job Level 3 and have all of the items come back and see me, OK?";

-			set FIRSTAID,1;

-			close;				

-}

-

-

-//<-------------------------------------------------------------------------------------------------- Bulma: Play Dead -------------------------------------------------------------------------------------------->\\

-prt_in.gat,73,87,2	script	Bulma	98,{

-	mes "[Bulma]";

-	if(BaseJob != Job_Novice){

-		mes "Yeah... I look great.... After all, I'm a Knight of the Prontera Chivalry.  Kuhahahaha!";

-		emotion e_heh;

-		next;

-		mes "[Bulma]";

-		mes "It hasn't been that long since I became a Knight, but I still look good as one right? What do you think???";

-		emotion e_hmm;

-		close;

-	}

-	if(JobLevel < 7){

-		mes "Hello my young friend.  You remind me of myself when I was young.....";

-		mes "Heh heh, I really miss those days..... Wow... It's funny to think about those years now......";

-		next;

-		mes "[Bulma]";

-		mes "They were difficult.... thankfully you can use the ^5555FFPlay Dead^000000 skill when you reach a ^5555FFJob Level of 7^000000.";

-		mes "If you're interested in it come back and talk to me when you've leveled up a bit more.";

-		close;

-	}

-	if(PLAYDEAD){

-		if(countitem(7039)<1){

-			mes "HEY! What are you doing here?  It's irresponsible of you to still be here while your time is running out.........";

-			emotion e_gasp;

-			next;

-			mes "[Bulma]";

-			mes "Now GO! Run! Run! RUN!!";

-			emotion e_go;

-			close;

-		}

-		delitem 7039, 1;

-		mes "Good to see you again.  Alright, lets start your training....";

-		next;

-		mes "[Bulma]";

-		mes "Let me first introduce to you the concept of 'Method Acting'.  Method Acting stresses the need to understand every aspect of the role you are playing.";

-		next;

-		mes "[Bulma]";

-		mes "You must learn to think, feel, and even live like your character so that you can understand his/her motivation in any given moment.";

-		next;

-		mes "[Bulma]";

-		mes "Now let us use this technique to develop your ability to Play Dead!";

-		mes "I want you to think like a dead person, feel like a dead person, eat, breath, sleep, kiss, etc. like a person who is dead!!!";

-		next;

-		mes "[Bulma]";

-		mes "Don't just stand there! Lay down on the ground and live life through the eyes of a dead person.... errr or don't live.... anyways just do it!!";

-		next;

-		mes "~ several hours later ~";

-		next;

-		mes "[Bulma]";

-		mes "OK, lights, camera, ACTION! Yes... yes... YES!! That's it!! As I watch you laying there I TRULY believe that you are dead.";

-		mes "What a wonderful performance! BRAVO! BRAVO!";

-		emotion e_gasp;

-		next;

-		mes "[Bulma]";

-		mes "With the right motivation and focus you will be able to play dead anywhere at any given moment.  Congratulations on mastering this skill.";

-		emotion e_no1;

-		skill 143,1,0;

-		set PLAYDEAD, 0;

-		set got_novnametag,0;

-		close;

-	}

-	if(getskilllv(143)>0){

-		mes "Yeah.... I remember back then..... especially those embarrassing novice years... heh.  Luckily there was Play Dead.";

-		mes "That saved me many times in the past.  I'm sure it has been saving you too.";

-		next;

-		mes "[Bulma]";

-		mes "Hopefully it is something you have been using well.  If you have any friends who are novices, tell them about me.  I will help them out as good as I can.";

-		close;

-	}

-	mes "Hello my young friend.  You remind me of myself when I was young..... Heh heh, I really miss those days.....";

-	mes "Look at me acting all sentimental like some old man........";

-	next;

-	mes "[Bulma]";

-	mes "Sorry about that.  Anyhow, I just want you to know that if you work hard and are patient, you too will receive the job you desire.";

-	mes "It may take some time but stay focused and never loose your determination.";

-	next;

-	mes "[Bulma]";

-	mes "Hmm..... actually I might be able to help you out........";

-	emotion e_hmm;

-	next;

-	mes "[Bulma]";

-	mes "What's this? Ha ha, don't look so surprised.  What I have to offer will be very useful to you.";

-	next;

-	mes "[Bulma]";

-	mes "You see I can teach you the skill ^5555FF'Play Dead'^000000.";

-	mes "This skill allows you to act like you just died making any monster that is currently attacking you leave you alone.";

-	next;

-	mes "[Bulma]";

-	mes "I myself have used it as a novice and found it to be very useful.";

-	mes "It may sound easy enough, but it takes a lot of hard work and practice to make your performance look believable.";

-	next;

-	mes "[Bulma]";

-	mes "You MUST look perfectly DEAD in order for this skill to work.  Even the slightest movement will give you away.";

-	next;

-	mes "[Bulma]";

-	mes "I think I've done enough explaining..... The look in your eyes tells me that you are ready to learn this skill.";

-	next;

-	mes "[Bulma]";

-	mes "First take this pill....";

-	next;

-	mes "(you take the pill) ~gulp~";

-	next;

-	mes "[Bulma]";

-	mes "Good.  Now go to the 2nd floor on the East side of the Prontera Castle.";

-	mes "Speak with the ^5555FFNewbie Assistant^000000 and he will give you a ^5555FFNewbie Tag^000000.";

-	next;

-	mes "[Bulma]";

-	mes "Once you have the tag come back here.  You MUST make it back here WITHIN ^FF555510 minutes^000000!";

-	mes "If you don't, then the pill you just swallowed will start making it hard for you to breath!.....";

-	next;

-	mes "[Bulma]";

-	mes "Kekekeke..... Just kidding!  The pill actually helps you stay calm, nothing more.";

-	emotion e_heh;

-	next;

-	mes "[Bulma]";

-	mes "Well get going... GO! GO! GO! RUN!!!";

-	emotion e_go;

-	set PLAYDEAD, 1;

-	close;

-}

-

-

-//Newbie Assistant------------------------------------------------------------------------------

-prt_castle.gat,174,147,2	script	Newbie Assistant	84,{

-	mes "[Newbie Assistant]";

-	if(BaseJob != Job_Novice){

-		mes "What am I doing here?  I'm just trying to help out young newbies.  You remember how it was to be a newbie... confused.... lost.... heh heh.";

-		emotion e_what;

-		close;

-	}

-	if(FIRSTAID && countitem(930)==0 && !got_bandage){

-		mes "So Nurse Aid sent you huh.  She's a great nurse, you should feel very fortunate that she is helping you out.  Here take this.";

-		next;

-		getitem 930,1;

-		set got_bandage,1;

-		mes "[Newbie Assistant]";

-		mes "You'll need it in order for her to teach you her excellent healing technique.";

-		next;

-		mes "[Newbie Assistant]";

-		mes "When I watch her work it is like watching an angel that has descended down from the heavens.....";

-		next;

-		mes "[Newbie Assistant]";

-		mes "Her beauty, her grace, sometimes I wish........ (blushes).......... um.... well... err... tell her I said hello.";

-		emotion e_lv;

-		close;

-	}

-	if(PLAYDEAD && countitem(7039)==0 && !got_novnametag){

-		mes "So Bulma sent you uh.... okay here you go.";

-		getitem 7039,1;

-		set got_novnametag,1;

-		next;

-		mes "Good luck on your adventure.";

-		close;

-	}

-	mes "Hello.  I'm here to provide help to newbies like you.  If there is anything in particular that you need assistance with just let me know.";

-	close;

-}

+//===== eAthena Script ======================================= 
+//= Novice Skills Quests
+//===== By: ================================================== 
+//= kobra_k88
+//===== Current Version: ===================================== 
+//= 1.4b
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//= Customized novice skills quest
+//===== Additional Comments: ================================= 
+//= Fully working
+//= 1.2 Added Baby Class Support [Lupus]
+//= 1.3 Fixed a Zeny exploit, made more variables clear
+//= on finishing quests. [Lupus]
+//= 1.4 Fixed exploits [Lupus]
+//= 1.4a Fixed some typos [IVBela]
+//============================================================ 
+
+
+
+//<---------------------------------------------------------------------------------------------- Nurse Aid: First Aid NPC ---------------------------------------------------------------------------->\\
+prt_in.gat,235,133,4	script	Nurse Aid	90,{
+	mes "[Nurse Aid]";
+	if(FIRSTAID){
+		if((JobLevel <  3) || (countitem(507) < 5 ) || (countitem(705) < 5) || (countitem(930) < 1)) goto sM_Yes;
+		delitem 507,5;
+		delitem 705,5;
+		delitem 930,1;
+		mes "Oh good.  You have everything needed for me to teach you first aid.  Here we go...";
+		next;
+		mes "....... 1 hour later.......";
+		next;
+		skill 142,1,0;
+		set FIRSTAID,0;
+		set got_bandage,0;
+		mes "[Nurse Aid]";
+		mes "YES! You finally got it.  Now you can heal yourself and continue fighting those bad monsters.  Well, take care.";
+		emotion e_no1;
+		close;
+	}
+	if(getskilllv(142)>0){
+		mes "Well hello again.  I really hope the First Aid skill has been helpful to you.  Make sure to continue your hard work and don't forget to rest and heal!";
+		close;
+	}
+	mes "Oh hello there!  You look tired and a little worn out.  Have the monsters outside of town been giving you trouble?";
+	next;
+	menu "Ha! Me strong like BULL!!",-, "Well..um..kinda..",M_Yep;
+
+		mes "[Nurse Aid]";
+		mes "Oh I see.  You must be a mighty warrior.  Well, come back anytime if you do ever feel overwhelmed by the monsters.  I'll be able to help.";
+		close;
+	M_Yep:
+		mes "[Nurse Aid]";
+		mes "Well don't feel bad.  It can be very difficult fighting those nasty monsters in the beginning.";
+		next;
+		mes "[Nurse Aid]";
+		mes "I know because I've been treating a lot people lately who have been fighting them.";
+		mes "There are so many injured now that I don't think I can continue treating anyone.";
+		next;
+		mes "[Nurse Aid]";
+		mes "~Sigh~";
+		next;
+		mes "[Nurse Aid]";
+		mes "That's why I've decided to teach people how to heal themselves!  Would you like me to teach you?";
+		emotion e_ic;
+		next;
+		menu "Would you??",sM_Yes, "(...she's nuts!...run!!!)",-;
+
+			mes "[Nurse Aid]";
+			mes "Hey!...Where are you running too??...";
+			emotion e_swt;
+			close;
+		sM_Yes:
+			mes "[Nurse Aid]";
+			mes "In order for me to teach you First Aid you need to have at least a^0000ff Job Level of 3^000000.";
+			mes "You then need to give me:^ff0000 5 Red Herbs^000000,^00bb00 5 Clovers^000000, and an^aaaa00 Old Bandage^000000.";
+			next;
+			mes "[Nurse Aid]";
+			mes "You can get the bandage from the^0000ff 'Newbie Assistant'^000000 located on the second floor of the Castle.";
+			next;
+			mes "[Nurse Aid]";
+			mes "Once you get Job Level 3 and have all of the items come back and see me, OK?";
+			set FIRSTAID,1;
+			close;				
+}
+
+
+//<-------------------------------------------------------------------------------------------------- Bulma: Play Dead -------------------------------------------------------------------------------------------->\\
+prt_in.gat,73,87,2	script	Bulma	98,{
+	mes "[Bulma]";
+	if(BaseJob != Job_Novice){
+		mes "Yeah... I look great.... After all, I'm a Knight of the Prontera Chivalry.  Kuhahahaha!";
+		emotion e_heh;
+		next;
+		mes "[Bulma]";
+		mes "It hasn't been that long since I became a Knight, but I still look good as one right? What do you think???";
+		emotion e_hmm;
+		close;
+	}
+	if(JobLevel < 7){
+		mes "Hello my young friend.  You remind me of myself when I was young.....";
+		mes "Heh heh, I really miss those days..... Wow... It's funny to think about those years now......";
+		next;
+		mes "[Bulma]";
+		mes "They were difficult.... thankfully you can use the ^5555FFPlay Dead^000000 skill when you reach a ^5555FFJob Level of 7^000000.";
+		mes "If you're interested in it come back and talk to me when you've leveled up a bit more.";
+		close;
+	}
+	if(PLAYDEAD){
+		if(countitem(7039)<1){
+			mes "HEY! What are you doing here?  It's irresponsible of you to still be here while your time is running out.........";
+			emotion e_gasp;
+			next;
+			mes "[Bulma]";
+			mes "Now GO! Run! Run! RUN!!";
+			emotion e_go;
+			close;
+		}
+		delitem 7039, 1;
+		mes "Good to see you again.  Alright, lets start your training....";
+		next;
+		mes "[Bulma]";
+		mes "Let me first introduce to you the concept of 'Method Acting'.  Method Acting stresses the need to understand every aspect of the role you are playing.";
+		next;
+		mes "[Bulma]";
+		mes "You must learn to think, feel, and even live like your character so that you can understand his/her motivation in any given moment.";
+		next;
+		mes "[Bulma]";
+		mes "Now let us use this technique to develop your ability to Play Dead!";
+		mes "I want you to think like a dead person, feel like a dead person, eat, breath, sleep, kiss, etc. like a person who is dead!!!";
+		next;
+		mes "[Bulma]";
+		mes "Don't just stand there! Lay down on the ground and live life through the eyes of a dead person.... errr or don't live.... anyways just do it!!";
+		next;
+		mes "~ several hours later ~";
+		next;
+		mes "[Bulma]";
+		mes "OK, lights, camera, ACTION! Yes... yes... YES!! That's it!! As I watch you laying there I TRULY believe that you are dead.";
+		mes "What a wonderful performance! BRAVO! BRAVO!";
+		emotion e_gasp;
+		next;
+		mes "[Bulma]";
+		mes "With the right motivation and focus you will be able to play dead anywhere at any given moment.  Congratulations on mastering this skill.";
+		emotion e_no1;
+		skill 143,1,0;
+		set PLAYDEAD, 0;
+		set got_novnametag,0;
+		close;
+	}
+	if(getskilllv(143)>0){
+		mes "Yeah.... I remember back then..... especially those embarrassing novice years... heh.  Luckily there was Play Dead.";
+		mes "That saved me many times in the past.  I'm sure it has been saving you too.";
+		next;
+		mes "[Bulma]";
+		mes "Hopefully it is something you have been using well.  If you have any friends who are novices, tell them about me.  I will help them out as good as I can.";
+		close;
+	}
+	mes "Hello my young friend.  You remind me of myself when I was young..... Heh heh, I really miss those days.....";
+	mes "Look at me acting all sentimental like some old man........";
+	next;
+	mes "[Bulma]";
+	mes "Sorry about that.  Anyhow, I just want you to know that if you work hard and are patient, you too will receive the job you desire.";
+	mes "It may take some time but stay focused and never loose your determination.";
+	next;
+	mes "[Bulma]";
+	mes "Hmm..... actually I might be able to help you out........";
+	emotion e_hmm;
+	next;
+	mes "[Bulma]";
+	mes "What's this? Ha ha, don't look so surprised.  What I have to offer will be very useful to you.";
+	next;
+	mes "[Bulma]";
+	mes "You see I can teach you the skill ^5555FF'Play Dead'^000000.";
+	mes "This skill allows you to act like you just died making any monster that is currently attacking you leave you alone.";
+	next;
+	mes "[Bulma]";
+	mes "I myself have used it as a novice and found it to be very useful.";
+	mes "It may sound easy enough, but it takes a lot of hard work and practice to make your performance look believable.";
+	next;
+	mes "[Bulma]";
+	mes "You MUST look perfectly DEAD in order for this skill to work.  Even the slightest movement will give you away.";
+	next;
+	mes "[Bulma]";
+	mes "I think I've done enough explaining..... The look in your eyes tells me that you are ready to learn this skill.";
+	next;
+	mes "[Bulma]";
+	mes "First take this pill....";
+	next;
+	mes "(you take the pill) ~gulp~";
+	next;
+	mes "[Bulma]";
+	mes "Good.  Now go to the 2nd floor on the East side of the Prontera Castle.";
+	mes "Speak with the ^5555FFNewbie Assistant^000000 and he will give you a ^5555FFNewbie Tag^000000.";
+	next;
+	mes "[Bulma]";
+	mes "Once you have the tag come back here.  You MUST make it back here WITHIN ^FF555510 minutes^000000!";
+	mes "If you don't, then the pill you just swallowed will start making it hard for you to breath!.....";
+	next;
+	mes "[Bulma]";
+	mes "Kekekeke..... Just kidding!  The pill actually helps you stay calm, nothing more.";
+	emotion e_heh;
+	next;
+	mes "[Bulma]";
+	mes "Well get going... GO! GO! GO! RUN!!!";
+	emotion e_go;
+	set PLAYDEAD, 1;
+	close;
+}
+
+
+//Newbie Assistant------------------------------------------------------------------------------
+prt_castle.gat,174,147,2	script	Newbie Assistant	84,{
+	mes "[Newbie Assistant]";
+	if(BaseJob != Job_Novice){
+		mes "What am I doing here?  I'm just trying to help out young newbies.  You remember how it was to be a newbie... confused.... lost.... heh heh.";
+		emotion e_what;
+		close;
+	}
+	if(FIRSTAID && countitem(930)==0 && !got_bandage){
+		mes "So Nurse Aid sent you huh.  She's a great nurse, you should feel very fortunate that she is helping you out.  Here take this.";
+		next;
+		getitem 930,1;
+		set got_bandage,1;
+		mes "[Newbie Assistant]";
+		mes "You'll need it in order for her to teach you her excellent healing technique.";
+		next;
+		mes "[Newbie Assistant]";
+		mes "When I watch her work it is like watching an angel that has descended down from the heavens.....";
+		next;
+		mes "[Newbie Assistant]";
+		mes "Her beauty, her grace, sometimes I wish........ (blushes).......... um.... well... err... tell her I said hello.";
+		emotion e_lv;
+		close;
+	}
+	if(PLAYDEAD && countitem(7039)==0 && !got_novnametag){
+		mes "So Bulma sent you uh.... okay here you go.";
+		getitem 7039,1;
+		set got_novnametag,1;
+		next;
+		mes "Good luck on your adventure.";
+		close;
+	}
+	mes "Hello.  I'm here to provide help to newbies like you.  If there is anything in particular that you need assistance with just let me know.";
+	close;
+}
diff --git a/npc/quests/skills/priest_skills.txt b/npc/quests/skills/priest_skills.txt
index 32c589428..927d4e8da 100644
--- a/npc/quests/skills/priest_skills.txt
+++ b/npc/quests/skills/priest_skills.txt
@@ -1,88 +1,88 @@
-//===== eAthena Script ======================================= 

-//= Priest Skills Quests

-//===== By: ================================================== 

-//= Lupus, Reddozen

-//===== Current Version: ===================================== 

-//= 1.3a

-//===== Compatible With: ===================================== 

-//= eAthena Revision 3800+

-//===== Description: ========================================= 

-//= Temp quests for new skills for 2nd classes

-//===== Additional Comments: ================================= 

-//= 1.0 for fully working skills only [Lupus]

-//= 1.1 Added more new skill quests for more classes [Lupus]

-//= Somehow eA engine doesn't let you keep learn't skill V_V'

-//= 1.2 Added to correct locations, correct NPC's, fixed

-//= some of the items required and made them into real

-//= quests. [Reddozen] 

-//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]

-//= 1.3a fixed an item ID typo, thx 2Spiritual Kid

-//= 1.3b Splitted into different files [DracoRPG]

-//============================================================

-

-

-//============================================================

-// PRIEST - REDEMPTIO

-//============================================================

-prt_church.gat,111,112,3	script	Nun Linus	79,{

-	mes "[Nun Linus]";

-	if(BaseJob!=Job_Priest) goto L_nopriest;

-	if(getskilllv(1014)) goto L_alreadyhave;

-	if(getskilllv(54)<1) goto L_norez;

-

-	mes "I can teach you the mercy of God";

-	mes "if you bring me a couple things,";

-	mes "and if God finds you worthy!";

-	mes "1 Blue Gemstone";

-	mes "1 Holy Water";

-	next;

-	

-	mes "[Nun Linus]";

-	mes "Let me check your items.";

-	next;

-	

-	if(countitem(717)<1 || countitem(523)<1) goto L_noitems;//Items: Blue_Gemstone, Holy_Water,

-	delitem 717, 1;//Items: Blue_Gemstone,

-	delitem 523, 1;//Items: Holy_Water,

-	

-	mes "[Nun Linus]";

-	mes "I see you have what you need,";

-	mes "so we shall see if God finds";

-	mes "you worthy yet!";

-	next;

-	if(rand(100)<JobLevel+25) goto L_bless;

-	mes "[Nun Linus]";

-	mes "Sorry, but God has not";

-	mes "shined on you as of yet.";

-	mes "Try again when you are a";

-	mes "stronger Priest.";

-	close;

-	

-L_bless:

-	mes "[Nun Linus]";

-	mes "Hum... I see God has shined on you this time";

-	skill 1014,1,0;

-	close;

-	

-L_noitems:

-	mes "[Nun Linus]";

-	mes "You don't have enough items.";

-	mes "Come back when you have all";

-	mes "the required items for me.";

-	close;

-		

-L_nopriest:

-	mes "Sorry, you need to have some faith in God.";

-	emotion e_gasp;

-	close;

-

-L_alreadyhave:

-	mes "I've already taught you";

-	mes "everything I know...";

-	close;

-

-L_norez:

-	mes "Come back when you've learned";

-	mes "more about priest and God.";

-	close;

-}

+//===== eAthena Script ======================================= 
+//= Priest Skills Quests
+//===== By: ================================================== 
+//= Lupus, Reddozen
+//===== Current Version: ===================================== 
+//= 1.3a
+//===== Compatible With: ===================================== 
+//= eAthena Revision 3800+
+//===== Description: ========================================= 
+//= Temp quests for new skills for 2nd classes
+//===== Additional Comments: ================================= 
+//= 1.0 for fully working skills only [Lupus]
+//= 1.1 Added more new skill quests for more classes [Lupus]
+//= Somehow eA engine doesn't let you keep learn't skill V_V'
+//= 1.2 Added to correct locations, correct NPC's, fixed
+//= some of the items required and made them into real
+//= quests. [Reddozen] 
+//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]
+//= 1.3a fixed an item ID typo, thx 2Spiritual Kid
+//= 1.3b Splitted into different files [DracoRPG]
+//============================================================
+
+
+//============================================================
+// PRIEST - REDEMPTIO
+//============================================================
+prt_church.gat,111,112,3	script	Nun Linus	79,{
+	mes "[Nun Linus]";
+	if(BaseJob!=Job_Priest) goto L_nopriest;
+	if(getskilllv(1014)) goto L_alreadyhave;
+	if(getskilllv(54)<1) goto L_norez;
+
+	mes "I can teach you the mercy of God";
+	mes "if you bring me a couple things,";
+	mes "and if God finds you worthy!";
+	mes "1 Blue Gemstone";
+	mes "1 Holy Water";
+	next;
+	
+	mes "[Nun Linus]";
+	mes "Let me check your items.";
+	next;
+	
+	if(countitem(717)<1 || countitem(523)<1) goto L_noitems;//Items: Blue_Gemstone, Holy_Water,
+	delitem 717, 1;//Items: Blue_Gemstone,
+	delitem 523, 1;//Items: Holy_Water,
+	
+	mes "[Nun Linus]";
+	mes "I see you have what you need,";
+	mes "so we shall see if God finds";
+	mes "you worthy yet!";
+	next;
+	if(rand(100)<JobLevel+25) goto L_bless;
+	mes "[Nun Linus]";
+	mes "Sorry, but God has not";
+	mes "shined on you as of yet.";
+	mes "Try again when you are a";
+	mes "stronger Priest.";
+	close;
+	
+L_bless:
+	mes "[Nun Linus]";
+	mes "Hum... I see God has shined on you this time";
+	skill 1014,1,0;
+	close;
+	
+L_noitems:
+	mes "[Nun Linus]";
+	mes "You don't have enough items.";
+	mes "Come back when you have all";
+	mes "the required items for me.";
+	close;
+		
+L_nopriest:
+	mes "Sorry, you need to have some faith in God.";
+	emotion e_gasp;
+	close;
+
+L_alreadyhave:
+	mes "I've already taught you";
+	mes "everything I know...";
+	close;
+
+L_norez:
+	mes "Come back when you've learned";
+	mes "more about priest and God.";
+	close;
+}
diff --git a/npc/quests/skills/rogue_skills.txt b/npc/quests/skills/rogue_skills.txt
index 41395f0b9..810fc7d62 100644
--- a/npc/quests/skills/rogue_skills.txt
+++ b/npc/quests/skills/rogue_skills.txt
@@ -1,71 +1,71 @@
-//===== eAthena Script ======================================= 

-//= Rogue Skills Quests

-//===== By: ================================================== 

-//= Lupus, Reddozen

-//===== Current Version: ===================================== 

-//= 1.3a

-//===== Compatible With: ===================================== 

-//= eAthena Revision 3800+

-//===== Description: ========================================= 

-//= Temp quests for new skills for 2nd classes

-//===== Additional Comments: ================================= 

-//= 1.0 for fully working skills only [Lupus]

-//= 1.1 Added more new skill quests for more classes [Lupus]

-//= Somehow eA engine doesn't let you keep learn't skill V_V'

-//= 1.2 Added to correct locations, correct NPC's, fixed

-//= some of the items required and made them into real

-//= quests. [Reddozen] 

-//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]

-//= 1.3a fixed an item ID typo, thx 2Spiritual Kid

-//= 1.3b Splitted into different files [DracoRPG]

-//============================================================

-

-

-//============================================================

-// ROGUE - CLOSE CONFINE

-//============================================================

-in_rogue.gat,387,94,3	script	Hyzaragrack	84,{

-	mes "[Hyzaragrack]";

-	if(BaseJob!=Job_Rogue) goto L_norogue;

-	if(getskilllv(1005)) goto L_alreadyhave;

-

-	mes "I'll teach you all I know, but";

-	mes "you'll have to steal some things";

-	mes "for me first...";

-	mes "5 Immortal Hearts";

-	mes "5 Stone Hearts";

-	mes "2 Burning hearts";

-	next;

-	

-	mes "[Hyzaragrack]";

-	mes "Let me check your items.";

-	next;

-	

-	if(countitem(929)<5 || countitem(953)<5 || countitem(7097)<2) goto L_noitems;//Items: Immortal_Heart, Stone_Heart, Burning_Heart,

-	delitem 929, 5;//Items: Immortal_Heart,

-	delitem 953, 5;//Items: Stone_Heart,

-	delitem 7097, 2;//Items: Burning_Heart,

-	

-	mes "[Hyzaragrack]";

-	mes "I see you have what you need,";

-	mes "so I'll teach you my talent.";

-	skill 1005,1,0;

-	close;

-

-L_noitems:

-	mes "[Hyzaragrack]";

-	mes "You don't have enough items.";

-	mes "Come back when you have all";

-	mes "the required items for me.";

-	close;

-	

-L_norogue:

-	mes "Looking for your master?";

-	emotion e_gasp;

-	close;

-	

-L_alreadyhave:

-	mes "I've already taught you";

-	mes "everything I know...";

-	close;

-}

+//===== eAthena Script ======================================= 
+//= Rogue Skills Quests
+//===== By: ================================================== 
+//= Lupus, Reddozen
+//===== Current Version: ===================================== 
+//= 1.3a
+//===== Compatible With: ===================================== 
+//= eAthena Revision 3800+
+//===== Description: ========================================= 
+//= Temp quests for new skills for 2nd classes
+//===== Additional Comments: ================================= 
+//= 1.0 for fully working skills only [Lupus]
+//= 1.1 Added more new skill quests for more classes [Lupus]
+//= Somehow eA engine doesn't let you keep learn't skill V_V'
+//= 1.2 Added to correct locations, correct NPC's, fixed
+//= some of the items required and made them into real
+//= quests. [Reddozen] 
+//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]
+//= 1.3a fixed an item ID typo, thx 2Spiritual Kid
+//= 1.3b Splitted into different files [DracoRPG]
+//============================================================
+
+
+//============================================================
+// ROGUE - CLOSE CONFINE
+//============================================================
+in_rogue.gat,387,94,3	script	Hyzaragrack	84,{
+	mes "[Hyzaragrack]";
+	if(BaseJob!=Job_Rogue) goto L_norogue;
+	if(getskilllv(1005)) goto L_alreadyhave;
+
+	mes "I'll teach you all I know, but";
+	mes "you'll have to steal some things";
+	mes "for me first...";
+	mes "5 Immortal Hearts";
+	mes "5 Stone Hearts";
+	mes "2 Burning hearts";
+	next;
+	
+	mes "[Hyzaragrack]";
+	mes "Let me check your items.";
+	next;
+	
+	if(countitem(929)<5 || countitem(953)<5 || countitem(7097)<2) goto L_noitems;//Items: Immortal_Heart, Stone_Heart, Burning_Heart,
+	delitem 929, 5;//Items: Immortal_Heart,
+	delitem 953, 5;//Items: Stone_Heart,
+	delitem 7097, 2;//Items: Burning_Heart,
+	
+	mes "[Hyzaragrack]";
+	mes "I see you have what you need,";
+	mes "so I'll teach you my talent.";
+	skill 1005,1,0;
+	close;
+
+L_noitems:
+	mes "[Hyzaragrack]";
+	mes "You don't have enough items.";
+	mes "Come back when you have all";
+	mes "the required items for me.";
+	close;
+	
+L_norogue:
+	mes "Looking for your master?";
+	emotion e_gasp;
+	close;
+	
+L_alreadyhave:
+	mes "I've already taught you";
+	mes "everything I know...";
+	close;
+}
diff --git a/npc/quests/skills/sage_skills.txt b/npc/quests/skills/sage_skills.txt
index 2697c78c2..4d391e34b 100644
--- a/npc/quests/skills/sage_skills.txt
+++ b/npc/quests/skills/sage_skills.txt
@@ -1,148 +1,148 @@
-//===== eAthena Script ======================================= 

-//= Sage Skills Quests

-//===== By: ================================================== 

-//= Lupus, Reddozen

-//===== Current Version: ===================================== 

-//= 1.3c

-//===== Compatible With: ===================================== 

-//= eAthena Revision 3800+

-//===== Description: ========================================= 

-//= Temp quests for new skills for 2nd classes

-//===== Additional Comments: ================================= 

-//= 1.0 for fully working skills only [Lupus]

-//= 1.1 Added more new skill quests for more classes [Lupus]

-//= Somehow eA engine doesn't let you keep learn't skill V_V'

-//= 1.2 Added to correct locations, correct NPC's, fixed

-//= some of the items required and made them into real

-//= quests. [Reddozen] 

-//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]

-//= 1.3a fixed an item ID typo, thx 2Spiritual Kid

-//= 1.3b Splitted into different files [DracoRPG]

-//= 1.3c Fixed some typos [IVBela]

-//============================================================

-

-

-//============================================================

-// SAGE SKILL - CREATE CONVERTER + ELEMENTAL CHANGE

-//============================================================

-yuno_in03.gat,176,24,3	script	Mischna	755,{

-	mes "[Mischna]";

-	if(BaseJob!=Job_Sage) goto L_sageno;

-	if(getskilllv(1007)) goto L_elemental;

-

-	mes "I can teach you a new skill";

-	mes "that I discovered, but you";

-	mes "will need to bring me a few";

-	mes "things to complete the";

-	mes "process.";

-	next;

-	

-	mes "[Mischna]";

-	mes "We will need:";	

-	mes "10 Scorpion Tails";

-	mes "7 Horns";

-	mes "12 Rainbow Shells";

-	mes "10 Snail Shells";

-	mes "4 Blank Scrolls";

-	next;

-	

-	mes "[Mischna]";

-	mes "Let me check your items.";

-	next;

-	

-	if(countitem(904)<10 || countitem(947)<7 || countitem(1013)<12 || countitem(946)<10 || countitem(7433)<4) goto L_noitems;//Items: Scorpion_Tail, Horn, Rainbow_Shell, Snail's_Shell, Blank_Scroll,

-	delitem 904, 10;//Items: Scorpion_Tail,

-	delitem 947, 7;//Items: Horn,

-	delitem 1013, 12;//Items: Rainbow_Shell,

-	delitem 946, 10;//Items: Snail's_Shell,

-	delitem 7433, 4;//Items: Blank_Scroll,

-	

-	mes "[Mischna]";

-	mes "I see you have what we need,";

-	mes "so I'll teach you this new";

-	mes "talent of mine!";

-	skill 1007,1,0;

-	next;

-	

-	mes "[Mischna]";

-	mes "Do you feel more in tune";

-	mes "with nature?";

-	close;

-

-L_noitems:

-	mes "[Mischna]";

-	mes "You don't have enough items.";

-	mes "Come back when you have all";

-	mes "the required items for me.";

-	close;

-	

-L_sageno:

-	mes "Hi I'm Mischna. How are you?";

-	mes "Please enjoy your stay here";

-	mes "within the walls of the great";

-	mes "Sage's guild.";

-	close;

-

-L_sagefail:

-	mes "[Mischna]";

-	mes "You don't have enough items.";

-	mes "Come back when you have all";

-	mes "the required items for me";

-	mes "to give you this power over";

-	mes "the elements.";

-	close;

-	

-L_alreadyhave:

-	mes "You are such a wonderful";

-	mes "student. It's too bad I have";

-	mes "nothing more to teach you.";

-	close;

-			

-L_elemental:

-	if(getskilllv(1008) || getskilllv(1017) || getskilllv(1018) || getskilllv(1019)) goto L_alreadyhave;

-	

-	mes "I have one more skill that";

-	mes "I can teach you, but you";

-	mes "will need to bring me one of";

-	mes "these sets in return...";

-	next;

-	

-	mes "[Mischna]";

-	mes "I can only accept one set.";

-	mes "20 Red blood (fire)";

-	mes "20 Crystal Blue (water)";

-	mes "20 Wind of Verdure (Wind)";

-	mes "20 Green Live (Earth)";

-	next;

-	

-	mes "[Mischna]";

-	mes "Remember that I can only teach";

-	mes "you one, so choose carefully!";

-	next;

-	

-	menu "Elemental Change Water",sage_1, "Elemental Change Earth",sage_2, "Elemental Change Fire",sage_3, "Elemental Change Wind",sage_4;

-

-		sage_1:

-		if(countitem(991)<20)goto L_sagefail;//Items: Crystal_Blue,

-		delitem 991, 20;		//Items: Crystal_Blue,

-		skill 1008,1,0;

-		goto L_alreadyhave;

-

-		sage_2:

-		if(countitem(993)<20)goto L_sagefail;//Items: Green_Live,

-		delitem 993, 20;//Items: Green_Live,

-		skill 1017,1,0;

-		goto L_alreadyhave;

-

-		sage_3:

-		if(countitem(990)<20)goto L_sagefail;//Items: Red_Blood,

-		delitem 990, 20;//Items: Red_Blood,

-		skill 1018,1,0;

-		goto L_alreadyhave;

-

-		sage_4:

-		if(countitem(992)<20)goto L_sagefail;//Items: Wind_of_Verdure,

-		delitem 992, 20;//Items: Wind_of_Verdure,

-		skill 1019,1,0;

-		goto L_alreadyhave;

-}

+//===== eAthena Script ======================================= 
+//= Sage Skills Quests
+//===== By: ================================================== 
+//= Lupus, Reddozen
+//===== Current Version: ===================================== 
+//= 1.3c
+//===== Compatible With: ===================================== 
+//= eAthena Revision 3800+
+//===== Description: ========================================= 
+//= Temp quests for new skills for 2nd classes
+//===== Additional Comments: ================================= 
+//= 1.0 for fully working skills only [Lupus]
+//= 1.1 Added more new skill quests for more classes [Lupus]
+//= Somehow eA engine doesn't let you keep learn't skill V_V'
+//= 1.2 Added to correct locations, correct NPC's, fixed
+//= some of the items required and made them into real
+//= quests. [Reddozen] 
+//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]
+//= 1.3a fixed an item ID typo, thx 2Spiritual Kid
+//= 1.3b Splitted into different files [DracoRPG]
+//= 1.3c Fixed some typos [IVBela]
+//============================================================
+
+
+//============================================================
+// SAGE SKILL - CREATE CONVERTER + ELEMENTAL CHANGE
+//============================================================
+yuno_in03.gat,176,24,3	script	Mischna	755,{
+	mes "[Mischna]";
+	if(BaseJob!=Job_Sage) goto L_sageno;
+	if(getskilllv(1007)) goto L_elemental;
+
+	mes "I can teach you a new skill";
+	mes "that I discovered, but you";
+	mes "will need to bring me a few";
+	mes "things to complete the";
+	mes "process.";
+	next;
+	
+	mes "[Mischna]";
+	mes "We will need:";	
+	mes "10 Scorpion Tails";
+	mes "7 Horns";
+	mes "12 Rainbow Shells";
+	mes "10 Snail Shells";
+	mes "4 Blank Scrolls";
+	next;
+	
+	mes "[Mischna]";
+	mes "Let me check your items.";
+	next;
+	
+	if(countitem(904)<10 || countitem(947)<7 || countitem(1013)<12 || countitem(946)<10 || countitem(7433)<4) goto L_noitems;//Items: Scorpion_Tail, Horn, Rainbow_Shell, Snail's_Shell, Blank_Scroll,
+	delitem 904, 10;//Items: Scorpion_Tail,
+	delitem 947, 7;//Items: Horn,
+	delitem 1013, 12;//Items: Rainbow_Shell,
+	delitem 946, 10;//Items: Snail's_Shell,
+	delitem 7433, 4;//Items: Blank_Scroll,
+	
+	mes "[Mischna]";
+	mes "I see you have what we need,";
+	mes "so I'll teach you this new";
+	mes "talent of mine!";
+	skill 1007,1,0;
+	next;
+	
+	mes "[Mischna]";
+	mes "Do you feel more in tune";
+	mes "with nature?";
+	close;
+
+L_noitems:
+	mes "[Mischna]";
+	mes "You don't have enough items.";
+	mes "Come back when you have all";
+	mes "the required items for me.";
+	close;
+	
+L_sageno:
+	mes "Hi I'm Mischna. How are you?";
+	mes "Please enjoy your stay here";
+	mes "within the walls of the great";
+	mes "Sage's guild.";
+	close;
+
+L_sagefail:
+	mes "[Mischna]";
+	mes "You don't have enough items.";
+	mes "Come back when you have all";
+	mes "the required items for me";
+	mes "to give you this power over";
+	mes "the elements.";
+	close;
+	
+L_alreadyhave:
+	mes "You are such a wonderful";
+	mes "student. It's too bad I have";
+	mes "nothing more to teach you.";
+	close;
+			
+L_elemental:
+	if(getskilllv(1008) || getskilllv(1017) || getskilllv(1018) || getskilllv(1019)) goto L_alreadyhave;
+	
+	mes "I have one more skill that";
+	mes "I can teach you, but you";
+	mes "will need to bring me one of";
+	mes "these sets in return...";
+	next;
+	
+	mes "[Mischna]";
+	mes "I can only accept one set.";
+	mes "20 Red blood (fire)";
+	mes "20 Crystal Blue (water)";
+	mes "20 Wind of Verdure (Wind)";
+	mes "20 Green Live (Earth)";
+	next;
+	
+	mes "[Mischna]";
+	mes "Remember that I can only teach";
+	mes "you one, so choose carefully!";
+	next;
+	
+	menu "Elemental Change Water",sage_1, "Elemental Change Earth",sage_2, "Elemental Change Fire",sage_3, "Elemental Change Wind",sage_4;
+
+		sage_1:
+		if(countitem(991)<20)goto L_sagefail;//Items: Crystal_Blue,
+		delitem 991, 20;		//Items: Crystal_Blue,
+		skill 1008,1,0;
+		goto L_alreadyhave;
+
+		sage_2:
+		if(countitem(993)<20)goto L_sagefail;//Items: Green_Live,
+		delitem 993, 20;//Items: Green_Live,
+		skill 1017,1,0;
+		goto L_alreadyhave;
+
+		sage_3:
+		if(countitem(990)<20)goto L_sagefail;//Items: Red_Blood,
+		delitem 990, 20;//Items: Red_Blood,
+		skill 1018,1,0;
+		goto L_alreadyhave;
+
+		sage_4:
+		if(countitem(992)<20)goto L_sagefail;//Items: Wind_of_Verdure,
+		delitem 992, 20;//Items: Wind_of_Verdure,
+		skill 1019,1,0;
+		goto L_alreadyhave;
+}
diff --git a/npc/quests/skills/swordman_skills.txt b/npc/quests/skills/swordman_skills.txt
index d1a915ece..618c93db7 100644
--- a/npc/quests/skills/swordman_skills.txt
+++ b/npc/quests/skills/swordman_skills.txt
@@ -1,374 +1,374 @@
-//===== eAthena Script =======================================

-//= Swordsman Skills Quests

-//===== By: ==================================================

-//= kobra_k88

-//===== Current Version: =====================================

-//= 1.5a

-//===== Compatible With: =====================================

-//= eAthena 7.15 +

-//===== Description: =========================================

-//= <Description> 

-//===== Additional Comments: =================================

-//= Fully working

-//= 1.0a Now using functions found in "Global_Functions.txt"

-//= for class checks.

-//= 1.1 Added missing delitem [Lupus]

-//= 1.2 Added Baby Class Support [Lupus]

-//= 1.3 Removed callfunc Is_####_Class in favor of baseClass [Silentdragon]

-//= 1.4 Updated the NPC to allow subclasses of swordsman to learn the skills, [MasterOfMuppets]

-//=	1.5 Fixed exploits [Lupus]

-//= 1.5a Fixed some typos [IVBela]

-//============================================================

-

-

-

-//<-------------------------------------- Fatal Blow------------------------------------>\\

-prt_in.gat,75,88,5	script	Leon	85,{

-	mes "[Leon]";

-	if(baseClass == Job_Swordman) goto L_Start;

-	if(BaseJob == Job_Novice) goto L_Novice;

-

-	mes "Hello there.  I am Leon, a well known and well respected member of the famous Prontera Chivalry.";

-	next;

-	mes "[Leon]";

-	mes "Are you here to learn more about the Chivalry, or are you hear to bask in the glory of us Knights? Hahahaha!";

-	emotion e_heh;

-	close;

-

-L_Novice:

-	mes "Oh a novice.... I'm afraid I have nothing to offer you.";

-	mes "I have no fun or nice things to say to anyone other then Swordsmen.";

-	next;

-	mes "[Leon]";

-	mes "See you in a better world!";

-	close;

-

-L_Start:

-	if (FATALBLOW == 1) goto L_Check;

-	if (getskilllv(145)>0) goto L_Done;

-

-	if(sex==1)mes "Oooh! I see that you are quite a strong Swordsman.";

-	if(sex==0)mes "Oooh! I see that you are quite a strong Swordswoman.";

-	mes "How did I know? Hahaha! Just look at that strong arm of yours!";

-	next;

-	mes "[Leon]";

-	mes "You must enjoy using ^0000ff'Bash'^000000, huh? Hahaha!";

-	emotion e_heh;

-	next;

-	mes "[Leon]";

-	if(sex==1)mes "I like a Swordsman who isn't afraid to use a powerful skill such as that.";

-	if(sex==0)mes "Now, now, don't be shy.  It's OK for girls to like Bash.";

-	if(sex==0)mes "After all, whether your a Swordsman or Swordswoman, there's no denying the power of Bash!";

-	next;

-	mes "[Leon]";

-	mes "As great as Bash is though, I often felt that it could be even better if there was some way to stun an opponent with it.";

-	mes "I decided to withdraw from the battlefield and research ways of making bash more powerful.";

-	next;

-	mes "[Leon]";

-	mes "I discovered that if one could strike an enemy's weak point with a precisely placed Bash, an opponent would be left utterly paralyzed!!";

-	next;

-	mes "[Leon]";

-	mes "I then went on to develop the skill, ^ff0000'Fatal Blow'^000000, which allows you to do just that!";

-	mes "With rigorous training, one can learn to stun an opponent with a mighty Bash.";

-	next;

-	mes "[Leon]";

-	mes "Since you seem to be so fond of Bash, I'd be willing to teach you the skill.";

-	mes "However, I must warn you that a lot of hard work will be required.";

-	next;

-	mes "[Leon]";

-	mes "So what do you think? Are you interested?";

-	next;

-	menu "You betcha!!",M_0, "Nah.... Not really.",M_1, "Any advice on how to eat sushi?",M_2;

-

-	M_0:

-		set FATALBLOW,1;

-		mes "[Leon]";

-		mes "Hahaha! I knew you love Bash as much as I do.";

-		next;

-		mes "[Leon]";

-		mes "In order for me to teach you Fatal Blow, you must have at least ^5555FFlevel 5 Bash^000000.  You then need to give me these items:";

-		mes "- 10 ^FF0000Fire Arrows^000000,";

-		mes "- 10 ^FF0000Silver Arrows^000000,";

-		mes "- 1 ^FF0000Banana Juice^000000,";

-		mes "- 30 ^FF0000Tentacles^000000,";

-		mes "- and 5 ^FF0000Royal Jelly^000000.";

-		next;

-		mes "[Leon]";

-		mes "When you have gathered all of these items come back and see me.";

-		close;

-	M_1:

-		mes "[Leon]";

-		mes "I see... I must have misjudged you...";

-		close;

-	M_2:

-		mes "[*Sushi King* Leon]";

-		mes "The best way to eat sushi is with your hands.  That is the basic method.  Oh, and dip the FISH, NOT the RICE, into the soy sauce.";

-		next;

-		mes "[*Sushi King* Leon]";

-		mes "That way you get a richer flavor.  Also, always eat the kind that is in season.";

-		mes "Eating in the order of white fish, then blue fish, will make it taste even better!";

-		next;

-		mes "[*Sushi King* Leon]";

-		mes "Mmmmm..... I love sushi!!!";

-		emotion e_ok;

-		close;

-

-L_Check:

-	mes "So you're back.  Did you get what I asked for?";

-	next;

-	mes "[Leon]";

-	if(countitem(1752)<10 || countitem(1751)<10 || countitem(532)<1 || countitem(962)<30 || countitem(526)<5) goto L_NoItems;

-	if(getskilllv(5)<5) goto L_BashLvl;

-	delitem 1752,10;

-	delitem 1751,10;

-	delitem 532,1;

-	delitem 962,30;

-	delitem 526,5;

-	mes "Great work.  You have everything I need for me to teach you Fatal Blow.";

-	next;

-	mes "[Leon]";

-	mes "OK, lets get started.";

-	next;

-	mes "!SMACK!~!CRACK!~!THWACK!~!BASH!.......... !SMACK!~!CRACK!~!THWACK!~!BASH!..........";

-	next;

-	mes "(5 hours later)";

-	next;

-	mes "[Leon]";

-	mes "Yes! That's it! You have just mastered Fatal Blow!";

-	emotion e_no1;

-	next;

-	skill 145,1,0;

-	set FATALBLOW,0;

-	mes "[Leon]";

-	mes "Use it wisely young warrior!!";

-	close;

-

-	L_NoItems:

-		mes "Hmm... you still don't have enough items.  Come back when you do.";

-		close;

-	L_BashLvl:

-		mes "Wait a minute... you have to train a little more before learning this skill.";

-		mes "You need to have at least a ^5555FFlevel 5 Bash^000000.";

-		close;

-

-L_Done:

-	mes "So how is Fatal Blow? Isn't it great!! Hahaha! I knew you'd like it.";

-	next;

-	mes "[Leon]";

-	mes "Go on and Bash the heck out of those monsters! Hahaha.";

-	emotion e_heh;

-	close;

-

-}

-

-

-//<---------------------------------- Moving HP Recovery ---------------------------------->\\

-izlude_in.gat,175,130,2	script	Knight De Thomas	98,{

-	mes "[Knight De Thomas]";

-	if(baseClass == Job_Swordman) goto L_Start;

-

-L_Other:

-	mes "I am Thomas De Knight of the Prontera Chivalry.  I am very busy now so please leave me alone.";

-	close;

-

-L_Start:

-	if (MOVHPREC == 1) goto L_Check;

-	if (getskilllv(144)>0) goto L_GotSkill;

-	mes "Oh no! You must have been hurt in battle! Are you OK?";

-	mes "It must have been a hard fought battle for you to receive such serious injuries....";

-	emotion e_swt2;

-	next;

-	mes "[Knight De Thomas]";

-	mes "Being a Swordsman or Knight comes with a lot of responsibility and requires a great deal of self sacrifice.";

-	mes "For Swordsmen and Knights there is a wonderful skill that can aid in the recovery of HP.";

-	next;

-	mes "[Knight De Thomas]";

-	mes "I present to you..... ^5555FF'Moving HP Recovery'^000000!! This skill allows you to recover HP while moving!";

-	next;

-	mes "[Knight De Thomas]";

-	mes "The skill has not been perfected yet so the amount of HP recovered is a little low.  Still, it is helpful.";

-	mes "What do you think? Would you like to learn this skill?";

-	next;

-	menu "What a great skill! I would like to learn it!!",M_0, "No thank you.",M_End;

-

-	M_0:

-		mes "[Knight De Thomas]";

-		mes "Very well.  I will tell you what is needed to learn this skill.  First you must have a job level of 35 or greater.";

-		mes "This however doesn't apply to Knights or Crusaders.  You will also need:";

-		mes "^5555FF200 Empty Bottles^000000,";

-		mes "^5555FF1 Padded Armour^000000,";

-		mes "and ^5555FF1 Moth Wings^000000.";

-		next;

-		mes "[Knight De Thomas]";

-		mes "The bottles are proof that you have fought fiercely and have used many potions.  The Padded Armor is proof of an experienced fighter.";

-		mes "The Moth Wings..... well... really aren't necessary.  It's just that my niece received a bug hunting assignment for summer vacation.......";

-		next;

-		mes "[Knight De Thomas]";

-		mes "I would get them myself... it's just... I must work here all day long so I don't have any time to go out and get them.......";

-		next;

-		mes "[Knight De Thomas]";

-		mes "Don't you think it's sad that I have to stay in once place everyday without even being able to go outside??";

-		mes "Please.... find a pair of Moth Wings for my niece?.... (~sniff~sniff~)....";

-		emotion e_sob;

-		next;

-		mes "[Knight De Thomas]";

-		mes "If you don't..... I won't teach you anything!! Muahahahaha!!";

-		emotion e_gg;

-		set MOVHPREC, 1;

-		close;

-	M_End:

-		mes "[Knight De Thomas]";

-		mes "What?? What did you say?.....";

-		emotion e_what;

-		close;

-

-L_Check:

-	mes "Ah, you've come back.  Let's, see... are you ready for HP Moving Recovery?....";

-	next;

-	mes "[Knight De Thomas]";

-	if ((countitem(713)<200) || (countitem(1058)<1) || (countitem(2312)<1)) goto L_NoItems;

-	if (baseClass==Job_Swordman && JobLevel < 35) goto L_LowLvl;

-	delitem 713,200;

-	delitem 1058,1;

-	mes "Great! You have everything needed to learn this skill.  Take a deep breath.... let us begin.";

-	next;

-	mes "(2 hours later)";

-	next;

-	mes "[Knight De Thomas]";

-	mes "Can you feel it? Can you feel the energy flowing in you while you move around?";

-	mes "Haha! You have just learned HP Moving Recovery!";

-//-- Padded armor does not have to be deleted! --

-//	delitem 2312,1;

-	skill 144,1,0;

-	set MOVHPREC, 0;

-	next;

-	mes "[Knight De Thomas]";

-	mes "Congratulations on learning the new skill and thank you for the Moth Wings! ^_^";

-	emotion e_no1;

-	close;

-

-	L_NoItems:

-		mes "As I said before you need to bring me these items:";

-		mes "^5555FF200 Empty Bottles^000000,";

-		mes "^5555FF1 Padded Armour^000000,";

-		mes "and ^5555FF1 Moth Wings^000000.";

-		close;

-	L_LowLvl:

-		mes "You are not yet experienced enough to learn this skill.  Come back when you have a job level of at least 35.";

-		close;

-	L_GotSkill:

-		mes "Ah, you're looking well.  That HP Moving Recovery skill must be very helpful.";

-		mes "Well, continued success on your adventure!";

-		close;

-

-}

-

-

-//<----------------------------------------- Auto-Berserk --------------------------------->\\

-prt_in.gat,94,57,3	script	Juan	85,{

-	mes "[Juan]";

-	if(baseClass == Job_Swordman) goto L_Start;

-

-L_Other:

-	mes "So how's your adventure going? I hope there will be good days ahead of you.";

-	next;

-	mes "[Juan]";

-	mes "Who am I? Oh, I'm just a kind knight named Juan.  Don't mind me.  Hahahaha....";

-	emotion e_heh;

-	close;

-

-L_Start:

-	if (baseClass == Job_Swordman && JobLevel<30) goto L_LowLvl;

-	if (BERSERK == 1) goto L_Check;

-	if (getskilllv(146)>0) goto L_GotSkill;

-

-	mes "Oh no! You have more injuries since the last time I saw you.";

-	mes "You went into battle like this? It seems like you're straining yourself.";

-	next;

-	mes "[Juan]";

-	mes "Even though you may have a lot of strength, there is only so much you can do when you have reached your limits.";

-	mes "So don't overestimate your own power.";

-	next;

-	mes "[Juan]";

-	mes "Of course you could always use the ^5555FF'skill'^000000 we developed to overcome these limits.....";

-	next;

-	menu "Eh! What are you talking about?",M_0, "Haha! There's no such thing....",M_1, "Keuuuuuhhh!",M_3;

-

-	M_0:

-		mes "[Juan]";

-		mes "The skill is called ^5555FFBerserk^000000.  It has been deemed the flower of the battlefield!";

-		mes "When your health is low, you can call upon your hidden potential by provoking yourself.";

-		next;

-		mes "[Juan]";

-		mes "A surge of energy will flow through your body giving you greater attack power at the cost of defensive strength.";

-		mes "With this you will be able to fight on with a FIERY RAGE and an absolute disregard to your own safety!!";

-		next;

-		mes "[Juan]";

-		mes "The enemy will be shocked by your new found strength!!";

-		mes "This skill is especially great for those who fight with a no-holds-bar mentality.";

-		next;

-		mes "[Juan]";

-		mes "In order to learn this skill you will need to bring me the following items:";

-		mes "^5555FF35 Powder of Butterfly,";

-		mes "10 Horrendous Mouth,";

-		mes "10 Decayed Nail^000000,";

-		mes "and ^5555FF10 Honeys^000000!";

-		next;

-		mes "[Juan]";

-		mes "Did you get all of that down? Please come back when you are ready.  I look forward to seeing you again.";

-		set BERSERK, 1;

-		close;

-	M_1:

-		mes "[Juan]";

-		mes "Bleh! Have you been a fool all of your life?? Go away and don't talk to me.";

-		emotion e_pif;

-		close;

-	M_3:

-		mes "[Juan]";

-		mes "Keuuuuuuuuuuuuuuuuuuh!";

-		mes "Oooowwwwwwwwuuuuuuuuuuhhhhhh!";

-		mes "Keuaaaaaaaaaaaaaaaaaah!";

-		close;

-

-	L_LowLvl:

-		mes "Oh, nice to meet you.";

-		next;

-		mes "[Juan]";

-		mes "You can go on your way now.";

-		emotion e_ok;

-		close;

-

-L_Check:

-	if ((countitem(924)<35) && (countitem(957)<10) && (countitem(958)<10) && (countitem(518)<10)) goto L_NoItems;

-	delitem 924,35;

-	delitem 958,10;

-	delitem 957,10;

-	delitem 518,10;

-	mes "Good job my dear friend.  You have all 4 of the items I asked for.";

-	mes "In return I will now teach you the skill: ^FF0000Berserk^000000.";

-	next;

-	mes "[Juan]";

-	mes "Great job you have done well and deserve this skill.";

-	skill 146,1,0;

-	set BERSERK, 0;

-	next;

-	mes "[Juan]";

-	mes "Muhahahaha!! Don't hold back young warrior, fight without any fears or regrets!!";

-	emotion e_gg;

-	close;

-

-	L_NoItems:

-		mes "[Juan]";

-		mes "In order to learn this skill you will need to bring me the following items:";

-		mes "^5555FF35 Powder of Butterfly,";

-		mes "10 Horrendous Mouth,";

-		mes "10 Decayed Nail^000000,";

-		mes "and ^5555FF10 Honeys^000000!";

-		close;

-L_GotSkill:

-

-	mes "You have the eyes of a person who has seen death first hand!!";

-	mes "But, because of Berserk, I'm sure you have been able to escape it many times as well.";

-	emotion e_gasp;

-	close;

-}

+//===== eAthena Script =======================================
+//= Swordsman Skills Quests
+//===== By: ==================================================
+//= kobra_k88
+//===== Current Version: =====================================
+//= 1.5a
+//===== Compatible With: =====================================
+//= eAthena 7.15 +
+//===== Description: =========================================
+//= <Description> 
+//===== Additional Comments: =================================
+//= Fully working
+//= 1.0a Now using functions found in "Global_Functions.txt"
+//= for class checks.
+//= 1.1 Added missing delitem [Lupus]
+//= 1.2 Added Baby Class Support [Lupus]
+//= 1.3 Removed callfunc Is_####_Class in favor of baseClass [Silentdragon]
+//= 1.4 Updated the NPC to allow subclasses of swordsman to learn the skills, [MasterOfMuppets]
+//=	1.5 Fixed exploits [Lupus]
+//= 1.5a Fixed some typos [IVBela]
+//============================================================
+
+
+
+//<-------------------------------------- Fatal Blow------------------------------------>\\
+prt_in.gat,75,88,5	script	Leon	85,{
+	mes "[Leon]";
+	if(baseClass == Job_Swordman) goto L_Start;
+	if(BaseJob == Job_Novice) goto L_Novice;
+
+	mes "Hello there.  I am Leon, a well known and well respected member of the famous Prontera Chivalry.";
+	next;
+	mes "[Leon]";
+	mes "Are you here to learn more about the Chivalry, or are you hear to bask in the glory of us Knights? Hahahaha!";
+	emotion e_heh;
+	close;
+
+L_Novice:
+	mes "Oh a novice.... I'm afraid I have nothing to offer you.";
+	mes "I have no fun or nice things to say to anyone other then Swordsmen.";
+	next;
+	mes "[Leon]";
+	mes "See you in a better world!";
+	close;
+
+L_Start:
+	if (FATALBLOW == 1) goto L_Check;
+	if (getskilllv(145)>0) goto L_Done;
+
+	if(sex==1)mes "Oooh! I see that you are quite a strong Swordsman.";
+	if(sex==0)mes "Oooh! I see that you are quite a strong Swordswoman.";
+	mes "How did I know? Hahaha! Just look at that strong arm of yours!";
+	next;
+	mes "[Leon]";
+	mes "You must enjoy using ^0000ff'Bash'^000000, huh? Hahaha!";
+	emotion e_heh;
+	next;
+	mes "[Leon]";
+	if(sex==1)mes "I like a Swordsman who isn't afraid to use a powerful skill such as that.";
+	if(sex==0)mes "Now, now, don't be shy.  It's OK for girls to like Bash.";
+	if(sex==0)mes "After all, whether your a Swordsman or Swordswoman, there's no denying the power of Bash!";
+	next;
+	mes "[Leon]";
+	mes "As great as Bash is though, I often felt that it could be even better if there was some way to stun an opponent with it.";
+	mes "I decided to withdraw from the battlefield and research ways of making bash more powerful.";
+	next;
+	mes "[Leon]";
+	mes "I discovered that if one could strike an enemy's weak point with a precisely placed Bash, an opponent would be left utterly paralyzed!!";
+	next;
+	mes "[Leon]";
+	mes "I then went on to develop the skill, ^ff0000'Fatal Blow'^000000, which allows you to do just that!";
+	mes "With rigorous training, one can learn to stun an opponent with a mighty Bash.";
+	next;
+	mes "[Leon]";
+	mes "Since you seem to be so fond of Bash, I'd be willing to teach you the skill.";
+	mes "However, I must warn you that a lot of hard work will be required.";
+	next;
+	mes "[Leon]";
+	mes "So what do you think? Are you interested?";
+	next;
+	menu "You betcha!!",M_0, "Nah.... Not really.",M_1, "Any advice on how to eat sushi?",M_2;
+
+	M_0:
+		set FATALBLOW,1;
+		mes "[Leon]";
+		mes "Hahaha! I knew you love Bash as much as I do.";
+		next;
+		mes "[Leon]";
+		mes "In order for me to teach you Fatal Blow, you must have at least ^5555FFlevel 5 Bash^000000.  You then need to give me these items:";
+		mes "- 10 ^FF0000Fire Arrows^000000,";
+		mes "- 10 ^FF0000Silver Arrows^000000,";
+		mes "- 1 ^FF0000Banana Juice^000000,";
+		mes "- 30 ^FF0000Tentacles^000000,";
+		mes "- and 5 ^FF0000Royal Jelly^000000.";
+		next;
+		mes "[Leon]";
+		mes "When you have gathered all of these items come back and see me.";
+		close;
+	M_1:
+		mes "[Leon]";
+		mes "I see... I must have misjudged you...";
+		close;
+	M_2:
+		mes "[*Sushi King* Leon]";
+		mes "The best way to eat sushi is with your hands.  That is the basic method.  Oh, and dip the FISH, NOT the RICE, into the soy sauce.";
+		next;
+		mes "[*Sushi King* Leon]";
+		mes "That way you get a richer flavor.  Also, always eat the kind that is in season.";
+		mes "Eating in the order of white fish, then blue fish, will make it taste even better!";
+		next;
+		mes "[*Sushi King* Leon]";
+		mes "Mmmmm..... I love sushi!!!";
+		emotion e_ok;
+		close;
+
+L_Check:
+	mes "So you're back.  Did you get what I asked for?";
+	next;
+	mes "[Leon]";
+	if(countitem(1752)<10 || countitem(1751)<10 || countitem(532)<1 || countitem(962)<30 || countitem(526)<5) goto L_NoItems;
+	if(getskilllv(5)<5) goto L_BashLvl;
+	delitem 1752,10;
+	delitem 1751,10;
+	delitem 532,1;
+	delitem 962,30;
+	delitem 526,5;
+	mes "Great work.  You have everything I need for me to teach you Fatal Blow.";
+	next;
+	mes "[Leon]";
+	mes "OK, lets get started.";
+	next;
+	mes "!SMACK!~!CRACK!~!THWACK!~!BASH!.......... !SMACK!~!CRACK!~!THWACK!~!BASH!..........";
+	next;
+	mes "(5 hours later)";
+	next;
+	mes "[Leon]";
+	mes "Yes! That's it! You have just mastered Fatal Blow!";
+	emotion e_no1;
+	next;
+	skill 145,1,0;
+	set FATALBLOW,0;
+	mes "[Leon]";
+	mes "Use it wisely young warrior!!";
+	close;
+
+	L_NoItems:
+		mes "Hmm... you still don't have enough items.  Come back when you do.";
+		close;
+	L_BashLvl:
+		mes "Wait a minute... you have to train a little more before learning this skill.";
+		mes "You need to have at least a ^5555FFlevel 5 Bash^000000.";
+		close;
+
+L_Done:
+	mes "So how is Fatal Blow? Isn't it great!! Hahaha! I knew you'd like it.";
+	next;
+	mes "[Leon]";
+	mes "Go on and Bash the heck out of those monsters! Hahaha.";
+	emotion e_heh;
+	close;
+
+}
+
+
+//<---------------------------------- Moving HP Recovery ---------------------------------->\\
+izlude_in.gat,175,130,2	script	Knight De Thomas	98,{
+	mes "[Knight De Thomas]";
+	if(baseClass == Job_Swordman) goto L_Start;
+
+L_Other:
+	mes "I am Thomas De Knight of the Prontera Chivalry.  I am very busy now so please leave me alone.";
+	close;
+
+L_Start:
+	if (MOVHPREC == 1) goto L_Check;
+	if (getskilllv(144)>0) goto L_GotSkill;
+	mes "Oh no! You must have been hurt in battle! Are you OK?";
+	mes "It must have been a hard fought battle for you to receive such serious injuries....";
+	emotion e_swt2;
+	next;
+	mes "[Knight De Thomas]";
+	mes "Being a Swordsman or Knight comes with a lot of responsibility and requires a great deal of self sacrifice.";
+	mes "For Swordsmen and Knights there is a wonderful skill that can aid in the recovery of HP.";
+	next;
+	mes "[Knight De Thomas]";
+	mes "I present to you..... ^5555FF'Moving HP Recovery'^000000!! This skill allows you to recover HP while moving!";
+	next;
+	mes "[Knight De Thomas]";
+	mes "The skill has not been perfected yet so the amount of HP recovered is a little low.  Still, it is helpful.";
+	mes "What do you think? Would you like to learn this skill?";
+	next;
+	menu "What a great skill! I would like to learn it!!",M_0, "No thank you.",M_End;
+
+	M_0:
+		mes "[Knight De Thomas]";
+		mes "Very well.  I will tell you what is needed to learn this skill.  First you must have a job level of 35 or greater.";
+		mes "This however doesn't apply to Knights or Crusaders.  You will also need:";
+		mes "^5555FF200 Empty Bottles^000000,";
+		mes "^5555FF1 Padded Armour^000000,";
+		mes "and ^5555FF1 Moth Wings^000000.";
+		next;
+		mes "[Knight De Thomas]";
+		mes "The bottles are proof that you have fought fiercely and have used many potions.  The Padded Armor is proof of an experienced fighter.";
+		mes "The Moth Wings..... well... really aren't necessary.  It's just that my niece received a bug hunting assignment for summer vacation.......";
+		next;
+		mes "[Knight De Thomas]";
+		mes "I would get them myself... it's just... I must work here all day long so I don't have any time to go out and get them.......";
+		next;
+		mes "[Knight De Thomas]";
+		mes "Don't you think it's sad that I have to stay in once place everyday without even being able to go outside??";
+		mes "Please.... find a pair of Moth Wings for my niece?.... (~sniff~sniff~)....";
+		emotion e_sob;
+		next;
+		mes "[Knight De Thomas]";
+		mes "If you don't..... I won't teach you anything!! Muahahahaha!!";
+		emotion e_gg;
+		set MOVHPREC, 1;
+		close;
+	M_End:
+		mes "[Knight De Thomas]";
+		mes "What?? What did you say?.....";
+		emotion e_what;
+		close;
+
+L_Check:
+	mes "Ah, you've come back.  Let's, see... are you ready for HP Moving Recovery?....";
+	next;
+	mes "[Knight De Thomas]";
+	if ((countitem(713)<200) || (countitem(1058)<1) || (countitem(2312)<1)) goto L_NoItems;
+	if (baseClass==Job_Swordman && JobLevel < 35) goto L_LowLvl;
+	delitem 713,200;
+	delitem 1058,1;
+	mes "Great! You have everything needed to learn this skill.  Take a deep breath.... let us begin.";
+	next;
+	mes "(2 hours later)";
+	next;
+	mes "[Knight De Thomas]";
+	mes "Can you feel it? Can you feel the energy flowing in you while you move around?";
+	mes "Haha! You have just learned HP Moving Recovery!";
+//-- Padded armor does not have to be deleted! --
+//	delitem 2312,1;
+	skill 144,1,0;
+	set MOVHPREC, 0;
+	next;
+	mes "[Knight De Thomas]";
+	mes "Congratulations on learning the new skill and thank you for the Moth Wings! ^_^";
+	emotion e_no1;
+	close;
+
+	L_NoItems:
+		mes "As I said before you need to bring me these items:";
+		mes "^5555FF200 Empty Bottles^000000,";
+		mes "^5555FF1 Padded Armour^000000,";
+		mes "and ^5555FF1 Moth Wings^000000.";
+		close;
+	L_LowLvl:
+		mes "You are not yet experienced enough to learn this skill.  Come back when you have a job level of at least 35.";
+		close;
+	L_GotSkill:
+		mes "Ah, you're looking well.  That HP Moving Recovery skill must be very helpful.";
+		mes "Well, continued success on your adventure!";
+		close;
+
+}
+
+
+//<----------------------------------------- Auto-Berserk --------------------------------->\\
+prt_in.gat,94,57,3	script	Juan	85,{
+	mes "[Juan]";
+	if(baseClass == Job_Swordman) goto L_Start;
+
+L_Other:
+	mes "So how's your adventure going? I hope there will be good days ahead of you.";
+	next;
+	mes "[Juan]";
+	mes "Who am I? Oh, I'm just a kind knight named Juan.  Don't mind me.  Hahahaha....";
+	emotion e_heh;
+	close;
+
+L_Start:
+	if (baseClass == Job_Swordman && JobLevel<30) goto L_LowLvl;
+	if (BERSERK == 1) goto L_Check;
+	if (getskilllv(146)>0) goto L_GotSkill;
+
+	mes "Oh no! You have more injuries since the last time I saw you.";
+	mes "You went into battle like this? It seems like you're straining yourself.";
+	next;
+	mes "[Juan]";
+	mes "Even though you may have a lot of strength, there is only so much you can do when you have reached your limits.";
+	mes "So don't overestimate your own power.";
+	next;
+	mes "[Juan]";
+	mes "Of course you could always use the ^5555FF'skill'^000000 we developed to overcome these limits.....";
+	next;
+	menu "Eh! What are you talking about?",M_0, "Haha! There's no such thing....",M_1, "Keuuuuuhhh!",M_3;
+
+	M_0:
+		mes "[Juan]";
+		mes "The skill is called ^5555FFBerserk^000000.  It has been deemed the flower of the battlefield!";
+		mes "When your health is low, you can call upon your hidden potential by provoking yourself.";
+		next;
+		mes "[Juan]";
+		mes "A surge of energy will flow through your body giving you greater attack power at the cost of defensive strength.";
+		mes "With this you will be able to fight on with a FIERY RAGE and an absolute disregard to your own safety!!";
+		next;
+		mes "[Juan]";
+		mes "The enemy will be shocked by your new found strength!!";
+		mes "This skill is especially great for those who fight with a no-holds-bar mentality.";
+		next;
+		mes "[Juan]";
+		mes "In order to learn this skill you will need to bring me the following items:";
+		mes "^5555FF35 Powder of Butterfly,";
+		mes "10 Horrendous Mouth,";
+		mes "10 Decayed Nail^000000,";
+		mes "and ^5555FF10 Honeys^000000!";
+		next;
+		mes "[Juan]";
+		mes "Did you get all of that down? Please come back when you are ready.  I look forward to seeing you again.";
+		set BERSERK, 1;
+		close;
+	M_1:
+		mes "[Juan]";
+		mes "Bleh! Have you been a fool all of your life?? Go away and don't talk to me.";
+		emotion e_pif;
+		close;
+	M_3:
+		mes "[Juan]";
+		mes "Keuuuuuuuuuuuuuuuuuuh!";
+		mes "Oooowwwwwwwwuuuuuuuuuuhhhhhh!";
+		mes "Keuaaaaaaaaaaaaaaaaaah!";
+		close;
+
+	L_LowLvl:
+		mes "Oh, nice to meet you.";
+		next;
+		mes "[Juan]";
+		mes "You can go on your way now.";
+		emotion e_ok;
+		close;
+
+L_Check:
+	if ((countitem(924)<35) && (countitem(957)<10) && (countitem(958)<10) && (countitem(518)<10)) goto L_NoItems;
+	delitem 924,35;
+	delitem 958,10;
+	delitem 957,10;
+	delitem 518,10;
+	mes "Good job my dear friend.  You have all 4 of the items I asked for.";
+	mes "In return I will now teach you the skill: ^FF0000Berserk^000000.";
+	next;
+	mes "[Juan]";
+	mes "Great job you have done well and deserve this skill.";
+	skill 146,1,0;
+	set BERSERK, 0;
+	next;
+	mes "[Juan]";
+	mes "Muhahahaha!! Don't hold back young warrior, fight without any fears or regrets!!";
+	emotion e_gg;
+	close;
+
+	L_NoItems:
+		mes "[Juan]";
+		mes "In order to learn this skill you will need to bring me the following items:";
+		mes "^5555FF35 Powder of Butterfly,";
+		mes "10 Horrendous Mouth,";
+		mes "10 Decayed Nail^000000,";
+		mes "and ^5555FF10 Honeys^000000!";
+		close;
+L_GotSkill:
+
+	mes "You have the eyes of a person who has seen death first hand!!";
+	mes "But, because of Berserk, I'm sure you have been able to escape it many times as well.";
+	emotion e_gasp;
+	close;
+}
diff --git a/npc/quests/skills/thief_skills.txt b/npc/quests/skills/thief_skills.txt
index 965c58591..39f3c3a0c 100644
--- a/npc/quests/skills/thief_skills.txt
+++ b/npc/quests/skills/thief_skills.txt
@@ -1,387 +1,387 @@
-//===== eAthena Script ======================================= 

-//= Thief Skills Quests

-//===== By: ================================================== 

-//= kobra_k88

-//===== Current Version: ===================================== 

-//= 1.4b

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//= Sand Attack, Back Slide, Find Stone, Stone Fling skill quests.

-//===== Additional Comments: ================================= 

-//= v1.0 Fully working

-//= v1.1 Changed Sand Attack requirements from 5 Grit to 5 Fine Grit and a

-//= Leather Bag of Infinity.  These are the official RO requirements

-//= Added npc RuRumuni, maker of Leather Bag of Infinity. [kobra_k88]

-//= v1.1a Now using functions found in "Global_Functions.txt" for

-//= class checks.[kobra_k88]

-//= 1.2 Added Baby Class Support [Lupus]

-//= 1.3 Removed callfunc Is_####_Class in favor of baseClass [Silentdragon]

-//= 1.4 Fixed exploit [Lupus]

-//= 1.4a Fixed some typos [IVBela]

-//= 1.4b changed perm. variables to temp ones [Lupus]

-//============================================================ 

-

-

-

-//======================================================================================================

-moc_prydb1.gat,154,128,4	script	Alcouskou	118,{

-	mes "[Alcouskou]";

-	if(baseClass == Job_Thief) goto L_Start;

-	if(BaseJob==Job_Novice) goto L_Novice;

-

-L_Other:

-	mes "Your kind isn't welcome here.";

-	close;

-

-L_Novice:

-	mes "Although thieves and assassins have basic skills which aid them in their jobs, most don't have the 'special' skills which can make them truly great!";

-	next;

-	mes "[Alcouskou]";

-	mes "I just happen to be the ONLY one who can teach them these skills!";

-	mes "If you ever decide to become a Thief or an Assassin, come back here and I'll teach you these cool skills.";

-	next;

-	mes "[Alcouskou]";

-	mes "And if you know anyone who already is one, send them to me.  I'm willing to teach anyone who's interested.";

-	close;

-

-L_Start:

-	mes "During the course of your life you will experience many things.";

-	mes "You many have trouble understanding the importance of some of these experiences, and may even consider them to be useless to you.";

-	next;

-	mes "[Alcouskou]";

-	mes "But do not be to hasty with your judgement of them, for some of these experience may actually prove to be beneficial for you.";

-	next;

-	mes "[Alcouskou]";

-	mes "Let me explain:";

-M_Menu:

-	next;

-	menu "-Sand Attack",M_Sand, "-Back Slide",M_Back, "-Find Stone",M_Find, "-Stone Fling",M_Fling, "-I will be back later.",M_End;

-

-	M_Sand:

-		mes "[Alcouskou]";

-		if(@SANDATTACK) goto L_Sand;

-		if(getskilllv(149) > 0) goto L_GotSand;

-		mes "The most important aspect of being a good Thief/Assassin is stealth.  One should never be seen or touched unless he/she wants to be";

-		next;

-		mes "[Alcouskou]";

-		mes "Some may consider this cowardly but I don't see it that way.";

-		mes "We live in a world where it is the survival of the fittest and you must do whatever it takes to survive.....";

-		next;

-		mes "[Alcouskou]";

-		mes "Even if this means throwing sand in an enemy's face.  That is why the skill, ^5555FFSand Attack^000000, was created.";

-		next;

-		mes "[Alcouskou]";

-		mes "This skill allows the user to throw and kick sand in the eyes of an opponent, temporarily blinding them.";

-		mes "This effectively impairs the opponent's ability to defend or attack giving the user a brief but great advantage.";

-		next;

-		mes "[Alcouskou]";

-		mes "In order to learn this skill you will need to gather ^5555FF5 Fine Grit^000000 and a ^FF3355'Leather Bag of Infinity'^000000.";

-		if(BaseJob == Job_Thief) mes "You will also need a job level of at least ^5555FF25^000000.";

-		next;

-		mes "[Alcouskou]";

-		mes "You can find the Leather Bag of Infinity by talking to a merchant by the name of ^5533FFRuRumuni^000000.";

-		mes "He can be found in the ^009500West end of Payon^000000.";

-		next;

-		mes "[Alcouskou]";

-		mes "Come back when you are ready.";

-		set @SANDATTACK, 1;

-		goto M_Menu;

-	M_Back:

-		mes "[Alcouskou]";

-		if(@BACKSLIDE)goto L_Back;

-		if(getskilllv(150)>0) goto L_GotBack;

-		mes "People tend to focus on attack and damage, but it's necessary to understand that FLEEING is JUST AS IMPORTANT as attacking!";

-		next;

-		mes "[Alcouskou]";

-		mes "We thieves/assassins pride ourselves on our speed and ability to quickly dodge.";

-		mes "Of course I'm sure you've noticed that there is a downside to that speed and quickness.....";

-		next;

-		mes "[Alcouskou]";

-		mes "If we DO get hit, depending on the monster, that single hit could put us in serious danger!";

-		next;

-		mes "[Alcouskou]";

-		mes "I can understand how funny it is to watch a monster constantly miss while its attacking you, but......";

-		next;

-		mes "[Alcouskou]";

-		mes "If you get attacked by a large group of monsters..... you may not even have room to dodge and that won't be at all funny.";

-		next;

-		mes "[Alcouskou]";

-		mes "That's why most Thieves/Assassins fear large mobs and will flee at the first sign of them.";

-		mes "There are those however, that do not fear being overwhelmed by a large mob.";

-		next;

-		mes "[Alcouskou]";

-		mes "These are the people who have learned a unique skill that allows them to deal with mob situations.";

-		mes "The skill enables the user to quickly 'back' out of the way of a mob, putting a great deal of distance between the two.";

-		next;

-		mes "[Alcouskou]";

-		mes "The skill is called ^5555FFBack Slide^000000 and requires a lot of practice to master.";

-		mes "If you wish to learn this skill you will first need to bring in ^5555FF20 Grasshopper's Legs^000000.";

-		next;

-		mes "[Alcouskou]";

-		mes "Think of it as the first part of your training.";

-		if(BaseJob == Job_Thief) mes "If you are a Thief, you will also need to have a job level of at least ^5555FF35^000000.";

-		set @BACKSLIDE, 1;

-		goto M_Menu;

-	M_Find:

-		mes "[Alcouskou]";

-		if(@FINDSTONE) goto L_Find;

-		if(getskilllv(151)>0) goto L_GotFind;

-		mes "The more experienced and better skilled members of our guild are quite handy.";

-		mes "They can turn something as common as a rock on the ground into a very effective weapon.";

-		next;

-		mes "[Alcouskou]";

-		mes "They can throw a rock at a far away target with great accuracy and strength.";

-		mes "They can throw it so powerfully that sometimes an enemy will become stunned by it.";

-		next;

-		mes "[Alcouskou]";

-		mes "Of course not every stone can be used as a weapon.  That is why the skill, ^5555FFFind Sone^000000, was developed.";

-		mes "With practice one can learn to pick out a stone that has a weight and shape that is fit for 'flinging'.";

-		next;

-		mes "[Alcouskou]";

-		mes "Once mastered a Thieve/Assassin will be able to pick up stones from any location.";

-		mes "Think about it... the ability to use a long range weapon without spending any zeny.... isn't it great?";

-		next;

-		mes "[Alcouskou]";

-		mes "If you want to learn this skill you must do a little training first.  Start by picking up ^5555FF1 Bear's Footskin^000000.";

-		mes "Then try to find ^5555FF1 Zargon^000000.  Next pick out ^5555FF5 Spawn^000000.  Once you've done all this come back and see me.";

-		next;

-		mes "[Alcouskou]";

-		mes "Collecting those items will help you develop the skills necessary to learn Find Stone.";

-		set @FINDSTONE, 1;

-		goto M_Menu;

-	M_Fling:

-		mes "[Alcouskou]";

-		if(@STONEFLING) goto L_Fling;

-		if(getskilllv(152)>0) goto L_GotFling;

-		mes "The more experienced and better skilled members of our guild are quite handy.";

-		mes "They can turn something as common as a rock on the ground into a very effective weapon.";

-		next;

-		mes "[Alcouskou]";

-		mes "They can throw a stone at a target far away with great accuracy and strength.";

-		mes "They can throw it so powerfully that sometimes an enemy will become stunned by it.";

-		next;

-		mes "[Alcouskou]";

-		mes "These guild members call this skill ^5555FFStone Fling^000000.  It is extremely useful and doesn't cost any zeny.";

-		next;

-		mes "[Alcouskou]";

-		mes "If you wish to learn Stone Fling you must first bring me ^5555FF2 Garlet and 2 Scell^000000.";

-		mes "You will also need to have mastered ^5555FFFind Stone^000000 as well.";

-		set @STONEFLING, 1;

-		goto M_Menu;

-	M_End:

-		mes "[Alcouskou]";

-		mes "It seems that you are not experienced enough yet....";

-		close;

-

-L_Sand:

-	if(countitem(7041)<5 || countitem(7042)<1) goto L_NotRdy1;

-	if(BaseJob==Job_Thief && JobLevel<25) goto L_LowLvl1;

-	delitem 7041, 5;

-	delitem 7042, 1;

-	mes "Alright, you've got all the items.  Now it's time to learn.... the... ultimate.... attack.... Sand Attack!!!";

-	next;

-	mes "[Alcouskou]";

-	mes "Look down at your feet.  See that? The very thing your stepping on is the secret behind this skill.........  SAND!!";

-	next;

-	mes "[Alcouskou]";

-	mes "Okay, grab a handful....... yep, that much will do....... now.........";

-	next;

-	mes "[Alcouskou]";

-	mes "THROW IT AT ME!!!";

-	emotion e_go;

-	next;

-	mes "[Alcouskou]";

-	mes "(AHHH!! My EYES!!! Son of a)......... ya see how effective that was........ (JEEZE that STINGS!!).......";

-	emotion e_omg;

-	next;

-	mes "[Alcouskou]";

-	mes "Anyways that's all there is too it....... (CRAP that's a lot of sand!!).... So yeah, Sand Attack, use it as a last resort...... (AWW MAN!!)";

-	next;

-	mes "[Alcouskou]";

-	mes "Oh and it does Earth Property damage....... (I gotta find a better way to teach this).........";

-	emotion e_swt;

-	skill 149,1,0;

-	set @SANDATTACK, 0;

-	close;

-

-	L_NotRdy1:

-		mes "You need ^5555FF5 Fine Grit^000000 and a ^FF3355'Leather Bag of Infinity'^000000.";

-		next;

-		mes "[Alcouskou]";

-		mes "You can find the Leather Bag of Infinity by talking to a merchant by the name of ^5533FFRuRumuni^000000.";

-		mes "He can be found in the ^009500West end of Payon^000000.";

-		close;

-	L_LowLvl1:

-		mes "You need to have a ^5555FFJob level of 25^000000 to learn Sand Attack.";

-		close;

-	L_GotSand:

-		mes "Oh you're back... hopefully not to throw any more sand in my eyes, heh heh.... heh........ heh..............";

-		emotion e_swt;

-		close;

-

-L_Back:

-	if(countitem(940)<20) goto L_NotRdy2;

-	if(BaseJob==Thief && JobLevel<35) goto L_LowLvl2;

-	delitem 940,20;

-	mes "Great, you have the grasshopper legs.  While you were collecting them I'm sure you picked up on many of the characteristics of grasshoppers.";

-	next;

-	mes "[Alcouskou]";

-	mes "You will need that knowledge because this skill is based on the movement of the grasshopper.  Like it you will become quick, agile, and have a keen eyesight.";

-	next;

-	mes "[Alcouskou]";

-	mes "Okay, lets begin........";

-	next;

-	mes "~fwoosh~";

-	next;

-	mes "~fwooooosh~";

-	next;

-	mes "~fwoooooooooooooooosh~";

-	next;

-	mes "[Alcouskou]";

-	mes "Ah! You've got it.  Just like a pro.  With this skill being overwhelmed by mobs is a thing of the past.";

-	skill 150,1,0;

-	set @BACKSLIDE, 0;

-	close;

-

-	L_NotRdy2:

-		mes "You need ^5555FF20 Grasshopper's Legs^000000.";

-		close;

-	L_LowLvl2:

-		mes "You need a ^5555FFJob level of 35^000000 to learn Back Slide.";

-		close;

-	L_GotBack:

-		mes "Seeing as you already have Back Slide..... why don't you 'Back' on outta here.....";

-		close;

-

-L_Find:

-	if(countitem(912)<1 || countitem(948)<1 || countitem(908)<5) goto L_NotRdy3;

-	delitem 912,1;

-	delitem 948,1;

-	delitem 908,5;

-	mes "Ah! I see that you're fully prepared to learn this skill.  Let us begin....";

-	next;

-	mes "[Alcouskou]";

-	mes "There are many stones on the floor here.  Pick them all up one by one and examine each one carefully.";

-	mes "Get a feel for how much each one weighs and become aware of how each one has a different texture.";

-	next;

-	mes "[Alcouskou]";

-	mes "You must become one with the stone... it is the only way you will be able to use it effectively...";

-	next;

-	mes "~ an hour later... ~";

-	next;

-	mes "[Alcouskou]";

-	mes "Very good.  You have chosen some fine stones.  This tells me that you have now perfected the Find Stone skill.";

-	emotion e_no1;

-	skill 151,1,0;

-	set @FINDSTONE, 0;

-	next;

-	mes "[Alcouskou]";

-	mes "Have fun using it.";

-	close;

-

-	L_NotRdy3:

-		mes "You need ^5555FF1 Bear's Footskin, 1 Zargon, and 5 Spawns^000000 to learn Find Stone.";

-		close;

-	L_GotFind:

-		mes "Picking up stones can be fun but...... don't spend all day doing it OK?.....";

-		close;

-

-L_Fling:

-	if(getskilllv(151) == 0) goto L_NotRdy4;

-	if((countitem(910)<2) || (countitem(911)<2)) goto L_NotRdy4;

-	delitem 910,2;

-	delitem 911,2;

-	mes "Good! You look like you're ready for me to teach you the Stone Fling skill.  Let us begin....";

-	next;

-	mes "[Alcouskou]";

-	mes "First, loosen up your arm.  Next, find a good quality stone using Find Stone.  Now close your eyes and visualize the target in your mind.";

-	next;

-	mes "[Alcouskou]";

-	mes "Now imagine yourself going straight through the target! Continue to visualize this!";

-	next;

-	mes "~ 1/2 hour later... ~";

-	next;

-	mes "[Alcouskou]";

-	mes "Think of the stone as an extension of your body.  Keep the target clear in your mind! You are one with the stone, the stone is one with you.....";

-	next;

-	mes "[Alcouskou]";

-	mes "Open your eyes! SEE THE TARGET!! Throw the stone at the target as if you were hurling yourself towards it! DO IT NOW!!";

-	emotion e_go;

-	next;

-	mes "!!Whooooossshh!!................. !!Thwack!!";

-	next;

-	mes "[Alcouskou]";

-	mes "Haha! Excellent! It's a bullseye.  You have now mastered Stone Fling, congratulations.";

-	emotion e_no1;

-	skill 152,1,0;

-	set @STONEFLING, 0;

-	next;

-	mes "[Alcouskou]";

-	mes "As you can see this is a skill that relies heavily on concentration.";

-	mes "As long as you keep your mind focused you will have on problems using this skill.";

-	close;

-

-	L_NotRdy4:

-		mes "You need ^5555FF2 Scell and 2 Garlet^000000, and the ability to use ^5555FFFind Stone^000000 to learn Stone Fling.";

-		close;

-	L_GotFling:

-		mes "So Stone Fling is coming in handy huh? Just make sure you don't hit the wrong monster";

-		close;

-}

-

-

-//====================================================================================

-payon.gat,91,77,4	script	RuRumuni	99,{

-	mes "[RuRumuni]";

-	if(@SANDATTACK && !countitem(7042)) goto L_Start;

-

-	mes "I am a humble merchant here in Payon.  I buy leather hides, brought in by the hunters, to make leather pouches to sell.";

-	mes "I grew up around leather and am quite good at working with it.";

-	next;

-	mes "[RuRumuni]";

-	mes "There is a Thief guild in the Morroc area.";

-	mes "I know someone there that sends me Thieves in need of the items I make, such as the ^5533FF'Leather Bag of Infinity'^000000.";

-	close;

-

-L_Start:

-	if(@BAGNFNTY == 1) goto L_Check;

-	mes "Hello.  So you were sent by Alcouskou to obtain a ^5533FF'Leather Bag of Infinity'^000000........";

-	mes "I will be more than happy to make one for you............";

-	next;

-	mes "[RuRumuni]";

-	mes "But this bag is very special, and I will need some special items in order to make it.";

-	next;

-	set @BAGNFNTY, 1;

-

-L_List:

-	mes "[RuRumuni]";

-	mes "Here are the items that I will need:";

-	mes "- 5 ^5533FFScorpion Tails^000000";

-	mes "- 1 ^5533FFCobweb^000000";

-	mes "- 1 ^5533FFCactus Needle^000000";

-	mes "- 1 ^5533FFEarthworm Peeling^000000.";

-	next;

-	mes "[RuRumuni]";

-	mes "Once you have all of these items I will be able to make the Bag of Infinity for you.";

-	close;

-

-L_Check:

-	mes "Nice to see you again.  Do you have all of the items? Lets see........";

-	next;

-	if(countitem(904)<5 || countitem(1025)<1 || countitem(952)<1 || countitem(1055)<1) goto L_List;

-	delitem 904, 5;

-	delitem 1025, 1;

-	delitem 952, 1;

-	delitem 1055, 1;

-	mes "[RuRumuni]";

-	mes "Great you have everything I asked for.  Let me start making the bag right away.......";

-	next;

-	mes "~( 30 minutes later )~";

-	next;

-	mes "[RuRumuni]";

-	mes "Here you go, one Leather Bag of Infinity.  Enjoy!";

-	getitem 7042, 1;

-	set @BAGNFNTY, 0;

-	close;

-}

+//===== eAthena Script ======================================= 
+//= Thief Skills Quests
+//===== By: ================================================== 
+//= kobra_k88
+//===== Current Version: ===================================== 
+//= 1.4b
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//= Sand Attack, Back Slide, Find Stone, Stone Fling skill quests.
+//===== Additional Comments: ================================= 
+//= v1.0 Fully working
+//= v1.1 Changed Sand Attack requirements from 5 Grit to 5 Fine Grit and a
+//= Leather Bag of Infinity.  These are the official RO requirements
+//= Added npc RuRumuni, maker of Leather Bag of Infinity. [kobra_k88]
+//= v1.1a Now using functions found in "Global_Functions.txt" for
+//= class checks.[kobra_k88]
+//= 1.2 Added Baby Class Support [Lupus]
+//= 1.3 Removed callfunc Is_####_Class in favor of baseClass [Silentdragon]
+//= 1.4 Fixed exploit [Lupus]
+//= 1.4a Fixed some typos [IVBela]
+//= 1.4b changed perm. variables to temp ones [Lupus]
+//============================================================ 
+
+
+
+//======================================================================================================
+moc_prydb1.gat,154,128,4	script	Alcouskou	118,{
+	mes "[Alcouskou]";
+	if(baseClass == Job_Thief) goto L_Start;
+	if(BaseJob==Job_Novice) goto L_Novice;
+
+L_Other:
+	mes "Your kind isn't welcome here.";
+	close;
+
+L_Novice:
+	mes "Although thieves and assassins have basic skills which aid them in their jobs, most don't have the 'special' skills which can make them truly great!";
+	next;
+	mes "[Alcouskou]";
+	mes "I just happen to be the ONLY one who can teach them these skills!";
+	mes "If you ever decide to become a Thief or an Assassin, come back here and I'll teach you these cool skills.";
+	next;
+	mes "[Alcouskou]";
+	mes "And if you know anyone who already is one, send them to me.  I'm willing to teach anyone who's interested.";
+	close;
+
+L_Start:
+	mes "During the course of your life you will experience many things.";
+	mes "You many have trouble understanding the importance of some of these experiences, and may even consider them to be useless to you.";
+	next;
+	mes "[Alcouskou]";
+	mes "But do not be to hasty with your judgement of them, for some of these experience may actually prove to be beneficial for you.";
+	next;
+	mes "[Alcouskou]";
+	mes "Let me explain:";
+M_Menu:
+	next;
+	menu "-Sand Attack",M_Sand, "-Back Slide",M_Back, "-Find Stone",M_Find, "-Stone Fling",M_Fling, "-I will be back later.",M_End;
+
+	M_Sand:
+		mes "[Alcouskou]";
+		if(@SANDATTACK) goto L_Sand;
+		if(getskilllv(149) > 0) goto L_GotSand;
+		mes "The most important aspect of being a good Thief/Assassin is stealth.  One should never be seen or touched unless he/she wants to be";
+		next;
+		mes "[Alcouskou]";
+		mes "Some may consider this cowardly but I don't see it that way.";
+		mes "We live in a world where it is the survival of the fittest and you must do whatever it takes to survive.....";
+		next;
+		mes "[Alcouskou]";
+		mes "Even if this means throwing sand in an enemy's face.  That is why the skill, ^5555FFSand Attack^000000, was created.";
+		next;
+		mes "[Alcouskou]";
+		mes "This skill allows the user to throw and kick sand in the eyes of an opponent, temporarily blinding them.";
+		mes "This effectively impairs the opponent's ability to defend or attack giving the user a brief but great advantage.";
+		next;
+		mes "[Alcouskou]";
+		mes "In order to learn this skill you will need to gather ^5555FF5 Fine Grit^000000 and a ^FF3355'Leather Bag of Infinity'^000000.";
+		if(BaseJob == Job_Thief) mes "You will also need a job level of at least ^5555FF25^000000.";
+		next;
+		mes "[Alcouskou]";
+		mes "You can find the Leather Bag of Infinity by talking to a merchant by the name of ^5533FFRuRumuni^000000.";
+		mes "He can be found in the ^009500West end of Payon^000000.";
+		next;
+		mes "[Alcouskou]";
+		mes "Come back when you are ready.";
+		set @SANDATTACK, 1;
+		goto M_Menu;
+	M_Back:
+		mes "[Alcouskou]";
+		if(@BACKSLIDE)goto L_Back;
+		if(getskilllv(150)>0) goto L_GotBack;
+		mes "People tend to focus on attack and damage, but it's necessary to understand that FLEEING is JUST AS IMPORTANT as attacking!";
+		next;
+		mes "[Alcouskou]";
+		mes "We thieves/assassins pride ourselves on our speed and ability to quickly dodge.";
+		mes "Of course I'm sure you've noticed that there is a downside to that speed and quickness.....";
+		next;
+		mes "[Alcouskou]";
+		mes "If we DO get hit, depending on the monster, that single hit could put us in serious danger!";
+		next;
+		mes "[Alcouskou]";
+		mes "I can understand how funny it is to watch a monster constantly miss while its attacking you, but......";
+		next;
+		mes "[Alcouskou]";
+		mes "If you get attacked by a large group of monsters..... you may not even have room to dodge and that won't be at all funny.";
+		next;
+		mes "[Alcouskou]";
+		mes "That's why most Thieves/Assassins fear large mobs and will flee at the first sign of them.";
+		mes "There are those however, that do not fear being overwhelmed by a large mob.";
+		next;
+		mes "[Alcouskou]";
+		mes "These are the people who have learned a unique skill that allows them to deal with mob situations.";
+		mes "The skill enables the user to quickly 'back' out of the way of a mob, putting a great deal of distance between the two.";
+		next;
+		mes "[Alcouskou]";
+		mes "The skill is called ^5555FFBack Slide^000000 and requires a lot of practice to master.";
+		mes "If you wish to learn this skill you will first need to bring in ^5555FF20 Grasshopper's Legs^000000.";
+		next;
+		mes "[Alcouskou]";
+		mes "Think of it as the first part of your training.";
+		if(BaseJob == Job_Thief) mes "If you are a Thief, you will also need to have a job level of at least ^5555FF35^000000.";
+		set @BACKSLIDE, 1;
+		goto M_Menu;
+	M_Find:
+		mes "[Alcouskou]";
+		if(@FINDSTONE) goto L_Find;
+		if(getskilllv(151)>0) goto L_GotFind;
+		mes "The more experienced and better skilled members of our guild are quite handy.";
+		mes "They can turn something as common as a rock on the ground into a very effective weapon.";
+		next;
+		mes "[Alcouskou]";
+		mes "They can throw a rock at a far away target with great accuracy and strength.";
+		mes "They can throw it so powerfully that sometimes an enemy will become stunned by it.";
+		next;
+		mes "[Alcouskou]";
+		mes "Of course not every stone can be used as a weapon.  That is why the skill, ^5555FFFind Sone^000000, was developed.";
+		mes "With practice one can learn to pick out a stone that has a weight and shape that is fit for 'flinging'.";
+		next;
+		mes "[Alcouskou]";
+		mes "Once mastered a Thieve/Assassin will be able to pick up stones from any location.";
+		mes "Think about it... the ability to use a long range weapon without spending any zeny.... isn't it great?";
+		next;
+		mes "[Alcouskou]";
+		mes "If you want to learn this skill you must do a little training first.  Start by picking up ^5555FF1 Bear's Footskin^000000.";
+		mes "Then try to find ^5555FF1 Zargon^000000.  Next pick out ^5555FF5 Spawn^000000.  Once you've done all this come back and see me.";
+		next;
+		mes "[Alcouskou]";
+		mes "Collecting those items will help you develop the skills necessary to learn Find Stone.";
+		set @FINDSTONE, 1;
+		goto M_Menu;
+	M_Fling:
+		mes "[Alcouskou]";
+		if(@STONEFLING) goto L_Fling;
+		if(getskilllv(152)>0) goto L_GotFling;
+		mes "The more experienced and better skilled members of our guild are quite handy.";
+		mes "They can turn something as common as a rock on the ground into a very effective weapon.";
+		next;
+		mes "[Alcouskou]";
+		mes "They can throw a stone at a target far away with great accuracy and strength.";
+		mes "They can throw it so powerfully that sometimes an enemy will become stunned by it.";
+		next;
+		mes "[Alcouskou]";
+		mes "These guild members call this skill ^5555FFStone Fling^000000.  It is extremely useful and doesn't cost any zeny.";
+		next;
+		mes "[Alcouskou]";
+		mes "If you wish to learn Stone Fling you must first bring me ^5555FF2 Garlet and 2 Scell^000000.";
+		mes "You will also need to have mastered ^5555FFFind Stone^000000 as well.";
+		set @STONEFLING, 1;
+		goto M_Menu;
+	M_End:
+		mes "[Alcouskou]";
+		mes "It seems that you are not experienced enough yet....";
+		close;
+
+L_Sand:
+	if(countitem(7041)<5 || countitem(7042)<1) goto L_NotRdy1;
+	if(BaseJob==Job_Thief && JobLevel<25) goto L_LowLvl1;
+	delitem 7041, 5;
+	delitem 7042, 1;
+	mes "Alright, you've got all the items.  Now it's time to learn.... the... ultimate.... attack.... Sand Attack!!!";
+	next;
+	mes "[Alcouskou]";
+	mes "Look down at your feet.  See that? The very thing your stepping on is the secret behind this skill.........  SAND!!";
+	next;
+	mes "[Alcouskou]";
+	mes "Okay, grab a handful....... yep, that much will do....... now.........";
+	next;
+	mes "[Alcouskou]";
+	mes "THROW IT AT ME!!!";
+	emotion e_go;
+	next;
+	mes "[Alcouskou]";
+	mes "(AHHH!! My EYES!!! Son of a)......... ya see how effective that was........ (JEEZE that STINGS!!).......";
+	emotion e_omg;
+	next;
+	mes "[Alcouskou]";
+	mes "Anyways that's all there is too it....... (CRAP that's a lot of sand!!).... So yeah, Sand Attack, use it as a last resort...... (AWW MAN!!)";
+	next;
+	mes "[Alcouskou]";
+	mes "Oh and it does Earth Property damage....... (I gotta find a better way to teach this).........";
+	emotion e_swt;
+	skill 149,1,0;
+	set @SANDATTACK, 0;
+	close;
+
+	L_NotRdy1:
+		mes "You need ^5555FF5 Fine Grit^000000 and a ^FF3355'Leather Bag of Infinity'^000000.";
+		next;
+		mes "[Alcouskou]";
+		mes "You can find the Leather Bag of Infinity by talking to a merchant by the name of ^5533FFRuRumuni^000000.";
+		mes "He can be found in the ^009500West end of Payon^000000.";
+		close;
+	L_LowLvl1:
+		mes "You need to have a ^5555FFJob level of 25^000000 to learn Sand Attack.";
+		close;
+	L_GotSand:
+		mes "Oh you're back... hopefully not to throw any more sand in my eyes, heh heh.... heh........ heh..............";
+		emotion e_swt;
+		close;
+
+L_Back:
+	if(countitem(940)<20) goto L_NotRdy2;
+	if(BaseJob==Thief && JobLevel<35) goto L_LowLvl2;
+	delitem 940,20;
+	mes "Great, you have the grasshopper legs.  While you were collecting them I'm sure you picked up on many of the characteristics of grasshoppers.";
+	next;
+	mes "[Alcouskou]";
+	mes "You will need that knowledge because this skill is based on the movement of the grasshopper.  Like it you will become quick, agile, and have a keen eyesight.";
+	next;
+	mes "[Alcouskou]";
+	mes "Okay, lets begin........";
+	next;
+	mes "~fwoosh~";
+	next;
+	mes "~fwooooosh~";
+	next;
+	mes "~fwoooooooooooooooosh~";
+	next;
+	mes "[Alcouskou]";
+	mes "Ah! You've got it.  Just like a pro.  With this skill being overwhelmed by mobs is a thing of the past.";
+	skill 150,1,0;
+	set @BACKSLIDE, 0;
+	close;
+
+	L_NotRdy2:
+		mes "You need ^5555FF20 Grasshopper's Legs^000000.";
+		close;
+	L_LowLvl2:
+		mes "You need a ^5555FFJob level of 35^000000 to learn Back Slide.";
+		close;
+	L_GotBack:
+		mes "Seeing as you already have Back Slide..... why don't you 'Back' on outta here.....";
+		close;
+
+L_Find:
+	if(countitem(912)<1 || countitem(948)<1 || countitem(908)<5) goto L_NotRdy3;
+	delitem 912,1;
+	delitem 948,1;
+	delitem 908,5;
+	mes "Ah! I see that you're fully prepared to learn this skill.  Let us begin....";
+	next;
+	mes "[Alcouskou]";
+	mes "There are many stones on the floor here.  Pick them all up one by one and examine each one carefully.";
+	mes "Get a feel for how much each one weighs and become aware of how each one has a different texture.";
+	next;
+	mes "[Alcouskou]";
+	mes "You must become one with the stone... it is the only way you will be able to use it effectively...";
+	next;
+	mes "~ an hour later... ~";
+	next;
+	mes "[Alcouskou]";
+	mes "Very good.  You have chosen some fine stones.  This tells me that you have now perfected the Find Stone skill.";
+	emotion e_no1;
+	skill 151,1,0;
+	set @FINDSTONE, 0;
+	next;
+	mes "[Alcouskou]";
+	mes "Have fun using it.";
+	close;
+
+	L_NotRdy3:
+		mes "You need ^5555FF1 Bear's Footskin, 1 Zargon, and 5 Spawns^000000 to learn Find Stone.";
+		close;
+	L_GotFind:
+		mes "Picking up stones can be fun but...... don't spend all day doing it OK?.....";
+		close;
+
+L_Fling:
+	if(getskilllv(151) == 0) goto L_NotRdy4;
+	if((countitem(910)<2) || (countitem(911)<2)) goto L_NotRdy4;
+	delitem 910,2;
+	delitem 911,2;
+	mes "Good! You look like you're ready for me to teach you the Stone Fling skill.  Let us begin....";
+	next;
+	mes "[Alcouskou]";
+	mes "First, loosen up your arm.  Next, find a good quality stone using Find Stone.  Now close your eyes and visualize the target in your mind.";
+	next;
+	mes "[Alcouskou]";
+	mes "Now imagine yourself going straight through the target! Continue to visualize this!";
+	next;
+	mes "~ 1/2 hour later... ~";
+	next;
+	mes "[Alcouskou]";
+	mes "Think of the stone as an extension of your body.  Keep the target clear in your mind! You are one with the stone, the stone is one with you.....";
+	next;
+	mes "[Alcouskou]";
+	mes "Open your eyes! SEE THE TARGET!! Throw the stone at the target as if you were hurling yourself towards it! DO IT NOW!!";
+	emotion e_go;
+	next;
+	mes "!!Whooooossshh!!................. !!Thwack!!";
+	next;
+	mes "[Alcouskou]";
+	mes "Haha! Excellent! It's a bullseye.  You have now mastered Stone Fling, congratulations.";
+	emotion e_no1;
+	skill 152,1,0;
+	set @STONEFLING, 0;
+	next;
+	mes "[Alcouskou]";
+	mes "As you can see this is a skill that relies heavily on concentration.";
+	mes "As long as you keep your mind focused you will have on problems using this skill.";
+	close;
+
+	L_NotRdy4:
+		mes "You need ^5555FF2 Scell and 2 Garlet^000000, and the ability to use ^5555FFFind Stone^000000 to learn Stone Fling.";
+		close;
+	L_GotFling:
+		mes "So Stone Fling is coming in handy huh? Just make sure you don't hit the wrong monster";
+		close;
+}
+
+
+//====================================================================================
+payon.gat,91,77,4	script	RuRumuni	99,{
+	mes "[RuRumuni]";
+	if(@SANDATTACK && !countitem(7042)) goto L_Start;
+
+	mes "I am a humble merchant here in Payon.  I buy leather hides, brought in by the hunters, to make leather pouches to sell.";
+	mes "I grew up around leather and am quite good at working with it.";
+	next;
+	mes "[RuRumuni]";
+	mes "There is a Thief guild in the Morroc area.";
+	mes "I know someone there that sends me Thieves in need of the items I make, such as the ^5533FF'Leather Bag of Infinity'^000000.";
+	close;
+
+L_Start:
+	if(@BAGNFNTY == 1) goto L_Check;
+	mes "Hello.  So you were sent by Alcouskou to obtain a ^5533FF'Leather Bag of Infinity'^000000........";
+	mes "I will be more than happy to make one for you............";
+	next;
+	mes "[RuRumuni]";
+	mes "But this bag is very special, and I will need some special items in order to make it.";
+	next;
+	set @BAGNFNTY, 1;
+
+L_List:
+	mes "[RuRumuni]";
+	mes "Here are the items that I will need:";
+	mes "- 5 ^5533FFScorpion Tails^000000";
+	mes "- 1 ^5533FFCobweb^000000";
+	mes "- 1 ^5533FFCactus Needle^000000";
+	mes "- 1 ^5533FFEarthworm Peeling^000000.";
+	next;
+	mes "[RuRumuni]";
+	mes "Once you have all of these items I will be able to make the Bag of Infinity for you.";
+	close;
+
+L_Check:
+	mes "Nice to see you again.  Do you have all of the items? Lets see........";
+	next;
+	if(countitem(904)<5 || countitem(1025)<1 || countitem(952)<1 || countitem(1055)<1) goto L_List;
+	delitem 904, 5;
+	delitem 1025, 1;
+	delitem 952, 1;
+	delitem 1055, 1;
+	mes "[RuRumuni]";
+	mes "Great you have everything I asked for.  Let me start making the bag right away.......";
+	next;
+	mes "~( 30 minutes later )~";
+	next;
+	mes "[RuRumuni]";
+	mes "Here you go, one Leather Bag of Infinity.  Enjoy!";
+	getitem 7042, 1;
+	set @BAGNFNTY, 0;
+	close;
+}
diff --git a/npc/quests/skills/wizard_skills.txt b/npc/quests/skills/wizard_skills.txt
index 6d4b56d6d..af5669125 100644
--- a/npc/quests/skills/wizard_skills.txt
+++ b/npc/quests/skills/wizard_skills.txt
@@ -1,184 +1,184 @@
-//===== eAthena Script ======================================= 

-//= Wizard Skills Quests

-//===== By: ================================================== 

-//= Lupus, Reddozen

-//===== Current Version: ===================================== 

-//= 1.3c

-//===== Compatible With: ===================================== 

-//= eAthena Revision 3800+

-//===== Description: ========================================= 

-//= Temp quests for new skills for 2nd classes

-//===== Additional Comments: ================================= 

-//= 1.0 for fully working skills only [Lupus]

-//= 1.1 Added more new skill quests for more classes [Lupus]

-//= Somehow eA engine doesn't let you keep learn't skill V_V'

-//= 1.2 Added to correct locations, correct NPC's, fixed

-//= some of the items required and made them into real

-//= quests. [Reddozen] 

-//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]

-//= 1.3a fixed an item ID typo, thx 2Spiritual Kid

-//= 1.3b Splitted into different files [DracoRPG]

-//= 1.3c Removed duplicates [Toms]

-//============================================================

-

-

-//============================================================

-// WIZARD - SIGHTBLASTER

-//============================================================

-gef_tower.gat,116,37,1	script	Enoz#2	748,{

-	if(HELLIONQ == 22)goto L_remember;

-	if(HELLIONQ == 21)goto L_joke;

-	if(HELLIONQ == 20)goto L_take;

-	if(BaseJob!=Job_Wizard) goto L_nowiz;

-	if(getskilllv(1006)) goto L_alreadyhave;

-

-	mes "[Enoz]";

-	mes "I'll teach you all I know for:";

-	mes "10 Crystal Blue";

-	mes "10 Green Live";

-	mes "10 Red Blood";

-	mes "10 Wind of Verdure";

-	next;

-	

-	mes "[Enoz]";

-	mes "Let me check your items.";

-	next;

-	

-	if(countitem(990)<10 || countitem(991)<10 || countitem(992)<10 || countitem(993)<10) goto L_noitems;//Items: Red_Blood, Crystal_Blue, Wind_of_Verdure, Green_Live,

-	delitem 990, 10;//Items: Red_Blood,

-	delitem 991, 10;//Items: Crystal_Blue,

-	delitem 992, 10;//Items: Wind_of_Verdure,

-	delitem 993, 10;//Items: Green_Live,

-	

-	mes "[Enoz]";

-	mes "I see you have what you need,";

-	mes "so I'll teach you my talent.";

-	skill 1006,1,0;

-	close;

-

-L_take:

-	mes "[Enoz]";

-	mes "It's gone, it's gone!";

-	mes "Where the hell did it go?!";

-	mes "Oh man, who could have";

-	mes "taken it? Wait, was it... You?!";

-	next;

-	menu "Actually, Welshyun sent me.",L_sent,"No way man, don't go nuts.",-;

-

-	mes "[Enoz]";

-	mes "Nuts?! Oh, you wanna";

-	mes "see crazy, is that it?! You";

-	mes "wanna see insaaaane?!";

-	mes "Cuz I'll go freakin' medieval";

-	mes "if you keep bothering me!!";

-	close;

-

-L_sent:

-	mes "[Enoz]";

-	mes "My mentor, Welshyun?";

-	mes "Huh. Is there a report";

-	mes "I haven't submitted to him";

-	mes "yet? So what was it called?";

-	next;

-	input @tempstr$;

-	if(@tempstr$ != "Monster Life in the Geffen Area")goto L_wrongstr;

-

-	mes "[Enoz]";

-	mes "\"Monster Life in";

-	mes "the Geffen Area\"?";

-	mes "Oh no. My mentor took";

-	mes "that three days ago!";

-	mes "Is he still up to his";

-	mes "old tricks again?";

-	next;

-	mes "[Enoz]";

-	mes "Awww nuts!";

-	mes "Where the heck is";

-	mes "my Master Science";

-	mes "Reference Book?";

-	mes "It was right here";

-	mes "three days ago...";

-	set HELLIONQ,21;

-	close;

-

-L_joke:

-	mes "[Enoz]";

-	mes "My mentor Welshyun's";

-	mes "been playing jokes again,";

-	mes "so you better go talk to him.";

-	mes "Damn. Where is that Master";

-	mes "Science Reference Book?";

-	close;

-

-L_wrongstr:

-	mes "[Enoz]";

-	mes @tempstr$ + "?";

-	mes "I haven't completed";

-	mes "any research related";

-	mes "to that subject. Or did I?";

-	mes "Anyway, I need the exact";

-	mes "name of the report you want!";

-	close;

-

-L_remember:

-	mes "[Enoz]";

-	mes "Oh hey, I remember you~";

-	mes "So did my mentor send you";

-	mes "to me again for some reason?";

-	next;

-	mes "^3151FFYou cautiously hand Enoz the";

-	mes "Master Science Reference Book.";

-	next;

-	mes "[Enoz]";

-	mes "Yes! Oh yes!";

-	mes "This is the book";

-	mes "I lost three days";

-	mes "ago! Thanks so much!";

-	mes "Now I can finally finish";

-	mes "this research project that--";

-	next;

-	mes "[Enoz]";

-	mes "Wait, the page I really";

-	mes "need is missing! And there's";

-	mes "some sort of note... Umm...";

-	mes "^111111\"Enoz I think this page";

-	mes "is worth at least one Apple";

-	mes "Juice. Right? --Welshyun\"^000000.";

-	next;

-	mes "[Enoz]";

-	mes "NOooOOoOo!";

-	mes "Not agaaaaain!";

-	mes "WHy is he always";

-	mes "playing these pranks?!";

-	mes "Apple Juice! I need";

-	mes "some Apple Juice!";

-	next;

-	mes "^3151FFIt looks like it's time";

-	mes "to get 1 Blue Gemstone,";

-	mes "and then bring it back";

-	mes "to Welshyun the Sage.";

-	set HELLIONQ,23;

-	close;

-	

-L_noitems:

-	mes "[Enoz]";

-	mes "You don't have enough items.";

-	mes "Come back when you have all";

-	mes "the required items for me.";

-	close;

-	

-L_nowiz:

-	mes "[Enoz]";

-	mes "Gone! It's gone!";

-	mes "Where did the book";

-	mes "I really need go to?";

-	mes "Oh no oh no oh no oh no!";

-	mes "Waaaaah, I'm gonna cry!";

-	close;

-

-L_alreadyhave:

-	mes "[Enoz]";

-	mes "I've already taught you";

-	mes "everything I know...";

-	close;

-}

+//===== eAthena Script ======================================= 
+//= Wizard Skills Quests
+//===== By: ================================================== 
+//= Lupus, Reddozen
+//===== Current Version: ===================================== 
+//= 1.3c
+//===== Compatible With: ===================================== 
+//= eAthena Revision 3800+
+//===== Description: ========================================= 
+//= Temp quests for new skills for 2nd classes
+//===== Additional Comments: ================================= 
+//= 1.0 for fully working skills only [Lupus]
+//= 1.1 Added more new skill quests for more classes [Lupus]
+//= Somehow eA engine doesn't let you keep learn't skill V_V'
+//= 1.2 Added to correct locations, correct NPC's, fixed
+//= some of the items required and made them into real
+//= quests. [Reddozen] 
+//= 1.3 Fixed bugs and minor typos. Optimized [Lupus]
+//= 1.3a fixed an item ID typo, thx 2Spiritual Kid
+//= 1.3b Splitted into different files [DracoRPG]
+//= 1.3c Removed duplicates [Toms]
+//============================================================
+
+
+//============================================================
+// WIZARD - SIGHTBLASTER
+//============================================================
+gef_tower.gat,116,37,1	script	Enoz#2	748,{
+	if(HELLIONQ == 22)goto L_remember;
+	if(HELLIONQ == 21)goto L_joke;
+	if(HELLIONQ == 20)goto L_take;
+	if(BaseJob!=Job_Wizard) goto L_nowiz;
+	if(getskilllv(1006)) goto L_alreadyhave;
+
+	mes "[Enoz]";
+	mes "I'll teach you all I know for:";
+	mes "10 Crystal Blue";
+	mes "10 Green Live";
+	mes "10 Red Blood";
+	mes "10 Wind of Verdure";
+	next;
+	
+	mes "[Enoz]";
+	mes "Let me check your items.";
+	next;
+	
+	if(countitem(990)<10 || countitem(991)<10 || countitem(992)<10 || countitem(993)<10) goto L_noitems;//Items: Red_Blood, Crystal_Blue, Wind_of_Verdure, Green_Live,
+	delitem 990, 10;//Items: Red_Blood,
+	delitem 991, 10;//Items: Crystal_Blue,
+	delitem 992, 10;//Items: Wind_of_Verdure,
+	delitem 993, 10;//Items: Green_Live,
+	
+	mes "[Enoz]";
+	mes "I see you have what you need,";
+	mes "so I'll teach you my talent.";
+	skill 1006,1,0;
+	close;
+
+L_take:
+	mes "[Enoz]";
+	mes "It's gone, it's gone!";
+	mes "Where the hell did it go?!";
+	mes "Oh man, who could have";
+	mes "taken it? Wait, was it... You?!";
+	next;
+	menu "Actually, Welshyun sent me.",L_sent,"No way man, don't go nuts.",-;
+
+	mes "[Enoz]";
+	mes "Nuts?! Oh, you wanna";
+	mes "see crazy, is that it?! You";
+	mes "wanna see insaaaane?!";
+	mes "Cuz I'll go freakin' medieval";
+	mes "if you keep bothering me!!";
+	close;
+
+L_sent:
+	mes "[Enoz]";
+	mes "My mentor, Welshyun?";
+	mes "Huh. Is there a report";
+	mes "I haven't submitted to him";
+	mes "yet? So what was it called?";
+	next;
+	input @tempstr$;
+	if(@tempstr$ != "Monster Life in the Geffen Area")goto L_wrongstr;
+
+	mes "[Enoz]";
+	mes "\"Monster Life in";
+	mes "the Geffen Area\"?";
+	mes "Oh no. My mentor took";
+	mes "that three days ago!";
+	mes "Is he still up to his";
+	mes "old tricks again?";
+	next;
+	mes "[Enoz]";
+	mes "Awww nuts!";
+	mes "Where the heck is";
+	mes "my Master Science";
+	mes "Reference Book?";
+	mes "It was right here";
+	mes "three days ago...";
+	set HELLIONQ,21;
+	close;
+
+L_joke:
+	mes "[Enoz]";
+	mes "My mentor Welshyun's";
+	mes "been playing jokes again,";
+	mes "so you better go talk to him.";
+	mes "Damn. Where is that Master";
+	mes "Science Reference Book?";
+	close;
+
+L_wrongstr:
+	mes "[Enoz]";
+	mes @tempstr$ + "?";
+	mes "I haven't completed";
+	mes "any research related";
+	mes "to that subject. Or did I?";
+	mes "Anyway, I need the exact";
+	mes "name of the report you want!";
+	close;
+
+L_remember:
+	mes "[Enoz]";
+	mes "Oh hey, I remember you~";
+	mes "So did my mentor send you";
+	mes "to me again for some reason?";
+	next;
+	mes "^3151FFYou cautiously hand Enoz the";
+	mes "Master Science Reference Book.";
+	next;
+	mes "[Enoz]";
+	mes "Yes! Oh yes!";
+	mes "This is the book";
+	mes "I lost three days";
+	mes "ago! Thanks so much!";
+	mes "Now I can finally finish";
+	mes "this research project that--";
+	next;
+	mes "[Enoz]";
+	mes "Wait, the page I really";
+	mes "need is missing! And there's";
+	mes "some sort of note... Umm...";
+	mes "^111111\"Enoz I think this page";
+	mes "is worth at least one Apple";
+	mes "Juice. Right? --Welshyun\"^000000.";
+	next;
+	mes "[Enoz]";
+	mes "NOooOOoOo!";
+	mes "Not agaaaaain!";
+	mes "WHy is he always";
+	mes "playing these pranks?!";
+	mes "Apple Juice! I need";
+	mes "some Apple Juice!";
+	next;
+	mes "^3151FFIt looks like it's time";
+	mes "to get 1 Blue Gemstone,";
+	mes "and then bring it back";
+	mes "to Welshyun the Sage.";
+	set HELLIONQ,23;
+	close;
+	
+L_noitems:
+	mes "[Enoz]";
+	mes "You don't have enough items.";
+	mes "Come back when you have all";
+	mes "the required items for me.";
+	close;
+	
+L_nowiz:
+	mes "[Enoz]";
+	mes "Gone! It's gone!";
+	mes "Where did the book";
+	mes "I really need go to?";
+	mes "Oh no oh no oh no oh no!";
+	mes "Waaaaah, I'm gonna cry!";
+	close;
+
+L_alreadyhave:
+	mes "[Enoz]";
+	mes "I've already taught you";
+	mes "everything I know...";
+	close;
+}
diff --git a/npc/quests/thana_quest.txt b/npc/quests/thana_quest.txt
index 5a6e455a6..d9f28ff17 100644
--- a/npc/quests/thana_quest.txt
+++ b/npc/quests/thana_quest.txt
@@ -1,1633 +1,1633 @@
-//===== eAthena Script =======================================

-//= Thanatos Tower Quest

-//===== By: ==================================================

-//= [Ishizu-chan]

-//===== Current Version: =====================================

-//= 1.0 Beta

-//===== Compatible With: =====================================

-//= Any eAthena Version i guess?

-//===== Description: =========================================

-//= It's the Thanatos Tower Quest...

-//===== Additional Comments: =================================

-//= 1.0 - First Release [Ishizu-chan]

-//============================================================

-

-

-// Tour Guide - 1st Floor

-tha_t01.gat,149,78,3	script	Tour Guide#1	90,{

-

-  if (ThanaQuest & 1) {

-

-    mes "[Tour Guide]";

-    mes "Hello my friend.";

-    mes "How are you? Do you enjoy working for the Rekkenber Corporation?";

-    close;

-

-  }

-

-  mes "[Tour Guide]";

-  mes "Hello there.";

-  mes "So you came all the way to investigate the ^777777Thanatos Tower^000000, huh?";

-  next;

-

-  mes "[Tour Guide]";

-  mes "I'm with the Rekkenber Corporation.";

-  mes "We are still searching brave people, who would like to work for us and discover the deeper levels of the ^777777Thanatos Tower^000000.";

-  next;

-

-  mes "[Tour Guide]";

-  mes "Are you by chance interested to volunteer to the ^777777Thanatos Tower Task Force^000000?";

-  next;

-  menu "No thanks.",L_End,

-       "Yes, sign me up!",-;

-

-  mes "[Tour Guide]";

-  mes "Please sign your name here...";

-  next;

-

-  set ThanaQuest, ThanaQuest | 1;

-

-  mes "[Tour Guide]";

-  mes "Ok, ^000077"+strcharinfo(0)+"^000000, isn't it?";

-  mes "Welcome to the ^777777Thanatos Tower Task Force^000000!";

-  next;

-

-  mes "[Tour Guide]";

-  mes "Please be carefull when investigating the deeper levels of the ^777777Thanatos Tower^000000.";

-  mes "The deeper you get, the less is known about it's dangers...";

-  close;

-

-  L_End:

-  mes "[Tour Guide]";

-  mes "Ok, but it was worth a try, wasn't it.";

-  mes "Come back when you're interested.";

-  close;

-

-}

-

-

-// Tour Guide - 2nd Floor

-tha_t02.gat,231,161,5	script	Tour Guide#2	874,{

-

-  if (ThanaQuest < 1) {

-

-    mes "[Tour Guide]";

-    mes "Hello there.";

-    mes "Nice day, isn't it?";

-    next;

-

-    mes "[Tour Guide]";

-    mes "If you want to visit the higher levels, you'll need to volunteer to the ^777777Thanatos Tower Task Force^000000.";

-    next;

-

-    mes "[Tour Guide]";

-    mes "You can do so by speaking with the nice woman at the counter, near the entrance.";

-    mes "See you later~";

-    close;

-

-  }

-

-  mes "[Tour Guide]";

-  mes "Hello my friend.";

-  mes "Oh, you're one of the new volunteers from the ^777777Thanatos Tower Task Force^000000.";

-  next;

-

-  mes "[Tour Guide]";

-  mes "If you wish to enter the next level, you'll need to form a party.";

-  mes "Please gather at least 5 of your Friends around me, so that I can warp you towards the next level.";

-  next;

-

-  mes "[Tour Guide]";

-  mes "I will warp your whole party, so tell your comrades to stand by.";

-  mes "Shall I warp you now?";

-  next;

-  menu "No, I need some time...",L_End,

-       "Yes, please warp us!",-;

-  

-  set @partyid, getcharid(1);

-

-  if (@partyid == 0) goto L_NoParty;

-

-  getpartymember(@partyid);

-  set @partymembercount,$@partymembercount;

-  copyarray @partymembername$[0],$@partymembername$[0],@partymembercount;

-

-  if (@partymembercount < 6) goto L_NotEnough;

-

-  for(set @i, 0; @i < @partymembercount; set @i, @i + 1) {

-    if (getmapxy(@mapname$,@mapx,@mapy,0,@partymembername$[@i]) != 0) goto L_Offline;

-    if (@mapname$ != "tha_t02.gat" || @mapx < 223 || @mapx > 239 || @mapy < 153 || @mapy > 169) goto L_Away;

-  }

-

-  warpparty "tha_t03.gat",220,165,@partyid;

-  end;

-

-  L_NoParty:

-  mes "[Tour Guide]";

-  mes "Erm, you need to form a party first.";

-  close;

-

-  L_NotEnough:

-  mes "[Tour Guide]";

-  mes "You'll need to bring at least 5 friends, if you want to enter the next level.";

-  close;

-

-  L_Offline:

-  mes "[Tour Guide]";

-  mes "Hmm, it seems some of your friends aren't online.";

-  close;

-

-  L_Away:

-  mes "[Tour Guide]";

-  mes "I can't find some of your friends.";

-  mes "Please tell them to come close to me, so I can see them.";

-  close;

-

-  L_End:

-  mes "[Tour Guide]";

-  mes "Ok, come back whenever you're ready to go.";

-  close;

-

-}

-

-

-// Mechanical Device - Red Key

-tha_t03.gat,67,70,0	script	Mechanical Device#1	111,{

-

-  if (ThanaQuest & 2) {

-

-    mes "[Mechanical Device]";

-    mes "This is where you found the";

-    mes "^EF797BRed Key^000000.";

-    close;

-

-  }

-

-  mes "[Mechanical Device]";

-  mes "There's a strange mechanical device here.";

-  next;

-  menu "Investigate the device.",-,

-       "Leave it alone.",L_End;

-

-  mes "[Mechanical Device]";

-  mes "...";

-  next;

-

-  mes "[Mechanical Device]";

-  mes "It seems there is something inside, but the device is protected by a mysterious strong power.";

-  next;

-  menu "Try to get whats inside.",L_Denied,

-       "Get rid of the strong power",-,

-       "Leave it alone.",L_End;

-

-  if (getequipweaponlv(4) < 4) goto L_NoWeapon;

-

-  mes "[Mechanical Device]";

-  mes "As you point your weapon towards the device, the magic power seems to fade.";

-  mes "You now can get inside the device.";

-  next;

-

-  set ThanaQuest, ThanaQuest | 2;

-  getitem 7421,1;  // Red Key

-

-  mes "[Mechanical Device]";

-  mes "You found the ^EF797BRed Key^000000.";

-  close;

-

-  L_Denied:

-  mes "[Mechanical Device]";

-  mes "You were pushed away as you tried to get inside.";

-  mes "It seems the device is protected by a strong magical force.";

-  close;

-

-  L_NoWeapon:

-  mes "[Mechanical Device]";

-  mes "You tried to get rid of the mysterious power, but your weapon doesn't seem to be strong enough...";

-  close;

-

-  L_End:

-  mes "[Mechanical Device]";

-  mes "You left the mechanical device alone.";

-  close;

-

-}

-

-

-// Mechanical Device - Yellow Key

-tha_t04.gat,195,195,0	script	Mechanical Device#2	111,{

-

-  if (ThanaQuest & 4) {

-

-    mes "[Mechanical Device]";

-    mes "This is where you found the";

-    mes "^DE9673Yellow Key^000000.";

-    close;

-

-  }

-

-  mes "[Mechanical Device]";

-  mes "There's a strange mechanical device here.";

-  next;

-  menu "Investigate the device.",-,

-       "Leave it alone.",L_End;

-

-  mes "[Mechanical Device]";

-  mes "The device started to make a certain noise since you approached to it.";

-  mes "Theres a terminal in front of it, where you could enter a number with 3 digits.";

-  next;

-

-  mes "[Mechanical Device]";

-  mes "The noise sounds very strange, and it seems as if the device doesn't work the way it should.";

-  next;

-  menu "Use the terminal",-,

-       "Leave it alone.",L_End;

-

-  set @number, rand(100,999);

-  set @count, 0;

-

-  L_Input:

-  set @count, @count + 1;

-  if (@count > 10) goto L_Broken;

-

-  input @input;

-

-  if (@input < 100 || @input > 999) goto L_Wrong;

-

-  if (@input > @number) goto L_TooBig;

-  if (@input < @number) goto L_TooSmall;

-

-  mes "[Mechanical Device]";

-  mes "As you use the terminal to adjust the number on it, the strange noise changed into a pleasant working sound, and a small box near the terminal opened.";

-  mes "There's something in that box.";

-  next;

-

-  set ThanaQuest, ThanaQuest | 4;

-  getitem 7422,1;  // Yellow Key

-

-  mes "[Mechanical Device]";

-  mes "You found the ^DE9673Yellow Key^000000.";

-  close;

-

-  L_TooBig:

-  mes "[Mechanical Device]";

-  mes "As you use the terminal to adjust the number on it, the strange noise changed.";

-  mes "However, it still sounds wrong. It's a very high sound now.";

-  next;

-

-  mes "[Mechanical Device]";

-  mes "It seems the number you entered was too big.";

-  next;

-

-  goto L_Input;

-

-  L_TooSmall:

-  mes "[Mechanical Device]";

-  mes "As you use the terminal to adjust the number on it, the strange noise changed.";

-  mes "However, it still sounds wrong. It's a very deep sound now.";

-  next;

-

-  mes "[Mechanical Device]";

-  mes "It seems the number you entered was too small.";

-  next;

-

-  goto L_Input;

-

-  L_Broken:

-  mes "[Mechanical Device]";

-  mes "The Device stoped with an akward sound.";

-  mes "It seems the device doesn't work anymore...";

-  close;

-

-  L_Wrong:

-  mes "[Mechanical Device]";

-  mes "You tried to enter the number, but the terminal wasn't able to handle it.";

-  mes "It seems the device doesn't work anymore...";

-  close;

-

-  L_End:

-  mes "[Mechanical Device]";

-  mes "You left the mechanical device alone.";

-  close;

-

-}

-

-

-// Mechanical Device - Blue Key

-tha_t05.gat,101,37,0	script	Mechanical Device#3	111,{

-

-  if (ThanaQuest & 8) {

-

-    mes "[Mechanical Device]";

-    mes "This is where you found the";

-    mes "^8CA6EFBlue Key^000000.";

-    close;

-

-  }

-

-  mes "[Mechanical Device]";

-  mes "There's a strange mechanical device here.";

-  next;

-  menu "Investigate the device.",-,

-       "Leave it alone.",L_End;

-

-  mes "[Mechanical Device]";

-  mes "It seems there's something hidden under the device. However, the device is too heavy to lift it up alone.";

-  next;

-  menu "Try it anyways.",L_Alone,

-       "Try it together.",-,

-       "Leave it alone.",L_End;

-

-  getmapxy @mapname$,@mapx,@mapy,0,strcharinfo(0);

-  if (@mapx < 101 || @mapx > 104 || @mapy < 37 || @mapy > 40) goto L_Away;

-

-  set @help, getareausers("tha_t05.gat",101,40,104,37);

-  if (@help == 1) goto L_Alone;

-  if (@help < 3) goto L_NotEnough;

-

-  mes "[Mechanical Device]";

-  mes "As you manage to lift the device with the help of your friends, you find something underneath, covered in dirt.";

-  next;

-

-  set ThanaQuest, ThanaQuest | 8;

-  getitem 7423,1;  // Blue Key

-

-  mes "[Mechanical Device]";

-  mes "You found a ^8CA6EFBlue Key^000000.";

-  close;

-

-  L_Alone:

-  getmapxy @mapname$,@mapx,@mapy,0;

-  if (@mapx < 101 || @mapx > 104 || @mapy < 37 || @mapy > 40) goto L_Away;

-

-  mes "[Mechanical Device]";

-  mes "You coudn't move the device at all...";

-  close;

-

-  L_Away:

-  mes "[Mechanical Device]";

-  mes "You are too far away to move the device...";

-  close;

-

-  L_NotEnough:

-  mes "[Mechanical Device]";

-  mes "Even with some help you coudn't move the device.";

-  mes "It seem you'll need more help...";

-  close;

-

-  L_End:

-  mes "[Mechanical Device]";

-  mes "You left the mechanical device alone.";

-  close;

-

-}

-

-

-// Mechanical Device - Green Key

-tha_t06.gat,43,152,0	script	Mechanical Device#4	111,{

-

-  setarray @directions$[0],"up","right","down","left";

-

-  if (ThanaQuest & 16) {

-

-    mes "[Mechanical Device]";

-    mes "This is where you found the";

-    mes "^84A684Green Key^000000.";

-    close;

-

-  }

-

-  mes "[Mechanical Device]";

-  mes "There's a strange mechanical device here.";

-  next;

-  menu "Investigate the device.",-,

-       "Leave it alone.",L_End;

-

-  mes "[Mechanical Device]";

-  mes "There are several switches, cogwheels, tubes and wires.";

-  next;

-  menu "Investigate the switches.",L_Switches,

-       "Investigate the cogwheels.",-,

-       "Investigate the tubes and wires.",L_Tubes,

-       "Leave it alone.",L_End;

-

-  set @wheel1, rand(1,3);

-  if (@wheel1 == 1) set @wheel2,1;

-  if (@wheel1 == 2) set @wheel2,0;

-  if (@wheel1 == 3) set @wheel2,3;

-

-  set @wheel3, rand(0,3);

-  set @wheel4, rand(1,3);

-  if (@wheel4 == 1) set @wheel5,3;

-  if (@wheel4 == 2) set @wheel5,2;

-  if (@wheel4 == 3) set @wheel5,1;

-

-  L_Cogwheels:

-  if (@wheel1 == 0 && @wheel2 == 2 && @wheel4 == 0 && @wheel5 == 0) goto L_Work;

-  mes "[Mechanical Device]";

-  mes "There are five cogwheels here, two small ones and three big ones.";

-  mes "They seem to activate the device if they are adjusted the right way.";

-  next;

-  menu "Adjust the small ones.",L_Small,

-       "Adjust the big ones.",L_Big,

-       "Leave it alone.",L_End;

-

-  L_Small:

-  mes "[Mechanical Device]";

-  mes "The first wheel points ^0000AA"+@directions$[@wheel1]+"^000000,";

-  mes "the second one points ^0000AA"+@directions$[@wheel2]+"^000000.";

-  next;

-  menu "Spin them clockwise.",L_Small_Clock,

-       "Spin them counterclockwise.",L_Small_Counter,

-       "Adjust the other ones.",L_Big,

-       "Go back.",L_Cogwheels;

-

-  L_Small_Clock:

-  set @wheel1, @wheel1 + 1;

-  if (@wheel1 > 3) set @wheel1, @wheel1 - 4;

-  set @wheel2, @wheel2 - 1;

-  if (@wheel2 < 0) set @wheel2, @wheel2 + 4;

-  goto L_Small;

-

-  L_Small_Counter:

-  set @wheel1, @wheel1 - 1;

-  if (@wheel1 < 0) set @wheel1, @wheel1 + 4;

-  set @wheel2, @wheel2 + 1;

-  if (@wheel2 > 3) set @wheel2, @wheel2 - 4;

-  goto L_Small;

-

-  L_Big:

-  mes "[Mechanical Device]";

-  mes "The first wheel points ^0000AA"+@directions$[@wheel3]+"^000000,";

-  mes "the second one points ^0000AA"+@directions$[@wheel4]+"^000000 and";

-  mes "the third one points ^0000AA"+@directions$[@wheel5]+"^000000.";

-  next;

-  menu "Spin them clockwise.",L_Big_Clock,

-       "Spin them counterclockwise.",L_Big_Counter,

-       "Adjust the other ones.",L_Small,

-       "Go back.",L_Cogwheels;

-

-  L_Big_Clock:

-  set @wheel3, @wheel3 + 1;

-  if (@wheel3 > 3) set @wheel3, @wheel3 - 4;

-  set @wheel4, @wheel4 - 1;

-  if (@wheel4 < 0) set @wheel4, @wheel4 + 4;

-  set @wheel5, @wheel5 + 1;

-  if (@wheel5 > 3) set @wheel5, @wheel5 - 4;

-  goto L_Big;

-

-  L_Big_Counter:

-  set @wheel3, @wheel3 - 1;

-  if (@wheel3 < 0) set @wheel3, @wheel3 + 4;

-  set @wheel4, @wheel4 + 1;

-  if (@wheel4 > 3) set @wheel4, @wheel4 - 4;

-  set @wheel5, @wheel5 - 1;

-  if (@wheel5 < 0) set @wheel5, @wheel5 + 4;

-  goto L_Big;

-

-  L_Work:

-  mes "[Mechanical Device]";

-  mes "After you've adjusted the cogwheels this way, the device started to work.";

-  mes "It produced a small metal object.";

-  next;

-

-  set ThanaQuest, ThanaQuest | 16;

-  getitem 7424,1;  // Green Key

-

-  mes "[Mechanical Device]";

-  mes "You found the ^84A684Green Key^000000.";

-  close;

-

-  L_Switches:

-  mes "[Mechanical Device]";

-  mes "There are many switches, but most of them are stuck or seem to have no effect on the device.";

-  close;

-

-  L_Tubes:

-  mes "[Mechanical Device]";

-  mes "There are some tubes and wires which are connected to the other parts of the device.";

-  mes "It seems all tubes and wires are as they are supposed to be.";

-  close;

-

-  L_End:

-  mes "[Mechanical Device]";

-  mes "You left the mechanical device alone.";

-  close;

-

-}

-

-

-// Mechanical Device - Black Key

-tha_t09.gat,19,158,0	script	Mechanical Device#5	111,{

-

-  if (ThanaQuest & 32) {

-

-    mes "[Mechanical Device]";

-    mes "This is where you found the";

-    mes "^9C716BBlack Key^000000.";

-    close;

-

-  }

-

-  mes "[Mechanical Device]";

-  mes "There's a small mechanical device here.";

-  next;

-  menu "Investigate the device.",-,

-       "Leave it alone.",L_End;

-

-  mes "[Mechanical Device]";

-  mes "After investigating it closely, you find a small drawer with something in it.";

-  mes "You take it out of the drawer.";

-  next;

-

-  set ThanaQuest, ThanaQuest | 32;

-  getitem 7425,1;  // Black Key

-

-  mes "[Mechanical Device]";

-  mes "You found the ^84A684Black Key^000000.";

-  close;

-

-  L_End:

-  mes "[Mechanical Device]";

-  mes "You left the mechanical device alone.";

-  close;

-

-}

-

-

-// Seal - Blue Magical Stone

-tha_t04.gat,150,44,0	script	Seal#1	111,{

-

-  if (ThanaQuest < 63) {

-

-    mes "[Seal]";

-    mes "There is a seal here, but it seems it cannot be revealed.";

-    close;

-

-  }

-

-  if (ThanaQuest & 64) {

-

-    mes "[Seal]";

-    mes "This is where you found the";

-    mes "^738EE7Blue Magical Stone^000000.";

-    close;

-

-  }

-

-  mes "[Seal]";

-  mes "There's a seal here.";

-  next;

-

-  mes "[Seal]";

-  mes "It seems it can be revealed with a certain ^8CA6EFKey^000000...";

-  next;

-

-  input @input$;

-

-  if (@input$ != "Blue Key" || countitem(7423) < 1) goto L_Wrong;

-

-  mes "[Seal]";

-  mes "After you've inserted the ^8CA6EFBlue Key^000000, the seal opened and revealed a beautiful Crystal.";

-  next;

-

-  set ThanaQuest, ThanaQuest | 64;

-  delitem 7423,1; // Blue Key

-  getitem 7428,1; // Blue Magical Stone

-

-  mes "[Seal]";

-  mes "You found the ^738EE7Blue Magical Stone^000000.";

-  close;

-

-  L_Wrong:

-  mes "[Seal]";

-  mes "Nothing happened.";

-  close;

-

-}

-

-

-// Seal - Red Magical Stone

-tha_t05.gat,218,116,0	script	Seal#2	111,{

-

-  if (ThanaQuest < 63) {

-

-    mes "[Seal]";

-    mes "There is a seal here, but it seems it cannot be revealed.";

-    close;

-

-  }

-

-  if (ThanaQuest & 128) {

-

-    mes "[Seal]";

-    mes "This is where you found the";

-    mes "^CE6163Red Magical Stone^000000.";

-    close;

-

-  }

-

-  mes "[Seal]";

-  mes "There's a seal here.";

-  next;

-

-  mes "[Seal]";

-  mes "It seems it can be revealed with a certain ^EF797BKey^000000...";

-  next;

-

-  input @input$;

-

-  if (@input$ != "Red Key" || countitem(7421) < 1) goto L_Wrong;

-

-  mes "[Seal]";

-  mes "After you've inserted the ^EF797BRed Key^000000, the seal opened and revealed a beautiful Crystal.";

-  next;

-

-  set ThanaQuest, ThanaQuest | 128;

-  delitem 7421,1; // Red Key

-  getitem 7426,1; // Red Magical Stone

-

-  mes "[Seal]";

-  mes "You found the ^CE6163Red Magical Stone^000000.";

-  close;

-

-  L_Wrong:

-  mes "[Seal]";

-  mes "Nothing happened.";

-  close;

-

-}

-

-

-// Seal - Black Magical Stone

-tha_t06.gat,226,230,0	script	Seal#3	111,{

-

-  if (ThanaQuest < 63) {

-

-    mes "[Seal]";

-    mes "There is a seal here, but it seems it cannot be revealed.";

-    close;

-

-  }

-

-  if (ThanaQuest & 256) {

-

-    mes "[Seal]";

-    mes "This is where you found the";

-    mes "^7B698CBlack Magical Stone^000000.";

-    close;

-

-  }

-

-  mes "[Seal]";

-  mes "There's a seal here.";

-  next;

-

-  mes "[Seal]";

-  mes "It seems it can be revealed with a certain ^84A684Key^000000...";

-  next;

-

-  input @input$;

-

-  if (@input$ != "Black Key" || countitem(7425) < 1) goto L_Wrong;

-

-  mes "[Seal]";

-  mes "After you've inserted the ^84A684Black Key^000000, the seal opened and revealed a beautiful Crystal.";

-  next;

-

-  set ThanaQuest, ThanaQuest | 256;

-  delitem 7425,1; // Black Key

-  getitem 7430,1; // Black Magical Stone

-

-  mes "[Seal]";

-  mes "You found the ^7B698CBlack Magical Stone^000000.";

-  close;

-

-  L_Wrong:

-  mes "[Seal]";

-  mes "Nothing happened.";

-  close;

-

-}

-

-

-// Seal - Yellow Magical Stone

-tha_t07.gat,113,129,0	script	Seal#4	111,{

-

-  if (ThanaQuest < 63) {

-

-    mes "[Seal]";

-    mes "There is a seal here, but it seems it cannot be revealed.";

-    close;

-

-  }

-

-  if (ThanaQuest & 512) {

-

-    mes "[Seal]";

-    mes "This is where you found the";

-    mes "^EFA673Yellow Magical Stone^000000.";

-    close;

-

-  }

-

-  mes "[Seal]";

-  mes "There's a seal here.";

-  next;

-

-  mes "[Seal]";

-  mes "It seems it can be revealed with a certain ^DE9673Key^000000...";

-  next;

-

-  input @input$;

-

-  if (@input$ != "Yellow Key" || countitem(7422) < 1) goto L_Wrong;

-

-  mes "[Seal]";

-  mes "After you've inserted the ^DE9673Yellow Key^000000, the seal opened and revealed a beautiful Crystal.";

-  next;

-

-  set ThanaQuest, ThanaQuest | 512;

-  delitem 7422,1; // Yellow Key

-  getitem 7427,1; // Yellow Magical Stone

-

-  mes "[Seal]";

-  mes "You found the ^EFA673Yellow Magical Stone^000000.";

-  close;

-

-  L_Wrong:

-  mes "[Seal]";

-  mes "Nothing happened.";

-  close;

-

-}

-

-// Seal - Green Magical Stone

-tha_t10.gat,129,159,0	script	Seal#5	111,{

-

-  if (ThanaQuest < 63) {

-

-    mes "[Seal]";

-    mes "There is a seal here, but it seems it cannot be revealed.";

-    close;

-

-  }

-

-  if (ThanaQuest & 1024) {

-

-    mes "[Seal]";

-    mes "This is where you found the";

-    mes "^738652Green Magical Stone^000000.";

-    close;

-

-  }

-

-  mes "[Seal]";

-  mes "There's a seal here.";

-  next;

-

-  mes "[Seal]";

-  mes "It seems it can be revealed with a certain ^84A684Key^000000...";

-  next;

-

-  input @input$;

-

-  if (@input$ != "Green Key" || countitem(7424) < 1) goto L_Wrong;

-

-  mes "[Seal]";

-  mes "After you've inserted the ^84A684Green Key^000000, the seal opened and revealed a beautiful Crystal.";

-  next;

-

-  set ThanaQuest, ThanaQuest | 1024;

-  delitem 7424,1; // Green Key

-  getitem 7429,1; // Green Magical Stone

-

-  mes "[Seal]";

-  mes "You found the ^738652Green Magical Stone^000000.";

-  close;

-

-  L_Wrong:

-  mes "[Seal]";

-  mes "Nothing happened.";

-  close;

-

-}

-

-

-// Stone Statue - Floor 9

-tha_t09.gat,82,99,0	script	Stone Statue#09a	111,{

-

-  mes "[Stone Statue]";

-  mes "There is a lever here.";

-  if (ThanaSteps & 1) mes "It is pointing up.";

-  else mes "It is pointing down.";

-  next;

-  menu "Pull the lever.",-,

-       "Leave it as it is.",L_End;

-

-  set ThanaSteps, ThanaSteps ^ 1;

-

-  mes "[Stone Statue]";

-  mes "You decided to pull the lever.";

-  mes "It sounded as if it started some mechanical process.";

-  close;

-

-  L_End:

-  mes "[Stone Statue]";

-  mes "You decided to leave the lever as it is.";

-  close;

-

-}

-

-

-// Stone Statue - Floor 10 (A)

-tha_t10.gat,159,97,0	script	Stone Statue#10a	111,{

-

-  mes "[Stone Statue]";

-  mes "There is a lever here.";

-  if (ThanaSteps & 2) mes "It is pointing up.";

-  else mes "It is pointing down.";

-  next;

-  menu "Pull the lever.",-,

-       "Leave it as it is.",L_End;

-

-  set ThanaSteps, ThanaSteps ^ 2;

-  if (ThanaSteps & 4) set ThanaSteps, ThanaSteps ^ 4;

-

-  mes "[Stone Statue]";

-  mes "You decided to pull the lever.";

-  mes "It sounded as if it started some mechanical process.";

-  close;

-

-  L_End:

-  mes "[Stone Statue]";

-  mes "You decided to leave the lever as it is.";

-  close;

-

-}

-

-

-// Stone Statue - Floor 10 (B)

-tha_t10.gat,97,97,0	script	Stone Statue#10b	111,{

-

-  if (ThanaSteps & 2) {

-

-    mes "[Stone Statue]";

-    mes "There is a lever here.";

-    if (ThanaSteps & 4) mes "It is pointing up.";

-    else mes "It is pointing down.";

-    next;

-    menu "Pull the lever.",-,

-         "Leave it as it is.",L_End;

-

-    if (ThanaSteps & 4) set ThanaSteps, ThanaSteps ^ 2;

-    set ThanaSteps, ThanaSteps ^ 4;

-

-    mes "[Stone Statue]";

-    mes "You decided to pull the lever.";

-    mes "It sounded as if it started some mechanical process.";

-    close;

-

-  }

-

-  mes "[Stone Statue]";

-  mes "There is a lever here, but it cannot be moved.";

-  close;

-

-  L_End:

-  mes "[Stone Statue]";

-  mes "You decided to leave the lever as it is.";

-  close;

-

-}

-

-

-// Stone Statue - Floor 11 (A)

-tha_t11.gat,85,85,0	script	Stone Statue#11a	111,{

-

-  mes "[Stone Statue]";

-  mes "There is a lever here.";

-  if (ThanaSteps & 8) mes "It is pointing up.";

-  else mes "It is pointing down.";

-  next;

-  menu "Pull the lever.",-,

-       "Leave it as it is.",L_End;

-

-  if (ThanaSteps & 8) {

-    if (ThanaSteps & 64) set ThanaSteps, ThanaSteps ^ 64;

-    if (ThanaSteps & 32) set ThanaSteps, ThanaSteps ^ 32;

-    if (ThanaSteps & 16) set ThanaSteps, ThanaSteps ^ 16;

-  }

-  set ThanaSteps, ThanaSteps ^ 8;

-

-  mes "[Stone Statue]";

-  mes "You decided to pull the lever.";

-  mes "It sounded as if it started some mechanical process.";

-  close;

-

-  L_End:

-  mes "[Stone Statue]";

-  mes "You decided to leave the lever as it is.";

-  close;

-

-}

-

-

-// Stone Statue - Floor 11 (B)

-tha_t11.gat,16,16,0	script	Stone Statue#11b	111,{

-

-  if (ThanaSteps & 8) {

-

-    mes "[Stone Statue]";

-    mes "There is a lever here.";

-    if (ThanaSteps & 16) mes "It is pointing up.";

-    else mes "It is pointing down.";

-    next;

-    menu "Pull the lever.",-,

-         "Leave it as it is.",L_End;

-

-    if (ThanaSteps & 16) {

-      if (ThanaSteps & 64) set ThanaSteps, ThanaSteps ^ 64;

-      if (ThanaSteps & 32) set ThanaSteps, ThanaSteps ^ 32;

-      set ThanaSteps, ThanaSteps ^ 8;

-    }

-    set ThanaSteps, ThanaSteps ^ 16;

-

-    mes "[Stone Statue]";

-    mes "You decided to pull the lever.";

-    mes "It sounded as if it started some mechanical process.";

-    close;

-

-  }

-

-  mes "[Stone Statue]";

-  mes "There is a lever here, but it cannot be moved.";

-  close;

-

-  L_End:

-  mes "[Stone Statue]";

-  mes "You decided to leave the lever as it is.";

-  close;

-

-}

-

-

-// Stone Statue - Floor 11 (C)

-tha_t11.gat,85,16,0	script	Stone Statue#11c	111,{

-

-  if (ThanaSteps & 16) {

-

-    mes "[Stone Statue]";

-    mes "There is a lever here.";

-    if (ThanaSteps & 32) mes "It is pointing up.";

-    else mes "It is pointing down.";

-    next;

-    menu "Pull the lever.",-,

-         "Leave it as it is.",L_End;

-

-    if (ThanaSteps & 32) {

-      if (ThanaSteps & 64) set ThanaSteps, ThanaSteps ^ 64;

-      set ThanaSteps, ThanaSteps ^ 16;

-      set ThanaSteps, ThanaSteps ^ 8;

-    }

-    set ThanaSteps, ThanaSteps ^ 32;

-

-    mes "[Stone Statue]";

-    mes "You decided to pull the lever.";

-    mes "It sounded as if it started some mechanical process.";

-    close;

-

-  }

-

-  mes "[Stone Statue]";

-  mes "There is a lever here, but it cannot be moved.";

-  close;

-

-  L_End:

-  mes "[Stone Statue]";

-  mes "You decided to leave the lever as it is.";

-  close;

-

-}

-

-

-// Stone Statue - Floor 11 (D)

-tha_t11.gat,16,85,0	script	Stone Statue#11d	111,{

-

-  if (ThanaSteps & 32) {

-

-    mes "[Stone Statue]";

-    mes "There is a lever here.";

-    if (ThanaSteps & 64) mes "It is pointing up.";

-    else mes "It is pointing down.";

-    next;

-    menu "Pull the lever.",-,

-         "Leave it as it is.",L_End;

-

-    if (ThanaSteps & 64) {

-      set ThanaSteps, ThanaSteps ^ 32;

-      set ThanaSteps, ThanaSteps ^ 16;

-      set ThanaSteps, ThanaSteps ^ 8;

-    }

-    set ThanaSteps, ThanaSteps ^ 64;

-

-    mes "[Stone Statue]";

-    mes "You decided to pull the lever.";

-    mes "It sounded as if it started some mechanical process.";

-    close;

-

-  }

-

-  mes "[Stone Statue]";

-  mes "There is a lever here, but it cannot be moved.";

-  close;

-

-  L_End:

-  mes "[Stone Statue]";

-  mes "You decided to leave the lever as it is.";

-  close;

-

-}

-

-

-// Stone Statue - Red Magical Stone

-tha_t12.gat,96,58,0	script	Stone Statue#12a	111,{

-

-  if (ThanaQuest < 2047) {

-

-    mes "[Stone Statue]";

-    mes "There is a socket here, but you don't know what to do.";

-    close;

-

-  }

-

-  if (ThanaQuest & 2048) {

-

-    mes "[Stone Statue]";

-    mes "This is where you inserted the ^CE6163Red Magical Stone^000000.";

-    close;

-

-  }

-

-  mes "[Stone Statue]";

-  mes "There's a socket here.";

-  next;

-

-  input @input$;

-

-  if (@input$ != "Red Magical Stone" || countitem(7426) < 1) goto L_Wrong;

-

-  set ThanaQuest, ThanaQuest | 2048;

-  delitem 7426,1; // Red Magical Stone

-

-  mes "[Stone Statue]";

-  mes "You've inserted the ^CE6163Red Magical Stone^000000 into the socket and it fits perfectly.";

-  close;

-

-  L_Wrong:

-  mes "[Stone Statue]";

-  mes "Nothing happened.";

-  close;

-

-}

-

-

-// Stone Statue - Yellow Magical Stone

-tha_t12.gat,161,58,0	script	Stone Statue#12b	111,{

-

-  if (ThanaQuest < 2047) {

-

-    mes "[Stone Statue]";

-    mes "There is a socket here, but you don't know what to do.";

-    close;

-

-  }

-

-  if (ThanaQuest & 4096) {

-

-    mes "[Stone Statue]";

-    mes "This is where you inserted the ^EFA673Yellow Magical Stone^000000.";

-    close;

-

-  }

-

-  mes "[Stone Statue]";

-  mes "There's a socket here.";

-  next;

-

-  input @input$;

-

-  if (@input$ != "Yellow Magical Stone" || countitem(7427) < 1) goto L_Wrong;

-

-  set ThanaQuest, ThanaQuest | 4096;

-  delitem 7427,1; // Yellow Magical Stone

-

-  mes "[Stone Statue]";

-  mes "You've inserted the ^EFA673Yellow Magical Stone^000000 into the socket and it fits perfectly.";

-  close;

-

-  L_Wrong:

-  mes "[Stone Statue]";

-  mes "Nothing happened.";

-  close;

-

-}

-

-

-// Stone Statue - Blue Magical Stone

-tha_t12.gat,104,18,0	script	Stone Statue#12c	111,{

-

-  if (ThanaQuest < 2047) {

-

-    mes "[Stone Statue]";

-    mes "There is a socket here, but you don't know what to do.";

-    close;

-

-  }

-

-  if (ThanaQuest & 8192) {

-

-    mes "[Stone Statue]";

-    mes "This is where you inserted the ^738EE7Blue Magical Stone^000000.";

-    close;

-

-  }

-

-  mes "[Stone Statue]";

-  mes "There's a socket here.";

-  next;

-

-  input @input$;

-

-  if (@input$ != "Blue Magical Stone" || countitem(7428) < 1) goto L_Wrong;

-

-  set ThanaQuest, ThanaQuest | 8192;

-  delitem 7428,1; // Blue Magical Stone

-

-  mes "[Stone Statue]";

-  mes "You've inserted the ^738EE7Blue Magical Stone^000000 into the socket and it fits perfectly.";

-  close;

-

-  L_Wrong:

-  mes "[Stone Statue]";

-  mes "Nothing happened.";

-  close;

-

-}

-

-

-// Stone Statue - Green Magical Stone

-tha_t12.gat,154,18,0	script	Stone Statue#12d	111,{

-

-  if (ThanaQuest < 2047) {

-

-    mes "[Stone Statue]";

-    mes "There is a socket here, but you don't know what to do.";

-    close;

-

-  }

-

-  if (ThanaQuest & 16384) {

-

-    mes "[Stone Statue]";

-    mes "This is where you inserted the ^738652Green Magical Stone^000000.";

-    close;

-

-  }

-

-  mes "[Stone Statue]";

-  mes "There's a socket here.";

-  next;

-

-  input @input$;

-

-  if (@input$ != "Green Magical Stone" || countitem(7429) < 1) goto L_Wrong;

-

-  set ThanaQuest, ThanaQuest | 16384;

-  delitem 7429,1; // Green Magical Stone

-

-  mes "[Stone Statue]";

-  mes "You've inserted the ^738652Green Magical Stone^000000 into the socket and it fits perfectly.";

-  close;

-

-  L_Wrong:

-  mes "[Stone Statue]";

-  mes "Nothing happened.";

-  close;

-

-}

-

-

-// Stone Statue - Black Magical Stone

-tha_t12.gat,128,86,0	script	Stone Statue#12e	111,{

-

-  if (ThanaQuest < 2047) {

-

-    mes "[Stone Statue]";

-    mes "There is a socket here, but you don't know what to do.";

-    close;

-

-  }

-

-  if (ThanaQuest & 32768) {

-

-    mes "[Stone Statue]";

-    mes "This is where you inserted the ^7B698CBlack Magical Stone^000000.";

-    close;

-

-  }

-

-  mes "[Stone Statue]";

-  mes "There's a socket here.";

-  next;

-

-  input @input$;

-

-  if (@input$ != "Black Magical Stone" || countitem(7430) < 1) goto L_Wrong;

-

-  set ThanaQuest, ThanaQuest | 32768;

-  delitem 7430,1; // Black Magical Stone

-

-  mes "[Stone Statue]";

-  mes "You've inserted the ^7B698CBlack Magical Stone^000000 into the socket and it fits perfectly.";

-  close;

-

-  L_Wrong:

-  mes "[Stone Statue]";

-  mes "Nothing happened.";

-  close;

-

-}

-

-

-// Carvings

-tha_t12.gat,130,52,0	script	Carvings#1	111,{

-

-  mes "[Carvings]";

-  mes "There are some beautifull carvings here.";

-  next;

-

-  mes "[Carvings]";

-  mes "As you look closer at the carvings, a portal opens and takes you away...";

-  next;

-

-  if (ThanaQuest < 65535) {

-

-    warp "thana_step.gat",185,15;

-    end;

-

-  }

-

-  warp "thana_step.gat",73,288;

-  end;

-

-}

-

-

-// Seal of Sorrow

-thana_boss.gat,217,167,0	script	Carvings#2	111,{

-

-  if ($Thana & 1) {

-

-    mes "[Carvings]";

-    mes "This is where you inserted the ^CE86C6Fragment of Sorrow^000000.";

-    close;

-

-  }

-

-  mes "[Carvings]";

-  mes "There's a hole in the floor, which seems to be made for something to fit in.";

-  mes "It twinkles in ^CE86C6violet color^000000.";

-  next;

-

-  menu "Insert ^CE86C6Fragment of Sorrow^000000",L_Sorrow,

-       "Insert ^7B9663Fragment of Agony^000000",L_Agony,

-       "Insert ^8C79ADFragment of Hatred^000000",L_Hatred,

-       "Insert ^F7865AFragment of Despair^000000",L_Despair,

-       "Don't insert something.",L_End;

-

-  L_Sorrow:

-  if (countitem(7437) == 0) goto L_NoFragment;

-

-  delitem 7437,1;

-  stopnpctimer "TimerThana";

-  set $Thana, $Thana | 1;

-  initnpctimer "TimerThana";

-  mapannounce "thana_boss.gat", "The Seal of Sorrow has been broken.",bc_npc;

-

-  mes "[Carvings]";

-  mes "You've inserted the ^CE86C6Fragment of Sorrow^000000 into the hole and it fits perfectly.";

-  mes "It now glows in bright ^CE86C6violet color^000000.";

-  if ($Thana >= 15) close;

-  next;

-

-  mes "[Carvings]";

-  mes "Hurry now, tell your comrades to insert the other fragments.";

-  close;

-

-  L_Agony:

-  if (countitem(7436) == 0) goto L_NoFragment;

-  mes "[Carvings]";

-  mes "You've tried to insert the ^7B9663Fragment of Agony^000000 into the hole, but it didn't fit.";

-  close;

-

-  L_Hatred:

-  if (countitem(7438) == 0) goto L_NoFragment;

-  mes "[Carvings]";

-  mes "You've tried to insert the ^8C79ADFragment of Hatred^000000 into the hole, but it didn't fit.";

-  close;

-

-  L_Despair:

-  if (countitem(7439) == 0) goto L_NoFragment;

-  mes "[Carvings]";

-  mes "You've tried to insert the ^F7865AFragment of Despair^000000 into the hole, but it didn't fit.";

-  close;

-

-  L_NoFragment:

-  mes "[Carvings]";

-  mes "You don't have this fragment.";

-  close;

-

-  L_End:

-  mes "[Carvings]";

-  mes "You left the cravings alone.";

-  close;

-

-  OnInit:

-  set $Thana, 0;

-  end;

-

-}

-

-

-// Seal of Agony

-thana_boss.gat,202,75,0	script	Carvings#3	111,{

-

-  if ($Thana & 2) {

-

-    mes "[Carvings]";

-    mes "This is where you inserted the ^7B9663Fragment of Agony^000000.";

-    close;

-

-  }

-

-  mes "[Carvings]";

-  mes "There's a hole in the floor, which seems to be made for something to fit in.";

-  mes "It twinkles in ^7B9663green color^000000.";

-  next;

-

-  menu "Insert ^CE86C6Fragment of Sorrow^000000",L_Sorrow,

-       "Insert ^7B9663Fragment of Agony^000000",L_Agony,

-       "Insert ^8C79ADFragment of Hatred^000000",L_Hatred,

-       "Insert ^F7865AFragment of Despair^000000",L_Despair,

-       "Don't insert something.",L_End;

-

-  L_Sorrow:

-  if (countitem(7437) == 0) goto L_NoFragment;

-  mes "[Carvings]";

-  mes "You've tried to insert the ^CE86C6Fragment of Sorrow^000000 into the hole, but it didn't fit.";

-  close;

-

-  L_Agony:

-  if (countitem(7436) == 0) goto L_NoFragment;

-

-  delitem 7436,1;

-  stopnpctimer "TimerThana";

-  set $Thana, $Thana | 2;

-  initnpctimer "TimerThana";

-  mapannounce "thana_boss.gat", "The Seal of Agony has been broken.",bc_npc;

-

-  mes "[Carvings]";

-  mes "You've inserted the ^7B9663Fragment of Agony^000000 into the hole and it fits perfectly.";

-  mes "It now glows in bright ^7B9663green color^000000.";

-  if ($Thana >= 15) close;

-  next;

-

-  mes "[Carvings]";

-  mes "Hurry now, tell your comrades to insert the other fragments.";

-  close;

-

-  L_Hatred:

-  if (countitem(7438) == 0) goto L_NoFragment;

-  mes "[Carvings]";

-  mes "You've tried to insert the ^8C79ADFragment of Hatred^000000 into the hole, but it didn't fit.";

-  close;

-

-  L_Despair:

-  if (countitem(7439) == 0) goto L_NoFragment;

-  mes "[Carvings]";

-  mes "You've tried to insert the ^F7865AFragment of Despair^000000 into the hole, but it didn't fit.";

-  close;

-

-  L_NoFragment:

-  mes "[Carvings]";

-  mes "You don't have this fragment.";

-  close;

-

-  L_End:

-  mes "[Carvings]";

-  mes "You left the cravings alone.";

-  close;

-

-}

-

-

-// Seal of Hatred

-thana_boss.gat,80,76,0	script	Carvings#4	111,{

-

-  if ($Thana & 4) {

-

-    mes "[Carvings]";

-    mes "This is where you inserted the ^8C79ADFragment of Hatred^000000.";

-    close;

-

-  }

-

-  mes "[Carvings]";

-  mes "There's a hole in the floor, which seems to be made for something to fit in.";

-  mes "It twinkles in ^8C79ADblue color^000000.";

-  next;

-

-  menu "Insert ^CE86C6Fragment of Sorrow^000000",L_Sorrow,

-       "Insert ^7B9663Fragment of Agony^000000",L_Agony,

-       "Insert ^8C79ADFragment of Hatred^000000",L_Hatred,

-       "Insert ^F7865AFragment of Despair^000000",L_Despair,

-       "Don't insert something.",L_End;

-

-  L_Sorrow:

-  if (countitem(7437) == 0) goto L_NoFragment;

-  mes "[Carvings]";

-  mes "You've tried to insert the ^CE86C6Fragment of Sorrow^000000 into the hole, but it didn't fit.";

-  close;

-

-  L_Agony:

-  if (countitem(7436) == 0) goto L_NoFragment;

-  mes "[Carvings]";

-  mes "You've tried to insert the ^7B9663Fragment of Agony^000000 into the hole, but it didn't fit.";

-  close;

-

-  L_Hatred:

-  if (countitem(7438) == 0) goto L_NoFragment;

-

-  delitem 7438,1;

-  stopnpctimer "TimerThana";

-  set $Thana, $Thana | 4;

-  initnpctimer "TimerThana";

-  mapannounce "thana_boss.gat", "The Seal of Hatred has been broken.",bc_npc;

-

-  mes "[Carvings]";

-  mes "You've inserted the ^8C79ADFragment of Hatred^000000 into the hole and it fits perfectly.";

-  mes "It now glows in bright ^8C79ADblue color^000000.";

-  if ($Thana >= 15) close;

-  next;

-

-  mes "[Carvings]";

-  mes "Hurry now, tell your comrades to insert the other fragments.";

-  close;

-

-  L_Despair:

-  if (countitem(7439) == 0) goto L_NoFragment;

-  mes "[Carvings]";

-  mes "You've tried to insert the ^F7865AFragment of Despair^000000 into the hole, but it didn't fit.";

-  close;

-

-  L_NoFragment:

-  mes "[Carvings]";

-  mes "You don't have this fragment.";

-  close;

-

-  L_End:

-  mes "[Carvings]";

-  mes "You left the cravings alone.";

-  close;

-

-}

-

-

-// Seal of Despair

-thana_boss.gat,62,171,0	script	Carvings#5	111,{

-

-  if ($Thana & 8) {

-

-    mes "[Carvings]";

-    mes "This is where you inserted the ^F7865AFragment of Despair^000000.";

-    close;

-

-  }

-

-  mes "[Carvings]";

-  mes "There's a hole in the floor, which seems to be made for something to fit in.";

-  mes "It twinkles in ^F7865Ared color^000000.";

-  next;

-

-  menu "Insert ^CE86C6Fragment of Sorrow^000000",L_Sorrow,

-       "Insert ^7B9663Fragment of Agony^000000",L_Agony,

-       "Insert ^8C79ADFragment of Hatred^000000",L_Hatred,

-       "Insert ^F7865AFragment of Despair^000000",L_Despair,

-       "Don't insert something.",L_End;

-

-  L_Sorrow:

-  if (countitem(7437) == 0) goto L_NoFragment;

-  mes "[Carvings]";

-  mes "You've tried to insert the ^CE86C6Fragment of Sorrow^000000 into the hole, but it didn't fit.";

-  close;

-

-  L_Agony:

-  if (countitem(7436) == 0) goto L_NoFragment;

-  mes "[Carvings]";

-  mes "You've tried to insert the ^7B9663Fragment of Agony^000000 into the hole, but it didn't fit.";

-  close;

-

-  L_Hatred:

-  if (countitem(7438) == 0) goto L_NoFragment;

-  mes "[Carvings]";

-  mes "You've tried to insert the ^8C79ADFragment of Hatred^000000 into the hole, but it didn't fit.";

-  close;

-

-  L_Despair:

-  if (countitem(7439) == 0) goto L_NoFragment;

-

-  delitem 7439,1;

-  stopnpctimer "TimerThana";

-  set $Thana, $Thana | 8;

-  initnpctimer "TimerThana";

-  mapannounce "thana_boss.gat", "The Seal of Despair has been broken.",bc_npc;

-

-  mes "[Carvings]";

-  mes "You've inserted the ^F7865AFragment of Despair^000000 into the hole and it fits perfectly.";

-  mes "It now glows in bright ^F7865Ared color^000000.";

-  if ($Thana >= 15) close;

-  next;

-

-  mes "[Carvings]";

-  mes "Hurry now, tell your comrades to insert the other fragments.";

-  close;

-

-  L_NoFragment:

-  mes "[Carvings]";

-  mes "You don't have this fragment.";

-  close;

-

-  L_End:

-  mes "[Carvings]";

-  mes "You left the cravings alone.";

-  close;

-

-}

-

-

-// Seal of Thanatos

-thana_boss.gat,141,217,0	script	Carvings#6	111,{

-

-	if ($Thana == 15) {

-

-		mes "[Carvings]";

-		mes "You stepped on the plate, and it seems it activated some sort of mechanism.";

-		next;

-

-		if (!getmapmobs("thana_boss.gat")) {

-			monster "thana_boss.gat",135,119,"Thanatos",1708,1,"TimerThana::OnThanaDead";

-			stopnpctimer "TimerThana";

-			set $Thana, $Thana | 16; 

-			mapannounce "thana_boss.gat", "The Seal of Thanatos has been broken.",bc_npc;

-			mes "[Carvings]";

-			mes "You hear the screams of the undead coming from below...";

-			close;

-		} else {

-			mes "[Carvings]";

-			mes "But nothing happened...";

-			close;

-		}

-	}

-

-	mes "[Carvings]";

-	mes "There is a plate here, which seems to be some sort of switch, but it doesn't move.";

-	close;

-

-}

-

-

-// NPC Timer

-thana_boss.gat,1,1,1	script	TimerThana	-1,{

-

-  // 10 secs

-  OnTimer10000:

-

-    if ($Thana >= 15) end;

-    stopnpctimer;

-    mapannounce "thana_boss.gat", "You didn't manage to break all four Seals in time...",bc_npc;

-    set $Thana, 0;

-    end;

-

-  OnThanaDead:

-

-    initnpctimer;

-    end;

-

-  // 600 secs = 10 mins

-  OnTimer600000:

-

-    stopnpctimer;

-    set $Thana, 0;

-    end;

-

-}

+//===== eAthena Script =======================================
+//= Thanatos Tower Quest
+//===== By: ==================================================
+//= [Ishizu-chan]
+//===== Current Version: =====================================
+//= 1.0 Beta
+//===== Compatible With: =====================================
+//= Any eAthena Version i guess?
+//===== Description: =========================================
+//= It's the Thanatos Tower Quest...
+//===== Additional Comments: =================================
+//= 1.0 - First Release [Ishizu-chan]
+//============================================================
+
+
+// Tour Guide - 1st Floor
+tha_t01.gat,149,78,3	script	Tour Guide#1	90,{
+
+  if (ThanaQuest & 1) {
+
+    mes "[Tour Guide]";
+    mes "Hello my friend.";
+    mes "How are you? Do you enjoy working for the Rekkenber Corporation?";
+    close;
+
+  }
+
+  mes "[Tour Guide]";
+  mes "Hello there.";
+  mes "So you came all the way to investigate the ^777777Thanatos Tower^000000, huh?";
+  next;
+
+  mes "[Tour Guide]";
+  mes "I'm with the Rekkenber Corporation.";
+  mes "We are still searching brave people, who would like to work for us and discover the deeper levels of the ^777777Thanatos Tower^000000.";
+  next;
+
+  mes "[Tour Guide]";
+  mes "Are you by chance interested to volunteer to the ^777777Thanatos Tower Task Force^000000?";
+  next;
+  menu "No thanks.",L_End,
+       "Yes, sign me up!",-;
+
+  mes "[Tour Guide]";
+  mes "Please sign your name here...";
+  next;
+
+  set ThanaQuest, ThanaQuest | 1;
+
+  mes "[Tour Guide]";
+  mes "Ok, ^000077"+strcharinfo(0)+"^000000, isn't it?";
+  mes "Welcome to the ^777777Thanatos Tower Task Force^000000!";
+  next;
+
+  mes "[Tour Guide]";
+  mes "Please be carefull when investigating the deeper levels of the ^777777Thanatos Tower^000000.";
+  mes "The deeper you get, the less is known about it's dangers...";
+  close;
+
+  L_End:
+  mes "[Tour Guide]";
+  mes "Ok, but it was worth a try, wasn't it.";
+  mes "Come back when you're interested.";
+  close;
+
+}
+
+
+// Tour Guide - 2nd Floor
+tha_t02.gat,231,161,5	script	Tour Guide#2	874,{
+
+  if (ThanaQuest < 1) {
+
+    mes "[Tour Guide]";
+    mes "Hello there.";
+    mes "Nice day, isn't it?";
+    next;
+
+    mes "[Tour Guide]";
+    mes "If you want to visit the higher levels, you'll need to volunteer to the ^777777Thanatos Tower Task Force^000000.";
+    next;
+
+    mes "[Tour Guide]";
+    mes "You can do so by speaking with the nice woman at the counter, near the entrance.";
+    mes "See you later~";
+    close;
+
+  }
+
+  mes "[Tour Guide]";
+  mes "Hello my friend.";
+  mes "Oh, you're one of the new volunteers from the ^777777Thanatos Tower Task Force^000000.";
+  next;
+
+  mes "[Tour Guide]";
+  mes "If you wish to enter the next level, you'll need to form a party.";
+  mes "Please gather at least 5 of your Friends around me, so that I can warp you towards the next level.";
+  next;
+
+  mes "[Tour Guide]";
+  mes "I will warp your whole party, so tell your comrades to stand by.";
+  mes "Shall I warp you now?";
+  next;
+  menu "No, I need some time...",L_End,
+       "Yes, please warp us!",-;
+  
+  set @partyid, getcharid(1);
+
+  if (@partyid == 0) goto L_NoParty;
+
+  getpartymember(@partyid);
+  set @partymembercount,$@partymembercount;
+  copyarray @partymembername$[0],$@partymembername$[0],@partymembercount;
+
+  if (@partymembercount < 6) goto L_NotEnough;
+
+  for(set @i, 0; @i < @partymembercount; set @i, @i + 1) {
+    if (getmapxy(@mapname$,@mapx,@mapy,0,@partymembername$[@i]) != 0) goto L_Offline;
+    if (@mapname$ != "tha_t02.gat" || @mapx < 223 || @mapx > 239 || @mapy < 153 || @mapy > 169) goto L_Away;
+  }
+
+  warpparty "tha_t03.gat",220,165,@partyid;
+  end;
+
+  L_NoParty:
+  mes "[Tour Guide]";
+  mes "Erm, you need to form a party first.";
+  close;
+
+  L_NotEnough:
+  mes "[Tour Guide]";
+  mes "You'll need to bring at least 5 friends, if you want to enter the next level.";
+  close;
+
+  L_Offline:
+  mes "[Tour Guide]";
+  mes "Hmm, it seems some of your friends aren't online.";
+  close;
+
+  L_Away:
+  mes "[Tour Guide]";
+  mes "I can't find some of your friends.";
+  mes "Please tell them to come close to me, so I can see them.";
+  close;
+
+  L_End:
+  mes "[Tour Guide]";
+  mes "Ok, come back whenever you're ready to go.";
+  close;
+
+}
+
+
+// Mechanical Device - Red Key
+tha_t03.gat,67,70,0	script	Mechanical Device#1	111,{
+
+  if (ThanaQuest & 2) {
+
+    mes "[Mechanical Device]";
+    mes "This is where you found the";
+    mes "^EF797BRed Key^000000.";
+    close;
+
+  }
+
+  mes "[Mechanical Device]";
+  mes "There's a strange mechanical device here.";
+  next;
+  menu "Investigate the device.",-,
+       "Leave it alone.",L_End;
+
+  mes "[Mechanical Device]";
+  mes "...";
+  next;
+
+  mes "[Mechanical Device]";
+  mes "It seems there is something inside, but the device is protected by a mysterious strong power.";
+  next;
+  menu "Try to get whats inside.",L_Denied,
+       "Get rid of the strong power",-,
+       "Leave it alone.",L_End;
+
+  if (getequipweaponlv(4) < 4) goto L_NoWeapon;
+
+  mes "[Mechanical Device]";
+  mes "As you point your weapon towards the device, the magic power seems to fade.";
+  mes "You now can get inside the device.";
+  next;
+
+  set ThanaQuest, ThanaQuest | 2;
+  getitem 7421,1;  // Red Key
+
+  mes "[Mechanical Device]";
+  mes "You found the ^EF797BRed Key^000000.";
+  close;
+
+  L_Denied:
+  mes "[Mechanical Device]";
+  mes "You were pushed away as you tried to get inside.";
+  mes "It seems the device is protected by a strong magical force.";
+  close;
+
+  L_NoWeapon:
+  mes "[Mechanical Device]";
+  mes "You tried to get rid of the mysterious power, but your weapon doesn't seem to be strong enough...";
+  close;
+
+  L_End:
+  mes "[Mechanical Device]";
+  mes "You left the mechanical device alone.";
+  close;
+
+}
+
+
+// Mechanical Device - Yellow Key
+tha_t04.gat,195,195,0	script	Mechanical Device#2	111,{
+
+  if (ThanaQuest & 4) {
+
+    mes "[Mechanical Device]";
+    mes "This is where you found the";
+    mes "^DE9673Yellow Key^000000.";
+    close;
+
+  }
+
+  mes "[Mechanical Device]";
+  mes "There's a strange mechanical device here.";
+  next;
+  menu "Investigate the device.",-,
+       "Leave it alone.",L_End;
+
+  mes "[Mechanical Device]";
+  mes "The device started to make a certain noise since you approached to it.";
+  mes "Theres a terminal in front of it, where you could enter a number with 3 digits.";
+  next;
+
+  mes "[Mechanical Device]";
+  mes "The noise sounds very strange, and it seems as if the device doesn't work the way it should.";
+  next;
+  menu "Use the terminal",-,
+       "Leave it alone.",L_End;
+
+  set @number, rand(100,999);
+  set @count, 0;
+
+  L_Input:
+  set @count, @count + 1;
+  if (@count > 10) goto L_Broken;
+
+  input @input;
+
+  if (@input < 100 || @input > 999) goto L_Wrong;
+
+  if (@input > @number) goto L_TooBig;
+  if (@input < @number) goto L_TooSmall;
+
+  mes "[Mechanical Device]";
+  mes "As you use the terminal to adjust the number on it, the strange noise changed into a pleasant working sound, and a small box near the terminal opened.";
+  mes "There's something in that box.";
+  next;
+
+  set ThanaQuest, ThanaQuest | 4;
+  getitem 7422,1;  // Yellow Key
+
+  mes "[Mechanical Device]";
+  mes "You found the ^DE9673Yellow Key^000000.";
+  close;
+
+  L_TooBig:
+  mes "[Mechanical Device]";
+  mes "As you use the terminal to adjust the number on it, the strange noise changed.";
+  mes "However, it still sounds wrong. It's a very high sound now.";
+  next;
+
+  mes "[Mechanical Device]";
+  mes "It seems the number you entered was too big.";
+  next;
+
+  goto L_Input;
+
+  L_TooSmall:
+  mes "[Mechanical Device]";
+  mes "As you use the terminal to adjust the number on it, the strange noise changed.";
+  mes "However, it still sounds wrong. It's a very deep sound now.";
+  next;
+
+  mes "[Mechanical Device]";
+  mes "It seems the number you entered was too small.";
+  next;
+
+  goto L_Input;
+
+  L_Broken:
+  mes "[Mechanical Device]";
+  mes "The Device stoped with an akward sound.";
+  mes "It seems the device doesn't work anymore...";
+  close;
+
+  L_Wrong:
+  mes "[Mechanical Device]";
+  mes "You tried to enter the number, but the terminal wasn't able to handle it.";
+  mes "It seems the device doesn't work anymore...";
+  close;
+
+  L_End:
+  mes "[Mechanical Device]";
+  mes "You left the mechanical device alone.";
+  close;
+
+}
+
+
+// Mechanical Device - Blue Key
+tha_t05.gat,101,37,0	script	Mechanical Device#3	111,{
+
+  if (ThanaQuest & 8) {
+
+    mes "[Mechanical Device]";
+    mes "This is where you found the";
+    mes "^8CA6EFBlue Key^000000.";
+    close;
+
+  }
+
+  mes "[Mechanical Device]";
+  mes "There's a strange mechanical device here.";
+  next;
+  menu "Investigate the device.",-,
+       "Leave it alone.",L_End;
+
+  mes "[Mechanical Device]";
+  mes "It seems there's something hidden under the device. However, the device is too heavy to lift it up alone.";
+  next;
+  menu "Try it anyways.",L_Alone,
+       "Try it together.",-,
+       "Leave it alone.",L_End;
+
+  getmapxy @mapname$,@mapx,@mapy,0,strcharinfo(0);
+  if (@mapx < 101 || @mapx > 104 || @mapy < 37 || @mapy > 40) goto L_Away;
+
+  set @help, getareausers("tha_t05.gat",101,40,104,37);
+  if (@help == 1) goto L_Alone;
+  if (@help < 3) goto L_NotEnough;
+
+  mes "[Mechanical Device]";
+  mes "As you manage to lift the device with the help of your friends, you find something underneath, covered in dirt.";
+  next;
+
+  set ThanaQuest, ThanaQuest | 8;
+  getitem 7423,1;  // Blue Key
+
+  mes "[Mechanical Device]";
+  mes "You found a ^8CA6EFBlue Key^000000.";
+  close;
+
+  L_Alone:
+  getmapxy @mapname$,@mapx,@mapy,0;
+  if (@mapx < 101 || @mapx > 104 || @mapy < 37 || @mapy > 40) goto L_Away;
+
+  mes "[Mechanical Device]";
+  mes "You coudn't move the device at all...";
+  close;
+
+  L_Away:
+  mes "[Mechanical Device]";
+  mes "You are too far away to move the device...";
+  close;
+
+  L_NotEnough:
+  mes "[Mechanical Device]";
+  mes "Even with some help you coudn't move the device.";
+  mes "It seem you'll need more help...";
+  close;
+
+  L_End:
+  mes "[Mechanical Device]";
+  mes "You left the mechanical device alone.";
+  close;
+
+}
+
+
+// Mechanical Device - Green Key
+tha_t06.gat,43,152,0	script	Mechanical Device#4	111,{
+
+  setarray @directions$[0],"up","right","down","left";
+
+  if (ThanaQuest & 16) {
+
+    mes "[Mechanical Device]";
+    mes "This is where you found the";
+    mes "^84A684Green Key^000000.";
+    close;
+
+  }
+
+  mes "[Mechanical Device]";
+  mes "There's a strange mechanical device here.";
+  next;
+  menu "Investigate the device.",-,
+       "Leave it alone.",L_End;
+
+  mes "[Mechanical Device]";
+  mes "There are several switches, cogwheels, tubes and wires.";
+  next;
+  menu "Investigate the switches.",L_Switches,
+       "Investigate the cogwheels.",-,
+       "Investigate the tubes and wires.",L_Tubes,
+       "Leave it alone.",L_End;
+
+  set @wheel1, rand(1,3);
+  if (@wheel1 == 1) set @wheel2,1;
+  if (@wheel1 == 2) set @wheel2,0;
+  if (@wheel1 == 3) set @wheel2,3;
+
+  set @wheel3, rand(0,3);
+  set @wheel4, rand(1,3);
+  if (@wheel4 == 1) set @wheel5,3;
+  if (@wheel4 == 2) set @wheel5,2;
+  if (@wheel4 == 3) set @wheel5,1;
+
+  L_Cogwheels:
+  if (@wheel1 == 0 && @wheel2 == 2 && @wheel4 == 0 && @wheel5 == 0) goto L_Work;
+  mes "[Mechanical Device]";
+  mes "There are five cogwheels here, two small ones and three big ones.";
+  mes "They seem to activate the device if they are adjusted the right way.";
+  next;
+  menu "Adjust the small ones.",L_Small,
+       "Adjust the big ones.",L_Big,
+       "Leave it alone.",L_End;
+
+  L_Small:
+  mes "[Mechanical Device]";
+  mes "The first wheel points ^0000AA"+@directions$[@wheel1]+"^000000,";
+  mes "the second one points ^0000AA"+@directions$[@wheel2]+"^000000.";
+  next;
+  menu "Spin them clockwise.",L_Small_Clock,
+       "Spin them counterclockwise.",L_Small_Counter,
+       "Adjust the other ones.",L_Big,
+       "Go back.",L_Cogwheels;
+
+  L_Small_Clock:
+  set @wheel1, @wheel1 + 1;
+  if (@wheel1 > 3) set @wheel1, @wheel1 - 4;
+  set @wheel2, @wheel2 - 1;
+  if (@wheel2 < 0) set @wheel2, @wheel2 + 4;
+  goto L_Small;
+
+  L_Small_Counter:
+  set @wheel1, @wheel1 - 1;
+  if (@wheel1 < 0) set @wheel1, @wheel1 + 4;
+  set @wheel2, @wheel2 + 1;
+  if (@wheel2 > 3) set @wheel2, @wheel2 - 4;
+  goto L_Small;
+
+  L_Big:
+  mes "[Mechanical Device]";
+  mes "The first wheel points ^0000AA"+@directions$[@wheel3]+"^000000,";
+  mes "the second one points ^0000AA"+@directions$[@wheel4]+"^000000 and";
+  mes "the third one points ^0000AA"+@directions$[@wheel5]+"^000000.";
+  next;
+  menu "Spin them clockwise.",L_Big_Clock,
+       "Spin them counterclockwise.",L_Big_Counter,
+       "Adjust the other ones.",L_Small,
+       "Go back.",L_Cogwheels;
+
+  L_Big_Clock:
+  set @wheel3, @wheel3 + 1;
+  if (@wheel3 > 3) set @wheel3, @wheel3 - 4;
+  set @wheel4, @wheel4 - 1;
+  if (@wheel4 < 0) set @wheel4, @wheel4 + 4;
+  set @wheel5, @wheel5 + 1;
+  if (@wheel5 > 3) set @wheel5, @wheel5 - 4;
+  goto L_Big;
+
+  L_Big_Counter:
+  set @wheel3, @wheel3 - 1;
+  if (@wheel3 < 0) set @wheel3, @wheel3 + 4;
+  set @wheel4, @wheel4 + 1;
+  if (@wheel4 > 3) set @wheel4, @wheel4 - 4;
+  set @wheel5, @wheel5 - 1;
+  if (@wheel5 < 0) set @wheel5, @wheel5 + 4;
+  goto L_Big;
+
+  L_Work:
+  mes "[Mechanical Device]";
+  mes "After you've adjusted the cogwheels this way, the device started to work.";
+  mes "It produced a small metal object.";
+  next;
+
+  set ThanaQuest, ThanaQuest | 16;
+  getitem 7424,1;  // Green Key
+
+  mes "[Mechanical Device]";
+  mes "You found the ^84A684Green Key^000000.";
+  close;
+
+  L_Switches:
+  mes "[Mechanical Device]";
+  mes "There are many switches, but most of them are stuck or seem to have no effect on the device.";
+  close;
+
+  L_Tubes:
+  mes "[Mechanical Device]";
+  mes "There are some tubes and wires which are connected to the other parts of the device.";
+  mes "It seems all tubes and wires are as they are supposed to be.";
+  close;
+
+  L_End:
+  mes "[Mechanical Device]";
+  mes "You left the mechanical device alone.";
+  close;
+
+}
+
+
+// Mechanical Device - Black Key
+tha_t09.gat,19,158,0	script	Mechanical Device#5	111,{
+
+  if (ThanaQuest & 32) {
+
+    mes "[Mechanical Device]";
+    mes "This is where you found the";
+    mes "^9C716BBlack Key^000000.";
+    close;
+
+  }
+
+  mes "[Mechanical Device]";
+  mes "There's a small mechanical device here.";
+  next;
+  menu "Investigate the device.",-,
+       "Leave it alone.",L_End;
+
+  mes "[Mechanical Device]";
+  mes "After investigating it closely, you find a small drawer with something in it.";
+  mes "You take it out of the drawer.";
+  next;
+
+  set ThanaQuest, ThanaQuest | 32;
+  getitem 7425,1;  // Black Key
+
+  mes "[Mechanical Device]";
+  mes "You found the ^84A684Black Key^000000.";
+  close;
+
+  L_End:
+  mes "[Mechanical Device]";
+  mes "You left the mechanical device alone.";
+  close;
+
+}
+
+
+// Seal - Blue Magical Stone
+tha_t04.gat,150,44,0	script	Seal#1	111,{
+
+  if (ThanaQuest < 63) {
+
+    mes "[Seal]";
+    mes "There is a seal here, but it seems it cannot be revealed.";
+    close;
+
+  }
+
+  if (ThanaQuest & 64) {
+
+    mes "[Seal]";
+    mes "This is where you found the";
+    mes "^738EE7Blue Magical Stone^000000.";
+    close;
+
+  }
+
+  mes "[Seal]";
+  mes "There's a seal here.";
+  next;
+
+  mes "[Seal]";
+  mes "It seems it can be revealed with a certain ^8CA6EFKey^000000...";
+  next;
+
+  input @input$;
+
+  if (@input$ != "Blue Key" || countitem(7423) < 1) goto L_Wrong;
+
+  mes "[Seal]";
+  mes "After you've inserted the ^8CA6EFBlue Key^000000, the seal opened and revealed a beautiful Crystal.";
+  next;
+
+  set ThanaQuest, ThanaQuest | 64;
+  delitem 7423,1; // Blue Key
+  getitem 7428,1; // Blue Magical Stone
+
+  mes "[Seal]";
+  mes "You found the ^738EE7Blue Magical Stone^000000.";
+  close;
+
+  L_Wrong:
+  mes "[Seal]";
+  mes "Nothing happened.";
+  close;
+
+}
+
+
+// Seal - Red Magical Stone
+tha_t05.gat,218,116,0	script	Seal#2	111,{
+
+  if (ThanaQuest < 63) {
+
+    mes "[Seal]";
+    mes "There is a seal here, but it seems it cannot be revealed.";
+    close;
+
+  }
+
+  if (ThanaQuest & 128) {
+
+    mes "[Seal]";
+    mes "This is where you found the";
+    mes "^CE6163Red Magical Stone^000000.";
+    close;
+
+  }
+
+  mes "[Seal]";
+  mes "There's a seal here.";
+  next;
+
+  mes "[Seal]";
+  mes "It seems it can be revealed with a certain ^EF797BKey^000000...";
+  next;
+
+  input @input$;
+
+  if (@input$ != "Red Key" || countitem(7421) < 1) goto L_Wrong;
+
+  mes "[Seal]";
+  mes "After you've inserted the ^EF797BRed Key^000000, the seal opened and revealed a beautiful Crystal.";
+  next;
+
+  set ThanaQuest, ThanaQuest | 128;
+  delitem 7421,1; // Red Key
+  getitem 7426,1; // Red Magical Stone
+
+  mes "[Seal]";
+  mes "You found the ^CE6163Red Magical Stone^000000.";
+  close;
+
+  L_Wrong:
+  mes "[Seal]";
+  mes "Nothing happened.";
+  close;
+
+}
+
+
+// Seal - Black Magical Stone
+tha_t06.gat,226,230,0	script	Seal#3	111,{
+
+  if (ThanaQuest < 63) {
+
+    mes "[Seal]";
+    mes "There is a seal here, but it seems it cannot be revealed.";
+    close;
+
+  }
+
+  if (ThanaQuest & 256) {
+
+    mes "[Seal]";
+    mes "This is where you found the";
+    mes "^7B698CBlack Magical Stone^000000.";
+    close;
+
+  }
+
+  mes "[Seal]";
+  mes "There's a seal here.";
+  next;
+
+  mes "[Seal]";
+  mes "It seems it can be revealed with a certain ^84A684Key^000000...";
+  next;
+
+  input @input$;
+
+  if (@input$ != "Black Key" || countitem(7425) < 1) goto L_Wrong;
+
+  mes "[Seal]";
+  mes "After you've inserted the ^84A684Black Key^000000, the seal opened and revealed a beautiful Crystal.";
+  next;
+
+  set ThanaQuest, ThanaQuest | 256;
+  delitem 7425,1; // Black Key
+  getitem 7430,1; // Black Magical Stone
+
+  mes "[Seal]";
+  mes "You found the ^7B698CBlack Magical Stone^000000.";
+  close;
+
+  L_Wrong:
+  mes "[Seal]";
+  mes "Nothing happened.";
+  close;
+
+}
+
+
+// Seal - Yellow Magical Stone
+tha_t07.gat,113,129,0	script	Seal#4	111,{
+
+  if (ThanaQuest < 63) {
+
+    mes "[Seal]";
+    mes "There is a seal here, but it seems it cannot be revealed.";
+    close;
+
+  }
+
+  if (ThanaQuest & 512) {
+
+    mes "[Seal]";
+    mes "This is where you found the";
+    mes "^EFA673Yellow Magical Stone^000000.";
+    close;
+
+  }
+
+  mes "[Seal]";
+  mes "There's a seal here.";
+  next;
+
+  mes "[Seal]";
+  mes "It seems it can be revealed with a certain ^DE9673Key^000000...";
+  next;
+
+  input @input$;
+
+  if (@input$ != "Yellow Key" || countitem(7422) < 1) goto L_Wrong;
+
+  mes "[Seal]";
+  mes "After you've inserted the ^DE9673Yellow Key^000000, the seal opened and revealed a beautiful Crystal.";
+  next;
+
+  set ThanaQuest, ThanaQuest | 512;
+  delitem 7422,1; // Yellow Key
+  getitem 7427,1; // Yellow Magical Stone
+
+  mes "[Seal]";
+  mes "You found the ^EFA673Yellow Magical Stone^000000.";
+  close;
+
+  L_Wrong:
+  mes "[Seal]";
+  mes "Nothing happened.";
+  close;
+
+}
+
+// Seal - Green Magical Stone
+tha_t10.gat,129,159,0	script	Seal#5	111,{
+
+  if (ThanaQuest < 63) {
+
+    mes "[Seal]";
+    mes "There is a seal here, but it seems it cannot be revealed.";
+    close;
+
+  }
+
+  if (ThanaQuest & 1024) {
+
+    mes "[Seal]";
+    mes "This is where you found the";
+    mes "^738652Green Magical Stone^000000.";
+    close;
+
+  }
+
+  mes "[Seal]";
+  mes "There's a seal here.";
+  next;
+
+  mes "[Seal]";
+  mes "It seems it can be revealed with a certain ^84A684Key^000000...";
+  next;
+
+  input @input$;
+
+  if (@input$ != "Green Key" || countitem(7424) < 1) goto L_Wrong;
+
+  mes "[Seal]";
+  mes "After you've inserted the ^84A684Green Key^000000, the seal opened and revealed a beautiful Crystal.";
+  next;
+
+  set ThanaQuest, ThanaQuest | 1024;
+  delitem 7424,1; // Green Key
+  getitem 7429,1; // Green Magical Stone
+
+  mes "[Seal]";
+  mes "You found the ^738652Green Magical Stone^000000.";
+  close;
+
+  L_Wrong:
+  mes "[Seal]";
+  mes "Nothing happened.";
+  close;
+
+}
+
+
+// Stone Statue - Floor 9
+tha_t09.gat,82,99,0	script	Stone Statue#09a	111,{
+
+  mes "[Stone Statue]";
+  mes "There is a lever here.";
+  if (ThanaSteps & 1) mes "It is pointing up.";
+  else mes "It is pointing down.";
+  next;
+  menu "Pull the lever.",-,
+       "Leave it as it is.",L_End;
+
+  set ThanaSteps, ThanaSteps ^ 1;
+
+  mes "[Stone Statue]";
+  mes "You decided to pull the lever.";
+  mes "It sounded as if it started some mechanical process.";
+  close;
+
+  L_End:
+  mes "[Stone Statue]";
+  mes "You decided to leave the lever as it is.";
+  close;
+
+}
+
+
+// Stone Statue - Floor 10 (A)
+tha_t10.gat,159,97,0	script	Stone Statue#10a	111,{
+
+  mes "[Stone Statue]";
+  mes "There is a lever here.";
+  if (ThanaSteps & 2) mes "It is pointing up.";
+  else mes "It is pointing down.";
+  next;
+  menu "Pull the lever.",-,
+       "Leave it as it is.",L_End;
+
+  set ThanaSteps, ThanaSteps ^ 2;
+  if (ThanaSteps & 4) set ThanaSteps, ThanaSteps ^ 4;
+
+  mes "[Stone Statue]";
+  mes "You decided to pull the lever.";
+  mes "It sounded as if it started some mechanical process.";
+  close;
+
+  L_End:
+  mes "[Stone Statue]";
+  mes "You decided to leave the lever as it is.";
+  close;
+
+}
+
+
+// Stone Statue - Floor 10 (B)
+tha_t10.gat,97,97,0	script	Stone Statue#10b	111,{
+
+  if (ThanaSteps & 2) {
+
+    mes "[Stone Statue]";
+    mes "There is a lever here.";
+    if (ThanaSteps & 4) mes "It is pointing up.";
+    else mes "It is pointing down.";
+    next;
+    menu "Pull the lever.",-,
+         "Leave it as it is.",L_End;
+
+    if (ThanaSteps & 4) set ThanaSteps, ThanaSteps ^ 2;
+    set ThanaSteps, ThanaSteps ^ 4;
+
+    mes "[Stone Statue]";
+    mes "You decided to pull the lever.";
+    mes "It sounded as if it started some mechanical process.";
+    close;
+
+  }
+
+  mes "[Stone Statue]";
+  mes "There is a lever here, but it cannot be moved.";
+  close;
+
+  L_End:
+  mes "[Stone Statue]";
+  mes "You decided to leave the lever as it is.";
+  close;
+
+}
+
+
+// Stone Statue - Floor 11 (A)
+tha_t11.gat,85,85,0	script	Stone Statue#11a	111,{
+
+  mes "[Stone Statue]";
+  mes "There is a lever here.";
+  if (ThanaSteps & 8) mes "It is pointing up.";
+  else mes "It is pointing down.";
+  next;
+  menu "Pull the lever.",-,
+       "Leave it as it is.",L_End;
+
+  if (ThanaSteps & 8) {
+    if (ThanaSteps & 64) set ThanaSteps, ThanaSteps ^ 64;
+    if (ThanaSteps & 32) set ThanaSteps, ThanaSteps ^ 32;
+    if (ThanaSteps & 16) set ThanaSteps, ThanaSteps ^ 16;
+  }
+  set ThanaSteps, ThanaSteps ^ 8;
+
+  mes "[Stone Statue]";
+  mes "You decided to pull the lever.";
+  mes "It sounded as if it started some mechanical process.";
+  close;
+
+  L_End:
+  mes "[Stone Statue]";
+  mes "You decided to leave the lever as it is.";
+  close;
+
+}
+
+
+// Stone Statue - Floor 11 (B)
+tha_t11.gat,16,16,0	script	Stone Statue#11b	111,{
+
+  if (ThanaSteps & 8) {
+
+    mes "[Stone Statue]";
+    mes "There is a lever here.";
+    if (ThanaSteps & 16) mes "It is pointing up.";
+    else mes "It is pointing down.";
+    next;
+    menu "Pull the lever.",-,
+         "Leave it as it is.",L_End;
+
+    if (ThanaSteps & 16) {
+      if (ThanaSteps & 64) set ThanaSteps, ThanaSteps ^ 64;
+      if (ThanaSteps & 32) set ThanaSteps, ThanaSteps ^ 32;
+      set ThanaSteps, ThanaSteps ^ 8;
+    }
+    set ThanaSteps, ThanaSteps ^ 16;
+
+    mes "[Stone Statue]";
+    mes "You decided to pull the lever.";
+    mes "It sounded as if it started some mechanical process.";
+    close;
+
+  }
+
+  mes "[Stone Statue]";
+  mes "There is a lever here, but it cannot be moved.";
+  close;
+
+  L_End:
+  mes "[Stone Statue]";
+  mes "You decided to leave the lever as it is.";
+  close;
+
+}
+
+
+// Stone Statue - Floor 11 (C)
+tha_t11.gat,85,16,0	script	Stone Statue#11c	111,{
+
+  if (ThanaSteps & 16) {
+
+    mes "[Stone Statue]";
+    mes "There is a lever here.";
+    if (ThanaSteps & 32) mes "It is pointing up.";
+    else mes "It is pointing down.";
+    next;
+    menu "Pull the lever.",-,
+         "Leave it as it is.",L_End;
+
+    if (ThanaSteps & 32) {
+      if (ThanaSteps & 64) set ThanaSteps, ThanaSteps ^ 64;
+      set ThanaSteps, ThanaSteps ^ 16;
+      set ThanaSteps, ThanaSteps ^ 8;
+    }
+    set ThanaSteps, ThanaSteps ^ 32;
+
+    mes "[Stone Statue]";
+    mes "You decided to pull the lever.";
+    mes "It sounded as if it started some mechanical process.";
+    close;
+
+  }
+
+  mes "[Stone Statue]";
+  mes "There is a lever here, but it cannot be moved.";
+  close;
+
+  L_End:
+  mes "[Stone Statue]";
+  mes "You decided to leave the lever as it is.";
+  close;
+
+}
+
+
+// Stone Statue - Floor 11 (D)
+tha_t11.gat,16,85,0	script	Stone Statue#11d	111,{
+
+  if (ThanaSteps & 32) {
+
+    mes "[Stone Statue]";
+    mes "There is a lever here.";
+    if (ThanaSteps & 64) mes "It is pointing up.";
+    else mes "It is pointing down.";
+    next;
+    menu "Pull the lever.",-,
+         "Leave it as it is.",L_End;
+
+    if (ThanaSteps & 64) {
+      set ThanaSteps, ThanaSteps ^ 32;
+      set ThanaSteps, ThanaSteps ^ 16;
+      set ThanaSteps, ThanaSteps ^ 8;
+    }
+    set ThanaSteps, ThanaSteps ^ 64;
+
+    mes "[Stone Statue]";
+    mes "You decided to pull the lever.";
+    mes "It sounded as if it started some mechanical process.";
+    close;
+
+  }
+
+  mes "[Stone Statue]";
+  mes "There is a lever here, but it cannot be moved.";
+  close;
+
+  L_End:
+  mes "[Stone Statue]";
+  mes "You decided to leave the lever as it is.";
+  close;
+
+}
+
+
+// Stone Statue - Red Magical Stone
+tha_t12.gat,96,58,0	script	Stone Statue#12a	111,{
+
+  if (ThanaQuest < 2047) {
+
+    mes "[Stone Statue]";
+    mes "There is a socket here, but you don't know what to do.";
+    close;
+
+  }
+
+  if (ThanaQuest & 2048) {
+
+    mes "[Stone Statue]";
+    mes "This is where you inserted the ^CE6163Red Magical Stone^000000.";
+    close;
+
+  }
+
+  mes "[Stone Statue]";
+  mes "There's a socket here.";
+  next;
+
+  input @input$;
+
+  if (@input$ != "Red Magical Stone" || countitem(7426) < 1) goto L_Wrong;
+
+  set ThanaQuest, ThanaQuest | 2048;
+  delitem 7426,1; // Red Magical Stone
+
+  mes "[Stone Statue]";
+  mes "You've inserted the ^CE6163Red Magical Stone^000000 into the socket and it fits perfectly.";
+  close;
+
+  L_Wrong:
+  mes "[Stone Statue]";
+  mes "Nothing happened.";
+  close;
+
+}
+
+
+// Stone Statue - Yellow Magical Stone
+tha_t12.gat,161,58,0	script	Stone Statue#12b	111,{
+
+  if (ThanaQuest < 2047) {
+
+    mes "[Stone Statue]";
+    mes "There is a socket here, but you don't know what to do.";
+    close;
+
+  }
+
+  if (ThanaQuest & 4096) {
+
+    mes "[Stone Statue]";
+    mes "This is where you inserted the ^EFA673Yellow Magical Stone^000000.";
+    close;
+
+  }
+
+  mes "[Stone Statue]";
+  mes "There's a socket here.";
+  next;
+
+  input @input$;
+
+  if (@input$ != "Yellow Magical Stone" || countitem(7427) < 1) goto L_Wrong;
+
+  set ThanaQuest, ThanaQuest | 4096;
+  delitem 7427,1; // Yellow Magical Stone
+
+  mes "[Stone Statue]";
+  mes "You've inserted the ^EFA673Yellow Magical Stone^000000 into the socket and it fits perfectly.";
+  close;
+
+  L_Wrong:
+  mes "[Stone Statue]";
+  mes "Nothing happened.";
+  close;
+
+}
+
+
+// Stone Statue - Blue Magical Stone
+tha_t12.gat,104,18,0	script	Stone Statue#12c	111,{
+
+  if (ThanaQuest < 2047) {
+
+    mes "[Stone Statue]";
+    mes "There is a socket here, but you don't know what to do.";
+    close;
+
+  }
+
+  if (ThanaQuest & 8192) {
+
+    mes "[Stone Statue]";
+    mes "This is where you inserted the ^738EE7Blue Magical Stone^000000.";
+    close;
+
+  }
+
+  mes "[Stone Statue]";
+  mes "There's a socket here.";
+  next;
+
+  input @input$;
+
+  if (@input$ != "Blue Magical Stone" || countitem(7428) < 1) goto L_Wrong;
+
+  set ThanaQuest, ThanaQuest | 8192;
+  delitem 7428,1; // Blue Magical Stone
+
+  mes "[Stone Statue]";
+  mes "You've inserted the ^738EE7Blue Magical Stone^000000 into the socket and it fits perfectly.";
+  close;
+
+  L_Wrong:
+  mes "[Stone Statue]";
+  mes "Nothing happened.";
+  close;
+
+}
+
+
+// Stone Statue - Green Magical Stone
+tha_t12.gat,154,18,0	script	Stone Statue#12d	111,{
+
+  if (ThanaQuest < 2047) {
+
+    mes "[Stone Statue]";
+    mes "There is a socket here, but you don't know what to do.";
+    close;
+
+  }
+
+  if (ThanaQuest & 16384) {
+
+    mes "[Stone Statue]";
+    mes "This is where you inserted the ^738652Green Magical Stone^000000.";
+    close;
+
+  }
+
+  mes "[Stone Statue]";
+  mes "There's a socket here.";
+  next;
+
+  input @input$;
+
+  if (@input$ != "Green Magical Stone" || countitem(7429) < 1) goto L_Wrong;
+
+  set ThanaQuest, ThanaQuest | 16384;
+  delitem 7429,1; // Green Magical Stone
+
+  mes "[Stone Statue]";
+  mes "You've inserted the ^738652Green Magical Stone^000000 into the socket and it fits perfectly.";
+  close;
+
+  L_Wrong:
+  mes "[Stone Statue]";
+  mes "Nothing happened.";
+  close;
+
+}
+
+
+// Stone Statue - Black Magical Stone
+tha_t12.gat,128,86,0	script	Stone Statue#12e	111,{
+
+  if (ThanaQuest < 2047) {
+
+    mes "[Stone Statue]";
+    mes "There is a socket here, but you don't know what to do.";
+    close;
+
+  }
+
+  if (ThanaQuest & 32768) {
+
+    mes "[Stone Statue]";
+    mes "This is where you inserted the ^7B698CBlack Magical Stone^000000.";
+    close;
+
+  }
+
+  mes "[Stone Statue]";
+  mes "There's a socket here.";
+  next;
+
+  input @input$;
+
+  if (@input$ != "Black Magical Stone" || countitem(7430) < 1) goto L_Wrong;
+
+  set ThanaQuest, ThanaQuest | 32768;
+  delitem 7430,1; // Black Magical Stone
+
+  mes "[Stone Statue]";
+  mes "You've inserted the ^7B698CBlack Magical Stone^000000 into the socket and it fits perfectly.";
+  close;
+
+  L_Wrong:
+  mes "[Stone Statue]";
+  mes "Nothing happened.";
+  close;
+
+}
+
+
+// Carvings
+tha_t12.gat,130,52,0	script	Carvings#1	111,{
+
+  mes "[Carvings]";
+  mes "There are some beautifull carvings here.";
+  next;
+
+  mes "[Carvings]";
+  mes "As you look closer at the carvings, a portal opens and takes you away...";
+  next;
+
+  if (ThanaQuest < 65535) {
+
+    warp "thana_step.gat",185,15;
+    end;
+
+  }
+
+  warp "thana_step.gat",73,288;
+  end;
+
+}
+
+
+// Seal of Sorrow
+thana_boss.gat,217,167,0	script	Carvings#2	111,{
+
+  if ($Thana & 1) {
+
+    mes "[Carvings]";
+    mes "This is where you inserted the ^CE86C6Fragment of Sorrow^000000.";
+    close;
+
+  }
+
+  mes "[Carvings]";
+  mes "There's a hole in the floor, which seems to be made for something to fit in.";
+  mes "It twinkles in ^CE86C6violet color^000000.";
+  next;
+
+  menu "Insert ^CE86C6Fragment of Sorrow^000000",L_Sorrow,
+       "Insert ^7B9663Fragment of Agony^000000",L_Agony,
+       "Insert ^8C79ADFragment of Hatred^000000",L_Hatred,
+       "Insert ^F7865AFragment of Despair^000000",L_Despair,
+       "Don't insert something.",L_End;
+
+  L_Sorrow:
+  if (countitem(7437) == 0) goto L_NoFragment;
+
+  delitem 7437,1;
+  stopnpctimer "TimerThana";
+  set $Thana, $Thana | 1;
+  initnpctimer "TimerThana";
+  mapannounce "thana_boss.gat", "The Seal of Sorrow has been broken.",bc_npc;
+
+  mes "[Carvings]";
+  mes "You've inserted the ^CE86C6Fragment of Sorrow^000000 into the hole and it fits perfectly.";
+  mes "It now glows in bright ^CE86C6violet color^000000.";
+  if ($Thana >= 15) close;
+  next;
+
+  mes "[Carvings]";
+  mes "Hurry now, tell your comrades to insert the other fragments.";
+  close;
+
+  L_Agony:
+  if (countitem(7436) == 0) goto L_NoFragment;
+  mes "[Carvings]";
+  mes "You've tried to insert the ^7B9663Fragment of Agony^000000 into the hole, but it didn't fit.";
+  close;
+
+  L_Hatred:
+  if (countitem(7438) == 0) goto L_NoFragment;
+  mes "[Carvings]";
+  mes "You've tried to insert the ^8C79ADFragment of Hatred^000000 into the hole, but it didn't fit.";
+  close;
+
+  L_Despair:
+  if (countitem(7439) == 0) goto L_NoFragment;
+  mes "[Carvings]";
+  mes "You've tried to insert the ^F7865AFragment of Despair^000000 into the hole, but it didn't fit.";
+  close;
+
+  L_NoFragment:
+  mes "[Carvings]";
+  mes "You don't have this fragment.";
+  close;
+
+  L_End:
+  mes "[Carvings]";
+  mes "You left the cravings alone.";
+  close;
+
+  OnInit:
+  set $Thana, 0;
+  end;
+
+}
+
+
+// Seal of Agony
+thana_boss.gat,202,75,0	script	Carvings#3	111,{
+
+  if ($Thana & 2) {
+
+    mes "[Carvings]";
+    mes "This is where you inserted the ^7B9663Fragment of Agony^000000.";
+    close;
+
+  }
+
+  mes "[Carvings]";
+  mes "There's a hole in the floor, which seems to be made for something to fit in.";
+  mes "It twinkles in ^7B9663green color^000000.";
+  next;
+
+  menu "Insert ^CE86C6Fragment of Sorrow^000000",L_Sorrow,
+       "Insert ^7B9663Fragment of Agony^000000",L_Agony,
+       "Insert ^8C79ADFragment of Hatred^000000",L_Hatred,
+       "Insert ^F7865AFragment of Despair^000000",L_Despair,
+       "Don't insert something.",L_End;
+
+  L_Sorrow:
+  if (countitem(7437) == 0) goto L_NoFragment;
+  mes "[Carvings]";
+  mes "You've tried to insert the ^CE86C6Fragment of Sorrow^000000 into the hole, but it didn't fit.";
+  close;
+
+  L_Agony:
+  if (countitem(7436) == 0) goto L_NoFragment;
+
+  delitem 7436,1;
+  stopnpctimer "TimerThana";
+  set $Thana, $Thana | 2;
+  initnpctimer "TimerThana";
+  mapannounce "thana_boss.gat", "The Seal of Agony has been broken.",bc_npc;
+
+  mes "[Carvings]";
+  mes "You've inserted the ^7B9663Fragment of Agony^000000 into the hole and it fits perfectly.";
+  mes "It now glows in bright ^7B9663green color^000000.";
+  if ($Thana >= 15) close;
+  next;
+
+  mes "[Carvings]";
+  mes "Hurry now, tell your comrades to insert the other fragments.";
+  close;
+
+  L_Hatred:
+  if (countitem(7438) == 0) goto L_NoFragment;
+  mes "[Carvings]";
+  mes "You've tried to insert the ^8C79ADFragment of Hatred^000000 into the hole, but it didn't fit.";
+  close;
+
+  L_Despair:
+  if (countitem(7439) == 0) goto L_NoFragment;
+  mes "[Carvings]";
+  mes "You've tried to insert the ^F7865AFragment of Despair^000000 into the hole, but it didn't fit.";
+  close;
+
+  L_NoFragment:
+  mes "[Carvings]";
+  mes "You don't have this fragment.";
+  close;
+
+  L_End:
+  mes "[Carvings]";
+  mes "You left the cravings alone.";
+  close;
+
+}
+
+
+// Seal of Hatred
+thana_boss.gat,80,76,0	script	Carvings#4	111,{
+
+  if ($Thana & 4) {
+
+    mes "[Carvings]";
+    mes "This is where you inserted the ^8C79ADFragment of Hatred^000000.";
+    close;
+
+  }
+
+  mes "[Carvings]";
+  mes "There's a hole in the floor, which seems to be made for something to fit in.";
+  mes "It twinkles in ^8C79ADblue color^000000.";
+  next;
+
+  menu "Insert ^CE86C6Fragment of Sorrow^000000",L_Sorrow,
+       "Insert ^7B9663Fragment of Agony^000000",L_Agony,
+       "Insert ^8C79ADFragment of Hatred^000000",L_Hatred,
+       "Insert ^F7865AFragment of Despair^000000",L_Despair,
+       "Don't insert something.",L_End;
+
+  L_Sorrow:
+  if (countitem(7437) == 0) goto L_NoFragment;
+  mes "[Carvings]";
+  mes "You've tried to insert the ^CE86C6Fragment of Sorrow^000000 into the hole, but it didn't fit.";
+  close;
+
+  L_Agony:
+  if (countitem(7436) == 0) goto L_NoFragment;
+  mes "[Carvings]";
+  mes "You've tried to insert the ^7B9663Fragment of Agony^000000 into the hole, but it didn't fit.";
+  close;
+
+  L_Hatred:
+  if (countitem(7438) == 0) goto L_NoFragment;
+
+  delitem 7438,1;
+  stopnpctimer "TimerThana";
+  set $Thana, $Thana | 4;
+  initnpctimer "TimerThana";
+  mapannounce "thana_boss.gat", "The Seal of Hatred has been broken.",bc_npc;
+
+  mes "[Carvings]";
+  mes "You've inserted the ^8C79ADFragment of Hatred^000000 into the hole and it fits perfectly.";
+  mes "It now glows in bright ^8C79ADblue color^000000.";
+  if ($Thana >= 15) close;
+  next;
+
+  mes "[Carvings]";
+  mes "Hurry now, tell your comrades to insert the other fragments.";
+  close;
+
+  L_Despair:
+  if (countitem(7439) == 0) goto L_NoFragment;
+  mes "[Carvings]";
+  mes "You've tried to insert the ^F7865AFragment of Despair^000000 into the hole, but it didn't fit.";
+  close;
+
+  L_NoFragment:
+  mes "[Carvings]";
+  mes "You don't have this fragment.";
+  close;
+
+  L_End:
+  mes "[Carvings]";
+  mes "You left the cravings alone.";
+  close;
+
+}
+
+
+// Seal of Despair
+thana_boss.gat,62,171,0	script	Carvings#5	111,{
+
+  if ($Thana & 8) {
+
+    mes "[Carvings]";
+    mes "This is where you inserted the ^F7865AFragment of Despair^000000.";
+    close;
+
+  }
+
+  mes "[Carvings]";
+  mes "There's a hole in the floor, which seems to be made for something to fit in.";
+  mes "It twinkles in ^F7865Ared color^000000.";
+  next;
+
+  menu "Insert ^CE86C6Fragment of Sorrow^000000",L_Sorrow,
+       "Insert ^7B9663Fragment of Agony^000000",L_Agony,
+       "Insert ^8C79ADFragment of Hatred^000000",L_Hatred,
+       "Insert ^F7865AFragment of Despair^000000",L_Despair,
+       "Don't insert something.",L_End;
+
+  L_Sorrow:
+  if (countitem(7437) == 0) goto L_NoFragment;
+  mes "[Carvings]";
+  mes "You've tried to insert the ^CE86C6Fragment of Sorrow^000000 into the hole, but it didn't fit.";
+  close;
+
+  L_Agony:
+  if (countitem(7436) == 0) goto L_NoFragment;
+  mes "[Carvings]";
+  mes "You've tried to insert the ^7B9663Fragment of Agony^000000 into the hole, but it didn't fit.";
+  close;
+
+  L_Hatred:
+  if (countitem(7438) == 0) goto L_NoFragment;
+  mes "[Carvings]";
+  mes "You've tried to insert the ^8C79ADFragment of Hatred^000000 into the hole, but it didn't fit.";
+  close;
+
+  L_Despair:
+  if (countitem(7439) == 0) goto L_NoFragment;
+
+  delitem 7439,1;
+  stopnpctimer "TimerThana";
+  set $Thana, $Thana | 8;
+  initnpctimer "TimerThana";
+  mapannounce "thana_boss.gat", "The Seal of Despair has been broken.",bc_npc;
+
+  mes "[Carvings]";
+  mes "You've inserted the ^F7865AFragment of Despair^000000 into the hole and it fits perfectly.";
+  mes "It now glows in bright ^F7865Ared color^000000.";
+  if ($Thana >= 15) close;
+  next;
+
+  mes "[Carvings]";
+  mes "Hurry now, tell your comrades to insert the other fragments.";
+  close;
+
+  L_NoFragment:
+  mes "[Carvings]";
+  mes "You don't have this fragment.";
+  close;
+
+  L_End:
+  mes "[Carvings]";
+  mes "You left the cravings alone.";
+  close;
+
+}
+
+
+// Seal of Thanatos
+thana_boss.gat,141,217,0	script	Carvings#6	111,{
+
+	if ($Thana == 15) {
+
+		mes "[Carvings]";
+		mes "You stepped on the plate, and it seems it activated some sort of mechanism.";
+		next;
+
+		if (!getmapmobs("thana_boss.gat")) {
+			monster "thana_boss.gat",135,119,"Thanatos",1708,1,"TimerThana::OnThanaDead";
+			stopnpctimer "TimerThana";
+			set $Thana, $Thana | 16; 
+			mapannounce "thana_boss.gat", "The Seal of Thanatos has been broken.",bc_npc;
+			mes "[Carvings]";
+			mes "You hear the screams of the undead coming from below...";
+			close;
+		} else {
+			mes "[Carvings]";
+			mes "But nothing happened...";
+			close;
+		}
+	}
+
+	mes "[Carvings]";
+	mes "There is a plate here, which seems to be some sort of switch, but it doesn't move.";
+	close;
+
+}
+
+
+// NPC Timer
+thana_boss.gat,1,1,1	script	TimerThana	-1,{
+
+  // 10 secs
+  OnTimer10000:
+
+    if ($Thana >= 15) end;
+    stopnpctimer;
+    mapannounce "thana_boss.gat", "You didn't manage to break all four Seals in time...",bc_npc;
+    set $Thana, 0;
+    end;
+
+  OnThanaDead:
+
+    initnpctimer;
+    end;
+
+  // 600 secs = 10 mins
+  OnTimer600000:
+
+    stopnpctimer;
+    set $Thana, 0;
+    end;
+
+}