Tentei editar aqui, porém pode existir bugs. A macro vai verificar o inventario a cada 2:30 min aprox. vai organizar o inventario (descer gravel e subir outros itens da hotbar) e verificar se tem algo no penúltimo slot do inventario, se houver, ele vai guardar nos 10 baús tudo menos a pá, o gravel e o ferro, e vai voltar a upar.
$${
if(escavar);
log("&d{MACRO} &6Escavar &6por FroesPvp&4[OFF]");
unset(escavar);
stop();
else;
log("&d{MACRO} &6Escavar &6por FroesPvp&a[ON]");
set(escavar);
&dir = %DIRECTION%;
#v=40;
set(nf);
ifmatches(%&dir%,N);&dir=NORTH;endif;
ifmatches(%&dir%,S);&dir=SOUTH;endif;
ifmatches(%&dir%,E);&dir=EAST;endif;
ifmatches(%&dir%,W);&dir=WEST;endif;
#bau=1;
do;
do(250);
pick(256);
if(%DURABILITY%<40);
look(0,90);
log(&d{MACRO}&b Durabilidade baixa, processo de reparar inciado!);
wait(500ms);
key(use);
wait(500ms);
key(use);
log(&d{MACRO}&b Pá reparada com sucesso!);
log(&d{MACRO}&b Processo de escavar retomado!);
endif;
if(%DURABILITY%<10);
unset(escavar);
stop();
log(&d{MACRO}&b Durabilidade baixa, sem material para reparar!);
endif;
look(%&dir%);
look(,70);
do(3)
PICK(13);
KEY(use);
wait(1ms);
PICK(256);
KEY(attack);
wait(1ms);
Loop;
loop;
if(nf);
Wait(200ms);
gui(inventory);
wait(1000ms);
for(#slot,36,44);
getslotitem(%#slot%,#id,#stack);
if((%#id%=13)|(%#id%=256));
next;
else;
slotclick(%#slot%,l,true);
wait(185ms);
endif;
next;
for(#slot,9,35);
getslotitem(%#slot%,#id,#stack);
if(%#id%=13);
slotclick(%#slot%,l,true);
wait(185ms);
endif;
next;
getslotitem(34,#id,#stack);
if(%#stack%=0);
gui();
else;
do;
wait(1);
}$$
$${if(%#bau%=1);}$$
/home esc1
$${endif;}$$
$${if(%#bau%=2);}$$
/home esc2
$${endif;}$$
$${if(%#bau%=3);}$$
/home esc3
$${endif;}$$
$${if(%#bau%=4);}$$
/home esc4
$${endif;}$$
$${if(%#bau%=5);}$$
/home esc5
$${endif;}$$
$${if(%#bau%=6);}$$
/home esc6
$${endif;}$$
$${if(%#bau%=7);}$$
/home esc7
$${endif;}$$
$${if(%#bau%=8);}$$
/home esc8
$${endif;}$$
$${if(%#bau%=9);}$$
/home esc9
$${endif;}$$
$${if(%#bau%=10);}$$
/home esc10
$${endif;}$$
$${
wait(5);keydown(jump);wait(1);keyup(jump);wait(1);
key(use);
wait(1);
for(#slotn,54,89);
GETSLOTITEM(%#slotn%,#id,#stack);
if((%#id%=256) || (%#id%=13) || (%#id%=265));
else;
slotclick(%#slotn%,l,true);wait(30ms);
endif;
next;
wait(500ms);
getslotitem(53,#id,#stack);
wait(500ms);
if(%#stack%!=0);inc(#bau);
endif;
if(%#bau%=11);
unset(nf);
log(&d&l[MACRO] &b"Baús cheios! Voltando a escavar.");
gui();
else;
gui();
endif;
until(%#stack%=0);
}$$
/home escavar
$${
Wait(5);keydown(jump);wait(1);keyup(jump);wait(1);endif;endif; loop;
}$$
