prontera,155,181,5	script	Sample#rand_exchange	757,{
setarray .@item_id,
	608,	// item give
	607;	// item gain

mes "Exchange your "+getitemname( .@item_id[0] )+" to "+getitemname( .@item_id[1] )+" ?";
mes " ";
mes "^777777Rate are random^000000";
if( select( "Exchange","Cancel" ) == 1 ){
	next;
	.@current_count = countitem( .@item_id[0] );
	if( .@current_count ){
		mes "How many "+getitemname( .@item_id[0] )+" will be exchanged ?";
		input .@delete_amount,0,.@current_count;
		if( .@delete_amount ){
			.@rate = rand( 1,3 ); 
			.@gain_amount = ( .@delete_amount / .@rate );
			if( .@delete_amount ){
				delitem .@item_id[0],.@delete_amount;
				getitem .@item_id[1],.@gain_amount;
				mes "Exchanged "+.@delete_amount+"x "+getitemname( .@item_id[0] )+" to "+.@gain_amount+"x "+getitemname( .@item_id[1] )+" .";
				mes "Exchange rate : ^777777"+.@rate+":1^000000";
			}
		}
	}
	else{
		mes "You didnt have any "+getitemname( .@item_id[0] )+" to exchange.";
	}
} 
close;
}