//==============================================================================
//Ragnarok Online - dye Event Script
//==============================================================================
alberta_in.gat,133,55,3	script	Cc	84,{
		if (MOLGENSTAIN != 2) goto L_START_1;
			mes "[lCc]";
			mes "... N.";
			mes "ǂ?QtF̂̓̂Ȋw҂K˂Ă݂?";
			next;
			menu "QV^CɂĘb",-,"߂",L_MENU_1;
				mes "[lCc]";
				mes "QtFɂāA̋ꏊ͒A܂K˂ĂȂ̂?";
				mes "-... ܂Ă? ͂₭K˂Ă݂Ȃ_ȂB ̗ntłom...";
				close;
	L_MENU_1:
				mes "[lCc]";
				mes "Ƃ΁AbĂ݂炽ǂ? ܂AC܂ȂȂ炵悤Ȃ...";
				close;
	L_START_1:
		mes "[lCc]";
		mes "̗pȁH";
		next;
		if (countitem(971)<1) goto L_START_2;
		if (countitem(972)<1) goto L_START_2;
		menu "b",L_MENU_1_1,"ntɂĘb",L_MENU_1_2,"߂",L_MENU_1_3;
	L_MENU_1_1:
			mes "[lCc]";
			mes "@ɓ邽߂ɁA";
			mes "QtFƂXɋƂB";
			mes "ŁAl̕ςȉw҂̉\";
			mes "񂾁B";
			mes "킢̂ŁA\Ƃ";
			mes "̉Ȋw҂K˂Ă݂񂾁B";
			next;
			mes "[lCc]";
			mes "łAǉȂB";
			mes "ނ͌ɖŎ̂ƂȂ";
			mes "SڂɓĂȂ炾B";
			next;
			mes "[lCc]";
			mes "̎AނƂ茾Ԃ₢";
			mes "̂RĂ܂cc";
			mes "J{fB[fBg~c";
			next;
			mes "[lCc]";
			mes "ŏ͂̐QƎvA";
			mes "ēmÂ";
			mes "ꂪ̐ł͂ȂƂƂ";
			mes "킩B";
			close;
	L_MENU_1_2:
			set MOLGENSTAIN,1;
			mes "[lCc]";
			mes "... ꂪ̗nt! \Aۂɂ͌Ƃ̂Ȃ̂Ȃ񂾂ƁAǂɂꂽ.";
			mes "AŉׂȂ͎̂cO͂ĂȂB SĂ͂mĂ͂...";
			next;
			mes "[lCc]";
			mes "`҂łŃAƂ̉w҂ɖK˂Ă̋^낤B";
			mes "ntĒɁAw҂̋ꏊ͂ĂB̂̂ƂڍׂȈʒu͉ĂȂ,";
			mes "̉w҂̓QtFɏZłB O ^0000ffQV^C^000000 ƌĂB";
			next;
			mes "[lCc]";
			mes "ڍׂȂƂ̓QtFŕĂ݂Ε.";
			mes "K^F.";
			close;
	L_MENU_1_3:
			mes "[lCc]";
			mes "Ӂ[...Ȃ.";
			close;
	L_START_2:
		if (countitem(972)<1) goto L_START_3;
		menu "b",L_MENU_1_1,"J{fB[ɂĘb",-,"߂",L_MENU_1_3;
			set MOLGENSTAIN,1;
			mes "[lCc]";
			mes "... ꂪ̃J{fB[! \Aۂɂ͌Ƃ̂Ȃ̂Ȃ񂾂ƁAǂɂꂽ.";
			mes "AŉׂȂ̂͟kO͂ĂȂB SĂ͂mĂ͂...";
			next;
			mes "[lCc]";
			mes "ntĒɁAw҂̋ꏊ͂ĂB̂̂ƂڍׂȈʒu͉ĂȂ,";
			mes "̉w҂̓QtFɏZłB O ^0000ffQV^C^000000 ƌĂB";
			next;
			mes "[lCc]";
			mes "ڍׂȂƂ̓QtFŕĂ݂Ε.";
			mes "K^F.";
			close;
	L_START_3:
		if (countitem(971)<1) goto L_START_4;
		menu "b",L_MENU_1_1,"fBg~ɂĘb",-,"߂",L_MENU_1_3;
			set MOLGENSTAIN,1;
			mes "[lCc]";
			mes "... ꂪ̃fBg~! \Aۂɂ͌Ƃ̂Ȃ̂Ȃ񂾂ƁAǂɂꂽ.";
			mes "AŉׂȂ̂͟kO͂ĂȂB SĂ͂mĂ͂...";
			next;
			mes "[lCc]";
			mes "ntĒɁAw҂̋ꏊ͂ĂB̂̂ƂڍׂȈʒu͉ĂȂ,";
			mes "̉Ȋw҂̓QtFɏZłB O ^0000ffQV^C^000000 ƌĂB";
			next;
			mes "[lCc]";
			mes "ڍׂȂƂ̓QtFŕĂ݂Ε.";
			mes "K^F.";
			close;
	L_START_4:
		menu "b",L_MENU_1_1,"߂",L_MENU_1_3;
}

