ENTREGUE [MACRO] 4 em 1 - 2.0! + Novo Plugin de versão!

jimmyfilips · Jan 19, 2016

tutty1234 disse:
Vai ajudar muito !
Vou te mandar uma MP com algumas novidades no mod para 1.5.2

Ok, combinado! Vlw!

Theking2010 disse:
é macro de escavação do mrblues ele upa de boa mas quando chega a 290 de EXP de escavação do nada ele para e aparece a mensagem vermelha no chat, eu já reinstalei 2 vezes a mesma coisa, e instalei o onchat do macro de escavação e ainda com o mesmo problemas obs: eu só uso macro customizado por ex: vc pode escolher o item

Entendi, faz o seguinte, posta o print pra mim ver a mensagem pra entender melhor e tentar ajudar!

Theking2010 · Jan 19, 2016

jimmyfilips disse:
Ok, combinado! Vlw!

Entendi, faz o seguinte, posta o print pra mim ver a mensagem pra entender melhor e tentar ajudar!

olha nesse topico que a print está lá http://forum.craftlandia.com.br/ipb/index.php?/topic/627882-erro-de-macro/#entry5549163

jimmyfilips · Jan 19, 2016

Theking2010 disse:
olha nesse topico que a print está lá http://forum.craftlandia.com.br/ipb/index.php?/topic/627882-erro-de-macro/#entry5549163

Se nao for pedir muito, passa o codigo do macro pra mim pq tem algum if aberto pelo jeito

Theking2010 · Jan 19, 2016

ok aqui

