ENTREGUE UPAR REPARAÇÃO VIP - MELHOR MACRO

Bem-vindo!

Ao se registrar conosco, você poderá discutir, compartilhar e enviar mensagens privadas com outros membros da nossa comunidade.

Registrar agora!
  • PROMOÇÃO DE NATAL NO AR

    Novo servidor: CraftLandia Olimpo


Status
Não está aberto para novas respostas.

ManMarco

Neutro
VIP
Entrou
Jun 16, 2015
Mensagens
29
Pontuação de reação
5
Cubos
0
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
2s1oyvm.png

149qwia.png
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
 
Boa lek, funfo 100% aki muito bom mesmo!

Enviado do meu LG-E455 através de Tapatalk
 
prefiro com enxadas .... vou testar esse segunda (quando meu vip chegar)
 
Status
Não está aberto para novas respostas.

Usuários que estão visualizando este tópico

Voltar
Topo