// ҡAײzNPC
// sGRobertg
// sGu
// oG곡 Cathena }oζ
// ̫sG2004~115

// -----㺸-----
alberta_in.gat,21,63,5	script	մ		84,{	set @npcname$,"[մ]";	callfunc "۴";	}
alberta_in.gat,13,71,4	script	d԰Ҳ	86,{	set @npcname$,"[d԰Ҳ]";	callfunc "X";	}
alberta_in.gat,28,58,4	script	pwQ	85,{	set @npcname$,"[pwQ]";	callfunc "˳ƺ";	}

// ----- w -----
prt_in.gat,63,69,4	script	үSߦ	84,{	set @npcname$,"[үSߦ]";	callfunc "۴";	}
prt_in.gat,56,68,4	script	ǶV		86,{	set @npcname$,"[ǶV]";	callfunc "X";	}
prt_in.gat,63,60,4	script	Js		85,{	set @npcname$,"[Js]";	callfunc "˳ƺ";	}

// ----- ùJ -----
morocc_in.gat,72,32,4	script	ȫש		85,{	set @npcname$,"[ȫש]";	callfunc "۴";	}
morocc_in.gat,63,32,4	script	Fw		85,{	set @npcname$,"[Fw]";		callfunc "X";	}
morocc_in.gat,73,38,4	script	ȩԥ		85,{	set @npcname$,"[ȩԥ]";	callfunc "˳ƺ";	}

// ----- p -----
payon_in01.gat,6,47,4	script	L		88,{	set @npcname$,"[L]";		callfunc "۴";	}
payon_in01.gat,13,47,4	script	BJǼw	88,{	set @npcname$,"[BJǼw]";	callfunc "X";	}
payon_in01.gat,6,50,4	script	wF	88,{	set @npcname$,"[wF]";	callfunc "˳ƺ";	}

// ----- ׿ -----
yuno_in01.gat,164,27,4	script			84,{	set @npcname$,"[]";	callfunc "۴";	}
yuno_in01.gat,171,27,4	script	㺸ӯS	86,{	set @npcname$,"[㺸ӯS]";	callfunc "X";	}
yuno_in01.gat,171,21,4	script	׫S		85,{	set @npcname$,"[׫S]";	callfunc "˳ƺ";	}

