// BNPC

// ----- Ax^ -----
alberta_in.gat,28,58,4	script	thbN	85,{
	mes "[thbNw}\]";
	mes "͕Ɩh𐸘Bb艮B";
	mes "NĂACe̒";
	mes "DȂ̂𐸘Bł̂B";
	mes "ǂ̑ACe";
	mes "B̂H";
	next;
	menu getequipname(1),L_MENU_1,getequipname(2),L_MENU_2,getequipname(3),L_MENU_3,getequipname(4),L_MENU_4,getequipname(5),L_MENU_5,getequipname(6),L_MENU_6,getequipname(7),L_MENU_7,getequipname(8),L_MENU_8,getequipname(9),L_MENU_9,getequipname(10),L_MENU_10;
	L_MENU_1:
		set @part,1;
		if (getequipisequiped(1)) goto L_START_1;
			mes "[thbNw}\]";
			mes "N̑Ȃ]݂";
			mes "BĂ悤H";
			goto L_CLOSE;
	L_MENU_2:
		set @part,2;
		if (getequipisequiped(2)) goto L_START_1;
			mes "[thbNw}\]";
			mes "̔M̂ŌN̑̂";
			mes "BĂI";
			goto L_CLOSE;
	L_MENU_3:
		set @part,3;
		if (getequipisequiped(3)) goto L_START_1;
			mes "[thbNw}\]";
			mes "N̍Pbgp`";
			mes "r͂ȂȁB";
			goto L_CLOSE;
	L_MENU_4:
		set @part,4;
		if (getequipisequiped(4)) goto L_START_1;
			mes "[thbNw}\]";
			mes "ȊwZpłN̉E";
			mes "hɂ邱Ƃ";
			mes "łȂˁB";
			goto L_CLOSE;
	L_MENU_5:
		set @part,5;
		if (getequipisequiped(5)) goto L_START_1;
			mes "[thbNw}\]";
			mes "[uĂȂȂI";
			goto L_CLOSE;
	L_MENU_6:
		set @part,6;
		if (getequipisequiped(6)) goto L_START_1;
			mes "[thbNw}\]";
			mes "N̑̏LI";
			goto L_CLOSE;
	L_MENU_7:
		set @part,7;
		if (getequipisequiped(7)) goto L_START_1;
			mes "[thbNw}\]";
			mes "ǂɃANZT[̂H";
			goto L_CLOSE;
	L_MENU_8:
		set @part,8;
		if (getequipisequiped(8)) goto L_START_1;
			mes "[thbNw}\]";
			mes "ǂɃANZT[̂H";
			goto L_CLOSE;
	L_MENU_9:
		set @part,9;
		if (getequipisequiped(9)) goto L_START_1;
			mes "[thbNw}\]";
			mes "𐸘Bƌ񂾁H";
			mes "̃ACe̎H";
			goto L_CLOSE;
	L_MENU_10:
		set @part,10;
		if (getequipisequiped(10)) goto L_START_1;
			mes "[thbNw}\]";
			mes "𐸘Bƌ񂾁H";
			mes "̃ACe̎H";
			goto L_CLOSE;
L_START_1:
	if (getequipisenableref(@part)) goto L_START_2;
		mes "[thbNw}\]";
		mes "̃ACe͐Bs\B";
		goto L_CLOSE;
L_START_2:
	if (getequipisidentify(@part)) goto L_START_3;
		mes "[thbNw}\]";
		mes "͖Ӓ肾琸BłȂB";
		goto L_CLOSE;
L_START_3:
	if (getequiprefinerycnt(@part) < 10) goto L_REFINE_0;
		mes "[thbNw}\]";
		mes "ȏ͐BłȂB";
		goto L_CLOSE;
L_REFINE_0:
	if (getequipweaponlv(@part) > 0) goto L_REFINE_1;
		mes "[thbNw}\]";
		mes "NI񂾑𐸘Bɂ";
		mes "^ff9999GjE^000000 ";
		mes "萔20000ZenyKvȁB";
		mes "邩H";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_0_SUB;
				mes "[thbNw}\]";
				mes "ƁI̖h͂";
				mes "BĂ݂ȁcȏ";
				mes "Bh邩";
				mes "ȂBhꂽ";
				mes "2xƎgȂȂcł";
				mes "BCȂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_0_SUB:
		if ((countitem(985) < 1) || (Zeny < 20000)) goto L_CANCEL_2;
			delitem 985,1;
			set Zeny,Zeny-20000;
			goto L_REFINE_5;
L_REFINE_1:
	if (getequipweaponlv(@part) > 1) goto L_REFINE_2;
		mes "[thbNw}\]";
		mes "xP̕𐸘B̂H";
		mes "B邽߁A ^ff9999vR^000000";
		mes "萔500ZenyKvȁB";
		mes "̂H";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_1_SUB;
				mes "[thbNw}\]";
				mes "ƁI͂̕";
				mes "BĂ݂ȁcȏ";
				mes "B畐킪邩";
				mes "ȂB킪ꂽ";
				mes "2xƎgȂȂcł";
				mes "BCȂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_1_SUB:
		if ((countitem(1010) < 1) || (Zeny < 500)) goto L_CANCEL_2;
			delitem 1010,1;
			set Zeny,Zeny-500;
			goto L_REFINE_5;
L_REFINE_2:
	if (getequipweaponlv(@part) > 2) goto L_REFINE_3;
		mes "[thbNw}\]";
		mes "x2̕𐸘B̂H";
		mes "B邽߁A ^ff9999Gx^R^000000";
		mes "萔2000ZenyKvȁB";
		mes "̂H";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_2_SUB;
				mes "[thbNw}\]";
				mes "ƁI͂̕";
				mes "BĂ݂ȁcȏ";
				mes "B畐킪邩";
				mes "ȂB킪ꂽ";
				mes "2xƎgȂȂcł";
				mes "BCȂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_2_SUB:
		if ((countitem(1011) < 1) || (Zeny < 2000)) goto L_CANCEL_2;
			delitem 1011,1;
			set Zeny,Zeny-2000;
			goto L_REFINE_5;
L_REFINE_3:
	if (getequipweaponlv(@part) > 3) goto L_REFINE_4;
		mes "[thbNw}\]";
		mes "x3̕𐸘B̂H";
		mes "B邽߁A ^ff9999IfIR^000000";
		mes "萔25000ZenyKvȁB";
		mes "̂H";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_3_SUB;
				mes "[thbNw}\]";
				mes "ƁI͂̕";
				mes "BĂ݂ȁcȏ";
				mes "B畐킪邩";
				mes "ȂB킪ꂽ";
				mes "2xƎgȂȂcł";
				mes "BCȂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_3_SUB:
		if ((countitem(984) < 1) || (Zeny < 25000)) goto L_CANCEL_2;
			delitem 984,1;
			set Zeny,Zeny-25000;
			goto L_REFINE_5;
L_REFINE_4:
		mes "[thbNw}\]";
		mes "x4̕𐸘B̂H";
		mes "B邽߁A ^ff9999IfIR^000000";
		mes "萔50000ZenyKvȁB";
		mes "̂H";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_4_SUB;
				mes "[thbNw}\]";
				mes "ƁI͂̕";
				mes "BĂ݂ȁcȏ";
				mes "B畐킪邩";
				mes "ȂB킪ꂽ";
				mes "2xƎgȂȂcł";
				mes "BCȂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_4_SUB:
		if ((countitem(984) < 1) || (Zeny < 50000)) goto L_CANCEL_2;
			delitem 984,1;
			set Zeny,Zeny-50000;
L_REFINE_5:
	if (getequippercentrefinery(@part)<=rand(100)) goto L_REFINE_6;
		mes "[thbNw}\]";
		mes "JI JI J!!";
		successrefitem @part;
		next;
		emotion 18;
		mes "[thbNw}\]";
		mes "AoI";
		mes "vXɗǂłB";
		mes "ȂČNH";
		goto L_CLOSE;
L_REFINE_6:
	mes "[thbNw}\]";
	mes "JI JI J!!";
	failedrefitem @part;
	next;
	emotion 4;
	mes "[thbNw}\]";
	mes "Nzzzzc";
	next;
	mes "[thbNw}\]";
	mes "܂I";
	mes "BɕĂ܂ȁc";
	mes "فAقA߂";
	mes "ŏɌ낤H";
	goto L_CLOSE;
L_CANCEL_1:
	mes "[thbNw}\]";
	mes "ǂIȁB";
	mes "đl̕󂵂";
	mes "CȂ邩炳c";
	goto L_CLOSE;
L_CANCEL_2:
	mes "[thbNw}\]";
	mes "ꂪNĂSH";
	mes "cOAޗȂ񂶂";
	mes "dȂȁB";
	mes "͂łĂق";
	mes "SLȂȁB";
	goto L_CLOSE;
L_CANCEL_3:
	mes "[thbNw}\]";
	mes "NȂdȂ낤c";
L_CLOSE:
	close;
}

