Refine NPC

[Myth 1]

refine without elu,phracon,oridecon

 

1 click refine into there safety refine

 

izlude,131,148,4	script	Refiner	899,{mes "[Safety Refiner]";mes "Made by Lunar";mes "Would you like to refine all your items to their safety limit?";mes "I still require the items needed to refine.";if(select("Yes:No")==2) close;    for(set @i,1; @i!=11; set @i,@i+1) {        if(!getequipisenableref(@i)) continue;        switch(getequipweaponlv(@i)) {            case 0: callsub SafeRefine,985; break;            case 1: callsub SafeRefine,1010; break;            case 2: callsub SafeRefine,1011; break;            case 3:            case 4: callsub SafeRefine,984; break;        }    }close;SafeRefine:    mes "Success";    while (getequipisequiped(@i) && countitem(getarg(0)) && getequippercentrefinery(@i)==100) { delitem (getarg(0)),1; successrefitem @i; }    return;}

 

[jaBote 438]

Change this line:

    while (getequipisequiped(@i) && countitem(getarg(0)) && getequippercentrefinery(@i)==100) { delitem (getarg(0)),1; successrefitem @i; }

 

Into this:

    while (getequipisequiped(@i) && getequippercentrefinery(@i)==100) successrefitem @i;

 

And optionally delete all arguments passed to SafeRefine (do it if map server complains about unused arguments in the function).

[Myth 1]

can you make when they click the npc the npc will automatically refine there items to safe refine?

[jaBote 438]

Just remove any dialogues:

izlude,131,148,4	script	Refiner	899,{    for(set @i,1; @i!=11; set @i,@i+1) {        if(!getequipisenableref(@i)) continue;        switch(getequipweaponlv(@i)) {            case 0: callsub SafeRefine; break;            case 1: callsub SafeRefine; break;            case 2: callsub SafeRefine; break;            case 3:            case 4: callsub SafeRefine; break;        }    }close;SafeRefine:    mes "Success";    while (getequipisequiped(@i) && getequippercentrefinery(@i)==100) successrefitem @i;    return;}

[Myth 1]

Thanks

Edited July 26, 2013 by Myth

[Emistry 145]

prontera,155,181,5	script	Sample	757,{while( .@x < 11 ){	if( getequipisenableref( .@x ) && getequipisequiped( .@x ) )		while( getequippercentrefinery( .@x ) == 100 )			successrefitem .@x;	.@x++;}end;}