// ˳ƭײzK
prt_in.gat,58,61,2	script	˳ƭײzK	63,{
	mes "[˳ƭײzK]";
	mes "ڬOײzDBZKKAiH״_@تFC";
	mes "AFݭnײzܡH";
	set @broken1,getbrokenid(1);
	set @broken2,getbrokenid(2);
	set @broken3,getbrokenid(3);
	set @broken4,getbrokenid(4);
	set @broken5,getbrokenid(5);
	set @broken6,getbrokenid(6);
	set @broken7,getbrokenid(7);
	set @broken8,getbrokenid(8);
	set @broken9,getbrokenid(9);
	set @broken10,getbrokenid(10);
	next;
	if(@broken1==NULL && @broken2==NULL && @broken3==NULL && @broken4==NULL && @broken5==NULL 
	&& @broken6==NULL && @broken7==NULL && @broken8==NULL && @broken9==NULL && @broken10==NULL) goto L_CANCEL_3;
	menu	getitemname(@broken1),REPAIR1,
		getitemname(@broken2),REPAIR2,
		getitemname(@broken3),REPAIR3,
		getitemname(@broken4),REPAIR4,
		getitemname(@broken5),REPAIR5,
		getitemname(@broken6),REPAIR6,
		getitemname(@broken7),REPAIR7,
		getitemname(@broken8),REPAIR8,
		getitemname(@broken9),REPAIR9,
		getitemname(@broken10),REPAIR10;
	REPAIR1:
		mes "[˳ƭײzK]";
		mes "@AAײz" + getitemname(@broken1) + "r.";
		mes "...ڻݭn@ ^ff9999K^000000M10000ӪC";
		mes "ǳƦnFܡH";
		next;
		menu "O",-,"AڦAQQ",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(1);
			goto L_CLOSE;
	REPAIR2:
		mes "[˳ƭײzK]";
		mes "@AAײz" + getitemname(@broken2) + "r.";
		mes "...ڻݭn@ ^ff9999K^000000M10000ӪC";
		mes "ǳƦnFܡH";
		next;
		menu "O",-,"AڦAQQ",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(2);
			goto L_CLOSE;
	REPAIR3:
		mes "[˳ƭײzK]";
		mes "@AAײz" + getitemname(@broken3) + "r.";
		mes "...ڻݭn@ ^ff9999K^000000M10000ӪC";
		mes "ǳƦnFܡH";
		next;
		menu "O",-,"AڦAQQ",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(3);
			goto L_CLOSE;
	REPAIR4:
		mes "[˳ƭײzK]";
		mes "@AAײz" + getitemname(@broken4) + "r.";
		mes "...ڻݭn@ ^ff9999K^000000M10000ӪC";
		mes "ǳƦnFܡH";
		next;
		menu "O",-,"AڦAQQ",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(4);
			goto L_CLOSE;
	REPAIR5:
		mes "[˳ƭײzK]";
		mes "@AAײz" + getitemname(@broken5) + "r.";
		mes "...ڻݭn@ ^ff9999K^000000M10000ӪC";
		mes "ǳƦnFܡH";
		next;
		menu "O",-,"AڦAQQ",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(5);
			goto L_CLOSE;
	REPAIR6:
		mes "[˳ƭײzK]";
		mes "@AAײz" + getitemname(@broken6) + "r.";
		mes "...ڻݭn@ ^ff9999K^000000M10000ӪC";
		mes "ǳƦnFܡH";
		next;
		menu "O",-,"AڦAQQ",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(6);
			goto L_CLOSE;
	REPAIR7:
		mes "[˳ƭײzK]";
		mes "@AAײz" + getitemname(@broken7) + "r.";
		mes "...ڻݭn@ ^ff9999K^000000M10000ӪC";
		mes "ǳƦnFܡH";
		next;
		menu "O",-,"AڦAQQ",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(7);
			goto L_CLOSE;
	REPAIR8:
		mes "[˳ƭײzK]";
		mes "@AAײz" + getitemname(@broken8) + "r.";
		mes "...ڻݭn@ ^ff9999K^000000M10000ӪC";
		mes "ǳƦnFܡH";
		next;
		menu "O",-,"AڦAQQ",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(8);
			goto L_CLOSE;
	REPAIR9:
		mes "[˳ƭײzK]";
		mes "@AAײz" + getitemname(@broken9) + "r.";
		mes "...ڻݭn@ ^ff9999K^000000M10000ӪC";
		mes "ǳƦnFܡH";
		next;
		menu "O",-,"AڦAQQ",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(9);
			goto L_CLOSE;
	REPAIR10:
		mes "[˳ƭײzK]";
		mes "@AAײz" + getitemname(@broken10) + "r.";
		mes "...ڻݭn@ ^ff9999K^000000M10000ӪC";
		mes "ǳƦnFܡH";
		next;
		menu "O",-,"AڦAQQ",L_CANCEL_2;
		if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1;
			delitem 999,1;
			set Zeny,Zeny-10000;
			repair(10);
			goto L_CLOSE;

	L_CANCEL_1:
		mes "[˳ƭײzK]";
		mes "A٨SťնܡHڻݭn@ӿKM10000ӪC";
		mes "ͷNڥiI";
		goto L_CLOSE;
	L_CANCEL_2:
		mes "[˳ƭײzK]";
		mes "naANOAϥΥFC";
		goto L_CLOSE;
	L_CANCEL_3:
		mes "[˳ƭײzK]";
		mes "ݨӧAèSFݭnײzAѦAӧaC";
		goto L_CLOSE;
	L_CLOSE:
		close;
}

function	script	۴	{
	mes @npcname$;
	mes "unAN^FF0000ݭ^000000^FF0000T^000000ӵڡAڰWNiHAүݥHξTCڻݭn5ӭۧڤ~kAC";
	next;
	menu "үݡC",L_MENU_1,"ҾTC",L_MENU_2,"߰ݦݩʥ۬ƶC",L_MENU_3;
	L_MENU_1:
		if (countitem(756) < 5) goto L_SUB_1;
		set @nbm,countitem(756) / 5;
			delitem 756,(@nbm * 5);
			getitem 984,@nbm;
			mes @npcname$;
			mes "oOAnݡAwUAӡC";
			close;
		L_SUB_1:
			mes @npcname$;
			mes "...AuR}CڤOALAnOS5ӯݭ۪ܡAOLks@ݪܡH";
			close;
	L_MENU_2:
		if (countitem(757) < 5) goto L_SUB_2;
		set @nbm,countitem(757) / 5;
			delitem 757,(@nbm * 5);
			getitem 985,@nbm;
			mes @npcname$;
	  		mes "oOAnTAwUAӡC";
			close;
		L_SUB_2:
		mes @npcname$;
		mes "...AuR}C";
		mes "ڤOALAnOS5ӾT۪ܡAOLks@T?";
			close;
	L_MENU_3:
		mes @npcname$;
		mes "ҿݩʥ...";
		mes "ڰMݳowgFGQ~AťLܦhoǻ...٨SڨLO!";
		mes "ťݳU۾֦BaBBݩʡC";
		next;
		mes @npcname$;
		mes "ťbMZɥ[Jݩʮɪ...һs@XӪZN֦ݩʮɪWjOqC";
		mes "..Lܻ^ӡAవXoتZHQ@w֦M޳NC";
		close;
}


