$${
IF(rxoneto);
Log(&4OFF);
Unset(rxoneto);
STOP;
Else;
Log(&2ON);set(@minaon);
Set(rxoneto);set(verificarinv);unset(inv);unset(guardar);
echo(/home minerar);do;wait(1ms);getidrel(0,-1,0,&bloco);until(%&bloco% = "iron_block");
&drop = "^written_book$|^diamond_pickaxe$|^diamond$|^iron_pickaxe$";
&livro = "written_book";
&picaretas = "^diamond_pickaxe$|^iron_pickaxe$";
&guardar = "^diamond$|^iron_ingot$|^gold_ingot$|^written_book$";
#bau = 1;

do;
pick(diamond_pickaxe);
exec(agilidade.txt,AGILIDADE);
do(25);keydown(forward);
do(100);
look(,0);
if(%HITID% != "cobblestone");
look(+4,);
endif;
key(attack);
if(%DURABILITY% < 200);
do(3);gui(inventory);key(use);wait(100ms);look(,90);gui();loop;endif;
loop;keyup(forward);set(@agilidadeoff);unset(@agilidadeon);
loop;
stop(AGILIDADE);

if(verificarinv);
echo(/home minerar);
#slotvazio=0;
gui(inventory);
for(#inv,9,43);
getslotitem(%#inv%,&id,#stack);
ifmatches(%&id%,"%&drop%|%&guardar%");else;
slotclick(%#inv%);slotclick(-999);wait(90ms);
endif;
next;
#slotvazio = 0;
for(#v,9,44);
getslotitem(%#v%,&id,#stack);
if(%#stack% = 0);inc(#slotvazio);endif;
next;
gui();
wait(1500ms);
if(%#slotvazio% <= 12);set(guardar);else;unset(guardar);endif;
gui();endif;



if(guardar);
echo(/home miner);keyup(sneak);
do;wait(1ms);getidrel(0,-1,0,&id);until(%&id%="brick_block");
keydown(jump);wait(10ms);keyup(jump);
do;
wait(1);
look(NORTH);
if(%#bau% = 1);look(40,-15);endif;
if(%#bau% = 2);look(60,-15);endif;
if(%#bau% = 3);look(90,-15);endif;
if(%#bau% = 4);look(115,-15);endif;
if(%#bau% = 5);look(140,-15);endif;
if(%#bau% = 6);look(40,0);endif;
if(%#bau% = 7);look(60,0);endif;
if(%#bau% = 8);look(90,0);endif;
if(%#bau% = 9);look(115,0);endif;
if(%#bau% = 10);look(140,0);endif;
if(%#bau% = 11);look(40,25);endif;
if(%#bau% = 12);look(60,28);endif;
if(%#bau% = 13);look(90,31);endif;
if(%#bau% = 14);look(115,30);endif;
if(%#bau% = 15);look(140,23);endif;
wait(1);
key(use);do;wait(1ms);until(%GUI% = "GUICHEST");
wait(1);
for(#bauguardar,54,88);
getslotitem(%#bauguardar%,&id,#stack);
ifmatches(%&id%,%&guardar%);
slotclick(%#bauguardar%,r,true);wait(200ms);
endif;
next;
getslotitem(53,&id,#stack);
if(%#stack%=0);else;inc(#bau,1);endif;
gui();wait(1);
until(%#stack%=0);
do;echo(/home minerar);wait(3);until(%HITID% = "cobblestone");
unset(guardar);
endif;
endif;
loop;
endif;
}$$