ENTREGUE [Macro]Escavação NÃO VIP 1.5.2

FelipeWillas2014 · 31 Maio 2015

qual a home pra ir pra trap de baus ? '-'

xlyz · 31 Maio 2015

Felipe Willas disse:

qual a home pra ir pra trap de baus ? '-'
Clique para expandir...

/home trapbaus '-', ta na descrição.

HawzerVLS · 31 Maio 2015

Gostei

Black EzZ · 2 Junho 2015

boom macro mas voce poderia fazer para os vip's que repare a pa e talz....

PsyCh0Social · 2 Junho 2015

Boua lesk [emoji106]

verick · 2 Junho 2015

Galera para os que nao podem salvar homes , pois ja tem o maximo de homes ou ACABOU O VIP E TALS faz assim
pega o codigo cola no bloco de notas ai aperta
CTRL+F ai digita la o nome da home que voce queira SUBSTITUIR!

xlyz · 2 Junho 2015

Black EzZ disse:

boom macro mas voce poderia fazer para os vip's que repare a pa e talz....
Clique para expandir...

Eu vou fazer isso quando tiver tempo, acho que essa quinta que é feriado.

verick disse:

Galera para os que nao podem salvar homes , pois ja tem o maximo de homes ou ACABOU O VIP E TALS faz assim
pega o codigo cola no bloco de notas ai aperta
CTRL+F ai digita la o nome da home que voce queira SUBSTITUIR!
Clique para expandir...

, isso ae

tartaminha · 2 Junho 2015

Bemm explicado, nao sou vip, curti bastante

xlyz · 2 Junho 2015

tartaminha disse:

Bemm explicado, nao sou vip, curti bastante
Clique para expandir...

Obrigado

Black EzZ · 3 Junho 2015

xlyz disse:
Escavação (Não VIP)

1.Descrição:
Editei a macro do [member=rogroote] (Macro aqui) para funcionar com Auto-reconnect, e fiz algumas melhorias no código em geral, pois continha alguns bugs. Parte dos créditos pra ele '-'
*Ela guarda itens;
*Troca a pá quando está no red;
*Quando todas as pás da hotbar ficam no red irá para a trap de baús guardar as pás no red e pegar novas pás em outro baú;
*Repõe os blocos da hotbar com os blocos do inventário;
*Quando não tem mais blocos no inventário para repor pega mais em um baú da trap [NOVO];
*Tenta logar caso bugue as macros do onchat [NOVO];

Obs: Adiantando, GUARDA livros.

2.Homes e trap de baús:
Usa 2 homes, a primeira é a home "escavar" na qual você vai upar .
Imagem:

Essa trap é melhor para perder menos blocos, mas não é obrigatório usa-la (sugerido por [member=richard 1]):

E a segunda é a home "trapbaus", onde serão armazenados os itens. São 4 faces, 2 (uma de frente para outra) tem 4 linhas com 5 colunas, e as outras 2 são de 4 linhas e 7 colunas, marque a home no bloco do meio, preferencialmente olhando para o espaço (esse que é como uma porta).
Obrigatoriamente você deve construir a trap com essa "porta" virado para o lado NORTE
Imagem:

Imagens para ajudar na construção da trap:

Importante:
A macro irá usar 3 baús da trap para guardar as pás que estão no red do inventário, pegar pás novas e pegar mais blocos quando acabarem os do inventário. Então vou colocar print mas também vou deixar um macro para vocês verificarem se a trap esta feita corretamente:

Baú de pás gastas (ao iniciar a macro deixe ele vazio):

Baú que irá pegar as pás novas (Quanto mais pás você deixar nele maior será o tempo que você poderá upar):

Quando o baú de pás no red estiver cheio e a macro não conseguir guardar mais pás, ou quando acabarem as pás do baú que ela pega a macro irá desligar.

Baú que você deve deixar mais blocos que você esta escavando, deixe no mínimo 3 slots vazios, para a macro tirar os itens que estão no lugar dos blocos usados do inventário:

Macro para verificar se você fez a trap corretamente:

