I have this script and I want to request to edit this and make these possible changes:
( 1 ) They can choose what to put / enchant on the item, but only a maximum of +3 each stat like:
"Please choose what you want to enchant on your item?"
Str
Agi
Vit
Int
Dex
Luk
If they chose on Str they will see this:
Str + 1 <-- cost 3 tcg
Str + 2 <-- cost 5 tcg
Str + 3 <-- cost 7 tcg
If Agi
Agi + 1 <-- cost 3 tcg
Agi + 2 <-- cost 5 tcg
Agi + 3 <-- cost 7 tcg
so on until Luk.
They can only enchant their equips up to 3x only.
prontera,160,187,5 script Item Echant 100,{
mes "[^0000FFItem Enchant^000000]";
mes "I can enchant your equipment.";
next;
mes "[^0000FFItem Enchant^000000]";
mes "But you need to have 3 ^0000FFTCG^000000 to do this, do you have it?";
menu "Yes, I have it.",T_yes,"Sorry, I dont have it.",T_no;
T_yes:
mes "What would you like to Enchant?";
menu "Armor",T_armor;
close;
T_no:
mes "[^0000FFItem Enchant^000000]";
mes "Okay, Come back if you have it already.";
close;
T_armor:
if ( select ( "Yes", "No" ) == 2 ) close;
mes "[^0000FFItem 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 )
.@enchant = 0;
else if ( !.@card3 )
.@enchant = 1;
else if ( !.@card2 )
.@enchant = 2;
else {
mes "Sorry, this ^0000FFArmor^000000 has already been enchanted 3 times.";
close;
}
if ( countitem( .item_id ) < .item_req[ .@enchant ] ) {
mes "Sorry, you need "+ .item_req[ .@enchant ] +" "+ getitemname( .item_id ) +" to enchant this armor.";
close;
}
.@rand = rand(.totalchance);
while ( ( .@rand = .@rand - .rate[.@r] ) >= 0 ) .@r++;
.@o = rand(0,5); // orb of str/int/dex ...
delitem .item_id, .item_req[ .@enchant ];
delitem2 .@id, 1,1, .@ref, 0, .@card1, .@card2, .@card3, .@card4;
if ( !.@card4 )
getitem2 .@id, 1,1, .@ref, 0, .@card1, .@card2, .@card3, 4700 + .@o * 10 + .@r;
else if ( !.@card3 )
getitem2 .@id, 1,1, .@ref, 0, .@card1, .@card2, 4700 + .@o * 10 + .@r, .@card4;
else
getitem2 .@id, 1,1, .@ref, 0, .@card1, 4700 + .@o * 10 + .@r, .@card3, .@card4;
equip .@id;
mes "Armor Enchancement successful !";
announce ""+strcharinfo(0)+" enchanted his ARMOR!",0;
close;
OnInit:
waitingroom "Item Enchanter",0;
setarray .rate, 40,30,20,10; // rate of getting +1 is 50%, +2 is 33%, +3 is 17%
.item_id = 7227; // item ID requirement use to refine
setarray .item_req, 3,5,7;
while ( .@i < 3 ) {
.totalchance = .totalchance + .rate[.@i];
.@i++;
}
end;
}
I hope this is possible and if someone is willing to share their scripts like this. Thank you all for the support!