[RO] Max Refiner - one-click

prontera,155,175,5	script	Sample#npc	4_F_KAFRA9,{
	.@item_id = 7539;
	.@amount = 1000;
	.@max_refine = 10;

	if ( countitem( .@item_id ) < .@amount ) {
		mes "not enough items.";
	}
	else {
		for ( .@i = EQI_HEAD_TOP; .@i <= EQI_SHOES; .@i++ )
			if ( getequipid( .@i ) != -1 ) {
				.@refine = getequiprefinerycnt( .@i );
				if ( .@refine < .@max_refine ) {
					successrefitem .@i,( .@max_refine - .@refine );
					.@refine_count++;
				}
			}

		if ( .@refine_count )
			delitem .@item_id,.@amount;

		mes "done";
	}
	close;
}