Hi!, I just need a lil tweak

Z

Zalbahis

New member
Messages
26
Points
0
Can someone customized this script.. just like

HD Elu
100% refine chance from +1 to +7 and down to 60, 40, 30 for going to +10..

& for HD Ori

100% refine chance same from +1 to +7 and down to 50, 40, 30 for going to +10..

Here's the Original Script of Euphy..

//===== rAthena Script ======================================= //= HD Refiners//===== By: ==================================================//= Euphy//===== Current Version: =====================================//= 1.0//===== Compatible With: =====================================//= rAthena SVN//===== Description: =========================================//= [Official Conversion]//= Refiners that use HD ores to refine equipment. Upon//= failure, the equipment is not destroyed; rather, its//= refine level decreases by 1. The success rate is identical//= to that for Enriched ores.//= - "Blacksmith Mighty Hammer" only refines from +7~9.//= - "Basta" only refines from +10 and up.//===== Additional Comments: =================================//= 1.0 First version. [Euphy]//============================================================// Blacksmith Mighty Hammer (+7~9)//============================================================- script ::MightyHammer -1,{ disable_items; mes "[Blacksmith Mighty Hammer]"; mes "Unlike others, I am a blacksmith who refines a very limited number of items."; mes "I refine only items that are ^CC0000+7 to +9^000000."; next; mes "[Blacksmith Mighty Hammer]"; mes "My specialty is that even if my refining fails, the refine level decreases by 1 without losing the gear. Isn't it great?"; next; mes "[Blacksmith Mighty Hammer]"; mes "So lets kick this into overdrive, what d' ya say? What item do you want to refine?"; next; setarray .@position$[1],"Head","Body","Left Hand","Right Hand","Robe","Shoes","Accessory 1","Accessory 2","Head 2","Head 3"; set .@menu$,""; for(set .@i,1; .@i<=10; set .@i,.@i+1) set .@menu$, .@menu$+((getequipisequiped(.@i))?getequipname(.@i):.@position$[.@i]+"-[Not equipped]")+":"; set .@part, select(.@menu$); if (!getequipisequiped(.@part)) { mes "[Blacksmith Mighty Hammer]"; switch(.@part) { case 1: mes "I'm a blacksmith, not a hairstylist."; break; case 2: mes "With my hammer, I will make you a star of the sky."; break; case 3: case 4: mes "Making artificial hands is not my specialty."; break; case 5: mes "Bring out the item so I can refine it!"; break; case 6: mes "Where is this foot odor coming from?"; break; case 7: case 8: mes "Where is the accessory?"; break; case 9: mes "What do you want me to refine?"; break; case 10: mes "Huh? What do you want me to do?"; break; } close; } if (!getequipisenableref(.@part)) { mes "[Blacksmith Mighty Hammer]"; mes "This item can't be refined."; close; } if (getequiprefinerycnt(.@part) < 7 || getequiprefinerycnt(.@part) > 9) { mes "[Blacksmith Mighty Hammer]"; mes "I only handle items with refine levels from +7 to +9."; close; } switch(getequipweaponlv(.@part)) { default: case 0: set .@price,20000; set .@material,6241; //HD_Elunium break; case 1: case 2: case 3: case 4: set .@price,20000; set .@material,6240; //HD_Oridecon break; } mes "[Blacksmith Mighty Hammer]"; mes "In order to refine the gear you selected you need ^ff9999"+getitemname(.@material)+"^000000 and 20,000 zeny as a fee."; mes "Do you have them ready?"; next; if(select("Yes:No") == 2) { mes "[Blacksmith Mighty Hammer]"; mes "I will wait until you are ready."; close; } if (getequippercentrefinery(.@part) < 100) { mes "[Blacksmith Mighty Hammer]"; mes "It looks like this item will likely fail to be refined."; mes "Well, even if it fails, it only decreases by 1 refine level."; mes "Would you like to continue refining?"; next; if(select("Yes:No") == 2) { mes "[Blacksmith Mighty Hammer]"; mes "Only those who overcome fear of failure will obtain a masterpiece."; close; } } if (countitem(.@material) == 0 || Zeny < .@price) { mes "[Blacksmith Mighty Hammer]"; mes "Didn't you just say you had everything ready?"; close; } delitem .@material,1; set Zeny, Zeny-.@price; mes "[Blacksmith Mighty Hammer]"; mes "Tac! Tac! Tac!"; if (getequippercentrefinery(.@part) > rand(100) || getequippercentrefinery(.@part) > rand(100)) { successrefitem .@part; next; emotion e_no1; mes "[Blacksmith Mighty Hammer]"; mes "The sound refreshes my mind everytime I hear it."; mes "Here, have it. Refine succeeded flawlessly!"; close; } downrefitem .@part; next; emotion e_omg; mes "[Blacksmith Mighty Hammer]"; mes "Oops!!"; next; mes "[Blacksmith Mighty Hammer]"; mes "I am sure a person like you would never blame me for a decrease in refine level by 1. Hmm."; close;}prt_in,59,54,3 duplicate(MightyHammer) Mighty Hammer#prt 826morocc_in,65,30,3 duplicate(MightyHammer) Mighty Hammer#morocc 826payon,148,176,3 duplicate(MightyHammer) Mighty Hammer#pay 826alberta_in,16,56,3 duplicate(MightyHammer) Mighty Hammer#alb 826yuno_in01,171,18,3 duplicate(MightyHammer) Mighty Hammer#yuno 826ein_in01,22,82,3 duplicate(MightyHammer) Mighty Hammer#ein 826lhz_in02,280,19,3 duplicate(MightyHammer) Mighty Hammer#lhz 826// iRO NPC locations:// moc_para01,38,185,4 duplicate(MightyHammer) Mighty Hammer#ed 826// payon,174,133,4 duplicate(MightyHammer) Mighty Hammer#im 826 

