Para instalar:
Mesma coisa de sempre escolhe uma tecla, cria um arquivo (uplenha se for usar a macro de religar) cola o codigo.
Não vips (trocando de ferramenta):
$${
if(@uplenhador);
unset(@uplenhador);
log("&d{MACRO} &6Macro lenhador&4[OFF]");
keyup(sneak);
volume(100);
stop;
else;
set(@uplenhador);
keydown(sneak);
log("&d{MACRO} &6Macro lenhador &2[ON]");
volume(0);
endif;
do();
echo(/home up);
wait(6);
ifmatches(%&d%,N);set(&dfrente,NORTH);endif();
ifmatches(%&d%,S);set(&dfrente,SOUTH);endif();
ifmatches(%&d%,E);set(&dfrente,EAST);endif();
ifmatches(%&d%,W);set(&dfrente,WEST);endif();
#slot=2;
look(%&dfrente%);
look(,30);
do;
look(%&dfrente%);
look(,30);gui;
if(%HITID%!="log");
pick(log);
key(use);
elseif(%HITID%="log");
slot(%#slot%);
do;
if(%DURABILITY%<30);
if(%#slot%=9);
log("&d{MACRO} &6Macro lenhador&4[OFF]");
unset(@uplenhador);
volume(100);
stop();
else;
inc(#slot);
wait(200ms);
slot(%#slot%);
endif;
endif;
look(90,30);
key(attack);
gui;
until(%HITID%!="log");
endif;
loop;
}$$
Vips (reparando);
$${
if(@uplenhador);
unset(@uplenhador);
log("&d{MACRO} &6Macro lenhador&4[OFF]");
keyup(sneak);
volume(100);
stop;
else;
set(@uplenhador);
keydown(sneak);
unset(@paredup);
log("&d{MACRO} &6Macro lenhador &2[ON]");
volume(0);
endif;
do();
echo(/home up);
wait(4);
ifmatches(%&d%,N);set(&dfrente,NORTH);endif();
ifmatches(%&d%,S);set(&dfrente,SOUTH);endif();
ifmatches(%&d%,E);set(&dfrente,EAST);endif();
ifmatches(%&d%,W);set(&dfrente,WEST);endif();
look(%&dfrente%);
look(,30);
do;
look(%&dfrente%);
look(,30);
gui;
if(%HITID%!="log");
pick(log);
key(use);
elseif(%HITID%="log");
slot(9);
do;
if(%DURABILITY%<30);
look(,90);
key(use);
wait(1);
if(@paredup);
log("&d{MACRO} &6Macro lenhador&4[OFF]");
unset(@uplenhador);
unset(@paredup);
volume(100);
stop();
endif;
endif;
look(%&dfrente%);
look(,30);
key(attack);
gui;
until(%HITID%!="log");
endif;
loop;
}$$
Para religar a macro automaticamente:
Coloca isso na sua onchat, antes do }$$ no final.
ifmatches(%CHATCLEAN%,"Ranking do servidor:
http://bit.ly/craftlandiaranking");
wait(3);
if(@uplenhador);
log(Macro lenhador detectada!);
log(começando a macro!);;
unset(@uplenhador);
wait(2)
exec(uplenha.txt,LENHADOR);
endif;
endif;
Para a macro versao vip: TEM QUE COLOCAR isso na onChat tbm para detectar quando acabar os dimas e a macro parar.:
ifmatches(%CHATCLEAN%,"Você precisa de mais Diamond Block");
set(@paredup);
log(sem dima!);
endif();