//================= Hercules Script =======================================
//=       _   _                     _
//=      | | | |                   | |
//=      | |_| | ___ _ __ ___ _   _| | ___  ___
//=      |  _  |/ _ \ '__/ __| | | | |/ _ \/ __|
//=      | | | |  __/ | | (__| |_| | |  __/\__ \
//=      \_| |_/\___|_|  \___|\__,_|_|\___||___/
//================= License ===============================================
//= This file is part of Hercules.
//= http://herc.ws - http://github.com/HerculesWS/Hercules
//=
//= Copyright (C) 2012-2015  Hercules Dev Team
//= Copyright (C)  Frost
//= Copyright (C)  Dastgir
//= Copyright (C)  Joseph
//= Copyright (C)  Masao
//= Copyright (C)  Euphy
//= Copyright (C)  Muad_Dib
//= Copyright (C)  Gennosuke Kouga
//=
//= Hercules is free software: you can redistribute it and/or modify
//= it under the terms of the GNU General Public License as published by
//= the Free Software Foundation, either version 3 of the License, or
//= (at your option) any later version.
//=
//= This program is distributed in the hope that it will be useful,
//= but WITHOUT ANY WARRANTY; without even the implied warranty of
//= MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
//= GNU General Public License for more details.
//=
//= You should have received a copy of the GNU General Public License
//= along with this program.  If not, see <http://www.gnu.org/licenses/>.
//=========================================================================
//= El Dicastes Quest NPCs
//================= File Encoding =========================================
//= CP-949 (EUC-KR compatible). Do NOT read/save it as UTF-8.
//= -If the encoding is correct, the next three lines have the same length-
//= ============ ¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä ============
//= ============ ============================================= ============
//= ============ ¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á ============
//================= Description ===========================================
//= Quest NPCs related to Dewata:
//= - Sapha's Visit, Doha's Secrect Order, Frede's Request,
//= - Department Quests, Document Quests,
//= - Chesire's Call, Cat Hands Enchantment
//= - Cat Hand Agent
//================= Current Version =======================================
//= 2.5
//=========================================================================

//== Entrance ==============================================
manuk,321,182,5	script	Entrance Manager#ep133	4_MAN_GALTUN,{
	if (!isequipped(2782)) {
		mes "[Average Galten]";
		mes sprintf("¢¤¡ð¡ú? ¢£ ¡ù¡ð...");
		mes sprintf("¡ï¡ò¡Ð ¢¤ ?");
		mes sprintf("¡ñ¡ï..?");
		close;
	}
	if (ep13_3_invite >= 4) {
		mes "[Entrance Manager]";
		mes "Are you visiting the capital city, El Dicastes?";
		next;
		if(select("Yes.", "No.") == 2) {
			mes "[Entrance Manager]";
			mes "Then use the tunnel next time.";
			close;
		}
		mes "[Entrance Manager]";
		mes "Be careful.";
		close2;
		warp "dic_dun01",33,212;
		end;
	}
	mes "[Entrance Manager]";
	mes "Sorry.";
	mes "I cannot let you pass because you are not a Sapha.";
	close;
}

dic_dun01,266,113,5	script	Curious Sapha#ep13_3_	4_MAN_BENKUNI,{
	if (!isequipped(2782)) {
		mes "[Curious Sapha]";
		mes sprintf("¡ö¡ñ¡Ð ¡ò ¡õ?");
		next;
		mes "- Cannot understand a word. -";
		close;
	}
	mes "[Curious Sapha]";
	mes "Hello?";
	next;
	switch(select("What are you doing here?", "Buy research items.", "Hello!", "I want to help your research.")) {
	case 1:
		mes "[Curious Sapha]";
		mes "Do you see that dirty vigilante over there?";
		next;
		mes "[Curious Sapha]";
		mes "He was attacked by Scarabas after falling into Scaraba Hall.";
		mes "And he was the only one attacked even with others around him.";
		next;
		mes "[Curious Sapha]";
		mes "I think he slipped and fell on some secretion of the Queen Scaraba. I thought it was an accident was looking into it.";
		next;
		mes "[Curious Sapha]";
		mes "If the research results are correct, the Scarabas are very sensitive to the smell.";
		mes "Or else say they go crazy over it. Almost as if they were losing it...";
		next;
		mes "[Curious Sapha]";
		mes "I came to research the relationship between the Queen secretion component and the Scarabas.";
		mes "So I created this into a perfume to carry it easily.";
		next;
		mes "[Curious Sapha]";
		mes "I might be able to use this perfume's reaction to Scarabas and make progress in research.";
		close;
	case 2:
		if (checkweight(Knife,1) == 0) {
			mes "[Curious Sapha]";
			mes "You don't seem to have enough space.";
			close;
		}
		if (MaxWeight - Weight < 2000) {
			mes "[Curious Sapha]";
			mes "Your bags already seem too heavy.";
			close;
		}
		mes "[Curious Sapha]";
		mes "You want to buy the Scaraba Perfume? A gift for home?";
		mes "Well, it has become a rare perfume.";
		next;
		mes "[Curious Sapha]";
		mes "I'll give you a deal and sell it by 500 Zeny each. But, try not to carry it with you into Scaraba Hall.";
		mes "How many do you want? You can buy up to 100.";
		next;
		input .@input;
		.@deal = 500 * .@input;
		if (.@deal == 0) {
			mes "[Curious Sapha]";
			mes "You changed your mind?";
			close;
		}
		if (Zeny < .@deal) {
			mes "[Curious Sapha]";
			mes "You don't have enough money.";
			close;
		}
		mes "[Curious Sapha]";
		mes "Will you buy "+.@input+"?";
		next;
		if(select("Yes", "No") == 2) {
			mes "[Curious Sapha]";
			mes "You changed your mind?";
			close;
		}
		Zeny -= .@deal;
		getitem Scaraba_Perfume,.@input;
		mes "[Curious Sapha]";
		mes "Here you go. Scaraba might flock around you so don't use it near Scaraba Hall.";
		close;
	case 3:
		mes "[Curious Sapha]";
		mes "Hello? You must be a traveler. This place is dangerous so please find your way out of this tunnel.";
		close;
	case 4:
		mes "[Curious Sapha]";
		mes "Do you have any useful information?";
		mes "Please let me know!";
		input .@str$;
		next;
		mes "[Curious Sapha]";
		mes "It says ^0000FF"+.@str$+"^000000.";
		next;
		switch(rand(1,3)) {
		case 1:
			mes "[Curious Sapha]";
			mes "That is great information!";
			mes "I must start on the research.";
			close;
		case 2:
			mes "[Curious Sapha]";
			mes "I already know about that information but I'm really grateful for you to come all the way here to tell me.";
			close;
		case 3:
			mes "[Curious Sapha]";
			mes "Hmm... do you think so?";
			mes "I have some doubts about your information. I'll think it over.";
			close;
		}
	}
}

sec_in02,16,43,5	script	Scaraba Dungeon Entrance	4_MAN_BENKUNI,{
	callfunc "F_GM_NPC";
	mes "Setting you for dungeon entry.";
	mes "You will be able to go through if the password is correct.";
	if (callfunc("F_GM_NPC",1854,0) == 1) {
		ep13_3_secret = 6;
		getitem Ring_Of_Wise_King,1;
		getitem Scaraba_Perfume,2;
		mes "Setting Complete";
	} else
		mes "Wrong Password";
	close;
}

//== Vigilantes ============================================
-	script	Vigilante#main	FAKE_NPC,{
	if (compare(strnpcinfo(NPC_NAME),"ep133_26")) {
		if (!isequipped(2782)) {
			mes "[Vigilante]";
			mes sprintf("¡ô¡ó¡ö ¡÷ ¡þ¡ù¡ó?");
			mes sprintf("¢¤¡ö¡ø ¢³ ¡÷¢£¡ü ¡ø ¡Ð¡õ¡û...");
			next;
			mes "The Vigilante says something and then shakes his head.";
			mes "Looks like a negative reaction from the looks of his firm pose holding his shield in front of him.";
			close;
		}
		mes "[Vigilante]";
		mes "Manuk is just before us.";
		mes "Are you heading to Manuk?";
		next;
		if (select("Yes.", "No.") == 1) {
			mes "[Vigilante]";
			mes "I will send you to Manuk.";
			close2;
			warp "manuk",326,180;
			end;
		}
		mes "[Vigilante]";
		mes "Good luck.";
		close;
	}
	if (!isequipped(2782)) {
		mes "[Vigilante]";
		mes sprintf("¡ô¡ó¡ö ¡÷ ¡þ¡ù¡ó?");
		mes sprintf("¢¤¡ö¡ø ¢³ ¡÷¢£¡ü ¡ø ¡Ð¡õ¡û...");
		mes sprintf("¡ð¡ú¢± ¡ô ¡ò¡õ¡ú ¡õ..! ");
		next;
		mes "Cannot communicate with him.";
		close;
	}
	if (ep13_3_secret < 6) {
		mes "The area below is restricted because it is dangerous.";
		mes "I cannot let you pass because you are here as guests.";
		mes "Please follow the tunnel to get to the capital city.";
		close;
	}
	mes "[Vigilante]";
	mes "Do you need something from the cave?";
	next;
	if (select("Yes.", "No.") == 1) {
		mes "[Vigilante]";
		mes "Be careful.";
		close2;
		warp "dic_dun02",101,142;
		end;
	}
	mes "[Vigilante]";
	mes "Please step aside because it is dangerous.";
	mes "You won't know when those Scarabas will start rampaging..";
	close;

}
dic_dun01,286,104,5	duplicate(Vigilante#main)	Vigilante#ep133_23	4_MAN_GALTUN
dic_dun01,294,106,3	duplicate(Vigilante#main)	Vigilante#ep133_24	4_MAN_GALTUN1
dic_dun01,30,216,5	duplicate(Vigilante#main)	Vigilante#ep133_26	4_MAN_GALTUN1

dic_dun01,284,102,5	script	Dirty Vigilante#ep13_3	4_MAN_GALTUN,{
	if (!isequipped(2782)) {
		mes "[Vigilante]";
		mes sprintf("¡ô¡ó¡ö ¡÷ ¡þ¡ù¡ó¢¤¡ö¡ø ¢³ ¡÷¢£¡ü ¡ø ¡Ð¡õ¡û.");
		mes sprintf("¡ð¡ú¢± ¡ô ¡ò¡õ¡ú ¡õ..! ");
		next;
		mes "Cannot understand a word.";
		close;
	}
	if (ep13_3_secret < 6) {
		mes "[Vigilante]";
		mes "Hey! This is no place for a rookie like you.";
		mes "Those Scaraba can snatch you away!";
		close;
	}
	if (countitem(Scaraba_Perfume)) {
		mes "[Vigilante]";
		mes "Do you need something from the cave?";
		next;
		if (select("Yes.", "No.") == 1) {
			mes "[Vigilante]";
			mes "Ewww, what's this smell?";
			mes "Be careful. The smell from the Scaraba Secretion was picked up by other Scarabas.";
			next;
			if (select("Enter after spraying perfume.", "Do not enter because it's dangerous.") == 1) {
				if (!countitem(Scaraba_Perfume)) {
					mes "- Your Scaraba Perfume disappeared. -";
					close;
				}
				mes "[Vigilante]";
				mes "Okay. Then good luck to you. Be careful.";
				delitem Scaraba_Perfume,1;
				close2;
				warp "dic_dun03",101,142;
				end;
			}
		}
		mes "[Vigilante]";
		mes "Please step aside because it is dangerous.";
		mes "You won't know when those Scarabas will start to rampage.";
		close;
	}
	mes "[Vigilante]";
	mes "Phew, what happened?! Why are they all over me?";
	next;
	mes "[Vigilante]";
	mes "I already had bad luck in falling into Scaraba Hall and being drenched with this awful ^FF0000stench^000000 my head is starting to ache!";
	next;
	mes "- The vigilante complained while brushing off the traces of the Scarabas.";
	close;
}

mid_camp,216,246,0	script	#ep133_event03	HIDDEN_WARP_NPC,2,2,{
	end;
OnTouch:
	if (ep13_3_secret == 23) {
		donpcevent "Suspicious Guy#ep133_::OnEnable";
		cutin "ep13_loki01",2;
		mes "[Low Voice]";
		mes "Hey.";
		mes "Are you the human that met the newly appointed minister of Dicastes?";
		mes "What does he look like?";
		next;
		mes "You feel yourself pressured by this";
		mes "suspicious guy and starts to talk about Ahat voluntarily.";
		next;
		cutin "ep13_loki02",2;
		mes "[Black Clothed Guy]";
		mes "...Really?";
		mes "You've found it at last.";
		ep13_3_secret = 24;
		next;
		cutin "",255;
		donpcevent "Suspicious Guy#ep133_::OnDisable";
		mes "The guy in all black disappeared suddenly.";
		mes "Who was that?";
		close;
	}
	end;
}

mid_camp,218,250,3	script	Suspicious Guy#ep133_	4_M_ROKI,{
	mes "[Suspicious Guy]";
	mes ".....";
	hideonnpc strnpcinfo(NPC_NAME);
	close;
OnInit:
OnDisable:
	hideonnpc strnpcinfo(NPC_NAME);
OnEnable:
	hideoffnpc "Suspicious Guy#ep133_";
	end;
}

-	script	Guard#ep133_11	4_MAN_GALTUN1,{
	if (!isequipped(2782)) {
		mes "[Capital City Guard]";
		mes sprintf("¡ô¡ó¡ö ¡÷ ¡þ¡ù¡ó?");
		mes sprintf("¡ð¡ú¢± ¡ô ¡ò¡õ¡ú ¡õ..!");
		next;
		mes "- Cannot communicate with him. -";
		close;
	}
	if (ep13_3_invite < 5) {
		mes "[Capital City Guard]";
		mes "Access to the city is restricted from other races without permits.";
		mes "Please go back.";
		close;
	}
	else if (ep13_3_invite == 5) {
		mes "[Capital City Guard]";
		mes "Access to the city is restricted from other races without permits.";
		mes "Please go back.";
		next;
		mes "[Capital City Guard]";
		mes "Hmmm? You are human.";
		mes "If you went through that tunnel, you are here by Ravail's invitation?";
		next;
		select("Yes.");
		mes "[Capital City Guard]";
		mes "No wonder Vyhannus approved you.";
		mes "Understood.";
		mes "I approve your entrance and will guide you on what you should first do in El Dicastes.";
		next;
		mes "[Capital City Guard]";
		mes "First enter the fortress,";
		mes "and register yourself at Dicastes Diel located at the highest location in the north.";
		mes "You must first register to b able to move freely.";
		next;
		mes "[Capital City Guard]";
		mes "You'll see Diel if you follow here towards the north.";
		mes "You won't get lost.";
		mes "You need to find the register window at the Diel public service center.";
		close2;
		warp "dicastes01",199,41;
		end;
	}
	else if (ep13_3_invite > 5) {
		mes "[Capital City Guard]";
		mes "Are you returning to El Dicastes?";
		next;
		.@m = select("Yes. Going to the castle.", "No.") - 1;
		mes "[Capital City Guard]";
		mes "Good luck.";
		close2;
		if (!.@m) warp "dicastes01",199,41;
		end;
	}
	mes "[Capital City Guard]";
	mes "Unknown situation occurred. Case " + strnpcinfo(NPC_NAME_HIDDEN);
	mes "Please inquiry with a GM.";
	close;
}
dic_fild01,146,281,5	duplicate(Guard#ep133_11)	Capital City Guard#1	4_MAN_GALTUN1
dic_fild01,153,281,3	duplicate(Guard#ep133_11)	Capital City Guard#2	4_MAN_GALTUN

dic_in01,254,119,0	script	Item Storage#01	CLEAR_NPC,{
	mes "This is the item storage.";
	mes "There is some writing on the paper.";
	next;
	mes "+ Shay's precious safe +";
	mes "For those you want to use this safe!";
	mes "1. Is my cooking delicious?";
	mes "2. You have enough basic skills, right?";
	mes "3. It will be ^0000FF500 Zeny^000000, please!";
	next;
	mes "You'll have to put in some coins to use it.";
	mes "Insert Coins: Will you";
	mes "put in 500 Zeny?";
	next;
	if(select("Use safe", "No way.")==2) {
		mes "["+strcharinfo(PC_NAME)+"]";
		mes "I will use it later.";
		close;
	}
	if (Zeny < 500) {
		mes "Not enough Zeny.";
		close;
	}
	Zeny -= 500;
	close2;
	openstorage;
	end;
}

sec_in02,10,42,1	script	13.3 Related Reset	4_MAN_BENKUNI,{
	callfunc "F_GM_NPC";
	mes "[Reset]";
	mes "Resets all quest windows including daily and map quests for 13.3.";
	freeloop(1);
	for(.@i = 12099; .@i <= 12216; ++.@i) {
		if (questprogress(.@i))
			erasequest .@i;
	}
	freeloop(0);
	close;
}

//== Civil Services ========================================
function	script	que_dic	{
	if (!getarg(0)) {
		if (questprogress(getarg(1),HUNTING) != 2) return;
		mes getarg(3);
	}
	else if (getarg(0) == 1) {
		if (!questprogress(getarg(1))) return;
		if (countitem(getarg(3)) < getarg(4)) {
			mes "It looks like you are short on the amount.";
			close;
		}
		mes getarg(5);
		mes getarg(6,"");
		delitem getarg(3), getarg(4);
	}
	else if (getarg(0) == 2) {
		for(.@i = 1; .@i < getargcount(); ++.@i) {
			if (questprogress(getarg(.@i)))
				erasequest getarg(.@i);
		}
		return;
	}
	getexp getarg(2),0;
	erasequest getarg(1);
	specialeffect2 EF_STEAL;
	getitem 6304,1;
	close;
}

dic_in01,48,263,5	script	Hunting Dept. 1 Manager	4_MAN_BENKUNI,{
	if (checkweight(Knife,1) == 0) {
		mes "You have too many kinds of items. Let's try again after you reduce the number of items.";
		close;
	}
	if ((MaxWeight - Weight) < 1000) {
		mes "Cannot proceed because the weight of your items is too heavy. Let's try again after you get rid of some weight.";
		close;
	}
	if (!isequipped(2782)) {
		mes sprintf("¡õ¢£¡ô");
		mes sprintf("¡ö¡ø¡ó ¢£ ¡ö¡ñ¡ï ¡ù ¡ð¢²¢£");
		next;
		mes "I don't feel confident in talking since you wouldn't understand anything.";
		close;
	}
	if (ep13_3_invite < 6) {
		mes "Sapha keeps a distance from you even when you try to talk. Looks like he called on Guard Galten. Time to go.";
		close;
	}
	if (BaseLevel < 97) {
		mes "[Hunting Dept. 1 Manager]";
		mes "Umm...What are you up to? Anything to do with me?";
		close;
	}
	if (!questprogress(12159,PLAYTIME)) {
		mes "[Hunting Dept. 1 Manager]";
		mes "So you didn't get";
		mes "any requests yet.";
		mes "Laponte will have piles";
		mes "of requests and might give";
		mes "you one. Try meeting him.";
		close;
	}
	else if (questprogress(12159,PLAYTIME) == 2) {
		mes "[Hunting Dept. 1 Manager]";
		mes "Time limit has expired for the existing request.";
		next;
		mes "[Hunting Dept. 1 Manager]";
		mes "If any incomplete request is found, it will be consider that you failed it and the request will be deleted.";
		next;
		mes "[Hunting Dept. 1 Manager]";
		mes "You can get a new request after the existing request record being removed, go to see Laponte.";
		que_dic(2,12099,12100,12101,12102,12103,12104,12105,12159);
		close;
	}
	mes "[Hunting Dept. 1 Manager]";
	mes "Welcome.";
	mes "How can I help you?";
	next;
	select("I completed the request.");
	mes "[Hunting Dept. 1 Manager]";
	mes "Ah...";
	mes "You are done with the request?";
	mes "Let me check your records first.";
	next;
	mes "[Hunting Dept. 1 Manager]";
	.@s$ = "Oh, you completed all your requests. Confirmation complete.";
	que_dic(0,12099,4000,.@s$);
	que_dic(0,12100,49000,.@s$);
	que_dic(0,12101,18000,.@s$);
	que_dic(0,12102,45000,.@s$);
	que_dic(0,12103,4000,.@s$);
	que_dic(0,12104,73000,.@s$);
	que_dic(0,12105,59000,.@s$);
	mes "Um....." + strcharinfo(PC_NAME) + "";
	mes "You will be in trouble if you lie about the request...";
	close;
}

dic_in01,51,266,6	script	Hunting Dept. 2 Manager	4_MAN_BENKUNI,{
	if (checkweight(Knife,1) == 0) {
		mes "You have too many kinds of items. Let's try again after you reduce the number of items.";
		close;
	}
	if ((MaxWeight - Weight) < 1000) {
		mes "Cannot proceed because the weight of your items is too heavy. Let's try again after you get rid of some weight.";
		close;
	}
	if (!isequipped(2782)) {
		mes sprintf("¡õ¢£¡ô");
		mes sprintf("¡ö¡ø¡ó ¢£ ¡ö¡ñ¡ï ¡ù ¡ð¢²¢£");
		next;
		mes "I don't feel confident in talking since you wouldn't understand anything.";
		close;
	}
	if (ep13_3_invite < 6) {
		mes "Sapha keeps a distance from you even when you try to talk. Looks like he called on Guard Galten. Time to go.";
		close;
	}
	if (BaseLevel < 100) {
		mes "[Hunting Dept. 2 Manager]";
		mes "Ha ha, you will need to train a little more to work with me.";
		close;
	}
	if (!questprogress(12160,PLAYTIME)) {
		mes "[Hunting Dept. 2 Manager]";
		mes "So you didn't get";
		mes "any requests yet.";
		mes "Kalipo will have piles";
		mes "of requests and might give";
		mes "you one. Try to find him.";
		close;
	}
	else if (questprogress(12160,PLAYTIME) == 2) {
		mes "[Hunting Dept. 2 Manager]";
		mes "Kalipo seems to have another request for you.";
		next;
		mes "[Hunting Dept. 2 Manager]";
		mes "I will erase any other records including previous requests from Kalipo that you haven't completed yet.";
		next;
		mes "[Hunting Dept. 2 Manager]";
		mes "Your request history is cleared now. Please visit Kalipo.";
		que_dic(2,12106,12107,12108,12109,12110,12111,12160);
		close;
	}
	mes "[Hunting Dept. 2 Manager]";
	mes "Welcome.";
	mes "How can I help you?";
	next;
	select("I completed the request.");
	mes "[Hunting Dept. 2 Manager]";
	mes "Ah...";
	mes "You are done with the request?";
	mes "Let me check your records first.";
	next;
	mes "[Hunting Dept. 2 Manager]";
	.@s$ = "Oh, you completed all your requests. Confirmation complete.";
	que_dic(0,12106,77000,.@s$);
	que_dic(0,12107,47000,.@s$);
	que_dic(0,12108,50000,.@s$);
	que_dic(0,12109,53000,.@s$);
	que_dic(0,12110,30000,.@s$);
	que_dic(0,12111,42000,.@s$);
	mes "Umm.." + strcharinfo(PC_NAME) + "";
	mes "Please check your request history again. There is a discrepancy with our documents.";
	close;
}

dic_in01,51,270,7	script	Supply Dept. 1 Manager	4_MAN_BENKUNI,{
	if (checkweight(Knife,1) == 0) {
		mes "You have too many kinds of items. Let's try again after you reduce the number of items.";
		close;
	}
	if ((MaxWeight - Weight) < 1000) {
		mes "Cannot proceed because the weight of your items is too heavy. Let's try again after you get rid of some weight.";
		close;
	}
	if (!isequipped(2782)) {
		mes sprintf("¡õ¢£¡ô");
		mes sprintf("¡ö¡ø¡ó ¢£ ¡ö¡ñ¡ï ¡ù ¡ð¢²¢£");
		next;
		mes "I don't feel confident in talking since you wouldn't understand anything.";
		close;
	}
	if (ep13_3_invite < 6) {
		mes "Sapha keeps a distance from you even when you try to talk. Looks like he called on Guard Galten. Time to go.";
		close;
	}
	if (BaseLevel < 80) {
		mes "[Supply Dept. 1 Manager]";
		mes "You gotta be strong enough to deal with Supply Dept. 1.";
		close;
	}
	if (!questprogress(12161,PLAYTIME)) {
		mes "[Supply Dept. 1 Manager]";
		mes "So you didn't get";
		mes "any requests yet.";
		mes "Pura will have piles";
		mes "of requests and might give";
		mes "you one. Try meeting him.";
		close;
	}
	else if (questprogress(12161,PLAYTIME) == 2) {
		mes "[Supply Dept. 1 Manager]";
		mes "Pura is looking for you.";
		next;
		mes "[Supply Dept. 1 Manager]";
		mes "I erased all records related with the previous request. Go to meet Pura.";
		next;
		que_dic(2,12117,12118,12119,12120,12121,12122,12123,12124,12125,12126,12161);
		close;
	}
	mes "[Supply Dept. 1 Manager]";
	mes "Welcome.";
	mes "How can I help you?";
	next;
	select("I completed the request.");
	mes "[Supply Dept. 1 Manager]";
	mes "Ah...";
	mes "You are done with the request?";
	mes "Let me check your records first.";
	next;
	mes "[Supply Dept. 1 Manager]";
	.@s$ = "It's done. You can't start any other request till tomorrow, why don't you go to the famous pub and rest?";
	que_dic(1,12117,26300,6086,6,.@s$);
	que_dic(1,12118,25600,6090,3,.@s$);
	que_dic(1,12119,51100,6073,16,.@s$);
	que_dic(1,12120,26300,1037,6,.@s$);
	que_dic(1,12121,79900,7032,26,.@s$);
	que_dic(1,12122,26300,6075,6,.@s$);
	que_dic(1,12123,79900,7326,26,.@s$);
	que_dic(1,12124,53000,12353,1,.@s$);
	que_dic(1,12125,56700,936,18,.@s$);
	que_dic(1,12126,37500,954,11,.@s$);
	mes "Cannot find any record...";
	mes "Nothing... There is nothing that I can say ^990000Request completed!^000000.";
	close;
}

dic_in01,48,273,1	script	Supply Dept. 2 Manager	4_MAN_BENKUNI,{
	if (!checkweight(Knife,1)) {
		mes "You have too many kinds of items. Let's try again after you reduce the number of items.";
		close;
	}
	if ((MaxWeight - Weight) < 1000) {
		mes "Cannot proceed because the weight of your items is too heavy. Let's try again after you get rid of some weight.";
		close;
	}
	if (!isequipped(2782)) {
		mes sprintf("¡õ¢£¡ô");
		mes sprintf("¡ö¡ø¡ó ¢£ ¡ö¡ñ¡ï ¡ù ¡ð¢²¢£");
		next;
		mes "I don't feel confident in talking since you wouldn't understand anything.";
		close;
	}
	if (ep13_3_invite < 6) {
		mes "Sapha keeps a distance from you even when you try to talk. Looks like he called on Guard Galten. Time to go.";
		close;
	}
	if (BaseLevel < 80) {
		mes "[Supply Dept. 2 Manager]";
		mes "No way, You can't stand the job of Supply Dept. 2 with that weak body.";
		close;
	}
	if (!questprogress(12162,PLAYTIME)) {
		mes "[Supply Dept. 2 Manager]";
		mes "So you didn't get";
		mes "any requests yet.";
		mes "Tragis will have piles";
		mes "of requests and might give";
		mes "you one. Try meeting him.";
		close;
	}
	else if (questprogress(12162,PLAYTIME) == 2) {
		mes "[Supply Dept. 2 Manager]";
		mes "I erased all records related with the previous request. Tragis is looking for you so hurry up to meet him.";
		next;
		que_dic(2,12127,12128,12129,12130,12131,12132,12133,12134,12135,12136,12162);
		close;
	}
	mes "[Supply Dept. 2 Manager]";
	mes "Welcome.";
	mes "How can I help you?";
	next;
	select("I completed the request.");
	mes "[Supply Dept. 2 Manager]";
	mes "Ah...";
	mes "You are done with the request?";
	mes "Let me check your records first.";
	next;
	mes "[Supply Dept. 2 Manager]";
	.@s$ = "" + strcharinfo(PC_NAME) + ", you handle your requests quite well. You are not like the pub owner who just sends requests here every day.";
	que_dic(1,12127,65300,6023,5,.@s$);
	que_dic(1,12128,65300,6020,21,.@s$);
	que_dic(1,12129,82800,1042,27,.@s$);
	que_dic(1,12130,79900,912,26,.@s$);
	que_dic(1,12131,42800,943,13,.@s$);
	que_dic(1,12132,51100,6041,16,.@s$);
	que_dic(1,12133,79900,7100,26,.@s$);
	que_dic(1,12134,37500,7198,11,.@s$);
	que_dic(1,12135,51100,7188,16,.@s$);
	que_dic(1,12136,31000,518,2,.@s$);
	mes "I would like to complete a request for you but you have none going on now.";
	close;
}

dic_in01,43,273,1	script	Transport Dept. 1 Mgr	4_MAN_BENKUNI,{
	if (!checkweight(Knife,1)) {
		mes "You have too many kinds of items. Let's try again after you reduce the number of items.";
		close;
	}
	if ((MaxWeight - Weight) < 1000) {
		mes "Cannot proceed because the weight of your items is too heavy. Let's try again after you get rid of some weight.";
		close;
	}
	if (!isequipped(2782)) {
		mes sprintf("¡õ¢£¡ô");
		mes sprintf("¡ö¡ø¡ó ¢£ ¡ö¡ñ¡ï ¡ù ¡ð¢²¢£");
		next;
		mes "I don't feel confident in talking since you wouldn't understand anything.";
		close;
	}
	if (ep13_3_invite < 6) {
		mes "Sapha keeps a distance from you even when you try to talk. Looks like he called on Guard Galten. Time to go.";
		close;
	}
	if (BaseLevel < 80) {
		mes "[Transport Dept. 1 Manager]";
		mes "You're not qualified. You won't last a day with your strength working here at Transport Dept. 1.";
		close;
	}
	if (!questprogress(12163,PLAYTIME)) {
		mes "[Transport Dept. 1 Manager]";
		mes "So you didn't get";
		mes "any requests yet.";
		mes "Calyon will have piles";
		mes "of requests and might give";
		mes "you one. Try meeting him.";
		close;
	}
	else if (questprogress(12163,PLAYTIME) == 2) {
		mes "[Transport Dept. 1 Manager]";
		mes "I erased all records related with the previous request. Calyon is looking for you so hurry up to meet him.";
		next;
		que_dic(2,12137,12138,12139,12140,12141,12142,12143,12144,12145,12146,12147,12163);
		close;
	}
	mes "[Transport Dept. 1 Manager]";
	mes "Welcome.";
	mes "How can I help you?";
	next;
	select("I completed the request.");
	mes "[Transport Dept. 1 Manager]";
	mes "Ah...";
	mes "You are done with the request?";
	mes "Let me check your records first.";
	next;
	mes "[Transport Dept. 1 Manager]";
	.@s$ = "Quantity check finished. Ahhh, you going to rest? Then why don't you visit the famous pub of the Capital? They have no yummy food though....";
	que_dic(1,12137,30000,7143,4,.@s$);
	que_dic(1,12138,25000,744,5,.@s$);
	que_dic(1,12139,47500,748,1,.@s$);
	que_dic(1,12140,27500,736,15,.@s$);
	que_dic(1,12141,27000,746,10,.@s$);
	que_dic(1,12142,27500,740,15,.@s$);
	que_dic(1,12143,21600,925,50,.@s$);
	que_dic(1,12144,21400,965,50,.@s$);
	que_dic(1,12145,20900,964,20,.@s$);
	que_dic(1,12146,22400,911,30,.@s$);
	que_dic(1,12147,20800,910,40,.@s$);
	mes "Um...... What do you want me to do?";
	next;
	mes "[Transport Dept. 1 Manager]";
	mes "....";
	next;
	mes "[Transport Dept. 1 Manager]";
	mes "You've got nothing that I can handle...";
	close;
}

dic_in01,40,270,2	script	Transport Dept. 2 Mgr	4_MAN_BENKUNI,{
	if (!checkweight(Knife,1)) {
		mes "You have too many kinds of items. Let's try again after you reduce the number of items.";
		close;
	}
	if ((MaxWeight - Weight) < 1000) {
		mes "Cannot proceed because the weight of your items is too heavy. Let's try again after you get rid of some weight.";
		close;
	}
	if (!isequipped(2782)) {
		mes sprintf("¡õ¢£¡ô");
		mes sprintf("¡ö¡ø¡ó ¢£ ¡ö¡ñ¡ï ¡ù ¡ð¢²¢£");
		next;
		mes "I don't feel confident in talking since you wouldn't understand anything.";
		close;
	}
	if (ep13_3_invite < 6) {
		mes "Sapha keeps a distance from you even when you try to talk. Looks like he called on Guard Galten. Time to go.";
		close;
	}
	if (BaseLevel < 80) {
		mes "[Transport Dept. 2 Manager]";
		mes "You're not qualified. You won't last a day with your strength working here at Transport Dept. 2.";
		close;
	}
	if (!questprogress(12164)) {
		mes "[Transport Dept. 2 Manager]";
		mes "So you didn't get";
		mes "any requests yet.";
		mes "Moltuka will have piles";
		mes "of requests and might give";
		mes "you one. Try meeting him.";
		close;
	}
	else if (questprogress(12164,PLAYTIME) == 2) {
		mes "[Transport Dept. 2 Manager]";
		mes "I erased all records related with the previous request. Moltuka is looking for you so hurry up to meet him.";
		next;
		que_dic(2,12148,12149,12150,12151,12152,12153,12154,12155,12156,12157,12158,12164);
		close;
	}
	mes "[Transport Dept. 2 Manager]";
	mes "Welcome.";
	mes "How can I help you?";
	next;
	select("I completed the request.");
	mes "[Transport Dept. 2 Manager]";
	mes "Ah...";
	mes "You are done with the request?";
	mes "Let me check your records first.";
	next;
	mes "[Transport Dept. 2 Manager.]";
	.@s$ = "Well received. One less thing to worry about now.";
	que_dic(1,12148,23000,528,100,.@s$);
	que_dic(1,12149,20750,512,100,.@s$);
	que_dic(1,12150,20750,515,100,.@s$);
	que_dic(1,12151,20750,535,100,.@s$);
	que_dic(1,12152,24500,516,50,.@s$);
	que_dic(1,12153,20750,513,100,.@s$);
	que_dic(1,12154,21250,517,50,.@s$);
	que_dic(1,12155,24000,737,20,.@s$);
	que_dic(1,12156,20037,747,5,.@s$);
	que_dic(1,12157,23000,6265,2,.@s$);
	que_dic(1,12158,23000,6264,2,.@s$);
	mes "This is the first time in my 200 years of working at this department that a person comes back to complete a request without starting any.";
	close;
}

dic_in01,40,193,1	script	Papyrus#0001	4_MAN_NITT,{
	if (!checkweight(Knife,1)) {
		mes "You have too many items in your inventory.";
		close;
	}
	if ((MaxWeight - Weight) < 1000) {
		mes "Your inventory is too heavy.";
		close;
	}
	if (!isequipped(2782)) {
		mes sprintf("¡õ¢£¡ô");
		mes sprintf("¡ö¡ø¡ó ¢£ ¡ö¡ñ¡ï ¡ù ¡ð¢²¢£");
		next;
		mes "I don't feel confident in talking since you wouldn't understand anything.";
		close;
	}
	if (ep13_3_invite < 6) {
		mes "Sapha keeps a distance from you even when you try to talk. Looks like he called on Guard Galten. Time to go...";
		close;
	}
	if (BaseLevel < 80) {
		mes "You won't need those documents even if you could read them. Looks like you haven't gotten enough training";
		close;
	}
	.@map_hi = rand(1,4);
	mes "[Papyrus]";
	if (.@map_hi == 1) mes "Welcome, I am Papyrus, the manager of the Archive room here.";
	else if (.@map_hi == 2) mes "The number of adventurers visiting the Archive room has increased";
	else if (.@map_hi == 3) mes "This is the very place where Ancient Sapha forefathers created history";
	else mes "The Archive room holds transcendent knowledge beyond that of Midgard and Asgard";
	next;
	if (countitem(Unidentified_Relic) > 29) {
		mes "[Papyrus]";
		mes "Oh... You've brought back plenty of unknown relics";
		next;
		mes "[Papyrus]";
		mes "We exchange 11 Sapha Certifications for 30 Unknown Relics. Do you want to exchange?";
		next;
		if (select("Next time", "Exchange now") == 1) {
			mes "[Papyrus]";
			mes "Ok, have it your way. I'm here if you change your mind";
			close;
		}
		mes "[Papyrus]";
		mes "Ok here's your 11 Sapha Certifications.";
		delitem Unidentified_Relic,30;
		getitem Sapa_Feat_Cert,11;
		close;
	}
	if (countitem(Unidentified_Relic) > 2) {
		mes "[Papyrus]";
		mes "Wow~ ";
		mes "You've found an Unknown Relic.";
		mes "Do you want to exchange it with for 1 Sapha Certification?";
		next;
		if (select("Next time", "Exchange now") == 1) {
			mes "[Papyrus]";
			mes "Ok, have it your way. I'm here if you change your mind";
			close;
		}
		mes "[Papyrus]";
		mes "Ok here's your 1 Sapha Certifications.";
		delitem Unidentified_Relic,3;
		getitem Sapa_Feat_Cert,1;
		close;
	}
	mes "[Papyrus]";
	mes "How can I help you? ";
	next;
	switch (select("What is this place for? ", "How do I view documents?", "What is an Unknown Relic? ")) {
		case 1:
			mes "[Papyrus]";
			mes "This is an important place where data of various relics collected, since our ancient forefathers, are kept.";
			next;
			mes "[Papyrus]";
			mes "You can say it's something similar to the human's museum. Take your time to look through our ancient records.";
			next;
			mes "[Papyrus]";
			mes "You'll never know if you'll find something that catches your adventurous eye.";
			break;
		case 2:
			mes "[Papyrus]";
			mes "Some documents are written in Ancient Sapha Language so humans have trouble viewing all of the documents.";
			next;
			mes "[Papyrus]";
			mes "You can find recent documents on the left where I am standing.";
			mes "You can also take notes on documents you found interesting.";
			next;
			mes "[Papyrus]";
			mes "I would appreciate it if you bring back any Unknown Relics you happen to find while exploring using your notes from here to me.";
			break;
		case 3:
			mes "[Papyrus]";
			mes "Unknown Relics are relics that have not yet been verified and they are valuable research material for us.";
			next;
			mes "[Papyrus]";
			mes "Many of us researchers are studying life and death, the birth and extinction of the universe through the ancient relics";
			next;
			mes "[Papyrus]";
			mes "If you find and bring an unknown relic to me, in exchange I will give you ^9900991 Sapha Certification^000000s for every ^9900993 Unknown Relic^000000s you bring.";
			next;
			mes "[Papyrus]";
			mes "If you bring ^99009930 relics^000000, I will exchange it for ^99009911 Sapha Certification^000000s.";
			break;
	}
	close;
}

