Hi!, I just need a lil tweak

[Zalbahis 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..

Edited June 28, 2013 by Zalbahis

[quesoph 105]

try..

//===== 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

[Zalbahis 0]

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

 

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

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

Edited June 28, 2013 by Zalbahis

[evilpuncker 503]

if (getequippercentrefinery(.@part) < 100)

 

?

[quesoph 105]

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

 

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

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

../db/pre-re/refine_db.txt

 

or

 

../db/re/refine_db.txt

 

 

pre-re is +1 to +10

and

re is +1 to +20

Edited June 29, 2013 by quesoph

[Zalbahis 0]

Thank you for the reply bro, it help me a lot !