//========================
// [ڤ] The PlutoEA Project []
// http://opensvn.csie.org/PlutoEA
// -----------------------------------------
// -    -
//========================
//= 汾4.6 []
//========================

//----------------------------------------------------------------------------
// ŵƵϰ壻񴥷
//----------------------------------------------------------------------------
yuno_in01,35,179,4	script	#kh	46,5,5,{
	if (checkweight(7487,1) == 0) {
		mes "[]";
		mes "ͣһ !!";
		mes "ЯƷ̫ˣԲܻƷϵƷ֮ս";
		close;
	}
	switch (KielHyreQuest) {
	case 0:
		mes "[]";
		mes "ӭ٣ҪЩʲô?";
		next;
		switch(select("ơ:β:վ:һ")) {
		case 1:
			mes "[]";
			mes "ơƵĻΪ׼";
			mes "Ժ";
			next;
			mes "(ϰӾ޴ľͰ";
			mes "ƯɫĹ";
			mes "˿ơ)";
			next;
			mes "[]";
			mes "Ƶ'㷢 ơ' ";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "˵'㷢 ơ'...";
			mes "(ɫҺڲ˸)";
			next;
			percentheal 5,-5;
			mes "["+strcharinfo(0)+"]";
			mes "~";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "...";
			mes "ϰ尡 ĺܺúȰ";
			next;
			mes "[]";
			mes "ˣ";
			mes "..";
			mes "ΪƵİ...";
			close;
		case 2:
			mes "[]";
			mes "...";
			mes "ܱǸˣ";
			mes "Ŀǰβֻʣ";
			mes "ڳڷķˣ";
			mes "һʱ";
			mes "һΪ׼õ";
			close;
		case 3:
			mes "[]";
			mes "..?";
			mes "'վ'...";
			mes "ܱǸˣ";
			mes "ǲľ";
			close;
		case 4:
			mes "[]";
			mes "ô֮ٽҰ";
			close;
		}
	case 1:
		mes "[]";
		mes "ӭ٣";
		mes "ҪЩʲô?";
		next;
		switch(select("ơ:β:վ:ʲô?:һ")) {
		case 1:
			mes "[]";
			mes "ơƵĻΪ׼";
			mes "Ժ";
			next;
			mes "(ϰӾ޴ľͰ";
			mes "ƯɫĹ";
			mes "˿ơ)";
			next;
			mes "[]";
			mes "Ƶ'㷢 ơ' ";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "˵'㷢 ơ'...";
			mes "(ɫҺڲ˸)";
			next;
			percentheal 5,-5;
			mes "["+strcharinfo(0)+"]";
			mes "~";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "...";
			mes "ϰ尡 ĺܺúȰ";
			next;
			mes "[]";
			mes "ˣ";
			mes "..";
			mes "ΪƵİ...";
			close;
		case 2:
			mes "[]";
			mes "...";
			mes "ܱǸˣ";
			mes "Ŀǰβֻʣ";
			mes "ڳڷķˣ";
			mes "һʱ";
			mes "һΪ׼õ";
			close;
		case 3:
			mes "[]";
			mes "..?";
			mes "'վ'...";
			mes "ܱǸˣ";
			mes "ǲľ";
			close;
		case 4:
			mes "[]";
			mes "...... ֮ǰ˵ﰡֻ...ԱܵˣҪ͵ƷҪƷ еڻ";
			next;
			mes "[]";
			mes "........... ҪƷڹ ͹ģԲûʲô󰭣Ҫ '  ѧԺ' ЩƷ...";
			next;
			mes "[]";
			mes "....";
			next;
			switch(select("ԭ:ҿ԰?")) {
			case 1:
				mes "[]";
				mes "Ӵ Ӵ...";
				mes "ҺԿ˵ЩûõĻأ";
				mes "ǳǸ..";
				mes "ǵ......";
				close;
			case 2:
				mes "[]";
				mes "? ........... е㷳.. ԰?";
				next;
				switch(select("Ȼ:ȵ..һ")) {
				case 1:
					mes "[]";
					mes "? ĸл㰡!! Ҳûʲôñѽ..";
					next;
					mes "[]";
					mes ".. ôҾͰҪʹƷռ˵ָ";
					next;
					mes "[]";
					mes "Ҫ͵Ʒ'^0000ffõľ^000000'Ҫʹĵطǣ'  ѧԺ' '^ff0000 ̫̫'^000000";
					next;
					mes "[]";
					mes "ôͰ";
					getitem 7487,1; //Ƶľ
					set KielHyreQuest,2;
					close;
				case 2:
					mes "[]";
					mes "..........";
					mes " ˽...";
					close;
				}
			}
		case 5:
			mes "[]";
			mes "ô֮ٽҰ";
			close;
		}
	case 2:
	case 3:
	case 4:
	case 5:
		mes "[]";
		mes "ѾٵϿȥɣ";
		mes "'^ff0000 ̫̫^000000'е޵ģ";
		mes "ٵĻ군";
		close;
	case 6:
		if (!countitem(7487)) {
			mes "[]";
			mes " Ѿȥˣлл ȻǸС͵ǳ";
			next;
			select(".. Ҫõľư..");
			mes "[]";
			mes " ԭ㻹ҪưԺ";
			next;
			mes ".. ۶... ...";
			next;
			mes "[]";
			mes "..͵ҵĳˣ°";
			getitem 7487,1; //Ƶľ
			set zeny,zeny+1000;
			close;
		}
	default:
		mes "[]";
		mes "һлл";
		mes "...";
		close;
	}
//OnTouch2:
OnTouch:
	if (KielHyreQuest < 1) {
		mes "[]";
		mes "Ӵ...";
		mes "...";
		mes "ô찡...";
		set KielHyreQuest,1;
		close;
	} 
}

//----------------------------------------------------------------------------
// ŵ˾С
//----------------------------------------------------------------------------
yuno,217,114,6	script	ɰС#kh	96,{
	if (KielHyreQuest < 6) {
		mes "[˼]"; 
		mes "˾~ ˾~";
		mes "տ ~";
		close;
	}
	else if (KielHyreQuest == 6) {
		if (KHToastGirlEnd < 1) {
			mes "[˼]"; 
			mes "ӭ~ Ҫ˾?";
			next;
			switch(select("֮ܰж:û")) {
			case 1:
				mes "[˼]"; 
				mes "... ˵^ff0000^000000ίа?";
				next;
				mes "[˼]"; 
				mes ".. ֪ʲôˣǲְʵϰĲ ɲ? ^ff0000^000000 ûа취";
				next;
				mes "[˼]"; 
				mes "˽! ^ff0000^000000ĻҵȻҪĆ! ҵͻ..";
				next;
				mes "[˼]"; 
				mes ".. ... ܿϧǵĲҲùˣĿǰĲҲʹõĹϵ.. ԵĻ㵽ϣշ׳";
				mes "æһ²Ϻ?";
				next;
				mes "[˼]"; 
				mes "ֻҪ˵Ǵŵ˾̵ĻǻۺͼģֻҪЩĻһѶһݷָ";
				set KHToastGirlEnd,1;
				close;
			case 2:
				mes "[˼]";
				mes "һʹ~";
				close;
			}
		}
		else if (KHToastGirlEnd == 1) {
			mes "[˼]";
			mes "㵽ϣշ׳";
			mes "ۺͼɣ";
			mes "˵Ǵŵ˾̵Ļ";
			mes "ǻ";
			close;
		}
		else if (KHToastGirlEnd == 2) {
			mes "[˼]";
			mes " ˣˣ ԼҪ ۺͼ";
			mes "^ff0000^000000ʺһ";
			delitem 7488,1; //ͻõ
			getitem 7488,1; //ͻõ
			set KHToastGirlEnd,3;
			close;
		}
	}
	else if ((KielHyreQuest >= 6) || (KHToastGirlEnd == 3)) {
		//KHToastGirlEnd no longer needed-- deleting.
		set KHToastGirlEnd,0;
		mes "[˼]";
		mes "ճ¯ ˾~";
		close;
	}
}

//----------------------------------------------------------------------------
// ϣշ׳ 
//----------------------------------------------------------------------------
lighthalzen,366,299,4	script	շ׳ #kh	46,{
	if (checkweight(7488,1) == 0) {
		mes "[˼]";
		mes "ͣһ !!";
		mes "ЯƷ̫ˣԲܻƷϵƷ֮ս";
		close;
	}
	if (KHToastGirlEnd < 1) {
		mes "[˼]";
		mes "ʲô";
		mes "еæ һ";
		close;
	}
	else if (KHToastGirlEnd == 1) {
		mes "[˼]";
		mes "ʲô";
		mes "еæ һ";
		next;
		switch(select("Ǵŵ˾̵Ǳ߹:...")) {
		case 1:
			mes "[˼]";
			mes "... Ǵ˾̵Ǳ߹İһ";
			next;
			mes "[˼]";
			mes "... ҰǶ...  ";
			next;
			mes "[˼]";
			mes " £ģúõЯ";
			getitem 7488,1; //ͻõ
			set KHToastGirlEnd,2;
			close;
		case 2:
			mes "[˼]";
			mes "һ ˾~";
			mes "Ͽȥ?";
			mes "氡~!!";
			mes "ټͲ㷹";
			close;
		}
	}
	else if (KHToastGirlEnd >= 2) {
		mes "[˼]";
		mes "Ӵ...һܼӣ";
		mes "ÿȥ㶼ȥ";
		mes "ֻҪ..";
		close;
	}
}

lighthalzen,366,289,2	script	շ׳ 	97,{
	switch (KHToastGirlEnd) {
	case 0:
		mes "[˾]";
		mes "...";
		mes "Ҳûʲôæ";
		mes "ÿװһæ..";
		mes "..";
		close;
	case 1:
		mes "[˾]";
		mes "~";
		mes "û氡~!.";
		mes "㿴 ڹѽ... ";
		mes "..";
		close;
	case 2:
	case 3:
		mes "[˾]";
		mes "~";
		mes "ŵ˾̵갡?";
		mes "˼ȽƯ..";
		mes "...";
		close;
	}
}

//============================================================================
//  ѧԺ NPC
//============================================================================

//----------------------------------------------------------------------------
// Ů (йѧԺ..)
//----------------------------------------------------------------------------
yuno_fild08,196,196,5	script	Ů#kh1	102,{
	mes "[Ů]";
	mes "...Ҳܽ'^0000FF  ѧԺ^000000'Ļ";
	mes "ж... ";
	mes "Ϊʲôûа ";
	mes "¶...ǵ..";
	next;
	select("  ѧԺ?");
	mes "[Ů]";
	mes "...ǣ";
	mes "ֻݹ¶ĵط";
	mes "ѧԺ ";
	mes "'^ff0000 ^000000'";
	mes "˵ǰֵܶĻе";
	mes "Ҳ׬˲Ǯ";
	next;
	mes "[Ů]";
	mes "˵ԻĶ?";
	mes "Ϊ˹¶ǴѧԺ";
	mes "ѧԺ";
	next;
	mes "[Ů]";
	mes "˵ֻҪѧԺҵĻ";
	mes "ıְܺõĹ..";
	mes ".. ҲѧԺ";
	close;
}

//----------------------------------------------------------------------------
// ѧԺ
//----------------------------------------------------------------------------
yuno_fild08,158,194,6	script	#1::KHAGuard	852,{
	if ((KielHyreQuest < 2) || (KielHyreQuest > 31)) { 
		mes "[]";
		mes "'^FF0000  ѧԺ^000000'";
		mes "һ˽ģ";
		mes "ûʲôر飬";
		mes "ûԼõĻǲܽ";
		close;
	}
	else if (KielHyreQuest == 2) { 
		mes "[]";
		mes "'^FF0000  ѧԺ^000000'";
		mes "һ˽ģ";
		mes "ûʲôر飬";
		mes "ûԼõĻǲܽ";
		next;
		switch(select("ĻѾ:......")) {
		case 1:
			mes "[]";
			mes "ͻ?ջ Ʒ";
			next;
			input .@KHDelivery$;
			if (.@KHDelivery$ != "") {
				mes "[]";
				mes "λ"+.@KHDelivery$+"";
				mes "ȷʵѧԺ棬";
				mes "Ū˰";
				close;
			}
			input .@KHDelivery$ ;
			if (.@KHDelivery$ != "") {
				mes "[]";
				mes "͸^ff0000 ̫̫^000000^3355FF"+.@KHDelivery$+"?";
				mes "ȷһ^000000";
				next;
				mes " ";
				mes "ĳװ";
				next;
				mes "[]";
				mes "ţ";
				mes "^ff0000 ̫̫^000000İ";
				mes "ȷһº?";
				mes "͵Ʒ^3355FF"+.@KHDelivery$+"^000000";
				next;
				mes "[]";
				mes "...........";
				mes ".. ˽";
				next;
				mes "[]";
				mes "ȷϵĽ^ff0000 ̫̫^000000";
				mes "ȷʵж";
				mes "˵ûж";
				mes "һĻƷ";
				next;
				mes "[]";
				mes "ȷһκ";
				close;
			}
			mes "[]";
			mes "͸^ff0000 ̫̫^000000^3355FF?";
			mes "ȷһ^000000";
			next;
			mes " ";
			mes "ĳװ";
			next;
			mes "[]";
			mes "ţ";
			mes "^ff0000 ̫̫^000000İ";
			mes "ȷһº?";
			mes "͵Ʒ^3355FF^000000";
			next;
			mes "[]";
			mes "...........";
			mes ".. ˽";
			next;
			mes "[]";
			mes "Ҫȷһ£";
			mes "'͸'^ff0000 ̫̫^000000'";
			mes "'^3355FFõľ^000000' ?";
			next;
			select("");
			mes "[]";
			mes "Ѿȷˣ";
			mes "˵ǩգ";
			mes "Խȥ";
			close2;
			warp "kh_school",71,155;
			end;
		case 2:
			mes "[]";
			mes "ûĻ ȥ";
			close;
		}
	}
	else if (KielHyreQuest < 32) { 
		mes "[]";
		mes "㻹ʲô?";
		close2;
		warp "kh_school",71,155;
		end;
	}
}

yuno_fild08,158,183,7	duplicate(KHAGuard)	#2	852

//----------------------------------------------------------------------------
// ۰ԵŮѧ
//----------------------------------------------------------------------------
kh_school,57,142,6	script	ѧ#kha	893,3,3,{
	mes "[ϣ]";
	mes "Ӵ...";
	mes "˭?";
	mes "ǽֹ˽İ..";
	close;

OnTouch:
	mes "[ϣ]";
	mes "ģ~";
	mes "Ǹ?";
	next;
	mes "[]";
	mes "?";
	mes "һִ?";
	next;
	mes "[ϣ]";
	mes " ..";
	next;
	mes "[]";
	mes "...ʲ..ʲô.. 鰡...";
	mes "...";
	next;
	mes "[ϣ]";
	mes "İڰ 'ϲ'֪?";
	mes "ǴǰͲӰ";
	mes "ΪĹϵ";
	next;
	mes "[]";
	mes "?";
	mes "ÿ°....";
	mes "¾ͲҪ̸...";
	close;
}

kh_school,57,139,0	script	ѧ#khb	893,{
	mes "[]";
	mes "...";
	mes "Ŷ.....";
	mes "Ҳ˵...";
	mes "...";
	emotion e_swt2;
	close;
}

//----------------------------------------------------------------------------
// ̫̫
//----------------------------------------------------------------------------
kh_school,176,60,4	script	̫̫#kh	101,{
	if (KielHyreQuest < 2) {
		mes "[]";
		mes "ǽֹ˽ģ";
		mes "벻ҪĶ";
		close;
	}
	else if (KielHyreQuest == 2) { 
		mes "[]";
		mes "ʲô?";
		next;
		switch(select("ͻ:ûʲô")) {
		case 1:
			mes "[]";
			mes "ԭԤڵһЩһΪĸһЩأһһ";
			mes "һεĻҾͻȥ";
			next;
			mes "[]";
			mes "...";
			next;
			mes "[?????]";
			mes "..~!!!";
			next;
			mes "~!! ~!";
			next;
			mes "........... ....... ...";
			next;
			mes "[]";
			mes "Ӵ'^ff0000^000000'ִ.. 㵽ҪʲôʱŲ񾭴أΪֹûɵĻһѧھͰ㵱 ֪?";
			next;
			mes "[]";
			mes "...... ......";
			next;
			mes "[]";
			mes "^FF0000^000000!!";
			next;
			mes "[]";
			mes "..... ǵ...֪ˣʦ...";
			next;
			mes "[]";
			mes "ߺ... ôƷţȥɣûҪﶺ";
			delitem 7487,1; //Ƶľ
			set KielHyreQuest,4;
			close;
		case 2:
			mes "[]";
			mes "ǽֹ˽ģ";
			mes "벻ҪĶ";
			close;
		}
	}
	else if (KielHyreQuest == 4) {
		mes "[]";
		mes "˵Ļ ";
		mes "Ͽȥɣ";
		mes "ЩС..ʵ...";
		mes "......";
		close;
	}
}