//== Document Packages =====================================
-	script	Document Package#main	FAKE_NPC,{
	function	eldicastes_dp;
	if (isequipped(2782) < 1) {
		mes "You can't make sense of the writing.";
		close;
	}
	if (BaseLevel < 80) {
		mes "This document archive doesn't look like it has any value to anyone with enough adventurer experience.";
		close;
	}
	if (ep13_3_invite < 6) {
		mes "When you try to open and read a document, a Sapha manager motions to call Guard Galten. Let's get out of here quickly.";
		close;
	}
	if (questprogress(12165,PLAYTIME) == 2) {
		mes "Feeling a bit better";
		erasequest 12165;
		close;
	}
	else if (questprogress(12165,PLAYTIME)) {
		mes "Ugh... feel dizzy from simply staring at the document. Will come back after cooling down";
		close;
	}
	specialeffect2 EF_DISPELL;
	progressbar "ffff00",4;
	.@doc = rand(1,70);
	if (.@doc > 50 && .@doc <= 60) {
		mes "No documents look out of the ordinary.";
		close;
	} else if (.@doc > 60 && .@doc <= 70) {
		mes "You suddenly feel nauseated. You feel like this won't go away any time soon. Finding the documents will have to wait.";
		setquest 12165;
		close;
	}
	else if (.@doc == 1) eldicastes_dp(12209,"Horn","Hard wedge-like horn from some insects. Doesn't have much practical use.","");
	else if (.@doc == 2) eldicastes_dp(12195,"Horrendous Mouth","Tooth from a dead body.","Important material for research on time of death and health conditions. Useful in discovering human ecology.");
	else if (.@doc == 3) eldicastes_dp(12186,"Orc's Fangs","Green skinned monster living in the woods. The creature is humanlike but is very hostile to humans.","Known to have a friendly relationship between the two races long ago.");
	else if (.@doc == 4) eldicastes_dp(12172,"Frog Eggs","An egg from an amphibian living in warm areas. Unknown if this egg can hatch in Manuk's cold regions.","");
	else if (.@doc == 5) eldicastes_dp(12208,"Snail's Shells","Hard Carapace that protects the body of a huge snail. Creature fun to research out of pure curiousity.","");
	else if (.@doc == 6) eldicastes_dp(12188,"Powder of Butterfly","Powder from the winged insects from Midgard. Some humans use it for makeup or medicine.","");
	else if (.@doc == 7) eldicastes_dp(12167,"Reptile Tongue","Tongue of a monster living in the desert terrain of Midgard. Often used as medicine after drying.","");
	else if (.@doc == 8) eldicastes_dp(12168,"Scorpion Tail","Poisonous reptile tail from a creature living in the deserts.","Records say that humans can lose their life when attacked.");
	else if (.@doc == 9) eldicastes_dp(12173,"Jellopy","Unknown substance in Manuk regions but found throughout Midgard.","Research required to see possibilities on using it for construction material.");
	else if (.@doc == 10) eldicastes_dp(12166,"Tree Root","Humans are using this for firewood or construction material. Found commonly in the woods of Midgard.","");
	else if (.@doc == 11) eldicastes_dp(12169,"Stem","There is nothing like Midgard plants in Manuk.","These plants are used for food and medicine and some are even poisonous.");
	else if (.@doc == 12) eldicastes_dp(12170,"Pointed Scale","Stem from a bumpy life form. Research required as the usage is unknown.","");
	else if (.@doc == 13) eldicastes_dp(12171,"Resin","Sap from an old tree collected and solidified. Very valuable in the human world.","");
	else if (.@doc == 14) eldicastes_dp(12174,"Fish Tail","Humans eat meat called fish.","Can be used as important food supply for foreign adventurers visiting in the city.");
	else if (.@doc == 15) eldicastes_dp(12175,"Worm Peeling","They say some Worm Peelings are valuable.","But this is based on the human's standard of value. Research required.");
	else if (.@doc == 16) eldicastes_dp(12176,"Gill","There are Midgard creatures that live in the sea and breathe through gills.","Further research on their ecology will be useful.");
	else if (.@doc == 17) eldicastes_dp(12177,"Tooth of Bat","Traces of a nocturnal creature unknown to Manuk. Not a strong creature from the size of its teeth.","");
	else if (.@doc == 18) eldicastes_dp(12178,"Fluff","Many of Midgard creatures are covered with soft hair.","Hair can be used as great cold protection. Further research required.");
	else if (.@doc == 19) eldicastes_dp(12179,"Chrysalis","Large insect sack that is alive and contains who knows what.","Not active at all but the life structure within it is very unique and worth researching.");
	else if (.@doc == 20) eldicastes_dp(12180,"Feather of Birds","Bird feather located throughout Midgard.","The feathers aren't great for cold protection but can be used as decorative accessories or tools for writing.");
	else if (.@doc == 21) eldicastes_dp(12181,"Talon","Pointy talon convenient for making holes or simple accessories.","Very useful with the nails from large creatures from Manuk.");
	else if (.@doc == 22) eldicastes_dp(12182,"Sticky Webfoot","Strange body structure found from Midgard amphibians. Evolved to better adapt to ocean life.","");
	else if (.@doc == 23) eldicastes_dp(12183,"Animal Skin","Leather from a mammal.","Very warm and soft and can be used in various ways. Processed in Midgard and valuable.");
	else if (.@doc == 24) eldicastes_dp(12184,"Wolf Claw","Claw from a creature called wolf.","Usage is unknown but many curious Saphas are taking an interest in it.");
	else if (.@doc == 25) eldicastes_dp(12185,"Mushroom Spore","Spores from a mushroom found throughout Midgard.","Looks like it can be cultivated here with a little research.");
	else if (.@doc == 26) eldicastes_dp(12187,"Evil Horn","Item made from Evil Horns that appear in areas that aren't holy.","Sold at a high price but doesn't seem to be practical.");
	else if (.@doc == 27) eldicastes_dp(12214,"Cactus Needle","Surface of a plant that survives in deserts with almost no moisture.","");
	else if (.@doc == 28) eldicastes_dp(12189,"Bill of Birds","Pointy bill convenient for making holes or simple accessories. Looks similar to bird claws.","");
	else if (.@doc == 29) eldicastes_dp(12190,"Snake Scale","Scales from a reptile that moves without legs.","Scales are shed from the creature and are used for simple craftwork.");
	else if (.@doc == 30) eldicastes_dp(12191,"Insect Feeler","Bug feeler from an insect with keen nerves.","Research subject for its unique structure different from Manuk creatures.");
	else if (.@doc == 31) eldicastes_dp(12192,"Immortal Heart","Heart that never stops beating. Obtained from mystical creatures called mermaids.","The driving force of the heart is still unknown and worth researching.");
	else if (.@doc == 32) eldicastes_dp(12193,"Rotten Bandage","Bandage used for dead bodies. Looks like humans believed in the dead coming back for their bodies.","");
	else if (.@doc == 33) eldicastes_dp(12194,"Decayed Nail","Nail from a dead body. Important material for research on time of death and health conditions.","Useful in discovering human ecology.");
	else if (.@doc == 34) eldicastes_dp(12215,"Stone Heart","They say a huge stone in a dead area in Midgard moves by itself.","The heart of the huge stone would be a rare research subject.");
	else if (.@doc == 35) eldicastes_dp(12196,"Tentacle","Feeler from ocean creatures. Unlike those from insects, these show active movement.","");
	else if (.@doc == 36) eldicastes_dp(12197,"Shell","Shell protecting insects or crustacean creatures.","These creatures have a shell surrounding their skin and are very flexible in movement. Worth researching.");
	else if (.@doc == 37) eldicastes_dp(12198,"Scale Shell","Shiny scales found from some reptiles.","The fluorescent substance contained on the surface can be used in various places.");
	else if (.@doc == 38) eldicastes_dp(12199,"Venom Canine","Canine tooth with poison. Humans use this to make weapons for killing.","");
	else if (.@doc == 39) eldicastes_dp(12200,"Sticky Mucus","Sticky liquid with a bit of viscosity left.","Can be used as key material for construction and currently is used for some Manuk architecture style. Commonly found throughout Midgard.");
	else if (.@doc == 40) eldicastes_dp(12201,"Bee Sting","Stinger taken from a living insect.","Some humans use it for medical treatment for its medicinal effect.");
	else if (.@doc == 41) eldicastes_dp(12202,"Grasshopper's Leg","Back legs of an insect that can leap far. Fun to research its structure.","");
	else if (.@doc == 42) eldicastes_dp(12203,"Royal Jelly","A kind of wonder drug collected from a queen bee.","Humans love this but no efficacy found for Manuk.");
	else if (.@doc == 43) eldicastes_dp(12204,"Yoyo Tail","Tail from a humanlike creature.","Research on why humans do not have this trace on them would be amusing but would hurt current alliance with the humans.");
	else if (.@doc == 44) eldicastes_dp(12205,"Solid Shell","Shell evolved by some kind of environmental factor.","This can be great material to make various tool or armory.");
	else if (.@doc == 45) eldicastes_dp(12206,"Yam","Edible when ripe, yellow food.","Humans like this very much. Haven't tried it yet but smells like ripe sweet Potatoes.");
	else if (.@doc == 46) eldicastes_dp(12207,"Raccoon Leaf","They say there is an animal that can change its form with this pasted on it.","Worth research to validate if this rumor is true.");
	else if (.@doc == 47) eldicastes_dp(12210,"Bear's Footskin","Humans collect hunted bear paws.","Usage is unknown. The humans that collect the paws are subjects for research.");
	else if (.@doc == 48) eldicastes_dp(12211,"Feather","Warm hair as soft as downy hair.","Must be used for cold protection. Collectable throughout Midgard.");
	else if (.@doc == 49) eldicastes_dp(12212,"Red Herb","Kind of medicinal red plant.","Humans use this to make recovery medicine. Plant worth researching.");
	else if (.@doc == 50) eldicastes_dp(12213,"Carrot","Red colored plant. Pub owner requests it all the time. Worth research.","");
	close;

	function	eldicastes_dp	{
		if (questprogress(getarg(0))) {
			mes "You've found a document you already have.";
			close;
		}
		mes "^660066"+getarg(2)+"^000000";
		mes "^660066"+getarg(3)+"^000000";
		next;
		mes "You've found a document about ^990099"+getarg(1)+"^000000. Check for details in the ^800080Quest Window^000000.";
		specialeffect2 EF_STEAL;
		setquest getarg(0);
		close;
	}
}
dic_in01,31,192,0	duplicate(Document Package#main)	Document Package#0001	CLEAR_NPC
dic_in01,31,187,0	duplicate(Document Package#main)	Document Package#0002	CLEAR_NPC
dic_in01,25,192,0	duplicate(Document Package#main)	Document Package#0003	CLEAR_NPC
dic_in01,25,187,0	duplicate(Document Package#main)	Document Package#0004	CLEAR_NPC

//== Unknown Relics ========================================
function	script	unknown_d	{
	if (!questprogress(getarg(0))) {
		mes "You see some traces of digging.";
		close;
	}
	specialeffect2 EF_SPRINKLESAND;
	specialeffect2 EF_BEGINSPELL_N1;
	progressbar "ffff00",4;
	erasequest getarg(0);
	mes "You were able to find information on the "+getitemname(getarg(1))+".";
	specialeffect2 EF_STEAL;
	getitem getarg(1),rand(1,4);
	if (!rand(2)) {
		next;
		mes "In addition, you've obtained an unknown relic to report back to the Saphas.";
		specialeffect2 EF_STEAL;
		getitem Unidentified_Relic,1;
	}
	close;
}
pay_fild03,144,95,0	script	Tree Roots	CLEAR_NPC,{ unknown_d(12166,902); }
prt_fild09,371,255,0	script	Reptile Tongues	CLEAR_NPC,{ unknown_d(12167,903); }
prt_fild09,352,241,0	script	Scorpion Tails	CLEAR_NPC,{ unknown_d(12168,904); }
pay_fild02,177,108,0	script	Stems	CLEAR_NPC,{ unknown_d(12169,905); }
pay_fild02,105,113,0	script	Pointed Scales	CLEAR_NPC,{ unknown_d(12170,906); }
pay_fild01,152,171,0	script	Resin	CLEAR_NPC,{ unknown_d(12171,907); }
gef_fild01,104,111,0	script	Spawn	CLEAR_NPC,{ unknown_d(12172,908); }
prt_fild08,299,332,0	script	Jellopy	CLEAR_NPC,{ unknown_d(12173,909); }
izlude,136,160,0	script	Fish Tails	CLEAR_NPC,{ unknown_d(12174,1023); }	// Old coordinates: (132,136)
izlude_a,136,160,0	script	Fish Tails#a	CLEAR_NPC,{ unknown_d(12174,1023); }
izlude_b,136,160,0	script	Fish Tails#b	CLEAR_NPC,{ unknown_d(12174,1023); }
izlude_c,136,160,0	script	Fish Tails#c	CLEAR_NPC,{ unknown_d(12174,1023); }
izlude_d,136,160,0	script	Fish Tails#d	CLEAR_NPC,{ unknown_d(12174,1023); }
prt_fild05,303,169,0	script	Worm Peelings	CLEAR_NPC,{ unknown_d(12175,955); }
iz_dun03,155,165,0	script	Gills	CLEAR_NPC,{ unknown_d(12176,956); }
mjo_dun01,222,226,0	script	Tooth of Bat	CLEAR_NPC,{ unknown_d(12177,913); }
prt_fild06,182,290,0	script	Fluff	CLEAR_NPC,{ unknown_d(12178,914); }
prt_fild06,127,85,0	script	Chrysalis	CLEAR_NPC,{ unknown_d(12179,915); }
moc_fild07,201,360,0	script	Feather of Bird	CLEAR_NPC,{ unknown_d(12180,916); }
moc_fild12,116,122,0	script	Talons	CLEAR_NPC,{ unknown_d(12181,917); }
prt_fild04,315,245,0	script	Sticky Webfoot	CLEAR_NPC,{ unknown_d(12182,918); }
mjolnir_08,108,99,0	script	Animal Skin	CLEAR_NPC,{ unknown_d(12183,919); }
moc_fild03,175,201,0	script	Wolf Claws	CLEAR_NPC,{ unknown_d(12184,920); }
pay_fild08,188,153,0	script	Mushroom Spores	CLEAR_NPC,{ unknown_d(12185,921); }
gef_fild03,251,109,0	script	Orc's Fangs	CLEAR_NPC,{ unknown_d(12186,922); }
c_tower2,170,9,0	script	Evil Horns	CLEAR_NPC,{ unknown_d(12187,923); }
gef_fild05,111,96,0	script	Powder of Butterfly	CLEAR_NPC,{ unknown_d(12188,924); }
moc_fild11,237,273,0	script	Bill of Birds	CLEAR_NPC,{ unknown_d(12189,925); }
pay_fild06,306,233,0	script	Snake Scales	CLEAR_NPC,{ unknown_d(12190,926); }
pay_fild07,126,49,0	script	Insect Feelers	CLEAR_NPC,{ unknown_d(12191,928); }
iz_dun02,112,96,0	script	Immortal Hearts	CLEAR_NPC,{ unknown_d(12192,929); }
moc_pryd02,134,112,0	script	Rotten Bandages	CLEAR_NPC,{ unknown_d(12193,930); }
moc_pryd02,36,75,0	script	Decayed Nails	CLEAR_NPC,{ unknown_d(12194,957); }
moc_pryd02,148,184,0	script	Horrendous Mouths	CLEAR_NPC,{ unknown_d(12195,958); }
iz_dun01,210,77,0	script	Tentacles	CLEAR_NPC,{ unknown_d(12196,962); }
iz_dun01,191,92,0	script	Shells	CLEAR_NPC,{ unknown_d(12197,935); }
mjolnir_04,191,154,0	script	Scale Shells	CLEAR_NPC,{ unknown_d(12198,936); }
mjolnir_04,162,168,0	script	Venom Canines	CLEAR_NPC,{ unknown_d(12199,937); }
prt_fild02,102,97,0	script	Sticky Mucus	CLEAR_NPC,{ unknown_d(12200,938); }
mjolnir_09,99,100,0	script	Bee Stings	CLEAR_NPC,{ unknown_d(12201,939); }
prt_fild07,76,122,0	script	Grasshopper's Legs	CLEAR_NPC,{ unknown_d(12202,940); }
prt_fild03,64,35,0	script	Royal Jelly	CLEAR_NPC,{ unknown_d(12203,526); }
prt_fild03,180,163,0	script	Yoyo Tails	CLEAR_NPC,{ unknown_d(12204,942); }
prt_fild03,226,170,0	script	Solid Shells	CLEAR_NPC,{ unknown_d(12205,943); }
prt_fild03,262,201,0	script	Nice Sweet Potato	CLEAR_NPC,{ unknown_d(12206,549); }
prt_fild03,284,190,0	script	Raccoon Leaf	CLEAR_NPC,{ unknown_d(12207,945); }
gef_fild09,67,46,0	script	Snail's Shells	CLEAR_NPC,{ unknown_d(12208,946); }
prt_fild03,366,237,0	script	Horns	CLEAR_NPC,{ unknown_d(12209,947); }
pay_fild07,269,164,0	script	Bear's Footskin	CLEAR_NPC,{ unknown_d(12210,948); }
prt_fild02,142,116,0	script	Feathers	CLEAR_NPC,{ unknown_d(12211,949); }
prt_fild02,97,209,0	script	Red Herbs	CLEAR_NPC,{ unknown_d(12212,507); }
prt_fild02,280,328,0	script	Carrots	CLEAR_NPC,{ unknown_d(12213,515); }
moc_fild01,169,62,0	script	Cactus Needles	CLEAR_NPC,{ unknown_d(12214,952); }
cmd_fild08,324,163,0	script	Stone Hearts	CLEAR_NPC,{ unknown_d(12215,953); }

dic_in01,138,225,3	script	Diel Guard#ep133_19	4_MAN_GALTUN1,{
	if (!isequipped(2782)) {
		mes "[Diel Guard]";
		mes sprintf("¡ô¡ó¡ö ¡÷ ¡þ¡ù¡ó?");
		mes sprintf("¢¤¡ö¡ø ¢³ ¡÷¢£¡ü ¡ø ¡Ð¡õ¡û...");
		mes sprintf("¡ð¡ú¢± ¡ô ¡ò¡õ¡ú ¡õ..!");
		next;
		mes "Cannot communicate with him.";
		close;
	}
	if (ep13_3_secret < 13) {
		mes "[Diel Guard]";
		mes "You cannot go further.";
		mes "This is the highest minister's office.";
		mes "Only those with permission are allowed in.";
		mes "Please go back.";
		close;
	}
	else if (ep13_3_secret == 13) {
		mes "[Diel Guard]";
		mes "Please stop.";
		mes "Only those with permission are allowed to enter.";
		next;
		if (select("I have permission.", "Go back.") == 1) {
			mes "[Diel Guard]";
			mes "Wait...";
			mes strcharinfo(PC_NAME) + "......ah... I see your name on the list.";
			mes "I'm sorry.";
			mes "Please go through.";
			close2;
			warp "dic_in01",241,177;
			end;
		}
		mes "[Diel Guard]";
		mes "Sigh...";
		mes "Please understand.";
		mes "There are many that try to meet the minister.";
		mes "That is why security is heavy.";
		close;
	}
	else if (ep13_3_secret > 13) {
		mes "[Diel Guard]";
		mes "Ah, you are " + strcharinfo(PC_NAME) + "..";
		mes "I received an order from Ahat to let you through anytime.";
		mes "Please go up.";
		close2;
		warp "dic_in01",241,177;
		end;
	}
	mes "[Diel Guard]";
	mes "You cannot go further.";
	mes "This is the highest minister's office.";
	mes "Only those with permission are allowed in.";
	mes "Please go back.";
	close;
}

dic_in01,242,182,0	script	Elevator#5f_to_4f	CLEAR_NPC,{
	select("Administrative Office");
	warp "dic_in01",138,221;
	end;
}

dic_in01,263,193,3	script	Diel Guard#ep133_20	4_MAN_GALTUN,{
	if (!isequipped(2782)) {
		mes "[Diel Guard]";
		mes sprintf("¡ô¡ó¡ö ¡÷ ¡þ¡ù¡ó?");
		mes sprintf("¢¤¡ö¡ø ¢³ ¡÷¢£¡ü ¡ø ¡Ð¡õ¡û...");
		mes sprintf("¡ð¡ú¢± ¡ô ¡ò¡õ¡ú ¡õ..!");
		next;
		mes "Cannot communicate with him.";
		close;
	}
	if (ep13_3_secret < 13) {
		mes "[Diel Guard]";
		mes "Please stop.";
		mes "You cannot go further.";
		close;
	}
	else if ((ep13_3_secret > 11) && (ep13_3_secret < 19)) {
		mes "[Diel Guard]";
		mes "Are you here to meet Ahat?";
		mes "You are on the list.";
		close2;
		warp "dic_in01",299,251;
		end;
	}
	else if (ep13_3_secret > 18) {
		if (ep13_3_ahtdayq == 1) {
			mes "[Diel Guard]";
			mes "You just came back from Ahat's errand?";
			mes "He is waiting inside.";
			mes "Please go in.";
		}
		else if (countitem(Sapa_Feat_Cert) > 0) {
			mes "[Diel Guard]";
			mes "Are you here to meet Ahat?";
			mes "You are on the list.";
			mes "Please go in.";
			delitem Sapa_Feat_Cert,1;
		}
		else {
			mes "[Diel Guard]";
			mes "You need 1 exploit certification to meet Ahat.";
			mes "At least this is a special treatment for you.";
			close;
		}
		close2;
		warp "dic_in01",299,251;
		end;
	}
	mes "[Diel Guard]";
	mes "This is a restricted area.";
	mes "You need permission to go any further.";
	close;
}

dic_in01,299,268,0	script	#ep133_event01	HIDDEN_WARP_NPC,4,4,{
	end;
OnTouch:
	if (ep13_3_secret == 13) {
		mes "As soon as you enter the room, someone";
		mes "pushes down your head to force you to bow.";
		soundeffect "wander_man_move.wav",0;
		sc_start SC_BLIND,60000,0;
		next;
		mes "[Ringing Voice]";
		mes "That is fine, Cheshire.";
		mes "Are you here to see me?";
		next;
		mes "[Ringing Voice]";
		mes "Hold up your head and come closer.";
		mes "Conversations are meant to have with eye contact.";
		next;
		cutin (Sex == SEX_MALE?"ep13_ahat_f":"ep13_ahat_m"),1;
		mes "You hold up your head at the sound of Ahat's voice";
		mes "But you see a human in high-ranking Sapha clothing in front of you.";
		sc_end SC_BLIND;
		emotion e_omg,1;
		ep13_3_secret = 14;
		erasequest 7198;
		close2;
		cutin "",255;
	}
	end;
}

dic_in01,294,276,5	script	Secret Adjutant#ep133_2	4_M_CATMAN2,{
	// if ((GetInventoryRemainCount 1301 3 == 2) || (GetInventoryRemainCount 1301 3 == 3)) {
	if ((MaxWeight - Weight) < 1000) {
		mes "- You can too many items to proceed with the quest. -";
		close;
	}
	cutin "ep13_cheshire_h",0;
	if (ep13_3_secret < 16) {
		mes "[Cheshire]";
		mes "........";
		mes "........Humph.";
		close2;
	}
	else if (ep13_3_secret == 16) {
		mes "- Cheshire stands quietly next to Ahat with his head and face covered with a bandana.";
		mes "You see a tail behind Cheshire's hip for a split second. -";
		next;
		select("Tail?");
		mes "[Cheshire]";
		mes "What are you looking at?!";
		mes "What tail are you talking about.";
		next;
		select("Have you ever been near the triangle?");
		mes "[Cheshire]";
		mes ".. Hey, what are you talking about?";
		mes "What do you want to say?";
		next;
		cutin (Sex == SEX_MALE?"ep13_ahat_f":"ep13_ahat_m"),2;
		mes "[Ahat]";
		mes "" + strcharinfo(PC_NAME) + "....";
		mes "All you need to do is follow Cheshire's orders.";
		mes "Don't ask stupid questions. This is an order.";
		mes "Cheshire. continue.";
		next;
		cutin "ep13_cheshire_h",0;
		mes "[Cheshire]";
		mes "Hmm..here is what you need to do.";
		mes "There is a huge crack south from the city.";
		mes "There are many..";
		mes "accidents happening near the crack.";
		next;
		mes "[Cheshire]";
		mes "I need you to go and clear out any traces.";
		mes "You'll find ^4d4dffclotted bloodstains, remnants of spells, and pieces of skin^000000.";
		next;
		mes "[Cheshire]";
		mes "Clear them out without anyone knowing.";
		mes "And bring them here instead of throwing them away anywhere.";
		mes "Bring back at least 10 of each.";
		ep13_3_secret = 17;
		setquest 7199;
		next;
		mes "[Cheshire]";
		mes "You mustn't be seen by anyone.";
		mes "You mustn't tell the Saphas.";
		mes "Work in absolute secrecy!";
		close2;
	}
	else if (ep13_3_secret == 17) {
		if (countitem(Solid_Bloodstain) > 9 && countitem(Frozen_Skin_Piece) > 9 && countitem(Suspicious_Magic_Stone) > 9) {
			mes "[Cheshire]";
			mes "..... ..you";
			mes "Are useful, aren't you?";
			mes "That will be all for today.";
			mes "We will need to work little by little so we don't draw attention.";
			delitem Solid_Bloodstain,10;
			delitem Frozen_Skin_Piece,10;
			delitem Suspicious_Magic_Stone,10;
			ep13_3_secret = 18;
			erasequest 7199;
			setquest 7200;
			ep13_3_ahtdayq = 2;
			close2;
		}
		else {
			mes "[Cheshire]";
			mes "Erase the various traces nearby the crack.";
			mes "Your job is to collect and bring back clotted bloodstains, remnants of magic spells, and pieces of skin.";
			next;
			mes "[Cheshire]";
			mes "This cannot be done in a day so please bring back at least 10 of each.";
			mes "Got it?";
			close2;
		}
	}
	else if (ep13_3_secret == 18) {
		mes "[Cheshire]";
		mes "Your work is done with me.";
		mes "Do you have something for Ahat?";
		close2;
	}
	else {
		if (ep13_3_ahtdayq == 1) {
			if ((countitem(Solid_Bloodstain) > 9) && (countitem(Frozen_Skin_Piece) > 9) && (countitem(Suspicious_Magic_Stone) > 9)) {
				mes "[Cheshire]";
				mes "Ok. Confirmed.";
				mes "Good.";
				mes "You used an exploit certification to get here, didn't you?";
				mes "I'll return it to you.";
				next;
				mes "[Cheshire]";
				mes "We will do this again tomorrow.";
				mes "Ahat seems to trust you very much.";
				mes "Let's do are best.";
				delitem Solid_Bloodstain,10;
				delitem Frozen_Skin_Piece,10;
				delitem Suspicious_Magic_Stone,10;
				ep13_3_ahtdayq = 2;
				getitem Sapa_Feat_Cert,1;
				getexp 70000,0;
				getexp 0,30000;
				erasequest 7201;
				setquest 7200;
				close2;
			}
			else {
				mes "[Cheshire]";
				mes "As always, go and collect traces nearby the crack north from here.";
				mes "Clotted Bloodstain, Piece of Frozen Skin, Strange Magic Stone..";
				mes "10 of each.";
				close2;
			}
		}
		else if (ep13_3_ahtdayq == 2) {
			if (questprogress(7200,PLAYTIME) == 1) {
				mes "[Cheshire]";
				mes "Not just yet.";
				mes "We must plan the cleanup near the crack carefully.";
				mes "Come back later.";
				close2;
			}
			else if (questprogress(7200,PLAYTIME) == 2) {
				mes "[Cheshire]";
				mes "Back to work today.";
				mes "Clotted Bloodstain, Piece of Frozen Skin, Strange Magic Stone..";
				mes "Bring them back quietly.";
				next;
				mes "[Cheshire]";
				mes "Collect 10 of each as always.";
				mes "Got it?";
				ep13_3_ahtdayq = 1;
				if (questprogress(7200,PLAYTIME)) erasequest 7200;
				setquest 7201;
				next;
				mes "You've received a request from Cheshire to clean up the crack area.";
				mes "Ahat and Cheshire still have no clue.";
				close2;
			}
			else {
				mes "This mustn't happen.Case4";
				mes "Request help from GM.";
				close2;
			}
		}
		else {
			mes "This mustn't happen.Case5";
			mes "Request help from GM.";
			close2;
		}
	}
	cutin "",255;
	end;
}