function	script	X	{
	mes @npcname$;
	mes "o̦KάOKsZ~vɩһݭnݡI";
	mes "o̦vZ1^007777jƪZΪ-jƯżƤ@^000000";
	mes "P...vZ2^007777jƪZΪ-jƯżƤG^000000ݡC";
	next;
L_START:
	menu "jƪZΪ-jƯżƤ@- 200",L_MENU_1,"jƪZΪ-jƯżƤG- 1000",L_MENU_2,"߰ݦSL",L_MENU_3;
	L_MENU_1:
		set @itemid,1010;
		set @value,200;
		mes @npcname$;
		mes "AQnʶRhּƶqH@ӻݭn200ZENYI";
		next;
		goto L_START_1;
	L_MENU_2:
		set @itemid,1011;
		set @value,1000;
		mes @npcname$;
		mes "AQnʶRhּƶqH@ӻݭn1000ZENYI";
		next;
		goto L_START_1;
	L_MENU_3:
			mes @npcname$;
			mes "AݪOs@Z1P2HWһݭnݧaI";
			mes "ڷQAӤ]DAݩMT...ӴNo...";
		close;
	L_START_1:
		input @nbm;
		if (@nbm < 1) goto L_SUB_1;
		if (Zeny < (@nbm * @value)) goto L_SUB_1;
		if ((Weight + (@nbm * 200)) > MaxWeight) goto L_SUB_2;
		set Zeny,Zeny - (@nbm * @value);
		getitem @itemid,@nbm;
			mes @npcname$;
			mes "nFAoOAnjƪZΪݡAЦnC";
close;
		L_SUBMENU_5:
			mes @npcname$;
			mes "naAwUAӡI";
			close;
		L_SUB_1:
			mes @npcname$;
			mes "藍_@AA{bAo̥i\bC";
			close;
		L_SUB_2:
			mes @npcname$;
			mes "藍_@AAaohݤFC";
			close;
}

