Refine Protection debug

[cmsm94]

-I request a script refiner

I want it to have success rates until +20

It have to have protection item(If it fail it wont break the main item but it break the protection item)

It will take zeny according to the item level(level 1 item(knife) example)

It will refine any eq~~

 

Can Someone FIX THIS SCRIPT of someone can REDO it

 

There is 1 bug when you using 3rd job refine +9 - +10 there is a chance using the Refine Protection item will not work. I dont know why. Can someone tell me. I AM ANNOYED with many search there is no script of a refiner like this. This is one good refiner credits give to its owner. I am not the owner.!!!

------------------------------------------------------------------------------------------------------------------------------------------
prontera,148,186,5    script    Droverson    826,{

// ================================================== Variables Settings Guide ==================================================
// ||    @Refiner_Name$                ||    Refiner NPC Name                                                                                    ||
// ||    @Refiner_Equip_Position$[1]    ||    Refiner Equipment Menu Array                                                                        ||
// ||    @Refiner_Conversation$[0]    ||    Refiner Required Item ( Armor, Weapon Lv.1 , Weapon Lv.2 , Weapon Lv.3, Weapon Lv.4 )        ||
// ||    @Refiner_Required_Item[0]    ||    Refiner Required Zeny ( Armor, Weapon Lv.1 , Weapon Lv.2 , Weapon Lv.3, Weapon Lv.4 )        ||
// ||    @Refiner_Max_Refine[0]        ||    Max Refine Level (( Armor, Weapon Lv.1 , Weapon Lv.2 , Weapon Lv.3, Weapon Lv.4 )            ||
// ||    @Refiner Required Zeny[0]    ||    Armor, Weapon Lv.1 , Weapon Lv.2 , Weapon Lv.3, Weapon Lv.4 ]                                ||
// ||    @Refiner_Success_Rate[0]        ||    Armor Success Rate ( +1 , +2 , +3 , +4 , +5 , +6 , +7 , +8 , +9 , +10 )                    ||
// ||    @Refiner_Success_Rate[25]    ||    Weapons Lv.1 Success Rate ( +1 , +2 , +3 , +4 , +5 , +6 , +7 , +8 , +9 , +10 )            ||
// ||    @Refiner_Success_Rate[50]    ||    Weapons Lv.2 Success Rate ( +1 , +2 , +3 , +4 , +5 , +6 , +7 , +8 , +9 , +10 )            ||
// ||    @Refiner_Success_Rate[75]    ||    Weapons Lv.3 Success Rate ( +1 , +2 , +3 , +4 , +5 , +6 , +7 , +8 , +9 , +10 )            ||
// ||    @Refiner_Success_Rate[100]    ||    Weapons Lv.4 Success Rate ( +1 , +2 , +3 , +4 , +5 , +6 , +7 , +8 , +9 , +10 )            ||
// ||    @Refiner_Protection            ||    Protection Item ( Which make equipment will not break! )                                        ||
// ================================================== Variables Settings Guide ==================================================

// Pre-load NPC Resources
set @Refiner_Name$, "[^FF0000Droverson^000000]";
setarray @Refiner_Equip_Position$[1], "Top Headgear","Body","Left Hand","Right Hand","Robe","Shoes","Accessory 1","Accessory 2","Mid Headgear","Lower Headgear";
setarray    @Refiner_Conversation$[0],"Equipment","Weapon","Weapon","Weapon","Weapon";
setarray    @Refiner_Required_Item[0],985,1010,1011,984,984;
setarray @Refiner_Required_Zeny[0],50000,1000,2500,10000,20000;
setarray @Refiner_Max_Refine[0],20,20,20,20,20;
setarray @Refiner_Success_Rate[0],100,100,100,100, 60, 40, 40, 20, 20, 10, 50, 30, 30, 20, 20, 10, 10, 10, 10, 10;
setarray @Refiner_Success_Rate[25],100,100,100,100,100,100,100, 60, 40, 20, 70, 70, 50, 50, 30, 30, 20, 20, 10, 10;
setarray @Refiner_Success_Rate[50],100,100,100,100,100,100, 60, 40, 20, 20, 70, 50, 50, 30, 30, 20, 20, 10, 10, 10;
setarray @Refiner_Success_Rate[75],100,100,100,100,100, 60, 50, 20, 20, 20, 50, 50, 30, 30, 20, 20, 10, 10, 10, 10;
setarray @Refiner_Success_Rate[100],100,100,100,100, 60, 40, 40, 20, 20, 10, 50, 30, 30, 20, 20, 10, 10, 10, 10, 10;
set @Refiner_Protection,7806;
// End

    mes @Refiner_Name$;
    mes "Good evening. I'm the Head of Armsmith, ^FF0000Droverson^000000.";
    mes    "I'm quite different with other Armsmith, I can upgrade your equipments safer than other Armsmith.";
    next;
    mes @Refiner_Name$;
    mes "Alright, let's get it started!";
    mes "Please select an equipment to refine.";
    set @Refiner_Menu$,"";
    for( set @Refiner_Check_Equiped,1; @Refiner_Check_Equiped <= 10; set @Refiner_Check_Equiped,@Refiner_Check_Equiped+1 )
    {
        if( getequipisequiped(@Refiner_Check_Equiped) )
            set @Refiner_Menu$, @Refiner_Menu$ + @Refiner_Equip_Position$[@Refiner_Check_Equiped]+" - "+"["+getequipname(@Refiner_Check_Equiped)+"]";

        set @Refiner_Menu$, @Refiner_Menu$ + ":";
    }
    set @Equipments_Part,select(@Refiner_Menu$);
    next;
    mes @Refiner_Name$;
    if ( getequipisequiped(@Equipments_Part) < 1 || getequipisenableref(@Equipments_Part) < 1 )
    {
        if ( getequipisequiped(@Equipments_Part) < 1 )
            mes "I don't see there is any equipment you has equiped.";
        else if ( getequipisenableref(@Equipments_Part) < 1 )
            mes "This is out of my range, I couldn't do anything with this equipment.";
        close;
    }
    set @Check_Equip_Level,getequipweaponlv(@Equipments_Part);
    if ( getequiprefinerycnt(@Equipments_Part) >= @Refiner_Max_Refine[@Check_Equip_Level] )
    {
        mes "I'm sorry, I couldn't refine this equipment anymore.";
        mes "The equipment has reached it's max level.";
        close;
    }
    mes "To refine this "+@Refiner_Conversation$[@Check_Equip_Level]+", I need an "+getitemname(@Refiner_Required_Item[@Check_Equip_Level])+" and a service charge of "+@Refiner_Required_Zeny[@Check_Equip_Level]+"z.";
    mes "Do you really wish to continue?";
    next;
    if ( countitem(@Refiner_Required_Item[@Check_Equip_Level]) == 0 )
    {
        mes @Refiner_Name$;
        mes "Hey! I need a "+getitemname(@Refiner_Required_Item[@Check_Equip_Level])+" as the refining material!";
        close;
    }
    if ( Zeny < @Refiner_Required_Zeny[@Check_Equip_Level] )
    {
        mes @Refiner_Name$;
        mes "Is that all you've got?";
        mes "I'm sorry, I don't do free services.";
        close;
    }
    menu "Yes",-;
    if ( @Refiner_Success_Rate[getequiprefinerycnt(@Equipments_Part) + @Check_Equip_Level * 25] != 100 )
    {
        mes @Refiner_Name$;
        mes "If I continue to refine this, there is a risk it could be destroyed.";
        mes "But, if you have a "+getitemname(@Refiner_Protection)+", your equipment wouldn't be destroyed but the "+getitemname(@Refiner_Protection)+" will be consumed.";
        next;
        menu "Continue",-;
    }
    delitem @Refiner_Required_Item[@Check_Equip_Level],1;
    set Zeny,Zeny - @Refiner_Required_Item[@Check_Equip_Level];
    if (@Refiner_Success_Rate[getequiprefinerycnt(@Equipments_Part) + @Check_Equip_Level * 25] <= rand(100) )
    {
        if ( countitem(@Refiner_Protection) > 1 ) goto Refiner_Protected;
            failedrefitem @Equipments_Part;
            emotion 4;
            mes @Refiner_Name$;
            mes "Woahhh! I'm sorry!";
            mes "The equipment has destroyed during the refine process.";
            mes "I warned you loudly.";
            close;
    }
    next;
    successrefitem @Equipments_Part;
    emotion 18;
    mes @Refiner_Name$;
    mes "Woohooo! It's been a long time that I didn't done with quality equipment like this.";
    mes "Alright, take it please.";
    close;

    Refiner_Protected:
        emotion 4;
        specialeffect2 734;
        mes @Refiner_Name$;
        mes "Ahhhh! The refining process has failed.";
        mes "Luckily the "+getitemname(@Refiner_Protection)+" saved your equipment! It didn't break.";
        delitem @Refiner_Protection,1;
        close;
}





----------------------------------------------------------------------------------------------------------------------------------------------------

Bump

Bump

common i already gave a guide cant anyone help?

help helpppp

Edited September 5, 2013 by Emistry
Change to code

[Capuche]

I believe

if ( countitem(@Refiner_Protection) > 1 ) goto Refiner_Protected;

should be

if ( countitem(@Refiner_Protection) > 0 ) goto Refiner_Protected;

otherwise even if you have 1 god anvil in your inventory, the protection doesn't work.

[cmsm94]

I believe

if ( countitem(@Refiner_Protection) > 1 ) goto Refiner_Protected;

should be

if ( countitem(@Refiner_Protection) > 0 ) goto Refiner_Protected;

otherwise even if you have 1 god anvil in your inventory, the protection doesn't work.

Will the item work?

[GmOcean]

It will work. However, next time, try and test the script with the fix that people take the time to give you. Simply responding back without testing is in fact quite rude, and makes it harder for us to ' want ' to help you.