//----------------------------------------------------------------------------
//  (ѧԺ)
//----------------------------------------------------------------------------
kh_school,179,39,0	script	ƿɰ ѧ#kh	895,{
	if (checkweight(908,200) == 0) {
		mes "[]";
		mes "ͣһ !!";
		mes "ЯƷ̫ˣԲܻƷϵƷ֮ս";
		close;
	}
	cutin "kh_elly01",2;
	if (KielHyreQuest < 4) { 
		cutin "kh_elly03",2;
		mes "[]";
		mes "~! ~!";
		mes "....";
		mes "ֲһŪ..";
		mes "ҪСİ...";
	}
	else if (KielHyreQuest == 4) { 
		cutin "kh_elly03",2;
		mes "[]";
		mes "ذ.... ô찡~ ô찡~ ǰ.....";
		next;
		switch(select("ʲô?:......")) {
		case 1:
			mes "[]";
			mes "? ...Ϊ.... ҪģСİѲϵڵ.....ǰ.. Ҫڽ֮ǰſԵ~";
			next;
			switch(select("ҿ԰?:Ӵ.. ")) {
			case 1:
				cutin "kh_elly02",2;
				mes "[]";
				mes "~";
				mes "..?";
				mes "~!!";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "? ... ..";
				mes ".. ";
				next;
				mes "[]";
				mes "٣...";
				mes "лл~лл~";
				mes "ٺ";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "....";
				mes "Ǿ.. Ҫô?";
				next;
				mes "[]";
				mes ".....";
				mes "ʵ˵....";
				mes "ղŲСİĲ";
				mes "ȫٲʹ.....";
				mes "ҪȥҲϲſԵ..";
				next;
				break;
			Case 2:
				mes "[]";
				mes "ǰ~ ô찡~ ô.... .... ~";
				next;
				select("????");
				mes "[]";
				mes "...~ ͻ.. Һ~ ???";
				next;
				mes "ŮͻȻץֱۿʼ";
				next;
				switch(select("һ:Ҿܾ")) {
				case 1:
					cutin "kh_elly02",2;
					mes "[]";
					mes "~";
					mes "..?";
					mes "~!!";
					next;
					mes "["+strcharinfo(0)+"]";
					mes "? ... ..";
					mes "..";
					next;
					mes "[]";
					mes "٣...";
					mes "лл~лл~";
					mes "ٺ";
					next;
					mes "["+strcharinfo(0)+"]";
					mes "....";
					mes "Ҫô?";
					next;
					break;
				case 2:
					mes "["+strcharinfo(0)+"]";
					mes "Բ";
					mes "еæ...";
					next;
					cutin "kh_elly04",2;
					mes "[]";
					mes "ذ...";
					mes "~";
					mes "ŵǱǸ..";
					mes "ذ...";
					emotion e_sob;
					close2;
					cutin "",255;
					end;
				}
			}
			cutin "kh_elly01",2;
			mes "[]";
			mes "ղŻٵĲһǰ....";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Ҫֻſް.. ˵ֻҪҵµĽϾͺ?";
			cutin "kh_elly04",2;
			mes "[]";
			mes "ǵ.... .... ǺܱǸ.. Գμ˾ί..";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "ûϵ ϿҲϰɣϿĻλʵ̫̫ 㵱";
			next;
			mes "[]";
			cutin "kh_elly01",2;
			mes "! .. ǵ! ^FF0000 1 1ʿ 2 1ţ 7ɿ 5 ^000000";
			next;
			mes "["+strcharinfo(0)+"]";
			mes ".... .. ȷʵǶһ..";
			next;
			mes "[]";
			mes "~~~~~ ܱǸ~ ܱǸ~~~ ǰ~~";
			next;
			mes "["+strcharinfo(0)+"]";
			mes ".. ǰ ǰ ûйϵֻ.. һЩµĲϰ֪Щܴѽ?";
			next;
			mes "[]";
			mes "'^0000FF^000000' '^0000FF^000000'Ǵ ^008000ŵ^000000 '^0000FF˾̫̫^000000' ίеĻ  '^0000FF^000000'Ǵ ^008000ŵ^000000 '^FF0000Ƶ^000000'";
			mes "'^0000FFɿ^000000'Ǵ '^FF0000^000000' ϿԻ";
			next;
			mes "[]";
			mes "ܱǸ֪ҺܲӦ.. ǰ!";
			set KielHyreQuest,6;
			break;
		case 2:
			mes "[]";
			mes "ذ...";
			break;
		}
	}
	else if (KielHyreQuest == 6) {
		if ((countitem(519) < 7) || (countitem(548) < 2) || (countitem(7182) < 5) || (countitem(7487) < 1) || (countitem(7488) < 1)) {
			cutin "kh_elly01",2;
			mes "[]";
			mes "'^0000FF^000000' '^0000FF^000000'Ǵ ^008000ŵ^000000 '^0000FF˾̫̫^000000' ίеĻ  '^0000FF^000000'Ǵ ^008000ŵ^000000 '^FF0000Ƶ^000000'";
			mes "'^0000FFɿ^000000'Ǵ '^FF0000^000000' ϿԻ";
		}
		else {
			cutin "kh_elly02",2;
			mes "[]";
			mes "~ 㶼Ѽˣ... лл! ٺ";
			next;
			mes "[]";
			mes "ٺ.. ôԺһ~ ³ ~";
			delitem 519,7; //ţ
			delitem 548,2; //ʿ
			delitem 7182,5; //ɿ
			delitem 7487,1; //Ƶľ
			delitem 7488,1; //ͻõ
			set KielHyreQuest,8;
			set KHPubMasterEnd,0;
			emotion e_ho;
		}
	}
	else if (KielHyreQuest == 8) {
		mes "[]";
		mes "~  Ƶİ Ѿ~ ..";
		next;
		mes "[]";
		mes " Ǹл֮Ⱑ.. лл.....!";
		next;
		mes "[]";
		mes "Ӵ һ֪մҽ ^FF0000^000000ɯ ҵǳ.. ..";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "ҽ ^3355FF"+strcharinfo(0)+"^000000";
		next;
		cutin "kh_elly02",2;
		mes "[]";
		mes "...  ^3355FF"+strcharinfo(0)+"^000000/С㰡...";
		getitem 538,5; //
		set KielHyreQuest,10;
	}
	else if (KielHyreQuest == 10) {
		mes "[]";
		mes "........ һһ ٰ?";
		next;
		switch(select("ʲô?:Բ еæ..")) {
		case 1:
			mes "[]";
			mes "... Ҳ˵... ˵һλǳҪүү ڰ";
			next;
			mes "[]";
			mes "Ϊ"+strcharinfo(0)+" /Сİýĺܺѽ! ֮ǰǿĽ.. ٺ.. ........";
			next;
			mes "[]";
			mes ".. .. ... ͸үү Щ! үүܿЩĻ һܸ˵İ";
			next;
			mes "[]";
			mes "ԵĻ ͸ΪҲ뿪ѧԺĹϵʱ˽Ҳ óԵ..";
			next;
			mes "[]";
			mes "....... ......... ...........";
			next;
			switch(select("ðɣ͸:еæ")) {
			case 1:
				cutin "kh_elly02",2;
				mes "[]";
				mes "~ лл! "+strcharinfo(0)+" /С ĺа... ٺ..";
				next;
				mes "[]";
				mes "үүĿǰ'^FF0000үүĿǰ^000000'ﰡ˵Ļ";
				set KielHyreQuest,12;
				break;
			case 2:
				cutin "kh_elly03",2;
				mes "[]";
				mes "...";
				mes "Ǿûа취..";
				mes "......";
				break;
			}
			break;
		case 2:
			cutin "kh_elly03",2;
			mes "[]";
			mes "!";
			mes ".. Ǿûа취..";
			mes "...";
			break;
		}
	}
	else if (KielHyreQuest == 12) {
		mes "[]";
		mes "'^FF0000  ^000000' '^FF0000ѧԺ^000000'";
	}
	else if (KielHyreQuest == 14) {
		cutin "kh_elly03",2;
		mes "[]";
		mes "... үүڳ? ......";
		next;
		mes "[]";
		mes "ѽ... û˵Ҫȥѽ.. ˵ ﰡ..";
		next;
		cutin "kh_elly04",2;
		mes "[]";
		mes ".. ȥһ? ! һҸ㣬үүҵıԿװɣ";
		mes "^FF0000Կ^000000ĻͿԽ뵽";
		getitem 7489,1; //Villa_Spare_Key
		set KielHyreQuest,16;
	}
	else if ((KielHyreQuest >= 14) && (KielHyreQuest < 20)) {
		mes "[]";
		mes "ְ...";
		mes "˵İ...";
		mes "..";
	}
	else if (KielHyreQuest == 20) {
		mes "[]";
		mes "? ..... .....";
		next;
		mes "ܷŷ֮󣬿ʼĶż";
		next;
		mes "--";
		mes "ҺͶҪ";
		mes "ҪصϼҼ";
		mes "Դһһ֮ ";
		mes "û絽ҵĻ";
		mes "ЯƷ";
		mes "ٵ뿪ѧԺɣ";
		mes "ǲڱ鷿";
		mes "ͬѧҪĻ";
		mes "λͬѧȥ";
		mes "ҳҵټҾȳɣ";
		mes "Ҳһ׮ΣյҲһ..";
		mes "ֻҪѵĻ";
		mes "ֵ..";
		mes "ֻѧԺѧԱ";
		mes "ǲģ";
		mes "Ҳǿܸ";
		mes "йϵҲһ";
		mes "ҪСİ";
		mes "                 үү ..";
		next;
		cutin "kh_elly03",2;
		mes "[]";
		mes "Դүү... ŵһ쿪ʼѾʮ찡... ѵүү? Ҫô? ..";
		delitem 7490,1; //Letter_to_Elly
		set KielHyreQuest,22;
	}
	else if (KielHyreQuest == 22) {
		cutin "kh_elly03",2;
		mes "[]";
		mes ".........";
		next;
		switch(select("ѯйүү:ѯйض:ѯйѧԺ")) {
		case 1:
			mes "["+strcharinfo(0)+"]";
			mes "һλүү";
			mes "ʲô˰?";
			mes "һܸӵ";
			next;
			mes "[]";
			mes "˵үүָ  ";
			mes "ŵĻ᳤ '^FF0000 ^000000' ";
			mes "᳤";
			next;
			mes "[]";
			mes "ǶҴСǹ¶ң";
			mes "ǳ۰ң";
			mes "үүһ˰";
			mes "ȻȽ࣬";
			mes "ȷǱκ˶ů";
			next;
			mes "[]";
			mes ".. үү.. 㻹ƽ..";
			break;
		case 2:
			mes "["+strcharinfo(0)+"]";
			mes "дүүĶӣ";
			mes "'^0000FF^000000'ʲô?";
			mes "ӺүүĹϵ̫";
			next;
			mes "[]";
			mes "'^0000FF^000000'ʵ˵Ҳ̫";
			mes "ѧԺھٰʱ";
			mes "ֻżһ";
			next;
			mes "[]";
			mes "ǲᱻǵģ";
			mes "ű÷ǳµ";
			mes "ѧ";
			next;
			mes "[]";
			mes "ȻƯ";
			mes "ͰƤһλƯˣ";
			mes "ΪҲ΢һˣ";
			mes "ѧ '^0000FF^000000'С";
			mes "Ҳ";
			next;
			mes "[]";
			mes "үү '^0000FF^000000'";
			mes "˴֮ĸǲ̫õ";
			next;
			mes "[]";
			mes "ֻҪүүǰᵽ'^0000FF^000000'Ļ";
			mes "ͻᷢƢģ";
			mes "ǺΪҵ鳣";
			next;
			mes "[]";
			mes "Ϊʲô?";
			mes "ôƯĶӺ";
			mes "ĸװ..";
			break;
		case 3:
			mes "["+strcharinfo(0)+"]";
			mes "ѧԺʲôĵط? ˵ѧԺҲĺܳף豸ҲѧԺ ߼";
			next;
			mes "[]";
			mes "   ģΪ˹¶רѧԺְҵõӦеרŽ";
			next;
			mes "[]";
			mes "ҵ־Ը˾    ܹ˾ְ'^0000FFϣ^000000'СһһλƯС ҵԸ! ٺ..";
			next;
			mes "[]";
			mes ".... .. ѧУ зһЩֵ飬ΪǶ һ˻..";
			next;
			cutin "kh_elly02",2;
			mes "[]";
			mes "ǻ! ΣյĻ '"+strcharinfo(0)+"'/Сҵģٺ..";
			next;
			switch(select("^0000FFϣ^000000С?:ֵ?")) {
			case 1:
				mes "[]";
				mes "Ϊүү";
				mes "ְˣ";
				mes "ֵүүŮˣ";
				mes "һλǳƯĺ";
				break;
			case 2:
				cutin "kh_elly04",2;
				mes "[]";
				mes "һɵĻ.. 'Ϊ"+strcharinfo(0)+"'/СֵˣԾ͸";
				next;
				mes "[]";
				mes "ѧУ û鰡!!";
				next;
				mes "[]";
				mes "ÿѧԺߣֻҪ ʱɼӲΰ";
				next;
				mes "[]";
				mes "ʹͬһ''ܵĵȺʯˣĿǰҽ..";
				mes "ʦ֪״£͵͵Ľҽȥ..";
				next;
				mes "[]";
				mes "ڴϣûһ˵ҲûκεĻӦ... ƺ κҮ";
				next;
				mes "[]";
				mes "˲Ҹеǳĺ£ʹҽѳ..";
				next;
				mes "[]";
				mes "ѵһҲǸĻҲһıʯ? ôʱ.. '" + strcharinfo(0) + "'/С Ҳϲ?";
				next;
				cutin "kh_elly02",2;
				mes "[]";
				mes ".. Ӧò! ҼʯĻ'" + strcharinfo(0) + "'/Сҵ! ";
				next;
				mes "[]";
				mes "ʯʱ'"+ strcharinfo(0) +"'/С ˵'^FF0000Ҫ˯ ˰^000000'ĻҾͿ𴲻ˣ˵Ҳ̫Ầ鰡..";
				set KielHyreQuest,24;
				break;
			}
		}
	}
	else if (KielHyreQuest >= 24 && KielHyreQuest <= 26) {
		cutin "kh_elly04",2;
		mes "[]";
		mes ".. 군! ҪҵʱҪٵ!! Ҫȥ  ̫̫";
		next;		
		mes "[]";
		mes ".. .. ĻԵȥ^FF0000үүƷ^000000 ?  ֻ'"+strcharinfo(0)+"'/С㰡...";
		next;
		mes "[]";
		mes "!! Ҫҵ? 㵽֪֪.. Ǽ?!!";
		next;
		mes "[]";
		mes "! ǰʱټ! 㵽᷿";
		next;
		mes "[]";
		mes "ѧԺ ýһҵķ 2¥ ұߵķ䣬ɣһѴ򿪵";
		set KielHyreQuest,26;
	}
	else {
		mes "[]";
		mes "뿪ɣ";
		mes "ʦϹ";
	}
	close2;
	cutin "",255;
	end;
}

//----------------------------------------------------------------------------
// Ĵ
//----------------------------------------------------------------------------
yuno_fild08,69,185,0	script	#kh	111,{
	if (KielHyreQuest < 29) {
		mes "ĳһ˵ķ䣬";
		mes "һλŮӵķ䣬";
		mes "ӴԿɰƵĴ";
		close;
	}
	else if (KielHyreQuest== 29) {
		mes "ǰ˵İķ..";
		mes "ӣ";
		mes "Ӻûлѽ";
		close;
	}
	else if ((KielHyreQuest >= 30) && (KielHyreQuest <= 45)) {
		mes "ǰķ䣬ǿӰ? ΢һ죬а취ȥ..";
		next;
		mes "...ǿˮ ....";
		next;
		switch(select("ˮ:Ѱ")) {
		case 1:
			if (rand(1,3) == 2) {
				mes "ˮܽ뵽˰ķ";
				close2;
				warp "kh_school",185,185;
				end;
			}
			else {
				mes "ˮȥֻ֮";
				percentheal -10,0;
				close;
			}
		case 2:
			mes "Ѱұķ";
			close;

		}
	}
	else {
		mes "ûлóֵ鱨";
		mes "ٻص";
		close;
	}
}

//----------------------------------------------------------------------------
//  ()
//----------------------------------------------------------------------------
kh_school,177,180,4	script	Elly	895,{
	if (checkweight(908,200) == 0) {
		mes "ͣһ !!";
		mes "ЯƷ̫ˣԲܻƷϵƷ֮ս";
		close;
	}
	if (KielHyreQuest < 30) {
		mes "[]";
		mes "˭!";
		mes "뿪";
		close2;
		percentheal -99,0;
		warp "yuno_fild08",100,100;
		end;
	}
	else if (KielHyreQuest < 32) {
		mes "[]";
		mes "............";
		next;
		mes "[]";
		mes "............";
		close;
	}
	else if (KielHyreQuest == 32) {
		mes "[]";
		mes "............";
		next;
		mes "ѵ.. ʯ.. Ҫô..";
		next;
		switch(select("Ŵһ°:Ŵһ°:")) {
		case 1:
			mes "ʰ֣һ°ֱ";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "? ?";
			next;
			mes "ûκηӦ.. ôһ°..";
			close;
		case 2:
			input .@KHInput$;
			if (.@KHInput$ == "˯˰") {
				mes "[]";
				mes ".............";
				next;
				mes "˲䰮սȭͷɿˣ^3355FFСĻƽԿ^000000 ^3355FFť^000000 ...? ʲôѽ?";
				getitem 7493,1; //Golden_Key
				getitem 7494,1; //Kiel_Button
				set KielHyreQuest,34;
				close;
			}
			else {
				mes "[]";
				mes "..........";
				next;
				mes "ûκηӦ";
				close;
			}
		case 3:
			mes "[]";
			mes "..........";
			next;
			mes "ûκηӦ";
			close;
		}
	}
	else if (KielHyreQuest == 34) {
		if (countitem(7491) < 1) {
			mes "^3355FFӰϵõ^FF0000ƽԿ^000000ӦÿԿ^0000FFɫ^000000Ƶ^000000";
			close;
		}
		else {
			mes "^3355FFӰϵõ^FF0000ƽԿ^000000ӦÿԿ^0000FFɫ^000000Ƶ^000000";
			next;
			mes "^ff0000ƽԿ^000000^0000FF^000000 ڿ^0000FF^000000淢^00CC52ֽ^000000 ^0000FFɫԿ׿^000000";
			next;
			mes "˽ɣ ..";
			mes "Լǵңĸ!";
			mes "㷢ʱҿѾΣ֮У";
			mes "ֻܿӵĻ";
			mes "ҾͰˣҾͰҵиˣ";
			mes "Σ㿴˵Ļ Ҳ֪";
			mes "Ѿˣ";
			mes "ϸĻ֪ˣ";
			mes "^0000FFԱߵĹظ^000000";
			mes "ִ ";
			mes "ȥڹܷ^0000FFϣ^000000ɣ";
			mes "Ů˵ıϵͳҵ֣";
			mes "ŮĻҵ";
			getitem 7495,1; //Blue_Key_Card
			delitem 7491,1; //Iron_Box
			set KielHyreQuest,36;
			close;
		}
	}
	else if (KielHyreQuest >= 36) {
		mes "ֽд";
		next;
		mes "˽ɣ ..";
		mes "Լǵңĸ!";
		mes "㷢ʱҿѾΣ֮У";
		mes "ֻܿӵĻ";
		mes "ҾͰˣҾͰҵиˣ";
		mes "Σ㿴˵Ļ Ҳ֪";
		mes "Ѿˣ";
		mes "ϸĻ֪ˣ";
		mes "^0000FFԱߵĹظ^000000";
		mes "ִ ";
		mes "ȥڹܷ^0000FFϣ^000000ɣ";
		mes "Ů˵ıϵͳҵ֣";
		mes "ŮĻҵ";
		close;
	}
}

//----------------------------------------------------------------------------
// 
//----------------------------------------------------------------------------
kh_school,175,176,0	script	#kh	111,{
	if (KielHyreQuest < 30) {
		mes "^3355FFIt's a cookie";
		mes "basket filled with";
		mes "delicious cookies.^000000";
		close;
	}
	else if (KielHyreQuest == 30) {
		mes "ǰĽװķ϶ ˰ɫ壬һ齪 ^FF0000ֽ^000000";
		next;
		switch(select("Ķ:")) {
		case 1:
			mes "źɫ·";
			mes "ֵıţ";
			mes "ֻҪǸ";
			mes "һʯ!";
			mes "ÿ°..";
			mes "͵͵Ļص";
			mes "дֽ";
			mes "ҰѴˣ";
			mes "..";
			mes "֪ܷ񿴵Щ?";
			mes "ѵҲһͣ?";
			mes "Ҫ!";
			mes "Ҳ..";
			mes "Ǹŵ..";
			mes " '"+strcharinfo(0)+"/С!!";
			set KielHyreQuest,32;
			close;
		case 2:
			mes ".........";
			close;
		}
	}
	else if (KielHyreQuest < 108) {
		mes "аڷȴĽ";
		close;
	}
	else if (KielHyreQuest == 108) {
		mes "ʱŽʱ";
		mes "ӿĴﴵķ";
		mes "ѽ΢һ£";
		mes "濴˻ûбֵ";
		mes "^FF0000ż^000000";
		mes "Ҳ.. д^FF0000ż^000000";
		next;
		mes "д"+strcharinfo(0)+"..";
		mes "ҰȻһλ񾭴ٳÿαʦˣ";
		mes "ȷʵѽĺζѵñʦأ";
		mes "ⶼ"+strcharinfo(0)+"/СæĹϵлл!";
		mes ""+strcharinfo(0)+"/СĻϻ˰.. 뷨";
		mes "ֻ˵ʦǶΪ˰òŻ.. еɢ";
		mes strcharinfo(0)+"/СǺ˰.. ϲϸչˣ";
		mes "ȻһܼүүܼүүĻ "+strcharinfo(0)+"/Сܸүүʶ";
		mes "үү"+strcharinfo(0)+"/СĻҲƽ΢Цģ";
		mes strcharinfo(0)+"/С㣬һεĸл㣬";
		mes "ϣԶڰߣΪҪ˰ɣ";
		mes "ҲŬΪܴ"+strcharinfo(0)+"/Сһ΢Ц!";
		mes " ";
		mes "";
		next;
		mes "ӱĽ";
		mes "ǿԸо";
		mes "Ϣ..";
		mes "һ齪";
		mes "ҧһڣ";
		mes "΢еɬ";
		mes "ɿζɢ";
		set KielHyreQuest,109;
		next;
		input .@input$;
		mes "["+strcharinfo(0)+"]";
		mes ""+.@input$+"";
		mes "ȥû";
		close2;
		warp "yuno_fild08",69,183;
		end;
	}
	else {
		mes "ʱʧװŻĽ";
		close;
	}
	end;
}

//----------------------------------------------------------------------------
// Elly's Window (In Dormitory)
//----------------------------------------------------------------------------
kh_school,188,185,0	script	#kh2	111,{
	warp "yuno_fild08",69,183;
	end;
}

//----------------------------------------------------------------------------
// Grave/Kiel Hyre dungeon entry
//----------------------------------------------------------------------------
yuno_fild08,71,170,0	script	Ĺ#kh	111,{
	if (KielHyreQuest < 36) {
		mes "ĳһ˵ķĹ";
		close;
	}
	else if (KielHyreQuest == 36) {
		if (countitem(7492) < 1) {
			mes "Ĺܱʱص";
			next;
			mes "ϸĹ۲󣬷˿ԷĳֶС϶ְ";
			close;
		}
		else {
			mes "Ĺܱʱص";
			next;
			mes "ϸĹ۲󣬷˿ԷĳֶС϶ְ";
			next;
			mes "С϶ʲô?";
			next;
			input .@KHInput$;
			if (.@KHInput$ == "ɫԿ׿") {
				mes "'^0000FFɫԿ׿^000000''~'һ Ҵ˵ˣ'^008000^000000 '";
				next;
				input .@KHInput$;
				next;
				if (.@KHInput$ == "4772961") {
					mes "";
					mes "'ȷϣ";
					mes "^FF0000 ^000000 ӭ";
					mes "'~'һͨ·";
					set KielHyreQuest,38;
					close;
				}
				else {
					mes "'Ŵ";
					mes "";
					close;
				}
			}
			else {
				mes "ûκηӦ";
				close;
			}
		}
	}
	else if ((KielHyreQuest >= 38) && (KielHyreQuest < 106)) {
		mes "ͨѾ";
		next;
		switch(select("ȥ:ȥ")) {
		case 1:
			warp "kh_dun01",3,230;
			end;
		case 2:
			mes "........";
			close;
		}
	}
	else if (KielHyreQuest >= 106) {
		if (countitem(7509) < 1) {
			mes "ͨѾر";
			close;
		}
		else {
			mes "ߵĹԱ֮";
			mes "ڷĹĳһ";
			mes "ʼ˸Źâ";
			next;
			switch(select("ʹ^FF0000Կ׿^000000:")) {
			case 1:
				mes "ʹԿ׿γͨڲͨ·";
				next;
				switch(select("ȥ:ȥ")) {
				case 1:
					warp "kh_dun01",3,230;
					end;
				case 2:
					mes ".........";
					close;
				}
			case 2:
				mes ".........";
				close;
			}
		}
	}
}

//============================================================================

//============================================================================
//    NPC
//============================================================================

