hi guys i have a problem with this script.
this script works fine unless there's an echantment orb in 2nd slot 3rd slot and 4th slot...i don't know which part but there's a part here somewhere the delitem2 function is not recognizing the save equipid.. can someone help me with this script?
while(1){
for (set .@c, 0; .@c < .@re; set .@c, .@c + 1)
deletearray getd(".@equip_inf"+.@c);
if ( getequipisequiped(.@part) == 0 ) {
equip .@refineitemid;
set .@re, 0;
while ( getequiprefinerycnt(.@part) >= .@refinecnt ) {
for (set .@c, 0; .@c < 4; set .@c, .@c + 1)
if (getequipcardid(.@part,.@c) != 0)
setd ".@equip_inf"+.@re+"[.@c]", getequipcardid(.@part,.@c);
setd ".@equip_inf"+.@re+"[4]", getequiprefinerycnt(.@part);
unequip .@part;
delitem2 .@refineitemid,1,1,getd(".@equip_inf"+.@re+"[4]"),0,getd(".@equip_inf"+.@re+"[0]"),
getd(".@equip_inf"+.@re+"[1]"),getd(".@equip_inf"+.@re+"[2]"),getd(".@equip_inf"+.@re+"[3]");
equip .@refineitemid;
set .@re, .@re + 1;
}
if (.@re) {
for (set .@c, 0; .@c < .@re; set .@c, .@c + 1) {
getitem2 .@refineitemid,1,1,getd(".@equip_inf"+.@c+"[4]"),0,getd(".@equip_inf"+.@c+"[0]"),
getd(".@equip_inf"+.@c+"[1]"),getd(".@equip_inf"+.@c+"[2]"),getd(".@equip_inf"+.@c+"[3]");
}
}
for (set .@c, 0; .@c < .@re; set .@c, .@c + 1)
deletearray getd(".@equip_inf"+.@c);
}
if (checkweight(.@refineitemid,1) == 0 ) {
next;
mes "[ Agil ]";
mes "Your character is overweight.";
close;
}
if ((getequipid(.@part) != .@refineitemid) || (.@menu2 == 1 && getequippercentrefinery(.@part) < 100)) {
next;
mes "[ Agil ]";
mes "Do not change your equipment in the middle of refining.";
next;
atcommand "@nuke "+strcharinfo(0);
end;
}
if (getequiprefinerycnt(.@part) >= 10) {
next;
mes "[ Agil ]";
mes "Do not change your equipment in the middle of refining.";
next;
atcommand "@nuke "+strcharinfo(0);
end;
}
if (!M_quickref) {
set .@rand, rand(1,4);
mes "[ Agil ]";
if (.@rand == 1)
mes "^0000ffcLanG, clang ClAng!";
else if (.@rand == 2)
mes "^cc00ccClaNg ClAng claNg!";
else if (.@rand == 3)
mes "^008800clANg Clang CLanG!";
else if (.@rand == 4)
mes "^ffac26CLang cLanG cLANg!";
}
else if (!.@breakme) {
mes "[ Agil ]";
mes "^ff0000CLang ^0000ffcLanG ^009900cLANg!!";
set .@breakme, 1;
}
set Zeny, Zeny - .@price;
delitem .@material, 1;
if(getequippercentrefinery(.@part) <= rand(100)) {
set .@breakgap, .@refinecnt - getequiprefinerycnt(.@part) ;
set .@j, .@j - .@breakgap ;
failedrefitem .@part;
if(.@j <= 0) close;
}
else {
successrefitem .@part;
set .@j, .@j - 1;
if(.@j <= 0) close;
set .@re, 0;
while ( getequiprefinerycnt(.@part) >= .@refinecnt ) {
for (set .@c, 0; .@c < 4; set .@c, .@c + 1)
if (getequipcardid(.@part,.@c) != 0)
setd ".@equip_inf"+.@re+"[.@c]", getequipcardid(.@part,.@c);
setd ".@equip_inf"+.@re+"[4]", getequiprefinerycnt(.@part);
unequip .@part;
delitem2 .@refineitemid,1,1,getd(".@equip_inf"+.@re+"[4]"),0,getd(".@equip_inf"+.@re+"[0]"),
getd(".@equip_inf"+.@re+"[1]"),getd(".@equip_inf"+.@re+"[2]"),getd(".@equip_inf"+.@re+"[3]");
equip .@refineitemid;
set .@re, .@re + 1;
}
if (.@re) {
for (set .@c, 0; .@c < .@re; set .@c, .@c + 1) {
getitem2 .@refineitemid,1,1,getd(".@equip_inf"+.@c+"[4]"),0,getd(".@equip_inf"+.@c+"[0]"),
getd(".@equip_inf"+.@c+"[1]"),getd(".@equip_inf"+.@c+"[2]"),getd(".@equip_inf"+.@c+"[3]");
}
}
}
if (!M_quickref)
close2;
else {
set .@clang, .@clang + 1;
sleep2 300;
}
}
Question
caspa
hi guys i have a problem with this script.
this script works fine unless there's an echantment orb in 2nd slot 3rd slot and 4th slot...i don't know which part but there's a part here somewhere the delitem2 function is not recognizing the save equipid.. can someone help me with this script?
Link to comment
Share on other sites
8 answers to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.