// ----- ve -----
prt_in.gat,63,60,4	script	zO	85,{
	mes "[zO]";
	mes "͕Ɩh𐸘Bb艮B";
	mes "NĂACe̒";
	mes "DȂ̂𐸘Bł̂B";
	mes "ǂ̑ACe";
	mes "B̂H";
	next;
	menu getequipname(1),L_MENU_1,getequipname(2),L_MENU_2,getequipname(3),L_MENU_3,getequipname(4),L_MENU_4,getequipname(5),L_MENU_5,getequipname(6),L_MENU_6,getequipname(7),L_MENU_7,getequipname(8),L_MENU_8,getequipname(9),L_MENU_9,getequipname(10),L_MENU_10;
	L_MENU_1:
		set @part,1;
		if (getequipisequiped(1)) goto L_START_1;
			mes "[zO]";
			mes "N̑Ȃ]݂";
			mes "BĂ悤H";
			goto L_CLOSE;
	L_MENU_2:
		set @part,2;
		if (getequipisequiped(2)) goto L_START_1;
			mes "[zO]";
			mes "̔M̂ŌN̑̂";
			mes "BĂI";
			goto L_CLOSE;
	L_MENU_3:
		set @part,3;
		if (getequipisequiped(3)) goto L_START_1;
			mes "[zO]";
			mes "N̍Pbgp`";
			mes "r͂ȂȁB";
			goto L_CLOSE;
	L_MENU_4:
		set @part,4;
		if (getequipisequiped(4)) goto L_START_1;
			mes "[zO]";
			mes "ȊwZpłN̉E";
			mes "hɂ邱Ƃ";
			mes "łȂˁB";
			goto L_CLOSE;
	L_MENU_5:
		set @part,5;
		if (getequipisequiped(5)) goto L_START_1;
			mes "[zO]";
			mes "[uĂȂȂI";
			goto L_CLOSE;
	L_MENU_6:
		set @part,6;
		if (getequipisequiped(6)) goto L_START_1;
			mes "[zO]";
			mes "N̑̏LI";
			goto L_CLOSE;
	L_MENU_7:
		set @part,7;
		if (getequipisequiped(7)) goto L_START_1;
			mes "[zO]";
			mes "ǂɃANZT[̂H";
			goto L_CLOSE;
	L_MENU_8:
		set @part,8;
		if (getequipisequiped(8)) goto L_START_1;
			mes "[zO]";
			mes "ǂɃANZT[̂H";
			goto L_CLOSE;
	L_MENU_9:
		set @part,9;
		if (getequipisequiped(9)) goto L_START_1;
			mes "[zO]";
			mes "𐸘Bƌ񂾁H";
			mes "̃ACe̎H";
			goto L_CLOSE;
	L_MENU_10:
		set @part,10;
		if (getequipisequiped(10)) goto L_START_1;
			mes "[zO]";
			mes "𐸘Bƌ񂾁H";
			mes "̃ACe̎H";
			goto L_CLOSE;
L_START_1:
	if (getequipisenableref(@part)) goto L_START_2;
		mes "[zO]";
		mes "̃ACe͐Bs\B";
		goto L_CLOSE;
L_START_2:
	if (getequipisidentify(@part)) goto L_START_3;
		mes "[zO]";
		mes "͖Ӓ肾琸BłȂB";
		goto L_CLOSE;
L_START_3:
	if (getequiprefinerycnt(@part) < 10) goto L_REFINE_0;
		mes "[zO]";
		mes "ȏ͐BłȂB";
		goto L_CLOSE;
L_REFINE_0:
	if (getequipweaponlv(@part) > 0) goto L_REFINE_1;
		mes "[zO]";
		mes "NI񂾑𐸘Bɂ";
		mes "^ff9999GjE^000000 ";
		mes "萔20000ZenyKvȁB";
		mes "邩H";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_0_SUB;
				mes "[zO]";
				mes "ƁI̖h͂";
				mes "BĂ݂ȁcȏ";
				mes "Bh邩";
				mes "ȂBhꂽ";
				mes "2xƎgȂȂcł";
				mes "BCȂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_0_SUB:
		if ((countitem(985) < 1) || (Zeny < 20000)) goto L_CANCEL_2;
			delitem 985,1;
			set Zeny,Zeny-20000;
			goto L_REFINE_5;
L_REFINE_1:
	if (getequipweaponlv(@part) > 1) goto L_REFINE_2;
		mes "[zO]";
		mes "xP̕𐸘B̂H";
		mes "B邽߁A ^ff9999vR^000000";
		mes "萔500ZenyKvȁB";
		mes "̂H";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_1_SUB;
				mes "[zO]";
				mes "ƁI͂̕";
				mes "BĂ݂ȁcȏ";
				mes "B畐킪邩";
				mes "ȂB킪ꂽ";
				mes "2xƎgȂȂcł";
				mes "BCȂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_1_SUB:
		if ((countitem(1010) < 1) || (Zeny < 500)) goto L_CANCEL_2;
			delitem 1010,1;
			set Zeny,Zeny-500;
			goto L_REFINE_5;
L_REFINE_2:
	if (getequipweaponlv(@part) > 2) goto L_REFINE_3;
		mes "[zO]";
		mes "x2̕𐸘B̂H";
		mes "B邽߁A ^ff9999Gx^R^000000";
		mes "萔2000ZenyKvȁB";
		mes "̂H";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_2_SUB;
				mes "[zO]";
				mes "ƁI͂̕";
				mes "BĂ݂ȁcȏ";
				mes "B畐킪邩";
				mes "ȂB킪ꂽ";
				mes "2xƎgȂȂcł";
				mes "BCȂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_2_SUB:
		if ((countitem(1011) < 1) || (Zeny < 2000)) goto L_CANCEL_2;
			delitem 1011,1;
			set Zeny,Zeny-2000;
			goto L_REFINE_5;
L_REFINE_3:
	if (getequipweaponlv(@part) > 3) goto L_REFINE_4;
		mes "[zO]";
		mes "x3̕𐸘B̂H";
		mes "B邽߁A ^ff9999IfIR^000000";
		mes "萔25000ZenyKvȁB";
		mes "̂H";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_3_SUB;
				mes "[zO]";
				mes "ƁI͂̕";
				mes "BĂ݂ȁcȏ";
				mes "B畐킪邩";
				mes "ȂB킪ꂽ";
				mes "2xƎgȂȂcł";
				mes "BCȂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_3_SUB:
		if ((countitem(984) < 1) || (Zeny < 25000)) goto L_CANCEL_2;
			delitem 984,1;
			set Zeny,Zeny-25000;
			goto L_REFINE_5;
L_REFINE_4:
		mes "[zO]";
		mes "x4̕𐸘B̂H";
		mes "B邽߁A ^ff9999IfIR^000000";
		mes "萔50000ZenyKvȁB";
		mes "̂H";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_4_SUB;
				mes "[zO]";
				mes "ƁI͂̕";
				mes "BĂ݂ȁcȏ";
				mes "B畐킪邩";
				mes "ȂB킪ꂽ";
				mes "2xƎgȂȂcł";
				mes "BCȂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_4_SUB:
		if ((countitem(984) < 1) || (Zeny < 50000)) goto L_CANCEL_2;
			delitem 984,1;
			set Zeny,Zeny-50000;
L_REFINE_5:
	if (getequippercentrefinery(@part)<=rand(100)) goto L_REFINE_6;
		mes "[zO]";
		mes "JI JI J!!";
		successrefitem @part;
		next;
		emotion 21;
		mes "[zO]";
		mes "AoI";
		mes "vXɗǂłB";
		mes "ȂČNH";
		goto L_CLOSE;
L_REFINE_6:
	mes "[zO]";
	mes "JI JI J!!";
	failedrefitem @part;
	next;
	emotion 23;
	mes "[zO]";
	mes "Nzzzzc";
	next;
	mes "[zO]";
	mes "܂I";
	mes "BɕĂ܂ȁc";
	mes "فAقA߂";
	mes "ŏɌ낤H";
	goto L_CLOSE;
L_CANCEL_1:
	mes "[zO]";
	mes "ǂIȁB";
	mes "đl̕󂵂";
	mes "CȂ邩炳c";
	goto L_CLOSE;
L_CANCEL_2:
	mes "[zO]";
	mes "ꂪNĂSH";
	mes "cOAޗȂ񂶂";
	mes "dȂȁB";
	mes "͂łĂق";
	mes "SLȂȁB";
	goto L_CLOSE;
L_CANCEL_3:
	mes "[zO]";
	mes "NȂdȂ낤c";
L_CLOSE:
	close;
}

