$${
    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;
}$$