geffen.gat,184,114,6	script	AEfBtH	82,{
		if (MOLGENSTAIN != 2) goto L_START_2;
			mes "[QtFZ AEfBtH]";
			mes "^xB𓱂łˁBȂ邱Ƃ҂Ă܂B";
			mes "... MTĂlɂ͉܂?";
			next;
			menu "QV^CɂĘb",-,"߂",L_MENU_1;
				mes "[QtFZ AEfBtH]";
				mes "܂ĂȂłˁB";
				mes "ނ͒b艮 2KɏZł܂B΂炭ǁA؂Șbb܂BpSĉ! ނɋ߂Â߂͔̂ǂł...";
				close;
	L_MENU_1:
				mes "[QtFZ AEfBtH]";
				mes "΂炭̊ԂȂ̊炩炠ӎu܂B łAȂ͎ɉbƂȂł.";
				mes "͋MFBƎvĂ̂ ... ͎̍oł?";
				close;
	L_START_2:
		mes "[QtFZ AEfBtH]";
		mes "x߂Ԃ͖߂ĂȂłBƂꂪ̑Ȗ@̗͂ƂĂBȕɘbĂ邱̏uԂɂԂ͗Ă܂B";
		mes "Ȃ̂ɁÁAȂĂ񂾂ł?";
		next;
		if (MOLGENSTAIN <= 0) goto L_START_3;
			menu "b",-,"QV^Cɂĕ",L_MENU_2_1,"߂",L_MENU_2_2;
				mes "[QtFZ AEfBtH]";
				mes "@̗͂Aǋ鎄ʂ lƂ͎v܂BłA̐ɂ͖{ɋHLȐl悤ł...";
				mes "MȂ牽ЂƂɑSĂĎ荞ނƂł܂? ӂ̑SĂ߂܂... ܂ŁAɋ݂...";
				close;
	L_MENU_2_1:
				set MOLGENSTAIN,2;
				mes "[QtFZ AEfBtH]";
				mes "̋CႢɂĒmĂȂAMlƂ͋肻łˁB̐lɂĒm肽Ƃ͑悤݂ł...";
				mes "ނ̂Ƃڍׂɐ邱Ƃ́Aɂ͖łB ߂Ȃ... łAĂBɂłő̍śAނ̋ꏊ͂邾ł傤B";
				next;
				mes "[QtFZ AEfBtH]";
				mes "ނ͒b艮 2KɏZł܂B΂炭ǁA؂Șbb܂BpSĉ! ނɋ߂Â߂͔̂ǂł...";
				close;
	L_MENU_2_2:
				mes "[QtFZ AEfBtH]";
				mes "΂炭̊ԂȂ̊炩炠ӎu܂B łAȂ͎ɉbƂȂł.";
				mes "kOłAƂĂ͂ǂ悤܂... l̐lԂA厩R̈ꕔ... AlԂ̈ӎu... 厩R̗̂悤Ȃ̂ł.";
				close;
	L_START_3:
		menu "b",-,"߂",L_MENU_3;
			mes "[QtFZ AEfBtH]";
			mes "@̗͂Aǋ鎄ʂ lƂ͎v܂BłA̐ɂ͖{ɋHLȐl悤ł...";
			mes "MȂ牽ЂƂɑSĂĎ荞ނƂł܂? ӂ̑SĂ߂܂... ܂ŁAɋ݂...";
			close;
	L_MENU_3:
			mes "[QtFZ AEfBtH]";
			mes "΂炭̊ԂȂ̊炩炠ӎu܂B łAȂ͎ɉbƂȂł.";
			mes "cOłAƂĂ͂ǂ悤܂... l̐lԂA厩R̈ꕔ... AlԂ̈ӎu... 厩R̗̂悤Ȃ̂ł.";
			close;
}

