atlantis,142,196,5 script Shiriublem 803,{
mes "[Hidden Slot Enchant]";
mes "Hello I can enchant your armor";
mes "and give them +3 to +15 depending";
mes "of your luk. However, the armor could";
mes "break, and this if you have sloted or refined";
mes "armor you will loose then so I advice you";
mes "to use a clean sloted armor.";
mes "Remember this procces will cost you 500,000z";
next;
mes "If you have same armor in the inventory";
mes "same as you have equiped, those will";
mes "loose refinement effects, cards and status too.";
mes "So, make sure you bring me one by one armors equiped.";
next;
mes "[" + strcharinfo(0) + "]";
mes "Details";
mes "+3 Change 95%";
mes "+5 Chance 70%";
mes "+7 Chance 40%";
mes "+10 Chance 30%";
mes "+15 Change 10%";
next;
mes "[" + strcharinfo(0) + "]";
mes "and";
mes "Break the Armor Chance is 30%";
next;
menu
"High Quality Armor-Add Stat Armor",Lhigh,
"Cancel",Lcon;
Lcon:
mes "[Hidden Slot Enchant]";
mes "Hey sorry not enough money.";
close;
Lhigh:
if( zeny < 500000 ) {
mes "[Hidden Slot Enchant]";
mes "Hey sorry not enough money.";
close;
}
for (set .@c, 0; .@c < getarraysize(.ids3); set .@c, .@c + 1) {
if (isequipped(.ids3[.@c]) == 1) {
mes "[Hidden Slot Enchant]";
mes "I see you have ^FF0000[" +getitemname(.ids3[.@c]) +"]^000000 equiped.";
next;
mes "[Hidden Slot Enchant]";
mes "Let's go, will go to procces..";
mes "Good luck!...";
next;
callfunc("Enchant");
close; // Close, no more loop if armor detected
} // End if
} // End loop
mes "[Hidden Slot Enchant]";
mes "You should equip your armor first.";
close;
OnInit:
waitingroom "Enchant Armor",0;
// Big part I know, but I wanted you to know wich armor is every ID, this will make your life easier when you want to post a guide how this work in your private RO
forum
setarray .ids3[0],20052, // Meteo Plate[1]
17161, // Orlean's Uniform[1]
20110, // Diabolus Robe[1]
20052, // Diabolus Armor[1]
2387, // Sprint Mail[1]
2389, // Kandra[1] || Gandora[1]
2388, // Naga Scale Armor[1]
2391, // Life Link[1]
2390, // Refined Tights[1]
2376, // Assaulter Plate[1]
2377, // Elite Engineer Armor[1]
2378, // Assassin Robe[1]
2379, // Warlock Battle Robe[1]
2380, // Robe of Order[1]
2381, // Elite Archer Suit[1]
2382; // Elite Shooter Suit[1]
end;
} // End Script
function script Enchant {
set @itemid,getequipid(EQI_ARMOR);
set zeny, zeny - 400000;
set @porcentaje, rand(0,100);
if (@porcentaje >= 0 && @porcentaje <= 15) { // 30% break
delitem @itemid, 1;
mes "[Hidden Slot Enchant]";
mes "You have loose your armor I'm sorry.";
} else if (@porcentaje >= 11 && @porcentaje <= 10) { // + 15 stat X
delitem @itemid,1;
setarray .@level[0],4750,4720,4710,4740,4730,4700;
set @enchant_id, .@level[rand(0,5)];
getitem2 @itemid, 1, 1, 0, 0, 0, 0, 0, @enchant_id;
mes "[Hidden Slot Enchant]";
mes "Hooray ~ Here you are your enchanted armor !";
}
return;
}
Question
Phantom Of Rogue-Gon
how can change the zeny to Items?
Link to comment
Share on other sites
6 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.