//----------------------------------------------------------------------------
// ܼ
//----------------------------------------------------------------------------
yuno_fild02,93,210,4	script	ܼ#kh	85,{
	if ((KielHyreQuest < 12) || (KielHyreQuest > 12)) {
		mes "[ܼ]";
		mes "Ϊ˽е ";
		mes "Բ";
		close;
	}
	else if (KielHyreQuest == 12) {
		mes "[ܼ]";
		mes "Ϊ˽е ";
		mes "Բ";
		next;
		switch(select("Ҫ^FF0000 ^000000:˽")) {
		case 1:
			mes "[ܼ]";
			mes "Լ?";
			next;
			switch(select("ǵ:û")) {
			case 1:
				mes "[ܼ]";
				mes "ǳǸ˳УԲܼ氡";
				next;
				mes "[ܼ]";
				mes "ڳУԲܼ氡";
				set KielHyreQuest,14;
				close;
			case 2:
				mes "[ܼ]";
				mes "ûԼõĻ ǲܼ";
				next;
				mes "[ܼ]";
				mes "ڳУԲܼ氡";
				close;
			}
		case 2:
			mes "[ܼ]";
			mes "ټ";
			close;
		}
	}
}

//----------------------------------------------------------------------------
//  (left)
//----------------------------------------------------------------------------
yuno_fild02,75,218,0	script	#kh2	111,{
	if (KielHyreQuest < 16) {
		mes "һرյ";
		close;
	}
	if (KielHyreQuest == 16) {
		mes "һرյ";
		next;
		switch(select(":")) {
		case 1:
			mes "ʹԿ״֮󣬴ŷһֽֽд '^FF0000ǰ 6 3ǰ34^000000";
			close2;
			set KielHyreQuest,18;
			warp "kh_vila",188,18;
			end;
		case 2:
			mes ".......";
			close;
		}
	}
	else {
		mes "һ";
		next;
		switch(select("ȥ:ȥ")) {
		case 1:
			warp "kh_vila",188,18;
			end;
		case 2:
			close;
		}
	}
}

//----------------------------------------------------------------------------
// Cottage Door (Right)
//----------------------------------------------------------------------------
yuno_fild02,109,218,0	script	#kh1	111,{
	if (KielHyreQuest != 16) {
		mes "һرյ";
		close;
	}
	if (KielHyreQuest == 16) {
		mes "һرյ";
		next;
		switch(select(":")) {
		case 1:
			mes "ӰõԿײʹ";
			close;
		case 2:
			mes ".......";
			close;
		}
	}
}


//----------------------------------------------------------------------------
// Store room interior; Wall
//----------------------------------------------------------------------------
kh_vila,191,14,0	script	ǽ#kh	139,1,1,{
	if (KielHyreQuest < 28) {
		mes "ǽ";
		close;
	}
	if (KielHyreQuest >= 28) {
		mes "ǽѺһͨ·";
		next;
		switch(select("ƶ:ƶ")) {
		case 1:
			warp "kh_vila",17,177;
			end;
		case 2:
			close;
		}
	}

OnOpenDoor:
	misceffect 316;
	end;
}

//----------------------------------------------------------------------------
// Store room interior; books
//----------------------------------------------------------------------------
kh_vila,184,20,0	script	#kh1::BookKHQ1	111,{
	if (KielHyreQuest != 26) {
		mes "вǱ";
		close;
	}
	else if (KielHyreQuest == 26) {
		if (rand(1,10) == 8) {
			mes "ʱ¥ԵǽѺһͨ·";
			donpcevent "Wall#kh::OnOpenDoor";
			set KielHyreQuest,28;
			close;
		}
		else {
			mes "вǱ";
			close;
		}

	}

}

kh_vila,181,20,0	duplicate(BookKHQ1)	#kh2	111

kh_vila,178,20,0	duplicate(BookKHQ1)	#kh3	111

kh_vila,175,19,0	duplicate(BookKHQ1)	#kh4	111

//----------------------------------------------------------------------------
// Store room interior; Letter to Elly on the floor.
//----------------------------------------------------------------------------
kh_vila,179,11,0	script	ż#kh	-1,1,1,{
//OnTouch2:
OnTouch:
	if (KielHyreQuest == 18) {
		if (checkweight(7490,1) == 0) {
			mes "ͣһ !!";
			mes "ЯƷ̫ˣԲܻƷϵƷ֮ս";
			close;
		}
		mes "˵ڵذϵ'^FF0000ż^000000'";
		getitem 7490,1; //Kyll_Hire_Letter
		set KielHyreQuest,20;
		close;
	} 
	else{
		mes "ذǿտյ";
		close;
	}
	end; 
}

//----------------------------------------------------------------------------
// Cottage interior, kitchen; Box (Pet Food vending machine)
//----------------------------------------------------------------------------
kh_vila,16,175,0	script	#khp1	111,{
	mes "ó Ӫָߵĳ";
	mes "  Զ";
	mes "Ϊɰĳ";
	mes "Ψһѡ!";
	mes "һ";
	mes "ǲһ!";
	mes "ʹ÷:";
	mes "1100Ͷ뵽Ͷҿ";
	mes " Ѱұת2Σ";
	mes " ȡ";
	mes "ó Ӫָߵĳ";
	next;
	switch(select(":")) {
	case 1:
		if (zeny < 1100) {
			mes "û㹻ĽҿͶͶҿ";
			close;
		}
		else {
			mes "е˻ǹ";
			next;
			mes "ֻǳϰ";
			set zeny,zeny-1100;
			getitem 537,1;	//Pet_Food
			close;
		}
	case 2:
		mes "ое㲻̫Ծ";
		close;
	}
}

//----------------------------------------------------------------------------
// Cottage interior, kitchen; Apple Box (Useless?)
//----------------------------------------------------------------------------
kh_vila,30,184,0	script	ƻ #khp1	111,{
	mes "װźóԵƻ";
	mes "һ";
	next;
	switch(select(":")) {
	case 1:
		mes "..Ҫȥƻʱ";
		mes "ڱоһɺ⣬";
		mes "ѵ?";
		next;
		mes "ӻǲҪú";
		close;
	case 2: 
		mes "ое㲻̫Ծ";
		close;
	}
}

//----------------------------------------------------------------------------
// Cottage interior, dining room; Map
//----------------------------------------------------------------------------
kh_vila,44,126,0	script	ͼ#khp1	111,{
	if ((KHCottagePoem1 < 2) && (KielHyreQuest < 30)) {
		mes "һƯĵͼ滭 ¬--׵¼Ⱥ㷢ȷ£űĹңһĹң";
		mes "뿴ϸһȥͼʱһ׳Ķ";
		next;
		switch(select("Ҫȥ:۲һ")) {
		case 1:
			mes "ӲʲôҪƷ";
			close;
		case 2:
			mes "ϸ۲ĽͼεĹ̶ǽϵģýˮ֮";
			mes "̶Ƶģ";
			mes "ѽˮԽ͵Ļ";
			mes "Ӧǿ԰εƵ";
			set KHCottagePoem1,1;
			close;
		}
	}
	else  if ((KHCottagePoem1 == 2) && (KielHyreQuest < 30)) {
		mes "úˮֵˮʪͼĺ󷽣ͼһԿʼ";
		next;
		mes "΢̧ͼ󣬵ͼ '~' һһһű ֽ";
		next;
		mes "ֽд °";
		next;
		mes "^0000FFˮɿݵѵĻͨŮ·ῪŮ˵͸ˮһ";
		mes "Ůڵط籱Ӱһ䣬ΪλŮˣİѽֻ߾";
		mes "һѽ ڶѽ ѽ ŭİѽ ϣ";
		mes "ΪѰŮڵĵطΪŮˣҾİѽֻ߾^000000";
		next;
		mes ".....ʲô Ҳ";
		set KHCottagePoem1,3;
		close;
	}
	else  if ((KHCottagePoem1 > 2) || (KielHyreQuest >= 30)) {
		mes "ǻдʫֽĵط";
		mes "ȷһʫ?";
		next;
		switch(select("ȷһ:ûҪ")) {
		case 1:
			mes "ֽд °";
			next;
			mes "^0000FFˮɿݵѵĻͨŮ·ῪŮ˵͸ˮһ";
			mes "Ůڵط籱Ӱһ䣬ΪλŮˣİѽֻ߾";
			mes "һѽ ڶѽ ѽ ŭİѽ ϣ";
			mes "ΪѰŮڵĵطΪŮˣҾİѽֻ߾^000000";
			next;
			mes ".....ʲô Ҳ";
			close;
		case 2:
			mes "оûҪƵ";
			close;
		}
	}
}

//----------------------------------------------------------------------------
// Cottage interior, kitchen; Pot
//----------------------------------------------------------------------------
kh_vila,33,184,0	script	#khp1	111,{
	if (KHCottagePoem1 < 1) {
		mes "ڵĺˮڵƮ";
		close;
	}
	else if (KHCottagePoem1 == 1) {
		mes "ڵĺˮڵƮ";
		next;
		mes "ڵ...?!";
		mes "֪ɲ";
		mes "ѵͼϵĽˮϡ͵?";
		next;
		switch(select("Կ:Ӳ̫е")) {
		case 1:
			mes "^FF0000ĺ^000000СһԼ";
			set KHCottagePoem1,2;
			close;

		case 2:
			mes "Ѱ";
			close;
		}
	}
	else if ((KHCottagePoem1 > 1) || (KielHyreQuest >= 30)){
		mes "طĵط";
		close;
	}
}

//----------------------------------------------------------------------------
// Cottage interior, fire place; Calabash
//----------------------------------------------------------------------------
kh_vila,14,55,0	script	«ƿ#khp1	111,{
	if ((countitem(7329) < 1) && (countitem(7516) < 1) && (countitem(7491) < 1) && (KielHyreQuest < 38)) {
		if (checkweight(7329,1) == 0) {
			mes "ͣһ !!";
			mes "ЯƷ̫ˣԲܻƷϵƷ֮ս";
			close;
		}
		mes "ܹĺ«ƿ";
		mes "..Ҫô?";
		next;
		switch(select("ƿӴƿ::")) {
		case 1:
			mes "ܹ....";
			mes "Ҷ˵Ķ";
			close;
		case 2:
			mes "׻ʲô? .....";
			next;
			mes "ƿ̧ҡʱ'~' һȻи ĳֶƵ";
			next;
			mes "'^FF0000ƾͭԿ^000000'";
			getitem 7329,1; //Old_Bronze_Key
			close;
		case 3:
			mes "ֻͨƿӣ";
			mes "Ȼе..";
			close;
		}
	}
	else {
		mes "ǻƾͭԿ׵ĺ«ƿ";
		mes "ܹ";
		close;
	}
}

//----------------------------------------------------------------------------
// Cottage interior, garden; Pool
//----------------------------------------------------------------------------
kh_vila,39,41,0	script	#khp1	111,{
	if ((KHCottagePoem1 < 3) && (KielHyreQuest < 30)) {
		mes "ˮǱ";
		next;
		mes "....ӦòܺȰ?";
		close;
	}
	else if ((KHCottagePoem1 == 3) && (KielHyreQuest < 30)) {
		mes "ˮǱ";
		next;
		mes "ʨ֣?";
		next;
		switch(select(":ȥ")) {
		case 1:
			mes "Ҫһ?";
			next;
			switch(select("ұ߰:߰")) {
			case 1:
				mes "˰֣";
				mes "ʨ￪ʼˮˣ";
				mes "ÿ";
				close;
			case 2:
				mes "˰";
				mes "ײĶˣ";
				mes "ʹˮˮʼˣ";
				mes "ˮߺɫ̦";
				mes "ʯͷĳ";
				next;
				switch(select("ûʲôֵù۲:ٶ۲һ")) {
				case 1:
					mes "ˮߵĳ";
					mes "ûʲôÿĵط";
					close;
				case 2:
					mes "۲ڽ棬ССİť";
					next;
					switch(select(":....")) {
					case 1:
						mes "°ť '~' һӦǴ^FF0000ߵ¥^000000ﴫ";
						set KHCottagePoem1,4;
						close;
					case 2:
						mes "Ҳһ ";
						close;
					}
				}
			}
		case 2:
			mes "ӻǲҪȽϺ";
			close;
		}
	}
	else if ((KHCottagePoem1 > 3) || (KielHyreQuest >= 30)) {
		mes "ڳﰴ°ť";
		mes "¥ﴫ";
		mes "'~' һ";
		close;
	}
}

//----------------------------------------------------------------------------
// Cottage interior, upstairs; Vicious Dog
//----------------------------------------------------------------------------
kh_vila,181,178,4	script	 ׵Ĺ#khp1	81,7,3,{
//OnTouch2:
OnTouch:
	mes "~";
	next;
	mes "׵Ĺ ţСĵ·?";
	next;
	switch(select("·:ȥ")) {
	case 1:
		if (countitem(537) >= 1) {
			mes "......ϸһ.. дϰ";
			next;
			switch(select("ʹóϿ:вͨ")) {
			case 1:
				mes "ѳǰƳȥ";
				mes "ʼҡβͽӽ";
				mes "ų";
				mes "ʼڴڵĳ";
				mes "ʱͨ";
				delitem 537,1; //Pet_Food
				close2;
				warp "kh_vila",173,182;
				end;
			case 2:
				break;
			}
		}
		mes "ССĵĽӽ";
		mes "͵";
		next;
		mes "ҪԱ·ʱ";
		mes "...";
		mes "!!!!!!!!";
		next;
		mes ".......";
		mes "׷ֻӵ¥";
		close2;
		warp "kh_vila",126,70;
		end;
	case 2:
		mes ".....᲻ᱻҧ?";
		close2;
		warp "kh_vila",126,70;
		end;
	}
}

//----------------------------------------------------------------------------
// Cottage interior, upstairs; Drawer, first room nightstand
//----------------------------------------------------------------------------
kh_vila,115,186,0	script	#khp1	111,{
	if (checkweight(7492,1) == 0) {
		mes "ͣһ !!";
		mes "ЯƷ̫ˣԲܻƷϵƷ֮ս";
		close;
	}
	if ((countitem(7492) < 1) && (KielHyreQuest <= 36)) {
		mes "кܶ˵ ĳ";
		next;
		switch(select("򿪳뿴:Ѱұĵط")) {
		case 1:
			mes "򿪳󿴵ɫ";
			getitem 7492,1; //Yellow_Key_Card
			close;
		case 2:
			mes "Ѱұĵط";
			close;
		}
	}
	else {
		mes "...ҪĶҵˣ";
		mes "ȥ";
		close;
	}
}

//----------------------------------------------------------------------------
// Cottage interior, upstairs; Box
//----------------------------------------------------------------------------
kh_vila,107,126,0	script	#khp2	111,{
	if ((countitem(7329) < 1) && (countitem(7516) < 1) && (countitem(7491) < 1) && (KielHyreQuest < 38)) {
		mes "һڷż̵ӣ";
		mes "۲Ӻ滹";
		mes "˫㹹ӣ";
		mes "ڶӱԿ׸סˣ";
		close;
	}
	else if ((countitem(7329) >= 1) && (countitem(7516) < 1) && (countitem(7491) < 1) && (KielHyreQuest < 38)) {
		mes "һڷż̵ӣ";
		mes "۲Ӻ滹";
		mes "˫㹹ӣ";
		mes "ڶӱԿ׸סˣ";
		mes "....᲻ǴӺ«ƿõԿ";
		mes "ܿ?";
		next;
		switch(select(":ӦǲԵ...")) {
		case 1:
			mes "'' ";
			next;
			mes "'~'  ɫԿ׿";
			next;
			mes ".....Կ....";
			getitem 7516,1; //Green_Key_Card
			delitem 7329,1; //Old_Bronze_Key
			close;
		case 2:
			mes "ӦǲԵ...";
			close;
		}
	}
	else {
		mes "ǻ^008000ɫԿ׿^000000";
		close;
	}
}

//----------------------------------------------------------------------------
// Cottage interior, upstairs; Bookshelf.
//----------------------------------------------------------------------------
kh_vila,181,138,0	script	#khp1	111,{
	if ((countitem(7491) < 1) && (countitem(7329) >= 1) || (countitem(7516) >= 1)) {
		mes "װ൱鼮  .......";
		next;
		mes "........? 'Ϊ˰'? ''?";
		next;
		switch(select("鿴һ:ر鰡")) {
		case 1:
			mes "鿴 ûпʲôرݣ·Żԭ";
			mes "鿴ʱмӲ";
			next;
			switch(select("ٶ۲һ:Ӧǽ")) {
			case 1:
				mes "Χÿ󣬳ɵĽ⣬Կ׿ף...򲻿";
				next;
				switch(select("ЯԿԿ:....ûкʵԿ")) {
				case 1:
					mes "һԿ׿";
					next;
					if (countitem(7329) >= 1) {
						select("ƾͭԿ:Կ");
						mes "ڶԿ׿";
						next;
						select("ƾͭԿ:Կ");
					}
					else if (countitem(7516) >= 1) {
						switch(select("ɫԿ:Կ")) {
						case 1:
							set .@KHFirstKeyhole,1;
							break;
						case 2:
							set .@KHFirstKeyhole,2;
							break;
						}
						mes "ڶԿ׿";
						next;
						switch(select("ɫԿ:Կ")) {
						case 1:
							set .@KHSecondKeyhole,1;
							break;

						case 2:
							set .@KHSecondKeyhole,2;
							break;

						}
						if (.@KHFirstKeyhole == 2) && (.@KHSecondKeyhole == 1) {
							mes "'!'һ һ ⿪ˣŰɫ";
							next;
							mes "ѻ^FF0000ɫ^000000";
							delitem 7489,1; //Villa_Spare_Key
							delitem 7516,1; //Green_Key_Card
							getitem 7491,1; //Iron_Box
							close;
						}

					}
					mes "򲻿";
					close;
				case 2:
					mes "һ±";
					close;
				}
			case 2:
				mes "ԭĵط";
				close;
			}
		case 2:
			mes "֮ûпرĶ";
			close;
		}
	}
	else {
		mes "ӦûҪЩɣ";
		mes "ҿ";
		close;
	}
}

//----------------------------------------------------------------------------
// Cottage interior, upstairs; Desk
//----------------------------------------------------------------------------
kh_vila,118,144,0	script	#khp1	111,{
	if (KHCottagePoem2 < 1) {
		mes "";
		mes "߰鼮ֽм";
		mes "д˹÷..";
		mes " ŵµļ..";
		mes "ԶеĻ÷..";
		mes "߼ħ..";
		mes "Ϊ˰..";
		next;
		mes "'?'";
		mes "ڷȫǰɫҳʱ";
		mes "һֽ";
		mes " ' ";
		mes "ҵ";
		mes "......Ȱ߰";
		next;
		mes "'^FF0000   µֽ^000000'";
		set KHCottagePoem2,1;
		close;
	}
	else if (KHCottagePoem2 >= 1) {
		mes "ļоһͷʹ";
		close;
	}
}

//----------------------------------------------------------------------------
// Cottage interior, upstairs; Medicine Chest
//----------------------------------------------------------------------------
kh_vila,123,170,0	script	ҩ#khp1	111,{
	if ((KHCottagePoem2 < 1) && (KielHyreQuest < 30)) {
		mes "ɫɫƿӻҵİҩ?";
		close;
	}
	else if ((KHCottagePoem2 == 1) && (KielHyreQuest < 30)) {
		mes "ɫɫƿӻҵİҩ?";
		mes "......ĳһϿ";
		mes "дźʹضҺʱīˮŻзӦ..";
		next;
		switch(select("Ļֶ...:ϸһ ղǸֽŲ...")) {
		case 1:
			mes "....ôֶܻ";
			close;
		case 2:
			switch(select("Ѻɫҩ:ɫҩ:ѻɫҩ:ɫҩ: Ҫ")) {
			case 1:
				set .@KHPotionColor$,"ɫ";
				break;
			case 2:
				mes "^3355FFһͷӲɵߣűͼӲͷԣʰŭͷȥˣ֮߾ͱľˣ";
				mes "һͷӲɵߣűͼӲͷԣʰŭͷȥˣ֮߾ͱľˣ";
				mes "ͷѪɵߣůͷԣʰϣסߵ֮߾ͱľˣ";
				mes "ͷûߣͷûκ֪ʰͶմǷƽ";
				mes "û˻֪ģû˻֪ģҵ ^000000'^FF0000·Сħ^000000'";
				mes "^3355FFİѽͶͷߣںڰѰλŮ ^000000";
				next;
				mes "....... ֵʫ...ʲô?";
				set KHCottagePoem2,2;
				close;
			case 3:
				set .@KHPotionColor$,"ɫ";
				break;
			case 4:
				set .@KHPotionColor$,"ɫ";
				break;
			case 5:
				mes "....ôֶܻ";
				close;
			}
			mes .@KHPotionColor$+"ҩ˳ֽŵıˣ";
			mes "ûʪֽ";
			mes "ҲûκηӦ";
			close;
		}
	}
	else if ((KHCottagePoem2 >= 2) || (KielHyreQuest >= 30)) {
		mes "";
		mes "ֽҵʫĵط";
		mes "Ҫһ鿴?";
		next;
		switch(select("Ϊûʱһ:Ҫ")) {
		case 1:
			mes "Ͽ쵽۲һ°";
			close;
		case 2:
			mes "^3355FFһͷӲɵߣűͼӲͷԣʰŭͷȥˣ֮߾ͱľˣ";
			mes "һͷӲɵߣűͼӲͷԣʰŭͷȥˣ֮߾ͱľˣ";
			mes "ͷѪɵߣůͷԣʰϣסߵ֮߾ͱľˣ";
			mes "ͷûߣͷûκ֪ʰͶմǷƽ";
			mes "û˻֪ģû˻֪ģҵ ^000000'^FF0000·Сħ^000000'";
			mes "^3355FFİѽͶͷߣںڰѰλŮ ^000000";
			close;

		}
	}
}