geffen_in.gat,141,140,3	script	QV^C	121,{
	if (MOLGENSTAIN == 2) goto L_START_2;
	if (MOLGENSTAIN == 3) goto L_START_3;
		mes "[w҃QV^C]";
		mes "qqqqc񂭂ccvԂɉ̂̏L.";
		mes "lԁclԂBĂlԁcqqqqqq";
		close;
L_START_2:
	set MOLGENSTAIN,3;
	mes "[w҃QV^C]";
	mes "qqqqcc悤B";
	mes "qqqqccqqqqqbcc";
	next;
	mes "[w҃QV^C]";
	mes "ccccqqqqcc";
	mes "́ccĂlԂ݂̂";
	mes "vԂŁBȂ̗pH";
	next;
	goto Lchoose;
L_START_3:
	mes "[w҃QV^C]";
	mes "qqqqcc悤B";
	mes "qqqqccEqqqqbcc";
	next;
Lchoose:
	menu "Ă錤ɂĕ",L1,"V̂Ă邱Ƃ𗊂",L2,"߂",-;
		close;
	L1:
		mes "[w҃QV^C]";
		mes "qqqqccǂŎ̌ɂ";
		mes "Ă݂ȁcc";
		mes "cc܁ASmĂ邾낤";
		mes "BɘbĂcccc";
		mes "BƂȂccqqqqqcc";
		next;
		mes "[w҃QV^C]";
		mes "́cč͂Ăc";
		mes "̎̓V˓I]ɂłȂƂ";
		mes "Ȃccqqqcc";
		mes "Ԃł邾cc";
		mes "ԁccqqqbcc";
		next;
		mes "[w҃QV^C]";
		mes "cčɂĒm肽";
		mes "ȁcc͂ƂĂȒP";
		mes "񂳁ccɗnȂ";
		mes "n@𔭌悤ƂB";
		next;
		mes "[w҃QV^C]";
		mes "ÁXȂH";
		mes "̌ƓŠł܂";
		mes "͂̂Ȃt̂ɗn@!!!";
		next;
		mes "[w҃QV^C]";
		mes "ǂǂ```";
		mes "ǂǂɂȂ邾낤!!qq!!!";
		mes "ccqqqqb!!ccǂǂ!!!";
		mes "qqqqbqq!!!!";
		next;
		mes "[w҃QV^C]";
		mes "ցccցcc͂cc͂cc";
		mes "ƁAƂɂcc܂SĂ";
		mes "nƂ͂łȂAB";
		mes "ƂB";
		next;
		mes "[w҃QV^C]";
		mes "̕@ŌNzłA";
		mes "Ƒ̂̂o邾낤";
		mes "ccN肤Ȃ!!";
		next;
		mes "[w҃QV^C]";
		mes "ccccg̒̏z";
		mes "炪ԂȂ邱̊ccl邾";
		mes "̒ɖȉt̂傳A";
		mes "ẙɖ邱̊cc";
		mes "cc";
		close;
	L2:
		mes "[w҃QV^C]";
		mes "qqqqbcc";
		mes "ςN񂾁B";
		next;
		mes "[w҃QV^C]";
		mes "cccc̒N";
		mes "𓾂Ȃcc";
		mes "ŁA邱Ɓcctttt";
		next;
		mes "[w҃QV^C]";
		mes "cco??";
		mes "ccHqqqq";
		next;
		menu "a",-,"",L2_2;
			mes "[w҃QV^C]";
			mes "cca܂肽ƌ";
			mes "cct t t tccł́A";
			mes "̗VŶ߂ɏ镨";
			mes "ĂB";
			next;
			mes "[w҃QV^C]";
			mes "ccǂccccccc";
			mes "cc͂cc";
			next;
			mes "[w҃QV^C]";
			mes "ccvocccc";
			mes "AR[ccƁccfBg~";
			mes "ccĂۊǂł󂫃rc";
			next;
			mes "[w҃QV^C]";
			mes "̎O̕΍cc";
			mes "āAɓV˓Iȓ]ƋZp";
			mes "΂Ċӂ𗊂݂ccqqqqb";
			next;
			mes "[w҃QV^C]";
			mes "ȂɕŜ񂶂Ȃcc";
			mes "債̂~킯ł͂Ȃcc";
			mes "cct t t t";
			mes "`cc3000 zeny";
			mes "o΂ccqqqq";
			next;
			mes "[w҃QV^C]";
			mes "ccccЂƂč";
			mes "vĂ킯ȂH";
			mes "ccɂ͊cc";
			mes "Nɂ͎̂悤Ȗ`Ƒn̗~]";
			mes "邱ƂI";
			mes "ccqqqqqqqqqqqb";
			next;
			mes "[w҃QV^C]";
			mes "ccn߂邩H";
			next;
			menu "",-,"߂",L_ROOT_1;
				if (countitem(970)<1) goto L_SUB_1_1;
				if (countitem(971)<1) goto L_SUB_1_1;
				if (countitem(713)<1) goto L_SUB_1_1;
				if (Zeny >= 3000) goto L_SUB_1_2;
			L_SUB_1_1:
				mes "[w҃QV^C]";
				mes "ttttccȂcnAcnAccc cޗW߂ė܂!!";
				mes "VY͂̎Ɂc ttttt";
				close;
			L_SUB_1_2:
				mes "[w҃QV^C]";
				mes "ccc qqqqqqccc c āccc c 㔂c Ɓcccc qqqqq";
				mes "cc AAcc Anc nccAncc cc !cc !!!c!!!!!!";
				next;
				delitem 970,1;
				delitem 971,1;
				delitem 713,1;
				set Zeny,Zeny-3000;
				getitem 973,1;
				mes "[w҃QV^C]";
				mes "cc ͂ccc";
				close;
		L_ROOT_1:
			mes "[w҃QV^C]";
			mes "tcctttttcc";
			close;
		L2_2:
			mes "[w҃QV^C]";
			mes "cc܂肽ƌ";
			mes "cct t t tccł́A";
			mes "̗VŶ߂ɏ镨";
			mes "ĂB";
			next;
			mes "[w҃QV^C]";
			mes "ccǂccccccc";
			mes "cc͂cc";
			next;
			mes "[w҃QV^C]";
			mes "ccvocccc";
			mes "AR[ccƁccJ{[fB";
			mes "ccĂۊǂł󂫃rc";
			next;
			mes "[w҃QV^C]";
			mes "̎O̕΍cc";
			mes "āAɓV˓Iȓ]ƋZp";
			mes "΂Ċӂ𗊂݂ccqqqqb";
			next;
			mes "[w҃QV^C]";
			mes "ȂɕŜ񂶂Ȃcc";
			mes "債̂~킯ł͂Ȃcc";
			mes "cct t t t";
			mes "`cc4000 zeny";
			mes "o΂ccqqqq";
			next;
			mes "[w҃QV^C]";
			mes "ccccЂƂč";
			mes "vĂ킯ȂH";
			mes "ccɂ͊cc";
			mes "Nɂ͎̂悤Ȗ`Ƒn̗~]";
			mes "邱ƂI";
			mes "ccqqqqqqqqqqqb";
			next;
			mes "[w҃QV^C]";
			mes "ccn߂邩H";
			next;
			menu "",-,"߂",L_ROOT_1;
				if (countitem(970)<1) goto L_SUB_2_1;
				if (countitem(972)<1) goto L_SUB_2_1;
				if (countitem(713)<1) goto L_SUB_2_1;
				if (Zeny >= 4000) goto L_SUB_2_2;
		L_SUB_2_1:
				mes "[w҃QV^C]";
				mes "ttttccȂcnAcnAccc cޗW߂ė܂!!";
				mes "VY͂̎Ɂc ttttt";
				close;
		L_SUB_2_2:
				mes "[w҃QV^C]";
				mes "ccc qqqqqqccc c āccc c 㔂c Ɓcccc qqqqq";
				mes "cc AAcc Anc nccAncc cc !cc !!!c!!!!!!";
				next;
				delitem 970,1;
				delitem 972,1;
				delitem 713,1;
				set Zeny,Zeny-4000;
				getitem 974,1;
				mes "[w҃QV^C]";
				mes "cc ͂ccc";
				close;
}