dic_in01,300,280,5	script	Minister Ahat#ep133_21	4_HUMAN_GERUTOO,{
	// if ((GetInventoryRemainCount 1301 3 == 2) || (GetInventoryRemainCount 1301 3 == 3)) {
	if ((MaxWeight - Weight) < 1000) {
		mes "- You can too many items to proceed with the quest. -";
		close;
	}
	if (ep13_3_secret < 13) {
		mes "[Minister Ahat]";
		mes "Who?";
		mes "I don't remember giving you permission to enter.";
		close2;
		warp "dic_in01",262,191;
		end;
	}
	else if (ep13_3_secret == 13) {
		mes "As soon as you try to approach Ahat, someone";
		mes "pushes down your head to force you to bow.";
		soundeffect "wander_man_move.wav",0;
		sc_start SC_BLIND,60000,0;
		next;
		mes "[Ringing Voice]";
		mes "That is fine, Cheshire.";
		mes "Are you here to see me?";
		next;
		mes "[Ringing Voice]";
		mes "Hold up your head and come closer.";
		mes "Conversations are meant to have with eye contact.";
		next;
		cutin (Sex == SEX_MALE?"ep13_ahat_f":"ep13_ahat_m"),2;
		mes "You hold up your head at the sound of Ahat's voice";
		mes "But you see a human in high-ranking Sapha clothing in front of you.";
		sc_end SC_BLIND;
		emotion e_omg,1;
		ep13_3_secret = 14;
		erasequest 7198;
		close2;
	}
	else if (ep13_3_secret == 14) {
		cutin (Sex == SEX_MALE?"ep13_ahat_f":"ep13_ahat_m"),2;
		mes "[Ahat]";
		mes "Surprised?";
		mes "Because I look like a human just like you?";
		next;
		select("You aren't a Sapha?", "Human?!!!!!", "Pretty..!!", "So handsome..!");
		mes "[Ahat]";
		mes "Hahaha... that's fine.";
		mes "I understand you can't help being surprised at my appearance.";
		mes "How do I look to you?";
		next;
		mes "[Ahat]";
		mes "A perfect male?";
		mes "A perfect female?";
		mes "Doesn't matter.";
		next;
		mes "[Ahat]";
		mes "Who you see in front of you is not me.";
		mes "Lie to a lie.";
		mes "A vision in a wavering reflection.";
		next;
		mes "[Ahat]";
		mes "Just an image from a memory in your fixed concept..";
		mes "Look deep into your depths.";
		next;
		mes "Ahat's voice rings pleasantly in your ears.";
		mes "Each syllable he says takes effect on your body.";
		next;
		mes "You see someone smiling peaceful at you from afar...";
		next;
		mes "[Soft Voice]";
		mes "Who is the master?";
		next;
		mes "- Ahat seems to be casting a powerful spell.";
		mes "This might be his real ability. -";
		next;
		select("Stop that!", "Demon go away!");
		mes "[Ahat]";
		mes ".. useless resistance...";
		mes "But this is fun from time to time.";
		mes "I can always cast a spell on you anytime.";
		next;
		mes "[Ahat]";
		mes "Now.. hold up your head and look into my eyes..";
		mes "....";
		next;
		while (.@ahtlove < 4) {
			++.@ahtlove;
			mes "- Ahat tries to hypnotize you again.";
			mes "He must have erased himself by doing this over and over again.-";
			next;
			if (.@ahtlove == 1) {
				select("Overcome with willpower.");
				mes "[Ahat]";
				mes "Amusing.";
				mes "Don't you think, Cheshire?";
				mes "Hahaha. Playing hard to get.. this will be fun..";
				next;
			}
			else if (.@ahtlove == 2) {
				select("You close your eyes..");
				mes "[Ahat]";
				mes "No, no.. you mustn't close them.";
				mes "Cheshire.";
				next;
				mes "- As soon as the order was made";
				mes "Ahat's aide comes to make you stare at Ahat.-";
				next;
			}
			else if (.@ahtlove == 3) {
				select("Try to sing a song.");
				mes "[Ahat]";
				mes "Humans are funny.";
				mes "But you need to listen to me so I will make you quiet for awhile.";
				next;
				mes "[Ahat]";
				mes "No use on resisting.";
				mes "Just leave everything to me.";
				next;
			}
			else {
				select("Try to twist your body.");
				mes "[Ahat]";
				mes "Amusing.";
				mes "Don't you think, Cheshire?";
				mes "Hahaha. Playing hard to get.. this will be fun..";
				next;
				mes "[Ahat]";
				mes "Stop that because you look pathetic.";
				mes "Just relax and let loose for my spell.";
				next;
			}
		}
		mes "[Ahat]";
		mes "You are resisting.";
		mes "So you didn't just come here.";
		mes "Let's see how much you can stand.";
		next;
		mes "[Ahat]";
		mes "Who is your master?";
		next;
		if (select("Pretend to be under the spell.", "Well, you tell me") == 1) {
			mes "- You start acting like you are hypnotized.";
			mes "Ahat looks satisfied. -";
			next;
		}
		else {
			mes "[" + strcharinfo(PC_NAME) + "]";
			mes "You!!!";
			mes "I'm in love!";
			mes "I will die for you!";
			next;
			mes "- You start acting like you are hypnotized.-";
			next;
			mes "[Ahat]";
			mes "........ ah, no.";
			mes "No need to kill yourself";
			mes "Now you are under my spell.";
			mes "....";
			next;
		}
		mes "[Ahat]";
		mes "Who are you to me?";
		next;
		if (select("A foot stool!", "Loyal servant.") == 1) {
			mes "[Ahat]";
			mes "I don't need a foot stool.";
			mes "Let's talk after a minute.";
		}
		else {
			mes "[Ahat]";
			mes "I see.";
			mes "You are my loyal servant.";
			mes "My hands and feet.";
		}
		ep13_3_secret = 15;
		close2;
	}
	else if (ep13_3_secret == 15) {
		cutin (Sex == SEX_MALE?"ep13_ahat_f":"ep13_ahat_m"),2;
		mes "[Ahat]";
		mes "My loyal evil servant.";
		mes "Come closer.";
		next;
		if (select("What am I doing?", "Your wish is my command.") == 1) {
			mes "[Ahat]";
			mes "Aren't you stubborn.";
			mes "My spell doesn't work on you?";
			mes "Or it was broken..";
			mes "Or because you don't have your strength back.";
			next;
			mes "- Ahat casts another powerful spell.-";
			next;
			mes "[Ahat]";
			mes "Who is your master?";
			next;
			select("My master is Ahat.");
		}
		mes "[Ahat]";
		mes "Good. You are now allowed to come and go freely.";
		mes "You will work for me starting now.";
		next;
		mes "[Ahat]";
		mes "Here is your first mission.";
		mes "A crack of dimension occurred south from El Dicastes. Do you know about it?";
		next;
		mes "[Ahat]";
		mes "There are many traces around the crack.";
		mes "You're mission is to go find these tracks and erase them.";
		next;
		mes "[Ahat]";
		mes "Cheshire, let him know the details of this mission.";
		mes "^4d4dffI'm very tired from casting a spell because I'm not fully awaken.^000000";
		next;
		mes "[Ahat]";
		mes "You will now talk about us meeting to the Naga people.";
		mes "Tell them that I look like a Sapha and always work alone in my office.";
		next;
		mes "[Ahat]";
		mes "Never talk about Cheshire.";
		mes "Cheshire is never here.";
		mes "You must follow Cheshire's orders from now on.";
		mes "Go now.";
		next;
		mes "- Ahat doesn't suspect a thing yet.";
		mes "He seems to believe that his spell was complete. -";
		ep13_3_secret = 16;
		close2;
	}
	else if (ep13_3_secret == 16) {
		cutin (Sex == SEX_MALE?"ep13_ahat_f":"ep13_ahat_m"),2;
		mes "[Ahat]";
		mes "You must follow Cheshire's orders from now on.";
		mes "Go now.";
		next;
		mes "- Ahat doesn't suspect a thing yet.";
		mes "He seems to believe that his spell was complete. -";
		close2;
	}
	else if (ep13_3_secret == 17) {
		cutin (Sex == SEX_MALE?"ep13_ahat_f":"ep13_ahat_m"),2;
		mes "[Ahat]";
		mes "Cheshire's orders are important for future plans.";
		mes "Make no mistakes and never leave traces that may lead to me.";
		mes "This is your master's orders.";
		close2;
	}
	else if (ep13_3_secret == 18) {
		cutin (Sex == SEX_MALE?"ep13_ahat_f":"ep13_ahat_m"),2;
		mes "[Ahat]";
		mes "Do you have something to say?";
		mes "You've done well in the crack area.";
		next;
		select("What are those?");
		mes "[Ahat]";
		mes "Well...";
		mes "You don't need to know now.";
		mes "Or probably never need to know.";
		mes "Ho ho.";
		next;
		mes "[Ahat]";
		mes "Where will your sword point at..";
		mes "the day you get to know..";
		mes "Now leave me since I'm tired.";
		next;
		mes "[Ahat]";
		mes "I'm still the Jarute of Dicastes and have piles of work to do.";
		mes "Because it is difficult to satisfy everyone with only one loaf of bread.";
		next;
		mes "[Ahat]";
		mes "And this is something to reward you for your deeds.";
		mes "Nothing much but I hope you like it.";
		ep13_3_secret = 19;
		getitem Bradium_Brooch,1;
		close2;
	}
	else {
		cutin (Sex == SEX_MALE?"ep13_ahat_f":"ep13_ahat_m"),2;
		mes "[Ahat]";
		mes "Follow Cheshire's orders for the time being and clear the area nearby the crack.";
		next;
		mes "-Ahat still thinks you are under her spell.";
		mes "Let's follow along with Cheshire's orders and act normal. -";
		close2;
	}
	cutin "",255;
	end;
}

dic_in01,138,188,0	script	#ep133_event02	HIDDEN_WARP_NPC,4,4,{
OnTouch:
	if (ep13_3_secret == 19) {
		if (!isequipped(2782)) {
			mes "[Quiet Voice]";
			mes sprintf("¡þ¡ù¡ó ¢¤¡ö¡ø....");
			mes sprintf("¡ò¡õ¡ú ¡÷¢£¡ü ¡ø ¡Ð¡õ¡û...");
		}
		else {
			mes "[Quiet Voice]";
			mes "Sorry.";
			mes "Just a moment.";
		}
		close2;
		warp "dic_in01",155,188;
	}
	end;
}

dic_in01,158,188,3	script	Jarute HesLanta#ep133_2	4_MAN_JERUTOO,{
	if (!isequipped(2782)) {
		mes "[Jarute HesLanta]";
		mes sprintf("¡ô¡ó¡ö ¡÷ ¡þ¡ù¡ó?");
		mes sprintf("¢¤¡ö¡ø ¢³ ¡÷¢£¡ü ¡ø ¡Ð¡õ¡û...");
		mes sprintf("¡ð¡ú¢± ¡ô ¡ò¡õ¡ú ¡õ..!");
		next;
		mes "Cannot communicate with him.";
		mes "Sapha's minister looks hopeless.";
		mes "Gestures with an expression of abandonment.";
		next;
		select("Is he asking me to leave?", "Or doesn't have a clue on something?");
		mes "I follow the gesture the minister did and then the minister sighs and nods her head.";
		close2;
		warp "dic_in01",144,188;
		end;
	}
	if (ep13_3_secret < 19) {
		mes "[HesLanta]";
		mes "You are from the Midgard expedition.";
		mes "I heard many stories of you being active around here.";
		next;
		mes "[HesLanta]";
		mes "Ah, it is a bit far, isn't it?";
		mes "There is an invisible wall between this room and the corridor.";
		mes "But of course I can move around freely.";
		next;
		mes "[HesLanta]";
		mes "There is nothing threatening Diel but we've put this wall up just in case.";
		mes "By the way this isn't magical but is made by a magnetic field.";
		next;
		mes "[HesLanta]";
		mes "Oh no, I'm talking too much.";
		mes "Sorry. There aren't many people that come here. I got excited.";
		next;
		mes "[HesLanta]";
		mes "You've come to help Ahat?";
		mes "Haha.. good luck.";
		close;
	}
	else if (ep13_3_secret == 19 || ep13_3_secret == 20) {
		if (ep13_3_secret == 19) {
			mes "[HesLanta]";
			mes "I'm sorry to bring you here suddenly.";
			mes "But I wanted to check someone.";
			next;
			mes "[HesLanta]";
			mes "Jarute.. What did Ahat look like to you?";
			next;
			.@m = select("I don't understand your question.", "My master.") - 1;
			if (.@m) {
				mes "[HesLanta]";
				mes "....huh....?";
				mes "You do? I guess I made a mistake.";
				mes "Sorry.";
				next;
				mes "HesLanta is upset with my reply.";
				mes "His expression is complex and dark.";
				ep13_3_secret = 20;
				close;
			}
			mes "[HesLanta]";
			mes "I'll rephrase my question.";
			mes "Have you found anything strange about Ahat?";
			next;
			select("Why are you asking?");
			mes "[HesLanta]";
			mes "Well, because I don't trust Ahat.";
			mes "There are too many odd things about Ahat.";
			next;
			select("Are you allowed to say that?");
		}
		else if (ep13_3_secret == 20) {
			mes "[HesLanta]";
			mes "Ah, sorry.";
			mes "You can't get out?";
			mes "It was designed that way.";
			mes "I will send you out";
			next;
			select("I was joking before.");
			mes "[" + strcharinfo(PC_NAME) + "]";
			mes "I want to know about Ahat too.";
			mes "I want to talk about him with you.";
			mes "But aren't you too defenseless while I'm talking like this?";
			next;
		}
		mes "[HesLanta]";
		mes "Well. Are you Ahat's servant?";
		mes "Then that is strange too.";
		mes "Why would Ahat use a non-Sapha as a servant?";
		mes "Why are you serving Ahat?";
		next;
		select("What if I hurt you?");
		mes "[HesLanta]";
		mes "Try it if you can.";
		mes "My office is special and you won't be able to leave here.";
		mes "And nobody can come in to help you either.";
		next;
		mes "[HesLanta]";
		mes "But this room is open to anyone.";
		mes "If you have any bad intentions in hurting me then brave Galtens will come";
		mes "and teach you a lesson.";
		next;
		mes "[HesLanta]";
		mes "Another thing. If things flow like that then you and Ahat won't stand a chance.";
		next;
		mes "[HesLanta]";
		mes "I'm now risking my life";
		mes "to unveil Ahat's identity.";
		mes "Sapha's don't fear death.";
		next;
		mes "[HesLanta]";
		mes "If I were to die at your hands";
		mes "I will have no regrets as long as I reveal the truth.";
		next;
		select("Okay. Stop it.");
		mes "[HesLanta]";
		mes "Now you understand.";
		mes "I'll ask you again.";
		mes "Have you found anything suspicious about Ahat?";
		next;
		mes "[HesLanta]";
		mes "Ahat almost never meets anyone else except for Ravail.";
		mes "But he allowed you to visit him means there is something going on.";
		next;
		select("He casted a spell on me.");
		mes "[HesLanta]";
		mes "Hypnotize? Why would he?";
		mes "Wait, that means you are under Ahat's spell...!!";
		mes "Oh no!";
		next;
		select("No!", "That's not it!");
		mes "[" + strcharinfo(PC_NAME) + "]";
		mes "I'm not under the spell!";
		mes "I only pretend that I am. I'm also investigating Ahat!";
		next;
		mes "[HesLanta]";
		mes "Huh? What does that mean?";
		mes "Are you acting right now?";
		next;
		mes "You take out the traces you've found near the crack.";
		mes "And start to explain what Ahat ordered you to do.";
		next;
		mes "[HesLanta]";
		mes "... you went through that..";
		mes "He is strange.";
		mes "I only thought he was a Sapha colleague that avoided the curse.";
		mes "So everything started from the crack.";
		next;
		select("He is human.");
		mes "[" + strcharinfo(PC_NAME) + "]";
		mes "El Dicastes only recently allowed humans to visit.";
		mes "Why would a human take the place of a Sapha Jarute?";
		next;
		mes "[HesLanta]";
		mes "Human?";
		mes "He is a Sapha. And a very beautiful and noble one.";
		mes "When we first found him at the crack. We all thought the same thing.";
		next;
		mes "[HesLanta]";
		mes "The only Sapha that avoided the curse.";
		mes "Because Ahat doesn't use Bradium.";
		mes "Our race will get stiff and die by this curse";
		mes "but he is delicate, elegant and beautiful.";
		next;
		mes "[HesLanta]";
		mes "There was a bright light when the earth split with a huge roaring sound north from here.";
		mes "And this beautiful Sapha was found next to the crack.";
		next;
		mes "[HesLanta]";
		mes "He was not a Sapha from Dicastes.";
		mes "We took him to Ravail and wise Ravail concluded.";
		next;
		mes "[HesLanta]";
		mes "When we came here to avoid the god's curse,";
		mes "we have found a friend that was lucky enough to not be cursed.";
		next;
		mes "[HesLanta]";
		mes "Ahat climbed the ladder up to where he is now after gaining Ravail's trust.";
		mes "His working abilities is amazing.";
		mes "He is the perfect Sapha.";
		ep13_3_secret = 21;
		next;
		mes "HesLanta starts to think deeply after saying this.";
		close;
	}
	else if (ep13_3_secret == 21) {
		mes "[HesLanta]";
		mes "Ah, sorry.";
		mes "I was thinking.";
		mes "Crack.. hypnotism.. and the evidence you showed me.";
		next;
		mes "[HesLanta]";
		mes "I don't know why you think Ahat is human but";
		mes "that can also be part of his spell.";
		next;
		mes "[HesLanta]";
		mes "The reason he casted a spell..";
		mes "was to clean up the traces near the crack.";
		mes "and he chose a non-Sapha, you..";
		next;
		mes "[HesLanta]";
		mes "Because we Saphas mustn't know about the crack traces.";
		mes "That means, Ahat is..";
		mes "^4d4dffcleaning up his traces that started from the crack^000000.";
		next;
		select("Erasing his own traces from the crack!!");
		mes "[HesLanta]";
		mes "Yes.";
		mes "He is trying to cover up something related to the crack.";
		mes "But what is it?";
		next;
		mes "[HesLanta]";
		mes "When Ahat was first found near the crack, he had ^4d4dffno memory^000000.";
		mes "Isn't that strange?";
		next;
		mes "[HesLanta]";
		mes "I only get suspicious more and more when I hear your story.";
		mes "But why I can't agree with this story is...";
		next;
		mes "[HesLanta]";
		mes "Ahat is pure.";
		mes "He is truly working for Sapha and Dicastes.";
		next;
		select("Then why are you investigating Ahat?");
		mes "[HesLanta]";
		mes "Ahat is loyal and is working wonders for the Sapha community but.";
		next;
		mes "[HesLanta]";
		mes "Ravail's trust and popularity from other Saphas is";
		mes "is concentrating Dicastes's power to one place.";
		next;
		mes "[HesLanta]";
		mes "The power is focused on Ahat.";
		mes "When power should be spread out evenly throughout departments.";
		next;
		mes "[HesLanta]";
		mes "That is how everyone can monitor and check each other...";
		mes "and try their best and not stray to the wrong side of the road";
		mes "that is how we can live together.";
		next;
		mes "[HesLanta]";
		mes "But if power is concentrated to one place and used wrongly?";
		mes "All administrative are decided upon Ahat. Then what can he do with just a nod or shake of his head";
		next;
		mes "[HesLanta]";
		mes "I'm scared of that.";
		mes "He is beautiful. But beauty comes with thorns.";
		next;
		mes "[HesLanta]";
		mes "Ahat has slowly become the center.";
		mes "If what he was holding in his was not bread but a sword..";
		mes ".......";
		next;
		mes "[HesLanta]";
		mes "I've gone too emotional.";
		mes "Sorry.";
		mes "My mind is so complicated now after hearing your story.";
		next;
		select("Do you know about Cheshire?");
		mes "[HesLanta]";
		mes "You mean the aide?";
		mes "Yes I do but most Sapha's don't.";
		mes "Everyone near Ahat knows Cheshire.";
		next;
		mes "[HesLanta]";
		mes "^4d4dffCheshire is a feline Ahat brought with him^000000.";
		mes "Ahat took care of injured Cheshire and brought him with him.";
		mes "We have cats around so we didn't think much of him.";
		next;
		mes "[HesLanta]";
		mes "Because this land is their second homeland.";
		mes "There may be other felines living elsewhere.";
		mes "But he always covers his face with a bandana because he looks different from Saphas.";
		next;
		mes "[HesLanta]";
		mes "But why are you asking?";
		next;
		mes "[" + strcharinfo(PC_NAME) + "]";
		mes "Nothing.";
		mes "I was only curious personally.";
		mes "What are you going to do now?";
		next;
		mes "[HesLanta]";
		mes "I will continue to keep an eye on Ahat.";
		mes "Until I know the truth that is.";
		next;
		mes "You try to summarize what you talked about with HesLanta while he thinks things through.";
		next;
		while (1) {
			if (.@yes == 5) {
				mes "[" + strcharinfo(PC_NAME) + "]";
				mes "To summarize.";
				mes "The report robber is Cheshire.";
				mes "Cheshire is Ahat's servant and they are related to the crack.";
				mes "They are trying to hide something or someone at the crack";
				mes "and the crack was created by the evil lord Morroc!";
				next;
				mes "[" + strcharinfo(PC_NAME) + "]";
				mes "Ahat is the evil lord?";
				mes "No...";
				mes "This is unbelievable.";
				next;
				mes "[" + strcharinfo(PC_NAME) + "]";
				mes "I must go back to the expedition camp to report to Doha!";
				ep13_3_secret = 22;
				setquest 7203;
				close;
			}
			else if (.@yes == 0) {
				mes "[" + strcharinfo(PC_NAME) + "]";
				mes "First the report culprit was..";
				next;
				switch (select("Cheshire", "Ahat", "BK")) {
					case 1:
						mes "[" + strcharinfo(PC_NAME) + "]";
						mes "It was Cheshire";
						mes "Cheshire is a feline.";
						mes "and the bandana was to hid his ears.";
						++.@yes;
						break;
					case 2:
						mes "[" + strcharinfo(PC_NAME) + "]";
						mes "Ahat? It can't be him.";
						mes "Ahat doesn't fit the witness information.";
						mes "Let's rethink this.";
						break;
					case 3:
						mes "[" + strcharinfo(PC_NAME) + "]";
						mes "BK?";
						mes "Nonsense";
						mes "Let's rethink this.";
						break;
				}
				next;
			}
			else if (.@yes == 1) {
				mes "[" + strcharinfo(PC_NAME) + "]";
				mes "Why would Cheshire try to steal the report?";
				next;
				if (select("No idea.", "To make the conflict between 3 countries worse") == 1) {
					mes "[" + strcharinfo(PC_NAME) + "]";
					mes "We don't know the actual reason at this point.";
					mes "But what will Cheshire gain out of this?";
				}
				else {
					mes "[" + strcharinfo(PC_NAME) + "]";
					mes "To bring conflict between the three countries?";
					mes "What will Cheshire gain out of this?";
				}
				++.@yes;
				next;
			}
			else if (.@yes == 2) {
				mes "[" + strcharinfo(PC_NAME) + "]";
				mes "Cheshire's master is Ahat.";
				mes "So all his actions are to..";
				next;
				if (select("Cheshire is plotting on his own.", "Ahat must be ordering him.") == 1) {
					mes "[" + strcharinfo(PC_NAME) + "]";
					mes "Cheshire arbitrary?";
					mes "Are you sure?";
				}
				else {
					mes "[" + strcharinfo(PC_NAME) + "]";
					mes "Yes. Ahat must have order him.";
					mes "But why would Ahat do that?";
					mes "Conflict between three countries? Or the report content?";
					++.@yes;
				}
				next;
			}
			else if (.@yes == 3) {
				mes "[" + strcharinfo(PC_NAME) + "]";
				mes "Let's think Ahat over.";
				mes "Ahat came from the crack.";
				mes "and has no records before that.";
				next;
				mes "[" + strcharinfo(PC_NAME) + "]";
				mes "And tries to erase all traces found near the crack.";
				mes "And Ahat wants to eliminate...";
				next;
				if (select("Ahat himself.", "Morroc because of the crack?") == 1) {
					mes "[" + strcharinfo(PC_NAME) + "]";
					mes "Yes, Ahat might be a trace of himself.";
					mes "Saphas want to hide something that is why they hired me";
					mes "that doesn't belong to any influence can be used as a puppet to do his dirty work.";
				}
				else {
					mes "[" + strcharinfo(PC_NAME) + "]";
					mes "A bit dramatic but we cannot rule out the evil lord Morroc.";
					mes "Because the crack was created by the evil lord Morroc himself.";
				}
				++.@yes;
				next;
			}
			else if (.@yes == 4) {
				mes "[" + strcharinfo(PC_NAME) + "]";
				mes "Ahat and the crack and then Morroc..";
				mes "I can tell there is a relationship between them but I can't pinpoint it.";
				mes "And in the expedition's report...";
				next;
				if (select("Content of conflict between three countries.. ", "Content about evil lord Morroc..") == 1) {
					mes "[" + strcharinfo(PC_NAME) + "]";
					mes "There was something about the conflict between three countries..";
					mes "But.. I don't think it all adds up?";
					mes "Let's think it over.";
				}
				else {
					mes "[" + strcharinfo(PC_NAME) + "]";
					mes "Yes. There is a report from the tracking team led by Echinacea.";
					mes "It was about the evil lord Morroc.";
					++.@yes;
				}
				next;
			}
			else {
				mes "[" + strcharinfo(PC_NAME) + "]";
				mes "Oh no. I don't know.";
				mes "Let's think it over.";
				.@yes = 0;
				next;
			}
		}
	}
	else if (ep13_3_secret == 22) {
		cutin "ep13_heslanta",2;
		mes "[HesLanta]";
		mes "You made a decision.";
		mes "What are you going to do now?";
		mes "If possible, please help Ahat and keep a close eye on him.";
		next;
		mes "[HesLanta]";
		mes "I will prepare myself to confront him whenever he becomes a threat.";
		mes "This is the best I can do now.";
		next;
		mes "[HesLanta]";
		mes "I only hope nothing sad will happen.";
		mes "........";
		next;
		mes "[HesLanta]";
		mes "I'm sorry to take your time. I will send you out now.";
		mes "It was great to talk with you today.";
		next;
		switch (select("Me too.")) {
		}
		mes "[HesLanta]";
		mes "Let's keep our meeting a secret, alright?";
		mes "Hahaha.";
		close2;
		warp "dic_in01",144,188;
		cutin "",255;
		end;
	}
	.@yessay = rand(1,3);
	if (.@yessay == 1) {
		mes "[HesLanta]";
		mes "I'm very tired because I had too much work today.";
		mes "Ravail can only favor Ahat because he does this all by himself.";
		next;
		mes "[HesLanta]";
		mes "I must do my best too.";
		mes "I don't want to do less than Ahat.";
		mes "I meant in many aspects.";
		close;
	}
	else if (.@yessay == 2) {
		mes "[HesLanta]";
		mes "Ahat takes a walk with Cheshire sometimes.";
		mes "They don't go far but often to the Jorhi Forest around dawn.";
		next;
		mes "[HesLanta]";
		mes "You get to see him walking if you are lucky.";
		mes "Cheshire wears convenient clothes when walking, if that satisfies your curiosity.";
		close;
	}
	mes "[HesLanta]";
	mes "You are always up and about.";
	mes "I'm always watching Ahat.";
	mes "Do you think I'm overdoing it?";
	next;
	mes "[HesLanta]";
	mes "No, I wish I was wrong.";
	mes "But this unknown anxiety makes me more suspicious about Ahat.";
	next;
	mes "[HesLanta]";
	mes "It is very tragic and sad to become suspicious of someone.";
	mes "It is more worse if you can never share the sadness with anyone.";
	next;
	if (select("You are fine.", "Then give up now.") == 1) {
		mes "[HesLanta]";
		mes "Really?";
		mes "I feel a lot better.";
		mes "This is called pampering, right?";
		close;
	}
	mes "[HesLanta]";
	mes "Sorry.";
	mes "I must have taken much of your time.";
	mes "I must become more stronger.";
	close;
}

dicastes01,223,190,1	script	Calyon#pa8029	4_MAN_NITT,{
	if (checkweight(Knife,1) == 0) {
		mes "You have too many kinds of items. Let's try again after you reduce the number of items.";
		close;
	}
	if (MaxWeight - Weight < 1000) {
		mes "Cannot proceed because the weight of your items is too heavy. Let's try again after you get rid of some weight.";
		close;
	}
	if (!isequipped(2782)) {
		mes sprintf("¡õ¢£¡ô");
		mes sprintf("¡ö¡ø¡ó ¢£ ¡ö¡ñ¡ï ¡ù ¡ð¢²¢£");
		next;
		mes "I don't feel confident in talking since you wouldn't understand anything.";
		close;
	}
	if (ep13_3_invite < 6) {
		mes "Sapha keeps a distance from you even when you try to talk. Looks like he called on Guard Galten. Time to go.";
		close;
	}
	mes "[Calyon]";
	if (BaseLevel < 80) {
		mes "Ha ha, come back again after you are trained more. I have no request that fits you.";
		close;
	}
	if (questprogress(12163,PLAYTIME) == 2) {
		mes "Calculate your request activities with the ^800080Transport Dept. 1 Manager^000000 at Operations and then come back.";
		close;
	} else if (questprogress(12163,PLAYTIME)) {
		mes "We're done for the day. You can report back to the ^800080Transport Dept. 1 Manager^000000 at Operations. Good luck.";
		close;
	}
	mes "Welcome.";
	mes "What brings you here?";
	next;
	if(select("Please explain the request to me.", "Please give me a request.") == 1) {
		mes "[Calyon]";
		mes "The Transport Dept. 1 and 2";
		mes "brings in rare items";
		mes "that are not available";
		mes "here.";
		next;
		mes "[Calyon]";
		mes "It is one of the";
		mes "key departments that";
		mes "obtains the rich supplies";
		mes "mostly from the Midgard Continent.";
		next;
		mes "[Calyon]";
		mes "Please see me any time";
		mes "once you are ready.";
		close;
	}
	mes "[Calyon]";
	mes "Finally, I have a request for you. It is an important one so I need you to be focused.";
	next;
	.@calyonrequest = rand(1,11);
	mes "[Calyon]";
	if (.@calyonrequest == 1) {
		setquest 12139;
		setquest 12163;
		mes "The high minister is looking for the Midgard product, Witherless Roses these days.";
		mes "Not sure if it's a good gift but some have seen him with it on his head and showing it off.";
		next;
		mes "[Calyon]";
		mes "So... I know this is difficult to ask for but please bring me 1 Witherless Rose. This is just between you and me.";
		next;
		mes "You have received a request named ^800080Respect for Taste^000000.";
	} else if (.@calyonrequest == 2) {
		setquest 12137;
		setquest 12163;
		mes "The industrial research center researches ways of refining Bradium efficiently but they are always short on test materials.";
		next;
		mes "[Calyon]";
		mes "I heard there is a merchant in the adventurer's city who sells Glass Tubes. I will need 4 of them.";
		next;
		mes "You have received a request named ^800080Tools for Experiment^000000.";
	} else if (.@calyonrequest == 3) {
		setquest 12138;
		setquest 12163;
		mes "The pub owner said he wants to give a gift to all his regular Sapha customers.";
		next;
		mes "[Calyon]";
		mes "But doesn't know what to give. If you see any interesting gifts in Midgard, can bring back 5 of them?";
		next;
		mes "You have received a request named ^800080Fine Gift Samples^000000.";
	} else if (.@calyonrequest == 4) {
		setquest 12140;
		setquest 12163;
		mes "A request from the pub owner. He says he can't use disposable leaf plates for regular customers.";
		next;
		mes "[Calyon]";
		mes "He is asking for 15 solid, white chinas from Midgard.";
		next;
		mes "You have received a request named ^800080Courtesy for Regular^000000.";
	} else if (.@calyonrequest == 5) {
		setquest 12141;
		setquest 12163;
		mes "I have a personal request. I heard there is a round transparent handicraft in Midgard.";
		mes "I think they are called Glass Beads.";
		next;
		mes "[Calyon]";
		mes "We have similar manufactured items here but nothing compared to the elaborate sphere there.";
		mes "Please get me 10 of them.";
		next;
		mes "You have received a request named ^800080Special Package^000000.";
	} else if (.@calyonrequest == 6) {
		setquest 12142;
		setquest 12163;
		mes "Hmm... I don't know how to start. The high minister is requesting for puppets from Midgard.";
		mes "I don't know what it is but since the high minister is asking for it, it must be used for a very important purpose.";
		next;
		mes "[Calyon]";
		mes "Please bring 15 of them.";
		next;
		mes "You have received a request named ^800080Dangerous Request^000000.";
	} else if (.@calyonrequest == 7) {
		setquest 12143;
		setquest 12163;
		mes "I heard there is a trend among many of my colleagues here about a musical accessory made from a Bill of Birds from Midgard.";
		next;
		mes "[Calyon]";
		mes "I'm thinking of distributing them within the Operations building.";
		mes "Can you buy and bring back 50 of them?";
		next;
		mes "You have received a request named ^800080Strange Trend^000000.";
	} else if (.@calyonrequest == 8) {
		setquest 12144;
		setquest 12163;
		mes "The pub owner said he wanted to decorate the pub with something called Clam Shells.";
		mes "Please bring back about 50 of them.";
		next;
		mes "[Calyon]";
		mes "I have no idea how he will use them but I think he has a very unique taste after being acquainted with many adventurers.";
		next;
		mes "You have received a request named ^800080Unknown Usage^000000.";
	} else if (.@calyonrequest == 9) {
		setquest 12145;
		setquest 12163;
		mes "We don't have cuisine for ourselves but many adventurers seem to enjoy the art of eating.";
		mes "So the pub owner needs a plate for his new cuisine.";
		next;
		mes "[Calyon]";
		mes "He asked for 20 Crab Shells.";
		mes "I have no idea where you can get them but... good luck.";
		next;
		mes "You have received a request named ^800080Other World Cuisine^000000.";
	} else if (.@calyonrequest == 10) {
		setquest 12146;
		setquest 12163;
		mes "I think the most useful Midgard item is Scells.";
		next;
		mes "[Calyon]";
		mes "Use Scells to fill any crack or holes in a building and then mix and plaster grinded Garlet to it and the building is maintained quick and simple.";
		mes "Can you bring back 30 of them?";
		next;
		mes "You have received a request named ^800080Filling in Cracks^000000.";
	} else if (.@calyonrequest == 11) {
		setquest 12147;
		setquest 12163;
		mes "Garlets are an element in building maintenance.";
		mes "It is one of the most important materials in buildings.";
		next;
		mes "[Calyon]";
		mes "Before Garlets were available, we crushed and used Zargons but they have become difficult to come by.";
		mes "Please bring back 40 of them.";
		next;
		mes "You have received a request named ^800080Adhesive Material^000000.";
	}
	mes "You can check details of the request and who to report back to by opening the ^800080Quest Window^000000.";
	close;
}

dicastes01,211,178,2	script	Moltuka#pa0829	4_MAN_NITT,{
	if (!checkweight(Knife,1)) {
		mes "You have too many kinds of items. Let's try again after you reduce the number of items.";
		close;
	}
	if ((MaxWeight - Weight) < 1000) {
		mes "Cannot proceed because the weight of your items is too heavy. Let's try again after you get rid of some weight.";
		close;
	}
	if (!isequipped(2782)) {
		mes sprintf("¡õ¢£¡ô");
		mes sprintf("¡ö¡ø¡ó ¢£ ¡ö¡ñ¡ï ¡ù ¡ð¢²¢£");
		next;
		mes "I don't feel confident in talking since you wouldn't understand anything.";
		close;
	}
	if (ep13_3_invite < 6) {
		mes "Sapha keeps a distance from you even when you try to talk. Looks like he called on Guard Galten. Time to go.";
		close;
	}
	if (BaseLevel < 80) {
		mes "[Moltuka]";
		mes "Ha ha, come back again after you are trained more. I have no request that fits you.";
		close;
	}
	if (questprogress(12164,PLAYTIME) == 2) {
		mes "[Moltuka]";
		mes "Have you met the ^990099Transport Dept. 2 Manager^000000 at Operations? I will give you a new request after you clear your request history.";
		close;
	}
	else if (questprogress(12164,PLAYTIME)) {
		mes "[Moltuka]";
		mes "I don't have any requests for you now. Report back to the ^990099Transport Dept. 2 Manager^000000 at Operations after you complete all requests.";
		close;
	}
	mes "[Moltuka]";
	mes "Welcome.";
	mes "What brings you here?";
	next;
	if (select("Please explain the request to me.", "Please give me a request.") == 1) {
		mes "[Moltuka]";
		mes "You'd rather go to see Calyon for him to explain you about Transport 1,2 Department.";
		next;
		mes "[Moltuka]";
		mes "Since I am not good at speaking.";
		close;
	}
	mes "[Moltuka]";
	mes "Request...Yeah, there is some. Wait a second.";
	next;
	mes "[Moltuka]";
	mes "........ (rummaging)";
	next;
	mes "[Moltuka]";
	mes "..............(rustling sound)";
	next;
	.@tut_13 = rand(1,11);
	if (.@tut_13 == 1) {
		setquest 12148;
		setquest 12164;
		mes "[Moltuka]";
		mes "Those Tatachos are so quick if we want to catch them which is pretty hard.";
		next;
		mes "[Moltuka]";
		mes "So the galtens here lure them with Monster's Feed. It's said that there is an expert who does that job, please get 100 Monster's feed.";
		next;
		mes "I got you a request named ^880088Bait for Tatacho Hunting^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close2;
		setquest 12148;
		setquest 12164;
		end;
	}
	else if (.@tut_13 == 2) {
		setquest 12149;
		setquest 12164;
		mes "[Moltuka]";
		mes "The pub owner wants some apple to learn how to cook well.";
		next;
		mes "[Moltuka]";
		mes "But I never heard of any adventurers from Midgard who were fond of his food. Anyway he says that he will try, so get 100 apples for him.";
		next;
		mes "I got you a request named ^880088Swordmanship Practice^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close2;
		setquest 12149;
		setquest 12164;
		end;
	}
	else if (.@tut_13 == 3) {
		setquest 12150;
		setquest 12164;
		mes "[Moltuka]";
		mes "This is a request from the pub owner. He wants some reddish vegetable in order to have a colorful dish.";
		next;
		mes "[Moltuka]";
		mes "Well..... Carrot, is it? Anyway it's being called with that name in your land... I don't really have any expectation. Sorry. I just was talking myself before. Please do prepare 100 of them.";
		next;
		mes "I got you a request named ^880088Pretty reddish vegetable^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close2;
		setquest 12150;
		setquest 12164;
		end;
	}
	else if (.@tut_13 == 4) {
		setquest 12151;
		setquest 12164;
		mes "[Moltuka]";
		mes "It's said that there had been an explosion in the pub. People say it was because of some vegetable named Pumpkin which was being thoroughly roasted on the fire.";
		next;
		mes "[Moltuka]";
		mes "for this incident, no pumpkin left. So it will be appreciated if you can find 100 pumpkins.";
		next;
		mes "I got you a request named ^880088Tenacity of the pub owner^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close2;
		setquest 12151;
		setquest 12164;
		end;
	}
	else if (.@tut_13 == 5) {
		setquest 12152;
		setquest 12164;
		mes "[Moltuka]";
		mes "The pub owner has requested that.... He misses sweet potato which he used to eat when he was young. He wants 50 sweet potatos.";
		next;
		mes "[Moltuka]";
		mes "I can understand him since he is away from home for long time. By chance you visit Midgard, please try to get them.";
		next;
		mes "I got you a request named ^880088Taste like home cooking^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close2;
		setquest 12152;
		setquest 12164;
		end;
	}
	else if (.@tut_13 == 6) {
		setquest 12153;
		setquest 12164;
		mes "[Moltuka]";
		mes "The pub owner wants to cook something strange. He said it will be Roasted Banana but I reckon he's cooked something similar before... ";
		next;
		mes "[Moltuka]";
		mes "Well, I can't remember much. Anyway... You need to get 100 Bananas.";
		next;
		mes "I got you a request named ^880088Harzardous plant when burnt^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close2;
		setquest 12153;
		setquest 12164;
		end;
	}
	else if (.@tut_13 == 7) {
		setquest 12154;
		setquest 12164;
		mes "[Moltuka]";
		mes "This request is from the pub owner. He wants some meat.";
		next;
		mes "[Moltuka]";
		mes "Nothing else in his request direction. It will be enough with 50 chunks. I wonder if he really is running his business...";
		next;
		mes "I got you a request named ^880088Unexpectedly Normal^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close2;
		setquest 12154;
		setquest 12164;
		end;
	}
	else if (.@tut_13 == 8) {
		setquest 12155;
		setquest 12164;
		mes "[Moltuka]";
		mes "I'd like to give a present to the pub owner. This is a personal request so you don't have to get stressed for this. Few days ago, I saw the pub owner frustrated with all broken ladles.";
		next;
		mes "[Moltuka]";
		mes "It seemed that he made it himself by I felt pitiful for him, so I want you to get 20 black ladles which can be purchased in Midgard.";
		next;
		mes "I got you a request named ^880088Gift with heart^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close2;
		setquest 12155;
		setquest 12164;
		end;
	}
	else if (.@tut_13 == 9) {
		setquest 12156;
		setquest 12164;
		mes "[Moltuka]";
		mes "The high minister wanted mirrors made from Midgard crystal. There are many Manukan mirrors but he seems to prefer to Midgard ones.";
		next;
		mes "[Moltuka]";
		mes "I am actually a bit worried but there must be a reason for our 'wise' high minister.";
		next;
		mes "I got you a request named ^880088Respect for Taste 2^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close2;
		setquest 12156;
		setquest 12164;
		end;
	}
	else if (.@tut_13 == 10) {
		setquest 12157;
		setquest 12164;
		mes "[Moltuka]";
		mes "The pub owner is requesting something this time. He wants 2 Pineapples and wants you to know that...";
		next;
		mes "[Moltuka]";
		mes "I might try to make a special cocktail. I am confident of doing it since I did make good poison.";
		next;
		mes "I got you a request named ^880088Resolution of the pub owner^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close2;
		setquest 12157;
		setquest 12164;
		end;
	}
	else if (.@tut_13 == 11) {
		setquest 12158;
		setquest 12164;
		mes "[Moltuka]";
		mes "Again....The pub owner's request. He wants 2 Melons and wants you to know that...";
		next;
		mes "[Moltuka]";
		mes "I might try to make a special cocktail. I am confident of doing it since I did make good poison.";
		next;
		mes "I got you a request named ^880088Rage of the pub owner^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close2;
		setquest 12158;
		setquest 12164;
		end;
	}
}

