ENTREGUE [MACRO] Melhor macro de Pesca? Sem Homes! 09/12/17

Bem-vindo!

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

Inscreva-se agora!
Status
Não está aberto para novas respostas.

Galinha

Excelente
Entrou
Jun 20, 2014
Mensagens
1,820
Cubos
0


Aviso

Esta macro de pesca foi criada originalmente por [member=Phodalao], como houveram alterações no sistema de homes e o criador original não programa mais macros, a macro atualmente não funciona corretamente.

Como usei bastante esta macro gostaria de retribuir de alguma forma, resolvi atualizar a macro, embora existam macros mais complexas, esta macro funciona muito bem para quem tem poucos níveis de habilidade em pesca, ou ainda começou com poucos itens para fazer um pesqueiro maior.



Olá pessoal do fórum, vim por meio deste tópico atualizar uma macro bem útil para quem está começando nos servidores e tem pouco nível na habilidade pescador, tinham alguns posts no tópico original falando que a macro não estava olhando corretamente para os baús então resolvi concertar, no mais a macro funciona agora.

Link do tópico original: http://forum.craftlandia.com.br/ipb/index.php?/topic/210158-macro-melhor-macro-de-pesca-sem-homes-271013/

Leia o tópico original sobre como a macro funciona. Mas o que mudou? E como uso esta macro?

1. A home de pesca é sempre salva no meio do bloco, isto é, é só olhar para o NORTE e salvar a home.
2. O código para olhar os baús não é mais necessário, mas foi usado para atualizar a macro.

Macro para quem possui 99 ou menos em Reparação:
  • Deixe somente varas de pescar na hotbar pois não se pode reparar a vara de pescar
  • A macro vai pescar até suas varas quebrarem