//----------------------------------------------------------------------------
// Cottage interior, stair case; Sword hilt
//----------------------------------------------------------------------------
kh_vila,136,68,0	script	װ#kh	111,{
	if ((KHCottagePoem1 < 3) || (KHCottagePoem2 < 2) && (KielHyreQuest < 30)) {
		mes "һֺƯĽ";
		mes "һоµߵ";
		close;
	}
	else if ((KHCottagePoem1 <= 4) || (KHCottagePoem2 <= 2) && (KielHyreQuest < 30)) {
		mes "һֺƯĽ";
		mes "һоµߵ";
		mes "..İѽ?";
		mes "ͷ?";
		mes "͸ղſʫ";
		mes "Ҳʲôϵ?";
		next;
		switch(select("Ӧûʲôϵ:Ҫٹ۲һ")) {
		case 1:
			mes "ӦżȻ";
			close;
		case 2:
			mes "ϸĹ۲ߵͷһ";
			mes "Է뽣Ķ";
			next;
			switch(select("ʲôĶ?:γ忴")) {
			case 1:
				mes "...˽֮";
				mes "ʵĶ";
				close;
			case 2:
				if (KHCottagePoem1 != 4) {
					mes "ǿ΢ƶģ";
					mes "ʲôס˲ܶ";
					close;
				}
				else {
					mes "ô?";
					next;
					mes "γ˵һѽ";
					next;
					switch(select("һͷ:ڶͷ:ͷ:ͷ")) {
					default:
						break;
					case 2:
						set .@KHSwords,.@KHSwords+1;
						break;
					}
					next;
					mes "γ˵ڶѽ";
					next;
					switch(select("һͷ:ڶͷ:ͷ:ͷ")) {
					default:
						break;
					case 4:
						set .@KHSwords,.@KHSwords+1;
						break;
					}
					next;
					mes "γ˵ѽ";
					next;
					switch(select("һͷ:ڶͷ:ͷ:ͷ")) {
					case 1:
						set .@KHSwords,.@KHSwords+1;
						break;
					default:
						break;
					}
					next;
					mes "γ˵İѽ";
					next;
					switch(select("һͷ:ڶͷ:ͷ:ͷ")) {
					default:
						break;
					case 3:
						set .@KHSwords,.@KHSwords+1;
						break;
					}

					if (.@KHSwords == 4) {
						mes "ͻȻо";
						mes "ƶĵطȥ";
						set KHCottagePoem1,5;
						set KHCottagePoem2,3;
						close2;
						warp "kh_vila",178,72;
						end;
					}

					else {
						mes "....ûκεı仯";
						mes "ѽ·Żԭλð";
						close;
					}
				}
			}
		}
	}
	else if ((KHCottagePoem1 == 5) && (KHCottagePoem2 == 3) || (KielHyreQuest >= 30)) {
		mes "ƶ ҵͨ·";
		next;
		switch(select("½ȥ:ȥ")) {
		case 1:
			warp "kh_vila",178,72;
			end;
		case 2:
			mes "ٶ۲һ°";
			close;
		}
	}
}

//----------------------------------------------------------------------------
// Cottage interior, Secret Room; left test tube
//----------------------------------------------------------------------------
kh_vila,179,68,0	script	#khp2	111,{
	mes "д   ѧԺ";
	mes "Уѧ棬";
	mes "о찡";
	close;
}


//----------------------------------------------------------------------------
// Cottage interior, Secret Room; Right test tube
//----------------------------------------------------------------------------
kh_vila,185,68,0	script	::TestTubeKHQ2	111,{
	if (KielHyreQuest > 28) {
		mes "^3355FFA strange looking,";
		mes "wizened old man is";
		mes "held within this test tube.^000000";
		close;
	}
	else if (KielHyreQuest == 28) {
		mes "һλ 濴 ɫİť";
		next;
		switch(select("һ°ť:۲һ")) {
		case 1:
			mes "°ť ˿ʼ˵";
			next;
			mes "..........";
			mes "'˭..'";
			mes "'һİװ'";
			mes "'ҵѵĻ";
			mes "һ֪ҵֵ?'";
			next;
			input .@KHInput$;
			if (.@KHInput$ == "·Сħ") {
				mes "ְ ^FF00004.7.7.2.9.6.1^000000";
				next;
				mes "^FF00004772961^000000 ?";
				mes "ʲôְ?";
				//KHCottagePoem1 and KHCottagePoem2 no longer needed-- deleting
				set KHCottagePoem1,0;
				set KHCottagePoem2,0;
				set KielHyreQuest,30;
				close;
			}
			else {
				mes "Ӧòְ..";
				close;
			}
		case 2:
			mes "ӦǶ۲һΧǱȽϺһ";
			close;
		}
	}
	else if (KielHyreQuest >= 30) {
		if ((countitem(7491) > 0) && (countitem(7492) > 0)){
			mes "^FF00004772961^000000 ?";
			mes "ʲôְ?";
			mes "........";
			mes "ҪĶѾҵˣ";
			mes "ص߰";
			close;
		}
		else {
			mes "^FF00004772961^000000 ?";
			mes "ʲôְ?";
			mes "........";
			mes "ӦûҪЩɣ";
			mes "ȥҿ";
			close;
		}
	}
	end;
}

//============================================================================

//============================================================================
// Robot Factory NPCs
//============================================================================

//----------------------------------------------------------------------------
// Robotic's Factory; Heavy Door
//----------------------------------------------------------------------------
kh_dun01,235,48,0	script	̵#kh1::HeavyDoorKHQ1	111,{
	if (KielHyreQuest < 38) {
		mes "һ̵";
		next;
		switch(select(":")) {
		case 1:
			input .@KHInput$;
			mes "򲻿";
			close;
		case 2:
			mes "ûҪ";
			close;
		}
	}
	else if ((KielHyreQuest >= 38) && (KielHyreQuest < 46)) {
		mes "һ̵";
		next;
		switch(select(":")) {
		case 1:
			input .@KHInput$;
			if (.@KHInput$ == "ɫԿ׿") {
				mes " ";
				close2;
				warp "kh_school",119,144;
				end;
			}
			else {
				mes "򲻿";
				close;
			}
		case 2:
			mes "ûҪ";
			close;
		}
	}
	else {
		mes "ǽչŵĺص";
		close;
	}
}

//----------------------------------------------------------------------------
// Robotic's Factory; Heavy Door (These doors don't seem to serve any purpose)
//----------------------------------------------------------------------------
kh_dun01,76,233,0	script	̵::HeavyDoorKHQ2	111,{
	if ((KielHyreQuest >= 38) && (KielHyreQuest < 46)) {
		mes "һ̵";
		next;
		switch(select(":")) {
		case 1:
			input .@KHInput$;
			mes "򲻿";
			close;
		case 2:
			mes "ûҪ";
			close;
		}
	}
	else {
		mes "ǽչŵĺص";
		close;
	}
}

kh_dun01,106,233,0	duplicate(HeavyDoorKHQ2)	̵#kh3	111
kh_dun01,6,164,0	duplicate(HeavyDoorKHQ2)	̵#kh4	111
kh_dun01,6,133,0	duplicate(HeavyDoorKHQ2)	̵#kh5	111
kh_dun01,6,60,0	duplicate(HeavyDoorKHQ2)	̵#kh6	111
kh_dun01,6,30,0	duplicate(HeavyDoorKHQ2)	̵#kh7	111
kh_dun01,6,18,0	duplicate(HeavyDoorKHQ2)	̵#kh8	111
kh_dun01,235,70,0	duplicate(HeavyDoorKHQ2)	̵#kh9	111
kh_dun01,235,92,0	duplicate(HeavyDoorKHQ2)	̵#kh10	111
kh_dun01,235,114,0	duplicate(HeavyDoorKHQ2)	̵#kh11	111

//----------------------------------------------------------------------------
// Beautiful Lady and Beautiful Lady copies.
//----------------------------------------------------------------------------
kh_school,119,149,4	script	ƯŮ#kh1::BeatifulLadyKHQ1	894,{
	cutin "kh_ellisia",2;
	if (KielHyreQuest < 40) {
		mes "[ϣ]";
		mes "........";
		mes "㲻Ҽ";
		next;
		mes "[ϣ]";
		mes "   Ļܽ뵽 ^FF0000趨 ^000000 ^FF0000^000000";
		next;
		mes "[ϣ]";
		mes "ô^FF0000^000000أҲ? ^FF0000^000000?";
		next;
		mes "[ϣ]";
		mes "ô ʾһ ^FF0000^000000  ֤?";
		next;
		switch(select("ɫԿ׿:ɫԿ׿:ƽԿ:лť:......?")) {
		default:
			break;
		case 3:
			mes "[ϣ]";
			mes "    ^FF0000^000000 ܵԿװ֤ǣ^FF0000^000000";
			next;
			mes "[ϣ]";
			mes ".....ڵأһ㵽ͣĵطԺ";
			close2;
			cutin "",255;
			warp "kh_school",120,180;
			end;
		case 4:
			mes "[ϣ]";
			mes "Ǹ....";
			mes "^0000FF^000000! ץҵ?";
			close2;
			cutin "",255;
			monster "kh_school",117,144,"ħ",1745,1;
			monster "kh_school",117,144,"ħ",1745,1;
			monster "kh_school",117,144,"ħ",1745,1;
			monster "kh_school",117,144,"ħ",1745,1;
			end;
		case 5:
			mes "[ϣ]";
			mes "...........";
			close2;
			cutin "",255;
			end;
		}
		mes "[ϣ]";
		mes "ֻ֤";
		mes "^FF0000^000000";
		mes "ó֤?";
		close2;
		cutin "",255;
		end;
	}
	else if (KielHyreQuest >= 40) {
		mes "[ϣ]";
		mes "....Ͽ߰";
		close2;
		cutin "",255;
		warp "kh_school",120,180;
		end;
	}
}


kh_school,117,149,4	script	ƯŮ#kh2::BeatifulLadyKHQ2	894,{
	end;
}
kh_school,118,149,4	duplicate(BeatifulLadyKHQ2)	ƯŮ#kh3	894
kh_school,120,149,4	duplicate(BeatifulLadyKHQ2)	ƯŮ#kh4	894
kh_school,121,149,4	duplicate(BeatifulLadyKHQ1)	ƯŮ#kh5	894

//----------------------------------------------------------------------------
// Beautiful Lady "Allysia"
//----------------------------------------------------------------------------
kh_school,122,186,4	script	ƯŮ#kh6	894,{
	if (checkweight(7496,1) == 0) {
		mes "ͣһ !!";
		mes "ЯƷ̫ˣԲܻƷϵƷ֮ս";
		close;
	}
	cutin "kh_ellisia",2;
	if (KielHyreQuest < 38) {
		mes "[??????]";
		mes "˽";
		mes "뿪";
		close2;
		cutin "kh_ellisia",255;
		warp "yuno_fild08",73,172;
		end;
	}
	else if (KielHyreQuest <= 38) {
		mes "[ϣ]";
		mes "ڵȴ ^FF0000趨 ^000000";
		next;
		mes "[ϣ]";
		mes "Ӧ֪";
		mes "Ҫæ";
		mes "Ŀǰ^FF0000 ^000000";
		mes "⹤ĳط";
		mes "";
		next;
		mes "[ϣ]";
		mes "Ⱦ^FF0000 ^000000ɣǸǵ֮";
		next;
		switch(select("⹤....?:ʶ^FF0000 ^000000 ʲô..")) {
		case 1:
			mes "[ϣ]";
			mes "   ҵ ҵģ";
			mes "ԶеεĹ";
			mes "Ŀǰң";
			mes "'   ѧԺѧǣ";
			mes "'е'";
			next;
			mes "[ϣ]";
			mes "ĸȴ໹ǿ";
			mes "ѹǿԶеΣ";
			mes "ף";
			mes " '  ҵ'Ŀ꼰 ";
			break;
		case 2:
			mes "[ϣ]";
			mes "^0000FF^000000";
			mes "Թ";
			mes "ǿִ'쳣'ж";
			mes "֪ʵ^FF0000 ^000000^0000FF^000000ж";
			mes "ǴҲûл";
			next;
			mes "[ϣ]";
			mes "^FF0000 ^000000";
			mes "֪һ ^0000FF^000000";
			mes "ﱻƻ";
			mes "԰ҷҵһ";
			mes "һ";
			next;
			mes "[ϣ]";
			mes "Ŀǰǿյ^FF0000 ^000000";
			mes "źţ ^FF0000 ^000000";
			mes "Ŀǰƽģ";
			mes "鷳һ^FF0000 ^000000";
			mes "ڵĵط";
			next;
			mes "[ϣ]";
			mes "Ҹһڹܵ";
			mes "ߵ^FF0000Կ׿^000000";
			mes "ҵ^FF0000 ^000000";
			mes "ڵصĻصҺ";
			getitem 7496,1; //Red_Key_Card
			set KielHyreQuest,40;
			break;
		}
		close2;
		cutin "",255;
		end;
	}
	else if (KielHyreQuest == 40) {
		mes "[ϣ]";
		mes "鷳ȥ^FF0000 ^000000";
		close2;
		cutin "",255;
		warp "kh_dun01",22,216;
		end;
	}
	else if (KielHyreQuest == 42) {
		mes "[ϣ]";
		mes "ҵ   ?";
		next;
		mes "ҸλŮˣ  طλãҵ^FF0000Ƭ^000000";
		next;
		mes "^0000FFϣ^000000 ^FF0000Ƭ^000000װԼֱ";
		next;
		mes "^FF0000 ^000000 İȷϣ";
		mes "B_2_3 Ѷ ";
		mes "ͬȷϣͼ";
		next;
		mes "[ϣ]";
		mes "... .ִ..";
		delitem 7497,1; //Steel_Piece
		set KielHyreQuest,44;
		close2;
		cutin "",255;
		end;
	}
	else if (KielHyreQuest == 44) {
		mes "[ϣ]";
		mes "ҪʼҪִ^FF0000 ^000000ˣ";
		mes "Ժ뵽^0000FFϣ '  ۡ'^000000 Ұɣ";
		mes "ЯԿ׿򱣰ϵҪֱӻ";
		next;
		mes "[ϣ]";
		mes "ֻҪ㵽ۡ";
		mes "^FF0000ƽԿ^000000 øǿĻ";
		mes "ǻΪ";
		delitem 7492,1; //Yellow_Key_Card
		delitem 7495,1; //Blue_Key_Card
		delitem 7496,1; //Red_Key_Card
		set KielHyreQuest,46;
		close2;
		warp "yuno_fild08",73,172;
		cutin "",255;
		end;
	}
	else if (KielHyreQuest >= 44) {
		warp "yuno_fild08",73,172;
		cutin "",255;
		end;
	}
}

//----------------------------------------------------------------------------
// Signboard (another useless NPC?)
//----------------------------------------------------------------------------
kh_dun01,163,223,4	script	#kh	857,{
	mes "ֹ";
	close;
}

//----------------------------------------------------------------------------
// Mechanical Devices for accessing restricted area
//----------------------------------------------------------------------------
kh_dun01,166,223,0	script	еװ#kh::KHKeyardReader	111,{
	if ((KielHyreQuest <= 38) || (KielHyreQuest >= 44)) {
		mes "ԷĳֶĻеװ";
		close;
	}
	else if ((KielHyreQuest == 40) && (countitem(7496) >= 1)) {
		mes "ԷĳֶĻеװ";
		next;
		input .@KHInput$;
		if (.@KHInput$ == "ɫԿ׿") {
			mes "Կ׿";
			mes "žͿ";
			close2;
			warp "kh_dun01",170,227;
			end;
		}
		else {
			mes "ûκηӦ";
			close;
		}
	}
}

kh_dun01,162,206,0	duplicate(KHKeyardReader)	еװ#kh2	111

//----------------------------------------------------------------------------
// Keep monsters out of the quest area.
// Silly really since the rest of it's a dungeon
//----------------------------------------------------------------------------
//kh_dun01,180,220,0	script	Monster Warp#kh1::KHMobWarp	-1,5,20,{
//OnTouchNPC:
//	warp "kh_dun01",178,138;
//	end;
//}

//kh_dun01,190,220,0	duplicate(KHMobWarp)	Monster Warp#kh2	-1,5,20
//kh_dun01,200,250,0	duplicate(KHMobWarp)	Monster Warp#kh3	-1,5,20
//kh_dun01,210,220,0	duplicate(KHMobWarp)	Monster Warp#kh4	-1,5,20
//kh_dun01,220,220,0	duplicate(KHMobWarp)	Monster Warp#kh5	-1,5,10

//----------------------------------------------------------------------------
// Kiel Hyre - OnTouch
//----------------------------------------------------------------------------
kh_dun01,224,233,0	script	Factory B Area Door	-1,5,5,{
//OnTouch2:
OnTouch:
	if (KielHyreQuest == 40) {
		if (checkweight(7497,1) == 0) {
			mes "ͣһ !!";
			mes "ЯƷ̫ˣԲܻƷϵƷ֮ս";
			close;
		}
		mes "...........";
		next;
		mes "ŵĶ ĳ˵";
		next;
		mes "[????]";
		mes "...^0000FF^000000....ΪʲôҪ...";
		next;
		mes "...^FF0000 ^000000 ?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "^FF0000 ^000000?";
		next;
		mes "[ ]";
		mes ".....˭ѽ?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes ".....";
		next;
		mes "^FF0000 ^000000 ^FF0000^000000 ^0000FFϣ^000000С ˵";
		next;
		mes "[ ]";
		mes "....ԭӰѵҲЩһ";
		mes ".............";
		next;
		mes "߰ɣ^0000FFϣ^000000Ļ ֪ô";
		next;
		mes "ź͵ķ϶ Ƴһ^FF0000Ƭ^000000";
		getitem 7497,1; //Steel_Piece
		set KielHyreQuest,42;
		close;
	}

	else if (KielHyreQuest >= 42) {
		mes "[ ]";
		mes "........";
		close;
	}
}

//----------------------------------------------------------------------------
// Robot Factory Second Floor Entrances
//----------------------------------------------------------------------------
kh_dun01,44,203,0	script	 װ#khd2::KHAccess	111,{
	if (countitem(7509) < 1) {
		mes "һ޴";
		close;
	}
	else {
		mes "ſԿ׿";
		mes "ȥĻеװõ";
		next;
		input .@KHInput$;
		if (.@KHInput$ == "Կ׿") {
			mes "ʹ'Կ׿'";
			mes "޴ſˣ";
			mes "ͨ¥";
			next;
			switch(select("ȥ:ȥ")) {
			case 1:
				warp "kh_dun02",41,198;
				end;
			case 2:
				mes "һʱ Ź";
				close;
			}
		}
		else {
			mes "򲻿";
			close;
		}
	}
}

kh_dun01,36,195,0	duplicate(KHAccess)	 װ#khd1	111

//============================================================================

//============================================================================
//  լۡNPC,  ķ NPC
//============================================================================

//----------------------------------------------------------------------------
//  Ĺܼ
//----------------------------------------------------------------------------
kh_mansion,78,55,5	script	ܼ#kh	109,{
	if (KielHyreQuest < 46) {
		mes "[ܼ]";
		mes "˽סլ뿪";
		close2;
		warp "lighthalzen",188,201;
		end;
	}
	if ((KielHyreQuest >= 46) && (KielHyreQuest < 50)) {
		mes "[ܼ]";
		mes "˵Ŀ?";
		mes "ôʾ֤ݸҿ";
		next;
		switch(select("ѻƽԿø:????")) {
		case 1:
			mes "[ܼ]";
			mes ""+strcharinfo(0)+"/С㰡ڵأ㵽";
			close2;
			warp "kh_mansion",21,14;
			end;
		case 2:
			mes "[ܼ]";
			mes "㲻ǿ˵Ļ뿪";
			close2;
			warp "lighthalzen",188,201;
			end;
		}
	}
	if ((KielHyreQuest >= 50) && (KielHyreQuest < 64) || (KielHyreQuest >= 70)) {
		mes "[ܼ]";
		mes ".....ҪǼ?";
		next;
		switch(select("ǵ:Ҫ")) {
		case 1:
			mes "[ܼ]";
			mes "ȥ";
			close2;
			warp "kh_mansion",21,14;
			end;
		case 2:
			mes "[ܼ]";
			mes "";
			close;
		}
	}
	if ((KielHyreQuest == 52) || (KielHyreQuest == 54) || (KielHyreQuest >= 64) && (KielHyreQuest <= 70)) {
		mes "[ܼ]";
		mes "ӭ٣ڵأҪ˵? Ǹ....";
		next;
		switch(select("^FF0000 ^000000 Ի..:^3355FF^000000...")) {
		case 1:
			mes "[ܼ]";
			mes "˽ˣȥ";
			close2;
			warp "kh_mansion",21,14;
			end;
		case 2:
			mes "[ܼ]";
			mes ".... дϢ";
			next;
			mes "۲ΧĹܼҵͨ...";
			mes "ȻƽĹܼ....";
			mes "ǲ";
			mes ".....";
			mes ".......... ";
			next;
			mes "[ܼ]";
			mes "ûļһߣ뵽...";
			close2;
			warp "kh_mansion",20,87;
			end;
		}
	}
}