$${
if(flag);
unset(flag);
log("&4[Macro]&everifica baús escavação: &4Desativada");
stop();
else;
set(flag);
log("&4[Macro]&everifica baús escavação: &aAtivada");
#bau = 1;
do;
PROMPT(#bau,$$?, Qual baú quer começar verificando?(1 até 91));
until((#bau > 0) && (#bau < 92));
do;
look(NORTH);
log("&4[Macro]&eBaú: %#bau%");
if(%#bau%=1);look(-50,-24);endif;
if(%#bau%=2);look(-39,-28);endif;
if(%#bau%=3);look(-23,-32);endif;
if(%#bau%=4);look(+1,-34);endif;
if(%#bau%=5);look(+23,-32);endif;
if(%#bau%=6);look(+39,-28);endif;
if(%#bau%=7);look(+50,-24);endif;
if(%#bau%=8);look(+61,-23);endif;
if(%#bau%=9);look(+74,-24);endif;
if(%#bau%=10);look(+91,-26);endif;
if(%#bau%=11);look(+104,-25);endif;
if(%#bau%=12);look(+120,-23);endif;
if(%#bau%=13);look(+130,-24);endif;
if(%#bau%=14);look(+141,-28);endif;
if(%#bau%=15);look(+158,-32);endif;
if(%#bau%=16);look(-179,-34);endif;
if(%#bau%=17);look(-159,-32);endif;
if(%#bau%=18);look(-143,-27);endif;
if(%#bau%=19);look(-131,-24);endif;
if(%#bau%=20);look(-120,-23);endif;
if(%#bau%=21);look(-106,-24);endif;
if(%#bau%=22);look(-89,-26);endif;
if(%#bau%=23);look(-75,-25);endif;
if(%#bau%=24);look(-61,-23);endif;
if(%#bau%=25);look(-50,-10);endif;
if(%#bau%=26);look(-39,-12);endif;
if(%#bau%=27);look(-23,-14);endif;
if(%#bau%=28);look(+1,-16);endif;
if(%#bau%=29);look(+23,-14);endif;
if(%#bau%=30);look(+39,-12);endif;
if(%#bau%=31);look(+50,-10);endif;
if(%#bau%=32);look(+61,-10);endif;
if(%#bau%=33);look(+74,-11);endif;
if(%#bau%=34);look(+91,-11);endif;
if(%#bau%=35);look(+104,-11);endif;
if(%#bau%=36);look(+120,-10);endif;
if(%#bau%=37);look(+130,-10);endif;
if(%#bau%=38);look(+141,-12);endif;
if(%#bau%=39);look(+158,-14);endif;
if(%#bau%=40);look(-179,-16);endif;
if(%#bau%=41);look(-159,-14);endif;
if(%#bau%=42);look(-143,-12);endif;
if(%#bau%=43);look(-131,-10);endif;
if(%#bau%=44);look(-120,-10);endif;
if(%#bau%=45);look(-106,-11);endif;
if(%#bau%=46);look(-89,-11);endif;
if(%#bau%=47);look(-75,-11);endif;
if(%#bau%=48);look(-61,-10);endif;
if(%#bau%=49);look(-50,+4);endif;
if(%#bau%=50);look(-39,+4);endif;
if(%#bau%=51);look(-23,+4);endif;
if(%#bau%=52);look(+23,+4);endif;
if(%#bau%=53);look(+39,+4);endif;
if(%#bau%=54);look(+50,+4);endif;
if(%#bau%=55);look(+61,+4);endif;
if(%#bau%=56);look(+74,+4);endif;
if(%#bau%=57);look(+91,+4);endif;
if(%#bau%=58);look(+104,+4);endif;
if(%#bau%=59);look(+120,+4);endif;
if(%#bau%=60);look(+130,+4);endif;
if(%#bau%=61);look(+141,+4);endif;
if(%#bau%=62);look(+158,+4);endif;
if(%#bau%=63);look(-179,+4);endif;
if(%#bau%=64);look(-159,+4);endif;
if(%#bau%=65);look(-143,+4);endif;
if(%#bau%=66);look(-131,+4);endif;
if(%#bau%=67);look(-120,+4);endif;
if(%#bau%=68);look(-106,+4);endif;
if(%#bau%=69);look(-89,+4);endif;
if(%#bau%=70);look(-75,+4);endif;
if(%#bau%=71);look(-61,+4);endif;
if(%#bau%=72);look(-50,+16);endif;
if(%#bau%=73);look(-39,+20);endif;
if(%#bau%=74);look(-23,+22);endif;
if(%#bau%=75);look(+23,+22);endif;
if(%#bau%=76);look(+39,+20);endif;
if(%#bau%=77);look(+50,+16);endif;
if(%#bau%=78);look(+61,+16);endif;
if(%#bau%=79);look(+74,+18);endif;
if(%#bau%=80);look(+91,+18);endif;
if(%#bau%=81);look(+104,+18);endif;
if(%#bau%=82);look(+120,+16);endif;
if(%#bau%=83);look(+130,+16);endif;
if(%#bau%=84);look(+141,+20);endif;
if(%#bau%=85);look(+158,+22);endif;
if(%#bau%=86);look(-179,+24);endif;
if(%#bau%=87);look(-159,+22);endif;
if(%#bau%=88);look(-143,+20);endif;
if(%#bau%=89);look(-131,+16);endif;
if(%#bau%=90);look(-120,+17);endif;
if(%#bau%=91);look(-106,+18);endif;
wait(800ms);
inc(#bau);
if(%#bau% > 91);
break;
endif;
loop;
endif;
log("&4[Macro]&6Baú onde devem ficar o &fMATERIAL/BLOCO &6usado para escavar:");
look(WEST);
look(270,17);
wait(2);
log("&4[Macro]&6Baú onde devem ficar pás no &4RED:");
look(WEST);
look(282,14);
wait(2);
log("&4[Macro]&6Baú onde devem ficar pás &aREPARADAS/NOVAS:");
look(WEST);
look(299,15);
wait(2);
unset(flag);
log("&4[Macro]&everifica baús escavação: &4Desativada");
endif;
}$$

3.Login:
Não sei se é com todos que ocorre um problema no onchat ao executar a macro, acho que buga as macros do onchat, mas não entendo o motivo pois ela não tem nada que interfere no onchat então, não tem como corrigir no momento, mas coloquei um sistema para logar, que só vai funcionar se você cair (ou o servidor reiniciar) quando esta escavando na home escavar. Mas não é obrigatório usar, ele está dentro da macro e você precisa encontrar e colocar sua senha onde esta escrito /login SUASENHA caso queira. Obrigado ao [member=richard 1] por me ajudar com isso.
Está escrito assim dentro do código (você precisa mudar lá, não é pra pegar esse código aqui):
//##################INSIRA SUA SENHA ABAIXO CASO QUEIRA:################

}$$/login SUASENHA$${

//##################INSIRA SUA SENHA ACIMA CASO QUEIRA##################

4.Inventário:
Seu inventário deve estar organizado dessa maneira:

5.Perguntas da macro:

4.1:

Se você já executou a macro alguma vez e quer usar as mesmas respostas, digite 1. Se ainda não usou, ou não quer usar as mesmas configurações, pressione 2, fazendo isso a macro irá abrir o questionário.

4.2:
Primeira pergunta:

Escolha o bloco que usará ou digite o ID do bloco, se você escolher um item que não de para escavar, ou não de xp de escavação, a macro irá repetir a pergunta até você escolher o bloco correto.

4.3:

Essa pergunta se refere a quantos blocos você quer que escave antes de repor os blocos e verificar se o inventário esta cheio.

4.4:

Se você estiver usando pá eficiência 7 , 5 ou 4 pode digitar 0 (zero), mas se for uma pá eficiência 3 você terá que escolher um delay maior como 1 ou 2, e quanto menor a eficiência da pá você terá de ajustar o delay de acordo com ela.

4.5:

Por fim, escolha qual baú a macro deve iniciar o armazenamento dos itens, entre 1 e 91 (é 91 mesmo porque o baú 92 será usado para deixar blocos que você esta escavando).

6.Agradecimento:
Obrigado ao [member=luiz bussatto], [member=zAries], pedrucar e [member=richard 1], por me ajudarem a testar a macro (então se der algo errado culpem eles. -q).

7.Código:
Código:
$${
IF(xlyz);
    log("&4&l[Macro Escavaçao] &4&lDesativada.");
    Unset(xlyz);
    stop;
    else;
    log("&4&l[Macro Escavaçao] &e(by xlyz) &a&lAtivada.");
    set(xlyz);

    &dir = %DIRECTION%;

    ifmatches(%&dir%,N);
        &dir = NORTH;
    endif;
    ifmatches(%&dir%,S);
        &dir = SOUTH;
    endif;
    ifmatches(%&dir%,E);
        &dir = EAST;
    endif;
    ifmatches(%&dir%,W);
        &dir = WEST;
    endif;

    set(nf);
    
    PROMPT(#config,$$?, Quer usar a última configuraçao da macro?(1-Sim / 2-Não));
    if(%#config% = 2);
		log("&4[Macro]&9Você escolheu &4NAO &9usar a última configuraçao. Iniciando questionário..");
        do;
            PROMPT(#bloco,$$i, Qual bloco usará para escavar?);
        until((#bloco = 2)||(#bloco = 3)||(#bloco = 12)||(#bloco = 13)||(#bloco = 82)||(#bloco = 88)||(#bloco = 110));
		do;
			PROMPT(#quantidade,$$?, Qual quantidade de blocos que irá quebrar antes de verificar o inventário?Sugestão(500));
        until((#quantidade > 30));
		if(%#quantidade% > 799);
			log("&4[Macro]&cCuidado! Esse valor é alto, podem ocorrer problemas só utilize se tem certeza do que esta fazendo!");
		endif;
		do;
			PROMPT(#quebrar,$$?, Qual delay para quebrar os blocos?(0 sem delay para pás com mais eficiência/Aumente se o bloco nao quebrar!));
        until((#quebrar < 20) && (#quebrar >= 0));
		do;
			PROMPT(#bau,$$?, Em qual baú devo iniciar o armazenamento?(1 à 91));
        until((#bau > 0)&&(#bau <= 91));
	else;
		log("&4[Macro]&9Você escolheu &2usar &9a última configuraçao.");
		log("&4[Macro]&9Configuraçoes:");
		log("&4[Macro]&9Bau: &6%#bau%&e\&9Delay: &6%#quebrar%&e\&9Quantidade de blocos antes de verificar inventário: &6%#quantidade%&e\&9Id do bloco: &6%#bloco%");
    endif;
	
	#slot = 4;
	#red = 0;
	unset(repos_pas);
	unset(bau_pas_full);
	unset(sem_pas);
	unset(pas_red);
	unset(sem_material);
	
    do();
		if(repos_pas);
			#slot = 4;
			#red = 0;
			unset(repos_pas);
		endif;
		
        // Quebrando blocos
        do(%#quantidade%);
            look(%&dir%);
            look(,59);
            pick(%#bloco%);
            key(use);
            wait(1ms);
            slot(%#slot%);

            if((DURABILITY < 100)&&(DURABILITY > 0));
                inc(#slot);
            else;
                if(DURABILITY <= 0);
                    log("&4[Macro]&6Sem pá nesse slot, aguardando &915 &6segundos para carregar se você esta reconectando...");
                    wait(5);
					log("&4[Macro]&910 &6segundos para continuar se você esta reconectando...");
					log("&4[Macro]&2&lVou tentar logar, caso esteja reconectando...");
//##################INSIRA SUA SENHA ABAIXO CASO QUEIRA:################

					}$$/login SUASENHA$${
					
//##################INSIRA SUA SENHA ACIMA CASO QUEIRA##################
					wait(5);
                    log("&4[Macro]&9 5 &6segundos para continuar...");
                    wait(5);
                    log("&4[Macro]&9Continuando");
                    if((DURABILITY < 100) &&(DURABILITY > 0));
                        if(%#slot% < 9);
                            inc(#slot);
                        else;
                            log("&4[Macro]&9Reiniciando verificaçao de pás");
                            #slot = 4;
                            inc(#red);
                        endif;
                    endif;
                    if(DURABILITY <= 0);
                        inc(#slot);
                    endif;
                endif;
            endif;
            if((%#slot% >= 10) && (%#red% < 3));
                log("&4[Macro]&9Reiniciando verificaçao de pás");         
                #slot = 4;
                inc(#red);
            else;
                if((%#slot% >= 10) && (%#red% > 2));
                    log("&4[Macro]&fReiniciei a verificaçao %#red% vezes, e todas as ferramentas estao no &4red&f, se possível as pás serao trocadas...");
					set(pas_red);
					break;
                endif;
            endif;
            
            look(%&dir%);
            look(,59);
			if(%#quebrar% != 0);
				do(%#quebrar%);
					key(attack);
				loop;
			else;
				key(attack);
			endif;
        loop;
		
		if((pas_red)&&(!bau_pas_full)&&(!sem_pas));
			set(repos_pas);
			
			//Trocando pás
			log("&4[Macro]&9Trocando pás no &4red&9...");
			}$$/home trapbaus$${
			wait(8);
			
			//Guardar pás no red
			look(WEST);
			wait(800ms);
			look(282,14);
			do; 
				ifmatches(%GUI%,GUICHEST);
				break;
				endif;
				look(282,14);
				wait(2);
				key(use);
				wait(4);
			loop;			
			log("&4[Macro]&9Guardando pás no &4red.");
			for(#i,84,89);
				slotclick(%#i%,l,true);
				wait(30ms);
			next;
			
			//verifica se bau de pás red esta cheio
			getslotitem(53,#id,#stack);
			wait(500ms);
			if(%#stack%!=0);
				set(bau_pas_full);
				log("&4[Macro]&f&lO baú de pás red está cheio!!! A próxima vez que as pás ficarem red nao irá trocar.");
			endif;
			gui();
			
			//Pegar pás novas
			look(299,15);
			wait(800ms);
			
			//Verificando slots vazios
			#slot_vazio = 0;
			for(#i,4,9);
				getslotitem(%#i%,#id);
				if(%#id%=0);
					inc(#slot_vazio);
				endif;
			next;
			
			do; 
				ifmatches(%GUI%,GUICHEST);
					break;
				endif;
				look(299,15);
				wait(2);
				key(use);
				wait(4);
			loop;		
			wait(500ms);
			log("&4[Macro]&9Pegando &2novas &9pás.");
			
			//Pegando pás
			#i = 0;
			#cont = 0;
			do;
				getslotitem(%#i%,#id);
				if(%#id%!=0);
					slotclick(%#i%,l,true);
					inc(#cont);
					wait(100ms);
				endif;
				inc(#i);

				if((%#cont% < %#slot_vazio%) && (%#i% >= 54));
					log("&4[Macro]&f&lNao tem pás suficientes para encher a hotbar!!! A próxima vez que as pás ficarem red nao irá trocar.");
					set(sem_pas);
					break;
				endif;
				if((%#cont% >= %#slot_vazio%) || (%#i% >= 54));
					break;			
				endif;
			loop;
			gui();
			log("&4[Macro]&9Voltando ao local de escavaçao...");
			}$$/home escavar$${
			unset(pas_red);
			wait(8);
		elseif((pas_red)&&(bau_pas_full)||(sem_pas));
				log("&4&l[Macro AVISO]&cInfelismente, nao será possível trocar as pás!!!");
				if(bau_pas_full);			
					log("&4&l[Macro Escavaçao] &4Desativada&c, pois o bau de pás no red está cheio!!!");
				else;
					log("&4&l[Macro Escavaçao] &4Desativada&c, pois nao tem pás suficientes para repor no baú!!!");			 
				endif;
			unset(xlyz);
			unset(bau_pas_full);
			unset(sem_pas);
			stop();
		
		else;
		
			// Abrindo inventário		
			gui(inventory);
			pick(%#bloco%);
			if(%STACKSIZE%<64);
				log("&4[Macro]&9Repondo blocos.");
				for(#i,9,35);
					getslotitem(%#i%,#id);
					if(%#id%=%#bloco%);
						slotclick(%#i%,l,true);
						wait(5ms);
					endif;
				next;
			endif;
			
			//Verifica se acabaram blocos do inventario
			gui(inventory);
			pick(%#bloco%)
			if(%STACKSIZE% < 40);
				log("&4[Macro]&9Aguardando blocos voltarem pro inventário.");
				wait(4);
			endif;
			if((%STACKSIZE%<20) && (!sem_material));
				log("&4[Macro]&9Nao tem blocos para repor, indo pegar mais!");
				}$$/home trapbaus$${
				wait(7);
				do;
					look(WEST);
					wait(800ms);
					look(270,17);
					wait(2);
					key(use);
					wait(4);
					ifmatches(%GUI%,GUICHEST);
						wait(2);
						break;
					endif;
				loop;
				
				//Tirando outros itens dos slots onde fica o material usado.
				for(#i,81,83);
					slotclick(%#i%,l,true);
					wait(30ms);
				next;
				
				//Pegando material do bau.
				#i = 0;
				#cont = 0;
				do;
					getslotitem(%#i%,#id);
					if(%#id% = %#bloco%);
						slotclick(%#i%,l,true);
						inc(#cont);
						wait(100ms);
					endif;
					inc(#i);

					if((%#i% >= 54) && (%#cont% < 10));
						log("&4[Macro]&f&lNao tem material suficiente para escavar no baú! A próxima vez que acabar, a macro desligará!");
						set(sem_material);
						break;
					endif;
					if((%#cont% >= 10) || (%#i% >= 54));
						break;			
					endif;
				loop;
				log("&4[Macro]&9Voltando ao local de escavaçao...");
				}$$/home escavar$${
				wait(7);
			elseif((%STACKSIZE% < 20) && (sem_material));
				log("&4&l[Macro]&4 Desativada&c, pois acabou o material de escavaçao no baú!!!");
				unset(sem_material);
				unset(xlyz);
				stop();
			endif;
			
			if(nf);
				gui(inventory);
				wait(1);
				GETSLOTITEM(25,#id,#stack);
				IF(%#stack%=0);
					gui();
				elseif;

					// Indo para os baus.
					}$$/home trapbaus$${
					wait(7);
					keydown(jump);wait(100ms);keyup(jump);wait(1);
					//Guardando ítens nos baus.
					do;
						//Olhando e Tentando abrir baus.
						do; 
							ifmatches(%GUI%,GUICHEST);
								break;
							endif;
							look(NORTH);
							if(%#bau%=1);look(-50,-24);endif;
							if(%#bau%=2);look(-39,-28);endif;
							if(%#bau%=3);look(-23,-32);endif;
							if(%#bau%=4);look(+1,-34);endif;
							if(%#bau%=5);look(+23,-32);endif;
							if(%#bau%=6);look(+39,-28);endif;
							if(%#bau%=7);look(+50,-24);endif;
							if(%#bau%=8);look(+61,-23);endif;
							if(%#bau%=9);look(+74,-24);endif;
							if(%#bau%=10);look(+91,-26);endif;
							if(%#bau%=11);look(+104,-25);endif;
							if(%#bau%=12);look(+120,-23);endif;
							if(%#bau%=13);look(+130,-24);endif;
							if(%#bau%=14);look(+141,-28);endif;
							if(%#bau%=15);look(+158,-32);endif;
							if(%#bau%=16);look(-179,-34);endif;
							if(%#bau%=17);look(-159,-32);endif;
							if(%#bau%=18);look(-143,-27);endif;
							if(%#bau%=19);look(-131,-24);endif;
							if(%#bau%=20);look(-120,-23);endif;
							if(%#bau%=21);look(-106,-24);endif;
							if(%#bau%=22);look(-89,-26);endif;
							if(%#bau%=23);look(-75,-25);endif;
							if(%#bau%=24);look(-61,-23);endif;
							if(%#bau%=25);look(-50,-10);endif;
							if(%#bau%=26);look(-39,-12);endif;
							if(%#bau%=27);look(-23,-14);endif;
							if(%#bau%=28);look(+1,-16);endif;
							if(%#bau%=29);look(+23,-14);endif;
							if(%#bau%=30);look(+39,-12);endif;
							if(%#bau%=31);look(+50,-10);endif;
							if(%#bau%=32);look(+61,-10);endif;
							if(%#bau%=33);look(+74,-11);endif;
							if(%#bau%=34);look(+91,-11);endif;
							if(%#bau%=35);look(+104,-11);endif;
							if(%#bau%=36);look(+120,-10);endif;
							if(%#bau%=37);look(+130,-10);endif;
							if(%#bau%=38);look(+141,-12);endif;
							if(%#bau%=39);look(+158,-14);endif;
							if(%#bau%=40);look(-179,-16);endif;
							if(%#bau%=41);look(-159,-14);endif;
							if(%#bau%=42);look(-143,-12);endif;
							if(%#bau%=43);look(-131,-10);endif;
							if(%#bau%=44);look(-120,-10);endif;
							if(%#bau%=45);look(-106,-11);endif;
							if(%#bau%=46);look(-89,-11);endif;
							if(%#bau%=47);look(-75,-11);endif;
							if(%#bau%=48);look(-61,-10);endif;
							if(%#bau%=49);look(-50,+4);endif;
							if(%#bau%=50);look(-39,+4);endif;
							if(%#bau%=51);look(-23,+4);endif;
							if(%#bau%=52);look(+23,+4);endif;
							if(%#bau%=53);look(+39,+4);endif;
							if(%#bau%=54);look(+50,+4);endif;
							if(%#bau%=55);look(+61,+4);endif;
							if(%#bau%=56);look(+74,+4);endif;
							if(%#bau%=57);look(+91,+4);endif;
							if(%#bau%=58);look(+104,+4);endif;
							if(%#bau%=59);look(+120,+4);endif;
							if(%#bau%=60);look(+130,+4);endif;
							if(%#bau%=61);look(+141,+4);endif;
							if(%#bau%=62);look(+158,+4);endif;
							if(%#bau%=63);look(-179,+4);endif;
							if(%#bau%=64);look(-159,+4);endif;
							if(%#bau%=65);look(-143,+4);endif;
							if(%#bau%=66);look(-131,+4);endif;
							if(%#bau%=67);look(-120,+4);endif;
							if(%#bau%=68);look(-106,+4);endif;
							if(%#bau%=69);look(-89,+4);endif;
							if(%#bau%=70);look(-75,+4);endif;
							if(%#bau%=71);look(-61,+4);endif;
							if(%#bau%=72);look(-50,+16);endif;
							if(%#bau%=73);look(-39,+20);endif;
							if(%#bau%=74);look(-23,+22);endif;
							if(%#bau%=75);look(+23,+22);endif;
							if(%#bau%=76);look(+39,+20);endif;
							if(%#bau%=77);look(+50,+16);endif;
							if(%#bau%=78);look(+61,+16);endif;
							if(%#bau%=79);look(+74,+18);endif;
							if(%#bau%=80);look(+91,+18);endif;
							if(%#bau%=81);look(+104,+18);endif;
							if(%#bau%=82);look(+120,+16);endif;
							if(%#bau%=83);look(+130,+16);endif;
							if(%#bau%=84);look(+141,+20);endif;
							if(%#bau%=85);look(+158,+22);endif;
							if(%#bau%=86);look(-179,+24);endif;
							if(%#bau%=87);look(-159,+22);endif;
							if(%#bau%=88);look(-143,+20);endif;
							if(%#bau%=89);look(-131,+16);endif;
							if(%#bau%=90);look(-120,+17);endif;
							if(%#bau%=91);look(-106,+18);endif;
							wait(2);						
							key(use);
							wait(4);//Delay para repetir o loop de tentar abrir baú.
						loop;
						for(#i,54,71);
							slotclick(%#i%,l,true);
							wait(30ms);
						next;
						wait(500ms);
						getslotitem(53,#id,#stack);
						wait(500ms);
						if(%#stack%!=0);
							if(%#bau%<91);
								inc(#bau);
								gui();
							else;
								unset(nf);
								log("&4[Macro] &9Baús cheios! Agora &4nao &9serao guardados mais itens!!!");
								gui();
								break;
							endif;
						endif;
					until(%#stack%=0);
					}$$/home escavar$${
					wait(10);
				endif;
			else;
				gui();
			endif;
		endif;
	loop;
endif;
}$$
Sugiro que usem o macro de economia de blocos do [member=Phodalao], testei quando usei a macro e não ocorreu nenhum bug, porém essa possibilidade não está descartada:
Tópico do macro (Clique aqui), mas vou colocar a macro aqui para facilitar:
Código:
$${IFMATCHES(%CHAT%,"Limpando itens do chao em 5s");gui(inventory);wait(6000ms);gui();endif;}$$
Coloque em ONCHAT (e NÃO em uma tecla).
8.Atualizações:
*19/05/2015 - Tópico criado;
*20/05/2015 - Graças ao [member=Anderson13fs] percebi que o delay poderia ser menor, agora a macro está mais eficiente;
*23/05/2015 - Agora após a macro perceber que todos as pás do inventário estão no red, irá para a home trapbaus e pegará novas pás. Sugerido por [member=gabrielzym];
*30/05/2015 - Agradeço novamente ao [member=Anderson13fs] que fez mais uma sugestão boa para melhorar a macro: Agora ela irá pegar mais blocos em um baú quando não tiver mais no inventário.

______________________________________________________________________

Qualquer bug ou sugestão deixem nos comentários vlw
Clique para expandir...
bem que voce poderia fazer para reparar pas e pegar terras em 3 baus porke a terra acaba mt rpd...

Alison Santos · 3 Junho 2015

Gostei Do Macro Parabens !

xlyz · 3 Junho 2015

Black EzZ disse:

bem que voce poderia fazer para reparar pas e pegar terras em 3 baus porke a terra acaba mt rpd...
Clique para expandir...

Eu estou fazendo isso já, mas você quer dizer pegar pás boas em 3 baus e blocos, ou só blocos em 3 baus e pás deixar do mesmo jeito?
Porque eu ia aumentar 2 baús de pás (um de red outro de reparada) e um de blocos, vocês acham que deve ser quantos baús de cada coisa para ficar bom? Porque a macro é pra vocês, eu não deixo muito tempo upando afk.

Alison Santos disse:

Gostei Do Macro Parabens !
Clique para expandir...

Obrigado.

Moramed · 5 Junho 2015

Vlw tava precisando

wellingtonfm · 11 Junho 2015

Boa Tarde,

Esse macro funciona na versão 1.7.10 ? jogo no beta e sou novo nesse assunto de macro, não consigo fazer funcionar,
Gostaria de um para escavação, sem precisar ser VIP.

Agradeço desde já !

FarofeiroXD · 11 Junho 2015

Eu não consigo fazer a trap de baus :c meus baus nao ficam enfileirados ...

Burgess · 11 Junho 2015

Macro ta Funcionando direitinho , Muito obrigado

xlyz · 12 Junho 2015

wellingtonfm disse:

Boa Tarde,

Esse macro funciona na versão 1.7.10 ? jogo no beta e sou novo nesse assunto de macro, não consigo fazer funcionar,
Gostaria de um para escavação, sem precisar ser VIP.

Agradeço desde já !
Clique para expandir...

Pelo que me falaram quem testou não funciona no 1.7, esse é pra não VIP

FarofeiroXD disse:

Eu não consigo fazer a trap de baus :c meus baus nao ficam enfileirados ...
Clique para expandir...

Vc precisa usar baú armadilha, do lado de baú normal.

Ronaldomitoso disse:

Macro ta Funcionando direitinho , Muito obrigado
Clique para expandir...

Denada.

Eu sei que tinha falado que ia coloca mais baú de pá e talz, mas to com muito trabalho ultimamente e é preciso de tempo pra arrumar macro, porque precisa pensar, fazer no código e ainda testar e a minha internet não ajuda nada na hora de testar porque ta/é um lixo. Eu ainda vou atualizar, mas não tenho previsão de quando. Desculpa pra quem tava esperando...

FarofeiroXD · 12 Junho 2015

xlyz disse:

Pelo que me falaram quem testou não funciona no 1.7, esse é pra não VIP

Vc precisa usar baú armadilha, do lado de baú normal.

Denada.

Eu sei que tinha falado que ia coloca mais baú de pá e talz, mas to com muito trabalho ultimamente e é preciso de tempo pra arrumar macro, porque precisa pensar, fazer no código e ainda testar e a minha internet não ajuda nada na hora de testar porque ta/é um lixo. Eu ainda vou atualizar, mas não tenho previsão de quando. Desculpa pra quem tava esperando...
Clique para expandir...

consegui fazer tudo vei, começei a upar (com pá de dima sem enchant), o meu carinha as vezes nao quebra os blocos ou se não quebra ele vai pra frente ou senão poe muito bloco e começa a lotar lá e deu.

Galp · 12 Junho 2015

vou testar

evertonschuster · 12 Junho 2015

boua cara

ENTREGUE [Macro]Escavação NÃO VIP 1.5.2

Shoutbox (0)

FelipeWillas2014 Excelente
VIP

xlyz Excelente
VIP

HawzerVLS Excelente
VIP

Black EzZ Neutro
Banido

PsyCh0Social Neutro

verick Neutro
Banido

xlyz Excelente
VIP

tartaminha Neutro

xlyz Excelente
VIP

Black EzZ Neutro
Banido

Alison Santos Neutro
VIP

xlyz Excelente
VIP

Moramed Bom
VIP

wellingtonfm Razoavel
VIP

FarofeiroXD Excelente
VIP

Burgess Craftlandiano
VIP

xlyz Excelente
VIP

FarofeiroXD Excelente
VIP

Galp Bom
VIP

evertonschuster Excelente
VIP

ENTREGUE [Macro]Escavação NÃO VIP 1.5.2

Shoutbox (0)

FelipeWillas2014 Excelente VIP

xlyz Excelente VIP

HawzerVLS Excelente VIP

Black EzZ Neutro Banido

PsyCh0Social Neutro

verick Neutro Banido

xlyz Excelente VIP

tartaminha Neutro

xlyz Excelente VIP

Black EzZ Neutro Banido

Alison Santos Neutro VIP

xlyz Excelente VIP

Moramed Bom VIP

wellingtonfm Razoavel VIP

FarofeiroXD Excelente VIP

Burgess Craftlandiano VIP

xlyz Excelente VIP

FarofeiroXD Excelente VIP

Galp Bom VIP

evertonschuster Excelente VIP

FelipeWillas2014 Excelente
VIP

xlyz Excelente
VIP

HawzerVLS Excelente
VIP

Black EzZ Neutro
Banido

verick Neutro
Banido

xlyz Excelente
VIP

xlyz Excelente
VIP

Black EzZ Neutro
Banido

Alison Santos Neutro
VIP

xlyz Excelente
VIP

Moramed Bom
VIP

wellingtonfm Razoavel
VIP

FarofeiroXD Excelente
VIP

Burgess Craftlandiano
VIP

xlyz Excelente
VIP

FarofeiroXD Excelente
VIP

Galp Bom
VIP

evertonschuster Excelente
VIP