// ----- N -----
morocc_in.gat,73,38,4	script	AK	99,{
	mes "[AKT[]";
	mes "͕Ɩh𐸘Bb艮B";
	mes "ĂACe̒";
	mes "DȂ̂𐸘BłB";
	mes "ǂ̑ACe";
	mes "B̂H";
	next;
	menu getequipname(1),L_MENU_1,getequipname(2),L_MENU_2,getequipname(3),L_MENU_3,getequipname(4),L_MENU_4,getequipname(5),L_MENU_5,getequipname(6),L_MENU_6,getequipname(7),L_MENU_7,getequipname(8),L_MENU_8,getequipname(9),L_MENU_9,getequipname(10),L_MENU_10;
	L_MENU_1:
		set @part,1;
		if (getequipisequiped(1)) goto L_START_1;
			mes "[AKT[]";
			mes "̑Ȃ]݂";
			mes "BĂ悤H";
			goto L_CLOSE;
	L_MENU_2:
		set @part,2;
		if (getequipisequiped(2)) goto L_START_1;
			mes "[AKT[]";
			mes "̔M̂œ̑̂";
			mes "BĂI";
			goto L_CLOSE;
	L_MENU_3:
		set @part,3;
		if (getequipisequiped(3)) goto L_START_1;
			mes "[AKT[]";
			mes "̍Zp͖B";
			goto L_CLOSE;
	L_MENU_4:
		set @part,4;
		if (getequipisequiped(4)) goto L_START_1;
			mes "[AKT[]";
			mes "̉E}VK";
			mes "͖̂B";
			goto L_CLOSE;
	L_MENU_5:
		set @part,5;
		if (getequipisequiped(5)) goto L_START_1;
			mes "[AKT[]";
			mes "[uĂȂȁB";
			goto L_CLOSE;
	L_MENU_6:
		set @part,6;
		if (getequipisequiped(6)) goto L_START_1;
			mes "[AKT[]";
			mes "Lc";
			goto L_CLOSE;
	L_MENU_7:
		set @part,7;
		if (getequipisequiped(7)) goto L_START_1;
			mes "[AKT[]";
			mes "ǂ̃ANZT[H";
			goto L_CLOSE;
	L_MENU_8:
		set @part,8;
		if (getequipisequiped(8)) goto L_START_1;
			mes "[AKT[]";
			mes "ǂ̃ANZT[H";
			goto L_CLOSE;
	L_MENU_9:
		set @part,9;
		if (getequipisequiped(9)) goto L_START_1;
			mes "[AKT[]";
			mes "𐸘BƌH";
			mes "̃ACe̎H";
			goto L_CLOSE;
	L_MENU_10:
		set @part,10;
		if (getequipisequiped(10)) goto L_START_1;
			mes "[AKT[]";
			mes "𐸘BƌH";
			mes "̃ACe̎H";
			goto L_CLOSE;
L_START_1:
	if (getequipisenableref(@part)) goto L_START_2;
		mes "[AKT[]";
		mes "̃ACe͐Bs\B";
		goto L_CLOSE;
L_START_2:
	if (getequipisidentify(@part)) goto L_START_3;
		mes "[AKT[]";
		mes "͖Ӓ肾琸BłȂB";
		goto L_CLOSE;
L_START_3:
	if (getequiprefinerycnt(@part) < 10) goto L_REFINE_0;
		mes "[AKT[]";
		mes "ȏ͐BłȂB";
		goto L_CLOSE;
L_REFINE_0:
	if (getequipweaponlv(@part) > 0) goto L_REFINE_1;
		mes "[thbNw}\]";
		mes "I񂾑𐸘Bɂ";
		mes "^ff9999GjE^000000 ";
		mes "萔20000ZenyKvB";
		mes "邩H";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_0_SUB;
				mes "[AKT[]";
				mes "ӂށc̖h͂";
				mes "BĂ݂ȁcȏ";
				mes "Bh邩";
				mes "ȂBhꂽ";
				mes "2xƎgȂȂcł";
				mes "BCȂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_0_SUB:
		if ((countitem(985) < 1) || (Zeny < 20000)) goto L_CANCEL_2;
			delitem 985,1;
			set Zeny,Zeny-20000;
			goto L_REFINE_5;
L_REFINE_1:
	if (getequipweaponlv(@part) > 1) goto L_REFINE_2;
		mes "[AKT[]";
		mes "xP̕𐸘B̂H";
		mes "B邽߁A ^ff9999vR^000000";
		mes "萔500ZenyKvB";
		mes "邩H";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_1_SUB;
				mes "[AKT[]";
				mes "ӂށc͂̕";
				mes "BĂ݂ȁcȏ";
				mes "B畐킪邩";
				mes "ȂB킪ꂽ";
				mes "2xƎgȂȂcł";
				mes "BCȂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_1_SUB:
		if ((countitem(1010) < 1) || (Zeny < 500)) goto L_CANCEL_2;
			delitem 1010,1;
			set Zeny,Zeny-500;
			goto L_REFINE_5;
L_REFINE_2:
	if (getequipweaponlv(@part) > 2) goto L_REFINE_3;
		mes "[AKT[]";
		mes "x2̕𐸘B̂H";
		mes "B邽߁A ^ff9999Gx^R^000000";
		mes "萔2000ZenyKvB";
		mes "邩H";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_2_SUB;
				mes "[AKT[]";
				mes "ӂށc͂̕";
				mes "BĂ݂ȁcȏ";
				mes "B畐킪邩";
				mes "ȂB킪ꂽ";
				mes "2xƎgȂȂcł";
				mes "BCȂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_2_SUB:
		if ((countitem(1011) < 1) || (Zeny < 2000)) goto L_CANCEL_2;
			delitem 1011,1;
			set Zeny,Zeny-2000;
			goto L_REFINE_5;
L_REFINE_3:
	if (getequipweaponlv(@part) > 3) goto L_REFINE_4;
		mes "[AKT[]";
		mes "x3̕𐸘B̂H";
		mes "B邽߁A ^ff9999IfIR^000000";
		mes "萔25000ZenyKvB";
		mes "邩H";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_3_SUB;
				mes "[AKT[]";
				mes "ӂށc͂̕";
				mes "BĂ݂ȁcȏ";
				mes "B畐킪邩";
				mes "ȂB킪ꂽ";
				mes "2xƎgȂȂcł";
				mes "BCȂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_3_SUB:
		if ((countitem(984) < 1) || (Zeny < 25000)) goto L_CANCEL_2;
			delitem 984,1;
			set Zeny,Zeny-25000;
			goto L_REFINE_5;
L_REFINE_4:
		mes "[AKT[]";
		mes "x4̕𐸘B̂H";
		mes "B邽߁A ^ff9999IfIR^000000";
		mes "萔50000ZenyKvB";
		mes "邩H";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_4_SUB;
				mes "[AKT[]";
				mes "ӂށc͂̕";
				mes "BĂ݂ȁcȏ";
				mes "B畐킪邩";
				mes "ȂB킪ꂽ";
				mes "2xƎgȂȂcł";
				mes "BCȂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_4_SUB:
		if ((countitem(984) < 1) || (Zeny < 50000)) goto L_CANCEL_2;
			delitem 984,1;
			set Zeny,Zeny-50000;
L_REFINE_5:
	if (getequippercentrefinery(@part)<=rand(100)) goto L_REFINE_6;
		mes "[AKT[]";
		mes "JI JI J!!";
		successrefitem @part;
		next;
		emotion 30;
		mes "[AKT[]";
		mes "AoI";
		mes "vXɗǂłȁB";
		mes "Ȃē낤H";
		goto L_CLOSE;
L_REFINE_6:
	mes "[AKT[]";
	mes "JI JI J!!";
	failedrefitem @part;
	next;
	emotion 16;
	mes "[AKT[]";
	mes "ccc";
	next;
	mes "[AKT[]";
	mes "܂Ȃc";
	mes "BɕĂ܂c";
	mes "Aŏɒ͂H";
	goto L_CLOSE;
L_CANCEL_1:
	mes "[AKT[]";
	mes "ǂIB";
	mes "đl̕󂵂";
	mes "CȂ邩c";
	goto L_CLOSE;
L_CANCEL_2:
	mes "[AKT[]";
	mes "ꂪĂSH";
	mes "cOAޗȂȂ";
	mes "dȂB";
	mes "͂łĂق";
	mes "SLȂB";
	goto L_CLOSE;
L_CANCEL_3:
	mes "[AKT[]";
	mes "߂ȂdȂc";
L_CLOSE:
	close;
}

