$${
if(cav1);
log( );
log("&6&l[MACRO] &d&lCava-Cava 2.0&4&l (OFF)");
log( );
unset(mrb);
unset(cav1);
unset(cav2);
unset(@cav);
unset(nperg);
stop();
else;
log( );
log("&6&l[MACRO] &d&lCava-Cava 2.0&2&l (ON)");
log( );
ACHIEVEMENTGET("by MrBlueees",351:4);
set(cav1);
set(cav2);
endif;
#bau=1;
IFMATCHES(%DIRECTION%,N);&near=NORTH;ENDIF;
IFMATCHES(%DIRECTION%,S);&near=SOUTH;ENDIF;
IFMATCHES(%DIRECTION%,W);&near=WEST;ENDIF;
IFMATCHES(%DIRECTION%,E);&near=EAST;ENDIF;
if(%#bloco%=nothing);set(nperg);&cont=n;endif;
if(%#pa%=nothing);set(nperg);&cont=n;endif;
if(%#dur%=nothing);set(nperg);&cont=n;endif;
if(%#del%=nothing);set(nperg);&cont=n;endif;
if(%#hit%=nothing);set(nperg);&cont=n;endif;
if(nperg);
else;
PROMPT(&cont,$$?,"Deseja continuar com a última configuraçao? (s/n)");
endif;
IFBEGINSWITH(%&cont%,n);
IFENDSWITH(%&cont%,n);
PROMPT(#bloco,$$i,Que bloco usará para cavar?);
PROMPT(#pa,$$i,Que tipo de pá irá ser usada?);
if(%#pa%=277);#rep=264;endif;
if(%#pa%=256);#rep=265;endif;
if(%#pa%=284);#rep=266;endif;
if(%#pa%=269);#rep=125;endif;
if(%#pa%=273);#rep=4;endif;
PROMPT(#dur,$$?,Em qual durabilidade você quer reparar sua pá?);
#dur=%#dur%;
PROMPT(#del,$$?,Qual delay para verificar o inventário? Recomendado: 300 - 400);
PROMPT(#hit,$$?,"Quantos hits para quebrar o bloco? Exemplos: 1 = pá eficiência 5 || 10 ou mais = pá de pedra");
if(%#bloco%=nothing);log("&cResposta inválida, configure novamente.");
unset(mrb);
unset(cav1);
unset(cav2);
unset(@cav);
unset(nperg);
stop();
endif;
if(%#pa%=nothing);log("&cResposta inválida, configure novamente.");
unset(mrb);
unset(cav1);
unset(cav2);
unset(@cav);
unset(nperg);
stop();
endif;
if(%#dur%=nothing);log("&cResposta inválida, configure novamente.");
unset(mrb);
unset(cav1);
unset(cav2);
unset(@cav);
unset(nperg);
stop();
endif;
if(%#del%=nothing);log("&cResposta inválida, configure novamente.");
unset(mrb);
unset(cav1);
unset(cav2);
unset(@cav);
unset(nperg);
stop();
endif;
if(%#hit%=nothing);log("&cResposta inválida, configure novamente.");
unset(mrb);
unset(cav1);
unset(cav2);
unset(@cav);
unset(nperg);
stop();
endif;
ENDIF;
ENDIF;
set(mrb);
set(@cav);
if(mrb);
look(%&near%);
look(,30);
do;
do(%#del%);
pick(%#bloco%);
key(use);
wait(1ms);
pick(%#pa%);
if(%DURABILITY%<%#dur%);
look(%&near%);
look(,90);
key(use);
wait(2);
endif;
look(%&near%);
look(,30);
do(%#hit%);
key(attack);
loop;
loop;
if(cav2);
gui(inventory);
wait(10ms);
getslotitem(35,#id,#stack);
if(%#stack%=0);
gui();
else;
wait(1);
do;
//=================BAUS=================//
}$$
$${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);
key(use);
wait(1);
for(#slotn,54,89);
getslotitem(%#slotn%,#id,#stack);
if((%#id%=%#pa%) || (%#id%=%#bloco%) || (%#id%=%#rep%));
else;
slotclick(%#slotn%,l,true);
wait(30ms);
endif;
next;
wait(500ms);
getslotitem(53,#id,#stack);
wait(500ms);
if(%#stack%!=0);
inc(#bau);
else;
endif;
if(%#bau%=11);
unset(cav2);
log("&cBaús cheios! Voltando a escavar somente.");
gui();
else;
gui();
endif;
until(%#stack%=0);
endif;
}$$/home macroesc$${
wait(4);
gui(inventory);
wait(600ms);
for(#slot,9,35);
GETSLOTITEM(%#slot%,#id,#stack);
if((%#id%=%#pa%) || (%#id%=%#bloco%) || (%#id%=%#rep%));
slotclick(%#slot%,l,true);wait(30ms);
else;
endif;
next;
gui();
endif;
loop;
endif;
}$$