dicastes01,175,217,5	script	Kalipo#pa0829	4_MAN_NITT,{
	if (!checkweight(Knife,1)) {
		mes "You have too many kinds of items. Let's try again after you reduce the number of items.";
		close;
	}
	if ((MaxWeight - Weight) < 1000) {
		mes "Cannot proceed because the weight of your items is too heavy. Let's try again after you get rid of some weight.";
		close;
	}
	if (!isequipped(2782)) {
		mes sprintf("¡õ¢£¡ô");
		mes sprintf("¡ö¡ø¡ó ¢£ ¡ö¡ñ¡ï ¡ù ¡ð¢²¢£");
		next;
		mes "I don't feel confident in talking since you wouldn't understand anything.";
		close;
	}
	if (ep13_3_invite < 6) {
		mes "Sapha keeps a distance from you even when you try to talk. Looks like he called on Guard Galten. Time to go.";
		close;
	}
	if (BaseLevel < 100) {
		mes "[Kalipo]";
		mes "Ha ha ha, many other adventurers are giving a helping hand. I'll see you next time.";
		close;
	}
	if (questprogress(12160,PLAYTIME) == 2) {
		mes "[Kalipo]";
		mes "Please come back after checking";
		mes "previous requests with the ^990099Hunting Dept. 2 Manager^000000.";
		close;
	}
	else if (questprogress(12160,PLAYTIME)) {
		mes "[Kalipo]";
		mes "I do not have any additional requests. Please report to the ^990099Hunting Dept. 2 Manager^000000 at Operations to report request completion.";
		close;
	}
	mes "[Kalipo]";
	mes "Welcome.";
	mes "Are you here for a request?";
	next;
	if (select("Please explain the request to me.", "Please give me a request.") == 1) {
		mes "[Kalipo]";
		mes "As you know better";
		mes "and Laponte explained to you";
		mes "already";
		mes "I just can offer you";
		mes "one single request a day.";
		next;
		mes "[Kalipo]";
		mes "For sure";
		mes "you will get more interesting";
		mes "request, after";
		mes "you raise your levels";
		mes "don't feel bad with";
		mes "the simple request at first";
		close;
	}
	mes "[Kalipo]";
	mes "I will check the list of";
	mes "requests that came in today.";
	next;
	mes "[Kalipo]";
	mes "Hmm..";
	mes "I actually have something";
	mes "just right for you.";
	next;
	.@tut_lv = (BaseLevel);
	.@rand = rand(100,BaseLevel);
	if (.@rand < 109) {
		setquest 12106;
		setquest 12160;
		mes "[Kalipo]";
		mes "Our scout who went to Rapine is being attacked by cute child looking monsters.";
		next;
		mes "[Kalipo]";
		mes "So we need to hunt them inevitably, and you are the one for hunting them since you are not from Rapine.";
		next;
		mes "I got you a request named ^990099A child on the flower^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@rand < 112) {
		setquest 12107;
		setquest 12160;
		mes "[Kalipo]";
		mes "Are you aware of the child looking flower, Pinguicula? People say there has been a mutant of that flower.";
		next;
		mes "[Kalipo]";
		mes "They are very violent and aggressive so the troops from Rapine have been sent to slay them. Please go to check up and treat it before they are spread all over the area.";
		next;
		mes "I got you a request named ^990099Twisted Love^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@rand < 116) {
		setquest 12108;
		setquest 12160;
		mes "[Kalipo]";
		mes "Some mineral collectors are missing, and it seems to be done by nepenthes for sure.";
		next;
		mes "[Kalipo]";
		mes "Nepenthes is similar to Mandragora. We gotta do something in order to protect people from more damage.";
		next;
		mes "I got you a request named ^990099Dangerous Plant Removal^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@rand < 119) {
		setquest 12109;
		setquest 12160;
		mes "[Kalipo]";
		mes "They've discovered the centipede larva habitat. We can remove them now so there will be less mom centipedes.";
		next;
		mes "[Kalipo]";
		mes "Would you find them and kill them? You will have to be careful with the mom centipedes around them.";
		next;
		mes "I got you a request named ^990099Larva Extermination^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@rand < 124) {
		setquest 12110;
		setquest 12160;
		mes "[Kalipo]";
		mes "Miners heading to Nidhogg's nest, it's been reported that the miners were attacked by a strange thing.";
		next;
		mes "[Kalipo]";
		mes "It's said that it was human looking water, but it must be an evil thing which is not water spirit. Perhaps the Nidhogg Dungeon is the origin so please visit there to check up.";
		next;
		mes "I got you a request named ^990099Demon of Water^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else {
		setquest 12111;
		setquest 12160;
		mes "[Kalipo]";
		mes "Tatachos were originally beautiful birds, and they could fly. But since they settled here where there is no natural enemy, they started to be fat and lazy,";
		next;
		mes "[Kalipo]";
		mes "And finally they became like now, so ugly birds. You will be a good natural enemy for them.";
		next;
		mes "I got you a request named ^990099Bird with ugly face^000000 You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
}

dicastes01,187,230,5	script	Laponte#pa0829	4_MAN_NITT,{
	if (checkweight(Knife,1) == 0) {
		mes "You have too many kinds of items. Let's try again after you reduce the number of items.";
		close;
	}
	if ((MaxWeight - Weight) < 1000) {
		mes "Cannot proceed because the weight of your items is too heavy. Let's try again after you get rid of some weight.";
		close;
	}
	if (!isequipped(2782)) {
		mes sprintf("¡õ¢£¡ô");
		mes sprintf("¡ö¡ø¡ó ¢£ ¡ö¡ñ¡ï ¡ù ¡ð¢²¢£");
		next;
		mes "I don't feel confident in talking since you wouldn't understand anything.";
		close;
	}
	if (ep13_3_invite < 6) {
		mes "Sapha keeps a distance from you even when you try to talk. Looks like he called on Guard Galten. Time to go.";
		close;
	}
	if (BaseLevel < 97) {
		mes "[Laponte]";
		mes "Ha ha ha, many other adventurers are giving a helping hand. I'll see you next time.";
		close;
	}
	if (questprogress(12159,PLAYTIME) && questprogress(12159,PLAYTIME) != 2) {
		mes "[Laponte]";
		mes "I do not have any additional requests. Please report to the ^990099Hunting Dept. 1 Manager^000000 at Operations to report request completion.";
		close;
	}
	else if (questprogress(12159,PLAYTIME) == 2) {
		mes "[Laponte]";
		mes "Please come back after checking";
		mes "previous requests with the ^990099Hunting Dept. 1 Manager^000000.";
		close;
	}
	mes "[Laponte]";
	mes "Welcome.";
	mes "Are you here for a request?";
	next;
	if (select("Please explain the request to me.", "Please give me a request.") == 1) {
		mes "[Laponte]";
		mes "I'm responsible of allocating";
		mes "requests from other departments";
		mes "related to hunting";
		mes "monsters to";
		mes "adventurers.";
		next;
		mes "[Laponte]";
		mes "Each adventurer is randomly assigned";
		mes "to one request each day";
		mes "and the range of the request";
		mes "assigned is limited to";
		mes "the adventurer's training level.";
		next;
		mes "[Laponte]";
		mes "Advanced jobs are assigned";
		mes "to adventurers who";
		mes "advance in their battle skills";
		mes "so no need to be upset if";
		mes "your first few requests are small.";
		close;
	}
	mes "[Laponte]";
	mes "I will check the list of";
	mes "requests that came in today.";
	next;
	mes "[Laponte]";
	mes "Hmm..";
	mes "I actually have something";
	mes "just right for you.";
	next;
	.@rand = rand(97,BaseLevel);
	if (.@rand < 103) {
		setquest 12099;
		setquest 12159;
		mes "[Laponte]";
		mes "This is a very small request. Baby dragons that hatch near Yggdrasilberry roots are reported to be hatching nearby.";
		next;
		mes "[Laponte]";
		mes "Eliminating the baby dragon is important but we mustn't ignore that removing the root cause will prevent this request from coming up again in the future.";
		next;
		mes "I got you a request named ^880088Remove Root Cause^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@rand < 109) {
		setquest 12100;
		setquest 12159;
		mes "[Laponte]";
		mes "Received reports of sightings of an unknown huge winged insect near the Rapine camp recently.";
		next;
		mes "[Laponte]";
		mes "We don't know how far the infestation of this insect may spread so please exterminate as many as you spot.";
		next;
		mes "I got you a request named ^880088Violent Winged Insect^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@rand < 115) {
		setquest 12101;
		setquest 12159;
		mes "[Laponte]";
		mes "This just came in from colleagues working in the mine.";
		next;
		mes "[Laponte]";
		mes "The baby dragons living near Yggdrasilberry roots are destroying the grounds near the mines. It will get dangerous if we don't take care of it.";
		next;
		mes "[Laponte]";
		mes "Please wipe out the baby dragons near Yggdrasilberry.";
		next;
		mes "I got you a request named ^880088Work Interference^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@rand < 118) {
		setquest 12102;
		setquest 12159;
		mes "[Laponte]";
		mes "A new race called Naga was found inhabiting the swamp near the Rapine camp.";
		next;
		mes "[Laponte]";
		mes "The problem is that they are primitive intellectuals and are violent.";
		next;
		mes "[Laponte]";
		mes "We will have many conflicts with them in the future if they expand their colony. Please go eliminate the adult Nagas.";
		next;
		mes "I got you a request named ^880088Intelligent Snakes^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@rand < 121) {
		setquest 12103;
		setquest 12159;
		mes "[Laponte]";
		mes "We get continuous reports of sightings of a legendary winged white horse near by the Rapine base.";
		next;
		mes "[Laponte]";
		mes "Can you go there in person and take a look? ... ";
		next;
		mes "[Laponte]";
		mes "It could be a hallucination so please make sure to touch it with your bare hand to make sure it is a living creature.";
		next;
		mes "I got you a request named ^880088Legendary Creature^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@rand < 125) {
		setquest 12104;
		setquest 12159;
		mes "[Laponte]";
		mes "Centipede's reproduction is another problem but also their appetite is threatening own survival.";
		next;
		mes "[Laponte]";
		mes "They absorb Bradium minerals and damage our mining grounds";
		next;
		mes "[Laponte]";
		mes "Many of our Sapha colleagues have lost their lives to the Centipedes. Please exterminate them.";
		next;
		mes "I got you a request named ^880088Insects with an Appetite^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else {
		setquest 12105;
		setquest 12159;
		mes "[Laponte]";
		mes "Got a report that Bradium raw minerals in the mines are alive.";
		next;
		mes "[Laponte]";
		mes "Looks like Bradium raw minerals were turned into Golems by an ancient spell and now we may need to close down our mines because of them. Can you please go and eliminate them? ";
		next;
		mes "I got you a request named ^880088Moving Rocks^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
}

dicastes01,208,230,3	script	Pura#pa0829	4_MAN_NITT,{
	if (!checkweight(Knife,1)) {
		mes "You have too many kinds of items. Let's try again after you reduce the number of items.";
		close;
	}
	if ((MaxWeight - Weight) < 1000) {
		mes "Cannot proceed because the weight of your items is too heavy. Let's try again after you get rid of some weight.";
		close;
	}
	if (!isequipped(2782)) {
		mes sprintf("¡õ¢£¡ô");
		mes sprintf("¡ö¡ø¡ó ¢£ ¡ö¡ñ¡ï ¡ù ¡ð¢²¢£");
		next;
		mes "I don't feel confident in talking since you wouldn't understand anything.";
		close;
	}
	if (ep13_3_invite < 6) {
		mes "Sapha keeps a distance from you even when you try to talk. Looks like he called on Guard Galten. Time to go.";
		close;
	}
	if (BaseLevel < 80) {
		mes "[Pura]";
		mes "That's okay.";
		mes "We are not that unfortunate to receive help from you.";
		close;
	}
	if (questprogress(12161,PLAYTIME) == 2) {
		mes "[Pura]";
		mes "Have you already met the ^990099Supply Dept. 1 Manager^000000 at Operations? I will give you a new request after you clear your request history.";
		close;
	}
	else if (questprogress(12161,PLAYTIME)) {
		mes "[Pura]";
		mes "I don't have any requests for you now. Report back to the ^990099Supply Dept. 1 Manager^000000 at Operations after you complete all requests.";
		close;
	}
	mes "[Pura]";
	mes "Welcome.";
	mes "What brings you here?";
	next;
	if (select("Please explain the request to me.", "Please give me a request.") == 1) {
		mes "[Pura]";
		mes "Adventurers help me";
		mes "deliver various items";
		mes "produced here to";
		mes "other parts of the";
		mes "area.";
		next;
		mes "[Pura]";
		mes "There is no restrictions";
		mes "to the job but";
		mes "some jobs are difficult than others.";
		next;
		mes "[Pura]";
		mes "Please see me any time";
		mes "once you are ready.";
		close;
	}
	mes "[Pura]";
	mes "I will check the list of";
	mes "requests that came in today.";
	next;
	mes "[Pura]";
	mes "Hmm..";
	mes "I actually have something";
	mes "just right for you.";
	next;
	.@tut_13 = rand(1,10);
	if (.@tut_13 == 1) {
		setquest 12117;
		setquest 12161;
		mes "[Pura]";
		mes "They say that this area was a wetland very long ago. But for some reason the environment has changed gradually over the years.";
		next;
		mes "[Pura]";
		mes "There is a patch of land nearby the Rapine camp that is still preserved. Can you bring back a Withered Flower sample? It will be a good sample to research on environmental changes.";
		next;
		mes "I got you a request named ^880088Withered Flower^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@tut_13 == 2) {
		setquest 12118;
		setquest 12161;
		mes "[Pura]";
		mes "The Bradium refine machinery is broken and now we are short supplying refined Bradium to our colleagues working at the mine.";
		next;
		mes "[Pura]";
		mes "So we are using all our adventurers to help collect refined Bradium. Please bring back 3 refined Bradiums from the Bradium Golem.";
		next;
		mes "I got you a request named ^880088Welcomed Mineral^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@tut_13 == 3) {
		setquest 12119;
		setquest 12161;
		mes "[Pura]";
		mes "I have a request to bring in 16 Dragon's Manes.";
		next;
		mes "[Pura]";
		mes "Dragon's Mane is only dropped in small volumes by the Dracos and is very valuable. It is used in our indigenous designs in our flags, clothes and field equipment.";
		next;
		mes "I got you a request named ^880088Valuable Textile^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@tut_13 == 4) {
		setquest 12120;
		setquest 12161;
		mes "[Pura]";
		mes "This is a request from the pub for the food of people from other worlds. They want Dragon Tails to use as a cooking ingredient for field food that can be stored extensively.";
		next;
		mes "[Pura]";
		mes "So humans like this. Please bring back 6 of them.";
		next;
		mes "I got you a request named ^880088Curious Meat^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@tut_13 == 5) {
		setquest 12121;
		setquest 12161;
		mes "[Pura]";
		mes "The path that goes out of the city is now a hazardous icy road because of the snow we've been getting.";
		next;
		mes "[Pura]";
		mes "Spreading Pieces of Egg Shells will help and we need a lot of them. Around 26 or so will do.";
		next;
		mes "I got you a request named ^880088Materials to Clear Snow^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@tut_13 == 6) {
		setquest 12122;
		setquest 12161;
		mes "[Pura]";
		mes "The Bradium Processing Machinery emits tremendous heat when used and cannot be stabilized with any kind of water.";
		next;
		mes "[Pura]";
		mes "So we mix Crystalized Teardrops obtained from Aqua Elementals from melted snow. This is a material we need daily so please bring back 6 of them.";
		next;
		mes "I got you a request named ^880088Best Cooler Material^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@tut_13 == 7) {
		setquest 12123;
		setquest 12161;
		mes "[Pura]";
		mes "The Supply Manager has urgently requested paint to use on building maintenance throughout the city.";
		next;
		mes "[Pura]";
		mes "He can make enough paint by using the Fluorescent Liquid obtained from Aqua Elementals. Please bring back 26 containers of it.";
		next;
		mes "I got you a request named ^880088Best Paint^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@tut_13 == 8) {
		setquest 12124;
		setquest 12161;
		mes "[Pura]";
		mes "The valuable interior water bottle in the minister's room is broken. They won't be able to find who did it because there are so many visitors every day.";
		next;
		mes "[Pura]";
		mes "Can you please bring me this valuable item from Aqua Elemental? I only need 1.";
		next;
		mes "I got you a request named ^880088Rare Valuable^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@tut_13 == 9) {
		setquest 12125;
		setquest 12161;
		mes "[Pura]";
		mes "Lining supplies for armor for the Guards are all out.";
		next;
		mes "[Pura]";
		mes "The scale shell from Naga are perfect lining material. Please bring back 18 of them.";
		next;
		mes "I got you a request named ^880088Armory Material^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else {
		setquest 12126;
		setquest 12161;
		mes "[Pura]";
		mes "I got you a request named lining material for armor supplied to the guard commanders. They are different from ordinary lining.";
		next;
		mes "[Pura]";
		mes "Please bring me 11 shining scales of Naga. I don't think it will be much trouble for you.";
		next;
		mes "I got you a request named ^880088Advanced Armory Material^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	close;
}

dicastes01,225,211,3	script	Tragis#pa0829	4_MAN_NITT,{
	if (!checkweight(Knife,1)) {
		mes "You have too many kinds of items. Let's try again after you reduce the number of items.";
		close;
	}
	if ((MaxWeight - Weight) < 1000) {
		mes "Cannot proceed because the weight of your items is too heavy. Let's try again after you get rid of some weight.";
		close;
	}
	if (!isequipped(2782)) {
		mes sprintf("¡õ¢£¡ô");
		mes sprintf("¡ö¡ø¡ó ¢£ ¡ö¡ñ¡ï ¡ù ¡ð¢²¢£");
		next;
		mes "I don't feel confident in talking since you wouldn't understand anything.";
		close;
	}
	if (ep13_3_invite < 6) {
		mes "Sapha keeps a distance from you even when you try to talk. Looks like he called on Guard Galten. Time to go.";
		close;
	}
	if (BaseLevel < 80) {
		mes "[Tragis]";
		mes "It is pretty embarassing that you are looking for a request with your level, you know that?";
		close;
	}
	if (questprogress(12162,PLAYTIME) == 2) {
		mes "[Tragis]";
		mes "Calculate your request activities with the ^990099Supply Dept. 2 Manager^000000 at Operations and then come back.";
		close;
	}
	else if (questprogress(12162,PLAYTIME)) {
		mes "[Tragis]";
		mes "I don't have any requests for you now. Report back to the ^990099Supply Dept. 2 Manager^000000 at Operations after you complete all requests.";
		close;
	}
	mes "[Tragis]";
	mes "Welcome.";
	mes "What brings you here?";
	next;
	if (select("Please explain the request to me.", "Please give me a request.") == 1) {
		mes "[Tragis]";
		mes "Pura will explain the detail about the supply job. I'm soooo busy as you can see.";
		close;
	}
	mes "[Tragis]";
	mes "I just got a request. It's good that none of us wasted time.";
	next;
	.@tut_13 = rand(1,10);
	if (.@tut_13 == 1) {
		setquest 12127;
		setquest 12162;
		mes "[Tragis]";
		mes "It's time to repair the trumpets for Mine supervisors.";
		next;
		mes "[Tragis]";
		mes "Because those trumpets are necessary to control the miners. The mystic horn from Cornus is the perfect trumpet material, please get 5 pieces of them.";
		next;
		mes "I got you a request named ^880088Supervisor's Tool^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@tut_13 == 2) {
		setquest 12128;
		setquest 12162;
		mes "[Tragis]";
		mes "It seems that there isn't enough amount of fur which is for the adventurers.";
		next;
		mes "[Tragis]";
		mes "It will be necessary to get some fur from Tatacho. 21 lumps will be enough.";
		next;
		mes "I got you a request named ^880088Preparation for Heating^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@tut_13 == 3) {
		setquest 12129;
		setquest 12162;
		mes "[Tragis]";
		mes "There was a request from the pub to collect 27 bug legs.";
		next;
		mes "[Tragis]";
		mes "They don't wanna reveal the reason why they need them. Anyway, thank you.";
		next;
		mes "I got you a request named ^880088Suspicious Food^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@tut_13 == 4) {
		setquest 12130;
		setquest 12162;
		mes "[Tragis]";
		mes "Zargon is very popular among the residents here. It's a beautiful, round shaped ball and can be used as a adhesive when its powder is mixed with water.";
		next;
		mes "[Tragis]";
		mes "Heard that it's very common material from the adventurers' land. Would you get some? It will be enough with 26 Zargons.";
		next;
		mes "I got you a request named ^880088Useful Material^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@tut_13 == 5) {
		setquest 12131;
		setquest 12162;
		mes "[Tragis]";
		mes "There is a request which is to find a material to be used for every quarter's building repair work.";
		next;
		mes "[Tragis]";
		mes "Please get 13 Solid shells which can be obtained from Centipede and Centipede Larva. It will be very useful for the repair work.";
		next;
		mes "I got you a request named ^880088Essential Material for Construction^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@tut_13 == 6) {
		setquest 12132;
		setquest 12162;
		mes "[Tragis]";
		mes "There is a request which is to find a material to be used for every quarter's building repair work.";
		next;
		mes "[Tragis]";
		mes "You need to get 16 Strong vines which can be got from nepenthes. It's a vital material for building repair work.";
		next;
		mes "I got you a request named ^880088Essential Material for Construction 2^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@tut_13 == 7) {
		setquest 12133;
		setquest 12162;
		mes "[Tragis]";
		mes "The guard need many sharp leaves for a decoration reason. Some other adventurers started searching them.";
		next;
		mes "[Tragis]";
		mes "They need pretty many quantity of the leaves so they want 26 sharp leaves from you. I know it's hard. Wish you good luck!";
		next;
		mes "I got you a request named ^880088Decoration arrangement^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@tut_13 == 8) {
		setquest 12134;
		setquest 12162;
		mes "[Tragis]";
		mes "The pub owner is in trouble due to many adventurers from outside.";
		next;
		mes "[Tragis]";
		mes "He wishes to have an utensil which can be used simply and instantly, something like a wide leaf.";
		next;
		mes "I got you a request named ^880088Instant Receptacle^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else if (.@tut_13 == 9) {
		setquest 12135;
		setquest 12162;
		mes "[Tragis]";
		mes "There have been couple of attacks in mine. It must be those Nepenthes that were trying to attack miners.";
		next;
		mes "[Tragis]";
		mes "In order to make the medicine, we need 16 brown roots. Find and bring them.";
		next;
		mes "I got you a request named ^880088Not enough medicine^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
	else {
		setquest 12136;
		setquest 12162;
		mes "[Tragis]";
		mes "The pub owner came by and blamed and blamed about the big appetite of you guys.";
		next;
		mes "[Tragis]";
		mes "He said he has no more stock of honey and fruits. 2 jugs of honey will be enough to soothe him.";
		next;
		mes "I got you a request named ^880088Honey robber^000000. You can check details of the request and who to report back to by opening the ^990099Quest Window^000000.";
		close;
	}
}

//== Doha's Secret Orders ==================================
mid_campin,168,170,3	script	Inspector Doha#ep133	1_M_ORIENT01,{
	if (checkweight(Knife,1) == 0 || MaxWeight - Weight < 1000) {
		mes "- You can too many items to proceed with the quest. -";
		close;
	}
	if (ep13_3_secret < 1) {
		mes "[Doha]";
		mes "What is it?";
		mes "You don't look like you have any business with me.";
		mes "If you don't, please leave now.";
		close;
	}
	else if (ep13_3_secret == 1) {
		mes "[Doha]";
		mes "Who is asking?";
		mes "If you are in the wrong room, please leave now.";
		next;
		if (select("Came to meet the inspector.", "Sorry.") == 1) {
			mes "[Doha]";
			mes "Me?";
			mes "Are you the person the captain was speaking of?";
			mes "What was the name...";
			mes strcharinfo(PC_NAME) + "?";
			next;
			mes "[Doha]";
			mes "Hmm.. I don't know why you were chosen but I guess they trusted you enough.";
			mes "I heard you were chosen to visit El Dicastes, the capital city of Sapha.";
			next;
			mes "[Doha]";
			mes "I have a secret mission for you regarding this visit.";
			mes "More like an order.";
			next;
			mes "[Doha]";
			mes "I'm the inspector dispatched from the home country because of the report case.";
			mes "We are working on investigating the truth behind the reported case.";
			next;
			select("Report case?");
			mes "[Doha]";
			mes "You haven't heard of it?";
			mes "I thought you already knew..";
			mes "So you're not the one that collected the report back then?";
			next;
			mes "[Doha]";
			mes "When the expedition was dispatched before";
			mes "there was a general report on our research results on various categories";
			mes "and the messenger that was carrying this report back to home country was attacked.";
			next;
			mes "[Doha]";
			mes "Luckily the report wasn't stolen completely";
			mes "and we did get the report after painstakingly restoring it.";
			mes "The important thing is who did this.";
			next;
			mes "[Doha]";
			mes "As you already know the expedition here is an alliance of 3 countries.";
			mes "And we aren't all in good terms.";
			mes "That is why Hibba Agip was put in charge by the captain and upper management because he isn't attached to any of the countries.";
			next;
			mes "[Doha]";
			mes "But the important thing is which country was behind this";
			mes "and why would they do such a thing when we must promote peace and cooperation.";
			next;
			mes "[Doha]";
			mes "That is why I was dispatched here to investigate on.";
			mes "I've come across an unexpected information during my investigation.";
			next;
			mes "[Doha]";
			mes "Do you know the Cat Merchant?";
			mes "They are also doing business nearby.";
			mes "One of the Cat Merchants";
			mes "spilled this information to me.";
			next;
			mes "[Doha]";
			mes "I was investigating at the location assumed to be where the attack took place";
			mes "when I met a cat. Well.. I don't know what else I'm supposed to call them.";
			next;
			mes "[Doha]";
			mes "But it turns out, I was lucky to meet this cat.";
			mes "Because he turned out to be a witness to the case.";
			next;
			select("Witness!", "Who did it?");
			mes "[Doha]";
			mes "Sigh...";
			mes "He did witness the case but the description I got was...";
			mes "suspicious at first.";
			next;
			mes "[Doha]";
			mes "Well... the cat said in his own words.";
			mes "he might be one of us because he was very agile and quick.";
			next;
			select("Same race? Cat?");
			mes "[Doha]";
			mes "Yes.";
			mes "I heard the cat say that with my own ears.";
			mes "He said he went back to the place to see if it was a lost friend of his.";
			next;
			mes "[Doha]";
			mes "Hmm... my throat is soar from talking too much.";
			mes "Let's continue later after I get some rest.";
			mes "I think I need a cup of water.";
			ep13_3_secret = 2;
			close;
		}
		mes "[Doha]";
		mes "Thank you.";
		mes "I'm a little tired now.";
		mes "I hope to see you next time.";
		close;
	}
	else if (ep13_3_secret == 2) {
		mes "[Doha]";
		mes "Wow.... they say this is the water melted from the snow from the snowy fields.";
		mes "Very refreshing, don't you agree?";
		mes "....";
		next;
		mes "[Doha]";
		mes "Then back to the story.";
		mes "So I asked why the cat thought it was his own kind.";
		next;
		mes "[Doha]";
		mes "He said the attacker had a wonderful tail and attractive ears.";
		mes "Hard to believe.";
		next;
		select("It was a cat?");
		mes "[Doha]";
		mes "No. I asked the same question.";
		mes "And he said the attacker looked more like me.";
		mes "Meaning humanlike to be precise.";
		next;
		mes "[Doha]";
		mes "Yes. A human male.";
		mes "He said ^4d4dff the attacker had attractive ears and a sleek and glossary tail^000000!";
		next;
		select("Could it be a hobby?");
		mes "[Doha]";
		mes "Are you talking about the Kitty Band that was popular in Prontera?";
		mes "If a full grown male was wearing one of those... and also a tail?";
		next;
		if (select("Was he in disguise?", "Taste should be respected.") == 1) {
			mes "[Doha]";
			mes "I agree.";
			mes "I think one of the countries is behind this.";
			mes "I honestly think both the Sapha and Rapine won't get anything out of this.";
			next;
			mes "[Doha]";
			mes "I guess it will only be a way of hiding you are from.";
			mes "Disguised as a cat, that is!";
			next;
		}
		else {
			mes "[Doha]";
			mes "....................";
			mes "............Of course";
			mes "different tastes should be respected.";
			next;
			mes "[Doha]";
			mes "....Ahem.";
			mes "My conclusion is";
			mes "Someone disguised themselves ridiculously in order to hide where they came from!";
			next;
		}
		mes "[Doha]";
		mes "So what we need to do now is";
		mes "Finding a guy with cat ears.";
		mes "But I'm not so sure he will have them on him now.";
		next;
		mes "[Doha]";
		mes "But as the Cat Merchant mentioned, we shouldn't rule out the possibility that he might be from a third party.";
		mes "Then what could his motives be.";
		next;
		mes "[Doha]";
		mes "Let's start simple before it gets too complicated.";
		mes "I heard you are visiting El Dicastes, the capital city of Sapha.";
		next;
		mes "[Doha]";
		mes "Whether it is a cat or dog";
		mes "Please try to collect information on a guy with animal ears.";
		next;
		mes "[Doha]";
		mes "I will continue on searching and investigating Manuk and Splendide from here.";
		mes "I need you to investigate during your journey and also at El Dicastes.";
		next;
		mes "[Doha]";
		mes "This is a very important mission.";
		mes "There is a delicate conflict between the three countries";
		mes "and there might be a possibility of an unknown third party.";
		next;
		mes "[Doha]";
		mes "And why did the attacker only interfered instead of stealing the whole report.";
		mes "we need to the purpose.";
		next;
		mes "[Doha]";
		mes "Please bring back some clues. Anything you come by during your journey";
		mes "Please report back to me if you have anything leads.";
		ep13_3_secret = 3;
		changequest 7185,7186;
		close;
	}
	else if (ep13_3_secret == 3) {
		mes "[Doha]";
		mes "I will investigate Manuk and Splendide.";
		mes "So you will have to look for clues in El Dicastes.";
		next;
		mes "[Doha]";
		mes "About the guy with animal ears.";
		mes "It will be a tough mission but I know you will do well.";
		close;
	}
	else if (ep13_3_secret > 3 && ep13_3_secret < 22) {
		mes "[Doha]";
		mes "How is the investigation going?";
		mes "Please try your best.";
		mes "not to break the parallel relationship between countries.";
		close;
	}
	else if (ep13_3_secret == 22) {
		if (countitem(Solid_Bloodstain) && countitem(Frozen_Skin_Piece) && countitem(Suspicious_Magic_Stone)) {
			mes "[Doha]";
			mes "How is the investigation going?";
			mes "Do you have any significant status?";
			next;
			mes "You share the details regarding Diel, Cheshire, Ahat and the crack of dimension.";
			mes "You give him a clot of blood, shells and a magical stone as evidence.";
			next;
			mes "[Doha]";
			mes "Hmm..";
			mes "I actually gave the same mission to all other people heading for El Dicastes.";
			next;
			mes "[Doha]";
			mes "They have all brought information based on assumptions.";
			mes "Meaning your evidences are not much different from the others.";
			next;
			mes "[Doha]";
			mes "At least we found out one thing.";
			mes "At least we now know that the attacker is not from the three countries of Midgard.";
			mes "But this is only an assumption.";
			next;
			mes "[Doha]";
			mes "Details of the report will be verified by a superior authority and a schedule for the next step will be given.";
			mes "Thank you.";
			next;
			mes "[Doha]";
			mes "Please have this.";
			mes "This is a reward for your services up to now.";
			mes "You deserve this for the hardship you are going through in another world.";
			delitem Solid_Bloodstain,1;
			delitem Frozen_Skin_Piece,1;
			delitem Suspicious_Magic_Stone,1;
			ep13_3_secret = 23;
			getitem Dragon_Manteau,1;
			erasequest 7202;
			completequest 7203;
			next;
			mes "[Doha]";
			mes "....";
			mes "Sapha and Rapine, which ever.";
			mes "I have something more urgent.";
			next;
			select("Can you repeat that?");
			mes "[Doha]";
			mes "..? ";
			mes "I didn't say a thing.";
			mes "I guess you heard wrong.";
			mes "Will you leave now? Because I have to organize a report.";
			close;
		}
		mes "You are missing evidence to submit with your report:";
		mes "Clotted Bloodstain, Piece of Frozen Skin, Strange Magic Stone.";
		mes "You will have to collect the items again.";
		close;
	}
	mes "[Doha]";
	mes "There won't be any changes to the current policy.";
	mes "Home land will continue to review the contents of your reports.";
	mes "[Doha]";
	mes "All we can do for now is";
	mes "do our best, right?";
	mes "He says its kindly but his eyes have a get out and do your work kind of look.";
	close;
}