prontera.gat,78,150,3	script	_C	90,{
	mes "[̉_C]";
	mes "͂cc̍";
	mes "LɐlĕGB";
	mes "ق񂯂قcc";
	next;
	mes "[̉_C]";
	mes "HȂɁA̐o`As`";
	mes "sƌāAǂł";
	mes "YĂ킯ɂ͂Ȃ̂ˁ`B";
	mes "ccApH";
	next;
	menu "b",-,"߂",Lend;
		mes "[̉_C]";
		mes "āAp[eBƂhX";
		mes "̂Hzzzz";
		mes "̗̍s̍Ő[́A";
		mes "ȂƂĂؗȐFŏꂽ";
		mes "hXłB";
		next;
		mes "[̉_C]";
		mes "̍DꂻȐF";
		mes "o߂ɂ́A̓ssN";
		mes "ĂgpȂ";
		mes "_炵ǁcc";
		mes "̐̒liz𒴂āB";
		next;
		mes "[̉_C]";
		mes "ccxł";
		mes "Ă݂cc";
		close;
Lend:
	mes "[̉_C]";
	mes "`HlɘbĂāB";
	mes "ccςȐlB";
	close;
}
morocc_in.gat,146,99,3	script	Uohn	58,{
		mes "[҃Uohn]";
		mes "₟cc͖{ɏˁB";
		mes "ȓVCɃsb^I";
		next;
		menu "b",-,"",L_MENU_2,"߂",L_MENU_3;
			mes "[҃Uohn]";
			mes "NɘbƂ͓ɂȂǁcc";
			mes "ˁẢߋ̘bł悩";
			mes "B";
			mes "Ă܂ȂmȂ";
			mes "Ă݂邩H";
			next;
			menu "",-,"Ȃ",L_MENU_1_1;
				mes "[҃Uohn]";
				mes "SOcc";
				mes "͐̕ĂB";
				mes "ȂقǒԁA";
				mes "͂ƐĂB";
				next;
				mes "[҃Uohn]";
				mes "ccꂪaCŎ񂾎܂ł";
				mes "cc߂ȂB";
				mes "̎́Aȕcc";
				next;
				mes "[҃Uohn]";
				mes "ȕŐɂȂ";
				mes "Ⴂ͉ƂoāAł";
				mes "݂肵ǁcc";
				next;
				mes "[҃Uohn]";
				mes "łcc͍AĂщƂɖ߂";
				mes "̉ƋƂpłB";
				mes "͌떂Ȃ݂cc";
				mes "̎dn߂āAcc";
				mes "15NoȁB";
				next;
				mes "[҃Uohn]";
				mes "̍ɂȂĊĂ̂́cc";
				mes "͕łĂƂB";
				mes "ǂđSĂ̂Ă܂܁A";
				mes "ɖɂȂcc";
				next;
				mes "[҃Uohn]";
				mes "͑AJԂƂ";
				mes "dȂĐ܂ĂA̐Fcc";
				mes "\񉽐A̒Ō悤";
				mes "̌̐Fo߂񂾂낤c";
				next;
				mes "[҃Uohn]";
				mes "tbcc";
				mes "ǂĂꂪ̂āH";
				mes "́cc̎炳B";
				mes "NO炾cc";
				mes "F̌Ƃ悤ɂȂ";
				mes "̏uԂcc";
				next;
				mes "[҃Uohn]";
				mes "ĂI";
				mes "͕Ȃ";
				mes "̐FKČ邳I";
				close;
	L_MENU_1_1:
				mes "[҃Uohn]";
				mes "͂́cccc";
				mes "݂ȐEl̘b";
				mes "Ă͂ȂB";
				mes "nnnnbcc";
				close;
	L_MENU_2:
			mes "[҃Uohn]";
			mes "悵IN悩A낤B";
			mes "KN̗~F";
			mes "oĂƁA񑩂悤B";
			next;
			mes "[҃Uohn]";
			mes "ŁAǂȐF̐肽H";
			mes "낤ƂFɂĎ萔";
			mes "ႤB";
			next;
			mes "[҃Uohn]";
			mes "ȂāH";
			mes "̐ɂ͊ȒPɍFƁA";
			mes "ȂF񂾁B";
			mes "萔ȂĎvȂłB";
			mes "͎̐̍߂ĂA";
			mes "ʂȕȂ񂾂ˁI";
			next;
		menu "Ԃ",-,"F",L_MENU_2_2,"򂢐",L_MENU_2_3,"^F̐",L_MENU_2_4,"F̐",L_MENU_2_5,"F̐",L_MENU_2_6,"",L_MENU_2_7,"K",L_MENU_2_8,"߂",L_MENU_2_9;
			mes "[҃Uohn]";
			mes "[ށccԐF̐邽߂ɂ";
			mes "ԃn[u 30  a܁A";
			mes "ċ󂫃r 1KvB";
			mes "萔 3000 zenyɂȂB";
			next;
			mes "[҃Uohn]";
			mes "IłĂƎvcc";
			mes "Ƃn߂邩H";
			next;
			menu "",-,"߂",L_MENU_2_9;
				if (countitem(507)<30) goto L_ROOT_2_10;
				if (countitem(973)<1) goto L_ROOT_2_10;
				if (countitem(713)<1) goto L_ROOT_2_10;
				if (Zeny < 3000) goto L_ROOT_2_10;
				delitem 507,30;
				delitem 973,1;
				delitem 713,1;
				set Zeny,Zeny-3000;
				getitem 975,1;
				mes "[ Uohn]";
				mes "t[...܁A񂭂炢Ȃǂł̂BƂĂZF.";
				mes "A͂ȏ̖fIȐFo߂ɓw͂邪...";
				mes "...ł́AłKvɂȂΗ܂.";
				close;
	L_MENU_2_2:
			mes "[҃Uohn]";
			mes "[ށccF̐邽߂ɂ";
			mes "n[u 30  a܁A";
			mes "ċ󂫃r 1KvB";
			mes "萔 3000 zenyɂȂB";
			next;
			mes "[҃Uohn]";
			mes "IłĂƎvcc";
			mes "Ƃn߂邩H";
			next;
			menu " ",-,"߂",L_MENU_2_9;
				if (countitem(508)<30) goto L_ROOT_2_10;
				if (countitem(973)<1) goto L_ROOT_2_10;
				if (countitem(713)<1) goto L_ROOT_2_10;
				if (Zeny < 3000) goto L_ROOT_2_10;
				delitem 508,30;
				delitem 973,1;
				delitem 713,1;
				set Zeny,Zeny-3000;
				getitem 976,1;
				mes "[ Uohn]";
				mes "t[...܁A񂭂炢Ȃǂł̂BƂĂZF.";
				mes "A͂ȏ̖fIȐFo߂ɓw͂邪...";
				mes "...ł́AłKvɂȂΗ܂.";
				close;
	L_MENU_2_3:
			mes "[҃Uohn]";
			mes "[ށccF̐邽߂ɂ";
			mes "n[u 20  a܁A";
			mes "ċ󂫃r 1KvB";
			mes "萔 3500 zenyɂȂB";
			next;
			mes "[҃Uohn]";
			mes "IłĂƎvcc";
			mes "Ƃn߂邩H";
			next;
			menu " ",-,"߂",L_MENU_2_9;
				if (countitem(510)<20) goto L_ROOT_2_10;
				if (countitem(973)<1) goto L_ROOT_2_10;
				if (countitem(713)<1) goto L_ROOT_2_10;
				if (Zeny < 3500) goto L_ROOT_2_10;
				delitem 510,20;
				delitem 973,1;
				delitem 713,1;
				set Zeny,Zeny-3500;
				getitem 978,1;
				mes "[ Uohn]";
				mes "t[...܁A񂭂炢Ȃǂł̂BƂĂZF.";
				mes "A͂ȏ̖fIȐFo߂ɓw͂邪...";
				mes "...ł́AłKvɂȂΗ܂.";
				close;
	L_MENU_2_4:
			mes "[҃Uohn]";
			mes "[ށccΐF̐邽߂ɂ";
			mes "n[u 5  ΃n[u 20";
			mes "n[u 20@a  ܁A";
			mes "ċ󂫃r 1KvB";
			mes "ޗAԈႢȂ悤ɁB";
			mes "萔 5000 zenyɂȂB";
			next;
			mes "[҃Uohn]";
			mes "IłĂƎvcc";
			mes "Ƃn߂邩H";
			next;
			menu " ",-,"߂",L_MENU_2_9;
				if (countitem(510)<5) goto L_ROOT_2_10;
				if (countitem(973)<1) goto L_ROOT_2_10;
				if (countitem(713)<1) goto L_ROOT_2_10;
				if (countitem(511)<20) goto L_ROOT_2_10;
				if (countitem(508)<20) goto L_ROOT_2_10;
				if (countitem(974)<1) goto L_ROOT_2_10;
				if (Zeny < 5000) goto L_ROOT_2_10;
				delitem 510,5;
				delitem 973,1;
				delitem 713,1;
				delitem 511,20;
				delitem 508,20;
				delitem 974,1;
				set Zeny,Zeny-5000;
				getitem 979,1;
				mes "[ Uohn]";
				mes "t[...܁A񂭂炢Ȃǂł̂BƂĂZF.";
				mes "A͂ȏ̖fIȐFo߂ɓw͂邪...";
				mes "...ł́AłKvɂȂΗ܂.";
				close;
	L_MENU_2_5:
			mes "[҃Uohn]";
			mes "[ށccgF̐邽߂ɂ";
			mes "ԃn[u 20  n[u 20";
			mes "a  ܁A";
			mes "ċ󂫃r 1KvB";
			mes "萔 5000 zenyɂȂB";
			next;
			mes "[҃Uohn]";
			mes "IłĂƎvcc";
			mes "Ƃn߂邩H";
			next;
			menu " ",-,"߂",L_MENU_2_9;
				if (countitem(507)<20) goto L_ROOT_2_10;
				if (countitem(973)<1) goto L_ROOT_2_10;
				if (countitem(713)<1) goto L_ROOT_2_10;
				if (countitem(974)<1) goto L_ROOT_2_10;
				if (countitem(508)<20) goto L_ROOT_2_10;
				if (Zeny < 5000) goto L_ROOT_2_10;
				delitem 507,20;
				delitem 973,1;
				delitem 713,1;
				delitem 974,1;
				delitem 508,20;
				set Zeny,Zeny-5000;
				getitem 980,1;
				mes "[ Uohn]";
				mes "t[...܁A񂭂炢Ȃǂł̂BƂĂZF.";
				mes "A͂ȏ̖fIȐFo߂ɓw͂邪...";
				mes "...ł́AłKvɂȂΗ܂.";
				close;
	L_MENU_2_6:
			mes "[҃Uohn]";
			mes "[ށccF̐邽߂ɂ";
			mes "n[u 10Ɛԃn[u 30";
			mes "a  ܁A";
			mes "ċ󂫃r 1KvB";
			mes "萔 5000 zenyɂȂB";
			next;
			mes "[҃Uohn]";
			mes "IłĂƎvcc";
			mes "Ƃn߂邩H";
			next;
			menu " ",-,"߂",L_MENU_2_9;
				if (countitem(507)<20) goto L_ROOT_2_10;
				if (countitem(973)<1) goto L_ROOT_2_10;
				if (countitem(713)<1) goto L_ROOT_2_10;
				if (countitem(974)<1) goto L_ROOT_2_10;
				if (countitem(510)<10) goto L_ROOT_2_10;
				if (Zeny < 5000) goto L_ROOT_2_10;
				delitem 507,20;
				delitem 973,1;
				delitem 713,1;
				delitem 974,1;
				delitem 510,10;
				set Zeny,Zeny-5000;
				getitem 981,1;
				mes "[ Uohn]";
				mes "t[...܁A񂭂炢Ȃǂł̂BƂĂZF.";
				mes "A͂ȏ̖fIȐFo߂ɓw͂邪...";
				mes "...ł́AłKvɂȂΗ܂.";
				close;
	L_MENU_2_7:
			mes "[҃Uohn]";
			mes "[ށccF̐邽߂ɂ";
			mes "n[u 30  a";
			mes "ċ󂫃r 1KvB";
			mes "萔 3000 zenyɂȂB";
			next;
			mes "[҃Uohn]";
			mes "IłĂƎvcc";
			mes "Ƃn߂邩H";
			next;
			menu " ",-,"߂",L_MENU_2_9;
				if (countitem(509)<30) goto L_ROOT_2_10;
				if (countitem(973)<1) goto L_ROOT_2_10;
				if (countitem(713)<1) goto L_ROOT_2_10;
				if (Zeny < 3000) goto L_ROOT_2_10;
				delitem 509,30;
				delitem 973,1;
				delitem 713,1;
				set Zeny,Zeny-3000;
				getitem 982,1;
				mes "[ Uohn]";
				mes "t[...܁A񂭂炢Ȃǂł̂BƂĂZF.";
				mes "A͂ȏ̖fIȐFo߂ɓw͂邪...";
				mes "...ł́AłKvɂȂΗ܂.";
				close;
	L_MENU_2_8:
			mes "[҃Uohn]";
			mes "[ށccF̐邽߂ɂ";
			mes "ԁAA΂̃n[u 30";
			mes "n[u 5  a܁A";
			mes "ċ󂫃r 1KvB";
			mes "쐬AԂKv";
			mes "萔 7000 zenyɂȂB";
			next;
			mes "[҃Uohn]";
			mes "IłĂƎvcc";
			mes "Ƃn߂邩H";
			next;
			menu " ",-,"߂",L_MENU_2_9;
				if (countitem(507)<30) goto L_ROOT_2_10;
				if (countitem(973)<1) goto L_ROOT_2_10;
				if (countitem(713)<1) goto L_ROOT_2_10;
				if (countitem(510)<5) goto L_ROOT_2_10;
				if (countitem(508)<30) goto L_ROOT_2_10;
				if (countitem(974)<1) goto L_ROOT_2_10;
				if (countitem(511)<30) goto L_ROOT_2_10;
				if (Zeny < 7000) goto L_ROOT_2_10;
				delitem 507,30;
				delitem 973,1;
				delitem 713,1;
				delitem 510,5;
				delitem 508,30;
				delitem 974,1;
				delitem 511,30;
				set Zeny,Zeny-7000;
				getitem 983,1;
				mes "[ Uohn]";
				mes "t-B ܁Aꂮ炢Ȃǂł.ƂĂZF.";
				mes "A͂ȏ̖fIȐFo߂ɓw͂邪...";
				mes "...ł́AłKvɂȂΗ܂.";
				close;
	L_MENU_2_9:
				mes "[҃Uohn]";
				mes "HCςH";
				mes "ȁcc";
				close;
	L_ROOT_2_10:
				mes "[҃Uohn]";
				mes "Ӂ[ށAȂˁcc";
				mes "̍ޗł́AȐFoȂȁB";
				mes "ƍޗW߂ėĂB";
				close;
	L_MENU_3:
		mes "[҃Uohn]";
		mes "ȂA͐F";
		mes "ZpĂ̂B";
		mes "KvȂA";
		mes "ł΂B";
		mes "ȂliōĂB";
		close;
}

