prontera,164,164,4	script	Encantador	916,{
mes "Qual item deseja encantar?";
next;
mes "Antes de qualquer coisa, certifique-se que não haja cartas, pois, serão perdidas.";
next;
setarray .EquipID[0],18611;
for( set .@i,0; .@i < getarraysize( .EquipID ); set .@i,.@i + 1 ){
set .@EquipMenu$,.@EquipMenu$ + getitemname( .EquipID[.@i] )+( !getitemslots(.EquipID[.@i])?"":"["+getitemslots(.EquipID[.@i])+"]" )+":";
}
set .@Equip,select( .@EquipMenu$ ) - 1;
if( !countitem( .EquipID[.@Equip] ) ){
mes "Você não possui esse equipamento.";
close;
}
mes "Equipamento : ^FF0000"+getitemname( .EquipID[.@Equip] )+"^000000";
switch( select( "Força:Inteligência:Dextreza:Agilidade:Vitalidade:Sorte" )){
Case 1: setarray .RuneID[0],4704; break;
Case 2: setarray .RuneID[0],4714; break;
Case 3: setarray .RuneID[0],4724; break;
Case 4: setarray .RuneID[0],4734; break;
Case 6: setarray .RuneID[0],4754; break;
Case 5: setarray .RuneID[0],4744; break;
}
for( set .@i,0; .@i < getarraysize( .RuneID ); set .@i,.@i + 1 ){
set .@RuneMenu$,.@RuneMenu$ + getitemname( .RuneID[.@i] )+":";
}
set .@Rune,select( .@RuneMenu$ ) - 1;
mes "Encantamento : ^FF0000"+getitemname( .RuneID[.@Rune] )+"^000000";
next;
if( select("Confirmar:Cancelar") == 1 ){
delitem .EquipID[.@Equip],1;
getitem2 .EquipID[.@Equip],1,1,0,0,0,0,0,.RuneID[.@Rune];
mes "Feito.";
mes "^0000FF"+getitemname( .EquipID[.@Equip] )+"^000000";
mes "Encantado com ^FF0000"+getitemname( .RuneID[.@Rune] )+"^000000";
}
close;
}