$${
if(x);
log("&8[MACRO] O Macro foi &cDESLIGADO&8!");
log("&8Foram pescados &c%#peixe% &8peixes.");
unset(x);
stop();
else;
log("&8[MACRO] O Macro acaba de ser ligado &c

%PLAYER%&8.");
set(x);
#peixe=0;#bau=1;#rep=0;#slot=1;
ifmatches(%DIRECTION%,N);&dir=NORTH;endif;
ifmatches(%DIRECTION%,S);&dir=SOUTH;endif;
ifmatches(%DIRECTION%,W);&dir=WEST;endif;
ifmatches(%DIRECTION%,E);&dir=EAST;endif;
gui(INVENTORY);
do;
do(100);
if(%DURABILITY%<15);
if(%#slot%=10);log("&8Suas varas acabaram,

&cdesligando&8...");
STOP;endif;
inc(#slot,1);
endif;
pick(346);
look(%&dir%);
look(,-90);
key(use);
loop;
ifmatches(%GUI%,None);gui(INVENTORY);wait

(100ms);endif;
getslotitem(35,#id,#stack);
if(%#stack%=0);
else;
do;
if(%#bau%=1);look(%&dir%);look(0,35);endif;
if(%#bau%=2);look(%&dir%);look(30,30);endif;
if(%#bau%=3);look(%&dir%);look(60,30);endif;
if(%#bau%=4);look(%&dir%);look(90,35);endif;
if(%#bau%=5);look(%&dir%);look(120,45);endif;
if(%#bau%=6);look(%&dir%);look(180,60);endif;
if(%#bau%=7);look(%&dir%);look(270,60);endif;
if(%#bau%=8);look(%&dir%);look(330,45);endif;
if(%#bau%=9);look(%&dir%);look(330,0);endif;
if(%#bau%=10);look(%&dir%);look(270,0);endif;
if(%#bau%=11);look(%&dir%);look(60,0);endif;
if(%#bau%=12);look(%&dir%);look(90,0);endif;
wait(1);
key(use);
wait(3);
for(#i,54,80);
getslotitem(%#i%,#id,#item);
if(%#id%=349);
#peixe=%#peixe%+%#item%;
endif;
slotclick(%#i%,l,true);
wait(90ms);
next;
getslotitem(53,#id,#stack);
if(%#stack%!=0);inc(#bau,1);endif;gui;
until(%#stack%=0);
endif;
loop;
endif;
}$$

Macro para quem possui 100 ou mais em Reparação:
  • Deixe uma ou duas varas de pescar na hotbar e o restante com linhas
  • A macro vai pescar e reparar enquanto houver linhas
$${
if(x);
log("&8[MACRO] O Macro foi &cDESLIGADO&8!");
log("&8Foram pescados &c%#peixe% &8peixes.");
log("&8A vara foi reparada &c%#rep% &8vezes.");
unset(x);
stop();
else;
log("&8[MACRO] O Macro acaba de ser ligado &c%PLAYER%&8.");
set(x);
#peixe=0;#bau=1;#rep=0;#slot=1;
ifmatches(%DIRECTION%,N);&dir=NORTH;endif;
ifmatches(%DIRECTION%,S);&dir=SOUTH;endif;
ifmatches(%DIRECTION%,W);&dir=WEST;endif;
ifmatches(%DIRECTION%,E);&dir=EAST;endif;
gui(INVENTORY);
do;
do(100);
if(%DURABILITY%<15);
do(7);
look(%&dir%);
look(,90);
key(use);
wait(100ms);
loop;
inc(#rep,1);
endif;
pick(346);
look(%&dir%);
look(,-90);
key(use);
loop;
ifmatches(%GUI%,None);gui(INVENTORY);wait(100ms);endif;
getslotitem(35,#id,#stack);
if(%#stack%=0);
else;
do;
if(%#bau%=1);look(%&dir%);look(0,35);endif;
if(%#bau%=2);look(%&dir%);look(30,30);endif;
if(%#bau%=3);look(%&dir%);look(60,30);endif;
if(%#bau%=4);look(%&dir%);look(90,35);endif;
if(%#bau%=5);look(%&dir%);look(120,45);endif;
if(%#bau%=6);look(%&dir%);look(180,60);endif;
if(%#bau%=7);look(%&dir%);look(270,60);endif;
if(%#bau%=8);look(%&dir%);look(330,45);endif;
if(%#bau%=9);look(%&dir%);look(330,0);endif;
if(%#bau%=10);look(%&dir%);look(270,0);endif;
if(%#bau%=11);look(%&dir%);look(60,0);endif;
if(%#bau%=12);look(%&dir%);look(90,0);endif;
wait(1);
key(use);
wait(3);
for(#i,54,80);
getslotitem(%#i%,#id,#item);
if(%#id%=349);
#peixe=%#peixe%+%#item%;
endif;
slotclick(%#i%,l,true);
wait(90ms);
next;
getslotitem(53,#id,#stack);
if(%#stack%!=0);inc(#bau,1);endif;gui;
until(%#stack%=0);
endif;
loop;
endif;
}$$

Macro para olhar para os baús (não necessário, mas use caso queira editar novamente):
  • Somente olha para os baús.
$${
if(x);
log("&4[Macro] OFF);
unset(x);
stop();
else;
log("&d[Macro] ONN");
set(x);
look(%&dir%);look(0,35);
wait(1);
look(%&dir%);look(30,30);
wait(1);
look(%&dir%);look(60,30);
wait(1);
look(%&dir%);look(90,35);
wait(1);
look(%&dir%);look(120,45);
wait(1);
look(%&dir%);look(180,60);
wait(1);
look(%&dir%);look(270,60);
wait(1);
look(%&dir%);look(330,45);
wait(1);
look(%&dir%);look(330,0);
wait(1);
look(%&dir%);look(270,0);
wait(1);
look(%&dir%);look(60,0);
wait(1);
look(%&dir%);look(90,0);
stop();
}$$

Recomendo conseguir 100 em reparação antes de pescar porque reparando a vara de pesca é bem mais prático e gasta menos linhas (duas para se fazer mais três gravetos contra somente uma linha para reparar dependendo do seu nível em reparação).

E isso pessoal, qualquer dúvida, sugestão, correção, podem postar abaixo, como instalar macros e fazer o pesqueiro já existem tópicos excelentes no fórum, dê uma olhada.

Créditos: [member=Phodalao] criador original da macro, [member=Galinha] tópico de revisão da macro.
 
Status
Não está aberto para novas respostas.

Users who are viewing this thread

Voltar
Topo