prt_in.gat,284,168,3	script	Wl_Ct	55,{
	mes "[ߗމHmWl_C=t]";
	mes "\cc\cc[ށA悵B";
	mes "̃p[eB܂ł́AB";
	mes "ǂɂԂɍB";
	next;
	mes "[ߗމHmWl_C=t]";
	mes "I";
	mes "qlAႢ܂B";
	mes "̗pł炵̂łH";
	next;
	menu "b",-,"߂",L1,"߂",Lend;
		mes "[ߗމHmWl_C=t]";
		mes "hXEĂƂ";
		mes "ƁA]T̂邨삳ɂƂ";
		mes "ƂĂǂɂȂ悤łˁB";
		next;
		mes "[ߗމHmWl_C=t]";
		mes "ґƎvĂ킯ł͂܂񂪁c";
		mes "܂Ał傤B";
		mes "ɂ͂ȐlB邩A";
		mes "lԂ̒ǋyWł";
		mes "̂łB";
		next;
		mes "[ߗމHmWl_C=t]";
		mes "т؂ȂlԂǍ";
		mes "\ł鐔Ȃ@";
		mes "Œ邵Ȃ̂łcc";
		mes "A͎̍lłˁB";
		next;
		mes "[ߗމHmWl_C=t]";
		mes "nnncc_ŌƂ";
		mes "ȂɍlĂ݂̎d́A";
		mes "ƂĂȎdł͂Ȃ";
		mes "v܂B肪܂B";
		next;
		mes "[ߗމHmWl_C=t]";
		mes "Ȃɂ܂H";
		mes "AoXŕ}ȁA̕zƊv";
		mes "YȐFŐ߂Ƃcc";
		mes "܂ŐV悤";
		mes "قƂ΂邻̏MƃGlM[cc";
		next;
		mes "[ߗމHmWl_C=t]";
		mes "ƂĂLcNēƂǁA";
		mes "ꂽhXɊ";
		mes "̊xŁA[A";
		mes "J܂B";
		close;
L1:
//		mes "[ߗމHmWl_C=t]";
//		mes "قccȂFɗ";
//		mes "ƂłˁH";
//		mes "ł傤B";
//		mes "x̎d͖ʔłˁB";
//		next;
//		mes "[ߗމHmWl_C=t]";
//		mes "łFɕKvȍޗ";
//		mes "cOȂ玄񋟂Ă܂B";
//		mes "SėĂȂƁcc";
//		mes "KvƂޗS";
//		mes "Ă邩Ă݂܂傤H";
//		next;
		mes "[ߗމHmWl_C=t]";
		mes "ccȂF";
		mes "炵łˁH";
		next;
		mes "[ߗމHmWl_C=t]";
		mes "\󂲂܂񂪁A͂Ȃ";
		mes "FĂ鎞Ԃ";
		mes "܂B؂Ă钍";
		mes "dグ邾Őtł̂Łcc";
		next;
		mes "[ߗމHmWl_C=t]";
		mes "\󂲂܂񂪁A";
		mes "x܂Ă܂񂩁H";
		close;
Lend:
	mes "肵čsĂB";
	mes "͖ZĎ𗣂Ȃ̂ŁA";
	mes "肷邱Ƃ͏o܂񂪁B";
	close;
}