dic_in01,245,119,4	script	Shay#ep133_13	4_M_ACROSS,{
	// if ((GetInventoryRemainCount 1301 3 == 2) || (GetInventoryRemainCount 1301 3 == 3)) {
	if ((MaxWeight - Weight) < 1000) {
		mes "- You can too many items to proceed with the quest. -";
		close;
	}
	cutin "ep13_shy",2;
	mes "[Shay]";
	switch (rand(1,5)) {
		case 1: mes ".. Burman Flone."; break;
		case 2: mes "What?"; break;
		case 3: mes "Boring. What is it?"; break;
		case 4: mes "Sigh... Ready to order?"; break;
		case 5:
			mes "Another failure?.";
			mes "I'm talking to myself. Don't bother.";
			mes "What do you want?";
			break;
	}
	next;
	switch (select("Order.", "Talk.", "Never mind.")) {
		case 1:
			mes "[Shay]";
			mes "What will it be?";
			mes "I have Tropical Sograt and Vermilion on the Beach flown in from Morroc.";
			mes "A bit on the expensive side though.";
			next;
			if (select("Tropical Sorgrat - 2000z", "Vermilion on the Beach - 2000z", "Anything else?") == 3) {
				mes "[Shay]";
				mes "Here.. ";
				mes "......Hmmm...";
				mes "Nah.";
				break;
			}
			setarray .@str$[1], "Tropical Sorgrat","Vermillion on the Beach.";
			setarray .@item[1], 12112,12113;
			if (Zeny > 1999) {
				mes "[Shay]";
				mes "Here is your "+.@str$[@menu]+".";
				Zeny -= 2000;
				getitem .@item[@menu],1; //Tropical_Sograt
				break;
			}
			mes "[Shay]";
			mes .@str$[@menu]+" is 2000 Zeny.";
			mes "What is it so expensive?";
			mes "Then you try to bring it all the way here.";
			break;
	case 2:
		if (ep13_3_invite < 6) {
			mes "[Shay]";
			mes "If you haven't registered at Diel yet, you better do it soon.";
			mes "That is the only way to start receiving requests and guarantee your safety here.";
			next;
			mes "[Shay]";
			mes "To avoid conflicts apart from diplomatic trouble";
			mes "it is always better to respect each sides agreement.";
			mes "Don't you agree?";
			break;
		}
		else {
			if (ep13_3_secret < 3) {
				mes "[Shay]";
				mes "Not that busy but I don't want to do it.";
				break;
			}
			else if (ep13_3_secret == 3) {
				mes "[Shay]";
				mes "I don't want to talk about personal stuff.";
				mes "But do you have any questions?";
				next;
				switch (select("Tell me about yourself", "About Sapha", "About other races", "....Hmm..")) {
					case 1:
						mes "[Shay]";
						mes "Me?";
						mes ".If you are asking about my name, it is written on my badge here.";
						mes "It's Shay.";
						next;
						select("Not that");
						mes "[Shay]";
						mes "Hmm. Then should I tell you the story on how I settled here?";
						mes "The first to apply to expedite here";
						mes "where the Assassins.";
						next;
						mes "[Shay]";
						mes "I was one of them.";
						mes "That is how I got to reach this place before anyone else did";
						mes "And that is how the base of the expedition camp was built.";
						next;
						mes "[Shay]";
						mes "But you know.";
						mes "I thought I'd return to my hometown and retire.";
						mes "But El Dicastes contacted me.";
						next;
						mes "[Shay]";
						mes "They requested if I could open a place for us outsides to feel comfortable with.";
						mes "They also were considerate enough to build it in Midgard style.";
						next;
						mes "[Shay]";
						mes "So the framework and style,";
						mes "architect was brought in..";
						mes "and then I found myself managing the whole project?";
						next;
						mes "[Shay]";
						mes "And...";
						mes "that is how I got here.";
						mes "I've been here ever since!";
						next;
						mes "[Shay]";
						mes "I don't remember what my original job was.";
						mes "Little rusty on the Katar, I guess...";
						next;
						mes "Shay suddenly has a lonely expression and sighs deeply about his situation.";
						mes "Looks very tired.";
						break;
					case 2:
						mes "[Shay]";
						mes "Sapha?";
						mes "You are surrounded by Saphas.";
						mes "......";
						next;
						mes "[Shay]";
						mes "What are you asking me?";
						mes "Just ask any Sapha passing by.";
						mes "Ask 'what are you'.";
						break;
					case 3:
						mes "[Shay]";
						mes "Other races?";
						mes "Talking about Sapha?";
						next;
						if (select("With cat ears.", "With butterfly wings.") == 1) {
							mes "[Shay]";
							mes "Cat?";
							mes "Are you talking about the Cat Merchant?";
							mes "They are camped outside of the capital gate.";
							next;
							mes "[Shay]";
							mes "They even mined and fished near the expedition camp.";
							mes "They are currently trying to expand their business";
							next;
							mes "[Shay]";
							mes "Well.. bigger then them?";
							mes "Not sure. Haven't heard of it.";
							mes "Why don't you ^4d4dffask Sapha's around here?^000000";
							ep13_3_secret = 4;
							erasequest 7186;
							setquest 7187;
							break;
						}
						mes "[Shay]";
						mes "Butterfly wings? Are you talking about Rapine?";
						mes "Don't know them?";
						mes "You really no nothing.";
						next;
						mes "[Shay]";
						mes "If you want to know about Rapine, go to Splendide.";
						mes "They are rough and tough.";
						break;
					case 4:
						mes "[Shay]";
						mes "What...";
						mes "I'm not that busy but don't bother me too much.";
						break;
				}
				break;
			}
			else if (ep13_3_secret == 4) {
				mes "[Shay]";
				mes "What is it now?";
				mes "Any luck?";
				next;
				setarray .@ward$,
					"7188","The Knits at the square are interested in Ahat.",
					"7189","I heard from Pioms that most of the Saphas are interested in the minister.",
					"7190","Galtens are interested in the Cat Merchant for their cat ears.";
				mes "[" + strcharinfo(PC_NAME) + "]";
				mes "I'm trying to organize the information I've collected.";
				.@size = getarraysize(.@ward$);
				for (.@i = 0; .@i < .@size; .@i += 2)
					if (questprogress(atoi(.@ward$[.@i]))) {
						++.@sealall;
						mes .@ward$[.@i+1];
					}
				if (!.@sealall) mes "But what should I do with the collected information?";
				next;
				if (.@sealall < 3) {
					mes "[" + strcharinfo(PC_NAME) + "]";
					mes "Moan...";
					mes "[Shay]";
					mes "You look lost like as if nothing makes sense anymore.";
					mes "They solution is simply to ask around.";
					next;
					mes "[Shay]";
					mes "There are many Saphas working at the factory, drill hall, square and anywhere else.";
					mes "There are the Cat Merchants outside of the castle, too.";
					break;
				}
				mes "[" + strcharinfo(PC_NAME) + "]";
				mes "Everybody";
				mes "is talking about the minister these days!";
				mes "What is with this Ahat anyway.";
				next;
				mes "[Shay]";
				mes "I haven't even seen the minister.";
				mes "I heard many say that he is beautiful.";
				next;
				mes "[Shay]";
				mes "Anyway........";
				mes "Try this.";
				mes "I've been working on this for some time and hope that this can go on the menu.";
				next;
				mes "- Shay places a baked pie with the base made out of carrots.";
				mes "Topped with something that looks like apples or bananas.";
				mes "You immediate think it is too risky to try. ?";
				next;
				select("The minced ingredient is...");
				mes "[Shay]";
				mes "An apple pie.";
				mes "I garnished it with bananas.";
				mes "Doesn't look like it but this is an apple pie.";
				next;
				mes "[" + strcharinfo(PC_NAME) + "]";
				mes "But why is there a carrot in a pie.";
				mes "And there is no hint of apples.";
				next;
				mes "[Shay]";
				mes "Stop!!!!!!!!!!!!!";
				specialeffect2 EF_HIT1;
				specialeffect2 EF_HIT2;
				percentheal -30,0;
				next;
				mes "-Shay got all upset and threw something sticky and smelly.";
				mes "The pie left Shay's palm and landed square in your face. -";
				next;
				mes "[Shay]";
				mes "Oops.. umph.. hmph...";
				mes "Phew... sigh...";
				mes "...........";
				next;
				mes "[Shay]";
				mes "S..Sorry. Aello told me to help you but..";
				mes ".......";
				mes "I couldn't help myself.";
				next;
				mes "[Shay]";
				mes "Ha.. there is a cat named BK among the Cat Merchants.";
				mes "He might have the information you want.";
				mes "... Go.. meet BK.";
				next;
				mes "[Shay]";
				mes "And if he ignores you, tell him that ^4d4dffShay's special drink will be delivered^000000.";
				ep13_3_secret = 5;
				erasequest 7188;
				erasequest 7189;
				erasequest 7190;
				changequest 7187,7191;
				break;
			}
			else if (ep13_3_secret > 4 && ep13_3_secret < 9) {
				mes "[Shay]";
				mes "You can find the Cat Merchants outside of the gate.";
				mes "They seem like a small group of wanders.";
				mes "You'll see their tent southeast from the gate.";
				next;
				mes "[Shay]";
				mes "BK is the one that holds information around there.";
				mes "He will be able to help you.";
				break;
			}
			else if (ep13_3_secret == 9) {
				mes "[Shay]";
				mes "You say BK said that?";
				mes "So it is...";
				mes "I did think Ahat was beautiful than normal.";
				next;
				mes "[Shay]";
				mes "But according to the Saphas' stories I hear in this pub";
				mes "they all have a different version of Ahat.";
				next;
				mes "[Shay]";
				mes "But BK said Ahat isn't a Sapha?";
				mes "That only means that its not the looks that is different but may be completely a different race.";
				next;
				mes "[Shay]";
				mes "We can only investigate.";
				mes "They say he came from the crack so let's investigate the crack.";
				next;
				mes "[Shay]";
				mes "But there is a crack here too?";
				mes "..Too many ill-fates.";
				mes "Bit sorrowful.";
				ep13_3_secret = 10;
				changequest 7192,7193;
				break;
			}
			else if (ep13_3_secret == 10) {
				mes "[Shay]";
				mes "It is always better to go to the site.";
				mes "Because it is difficult to meet the minister.";
				next;
				mes "[Shay]";
				mes "The crack here must have been created when the crack in Morroc appeared.";
				mes "If he did it.";
				next;
				mes "[Shay]";
				mes "You'll find a crack northeast from El Dicastes.";
				mes "Try investigating there.";
				break;
			}
			else if (ep13_3_secret == 11) {
				mes "[Shay]";
				mes "Any luck?";
				next;
				setarray .@quest, 7194,7195,7196;
				setarray .@item, 6306,6305,6307;
				setarray .@str$, "bloodstain","frozen piece of skin","strange magical stone fragment";
				.@size = getarraysize(.@item);
				for (.@i = 0; .@i < .@size; ++.@i) {
					if (countitem(.@item[.@i])) {
						mes "- You show the " + .@str$[.@i] + " you collected from near the crack.-";
						.@crack = 1;
						next;
						break;
					}
				}
				if (!.@crack) {
					mes "- You do not have the item needed for the quest. Case3";
					mes "If your quest item was destroyed, request help from GM.-";
					break;
				}
				mes "[Shay]";
				mes ".. I didn't expect this.";
				mes "Then who is Ahat..?";
				mes "...I smell something fishy.";
				next;
				mes "[Shay]";
				mes "I don't know since I haven't seen Ahat in person but";
				mes "we must find out what all this means.";
				next;
				select("Do you trust BK?");
				mes "[Shay]";
				mes "At least BK doesn't lie.";
				mes "The BK I know never lies.";
				mes "Why are these found near the crack?";
				mes "Why was Ahat near the crack..";
				next;
				select("Do you want to meet in person?");
				mes "[Shay]";
				mes "You can't just waltz in him.";
				mes "It's even harder for outsiders like us to meet him.";
				mes "Hm...";
				next;
				mes "[Shay]";
				mes "We can try collected exploit certifications.";
				mes "Those who did great deeds get the opportunity to meet the minister.";
				next;
				mes "[Shay]";
				mes "The Cat Merchants are also collected exploit certifications. They want to meet the minister in person so they can negotiate business.";
				next;
				mes "[Shay]";
				mes "You can receive exploit certifications from handling requests throughout the city.";
				mes "If you want to meet the minister Ahat...";
				next;
				mes "[Shay]";
				mes "You'll need at least ^4d4dff3 exploit certifications^000000.";
				mes "Go ^4d4dffask around in Diel^000000 for more information.";
				next;
				mes "[Shay]";
				mes "Sapha that registers adventurers in Diel.";
				mes "Was his name ^4d4dffRhawyne^000000. Ask him.";
				next;
				select("Don't you have any exploit certification of Sapha?");
				mes "[Shay]";
				mes "................";
				mes "Do you think I'm that free?";
				mes "I'm not the one receiving request, I'm the one that makes the requests!!";
				next;
				mes "[Shay]";
				mes "Tsk.";
				mes "First, think of what you have to do.";
				mes "Meet Ahat by collecting exploit certifications.";
				mes "And then find doubt what is the relationship between him and the crack.";
				ep13_3_secret = 12;
				for (.@i = 0; .@i < getarraysize(.@quest); ++.@i)
					if (questprogress(.@quest[.@i])) erasequest .@quest[.@i];
				setquest 7197;
				break;
			}
			else if (ep13_3_secret == 12) {
				mes "[Shay]";
				mes "Start with collecting exploit certifications.";
				mes "You'll need at least 3 certifications to meet the minister.";
				next;
				mes "[Shay]";
				mes "Once you have your certifications, go make a request to meet the minister at the Adventurer's reception desk in Diel.";
				mes "Rhawyne will help you.";
				break;
			}
			else if (ep13_3_secret == 13) {
				mes "[Shay]";
				mes "So.. you got permitted?";
				mes "I'm also curious who this Ahat character is.";
				next;
				mes "[Shay]";
				mes "Good. I'll prepare some food until you come back.";
				mes "I just found this amazing chocolate recipe a few days ago.";
				next;
				select("Oh..no..");
				mes "[Shay]";
				mes "When I was in Morroc.";
				mes "A colleague from the guild used to make chocolate stuff you see?";
				mes "I thought it would be simple since he was making it.";
				next;
				select("So.....");
				mes "[Shay]";
				mes "Wait till you taste it.";
				mes "Now, get going.";
				break;
			}
			else if ((ep13_3_secret > 13) && (ep13_3_secret < 17)) {
				mes "[Shay]";
				mes "How was the minister?";
				next;
				if (select("Strange.", "..Beautiful...") == 1) {
					mes "[Shay]";
					mes "So.. how strange.";
					mes "..was it bad or good?";
					mes "No, that isn't important. Try to remember what you were there for.";
					break;
				}
				mes "[Shay]";
				mes "Huh? Really?";
				mes "You can tell the beauty even if the race is different.";
				mes "Do you job instead of dreaming about his appearance.";
				break;
			}
			else if ((ep13_3_secret > 16) && (ep13_3_secret < 19)) {
				mes "[Shay]";
				mes "Hmm...";
				mes "Clearing the crack area?";
				mes "Sounds weird.";
				mes "Something smells fishy.";
				next;
				mes "[Shay]";
				mes "Don't forget to bring back evidence.";
				mes "And to pretend you are hypnotized.";
				mes "Good. This is our secret.";
				next;
				mes "[Shay]";
				mes "Funny how things come about.";
				mes "But you really are talkative.";
				mes "You are telling me everything. Tsk.";
				break;
			}
			else if (ep13_3_secret > 18 && ep13_3_secret < 22) {
				mes "[Shay]";
				mes "Did you know?";
				mes "There is another skillful Jarute.";
				mes "Name is HesLanta.";
				next;
				mes "[Shay]";
				mes "He sometimes come back and shares his stories.";
				mes "But I think he also has a story to tell.";
				next;
				mes "[Shay]";
				mes "It's only a thought but";
				mes "It might be good to talk to those near Ahat too.";
				next;
				mes "[Shay]";
				mes "How about talking to the Jarute named HesLanta?";
				mes "You don't have nothing to lose, anyway.";
				break;
			}
			else if (ep13_3_secret == 22) {
				mes "[Shay]";
				mes "Why are you here again?";
				mes "Are you working?";
				next;
				if (select("Mission completed!", "Came to thank you.") == 1) {
					mes "[Shay]";
					mes "Really?";
					mes "Good for you.";
					mes ".....";
					mes "Mission. Haven't heard that word for ages.";
					next;
					mes "[Shay]";
					mes "Now go.";
					mes "I'm busy.";
					mes "New ingredients are coming in today.";
					mes "Go now.";
					break;
				}
				mes "[Shay]";
				mes "If you are that grateful, each all my new cuisines till the last bite.";
				next;
				select("Ah, that is um...");
				mes "[Shay]";
				mes "Huh? Get lost.";
				mes "Ungrateful....";
				break;
			}
			.@shysay = rand(1,3);
			if (.@shysay == 1) {
				mes "[Shay]";
				mes "What do you want?";
				next;
				switch (select("Tell me about yourself", "About Sapha", "....Hmm..")) {
					case 1:
						mes "[Shay]";
						mes "Me?";
						mes "Didn't I tell you before?";
						next;
						select("Nope..");
						mes "[Shay]";
						mes "No, I told you my story before.";
						mes "But since you have bad memory, I'll tell you again.";
						next;
						mes "[Shay]";
						mes "Hmm. Then should I tell you the story on how I settled here?";
						mes "The first to apply to expedite here";
						mes "where the Assassins.";
						next;
						mes "[Shay]";
						mes "I was one of them.";
						mes "That is how I got to reach this place before anyone else did";
						mes "And that is how the base of the expedition camp was built.";
						next;
						mes "[Shay]";
						mes "But you know.";
						mes "I thought I'd return to my hometown and retire.";
						mes "But El Dicastes contacted me.";
						next;
						mes "[Shay]";
						mes "They requested if I could open a place for us outsides to feel comfortable with.";
						mes "They also were considerate enough to build it in Midgard style.";
						next;
						mes "[Shay]";
						mes "So the framework and style,";
						mes "architect was brought in..";
						mes "and then I found myself managing the whole project?";
						next;
						mes "[Shay]";
						mes "And...";
						mes "that is how I got here.";
						mes "I've been here ever since!";
						next;
						mes "[Shay]";
						mes "I don't remember what my original job was.";
						mes "Little rusty on the Katar, I guess...";
						next;
						mes "Shay suddenly has a lonely expression and sighs deeply about his situation.";
						mes "Looks very tired.";
						break;
					case 2:
						mes "[Shay]";
						mes "Sapha?";
						mes "You are surrounded by Saphas.";
						mes "......";
						next;
						mes "[Shay]";
						mes "What are you asking me?";
						mes "Just ask any Sapha passing by.";
						mes "Ask 'what are you'.";
						break;
					case 3:
						mes "[Shay]";
						mes "What...";
						mes "I'm not that busy but don't bother me too much.";
						break;
				}
				break;
			}
			else if (.@shysay == 2) {
				mes "[Shay]";
				mes "What did you bring here now?";
				mes ".........";
				mes "What? No?";
				next;
				mes "[Shay]";
				mes "Tsk.... boring.";
				break;
			}
			else {
				mes "[Shay]";
				mes "Why is strawberry chocolate so difficult to make?";
				mes "Why is my chocolate falling apart?";
				next;
				mes "[Shay]";
				mes "Also this chocolate pie.";
				mes "How do I bake it just the right golden color?";
				mes "Why can't it be white or black?";
				mes "It isn't the pie that is important. It's the chocolate that is.";
				next;
				mes "[Shay]";
				mes "How did my colleague make this?!";
				mes "............";
				mes "...Do girls like this?";
				next;
				if (select("They normally do like homemade chocolate.", "No. only aliens.") == 1) {
					mes "[Shay]";
					mes "I see.";
					mes "So...";
					mes "Are you married?";
					break;
				}
				mes "[Shay]";
				mes "You're alone, right?";
				mes "....";
				mes "Sorry.";
				mes "We're in the same boat.";
				break;
			}
		}
	case 3:
		mes "[Shay]";
		mes "Suit yourself.";
		break;
	}
	close2;
	cutin "",255;
	end;
}

dicastes01,207,210,5	script	Walking Knit#ep133_15	4_MAN_BENKUNI,{
	if (!isequipped(2782)) {
		mes "[Knit]";
		mes sprintf("¡õ¢£¡ô");
		mes sprintf("¡ö¡ø¡ó ¢£ ¡ö¡ñ¡ï ¡ù ¡ð¢²¢£");
		next;
		mes "Cannot communicate with him.";
		close;
	}
	if (ep13_3_secret == 4) {
		mes "[Knit]";
		mes "Welcome, human.";
		mes "I'm finally used to meeting other races like you.";
		next;
		if (select("Are there races other than humans?", "What are you doing?") == 1) {
			mes "[Knit]";
			mes "There were Rapine before you came.";
			mes "And of course there are still.";
			mes "But they are over the Kamidal mountains.";
			next;
			mes "[Knit]";
			mes "And then the cats..";
			mes "Ah, did you see the group of cats in front of the castle?";
			mes "They are really soft and cuddly unlike us.";
			next;
			if (!questprogress(7188)) {
				mes "[Knit]";
				mes "And especially their ear and tail!!";
				next;
				select("Have you seen this man?");
				mes "[Knit]";
				mes "Eh? Huh?";
				mes "Man? Human male?";
				mes "A human male with cat ears?";
				mes "Never heard such thing..";
				next;
				mes "[Knit]";
				mes "Humans are amazing!";
				mes "Didn't even think of that...!";
				mes ".....";
				next;
				mes "[Knit]";
				mes "But they are really lovely.";
				mes "Those cute cats..";
				next;
				mes "[Knit]";
				mes "But Ahat is also loveable even for a Sapha.";
				mes "....if my hair is like a dry winter tree..";
				mes "Ahat's hair is like new sprouts in early spring.....";
				next;
				mes "[Knit]";
				mes "I can't believe how he does his work for Dicastes";
				mes "and still maintain such great hair.";
				mes "I can almost see a glow.";
				next;
				mes "[Knit]";
				mes "Ah.....his skin is divine.";
				mes "But he never comes out from his office high up in Dicastes Diel.";
				next;
				mes "[Knit]";
				mes "But I guess it would be better for Ahat's complexion...";
				mes "to stay warm and safe like a crystal bird in Diel instead of being out in the winter weather!";
				next;
				mes "- Continues to talk about Ahat.";
				mes "Don't think I'll get any more information. -";
				setquest 7188;
				close;
			}
			mes "[Knit]";
			mes "They are really lovely.";
			mes "Those cute cats..";
			next;
			mes "[Knit]";
			mes "But Ahat is also loveable even for a Sapha.";
			mes "....if my hair is like a dry winter tree..";
			mes "Ahat's hair is like new sprouts in early spring.....";
			next;
			mes "[Knit]";
			mes "Ah.. I'm so jealous, envious..";
			close;
		}
		mes "[Knit]";
		mes "As you can see, I'm taking a walk.";
		mes "I should walk from time to time to prevent myself from getting stiff.";
		mes "I really don't like to get stiff.";
		close;
	}
	mes "[Knit]";
	mes "Don't you think cats are amazing.";
	mes "I heard from where you came from, you have pets..";
	next;
	mes "[Knit]";
	mes "Is it okay to raise other creatures?";
	mes "Do they want that?";
	mes "It's a difficult issue..";
	close2;
}

dicastes01,112,248,5	script	Resting Piom#ep133_16	4_MAN_PIOM5,{
	mes "[Piom]";
	if (!isequipped(2782)) {
		mes sprintf("¡ñ¡÷¢¤ ¡ö ¢±¡ñ¡ú?");
		mes sprintf("¡ò¢³~!");
		mes sprintf("¡Ð¢²¢¤ ¢± ¡ü¡ñ¡õ ¢³ ¡ð !!!");
		next;
		mes "Cannot communicate with him.";
		close;
	}
	if (ep13_3_secret == 4) {
		mes "[Piom]";
		mes "Phew.. I need to rest.";
		mes "Huh? You're... human!";
		mes "Why are you here?";
		next;
		if (!questprogress(7189)) {
			select("About a human with cat ears..");
			mes "[Piom]";
			mes "HAHAHAHA!!!";
			mes "HAHAHAHA!!!";
			mes "There are so many asking about that recently.";
			mes "Is there any conflict with the Cat Merchants?";
			next;
			mes "[Piom]";
			mes "Haha.. ... funny.";
			mes "Human with cat ears. Never heard of such thing.";
			mes "But you seem to be new around here.";
			next;
			mes "[Piom]";
			mes "Don't waste your time on something ridiculous as that";
			mes "That's it! I think you are the right person.";
			next;
			mes "[Piom]";
			mes "The minister stays at the top of Diel";
			mes "Try meeting the minister.";
			mes "He is a wonderful person.";
			mes "A role model to all Saphas!";
			next;
			mes "[Piom]";
			mes "You need to know about Saphas if you are staying in El Dicastes, right?";
			mes "Don't spend time with a dusty Piom like me, and go meet Ahat.";
			mes "You will love him.";
			next;
			mes "- Continues to talk about Ahat.";
			mes "Don't think I'll get any more information. -";
			setquest 7189;
			close;
		}
		mes "[Piom]";
		mes "Don't follow cats around";
		mes "Go and meet Ahat.";
		mes "He is really beautiful.";
		close;
	}
	mes "[Piom]";
	mes "As you can see, I'm taking a rest.";
	mes "I like my job but it is so tiresome.";
	mes "But I'm happier than when I was a Knit.";
	next;
	mes "[Piom]";
	mes "I can't think straight.";
	mes "I didn't like working through documents the Knits do.";
	mes "But then Galtens have to carry heavy weapons.";
	next;
	mes "[Piom]";
	mes "The last thing I did was mine and refine Bradium";
	mes "and I loved it!";
	mes "And to think that my work keeps everyone healthy";
	mes "is rewarding.";
	close;
}

dicastes01,249,140,3	script	Training Galten#ep133_17	4_MAN_GALTUN,{
	if (!isequipped(2782)) {
		mes "[Galten]";
		mes sprintf("¡ø¡ô¡ü ¡ø ¡ø¡ô¡ü");
		mes sprintf("¡ø¡ô¡ü");
		next;
		mes "Cannot communicate with him.";
		close;
	}
	if (ep13_3_secret == 4) {
		mes "[Galten]";
		mes "Hmm...another peaceful day.";
		mes "Hmm? Aren't you the outsider that came here awhile ago?";
		mes "Have you come to see the training grounds?";
		next;
		if (!questprogress(7190)) {
			select("About a human with cat ears..");
			mes "[Galten]";
			mes "Cat ears?";
			mes "Is there someone like that?";
			mes "Humans are like that?";
			next;
			mes "[Galten]";
			mes "What? No?";
			mes "Then why are you looking him..";
			mes "Why don't you go meet Ahat instead of wasting your time.";
			next;
			mes "[Galten]";
			mes "Anyone that wants to be strong";
			mes "should meet Ahat.";
			mes "He is a very strong Sapha.";
			next;
			mes "[Galten]";
			mes "He may be a Jarute working through piles of documents";
			mes "but he must be hiding his power!";
			next;
			mes "[Galten]";
			mes "Everyone says Ahat is like a delicate spring sprout";
			mes "but I don't agree!";
			mes "I've never seen a stronger Sapha before.";
			mes "But I don't quite understand why he didn't become a Galten...";
			next;
			mes "- Continues to talk about Ahat.";
			mes "Don't think I'll get any more information. -";
			setquest 7190;
			close;
		}
		mes "[Galten]";
		mes "Ahat...";
		mes "He is a strong Sapha.";
		mes "He may be a minister working through piles of documents";
		mes "but he must be hiding his power!";
		next;
		mes "[Galten]";
		mes "Everyone says Ahat is like a delicate spring sprout";
		mes "but I don't agree!";
		mes "I've never seen a stronger Sapha before.";
		mes "But I don't quite understand why he didn't become a Galten...";
		next;
		mes "[Galten]";
		mes "Maybe he is physically strong but has a warm heart..";
		mes "but you never know...";
		close;
	}
	mes "[Galten]";
	mes "You seem to be an experienced adventurer.";
	mes "I would like to try you out";
	mes ".. Hahahah";
	mes "Just joking. I cannot fight a guest to our land.";
	close;
}

dic_fild01,231,174,5	script	BK#ep133_18	4_M_MERCAT2,{
	if (ep13_3_secret < 3) {
		mes "[BK]";
		mes "Ha. I'm the information collector of the Cat Merchants.";
		mes "Ask me anything...but..";
		mes "Meow.. I'm not an easy cat you see.";
		next;
		mes "[BK]";
		mes "Go away, Ha";
		close;
	}
	else if ((ep13_3_secret == 3) || (ep13_3_secret == 4)) {
		mes "[BK]";
		mes "Hmph...";
		mes "What is it?";
		mes "... Oh, a human in the capital city of Sapha.";
		mes "Meow...";
		next;
		if (select("About a man with cat ears", "What are you?") == 1) {
			mes "[BK]";
			mes "Ha, I'm BK. The Cat Merchants' infamous information collector.";
			mes "But I have no information to share with you.";
			next;
			mes "[BK]";
			mes "I'm not an easy cat you see.";
			mes "Meow... meow";
			mes "Meow.. cat ears. Hahaha.. I heard of some.. meow..";
			next;
			mes "[BK]";
			mes "I'm not telling you~!";
			close;
		}
		mes "[BK]";
		mes "Ha. I'm the information collector of the Cat Merchants.";
		mes "Ask me anything...but..";
		mes "Meow.. I'm not an easy cat you see.";
		close;
	}
	else if (ep13_3_secret == 5) {
		mes "[BK]";
		mes "Ha. I'm the information collector of the Cat Merchants.";
		mes "..............";
		mes "I don't give out information just to anyone.";
		mes "Meow...";
		next;
		mes "- BK of the Cat Merchant group is being difficult.";
		mes "What did Shay tell you to do?-";
		next;
		input .@inputstr$;
		if (.@inputstr$ == "Shay's special drink will be delivered" || .@inputstr$ == "Shay's special drink will be delivered.") {
			mes "[" + strcharinfo(PC_NAME) + "]";
			mes "Hmm. If you don't cooperate,";
			mes "Shay's special drink will be delivered.";
			mes "By Shay himself!";
			next;
			mes "[BK]";
			mes "What?!";
			mes "What do you want.";
			mes "Why are you harassing me.";
			mes "Bully... sob";
			emotion e_sob;
			next;
			mes "[BK]";
			mes "Okay. I will cooperate.";
			mes "But with some conditions.";
			mes "First, you must tell Shay that I cooperated with you.";
			next;
			mes "[BK]";
			mes "Second, we must meet the minister to expand our business.";
			mes "But need exploit certifications to meet him.";
			next;
			mes "[BK]";
			mes "So I'll sell my information for exploit certifications.";
			mes "Tell me when you are ready.";
			ep13_3_secret = 6;
			close;
		}
		mes "[" + strcharinfo(PC_NAME) + "]";
		mes "" + .@inputstr$ + ".....?";
		mes "Hmm.. I think you are wrong?";
		mes "What was it..";
		next;
		mes "[BK]";
		mes "What. Are you threatening me with that?";
		mes "Meow.. You don't know my well enough~!!";
		close;
	}
	else if (ep13_3_secret == 6) {
		mes "[BK]";
		mes "... So what do you want to know?";
		next;
		switch (select("About other feline races")) {
		}
		mes "[BK]";
		mes "Feline? Are you asking about us cats?";
		mes "Well~";
		mes "Don't know about races..but.. hahah..";
		next;
		mes "- BK asks for an exploit certification. -";
		next;
		if (select("No way.", "Give.") == 1) {
			mes "[BK]";
			mes "Humph";
			mes "We made a deal.";
			mes "Give an Exploit certification of Sapha to BK.";
			close;
		}
		if (countitem(Sapa_Feat_Cert)) {
			mes "[BK]";
			mes "Haha.. good, good.";
			mes "I don't know anything outside of our race";
			mes "but I did see ^4d4dffsomeone with cute ears that has been visiting the Dicastes Diel^000000.";
			next;
			mes "[BK]";
			mes "I even saw him meet the ^4d4dffnew minister^000000 alone.";
			mes "Hu hu...";
			mes "Satisfied?";
			delitem Sapa_Feat_Cert,1;
			ep13_3_secret = 7;
			next;
			mes "- BK says this and takes the exploit certification out of your hand.";
			mes "Information on the person with animal ears Doha mentioned!-";
			close;
		}
		mes "[BK]";
		mes "I will give you information";
		mes "and you give me an exploit certification";
		mes "great teamwork, don't you agree?";
		next;
		mes "[BK]";
		mes "If you want to know my information, you have to give me an exploit certification.";
		close;
	}
	else if (ep13_3_secret == 7 || ep13_3_secret == 8) {
		if (ep13_3_secret == 7) {
			mes "[BK]";
			mes "...Didn't I just tell you about the man with cat ears?";
			mes "I've seen him with the minister in Diel.";
			next;
			if (select("About Ravail?", "Who is the minister?") == 1) {
				mes "[BK]";
				mes "Ravail is the high minister.";
				mes "Something like a Chief.";
				mes "They also call him elder.";
				mes "We would call him leader?";
				next;
				mes "[BK]";
				mes ".......ah.........";
				mes "I should have gotten an exploit certification before answering.";
				close;
			}
			mes "[BK]";
			mes "The infamous";
			mes "^4d4dffAhat^000000.";
			mes "The new minister...";
			mes "(BK rubs his front paws together)";
			next;
			if (select("Give a certification.", "No way.") == 2) {
				mes "[BK]";
				mes "No, no, contract violation.";
				mes "I have nothing to say if you don't give me a certification.";
				close;
			}
			if (!countitem(Sapa_Feat_Cert)) {
				mes "[BK]";
				mes "I have nothing to say if you don't give me a certification.";
				close;
			}
			mes "[BK]";
			mes "The new minister is not from around here.";
			mes "There is a huge crack down there.";
			next;
			mes "[BK]";
			mes "The new minister was picked up ^4d4dffnear the crack^000000.";
			mes "He must be an alien!";
			delitem Sapa_Feat_Cert,1;
			ep13_3_secret = 8;
			next;
			select("What do you think so?");
		}
		else if (ep13_3_secret == 8) {
			mes "[BK]";
			mes "What is it now?";
			mes "Another minister story?";
			next;
			if (select("That the minister is an alien?", "Nothing...") == 2) {
				mes "[BK]";
				mes "MEOW~";
				mes "I thought you brought Shay's food here as a reward.";
				mes "(BK shivers at the thought)";
				next;
				mes "[BK]";
				mes "Eeeew...";
				mes "I can't even imagine it.";
				mes "...........Ha! Don't tell Shay this!";
				close;
			}
		}
		if (countitem(Sapa_Feat_Cert)) {
			mes "[BK]";
			mes "Because he isn't Sapha!";
			next;
			select("He isn't a Sapha?");
			mes "[BK]";
			mes "Yes.";
			mes "But isn't it strange.";
			mes "All the Saphas here think he is a beautiful Sapha...";
			mes "But I've seen him from a distance and he wasn't.";
			next;
			mes "[BK]";
			mes "To me, he is a feline.";
			mes "He might even be a lost friend of mine.";
			next;
			mes "[BK]";
			mes "Well, I don't understand why because all Saphas";
			mes "are beautiful.";
			delitem Sapa_Feat_Cert,1;
			ep13_3_secret = 9;
			changequest 7191,7192;
			next;
			mes "- BK says this and takes the exploit certification out of your hand.";
			mes "Shocking information that the Sapha minister Ahat is not a Sapha!-";
			next;
			mes "[" + strcharinfo(PC_NAME) + "]";
			mes "...I must find out.";
			mes ".. Near the crack he said...";
			mes "Should I talk to Shay?";
			close;
		}
		mes "- BK holds up a front paw at my question.";
		mes "The pink jelly like paws are asking for an exploit certification.-";
		close;
	}
	else if (ep13_3_secret == 9) {
		mes "[BK]";
		mes "Why are you always coming back?";
		mes "Why don't you go to the crack yourself if you are curious about the new minister?";
		mes "You'll find something there since he was from there. Meow";
		close;
	}
	mes "[BK]";
	mes "MEOW~";
	mes "I thought you brought Shay's food here as a reward.";
	mes "(BK shivers at the thought)";
	next;
	mes "[BK]";
	mes "Eeeew...";
	mes "I can't even imagine it.";
	mes "...........Ha! Don't tell Shay this!";
	close;
}