$${

if(cav);
unset(cav);
log( );
log("&d&l[MACRO] Cava-Cava &4(OFF) &f- &aAproximadamente &a%#exp% de EXP.");
log( );

unset(@cav);
stop();

else;
set(cav);
log( );
log("&d&l[MACRO] Cava-Cava &2(ON)");
log( );

set(@cav);

IFMATCHES(%DIRECTION%,N);
&near = NORTH;
ENDIF;
IFMATCHES(%DIRECTION%,S);
&near = SOUTH;
ENDIF;
IFMATCHES(%DIRECTION%,W);
&near = WEST;
ENDIF;
IFMATCHES(%DIRECTION%,E);
&near = EAST;
ENDIF;

#exp = 0;
#bau = 1;

PROMPT(&bloco,$$i, Que bloco usará para cavar?);
PROMPT(&pa,$$i, Que tipo de pá irá ser usada?);
PROMPT(#rep,$$i, Qual o material usado na reparação da sua pá?);
PROMPT(#dur,$$?, Em qual durabilidade você quer reparar sua pá?);
PROMPT(&del,$$?, Qual delay para verificar o Inventário? Recomendado: 140 - 250);
PROMPT(&quebrar,$$?, Qual delay para quebrar os blocos? Recomendado: 1 para pá eff4 - aumente o valor se o bloco nâo quebrar!);

#dur=%#dur%;
#repq=0;

look(%&near%);
look(,55);

set(cav2);

do;
do(%&del%);
pick(%&bloco%);
key(use);
wait(2ms);
pick(%&pa%);

if(%DURABILITY%<%#dur%);
gui(inventory);
for(#i,9,45);
getslotitem(%#i%,#id,#stack1);
if(%#id%=%#rep%);
#repq=%#repq%+%#stack1%;
endif;
next;
wait(1);
gui();

if(%#repq%=0);

log( );
log("&d&l[MACRO] Cava-Cava &4(OFF) &dNão pôde reparar &f- &aAproximadamente &a%#exp% de EXP.");
log( );

unset(cav);
unset(cav2);
stop();

else(%#repq%>0%);
look(%&near%);
look(,90);
wait(500ms);
key(use);
wait(500ms);
#repq=0;
endif;endif;

endif;

look(%&near%);
look(,55);
do(%&quebrar%);
key(attack);
loop;
inc(#exp, 2);
loop;

if(cav2);
gui(inventory);
wait(1);
getslotitem(35,#id,#stack);
if(%#stack%=0);
gui();
else;
do;
wait(1);

}$$

$${if(%#bau%=1);}$$
/home esc1
$${endif;}$$
$${if(%#bau%=2);}$$
/home esc2
$${endif;}$$
$${if(%#bau%=3);}$$
/home esc3
$${endif;}$$
$${if(%#bau%=4);}$$
/home esc4
$${endif;}$$
$${if(%#bau%=5);}$$
/home esc5
$${endif;}$$
$${if(%#bau%=6);}$$
/home esc6
$${endif;}$$
$${if(%#bau%=7);}$$
/home esc7
$${endif;}$$
$${if(%#bau%=8);}$$
/home esc8
$${endif;}$$
$${if(%#bau%=9);}$$
/home esc9
$${endif;}$$
$${if(%#bau%=10);}$$
/home esc10
$${endif;}$$

$${

wait(5);
key(use);
wait(1);
for(#i,54,80);
slotclick(%#i%,l,true);
wait(15ms);
next;
wait(500ms);
getslotitem(53,#id,#stack);
wait(500ms);
if(%#stack%!=0);inc(#bau);

endif;
if(%#bau%=11);
unset(cav2);
log(&d&l[MACRO] Cava-Cava &b"Baús cheios! Voltando a escavar.");
gui();
else;
gui();
endif;
until(%#stack%=0);

}$$

/home macroesc

$${
wait(2);
endif;
endif;
loop;
endif;
}$$

FantasyGS · Jan 19, 2016

tava sumido hein jimmy
agora sim

like

_NinjaR · Jan 19, 2016

Boa jimmy

Enviado de meu ASUS_Z00YD usando Tapatalk

jimmyfilips · Jan 20, 2016

Adriele Cunha disse:
:kiss:

♥

tutty1234 · Jan 20, 2016

jimmyfilips disse:
Ok, combinado! Vlw!

Entendi, faz o seguinte, posta o print pra mim ver a mensagem pra entender melhor e tentar ajudar!

Viu a MP ?

jimmyfilips · Jan 20, 2016

Quote:

Theking2010 disse:
ok aqui

$${

if(cav);
unset(cav);
log( );
log("&d&l[MACRO] Cava-Cava &4(OFF) &f- &aAproximadamente &a%#exp% de EXP.");
log( );

unset(@cav);
stop();

else;
set(cav);
log( );
log("&d&l[MACRO] Cava-Cava &2(ON)");
log( );

set(@cav);

IFMATCHES(%DIRECTION%,N);
&near = NORTH;
ENDIF;
IFMATCHES(%DIRECTION%,S);
&near = SOUTH;
ENDIF;
IFMATCHES(%DIRECTION%,W);
&near = WEST;
ENDIF;
IFMATCHES(%DIRECTION%,E);
&near = EAST;
ENDIF;

#exp = 0;
#bau = 1;

PROMPT(&bloco,$$i, Que bloco usará para cavar?);
PROMPT(&pa,$$i, Que tipo de pá irá ser usada?);
PROMPT(#rep,$$i, Qual o material usado na reparação da sua pá?);
PROMPT(#dur,$$?, Em qual durabilidade você quer reparar sua pá?);
PROMPT(&del,$$?, Qual delay para verificar o Inventário? Recomendado: 140 - 250);
PROMPT(&quebrar,$$?, Qual delay para quebrar os blocos? Recomendado: 1 para pá eff4 - aumente o valor se o bloco nâo quebrar!);

#dur=%#dur%;
#repq=0;

look(%&near%);
look(,55);

set(cav2);

do;
do(%&del%);
pick(%&bloco%);
key(use);
wait(2ms);
pick(%&pa%);

if(%DURABILITY%<%#dur%);
gui(inventory);
for(#i,9,45);
getslotitem(%#i%,#id,#stack1);
if(%#id%=%#rep%);
#repq=%#repq%+%#stack1%;
endif;
next;
wait(1);
gui();

if(%#repq%=0);

log( );
log("&d&l[MACRO] Cava-Cava &4(OFF) &dNão pôde reparar &f- &aAproximadamente &a%#exp% de EXP.");
log( );

unset(cav);
unset(cav2);
stop();

else(%#repq%>0%);
look(%&near%);
look(,90);
wait(500ms);
key(use);
wait(500ms);
#repq=0;
endif;endif;

endif;

look(%&near%);
look(,55);
do(%&quebrar%);
key(attack);
loop;
inc(#exp, 2);
loop;

if(cav2);
gui(inventory);
wait(1);
getslotitem(35,#id,#stack);
if(%#stack%=0);
gui();
else;
do;
wait(1);

}$$

$${if(%#bau%=1);}$$
/home esc1
$${endif;}$$
$${if(%#bau%=2);}$$
/home esc2
$${endif;}$$
$${if(%#bau%=3);}$$
/home esc3
$${endif;}$$
$${if(%#bau%=4);}$$
/home esc4
$${endif;}$$
$${if(%#bau%=5);}$$
/home esc5
$${endif;}$$
$${if(%#bau%=6);}$$
/home esc6
$${endif;}$$
$${if(%#bau%=7);}$$
/home esc7
$${endif;}$$
$${if(%#bau%=8);}$$
/home esc8
$${endif;}$$
$${if(%#bau%=9);}$$
/home esc9
$${endif;}$$
$${if(%#bau%=10);}$$
/home esc10
$${endif;}$$

$${

wait(5);
key(use);
wait(1);
for(#i,54,80);
slotclick(%#i%,l,true);
wait(15ms);
next;
wait(500ms);
getslotitem(53,#id,#stack);
wait(500ms);
if(%#stack%!=0);inc(#bau);

endif;
if(%#bau%=11);
unset(cav2);
log(&d&l[MACRO] Cava-Cava &b"Baús cheios! Voltando a escavar.");
gui();
else;
gui();
endif;
until(%#stack%=0);

}$$

/home macroesc

$${
wait(2);
endif;
endif;
loop;
endif;
}$$

Tenta esse aqui, corrigi um pequeno detalhe

Código:

$${
 
if(cav);unset(cav); 
	log( );log("&d&l[MACRO] Cava-Cava &4(OFF) &f- &aAproximadamente &a%#exp% de EXP.");log( );unset(@cav);stop();
else;
	set(cav);log( );log("&d&l[MACRO] Cava-Cava &2(ON)");log( );set(@cav);
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;
  
#exp = 0;#bau = 1;
 
PROMPT(&bloco,$$i, Que bloco usará para cavar?);
PROMPT(&pa,$$i, Que tipo de pá irá ser usada?);
PROMPT(#rep,$$i, Qual o material usado na reparação da sua pá?);
PROMPT(#dur,$$?, Em qual durabilidade você quer reparar sua pá?);
PROMPT(&del,$$?, Qual delay para verificar o Inventário? Recomendado: 140 - 250);
PROMPT(&quebrar,$$?, Qual delay para quebrar os blocos? Recomendado: 1 para pá eff4 - aumente o valor se o bloco nâo quebrar!);
 
#dur=%#dur%;#repq=0;look(%&near%);look(,55);
set(cav2);
 
do;
	do(%&del%);
		pick(%&bloco%);
		key(use);
		wait(2ms);
		pick(%&pa%);
 
		if(%DURABILITY%<%#dur%);
			gui(inventory);
			for(#i,9,45);
				getslotitem(%#i%,#id,#stack1);
				if(%#id%=%#rep%);
					#repq=%#repq%+%#stack1%;
				endif;
			next;
			wait(1);
			gui();
 
			if(%#repq%=0);
				log( );
				log("&d&l[MACRO] Cava-Cava &4(OFF) &dNão pôde reparar &f- &aAproximadamente &a%#exp% de EXP.");
				log( );
				unset(cav);
				unset(cav2);
				stop();
			else(%#repq%>0%);
				look(%&near%);look(,90);
				wait(500ms);key(use);wait(500ms);
				#repq=0;
			endif;
		endif;

		look(%&near%);look(,55);
		do(%&quebrar%);key(attack);loop;
			inc(#exp, 2);
		loop;

		if(cav2);
			gui(inventory);
			wait(1);
			getslotitem(35,#id,#stack);          
			if(%#stack%=0);
				gui();
			else;
				do;
					wait(1);
 
					}$$
					$${if(%#bau%=1);}$$
						/home esc1
					$${endif;}$$
					$${if(%#bau%=2);}$$
						/home esc2
					$${endif;}$$
					$${if(%#bau%=3);}$$
						/home esc3
					$${endif;}$$
					$${if(%#bau%=4);}$$
						/home esc4
					$${endif;}$$
					$${if(%#bau%=5);}$$
						/home esc5
					$${endif;}$$
					$${if(%#bau%=6);}$$
						/home esc6
					$${endif;}$$
					$${if(%#bau%=7);}$$
						/home esc7
					$${endif;}$$
					$${if(%#bau%=8);}$$
						/home esc8
					$${endif;}$$
					$${if(%#bau%=9);}$$
						/home esc9
					$${endif;}$$
					$${if(%#bau%=10);}$$
						/home esc10
					$${endif;}$$ 
					$${
 
					wait(5);
					key(use);
					wait(1);
					for(#i,54,80);
						slotclick(%#i%,l,true);
						wait(15ms);
					next;
					wait(500ms);
					getslotitem(53,#id,#stack);
					wait(500ms);
					if(%#stack%!=0);
						inc(#bau);
					endif;
					if(%#bau%=11);
						unset(cav2);
						log(&d&l[MACRO] Cava-Cava &b"Baús cheios! Voltando a escavar.");
						gui();
					else;
						gui();
					endif;
				until(%#stack%=0);
 
				}$$
				/home macroesc
				$${
				wait(2);
			endif;
		endif;
	loop;
// ISSO AQUI DEVERIA SER UM "LOOP", NÃO UM "ENDIF"
// endif;
loop;
}$$

jimmyfilips · Jan 20, 2016

tutty1234 disse:
Viu a MP ?

Vi e respondi, MUITO obrigado pela dica!! ^^

ShakeNervoso · Jan 20, 2016

Ótimo macro,gostei.

Fubbys · Jan 20, 2016

Boa [member='jimmyfilips'], voltou?

GR6Fluxos · Jan 20, 2016

Boa.Mais uma do 2°TOP programador de macros

DanielVolt123 · Jan 20, 2016

Ótimo macro! Com certeza é muito prático!

jimmyfilips · Jan 20, 2016

Fubbys disse:
Boa [member=jimmyfilips], voltou?

Com certeza!

joaoklg · Jan 20, 2016

jimmyfilips disse:
Com certeza!

que sds de vc <3

jimmy faz esse macro? :v hauahauhauahuah

Extr33m · Jan 20, 2016

Muito obrigado jimmy! como sempre, ótima macro ! Se voltar mesmo a fazê-las tenho certeza que terá o apoio de todos os players !

BAZOOKA · Jan 20, 2016

jimmyfilips disse:
FUNCIONA NA VERSÃO: 1.5.2 - 1.7.2 - 1.8 (inclui o region 2.0 e propano)

EEEAI GALERINHAAA!! [member=jimmyfilips] falando aqui mais uma vez!!

Dessa vez eu vim trazer um "REMAKE" de uma macro muito famosa minha!! Esta:
http://forum.craftlandia.com.br/ipb/index.php?/topic/195649-macro-4-em-1-escavminerherblenh-rep/

Quem me conhece sabe que gosto de ser prático e simples, e os macros que tinham disponíveis para escavação sempre precisavam alterar os códigos e tudo mais, complicando um pouquinho o uso.

Então resolvi facilitar ao máximo, tentando criar um modo que quem usasse a macro tivesse menos trabalho quanto possível, e o resultado foi esse:

Passo 1
segure o item (pá, picareta, machado ou SEM ITEM no caso do herbalismo)

Obs: funciona com QUALQUER material, pedra, madeira, ferro, diamante ou ouro
Obs 2: Com ou sem encantamento, o macro é o mesmo!

Após isso ative a macro!

Passo 2
Segure o bloco que você irá quebrar/colocar
Após isso ative a macro novamente!

E PRONTO!!

Simples, não?!

Obs 3: ESSA MACRO TAMBÉM REPARA A FERRAMENTA!!
* Dica: itens de pedra são reparados mesmo sem skill de reparação

Assista ao vídeo para obter mais detalhes sobre como ela funciona

AVISO IMPORTANTE
O macro é o mesmo para todas as versões, para saber como selecionar a correta, assista o vídeo, lá eu deixo todos os detalhes.

https://www.youtube.com/watch?v=1NzLZZ2-bwE

MACRO:

$${
if(%@#versaojm%=0);

log(ver: %@#versaojm%);
if(versao4em1);unset(versao4em1);log(&l,Macro cancelado.);stop;
else;set(versao4em1);log(Versão não sinalizada);endif;

log( );log( );log(&l,&l,Qual a versão do seu Minecraft?);log( );
log(&l,&l,&a1 - &b1.5);log(&l,&l,&a2 - &b1.7 ou 1.8);log(&l,&l,&a3 - &bCancelar);log( );log( );

#etapa1=0;do;if(KEY_1); #etapa1=1;elseif(KEY_2); #etapa1=2;elseif(KEY_3); #etapa1=3;endif;until(%#etapa1%>0);

if(%#etapa1%=1);@#versaojm=1;log( );log(&l,Versão 1.5 Selecionada);log(&l,execute o macro mais uma vez para usá-lo);log( );endif;
if(%#etapa1%=2);@#versaojm=2;log( );log(&l,Versão 1.7 / 1.8 Selecionada);log(&l,execute o macro mais uma vez para usá-lo);log( );endif;
if(%#etapa1%=3);log( );log(&l,Macro cancelado.);log( );endif;

unset(versao4em1);STOP;
endif;

if(%@#primeiravez4em1%=0);set(pass1);@#primeiravez4em1=1;endif;

if(%@#versaojm%=1);

// // // 1.5 // // //
if(pass1);log(&3Multi-Macro&6 Passo 1! &4- &2ver: 1.5);#idit=%ITEM%;log(&3ID do &6ITEM &3salvo com sucesso! - %#idit%);wait(200ms);unset(pass1);set(pass2);stop();endif;

if(pass2);
&ff = %DIRECTION%;ifmatches(%&ff%,N);&ff=NORTH;endif;ifmatches(%&ff%,S);&ff=SOUTH;endif;ifmatches(%&ff%,E);&ff=EAST;endif;ifmatches(%&ff%,W);&ff=WEST;endif;
log(&3Multi-Macro&6 Passo 2! &4- &2ver: 1.5);#idbl=%ITEM%;log(&3ID do &6BLOCO &3salvo com sucesso! - %#idbl%);wait(200ms);unset(pass2);set(pass3);
log(&3Macro por: &2JimmyFilips);log( );log(&l,visite: http://jimmyfilips.blogspot.com.br/);log( );

do;
PICK(%#idbl%);wait(50ms);LOOK(%&ff%);LOOK(,50);key(USE);wait(50ms);
PICK(%#idit%);
if(%#idit% != 0);if(%DURABILITY% < 10);LOOK(%&ff%);LOOK(,90);wait(50ms);do(5);KEY(USE);loop;wait(50ms);endif;endif;wait(50ms);
LOOK(%&ff%);LOOK(,50);do;KEY(attack);while(%HITID%=%#idbl%);wait(200ms);
loop;
endif;

if(pass3);log(&3Multi-Macro &4[OFF] &4- &2ver: 1.5);wait(200ms);unset(pass3);set(pass1);stop();endif;

endif;

if(%@#versaojm%=2);

// // // 1.7 & 1.8 // // //
if(pass1);log(&3Multi-Macro&6 Passo 1! &4- &2ver: 1.7 & 1.8);&idit=%ITEM%;log(&3ID do &6ITEM &3salvo com sucesso! - %&idit%);wait(200ms);unset(pass1);set(pass2);stop();endif;

if(pass2);
&ff = %DIRECTION%;ifmatches(%&ff%,N);&ff=NORTH;endif;ifmatches(%&ff%,S);&ff=SOUTH;endif;ifmatches(%&ff%,E);&ff=EAST;endif;ifmatches(%&ff%,W);&ff=WEST;endif;
log(&3Multi-Macro&6 Passo 2! &4- &2ver: 1.7 & 1.8);&idbl=%ITEM%;log(&3ID do &6BLOCO &3salvo com sucesso! - %&idbl%);log(Iniciando processo);wait(200ms);unset(pass2);set(pass3);
log(&3Macro por: &2JimmyFilips);log( );log(&l,visite: http://jimmyfilips.blogspot.com.br/);log( );

do;
PICK(%&idbl%);wait(50ms);LOOK(%&ff%);LOOK(,50);key(USE);wait(50ms);
PICK(%&idit%);
if(%&idit% == "air");else;if(%DURABILITY% < 10);LOOK(%&ff%);LOOK(,90);wait(50ms);do(5);KEY(USE);loop;wait(50ms);endif;endif;wait(50ms);
#parar=0;LOOK(%&ff%);LOOK(,50);
do;KEY(attack);ifmatches(%HITID%,%&idbl%);else;#parar=1;endif;until(%#parar%=1);
wait(200ms);

loop;
endif;

if(pass3);log(&3Multi-Macro &4[OFF] &4- &2ver: 1.7 & 1.8);wait(200ms);unset(pass3);set(pass1);stop();endif;

endif;
}$$

CORREÇÃO DE VERSÃO (Mais detalhes no vídeo):

Código:

$${@#versaojm=0;log( );log(&l,&l,Configuração de versão resetada.);log( );}$$

CASO NÃO SAIBA INSTALAR A MACRO, ASSISTA ESTE VÍDEO:

https://www.youtube.com/watch?v=etKqnCaNWNg

Em breve testarei xD !!

zVinilRevolts · Jan 20, 2016

ae boa macro volto ? tava cm sdds

MYcraft · Jan 20, 2016

Valeu Jimmy, eu tava procurando um macro de escavação pra 1.8 tinha quase uma semana.
Valeu o/

ENTREGUE [MACRO] 4 em 1 - 2.0! + Novo Plugin de versão!

Bem-vindo!

Hardcore

Razoavel

Hardcore

Razoavel

Craftlandiano

Excelente

Hardcore

Excelente

Hardcore

Hardcore

Craftlandiano

Craftlandiano

Craftlandiano

Excelente

Hardcore

Excelente

Razoavel

Hardcore

Bom

Bom

Users who are viewing this thread

Estatísticas online

Em alta

Novos membros

Stay Connected