prt_in.gat,243,168,4	script	{r`	91,{
 	mes "[et{r`]";
	if (Sex != 1) goto L_SUB_1;
		mes "Ⴂ܂B";
		mes "cȂɔŁc";
		mes "ƂꂪKvłˁB";
		mes "ł͂肭B";
		goto L_START_1;
	L_SUB_1:
		set @R_SEL_NUM,rand(2);
		if (@R_SEL_NUM != 0) goto L_SUB_2;
			mes "Ⴂ܂`B";
			mes "Ioc";
			mes "ԏł܂ˁ`B";
			mes "ɔCĂB";
			goto L_START_1;
	L_SUB_2:
			mes "IoA";
			mes "߂Ă݂Ă";
			mes "ł傤H";
			mes "YɂȂ܂I";
			mes "v؂ăC[W`FW";
			mes "Ă݂܂񂩁H";
 L_START_1:
 	next;
	menu "߂",-,"߂ɂ",L_MENU_1,"߂",L_MENU_2;
		mes "[et{r`]";
		mes "܂AECo܂ˁ`B";
		mes "Ił͎v؂";
		mes "ϐgĂ݂܂傤I";
		mes "ǂ̂F낵łH";
		next;
	Lchoose:
		menu "ԐFł肢܂",L_RED,"Fł肢܂",L_YEL,"Fł肢܂",L_PUR,"gFł肢܂",L_PIN,"ΐFł肢܂",L_GRE,"Fł肢܂",L_BLU,"Fł肢܂",L_WHI,"Fł肢܂",L_BLA,"ς荡̂܂܂",LendA;
		L_RED:/*ԐF*/
			mes "[et{r`]";
			mes "ł͐ԐFɐ߂܂ˁB";
			next;
			menu "͂I",-,"ς߂I",LendA;
				if (Zeny < 5000) goto LError_Zeny;
				if (countitem(975)<1) goto LError8;
				if (hairColor==8) goto LError;
					setlook 6,8;
					set @dyecount,@dyecount+1;
					set hairColor,8;
					set Zeny,Zeny-5000;
					delitem 975,1;
					mes "[et{r`]";
					mes "ǂł傤A̐F";
					mes "߂Ă݂܂H";
					next;
					menu "͂",L_Twice,"",LendC;
				LError8:
					mes "[et{r`]";
					mes "́AԐFɐ߂ɂ";
					mes "ԐF̐KvłB";
					close;
		L_YEL:/*F*/
			mes "[et{r`]";
			mes "ł͉Fɐ߂܂ˁB";
			next;
			menu "͂I",-,"ς߂I",LendA;
				if (Zeny < 5000) goto LError_Zeny;
				if (countitem(976)<1) goto LError1;
				if (hairColor==1) goto LError;
					setlook 6,1;
					set @dyecount,@dyecount+1;
					set hairColor,1;
					set Zeny,Zeny-5000;
					delitem 976,1;
					mes "[et{r`]";
					mes "ǂł傤A̐F";
					mes "߂Ă݂܂H";
					next;
					menu "͂",L_Twice,"",LendC;
				LError1:
					mes "[et{r`]";
					mes "́AFɐ߂ɂ";
					mes "F̐KvłB";
					close;
		L_PUR:/*F*/
			mes "[et{r`]";
			mes "ł͎Fɐ߂܂ˁB";
			next;
			menu "͂I",-,"ς߂I",LendA;
				if (Zeny < 5000) goto LError_Zeny;
				if (countitem(981)<1) goto LError2;
				if (hairColor==2) goto LError;
					setlook 6,2;
					set @dyecount,@dyecount+1;
					set hairColor,2;
					set Zeny,Zeny-5000;
					delitem 981,1;
					mes "[et{r`]";
					mes "ǂł傤A̐F";
					mes "߂Ă݂܂H";
					next;
					menu "͂",L_Twice,"",LendC;
				LError2:
					mes "[et{r`]";
					mes "́AFɐ߂ɂ";
					mes "F̐KvłB";
					close;
		L_PIN:/*gF*/
			mes "[et{r`]";
			mes "ł͍gFɐ߂܂ˁB";
			next;
			menu "͂I",-,"ς߂I",LendA;
				if (Zeny < 5000) goto LError_Zeny;
				if (countitem(980)<1) goto LError3;
				if (hairColor==3) goto LError;
					setlook 6,3;
					set @dyecount,@dyecount+1;
					set hairColor,3;
					set Zeny,Zeny-5000;
					delitem 980,1;
					mes "[et{r`]";
					mes "ǂł傤A̐F";
					mes "߂Ă݂܂H";
					next;
					menu "͂",L_Twice,"",LendC;
				LError3:
					mes "[et{r`]";
					mes "́AgFɐ߂ɂ";
					mes "gF̐KvłB";
					close;
		L_GRE:/*ΐF*/
			mes "[et{r`]";
			mes "ł͗ΐFɐ߂܂ˁB";
			next;
			menu "͂I",-,"ς߂I",LendA;
				if (Zeny < 5000) goto LError_Zeny;
				if (countitem(979)<1) goto LError4;
				if (hairColor==4) goto LError;
					setlook 6,4;
					set @dyecount,@dyecount+1;
					set hairColor,4;
					set Zeny,Zeny-5000;
					delitem 979,1;
					mes "[et{r`]";
					mes "ǂł傤A̐F";
					mes "߂Ă݂܂H";
					next;
					menu "͂",L_Twice,"",LendC;
				LError4:
					mes "[et{r`]";
					mes "́AΐFɐ߂ɂ";
					mes "ΐF̐KvłB";
					close;
		L_BLU:/*F*/
			mes "[et{r`]";
			mes "ł͐Fɐ߂܂ˁB";
			next;
			menu "͂I",-,"ς߂I",LendA;
				if (Zeny < 5000) goto LError_Zeny;
				if (countitem(978)<1) goto LError5;
				if (hairColor==5) goto LError;
					setlook 6,5;
					set @dyecount,@dyecount+1;
					set hairColor,5;
					set Zeny,Zeny-5000;
					delitem 978,1;
					mes "[et{r`]";
					mes "ǂł傤A̐F";
					mes "߂Ă݂܂H";
					next;
					menu "͂",L_Twice,"",LendC;
				LError5:
					mes "[et{r`]";
					mes "́AFɐ߂ɂ";
					mes "F̐KvłB";
					close;
		L_WHI:/*F*/
			mes "[et{r`]";
			mes "ł͔Fɐ߂܂ˁB";
			next;
			menu "͂I",-,"ς߂I",LendA;
				if (Zeny < 5000) goto LError_Zeny;
				if (countitem(982)<1) goto LError6;
				if (hairColor==6) goto LError;
					setlook 6,6;
					set @dyecount,@dyecount+1;
					set hairColor,6;
					set Zeny,Zeny-5000;
					delitem 982,1;
					mes "[et{r`]";
					mes "ǂł傤A̐F";
					mes "߂Ă݂܂H";
					next;
					menu "͂",L_Twice,"",LendC;
				LError6:
					mes "[et{r`]";
					mes "́AFɐ߂ɂ";
					mes "F̐KvłB";
					close;
		L_BLA:/*F*/
			mes "[et{r`]";
			mes "ł͍Fɐ߂܂ˁB";
			next;
			menu "͂I",-,"ς߂I",LendA;
				if (Zeny < 5000) goto LError_Zeny;
				if (countitem(983)<1) goto LError7;
				if (hairColor==7) goto LError;
					setlook 6,7;
					set @dyecount,@dyecount+1;
					set hairColor,7;
					set Zeny,Zeny-5000;
					delitem 983,1;
					mes "[et{r`]";
					mes "ǂł傤A̐F";
					mes "߂Ă݂܂H";
					next;
					menu "͂",L_Twice,"",LendC;
				LError7:
					mes "[et{r`]";
					mes "́AFɐ߂ɂ";
					mes "F̐KvłB";
					close;
	L_MENU_1:
		mes "[et{r`]";
		mes "CȂA";
		mes "lɂӂꂽA";
		mes "fGɌl鎞A";
		mes "ꂵĂ݂A";
		mes "ȎAC[W`FW";
		mes "CVĂ݂܂񂩁H";
		next;
		mes "[et{r`]";
		mes "Aɔ߂";
		mes "ɂȂAfGȔ";
		mes "ƑfGɕςĂ܂B";
		mes "Ȃ񂩋CɂႢ܂B";
		mes "Ɨǂ̂łB";
		next;
		mes "[et{r`]";
		mes "* ޗyїē *";
		mes "E^FF3080]̐F̐ 1^000000";
		mes "E^FF3080ߗ 5000^000000";
		close;
	L_MENU_2:
		mes "[et{r`]";
		mes "jłłcl͔Ȃ";
		mes "Ƌ`܂B";
		close;
L_Twice:
	mes "[et{r`]";
	mes "͂A܂܂B";
	mes "]̐FǂB";
	next;
	goto Lchoose;
LError:
	mes "[et{r`]";
	mes "A̐F͂ql";
	mes "̔ƓłB";
	next;
	goto Lchoose;
LError_Zeny:
	mes "[et{r`]";
	mes "AȂ悤łB";
	close;
LendA:
	if (@dyecount > 0) goto LendB;
	mes "[et{r`]";
	mes "̂܂܂ł̂łˁB";
	mes "ȂC܂A";
	mes "̐FłB";
	close;
LEndB:
	mes "[et{r`]";
	mes "̐FCɓꂽłˁB";
	mes "ł`B";
	close;
LendC:
	mes "[et{r`]";
	mes "́`A";
	mes "łI";
	mes "܂̂z҂";
	mes "܂`B";
	close;
}

