[RO] Zeny Refiner (below 3, rate = 100%)

// +1~+3 = 100% Success rate
// +4 Onwards = 1% Success rate ( Not breaking )

// Using Zeny only ... Thank you


prontera,155,181,5  script  Sample#refine   757,{
    .@zeny = 10000;

    for ( .@i = EQI_HEAD_TOP; .@i <= EQI_HEAD_LOW; .@i++ ) {
        .@itemid = getequipid( .@i );
        if ( .@itemid != -1 ) {
            .@menu$ += getitemname( .@itemid );
        }
        .@menu$ = .@menu$ + (( .@itemid != -1 ) ? "":getitemname( .@itemid ) ) + ":";
        .@i = select( .@menu$ ) - 1;
        .@refine = getequiprefinerycnt( .@i );
        .@rate = ( ( .@refine < 4 ) ? 100:1 );

        mes "Zeny : "+.@zeny;
        if ( .@zeny < .@zeny ) close;
        if ( rand(100) < .@rate ) {
            successrefitem .@i;
            mes "Success";
        }
        else {
            mes "Failed.";
        }
        close;
    }

}