//----------------------------------------------------------------------------
//  
//----------------------------------------------------------------------------
kh_mansion,22,28,4	script	Kiel Hyre#kh	903,{
	if (checkweight(908,200) == 0) {
		mes "ͣһ !!";
		mes "ЯƷ̫ˣԲܻƷϵƷ֮ս";
		close;
	}

	cutin "kh_kyel01",2;
	if (KielHyreQuest < 46) {
		mes "[ ]";
		mes ".........";
		close2;
		cutin "",255;
		end;
	}

	else if (KielHyreQuest == 46) {
		cutin "kh_kyel01",2;
		mes "[ ]";
		mes "~  "+strcharinfo(0)+"?";
		mes "ллİæ..";
		mes "Ϊ㹤˳";
		next;
		mes "[ ]";
		mes "... кܶ ɻı鰡.. ʵ˵ Ҳһİľ..";
		next;
		mes "[ ]";
		mes "ʵĻֱҰɣǿڻشķΧڵĻҾͰش";
		next;
		while(1) {
			switch(select("е...?:^3355FF^000000..?:^FF0000^000000õť?")) {
			case 1:
				mes "[ ]";
				mes "32ǰ 20꿪ʼͶ";
				mes "ооﰡ..";
				mes "Ǵ ŵ Ҫģ";
				mes "ƺһжģ";
				mes "ɵΣ";
				mes "Ǿǻеΰ";
				next;
				mes "[ ]";
				mes "Ҳܿ";
				mes "໤ħƣ";
				mes "ȴЩûԼ";
				mes "ֻµļ໤ħ";
				mes "ǲһģ";
				mes "ǻ˼ж";
				mes "ִѧĲ..";
				next;
				mes "[ ]";
				mes "˽һĻ";
				mes "ȥѯ^0000FFϣ^000000..";
				set .@KHQRead,.@KHQRead+1;
				next;
				break;
			case 2:
				mes "[ ]";
				mes "^3355FF^000000";
				mes "Һ֮ǰϲŮ";
				mes "ΨһҵĶӣ";
				mes "λŮСȥ..";
				mes "СӵŰ";
				mes "е..";
				next;
				mes "[ ]";
				mes "^FF0000^000000һ 3 е";
				mes "Ҳ^3355FF^000000Ƶģ";
				mes "ǰ..";
				mes "3 е죬";
				mes "Ϊ;ʹ..";
				next;
				mes "[ ]";
				mes "ұҪȥ赲ģ";
				mes "ȴ..";
				mes "ǼһҪʲô..";
				mes "ΪʲôҪʼжأ";
				mes "ҵڻǲⰡ";
				set .@KHQRead,.@KHQRead+1;
				next;
				break;
			case 3:
				mes "[ ]";
				mes "· ^3355FF·^000000";
				mes "˵Ǵɫ·?";
				mes "ǿ ^3355FF^000000";
				mes "˱ '' Ҳһ";
				next;
				mes "[ ]";
				mes "֪Ӻʱʼ ^3355FF^000000";
				mes "õֲʿ";
				mes "ƽһֱźɫ·";
				mes "ڱ¶ݣ";
				mes "Ҷ֪ʵװ";
				set .@KHQRead,.@KHQRead+1;
				next;
				break;
			}
			if (.@KHQRead == 3) {
				mes "[ ]";
				mes ".. 벻Ҫѯˣеѽ";
				delitem 7493,1; //Golden_Key
				delitem 7494,1; //Kiel_Button
				set KielHyreQuest,48;
				break;
			}
		}
	}
	else if (KielHyreQuest == 48) {
		mes "[ ]";
		mes ".... ǸллȻССĶ °...";
		getitem 12105,1; //Taming_Gift_Set
		getexp 700000,0;
		set KielHyreQuest,50;
	}
	else if ((KielHyreQuest >= 50) && (KielHyreQuest < 64)) {
		mes "[ ]";
		mes "ûҪʵĻ ҪϢ";
	}
	else if (KielHyreQuest == 64) {
		cutin "kh_kyel01",2;
		mes "[ ]";
		mes "ʻʲôҪ˵?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "һûȷ鱨";
	}
	else if (KielHyreQuest == 68) {
		cutin "kh_kyel02",2;
		mes "[ ]";
		mes ".. "+strcharinfo(0)+" ʲô?";
		next;
		select("ѯй^0000FFϣ^000000");
		mes "["+strcharinfo(0)+"]";
		mes "ŵĳլ˺ ^0000FFϣ^000000һģһФ";
		next;
		cutin "kh_kyel02",2;
		mes "[ ]";
		mes "........... Ҳ֪Ҫ뽲ЩʲôǸô?";
		next;
		cutin "kh_Kyel03",2;
		mes "[ ]";
		mes "кܶ೤ƵˣǸżȻҪ˵?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Ů˺^0000FFϣ^000000 ǲͬһԲŻ˵";
		next;
		cutin "kh_kyel02",2;
		mes "[ ]";
		mes "ǺǣǸˣ^0000FFϣ^000000Ƶ ʽ";
		next;
		mes "[ ]";
		mes ".. Ф.. Ҳ˿· ^0000FFϣ^000000ģҲһΪϲЩ ԼϲĶ";
		next;
		cutin "kh_kyel01",2;
		mes "["+strcharinfo(0)+"]";
		mes "ʵǷ ǹһԶ..";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "ФԼ30ǰһŮҲ '^0000FFϣ^000000'ŵ ϣװּ﹤Ů";
		next;
		cutin "kh_kyel02",2;
		mes "[ ]";
		mes "............";
		next;
		cutin "kh_kyel01",2;
		mes "["+strcharinfo(0)+"]";
		mes "ͻȻ뵽һ飬Ů^0000FFϣ^000000ģ¶Ҳʱ ϲҲһ..";
		next;
		mes "[ ]";
		mes "................";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "һλƶ ϲһλŮ.. λŮ ϲϱˣ";
		mes "Ůϲ λƶȣӵ޷ȽϵĸȨ";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "˻ƵǣŮϲĸүڼδޣһͻȻǼү ǸŮģδ޾";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Ůܲ˱ѵĴűĺͶȥϲŮ ƶ ʼ𸴳ͷ";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "λӱ һرļǼĳҵ ǳҪļӰǸҵ";
		mes "ǸҵΪǸĴǣʵָ";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "ǸЩ ȡһЩְɣү ϣװ֣С ϣţƶ  ..";
		next;
		cutin "kh_Kyel03",2;
		mes "[ ]";
		mes "Ǻ... ǹ.. һ򵥵ֻΪ ^0000FFϣ^000000 λŮͬŮӵɣ";
		mes "ֻЩ? ɴתְȥС˵Ұ?";
		next;
		mes "[ ]";
		mes "Ҳںܾǰ ҼλŮҲһʶа ^0000FFϣ^000000 ĺλŮĺҲһ";
		next;
		mes "[ ]";
		mes "ҺλŮ ֻѣҺλŮʶ ֤? ";
		next;
		select("ͤϵõФø");
		cutin "kh_kyel02",2;
		mes "[ ]";
		mes "...? ....... õ..?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "  ʱФ񻭰";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Ǵ'^0000FFϣ^000000'ʬ ҵģŮ˵Ľָλʿļңҵ";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "λŮĽָм۸ߵļǮˣȫʶλŮ ?";
		next;
		cutin "kh_Kyel03",2;
		mes "[ ]";
		mes "............";
		mes "....ڱ֪..";
		next;
		mes "[ ]";
		mes "԰е ^0000FFϣ^000000 ģѹʵ ^0000FFϣ^000000ģΪҰλŮ..";
		next;
		mes "[ ]";
		mes "˵Ұϣװּ Ūû䣬ԼĻþֻһλеѧ߶ѰҶҵûʲôİ";
		next;
		mes "[ ]";
		mes "ʹʵǶʱ鰡ûв ϣװּ Ÿ̵ܹļû䰡";
		next;
		cutin "kh_kyel02",2;
		mes "'Ҫȷʵ֤ݣ'";
		mes "'Ǹø?'";
		next;
		select("ϣװּ Ф");
		mes "["+strcharinfo(0)+"]";
		mes "? 㿴Ф ϣװּ ֵģҲ ϣװּҵļ˰";
		next;
		mes "^FF0000 ^000000ĵĿһФ";
		next;
		cutin "kh_Kyel03",2;
		mes "[ ]";
		mes "ô? ҴûмЩ˰";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "^FF0000 ^000000ЯĻ... ˵... ǸЯ ͬһƷ";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Ϊʲôӵ Ǹ?";
		next;
		cutin "kh_kyel02",2;
		mes "[ ]";
		mes ".............";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "'˵'";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "˵ûв һû䰡..!  ׸磬ǵĻС ֱ練ư?";
		next;
		cutin "kh_Kyel03",2;
		mes "[ ]";
		mes "ܲ򵥰ǰҰǼŸŪûˣЩΪԩȥ ^0000FFϣ^000000";
		next;
		mes "[ ]";
		mes "ղķ˹ûбǸŮĵĻǸŮҸĻ˵ĻǸŮûɱĻ...";
		next;
		mes "[ ]";
		mes "ߣµļһ︴ д!!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Ůɱģĸ û";
		next;
		mes "[ ]";
		mes "ʲô?!!!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "㿴";
		next;
		select("ղķ˹ֽ ø");
		mes "[ ]";
		mes ".. ʲôֽ? ֽһ֤ղķ˹ûбǸŮ? ǲ֤? ǸŮûɱ!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "ôλŮǰһϣҲ 8 19  ˵˼......";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "ղķ˹λŮĽһҪ˽ 30ǰ 8 20.. ҷλŮʬҲ8 20գеְ?";
		mes "ôλŮǰһϣҲ 8 19  ˵˼......";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "ΪʲôλŮϲˣ˵һ˽ǰһϣȴҪĽˮ?";
		next;
		mes "[ ]";
		mes "ΪΪֻǸ ӵһʱѰ... ............. ........ ....";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "............ ..... ..";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "λŮĲΪǸ ˮģֽ ʵʵ";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Ҳǰһ죬Ҳ 8 19գȥߵ ԼĹϵ";
		next;
		mes "[ ]";
		mes ".............! ...ʲôѽ!! Լ֤ ﰡ!!!";
		next;
		select("K.H ֽ");
		mes "["+strcharinfo(0)+"]";
		mes "֤ݵĻ.... ﰡֽд819ϣԼڵһĵط ݰҲǸص.. ߰";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "дļ K.H ǣȷϹФ õļһģ֮ ׷ʲô?";
		next;
		cutin "kh_kyel02",2;
		mes "[ ]";
		mes "............. ....... .....";
		next;
		cutin "kh_Kyel03",2;
		mes "[ ]";
		mes "... ... ǰ... ... ..........";
		next;
		cutin "kh_kyel02",2;
		mes "[ ]";
		mes "ϣҵԼ˽ߣҶ˵ѱղķ˹ɣȻ͸һ˽";
		next;
		mes "[ ]";
		mes "ȴ˵ղķ˹ûбҲܾһ˽µ仰ʱҵô? ... Ǻܲʹ";
		next;
		mes "[ ]";
		mes "һվǰʱҿִָһ˲䣬ʵ̫˴ѽָˣҪͶȥ";
		next;
		mes "[ ]";
		mes "ȷͼ ҪһؽָֻСС֫ͻ.. ʱΪüĺ ɵػ....... ......... ";
		next;
		select(".........");
		mes "[ ]";
		mes ".. .. ";
		delitem 7499,1; //Family_Portrait
		delitem 7500,1; //Elysia_Portrait
		delitem 7501,1; //Kyll_Hyre_Letter2
		delitem 7502,1; //Piece_Memo_Of_James
		delitem 7503,1; //Man_Portrait
		set KielHyreQuest,70;
		close2;
		cutin "",255;
		end;
	}
	else if (KielHyreQuest <= 70) {
		cutin "kh_kyel01",2;
		mes "[ ]";
		mes "ڶ...";
		mes "ʱѾˣﻹŽָ....";
		mes "...";
		next;
		cutin "kh_kyel03",2;
		mes "[ ]";
		mes "Ҳ֪ʲô뷨ԼǽָҵȫƲָˣ";
		mes "ȻҾ... 뿪";
		mes "Ǹܵŵ";
		next;
		mes "[ ]";
		mes "뿪ŵ󣬱Ĵ˱˼ΪʲôҪ׷𵽴?еԭϣװּҵĹϵ...";
		mes "Լλղķ˹Եʰ";
		mes "򵽵";
		next;
		mes "[ ]";
		mes "ҾԲԭѾӵҪĶˣ^0000FFϣ^000000ҲҪõ";
		mes "λү...";
		mes "ʧȥжʱǶôѿ";
		mes "ȥİ^0000FFϣ^000000Щ";
		next;
		mes "[ ]";
		mes "Ȼ 1....";
		mes "^0000FFϣ^000000 ͼȥݷ׸";
		next;
		mes "[ ]";
		mes "׸Ҫ";
		mes "жṩˣǮȨаĳŪûķ....";
		mes "Եṩ е";
		next;
		mes "[ ]";
		mes "ҲŲ²⵽ǻʹӡɱȵȣЩ֪ʲôʱᱻѵĸȫװ";
		next;
		mes "[ ]";
		mes "Ǻ.....ܵ鵽㱳һĳЩ̨ɣǵҪʲô? ҵ? ǻеεͼ?";
		mes "ĻȫĶ?";
		mes "";
		next;
		select("....");
		cutin "kh_kyel01",2;
		mes "["+strcharinfo(0)+"]";
		mes "Ϊ ׸Ĺϵй ^0000FF^000000";
		next;
		mes "[ ]";
		mes "^0000FF^000000.... ĻŲ²⵽ģйС..";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "ѵҲ..е? 2...";
		next;
		mes "[ ]";
		mes "ǵģ^0000FF^000000ʹõѹħ 2 е.. ǾʧܺʹĿ һ޶ 2..";
		next;
		mes "[ ]";
		mes "ԶǺӻаⰡȡҺ ^0000FFϣ^000000֣Ϊ^0000FF^000000еĻеƾ趼ڸ";
		next;
		mes "[ ]";
		mes "Ŀǰ 3 еΣӵ׿Խʣ....ûнúˣֻһļ̳߶...";
		next;
		select("..........");
		mes "[ ]";
		mes "ĻеΣǾ紫ţƤɱ˱";
		mes "Ҳ໤ħ ŶصŲᱻ κ˲ģ....";
		next;
		mes "[ ]";
		mes "Ҷ ^0000FF^000000Űѧϰǿ׳иϵĲ";
		mes "һֱ";
		next;
		mes "[ ]";
		mes "ԲŻ 3 ŸƵĽѧϰ͸ ѧϰĸ";
		next;
		mes "[ ]";
		mes " ^0000FF^000000 3ǣȫǿ";
		next;
		mes "[ ]";
		mes "ħС";
		mes "ͻеںһС..";
		mes "Ǿ";
		mes "׸Ҫִе";
		mes "ʵͬ鰡..";
		next;
		mes "[ ]";
		mes "񿴰ɣ಻Ե...";
		next;
		mes "[ ]";
		mes ".....Ȼ";
		mes "ҲĹȥ...";
		mes "";
		mes "Ҳô...";
		mes "ֻǰһί ͺ";
		next;
		select("ί?");
		mes "[ ]";
		mes "ǰ..";
		mes "ίа.....";
		mes "ί";
		mes "ĵĿģ̫Ĳ";
		next;
		select("????");
		mes "[ ]";
		mes "赲^0000FF^000000ɣٲ뿴С";
		mes "ƻ";
		next;
		mes "[ ]";
		mes "Ȼ....";
		mes "ЩǶȷʵ.";
		mes "..";
		mes "ЩȵЩ鶼";
		mes "һԸܳͷ";
		next;
		select(":ί:ͷʾ");
		mes "[ ]";
		mes "лл㣬^0000FF^000000Ӧ ۡĵѽ";
		next;
		mes "[ ]";
		mes "ǸӸʱķ䣬ΪˣҶܽ뵽 Ŀռ";
		next;
		mes "[ ]";
		mes "ҵλӰɣǺӵ һƷɣôǺӵıͣס";
		next;
		select("Ʒ?");
		mes "[ ]";
		mes "^0000FFϣ^000000Ľָ..";
		mes "һ¶Ʒ...";
		mes "Ǻʱ";
		mes "Ϊ˲ҪǶ ϣװԹޣ";
		mes "ҶǺӵĸ飬Ǻ";
		mes "ֲָҪ";
		next;
		mes "[ ]";
		mes "һ Ʒѵģ͸ɣǿ 2 ĶֹͣĻе";
		next;
		mes "[ ]";
		mes "^0000FF^000000ϵĻʱʹģյʱǸӵزȡָ..";
		mes "";
		getitem 7504,1; //Toy_Motor
		next;
		cutin "kh_kyel03",2;
		mes "[ ]";
		mes "׼˵ĻҾͰ͵^0000FF^000000 ";
		set KielHyreQuest,74;
	}
	else if ((KielHyreQuest >= 74) && (KielHyreQuest <= 104)) {
		mes "[ ]";
		mes "׼?";
		next;
		switch(select("ǵ:û")) {
		case 1:
			mes "[ ]";
			mes "ô...Ͱ..";
			close2;
			enablenpc "Kiehl_Room_Warp";
			donpcevent "Kiehl_Room_Warp::OnEnable";
			end;
			break;
		case 2:
			mes "[ ]";
			mes "׼˵ĻҰ";
			break;
		}
	}
	else if ((KielHyreQuest >= 74) && (KielHyreQuest <= 106)) {
		cutin "kh_kyel01",2;
		mes "[ ]";
		mes "ûô?";
		next;
		if (countitem(7508) < 1) {
			mes "[ ]";
			mes "You mean... You don't have it?";
			mes "Please, retrieve Allysia's Ring";
			mes "from Kiehl's heart!";
			next;
			enablenpc "Kiehl_Room_Warp";
			donpcevent "Kiehl_Room_Warp::OnEnable";
			close2;
			cutin "",255;
			end;
		}
		mes "^FF0000 ^000000⼸ˣⷬ^FF00000 ^000000¶ʹı";
		next;
		if (sex == 0) {
			set .@KHTitle$,"С";
		}
		else set .@KHTitle$,"";
		mes "ôлл";
		mes ""+strcharinfo(0)+""+.@KHTitle$+"..";
		mes "ҲӲѾͬսˣ";
		mes "Ҳóҵĳ赲Ǻ";
		next;
		mes "[ ]";
		mes "ɣЩЩл..";
		next;
		mes "[ ]";
		mes "֪Һðٰһ飬һҵڹʱһ^0000FF^000000һģһ е";
		next;
		mes "[ ]";
		mes "ʱΪ^0000FF^000000ֻǱˣ̬Լĸ˶..Ļ֮";
		mes "Ҳ֪ΪǺӻʱʵ尡";
		next;
		mes "[ ]";
		mes "ҸһѿԽ뵽Կ׿ɣҼһ¹ɣȥһѵ^0000FF^000000";
		getitem 7509,1; //Fancy_Key_Card
		set KielHyreQuest,108;
		next;
		mes "[ ]";
		mes "ôףһ·Сİ";
		getitem 616,1;  //Old card Album
		delitem 7508,1; //Elysia_Ring
		getexp 1000000,0;
	}
	else if (KielHyreQuest >= 108) {
		mes "[ ]";
		mes "..................";
	}
	close2;
	cutin "",255;
	end;
}


