OMEGA TONY
Neutro
Macro de Escavação para Minecraft 1.5.2 Craftlandia
----------------------------------------------------------------------------------------------------------
Esta Macro foi testada na versão 1.5.2 (12/2017)
Você poderá utilizar esta macro em servidores da Craftlandia, que permitirem o uso do mesmo.
Se quiser. Edite esta macro e coloque comentários no código sobre as modificações feitas.
E compartilhe no fórum da Craftlandia para ajudar os players.
- Imagens para compreensão.
A Macro, (copiar tudo do inicio "$${" até o fim "}$$").
$${
################################################################
##### MACRO PARA UPAR ESCAVAÇAO v0.0.1 #####
##### DESENVOLVIDA POR PLAYERS DA CRAFTLANDIA (-COD ABERTO)#####
##### COMPARTILHE ESTA MACRO. PARA AJUDAR OS PLAYERS #####
################################################################
///// - A MACRO FOI FEITA COM O FOCO DE APENAS UPAR.
///// SE O INVETARIO OU MENU FOR ABERTO ELA NAO IRA FECHAR.
///// PRESSIONE AS TECLAS JUNTAS DO ATALHO F3+P PARA DESATIVER pauseOnLostFocus
///// DEPOIS DE DESATIVADO UTILIZE O ATALHO ALT+TAB OU PRESSIONE A TECLA SUPER-
///// PARA MINIMIZAR O JOGO E DEIXAR EM SEGUNDO PLANO.
///// PORFAVOR, CASO EDITE ESTA MACRO, MUDE A VERSAO ATUAL (v0.0.1)
///// E ADICIONE/EDITE UM COMENTARIO AQUI NESTE CODIGO SOBRE MUDANÇAS FEITAS NO MESMO.
IF(cave);
LOG("&eMACRO DE ESCAVAÇAO 0.0.1... &8[&cOFF&8]");
UNSET(cave);
STOP();
ELSE;
SET(cave);
LOG("&eMACRO DE ESCAVAÇAO 0.0.1... &8[&2ONN&8]");
ENDIF;
IFMATCHES(%DIRECTION%,N);
&near = NORTH;
ENDIF;
IFMATCHES(%DIRECTION%,S);
&near = SOUTH;
ENDIF;
IFMATCHES(%DIRECTION%,W);
&near = WEST;
ENDIF;
IFMATCHES(%DIRECTION%,E);
&near = EAST;
ENDIF;
#a=1;
#item=;
DO();
LOOK(%&near%);
LOOK(,55);
SLOT(9);
KEY(use);
/////para alterar a velocidade/ms que ira colocar o bloco edite WAIT(NUMEROms);
WAIT(50ms);
SLOT(%#a%);
IF(DURABILITY < 30);
LOG("A pá está quase quebrando!, Desligando a MACRO");
UNSET(cave);
STOP();
ENDIF;
IF(DURABILITY < 35);
INC(#a,1);
IF(%#a% = 9);
LOG("&c TODAS &eas pás foram usadas");
LOG("&c Desligando&e, Coloque pás novas ou repare");
LOG("&eMACRO DE ESCAVAÇAO 0.0.1... &8[&cOFF&8]");
UNSET(cave);
STOP();
ENDIF;
ENDIF;
DO;
KEY(attack);
WHILE(%HITID% = %#item%);
LOOP;
LOOP;
}$$
################################################################
##### MACRO PARA UPAR ESCAVAÇAO v0.0.1 #####
##### DESENVOLVIDA POR PLAYERS DA CRAFTLANDIA (-COD ABERTO)#####
##### COMPARTILHE ESTA MACRO. PARA AJUDAR OS PLAYERS #####
################################################################
///// - A MACRO FOI FEITA COM O FOCO DE APENAS UPAR.
///// SE O INVETARIO OU MENU FOR ABERTO ELA NAO IRA FECHAR.
///// PRESSIONE AS TECLAS JUNTAS DO ATALHO F3+P PARA DESATIVER pauseOnLostFocus
///// DEPOIS DE DESATIVADO UTILIZE O ATALHO ALT+TAB OU PRESSIONE A TECLA SUPER-
///// PARA MINIMIZAR O JOGO E DEIXAR EM SEGUNDO PLANO.
///// PORFAVOR, CASO EDITE ESTA MACRO, MUDE A VERSAO ATUAL (v0.0.1)
///// E ADICIONE/EDITE UM COMENTARIO AQUI NESTE CODIGO SOBRE MUDANÇAS FEITAS NO MESMO.
IF(cave);
LOG("&eMACRO DE ESCAVAÇAO 0.0.1... &8[&cOFF&8]");
UNSET(cave);
STOP();
ELSE;
SET(cave);
LOG("&eMACRO DE ESCAVAÇAO 0.0.1... &8[&2ONN&8]");
ENDIF;
IFMATCHES(%DIRECTION%,N);
&near = NORTH;
ENDIF;
IFMATCHES(%DIRECTION%,S);
&near = SOUTH;
ENDIF;
IFMATCHES(%DIRECTION%,W);
&near = WEST;
ENDIF;
IFMATCHES(%DIRECTION%,E);
&near = EAST;
ENDIF;
#a=1;
#item=;
DO();
LOOK(%&near%);
LOOK(,55);
SLOT(9);
KEY(use);
/////para alterar a velocidade/ms que ira colocar o bloco edite WAIT(NUMEROms);
WAIT(50ms);
SLOT(%#a%);
IF(DURABILITY < 30);
LOG("A pá está quase quebrando!, Desligando a MACRO");
UNSET(cave);
STOP();
ENDIF;
IF(DURABILITY < 35);
INC(#a,1);
IF(%#a% = 9);
LOG("&c TODAS &eas pás foram usadas");
LOG("&c Desligando&e, Coloque pás novas ou repare");
LOG("&eMACRO DE ESCAVAÇAO 0.0.1... &8[&cOFF&8]");
UNSET(cave);
STOP();
ENDIF;
ENDIF;
DO;
KEY(attack);
WHILE(%HITID% = %#item%);
LOOP;
LOOP;
}$$
Espero que gostem e Feliz Natal !!! :banana-noel-2:
