//====================================================================
//Ragnarok Online Alchemist jobchange script  by Kalen
//====================================================================
//change_alchemist
////////////////////////////////////////////////////////////////
//1	ꎎ(gїnzF)
//2	ꎎ(o[T[N|[V)
//3	ꎎiAOS[ɘbO
//4	񎎌ioAOS[ilɉeB
//5	񎎌iA_VAɘbOB
//6	OAޗ𕷂
//7	OiA@wgɘbOB
//8	@wgɘbBntCxgĂB
//9	nt̍ޗ𓚂ꂽBjRXɘbOB
//10	lsAĒ풆
//11	liBĂуjRXɘbOB
//12	YunoŎ̎`𗊂܂Bޗ炤B
//13	`IB]E\
//14	()
//15	z̉ԂɂZk]E
////////////////////////////////////////////////////////////////
alde_alche.gat,27,185,5	script	BptMh	744,{
	if (Class==5) goto Lmerchant;
	if (Class==18) goto Ltwice;
	mes "[o~Wj[m]";
	mes "悤B͘BptMhłB";
	mes "B͂łA˔\";
	mes "tbVȐlނ߂Ă܂B";
	next;
	mes "[o~Wj[m]";
	mes "DꂽlmłA";
	mes "䂪Mhɂm点܂B";
	mes "Bpt̍˔\";
	mes "X͏ɋ߂Ă܂B";
	close;
Lmerchant:
	if (Upper == 1) goto LUpper1;
	if ((change_alchemist == 1) || (change_alchemist == 2)) goto LStart2;
	if (change_alchemist == 3) goto LStart3;
	if (change_alchemist >= 4) goto LStart4;
	mes "[p~W@j[m]";
	mes "悤B͘BptMhłB";
	mes "płH";
	next;
	menu "BptĂȂłH",-,"BptɂȂ肽łB",L2,"ɗp͂ȂłB",L1;
		mes "[p~W@j[m]";
		mes "Bptƌ̂͗lXȕp";
		mes "V肠錤";
		mes "lBłB";
		mes "wIȕ𗘗pAfT";
		mes "̐ς邱Ƃn߂܂B";
		next;
		mes "[p~W@j[m]";
		mes "ɂ̖ړI͋グ鎖";
		mes "Ă܂Aꂾł";
		mes "܂BȒPȖiA";
		mes "̕܂B";
		next;
		mes "[p~W@j[m]";
		mes "ɂ͐_̗̈Ƃ";
		mes "n܂cc";
		mes "܂ɂł";
		mes "܂F񌤋łB";
		next;
		mes "[p~W@j[m]";
		mes "Bpt͏Aƌ";
		mes "g܂Ȃ΂ȂȂ̂";
		mes "ƂĂςłB";
		next;
		mes "[p~W@j[m]";
		mes "Bptɋ̂Ȃ";
		mes "lƂȂČoςގ";
		mes "߂܂B";
		mes "̕iĂ݂邱Ƃ";
		mes "̒m𓾂邱Ƃo܂B";
		close;
L1:
		mes "[p~W@j[m]";
		mes "ł́Ap܂";
		mes "܂z܂B";
		close;
L2:
		mes "[p~W@j[m]";
		mes "łAłB";
		mes "͘BptMh";
		mes "p~W@j[mƐ\܂B";
		next;
		mes "[p~W@j[m]";
		mes "̃Mhɉď̋";
		mes "󂯂΁ABptƂĔFm";
		mes "ɌɎQ邱Ƃ";
		mes "ł܂B";
		next;
		mes "[p~W@j[m]";
		mes "ANłFm킯ł";
		mes "܂Bw͂ƍDSA";
		mes "ɖɂȂłȂ";
		mes "Ȃ܂B";
		next;
		mes "[p~W@j[m]";
		mes "Mhɉ邽߂ɂ";
		mes "̏܂B";
		mes "͐\݌ɂ܂B";
		next;
		mes "[p~W@j[m]";
		mes "ł́A\݂";
		mes "Ȃ܂H";
		next;
		menu "\݂܂B",L2_1,"Ő\݂܂B",-;
			mes "[p~W@j[m]";
			mes "˔\鏤l";
			mes "䂪Mhł͂ł}܂B";
			mes "A܂炵Ă܂B";
			close;
		L2_1:
			if (JobLevel < 40) goto Llowlv;
			if (JobLevel == 50) goto Lskip;
			mes "[p~W@j[m]";
			mes "\݁A肪Ƃ܂B";
			mes "Mhɉ邽߂ɂ";
			mes "^3355FF50,000Zeny^000000 Ă܂B";
			mes "ƁA̕i";
			mes "QĂKv܂B";
			next;
			mes "[p~W@j[m]";
			mes "A^3355FFÂ@^000000^3355FFb艮̋^000000";
			mes "Ă";
			mes "Kvi\܂B";
			next;
			mes "[p~W@j[m]";
			mes "ł͉\ɏĂB";
			next;
			menu strcharinfo(0),-;
			mes "[p~W@j[m]";
			mes "ł͉肢܂B";
			mes "Kvi͐mɑĂ";
			mes "Kv܂̂ŁAӂB";
			next;
			if (Zeny < 50000) goto LError;
			set Zeny,Zeny-50000;
			set @rand,rand(2);
			mes "[p~W@j[m]";
			mes "ǂǂcc "+strcharinfo(0)+"ĺcc";
			if (@rand == 0) mes "^3355FFgїpnzF^000000 100";
			if (@rand == 0) set change_alchemist,1;
			if (@rand == 1) mes "^3355FFo[T[N|[V^000000 7";
			if (@rand == 1) set change_alchemist,2;
			mes "ėĉB";
			next;
			mes "[p~W@j[m]";
			mes "ł́A\ݏ͎󂯎܂B";
			mes "ł͂ł́AĂႢ܂B";
			close;
		Lskip:/*bK*/
			mes "[p~W@j[m]";
			mes "\݁A肪Ƃ܂B";
			mes "Ȃ́AWu}X^[";
			mes "܂̂ŁAƏłB";
			next;
			set change_alchemist,3;
			mes "[p~W@j[m]";
			mes "ł͘Bp̊{wт܂傤B";
			mes "܂Aigݍ킹ߒ";
			mes "܂B";
			next;
			mes "[p~W@j[m]";
			mes "ȂOɁcc";
			mes "OS[Ăт̂悤łB";
			mes "́A̗pł傤cc";
			mes "sĂ݂Ă܂񂩁H";
			close;
LStart2:
	if ((countitem(1005) >= 1) && (countitem(1006) >= 1)) goto Lok2;
	if ((change_alchemist == 1) && (countitem(612)<100)) goto LError2;
	if ((change_alchemist == 2) && (countitem(657)<7)) goto LError2;
	mes "[p~W@j[m]";
	mes "Ȃ܂B";
	mes "悤łˁB";
	mes "ėi̓MhŗL";
	mes "g킹Ă܂ˁB";
	next;
	if (change_alchemist == 1) delitem 612,100;
	if (change_alchemist == 2) delitem 657,7;
Lok:
	set change_alchemist,3;
	mes "[p~W@j[m]";
	mes "ł͘Bp̊{wт܂傤B";
	mes "܂Aigݍ킹ߒ";
	mes "܂B";
	next;
	mes "[p~W@j[m]";
	mes "ȂOɁcc";
	mes "OS[Ăт̂悤łB";
	mes "́A̗pł傤cc";
	mes "sĂ݂Ă܂񂩁H";
	close;
Lok2:/*K*/
	mes "[o~W@j[m]";
	mes "Ȃ܂B";
	mes "Â@ƒb艮̋Ƃ";
	mes "ɂȂ悤łˁB";
	mes "ł͈ꎟ͖Ə܂";
	next;
	delitem 1005,1;
	delitem 1006,1;
	goto Lok;
LStart3:
	mes "[p~W@j[m]";
	mes "OS[҂łB";
	mes "sĘb𕷂Ă݂ĂB";
	close;
LStart4:
	mes "[p~W@j[m]";
	mes "A\󂠂܂B";
	mes "AXčł܂B";
	next;
	mes "[p~W@j[m]";
	mes "̕ɂfĂ܂B";
	mes "ł́B";
	close;
LError:/*K*/
	mes "[p~W@j[m]";
	mes "Ȃ悤łB";
	close;
LError2:
	mes "[p~W@j[m]";
	mes "܂Ă܂񂩁H";
	mes "Mhɉɂ";
	if (change_alchemist == 1) mes "^3355FFgїpnzF^000000 100";
	if (change_alchemist == 2) mes "^3355FFo[T[N|[V^000000 7";
	mes "ėĂKv܂B";
	next;
	mes "[p~W@j[m]";
	mes "I܂";
	mes "܂炵Ă܂B";
	close;
Llowlv:
	mes "[p~W@j[m]";
	mes "X҂cc";
	mes "xȂ悤łˁB";
	mes "BptɂȂ肽̂ł";
	mes "Wux40ȏKvłB";
	close;
Ltwice:
	mes "[p~W@j[m]";
	mes "Ⴂ܂";
	mes strcharinfo(0)+"lB";
	mes "BptMh";
	mes "ƂĂZłB";
	next;
	mes "[p~W@j[m]";
	mes "ł́Al`ɐ錤Ƃ";
	mes "Hwɑ΂錤ȂłB";
	next;
	mes "[p~W@j[m]";
	mes "N̐҂ĂłB";
	mes "GȌłA";
	mes "FẐłB";
	close;
LUpper1:
	mes "[p~W@j[m]";
	mes "Ȃ͓]Ă܂̂";
	mes "ł͓]Eēł܂B";
	close;
}
//==============================================================================
alde_alche.gat,101,184,4	script	}X^[AP~Xg	122,{
	if (Class==0) goto Lnovice;
	if (Class==5) goto Lmerchant;
	if (Class==18) goto Ltwice;
	mes "[rZg=J[V]";
	mes "Ԑlȏ";
	mes "̗pŗ̂ˁB";
	next;
	mes "[rZg=J[V]";
	mes "͌ȂB";
	mes "낤낵ĂȂŁA";
	mes "ǂɍsȂB";
	close;
Lmerchant:
	if ((change_alchemist >= 1) && (change_alchemist <= 12)) goto LStart2;
	if (change_alchemist >= 13) goto LStart3;
	mes "[rZg=J[V]";
	mes "񏤐lȁB";
	mes "BpɊ֐ŜB";
	next;
	mes "[rZg=J[V]";
	mes "BABptMhł";
	mes "܂܂ȕ̌sĂB";
	mes "@Ƃ͈Ⴄ@ŐV";
	mes "ʂ𓾂̂ړIB";
	next;
	mes "[rZg=J[V]";
	mes "VnAVs";
	mes "A}ȕV";
	mes "肷錤Ă̂B";
	next;
	mes "[rZg=J[V]";
	mes "lƂĒԕ邵Ă݂";
	mes "ɑ΂Ă̊֐SȂB";
	mes "Bpwт";
	mes "B̃MhɉĂ݂ȂB";
	close;
LStart2:
	mes "[rZg=J[V]";
	mes "\݂悤ȁcc";
	mes "ɗ݁Aɍu悤ɁB";
	next;
	mes "[rZg=J[V]";
	mes "̘Bptɏ߂鎖";
	mes "YȂ悤Bl̒m";
	mes "̂͑X邱Ƃ낤B";
	close;
LStart3:
	if (SkillPoint != 0) goto LErrorpoint;
	if (Upper != 0) goto LErrorUpper;
	mes "[rZg=J[V]";
	mes "ققB ĕKvȊbm";
	mes "wŗˁBJB";
	next;
	jobchange 18,0;
	set change_alchemist,0;
	mes "[rZg=J[V]";
	mes "ꂩ炨OBptƂ";
	mes "MḧB";
	mes "ɗ݁Aɍu悤ɁB";
	next;
	getitem 7127,1;
	mes "[rZg=J[V]";
	mes "Oɂ͓ʂɂ悤B";
	next;
	mes "[rZg=J[V]";
	mes "ł́A܂ȂB";
	mes "BptƂāAr𖁂Ƃ";
	mes "YłȂI";
	close;
Lnovice:
	mes "[rZg=J[V]";
	mes "q͂֍sȂB";
	mes "ȏŗVłB";
	next;
	mes "[rZg=J[V]";
	mes "͊Ȃ̂񂠂B";
	mes "ققAOŗVтȂB";
	close;
LErrorpoint:
	mes "[rZg=J[V]";
	mes "܂gĂȂ";
	mes "XL|Cg悤B";
	mes "SgĂA܂邪B";
	close;
LErrorUpper:
	close;
Ltwice:
	mes "[rZg=J[V]";
	mes "͐ił邩ˁH";
	mes "i͏\";
	mes "ӂ悤ɂȁB";
	next;
	mes "[rZg=J[V]";
	mes "ɂ͗\zoȂʂ";
	mes "炳ꍇI";
	mes "̎ȂƂKvȂ̂B";
	next;
	mes "[rZg=J[V]";
	mes "Vグ邱Ƃ";
	mes "oȂAKMhɒm点ĂB";
	mes "̊FMSɌȂ̂B";
	mes "N撣Ăꂽ܂I";
	close;
}
//==============================================================================
alde_alche.gat,175,107,4	script	CނBpt	749,{
	if (Class==5) goto Lmerchant;
	if (Class==18) goto Ltwice;
	mes "[OS[]";
	mes "LLLLApH";
	mes "̎dm肽cc";
	mes "ʂɂOɂĂ낤B";
	mes "͌tccAPPPPcc";
	next;
	mes "[OS[]";
	mes "̃|[Vꂽcc";
	mes "ꍑ𑀂邱Ƃ\I";
	next;
	mes "[OS[]";
	mes "LLL@PPPPcc";
	mes "ve̓zɂ͔閧Ⴜcc";
	close;
Lmerchant:
	if ((change_alchemist == 1) || (change_alchemist == 2)) goto LStart2;
	if (change_alchemist == 3) goto LStart3;
	if (change_alchemist == 4) goto LStart4;
	if (change_alchemist == 5) goto LStart5;
	if (change_alchemist >= 6) goto LStart6;
	mes "[OS[]";
	mes "LLL@PPPP";
	mes "AȂ񂶂Ml?!";
	next;
	mes "[OS[]";
	mes "l͘IXJ񂶂낤cc";
	mes "̂悤ȏꏊɉpH";
	next;
	mes "[OS[]";
	mes "LLLLccočsȂB";
	mes "Mlɗ^悤Ȃ̂";
	mes "Ȃ킢ccPPPPP";
	close;
LStart2:
	mes "[OS[]";
	mes "LLL@PPPP";
	mes "AȂ񂶂Ml?!";
	next;
	mes "[OS[]";
	mes "Bpwт?!";
	mes "Q͐QĂ鎞";
	mes "ǂ!!";
	next;
	mes "[OS[]";
	mes "PPPP!! NNė邪I";
	mes "AƂƂƏočsI";
	close;
LStart3:
	if (JobLevel == 50) goto Lskip;
	mes "[OS[]";
	mes "LLLcc܂ǂ̔n̍";
	mes "Mhɓ]荞ŗȁI";
	next;
	mes "[OS[]";
	mes "Cɓcc܂Cɓcc";
	mes "ǂA𕥂";
	mes "BptɂȂƎv!!";
	next;
	mes "[OS[]";
	mes "LLLLcc傢";
	mes "ʐڂĂ낤ł͂ȂI";
	mes "̂Ȃ";
	mes "ǂĂ!!";
	next;
	mes "[OS[]";
	mes "RƂĂȁc悫Ȃ悫ȁB";
	mes "lĐ󂯂΂悢";
	mes "vĂ̂ȂAÂlI";
	mes "LLLLLcc";
	next;
	mes "[OS[]";
	mes "ł͎oɓ邪I";
	mes "ǂꂾMlo邩Ă낤I";
	next;
	set @alcheQP,0;
	goto Lquestion1;
LStart4:
	mes "[OS[]";
	mes "A܂ėB";
	mes "očsƌ낤I";
	next;
	mes "[OS[]";
	mes "CɓccCɓȁcc!";
	mes "荞ŗācc";
	mes "肶!?";
	next;
	mes "[OS[]";
	mes "ӂA܂ǂ낤B";
	mes "̃OS[";
	mes "xMlĂ낤cc";
	next;
	mes "[OS[]";
	mes "ł͎oɓ邪I";
	mes "ǂꂾMlo邩Ă낤I";
	next;
	set @alcheQP,0;
	goto Lquestion1;
//---------------------------------------------------------
Lquestion1:
	set @alrand,rand(2);
	if (@alrand == 1) goto Lquestion1_2;
	mes "[OS[]";
	mes "12 + 23 + 34 + 45 =";
	next;
		input @alcheQ;
		if (@alcheQ == 114) set @alcheQP,@alcheQP+10;
		goto Lquestion2;
Lquestion1_2:
	mes "[OS[]";
	mes "13 + 25 + 37 + 48 =";
	next;
		input @alcheQ;
		if (@alcheQ == 123) set @alcheQP,@alcheQP+10;
		goto Lquestion2;
//---------------------------------------------------------
Lquestion2:
	set @alrand,rand(2);
	if (@alrand == 1) goto Lquestion2_2;
	mes "[OS[]";
	mes "1000 - 36 - 227 - 348 =";
	next;
		input @alcheQ;
		if (@alcheQ == 389) set @alcheQP,@alcheQP+10;
		goto Lquestion3;
Lquestion2_2:
	mes "[OS[]";
	mes "1000 - 58 - 214 - 416 =";
	next;
		input @alcheQ;
		if (@alcheQ == 312) set @alcheQP,@alcheQP+10;
		goto Lquestion3;
//---------------------------------------------------------
Lquestion3:
	set @alrand,rand(2);
	if (@alrand == 1) goto Lquestion3_2;
	mes "[OS[]";
	mes "14  17  3 =";
	next;
		input @alcheQ;
		if (@alcheQ == 714) set @alcheQP,@alcheQP+10;
		goto Lquestion4;
Lquestion3_2:
	mes "[OS[]";
	mes "12  24  3 =";
	next;
		input @alcheQ;
		if (@alcheQ == 864) set @alcheQP,@alcheQP+10;
		goto Lquestion4;
//---------------------------------------------------------
Lquestion4:
	set @alrand,rand(2);
	if (@alrand == 1) goto Lquestion4_2;
	mes "[OS[]";
	mes "9765 / 3 / 5 / 7 =";
	next;
		input @alcheQ;
		if (@alcheQ == 93) set @alcheQP,@alcheQP+10;
		goto Lquestion5;
Lquestion4_2:
	mes "[OS[]";
	mes "10530 / 3 / 5 / 2 =";
	next;
		input @alcheQ;
		if (@alcheQ == 351) set @alcheQP,@alcheQP+10;
		goto Lquestion5;
//---------------------------------------------------------
Lquestion5:
	set @alrand,rand(2);
	if (@alrand == 1) goto Lquestion5_2;
	mes "[OS[]";
	mes "(47  28) - (1376 / 4) =";
	next;
		input @alcheQ;
		if (@alcheQ == 972) set @alcheQP,@alcheQP+10;
		goto Lquestion6;
Lquestion5_2:
	mes "[OS[]";
	mes "(35  19) - (1792 / 7) =";
	next;
		input @alcheQ;
		if (@alcheQ == 409) set @alcheQP,@alcheQP+10;
		goto Lquestion6;
//---------------------------------------------------------
Lquestion6:
	set @alrand,rand(2);
	if (@alrand == 1) goto Lquestion6_2;
	mes "[OS[]";
	mes "(2646 / 7) + (13  28) =";
	next;
		input @alcheQ;
		if (@alcheQ == 742) set @alcheQP,@alcheQP+10;
		goto Lquestion7;
Lquestion6_2:
	mes "[OS[]";
	mes "(2368 / 8) + (24  17) =";
	next;
		input @alcheQ;
		if (@alcheQ == 704) set @alcheQP,@alcheQP+10;
		goto Lquestion7;
//---------------------------------------------------------
Lquestion7:
	set @alrand,rand(4);
	if (@alrand == 1) goto Lquestion7_2;
	if (@alrand == 2) goto Lquestion7_3;
	if (@alrand == 3) goto Lquestion7_4;
	mes "[OS[]";
	mes "fBXJEg24";
	mes "ԃ|[V 12";
	mes "nG̉H 5";
	mes "̉H 1";
	mes "̑źH";
	next;
		input @alcheQ;
		if (@alcheQ == 909) set @alcheQP,@alcheQP+10;
		goto Lquestion8;
Lquestion7_2:
	mes "[OS[]";
	mes "fBXJEg24";
	mes "ԃ|[V 6";
	mes "΃|[V 7";
	mes "nG̉H 8";
	mes "̑źH";
	next;
		input @alcheQ;
		if (@alcheQ == 798) set @alcheQP,@alcheQP+10;
		goto Lquestion8;
Lquestion7_3:
	mes "[OS[]";
	mes "fBXJEg24";
	mes "΃|[V 15";
	mes "g勾 6";
	mes "ݒupgbv 4";
	mes "̑źH";
	next;
		input @alcheQ;
		if (@alcheQ == 934) set @alcheQP,@alcheQP+10;
		goto Lquestion8;
Lquestion7_4:
	mes "[OS[]";
	mes "fBXJEg24̏ꍇ";
	mes "ԃ|[V 6";
	mes "΃|[V 7";
	mes "̑źH";
	next;
		input @alcheQ;
		if (@alcheQ == 438) set @alcheQP,@alcheQP+10;
		goto Lquestion8;

//---------------------------------------------------------
Lquestion8:
	set @alrand,rand(3);
	if (@alrand == 1) goto Lquestion8_2;
	if (@alrand == 2) goto Lquestion8_3;
	mes "[OS[]";
	mes " 2";
	mes "Lbv 3";
	mes "u[c 3";
	mes "d̍v́H";
	next;
		input @alcheQ;
		if (@alcheQ == 480) set @alcheQP,@alcheQP+10;
		goto Lquestion9;
Lquestion8_2:
	mes "[OS[]";
	mes " 3";
	mes "Lbv 4";
	mes "u[c 2";
	mes "d̍v́H";
	next;
		input @alcheQ;
		if (@alcheQ == 550) set @alcheQP,@alcheQP+10;
		goto Lquestion9;
Lquestion8_3:
	mes "[OS[]";
	mes "V~^[ 3";
	mes "w 2";
	mes "OR[g 1";
	mes "d̍v́H";
	next;
		input @alcheQ;
		if (@alcheQ == 450) set @alcheQP,@alcheQP+10;
		goto Lquestion9;
//---------------------------------------------------------
Lquestion9:
	set @alrand,rand(3);
	if (@alrand == 1) goto Lquestion9_2;
	if (@alrand == 2) goto Lquestion9_3;
	mes "[OS[]";
	mes "~[V[hAU[WPbg";
	mes "X}CAVN[uAF[";
	mes "}t[A";
	mes "hl̍v́H";
	next;
		input @alcheQ;
		if (@alcheQ == 12) set @alcheQP,@alcheQP+10;
		goto Lquestion10;
Lquestion9_2:
	mes "[OS[]";
	mes "r^AgAIy";
	mes "{A}t[Au[cA";
	mes "hl̍v́H";
	next;
		input @alcheQ;
		if (@alcheQ == 20) set @alcheQP,@alcheQP+10;
		goto Lquestion10;
Lquestion9_3:
	mes "[OS[]";
	mes "obN[AOR[gA}XN";
	mes "傫ȃ{A{̃wAoh";
	mes "}AOX";
	mes "hl̍v́H";
	next;
		input @alcheQ;
		if (@alcheQ == 15) set @alcheQP,@alcheQP+10;
		goto Lquestion10;
//---------------------------------------------------------
Lquestion10:
	set @alrand,rand(3);
	if (@alrand == 1) goto Lquestion10_2;
	if (@alrand == 2) goto Lquestion10_3;
	mes "[OS[]";
	mes "w 5";
	mes "fBXJEg24Ŕꍇ";
	mes "fBXJEg20Ŕꍇ";
	mes "͂炩H";
	next;
		input @alcheQ;
		if (@alcheQ == 8800) set @alcheQP,@alcheQP+10;
		goto LcheckQP;
Lquestion10_2:
	mes "[OS[]";
	mes "A[}[ 4";
	mes "fBXJEg24Ŕꍇ";
	mes "fBXJEg20Ŕꍇ";
	mes "͂炩H";
	next;
		input @alcheQ;
		if (@alcheQ == 7680) set @alcheQP,@alcheQP+10;
		goto LcheckQP;
Lquestion10_3:
	mes "[OS[]";
	mes "^Cc 3";
	mes "fBXJEg24Ŕꍇ";
	mes "fBXJEg20Ŕꍇ";
	mes "͂炩H";
	next;
		input @alcheQ;
		if (@alcheQ == 8520) set @alcheQP,@alcheQP+10;
		goto LcheckQP;
LcheckQP:
	if ((change_alchemist == 3) && (@alcheQP >= 90)) goto Lgoukaku;
	if ((change_alchemist == 4) && (@alcheQP >= 80)) goto Lgoukaku;
	mes "[OS[]";
	mes "ccق炵I";
	mes "Ō܂ŕtnI";
	mes "MlȂǕsi!!!";
	next;
	mes "[OS[]";
	mes "ȌvZoȂz";
	mes "BptɂȂ낤Ƃ͕ЕɂI";
	next;
	mes "[OS[]";
	mes "ႢƂ낶킢I";
	mes "očsIočsI";
	mes "Əočs񂩂!!!!";
	set change_alchemist,4;
	close;
Lgoukaku:
	mes "[OS[]";
	if (@alcheQP == 100) mes "ӂނӂށc";
	if (@alcheQP == 90) mes "PPPccrAԈႦȁB";
	if (@alcheQP == 80) mes "PPPccrAԈႦȁB";
	mes "܂ǂB̃OS[";
	mes "ʂɋMlF߂Ă悤cc";
	next;
	mes "[OS[]";
	mes "LLLcc ł͍sǂB";
	mes "MSɌjAy̖ɗĂ悤";
	mes "Ȃ邪悢BLLLcc";
	next;
	mes "[OS[]";
	mes "ł͍sI_VAɉȂB";
	mes "ޓzMlɎK悤B";
	mes "ƌĂȂB";
	set change_alchemist,5;
	close;
Lskip:
	mes "[OS[]";
	mes "AO̓Wu}X^[ȁB";
	mes "ȂΗp͂˂B";
	next;
	mes "[OS[]";
	mes "ł͍sI_VAɉȂB";
	mes "ޓzMlɎK悤B";
	mes "ƌĂȂB";
	set change_alchemist,5;
	close;
LStart5:
	mes "[OS[]";
	mes "ĂBƂ͕׋񂩁I";
	next;
LStart6:
	mes "[OS[]";
	mes "LLL@PPPP";
	mes "ŏIƎvłȂI";
	close;
Ltwice:
	mes "[OS[]";
	mes "LLL@PPPP";
	mes "AȂ񂶂Ml?!";
	next;
	mes "[OS[]";
	mes "̌ʂ𓐂ƌ̂I";
	mes "ǂŕĂ!!";
	next;
	mes "[OS[]";
	mes "Ambg邩cc";
	mes "AMl̎vʂɂ͂񂼁B";
	mes "LLLL@PPPPPcc";
	close;
}
//==============================================================================
alde_alche.gat,13,15,7	script		750,{
	if (Class==18) goto Ltwice;
	if ((Class==5) && (change_alchemist == 5) && (countitem(710) >= 1)) goto Lshort;
	if ((Class==5) && (change_alchemist == 5)) goto LStart2;
	if ((Class==5) && (change_alchemist == 6)) goto LStart3;
	if ((Class==5) && (change_alchemist == 7)) goto LStart4;
	mes "[_VA]";
	mes "ȏ㎸Ƃ邱Ƃ";
	mes "ȂccAȂ񂾁cc";
	next;
	mes "[_VA]";
	mes "̎ꂽɉf̂";
	mes "ԂOɖYĂ܂";
	mes "Annnncc";
	next;
	mes "[_VA]";
	mes "yȂ񂩂Ȃcccc";
	mes "nicccc";
	close;
LStart2:
	mes "[_VA]";
	mes "cccccccccc";
	mes "cccccccccc";
	mes "cccccccc";
	next;
	mes "[_VA]";
	mes "IIJ~ȁHlԂcc";
	mes "N{Ă̂ˁB";
	next;
	mes "[_VA]";
	mes "؂ȕȂACtȂB";
	mes "𓾂ׂɁȂSĂ";
	mes "Ƃ邩cc";
	next;
	mes "[_VA]";
	mes "cccccccccc";
	next;
	mes "[_VA]";
	mes "ccƂŉȁB";
	mes "ȏ܂ŗȂāB";
	next;
	menu "K肢܂B",L1,"Ԃ̘b𕷂ĂB",L2,"łȂłB",-;
		mes "[_VA]";
		mes "cccccccccc";
		mes "cccccccccc";
		mes "؂Ȃ͉̂cc";
		mes "YĂ͂܂cc";
		close;
	L2:
		mes "[_VA]";
		mes "ԁccL̒c";
		mes "ɏĂcc";
		mes "ȉԂcc";
		next;
		mes "[_VA]";
		mes "́Al̂";
		mes "̌̂";
		mes "悤Ƃcc";
		next;
		mes "[_VA]";
		mes "̓IIJ~ƉԂɊ֌W";
		mes "bƂAĂcc";
		mes "ڂ́AȂǁAˁcc";
		next;
		mes "[_VA]";
		mes "cc ͈ւ̉ԂB";
		mes "y_Ԍ悤ȁAȁcc";
		mes "ȋCɂĂ^3355FFz̉^000000cc";
		next;
		mes "[_VA]";
		mes "̓zNXB";
		mes "ԂVa񂾁I";
		mes "NǍMȂǂˁB";
		next;
		mes "[_VA]";
		mes "Aɂ͉cȂcc";
		mes "̌A̎Ԃ͎~܂Ă܂c";
		mes "cȂ񂾁cc";
		mes "~܂Ă܂񂾁cc";
		next;
		mes "[_VA]";
		mes "ccnicc";
		mes "ʂĂȂL";
		mes "̔Ԕł̂Ȃ";
		mes "ǂɍsĂ܂łcc";
		close;
	L1:
		mes "[_VA]";
		mes "Bpwтɗ̂cc";
		mes "̎ḿAׂ";
		mes "̊]𐬂邽߂";
		mes "҂ݏócc";
		next;
		mes "[_VA]";
		mes "{IȂƂ͋邪cc";
		mes "́AŏIIɎ";
		mes "fȂ΂ȂȂcc";
		next;
		mes "[_VA]";
		mes "b͋Ă悤cc";
		mes "ȒPȖ@cc";
		mes "ė悤Ɂcc";
		next;
		mes "[_VA]";
		mes "^3355FF^000000 3";
		mes "^3355FF󂫃r^000000 3";
		mes "^3355FFԃn[u^000000 1";
		mes "^3355FFn[u^000000 1";
		mes "^3355FFn[u^000000 1";
		next;
		mes "[_VA]";
		mes "occ܂ȂB";
		set change_alchemist,6;
		close;
LStart3:
	mes "[_VA]";
	mes "cccccccccc";
	mes "cccccccccc";
	mes "cccccccc";
	next;
	mes "[_VA]";
	mes "BpwтƌĂlˁcc";
	mes "Aė̂cc";
	next;
	if ((countitem(7134) < 3) || (countitem(713) < 3) || (countitem(507) < 1) || (countitem(508) < 1) || (countitem(509) < 1)) goto LErroritem;
	mes "[_VA]";
	mes "ޗ𑵂Ă悤ˁcc";
	mes "񑩂ǂ@";
	mes "Ă悤cc";
	next;
	mes "[_VA]";
	mes "܂Aācc";
	mes "̒Ƀn[ucc";
	mes "Ăƃn[uԂcc";
	next;
	mes "[_VA]";
	mes "ꂢȐȂcc";
	mes "Ƒ~܂āAǂǂɂcc";
	mes "n[u𑫂āA܂Ԃcc";
	next;
	mes "[_VA]";
	mes "̂悤ɂācc";
	mes "KʂɂȂcc";
	mes "󂫃rɂƓȂcc";
	next;
	delitem 7134,3;
	delitem 713,3;
	delitem 507,1;
	delitem 508,1;
	delitem 509,1;
	mes "[_VA]";
	mes "ABx";
	mes "̂܂܁A^Ă݂ȂB";
	mes "ȒPccłB";
	next;
	set @potionPT,0;
//------------------------------
Ltest1:
	menu "B",-,"𓪂ɎgB",Lt1_1,"𑫂ŏRB",Lt1_1;
		set @potionPT,@potionPT+1;
		goto Ltest2;
	Lt1_1:
		mes "[_VA]";
		mes "cc[";
		next;
//------------------------------
Ltest2:
	menu "ɓyB",Lt2_1,"Ƀn[uB",-,"Ƀn[vB",Lt2_1;
		set @potionPT,@potionPT+1;
		goto Ltest3;
	Lt2_1:
		mes "[_VA]";
		mes "ccI";
		next;
//------------------------------
Ltest3:
	menu "n[uԂB",-,"ԂB",Lt3_1,"_VȂԂB",Lt3_2;
		set @potionPT,@potionPT+1;
		goto Ltest4;
	Lt3_1:
		mes "[_VA]";
		mes "ccI";
		next;
		goto Ltest4;
	Lt3_2:
		mes "[_VA]";
		mes "ccɂI̐^?!";
		next;
//------------------------------
Ltest4:
	menu "ꂢȐUPB",Lt4_1,"ꂢȐށB",Lt4_2,"ꂢȐB",-;
		set @potionPT,@potionPT+1;
		goto Ltest5;
	Lt4_1:
		mes "[_VA]";
		mes "ccĂ?!";
		next;
		goto Ltest5;
	Lt4_2:
		mes "[_VA]";
		mes "ccÂH";
		next;
//------------------------------
Ltest5:
	menu "n[uԂB",-,"n[uHׂB",Lt5_1,"xȂ̂B",Lt5_2;
		set @potionPT,@potionPT+1;
		goto Ltest6;
	Lt5_1:
		mes "[_VA]";
		mes "cc󂢂̂H";
		next;
		goto Ltest6;
	Lt5_2:
		mes "[_VA]";
		mes "ccĂ܂̂H";
		next;
//------------------------------
Ltest6:
	menu "˂u߂B",Lt6_1,"󂫃rɓB",-,"ĈށB",Lt6_2;
		set @potionPT,@potionPT+1;
		goto Ltestend;
	Lt6_1:
		mes "[_VA]";
		mes "cc󂢂̂H";
		next;
		goto Ltestend;
	Lt6_2:
		mes "[_VA]";
		mes "cc񕜂łH";
		next;
//------------------------------
Ltestend:
	if (@potionPT==6) goto Ltestok;
	mes "[_VA]";
	mes "cccccc";
	next;
	mes "[_VA]";
	mes "ccޗSȂȂĂ܂ˁB";
	mes "cc܂ėȂB";
	close;
Ltestok:
	getitem 501,1;
	getitem 503,1;
	getitem 504,1;
	set change_alchemist,7;
	mes "[_VA]";
	mes "cc悭B߂Ă̂ɂ";
	mes "悭oˁccLOɂ";
	mes "ĂȂB";
	next;
	mes "[_VA]";
	mes "ׂ̃̕@=wg";
	mes "ɍsȂcc";
	mes "ccĂł傤B";
	mes "ނɍXȂ鋳𐿂Ȃcc";
	next;
	mes "[_VA]";
	mes "YȂ悤Ɂcc";
	mes "ɂƂĈԁcc";
	mes "؂Ȃ͉̂cc";
	mes "Ȃ΂Ȃ͉̂cc";
	close;
LStart4:
	mes "[_VA]";
	mes "@=wgɁcc";
	mes "ɍsȂcc";
	next;
	mes "[_VA]";
	mes "AnicclB";
	mes "ꂩ́ẢԂ猩ꂸɁcc";
	mes "̍͐ÂɎ҂ˁcc";
	close;
LErroritem:
	mes "[_VA]";
	mes "ccĂ镨";
	mes "YĂ܂̂cc";
	mes "xA茾";
	mes "x͖YꂹɑĂ悤Ɂcc";
	next;
	mes "[_VA]";
	mes "^3355FF^000000 3";
	mes "^3355FF󂫃r^000000 3";
	mes "^3355FFԃn[u^000000 1";
	mes "^3355FFn[u^000000 1";
	mes "^3355FFn[u^000000 1";
	next;
	mes "[_VA]";
	mes "occ܂ȂB";
	close;
Lshort:
	mes "[_VA]";
	mes "̉ԂccɂȂH";
	mes "́AĂÁcc";
	mes "̌!!";
	next;
	menu "グ邱Ƃ͂ł܂B",-,"グ悤Ǝė܂B",Ls1;
		mes "[_VA]";
		mes "c";
		close;
	Ls1:
		mes "[_VA]";
		mes "cc󂯎Ăcc";
		mes "̘BpɊւ邷ׂĂ̒m";
		mes "NɎ悤!!";
		next;
		delitem 710,1;
		mes "^3355ff- Ȃ̓_VA -";
		mes "- BpɊւlX -";
		mes "- m@܂ꂽ -^000000";
		next;
		mes "[_VA]";/*]*/
		mes "cc";
		mes "Ƃ̓}X^[AP~Xg";
		mes "ɍscc";
		set change_alchemist,15;
		close;
Ltwice:
	mes "[_VA]";
	mes "ccNB̂ccˁB";
	mes "hȘBptɂȂɗ񂾂ˁcc";
	next;
	mes "[_VA]";
	mes "Az̉Ԃ͂܂cc";
	mes "̉ԁcccc";
	next;
	mes "[_VA]";
	mes "̌邱Ƃł";
	mes "nicc";
	mes "Annnncc";
	close;
}
//==============================================================================
alde_alche.gat,79,19,5	script		748,{
	if (Class==18) goto Ltwice;
	if ((Class==5) && (change_alchemist==7)) goto LStart2;
	if ((Class==5) && (change_alchemist==8)) goto LStart3;
	if ((Class==5) && (change_alchemist==9)) goto LStart4;
	mes "[@=wg]";
	mes "ƏcƏŁcc";
	mes "AƏŊ̂ɁI";
	next;
	mes "[@=wg]";
	mes "ǂāAǂĎs!!";
	mes "ԈƂ͉ĂȂ̂ɁI";
	mes "IȂ!!";
	next;
	mes "[@=wg]";
	mes "܂ޗ𑵂Ȃ΂ȂȂcc";
	mes "A͊邾낤";
	mes "tttcc";
	close;
LStart2:
	set change_alchemist,8;
	mes "[@=wg]";
	mes "EEEcc̉Ȃ̂cc";
	mes "ǂ΁cŁAŁcc";
	mes "_ł͊mɍĂ̂Ɂcc";
	mes "̎~܂Ă܂񂾁B";
	mes "ԈĂƂ̂cc";
	next;
	mes "[@=wg]";
	mes "Aŗnt𒍂";
	mes "~܂ȂĂ͂ȂȂ̂Ɂcc";
	mes "~܂Ȃcccc";
	mes "ȏSғIȊԈႢcc";
	mes "܂ɂ͕@ςĂ݂邩cc";
	next;
	mes "[@=wg]";
	mes "A̕𒼂ΗǂB";
	mes "n߂蒼Kv͂ȂǂȂ񂾁I";
	mes "Aʗǂ΁cc";
	mes "ccƁAƁA!!!!";
	next;
	mes "[@=wg]";
	mes "cccccccccc";
	next;
	mes "[@=wg]";
	mes "cccȂ񂾂ÓH";
	next;
	goto Lchoose;
LStart3:
	mes "[@=wg]";
	mes "AŐG؂̂Ă";
	mes "ׂƂׂƂt̂";
	mes "ǂɏ[s[nt";
	mes "ccH";
	mes "ǂɍscc";
	next;
	mes "[@=wg]";
	mes "Ō̈gĂ܂B";
	mes "jRX̂AĂ邩ȁcc";
	mes "؂ɍŝʓ|cc";
	next;
	mes "[@=wg]";
	mes "cccccccccc";
	next;
	mes "[@=wg]";
	mes "ccccÓH";
	next;
Lchoose:
	menu "Bptu]łB",L1,"cccc",-;
		mes "[@=wg]";
		mes "łɗ̂cc";
		mes "Ȃ炻";
		mes "ƂĂĂB";
		next;
		mes "[@=wg]";
		mes "ȂꂱGĂ͍邩B";
		mes "ז͂ȂłB";
		next;
		menu "ƋĂB",L0_1,"cccc",-;
			mes "[@=wg]";
			mes "cccccccccc";
			next;
			mes "[@=wg]";
			mes "cccccccccc";
			next;
			mes "[@=wg]";
			mes "cccccccccc";
			next;
			mes "[@=wg]";
			mes "ccÓH";
			next;
			mes "[@=wg]";
			mes "NmȂAȏɂȂ";
			mes "ƏočsȂI";
			mes "͎̕Ȃ񂾂B";
			next;
			mes "[@=wg]";
			mes "قAƍsI";
			mes "tHC!!!";
			close;
		L0_1:
			mes "[@=wg]";
			mes "͂זȂ";
			mes "̂ł͂ȂȁB";
			mes "܂Ab𕷂ł";
			mes "ԂƂ̂ɁcucucB";
			next;
			mes "[@=wg]";
			mes "悵Aۑ肾B";
			mes "Ołƕ׋ėȂB";
			mes "ˁcc`cc";
			next;
			mes "[@=wg]";
			mes "AQV^Cɉ";
			mes "a܂ƍ܂@";
			mes "włȂB";
			next;
			mes "[@=wg]";
			mes "i͎ėȂĂB";
			mes "̖iƂ";
			mes "ǂĂȂBˁB";
			next;
			mes "[@=wg]";
			mes "ł́AsėȂB";
			mes "قAƍsI";
			mes "tHC!!!";
			close;
	L1:
		mes "[@=wg]";
		mes "ÅԗlB";
		mes "ƊwłȁH";
		mes "Vŗ̂ł͂Ȃ낤ˁcc";
		next;
		mes "[@=wg]";
		mes "Ȃ炢ČƂ邩B";
		mes "ĂʂAĂ݂邪B";
		next;
		if (MOLGENSTAIN==3) goto L1_other;
		mes "[@=wg]";
		mes "a܂鎞KvȃACe ";
		next;
		menu "炩Ȗ",-,"ׂƂׂƂt",-,"ƒ{̌",-;
		mes "[@=wg]";
		mes "܂鎞KvȃACe ";
		next;
		menu "̃GT",L1end,"Ñ㋛̐O",L1end,"",L1end;
	L1_other:
		set @count,0;
		mes "[@=wg]";
		mes "a܂鎞KvȂACe";
		next;
		menu "J{[fB",-,"fBg~",L1_o2,"AR[",L1_o2;
			set @count,@count+1;
	L1_o2:
		mes "[@=wg]";
		mes "܂鎞KvȂACe";
		next;
		menu "J{[fB",L1end,"fBg~",-,"AR[",L1end;
			set @count,@count+1;
	L1end:
		if (@count==2) goto Lgoukaku;
		mes "[@=wg]";
		mes "ccɌĕsB";
		mes "QV^CɊwŗȂ";
		mes "mɌ̂Ɂcc";
		next;
		mes "[@=wg]";
		mes "܂AtȂˁI";
		mes "ȂɈoAlȂ";
		mes "AĂȂāI";
		mes "זAƗI";
		close;
	Lgoukaku:
		mes "[@=wg]";
		mes "A悭ȁB";
		mes "Ai𗝉̂͑؂ȎB";
		mes "Aƌ";
		mes "ĂŁAg";
		mes "̂Ȃ̂B";
		next;
		mes "[@=wg]";
		mes "̂܂܂̊OɏoāAׂ̕";
		mes "jRXɉɂȂB";
		mes "ƐFXƋĂ邾낤B";
		next;
		mes "[@=wg]";
		mes "ĂAƍsB";
		mes "狳邱Ƃ͂ȂB";
		set change_alchemist,9;
		close;
LStart4:
	mes "[@=wg]";
	mes "ĂAƍsB";
	mes "狳邱Ƃ͂ȂB";
	next;
	mes "[@=wg]";
	mes "ׂ̃̕jRXɉȂB";
	mes "͌𑱂ȂႢȂ񂾁B";
	close;
Ltwice:
	mes "[@=wg]";
	mes "Ȃ񂾂A͍Z!!";
	mes "ƂƂƗpǂB";
	next;
	mes "[@=wg]";
	mes "ABptɂȂĊ̂";
	mes "邪cc͂Ⴂł΂肾";
	mes "W肦ȂB";
	next;
	mes "[@=wg]";
	mes "AMSɗ݁A";
	mes "Hw܂B";
	mes "ǂA遂񂶂ȂB";
	close;
}
//==============================================================================
alde_alche.gat,145,19,1	script	Ȍ	57,{
	if ((Class==5) && (change_alchemist == 9)) goto LStart2;
	if ((Class==5) && (change_alchemist == 10)) goto Lshort;
	if ((Class==5) && (change_alchemist == 11)) goto LStart3;
	if ((Class==5) && (change_alchemist == 12)) goto LStart4;
	if ((Class==5) && (change_alchemist == 13)) goto LStart5;
	mes "[jRX=v[]";
	mes "ȂƂȂācc";
	mes "ɑƂ";
	mes "ɂƁcc";
	mes "ƂƂ͂́cc";
	mes "ccucuccc";
	close;
LStart2:
	mes "[jRX=v[]";
	mes "NBptɂȂ肽ƂlB";
	mes "ˁccNłBpt";
	mes "Ȃ킯Ȃ񂾁B";
	next;
	mes "[jRX=v[]";
	mes "r[ȋCŘBp";
	mes "oƂ͋ȂB";
	mes "ȖŁAMhł͌N̓]";
	mes "Ă̂B";
	next;
	mes "[jRX=v[]";
	mes "܂ł̉ߒŕƎv";
	mes "BpɕKvƂ≻w";
	mes "m͕̂̂ȂB";
	next;
	mes "[jRX=v[]";
	mes "̎sJԂ΂";
	mes "Mh̗vɂȂȂBpt";
	mes "ĂɂȂȁB";
	mes "͂͂͂[I";
	set change_alchemist,10;
	next;
Lshort:
	mes "[jRX=v[]";
	mes "āABptɂ͐FX";
	mes "\͂KvƂȂB";
	mes "ĹEẂEvŹcc";
	mes "Ĕz͂B";
	next;
	mes "[jRX=v[]";
	mes "ꂩANɂǂꂾ";
	mes "BptƂĂ̑f";
	mes "邩Ă炤B";
	mes "܂͎̕\Ă炨B";
	next;
	mes "";
	mes "15.15.15.15";
	mes "15...";
	mes "15...";
	mes "15...";
	mes "15";
	next;
	mes "[jRX=v[]";
	mes "15̐cA";
	mes "c3}X";
	mes "łȁB";
	mes "̃}XɁA19܂ł";
	mes "ÂĂ͂߁A";
	mes "\Ă炤B";
	next;
	mes "[jRX=v[]";
	mes "[āA";
	mes "Ă͂߂cEE΂";
	mes "̗łꂼꑫZA";
	mes "Sčv15ɂȂ悤";
	mes "Ȃ΂ȂȂB";
	mes "񓚂͎̂̒ʂ肾B";
	next;
	mes "[jRX=v[]";
	mes "P. Q. R";
	mes "S. T. U";
	mes "V. W. X";
	mes "N̂悤ɂĂ͂߂ꍇA";
	mes "񓚗ɂ123456789";
	mes "ƂԂŐLB";
	next;
	mes "[jRX=v[]";
	mes "܂莞Ԃ";
	mes "~ɂ邩璍ӂĂB";
	mes "ł́AĂ炨B";
	mes "x\B";
	next;
	mes "";
	mes "15.15.15.15";
	mes "15...";
	mes "15...";
	mes "15...";
	next;
	mes "[jRX=v[]";
	mes "ł͓Ă炨B";
	next;
	input @num;
	if (@num <= 0) goto LError;
	if ((@num == 618753294) || (@num == 816357492) || (@num == 276951438) || (@num == 672159834) || (@num == 492357816) || (@num == 294753618) || (@num == 834159672) || (@num == 438951276)) goto Lgoukaku;
		mes "[jRX=v[]";
		mes "`cc";
		mes "sB";
		mes "lĂ݂ƂB";
		close;
Lgoukaku:
		mes "[jRX=v[]";
		mes "B";
		mes "̎ɈڂĂ炤A";
		mes "邩";
		mes "܂bĂB";
		set change_alchemist,11;
		close;
LError:
		mes "[jRX=v[]";
		mes "ł͉񓚂ɂȂĂȂB";
		close;
LStart3:
	mes "[jRX=v[]";
	mes "ɁAsĂ˂";
	mes "ȂȂꏊB";
	mes "u҂̓ssWm[vɃZ[WB";
	mes "ɘBṕuo[v";
	mes "uoWv̌ZK˂ȂB";
	mes "sāA`Ă悤ɁB";
	next;
	mes "[jRX=v[]";
	mes "AčsȂB";
	mes "ނƐeȂ̂ɖɗ낤B";
	next;
	mes "[jRX=v[]";
	mes " 1";
	mes "R 5";
	mes "ꂢȍ 5";
	mes "IfIRAGjE e3";
	getitem 974,1;
	getitem 7068,5;
	getitem 7043,5;
	getitem 756,3;
	getitem 757,3;
	set change_alchemist,12;
	next;
	mes "[jRX=v[]";
	mes "Wm[ɒ悤F";
	mes "Bł́AĂႢB";
	close;
LStart4:
	if (npc_yunoalc==2) goto L4_ok;
	mes "[jRX=v[]";
	mes "u҂̓ssWm[vɃZ[WB";
	mes "ɘBṕuo[v";
	mes "uoWv̌ZK˂ȂB";
	mes "sāA`Ă悤ɁB";
	close;
L4_ok:
	mes "[jRX=v[]";
	mes "AJˁB";
	mes "uo[vuoWvZ킩";
	mes "ƂĂƂ̏Ȃ͂ĂB";
	next;
	mes "[jRX=v[]";
	mes "𐬌Ă悤ˁB";
	mes "ނŽ`Ȃcc";
	mes "ށA[ɎiƎv";
	mes "ԈႢȂ낤B";
	next;
	mes "[jRX=v[]";
	mes "2K̃MhɉɍsƗǂB";
	mes "ׁI]E܂Ōc킸I";
	set change_alchemist,13;
	close;
LStart5:
	mes "[jRX=v[]";
	mes "2K̃MhɉɍsƗǂB";
	mes "ׁI]E܂Ōc킸I";
	close;

}
//==============================================================================
alde_alche.gat,24,188,2	script	Mhl	740,{
	mes "[AV[v]";
	mes "Ⴂ܂I";
	next;
	menu "wB",L1,"̏wB",L2,"߂",Lend;
L1:
		mes "[AV[v]";
		mes "߂łH";
		next;
		menu " - 8z",-,"𒆒fB",Lend;
		mes "[AV[v]";
		mes "v悤łH";
		mes "𒆎~ꍇ";
		mes "0ƏĂB";
Lnyuinp:
		next;
		input @nyunum;
		if (@nyunum <= 0) goto Lend2;
		if (@nyunum > 100) goto LError1;
		set @nyupri,@nyunum*8;
		if (Zeny < @nyupri) goto LError2;
		getitem 7134,@nyunum;
		set Zeny,Zeny-@nyupri;
		goto Lfin;
L2:
	mes "[AV[v]";
	mes "ǂ̕i]łH";
	mes "̏́A";
	mes "X|[V̏";
	mes "240,000 ZenyB̏";
	mes "100,000 Zeny ƂȂ܂B";
	next;
	menu "|[V̏",L2_1,"AR[̏",L2_2,"t@CA[{g̏",L2_3,"AVbh{g̏",L2_4,"vg{g̏",L2_5,"}C{g̏",L2_6,"R[eBO򐻑̏",L2_7,"X|[V̏",L2_8,"𒆒f",Lend;
L2_1:
	if (Zeny < 100000) goto LError2;
	set Zeny,Zeny-100000;
	getitem 7144,1;
	goto Lfin;
L2_2:
	if (Zeny < 100000) goto LError2;
	set Zeny,Zeny-100000;
	getitem 7127,1;
	goto Lfin;
L2_3:
	if (Zeny < 100000) goto LError2;
	set Zeny,Zeny-100000;
	getitem 7128,1;
	goto Lfin;
L2_4:
	if (Zeny < 100000) goto LError2;
	set Zeny,Zeny-100000;
	getitem 7129,1;
	goto Lfin;
L2_5:
	if (Zeny < 100000) goto LError2;
	set Zeny,Zeny-100000;
	getitem 7130,1;
	goto Lfin;
L2_6:
	if (Zeny < 100000) goto LError2;
	set Zeny,Zeny-100000;
	getitem 7131,1;
	goto Lfin;
L2_7:
	if (Zeny < 100000) goto LError2;
	set Zeny,Zeny-100000;
	getitem 7132,1;
	goto Lfin;
L2_8:
	if (Zeny < 240000) goto LError2;
	set Zeny,Zeny-240000;
	getitem 7133,1;
	goto Lfin;
Lfin:
		mes "[AV[v]";
		mes "pA肪Ƃ܂B";
		close;
LError1:
	mes "[AV[v]";
	mes "100 ȉł肢܂B";
	goto Lnyuinp;
LError2:
	mes "[AV[v]";
	mes "܂";
	close;
Lend:
	mes "[AV[v]";
	mes "܂낵肢܂B";
	close;
Lend2:
	mes "[AV[v]";
	mes "~܂B";
	mes "v悤̎́A܂";
	mes "炵ĂB";
	close;
}