-	script	ep133_crack#main	FAKE_NPC,{
	// if ((GetInventoryRemainCount 1301 3 == 2) || (GetInventoryRemainCount 1301 3 == 3)) {
	if ((MaxWeight - Weight) < 1000) {
		mes "- You can too many items to proceed with the quest. -";
		close;
	}
	.@n$ = strnpcinfo(NPC_NAME_VISIBLE);
	setarray .@npc$, 	"Rock Pile",	"Dirt Pile",	"Split Earth";
	setarray .@item, 	6307,			6306,			6305;
	.@size = getarraysize(.@npc$);
	for (.@i = 0; .@i < .@size; ++.@i)
		if (.@n$ == .@npc$[.@i]) .@type = .@i;
	if (ep13_3_secret == 10) {
		if (.@npc$[.@type] == "Rock Pile") {
			mes "There are many piles of rock around because of the unstable crustal movements.";
			mes "This rock pile is also one of them.";

		}
		else if (.@npc$[.@type] == "Dirt Pile") {
			mes "There a several dirt piles nearby the crack.";
			mes "This is one of them.";
		}
		else if (.@npc$[.@type] == "Split Earth") {
			mes "Surface of the earth is split by the shock from the dimensional crack.";
			mes "The split earth is solid and icy making it look like sharp blades.";
		}
		mes "Don't see anything suspicious.";
		next;
		.@menu$ = (.@npc$[.@type] == "Rock Pile")? "Try to knock down the rock pile.:Study the pile closely." : "Stomp on it with your feet.:Poke around in the dirt pile.";
		if (select(.@menu$) == 1) {
			if (.@npc$[.@type] == "Rock Pile") mes "Knock down the pebbles that make up the pile of rocks and spread them out.";
			else if (.@npc$[.@type] == "Dirt Pile") mes "You step on the dug up dirt pile and make the ground flat.";
			else if (.@npc$[.@type] == "Split Earth") mes "You step on the dry, split surface and make the ground flat.";
			donpcevent strnpcinfo(NPC_NAME)+"::OnDisable";
			close;
		}
		if (.@npc$[.@type] == "Rock Pile") {
			mes "You feel an evil energy from the small stone fragments.";
			mes "Doesn't look natural but more like remnants from a powerful magic spell nearby.";
			mes "You feel evil energy. Does this have anything to do with Ahat?";
			mes "You collected a stone that emits strange energy.";
		}
		else if (.@npc$[.@type] == "Dirt Pile") {
			mes "You poke around the dirt pile to find blood clotted in the dirt.";
			mes "You feel evil energy. Does this have anything to do with Ahat?";
			mes "You collect the clotted bloodstains.";
		}
		else if (.@npc$[.@type] == "Split Earth") {
			mes "There is something stuck by the frost on the sharp, crack surface.";
			mes "You take a closer look and see it looks like the skin of a creature that crawls on the ground.";
			mes "You feel evil energy. Does this have anything to do with Ahat?";
			mes "You collect the clotted bloodstains.";
		}
		ep13_3_secret = 11;
		getitem .@item[.@type], 1;
		erasequest 7193;
		setquest 7194;
		donpcevent strnpcinfo(NPC_NAME)+"::OnDisable";
		next;
		mes "[" + strcharinfo(PC_NAME) + "]";
		mes "Hmm.. I may need to discuss these with Shay.";
		close;
	}
	else if (ep13_3_secret == 11) {
		mes "[" + strcharinfo(PC_NAME) + "]";
		if (.@npc$[.@type] == "Rock Pile") mes "This is where you picked up the strange magical stone.";
		else if (.@npc$[.@type] == "Dirt Pile") mes "Collected Clotted Bloodstains from the dirt pile here.";
		else if (.@npc$[.@type] == "Split Earth") mes "It is the place where the frozen skin was found.";
		mes "Also feel a strange energy around.";
		mes "Let's go back to the pub and talk with Shay.";
		close;
	}
	else if (ep13_3_secret == 17) {
		if (countitem(.@item[.@type]) < 10) {
			if (.@npc$[.@type] == "Rock Pile") {
				mes "There are many piles of rock around because of the unstable crustal movements.";
				mes "This is one of them.";
				mes "You feel an evil energy from the small stone fragments.";
			}
			else if (.@npc$[.@type] == "Dirt Pile") {
				mes "There a several dirt piles nearby the crack.";
				mes "This is one of them.";
				mes "You find a clotted bloodstain beneath the dirt pile.";
			}
			else if (.@npc$[.@type] == "Split Earth") {
				mes "Surface of the earth nearby the dimensional crack is split by some kind of impact.";
				mes "This is one of them.";
				mes "There is something stuck by the frost on the sharp, crack surface.";
			}
			getitem .@item[.@type], 1;
			donpcevent strnpcinfo(NPC_NAME)+"::OnDisable";
			next;
			if (.@npc$[.@type] == "Rock Pile") mes "You collect stone fragments.";
			else if (.@npc$[.@type] == "Dirt Pile") mes "Collect bloodstains.";
			else if (.@npc$[.@type] == "Split Earth") mes "Collect a piece of skin.";
			if (countitem(.@item[.@type]) == 10) {
				mes "Collected enough for Cheshire but";
				mes "you may need some more to report separately.";
				if (!questprogress(7202)) setquest 7202;
				close;
			}
			mes "Not enough was collected to fill Cheshire's request.";
			close;
		}
		else if (countitem(.@item[.@type]) == 10) {
			if (questprogress(7202)) {
				setarray .@str$, "stone fragments","bloodstains","pieces of skin";
				mes "Need more " + .@str$[.@type] + " to report back to Doha at the expedition camp.";
			}
			else {
				if (.@npc$[.@type] == "Rock Pile") mes "Need more stone fragments to report back to Doha at the expedition camp.";
				else if (.@npc$[.@type] == "Dirt Pile") mes "You've collected enough for Cheshire but need more to report back to Doha.";
				else if (.@npc$[.@type] == "Split Earth") mes "You've collected enough pieces of skin for Cheshire but need more to report back to Doha.";
				setquest 7202;
			}
			if (.@npc$[.@type] == "Rock Pile") mes "You collect another stone fragment that emits a strange magical force.";
			else if (.@npc$[.@type] == "Dirt Pile") mes "You collect another clotted bloodstain from a dirt pile.";
			else if (.@npc$[.@type] == "Split Earth") mes "You collect another piece of skin frozen in the frost in the crack of the split earth.";
			getitem .@item[.@type], 1;
			donpcevent strnpcinfo(NPC_NAME)+"::OnDisable";
			close;
		}
		mes "No need to collect more.";
	}
	if (ep13_3_ahtdayq == 1) {
		if (countitem(.@item[.@type]) < 10) {
			if (.@npc$[.@type] == "Rock Pile") {
				mes "You feel an evil energy from the small stone fragments.";
				mes "Collect the stone fragment and knock down and spread out the stone pile to make it look natural.";
			}
			else if (.@npc$[.@type] == "Dirt Pile") {
				mes "You find a clotted bloodstain beneath the dirt pile.";
				mes "You collect the clotted bloodstains and then step on the dirt pile to leave no trace.";
			}
			else if (.@npc$[.@type] == "Split Earth") {
				mes "There is some kind of skin stuck by the frost on the sharp, crack surface.";
				mes "You collect the frozen piece of skin and then step on the ground to leave no trace.";
			}
			getitem .@item[.@type], 1;
			donpcevent strnpcinfo(NPC_NAME)+"::OnDisable";
			close;
		}
		setarray .@str$, "stone fragments","bloodstains","pieces of skin";
		mes "No need to collect more " + .@str$[.@type] + ".";
		close;
	}
	mes "Found traces of something.";
	mes "Was arranged neatly.";
	close;
OnEnable:
	hideoffnpc strnpcinfo(NPC_NAME);
	end;
OnDisable:
	hideonnpc strnpcinfo(NPC_NAME);
	initnpctimer;
	end;
OnReset:
	hideoffnpc strnpcinfo(NPC_NAME);
	stopnpctimer;
	end;
OnTimer60000:
OnTimer120000:
OnTimer180000:
OnTimer240000:
	if (!rand(2)) {
		hideoffnpc strnpcinfo(NPC_NAME);
		stopnpctimer;
	}
	end;

