- $${
- do;
- //Mecanismo de liga e desliga
- toggle(a);
- if(!a);
- log(off);
- stop;
- endif;
- log(on);
- //tenta abrir um baú até que ele esteja aberto
- log("abrindo um baú!");
- do;
- key(use);
- wait(1)
- until(%GUI%=="GUICHEST");
- //Itera os slots 0 a 53
- for(#slot,0,53);
- ifmatches(%ITEM%,"[a-zA-Z]");
- getslotitem(%#slot%,&oq);
- else;
- getslotitem(%#slot%,#oq);
- set(&oq,"%#oq%");
- endif;
- ifmatches(%&oq%,"^52$|^glowstone_dust$");
- slotclick(%#slot%,l,true);
- wait(3t);
- endif;
- next;
- //Fica mandando fechar o baú e só sai do loop depois do baú estar fechado
- wait(1);
- gui();
- until(%GUI%!="GUICHEST");
- log("bau fechado!");
- //Vai para a home
- wait(2);
- echo("/home up");
- wait(2);
- //tenta abrir um baú até que ele esteja aberto
- log("abrindo um báu à frente!");
- key(use);
- wait(2);
- until(%GUI%=="GUICHEST");
- //Itera os slots 9 a 44
- for(#slot,54,89);
- ifmatches(%ITEM%,"[a-zA-Z]");
- getslotitem(%#slot%,&oq);
- else;
- getslotitem(%#slot%,#oq);
- set(&oq,"%#oq%");
- endif;
- ifmatches(%&oq%,"^52$|^glowstone_dust$");
- slotclick(%#slot%,l,true);
- wait(3t);
- endif;
- next;
- //Fica mandando fechar o baú e só sai do loop depois do baú estar fechado
- wait(2);
- gui();
- until(%GUI%!="GUICHEST");
- log("bau fechado!");
- if(macro);
- unset(macro);
- log(Minerando OFF);
- endif;
- set(macro);
- wait(2);
- echo("/home bau");
- loop();
- }$$
- $${
- wait(2)
- key(use);
- until(%GUI%=="GUICHEST");
- //Itera os slots 0 a 53
- for(#slot,0,53);
- ifmatches(%ITEM%,"[a-zA-Z]");
- getslotitem(%#slot%,&oq);
- else;
- getslotitem(%#slot%,#oq);
- set(&oq,"%#oq%");
- endif;
- ifmatches(%&oq%,"^52$|^coal$");
- slotclick(%#slot%,l,true);
- wait(3t);
- endif;
- next;
- //Fica mandando fechar o baú e só sai do loop depois do baú estar fechado
- wait(2);
- gui();
- until(%GUI%!="GUICHEST");
- log("bau fechado!");
- //Vai para a home
- wait(2);
- echo("/home frag");
- wait(2);
- //tenta abrir um baú até que ele esteja aberto
- log("abrindo um báu à frente!");
- key(use);
- wait(2);
- until(%GUI%=="GUICHEST");
- //Itera os slots 9 a 44
- for(#slot,54,89);
- ifmatches(%ITEM%,"[a-zA-Z]");
- getslotitem(%#slot%,&oq);
- else;
- getslotitem(%#slot%,#oq);
- set(&oq,"%#oq%");
- endif;
- ifmatches(%&oq%,"^52$|^coal$");
- slotclick(%#slot%,l,true);
- wait(3t);
- endif;
- next;
- //Fica mandando fechar o baú e só sai do loop depois do baú estar fechado
- wait(2);
- gui();
- until(%GUI%!="GUICHEST");
- log("bau fechado!");
- if(macro);
- unset(macro);
- log(Minerando OFF);
- set(macro);
- wait(2);
- echo("/home bau");
- loop;
- endif;
- }$$