//----------------------------------------------------------------------------
// Allysia
//----------------------------------------------------------------------------
kh_mansion,18,30,4	script	Allysia	894,{
	if (KielHyreQuest < 46) {
		mes "[ϣ]";
		mes "Who are you?";
		mes "How did you get here?";
		mes "Go away";
		close;
	}
	cutin "kh_ellisia",2;
	if (KielHyreQuest < 70) {
		mes "[ϣ]";
		mes "Ҫ йػеε˵?";
		next;
		switch(select("ǵ:Ҫ")) {
		case 1:
			mes "[ϣ]";
			mes "νеָ Լ˼ᶯΣڹȥкܶǣ˺ܶоʧܵ еѧľ";
			next;
			mes "[ϣ]";
			mes "ҵ 20꿪ʼо";
			mes "ܼ3͵ĻеΣЩͳΪ 123 еΰ";
			next;
			switch(select("1?:2?:3?")) {
			case 1:
				mes "[ϣ]";
				mes "'^0000FFϣ^000000'";
				mes "^FF0000 ^000000ĵ1";
				mes "е";
				next;
				mes "[ϣ]";
				mes "ڴĻе";
				mes "˹࣬";
				mes "Իѧɵ";
				mes "˹Ƥ";
				next;
				mes "[ϣ]";
				mes "ͷӦħ";
				mes "''ֲ룬";
				mes "ɵľͻеΣ";
				mes "ǵ1Ļе";
				next;
				mes "[ϣ]";
				mes "ΪлеĹϵ";
				mes "Ƚأ";
				mes "Ϊ޶ľ";
				mes "Բܴ¸ӵѧϰ";
				mes "ȱŲֳܱ";
				mes "еı";
				next;
				break;
			case 2:
				mes "[ϣ]";
				mes " 1 еǴӴ";
				mes "еѧεĻ";
				mes "ô 2 еָ";
				mes "ߵľ";
				mes "ʦ";
				mes "ȵо";
				mes "ɵµĻе";
				next;
				mes "[ϣ]";
				mes "͵1һûе";
				mes "˹Ϊԭ";
				mes "ʹ";
				mes "˹";
				next;
				mes "[ϣ]";
				mes "õ1ʹõ''";
				mes "ӵֲ10";
				mes "ЧԵ";
				mes "'ѹ'";
				mes "һ";
				mes "ѧϰ";
				next;
				mes "[ϣ]";
				mes "ǺܿϧҲ";
				mes "ѹĴ";
				mes "ʹ";
				mes "е֮䲻ЭĹϵ";
				mes "ʹÿĵ2 еΣ";
				mes "ɵĵ6쳣ж";
				mes "ֹͣ";
				next;
				break;
			case 3:
				mes "[ϣ]";
				mes "͵2 еβһǣ";
				mes "3 ^FF0000 ^000000 Ķӣ";
				mes "^0000FF^000000 ƵĿʽ";
				next;
				mes "[ϣ]";
				mes "ûʹûеģ";
				mes "Ǵ";
				mes "ʹø";
				mes "ֵƬ";
				mes "Ϊ˹Ķԭ";
				mes "һЩ";
				mes "ɵ";
				next;
				mes "[ϣ]";
				mes "ʹ 2ģ";
				mes "'ѹ'";
				mes "Ƴɵ";
				next;
				mes "[ϣ]";
				mes "Ȼ 2ľЧܽϵͣ";
				mes "Էǳţ";
				mes "ǰ۸񽵵͵";
				mes "µ͵";
				mes "'ѹ'";
				next;
				mes "[ϣ]";
				mes "'^FF0000^000000'";
				mes " 3Ļеε";
				mes "ʽ";
				mes "ڹΪ˴";
				mes "ͻеϵ";
				mes "ɳ״̬";
				next;
				mes "[ϣ]";
				mes "Ŀǰʹѧϰ";
				mes "ѧԺ";
				mes "鹲ͬ";
				mes "ڽʺϻ";
				mes "";
				next;
				break;
			}
		case 2:
			mes "[ϣ]";
			mes "ҪĻ˵һ";
			break;
		}
	}
	else {
		mes "[ϣ]";
		mes ".........";
	}
	close2;
	cutin "",255;
	end;
}

//----------------------------------------------------------------------------
// Abduction triggering NPC
//----------------------------------------------------------------------------
lighthalzen,188,200,0	script	Abduction_trigger	-1,3,1,{
//OnTouch2:
OnTouch:
	if (KielHyreQuest == 50) {
		mes "뿪ۡҪȥʱͷһʹʧȥ";
		close2;
		percentheal -99,0;
		warp "kh_mansion",30,75;
	}
	end;
}

//----------------------------------------------------------------------------
// Mysterious Woman "Mitchell Layla"
//----------------------------------------------------------------------------
kh_mansion,25,79,4	script	ɵŮ#kh	727,3,3,{

//OnTouch2:
OnTouch:
	if (KielHyreQuest == 50) {
		mes "ͷϸоһʹǰվһλ ɵŮ";
		next;
		mes "[??????]";
		mes " û뵽ôˣ ɼл";
		mes "֪ںûо ";
		next;
		mes "[??????]";
		mes "ӵĻ... Ҳܱİȫ 㷢ȷ 鱨ҪԱ";
		next;
		mes "[??????]";
		mes "'׸' '  ҵ'Щ쳣Ķ ڵ鵱";
		next;
		mes "[??????]";
		mes "ڼӹۡп ^FF0000 ^000000һεԻ ΪмҪѯ㣬 ԾǿӲķ ";
		next;
		mes "[??????]";
		mes "...ǿӲķ ˵һԲ .... ^FF0000 ^000000ʲôϵ?";
		next;
		switch(select("Ŀǰ˵:Ҳ̫")) {
		case 2:
			mes "[??????]";
			mes "ǲ?";
			mes "ܺ^FF0000 ^000000Ի";
			mes "κ˶ܰõİ....";
			mes "ǲ˺";
			mes "֪˵";
			next;
			mes "["+strcharinfo(0)+"]";
			mes ".................";
			next;
			mes "[??????]";
			mes "ⲢӲҪ";
			mes "ܽⰡ";
			mes "ҪЭ";
			mes "Ż׽⿪";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "....(ӻеƫ...)";
			next;
			mes "[??????]";
			mes "Ǻ....ð..";
			mes "㻹ǲ׵Ŀѽ";
			mes "";
			mes "ṩ鱨ɣ";
			mes "ԵҲ֪鱨";
			mes "ṩǰ";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "?....ʲô.......";
			next;
			mes "[??????]";
			mes "... Ҫκθ";
			mes "Ǳ˴˹鱨";
			mes "?";
			mes "ǰ֪鱨";
			mes "";
			next;
			mes "[??????]";
			mes "^FF0000 ^000000ǰ";
			mes "ʽԶе";
			mes "' ' ҵĻ᳤";
			next;
			mes "[??????]";
			mes "տʼǴӰ޿";
			mes "ССĵ濪ʼ";
			mes "Դ֮";
			mes "׸շ͸Ӵˣ";
			mes "һӹ˾ĸ";
			mes "Ӵ";
			next;
			mes "[??????]";
			mes "ʵǲʣ";
			mes "ô˵ҪĿ";
			mes "ʹ뿪ˣ";
			mes "Եʱ׸Ҫҵ";
			mes "޻໤ħȣ";
			mes "ȴһλû";
			mes "'^FF0000 ^000000'";
			mes "ȻΪ֮ĳֹ";
			mes "δʽ֤ʵ";
			next;
			mes "[??????]";
			mes "ʱͻȻļ̳ˣ";
			mes "'^0000FF ^000000'";
			mes "ûĴţ";
			mes "Ȼв²";
			mes "Ǹ^0000FFϣ^000000֮";
			mes "СҲһ..";
			mes "Ҳ....";
			next;
			mes "[??????]";
			mes "ֵ '^0000FF ^000000'";
			mes "ǳֳģأ";
			mes "òԡ..";
			mes "ȱκһ";
			next;
			mes "[??????]";
			mes "֪ӵʲô뷨";
			mes "'^0000FF^000000'ʼĳҵ";
			mes "Ҳ̸˵ʲôҵ";
			mes "ֻǳ˸ݺרѧԺ";
			next;
			mes "[??????]";
			mes "ԻĿ";
			mes "оϵ";
			mes "ҵǣͼѧԺҪԱ";
			mes "αװѧǱԵף";
			mes "Ƕܾˣ";
			mes "αװɹ¶ļ ĳɼ..";
			mes "ȫܾ";
			next;
			mes "[??????]";
			mes "....ֻһЩ";
			mes "ԤõĺƵģ";
			mes "һʱ֮ڲǰ";
			mes "'^0000FF^000000'ټ׸ߣ";
			mes "ҵǵ׳";
			mes "һܵľۻ";
			next;
			mes "[??????]";
			mes "ѯ˼ط";
			mes "ԼѼĳЩ鱨";
			mes "Ǹۻ'^0000FF^000000'";
			mes "µļƻ";
			next;
			mes "[??????]";
			mes "ǾǻеΣ";
			mes "ǴӼ໤ħɣ";
			mes "˼жֻеΣ";
			mes "ֵҪľۻ";
			mes "᳤ '^FF0000 ^000000'ȴ";
			mes "ȫӰ";
			next;
			mes "[??????]";
			mes " '^0000FFϣ^000000'Ҳһ";
			mes "Ǿ죬";
			mes "⼸쿴Ӱ '^FF0000 ^000000'";
			mes "ڹۡˣ";
			mes "һ";
			mes "";
			next;
			mes "[??????]";
			mes "Ǻһ '^0000FF^000000'";
			mes "оΪʽĳ";
			mes "ʧӰ";
			next;
			mes "[??????]";
			mes "ôܲȻ?";
			mes "֮ĳ̶ֳȵ";
			mes "н";
			mes "ĳı";
			mes "Ҳһ";
			next;
			mes "[??????]";
			mes "Ϊǵı";
			mes "׸յĹϵѽ";
			next;
			mes "[??????]";
			mes " Ұҷ֪鱨";
			mes "ˣڻ˵˰?";
			mes "㲻Ҫе";
			mes "ɵ˵";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "..... ҵ˼...";
			mes "........";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "ұ˵";
			mes "֪д򿪻ϻ";
			mes "..........";
			mes "...... ";
			next;
		case 1:
			mes "Ŀǰ ˵";
			mes "^FF0000^000000Ĺʱ ͻȻԼС";
			mes "......... .....";
			next;
			mes "[??????]";
			mes "..... ԭ.. йλŮ ......";
			next;
			mes "[??????]";
			mes "Ժ Ǿͺ";
			next;
			switch(select(":........")) {
			case 2:
				mes "[??????]";
				mes "Ҿ֪";
				mes "....νĬǳ..";
				mes "..";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "?";
				mes "ҵ..˼...";
				next;
				mes "[??????]";
				mes "...㲻Ҫ̫ģ";
				mes "˵İȫ";
				mes "ǻḺ𵽵׵ģ";
				mes "ֻҪЭ";
				mes "Ϳ";
				next;
				select("..ðǾӰ");
			case 1:
				mes "[??????]";
				mes "Ҿ֪";
				mes "...";
				mes "...һûҽܰ";
				mes "";
				mes "㷢ȷ 鱨";
				mes "'^0000FF ^000000'";
				mes "Ժָ";
				set KielHyreQuest,52;
				close;
			}
		}
	}
	else if (KielHyreQuest == 52) {
		mes "[]";
		mes "ðɣҾ͸㼸ɣ";
		mes "ȥŵĻԼ30ǰ";
		mes "λŮʿ^FF0000 ^000000";
		mes "^0000FFϣ^000000";
		next;
		mes "[]";
		mes "λŮʿ˵";
		mes "^0000FFϣ^00000030ǰɱˣ";
		mes "^FF0000 ^000000";
		mes "^0000FFϣ^000000 30ǰŮ";
		mes "Ȼһģһ";
		next;
		mes "[]";
		mes "Ȼһģһ";
		mes "Ī ^0000FFϣ^000000ģ";
		mes "ǲǾ";
		mes "...񼣬";
		mes "㵽ŵ";
		mes "λŮʿе";
		next;
		mes "[]";
		mes "鱨Ѽ˸ܼҶԻĻ쵽";
		next;
		mes "[]";
		mes "㶼׼˵Ļһרõķɿͧ㵽ŵ";
		set KielHyreQuest,54;
		close;
	}
	else if (KielHyreQuest == 54) {
		mes "[]";
		mes "ô? ׼?";
		next;
		switch(select("ǵ:û")) {
		case 1:
			mes "[]";
			mes "ôͰ~?";
			close2;
			warp "yuno",54,209;
			end;
		case 2:
			mes "[]";
			mes "ô׼õĻ˵";
			close;
		}
	}
	else if (KielHyreQuest == 64) {
		mes "[]";
		mes "˰";
		mes "дʲô鱨?";
		mes "ŵѼ鱨Ϊ";
		mes "ȫԵ˵";
		next;
		mes "[]";
		mes "Ȼ....";
		mes "ίи Եģ";
		mes "ЩΪ";
		mes "^FF0000 ^000000Ĺȥ̸۵Ļ";
		mes "ҲڳһЩ";
		mes "^0000FF^000000Ŀ ׸֮Ĺϵ";
		next;
		mes "[]";
		mes " ðɣ";
		mes "зΣյʱ";
		mes "ǵҪԱֱӹȥ";
		set KielHyreQuest,68;
		next;
		warp "kh_mansion",83,50;
		end;
	}
	else if (KielHyreQuest >= 68) {
		mes "[]";
		mes "ôû뿪?";
		next;
		warp "kh_mansion",83,50;
		end;
	}
}

//----------------------------------------------------------------------------
// Warp portal into Kiehl's 'Room'
// - Anyone can enter
// - After 30-40 seonds this NPC should be disabled.
//----------------------------------------------------------------------------
kh_mansion,29,27,0	script	Kiehl_Room_Warp	45,2,2,{
OnTouch:
	warp "kh_kiehl01",10,31;
	end;

OnEnable:
	initnpctimer;
	misceffect 215;
	end;

OnTimer30000:
	stopnpctimer;
	misceffect 215;
	disablenpc "Kiehl_Room_Warp";
	end;

OnInit:
	disablenpc "Kiehl_Room_Warp";
	end;
}

//============================================================================

//============================================================================
// Rosimier NPCs and other Related NPCs
//============================================================================

//----------------------------------------------------------------------------
// Odd Grandma
//----------------------------------------------------------------------------
yuno,257,140,4	script	ƿɵ 	846,{
	if (KielHyreQuest < 54) {
		mes "[]";
		mes "ǼСȥ?";
		mes "ѽ~ ѽ~";
		close;
	}
	else if (KielHyreQuest == 54) {
		mes "[]";
		mes "С С  С";
		mes "Ҫ ް Ҫ ް";
		mes " Ļ  ";
		mes "  ᱯ ";
		mes "˯ ˯  С";
		mes "Ҫ ް Ҫ ް";
		next;
		mes "[]";
		mes "С С  С";
		mes "Ҫ ް Ҫ ް";
		mes " Ļ ˮ ";
		mes "Ҳ  ˯Ű";
		mes "˯ ˯  С";
		mes "Ҫ ް Ҫ ް";
		next;
		switch(select("ʲô?:Сܰް?")) {
		case 1:
			mes "[]";
			mes "? ...";
			mes "ǼСһֱ޲˯...";
			mes "Ҫ˯ȴҪԶ";
			mes "һֱͣ..";
			mes "ҲҪȵС˯ˣ";
			mes "Ҳ°..";
			next;
			mes "[]";
			mes "ΪС˯Ҳû";
			mes "Լе..";
			mes "Ӵ.. һҪ ..";
			set KielHyreQuest,56;
			next;
			select("С?");
			mes "[]";
			mes "? ..Сܵȥ?";
			mes "ղŻﰡ...";
			mes "СӾ̫ĳȥˣ˰..";
			mes "! ԭⰡ";
			next;
			mes "[]";
			mes "˵׽Ū?";
			mes "!";
			mes "Ӵ.. ܱǸ";
			mes "С̫Ƥ...";
			//GetHEALTHSTATE VAR_CURSE 30
			close;
		case 2:
			mes "[]";
			mes "? ...";
			mes "Сÿ˵ԲŻޣ";
			mes "ĻͻصĻ";
			next;
			mes "[]";
			mes "Ϊʲôôϲˮ...";
			mes "˯~ ˯~  ^0000FFϣ^000000";
			mes "Ҫˣ˯";
			next;
			mes "[]";
			mes "Ϊ˯Ҳ°..";
			close;
		}
	}
	else if ((KielHyreQuest >= 56) && (KielHyreQuest < 60)) {
		mes "[]";
		mes "ǼСȥ?";
		mes "ѽ~ ѽ~";
		if (countitem(7500) < 1) { 
			close;
		}
		else {
			next;
			switch(select("ϣ? ѵ...")) {
			case 1:
				cutin "kh_ellisia_port",1;
				mes "ѰϣŵФø̿";
				next;
				cutin "",255;
				mes "[]";
				mes "?";
				mes "..! ^0000FFϣ^000000!!";
				mes "....ʶǼҰ?!";
				mes "ǼС?!?!";
				next;
				mes "[]";
				mes "ǼС... ǼҰ";
				mes "뿪֮Ҳûл!!";
				mes "֪ǼСĻ";
				mes "ظ?!?!";
				next;
				mes "[" + strcharinfo(0) + "]";
				mes "...Ф";
				mes "ܳһʱ";
				mes "ʼԼ";
				close;
			}
		}
	}
	else if (KielHyreQuest >= 60) {
		mes "[]";
		mes "Ǽ ^0000FFϣ^000000 ˯˰?";
		mes "? ʲôӶѽ?";
		mes "ǾͳԷ..";
		mes "˯ ˯~";
		close;
	}
}

//----------------------------------------------------------------------------
// Old Lady; gives you the key to the Rosimier Mansion
//----------------------------------------------------------------------------
yuno,250,132,0	script	#kh	711,{
	if (KielHyreQuest < 56) {
		mes "[]";
		mes "Ӵ ۰...";
		mes "Ͱ";
		mes "ȫԽ..ӴӴ..";
		close;
	}
	else if (KielHyreQuest == 56) {
		if (checkweight(7498,1) == 0) {
			mes "ͣһ !!";
			mes "ЯƷ̫ˣԲܻƷϵƷ֮ս";
			close;
		}
		mes "[]";
		mes "Ӵôİ...";
		next;
		switch(select("......:ѯйλ̵..")) {
		case 1:
			mes "[]";
			mes "Ҳѽ...ӴӴ..";
			close;
		case 2:
			mes "[]";
			mes "? .. λѽ? λǺҺѵĸװ'^0000FFϣ^000000'...";
			mes "ȴձ.. .. һλƯ...";
			next;
			mes "[]";
			mes "Դ¼֮ λܲǳͱǸˣ...";
			next;
			select("^3355FFϣ^000000С...?");
			mes "[]";
			mes "^0000FFϣ^000000....ĺƯ.. ΪͬŮ˿ Ҳᱻסѽ";
			next;
			mes "[]";
			mes "Χ ۺʿܶ࣬ϣװּҵĶ ղķ˹Ϊأݴ 鰡...";
			next;
			mes "[]";
			mes "ûΪ^0000FFϣ^000000Ĺϵȫˣÿϧ......";
			next;
			select("ϣװּ??");
			mes "[]";
			mes  ".. ϣװּŵ ʷƾõļ壬..... ^0000FFϣ^000000֮";
			mes "ǴҵʧܣüһϦ֮ Ϳ....";
			next;
			mes "[]";
			mes "Ǻ иۡԿȴұ...";
			next;
			select("ܽۡ?");
			mes "[]";
			mes "....";
			mes "ʵ˵ǲԵ..";
			mes "о ^0000FFϣ^000000죬ҾԿ׽㣬";
			mes "иǰԿ׻ѽ";
			getitem 7498,1; //Rosimier_Key
			set KielHyreQuest,58;
			close;
		}
	}

	else if ((KielHyreQuest == 58) &&
		(countitem(7499) < 1) || 
		(countitem(7500) < 1) || 
		(countitem(7501) < 1) || 
		(countitem(7502) < 1)) {
		mes "[]";
		mes "˵иҪѽһ";
		close;
	}

	else if ((KielHyreQuest == 58) &&
		(countitem(7499) == 1) && 
		(countitem(7500) == 1) && 
		(countitem(7501) == 1) && 
		(countitem(7502) == 1)) {
		mes "[]";
		mes "Ļ˳?ʵ˵ⷿ";
		mes "ûʲôֵǮĶͱЩծǶ";
		next;
		select("^0000FFϣ^000000Ϊʲô....?");
		mes "[]";
		mes "...";
		mes "ϴϣװּҵ ӣ";
		mes "Ҳ˵ղķ˹Ӧ^0000Fϣ^000000";
		mes "Ҫ?";
		next;
		mes "[]";
		mes "ʵղķ˹";
		mes "ڶδˣ";
		mes "ʱϾ֮";
		mes "͸δ޽";
		next;
		mes "[]";
		mes "Ϊĵ";
		mes "^0000Fϣ^000000ҵľɱ..";
		next;
		mes "[]";
		mes "Ҫ֪ϸڵĻȥ";
		mes "' ' ѧԺϱߵɣ";
		mes "ȥڽ߰^0000FFϣ^000000";
		mes "ʬȥ";
		delitem 7498,1; //Rosimier_Key 
		set KielHyreQuest,60;
		close;
	}
	else if (KielHyreQuest >= 60) {
		mes "[]";
		mes "Ҫ....";
		mes "ȫʹ..";
		close;
	}
}


//----------------------------------------------------------------------------
// Warp portal into Rosimier Mansion
//----------------------------------------------------------------------------
yuno,273,141,0	script	Rosimmir_Entrance	45,2,2,{
OnTouch:
	if (countitem(7498) < 1) {
		end;
	}
	else {
		warp "kh_rossi",20,92;
	}
	end;
}

//----------------------------------------------------------------------------
// Rosimier Mansion, first floor; Table
//----------------------------------------------------------------------------
kh_rossi,23,23,0	script	#khr2	111,{
	if (checkweight(7499,1) == 0) {
		mes "ͣһ !!";
		mes "ЯƷ̫ˣԲܻƷϵƷ֮ս";
		close;
	}
	if (KielHyreQuest < 58) {
		mes "һտյĳ";
		close;
	}
	else if (KielHyreQuest < 60) {
		if (countitem(7499) < 1) {
			cutin "kh_family_port",1;
			mes "鿴ĳǿԴ򿪵ģڳ﷢һ";
			getitem 7499,1; //Family_Portrait
		}
		else {
			mes "һտյĳ";
		}
	}
	else{
		mes "ֻǻüФ񻭵ĿճѣʲôƷ";
		close;
	}
	close2;
	cutin "",255;
	end;
}