OnTimer300000:
	hideoffnpc strnpcinfo(NPC_NAME);
	stopnpctimer;
	end;
}
dic_fild02,269,55,0	duplicate(ep133_crack#main)	Rock Pile#ep133_ef1	CLEAR_NPC
dic_fild02,236,29,0	duplicate(ep133_crack#main)	Rock Pile#ep133_ef2	CLEAR_NPC
dic_fild02,220,34,0	duplicate(ep133_crack#main)	Rock Pile#ep133_ef3	CLEAR_NPC
dic_fild02,228,55,0	duplicate(ep133_crack#main)	Rock Pile#ep133_ef4	CLEAR_NPC
dic_fild02,228,63,0	duplicate(ep133_crack#main)	Rock Pile#ep133_ef5	CLEAR_NPC
dic_fild02,210,75,0	duplicate(ep133_crack#main)	Rock Pile#ep133_ef6	CLEAR_NPC
dic_fild02,213,35,0	duplicate(ep133_crack#main)	Rock Pile#ep133_ef7	CLEAR_NPC
dic_fild02,171,49,0	duplicate(ep133_crack#main)	Rock Pile#ep133_ef8	CLEAR_NPC
dic_fild02,266,44,0	duplicate(ep133_crack#main)	Rock Pile#ep133_ef9	CLEAR_NPC
dic_fild02,174,79,0	duplicate(ep133_crack#main)	Rock Pile#ep133_ef10	CLEAR_NPC
dic_fild02,215,85,0	duplicate(ep133_crack#main)	Dirt Pile#ep133_ef1	CLEAR_NPC
dic_fild02,207,41,0	duplicate(ep133_crack#main)	Dirt Pile#ep133_ef2	CLEAR_NPC
dic_fild02,232,41,0	duplicate(ep133_crack#main)	Dirt Pile#ep133_ef3	CLEAR_NPC
dic_fild02,245,68,0	duplicate(ep133_crack#main)	Dirt Pile#ep133_ef4	CLEAR_NPC
dic_fild02,184,63,0	duplicate(ep133_crack#main)	Dirt Pile#ep133_ef5	CLEAR_NPC
dic_fild02,207,94,0	duplicate(ep133_crack#main)	Dirt Pile#ep133_ef6	CLEAR_NPC
dic_fild02,230,71,0	duplicate(ep133_crack#main)	Dirt Pile#ep133_ef7	CLEAR_NPC
dic_fild02,188,50,0	duplicate(ep133_crack#main)	Dirt Pile#ep133_ef8	CLEAR_NPC
dic_fild02,248,36,0	duplicate(ep133_crack#main)	Dirt Pile#ep133_ef9	CLEAR_NPC
dic_fild02,206,115,0	duplicate(ep133_crack#main)	Dirt Pile#ep133_ef10	CLEAR_NPC
dic_fild02,194,86,0	duplicate(ep133_crack#main)	Split Earth#ep133_ef1	CLEAR_NPC
dic_fild02,240,51,0	duplicate(ep133_crack#main)	Split Earth#ep133_ef2	CLEAR_NPC
dic_fild02,176,65,0	duplicate(ep133_crack#main)	Split Earth#ep133_ef3	CLEAR_NPC
dic_fild02,254,45,0	duplicate(ep133_crack#main)	Split Earth#ep133_ef4	CLEAR_NPC
dic_fild02,178,119,0	duplicate(ep133_crack#main)	Split Earth#ep133_ef5	CLEAR_NPC
dic_fild02,200,81,0	duplicate(ep133_crack#main)	Split Earth#ep133_ef6	CLEAR_NPC
dic_fild02,205,54,0	duplicate(ep133_crack#main)	Split Earth#ep133_ef7	CLEAR_NPC
dic_fild02,224,74,0	duplicate(ep133_crack#main)	Split Earth#ep133_ef8	CLEAR_NPC
dic_fild02,244,59,0	duplicate(ep133_crack#main)	Split Earth#ep133_ef9	CLEAR_NPC
dic_fild02,249,43,0	duplicate(ep133_crack#main)	Split Earth#ep133_ef10	CLEAR_NPC

//== Frede's Request =======================================
dicastes01,117,262,0	script	Frede#13_3	4_MAN_PIOM5,2,2,{
	if (isequipped(2782)) {
		if (ep13_3_invite <= 5) {
			mes "[Frede]";
			mes "Moan... moan...";
			close;
		}
		if (ep13_3_bra < 1) {
			mes "[Frede]";
			mes "Moan... moan...";
			next;
			mes "[" + strcharinfo(PC_NAME) + "]";
			mes "Are you alright?";
			mes "You don't look well. Do you need help?";
			next;
			mes "[Frede]";
			mes "Ah... thank you.";
			mes "It's because of my injured leg.";
			next;
			mes "[Frede]";
			mes "Do you mind helping me get to the building over there?";
			mes "I will feel better if I rest a little.";
			ep13_3_bra = 1;
			close2;
			warp "dic_in01",165,101;
			end;
		}
		else if (ep13_3_bra < 4) {
			mes "[Frede]";
			mes "I'm getting tired. Can we continue talking inside.";
			close2;
			warp "dic_in01",165,101;
			end;
		}
		else if (ep13_3_bra < 9) {
			mes "[Frede]";
			mes "How is my little favor going?";
			mes "We can have a chat after you are done with it.";
			close;
		}
		mes "[Frede]";
		mes "" + strcharinfo(PC_NAME) + ", the guys said they wanted to meet up together sometime.";
		mes "Make sure you ckear your schedule.";
		close;
	}
	mes "[Frede]";
	mes sprintf("¢£¡ô¡ñ ¡û");
	mes sprintf("¡ú¡ö¡ø ¢£ ¡ô");
	close;
OnTouch:
	if (isequipped(2782) && ep13_3_invite > 5 && ep13_3_bra < 1) {
		mes "[Frede]";
		mes "Moan... moan...";
		close;
	}
	end;
}

dic_in01,165,104,0	script	Frede#13_3_in	4_MAN_PIOM,{
	if (isequipped(2782)) {
		if (ep13_3_bra < 1) {
			mes "[Frede]";
			mes "Zzz...Zzz...";
			close;
		}
		else if (ep13_3_bra == 1) {
			mes "[Frede]";
			mes "Phew...";
			mes "Thank you so much.";
			mes "I'm glad I got a shot of the ^f57d7dBradium^000000 before it was too late.";
			percentheal -90,0;
			next;
			mes "[" + strcharinfo(PC_NAME) + "]";
			mes "Huff...Huff...";
			mes "I'm glad that you feel better.";
			next;
			mes "[Frede]";
			mes "Oh my!! Why are you sweating so much!";
			mes "You look a little pale too......";
			emotion e_omg;
			next;
			mes "[" + strcharinfo(PC_NAME) + "]";
			mes "No, it's nothing.";
			mes "I'm only a little tired, that's all.";
			next;
			mes "[Frede]";
			mes "Here, sit and eat this.";
			mes "The cats outside gave it to me. It doesn't do much good for Saphas but I heard it's suppose to help you humans.";
			ep13_3_bra = 2;
			setquest 11171;
			getitem Banana,1;
			close;
		}
		else if (ep13_3_bra == 2) {
			mes "[" + strcharinfo(PC_NAME) + "]";
			mes "But the injury on your leg doesn't look new. Why did you come out with a wounded leg?";
			next;
			mes "[Frede]";
			mes "I can still move around with this leg and I wanted to help the village.";
			next;
			mes "[" + strcharinfo(PC_NAME) + "]";
			mes "But you should stay home and recover.";
			next;
			mes "[Frede]";
			mes "The fact is, my leg will never recover.";
			mes "I can only keep my injury from getting worse.";
			next;
			mes "[Frede]";
			mes "But I'm grateful that I can still move around.";
			mes "Ha......";
			mes "When did we start to be afraid of 'death'.";
			next;
			mes "[Frede]";
			mes "Saphas have never had any 'sicknesses' and we don't die unless there is a terrible accident.";
			next;
			mes "[Frede]";
			mes "This is also the reason why we Saphas can maintain a perfect community.";
			mes "We didn't have to be greedy.";
			next;
			mes "[Frede]";
			mes "But suddenly we are hit with this epidemic and many Saphas have lost their loved ones ever since.";
			next;
			mes "[Frede]";
			mes "We weren't prepared for such a disaster.";
			mes "It was chaos. Nobody knew what to do but watch them die.";
			next;
			mes "[Frede]";
			mes "It was worse for us because we never experienced death from getting old.";
			mes "I also thought my ^f57d7dStill Friends^000000 would wake up one day.";
			next;
			mes "[Frede]";
			mes "But after a while, we realized it was a sickness that led to death and started to search for a cure but the situation was out of control.";
			next;
			mes "[Frede]";
			mes "We are very advanced in science technology but we lack knowledge in the medical field.";
			next;
			mes "[Frede]";
			mes "A medicine was completed only after we lost many lives but it isn't enough to completely cure the sickness.";
			next;
			mes "[Frede]";
			mes "As long as I don't forget to take my Bradium, I can keep from getting any worse.";
			next;
			mes "[Frede]";
			mes "I recently did some ^f57d7drepair work in the cave next to the village^000000, but I forgot to take Bradium while I was working.";
			next;
			mes "[Frede]";
			mes "I usually carry extra Bradium with me when I go outside of town for work but you can easily lose sense of time in a cave.";
			next;
			mes "[Frede]";
			mes "......umm......";
			mes "..............";
			next;
			mes "[Frede]";
			mes "Oh no!!!!!!!!!!!!!!!!";
			mes "Come... to think of it....";
			mes "My friends!!!!!!!!!!";
			next;
			mes "[Frede]";
			mes "I haven't seen my friends who I worked with in the cave.";
			next;
			mes "[Frede]";
			mes "They have to return to the village once every few days to replenish their Bradium.";
			mes "Maybe......they forgot?";
			next;
			mes "[Frede]";
			mes "Oh... what should I do......";
			mes "I would run there myself if only my legs would move normally.";
			next;
			mes "[Frede]";
			mes "Would you mind visiting the cave to see if my friends are alright?";
			next;
			if (select("Will do.", "No can't do.") == 1) {
				mes "[Frede]";
				mes "Thank you so much.";
				mes "My memory is a bit fuzzy since its been a while since I came back to the village,";
				next;
				mes "[Frede]";
				mes "but you will find a ^f57d7dcave nearby the village with repairmen work going on^000000.";
				next;
				mes "[Frede]";
				mes "I saw friends leaving the village after returning for more Bradium a few days ago.";
				next;
				mes "[Frede]";
				mes "I only hope they are all healthy and well.";
				ep13_3_bra = 4;
				changequest 11171,11172;
				close;
			}
			mes "[Frede]";
			mes "I guess I can't do anything about it.";
			mes "But drag myself there.";
			ep13_3_bra = 3;
			close;
		}
		else if (ep13_3_bra == 3) {
			mes "[Frede]";
			mes "Oh... what should I do......";
			mes "I would run there myself if only my legs would move normally.";
			next;
			mes "[Frede]";
			mes "Would you mind visiting the cave to see if my friends are alright?";
			next;
			if (select("Will do..", "No can't do.")) {
				mes "[Frede]";
				mes "Thank you so much.";
				mes "My memory is a bit fuzzy since its been a while since I came back to the village,";
				next;
				mes "[Frede]";
				mes "but you will find a ^f57d7dcave nearby the village with repairmen work going on^000000.";
				next;
				mes "[Frede]";
				mes "I saw friends leaving the village after returning for more Bradium a few days ago.";
				next;
				mes "[Frede]";
				mes "I only hope they are all healthy and well.";
				ep13_3_bra = 4;
				changequest 11171,11172;
				close;
			}
			mes "[Frede]";
			mes "I guess I can't do anything about it.";
			mes "But drag myself there.";
			close;
		}
		else if (ep13_3_bra == 4) {
			setarray .@quest_id, 11159,11160,11161,11162,11163,11164;
			.@size = getarraysize(.@quest_id);
			for (.@i = 0; .@i < .@size; ++.@i)
				if (!questprogress(.@quest_id[.@i])) {
					.@fail = true;
					break;
				}
			if (!.@fail) {
				mes "[Frede]";
				mes "I knew they were working all along and forgot to return back to the village.";
				mes "They must have been short on Bradium.";
				next;
				mes "[Frede]";
				mes "Hmmm..";
				next;
				mes "[Frede]";
				mes "I'm sorry to ask again but can you take some Bradium to my friends?";
				next;
				mes "[Frede]";
				mes "They may be safe now, but they might forget and fall ill suddenly.";
				next;
				mes "[Frede]";
				mes "Ask ^f57d7dBouy at the building located northwest of the village^000000 and he will give you some refined Bradium.";
				mes "I can't thank you enough.";
				ep13_3_bra = 5;
				changequest 11172,11173;
				for (.@i = 0; .@i < .@size; ++.@i)
					erasequest .@quest_id[.@i];
				close;
			}
			mes "[Frede]";
			mes "Thank you so much.";
			mes "My memory is a bit fuzzy since its been a while since I came back to the village,";
			next;
			mes "[Frede]";
			mes "You can find them in the cave nearby the village with repair work going on.";
			next;
			mes "[Frede]";
			mes "I saw friends leaving the village after returning for more Bradium a few days ago.";
			next;
			mes "[Frede]";
			mes "I hope they are all doing well.";
			mes "Please get back to me once you meet my friends.";
			close;
		}
		else if (ep13_3_bra == 5) {
			mes "[Frede]";
			mes "I knew they were working all along and forgot to return back to the village.";
			mes "They must have been short on Bradium.";
			next;
			mes "[Frede]";
			mes "Hmmm..";
			next;
			mes "[Frede]";
			mes "I'm sorry to ask again but can you take some Bradium to my friends?";
			next;
			mes "[Frede]";
			mes "They may be safe now, but they might forget and fall ill suddenly.";
			next;
			mes "[Frede]";
			mes "Ask the ^f57d7dBouy at the building located northwest of the village^000000 and he will give you some refined Bradium.";
			mes "I can't thank you enough.";
			close;
		}
		else if (ep13_3_bra == 6) {
			mes "[Frede]";
			mes "So they are out of Braidum.";
			mes "Will they need to wait till other Piom or Galtens return?";
			close;
		}
		else if (ep13_3_bra == 7) {
			mes "[Frede]";
			mes "So they are out of Braidum.";
			mes "Will they need to wait till other Piom or Galtens return?.";
			close;
		}
		else if (ep13_3_bra == 8) {
			if (checkweight(Knife,1) == 0) {
				mes "[Frede]";
				mes "You have too many kinds of items.";
				mes "Please return after reducing the number of items.";
				close;
			}
			if ((MaxWeight - Weight) < 1000) {
				mes "[Frede]";
				mes "You have too many items.";
				mes "Please return after reducing the weight of your items.";
				close;
			}
			setarray .@quest_id, 11165,11166,11167,11168,11169,11170;
			.@size = getarraysize(.@quest_id);
			for (.@i = 0; .@i < .@size; ++.@i)
				if (!questprogress(.@quest_id[.@i])) {
					.@fail = true;
					break;
				}
			if (!.@fail) {
				mes "[Frede]";
				mes "" + strcharinfo(PC_NAME) + " I'm forever in your debt!";
				mes "I just came back after meeting my friends!";
				mes "Tyler needs some medical treatment but everyone else is safe.";
				next;
				mes "[Frede]";
				mes "I don't even want to imagine what could have happened if you, " + strcharinfo(PC_NAME) + ", weren't here to help.";
				mes "I don't want to lose any more friends.";
				next;
				mes "[Frede]";
				mes "Please take this as a token of my gratitude and friendship.";
				mes "It's nothing much but I want you to have it.";
				mes "We may be from different races but we can be great friends.";
				completequest 11176;
				ep13_3_bra = 9;
				getitem Bradium_Earing,1;
				for (.@i = 0; .@i < .@size; ++.@i)
					erasequest .@quest_id[.@i];
				close;
			}
			mes "[Frede]";
			mes "Please give this Bradium to my friends.";
			mes "They must take this or else they may get sick.";
			close;
		}
		mes "[Frede]";
		mes "" + strcharinfo(PC_NAME) + ", the guys said they wanted to meet up together sometime.";
		mes "Make sure you clear your schedule.";
		close;
	}
	mes "[Frede]";
	mes sprintf("¢£¡ô¡ñ ¡û ");
	mes sprintf("¡ú¡ö¡ø ¢£ ¡ô");
	close;
}

dic_dun01,205,43,5	script	Brian#ep13_3_	4_MAN_PIOM4,{
	if (isequipped(2782)) {
		if (ep13_3_bra < 4) {
			mes "[Brian]";
			mes "You never know what kind of accident might happen if we don't do a thorough job.";
			next;
			mes "[Brian]";
			mes "Not only is creating things important, but regular maintenance is also very important.";
			close;
		}
		else if (ep13_3_bra < 8) {
			if (questprogress(11159) || ep13_3_bra != 4) {
				mes "[Brian]";
				mes "Oh... that reminds me, how many days passed since I came here...";
				mes "Do you happen to know what day it is today?";
				close;
			}
			mes "[Brian]";
			mes "You never know what kind of accident might happen if we don't do a thorough job.";
			next;
			mes "[Brian]";
			mes "Not only is creating things important, but regular maintenance is also very important.";
			next;
			mes "[Brian]";
			mes "Hmm. But what brings an outsider here?";
			next;
			mes "[Brian]";
			mes "Oh, you are here for Frede?";
			mes "How is he doing?";
			next;
			mes "[Brian]";
			mes "I saw him a few days ago but I'm always worried about my old friend.";
			next;
			mes "[Brian]";
			mes "I hope he is getting used to his new work.";
			mes "I shouldn't be worried because he is very hardworking but...";
			next;
			mes "[Brian]";
			mes "He got sick by overworking himself already. But you don't have to tell him I said this.";
			next;
			mes "[Brian]";
			mes "I just hope his condition doesn't get worse.";
			next;
			mes "[Brian]";
			mes "Oh... that reminds me, how many days passed since I came here...";
			mes "Do you happen to know what day it is today?";
			setquest 11159;
			close;
		}
		else if (ep13_3_bra == 8) {
			if (questprogress(11165)) {
				mes "[Brian]";
				mes "I'm out of Bradium already.";
				mes "Frede has been nagging me about this all the time but now I see why.";
				mes "haha.";
				next;
				mes "[Brian]";
				mes "Please tell Frede that I will return to the village after I recover.";
				close;
			}
			mes "[Brian]";
			mes "I remember you.";
			mes "What brings you here this time?";
			next;
			select("You give Bradium to Brian.");
			mes "[" + strcharinfo(PC_NAME) + "]";
			mes "Frede asked me to give you this.";
			next;
			mes "[Brian]";
			mes "Come to think of it, I do feel a bit heavy.";
			mes "I've been standing here all day and I could have stiffened up without knowing it.";
			next;
			mes "[Brian]";
			mes "I'm out of Bradium already.";
			mes "Frede has been nagging me about this all the time but now I see why.";
			mes "Ha ha..";
			next;
			mes "[Brian]";
			mes "Please tell Frede that I will return to the village after I recover.";
			next;
			setquest 11165;
			close;
		}
		mes "[Brian]";
		mes "You saved me from the inevitable.";
		mes "If I didn't take Bradium then, I would have been frozen and gradually died.";
		next;
		mes "[Brian]";
		mes "I am able to work now after I recovered while I was in the village.";
		mes "Thank you so much.";
		close;
	}
	mes "[Brian]";
	mes sprintf("¡ô¡õ¡ó ¡ø ¡ð¢±¡û ¡ö ¡ð");
	mes sprintf("¡ð¡þ¡þ ¡ù ¡Ð¡ñ¡ï ¢¤");
	mes sprintf("¡ô¡ò¢² ¡ø");
	close;
}

dic_dun01,153,107,4	script	Tyler#13_3	4_MAN_PIOM6,{
	if (isequipped(2782)) {
		if (ep13_3_bra < 4) {
			mes "[Tyler]";
			mes "I still see things to fix after fixing all day!";
			mes "It's logical to fix things that needs to be fixed!!";
			next;
			mes "[Tyler]";
			mes "Labor is rewarding at the end!";
			mes "Hahahahaha!!!!!";
			close;
		}
		else if (ep13_3_bra == 4) {
			if (questprogress(11161)) {
				mes "[Tyler]";
				mes "If you happen to bump into him in the village, please tell him I'm fine and not to worry.";
				close;
			}
			mes "[Tyler]";
			mes "I still see things to fix after fixing all day!";
			mes "It's logical to fix things that needs to be fixed!!";
			next;
			mes "[Tyler]";
			mes "Labor is rewarding at the end!";
			mes "Ha ha ha ha ha!!!!!";
			next;
			mes "[Tyler]";
			mes "Huh?! Who are you?";
			mes "Why is an outsider here?";
			next;
			mes "[Tyler]";
			mes "You came because of Frede?";
			next;
			mes "[Tyler]";
			mes "I can't believe him.";
			mes "He should take care of himself.";
			next;
			mes "[Tyler]";
			mes "We two go way back.";
			mes "He has always been the diligent one.";
			next;
			mes "[Tyler]";
			mes "We used to work together in a snack bar before.";
			mes "He always said he wanted to do something related to ^f57d7dstone^000000 or ^f57d7dheavy metal^000000.";
			next;
			mes "[Tyler]";
			mes "But Pioms are not really good at brainwork so he was looking someplace else.";
			next;
			mes "[Tyler]";
			mes "All of our friends applied for this job because we could do something related with stones and metal by working in a tunnel.";
			next;
			mes "[Tyler]";
			mes "He may be categorizing stones in the village now, but I'm sure he is happy with his work.";
			next;
			mes "[Tyler]";
			mes "If you happen to bump into him in the village, please tell him I'm fine and not to worry.";
			next;
			mes "[Tyler]";
			mes "Do you mind scratching my back?";
			mes "I have an itch probably from a bug bite.";
			mes "But I doubt there is a bug big enough to bite me on the back.";
			setquest 11161;
			close;
		}
		else if (ep13_3_bra < 8) {
			mes "[Tyler]";
			mes "If you happen to bump into him in the village, please tell him I'm fine and not to worry.";
			next;
			mes "[Tyler]";
			mes "Do you mind scratching my back?";
			mes "I have an itch probably from a bug bite.";
			mes "But I doubt there is a bug big enough to bite me on the back.";
			close;
		}
		else if (ep13_3_bra == 8) {
			if (questprogress(11167)) {
				mes "[Tyler]";
				mes "Oh!! I was out of Bradium. How did you know!";
				mes "Thanks!";
				next;
				mes "[Tyler]";
				mes "I always end up short even if I bring extra.";
				mes "I will have to go back to the village after I'm done with this to bring back more.";
				close;
			}
			mes "[Tyler]";
			mes "We meet again!";
			next;
			mes "[Tyler]";
			mes "I've been waiting for you!";
			mes "Scratch my back please~";
			mes "It felt so good the last time you scratched it for me.";
			next;
			switch (select("You give Bradium to Tyler.")) {
			case 1:
			break;
			}
			mes "[" + strcharinfo(PC_NAME) + "]";
			mes "Frede asked me to give you this.";
			next;
			mes "[Tyler]";
			mes "Oh!! I was out of Bradium. How did you know!";
			mes "Thanks!";
			next;
			mes "[Tyler]";
			mes "I always end up short even if I bring extra.";
			mes "I will have to go back to the village after I'm done with this to bring back more.";
			setquest 11167;
			close;
		}
		mes "[Tyler]";
		mes "I visited the village afterwards.";
		mes "But the itch on my back wasn't a bug bite.";
		next;
		mes "[Tyler]";
		mes "Something terrible might have happened if it was too late.";
		mes "I must visit the village often just so that my friends don't worry.";
		close;
	}
	mes "[Tyler]";
	mes sprintf("¡ï¡þ¡÷");
	mes sprintf("¡þ¡ó¡Ð ¡þ ¡Ð¡ø¢± ¡ü ");
	mes sprintf("¡ó¡ø¢¤ ¡ó ");
	close;
}

dic_dun01,235,243,0	script	John#13_3	4_MAN_PIOM,{
	if (isequipped(2782)) {
		if (ep13_3_bra < 4) {
			mes "[John]";
			mes "-muffling-";
			mes "-tap tap-";
			next;
			mes "[John]";
			mes "-crunch-";
			mes "-blob-";
			next;
			mes "[John]";
			mes "-slide-";
			mes "-thud-";
			close;
		}
		else if (ep13_3_bra == 4) {
			if (questprogress(11160)) {
				mes "[John]";
				mes "Oh well...";
				mes "There... is nothing to worry about.";
				next;
				mes "[John]";
				mes "Don't worry.";
				close;
			}
			mes "[John]";
			mes "-muffling-";
			mes "-tap tap-";
			next;
			mes "[John]";
			mes "-crunch-";
			mes "-blob-";
			next;
			mes "[John]";
			mes "-slide-";
			mes "-thud-";
			next;
			mes "[John]";
			mes "Wh..Who is it?";
			next;
			mes "[John]";
			mes "Oh, are you a friend of Frede's?";
			next;
			mes "[John]";
			mes "Oh well...";
			mes "There... is nothing to worry about.";
			next;
			mes "[John]";
			mes "Don't worry.";
			next;
			mes "[John]";
			mes "-whiz-";
			mes "-clink-";
			setquest 11160;
			close;
		}
		else if (ep13_3_bra < 8) {
			mes "[John]";
			mes "Oh well...";
			mes "There... is nothing to worry about.";
			next;
			mes "[John]";
			mes "Don't worry.";
			next;
			mes "[John]";
			mes "-whiz-";
			mes "-clink-";
			close;
		}
		else if (ep13_3_bra == 8) {
			if (questprogress(11166)) {
				mes "[John]";
				mes "......";
				mes "Thanks....";
				close;
			}
			mes "[John]";
			mes "......";
			next;
			select("You give Bradium to John.");
			mes "[" + strcharinfo(PC_NAME) + "]";
			mes "Frede asked me to give you this.";
			next;
			mes "[John]";
			mes "......";
			mes "Thanks....";
			setquest 11166;
			close;
		}
		mes "[John]";
		mes "...";
		mes "I'm... okay now...";
		mes "Thanks...";
		close;
	}
	mes "[John]";
	mes sprintf("¡ù¡õ¡Ð ¢³ ¡ó");
	mes sprintf("¡ï¡ï¡ò ¡÷ ¡þ¡ð¡ö ¢£ ¡ñ¡ü¡ú ¡ó ¢¤¡ü ¡ó ");
	close;
}

dic_dun02,110,127,5	script	Rose#13_3	4_MAN_PIOM6,{
	if (isequipped(2782)) {
		if (ep13_3_bra < 4) {
			mes "[Rose]";
			mes "Lalala~";
			mes "Yeah~!";
			next;
			mes "[Rose]";
			mes "He he he!";
			mes "I'm so awesome!";
			mes "This is a perfect fix!";
			mes "I see no errors in my work!";
			close;
		}
		else if (ep13_3_bra == 4) {
			if (questprogress(11162)) {
				mes "[Rose]";
				mes "Tell him there is no problem at all except that I am too good at my job.";
				mes "Because I'm perfect.";
				close;
			}
			mes "[Rose]";
			mes "Lalala~";
			mes "Yeah~!";
			next;
			mes "[Rose]";
			mes "He he he!";
			mes "I'm so awesome!";
			mes "This is a perfect fix!";
			mes "I see no errors in my work!";
			next;
			mes "[Rose]";
			mes "Who are you!";
			mes "You can never hide beauty. Please try not to stare intensely at me. I know I'm beautiful.";
			next;
			mes "[Rose]";
			mes "What? You came on behalf of Frede?";
			mes "You mean you're not my admirer?";
			mes "Tsk....";
			next;
			mes "[Rose]";
			mes "Tell him there is no problem at all except that I am too good at my job.";
			mes "Because I'm perfect.";
			setquest 11162;
			close;
		}
		else if ((ep13_3_bra > 4) && (ep13_3_bra < 8)) {
			mes "[Rose]";
			mes "Tell him there is no problem at all except that I am too good at my job.";
			mes "Because I'm perfect.";
			close;
		}
		else if (ep13_3_bra == 8) {
			if (questprogress(11168)) {
				mes "[Rose]";
				mes "I'll return to the village soon.";
				mes "We can meet up then~";
				close;
			}
			mes "[Rose]";
			mes "Ah~";
			mes "So you came back because you missed me?";
			next;
			mes "[Rose]";
			mes "Don't have to be shy.";
			mes "If you really have feelings, race differences shouldn't be a problem.";
			next;
			select("You give Bradium to Rose.");
			mes "[" + strcharinfo(PC_NAME) + "]";
			mes "You give Bradium to Rose.";
			next;
			mes "[Rose]";
			mes "Aww... you shouldn't have.";
			mes "My ^f57d7dheartbeat^000000 skipped.";
			mes "You are already taking care of me.";
			mes "He he he";
			next;
			mes "[Rose]";
			mes "I'll return to the village soon.";
			mes "We can meet up then~";
			setquest 11168;
			close;
		}
		mes "[Rose]";
		mes "You're here?";
		mes "Just in time when I was about to return to the village because I missed you.";
		next;
		mes "[Rose]";
		mes "We must be connected?";
		mes sprintf("^f57d7d%s¢½^000000",
				_("Hahaha"));;
		close;
	}
	mes "[Rose]";
	mes sprintf("¡ù¡ó¡ð ¢² ¡ð");
	mes sprintf("¡û¡ö¡÷ ¡ù ¢³");
	mes sprintf("¢£¡ó¢²");
	close;
}

dic_dun01,64,107,7	script	Bain#13_3	4_MAN_PIOM4,{
	if (isequipped(2782)) {
		if (ep13_3_bra < 4) {
			mes "[Bain]";
			mes "You take sturdy lumber and erect it to make a pillar.";
			mes "Simple, isn't it?";
			next;
			mes "[Bain]";
			mes "To fix the erected lumber, you need to use wedges to keep it in place.";
			mes "Simple, isn't it?";
			close;
		}
		else if (ep13_3_bra == 4) {
			if (questprogress(11163)) {
				mes "[Bain]";
				mes "Just tell him I'm doing well.";
				mes "Simple, isn't it?";
				close;
			}
			mes "[Bain]";
			mes "You take sturdy lumber and erect it to make a pillar.";
			mes "Simple, isn't it?";
			next;
			mes "[Bain]";
			mes "To fix the erected lumber, you need to use wedges to keep it in place.";
			mes "Simple, isn't it?";
			next;
			mes "[Bain]";
			mes "What is it? Do you have any questions?";
			next;
			mes "[Bain]";
			mes "Frede asked you to come?";
			mes "Just tell him I'm doing well.";
			mes "Simple, isn't it?";
			setquest 11163;
			close;
		}
		else if (ep13_3_bra < 8) {
			mes "[Bain]";
			mes "Just tell him I'm doing well.";
			mes "Simple, isn't it?";
			close;
		}
		else if (ep13_3_bra == 8) {
			if (questprogress(11169)) {
				mes "[Bain]";
				mes "But I will be in trouble if I don't go back to the village for Bradium.";
				next;
				mes "[Bain]";
				mes "Thank you.";
				mes "Hope to see you again.";
				close;
			}
			mes "[Bain]";
			mes "I found a dark brown stain on my shoulder.";
			mes "It doesn't come off. I'll have to go back to the village to get treatment.";
			next;
			select("Give Bradium.");
			mes "[" + strcharinfo(PC_NAME) + "]";
			mes "Frede asked me to give you this.";
			next;
			mes "[Bain]";
			mes "I found a dark brown stain on my shoulder.";
			mes "It doesn't come off. I'll have to go back to the village to get treatment.";
			next;
			mes "[Bain]";
			mes "But I will be in trouble if I don't go back to the village for Bradium.";
			next;
			mes "[Bain]";
			mes "Thank you.";
			mes "Hope to see you again.";
			setquest 11169;
			close;
		}
		mes "[Bain]";
		mes "We meet again.";
		mes "I wouldn't have had the chance to return to the village if you didn't give me the Bradium before.";
		next;
		mes "[Bain]";
		mes "I am forever grateful.";
		mes "I'm willing to teach you how to erect a pillar anytime you want.";
		next;
		mes "[Bain]";
		mes "I don't teach these things to just anyone!!";
		mes "Ha ha ha!!";
		mes "Aren't you excited about it?";
		close;
	}
	mes "[Bain]";
	mes sprintf("¡ó¡ø¢± ¡÷ ");
	mes sprintf("¡ö¡ñ¡Ð ¡ò ¡õ");
	close;
}

dic_dun01,58,225,4	script	Lash#13_3	4_MAN_PIOM5,{
	if (isequipped(2782)) {
		if (ep13_3_bra < 4) {
			mes "[Lash]";
			mes "Sigh......";
			mes "I'm so tired...";
			mes "But fatigue helps me to move forward.";
			next;
			mes "[Lash]";
			mes "The sweat, heavy breathing, and continuous tiredness proves that I'm a true Sapha.";
			mes "And I actually enjoy it. Ha ha ha ha.";
			close;
		}
		else if (ep13_3_bra == 4) {
			if (questprogress(11164)) {
				mes "[Lash]";
				mes "If you'd like to tell him how I'm doing, look at my forearm. Doesn't it spell out 'Strong' on it?";
				next;
				mes "[Lash]";
				mes "Just tell him what you see!";
				mes "Ha ha ha ha ha!";
				close;
			}
			mes "[Lash]";
			mes "Sigh......";
			mes "I'm so tired...";
			mes "But fatigue helps me to move forward.";
			next;
			mes "[Lash]";
			mes "The sweat, heavy breathing, and continuous tiredness proves that I'm a true Sapha.";
			mes "And I actually enjoy it. Ha ha ha ha.";
			next;
			mes "[Lash]";
			mes "But what is your business here?";
			mes "You want to share the labor and sweat?";
			next;
			mes "[Lash]";
			mes "Hm?";
			mes "Oh, you are Frede's messenger?";
			mes "To bad.";
			mes "I thought you were like me judging from your forearm.";
			next;
			mes "[Lash]";
			mes "If you'd like to tell him how I'm doing, look at my forearm. Doesn't it spell out 'Strong' on it?";
			next;
			mes "[Lash]";
			mes "Just tell him what you see!";
			mes "Ha ha ha ha ha!";
			setquest 11164;
			close;
		}
		else if (ep13_3_bra < 8) {
			mes "[Lash]";
			mes "If you'd like to tell him how I'm doing, look at my forearm. Doesn't it spell out 'Strong' on it?";
			mes "[Lash]";
			mes "Just tell him what you see!";
			mes "Ha ha ha ha ha!";
			close;
		}
		else if (ep13_3_bra == 8) {
			if (questprogress(11170)) {
				mes "[Lash]";
				mes "Wow!!!!";
				mes "You've saved me!";
				mes "[Lash]";
				mes "I would have perished into ashes here if it weren't for you!";
				close;
			}
			mes "[Lash]";
			mes "Moan...";
			mes "Is... this what they call fatigue!";
			mes "Never knew I would feel this. Sob.";
			next;
			select("You give Bradium to Lash.");
			mes "[" + strcharinfo(PC_NAME) + "]";
			mes "Frede asked me to give you this.";
			next;
			mes "[Lash]";
			mes "Wow!!!!";
			mes "You've saved me!";
			next;
			mes "[Lash]";
			mes "I would have perished into ashes here if it weren't for you!";
			setquest 11170;
			close;
		}
		mes "[Lash]";
		mes "Ha ha ha!!";
		mes "You are my savior!";
		mes "Our friendship will last forever regardless of race!";
		close;
	}
	mes "[Lash]";
	mes sprintf("¡ô¡õ¡ó ¡ø ¡ð¢±¡û ¡ö ¡ð");
	mes sprintf("¡ð¡þ¡þ ¡ù ¡Ð¡ñ¡ï ¢¤ ");
	mes sprintf("¡ô¡ò¢² ¡ø ");
	mes sprintf("¡÷");
	mes sprintf("¡õ¢³¡ñ ¡õ ¡ñ");
	close;
}

dic_in01,349,129,5	script	Bouy#13_3	4_MAN_BENKUNI,{
	if (isequipped(2782)) {
		if (ep13_3_bra < 5) {
			mes "[Bouy]";
			mes "Outsiders are prohibited here.";
			mes "If you have come here by mistake, please find your way out now.";
			close;
		}
		else if (ep13_3_bra == 5) {
			mes "[Bouy]";
			mes "Outsiders are prohibited here.";
			mes "If you have come here by mistake, please find your way out now.";
			next;
			select("I came on behalf of Frede.");
			mes "[Bouy]";
			mes "I didn't know. Excuse me.";
			mes "What did he ask you to do?";
			next;
			mes "[" + strcharinfo(PC_NAME) + "]";
			mes "He asked me to deliver Bradium to his friends working in the cave outside the village.";
			next;
			mes "[Bouy]";
			mes "Oh no. I don't have any portable Bradium because of insufficient supplies.";
			next;
			mes "[Bouy]";
			mes "I will only be able to get the Bradium that is being refined now in a few days. We let Pioms returning from outside work stay and rest in the village.";
			next;
			mes "[Bouy]";
			mes "But I see they haven't returned yet.";
			mes "They must be out of Bradium by now.";
			mes "This isn't good.";
			next;
			mes "[Bouy]";
			mes "Worst case, they wouldn't come back to the village at all.";
			next;
			mes "[" + strcharinfo(PC_NAME) + "]";
			mes "Is there another way?";
			next;
			mes "[Bouy]";
			mes "It takes a lot of time to refine a large Bradium mineral but small pieces of Bradium will be quick.";
			next;
			mes "[Bouy]";
			mes "Bradium mineral can be collected anywhere in this area but the effectiveness of refined pieces is low.";
			next;
			mes "[Bouy]";
			mes "You can easily collect ^f57d7dpieces of Bradium from monsters nearby^000000.";
			next;
			mes "[Bouy]";
			mes "About ^f57d7d30 pieces of Bradium^000000 will be enough to share with 6 people.";
			ep13_3_bra = 6;
			changequest 11173,11174;
			close;
		}
		else if (ep13_3_bra == 6) {
			if (countitem(Small_Bradium) > 29) {
				mes "[Bouy]";
				mes "You've brought back the Bradium.";
				mes "I've been waiting for the Galtens to return because I'm not accustomed to battle since I'm Venknick. Thank you very much.";
				next;
				mes "[Bouy]";
				mes "Handwork is much faster to refine pieces of Bradium instead of using a machine. I will only need two hours to finish."; //Official: "an hour", but gives 2-hour quest.
				next;
				mes "[Bouy]";
				mes "Please go rest while I get to work.";
				delitem Small_Bradium,30;
				changequest 11174,11175;
				ep13_3_bra = 7;
				close;
			}
			mes "[Bouy]";
			mes "Bradium mineral can be collected anywhere in this area but the effectiveness of refined pieces is low.";
			next;
			mes "[Bouy]";
			mes "You can easily collect ^f57d7dpieces of Bradium from monsters nearby^000000.";
			next;
			mes "[Bouy]";
			mes "About ^f57d7d30 pieces of Bradium^000000 will be enough to share with 6 people.";
			close;
		}
		else if (ep13_3_bra == 7) {
			if (questprogress(11175,PLAYTIME) == 2) {
				mes "[Bouy]";
				mes "I did it!";
				mes "I was a bit nervous because it has been a long time since I did manual work but I think I did a good job.";
				mes "Please take these to them.";
				ep13_3_bra = 8;
				changequest 11175,11176;
				close;
			}
			mes "[Bouy]";
			mes "I'm still working on it so please rest a little more.";
			close;
		}
		mes "[Bouy]";
		mes "Saphas cannot live unless we consume Bradium continuously.";
		mes "That is why we needed spaces for us to inject Bradium all over the village.";
		next;
		mes "[Bouy]";
		mes "But those working outside of the village cannot return often to refill their Bradium so we provide Bradium that is portable.";
		next;
		mes "[Bouy]";
		mes "But there was a problem with the Bradium mining in the Manuk area recently and we have a shortage of supplies. We don't have enough to give out.";
		next;
		mes "[Bouy]";
		mes "That is why many Pioms working in the outskirts of the village return for more supplies,";
		next;
		mes "[Bouy]";
		mes "and the time spent on transportation is what is slowing down work.";
		next;
		mes "[Bouy]";
		mes "To tell you the truth, transportation time doesn't make much difference but it adds up in the end.";
		next;
		mes "[Bouy]";
		mes "We call this the ^f57d7dCreamy Effect^000000.";
		close;
	}
	mes "[Bouy]";
	mes sprintf("¡ø¡ö¡þ ¡ù ¡ú¡ð¡ï ¡ø");
	mes sprintf("¡ï¡ú¡ö ¡ù");
	mes sprintf("¡õ¡ï¡õ ¡ò");
	close;
}

//== Sapha's Visit =========================================
-	script	Expedition#ep133_is	FAKE_NPC,{
	if (ep13_3_invite) {
		if (compare(strnpcinfo(NPC_NAME_VISIBLE),"Maha")) {
			mes "[Maha]";
			mes "But I do think the Sapha race is overly kind, almost unnaturally.";
			mes "Guess it'll be fine.";
			close;
		}
		mes "[Ben]";
		mes "There is nothing strange!";
		mes "I'd love to be like you and respected by many people.";
		next;
		mes "[Ben]";
		mes "I can also visit the Sapha if I work well here, can't I?";
		close;
	}
	mes "[Ben]";
	mes "Hmm. Hey, Maha,";
	mes "what do you think?";
	mes "Why do you think he is here?";
	next;
	mes "[Maha]";
	mes "Don't know. Not interested.";
	next;
	mes "[Ben]";
	mes "Don't you find that guy strange?";
	mes "I've never seen his race before I joined the expedition.";
	next;
	mes "[Maha]";
	mes "Ah. Really?";
	mes "Then it's only you.";
	mes "There must be a reason why he is here.";
	next;
	mes "[Ben]";
	mes "................";
	mes "Oh no you don't...";
	next;
	mes "[Maha]";
	mes "They may make an announcement soon.";
	mes "All we need to do is wait for the announcement.";
	mes "It will give us the answers.";
	next;
	if(select("What is it?", "Stay silent and listen.") == 2) {
		mes "[Ben]";
		mes "Hmm...";
		mes "That can be true but aren't you thinking too much?";
		next;
		mes "[Maha]";
		mes "I don't like to get into trouble.";
		mes "I only follow orders.";
		mes "Besides, there is nothing out of the ordinary.";
		next;
		mes "[Maha]";
		mes "From what I can tell";
		mes "That tree-like giant race called Sapha are kind.";
		mes "There won't be any trouble. Relax.";
		close;
	}
	mes "[Ben]";
	mes "Huh? Did you hear us?";
	mes "Nothing really or maybe something...";
	mes "So...";
	next;
	mes "[Ben]";
	mes "Research members dispatched to Manuk just came back.";
	mes "But...";
	next;
	select("But?");
	mes "[Ben]";
	mes "Well... they came back with a Manuk messenger!";
	mes "...Sapha of Manuk.";
	next;
	if (select("Where is he?!", "Is this top secret information?!") == 1) {
		mes "[Ben]";
		mes "He's in the command center right now.";
		mes "We should go there.";
		close;
	}
	mes "[Ben]";
	mes "Excuse me.";
	mes "There was no order to restrict or keep it a secret.";
	mes "And it looks like they are making an official visit.";
	next;
	mes "[Ben]";
	mes "We might be able to know something if we go to the command center now";
	mes "Try seeing ^4d4dffAello^000000.";
	close;
}
mid_camp,220,246,5	duplicate(Expedition#ep133_is)	Expedition Guard Ben	4_M_RACHMAN2
mid_camp,223,246,4	duplicate(Expedition#ep133_is)	Expedition Guard Maha	4_M_LGTGUARD

mid_campin,93,114,3	script	Guard Aello#ep133_is03	4_M_RUSMAN1,{
	if (ep13_ryu > 99 || ep13_start > 99) {
		if (ep13_3_invite == 0) {
			mes "[Aello]";
			mes "Ah, you. Good timing.";
			mes "I have something urgent to tell you.";
			next;
			mes "[Aello]";
			mes "Do you happen to know that a messenger from Manuk is here?";
			mes "Not a big secret but..";
			next;
			mes "[Aello]";
			mes "The Sapha from Manuk wants to talk to you.";
			mes "Agiff says anyone of from the expedition can meet him but..";
			mes "I think someone with more experience should go.";
			next;
			mes "[Aello]";
			mes "I know your abilities";
			mes "and trust you.";
			mes "The delegation is in the room at the right on the second floor.";
			next;
			mes "[Aello]";
			mes "There will be a guard standing in front";
			mes "just tell him you got authorization.";
			mes "He is interested in humans, so try to be courteous while talking to him.";
			ep13_3_invite = 1;
			setquest 7182;
			close;
		}
		else if (ep13_3_invite == 1) {
			mes "[Aello]";
			mes "It's the room at the right on the second floor.";
			mes "There is a guard in front of the room.";
			mes "He'll let you pass if you tell him you have authorization.";
			next;
			mes "[Aello]";
			mes "Try not to give unnecessary information";
			mes "and only do small talk.";
			close;
		}
		mes "[Aello]";
		mes "I knew I could count on you.";
		mes "You're activities will help us tremendously in expanding our territory.";
		close;
	}
	mes "[Aello]";
	mes "I am only interested in the most skillful";
	mes "and trustworthy person among the Ash-Vacuum expedition.";
	next;
	mes "[Aello]";
	mes "But.. you are a new face around here.";
	mes "Hmm... sorry but you won't do.";
	mes "You'll have to get yourself familiar with this camp first.";
	close;
}

mid_campin,111,120,3	script	Soldier#ep133_is04	4_M_EIN_SOLDIER,{
	if (ep13_3_invite == 1) {
		mes "[Soldier]";
		mes "Sorry, but this room is currently restricted from visitors.";
		next;
		if (select("I have authorization.", "Is that so.") == 1) {
			mes "[Soldier]";
			mes "You do?";
			mes "What is your name.";
			mes "Thank you.";
			mes "So you are " + strcharinfo(PC_NAME) + ".";
			next;
			mes "[Soldier]";
			mes "You may go in now.";
			close2;
			warp "mid_campin",165,126;
			end;
		}
		mes "[Soldier]";
		mes "You mustn't enter without Aello's permission.";
		mes "No exceptions.";
		close;
	}
	else if (ep13_3_invite > 1) {
		mes "[Soldier]";
		mes "You're back.";
		mes "Are you acquainted with the Sapha messenger now?";
		mes "We have high expectations from you.";
		close2;
		warp "mid_campin",165,126;
		end;
	}
	mes "[Soldier]";
	mes "Sorry.";
	mes "This room is restricted from visitors.";
	close;
}

function	script	eldicastes_c	{
	switch(getarg(0)) {
		case 1:
			mes "[Hound]";
			mes "Let's continue..";
			mes "Although the details are already settled.";
			next;
			mes "[Vyhannus]";
			mes "Ah, yes.";
			mes "Where was I?";
			mes "Ah, yes.";
			mes "El Dicastes!";
			mes "El Dicastes is the capital city of Sapha.";
			next;
			mes "[Vyhannus]";
			mes "A city like a sparkling jewel in white snow.";
			mes "Manuk was originally a village created to mine Bradium.";
			mes "El Dicastes has now grown to be the Sapha home ground.";
			next;
			mes "[Vyhannus]";
			mes "Ravail holds all authority in El Dicastes";
			mes "and makes decisions on reports from Manuk.";
			next;
			mes "[Vyhannus]";
			mes "Kind race born from a world other than ours";
			mes "we are grateful for your kindness";
			mes "in helping and cooperating with us.";
			next;
			mes "[Vyhannus]";
			mes "Ravail, representative of Sapha";
			mes "would like to invite humans to El Dicastes,";
			mes "Sapha's capital city.";
			next;
			select("Invite? Visit? City?!", "What is that suppose to mean, Hound?");
			mes "[Hound]";
			mes "Just as he said.";
			mes "Our expedition team has helped the Saphas for some time.";
			mes "Collect Bradium for their survival or";
			next;
			mes "[Hound]";
			mes "Eliminate vicious beasts that threaten them.";
			mes ".. ......";
			next;
			mes "[Hound]";
			mes "So they have given us an official invitation to visit their capital city in return.";
			mes "That is why I've been selecting expedition members to send to El Dicastes, the capital city of Sapha.";
			next;
			select("..You mean..");
			mes "[Vyhannus]";
			mes "Yes.";
			mes "That is what he meant.";
			mes "Agiff also approved before he left.";
			mes "" + strcharinfo(PC_NAME) + ", you are invited.";
			next;
			mes "[Vyhannus]";
			mes "You are kind and respect others";
			mes "polite and trustworthy and most of all, fun in character.";
			next;
			mes "[Vyhannus]";
			mes "You are perfect. Ravail will approve too.";
			mes "That is why I'm here.";
			next;
			mes "[Vyhannus]";
			mes "I invite you to El Dicastes, our capital city.";
			mes "" + strcharinfo(PC_NAME) + "";
			next;
			select("Never would have imagined.");
			mes "[Hound]";
			mes "Shouldn't you already be used to the unexpected by now?";
			mes "Come on... you're not a rookie.. haha.";
			next;
			mes "[Hound]";
			mes "If you are going to leave, better be now.";
			mes "Come back to me once you are ready to leave.";
			mes "I will let you know your mission.";
			ep13_3_invite = 3;
			close;
		case 2:
			mes "[Vyhannus]";
			mes "First go to Manuk and meet General Guard Avalanche.";
			mes "Avalanche will be heavily armed because he is Galten.";
			mes "You can't miss him.";
			next;
			mes "[Vyhannus]";
			mes "Once you tell Avalanche that you are a guest of the city, he will let you pass the path to El Dicastes.";
			next;
			mes "[Vyhannus]";
			mes "You cannot go pass without his approval so make sure you get his permission.";
			mes "He will let you pass with my recommendations.";
			next;
			mes "[Vyhannus]";
			mes "I'm a little excited.";
			mes "on what our meeting will bring in the future.";
			mes "Only hope it won't be like a blizzard in the middle of the night.";
			ep13_3_invite = 4;
			changequest 7182,7183;
			close;
		case 3:
			mes "[Hound]";
			mes "My name is Hound.";
			mes "Are you here by Aello's request?";
			next;
			select("Yes. He told me to meet the Sapha.");
			mes "[Hound]";
			mes "Okay. You should be able to talk to him, right?";
			mes "Shall we start with introducing ourselves?";
			mes "This is...";
			mes ""+strcharinfo(PC_NAME)+"...";
			next;
			mes "[Vyhannus]";
			mes "My name is Vyhannus.";
			mes strcharinfo(PC_NAME)+"..?";
			mes "Glad to meet you.";
			next;
			if(select("Same here.", "A tree monster!")==1) {
				mes "[Vyhannus]";
				mes "Amazing.";
				mes "Like with Hound, that ring you humans made...";
				mes "is like a ring of wisdom.";
			}
			else {
				mes "[Hound]";
				mes "What are you saying?";
				mes "That was rude!";
				next;
				mes "[Vyhannus]";
				mes "Oh. Monster?";
				mes "That is something new.";
				mes "Hound. I'm fine. You humans are amusing.";
				next;
			}
			mes "[Vyhannus]";
			mes "Shall we skip to the point?";
			mes "The reason why I am here...";
			next;
			mes "[Someone's voice]";
			mes "Excuse me, hold on a second.";
			enablenpc "Hibba Agip#ep133_is07";
			next;
			mes "[Hound]";
			mes "Commander!";
			mes "You've come at such short notice.";
			mes "Is there a situation?";
			emotion e_omg,0,"Hound#ep133_is06";
			next;
			mes "[Hibba Agip]";
			mes "Huh? Nothing.";
			mes "Was there anything.";
			mes "You said you wanted to send a trustworthy person, right?";
			mes "I wanted to see the person Aello chosen to send.";
			next;
			mes "[Hibba Agip]";
			mes "Hm... Ah.";
			mes "Is it you?";
			mes "I see, just as Aello explained.";
			mes "Well, I think we are in good hands if it is you.";
			next;
			select("What are you implying?");
			mes "[Vyhannus]";
			mes "So... It's like this.";
			mes "Both Saphas and humans had many differences in the past.";
			next;
			mes "[Vyhannus]";
			mes "We've worried about becoming enemies with your race after you've suddenly appeared";
			mes "and were afraid of your abilities.";
			next;
			mes "[Vyhannus]";
			mes "But you have respected us Saphas";
			mes "and helped Manuk with many deeds.";
			mes "We've come to recognize humans as good people.";
			next;
			mes "[Hibba Agip]";
			mes "Yes, we made efforts.";
			mes "We also tried to keep a neutral attitude.";
			mes "Because it is always better to strengthen amnity as a third party then taking sides in a conflict.";
			next;
			mes "[Hound]";
			mes "Well..";
			mes "Not totally wrong, I guess...";
			next;
			mes "[Vyhannus]";
			mes "(Vyhannus smiles)";
			mes "We have told Ravail about you humans.";
			mes "Ravail is the highest elder of glorious ^4d4dffEl Dicastes^000000.";
			next;
			select("El Dicastes?", "Ravail?");
			mes "[Hibba Agip]";
			mes "Ah, sorry for interrupting.";
			mes "I have to go now.";
			mes "Hound, I approve.";
			mes "I think he will do just fine.";
			next;
			mes "[Hibba Agip]";
			mes "Then it's settled with him.";
			mes "And... ah yes, you.";
			mes "Please go meet the inspector in the next room after this.";
			mes "Got it?";
			next;
			mes "[Hibba Agip]";
			mes "I'm leaving now.";
			mes "Vyhannus? I'll come by to see you again.";
			mes "And you should ^4d4dffmeet Inspector Doha after talking with Vyhannus^000000.";
			mes "Then bye everyone.";
			ep13_3_invite = 2;
			ep13_3_secret = 1;
			setquest 7185;
			next;
			disablenpc "Hibba Agip#ep133_is07";
			emotion e_swt2,0,"Hound#ep133_is06";
			emotion e_swt2,0,"Sapha from Manuk";
			mes "Commander Hibba Agip quickly left the room after saying what he wanted to say.";
			mes "First, let's listen to Vyhannus's story.";
			close;
		}
}

mid_campin,168,128,3	script	Sapha from Manuk	4_MAN_JERUTOO,{
	if (isequipped(2782)) {
		if (!ep13_3_invite) {
			mes "-Looks like the Sapha messenger from Manuk.-";
			next;
			mes "[Hound]";
			mes "Sorry but will you leave now?";
			mes "You don't seem to have authorization from the captain or Aello?";
			close;
		}
		if (ep13_3_invite == 1) {
			mes "[Sapha]";
			mes "- This person look like the Sapha messenger from Manuk. -";
			mes "You just stand there without";
			mes "knowing what he says, so the";
			mes "expedition guard next to you starts to talk. -";
			next;
			callfunc "eldicastes_c",3;
		}
		else if (ep13_3_invite == 2) {
			mes "[Vyhannus]";
			mes "Your commander is like the wind.";
			mes "We have someone like that in Manuk, too.";
			mes "He's name is Galten. He is so quick, you won't notice the weight of his armor.";
			next;
			callfunc "eldicastes_c",1;
		}
		else if (ep13_3_invite == 3) {
			callfunc "eldicastes_c",2;
		}
		else if (ep13_3_invite == 4) {
			mes "[Vyhannus]";
			mes "Avalanche will be at the Manuk Operations building.";
			mes "Once he approves, you can use the tunnel that leads to the capital city.";
			mes "The tunnel might be a little scary.";
			mes "But I'm sure you will reach the end of it since you are strong.";
			close;
		}
		else if (ep13_3_invite == 5) {
			mes "[Vyhannus]";
			mes "Oh, the tunnel?";
			mes "It was originally a mineral mine.";
			mes "But we found ourselves on the opposite side while mining away.";
			next;
			mes "[Vyhannus]";
			mes "We found better mines afterwards and that is how Manuk came about.";
			mes "The tunnel is reorganized with paths between the capital city and Manuk.";
			next;
			mes "[Vyhannus]";
			mes "That is it.";
			close;
		}
		else if (ep13_3_invite == 6) {
			mes "[Vyhannus]";
			mes "You received the Light of El Dicastes.";
			mes "With this, you can return to Diel from anywhere, anytime.";
			mes "Looks like an item made for your convenience.";
			next;
			mes "[Vyhannus]";
			mes "Ravail seems to like you very much.";
			mes "The Light of El Dicastes is convenient to use instead of moving through long tunnels.";
			next;
			mes "[Vyhannus]";
			mes "Oh, the tunnel?";
			mes "It was originally a mineral mine.";
			mes "But we found ourselves on the opposite side while mining away.";
			next;
			mes "[Vyhannus]";
			mes "We found better mines afterwards and that is how Manuk came about.";
			mes "The tunnel is reorganized with paths between the capital city and Manuk.";
			next;
			mes "[Vyhannus]";
			mes "That is it.";
			close;
		}
		mes "[Vyhannus]";
		mes "The tunnel that connects Manuk and the capital city.";
		mes "It was originally a mineral mine.";
		mes "But we found ourselves on the opposite side while mining away.";
		next;
		mes "[Vyhannus]";
		mes "We found better mines afterwards and that is how Manuk came about.";
		mes "The tunnel is reorganized with paths between the capital city and Manuk.";
		next;
		mes "[Vyhannus]";
		mes "That is it.";
	}
	mes "[Sapha]";
	mes sprintf("¢¤¡ð¡ú? ¢£ ¡ù¡ð...");
	mes sprintf("¡ï¡ò¡Ð ¢¤ ?");
	mes sprintf("¡ñ¡ï..?");
	next;
	mes "[Hound]";
	mes "Where is your interpreter ring?";
	mes "I'm not going to be your personal translator.";
	close;
}

mid_campin,168,125,3	script	Hound#ep133_is06	4_M_MOCASS1,{
	if (!isequipped(2782)) {
		mes "[Hound]";
		mes "Where is the interpreter ring?";
		mes "We should create it if we don't have one.";
		mes "I would like to speak in person.";
		close;
	}
	if (!ep13_3_invite) {
		mes "[Hound]";
		mes "Sorry but will you leave now?";
		mes "You don't seem to have authorization from the captain or Aello?";
		close2;
	}
	else if (ep13_3_invite == 1) {
		callfunc "eldicastes_c",3;
	}
	else if (ep13_3_invite == 2) {
		callfunc "eldicastes_c",1;
	}
	else if (ep13_3_invite == 3) {
		callfunc "eldicastes_c",2;
	}
	else if (ep13_3_invite == 4) {
		mes "[Hound]";
		mes "First thing you need to do when you reach Manuk is to meet General Guard Avalanche.";
		mes "Tell Avalanche that you are the one invited by Vyhannus.";
		next;
		mes "[Hound]";
		mes "Then you'll go through a simply process of confirmation and will be permitted to go through the tunnel to the capital city.";
		mes "Passing through the tunnel is easy as long as you are polite.";
		next;
		mes "[Hound]";
		mes "And don't forget what the captain said.";
		mes "Inspector Doha is in the next room.";
		close;
	}
	else if (ep13_3_invite > 4) {
		mes "[Hound]";
		mes "I've just returned from Manuk from a long term dispatch";
		mes "and haven't gotten any rest yet.";
		mes "El Dicastes.. I will find the time to visit once your advance party settles in.";
		next;
		mes "[Hound]";
		mes "I have to take care of Vyhannus here.";
		mes "We might see the day when Saphas like Vyhannus will be living with us on our continent.";
		close;
	}
	mes "[Hound]";
	mes "I've just returned from Manuk from a long term dispatch";
	mes "and haven't gotten any rest yet.";
	mes "El Dicastes.. I will find the time to visit once your advance party settles in.";
	next;
	mes "[Hound]";
	mes "I have to take care of Vyhannus here.";
	mes "We might see the day when Saphas like Vyhannus will be living with us on our continent.";
	close;
}

mid_campin,165,127,5	script	Hibba Agip#ep133_is07	4_M_REDSWORD,{
	mes "[Hibba Agip]";
	mes "Hmm..?";
	mes "I should go now.";
	close2;
OnInit:
	disablenpc strnpcinfo(NPC_NAME);
	end;
}

man_in01,315,52,3	script	Guard Captain Avalanche	4_MAN_GALTUN,{
	mes "[Guard Captain Avalanche]";
	if (!isequipped(2782)) {
		mes sprintf("¢¤¡ð¡ú? ¢£ ¡ù¡ð...");
		mes sprintf("¡ï¡ò¡Ð ¢¤ ?");
		mes sprintf("¡ñ¡ï..?");
		close;
	}
	if (ep13_3_invite == 4) {
		mes "[Avalanche]";
		mes "You are human.";
		mes "What do you want here?";
		next;
		select("I've come with Vyhannus's invitation.");
		mes "[Avalanche]";
		mes "Ah. Jarute Vyhannus.";
		mes "I thought it would be better for him to take a guard with him but.";
		next;
		mes "[Avalanche]";
		mes "I guess Vyhannus had trust in you humans.";
		mes "I'm fine as long as Vyhannus approved you.";
		next;
		mes "[Avalanche]";
		mes "I authorize you to pass through to El Dicastes, the capital city.";
		mes "There is a tunnel that leads to the capital city right outside this building which goes down by the east mountain range of this village.";
		next;
		mes "[Avalanche]";
		mes "It is a tunnel that reaches the capital city. There is no other detour because Kamidal mountain is so huge.";
		next;
		mes "[Avalanche]";
		mes "The tunnel is well maintained but there was a time when part of the tunnel which connects";
		mes "with the lowest cave of the mountain collapsed and reports of wild monsters was received.";
		next;
		mes "[Avalanche]";
		mes "So I recommend that you move in a group.";
		mes "It is dangerous and can be a long journey.";
		mes "That is all I have to say for now.";
		next;
		mes "[Avalanche]";
		mes "Please let me know any news about the capital city when you come back.";
		mes "Hahaha..";
		ep13_3_invite = 5;
		changequest 7183,7184;
		close2;
	}
	else if (ep13_3_invite == 5) {
		mes "[Avalanche]";
		mes "Go out of this building and straight below the mountain east from the village.";
		mes "You will know where it is if you see soldiers guarding the tunnel.";
		next;
		mes "[Avalanche]";
		mes "I hope that the Light of El Dicastes will show you the way.";
		close;
	}
	else if (ep13_3_invite == 6) {
		mes "[Avalanche]";
		mes "Oh... You have the Light of El Dicastes.";
		mes "it would be helpful for your travel.";
		next;
		mes "[Avalanche]";
		mes "The path to the capital city was previously a mine.";
		mes "so we have reports of wild monsters appearing although the tunnel is well maintained.";
		next;
		mes "[Avalanche]";
		mes "Always take care of yourself at all times.";
		mes "Haha.. but then you humans are very strong.";
		close;
	}
	mes "[Avalanche]";
	mes "The path to the capital city was previously a mine.";
	mes "so we have reports of wild monsters appearing although the tunnel is well maintained.";
	next;
	mes "[Avalanche]";
	mes "Always take care of yourself at all times.";
	mes "Haha... but then you humans are very strong.";
	close;
}

dic_in01,42,264,3	script	Adventurer Clerk#ep133	4_MAN_NITT,{
	if (!isequipped(2782)) {
		mes "[Clerk Knit]";
		mes sprintf("¡ð¡ñ¡ô ¡õ ¡ü¢±¢³ ¡ö ¡ò...?");
		mes sprintf("¢¤¡ö¡ø ... ¢³ ¡÷¢£¡ü ¡ø ¡Ð¡õ¡û...");
		next;
		mes "- Cannot communicate with him. -";
		close;
	}
	mes "[Clerk Rhawyne]";
	mes "How can I help you?";
	next;
	switch (select("Register as an adventurer.", "Talk.", "Cancel.")) {
		case 1:
			if (ep13_3_invite < 5) {
				mes "[Clerk Rhawyne]";
				mes "Do you want to register as an adventurer?";
				mes "Strange.";
				mes "You are not on our list of visitors.";
				mes "Did you enter without permission?";
				next;
				mes "[Clerk Rhawyne]";
				mes "All other races without official permission are restricted.";
				mes "I will send for a Galten right away.";
				next;
				mes "The Sapha clerk is ready to call on a Guard Galten any time.";
				mes "It's best to avoid this situation.";
				close;
			}
			else if (ep13_3_invite == 5) {
				mes "[Clerk Rhawyne]";
				mes "Do you want to register as an adventurer?";
				mes "I will compare with the invitation list from Manuk.";
				mes "What is your name?";
				next;
				mes "[" + strcharinfo(PC_NAME) + "]";
				mes "It is " + strcharinfo(PC_NAME) + ".";
				next;
				mes "[Clerk Rhawyne]";
				mes "Yes.. " + strcharinfo(PC_NAME) + "...";
				mes "I found it.";
				mes "Welcome to El Dicastes, capital city of Sapha.";
				next;
				mes "[Clerk Rhawyne]";
				mes "You will be treated the same as other Saphas here";
				mes "and is allowed to do as you wish";
				mes "and can have contracts with official requests from Dicastes.";
				next;
				mes "[Clerk Rhawyne]";
				mes "This is a little souvenir for visiting El Dicastes.";
				mes "You can use it to return to El Dicastes whenever you wish.";
				next;
				ep13_3_invite = 6;
				getitem El_Dicastes_Light,1;
				completequest 7184;
				mes "[Clerk Rhawyne]";
				mes "There is a special place for humans located beneath the residential area of Pioms.";
				mes "It is called in your language...";
				mes "Pub. Hope you get to visit there.";
				close;
			}
			mes "[Clerk Rhawyne]";
			mes "Strange.";
			mes "Aren't you already registered?";
			mes "I see your name in the records.";
			close;
		case 2:
			if (ep13_3_secret == 12) {
				mes "[Clerk Rhawyne]";
				mes "I recognize you.";
				mes "How can I help you?";
				next;
				if (select("I want to meet the minister.", "Nothing particular.") == 1) {
					mes "[Clerk Rhawyne]";
					mes "You want to meet the minister?";
					mes "Which minister?";
					mes "Ravail cannot be met in person even with exploit certifications.";
					next;
					if (select("Ahat", "Another minister") == 1) {
						if (countitem(Sapa_Feat_Cert) > 2) {
							mes "[Clerk Rhawyne]";
							mes "You've really collected 3 exploit certification of Sapha already.";
							mes "Alright. I will send a request.";
							next;
							mes "[Clerk Rhawyne]";
							mes "Please take the elevator up to the Administrative Office.";
							mes "There is another elevator in the corridor next to the Administrative Office.";
							next;
							mes "[Clerk Rhawyne]";
							mes "It is a separate elevator that leads to the high minister's office";
							mes "You will be guided in front of the office.";
							delitem Sapa_Feat_Cert,3;
							ep13_3_secret = 13;
							changequest 7197,7198;
							close;
						}
						mes "[Clerk Rhawyne]";
						mes "You need 3 exploit certification of Sapha to meet Ahat.";
						mes "You know what exploit certification of Sapha is, right?";
						mes "Well, please try to help around El Dicastes to collect them.";
						close;
					}
					mes "[Clerk Rhawyne]";
					mes "Another minister? Who?";
					next;
					select("Sorry, but I know no one else.");
					mes "[Clerk Rhawyne]";
					mes "You are difficult.";
					mes "Unlike other Saphas, ministers are very busy.";
					close;
				}
				mes "[Clerk Rhawyne]";
				mes "What are you curious about today?";
				close;
			}
			else if (ep13_3_secret == 13) {
				mes "[Clerk Rhawyne]";
				mes "Ahat is on the same floor as high minister Ravail.";
				mes "Take the elevator up to the Administrative Office and then you will be guided in front of the separate elevator.";
				close;
			}
			mes "[Clerk Rhawyne]";
			mes "What are you curious about today?";
			next;
			switch (select("About official requests", "About the adventurer's pub", "Ahat?", "Exploit certification of Sapha?", "End conversation.")) {
				case 1:
					mes "[Clerk Rhawyne]";
					mes "If Diel or ministers need help on operations in the capital";
					mes "they post a notice on the public board.";
					next;
					mes "[Clerk Rhawyne]";
					mes "Anyone who can take the job can take up the request.";
					mes "Adventurers who are officially registered can also take jobs.";
					next;
					mes "[Clerk Rhawyne]";
					mes "After you handle a request";
					mes "you are given an exploit certification for helping El Dicastes.";
					next;
					mes "[Clerk Rhawyne]";
					mes "It is better spend spare time on these official requests.";
					mes "Because you are contributing to the community.";
					next;
					mes "[Clerk Rhawyne]";
					mes "Due to the increase of visitors from other worlds,";
					mes "some requests are targeted for you.";
					mes "You can take your pick.";
					close;
				case 2:
					mes "[Clerk Rhawyne]";
					mes "The adventurer's pub is open for the convenience of visitors like you.";
					mes "It is located in the Piom residential area below the mine and factory zone.";
					next;
					mes "[Clerk Rhawyne]";
					mes "We thought the living environment here would be unfamiliar and inconvenient for you.";
					mes "So we tried to make a place that is similar to what you have back home with a little help from adventurers.";
					mes "I hope you like it.";
					close;
				case 3:
					mes "[Clerk Rhawyne]";
					mes "Ahat is the next minister in line after Ravail.";
					mes "Why?";
					mes "Because we respect her.";
					next;
					mes "[Clerk Rhawyne]";
					mes "What should I say, we would like to protect her.";
					mes "But I'm not sure how respect is used in your language.";
					next;
					mes "[Clerk Rhawyne]";
					mes "Ahat is popular.";
					mes "Not many have seen him and he works in her room all the time.";
					next;
					mes "[Clerk Rhawyne]";
					mes "If you want to meet Ahat..well.";
					mes "He is really good at his work but is very shy of strangers..";
					next;
					mes "[Clerk Rhawyne]";
					mes "He doesn't like to be in places where a lot of people are gathered.";
					mes "That is why we barely see her.";
					close;
				case 4:
					mes "[Clerk Rhawyne]";
					mes "Exploit certification?";
					mes "Exploit certifications are made for outsiders like you.";
					mes "They are given out as rewards when adventurers help with requests from Saphas throughout the city.";
					next;
					mes "[Clerk Rhawyne]";
					mes "The exploit certification is used to meet ministers.";
					mes "I guess in order to meet busy ministers, you must at least contribute to our society.";
					close;
				case 5:
					mes "[Clerk Rhawyne]";
					mes "Please feel free to ask questions when you need help.";
					close;
			}
		case 3:
			mes "[Clerk Rhawyne]";
			mes "Please feel free to ask questions when you need help.";
			close;
	}
}
//== Enchantment NPCs ======================================
-	script	dic_enc#main	FAKE_NPC,{
	.@re$ = strnpcinfo(NPC_NAME_VISIBLE);
	.@n$ = "["+.@re$+"]";
	if (!checkweight (1201,1)) {
		mes "You have too many kinds of items. Let's try again after you reduce the number of items.";
		close;
	}
	if ((MaxWeight - Weight) < 1000) {
		mes "Cannot proceed because the weight of your items is too heavy. Let's try again after you get rid of some weight.";
		close;
	}
	if (.@re$ == "Kareka") {
		if (ep13_3_ring2 > 99) {
			mes "[Kareka]";
			mes "Do you want to upgrade the ^990099Light of El Dicastes^000000 again?";
			next;

			// The reset feature was disabled in previous versions.
			//mes "[Kareka]";
			//mes "Ha ha ha, that is out of the question. This item is very rare and valuable so I cannot give you a new one.";
			//close;

			mes "[Kareka]";
			mes "That will cost ^9900996 Sapha Certifications^000000 in order to retry.";
			mes "And note this, your current Light of El Dicastes will be destroyed along with all of its enchantments.";
			next;
			mes "[Kareka]";
			mes "Are you sure you want to do this?";
			next;
			if(select("No, let me think about it.", "Take my Light of El Dicastes.") == 2) {
				if (countitem(El_Dicastes_Light) == 0 || countitem(Sapa_Feat_Cert) < 6) {
					mes "[Kareka]";
					mes "You need to bring the Light of El Dicastes and 6 Sapha Certifications!";
					mes "Don't try to cheat me!";
					close;
				}
				mes "[Kareka]";
				mes "Ok, let's get this started.";
				mes "I'm going to remove all enchantments from your Light of El Dicastes.";
				mes "Haaap--!";
				specialeffect2 EF_REPAIRWEAPON;
				progressbar "ffff00",3;
				delitem Sapa_Feat_Cert,6;
				delitem El_Dicastes_Light,1;
				getitem El_Dicastes_Light,1;
				ep13_3_ring2 = 0;
			}
			close;
		}
		if (countitem(Sapa_Feat_Cert) < 1) {
			mes "[Kareka]";
			mes "The Exploit Certifications of Sapha that you collect by helping throughout the city has other uses besides meeting the minister.";
			next;
			mes "[Kareka]";
			mes "If you come across an exploit certification, please come back to me.";
			next;
			mes "[Kareka]";
			mes "I can cast an additional spell to your ^990099Light of El Dicastes^000000 accessory.";
			close;
		}
		mes "[Kareka]";
		mes "You've come to awaken the ^990099Light of El Dicastes^000000 infinite strength. ";
		next;
		if (select("Please explain.", "I want to upgrade.") == 1) {
			mes "[Kareka]";
			mes "I heard some craftsmen outside of the city can also cast spells on equipment.";
			next;
			mes "[Kareka]";
			mes "I'm the same but at least I don't destroy equipment.";
			next;
			mes "[Kareka]";
			mes "If you bring exploit certifications of Sapha, I will cast spells from 1 to 3 steps to your ^990099Light of El Dicastes^000000.";
			next;
			mes "[Kareka]";
			mes "But of course, since this is adding spells on top of its original magic, I cannot guarantee that you will get what you want on one try.";
			close;
		}
		if (countitem(El_Dicastes_Light) < 1) {
			mes "[Kareka]";
			mes "Either you are not wearing or don't have the equipment to upgrade on you.";
			close;
		}
		.@v$ = "ring2";
		.@Items_ = 2844;
	}
	else {
		mes .@n$;
		.@cat_hi = rand(1,30);
		if (.@cat_hi == 1) mes "It is difficult to find fish here. Can't find any so Jahbong would forget that he's busy or angry at the sight of a Fish Tail.";
		else if (.@cat_hi == 2) mes "Grrr... I was punished with a ladle for peeing on my blanket yesterday.";
		else if (.@cat_hi == 3) mes "I dream sometimes of a giant patting me on the head. But I feel more annoyed than afraid.";
		else if (.@cat_hi == 4) mes "Newbie Jarute, Ahat doesn't seem to look like a Sapha.";
		else if (.@cat_hi == 5) mes "Our people say Ahat looks like a beautiful cat.";
		else if (.@cat_hi == 6) mes "I heard there was a superior equipment upgrade craftsman in the capital city of Manuk.";
		else if (.@cat_hi == 7) mes "Grrr... I don't think my voice sounds normal these days. I think it's the weather.";
		else if (.@cat_hi == 8) mes "There are times when I shout out loud but it is only because I am in a good mood. No need to be startled.";
		else if (.@cat_hi == 9) mes "I feel an urge to jump on a pile with my four paws when I see one.";
		else if (.@cat_hi == 10) mes "I must have been a cat in my previous life.";
		else if (.@cat_hi == 11) mes "I dreamt about the giant again. I waved my paws annoyed and he kept on patting me.";
		else if (.@cat_hi == 12) mes "Yup!! Was the rumor true that Ahat looks like a human?! ";
		else if (.@cat_hi == 13) mes "I heard on my way that this Pinqucula Dark has a Withered Flower.";
		else if (.@cat_hi == 14) mes "There is a guy named Pinguicula nearby who has the Sharp Leaf nearby.";
		else if (.@cat_hi == 15) mes "There is a guy named Pinguicula nearby who has the Great Leaf nearby.";
		else if (.@cat_hi == 16) mes "I recommend getting it from the Dracos nearby. But then, they only drop it randomly so you may come back empty handed...";
		else mes "Hmm... This may not be important to you but.";
		next;
		mes .@n$;
		if (countitem(Sapa_Feat_Cert) < 1) {
			if (.@re$ == "Brare") {
				mes "Oh... no luck on Sapha Certifications?";
				next;
				mes .@n$;
				mes "So you haven't got any...";
				next;
				mes .@n$;
				mes "That's sad. They're very are useful, you know...";
				close;
			} else if (.@re$ == "Mancho") {
				mes "If you work hard in this city, you will get an Exploit Certification of Sapha.";
				next;
				mes .@n$;
				mes "If you do come across one of the certifications, can you bring it to me?";
				next;
				mes .@n$;
				mes "We can make an exchange and you won't regret it.";
				close;
			} else if (.@re$ == "Jalapeno") {
				mes "I've been gathering exploit certifications of Sapha for a year now to meet Ahat.";
				next;
				mes .@n$;
				mes "But I'm far from it because it takes a high position and some bribery for a low creature like me to meet him.";
				next;
				mes .@n$;
				mes "If you have any exploit certifications of Sapha to spare, please share them with me. I promise to pay you back in services. You'll never get anywhere else.";
				close;
			}
		}
		if (.@re$ == "Brare") {
			mes "Do you want to look luxurious with Golden Bells?";
			.@Items_ = 2843;
			.@v$ = "ring1";
		}
		else if (.@re$ == "Mancho") {
			mes "You must be interested in the ^800080Feral Tail^000000?";
			.@Items_ = 2564;
			.@v$ = "robe";
		}
		else if (.@re$ == "Jalapeno") {
			mes "You've come for Feral Boots. I have just the item for you.";
			.@Items_ = 2463;
			.@v$ = "shoe";
		}
		next;
		switch(select("Please explain.", "I want to reset.", "I want to upgrade.")) {
			case 1:
				if (.@re$ == "Brare") {
					mes .@n$;
					mes "Hmm. The ^990099Golden Bell^000000 is an accessory awarded to only the best and bravest warriors among our people.";
					next;
					mes .@n$;
					mes "A random skill is casted up to the first and second steps but";
					next;
					mes .@n$;
					mes "There is a risk of the item breaking during the third upgrade.";
				} else if (.@re$ == "Mancho") {
					mes .@n$;
					mes "You say you want me to explain about upgrade?";
					next;
					mes .@n$;
					mes "Hmm. The ^990099Feral Tail^000000 is an unique item. It looks just like our tails.";
					next;
					mes .@n$;
					mes "It is not only strong and warm but is also powerful enough to be enchanted with magical spells.";
					next;
					mes "[Mancho]";
					mes "Well... it comes with the same risks as the ^990099Feral Boots^000000 of breaking at the third step of upgrade.";
				} else if (.@re$ == "Jalapeno") {
					mes .@n$;
					mes "You say you want me to explain about upgrade?";
					next;
					mes .@n$;
					mes "Hmm. The ^990099Feral Boots^000000 are very unique. A shoemaker took the design of our feet and designed this item long ago.";
					next;
					mes .@n$;
					mes "I do not know the actual materials used but they are strong enough to enchant up to 3 kinds of upgrade magic spells.";
					next;
					mes .@n$;
					mes "Well... some do get broken at the third upgrade and I do have some customers complaining when that happens.......meow";
					next;
					mes .@n$;
					mes "... I almost died in one occasion. (murmuring)";
				}
				close;
			case 2:
				mes .@n$;
				if (.@re$ == "Mancho") {
					mes "Do you want to reset?";
					mes "This involves ^990000destroying the Feral Tail^000000 you are upgrading and cancelling all records of it. Are you sure?";
				}
				else if (.@re$ == "Jalepeno") {
					mes "Reset? Are you sure?";
					mes "This involves ^990000destroying the Feral Boots^000000 you are upgrading and cancelling all records of it. Are you sure?";
				}
				else if (.@re$ == "Brare") {
					mes "Reset!!";
					mes "This involves ^990000destroying the Golden Bell^000000 you are upgrading and cancelling all records of it. Are you sure?";
				}
				next;
				if(select("Maybe next time.", "Please reset it.") == 1) {
					mes .@n$;
					mes "When you are ready,";
					mes "Please come back again";
					close;
				}
				if (countitem(.@Items_) < 1) {
					mes .@n$;
					mes "Then, take the equipment off first.";
					close;
				}
				specialeffect2 EF_OVERTHRUST;
				mes .@n$;
				if (.@re$ == "Brare") mes "I've collected all equipment and erased all records as you requested. Now all your equipment and records are clean.";
				else mes "I only do what I'm asked to do. I've retrieved all equipment and cancelled all records.";
				delitem .@Items_,1;
				setd "ep13_3_"+.@v$, 0;
				close;
			case 3: break;
		}
		if (countitem(.@Items_) < 1) {
			mes .@n$;
			mes "But...";
			mes "you don't seem to be wearing or even carrying equipment to upgrade on you.";
			close;
		}
	}
	if (getd("ep13_3_"+.@v$) == 0) {
		mes .@n$;
		mes "I'm preparing for the";
		mes "first step of upgrade.";
		mes "Once equipment is upgraded";
		mes "you cannot change the upgrade";
		mes "before you destroy it.";
		next;
		mes .@n$;
		mes "First upgrade step requires ^8000801 Sapha Certification^000000. Do you want to proceed?";
		.@req = 1;
	}
	else if (getd("ep13_3_"+.@v$) < 9) {
		mes .@n$;
		mes "I'm preparing for the";
		mes "second step of upgrade.";
		mes "Once equipment is upgraded";
		mes "you cannot change the upgrade";
		mes "before you destroy it.";
		next;
		mes .@n$;
		mes "Second upgrade step requires ^9900992 Exploit Certifications of Sapha^000000. Do you want to proceed?";
		.@req = 2;
	}
	else if (getd("ep13_3_"+.@v$) < 69) {
		mes .@n$;
		mes "I'm preparing for the";
		mes "third step of upgrade.";
		mes "Once equipment is upgraded";
		mes "you cannot change the upgrade";
		mes "before you destroy it.";
		next;
		mes .@n$;
		mes "And this is the most important,";
		mes "the risk of equipment to break";
		mes "during the third upgrade step is high!";
		mes "And you need ^9900993 Exploit Certifications of Sapha^000000 for the procedure.";
		next;
		mes .@n$;
		mes "Please keep in mind that";
		mes "this is a delicate process of";
		mes "casting immense power to the equipment.";
		mes "Are you ready?";
		.@req = 3;
	}
	else if (getd("ep13_3_"+.@v$) > 68 && countitem(.@Items_)) {
		mes .@n$;
		mes "You are done with the";
		mes "third step of upgrade.";
		next;
		mes .@n$;
		mes "If you do not like";
		mes "your equipment upgrade";
		mes "I can withdraw your equipment";
		mes "and destroy all records";
		mes "of it";
		next;
		if (select("I'll just use it.", "Please take it.") == 1) {
			mes .@n$;
			mes "Whenever you change your mind.";
			mes "Please come back again";
			close;
		}
		specialeffect2 EF_OVERTHRUST;
		mes .@n$;
		mes "I have erased all previous records";
		mes "of upgrades to start all over with";
		mes "any new equipment without upgrades";
		mes "you bring.";
		delitem .@Items_,1;
		setd "ep13_3_"+.@v$, 0;
		close;
	}
	else {
		mes .@n$;
		mes "Hm?";
		mes "Do you want anything from me?";
		setd "ep13_3_"+.@v$, 0;
		close;
	}
	next;
	if(select("Maybe next time.", "I want to upgrade.") == 1) {
		mes .@n$;
		mes "When you are ready,";
		mes "Please come back again.";
		close;
	}
	if (countitem(Sapa_Feat_Cert) < .@req) {
		mes .@n$;
		mes "But you don't have enough exploit certifications. You need "+.@req+" exploit certification of Sapha for the "+((.@req == 3)?"third":((.@req == 2)?"second":"first"))+" step of upgrade.";
		close;
	}
	mes .@n$;
	mes "Then let's start.";
	next;
	specialeffect2 EF_REPAIRWEAPON;
	progressbar "ffff00",3;
	delitem 6304,.@req;
	if (getd("ep13_3_"+.@v$) == 0) {
		if (.@re$ == "Kareka") {
			.@enc_en = rand(1,45);
			setarray .@rates, 45,32,30,22,20,12,10,2;
		}
		else {
			.@enc_en = rand(1,40);
			setarray .@rates, 40,34,30,24,20,14,10,4;
		}
		setarray .@var, 1,2,3,4,5,6,7,8;
	}
	else if (getd("ep13_3_"+.@v$) <= 8) {
		if (.@re$ == "Kareka") {
			.@enc_en = rand(1,45);
			setarray .@rates, 45,32,30,17,15,2;
		}
		else {
			.@enc_en = rand(1,30);
			setarray .@rates, 30,24,20,14,10,4;
		}
		setarray .@var, 10,20,30,40,50,60;
	}
	else if (getd("ep13_3_"+.@v$) <= 68) {
		if (compare(.@v$,"ring")) {
			.@enc_en = rand(1,90);
			setarray .@rates, 90,62,60,32,30,2;
			setarray .@var, 100,200,400,500,700,800;
		}
		else {
			.@crs_yong = 140 - (ep13_yong1 / 100);
			if (.@crs_yong < 95) .@crs_yong = 95;
			.@enc_en = rand(1,.@crs_yong);
			if (.@enc_en > 90) {
				delitem .@Items_,1;
				setd "ep13_3_"+.@v$, 0;
				mes .@n$;
				if (.@re$ == "Jalepano") mes "Ha ha ha. See, I told you. Oops, sorry. Forget that I just said that!!";
				else if (.@re$ == "Mancho") mes "Greed is the reason for failing investments. Tsk, tsk.";
				else if (.@re$ == "Brare") mes "Oh no....!!!! What happened to the Golden Bell!";
				close;
			}
			setarray .@rates, 90,75,65,60,45,35,30,15,5;
			setarray .@var, 100,200,300,400,500,600,700,800,900;
		}
	}
	else {
		mes .@n$;
		mes "I'm done. Hehe";
		close;
	}

	// Enchant Constants
	// Ex: .@dex[1]: DEX + 1 | .@cri[5]: CRI + 5 | .@eva[12]: FLEE + 12
	.@matk[1] = 4760; .@matk[2] = 4761;
	.@eva[6] = 4762;  .@eva[12] = 4763;
	.@cri[5] = 4764;  .@cri[7] = 4765;
	.@atk[2] = 4766;  .@atk[3] = 4767;
	.@dex[1] = 4720;  .@dex[2] = 4721;  .@dex[3] = 4722;
	.@int[1] = 4710;  .@int[2] = 4711;  .@int[3] = 4712;
	.@agi[1] = 4730;  .@agi[2] = 4731;  .@agi[3] = 4732;

	// Enchant attribute is determined by the digit position of variable value (ep13_3_<type>).
	// For example, assume the variable value is 516:
	// .@f_<slot>[<index>]
	// slot:	2	3	4
	// index:	5	1	6

	// Enchant Format
	if (compare(.@v$,"ring")) setarray .@f_2[1],.@agi[1],.@agi[2],.@int[1],.@int[2],.@dex[1],.@dex[2];
	else setarray .@f_2[1],.@agi[1],.@agi[2],.@agi[3],.@int[1],.@int[2],.@int[3],.@dex[1],.@dex[2],.@dex[3];
	setarray .@f_3[1],.@agi[1],.@agi[2],.@int[1],.@int[2],.@dex[1],.@dex[2];
	setarray .@f_4[1],.@atk[2],.@atk[3],.@cri[5],.@cri[7],.@eva[6],.@eva[12],.@matk[1],.@matk[2];
	.@str$ = getd("ep13_3_"+.@v$) + "";
	.@len = getstrlen(.@str$);
	.@j = 4;
	.@c = 1;
	while ((.@len - .@c) > -1 && getd("ep13_3_"+.@v$)) {
		setd ".@e_"+.@j, getd(".@f_"+.@j+"["+atoi(charat(.@str$,.@len-.@c))+"]");
		++.@c;
		--.@j;
	}
	.@size = getarraysize(.@rates);
	for (.@r = 0; .@r <= .@size; ++.@r) {
		if (.@enc_en > .@rates[.@r]) {
			setd ".@e_"+.@j, getd(".@f_"+.@j+"["+.@r+"]");
			break;
		}
	}
	delitem .@Items_,1;
	getitem2 .@Items_,1,1,0,0,.@e_1,.@e_2,.@e_3,.@e_4;
	setd "ep13_3_"+.@v$, .@var[.@r-1] + getd("ep13_3_"+.@v$);
	close;
}
dic_fild01,240,198,2	duplicate(dic_enc#main)	Jalapeno#pa0829	4_M_MERCAT1
dic_fild01,251,183,3	duplicate(dic_enc#main)	Brare#pa0829	4_M_MERCAT1
dic_fild01,259,172,3	duplicate(dic_enc#main)	Mancho#pa0829	4_M_MERCAT1
dic_in01,353,37,5	duplicate(dic_enc#main)	Kareka#pa0829	4_MAN_PIOM

dic_fild01,228,159,4	script	Jahbong#pa0829	4_M_MERCAT2,{
	mes "[Jahbong]";
	if (countitem(Sapa_Feat_Cert) < 1) {
		mes "You haven't received a Sapha Certification yet?";
		next;
		mes "[Jahbong]";
		mes "Come back to me once you have one. I'll give you something good in exchange.";
		close;
	}
	.@cattalkj = rand(1,9);
	if (.@cattalkj == 1) mes "Don't touch my back! I might bite you unconsciously.";
	else if (.@cattalkj == 2) mes "Pub owner Shay carried something away to make something strange! Be careful!";
	else if (.@cattalkj == 3) mes "We cats can jump 5 times our size. Isn't it cool? But then, don't ask me to jump from here now.";
	else if (.@cattalkj == 4) mes "I have to be diligent with my grooming to maintain beautiful fur.";
	else if (.@cattalkj == 5) mes "I have to groom myself everyday to maintain shiny fluffy fur. But I don't have very nice fur in the first place. Very sad.";
	else if (.@cattalkj == 6) mes "You should receive a Sapha Certification with both paws as a sign of respect. No cat deserves a certification if they don't!";
	else if (.@cattalkj == 7) mes "I don't really talk that much! Ahat looks like... meow meow meooow... sorry.";
	else if (.@cattalkj == 8) mes "Meow~~~~~~~~~~";
	else mes "Yarn is a great way to calm a cat.";
	next;
	mes "[Jahbong]";
	mes "Why are you here?";
	mes "Jahbong will exchange ^8000801 Sapha Certification^000000 for ^8000801 item^000000!";
	next;
	.@i = select("Just came to see what you have.", "I want the Feral Boots!", "Give me the Feral Tail!", "Give me the Golden Bell!", "How much to buy you?")-1;
	switch (.@i) {
		case 0:
			mes "[Jahbong]";
			mes "Meow!";
			next;
			mes "[Jahbong]";
			mes "^8000801Feral Boots^000000 are shoes for your feet! Buy one and Jalapeno over there will refine it for you!";
			next;
			mes "[Jahbong]";
			mes "^8000801Feral Tail^000000 is pretty rough! Mancho over there can help you fix it!!";
			next;
			mes "[Jahbong]";
			mes "^8000801Golden Bell^000000 is an accessory. Brare spent 40 years making this! Or maybe 4 years! Oh well, come back when you need anything!";
			next;
			mes "[Jahbong]";
			mes "There are some crazy adventurers asking if they can purchase me! Jahbong is not for sale! I'll just bite you if you ask!!";
			close;
		case 4:
			mes "[Jahbong]";
			mes "Meooooooooooow!!!!!!!!~~ Meooooooooow!!!!!";
			next;
			mes "- ^800080Jahbong goes wild^000000. -";
			next;
			mes "[Jahbong]";
			mes "I'm not an item!! I will not be merciful if you treat me like one!!";
			next;
			mes "- He may react extremely, but Jahbong doesn't seem to be really angry. -";
			close;
		default:
			break;
	}
	mes "[Jahbong]";
	mes "Are you really buying something?!";
	next;
	if (select("Nope", "Give me!!!") == 1) {
		mes "[Jahbong]";
		mes "Okay!";
		close;
	}
	setarray .@items[1],2463,2564,2843;
	mes "[Jahbong]";
	mes "Here you go!";
	delitem 6304,1;
	getitem .@items[.@i],1;
	close;
}

//== Cat Hand Agent ========================================
moc_para01,44,19,3	script	Cat Hand Agent#gekk	4_M_MERCAT2,{
	if (BaseLevel < 70)	{
		mes "[Cat Hand Agent]";
		mes "Hey, human! Did you come to make a request, too? When will it be my turn?";
		next;
		mes "[Cat Hand Agent]";
		mes "Our Cat Hand Merchant group really needs any help it can get. But by the looks of all those requests that Ebenor is holding in his hand, Cat Hand Merchant will be closed by the time my request is put up on the board!";
		next;
		mes "[Cat Hand Agent]";
		mes "It breaks my heart to think my colleagues will be shivering in the blizzard. I hope I don't get into trouble since I can't do anything about it, right?";
		close;
	}
	if (ep13_start != 100) {
		mes "[Cat Hand Agent]";
		mes "Hey, human! Did you come to make a request, too? When will it be my turn?";
		next;
		mes "[Cat Hand Agent]";
		mes "Our Cat Hand Merchant group really needs any help it can get. But by the looks of all those requests that Ebenor is holding in his hand, Cat Hand Merchant will be closed by the time my request is put up on the board!";
		next;
		mes "[Cat Hand Agent]";
		mes "It breaks my heart to think my colleagues will be shivering in the blizzard. I hope I don't get into trouble since I can't do anything about it, right?";
		next;
		if (select ("Why don't you collect it yourself?:I'm sorry to hear that.") == 1) {
				emotion e_omg;
				mes "[Cat Hand Agent]";
				mes "Human!! You're a genius!!";
				mes "How did you come up with that?";
				next;
				mes "[Agent Geck]";
				mes "I'm Agent Geck from the Cat Hand Merchant.";
				mes "Car Paw Merchant has been wandering for a long time in this Midgard world ever since we lost our homeland.";
				next;
				mes "[Agent Geck]";
				mes "But now we realize there is no place for our group here in Midgard.";
				mes "Geck, Gyareuk and Gorureung did a lot of thinking about it.";
				next;
				mes "[Agent Geck]";
				mes "But we finally found a place to settle!";
				mes "It may be a bit cold but there are no Kafra or Jonda there!";
				mes "We will gain ground in our new land!";
				next;
				mes "[Agent Geck]";
				mes "But of course, we don't have any influence over there to start with.";
				mes "However, we plan to spare no efforts on it.";
				next;
				mes "[Agent Geck]";
				mes "Human!! Did you know there is a huge hole near the Morroc village and nearby area?";
				mes "They say you can travel to a new area through the hole!";
				next;
				mes "[Agent Geck]";
				mes "But you will have to go through tests and research to get to a place before trying it out.";
				mes "To me, I think its all nonsense to go through the trouble!";
				next;
				mes "[Agent Geck]";
				mes "We must send someone as soon as possible to start exploring the area.";
				mes "While the humans are frittering away, our Cat Hand Merchant should settle first and continue with our research.";
				next;
				if (select ("I also want to go and help the merchants.:I'm not interested.") == 1) {
						mes "[Agent Geck]";
						mes "You are better than other humans!";
						mes "If you really mean it, then sign here.";
						mes "I'm collecting signs to get on Gyareuk's good side... never mind. I will let them know you are my sponsor!";
						next;
						input .@inputstr$;
						mes "[Agent Geck]";
						mes "" + strcharinfo(PC_NAME) + "? Human names are strange to me.";
						next;
						mes "[Agent Geck]";
						mes "Now you are Geck's personal slav... sponsor.";
						mes "Don't ask why you aren't Merchant sponsor.";
						mes "A good human does not poke around where they are not supposed to.";
						next;
						mes "[Agent Geck]";
						mes "Now since you've signed, all we need to do is leave for the other world.";
						mes "I heard humans call it Ash-Vacuum.";
						mes "Nobody explained to Geck why it was called that.";
						next;
						mes "[Agent Geck]";
						mes "But human.";
						mes "You will need to pay to get to the Ash-Vacuum.";
						mes "There wouldn't be any expense for Geck to send you there myself but we must ask for help from other agents.";
						next;
						mes "[Agent Geck]";
						mes "So you will need some money to buy fish for agents who help you.";
						mes "I will introduce you to an agent who will send you to the other world with no questions asked for only 50,000 zeny.";
						next;
						if (select ("Pay 50,000 zeny.:No way!") == 1) {
								if (Zeny < 50000) {
									mes "[Agent Geck]";
									mes "Geck learned not to deal with people who can't pay.";
									close;
								}
								mes "[Agent Geck]";
								mes "With this, our contract is now complete.";
								mes "Geck will help you to get to Ash-Vacuum in one piece.";
								Zeny -= 50000;
								ep13_start = 100;
								next;
								mes "[Agent Geck]";
								mes "Don't forget, human. The reason why Geck is helping you is to help the Cat Hand Merchant working hard in the other world.";
								next;
								mes "[Agent Geck]";
								mes "Now, I will transport you. Go meet our agent in the right corner.";
								close2;
								warp "moc_fild20", 342, 198;
								end;
						}
						mes "[Agent Geck]";
						mes "Geck doesn't force humans.";
						mes "But I think you will change your mind.";
						close;
				}
				mes "[Agent Geck]";
				mes "Did you meet the Cat Hand Merchant in Ash-Vacuum, human?";
				close;
		}
		mes "[Cat Hand Agent]";
		mes "But our Cat Hand Merchant will overcome any obstacle!";
		close;
	}
	mes "[Agent Geck]";
	mes "Did you meet the Cat Hand Merchant in Ash-Vacuum, human?";
	next;
	if (select ("Send me back:I'm busy") == 1) {
		mes "[Agent Geck]";
		mes "There is no time to waste, human!";
		mes "I'll send you back right away!";
		warp "moc_fild20", 342, 198;
		close;
	}
	mes "[Agent Geck]";
	mes "Hey, human! Didn't you say you will help the Cat Hand Merchant!";
	close;
}

moc_fild20,368,197,3	script	Cat#to22	4_CAT,{
	if (ep13_start != 100) {
		mes "[Cat]";
		mes "Meow~";
		close;
	}
	mes "A small Cat Hand Agent looks at you and nods its head towards the back.";
	mes "Looks like it wants you to step up on its back to climb over the wall.";
	next;
	if (select ("But you are so cute...:Let's do this!") == 1) {
		mes "The small Cat Hand Agent has small black patterns as if it were stamped on it's white fur.";
		next;
		mes "The small body isn't as tall as your ankle and its small but thick paws look like little cushions. The ears that bent backwards when it looked at how big you were stirred up your protective instinct.";
		next;
		mes "You don't seem to have the nerve to step on the Cat Hand Agent.";
		emotion e_sob;
		close;
	}
	mes "You look at the Cat Hand Agent's small back and climb over the wall as quick as possible so that it wouldn't notice your weight.";
	close2;
	warp "moc_fild22b", 175, 159;
	end;
}

moc_fild22b,182,179,3	script	Cat Hand Agent#Tat	4_M_MERCAT1,{
	if (ep13_start != 100) {
		mes "[Cat Hand Agent]";
		mes "This place as no meaning for us.";
		close;
	}
	mes "[Cat Hand Agent]";
	mes "Heard from Geck.";
	mes "I'm the Cat Hand Merchant's rising star, Tat.";
	next;
	mes "[Tat]";
	mes "I heard you are offering high-quality fish to pay for our passage.";
	mes "I also heard the fish is very fresh and has shiny golden scales.";
	next;
	mes "[Tat]";
	mes "I usually only allow our Cat Hand Merchant agents to go through but since you are here on Geck's behalf and seeing you are reliable, I'll let you through.";
	next;
	mes "[Tat]";
	mes "Are you ready?";
	next;
	if (select ("To the other world!:I need some time.") == 1) {
		mes "[Tat]";
		mes "Don't forget you are in debt to the Cat Hand Merchant, human!";
		close2;
		warp "mid_camp", 210, 291;
		end;
	}
	mes "[Tat]";
	mes "Aren't you suppose to be done getting ready before you come here?";
	close;
}