who can help me to fix this?
prontera,111,64,5 script +10 Refiner NPC 813,{
for( set .@i,1; .@i <= 6; set .@i,.@i + 1 )
if( getequipisequiped( .@i ) ){
if( getequipisenableref( .@i ) && getequiprefinerycnt( .@i ) <= .max_refine ){
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,6;
else if( .@eq_level == 2 ) set .@free_refine,7;
else if( .@eq_level == 3 ) set .@free_refine,8;
else if( .@eq_level == 4 ) set .@free_refine,9;
else if( .@eq_level == 5 ) set .@free_refine,3;
else if( .@eq_level == 6 ) set .@free_refine,2;
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,0;
set .max_refine,10;
waitingroom " Refiner / DeRefiner",0;
end;
}