//===== rAthena Script =======================================
//= Kunai Merchant Kashin
//===== By: ==================================================
//= rAthena Dev Team
//===== Current Version: =====================================
//= 1.3a
//===== Compatible With: =====================================
//= rAthena SVN
//===== Description: =========================================
//= Trades a few shurikens + ninja stones for elemental kunai.
//===== Additional Comments: =================================
//= 1.0 Added the npc. It uses a function that sends the item 
//=     id of the 2 required items plus the amount. Can trade
//=     up to 500 units (5,000 kunais) at once. [erKURITA]
//= 1.1 Officialized script [Playtester]
//= 1.2a Optimized/cleaned up a bit [ultramage]
//= 1.3 Updated to match AEGIS script. [Kisuka]
//= 1.3a Kagerou/Oboro support (BaseJob -> BaseClass) [Euphy]
//============================================================

que_ng,72,29,3	script	ɵ 	83,{
	if(BaseClass == Job_Ninja) {
		mes "[]";
		mes "߷ɵĶһ߿¡";
		mes "㿴ɣȤû";
		next;
		switch(select("һ 綾ɵ 10:һ ɵ 10:һ ǿɵ 10:һ ɵ 10:һ ɵ 10:Ի")) {
		case 1: callfunc "Kunai_Trade",13250,20,7524,1,13259; break;
		case 2: callfunc "Kunai_Trade",13251,8,7522,2,13255; break;
		case 3: callfunc "Kunai_Trade",13252,4,7523,2,13257; break;
		case 4: callfunc "Kunai_Trade",13253,2,7524,1,13256; break;
		case 5: callfunc "Kunai_Trade",13254,1,7521,2,13258; break;
		case 6:
			mes "[]";
			mes "գҪҰɡ";
			mes " - ֮»һֱ";
			mes "Ӵ";
			close;
		}
	}
	mes "[]";
	mes "߷ɵĶһ߿¡";
	mes "ѵĻ";
	mes "æתһ";
	mes "ܶһõķɵ";
	close;
}

function	script	Kunai_Trade	{
	mes "[]";
	mes ""+getarg(1)+""+getitemname(getarg(0))+""+getarg(3)+""+getitemname(getarg(2))+"ͿԶһ10"+getitemname(getarg(4))+"";
	next;
	mes "[]";
	mes "һֻܸ500ѷɵ";
	mes "һĻڶ0";
	mes "Ҫٰѣ";
	next;
	input .@amount;
	if(.@amount == 0) {
		mes "[]";
		mes "㲻붩ɵأ";
		mes "Ǿ´ɡ";
		close;
	}
	if(.@amount < 1 || .@amount > 500) {
		mes "[]";
		mes "Բ";
		mes "Ҳܸô࣬";
		mes "һֻܸ500ѡ";
		close;
	}
	if(countitem(getarg(0)) < .@amount*getarg(1) || countitem(getarg(2)) < .@amount*getarg(3)) {
		mes "[]";
		mes "ѽѽ";
		mes "û㹻Ĳϣ";
		mes "һҪôණ";
		mes "׼֮Ұɡ";
		close;
 	}
	if(checkweight(getarg(4), .@amount*10) == 0) {
		mes "[]";
		mes "";
		mes "ıˡ";
		mes "һҡ";
		close;
	}
	mes "[]";
	mes "~ܺã";
	mes "Ʒȷϣ";
	mes "϶Щɵġ";
	delitem getarg(0),getarg(1)*.@amount;
	delitem getarg(2),getarg(3)*.@amount;
	getitem getarg(4),10*.@amount;
	close;
}
