//============================================================
//| ___ __ |
//| /'\_/`\ /\_ \ /\ \ |
//| /\ \ __ \//\ \ __ __\ \ \/'\ ___ |
//| \ \ \__\ \ /'__`\ \ \ \ /\ \/\ \\ \ , < / __`\ |
//| \ \ \_/\ \/\ \L\.\_ \_\ \_\ \ \_\ \\ \ \\`\ /\ \L\ \ |
//| \ \_\\ \_\ \__/.\_\/\____\\ \____/ \ \_\ \_\ \____/ |
//| \/_/ \/_/\/__/\/_/\/____/ \/___/ \/_/\/_/\/___/ |
//| |
//| |C|R|O|N|U|S| |S|C|R|I|P|T|S| |
//===== Por ==================================================
//= Maluko
//===== Versão ===============================================
//= 1.0
//===== Compatível ===========================================
//= SVN Cronus 900+
//===== Descrição: ===========================================
//= Refiner Para Vips [Refina até +7 com 100% de sucesso]
//=
//===== Comentários Adicionais ===============================
//= Maluko-Scripts http://br.geocities.com/maluko_scripts
//=
//= Cronus Fórum http://www.cronus-emulator.com/forum
//============================================================
prontera.gat,161,186,4 script Refiner 86,{
show "[Refiner]";
show "Deseja refinar Alguns equips?";
next;
switch (select("Adoraria","Não estou interresado")) {
case 2:
show "[Refiner]";
show "Tudo Bem";
close;
case 1:
show "[Refiner]";
show "Selecione qual Equipamento gostaria de refinar!";
next;
C_menu:
menu getequipname(1),part,getequipname(2),part2,getequipname(3),part3,getequipname(4),part4,getequipname(5),part5,getequipname(6),part6;
part:
show "[Refiner]";
set @part,1;
if (getequipisequiped(1)) goto Check1;
show "Está querendo me enganar?!";
show "Não tem Nada equipado";
next;
goto C_Menu;
part2:
show "[Refiner]";
set @part,2;
if (getequipisequiped(2)) goto Check1;
show "Está querendo me enganar?!";
show "Não tem Nada equipado";
next;
goto C_Menu;
part3:
show "[Refiner]";
set @part,3;
if (getequipisequiped(3)) goto Check1;
show "Está querendo me enganar?!";
show "Não tem Nada equipado";
next;
goto C_Menu;
part4:
show "[Refiner]";
set @part,4;
if (getequipisequiped(4)) goto Check1;
show "Está querendo me enganar?!";
show "Não tem Nada equipado";
next;
goto C_Menu;
part5:
show "[Refiner]";
set @part,5;
if (getequipisequiped(5)) goto Check1;
show "Está querendo me enganar?!";
show "Não tem Nada equipado";
next;
goto C_Menu;
part6:
show "[Refiner]";
set @part,6;
if (getequipisequiped(6)) goto Check1;
show "Está querendo me enganar?!";
show "Não tem Nada equipado";
next;
goto C_Menu;
}
Check1:
if(getequipisenableref(@part)) goto Check2;
show "[Refiner]";
show "Eu não posso trabalhar este item...";
close;
Check2:
if(getequiprefinerycnt(@part) < 10) goto Refine;
show "[Refiner]";
show "Esta arma já está no nível máximo e não podem mais ser refinados.";
close;
Refine:
set @refineitemid, getequipid(@part);
set @refinerycnt, getequiprefinerycnt(@part);
if(getequipweaponlv(@part) > 0) goto Refine1;
set @matname$,"Elunium";
set @material,985;
set @price,2000;
set @safe,4;
goto C_refinenormal;
Refine1:
if(getequipweaponlv(@part) > 1) goto Refine2;
set @matname$,"Phracon";
set @material,1010;
set @price,50;
set @safe,7;
goto C_refinenormal;
Refine2:
if(getequipweaponlv(@part) > 2) goto Refine3;
set @matname$,"Emveretarcon";
set @material,1011;
set @price,200;
set @safe,6;
goto C_refinenormal;
Refine3:
if(getequipweaponlv(@part) > 3) goto Refine4;
set @matname$,"Oridecon";
set @material,984;
set @price,5000;
set @safe,5;
goto C_refinenormal;
Refine4:
set @matname$,"Oridecon";
set @material,984;
set @price,20000;
set @safe,4;
goto C_refinenormal;
C_refinenormal:
show "Para refinar este item, Eu preciso de ^ff99991 " + @matname$ + "^000000 e a taxa de " + @price + " Zeny.";
show "Continuar?";
next;
menu "Sim",-,"Não",Lcancel;
if (getequiprefinerycnt(@part) > 6) goto Aviso;
if ((countitem(@material) < 1) || (Zeny < @price)) goto C_cancel;
delitem @material,1;
set Zeny,Zeny-@price;
successrefitem @part;
next;
show "[Refiner]";
show "Muito bem...";
show "Volte sempre";
close;
C_cancel:
show "[Refiner]";
show "Você não tem tudo que eu preciso";
close;
Lcancel:
show "[Refiner]";
show "Muito Bem...";
show "Volte Sempre";
close;
Aviso:
show "[Refiner]";
show "Hmm... Calma ae! Esta parte do equipamento já está refinado até seu limite de segurança.";
show "Voce deve saber que se isso for refinado DENOVO, poderá ser DESTRUÍDO e não poderá ser mais USADO!!";
next;
show "[Refiner]";
show "Você ainda quer refiná-lo? Se sim não poderei garantir que sairá tudo bem...";
next;
menu "Sim",-,"Não",Lcancel;
if (getequippercentrefinery(@part) <= rand(100)) goto Lfail;
successrefitem @part;
next;
show "[Refiner]";
show "Muito Bem...";
show "Volte Sempre";
close;
Lfail:
failedrefitem @part;
next;
show "[Refiner]";
show "Aaahhh!! Ah não...!!";
next;
show "[Refiner]";
show "Eh..Ehem... Me desculpe mais o processo de refinamento ^ff0000falhou^000000.";
next;
show "[Refiner]";
show "Estou profundamente decepicionado com o que ouve... mas eu te AVISEI sobre os riscos.";
close;
}
               (
geocities.com/br)