Leaderboard

@Miles wahahaha, I thought since I came back, nobody would want to talk about payment openly according to script request rules, user are not allow to offer paid service if the topic starter did not say anything about offering payment have to discuss in PMs prontera,156,179,5 script Armor Echant 100,{ mes "[^0000FFArmor Enchant^000000]"; mes "Do you want to Enchant your ^0000FFArmor^000000?"; next; if ( select ( "Yes", "No" ) == 2 ) close; mes "[^0000FFArmor Enchant^000000]"; if ( !getequipisequiped( EQI_ARMOR ) ) { mes "You dont have any ^0000FFArmor^000000 that is being equipped."; close; } .@id = getequipid( EQI_ARMOR ); .@ref = getequiprefinerycnt( EQI_ARMOR ); .@card1 = getequipcardid( EQI_ARMOR, 0 ); .@card2 = getequipcardid( EQI_ARMOR, 1 ); .@card3 = getequipcardid( EQI_ARMOR, 2 ); .@card4 = getequipcardid( EQI_ARMOR, 3 ); if ( .@card1 == 255 || .@card1 == 254 ) { mes "I can't enchant a signed equipment."; close; } if ( .@card4 ) { mes "Sorry, this ^0000FFArmor^000000 has already been enchanted."; close; } mes "Select the type of stone that you'll use"; next; .@type = select( "Strength", "Inteligence", "Dexterity", "Agility", "Vitality", "Luck" ) -1; .@num = select( "1:2:3:4:5:6:7:8:9:10" ) -1; .@stone = 4700 + .@type *10 + .@num; mes "[^0000FFArmor Enchant^000000]"; mes "Are you sure you want to enchant your "+ getitemname(.@id) +" with "+ getitemname(.@stone); mes "The chance of success is "+ .rate[.@num] +"%"; next; if ( select( "Yes", "No" ) == 2 ) close; mes "[^0000FFArmor Enchant^000000]"; if ( countitem( .@stone ) < 3 ) { mes "Sorry, you need 3 "+ getitemname( .@stone ) +" to enchant this armor."; close; } delitem .@stone, 3; if ( rand(100) >= .rate[.@num] ) { mes "Sorry, the enchantment failed"; close; } delitem2 .@id, 1,1, .@ref, 0, .@card1, .@card2, .@card3, .@card4; getitem2 .@id, 1,1, .@red, 0, .@card1, .@card2, .@card3, .@stone; equip .@id; mes "Armor Enchancement successful !"; close; OnInit: setarray .rate, 100, 80, 70, 60, 50, 35, 25, 15, 10, 8; end; } its a rather simple script