$${
///////////////////
#material=4;
#pa=291;
///////////////////
if(e);
toggle(e);
log(&4=======================);
log(&6&l[ Ultra&oRep &6&l] &c&l[&4 OFF &c&l]);
log(&6&l[ Ultra&oRep ] &efico grato por usar meu macro);log(&6&l[ Ultra&oRep ] &eBy: &c&lDevasteytor &eCraftlandia - Ares);
log(&4=======================);
stop;
else;
toggle(e);
log(&2=======================);
log();
log(&6&l[ Ultra&oRep &6&l] &9&l[&2 &lON &9&l]);
log();
log(&2=======================);
unset(east);unset(west);unset(south);unset(north);
getidrel(+1,-2,0,#c1);getidrel(-1,-2,0,#c2);getidrel(0,-2,+1,#c3);getidrel(0,-2,-1,#c4);
if((%#c1%=146)||(%#c1%=54));
set(east);
endif;
if((%#c2%=146)||(%#c2%=54));
set(west);
endif;
if((%#c3%=146)||(%#c3%=54));
set(south);
endif;
if((%#c4%=146)||(%#c4%=54));
set(north);
endif;
do;
#no=0;
#n=0;
#a=52;
#e=0;
do;
pick(%#pa%);
inc(#n,30);
look(south);
look(+%#n%,%#a%);
key(use);
wait(30ms);
unsafe;
do(7);
key(use);
loop;
endunsafe;
if(%ITEM%!=%#pa%);
pick(%#pa%);
until(%ITEM%=%#pa%);
endif;
if(%#no%=11);#a=30;endif;
if(%#no%=23);#a=0;endif;
if(%#no%=35);#a=-20;endif;
if(%#no%=47);#a=-47;endif;
if(%#no%=59);break;endif;
inc(#no);
if(%DURABILITY%<50);
look(west);
look(,90);
do(2);
key(use);
loop;
inc(#ver);
if(%#ver%>10);
#ver=0;
gui(inventory);
do;
until(%GUI%="GUIINVENTORY");
#cot=0;for(#inv,9,44);
getslotitem(%#inv%,#idinv);
if(%#idinv%=%#material%);
inc(#cot);
if(%#cot%>1);
break;
endif;
endif;
next;
gui;
if(%#cot%<2);
do;
if((east)||(west)||(south)||(north));if(east);look(east);look(,67);endif;if(west);look(west);look(,67);endif;
if(south);look(south);look(,67);endif;if(north);look(north);look(,67);endif;
wait(500ms);key(use);do;until(%GUI%="GUICHEST");wait(700ms);#it=0;for(#sl,0,53);getslotitem(%#sl%,#id,#nd);
if(%#id%=%#material%);slotclick(%#sl%,l,true);inc(#it);wait(100ms);endif;next;gui;wait(500ms);if(%#it%=0);
ifmatches(%DIRECTION%,E);unset(east);endif;ifmatches(%DIRECTION%,W);unset(west);endif;
ifmatches(%DIRECTION%,N);unset(north);endif;ifmatches(%DIRECTION%,S);unset(south);endif;
endif;else;log(&6&l[ Ultra&oRep ] &4Acabou &eas Pedras &4
);stop;endif;until(%#it%>0);endif;endif;endif;loop;loop;endif;
}$$