function	script	˳ƺ	{
	mes @npcname$;
	mes "ڬOMvZP㪺KKAڥiHAv˸mؤ~CAQnv˸mؤ@~OH";
	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;
			goto L_CLOSE;
	L_MENU_2:
		set @part,2;
		if (getequipisequiped(2)) goto L_START_1;
			goto L_CLOSE;
	L_MENU_3:
		set @part,3;
		if (getequipisequiped(3)) goto L_START_1;
			goto L_CLOSE;
	L_MENU_4:
		set @part,4;
		if (getequipisequiped(4)) goto L_START_1;
			goto L_CLOSE;
	L_MENU_5:
		set @part,5;
		if (getequipisequiped(5)) goto L_START_1;
			goto L_CLOSE;
	L_MENU_6:
		set @part,6;
		if (getequipisequiped(6)) goto L_START_1;
			goto L_CLOSE;
	L_MENU_7:
		set @part,7;
		if (getequipisequiped(7)) goto L_START_1;
			goto L_CLOSE;
	L_MENU_8:
		set @part,8;
		if (getequipisequiped(8)) goto L_START_1;
			goto L_CLOSE;
	L_MENU_9:
		set @part,9;
		if (getequipisequiped(9)) goto L_START_1;
			goto L_CLOSE;
	L_MENU_10:
		set @part,10;
		if (getequipisequiped(10)) goto L_START_1;
			goto L_CLOSE;
L_START_1:
	if (getequipisenableref(@part)) goto L_START_2;
		mes @npcname$;
		mes "o˸mLkҡC";
		goto L_CLOSE;
L_START_2:
	if (getequipisidentify(@part)) goto L_START_3;
		mes @npcname$;
		mes "oӦ]OųwҥHҡC";
		goto L_CLOSE;
L_START_3:
	if (getequiprefinerycnt(@part) < 10) goto L_REFINE_0;
		mes @npcname$;
		mes "o˳Ƥwgv̰šALkAvF..";
		goto L_CLOSE;
L_REFINE_0:
	if (getequipweaponlv(@part) > 0) goto L_REFINE_1;
		mes @npcname$;
		mes "nvAҿܪo˳ƻݭn^ff9999T^000000HζO2000C";
		mes "ATwn~ܡH";
		next;
		menu "~",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_0_SUB;
				mes @npcname$;
				mes "ݨӳo˳ƤwgvܦhFˤl...nOA~vܡAi|ylaI";
				next;
				mes @npcname$;
				mes "nOlaܥiN~ϥΤFIIb̭dMSx]^ff0000QF^000000II";
				next;
				mes @npcname$;
				mes "ӥBA˳Ƥ]|@AATwn~ܡH";
				next;
				menu "~",-,"",L_CANCEL_1;
	L_0_SUB:
		if ((countitem(985) < 1) || (Zeny < 2000)) goto L_CANCEL_2;
			delitem 985,1;
			set Zeny,Zeny-2000;
			goto L_REFINE_5;
L_REFINE_1:
	if (getequipweaponlv(@part) > 1) goto L_REFINE_2;
		mes @npcname$;
		mes "AQnvZ1ZڡI";
		mes "nvܻݭn^ff9999jƪZΪ-jƯżƤ@^000000HζO500C";
		mes "An~ܡH";
		next;
		menu "~",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_1_SUB;
				mes @npcname$;
				mes "ݨӳo˳ƤwgvܦhFˤl...nOA~vܡAi|ylaI";
				next;
				mes @npcname$;
				mes "nOlaܥiN~ϥΤFIIb̭dMSx]^ff0000QF^000000II";
				next;
				mes @npcname$;
				mes "ӥBA˳Ƥ]|@AATwn~ܡ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 @npcname$;
		mes "AQnvZ2ZڡI";
		mes "nvܻݭn^ff9999jƪZΪ-jƯżƤG^000000HζO2000C";
		mes "An~ܡH";
		next;
		menu "~",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_2_SUB;
				mes @npcname$;
				mes "ݨӳo˳ƤwgvܦhFˤl...nOA~vܡAi|ylaI";
				next;
				mes @npcname$;
				mes "nOlaܥiN~ϥΤFIIb̭dMSx]^ff0000QF^000000II";
				next;
				mes @npcname$;
				mes "ӥBA˳Ƥ]|@AATwn~ܡ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 @npcname$;
		mes "AQnvZ3ZڡI";
		mes "nvܻݭn^ff9999^000000HζO2500C";
		mes "An~ܡH";
		next;
		menu "~",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_3_SUB;
				mes @npcname$;
				mes "zII";
				mes "ݨӳoZwgvܦhFˤl...nOA~vܡAi|ylaI";
				next;
				mes @npcname$;
				mes "nOlaܥiN~ϥΤFII";
				mes "b̭dMSx^ff0000QF^000000II";
				next;
				mes @npcname$;
				mes "ӥBA˳Ƥ]|@AATwn~ܡH";
				next;
				menu "~",-,"",L_CANCEL_1;
	L_3_SUB:
		if ((countitem(984) < 1) || (Zeny < 2500)) goto L_CANCEL_2;
			delitem 984,1;
			set Zeny,Zeny-2500;
			goto L_REFINE_5;
L_REFINE_4:
		mes @npcname$;
		mes "AQnvZ4ZڡI";
		mes "nvܻݭn^ff9999^000000HζO5000C";
		mes "An~ܡH";
		next;
		menu "~",-,"",L_CANCEL_3;
			if (getequippercentrefinery(@part) == 100) goto L_4_SUB;
				mes @npcname$;
				mes "zII";
				mes "ݨӳoZwgvܦhFˤl...nOA~vܡAi|ylaI";
				next;
				mes @npcname$;
				mes "nOlaܥiN~ϥΤFII";
				mes "b̭dMSx^ff0000QF^000000II";
				next;
				mes @npcname$;
				mes "ӥBA˳Ƥ]|@AATwn~ܡH";
				next;
				menu "~",-,"",L_CANCEL_1;
	L_4_SUB:
		if ((countitem(984) < 1) || (Zeny < 5000)) goto L_CANCEL_2;
			delitem 984,1;
			set Zeny,Zeny-5000;
L_REFINE_5:
	if (getequippercentrefinery(@part)<=rand(100)) goto L_REFINE_6;
		mes @npcname$;
		mes "IIII";
		successrefitem @part;
		next;
		emotion 18;
		mes @npcname$;
		mes "haIwgnFCn[SvXu誺ZFAZܱjFA@w]ܰaI";
		CLOSE;
L_REFINE_6:
	mes @npcname$;
	mes "IIII";
	failedrefitem @part;
	next;
	emotion 4;
	mes @npcname$;
	mes "yyyyyyyIII";
	next;
	mes @npcname$;
	mes "u...yC";
	mes "ZbvL{laFC";
	mes "......NiDLA|o˪I";
	CLOSE;
L_CANCEL_1:
	mes @npcname$;
	mes "ܦnC";
	mes "pGӹLLzvZAӳylaAڤ߱]|aC";
	CLOSE;
L_CANCEL_2:
	mes @npcname$;
	mes "oǴNOAҾ֦Ҧ~ܡH";
	mes "MܥiAOAƤAڤ]bRUAAAڥIX]ӱonҦìI";
	CLOSE;
L_CANCEL_3:
	mes @npcname$;
	mes "naAwUAӡI";
L_CLOSE:
			mes @npcname$;
			mes "nnڧAYvoo@IڡH";
	close;
}
