Jump to content

Question

Posted
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;
}

how can change the zeny to Items?

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.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...