//----------------------------------------------------------------------------
// Rosimier Mansion, first floor; Shelf
//----------------------------------------------------------------------------
kh_rossi,92,40,0	script	#khr	111,{
	if (checkweight(7500,1) == 0) {
		mes "ͣһ !!";
		mes "ЯƷ̫ˣԲܻƷϵƷ֮ս";
		close;
	}
	if (KielHyreQuest < 58) {
		mes "ʲôƷ";
		close;
	}
	else if (KielHyreQuest < 60) {
		if (countitem(7500) < 1) {
			mes "һסĳ";
			next;
			switch(select("ʹԿ:")) {
			case 1:
				switch(select("Կ 1:Կ 2")) {
				case 1:
					mes "ʹԿ׺ '!'һ";
					mes "뱻ˣ";
					mes "һλ";
					mes "Ů˵Ф񻭣";
					next;
					cutin "kh_ellisia_port",2;
					mes "Ů˵ĳ ^0000FFϣ^000000һģһ";
					mes "д 'ֿ ^0000FFϣ^000000..";
					mes "ղķ˹' ";
					getitem 7500,1; //Elysia_Portrait
					close2;
					cutin "",255;
					end;
				case 2:
					close;
				}
			case 2:
				mes "ʲôƷ";
				close;
			}
		}
		else {
			mes "ǷŮФ񻭵ĵط";
			close;
		}
	}
	else {
		mes "ǷŮФ񻭵ĵطʲôƷ";
		close;
	}
}


//----------------------------------------------------------------------------
// Rosimier Mansion, top floor; Desk
//----------------------------------------------------------------------------
kh_rossi,144,286,0	script	#khr3	111,{
	if (checkweight(7501,1) == 0) {
		mes "ͣһ !!";
		mes "ЯƷ̫ˣԲܻƷϵƷ֮ս";
		close;
	}
	if (KielHyreQuest < 58) {
		mes "3";
		close;
	}
	else if (KielHyreQuest < 60) {
		mes "3";
		next;
		switch(select("һ:ڶ::")) {
		case 1:
			mes "ʲôס˴򲻿";
			close;
		case 2:
			if (countitem(7501) < 1) {
				mes "򿪳󿴵ż";
				next;
				mes "д 'K.H' д Ҫд^0000FFϣ^000000";
				getitem 7501,1; //Kyll_Hyre_Letter2
				close;
			}
			else {
				mes "һյĳ";
				close;
			}
		case 3:
			mes "򿪳󿴵һֽ";
			next;
			mes "ż ղķ˹";
			mes "^0000FFϣ^000000ݣ";
			mes "^0000FFϣ^000000 ղķ˹";
			mes "õָƵ";
			close;
		case 4:
			mes ".......";
			close;
		}
	}
	else{
		mes "һĳ Ϳճ";
		close;
	}
}

//----------------------------------------------------------------------------
// Rosimier Mansion, top floor; Bookshelf
//----------------------------------------------------------------------------
kh_rossi,148,288,0	script	#khr2	111,{
	if (checkweight(7502,1) == 0) {
		mes "ͣһ !!";
		mes "ЯƷ̫ˣԲܻƷϵƷ֮ս";
		close;
	}
	if (KielHyreQuest < 58) {
		mes "ۻҳ";
		close;
	}
	else if (KielHyreQuest < 60) {
		if (countitem(7502) < 1) {
			mes "۲;У˼鱾ֽ";
			getitem 7502,1; //Piece_Memo_Of_James
			close;
		}
		else {
			mes "ۻҳ";
			close;
		}
	}
	else{
		mes ".......ۻЩҳ";
		close;
	}
}

//----------------------------------------------------------------------------
// Rosimier Mansion, top floor; Bed
//----------------------------------------------------------------------------
kh_rossi,154,286,0	script	#khr	111,{
	if (KielHyreQuest < 58) {
		mes "һٺõĴ̣ۻһҳԸо˵Ϣ";
		close;
	}
	else if (KielHyreQuest < 60) {
		mes "һٺõĴ̣ۻһҳԸо˵Ϣ";
		next;
		switch(select("鿴Ϸ:鿴·")) {
		case 1:
			mes "鿴Ϸʱһҳ";
			mes "........";
			next;
			mes "ûκγɹֻúе㲻";
			percentheal -10,0;
			close;
		case 2:
			mes "鿴·ʱ";
			mes "ĳһſĽָӣ";
			mes "ȴָ";
			close;
		}
	}
	else {
		mes "һҵĴ";
		close;
	}
}

//----------------------------------------------------------------------------
// Fisherman
//----------------------------------------------------------------------------
yuno_fild12,232,222,0	script		709,{
	if (KielHyreQuest < 60) {
		mes "[]";
		mes "";
		mes "ⰡԴפ֮";
		mes "ͱеˣѵ...";
		mes "Ӵ....";
		close;
	}
	else if (KielHyreQuest == 60) {
		mes "[]";
		mes "? ˭? ʲôҪ˵? ʲôҪίҵĻ ȸл л...";
		next;
		mes "[]";
		mes "....Щ...... 뿴һγԵʵƬ Ҳһʱ䰡...";
		if (countitem(544) >= 10)  {
			next;
			mes "[]";
			mes "? ˵ѽ? Ӵ Ҫ..... Ǻ...лл㣬ʲôĻֱҰ";
			next;
			select("30ǰ...");
			mes "[]";
			mes "? һ...30ǰ... ...ˣҲ... ȷ 30ǰ 8 20.....";
			mes "ŵհҼǵú";
			next;
			mes "[]";
			mes "һ... һͳˣûй оأһΪץ '!'";
			mes "֮ ȴһλŮʬ";
			next;
			mes "[]";
			mes "ŵֱӾͨŵľˣ֪λŮ ϲԼˣȻֱԾɱ Ӵ...һһﰡ";
			next;
			mes "[]";
			mes "ԵԱ Ůʬ̧ʱսŮ һ˸Ķ";
			next;
			mes "[]";
			mes "ǾԱ ûз־ֱ·ˣҵȵԱ֮ СĵĻȥѰ";
			next;
			mes "[]";
			mes "ô°ǳصĽָ ͵ﰡ?";
			next;
			mes "[]";
			mes "ôôÿ.. ʵ뵽 ʬﰡеëëģһѾˣ";
			mes "ŵ˻ҪĻȥ?";
			next;
			mes "[]";
			mes "һŰ֮ ׼Ϊŵأȴĳһλ Ŭܹ";
			mes "Ҿµ..ߵ";
			next;
			mes "[]";
			mes "ȵܵǰ һ󣬾 ǲ ŮʬأҾͻشǰ";
			next;
			mes "[]";
			mes " ûм񵽽ָ֮ĶҾ뵽״ǲе㲻̫Ծͼװʲô鶼֪";
			mes "ͻشʲôûм񵽰";
			next;
			mes "[]";
			mes "ͻȻӶ˵ ķǳҪǸָ޿ްأһ˵Ը Ը߼ؽָ";
			next;
			mes "[]";
			mes "˵ .. Ϊ˸߼Ǯļ۸ֻǾ˿ܿ... ԾͰǽָ λе";
			next;
			mes "ָǺܹȴû뵽һǮ֮뿪ˣ";
			mes "ҴϢ֮ ڴһЩĻе άϵ˰֮Ǹ˾ʧ...";
			next;
			mes "[]";
			mes "֮ȴ ҵļ";
			next;
			select("㻹ǵ˵?");
			mes "[]";
			mes "һ.... ... '?' '?' ...";
			next;
			mes "[]";
			mes "¸ѾõˣҲû鰡.... ĵطһǵ...";
			mes "'^FF0000ڶ ɭ  ¶Ӫظͤ^000000' ..";
			delitem 544,10; //Fish_Slice
			set KielHyreQuest,62;
			close;
		}
		else {
			close;
		}
	}
	else if (KielHyreQuest >= 62) {
		mes "[]";
		mes "ʲô˵ǲʲôط?";
		mes "찡... ˼ô";
		mes "ô..";
		mes "ٽһòס";
		next;
		mes "[]";
		mes "ղн";
		mes "'^FF0000ڶ ɭ ";
		mes "¶Ӫظͤ^000000'";
		mes "ô˵......";
		mes "ʲôҪҵ?";
		mes "йǼ";
		mes "ҲûпɻĆ..";
		close;
	}
}

//----------------------------------------------------------------------------
// Kiel Hyre's hut; Wooden Board
//----------------------------------------------------------------------------
yuno_fild09,158,217,0	script	ľ#kh	111,{
	if (checkweight(7503,1) == 0) {
		mes "ͣһ !!";
		mes "ЯƷ̫ˣԲܻƷϵƷ֮ս";
		close;
	}
	if ((KielHyreQuest < 62) || (KielHyreQuest >= 64)) {
		mes "ûʲôõľڲݴ";
		close;
	}
	else if (KielHyreQuest == 62) {
		mes "ų͵ľ壬ľϸд K.H ";
		next;
		mes "Ϊ˹۲ľƶ";
		mes "ﻭŲ֪";
		mes "˵Ф񻭣";
		next;
		cutin "kh_kyel_port",2;
		mes "......оϸ";
		mes "^FF0000 ^000000";
		mes "";
		getitem 7503,1;	//Man_Portrait
		set KielHyreQuest,64;
		next;
		cutin "",255;
		mes "ۻ˲ٵ鱨";
		mes "ص ''߰";
		close;
	}
}

//============================================================================
// Kiehl Hyre's Room and Boss NPCs
//============================================================================
// Beyond here the NPC for the final areas.
// Now, this area is not someplace you wanna slow down so
// you can pick up dialog. I used packet logging to pull
// what I could and for the sake of the two people with me,
// did not bother doing all the proper NPC positioning
// or some of the 'error/wrong option' dialogs.
// All the doors are kind of weird.
//============================================================================

//----------------------------------------------------------------------------
// ķ; Receiver (Gives black keycards upon killing mobs)
//----------------------------------------------------------------------------
kh_kiehl01,17,39,0	script	Ѷ#kh	111,{
	if (mobcount("kh_kiehl01","Receiver#kh::OnMyMobDead") < 1) {
		mes "֨...֨֨...֨....";
		if (KielHyreQuest == 74) {
			next;
			mes "Ѷﴫ";
			mes "ĳ˵";
			next;
			mes "[????]";
			mes "ûװ...";
			mes "ǸĴ̿...";
			mes "ô...";
			mes "Ϊ˳Ľͣ";
			mes "ҲһҵľҲһ";
			mes " ˳Ұ";
			set KielHyreQuest,76;
		}
		close2;
		monster "kh_kiehl01",16,32,"ɪ",1739,1,"Ѷ#kh::OnMyMobDead";
		monster "kh_kiehl01",18,31,"",1740,1,"Ѷ#kh::OnMyMobDead";
		end;
	}

	else {
		end;
	}

OnMyMobDead:
	if (mobcount("kh_kiehl01","Ѷ#kh::OnMyMobDead") <1) { 
		makeitem 7506,1,"this",19,36;
	}
	end;
}

//----------------------------------------------------------------------------
// ķ; Flower Vase (Gives...password...for Box)
//----------------------------------------------------------------------------
kh_kiehl01,13,40,0	script	ƿ#kh1	111,{
	if (KielHyreQuest < 74) {
		mes "зŻƿ";
		close;
	}
	if (KielHyreQuest >= 74) {
		mes "зŻƿ";
		next;
		switch(select("̧ƿ:ƻƿ:ѻƿ")) {
		case 1:
			mes "ûκζ";
			close;
		case 2:
			mes "ƣ";
			mes "......׸յƷ?";
			close;
		case 3:
			mes "ƿײд ر";
			mes "'^FF0000The rabbit often observes the door.'";
			mes "'The night eats the pickled orange.^000000'";
			close;
		}
	}
	else{
		mes "ƿײд ر";
		mes "'^FF0000The rabbit often observes the door.'";
		mes "'The night eats the pickled orange.^000000'";
		close;
	}
}


//----------------------------------------------------------------------------
// ķ; Box
//----------------------------------------------------------------------------
kh_kiehl01,19,25,0	script	#kh1	111,{
	if (checkweight(7505,1) == 0) {
		mes "ͣһ !!";
		mes "ЯƷ̫ˣԲܻƷϵƷ֮ս";
		close;
	}
	if (KielHyreQuest < 74) {
		mes "һرյӣдֵΪԿ׵";
		next;
		input .@KHInput$;
		mes "'~' İŴ";
		close;
	}
	if (KielHyreQuest >= 74) {
		if (countitem(7505) < 1) {
			mes "һرյӣдֵ ΪԿ׵";
			next;
			input .@KHInput$;
			if (.@KHInput$ == "open the door") {
				mes "ʱ ''һ ﴫˣ ^FF0000СԿ^000000";
				getitem 7505,1; //Toy_Key
				close;
			}
			else {
				mes "~' İŴ";
				close;
			}
		}
		else {
			mes "򿪵ûκζ";
			close;
		}
	}
	else{
		mes "򿪵ûκζ";
		close;
	}
}

//----------------------------------------------------------------------------
// ķ; Big Door, (First)
// - Anyone can pass through this door
// - Consume one Black KeyCard when opened.
// - Only one person actually needs to open it.
//----------------------------------------------------------------------------
kh_kiehl01,44,33,0	script	޴#BigDoorKHQ1	111,{
	if (.KHDoor1Opened == 0) {
		mes "ǹرյģڰǱ߿ϸС";
		next;
		input .@KHInput$;
		if (.@KHInput$ == "ɫԿ׿") {
			if (countitem(7506) >= 1) {
				mes "^0000FFɫԿ׿^000000תʱ ''һ ſ";
				delitem 7506,1; //Black_Key_Card
				donpcevent "Big_Door_1_Warp::OnEnable";
				enablenpc "Big_Door_1_Warp";
				set .KHDoor1Opened,1;
				close;
			}

		}
		mes "򲻿";
		close;
	}

	else {
		mes "Ѿ";
		close;
	}
}

kh_kiehl01,43,33,0	script	Big_Door_1_Warp	45,1,1,{
OnEnable:
	initnpctimer;
	misceffect 215;
	end;

OnInit:
	disablenpc "Big_Door_1_Warp";
	end;

OnTimer30000:
	stopnpctimer;
	misceffect 215;
	disablenpc "Big_Door_1_Warp";
	set getvariableofnpc(.KHDoor1Opened,"޴#BigDoorKHQ1"),0;
	end;

OnTouch:
	warp "kh_kiehl01",55,33;
	end;
}

//----------------------------------------------------------------------------
// ķ; Big Door, (second)
// - Consume Toy Key when opened.
// - Only one person actually needs to open it.
//----------------------------------------------------------------------------
kh_kiehl01,174,40,0	script	޴#BigDoorKHQ2	111,{
	if (.KHDoor2Opened == 0) {
		mes "ǹرյ";
		next;
		input .@KHInput$;
		if (.@KHInput$ == "Կ") {
			if (countitem(7505) >= 1) {
				mes "^FF0000Կ^000000תʱ ''һ ſ";
				delitem 7505,1; //Toy_Key
				donpcevent "Big_Door_2_Warp::OnEnable";
				enablenpc "Big_Door_2_Warp";
				set .KHDoor2Opened,1;
				close;
			}

		}
		mes "򲻿";
		close;
	}
	else {
		mes "Ѿ";
		close;
	}
}

kh_kiehl01,174,39,0	script	Big_Door_2_Warp	45,1,1,{
OnEnable:
	initnpctimer;
	misceffect 215;
	end;

OnInit:
	disablenpc "Big_Door_2_Warp";
	end;

OnTimer30000:
	stopnpctimer;
	misceffect 215;
	disablenpc "Big_Door_2_Warp";
	set getvariableofnpc(.KHDoor2Opened,"޴#BigDoorKHQ2"),0;
	end;

OnTouch:
	warp "kh_kiehl01",173,52;
	end;
}

//----------------------------------------------------------------------------
// ķ; Big Door, (Third)
// - Consume one Black KeyCard when opened.
// - Only one person actually needs to open it.
//----------------------------------------------------------------------------
kh_kiehl01,77,108,0	script	޴#BigDoorKHQ3	111,{
	if (.KHDoor3Opened == 0) {
		mes "^3355FFThe door is locked,";
		mes "but there is a narrow";
		mes "slot next to the doorknob.^000000";
		next;
		input .@KHInput$;
		if (.@KHInput$ == "ɫԿ׿") {
			if (countitem(7506) >= 1) {
				mes "^0000FFɫԿ׿^000000תʱ ''һ ſ";
				delitem 7506,1; //Black_Key_Card
				donpcevent "Big_Door_3_Warp::OnEnable";
				enablenpc "Big_Door_3_Warp";
				set .KHDoor3Opened,1;
				close;
			}

		}
		mes "򲻿";
		close;
	}
	else {
		mes "Ѿ";
		close;
	}
}

kh_kiehl01,78,108,0	script	Big_Door_3_Warp	45,1,1,{
OnEnable:
	initnpctimer;
	misceffect 215;
	end;

OnInit:
	disablenpc "Big_Door_3_Warp";
	end;

OnTimer30000:
	stopnpctimer;
	misceffect 215;
	disablenpc "Big_Door_3_Warp";
	set getvariableofnpc(.KHDoor3Opened,"޴#BigDoorKHQ3"),0;
	end;

OnTouch:
	warp "kh_kiehl01",68,108;
	end;
}

//----------------------------------------------------------------------------
// ķ; Big Door, (Fourth)
// - Consume TWO Black KeyCard when opened.
// - Only one person actually needs to open it.
//----------------------------------------------------------------------------
kh_kiehl01,42,177,0	script	޴#BigDoorKHQ4	111,{
	if (.KHDoor4Opened == 0) {
		mes "^3355FFThe door is locked,";
		mes "but there is a narrow";
		mes "slot next to the doorknob.^000000";
		next;
		input .@KHInput$;
		if (.@KHInput$ == "ɫԿ׿") {
			if (countitem(7506) >= 2) {
				mes "^0000FFɫԿ׿^000000תʱ ''һ ſ";
				delitem 7506,2; //Black_Key_Card
				donpcevent "Big_Door_4_Warp::OnEnable";
				enablenpc "Big_Door_4_Warp";
				set .KHDoor4Opened,1;
				close;
			}
		}
		mes "򲻿";
		close;
	}

	else {
		mes "Ѿ";
		close;
	}
}

kh_kiehl01,41,177,0	script	Big_Door_4_Warp	45,1,1,{
OnEnable:
	initnpctimer;
	misceffect 215;
	end;

OnInit:
	disablenpc "Big_Door_4_Warp";
	end;

OnTimer30000:
	stopnpctimer;
	misceffect 215;
	disablenpc "Big_Door_4_Warp";
	set getvariableofnpc(.KHDoor4Opened,"޴#BigDoorKHQ4"),0;
	end;

OnTouch:
	warp "kh_kiehl01",49,177;
	end;
}

//----------------------------------------------------------------------------
// ķ; Robots
//----------------------------------------------------------------------------
kh_kiehl01,15,179,0	script	е#kh1	111,{
	if (mobcount("kh_kiehl01","Robots#kh1::OnMyMobDead") < 1) {
		mes "ܺ󣬻еǾ";
		close2;
		monster "kh_kiehl01",18,181,"",1740,1,"е#kh1::OnMyMobDead";
		monster "kh_kiehl01",18,180,"ɪ",1739,1,"е#kh1::OnMyMobDead";
		monster "kh_kiehl01",18,179,"",1740,1,"е#kh1::OnMyMobDead";
		monster "kh_kiehl01",18,178,"ɪ",1739,1,"е#kh1::OnMyMobDead";
		end;
	}
	else  {
		end;
	}

OnMyMobDead:
	if (mobcount("kh_kiehl01","е#kh1::OnMyMobDead") < 1) { 
		makeitem 7506,1,"this",18,180;
		}
	end;
}

//----------------------------------------------------------------------------
// ķ; Dummy Robots
//----------------------------------------------------------------------------
kh_kiehl01,15,177,0	script	е#kh2::RobotsKHQ	111,{
	end;
}
kh_kiehl01,15,180,0	duplicate(RobotsKHQ)	е#kh3	111
kh_kiehl01,15,182,0	duplicate(RobotsKHQ)	е#kh4	111
kh_kiehl01,35,187,0	duplicate(RobotsKHQ)	е#kh5	111
kh_kiehl01,37,187,0	duplicate(RobotsKHQ)	е#kh6	111
kh_kiehl01,39,187,0	duplicate(RobotsKHQ)	е#kh7	111
kh_kiehl01,41,187,0	duplicate(RobotsKHQ)	е#kh8	111

