$${
if(cav);
unset(cav);
unset(economia);
unset(off);
log( );
log("&6&l[VIP] &d&lCava-Cava &4(OFF) &f- &aAproximadamente &a%#exp% de EXP.");
log( );
unset(@cav);
unset(@economia);
unset(@off);
stop();
else;
set(cav);
set(@economia);
unset(@cav2);
log( );
log("&6&l[VIP] &d&lCava-Cava &2(ON)");
log( );
set(@cav);
set(@economia);
IFMATCHES(%DIRECTION%,N);
&near = NORTH;
ENDIF;
IFMATCHES(%DIRECTION%,S);
&near = SOUTH;
ENDIF;
IFMATCHES(%DIRECTION%,W);
&near = WEST;
ENDIF;
IFMATCHES(%DIRECTION%,E);
&near = EAST;
ENDIF;
#exp = 0;
#bau = 1;
PROMPT(#bloco,$$i, Que bloco usará para cavar?);
PROMPT(#pa,$$i, Qual pá sera usada?);
PROMPT(#rep,$$i, Qual o material usado na reparação da sua pá?);
PROMPT(#dur,$$?, Em qual durabilidade você quer reparar sua pá?);
PROMPT(#del,$$?, Qual delay para verificar o Inventário? Recomendado: 200 - 300);
PROMPT(#vel,$$?, Qual delay para quebrar os blocos? 0 = Apelao | 4 = pa sem Enchant);
endif;
}$$/g &fUpando escavacao, afk aqui.$${
endif;
#dur=%#dur%;
#repq=0;
else;
look(%&near%);
look(,55);
set(cav2);
set(@cav2);
do;
do(%#del%);
pick(%#bloco%);
key(use);
if(%#vel% > 0);
wait(%#vel%ms);
endif;
if(%#vel% <= 0);
wait(1t);
endif;
pick(%#pa%);
if(%DURABILITY%<%#dur%);
gui(inventory);
for(#i,9,45);
getslotitem(%#i%,#id,#stack1);
if(%#id%=%#rep%);
#repq=%#repq%+%#stack1%;
endif;
next;
wait(1);
gui();
if(%#repq%=0);
log( );
log("&6&l[VIP] &d&lCava-Cava &4(OFF) &dNão pôde reparar(ou o macro bugou e desbugou!) &f- &aAproximadamente &a%#exp% de EXP.");
log( );
else(%#repq%>0%);
#repq=0;
look(%&near%);
look(,90);
key(use);
wait(1);
#repq=0;
endif;endif;
endif;
look(%&near%);
look(,55);
if(%#vel% > 0);
do(%#vel%);
key(attack);
loop;
endif;
if(%#vel% <= 0);
key(attack);
endif;
inc(#exp, 2);
loop;
if(@cav2);
gui(inventory);
wait(1);
getslotitem(35,#id,#stack);
if(%#stack%=0);
gui();
else;
do;
wait(1);
}$$
$${ //1 linha\\ }$$
$${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;}$$
$${if(%#bau%=11);}$$
/home esc11
$${;endif;}$$
$${if(%#bau%=12);}$$
/home esc12
$${;endif;}$$
$${if(%#bau%=13);}$$
/home esc13
$${;endif;}$$
$${if(%#bau%=14);}$$
/home esc14
$${;endif;}$$
$${if(%#bau%=15);}$$
/home esc15
$${;endif;}$$
$${if(%#bau%=16);}$$
/home esc16
$${;endif;}$$
$${if(%#bau%=17);}$$
/home esc17
$${;endif;}$$
$${if(%#bau%=18);}$$
/home esc18
$${;endif;}$$
$${if(%#bau%=19);}$$
/home esc19
$${;endif;}$$
$${if(%#bau%=20);}$$
/home esc20
$${;endif;}$$
$${if(%#bau%=21);}$$
/home esc21
$${;endif;}$$
$${if(%#bau%=22);}$$
/home esc22
$${;endif;}$$
$${if(%#bau%=23);}$$
/home esc23
$${;endif;}$$
$${if(%#bau%=24);}$$
/home esc24
$${;endif;}$$
$${if(%#bau%=25);}$$
/home esc25
$${;endif;}$$
$${if(%#bau%=26);}$$
/home esc26
$${;endif;}$$
$${if(%#bau%=27);}$$
/home esc27
$${;endif;}$$
$${if(%#bau%=28);}$$
/home esc28
$${;endif;}$$
$${if(%#bau%=29);}$$
/home esc29
$${;endif;}$$
$${if(%#bau%=30);}$$
/home esc30
$${;endif;}$$
$${
keydown(JUMP);
wait(1);
keyup(JUMP);
wait(5);
key(use);
wait(1);
key(use);
wait(1);
key(use);
wait(1);
key(use);
wait(1);
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);
endif;
if(%#bau%=30);
unset(cav2);
log(&d&l[MACRO] Cava-Cava &b"Baús cheios! Voltando a escavar.");
gui();
else;
gui();
endif;
until(%#stack%=0);
}$$
/home macroesc
$${
wait(4);
endif;
endif;
gui(inventory);
wait(600ms);
for(#slot,9,35);
GETSLOTITEM(%#slot%,#id,#stack);
if((%#id%=%#pa%) || (%#id%=%#bloco%));
slotclick(%#slot%,l,true);wait(30ms);
endif;
next;
gui();
loop;
endif;
}$$
