Olá a todos, vim aqui compartilhar meu macro de herbalismo, ele não tem nada de muito incrível se comparado aos demais e sua única diferença é que ele é capaz de reconhecer o local onde você está e volta automaticamente para a trap caso você saia dela.
Instalando o Macro
O macro pode ser colocado diretamente em uma tecla ou em um arquivo .txt, não vou ensinar o passo à passo de como colocar o código do macro no jogo, pois isto é algo simples e de conhecimento geral, caso você ainda não saiba recomendo que leia este tópico do subdiretor [member=DeathStroker] antes de começar a usar macros.
Trap
A trap precisa apenas de um bloco de areia com água ao lado, assim como os demais macros. Você pode usar sua trap atual a única coisa que será necessário é usar o comando /sethome cana em cima do bloco de areia.
Iniciando
Para iniciar o macro você deve primeiro ir para sua home cana e após estar em cima do bloco de areia ativar o macro.
Economia de Blocos
Para usar a economia de blocos basta colocar o código abaixo em OnChat:
$${IFMATCHES(%CHATCLEAN%,"Limpando itens do chao em 20s");wait(13);log(&9&l&nEsperando limpar);set(@t);wait(8);unset(@t);endif;}$$
Código
Sem mais enrolações, o macro:
1.5:
$${
IF(h);LOG("&6Herbalismo &4Off");UNSET(h);STOP;
ELSE;SET(h);LOG("&6Herbalismo &aOn");endif;
#x=%XPOS%;#z=%ZPOS%;
#it=338;
wait(1ms);
do;
do(500);look(,90);
if(@t);wait(10ms);else
if(%HITID%=83);
pick(%#it%);
key(attack);
else;
pick(%#it%);
key(use);
endif;endif;
if((%XPOS%!=%#x%) || (%ZPOS%!=%#z%));
do;wait(1);}$$/home cana$${wait(4);while((%XPOS%!=%#x%) || (%ZPOS%!=%#z%));
look(,0);
key(attack);
endif;
loop;
look(,0);
key(attack);
loop;
}$$
1.7/1.8:
$${
IF(h);LOG("&6Herbalismo &4Off");UNSET(h);STOP;
ELSE;SET(h);LOG("&6Herbalismo &aOn");endif;
#x=%XPOS%;#z=%ZPOS%;
&it=reeds;
wait(1ms);
do;
do(500);look(,90);
if(@t);wait(10ms);else
if(%HITID%=%&it%);
pick(%&it%);
key(attack);
else;
pick(%&it%);
key(use);
endif;endif;
if((%XPOS%!=%#x%) || (%ZPOS%!=%#z%));
do;wait(1);}$$/home cana$${wait(4);while((%XPOS%!=%#x%) || (%ZPOS%!=%#z%));
look(,0);
key(attack);
endif;
loop;
look(,0);
key(attack);
loop;
}$$
Erros, Bugs ou eventuais problemas é só comentar que estarei tentando solucionar.
ChangeLog:
2015/10/19 - Tópico criado.
Outro macro feito por mim:
