quiz_02,246,389,3	script	Refiner	826,{

for( set .@i,1; .@i <= 6; set .@i,.@i + 1 )
	if( getequipisequiped( .@i ) ){
		if( getequipisenableref( .@i ) && getequiprefinerycnt( .@i ) <= .max_refine || .refinemax ){
			set .@eq_count,.@eq_count + 1;
			set .@menu$,.@menu$ + " +"+getequiprefinerycnt( .@i )+" "+getequipname( .@i ) +":";
		}else{
			set .@menu$,.@menu$ +":";
		}
	}else{
		set .@menu$,.@menu$ +":";
	}
//if( !.@eq_count ){
//	mes "You dont have any equipment available for refine.";
//	close;
//}

set .@equipment,select( .@menu$ );
set .@temp_equip,getequipid( .@equipment );

do{
	if( getequipid( .@equipment ) != .@temp_equip ){
		mes "Dont change to other equipments.";
		close;
	}

	set .@eq_level,getequipweaponlv( .@equipment );
	if( .@eq_level == 1 ) set .@free_refine,7;
	else if( .@eq_level == 2 ) set .@free_refine,6;
	else if( .@eq_level == 3 ) set .@free_refine,5;
	else set .@free_refine,4;

	set .@refine_count,getequiprefinerycnt( .@equipment );

	if( .zeny_cost ){
		mes "Every Refine : ^0055FF"+callfunc( "ValueConvert",.zeny_cost )+" Zeny^000000";
		mes "De-refine : ^FF0000Free^000000";
		mes " ";
		mes "If current refine below +^FF0000"+.@free_refine+" : ^FF0000Free^000000";
		next;
	}

	set .@refine,select(( .@refine_count >= .max_refine )?"":"Refine to ^0055FF+"+( .@refine_count + 1 )+" "+getequipname( .@equipment )+"^000000",
						( .@refine_count < 1 )?"":"De-refine -1" );  // temporary disabled de-refine

	if( Zeny < .zeny_cost && .@refine == 1 ){
		message strcharinfo(0),"Dont have enough zeny.";
		break;
	}

	if( .@refine_count < 1 && .@refine == 2 ){
		mes "You cant de-refine this anymore.";
		break;
	}else if( .@refine_count >= .max_refine && .@refine == 1 ){
		mes "You cant refine this anymore.";
	}else{
		if( .@refine == 1 && .@refine_count >= .@free_refine )
			set Zeny,Zeny - .zeny_cost;
		switch( .@refine ){
			Case 1: successrefitem .@equipment; break;
			Case 2: downrefitem .@equipment; break;
			default: break;
		}
	}

	if( getequiprefinerycnt( .@equipment ) >= .max_refine ){
		mes "Max Refine Reach...";

		break;
	}
}while( 1 );
close;

OnInit:
OnWhisperGlobal:
set .zeny_cost,1000000;
set .max_refine,10;
set	.refinemax,10;

waitingroom "+10 Refiner",0;
end;
}