ENTREGUE [Macro] Pescador Vip Propano

Nugou · Nov 3, 2015

Olá Gente..

Depois de uma grande ajuda do Derozh, criamos a macro de pesca da 1.8 vip.
Demoro mais porque tivemos que fazer varios teste. (MUITOS MESMO)

LEIA ATENTAMENTE PARA A MACRO TRABALHAR CORRETAMENTE. Erros ou problemas so comentar no topico.
É preciso ter o mod autofish para funcionar

ChangeLog:

03/11/2015 --

--Criação do post

07/11/2015 --

--Modificado as macros onchat e press para funcioanr com multi contas.
--Macro principal tambem modificada para aceita o onchat.

O que ela faz?
--Pesca na warp vip somente.
--Guarda itens que você escolhe para guarda em baus infinitos.
--Repara a vara.(é preciso ter 100 em reparação)
--Volta ao lugar onde você escolhe na warp vip.
--Reconecta caso o server reinicie ou sua net cai.

[background=#181818]Como instalar?[/background]
[background=#181818]Macro de Pesca[/background]
[background=#181818]1-[/background][background=#181818]Aperte "Shift+Grave" para entrar na tela de bind do modmacro.[/background]
[background=#181818]2-[/background][background=#181818]escolha uma tecla, de preferencia que esteja cinza.[/background]
[background=#181818]3-[/background][background=#181818]na caixa preta, escolha um nome para o comando, $$<nome.txt>, em que "nome" é o nome de sua preferencia.[/background]
[background=#181818]4-[/background][background=#181818]inda na mesma tela, aperte em "arquivo" ou "edit file".[/background]
[background=#181818]5-[/background][background=#181818]na caixa preta coloque o mesmo nome que você escolheu na tela anterior, apos isso aperte em "criar".[/background]
[background=#181818]6-[/background][background=#181818]Na tela seguinte, você ira colar a macro que esta logo abaixo de acordo com sua versão.[/background]
[background=#181818]7-[/background][background=#181818]Apos colar a macro, aperte em salvar, na proxima tela aperte em salvar novamente, em bom up. [/background]
[background=#181818] [/background]
[background=#181818]A macro do onchat.[/background]
[background=#181818]1 - [/background][background=#181818]Aperte "Shift+Grave" para entrar na tela de bind do modmacro.[/background]
[background=#181818]2 - [/background][background=#181818]Aperte em uma seta que esta apontada para a direita na parte superior da tela.[/background]
[background=#181818]3 - [/background][background=#181818]Na tela seguinte, aperte em "onchat".[/background]
[background=#181818]4 - [/background][background=#181818]na caixa preta, coloque o nome de "nugou". Ficara assim: $$<nugou.txt>[/background]
[background=#181818]5 - [/background][background=#181818]Ainda na mesma tela, aperte em "arquivo" ou "edit file".[/background]
[background=#181818]6 - [/background][background=#181818]na caixa preta coloque o mesmo nome que você escolheu na tela anterior, apos isso aperte em "criar".[/background]
[background=#181818]7 - [/background][background=#181818]Na tela seguinte, você ira colar a macro que esta logo abaixo chamada onchat.[/background]
[background=#181818]8 - [/background][background=#181818]Apos colar a macro, aperte em salvar, na proxima tela aperte em salvar novamente, em bom up. [/background]

[background=#181818]Macro auxiliar "press.txt"[/background]
[background=#181818]1-[/background][background=#181818]Aperte "Shift+Grave" para entrar na tela de bind do modmacro.[/background]
[background=#181818]2-[/background][background=#181818]escolha uma tecla.[/background]
[background=#181818]3-[/background][background=#181818]aperte em "arquivo" ou "edit file".[/background]
[background=#181818]4-[/background][background=#181818]na caixa preta coloque o mesmo nome "press"(minusculo obrigatoriamente), apos isso aperte em "criar".[/background]
[background=#181818]5-[/background][background=#181818]Na tela seguinte, você ira colar a macro que esta logo abaixo.[/background]
[background=#181818]6-[/background][background=#181818]Apos colar a macro, aperte em salvar, na proxima tela aperte em salvar novamente, em bom up. [/background]

Como usar?
--Ligue a macro na posição que fique melhor para você pesca na warp vip(ligue somente na warp vip de preferencia dentro do lago). A macro irá salvar para onde está olhando e sua posição para quando ela for reparar ou guarda ela voltar para o mesmo lugar.
--Deixe sua vara no slot 1(primeiro da esquerda para a direita), a macro não irá guarda ou jogar fora.
--A macro ja guarda por padrão somente livros do tesouro, o resto(ate mesmo a vara que for pescada) tem que ser selecionada.
--A linha você pode por em qualquer lugar do inventario. (ainda não tem a função de pegar mais linha --por enquanto--)
--Toda vez que falta 3 slot para o inventario ficar cheio ela ira jogar os itens que não foram selecionados fora, se ainda continuar com 3 slot vazio ela ira guarda nos baus.
--Repara a vara quando tiver com menos de 20 de durabilidade.
--Set a home pescabau(/home pescabau) em cima do bloco de ferro de acordo com a imagem abaixo.(trap de baus a mesma das outras macros)

Video:

[youtube]https://www.youtube.com/watch?v=ChS3VP9qVXw&feature[/youtube]

Macros:
press.txt(07/11/2015) -- se você ja tem o de outra macro minha, não é necessário por denovo.

Código:

//ALFABETO
if(%@&chave[%@#idp%]%="A");press(A);endif;
if(%@&chave[%@#idp%]%="B");press( B);endif;
if(%@&chave[%@#idp%]%="C");press(C);endif;
if(%@&chave[%@#idp%]%="D");press(D);endif;
if(%@&chave[%@#idp%]%="E");press(E);endif;
if(%@&chave[%@#idp%]%="F");press(F);endif;
if(%@&chave[%@#idp%]%="G");press(G);endif;
if(%@&chave[%@#idp%]%="H");press(H);endif;
if(%@&chave[%@#idp%]%="I");press(I);endif;
if(%@&chave[%@#idp%]%="J");press(J);endif;
if(%@&chave[%@#idp%]%="K");press(K);endif;
if(%@&chave[%@#idp%]%="L");press(L);endif;
if(%@&chave[%@#idp%]%="M");press(M);endif;
if(%@&chave[%@#idp%]%="N");press(N);endif;
if(%@&chave[%@#idp%]%="O");press(O);endif;
if(%@&chave[%@#idp%]%="P");press(P);endif;
if(%@&chave[%@#idp%]%="Q");press(Q);endif;
if(%@&chave[%@#idp%]%="R");press(R);endif;
if(%@&chave[%@#idp%]%="S");press(S);endif;
if(%@&chave[%@#idp%]%="T");press(T);endif;
if(%@&chave[%@#idp%]%="U");press(U);endif;
if(%@&chave[%@#idp%]%="V");press(V);endif;
if(%@&chave[%@#idp%]%="W");press(W);endif;
if(%@&chave[%@#idp%]%="X");press(X);endif;
if(%@&chave[%@#idp%]%="Y");press(Y);endif;
if(%@&chave[%@#idp%]%="Z");press(Z);endif;
//NUMERO DO TECLADO
if(%@&chave[%@#idp%]%="1");press(1);endif;
if(%@&chave[%@#idp%]%="2");press(2);endif;
if(%@&chave[%@#idp%]%="3");press(3);endif;
if(%@&chave[%@#idp%]%="4");press(4);endif;
if(%@&chave[%@#idp%]%="5");press(5);endif;
if(%@&chave[%@#idp%]%="6");press(6);endif;
if(%@&chave[%@#idp%]%="7");press(7);endif;
if(%@&chave[%@#idp%]%="8");press(8);endif;
if(%@&chave[%@#idp%]%="9");press(9);endif;
if(%@&chave[%@#idp%]%="0");press(0);endif;
//NUMERO DO NUMLOCK
if(%@&chave[%@#idp%]%="NUMPAD1");press(NUMPAD1);endif;
if(%@&chave[%@#idp%]%="NUMPAD2");press(NUMPAD2);endif;
if(%@&chave[%@#idp%]%="NUMPAD3");press(NUMPAD3);endif;
if(%@&chave[%@#idp%]%="NUMPAD4");press(NUMPAD4);endif;
if(%@&chave[%@#idp%]%="NUMPAD5");press(NUMPAD5);endif;
if(%@&chave[%@#idp%]%="NUMPAD6");press(NUMPAD6);endif;
if(%@&chave[%@#idp%]%="NUMPAD7");press(NUMPAD7);endif;
if(%@&chave[%@#idp%]%="NUMPAD8");press(NUMPAD8);endif;
if(%@&chave[%@#idp%]%="NUMPAD9");press(NUMPAD9);endif;
if(%@&chave[%@#idp%]%="NUMPAD0");press(NUMPAD0);endif;
if(%@&chave[%@#idp%]%="NUMPADENTER");press(NUMPADENTER);endif;
if(%@&chave[%@#idp%]%="NUMLOCK");press(NUMLOCK);endif;
if(%@&chave[%@#idp%]%="DIVIDE");press(DIVIDE);endif;
if(%@&chave[%@#idp%]%="MULTIPLY");press(MULTIPLY);endif;
if(%@&chave[%@#idp%]%="ADD");press(ADD);endif;
if(%@&chave[%@#idp%]%="DECIMAL");press(DECIMAL);endif;
//TECLAS FX
if(%@&chave[%@#idp%]%="F1");press(F1);endif;
if(%@&chave[%@#idp%]%="F2");press(F2);endif;
if(%@&chave[%@#idp%]%="F3");press(F3);endif;
if(%@&chave[%@#idp%]%="F4");press(F4);endif;
if(%@&chave[%@#idp%]%="F5");press(F5);endif;
if(%@&chave[%@#idp%]%="F6");press(F6);endif;
if(%@&chave[%@#idp%]%="F7");press(F7);endif;
if(%@&chave[%@#idp%]%="F8");press(F8);endif;
if(%@&chave[%@#idp%]%="F9");press(F9);endif;
if(%@&chave[%@#idp%]%="F10");press(F10);endif;
if(%@&chave[%@#idp%]%="F11");press(F11);endif;
if(%@&chave[%@#idp%]%="F12");press(F12);endif;
//CARACTERES
if(%@&chave[%@#idp%]%="MINUS");press(MINUS);endif;
if(%@&chave[%@#idp%]%="EQUALS");press(EQUALS);endif;
if(%@&chave[%@#idp%]%="LBRACKET");press(LBRACKET);endif;
if(%@&chave[%@#idp%]%="RBRACKET");press(RBRACKET);endif;
if(%@&chave[%@#idp%]%="SEMICOLON");press(SEMICOLON);endif;
if(%@&chave[%@#idp%]%="GRAVE");press(GRAVE);endif;
if(%@&chave[%@#idp%]%="TAB");press(TAB);endif;
if(%@&chave[%@#idp%]%="CAPITAL");press(CAPITAL);endif;
if(%@&chave[%@#idp%]%="LSHIFT");press(LSHIFT);endif;
if(%@&chave[%@#idp%]%="RSHIFT");press(RSHIFT);endif;
if(%@&chave[%@#idp%]%="LCONTROL");press(LCONTROL);endif;
if(%@&chave[%@#idp%]%="RCONTROL");press(RCONTROL);endif;
if(%@&chave[%@#idp%]%="SLASH");press(SLASH);endif;
if(%@&chave[%@#idp%]%="BACKSLASH");press(BACKSLASH);endif;
if(%@&chave[%@#idp%]%="LMETA");press(LMETA);endif;
if(%@&chave[%@#idp%]%="RMETA");press(RMETA);endif;
if(%@&chave[%@#idp%]%="COMMA");press(COMMA);endif;
if(%@&chave[%@#idp%]%="PERIOD");press(PERIOD);endif;
if(%@&chave[%@#idp%]%="APOSTROPHE");press(APOSTROPHE);endif;
//SETAS
if(%@&chave[%@#idp%]%="UP");press(UP);endif;
if(%@&chave[%@#idp%]%="DOWN");press(DOWN);endif;
if(%@&chave[%@#idp%]%="LEFT");press(LEFT);endif;
if(%@&chave[%@#idp%]%="RIGHT");press(RIGHT);endif;
//TECLAS DE SISTEMA
if(%@&chave[%@#idp%]%="SYSRQ");press(SYSRQ);endif;
if(%@&chave[%@#idp%]%="SCROLL");press(SCROLL);endif;
if(%@&chave[%@#idp%]%="PAUSE");press(PAUSE);endif;
if(%@&chave[%@#idp%]%="INSERT");press(INSERT);endif;
if(%@&chave[%@#idp%]%="HOME");press(HOME);endif;
if(%@&chave[%@#idp%]%="DELETE");press(DELETE);endif;
if(%@&chave[%@#idp%]%="END");press(END);endif;
if(%@&chave[%@#idp%]%="PRIOR");press(PRIOR);endif;
if(%@&chave[%@#idp%]%="NEXT");press(NEXT);endif;
if(%@&chave[%@#idp%]%="ESCAPE");press(ESCAPE);endif;
if(%@&chave[%@#idp%]%="BACK");press(BACK);endif;
//MOUSE
if(%@&chave[%@#idp%]%="MWHEELUP");press(MWHEELUP);endif;
if(%@&chave[%@#idp%]%="MWHEELDOWN");press(MWHEELDOWN);endif;
if(%@&chave[%@#idp%]%="LMOUSE");press(LMOUSE);endif;
if(%@&chave[%@#idp%]%="RMOUSE");press(RMOUSE);endif;
if(%@&chave[%@#idp%]%="MOUSE4");press(MOUSE4);endif;
if(%@&chave[%@#idp%]%="MOUSE3");press(MOUSE3);endif;
if(%@&chave[%@#idp%]%="MIDDLEMOUSE");press(MIDDLEMOUSE);endif;

OnChat -- 07/11/2015

Código:

$${
ifmatches(%CHATCLEAN%,"^»Bem vindo de volta\. Por favor digite \/login sua-senha\.$");
if(!one);set(one);#tp=1;&player[1]=%PLAYER%;endif;
set(addplayer);
for(#p,1,%#tp%);
ifmatches(%&player[%#p%]%,%PLAYER%);
@#idp=%#p%;
unset(addplayer);
break;
endif;
next;
if(addplayer);
inc(#tp);
&player[%#tp%]=%PLAYER%;
@#idp=%#tp%;
endif;
endif;
&login="^» Craftlandia (.*) \(www.craftlandia.com.br\)$";
match(%CHATCLEAN%,%&login%,{&a});
if(@reiniciar);
ifmatches(%CHATCLEAN%,"\[Server\] Servidor será reiniciado em \[2\] minutos\.");
log(&6[Macro]&b Servidor sendo reiniciado em 2 minutos);
set(@rs);
set(espe);
log(&6[Macro]&b Pausando Macro!!! Aguardando...);
do;gui();wait(1);until(%GUI%="NONE");
wait(60);
log(&6[Macro]&b Servidor sendo reiniciado em 1 minutos);
wait(49);
#time=10;
do(10);
log(&6[Macro]&b Servidor sendo reiniciado em &6%#time% &bsegundos);
wait(1);
dec(#time);
loop;
endif;
if(espe);
if((%&a%="Titan-1")|(%&a%="Titan-2")|(%&a%="Minecraft"));
log(&6[Macro]&b Aguardando 10 segundos....);
wait(10);
unset(espe);
log(&6[Macro]&b Termino da pausa!!!);
log(&6[Macro]&b Continuando Macro...);
unset(@rs);
set(@exit);
else;
ifmatches(%CHATCLEAN%,"^»Agora você está logado\. NUNCA (.*)");
unset(espe);
log(&6[Macro]&b Termino da pausa!!!);
log(&6[Macro]&b Continuando Macro...);
unset(@rs);
set(@exit);
endif;
endif;
endif;
endif;
if(@limpeza);
ifmatches(%CHATCLEAN%,"^\[Server\] » Limpando itens do chao em 5s$");
set(@lc);
log(&6[Macro]&b Servidor limpando o chão!!!);
log(&6[Macro]&b Pausando Macro!!! Aguardando...);
gui();
#time=5;
do(5);
if(%#time%!=1);
log(&6[Macro]&b Limpando em %#time% segundos);
else;
log(&6[Macro]&b Limpando em %#time% segundo);
endif;
dec(#time);
wait(1);
loop;
log(&6[Macro]&b Aguardando 3 segundos!!!);
wait(3);
log(&6[Macro]&b Termino da pausa!!!);
log(&6[Macro]&b Continuando Macro...);
unset(@lc);
set(@exit);
endif;
endif;
if(@livro);
&teso = "^\[Tesouro\] %PLAYER% encontrou um livro\: Tesouro Nível ([0-9]+)$";
ifmatches(%CHATCLEAN%,%&teso%);
inc(@#tesouro);
@&hora[%@#tesouro%] = %DATETIME%;
set(@pl);
endif;
else;
@#tesouro=0;
endif;
if(@rec);
&login = "^»Agora você está logado\. NUNCA (.*)";
ifmatches(%CHATCLEAN%,%&login%);
#i=100;
log(&6[Macro]&b Seu login foi efetuado!);
do;
clearchat;
log(&6[Macro]&b Ativando macro em %#i%);
log(&6[Macro]&b Para cancela pressione "ESC");
if(KEY_ESCAPE);
unset(@rec);
unset(at);
break;
else;
set(at);
endif;
if(#i=0);
break;
endif;
dec(#i);
loop;
if(at);
unset(at);
do;gui(macroplayback);wait(3);log(&6[Macro]&b Desativando macro! Aguarde...);exec(press.txt);wait(1);until(!@rec);
log(&6[Macro]&b Macro desativada!);
if(@pergunta);unset(@pergunta);set(@des);endif;
do;gui(macroplayback);wait(3);log(&6[Macro]&b Ativando macro! Aguarde...);exec(press.txt);wait(1);until(@rec);
log(&6[Macro]&b Macro reativada com sucesso!);
gui();
endif;
endif;
endif;
if(@pv);
ifmatches(%CHATCLEAN%,"^» Ei.. Você já está nesse mundo!$");
set(@home);
endif;
endif;
if(@mob);
ifmatches(%CHATCLEAN%,"^Voce recebeu 1 coin\(s\) por ter ajudado a acabar com o mal!$");
inc(@#mob);
log(sim);
endif;
else;
@#mob=0;
endif;
}$$

Pescador VIP Propano -- 07/11/2015

Código:

$${
if(vip);
log(&6[Macro]&b Pescador Vip Propano &4[Off]);
unset(vip);
unset(@pv);
unset(@rec);
unset(@des);
set(reload);
stop;
else;
set(vip);
set(@rec);
set(@pv);
set(@pergunta);
@&chave[%@#idp%]=%KEYNAME%;
if(!@des);
if(reload);
unset(reset);set(&cor[1],&6&l»);set(&cor[2],&0);set(p1);
do;
clearchat;
log(&b====&6Continuar de onde paro?&b====);
log( &61 &b- %&cor[1]%Sim &f--- %&cor[2]%Não );
log( &60 &b- &fContinuar);
if(KEY_1);wait(1ms);if(!p1);set(&cor[1],&6&l»);set(&cor[2],&0);unset(reset);set(p1);set(reload);else;set(&cor[1],&0);set(&cor[2],&6&l»);unset(p1);unset(reload);set(reset);endif;endif;
if(KEY_0);break;endif;
loop;
else;
set(reset);
endif;
if(reset);
&guar=none;
&guarda=written_book;
do;
prompt(&guar,$$i,Selecione os itens para guardar! (Digite 0 para sair));
ifmatches(%&guar%,air|0|none);
break;
else;
&guarda=%&guarda%|%&guar%;
endif;
loop;
ifmatches(%DIRECTION%,N);&dir=north;endif;
ifmatches(%DIRECTION%,S);&dir=south;endif;
ifmatches(%DIRECTION%,W);&dir=west;endif;
ifmatches(%DIRECTION%,E);&dir=east;endif;
#xp=%XPOS%;
#zp=%ZPOS%;
#yaw=%YAW% + 180;
#pitch=%PITCH%;
endif;
#temp=0;
#bau=4;
#fil=1;
endif;
log(&6[Macro]&b Pescador Vip Propano &2[On]);
log(&6[Macro]&b Coordenadas Gravadas:);
log(&6&lX: &b%#xp%);
log(&6&lZ: &b%#zp%);
set(jog);
do;
do;
look(%&dir%);
look(%#yaw%,%#pitch%);
inc(#temp);
if(%#temp%>=50);
#vazio = 0;
do;gui(inventory);wait(1);until(%GUI%="GUIINVENTORY");
#temp=0;
for(#i,9,44);
look(%&dir%);
look(%#yaw%,%#pitch%);
slot(1);
if(jog);unset(jog);wait(1);slot(1);key(use);endif;
getslotitem(%#i%,&id);
ifmatches(%&id%,air);
inc(#vazio);
endif;
if(%GUI%="NONE");#vazio=4;break;endif;
next;
if(%#vazio%<=3);
break;
gui();
endif;
gui();
endif;
if((%XPOS%!=%#xp%)|(%ZPOS%!=%#zp%));
set(repos);
unset(reparar);
unset(guarda);
#vazio=4;
gui();
break;
endif;
if(%DURABILITY%<20);
#vazio=4;
set(reparar);
gui();
break;
endif;
loop;
if(%#vazio%<=3);
look(%#yaw%,%#pitch%);
do;gui(inventory);wait(1);until(%GUI%="GUIINVENTORY");
for(#i,9,44);
getslotitem(%#i%,&id);
ifmatches(%&id%,%&guarda%|string);else;
if(%#i%!=36);slotclick(%#i%);endif;
slotclick(-999);
wait(100ms);
endif;
next;
#vazio = 0;
for(#i,9,44);
getslotitem(%#i%,&id);
ifmatches(%&id%,air);
inc(#vazio);
endif;
next;
if(%#vazio%<=3);
set(guarda);
endif;
endif;
if(reparar);
unset(reparar);
#x=%XPOS%;#z=%ZPOS%;
do;
}$$/home pescabau$${
wait(10);
until((%XPOS%!=%#x%)|(%ZPOS%!=%#z%));
keydown(jump);wait(1);keyup(jump);wait(1);
look(,90);
do(3);slot(1);key(use);key(attack);loop;
set(repos);
endif;
if(guarda);
unset(guarda);
gui();
#x=%XPOS%;#z=%ZPOS%;
do;
}$$/home pescabau$${
wait(10);
until((%XPOS%!=%#x%)|(%ZPOS%!=%#z%));
keydown(jump);wait(1);keyup(jump);wait(1);
#x = %XPOS%;
#z = %ZPOS%;
do;
#exit = 0;
do;
ifmatches(%DIRECTION%,N);getidrel(0,%#bau%,-2,&vbau);&dir_bau=North;#pos = %XPOS%;#posf = %#x% + (%#fil% - 1);endif;
ifmatches(%DIRECTION%,S);getidrel(0,%#bau%,2,&vbau);&dir_bau=South;#pos = %XPOS%;#posf = %#x% - (%#fil% - 1);endif;
ifmatches(%DIRECTION%,W);getidrel(-2,%#bau%,0,&vbau);&dir_bau=West;#pos = %ZPOS%;#posf = %#z% - (%#fil% - 1);endif;
ifmatches(%DIRECTION%,E);getidrel(2,%#bau%,0,&vbau);&dir_bau=East;#pos = %ZPOS%;#posf = %#z% + (%#fil% - 1);endif;
look(%&dir_bau%);
if(%#bau% = 4);look(,-62);endif;
if(%#bau% = 3);look(,-50);endif;
if(%#bau% = 2);look(,-25);endif;
if(%#bau% = 1);look(,0);endif;
if(%#bau% = 0);look(,35);endif;
if(%#pos% != %#posf%);keydown(right);keydown(sneak);endif;
until(%#pos% = %#posf%);
wait(100ms);
keyup(right);
keyup(sneak);
wait(1);
if((%&vbau%="chest")|(%&vbau%="trapped_chest"));
do;key(use);wait(5);until(%GUI% = "GUICHEST");
wait(1);
#sbv = 0;
for(#i,0,53);
getslotitem(%#i%,&id);
if(%&id% = "air");
#sbv = 1;
break;
endif;
next;
if(%#sbv% = 1);
for(#i,54,89);
getslotitem(%#i%,&id);
ifmatches(%&id%,%&guarda%);
if(%#i%!=81);slotclick(%#i%,l,true);endif;
wait(150ms);
endif;
next;
#exit = 0;
for(#i,0,53);
getslotitem(%#i%,&id);
if(%&id% = "air");
#exit = 1;
break;
endif;
next;
if(%#exit% = 0);
dec(#bau);
gui();
if(%#bau% = -1);
#bau = 4;
inc(#fil);
endif;
endif;
gui();
else;
dec(#bau);
if(%#bau% = -1);
#bau = 4;
inc(#fil);
endif;
gui();
endif;
else;
log(&6[Macro]&b Acabo os baus!!!);
log(&6[Macro]&b Pesca Vip &4[Off]);
unset(vip);
stop;
endif;
until(%#exit% = 1);
set(repos);
endif;
if(repos);
unset(repos);
log(&6[Macro]&b Voltando para o pesqueiro....);
wait(1);
#x=%XPOS%;#z=%ZPOS%;
do;
}$$/warp vip$${
wait(10);
if(@home);
unset(@home);
do(5);
}$$/spawn$${
wait(5);
until((%XPOS%!=%#x%)|(%ZPOS%!=%#z%));
wait(10);
endif;
until((%XPOS%=702)&&(%ZPOS%=656));
keydown(jump);wait(1);keyup(jump);
do;
sprint;
keydown(forward);
look(south);
getidrel(0,0,1,&bl);if(%&bl%!="air");keydown(jump);else;keyup(jump);endif;
if(%ZPOS%>=892);keydown(sneak);else;keyup(sneak);endif;
until(%ZPOS%=895);
unsprint;keyup(forward);keyup(sneak);keyup(jump);
do;
calcyawto(%#xp%,%#zp%,#vist);#vist=%#vist%+180;
look(%#vist%,0);
keydown(forward);
keydown(jump);
getidrel(0,0,1,&bl1);getidrel(0,1,1,&bl2);if((%&bl1%="log")|(%&bl2%="log"));keydown(right);else;keyup(right);endif;
until((%XPOS%=%#xp%)&&(%ZPOS%=%#zp%));
keyup(forward);keyup(sneak);keyup(jump);
gui(inventory);
slot(1);
set(jog);
endif;
loop;
endif;
}$$

[background=#181818] [/background]

R3M4G · Nov 3, 2015

bom macro

first

NickTtesla · Nov 3, 2015

second

DET0NA · Nov 3, 2015

#terceiro

bom macro x.d

Mosby · Nov 3, 2015

Vou testa-la

Alisson Deivison Silva · Nov 3, 2015

Testei e: Quando a isca é fisgada não acontece nada, isto é, a vara não é recolhida para pescar o item.

zSamucaGotter · Nov 3, 2015

Aeeeee, até que enfim saiu.. vou usar

zEnderguyGamer2 · Nov 3, 2015

Boa macro, eu tava precisando, vou testar :3

BonoVox · Nov 4, 2015

bom macro vai ajudar muita gente

Nugou · Nov 4, 2015

iGrox disse:
Testei e: Quando a isca é fisgada não acontece nada, isto é, a vara não é recolhida para pescar o item.

Mas aí e preciso do mod auto fish, por não tem outra maneira de pesca sem ser assim. Pelo menos eu acho

Enviado de meu XT1078 usando Tapatalk

FantasyGS · Nov 4, 2015

Pena q nao sou vip, mas toma um like pq deve ter dado trabalho [emoji14]

Enviado de meu GT-S7390L usando Tapatalk

Gavstriky · Nov 4, 2015

Vou testar

douglasm123456 · Nov 4, 2015

Boa vou testa.

douglasm123456 · Nov 4, 2015

Nugou disse:
Mas aí e preciso do mod auto fish, por não tem outra maneira de pesca sem ser assim. Pelo menos eu acho

Enviado de meu XT1078 usando Tapatalk

To testando ele vai pro pesqueiro de boa mas tem um erro, eu coloquei pra pesca no pesqueiro da direita ele entro no primeiro lago e nao consegui sair pra ir pro lago da direita ta bugado. E eu quero saber se ele troca a vara. pq tenho conta com 82 de rep e não quero upa rep nela kk, queria que ela so trocasse de vara sem precisar repara a macro faz isso ?

Anderson13fs · Nov 4, 2015

Amei, concerveja vou usar.

Queiroz21 · Nov 4, 2015

Seria bom fazer para não VIPs né

Anderson13fs · Nov 4, 2015

Minha net caiu e quando voltou só ficava 'desativando macro! Aguarde' e nada de iniciar, fica só repetindo essa mensagem.

Passou dois minutos, ai eu tive que liga-la manualmente. o Onchat n esta com algum erro? (instalei tudo certinho)

Aproveita e corrija os erros de português do tópico, e diz que precisa ter o mod auto-fish

Karate · Nov 4, 2015

boaa !

yFeosBANIDUU · Nov 4, 2015

Aki bugou e tenho, nao uso mais flw

douglasm123456 · Nov 4, 2015

iDanFOGUETE disse:
Aki bugou e tenho, nao uso mais flw

Se tem macro de upa na warp vip sem ser esse? Que limpe o inv sem ser o do casal win?

Enviado de meu LG-D805 usando Tapatalk

ENTREGUE [Macro] Pescador Vip Propano

Bem-vindo!

Excelente

Neutro

Excelente

Hardcore

Craftlandiano

Razoavel

Razoavel

Bom

Neutro

Excelente

Craftlandiano

Hardcore

Excelente

Excelente

Bom

Neutro

Bom

Mito

Bom

Excelente

Users who are viewing this thread

Estatísticas online

Em alta

Novos membros

Stay Connected