// ----- tFC -----
payon_in01.gat,90,31,4	script	AgjI	88,{
	mes "[AgjI]";
	mes "B܂Ƃɂ";
	mes "BoB";
	next;
	menu getequipname(1),L_MENU_1,getequipname(2),L_MENU_2,getequipname(3),L_MENU_3,getequipname(4),L_MENU_4,getequipname(5),L_MENU_5,getequipname(6),L_MENU_6,getequipname(7),L_MENU_7,getequipname(8),L_MENU_8,getequipname(9),L_MENU_9,getequipname(10),L_MENU_10;
	L_MENU_1:
		set @part,1;
		if (getequipisequiped(1)) goto L_START_1;
			mes "[AgjI]";
			mes "͖ZIȌk";
			mes "tĂ鎞ԂȂǖ񂾁B";
			mes "˂łǂ肾H";
			goto L_CLOSE;
	L_MENU_2:
		set @part,2;
		if (getequipisequiped(2)) goto L_START_1;
			mes "[AgjI]";
			mes "͖ZƌĂ邾낤I";
			goto L_CLOSE;
	L_MENU_3:
		set @part,3;
		if (getequipisequiped(3)) goto L_START_1;
			mes "[AgjI]";
			mes "Ȃk͂߂ĂI";
			goto L_CLOSE;
	L_MENU_4:
		set @part,4;
		if (getequipisequiped(4)) goto L_START_1;
			mes "[AgjI]";
			mes "OABĈH";
			goto L_CLOSE;
	L_MENU_5:
		set @part,5;
		if (getequipisequiped(5)) goto L_START_1;
			mes "[AgjI]";
			mes "I";
			goto L_CLOSE;
	L_MENU_6:
		set @part,6;
		if (getequipisequiped(6)) goto L_START_1;
			mes "[AgjI]";
			mes "ȂYɕt";
			mes "ɂ͖񂾁I";
			goto L_CLOSE;
	L_MENU_7:
		set @part,7;
		if (getequipisequiped(7)) goto L_START_1;
			mes "[AgjI]";
			mes "BȂ̂Ȃp͖H";
			goto L_CLOSE;
	L_MENU_8:
		set @part,8;
		if (getequipisequiped(8)) goto L_START_1;
			mes "[AgjI]";
			mes "͖ZI";
			goto L_CLOSE;
	L_MENU_9:
		set @part,9;
		if (getequipisequiped(9)) goto L_START_1;
			mes "[AgjI]";
			mes "ǂ𐸘BāH";
			goto L_CLOSE;
	L_MENU_10:
		set @part,10;
		if (getequipisequiped(10)) goto L_START_1;
			mes "[AgjI]";
			mes "AĂȂH";
			goto L_CLOSE;
L_START_1:
	if (getequipisenableref(@part)) goto L_START_2;
		mes "[AgjI]";
		mes "͐BłȂB";
		mes "𓖂ĂB";
		goto L_CLOSE;
L_START_2:
	if (getequipisidentify(@part)) goto L_START_3;
		mes "[AgjI]";
		mes "킯̂킩Ȃ";
		mes "B͖c";
		goto L_CLOSE;
L_START_3:
	if (getequiprefinerycnt(@part) < 10) goto L_REFINE_0;
		mes "[AgjI]";
		mes "ȏƂ낪";
		mes "I";
		goto L_CLOSE;
L_REFINE_0:
	if (getequipweaponlv(@part) > 0) goto L_REFINE_1;
		mes "[AgjI]";
		mes "OI񂾑𐸘Bɂ";
		mes "^ff9999GjE^000000 ";
		mes "萔20000ZenyKvȁB";
		mes "r^1ZenyȂB";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_0_SUB;
				mes "[AgjI]";
				mes "cǂ炱Ȗȕ";
				mes "Ă񂾁cB";
				mes "ȏ̐B͊댯B";
				mes "młƂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_0_SUB:
		if ((countitem(985) < 1) || (Zeny < 20000)) goto L_CANCEL_2;
			delitem 985,1;
			set Zeny,Zeny-20000;
			goto L_REFINE_5;
L_REFINE_1:
	if (getequipweaponlv(@part) > 1) goto L_REFINE_2;
		mes "[AgjI]";
		mes "xP̕𐸘B̂H";
		mes "B邽߁A ^ff9999vR^000000";
		mes "萔500ZenyKvȁB";
		mes "r^1ZenyȂB";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_1_SUB;
				mes "[AgjI]";
				mes "cǂ炱Ȗȕ";
				mes "Ă񂾁cB";
				mes "ȏ̐B͊댯B";
				mes "młƂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_1_SUB:
		if ((countitem(1010) < 1) || (Zeny < 500)) goto L_CANCEL_2;
			delitem 1010,1;
			set Zeny,Zeny-500;
			goto L_REFINE_5;
L_REFINE_2:
	if (getequipweaponlv(@part) > 2) goto L_REFINE_3;
		mes "[AgjI]";
		mes "x2̕𐸘B̂H";
		mes "B邽߁A ^ff9999Gx^R^000000";
		mes "萔2000ZenyKvȁB";
		mes "r^1ZenyȂB";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_2_SUB;
				mes "[AgjI]";
				mes "cǂ炱Ȗȕ";
				mes "Ă񂾁cB";
				mes "ȏ̐B͊댯B";
				mes "młƂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_2_SUB:
		if ((countitem(1011) < 1) || (Zeny < 2000)) goto L_CANCEL_2;
			delitem 1011,1;
			set Zeny,Zeny-2000;
			goto L_REFINE_5;
L_REFINE_3:
	if (getequipweaponlv(@part) > 3) goto L_REFINE_4;
		mes "[AgjI]";
		mes "x3̕𐸘B̂H";
		mes "B邽߁A ^ff9999IfIR^000000";
		mes "萔25000ZenyKvȁB";
		mes "vԂɉ̎͂Ă邩B";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_3_SUB;
				mes "[AgjI]";
				mes "cǂ炱Ȗȕ";
				mes "Ă񂾁cB";
				mes "ȏ̐B͊댯B";
				mes "młƂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_3_SUB:
		if ((countitem(984) < 1) || (Zeny < 25000)) goto L_CANCEL_2;
			delitem 984,1;
			set Zeny,Zeny-25000;
			goto L_REFINE_5;
L_REFINE_4:
		mes "[AgjI]";
		mes "x4̕𐸘B̂H";
		mes "B邽߁A ^ff9999IfIR^000000";
		mes "萔50000ZenyKvȁB";
		mes "x4̕킩c邺I";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_4_SUB;
				mes "[AgjI]";
				mes "cǂ炱Ȗȕ";
				mes "Ă񂾁cB";
				mes "ȏ̐B͊댯B";
				mes "młƂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_4_SUB:
		if ((countitem(984) < 1) || (Zeny < 50000)) goto L_CANCEL_2;
			delitem 984,1;
			set Zeny,Zeny-50000;
L_REFINE_5:
	if (getequippercentrefinery(@part)<=rand(100)) goto L_REFINE_6;
		mes "[AgjI]";
		mes "JI JI J!!";
		successrefitem @part;
		next;
		emotion 0;
		mes "[AgjI]";
		mes "ob`I";
		mes "܂ĂB";
		goto L_CLOSE;
L_REFINE_6:
	mes "[AgjI]";
	mes "JI JI J!!";
	failedrefitem @part;
	next;
	emotion 32;
	mes "[AgjI]";
	mes "Ӂc";
	next;
	mes "[AgjI]";
	mes "cOc";
	mes "܂lƂB";
	mes "ނȂc";
	goto L_CLOSE;
L_CANCEL_1:
	mes "[AgjI]";
	mes "܂c";
	mes "͖ZAAĂB";
	goto L_CLOSE;
L_CANCEL_2:
	mes "[AgjI]";
	mes "1ZenyȂ";
	mes "B΂ĂȁB";
	goto L_CLOSE;
L_CANCEL_3:
	mes "[AgjI]";
	mes "VтȂ񂾂I";
L_CLOSE:
	close;
}