I really appreciate your help!, Thanks in Advance..

 
Last edited by a moderator:
try..

Code: 
//===== rAthena Script =======================================//= HD Refiners//===== By: ==================================================//= Euphy//===== Current Version: =====================================//= 1.0//===== Compatible With: =====================================//= rAthena SVN//===== Description: =========================================//= [Official Conversion]//= Refiners that use HD ores to refine equipment. Upon//= failure, the equipment is not destroyed; rather, its//= refine level decreases by 1. The success rate is identical//= to that for Enriched ores.//= - "Blacksmith Mighty Hammer" only refines from +7~9.//= - "Basta" only refines from +10 and up.//===== Additional Comments: =================================//= 1.0 First version. [Euphy]//============================================================// Blacksmith Mighty Hammer (+7~9)//============================================================-    script    ::MightyHammer    -1,{    disable_items;    mes "[blacksmith Mighty Hammer]";    mes "Unlike others, I am a blacksmith who refines a very limited number of items.";    mes "I refine only items that are ^CC0000+7 to +9^000000.";    next;    mes "[blacksmith Mighty Hammer]";    mes "My specialty is that even if my refining fails, the refine level decreases by 1 without losing the gear. Isn't it great?";    next;    mes "[blacksmith Mighty Hammer]";    mes "So lets kick this into overdrive, what d' ya say? What item do you want to refine?";    next;    setarray .@position$[1],"Head","Body","Left Hand","Right Hand","Robe","Shoes","Accessory 1","Accessory 2","Head 2","Head 3";    set .@menu$,"";    for(set .@i,1; .@i<=10; set .@i,.@i+1)        set .@menu$, .@menu$+((getequipisequiped(.@i))?getequipname(.@i):.@position$[.@i]+"-[Not equipped]")+":";    set .@part, select(.@menu$);    if (!getequipisequiped(.@part)) {        mes "[blacksmith Mighty Hammer]";        switch(.@part) {        case 1:            mes "I'm a blacksmith, not a hairstylist.";            break;        case 2:            mes "With my hammer, I will make you a star of the sky.";            break;        case 3:        case 4:            mes "Making artificial hands is not my specialty.";            break;        case 5:            mes "Bring out the item so I can refine it!";            break;        case 6:            mes "Where is this foot odor coming from?";            break;        case 7:        case 8:            mes "Where is the accessory?";            break;        case 9:            mes "What do you want me to refine?";            break;        case 10:            mes "Huh? What do you want me to do?";            break;        }        close;    }    if (!getequipisenableref(.@part)) {        mes "[blacksmith Mighty Hammer]";        mes "This item can't be refined.";        close;    }    switch(getequipweaponlv(.@part)) {    default:    case 0:        set .@price,20000;        set .@material,6241; //HD_Elunium        break;    case 1:    case 2:    case 3:    case 4:        set .@price,20000;        set .@material,6240; //HD_Oridecon        break;    }    mes "[blacksmith Mighty Hammer]";    mes "In order to refine the gear you selected you need ^ff9999"+getitemname(.@material)+"^000000 and 20,000 zeny as a fee.";    mes "Do you have them ready?";    next;    if(select("Yes:No") == 2) {        mes "[blacksmith Mighty Hammer]";        mes "I will wait until you are ready.";        close;    }        if (getequiprefinerycnt(.@part) < 7 ) {            mes "Refine Count is Lower than 7.";            callsub N_odowngrade, .@part, .@material, .@price; end;    }        if (getequippercentrefinery(.@part) < 100) {        mes "[blacksmith Mighty Hammer]";        mes "It looks like this item will likely fail to be refined.";        mes "Well, even if it fails, it only decreases by 1 refine level.";        mes "Would you like to continue refining?";        next;        if(select("Yes:No") == 2) {            mes "[blacksmith Mighty Hammer]";            mes "Only those who overcome fear of failure will obtain a masterpiece.";            close;        }    }    if (countitem(.@material) == 0 || Zeny < .@price) {        mes "[blacksmith Mighty Hammer]";        mes "Didn't you just say you had everything ready?";        close;    }    delitem .@material,1;    set Zeny, Zeny-.@price;    mes "[blacksmith Mighty Hammer]";    mes "Tac! Tac! Tac!";    if (getequippercentrefinery(.@part) > rand(100) || getequippercentrefinery(.@part) > rand(100)) {        successrefitem .@part;        next;        emotion e_no1;        mes "[blacksmith Mighty Hammer]";        mes "The sound refreshes my mind everytime I hear it.";        mes "Here, have it. Refine succeeded flawlessly!";        close;    }    downrefitem .@part;    next;    emotion e_omg;    mes "[blacksmith Mighty Hammer]";    mes "Oops!!";    next;    mes "[blacksmith Mighty Hammer]";    mes "I am sure a person like you would never blame me for a decrease in refine level by 1. Hmm.";    close;    N_odowngrade:next;        delitem getarg(1),1;        set Zeny, Zeny - getarg(2);        mes "[blacksmith Mighty Hammer]";        mes "Tac! Tac! Tac!";        successrefitem getarg(0);        next;        emotion e_no1;        mes "[blacksmith Mighty Hammer]";        mes "The sound refreshes my mind everytime I hear it.";        mes "Here, have it. Refine succeeded flawlessly!";        close;    }prt_in,59,54,3    duplicate(MightyHammer)    Mighty Hammer#prt    826morocc_in,65,30,3    duplicate(MightyHammer)    Mighty Hammer#morocc    826payon,148,176,3    duplicate(MightyHammer)    Mighty Hammer#pay    826alberta_in,16,56,3    duplicate(MightyHammer)    Mighty Hammer#alb    826yuno_in01,171,18,3    duplicate(MightyHammer)    Mighty Hammer#yuno    826ein_in01,22,82,3    duplicate(MightyHammer)    Mighty Hammer#ein    826lhz_in02,280,19,3    duplicate(MightyHammer)    Mighty Hammer#lhz    826// iRO NPC locations:// moc_para01,38,185,4    duplicate(MightyHammer)    Mighty Hammer#ed    826// payon,174,133,4    duplicate(MightyHammer)    Mighty Hammer#im    826
 
I can find the script isn't well tabbed, or I think there's a syntax problem It gives me lot of errors..
default_smile.png


Edit: I did change the tabs and get working on from upto +7
default_smile.png


but how do you check the refine success chance anyway?..

 
Last edited by a moderator:
if (getequippercentrefinery(.@part) < 100)

?

 
Zalbahis said:
I can find the script isn't well tabbed, or I think there's a syntax problem It gives me lot of errors..
default_smile.png


Edit: I did change the tabs and get working on from upto +7
default_smile.png


but how do you check the refine success chance anyway?..
Click to expand...
../db/pre-re/refine_db.txt

or

../db/re/refine_db.txt

pre-re is +1 to +10

and

re is +1 to +20

 
Last edited by a moderator:
You must log in or register to reply here.
Back
Top