//----------------------------------------------------------------------------
// ķ; Big Door, (Fifth, and final)
// - Anyone can pass through this door
// - Consumes 4 Solid Iron Pieces
//----------------------------------------------------------------------------
kh_kiehl01,166,187,0	script	޴#BigDoorKHQ5	111,{
	if (($@KHQuestBusy == 0) && (KielHyreQuest >= 74) && (KielHyreQuest <= 106)) {
		if (KielHyreQuest < 86) {
			mes "һ޴ţźƶ'֧֨~֧֨'";
			next;
			select("::ҡ::̧");
			mes "֮ħǾͳˣѵʲô?";
			close2;
			set @KHDoorPushAttempt,@KHDoorPushAttempt+1;
			monster "kh_kiehl01",163,183,"ɪ",1739,1;
			monster "kh_kiehl01",163,179,"",1740,1;
			monster "kh_kiehl01",169,183,"ɪ",1739,1;
			monster "kh_kiehl01",169,179,"",1740,1;
			if (@KHDoorPushAttempt >= 3) { 
				set KielHyreQuest,86; 
			}
			end;
		}
		else if ((KielHyreQuest > 84) && (KielHyreQuest < 94)) {
			mes "źü֮󣬳صĿˣŷĻǿԿ";
			next;
			switch(select(":Ƭ:ӲƬ:Ƭ:˿:")) {
			case 1:
			case 2:
				break;
			case 3:
				if (countitem(7507) >= 1) {
					if (KielHyreQuest < 92) {
						mes "΢һ㣬";
						mes "õĻŻῪ";
						delitem 7507,1; //Hard_Piece_of_Steel
						set KielHyreQuest,KielHyreQuest+2;
						close;
					}
					else if (KielHyreQuest == 92) {
						mes "ʹ^0000FFӲƬ^000000֮";
						mes "γһԴԽĿռ";
						delitem 7507,1; //Hard_Piece_of_Steel
						set KielHyreQuest,94;
						close;
					}
				}
				else {
					mes "Ÿûڶ";
					close;
				}
			case 4:
			case 5:
			case 6:
				mes "Ÿûڶ";
				close;
			}

			mes "Ÿûڶ";
			close;
		}
		else if ((KielHyreQuest >= 94) && (KielHyreQuest <= 104)) {
			if (.KHDoor5Opened == 0) {
				mes "Խ";
				next;
				switch(select("ǵ:Ҫ")) {
				case 1:
					close2;
					donpcevent "Big_Door_5_Warp::OnEnable";
					enablenpc "Big_Door_5_Warp";
					set .KHDoor5Opened,1;
					end;
				case 2:
					close;
				}
			}
			else {
				mes "Ѿ";
				close;
			}
		}
		else {
			mes "޴Źر";
			close;
		}
	}
	else {
		mes "Źرյĺܽ򲻿";
		close;
	}
}

kh_kiehl01,166,186,0	script	Big_Door_5_Warp	45,1,1,{
	end;

OnEnable:
	initnpctimer;
	misceffect 215;
	end;

OnTimer30000:
	stopnpctimer;
	misceffect 215;
	disablenpc "Big_Door_5_Warp";
	set getvariableofnpc(.KHDoor5Opened,"޴#BigDoorKHQ5"),0;
	end;

OnInit:
	disablenpc "Big_Door_5_Warp";
	end;

OnTouch:
	if (KielHyreQuest >= 46)
		warp "kh_kiehl02",50,7;
	else
		warp "kh_kiehl01",166,183;
	end;
}

//----------------------------------------------------------------------------
// ķ; Kiehl_Room_Trap (Entry way trap)
//----------------------------------------------------------------------------
kh_kiehl02,49,10,0	script	Kiehl_Room_Trap	-1,5,3,{
	end;

OnTouch:
	if (.KHTrapSprung < 1) {
		set .KHTrapSprung,1;
		set $@KHQuestBusy,1;
		initnpctimer;
		monster "kh_kiehl02",47,13,"",1740,1;
		monster "kh_kiehl02",45,13,"ɪ",1739,1;
		monster "kh_kiehl02",49,13,"ħ",1745,1;
		monster "kh_kiehl02",51,13,"",1740,1;
		monster "kh_kiehl02",53,13,"ɪ",1739,1;
		monster "kh_kiehl02",49,13,"ħ",1745,1;
	}
	end;

OnTimer300000:
OnTimer600000:
OnTimer900000:
	if (getmapusers("kh_kiehl02") == 0) {
		donpcevent "KiehlRoom::OnReset";
		stopnpctimer;
	}
	end;

OnTimer1200000:
	donpcevent "KiehlRoom::OnReset";
	stopnpctimer;
	end;

OnGlobalTimerOff:
	stopnpctimer;
	end;
}

//----------------------------------------------------------------------------
// ķ; Kiehl
// - Timer will drop to 3 minutes once Kiehl is defeated.
//----------------------------------------------------------------------------
kh_kiehl02,50,52,4	script	#Original	902,{
	if (checkweight(908,200) == 0) {
		mes "ͣһ !!";
		mes "ЯƷ̫ˣԲܻƷϵƷ֮ս";
		close;
	}
	cutin "kh_kiel01",2;
	if ((KielHyreQuest < 94) || (KielHyreQuest >= 106)) {
		mes "[]";
		mes ".............";
		close2;
		cutin "",255;
		end;
	}
	if ((KielHyreQuest == 94) && (getvariableofnpc(.KHKilled,"KiehlRoom") < 5)) {
		mes "[]";
		mes "ҵˣ⺮̿ʹүҲ밴Լҵľ..";
		next;
		mes "[]";
		mes "ǸߵĻֻʣǵ壬ҪĻֱʵ";
		close2;
		cutin "",255;
		set getvariableofnpc(.KHKilled,"KiehlRoom"),0;
		monster "kh_kiehl02",50,52,"",1740,1,"KiehlRoom::OnKiehlMobDead";
		monster "kh_kiehl02",50,52,"ɪ",1739,1,"KiehlRoom::OnKiehlMobDead";
		monster "kh_kiehl02",50,52,"ħ",1745,1,"KiehlRoom::OnKiehlMobDead";
		monster "kh_kiehl02",50,52,"",1740,1,"KiehlRoom::OnKiehlMobDead";
		monster "kh_kiehl02",50,52,"ɪ",1739,1,"KiehlRoom::OnKiehlMobDead";
		monster "kh_kiehl02",50,52,"ħ",1745,1,"KiehlRoom::OnKiehlMobDead";
		monster "kh_kiehl02",50,52,"",1740,1,"KiehlRoom::OnKiehlMobDead";
		hideonnpc "#Original";
		end;
	}
	else if ((KielHyreQuest == 94) && (getvariableofnpc(.KHKilled,"KiehlRoom") >= 5)) {
		cutin "kh_kiel03",2;
		mes "[]";
		mes "ȻǰְѡеĴ̿ʵ?";
		mes "ðɣҲģ";
		mes "ҰֵίЩ?";
		mes "ǲǽɱ?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "^FF0000 ^000000ֹ㣬";
		mes "ԼĹʧǳʹѽ";
		mes "ڸֹͣһ˰ɣ";
		mes "^0000FF^000000һصϰֵ߰";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "۸ͬ尡ǲԵ!";
		next;
		cutin "kh_kiel01",2;
		mes "[]";
		mes "ͬ尡..";
		mes "ҲһĴ࣬Ĵǻе";
		next;
		mes "[]";
		mes "ΪֵͬɱʵǣΪҵĿ꣬ҰͬṩҪǣ";
		mes "Һʲôͬ?";
		next;
		mes "[]";
		mes "Ȼǣźһûѧϰ֮ǰǲܵ飬ʹʹ඼о";
		next;
		cutin "kh_kiel04",2;
		mes "[]";
		mes "ǲһģǰоʹ࣬Ϳ߸Լͬ ' '໹ǲǲѽ..";
		mes "ͷԵĻͻ֪";
		next;
		mes "[]";
		mes "ܱǸҪܾ᰸ΪһŤİ飬ȴһͥĲ̵ĸףҲܱõ";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "ǰȻҲȴ֪ڸĵ˰^0000FF^000000Яֺ׸ǣĴ";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "ֹͣװ!ټİǵĻӸ಻ҵѽ";
		next;
		cutin "kh_kiel02",2;
		mes "[]";
		mes "㻹ǵýʱĵһ?װСƷǸ..";
		next;
		mes "[]";
		mes "ұʱķ䰡ΪʲôֻһλƷȴ˫?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "?????";
		next;
		cutin "kh_kiel03",2;
		mes "[]";
		mes "2Ļе̨ĹϵѽǴӸճһ쿪ʼͱ׸ǲְԱܵ";
		next;
		mes "[]";
		mes "ǻе˵һϽĽ.. 顢ѧϰ顢״ͬĸ..";
		next;
		mes "[]";
		mes "ҲǺӵеȱ..ǴĽ⣬λѧϰ鵱в";
		next;
		mes "[]";
		mes "ֻ֮һλҸ׶ʱûֵңΪȡ ^0000FF^000000";
		next;
		mes "[]";
		mes "׸? ǵЩжұκ˶֪Ҳԩǵ";
		next;
		mes "[]";
		mes "Ϊıʣվĺӵеı˼ҸֶǾı԰!";
		next;
		mes "[]";
		mes "... Բ ԲҲٸ˵ˣһߵģͻȥ";
		next;
		cutin "",255;
		mes "[]";
		mes "Ӱ!^0000FF ^000000!";
		mes "ǰ˽в";
		set KielHyreQuest,100;
		hideoffnpc "#KiehlRoom";
		hideoffnpc "ҪԱ#KHAgent1";
		hideoffnpc "ҪԱ#KHAgent2";
		hideoffnpc "ҪԱ#KHAgent3";
		hideoffnpc "ҪԱ#KHAgent4";
		next;
	}
	if ((KielHyreQuest == 100) && (getvariableofnpc(.KHKilledBoss,"KiehlRoom") < 1)) {
		set getvariableofnpc(.KHKilledBoss,"KiehlRoom"),0;
		cutin "kh_kiel01",2;
		mes "[]";
		mes "Ӵ Ӵ..";
		mes "˾?ǲԹԵĻȥ..ֻ㳢ͷ..";
		next;
		mes "[]";
		mes "";
		mes "ĹԱǣʱȲҪ";
		next;
		donpcevent "::OnKHSpiderWeb";
		mes "[]";
		mes "!!!ϵ..!!";
		next;
		cutin "kh_kiel03",2;
		mes "[]";
		mes "ô̿ҿһʵ?";
		close2;
		cutin "",255;
		monster "kh_kiehl02",50,52,"",1733,1,"KiehlRoom::OnKiehlDead";
		hideonnpc "#Original";
		end;
	}
	else if ((KielHyreQuest == 100) && (getvariableofnpc(.KHKilledBoss,"KiehlRoom") == 1)) {
		cutin "kh_kiel02",2;
		mes "[]";
		mes "Ӵ....";
		mes "....̫..";
		mes "ȻǮİְ";
		mes "Ĵ̿ǲһ..";
		next;
		cutin "kh_kiel03",2;
		mes "[]";
		mes "ǺǺ....Ҿǲ";
		mes "ЩһҸˣͺȥɣǺǺ...";
		mes "û갡";
		mes "ӦֻǲŻȥ...";
		mes "ǺǺ..";
		next;
		mapannounce "kh_kiehl02","~ ¶~¶¶¶~ Ͽ~",bc_map,"0xFF0000";
		mes "[]";
		mes "!!!!";
		next;
		mes "[]";
		mes "!!!!! ű!!ܴȥ!";
		next;
		mes "[]";
		mes "....Ƕɰɫҽ~";
		next;
		mes "[]";
		mes "ڸѽ!Ͽʹ^FF0000 ^000000Ķװð!!!!!";
		next;
		mapannounce "kh_kiehl02","~ ~",bc_map,"0xFF0000";
		mes "[]";
		mes "Ӵ ұǴˣûйϵӵԱװõ˲Ұ...";
		mes "";
		next;
		mes "[]";
		mes "ʲô?!ѵк̨!";
		mes "Ӧò ׸ռҰ!!";
		next;
		mes "[????]";
		mes "Ӵ Ӵ....";
		mes "˵ ׸հ....";
		mes "е㲻ðһİѱͳȥӭ..";
		next;
		mes "[]";
		mes "˭! ݰ!!";
		next;
		mes "[????]";
		mes "Ӵ Ӵ...ôͰҵ?";
		next;
		mes "[]";
		mes "...ѵ!!!";
		next;
		hideoffnpc "#Copy";
		next;
		cutin "kh_kiel01",0;
		mes "[]";
		mes "Цеͷˣ˼ʽĸܣҽ^0000FF ^000000";
		next;
		mes "[]";
		mes "...ô....^0000FF^000000λ!!";
		next;
		cutin "kh_kiel03",2;
		mes "[]";
		mes "Ӵ....ˣǻеΰ^0000FF ^000000С...";
		next;
		mes "[]";
		mes "???!ô֪...";
		next;
		mes "[]";
		mes "ѵ....ΪΪֻǲм?";
		next;
		mes "[]";
		mes "ܱǸС";
		next;
		mes "[]";
		mes "˹!";
		mes "ô.......֮ǰˣӪͳﰡ..";
		next;
		mes "[˹]";
		mes "Ϊ͸΢ģС㣬Ҫŵ㣬ӦòͻȻֵ?";
		next;
		mes "[]";
		mes "Ӵ 찡.... ô׵ı... ǳǸͳ...";
		next;
		mes "[]";
		mes "Ӵ Ӵ....Ůˣǲʿ..";
		mes "ܿϧܶһ㣬ʱʣ";
		next;
		cutin "kh_kiel01",2;
		mes "[]";
		mes "ԱװѾˣ5Ӻʧģ^0000FF ^000000Сϣܸһ뿪";
		next;
		mes "[]";
		mes "Ҷ㷢ȷµͳĿǰ뷨еܺ氡";
		next;
		mes "[]";
		mes "^0000FF^000000СͰˣ!";
		mes "ȻҪŮ֣صͻȥ";
		next;
		mes "[˹-]";
		mes ".......";
		next;
		mes "[]";
		mes "ſ!";
		mes "ְ ˹!!";
		hideonnpc "#KiehlRoom";
		hideonnpc "ҪԱ#KHAgent1";
		hideonnpc "ҪԱ#KHAgent2";
		hideonnpc "ҪԱ#KHAgent3";
		hideonnpc "ҪԱ#KHAgent4";
		next;
		cutin "kh_kiel02",2;
		mes "[]";
		mes "һ...ڸʣµһ?";
		next;
		mes "[]";
		mes ".....ô찡...ûʣ¶ʱ䰡Դ̿е㲻˼ûʱ";
		next;
		cutin "kh_kiel04",2;
		mes "[]";
		mes "￴ӿҪˣһ뿪ȽϺ";
		next;
		mes "[]";
		mes "мȻѾˣ԰һҸ?";
		next;
		cutin "kh_kiel01",2;
		mes "[]";
		mes "Ҹ׻ҵó^FF0000ָ^000000?ҵһοʱҲһ";
		next;
		mes "[]";
		mes "һܱƷ..粻Сıƻ˵Ļ֪Ҫô....";
		next;
		mes "[]";
		mes "23ˣڿϢˣ ^0000FF^000000..";
		next;
		specialeffect EF_DEVIL;
		next;
		mes "[]";
		mes "Ϊ˱ʾûй˼Ͱҵı뿪ˣ^FF0000ָ^000000ȡøҸװ";
		next;
		mes "[]";
		mes "ӸõڻڿʼҺҸûκεԵϵˣת";
		next;
		mes "[]";
		mes "ѾҸͼĵ2зĵ 4ʽ";
		next;
		mes "[]";
		mes "תĻ ģֻʣ3ˣҰѳȥ·Ϊ㿪 ȥ..ôټ..";
		delitem 7504,1; //Toy_Motor
		set KielHyreQuest,104;
		hideonnpc "#Copy";
		donpcevent "Kiehl_Room_Exit::OnEnable";			
		enablenpc "Kiehl_Room_Exit";
		initnpctimer;
		cutin "",255;
		close;
	}
	if (KielHyreQuest == 104) {
		cutin "kh_kiel02",2;
		mes "Ӳж ^0000FF^000000  ^FF0000ָ^000000ó";
		getitem 7508,1; //Elysia_Ring
		set KielHyreQuest,106;
		close2;
		cutin "",255;
		end;
	}
	else{
		cutin "kh_kiel02",2;
		mes "ֻʣ²жľ ^0000FF^000000";
		close2;
		cutin "",255;
		end;
	}


OnTimer180000:
	stopnpctimer;
	mapannounce "kh_kiehl02","~",bc_npc,0xFF0000;
	donpcevent "KiehlRoom::OnReset";
	end;

OnTimer179000:
	mapannounce "kh_kiehl02","뱬ըֻʣ1",bc_npc,0xFF0000;
	end;

OnTimer178000:
	mapannounce "kh_kiehl02","뱬ըֻʣ2",bc_npc,0xFF0000;
	end;

OnTimer177000:
	mapannounce "kh_kiehl02","뱬ըֻʣ3",bc_npc,0xFF0000;
	end;

OnTimer176000:
	mapannounce "kh_kiehl02","뱬ըֻʣ4",bc_npc,0xFF0000;
	end;

OnTimer175000:
	mapannounce "kh_kiehl02","뱬ըֻʣ5",bc_npc,0xFF0000;
	end;

OnTimer170000:
	mapannounce "kh_kiehl02","뱬ըֻʣ10",bc_npc,0xFF0000;
	end;

OnTimer160000:
	mapannounce "kh_kiehl02","뱬ըֻʣ20",bc_npc,0xFF0000;
	end;

OnTimer150000:
	mapannounce "kh_kiehl02","뱬ըֻʣ30",bc_npc,0xFF0000;
	end;

OnTimer120000:
	mapannounce "kh_kiehl02","뱬ըֻʣ1",bc_npc,0xFF0000;
	end;

OnTimer60000:
	mapannounce "kh_kiehl02","뱬ըֻʣ2",bc_npc,0xFF0000;
	end;

OnTimer1000:
	mapannounce "kh_kiehl02","뱬ըֻʣ3",bc_npc,0xFF0000;
	end;
}

//----------------------------------------------------------------------------
// ķ; NPC for mob control, timers, and other junk.
//----------------------------------------------------------------------------
kh_kiehl02,1,1,0	script	KiehlRoom	-1,{
	end;

OnKiehlMobDead:
	set .KHKilled,.KHKilled+1;
	if (.KHKilled == 5) { 
		hideoffnpc "#Original"; 
	}
	end;

OnKiehlDead:
	set .KHKilledBoss,1;
	hideoffnpc "#Original";
	end;
	
OnReset:
	donpcevent "Kiehl_Room_Trap::OnGlobalTimerOff";
	if (getmapusers("kh_kiehl02") > 0)
		mapwarp "kh_kiehl02","lighthalzen",192,200;
	killmonsterall "kh_kiehl02";
	disablenpc "Kiehl_Room_Exit";
	hideonnpc "#KiehlRoom";
	hideonnpc "ҪԱ#KHAgent1";
	hideonnpc "ҪԱ#KHAgent2";
	hideonnpc "ҪԱ#KHAgent3";
	hideonnpc "ҪԱ#KHAgent4";
	hideonnpc "#Copy";
	hideoffnpc "#Original"; 
	set .KHKilledBoss,0;
	set .KHKilled,0;
	set getvariableofnpc(.KHTrapSprung,"Kiehl_Room_Trap"),0;
	set $@KHQuestBusy,0;
	end;
}

//----------------------------------------------------------------------------
// ķ; Mitchell and Agents. (Floating NPC + Duplicates)
//----------------------------------------------------------------------------
kh_kiehl02,49,55,6	script	#KiehlRoom	727,{
	end;
OnInit:
	hideonnpc "#KiehlRoom";
	end;

OnKHSpiderWeb:
	misceffect 404;
	end;
}

kh_kiehl02,53,52,4	script	ҪԱ#KHAgent1	880,{
	end;
OnInit:
	hideonnpc "ҪԱ#KHAgent1";
	end;

OnKHSpiderWeb:
	misceffect 404;
	end;
}

kh_kiehl02,51,49,1	script	ҪԱ#KHAgent2	880,{
	end;
OnInit:
	hideonnpc "ҪԱ#KHAgent2";
	end;

OnKHSpiderWeb:
	misceffect 404;
	end;
}

kh_kiehl02,47,50,0	script	ҪԱ#KHAgent3	880,{
	end;
OnInit:
	hideonnpc "ҪԱ#KHAgent3";
	end;

OnKHSpiderWeb:
	misceffect 404;
	end;
}

kh_kiehl02,46,53,6	script	ҪԱ#KHAgent4	880,{
	end;
OnInit:
	hideonnpc "ҪԱ#KHAgent4";
	end;

OnKHSpiderWeb:
	misceffect 404;
	end;
}


//----------------------------------------------------------------------------
// ķ; Copy of Kiehl.
//----------------------------------------------------------------------------
kh_kiehl02,48,53,6	script	#Copy	902,{
	end;

OnInit:
	hideonnpc "#Copy";
	end;
}

//----------------------------------------------------------------------------
// ķ; Kiehl_Room_Exit
//----------------------------------------------------------------------------
kh_kiehl02,50,59,0	script	Kiehl_Room_Exit	45,1,1,{
OnTouch:
	if (getmapusers("kh_kiehl02") < 1)
		donpcevent "KiehlRoom::OnReset";
	warp "lighthalzen",193,202;
	end;

OnEnable:
	misceffect 215;
	end;

OnInit:
	disablenpc "Kiehl_Room_Exit";
	end;
}

//============================================================================