ENTREGUE [Macro] Melhor macro de Pesca? Sem Homes! 27/10/13

top parabens

 

Uns dos primeiros macros de Pesca organizada [emoji14]

 

ó timo <3 agora posso upar no TiTan
By: [Wod] Hwadb

 

ótima macro

 

Belo macro! Curti muito, estou usando ele e é bem eficiente!

 

Valeu seu dlç =D

 

Boa. 'p'

 

Otimo macro

 

1 dos melhores macro de pesca recomendo pra quem tem o nivel 100 em reparação -----------------------------------------------------------------_ ^
|

 

Macro bem eficiente funciona muito bem macro super boa parabéns :thanks:

 

da para usar no servidor propano?

 

Boa macro ..

 

Vou testa lek

Enviado de meu GT-S5310B usando Tapatalk

 

bom macro para iniciantes !

 

PQ NAO CONSIGO PEGA PEIXE ? QUEBRA A VARA MAIS NAO VEM NADA TENTEI SO UMA VEZ

 

sdds quando pescava com esse macro velhos tempos...

 

Ajudou muito vlw ai

 

Não sei se é só aqui, mas mesmo com 9 varas na hotbar, ele não está trocando automaticamente. ele simplesmente para e dá a mensagem que as varas acabaram.

 

Bom macro

Enviado de meu GT-S7392L usando Tapatalk

 

Ótima macro de pesca, uso há muito tempo , só uma observação: Houve uma atualização(01/05/2015) no sistema de homes e agora o /sethome não pode ser marcado no canto do bloco, gostaria que você alterasse o look dos baus para melhor uso da macro. Segue uma edição do macro que eu mesmo fiz:

Para mais de 100 em reparação:

Spoiler

$${
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;
}$$

Para menos de 100 em reparação:

Spoiler

$${
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;
}$$

PS: Acho que são as macros do post antigo mas funciona perfeitamente aqui.