// ----- Wm[ -----
yuno_in01.gat,171,21,4	script	eBX^[u	85,{
	mes "[fBX^[u]";
	mes "B܂Ƃɂ";
	mes "BoB";
	next;
	menu getequipname(1),L_MENU_1,getequipname(2),L_MENU_2,getequipname(3),L_MENU_3,getequipname(4),L_MENU_4,getequipname(5),L_MENU_5,getequipname(6),L_MENU_6,getequipname(7),L_MENU_7,getequipname(8),L_MENU_8,getequipname(9),L_MENU_9,getequipname(10),L_MENU_10;
	L_MENU_1:
		set @part,1;
		if (getequipisequiped(1)) goto L_START_1;
			mes "[fBX^[u]";
			mes "͖ZIȌk";
			mes "tĂ鎞ԂȂǖ񂾁B";
			mes "˂łǂ肾H";
			goto L_CLOSE;
	L_MENU_2:
		set @part,2;
		if (getequipisequiped(2)) goto L_START_1;
			mes "[fBX^[u]";
			mes "͖ZƌĂ邾낤I";
			goto L_CLOSE;
	L_MENU_3:
		set @part,3;
		if (getequipisequiped(3)) goto L_START_1;
			mes "[fBX^[u]";
			mes "Ȃk͂߂ĂI";
			goto L_CLOSE;
	L_MENU_4:
		set @part,4;
		if (getequipisequiped(4)) goto L_START_1;
			mes "[fBX^[u]";
			mes "OABĈH";
			goto L_CLOSE;
	L_MENU_5:
		set @part,5;
		if (getequipisequiped(5)) goto L_START_1;
			mes "[fBX^[u]";
			mes "I";
			goto L_CLOSE;
	L_MENU_6:
		set @part,6;
		if (getequipisequiped(6)) goto L_START_1;
			mes "[fBX^[u]";
			mes "ȂYɕt";
			mes "ɂ͖񂾁I";
			goto L_CLOSE;
	L_MENU_7:
		set @part,7;
		if (getequipisequiped(7)) goto L_START_1;
			mes "[fBX^[u]";
			mes "BȂ̂Ȃp͖H";
			goto L_CLOSE;
	L_MENU_8:
		set @part,8;
		if (getequipisequiped(8)) goto L_START_1;
			mes "[fBX^[u]";
			mes "͖ZI";
			goto L_CLOSE;
	L_MENU_9:
		set @part,9;
		if (getequipisequiped(9)) goto L_START_1;
			mes "[fBX^[u]";
			mes "ǂ𐸘BāH";
			goto L_CLOSE;
	L_MENU_10:
		set @part,10;
		if (getequipisequiped(10)) goto L_START_1;
			mes "[fBX^[u]";
			mes "AĂȂH";
			goto L_CLOSE;
L_START_1:
	if (getequipisenableref(@part)) goto L_START_2;
		mes "[fBX^[u]";
		mes "͐BłȂB";
		mes "𓖂ĂB";
		goto L_CLOSE;
L_START_2:
	if (getequipisidentify(@part)) goto L_START_3;
		mes "[fBX^[u]";
		mes "킯̂킩Ȃ";
		mes "B͖c";
		goto L_CLOSE;
L_START_3:
	if (getequiprefinerycnt(@part) < 10) goto L_REFINE_0;
		mes "[fBX^[u]";
		mes "ȏƂ낪";
		mes "I";
		goto L_CLOSE;
L_REFINE_0:
	if (getequipweaponlv(@part) > 0) goto L_REFINE_1;
		mes "[fBX^[u]";
		mes "OI񂾑𐸘Bɂ";
		mes "^ff9999GjE^000000 ";
		mes "萔20000ZenyKvȁB";
		mes "r^1ZenyȂB";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_0_SUB;
				mes "[fBX^[u]";
				mes "cǂ炱Ȗȕ";
				mes "Ă񂾁cB";
				mes "ȏ̐B͊댯B";
				mes "młƂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_0_SUB:
		if ((countitem(985) < 1) || (Zeny < 20000)) goto L_CANCEL_2;
			delitem 985,1;
			set Zeny,Zeny-20000;
			goto L_REFINE_5;
L_REFINE_1:
	if (getequipweaponlv(@part) > 1) goto L_REFINE_2;
		mes "[fBX^[u]";
		mes "xP̕𐸘B̂H";
		mes "B邽߁A ^ff9999vR^000000";
		mes "萔500ZenyKvȁB";
		mes "r^1ZenyȂB";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_1_SUB;
				mes "[fBX^[u]";
				mes "cǂ炱Ȗȕ";
				mes "Ă񂾁cB";
				mes "ȏ̐B͊댯B";
				mes "młƂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_1_SUB:
		if ((countitem(1010) < 1) || (Zeny < 500)) goto L_CANCEL_2;
			delitem 1010,1;
			set Zeny,Zeny-500;
			goto L_REFINE_5;
L_REFINE_2:
	if (getequipweaponlv(@part) > 2) goto L_REFINE_3;
		mes "[fBX^[u]";
		mes "x2̕𐸘B̂H";
		mes "B邽߁A ^ff9999Gx^R^000000";
		mes "萔2000ZenyKvȁB";
		mes "r^1ZenyȂB";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_2_SUB;
				mes "[fBX^[u]";
				mes "cǂ炱Ȗȕ";
				mes "Ă񂾁cB";
				mes "ȏ̐B͊댯B";
				mes "młƂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_2_SUB:
		if ((countitem(1011) < 1) || (Zeny < 2000)) goto L_CANCEL_2;
			delitem 1011,1;
			set Zeny,Zeny-2000;
			goto L_REFINE_5;
L_REFINE_3:
	if (getequipweaponlv(@part) > 3) goto L_REFINE_4;
		mes "[fBX^[u]";
		mes "x3̕𐸘B̂H";
		mes "B邽߁A ^ff9999IfIR^000000";
		mes "萔25000ZenyKvȁB";
		mes "vԂɉ̎͂Ă邩B";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_3_SUB;
				mes "[fBX^[u]";
				mes "cǂ炱Ȗȕ";
				mes "Ă񂾁cB";
				mes "ȏ̐B͊댯B";
				mes "młƂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_3_SUB:
		if ((countitem(984) < 1) || (Zeny < 25000)) goto L_CANCEL_2;
			delitem 984,1;
			set Zeny,Zeny-25000;
			goto L_REFINE_5;
L_REFINE_4:
		mes "[fBX^[u]";
		mes "x4̕𐸘B̂H";
		mes "B邽߁A ^ff9999IfIR^000000";
		mes "萔50000ZenyKvȁB";
		mes "x4̕킩c邺I";
		next;
		menu "͂",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_4_SUB;
				mes "[fBX^[u]";
				mes "cǂ炱Ȗȕ";
				mes "Ă񂾁cB";
				mes "ȏ̐B͊댯B";
				mes "młƂ̂H";
				next;
				menu "͂",-,"",L_CANCEL_1;
	L_4_SUB:
		if ((countitem(984) < 1) || (Zeny < 50000)) goto L_CANCEL_2;
			delitem 984,1;
			set Zeny,Zeny-50000;
L_REFINE_5:
	if (getequippercentrefinery(@part)<=rand(100)) goto L_REFINE_6;
		mes "[fBX^[u]";
		mes "JI JI J!!";
		successrefitem @part;
		next;
		emotion 9;
		mes "ob`I";
		mes "܂ĂB";
		goto L_CLOSE;
L_REFINE_6:
	mes "[fBX^[u]";
	mes "JI JI J!!";
	failedrefitem @part;
	next;
	emotion 0;
	mes "[fBX^u]";
	mes "Ӂc";
	next;
	mes "[fBX^u]";
	mes "cOc";
	mes "܂lƂB";
	mes "ނȂc";
	goto L_CLOSE;
L_CANCEL_1:
	mes "[fBX^[u]";
	mes "܂c";
	mes "͖ZAAĂB";
	goto L_CLOSE;
L_CANCEL_2:
	mes "[fBX^[u]";
	mes "1ZenyȂ";
	mes "B΂ĂȁB";
	goto L_CLOSE;
L_CANCEL_3:
	mes "[fBX^[u]";
	mes "VтȂ񂾂I";
L_CLOSE:
	close;
}
//EP? - BuyStone NPC
alberta_in.gat,13,71,4	script	J}X	86,{
	callfunc "buystone","J}X";
}
prt_in.gat,56,68,4	script	uEF	86,{
	callfunc "buystone","uEF";
}
morocc_in.gat,63,32,0	script	Th	99,{
	callfunc "buystone","Th";
}
payon_in01.gat,83,29,4	script	xOih	88,{
	callfunc "buystone","xOih";
}
yuno_in01.gat,171,27,4	script	eB}	86,{
	callfunc "buystone","eB}";
}

//EP? - ChangeStone NPC
alberta_in.gat,21,63,5	script	[mtH	84,{
	callfunc "chgstone","[mtH ]^X";
}
prt_in.gat,63,69,4	script	fB[gq	84,{
	callfunc "chgstone","fB[gq";
}
morocc_in.gat,72,32,0	script	AuhD	99,{
	callfunc "chgstone","AuhD";
}
payon_in01.gat,81,31,4	script	nL	88,{
	callfunc "chgstone","nL";
}
yuno_in01.gat,164,27,4	script	eBC	84,{
	callfunc "chgstone","eBC";
}

//EP3.0 - Repairer NPC
alberta_in.gat,31,65,4	script	CH	84,{
	callfunc "repairer";
}
prt_in.gat,63,54,2	script	CH	86,{
	callfunc "repairer";
}
morocc_in.gat,71,41,4	script	CH	99,{
	callfunc "repairer";
}
payon_in01.gat,88,29,4	script	CH	88,{
	callfunc "repairer";
}
