ENTREGUE [Macro] Colheita Hiper Feliz

Partiu, colocar no lugar do antigo

 

Otimo macro!!!!
Testado e Aprovado... Recomendo.
Parabéns.

 

Belo macro
Vou testar
Parabéns

 

Excelente macro, a espera do paradise para poder testar

 

top <3 , ótima macro

 

Boa, como sempre ótimos macro, UP

 

Testei e está perfeito.

Você deve estar usando sprint ou poção de velocidade, acho que qualquer um dos dois deve afetar o bom funcionamento do macro.

 

Como sempre se superando, parabéns ao Sub e aos demais que de alguma forma ajudaram

 

Vou testar...

@Edit: Dúvida: os baús tem que estar em cima de soulsand ou pode ser um outro bloco qualquer?

 

Boa bem melhor que o outro parabens

 

Boa

 

ótimo macro vlw *-*

 

Assim que chegar do serviço testo la em casa.

 

Da pra adaptar pra 2 andares?

Alguem ve se esse script ta certo? eu msm editei

Spoiler

$${
if(z);
log("&4[Macro] Colheita Hiper Feliz [OFF]");
keyup(FORWARD);
unset(z);
stop();
else;
log("&2[Macro] Colheita Hiper Feliz [ON]");
set(z);
endif;
&d=%DIRECTION%;
ifmatches(%&d%,N);&d=NORTH;endif;
ifmatches(%&d%,S);&d=SOUTH;endif;
ifmatches(%&d%,E);&d=EAST;endif;
ifmatches(%&d%,W);&d=WEST;endif;
do;
slot(9);wait(100ms);
look(%&d%);wait(100ms);
look(,90);wait(100ms);
key(ATTACK);wait(100ms);
look(,65);wait(100ms);
do;
if((%HITID%=88)|(%HITID%=115));
keydown(FORWARD);
key(ATTACK);wait(100ms);
else;
keyup(FORWARD);
BREAK;
endif;
loop;
look(+180,);wait(100ms);
look(,90);wait(100ms);
pick(372);wait(100ms);
do(3);key(USE);loop;wait(100ms);
look(,65);wait(100ms);
do;
pick(372);
if((%HITID%=88)|(%HITID%=115));
keydown(FORWARD);
key(USE);
wait(100ms);
else;
keyup(FORWARD);
BREAK;
endif;
loop;
key(USE);
wait(1);
for(#i,54,88);
getslotitem(%#i%,#id,#stack);
if(%#id%=372);
slotclick(%#i%,l,true);
wait(50ms);
endif;
next;
gui();
look(-90,);wait(100ms);
if((%HITID%=88)|(%HITID%=115));
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
do;
wait(10ms);
until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%-1));
wait(150ms);
keyup(FORWARD);
else;
}$$/home andar2$${
wait(8);
ifmatches(%&d%,N);&d=NORTH;endif;
ifmatches(%&d%,S);&d=SOUTH;endif;
ifmatches(%&d%,E);&d=EAST;endif;
ifmatches(%&d%,W);&d=WEST;endif;
do;
slot(9);wait(100ms);
look(%&d%);wait(100ms);
look(,90);wait(100ms);
key(ATTACK);wait(100ms);
look(,65);wait(100ms);
do;
if((%HITID%=88)|(%HITID%=115));
keydown(FORWARD);
key(ATTACK);wait(100ms);
else;
keyup(FORWARD);
BREAK;
endif;
loop;
look(+180,);wait(100ms);
look(,90);wait(100ms);
pick(372);wait(100ms);
do(3);key(USE);loop;wait(100ms);
look(,65);wait(100ms);
do;
pick(372);
if((%HITID%=88)|(%HITID%=115));
keydown(FORWARD);
key(USE);
wait(100ms);
else;
keyup(FORWARD);
BREAK;
endif;
loop;
key(USE);
wait(1);
for(#i,54,88);
getslotitem(%#i%,#id,#stack);
if(%#id%=372);
slotclick(%#i%,l,true);
wait(50ms);
endif;
next;
gui();
look(-90,);wait(100ms);
if((%HITID%=88)|(%HITID%=115));
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
do;
wait(10ms);
until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%-1));
wait(150ms);
keyup(FORWARD);
else;
}$$/home inicio$${
wait(8);
endif;
loop;
}$$

 

e se a pikareta for quebrar faz ok o macro ?

 

Ferramenta não gasta com colheita.

 

Agr sim melhoro Parabens !

 

Very very good !

 

irei testar