ENTREGUE UPAR REPARAÇÃO VIP - MELHOR MACRO

SALVE GALERA AKI QUEM FALA EO Xynergy do REGION 2.0

To trazendo essa macro pra vocês ae galera, que upa reparação rapidão com pá de pedra encantada com eficiencia 4 ou 5 então vamos la.

assim devera ficar seu inventario com o materia de rep nos primerios e o material de escavação no resto e pa no hotbar 1

e assim devera ficar a trap com o bloco de ferro em baixo.

codigo da macro:

$${
if(cav);
unset(cav);
log( );
log("&6&l[VIP] &1Cava-Cava &4(OFF) &f- &aAproximadamente &a%#exp% de EXP.");
log( );
unset(@cav);
unset(@autoesc);
stop();
else;
set(cav);
log( );
log("&6&l[VIP] &1Cava-Cava &2(ON)");
log( );
set(@cav);
set(@autoesc);
IFMATCHES(%DIRECTION%,N);&near = NORTH;ENDIF;
IFMATCHES(%DIRECTION%,S);&near = SOUTH;ENDIF;
IFMATCHES(%DIRECTION%,W);&near = WEST;ENDIF;
IFMATCHES(%DIRECTION%,E);&near = EAST;ENDIF;
#nether = 0;
#exp = 0;
#bau = 1;
#repq=0;
&rep="cobblestone";
&pa="stone_shovel"
&bloco="sand";
look(%&near%);
look(,71);
set(cav2);
do;
do(350);
pick(%&bloco%);
key(use);
wait(1ms);
pick(%&pa%);
if(%DURABILITY%<30);
gui(inventory);
for(#i,9,45);
getslotitem(%#i%,&id,#stack2);
if(%&id%=%&rep%);
#repq=%#repq%+%#stack2%;
endif;
next;
wait(1);
gui();
if(%#repq%=0);
log( );
log("&6&l[VIP] &d&lCava-Cava &4(OFF) &dNão pôde reparar &f- &aAproximadamente &a%#exp% de EXP.");
log( );
unset(@cav);
unset(cav);
unset(cav2);
stop();
else(%#repq%>0%);
#repq=0;
look(%&near%);
look(,90);
key(use);
wait(2);
#repq=0;
endif;
endif;
endif;
look(%&near%);
look(,71);
if(%HITID%=%&bloco%);
key(attack);
inc(#exp, 1);
elseif(%HITID%="cake");
do(30);
look(%&near%);
look(,71);
key(attack);
wait(0.00000001ms);
loop;
elseif(%HITID%="netherrack");
do(80);
look(%&near%);
look(,71);
key(attack);
wait(0.00000001ms);
loop;
endif;
loop;
if(cav2);
gui(inventory);
wait(1);
getslotitem(35,&ida,#stack);
if(%#stack%=0);
else;
unset(@cav);
wait(1);
}$$ /home macroesc $${
endif;//esse
endif;
gui(inventory);
wait(600ms);
for(#cli,36,45);
getslotitem(%#cli%,&ida,#stack);
if((%&ida%=%&bloco%)||(%&ida%=%&pa%));
else;
slotclick(%#cli%,l,true);
wait(50ms);
endif;
next;
wait(400ms);
for(#slot,9,35);
GETSLOTITEM(%#slot%,&id,#stack);
if((%&id%=%&pa%) || (%&id%=%&bloco%));
slotclick(%#slot%,l,true);
wait(30ms);
endif;
next;
getslotitem(35,&id35,#stack35);
if((%&id35%=%&bloco%)||(%&id35%=%&rep%));
slotclick(35,l,false);
wait(200ms);
slotclick(34,l,false);
wait(300ms);
endif;
gui();
loop;
endif;
}$$


DA UM GOSTEI SE GOSTO, PRA MIM AJUDAR. CREDITOS A MIM : xynergy