//====================================
//ű : ԴԱ
//ű :  & ү
//ű汾 : 
//ű˵ : һЩ "" Ʒ , ȡ Cash  Zeny ..
//ű : eAthena 12716 ֮汾Կʹ , ֮ǰСܻδ !
//űע : ұ̫ණ ,һҳ̫ ! ̫
//====================================
//뱣,лл !
//====================================

prt_in.gat,285,137,4	script	ԴԱ	807,{
//ضӦ(: Ʒ(707)Ʒ(10)õcash(9)õzeny(5)w) ^^
	setarray $@RecoveryRTM[1],707,923,926,941,942,945,968,907;  //Ʒ
	setarray $@RecoveryNTM[1],10,100,180,220,180,120,250,160;  //Ʒ
	setarray $@RecoveryZenA[1],50,150,300,350,250,130,350,140;  //õzeny(λ: , 1ͱʾ1..Դ)

//ݷǻдű޸

	set $@RecoverySRTM,(getarraysize($@RecoveryRTM)-1);
		mes "[ԴԱ]";
		for ( set @i,1; @i < ($@RecoverySRTM+1); set @i,@i+1 ) {
			mes "No."+@i+" ^0000FF"+$@RecoveryNTM[@i]+"^000000  ^0000FF"+getitemname($@RecoveryRTM[@i])+"^000000 -";
			mes "           ^FF0000"+$@RecoveryZenA[@i]+"^000000 zeny";
		}
		mes "ҪյƷNo.";
		mes " ";
	next;
		input .@input;
	next;
	if (.@input == 0) goto E_C_it;
	if (.@input > $@RecoverySRTM) goto E_C_it;
	if ( countitem ($@RecoveryRTM[.@input]) < $@RecoveryNTM[.@input] ) goto N_C_it;
	delitem $@RecoveryRTM[.@input],$@RecoveryNTM[.@input];
	set #CASHPOINTS,#CASHPOINTS+$@RecoveryCas[.@input];
	set zeny,zeny+$@RecoveryZenA[.@input]*10000;
		mes "[ԴԱ]";
		mes ".";
		mes "ȥѯZeny.";
		close;
N_C_it:
		mes "[ԴԱ]";
		mes "ĵ߲.";
		mes "ĵ!";
		close;
E_C_it:
		mes "[ԴԱ]";
		mes "ûı.";
		mes "?";
		close;
}