Olá nubs 
Hoje trago uma macro que vai trocando cada parte do seu set quando ele fica no vermelho. Você pode colocar seus sets em qualquer lugar do inventário que a macro vai procurar e equipá-lo. A função é parecida com a dos Autoarmor que já existem, mas a diferença é que ela troca o set antes de quebrar!
O que a macro faz até o momento ?
Instalação
Caso encontre algum bug basta me manda uma MP aqui no fórum.
O que a macro faz até o momento ?
* Sistema liga e desliga;
* Funciona apenas com Armadura de Diamante;
* Localiza sets novos em qualquer slot;
* Caso você não tenha alguma parte com durabilidade boa no inventário a macro entende, avisa e desliga.
*Caso queira alterar a durabilidade para guardar as armaduras basta iniciar a macro apertando Control.
* Funciona apenas com Armadura de Diamante;
* Localiza sets novos em qualquer slot;
* Caso você não tenha alguma parte com durabilidade boa no inventário a macro entende, avisa e desliga.
*Caso queira alterar a durabilidade para guardar as armaduras basta iniciar a macro apertando Control.
Instalação
Primeira vez instalando macros ? Aprenda a instalar aqui
Código da macro:
Código da macro:
Código:
$${
IF(first);
ELSE
SET(#durabilidade == 50);
LOG("");
LOG("&a&oA durabilidade padrão para guardar o SET é de &450&a.");
LOG("");
LOG("&a&oCaso queira alterar a durabilidade basta iniciar a MACRO apertando &4CONTROL&a.");
LOG("");
SET(first);
ENDIF;
IF(KEY_LCONTROL);
PROMPT(#durabilidade,$$?,"Quer guardar o set com qual durabilidade?");
ifmatches("%#durabilidade%","^(\d+)$");
LOG("&0&l[&9&lMACRO&0&l] &9O SET será guardado com &4%#durabilidade%&9.");
ELSE
SET(#durabilidade,50);
LOG("&0&l[&9&lMACRO&0&l] &9Resposta &cinválida&9, durabilidade padrão setada como &450&9.");
ENDIF;
ENDIF;
IF(trocaarmadura);
LOG("&0&l[&9&lMACRO&0&l] &9Troca Armadura &4&lDESLIGADO&9.");
UNSET(trocaarmadura);
STOP;
ELSE
LOG("&0&l[&9&lMACRO&0&l] &9Troca Armadura &2&lLIGADO&9.");
SET(trocaarmadura);
ENDIF;
#cap = 363;
#pei = 528;
#cal = 495;
#bot = 429;
UNSET(#idx);
DO;
IF((%HELMID%!=0)&&(%HELMDURABILITY%<=%#durabilidade%));
SET(swaparmor);
SET(#slot,5);
SET(#part,310);
SET(verificacao);
ELSEIF((%CHESTPLATEID%!=0)&&(%CHESTPLATEDURABILITY%<=%#durabilidade%));
SET(swaparmor);
SET(verificacao);
SET(#slot,6);
SET(#part,311);
ELSEIF((%LEGGINGSID%!=0)&&(%LEGGINGSDURABILITY%<=%#durabilidade%));
SET(swaparmor);
SET(verificacao);
SET(#slot,7);
SET(#part,312);
ELSEIF((%BOOTSID%!=0)&&(%BOOTSDURABILITY%<=%#durabilidade%));
SET(swaparmor);
SET(verificacao);
SET(#slot,8);
SET(#part,313);
ENDIF;
IF(%HELMID%=0);
SET(autoarmor);
SET(verificacao);
SET(&parte,Capacete);
SET(#idx,"310");
DEC(#cap,%#durabilidade%);
SET(#durabilidadetrocar,%#cap%);
ELSEIF(%CHESTPLATEID%=0);
SET(autoarmor);
SET(verificacao);
SET(&parte,Peitoral);
SET(#idx,"311");
DEC(#pei,%#durabilidade%);
SET(#durabilidadetrocar,%#pei%);
ELSEIF(%LEGGINGSID%=0);
SET(autoarmor);
SET(verificacao);
SET(&parte,Calça);
SET(#idx,"312");
DEC(#cal,%#durabilidade%);
SET(#durabilidadetrocar,%#cal%);
ELSEIF(%BOOTSID%=0);
SET(autoarmor);
SET(verificacao);
SET(&parte,Bota);
SET(#idx,"313");
DEC(#bot,%#durabilidade%);
SET(#durabilidadetrocar,%#bot%);
ENDIF;
IF(swaparmor);
GUI(INVENTORY);
IF(KEY_W);
KEYDOWN(FORWARD);
ELSEIF(KEY_S);
KEYDOWN(BACK);
ELSEIF(KEY_A);
KEYDOWN(LEFT);
ELSEIF(KEY_D);
KEYDOWN(RIGHT);
ELSEIF(SHIFT);
KEYDOWN(SNEAK);
ELSEIF(KEY_SPACE);
KEYDOWN(JUMP);
ELSEIF(RMOUSE);
KEY(USE);
ENDIF;
SLOTCLICK(%#slot%,L,TRUE);
GUI;
UNSET(swaparmor);
ENDIF;
IF(verificacao);
unsafe(1000);
gui(inventory);
for(#for,9,44);
GETSLOTITEM(%#for%,#ifr,#stack,#data);
IF((%#ifr%=%#idx%)&&(%#data%<%#durabilidadetrocar%));
SET(#trocar,"%#for%");
SET(noarmor)
ENDIF;
next;
gui();
IF(noarmor);
UNSET(noarmor);
ELSE
LOG("&7&l>>&9Você está sem &4&l%&parte%, &9encerrando macro.");
LOG("&0&l[&9&lMACRO&0&l] &9Troca Armadura &4&lDESLIGADO&9.");
UNSET(trocaarmadura);
STOP;
ENDIF;
endunsafe;
UNSET(verificacao);
ENDIF;
IF(autoarmor);
GUI(INVENTORY);
IF(KEY_W);
KEYDOWN(FORWARD);
ELSEIF(KEY_S);
KEYDOWN(BACK);
ELSEIF(KEY_A);
KEYDOWN(LEFT);
ELSEIF(KEY_D);
KEYDOWN(RIGHT);
ELSEIF(SHIFT);
KEYDOWN(SNEAK);
ELSEIF(KEY_SPACE);
KEYDOWN(JUMP);
ELSEIF(RMOUSE);
KEY(USE);
ENDIF;
LOG("&7&l>>&9%&parte% &7substituído&9!");
SLOTCLICK(%#trocar%,L,TRUE);
GUI;
ENDIF;
#cap = 363;
#pei = 528;
#cal = 495;
#bot = 429;
UNSET(#idx);
UNSET(autoarmor);
LOOP;
}$$Caso encontre algum bug basta me manda uma MP aqui no fórum.
Última edição:
