Refiner +10 needed

[crystalro]

Hi, Anyone can share me a refiner +10 script? or help me to script?
I need a refiner for FREE OF CHARGES, multiple refine 1 by 1, do not refine accessory and MID & LOWER....... Auto read & follow itemdb which can refine which cannot refine... and 2nd option together with this NPC
Can multiple derefine 1 by 1
Thank you!
 

[Azura Skyy]

Emistry has an impressive script for just this. You can customize it to do just about anything you would want with refining.

Regards,
~Azura Skyy

[Ehran]

7 hours ago, Azura Skyy said:

Emistry has an impressive script for just this. You can customize it to do just about anything you would want with refining.

Regards,
~Azura Skyy

Warning: this function will refine any-part incude shadow, accessory, mid and lower headgear if you not customize

Edited December 27, 2016 by Ehwaz

[Azura Skyy]

59 minutes ago, Ehwaz said:

Warning: this function will refine any-part incude shadow, accessory, mid and lower headgear if you not customize

This does what you want. Thank you for confirming that.

Regards,
~Azura Skyy

[crystalro]

Please help me this script ,  I wonder why other server works and load on my server become other thing....
this script refiner is refine 1by1 style.... But i wear full eq ady.... It only appear Shoes , Upper and Garment..  
Here this picture and script 

 

// function    script    ValueConvert    {
    // set .@num, atoi(""+getarg(0));
    // if ( .@num == 0 || .@num >= 2147483647 ) return getarg(0);
    // set .@l, getstrlen(""+.@num);
    // for ( set .@i,0; .@i < .@l; set .@i, .@i + 1 ) {
        // set .@num$, .@num % pow(10,.@i+1) / pow(10,.@i) + .@num$;
            // if ( (.@i+1) % 3 == 0 && .@i+1 != .@l ) set .@num$, ","+ .@num$;
    // }
    // return .@num$;
// }


quiz_02,334,78,5    script    Refiner    63,{

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,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,0;
set .max_refine,10;

waitingroom "  Refiner",0;
end;
}

 

 

@Azura Skyy Not works  Not alike the one i'm looking.....