Precisa de 100 em reparação....Se não tiver me passa e dou um macro para upar...demora só um dia ou menos...depende da vontade
Ola a todos....
--Edit--
02/03/2015--14:59
--Criação do post...
02/03/2015--21:05
--Correção de bug ao encher todos os baus de minerio e disco e não jogar fora depois....
--Correção de log's...
03/03/2015--18:03
--Varios Bug's Corrigidos e melhoria na pesca, agora sem delay quando pescando.....
05/03/2015--08:13
--Corrigido os erros de codigo do log...
Macro não totalmente autentica minha, local tirado do "Pesca Organizada 2", assim tendo alguns porcento dos créditos do meu macro.....
Tinha anunciado que consegui fazer a macro guarda somente p4 e itens encantados, porém tive problemas em meu pc, além disso
agora estou fazendo faculdade então meio que estou sem tempo agora...
Agora sem falar muito do que aconteceu, vamos para o macro....
Como ela funciona?
Praticamente idêntica ao Pesca Organizada 2,
porém com a função de guarda somente p4 e itens encantados (objetivo principal da macro).
Ela utiliza as homes do pesca organizada, assim facilitando, já que não precisa quebrar nada !!!
Além disso, ela vende peixes,e claro, disco também.....
Ela possue 2 versões, uma em
ingles e outra em
portugues...
Sendo que a em
portugues pode acontecer erros(raros), na hora de verificar encantamentos, já no
ingles está funcionando 100%.
ERROS POSSIVEIS NO PORTUGUES:
ALGUNS PARTES DE ARMADURAS PODERAM NÃO SER GUARDADAS.
ERROS GERAIS, NÃO COMPROVADOS OU NÃO OCORRIDOS NOS TESTE:
VENDER PEIXES OU VENDER DISCO.
CASO ALGUM ERRO ACONTECE AVISE-ME IMEDIATAMENTE....
ATENÇÃO:
PARA USAR A
MACRO EM INGLES, VOCÊ DEVERÁ MUDAR A LINGUAGEM DO MINECRAFT PARA
ENGLISH(US).
Outras funções...
Ela tem uma especie de "log", informa a quantidade de peixe, ferramentas, armaduras, tesouros, disco, minerios guardados e money ganho na venda de peixe e disco....
Ela possue 2 atalhos, sendo eles:
Guarda itens, antes de encher o inventario.
Guarda e Vender,
antes de encher o inventario e/ou antes dos baus de peixe e disco estiverem cheios.
Ela possui o "MODO PAUSA",
você pode parar de pesca e ir, talvez, pegar mais linha sem precisa desligar a macro..
Como usar?
Se quiser vender peixe na warp loja set a home "/home peixe" olhado para a placa do peixe de baixo, a que pode vender 16 peixes por vez(a placa de baixo)..
Para vender disco set a home "/home cds" no primeiro disco da esquerda para a direita, igualmente ao pesca organizada 2..vira
Set uma outra home "/home tfish" que será para caso o servidor reinicie, e ele gravará onde ele paro.
Ultima home a ser setada será em cima do bloco de ferro. "/home mar"
Para usar as outras funções como
LOG, PAUSA, GUARDA e VENDER, e so sair do inventario e aperta e segura os seguintes botões:
Para pausar mantenha pressionado a letra "P".
Para o log mantenha pressionado a letra "L".
Para somente guarda mantenha pressionado o numero "2".
Para guarda e vender mantenha pressionado o numero "3".
Pronto !!!
Video.
[youtube]https://www.youtube.com/watch?v=j-pjsDECPOM&feature=youtu.be[/youtube]
Link:
-
-ModPack
https://mega.co.nz/#!G9Z32aCJ!7ir54TlDvi7sVF3mLLx2P2YLg0YALfJN4qfABdcGlwU
--Apenas o mod Macro
http://eq2.co.uk/minecraft/mods/mod_macros_0.9.9_for_1.5.2.litemod
Macro:
Para testa o look dos baus..
$${
if(tp);
log(&6[Macro]&b Teste de baus pesca encantada &4[OFF]);
chatopacity(100);
unset(tp);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(min);
stop;
else;
set(tp);
log(&6[Macro]&b Teste de baus pesca encantada &2[ON]);
getidrel(0,0,-3,#f1n);getidrel(0,-1,-3,#f2n);getidrel(0,+1,-3,#f3n);
getidrel(0,0,+3,#f1s);getidrel(0,-1,+3,#f2s);getidrel(0,+1,+3,#f3s);
getidrel(-3,0,0,#f1w);getidrel(-3,-1,0,#f2w);getidrel(-3,+1,0,#f3w);
getidrel(+3,0,0,#f1e);getidrel(+3,-1,0,#f2e);getidrel(+3,+1,0,#f3e);
wait(100ms);
if((%#f1n%!=54)&&(%#f1n%!=146)|(%#f2n%!=54)&&(%#f2n%!=146)|(%#f3n%!=54)&&(%#f3n%!=146));
&dir1=NORTH;&dir2=EAST;&dir3=SOUTH;&dir4=WEST;
log(&6[Macro]&b Localização salva com sucesso !);
log(&6[Macro]&b Localização: &6%&dir1%);
break;
elseif((%#f1s%!=54)&&(%#f1s%!=146)|(%#f2s%!=54)&&(%#f2s%!=146)|(%#f3s%!=54)&&(%#f3s%!=146));
&dir1=SOUTH;&dir2=WEST;&dir3=NORTH;&dir4=EAST;
log(&6[Macro]&b Localização salva com sucesso !);
log(&6[Macro]&b Localização: &6%&dir1%);
break;
elseif((%#f1w%!=54)&&(%#f1w%!=146)|(%#f2w%!=54)&&(%#f2w%!=146)|(%#f3w%!=54)&&(%#f3w%!=146));
&dir1=WEST;&dir2=SOUTH;&dir3=EAST;&dir4=NORTH;
log(&6[Macro]&b Localização salva com sucesso !);
log(&6[Macro]&b Localização: &6%&dir1%);
break;
elseif((%#f1e%!=54)&&(%#f1e%!=146)|(%#f2e%!=54)&&(%#f2e%!=146)|(%#f3e%!=54)&&(%#f3e%!=146));
&dir1=EAST;&dir2=NORTH;&dir3=WEST;&dir4=SOUTH;
log(&6[Macro]&b Localização salva com sucesso !);
log(&6[Macro]&b Localização: &6%&dir1%);
break;
else;
log(&6[Macro]&b Algo errado com o local !!!);
log(&6[Macro]&b Visite o forum se necessitar de ajuda);
prompt(&nov,$$?,Deseja pegar a localização manualmente ?);
ifmatches(%&nov%,^[S|s]);
log(&6[Macro]&b Aperte o número 1 para confirma a localização);
do;
if(KEY_1);
getidrel(0,0,+3,#loc1);getidrel(0,-1,+3,#loc2);getidrel(0,+1,+3,#loc3);
if((%#loc1%!=54)&&(%#loc1%!=146)|(%#loc2%!=54)&&(%#loc2%!=156)|(%#loc3%!=54)&&(%#loc3%!=156));
ifmatches(%DIRECTION%,N);&dir1=NORTH;&dir2=WEST;&dir3=SOUTH;&dir4=EAST;endif;
ifmatches(%DIRECTION%,S);&dir1=SOUTH;&dir2=EAST;&dir3=NORTH;&dir4=WEST;endif;
ifmatches(%DIRECTION%,E);&dir1=EAST;&dir2=NORTH;&dir3=WEST;&dir4=SOUTH;endif;
ifmatches(%DIRECTION%,W);&dir1=WEST;&dir2=SOUTH;&dir3=EAST;&dir4=NORTH;endif;
log(&6[Macro]&b Localização salva com sucesso !);
log(&6[Macro]&b Localização: &6%&dir1%);
break;
else;
log(&6[Macro]&b Falha ao pegar localização !);
log(&6[Macro]&b Olhe para a coluna e &6tente novamente !!!);
endif;
endif;
loop;
endif;
endif;
chatopacity(0);
prompt(&pp,$$?,Verificar quais baus?(t = todos / p = peixe / d = disco / m = minerio / f = ferramenta / a = armadura));
ifmatches(%&pp%,^[T|t]);set(fish);set(dis);set(fer);set(arm);set(min);endif;
ifmatches(%&pp%,^[P|p]);set(fish);endif;
ifmatches(%&pp%,^[D|d]);set(dis);endif;
ifmatches(%&pp%,^[M|m]);set(min);endif;
ifmatches(%&pp%,^[F|f]);set(fer);endif;
ifmatches(%&pp%,^[A|a]);set(arm);endif;
chatopacity(100);
#baum=1;
#baup=1;
#bauf=1;
#baua=1;
#baud=1;
if(min);
log(&6[Macro]&b Baús de Minerios );
do;
look(%&dir1%);
if(%#baum%=1);look(-40,+0);endif;
if(%#baum%=2);look(-25,+0);endif;
if(%#baum%=3);look(-40,+20);endif;
if(%#baum%=4);look(-20,+20);endif;
if(%#baum%=5);look(-40,+33);endif;
if(%#baum%=6);look(-20,+38);endif;
inc(#baum);
wait(500ms);
until(%#baum%=7);
endif;
if(dis);
log(&6[Macro]&b Baús de Disco );
do;
look(%&dir1%);
if(%#baud%=1);look(+20,+0);endif;
if(%#baud%=2);look(+38,+0);endif;
if(%#baud%=3);look(+20,+20);endif;
if(%#baud%=4);look(+38,+20);endif;
if(%#baud%=5);look(+20,+40);endif;
if(%#baud%=6);look(+38,+35);endif;
inc(#baud);
wait(500ms);
until(%#baud%=7);
endif;
if(fer);
log(&6[Macro]&b Baús de Ferramentas );
do;
look(%&dir2%);
if(%#bauf%=1);look(-40,+0);endif;
if(%#bauf%=2);look(-20,+0);endif;
if(%#bauf%=3);look(+0,+0);endif;
if(%#bauf%=4);look(+20,+0);endif;
if(%#bauf%=5);look(+40,+0);endif;
if(%#bauf%=6);look(-38,+20);endif;
if(%#bauf%=7);look(-20,+20);endif;
if(%#bauf%=8);look(0,+23);endif;
if(%#bauf%=9);look(+20,+20);endif;
if(%#bauf%=10);look(+38,+20);endif;
if(%#bauf%=11);look(-38,+32);endif;
if(%#bauf%=12);look(-22,+38);endif;
if(%#bauf%=13);look(0,+40);endif;
if(%#bauf%=14);look(+22,+38);endif;
if(%#bauf%=15);look(+38,+32);endif;
inc(#bauf);
wait(500ms);
until(%#bauf%=16);
endif;
if(fish);
log(&6[Macro]&b Baús de Peixes );
do;
look(%&dir3%);
if(%#baup%=1);look(-40,+0);endif;
if(%#baup%=2);look(-20,+0);endif;
if(%#baup%=3);look(+0,+0);endif;
if(%#baup%=4);look(+20,+0);endif;
if(%#baup%=5);look(+40,+0);endif;
if(%#baup%=6);look(-38,+20);endif;
if(%#baup%=7);look(-20,+20);endif;
if(%#baup%=8);look(0,+23);endif;
if(%#baup%=9);look(+20,+20);endif;
if(%#baup%=10);look(+38,+20);endif;
if(%#baup%=11);look(-38,+32);endif;
if(%#baup%=12);look(-22,+38);endif;
if(%#baup%=13);look(0,+40);endif;
if(%#baup%=14);look(+22,+38);endif;
if(%#baup%=15);look(+38,+32);endif;
inc(#baup);
wait(500ms);
until(%#baup%=16);
endif;
if(arm);
log(&6[Macro]&b Baús de Armaduras);
do;
look(%&dir4%);
if(%#baua%=1);look(-40,+0);endif;
if(%#baua%=2);look(-20,+0);endif;
if(%#baua%=3);look(+0,+0);endif;
if(%#baua%=4);look(+20,+0);endif;
if(%#baua%=5);look(+40,+0);endif;
if(%#baua%=6);look(-38,+20);endif;
if(%#baua%=7);look(-20,+20);endif;
if(%#baua%=8);look(0,+23);endif;
if(%#baua%=9);look(+20,+20);endif;
if(%#baua%=10);look(+38,+20);endif;
if(%#baua%=11);look(-38,+32);endif;
if(%#baua%=12);look(-22,+38);endif;
if(%#baua%=13);look(0,+40);endif;
if(%#baua%=14);look(+22,+38);endif;
if(%#baua%=15);look(+38,+32);endif;
inc(#baua);
wait(500ms);
until(%#baua%=16);
endif;
log(&6[Macro]&b Finalizada a verificação !!!);
log(&6[Macro]&b Finalizando Macro...);
unset(tp);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(min);
stop;
endif;
}$$
rs.txt (NÃO PRECISA POR EM NENHUM BOTÃO APENAS COLOQUE NO EDIT FILE...)
coloque com esse nome mesmo, não altere o rs.txt
esse serve para mandar um alerta ao macro pesca encantada quando o server for reiniciar...o macro ira para o que estiver fazendo, tipo vendendo ou guardando, assim prevenindo bug ou erros...
//Desenvolvido por Nugou
//Macro para o Pesca encantada
//Indetificador de R.S
if(@rs);
log(&6[Macro]&b Servidor sendo reiniciado !!!);
log(&6[Macro]&b Pausando Macro !!! Aguardando...);
gui();
wait(2);
}$$
/sethome tfish
$${
wait(1);
}$$
/home mar
$${
wait(6);
do;
if(@qrs);
set(@qrsp);
log(&6[Macro]&b Termino da pausa !!!);
log(&6[Macro]&b Continuando Macro...);
break;
endif;
loop;
endif;
onchat.txt (Precisa por no "onchat", tbm não altere o nome).
$${
//Desenvolvido por Nugou
//Macro On Chat
ifmatches(%CHATCLEAN%,[\»]Bem vindo de volta[\.]);
unset(@rs);
set(@qrs);
}$$
/login sua senha
$${
endif;
///////////////////////
/////NÃO MEXA AQUI/////
///////////////////////
if(@px);
ifmatches(%CHATCLEAN%,"\[Server\] Servidor será reiniciado em \[2\] minutos\.");
log(&6[Macro]&b Servidor sendo reiniciado em 2 minutos);
log(&6[Macro]&b Enviando informação ao Pesca Encantada);
set(@rs);
unset(@qrs);
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;
ifmatches(%CHATCLEAN%,"^Treasure found[\!]$");
set(@tes);
endif;
ifmatches(%CHATCLEAN%,"^Tesouro encontrado[\!]$");
set(@tes);
endif;
endif;
}$$
Apenas na versão 1.5 !!!
1.5--Beta!! [update--05/03/2015--08:15]
Portugues
$${
//Desenvolvido por Nugou
//Macro Pesca Encantada [Beta] portugues
if(@px);
if(des);
log(&6[Macro]&b Suas configurações foram salvas !!!);
set(pp);
unset(des);
endif;
log(&6[Macro]&b Pesca Encantada &4[OFF]);
keyup(right);
keyup(sneak);
keyup(jump);
keyup(left);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(vfish);
unset(vdis);
unset(vender);
unset(bre);
stop;
else;
set(@px);
set(fmin);
set(fdis);
chatopacity(0);
if(pp);
prompt(&p,$$?,Usar configurações salvas ?(s / n));
ifmatches(%&p%,^[S|s]);unset(per);endif;
ifmatches(%&p%,^[N|n]);set(per);set(des);endif;
if((%&p%!="n")&&(%&p%!="N")&&(%&p%!="s")&&(%&delay%!="S"));
log(&6[Macro]&b Caracter não aceito !!!);
log(&6[Macro]&b Responda Corretamente !!!);
log(&6[Macro]&b Finalizando Macro !!!);
chatopacity(100);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(bre);
unset(pp);
stop;
endif;
else;
set(per);
set(des);
endif;
if(per);
prompt(&delay,$$?,Vc é VIP?);
ifmatches(%&delay%,^[S|s]);#de=3;endif;
ifmatches(%&delay%,^[N|n]);#de=5;endif;
if((%&delay%!="n")&&(%&delay%!="N")&&(%&delay%!="s")&&(%&delay%!="S"));
log(&6[Macro]&b Caracter não aceito !!!);
log(&6[Macro]&b Responda Corretamente !!!);
log(&6[Macro]&b Finalizando Macro !!!);
chatopacity(100);
unset(des);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(bre);
unset(pp);
stop;
endif;
prompt(&v,$$?,Deseja vender na warp loja?);
ifmatches(%&v%,^[S|s]);
prompt(&vp,$$?,Vender Peixe? (s / n));
if((%&vp%!="n")&&(%&vp%!="N")&&(%&vp%!="s")&&(%&vp%!="S"));
log(&6[Macro]&b Caracter não aceito !!!);
log(&6[Macro]&b Responda Corretamente !!!);
log(&6[Macro]&b Finalizando Macro !!!);
chatopacity(100);
unset(des);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(bre);
unset(pp);
stop;
endif;
prompt(&vd,$$?,Vender Disco? (s / n));
if((%&vd%!="n")&&(%&vd%!="N")&&(%&vd%!="s")&&(%&vd%!="S"));
log(&6[Macro]&b Caracter não aceito !!!);
log(&6[Macro]&b Responda Corretamente !!!);
log(&6[Macro]&b Finalizando Macro !!!);
chatopacity(100);
unset(des);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(bre);
unset(pp);
stop;
endif;
elseif((%&v%="n")|(%&v%="N"));
log(&6[Macro]&b Não serão vendidos itens !!!);
&vp=n;
&vd=n;
else;
log(&6[Macro]&b Caracter não aceito !!!);
log(&6[Macro]&b Responda Corretamente !!!);
log(&6[Macro]&b Finalizando Macro !!!);
chatopacity(100);
unset(des);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(bre);
unset(pp);
stop;
endif;
prompt(&id,$$?,Guarda itens de DIAMANTE? (s / n));
ifmatches(%&id%,^[S|s]);
&fer3="^276$|^277$|^278$|^279$|^293$";
&arm3="^310$|^311$|^312$|^313$";
elseif((%&id%="n")|(%&id%="N"));
log(&6[Macro]&b Não serão guardado itens de &6DIAMANTE);
&fer3=^$;
&arm3=^$;
else;
log(&6[Macro]&b Caracter não aceito !!!);
log(&6[Macro]&b Responda Corretamente !!!);
log(&6[Macro]&b Finalizando Macro !!!);
chatopacity(100);
unset(des);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(bre);
unset(pp);
stop;
endif;
prompt(&io,$$?,Guarda itens de OURO? (s / n));
ifmatches(%&io%,^[S|s]);
&fer2="^283$|^284$|^285$|^286$|^294$";
&arm2="^314$|^315$|^316$|^317$";
elseif((%&io%="n")|(%&io%="N"));
log(&6[Macro]&b Não serão guardado itens de &6OURO);
&fer2=^$;
&arm2=^$;
else;
log(&6[Macro]&b Caracter não aceito !!!);
log(&6[Macro]&b Responda Corretamente !!!);
log(&6[Macro]&b Finalizando Macro !!!);
chatopacity(100);
unset(des);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(bre);
unset(pp);
stop;
endif;
prompt(&if,$$?,Guarda itens de FERRO? (s / n));
ifmatches(%&if%,^[S|s]);
&fer1="^267$|^256$|^257$|^258$|^292$";
&arm1="^306$|^307$|^308$|^309$";
elseif((%&if%="n")|(%&if%="N"));
log(&6[Macro]&b Não serão guardado itens de &6FERRO);
&fer1=^$;
&arm1=^$;
else;
log(&6[Macro]&b Caracter não aceito !!!);
log(&6[Macro]&b Responda Corretamente !!!);
log(&6[Macro]&b Finalizando Macro !!!);
chatopacity(100);
unset(des);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(bre);
unset(pp);
stop;
endif;
#peixe=0;
#disco=0;
#minerio=0;
#ferramenta=0;
#armadura=0;
#tesouro=0;
#money=0;
#qt=0;
#moneyp=0;
endif;
chatopacity(100);
}$$
/home mar
$${
log(&6[Macro]&b Indo para o pesqueiro em 5 segundos.);
wait(5);
keydown(jump);
wait(2);
#xp=%XPOS%;
#zp=%ZPOS%;
keyup(jump);
wait(1);
log(&6[Macro]&b Pegando Localização);
do;
getidrel(0,0,-3,#f1n);getidrel(0,-1,-3,#f2n);getidrel(0,+1,-3,#f3n);
getidrel(0,0,+3,#f1s);getidrel(0,-1,+3,#f2s);getidrel(0,+1,+3,#f3s);
getidrel(-3,0,0,#f1w);getidrel(-3,-1,0,#f2w);getidrel(-3,+1,0,#f3w);
getidrel(+3,0,0,#f1e);getidrel(+3,-1,0,#f2e);getidrel(+3,+1,0,#f3e);
wait(100ms);
if((%#f1n%!=54)&&(%#f1n%!=146)|(%#f2n%!=54)&&(%#f2n%!=146)|(%#f3n%!=54)&&(%#f3n%!=146));
&dir1=NORTH;&dir2=EAST;&dir3=SOUTH;&dir4=WEST;
log(&6[Macro]&b Localização salva com sucesso !);
log(&6[Macro]&b Localização: &6%&dir1%);
break;
elseif((%#f1s%!=54)&&(%#f1s%!=146)|(%#f2s%!=54)&&(%#f2s%!=146)|(%#f3s%!=54)&&(%#f3s%!=146));
&dir1=SOUTH;&dir2=WEST;&dir3=NORTH;&dir4=EAST;
log(&6[Macro]&b Localização salva com sucesso !);
log(&6[Macro]&b Localização: &6%&dir1%);
break;
elseif((%#f1w%!=54)&&(%#f1w%!=146)|(%#f2w%!=54)&&(%#f2w%!=146)|(%#f3w%!=54)&&(%#f3w%!=146));
&dir1=WEST;&dir2=SOUTH;&dir3=EAST;&dir4=NORTH;
log(&6[Macro]&b Localização salva com sucesso !);
log(&6[Macro]&b Localização: &6%&dir1%);
break;
elseif((%#f1e%!=54)&&(%#f1e%!=146)|(%#f2e%!=54)&&(%#f2e%!=146)|(%#f3e%!=54)&&(%#f3e%!=146));
&dir1=EAST;&dir2=NORTH;&dir3=WEST;&dir4=SOUTH;
log(&6[Macro]&b Localização salva com sucesso !);
log(&6[Macro]&b Localização: &6%&dir1%);
break;
else;
log(&6[Macro]&b Algo errado com o local !!!);
log(&6[Macro]&b Visite o forum se necessitar de ajuda);
prompt(&nov,$$?,Deseja pegar a localização manualmente ?);
ifmatches(%&nov%,^[S|s]);
log(&6[Macro]&b Aperte o número 1 para confirma a localização);
do;
if(KEY_1);
getidrel(0,0,+3,#loc1);getidrel(0,-1,+3,#loc2);getidrel(0,+1,+3,#loc3);
if((%#loc1%!=54)&&(%#loc1%!=146)|(%#loc2%!=54)&&(%#loc2%!=156)|(%#loc3%!=54)&&(%#loc3%!=156));
ifmatches(%DIRECTION%,N);&dir1=NORTH;&dir2=WEST;&dir3=SOUTH;&dir4=EAST;endif;
ifmatches(%DIRECTION%,S);&dir1=SOUTH;&dir2=EAST;&dir3=NORTH;&dir4=WEST;endif;
ifmatches(%DIRECTION%,E);&dir1=EAST;&dir2=NORTH;&dir3=WEST;&dir4=SOUTH;endif;
ifmatches(%DIRECTION%,W);&dir1=WEST;&dir2=SOUTH;&dir3=EAST;&dir4=NORTH;endif;
log(&6[Macro]&b Localização salva com sucesso !);
log(&6[Macro]&b Localização: &6%&dir1%);
break;
else;
log(&6[Macro]&b Falha ao pegar localização !);
log(&6[Macro]&b Olhe para a coluna e &6tente novamente !!!);
endif;
endif;
loop;
endif;
endif;
loop;
#temp=0;
#ff=0;
#baup=1;
#baud=1;
#baum=1;
#baua=1;
#bauf=1;
&other="^346$|^287$|^349$|^261$";
&min="^264$|^265$|^266$|^369$|^370$";
&dis="^2256$|^2257$|^2258$|^2259$|^2260$|^2261$|^2262$|^2263$|^2264$|^2265$|^2266$|^2267$";
&encant="^Afiada$|^Julgamento$|^Ru.*$|^Repul.*$|^Aspecto$|^Pilhagem$|^Efici.*$|^Toque$|^Inquebr.*$|^Fortuna$|^For.*$|^Impacto$|^Chama$|^Infinidade$";
//&encant="^Sharpness$|^Smite$|^Bane of Arthropods$|^Knockback$|^Fire Aspect$|^Looting$|^Efficiency$|^Silk Touch$|^Unbreaking$|^Fortune$|^Power$|^Punch$|^Flame$|^Infinity$";
look(%&dir1%);
log(&6[Macro]&b Pesca Encantada &2[ON]);
log(&6[Macro]&b Pressione &6%KEYNAME% &bpara desativar);
gui(inventory);
wait(100ms);
do;
ifmatches(%GUI%,GUIINVENTORY);
do;
if((%XPOS%!=%#xp%)&&(%ZPOS%!=%#z%));
}$$
/home mar
$${
wait(%#de%);
do;
until((%XPOS%=%#xp%)&&(%ZPOS%=%#zp%));
keydown(jump);
wait(2);
keyup(jump);
wait(1);
endif;
#vg=0;
for(#s,9,44);
if(@tes);inc(#tesouro);unset(@tes);endif;
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);gui(inventory);wait(2);break;endif;loop;endif;
look(%&dir1%);
look(,-90);
pick(346);
key(use);
getslotitem(%#s%,#n,#st);
if(bre);unset(bre);break;endif;
ifmatches(%GUI%,INVENTORY);else;break;endif;
if(%#st%=0);
#vg=1;
endif;
if(%DURABILITY%<20);
gui();
wait(1);
look(%&dir1%);
look(,+90);
do(3);
key(use);
key(attack);
wait(50ms);
loop;
gui(inventory);
endif;
wait(1ms);
next;
if(%#vg%=0);break;endif;
while(%GUI%="GUIINVENTORY");
if((%#vg%=0)|(%#ff%=1)|(%#ff%=2));
if(%#ff%=1);
log(&6[Macro]&b Opção 2 selecionada !!! Executando.....);
elseif(%#ff%=2);
log(&6[Macro]&b Opção 3 selecionada !!! Executando.....);
else;
log(&6[Macro]&b Inventario cheio! Jogando itens no lixo);
endif;
#ff=0;
look(%&dir1%);
gui(inventory);
wait(500ms);
for(#s,9,44);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);gui(inventory);wait(2);break;endif;loop;endif;
getslotitem(%#s%,#id,#st);
ifmatches(%#id%,%&other%|%&dis%|%&arm1%|%&arm2%|%&arm3%|%&fer1%|%&fer2%|%&fer3%|%&min%);
ifmatches(%#id%,%&arm1%|%&arm2%|%&arm3%);set(arm);endif;
ifmatches(%#id%,%&fer1%|%&fer2%|%&fer3%|^261$);set(fer);endif;
if(fmin);ifmatches(%#id%,%&min%);set(min);endif;endif;
if(fdis);ifmatches(%#id%,%&dis%);set(dis);endif;endif;
if(%#id%=349);set(fish);endif;
else;
slotclick(%#s%);
slotclick(-999);
endif;
wait(70ms);
next;
gui();
wait(250ms);
if(fish);
do;
look(%&dir3%);
if(%#baup%=1);look(-40,+0);endif;
if(%#baup%=2);look(-20,+0);endif;
if(%#baup%=3);look(+0,+0);endif;
if(%#baup%=4);look(+20,+0);endif;
if(%#baup%=5);look(+40,+0);endif;
if(%#baup%=6);look(-38,+20);endif;
if(%#baup%=7);look(-20,+20);endif;
if(%#baup%=8);look(0,+23);endif;
if(%#baup%=9);look(+20,+20);endif;
if(%#baup%=10);look(+38,+20);endif;
if(%#baup%=11);look(-38,+32);endif;
if(%#baup%=12);look(-22,+38);endif;
if(%#baup%=13);look(0,+40);endif;
if(%#baup%=14);look(+22,+38);endif;
if(%#baup%=15);look(+38,+32);endif;
wait(200ms);
do;
key(use);
wait(1);
ifmatches(%GUI%,CHEST);
break;
endif;
loop;
wait(200ms);
for(#s,54,89);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
getslotitem(%#s%,#id,#st);
if(%#id%=349);
slotclick(%#s%,l,true);
#peixe=%#peixe%+%#st%;
endif;
wait(100ms);
next;
getslotitem(53,#id,#st);
if(%#st%=64);
inc(#baup);
gui();
wait(100ms);
if(%#baup%=16);
ifmatches(%&vd%,^[S|s]);
set(vfish);
gui();
log(&6[Macro]&b Todos os baús de peixe cheios !!!);
log(&6[Macro]&b Preparando para vender peixes !!! &6Aguarde....);
break;
else;
log(&6[Macro]&b Acabo os baus de peixe !!!);
log(&6[Macro]&b Finalizando Macro !!!);
log(&6[Macro]&b Pesca Encantada &4[OFF]);
keyup(right);
keyup(sneak);
keyup(jump);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(vfish);
unset(vdis);
unset(vender);
unset(break);
stop;
endif;
endif;
endif;
until(%#st%!=64);
gui();
wait(200ms);
unset(fish);
endif;
wait(200ms);
if(min);
do;
look(%&dir1%);
if(%#baum%=1);look(-40,+0);endif;
if(%#baum%=2);look(-25,+0);endif;
if(%#baum%=3);look(-40,+20);endif;
if(%#baum%=4);look(-20,+20);endif;
if(%#baum%=5);look(-40,+33);endif;
if(%#baum%=6);look(-20,+38);endif;
wait(200ms);
do;
key(use);
wait(1);
ifmatches(%GUI%,CHEST);
break;
endif;
loop;
wait(200ms);
for(#s,54,89);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
getslotitem(%#s%,#id,#st);
ifmatches(%#id%,%&min%);
slotclick(%#s%,l,true);
#minerio=%#minerio%+%#st%;
endif;
wait(100ms);
next;
getslotitem(53,#id,#st);
if(%#st%!=0);
inc(#baum);
gui();
if(%#baum%=7);
log(&6[Macro]&b Todos os baus de minerios cheios !!!);
log(&6[Macro]&b Minerios seram jogados fora !!!);
unset(fmin);
look(%&dir1%);
gui(inventory);
wait(1);
for(#i,9,44);
getslotitem(%#i%,#n,#st);
ifmatches(%#n%,%&min%);
slotclick(%#i%);
slotclick(-999);
press(q);
endif;
wait(70ms);
next;
&min=^$;
break;
endif;
wait(100ms);
endif;
until(%#st%=0);
gui();
unset(min);
endif;
wait(200ms);
if(dis);
do;
look(%&dir1%);
if(%#baud%=1);look(+20,+0);endif;
if(%#baud%=2);look(+38,+0);endif;
if(%#baud%=3);look(+20,+20);endif;
if(%#baud%=4);look(+38,+20);endif;
if(%#baud%=5);look(+20,+40);endif;
if(%#baud%=6);look(+38,+35);endif;
wait(200ms);
do;
key(use);
wait(1);
ifmatches(%GUI%,CHEST);
break;
endif;
loop;
wait(200ms);
for(#s,54,89);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
getslotitem(%#s%,#id,#st);
ifmatches(%#id%,%&dis%);
slotclick(%#s%,l,true);
inc(#disco);
endif;
wait(100ms);
next;
getslotitem(53,#id,#st);
if(%#st%!=0);
inc(#baud);
gui();
wait(200ms);
if(%#baud%=7);
ifmatches(%&vp%,^[S|s]);
gui();
set(vdis);
log(&6[Macro]&b Todos os baús de disco cheios !!!);
log(&6[Macro]&b Preparando para vender discos !!! &6Aguarde....);
break;
else;
log(&6[Macro]&b Acabo os baus de disco !!!);
log(&6[Macro]&b Agora disco seram jogados fora !!!);
unset(fdis);
look(%&dir1%);
wait(1);
for(#q,9,44);
getslotitem(%#q%,#n,#st);
ifmatches(%#n%,%&dis%);
slotclick(%#q%);
slotclick(-999);
endif;
wait(100ms);
next;
&dis=^$;
break;
endif;
endif;
endif;
until(%#st%=0);
gui();
unset(dis);
endif;
wait(200ms);
if(fer);
do;
look(%&dir4%);
if(%#bauf%=1);look(-40,+0);endif;
if(%#bauf%=2);look(-20,+0);endif;
if(%#bauf%=3);look(+0,+0);endif;
if(%#bauf%=4);look(+20,+0);endif;
if(%#bauf%=5);look(+40,+0);endif;
if(%#bauf%=6);look(-38,+20);endif;
if(%#bauf%=7);look(-20,+20);endif;
if(%#bauf%=8);look(0,+23);endif;
if(%#bauf%=9);look(+20,+20);endif;
if(%#bauf%=10);look(+38,+20);endif;
if(%#bauf%=11);look(-38,+32);endif;
if(%#bauf%=12);look(-22,+38);endif;
if(%#bauf%=13);look(0,+40);endif;
if(%#bauf%=14);look(+22,+38);endif;
if(%#bauf%=15);look(+38,+32);endif;
wait(200ms);
do;
key(use);
wait(1);
ifmatches(%GUI%,CHEST);
break;
endif;
loop;
wait(200ms);
set(sp);
for(#s,81,89);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
wait(50ms);
getslotitem(%#s%,#id,#st);
if(%#st%=0);
for(#i,54,80);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
getslotitem(%#i%,#id,#st);
wait(50ms);
ifmatches(%#id%,%&fer1%|%&fer2%|%&fer3%|^261$);
slotclick(%#i%,l,false);
wait(100ms);
slotclick(%#s%,l,false);
unset(sp);
break;
endif;
next;
endif;
next;
#enc=1;
#slt=1;
do;
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
slot(%#slt%);
foreach(enchantments);
if(%#enc%=1);&enc1=%ENCHANTMENTNAME%;endif;
if(%#enc%=2);&enc2=%ENCHANTMENTNAME%;endif;
if(%#enc%=3);&enc3=%ENCHANTMENTNAME%;endif;
if(%#enc%=4);&enc4=%ENCHANTMENTNAME%;endif;
inc(#enc);
next;
#enc=1;
ifmatches(%&enc1%,%&encant%);
#stt=%#slt%+80;
slotclick(%#stt%,l,true);
inc(#ferramenta);
endif;
&enc1=;
&enc2=;
&enc3=;
&enc4=;
inc(#slt);
wait(100ms);
getslotitem(53,#id,#st);
set(last);
if(%#st%!=0);
inc(#bauf);
unset(last);
break;
endif;
until(%#slt%=10);
wait(1);
if(last);
gui();
look(%&dir1%);
wait(200ms);
for(#s,1,9);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
getslotitem(%#s%,#id,#st);
ifmatches(%#id%,%&fer1%|%&fer2%|%&fer3%|^261$);
slotclick(%#s%);
slotclick(-999);
press(q);
endif;
wait(100ms);
next;
gui();
wait(200ms);
if(sp);
unset(sp);
break;
endif;
endif;
loop;
unset(fer);
gui();
endif;
wait(200ms);
if(arm);
do;
look(%&dir2%);
if(%#baua%=1);look(-40,+0);endif;
if(%#baua%=2);look(-20,+0);endif;
if(%#baua%=3);look(+0,+0);endif;
if(%#baua%=4);look(+20,+0);endif;
if(%#baua%=5);look(+40,+0);endif;
if(%#baua%=6);look(-38,+20);endif;
if(%#baua%=7);look(-20,+20);endif;
if(%#baua%=8);look(0,+23);endif;
if(%#baua%=9);look(+20,+20);endif;
if(%#baua%=10);look(+38,+20);endif;
if(%#baua%=11);look(-38,+32);endif;
if(%#baua%=12);look(-22,+38);endif;
if(%#baua%=13);look(0,+40);endif;
if(%#baua%=14);look(+22,+38);endif;
if(%#baua%=15);look(+38,+32);endif;
wait(200ms);
do;
key(use);
wait(1);
ifmatches(%GUI%,CHEST);
break;
endif;
loop;
wait(200ms);
set(sp);
for(#s,81,89);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
wait(50ms);
getslotitem(%#s%,#id,#st);
if(%#st%=0);
for(#i,54,80);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
getslotitem(%#i%,#id,#st);
ifmatches(%#id%,%&arm1%|%&arm2%|%&arm3%);
slotclick(%#i%,l,false);
wait(100ms);
slotclick(%#s%,l,false);
unset(sp);
break;
endif;
next;
endif;
next;
#enc=1;
#slt=1;
do;
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
slot(%#slt%);
foreach(enchantments);
if(%#enc%=1);&enc1=%ENCHANTMENT%;endif;
if(%#enc%=2);&enc2=%ENCHANTMENT%;endif;
if(%#enc%=3);&enc3=%ENCHANTMENT%;endif;
if(%#enc%=4);&enc4=%ENCHANTMENT%;endif;
inc(#enc);
next;
#enc=1;
//if((%&enc1%="Protection IV")|(%&enc2%="Protection IV")|(%&enc3%="Protection IV")|(%&enc4%="Protection IV"));
ifmatches(%&enc1%,"^Prote(.*)o IV$");
#stt=%#slt%+80;
slotclick(%#stt%,l,true);
inc(#armadura);
endif;
&enc1=;
&enc2=;
&enc3=;
&enc4=;
inc(#slt);
wait(100ms);
getslotitem(53,#id,#st);
if(%#st%!=0);
inc(#baua);
unset(last);
break;
endif;
until(%#slt%=10);
if(last);
gui();
look(%&dir1%);
wait(200ms);
for(#s,1,9);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
getslotitem(%#s%,#id,#st);
ifmatches(%#id%,%&arm1%|%&arm2%|%&arm3%);
slotclick(%#s%);
slotclick(-999);
press(q);
endif;
wait(100ms);
next;
gui();
wait(200ms);
if(sp);
unset(sp);
break;
endif;
endif;
loop;
unset(arm);
gui();
endif;
gui(inventory);
endif;
wait(200ms);
////////////////////
//Vendas || Vendas//
////////////////////
if(vfish);
gui();
unset(vfish);
#baup=1;
do;
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
do;
look(%&dir3%);
if(%#baup%=1);look(-40,+0);endif;
if(%#baup%=2);look(-20,+0);endif;
if(%#baup%=3);look(+0,+0);endif;
if(%#baup%=4);look(+20,+0);endif;
if(%#baup%=5);look(+40,+0);endif;
if(%#baup%=6);look(-38,+20);endif;
if(%#baup%=7);look(-20,+20);endif;
if(%#baup%=8);look(0,+23);endif;
if(%#baup%=9);look(+20,+20);endif;
if(%#baup%=10);look(+38,+20);endif;
if(%#baup%=11);look(-38,+32);endif;
if(%#baup%=12);look(-22,+38);endif;
if(%#baup%=13);look(0,+40);endif;
if(%#baup%=14);look(+22,+38);endif;
if(%#baup%=15);look(+38,+32);endif;
wait(200ms);
do;
key(use);
wait(1);
ifmatches(%GUI%,CHEST);
break;
endif;
loop;
for(#i,0,53);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
slotclick(%#i%,l,true);
wait(150ms);
next;
#std=0;
for(#i,0,53);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
getslotitem(%#i%,#id,#st);
if(%#id%=349);
#std=1;
endif;
next;
if(%#std%=0);
inc(#baup);
gui();
endif;
if(%#baup%=16);
break;
endif;
wait(200ms);
until(%#std%=1);
log(&6[Macro]&b Indo vender peixe !!!);
#x=%XPOS%;
#z=%ZPOS%;
}$$
/home peixe
$${
do;
if((%XPOS%!=%#x%)&&(%ZPOS%!=%#z%));
break;
endif;
wait(2);
loop;
wait(%#de%);
#toc=0;
do;
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
if(%HITID%=68);
gui(inventory);
wait(1);
for(#i,9,44);
getslotitem(%#i%,#id,#st);
if(%#id%=349);
inc(#toc,4);
endif;
next;
gui();
do(%#toc%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);wait(1);gui(inventory);wait(2);break;endif;loop;endif;
pick(346);
key(attack);
wait(260ms);
loop;
#toc=0;
gui();
wait(1);
gui(inventory);
wait(1);
#toc1=0;
for(#i,9,44);
getslotitem(%#i%,#id,#st);
if(%#id%=349);
inc(#toc1,4);
endif;
next;
gui();
wait(200ms);
do(%#toc1%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);wait(1);gui(inventory);wait(2);break;endif;loop;endif;
pick(346);
key(attack);
wait(260ms);
loop;
#toc1=0;
#x=%XPOS%;
#z=%ZPOS%;
}$$
/home mar
$${
do;
if((%XPOS%!=%#x%)&&(%ZPOS%!=%#z%));
break;
endif;
wait(2);
loop;
wait(%#de%);
#pack=%#pack%+%#toc%;
#moneyp=%#pack%*144;
break;
else;
//player na frente........em criação
log(&6[Macro]&b Algum player na frente !!!);
log(&6[Macro]Aguardando 3 segundos);
wait(3);
endif;
loop;
until(%#baup%=16);
log(&6[Macro]&b Todos os peixes vendidos !!!);
log(&6[Macro]&b Money da venda: %#moneyp%);
endif;
if(vdis);
unset(vdis);
#baud=1;
do;
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
#rec13=0;
#reccat=0;
#recblocks=0;
#recchirp=0;
#recfar=0;
#recmall=0;
#recmellohi=0;
#recstal=0;
#recstrad=0;
#recward=0;
#rec11=0;
#recwait=0;
do;
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir1%);
if(%#baud%=1);look(+20,+0);endif;
if(%#baud%=2);look(+38,+0);endif;
if(%#baud%=3);look(+20,+20);endif;
if(%#baud%=4);look(+38,+20);endif;
if(%#baud%=5);look(+20,+40);endif;
if(%#baud%=6);look(+38,+35);endif;
wait(200ms);
do;
key(use);
wait(2);
ifmatches(%GUI%,CHEST);
break;
endif;
loop;
wait(1);
for(#dis,0,53);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
slotclick(%#dis%,l,true);
wait(150ms);
next;
#std=0;
for(#dis,0,53);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
getslotitem(%#dis%,#id,#st);
ifmatches(%#id%,%&dis%);
#std=1;
endif;
next;
if(%#std%=0);
inc(#baud,1);
gui();
endif;
if(%#baud%=7);
break;
endif;
wait(200ms);
until(%#std%=1);
gui();
#x=%XPOS%;
#z=%ZPOS%;
}$$
/home cds
$${
do;
if((%XPOS%!=%#x%)&&(%ZPOS%!=%#z%));
break;
endif;
wait(2);
loop;
wait(%#de%);
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);
wait(1);
for(#ven,9,44);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);wait(1);gui(inventory);wait(2);break;endif;loop;endif;
getslotitem(%#ven%,#disc,#st);
ifmatches(%#disc%,^2256$);inc(#rec13,1);endif;
ifmatches(%#disc%,^2257$);inc(#reccat,1);endif;
ifmatches(%#disc%,^2258$);inc(#recblocks,1);endif;
ifmatches(%#disc%,^2259$);inc(#recchirp,1);endif;
ifmatches(%#disc%,^2260$);inc(#recfar,1);endif;
ifmatches(%#disc%,^2261$);inc(#recmall,1);endif;
ifmatches(%#disc%,^2262$);inc(#recmellohi,1);endif;
ifmatches(%#disc%,^2263$);inc(#recstal,1);endif;
ifmatches(%#disc%,^2264$);inc(#recstrad,1);endif;
ifmatches(%#disc%,^2265$);inc(#recward,1);endif;
ifmatches(%#disc%,^2266$);inc(#rec11,1);endif;
ifmatches(%#disc%,^2267$);inc(#recwait,1);endif;
wait(50ms);
next;
gui();
wait(2);
//Disco 13
do(%#rec13%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrec13=%#rec13%*100;
log(&6[Macro]&b foram vendidos &6%#rec13% &bDisco 13);
log(&6[Macro]&b Lucro de: &6%#qrec13% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco Cat
do(%#reccat%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qreccat=%#reccat%*100;
log(&6[Macro]&b foram vendidos &6%#reccat% &bDisco Cat);
log(&6[Macro]&b Lucro de: &6%#qreccat% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco Blocks
do(%#recblocks%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrecblocks=%#recblocks%*100;
log(&6[Macro]&b foram vendidos &6%#recblocks% &bDisco Blocks);
log(&6[Macro]&b Lucro de: &6%#qrecblocks% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco Chirp
do(%#recchirp%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrecchirp=%#recchirp%*100;
log(&6[Macro]&b foram vendidos &6%#recchirp% &bDisco Chirp);
log(&6[Macro]&b Lucro de: &6%#qrecchirp% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco Far
do(%#recfar%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrecfar=%#recfar%*100;
log(&6[Macro]&b foram vendidos &6%#recfar% &bDisco Far);
log(&6[Macro]&b Lucro de: &6%#qrecfar% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco Mall
do(%#recmall%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrecmall=%#recmall%*100;
log(&6[Macro]&b foram vendidos &6%#recmall% &bDisco Mall);
log(&6[Macro]&b Lucro de: &6%#qrecmall% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco Mellohi
do(%#recmellohi%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrecmellohi=%#recmellohi%*100;
log(&6[Macro]&b foram vendidos &6%#recmellohi% &bDisco Mellohi);
log(&6[Macro]&b Lucro de: &6%#qrecmellohi% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco Stal
do(%#recstal%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrecstal=%#recstal%*100;
log(&6[Macro]&b foram vendidos &6%#recstal% &bDisco Stal);
log(&6[Macro]&b Lucro de: &6%#qrecstal% Coins);
#z=%ZPOS%;
#y=%YPOS%;
wait(1);
do;
look(%&dir%);
keyup(jump);
keydown(right);
keydown(sneak);
getidrel(0,0,-1,#bl);
if(%#bl%!=0);
keydown(jump);
wait(1t);
endif;
if(%YPOS%!=%#y%);
keydown(jump);
wait(1t);
endif;
until(%ZPOS%=%#z%-9);
keyup(right);
keyup(jump);
do(2);
keydown(left);
wait(1);
loop;
keyup(left);
keyup(sneak);
//Disco Strad
do(%#recstrad%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrecstrad=%#recstrad%*100;
log(&6[Macro]&b foram vendidos &6%#recstrad% &bDisco Strad);
log(&6[Macro]&b Lucro de: &6%#qrecstrad% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco Ward
do(%#recward%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrecward=%#recward%*100;
log(&6[Macro]&b foram vendidos &6%#recward% &bDisco Ward);
log(&6[Macro]&b Lucro de: &6%#qrecward% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco 11
do(%#rec11%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrec11=%#rec11%*100;
log(&6[Macro]&b foram vendidos &6%#rec11% &bDisco 11);
log(&6[Macro]&b Lucro de: &6%#qrec11% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco Wait
do(%#recwait%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrecwait=%#recwait%*100;
log(&6[Macro]&b foram vendidos &6%#recwait% &bDisco Wait);
log(&6[Macro]&b Lucro de: &6%#qrecwait% Coins);
#z=%ZPOS%;
wait(1);
///////////////////
#qt=%#qt%+%#qrecwait%+%#qrec11%+%#qrecward%+%#qrecstrad%+%#qrecstal%+%#qrecmellohi%+%#qrecmall%+%#qrecfar%+%#qrecchirp%+%#qrecblocks%+%#qreccat%+%#qrec13%;
}$$
/home mar
$${
wait(5);
until(%#baud%=7);
log(&6[Macro]&bMoney Total: &6%#qt%);
gui(inventory);
wait(2);
endif;
#money=%#money%+%#qt%+%#moneyp%;
else;
inc(#temp);
if(%#temp%=10);
#temp=0;
log(&6[Macro]&b Abrindo inventario novamente !!!);
wait(2);
gui(inventory);
endif;
endif;
if(KEY_L);
//teste ainda.....
log(&6[Macro]&b Processando informações.. Aguarde..);
wait(1);
log(&6[Macro]&b Peixes guardados: &6%#peixe%);
log(&6[Macro]&b Disco guardados: &6%#disco%);
log(&6[Macro]&b Minerios guardados: &6%#minerio%);
log(&6[Macro]&b Ferramentas encantadas guardadas: &6%#ferramenta%);
log(&6[Macro]&b Armaduras encantadas guardadas: &6%#armadura%);
log(&6[Macro]&b Tesouros encontrados: &6%#tesouro%);
log(&6[Macro]&b Money Total ganho: &6%#money% Coins);
log(&6[Macro]&8 Para resetar aperte &61);
log(&6[Macro]&8 Para guarda itens aperte &62);
log(&6[Macro]&8 Para pausar a macro aperte &6P);
ifmatches(%&v%,^[S|s]);log(&6[Macro]&8 Para vender itens aperte &63);endif;
endif;
if(KEY_1);
chatopacity(0);
prompt(&reset,$$?,Deseja resetar as informações ? (s / n));
ifmatches(%&reset%,^[S|s]);
log(&6[Macro]&b Informações resetadas !!!);
#peixe=0;
#disco=0;
#minerio=0;
#ferramenta=0;
#armadura=0;
#money=0;
#tesouro=0;
#qt=0;
#moneyp=0;
else;.
log(&6[Macro]&b Reset de informações cancelada !!!);
endif;
chatopacity(100);
endif;
if(KEY_2);
log(&6[Macro]&b Indo guarda itens !!! Aguarde....);
gui(inventory);
#ff=1;
set(bre);
endif;
ifmatches(%&v%,^[S|s]);
if(KEY_3);
log(&6[Macro]&b Indo guarda e vender itens !!! Aguarde....);
gui(inventory);
#ff=2;
set(bre);
ifmatches(%&vp%,^[S|s]);set(vfish);else;log(&6[Macro]&b Voce não selecionou a opção de vender peixe !!!);endif;
ifmatches(%&vd%,^[S|s]);set(vdis);else;log(&6[Macro]&b Voce não selecionou a opção de vender disco !!!);endif;
endif;
endif;
if(KEY_P);
wait(1);
if(KEY_P);
log(&6[Macro]&b Macro Pausado ....);
log(&6[Macro]&b Aperte &6P &bnovamente para voltar a macro....);
wait(2);
do;
if(KEY_P);
log(&6[Macro]&b Voltando a funcionar !!!);
break;
endif;
loop;
endif;
endif;
loop;
endif;
}$$
ingles
$${
//Desenvolvido por Nugou
//Macro Pesca Encantada [Beta] ingles
if(@px);
if(des);
log(&6[Macro]&b Suas configurações foram salvas !!!);
set(pp);
unset(des);
endif;
log(&6[Macro]&b Pesca Encantada &4[OFF]);
keyup(right);
keyup(sneak);
keyup(jump);
keyup(left);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(vfish);
unset(vdis);
unset(vender);
unset(bre);
stop;
else;
set(@px);
set(fmin);
set(fdis);
chatopacity(0);
if(pp);
prompt(&p,$$?,Usar configurações salvas ?(s / n));
ifmatches(%&p%,^[S|s]);unset(per);endif;
ifmatches(%&p%,^[N|n]);set(per);set(des);endif;
if((%&p%!="n")&&(%&p%!="N")&&(%&p%!="s")&&(%&delay%!="S"));
log(&6[Macro]&b Caracter não aceito !!!);
log(&6[Macro]&b Responda Corretamente !!!);
log(&6[Macro]&b Finalizando Macro !!!);
chatopacity(100);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(bre);
unset(pp);
stop;
endif;
else;
set(per);
set(des);
endif;
if(per);
prompt(&delay,$$?,Vc é VIP?);
ifmatches(%&delay%,^[S|s]);#de=3;endif;
ifmatches(%&delay%,^[N|n]);#de=5;endif;
if((%&delay%!="n")&&(%&delay%!="N")&&(%&delay%!="s")&&(%&delay%!="S"));
log(&6[Macro]&b Caracter não aceito !!!);
log(&6[Macro]&b Responda Corretamente !!!);
log(&6[Macro]&b Finalizando Macro !!!);
chatopacity(100);
unset(des);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(bre);
unset(pp);
stop;
endif;
prompt(&v,$$?,Deseja vender na warp loja?);
ifmatches(%&v%,^[S|s]);
prompt(&vp,$$?,Vender Peixe? (s / n));
if((%&vp%!="n")&&(%&vp%!="N")&&(%&vp%!="s")&&(%&vp%!="S"));
log(&6[Macro]&b Caracter não aceito !!!);
log(&6[Macro]&b Responda Corretamente !!!);
log(&6[Macro]&b Finalizando Macro !!!);
chatopacity(100);
unset(des);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(bre);
unset(pp);
stop;
endif;
prompt(&vd,$$?,Vender Disco? (s / n));
if((%&vd%!="n")&&(%&vd%!="N")&&(%&vd%!="s")&&(%&vd%!="S"));
log(&6[Macro]&b Caracter não aceito !!!);
log(&6[Macro]&b Responda Corretamente !!!);
log(&6[Macro]&b Finalizando Macro !!!);
chatopacity(100);
unset(des);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(bre);
unset(pp);
stop;
endif;
elseif((%&v%="n")|(%&v%="N"));
log(&6[Macro]&b Não serão vendidos itens !!!);
&vp=n;
&vd=n;
else;
log(&6[Macro]&b Caracter não aceito !!!);
log(&6[Macro]&b Responda Corretamente !!!);
log(&6[Macro]&b Finalizando Macro !!!);
chatopacity(100);
unset(des);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(bre);
unset(pp);
stop;
endif;
prompt(&id,$$?,Guarda itens de DIAMANTE? (s / n));
ifmatches(%&id%,^[S|s]);
&fer3="^276$|^277$|^278$|^279$|^293$";
&arm3="^310$|^311$|^312$|^313$";
elseif((%&id%="n")|(%&id%="N"));
log(&6[Macro]&b Não serão guardado itens de &6DIAMANTE);
&fer3=^$;
&arm3=^$;
else;
log(&6[Macro]&b Caracter não aceito !!!);
log(&6[Macro]&b Responda Corretamente !!!);
log(&6[Macro]&b Finalizando Macro !!!);
chatopacity(100);
unset(des);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(bre);
unset(pp);
stop;
endif;
prompt(&io,$$?,Guarda itens de OURO? (s / n));
ifmatches(%&io%,^[S|s]);
&fer2="^283$|^284$|^285$|^286$|^294$";
&arm2="^314$|^315$|^316$|^317$";
elseif((%&io%="n")|(%&io%="N"));
log(&6[Macro]&b Não serão guardado itens de &6OURO);
&fer2=^$;
&arm2=^$;
else;
log(&6[Macro]&b Caracter não aceito !!!);
log(&6[Macro]&b Responda Corretamente !!!);
log(&6[Macro]&b Finalizando Macro !!!);
chatopacity(100);
unset(des);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(bre);
unset(pp);
stop;
endif;
prompt(&if,$$?,Guarda itens de FERRO? (s / n));
ifmatches(%&if%,^[S|s]);
&fer1="^267$|^256$|^257$|^258$|^292$";
&arm1="^306$|^307$|^308$|^309$";
elseif((%&if%="n")|(%&if%="N"));
log(&6[Macro]&b Não serão guardado itens de &6FERRO);
&fer1=^$;
&arm1=^$;
else;
log(&6[Macro]&b Caracter não aceito !!!);
log(&6[Macro]&b Responda Corretamente !!!);
log(&6[Macro]&b Finalizando Macro !!!);
chatopacity(100);
unset(des);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(bre);
unset(pp);
stop;
endif;
#peixe=0;
#disco=0;
#minerio=0;
#ferramenta=0;
#armadura=0;
#tesouro=0;
#money=0;
#qt=0;
#moneyp=0;
endif;
chatopacity(100);
}$$
/home mar
$${
log(&6[Macro]&b Indo para o pesqueiro em 5 segundos.);
wait(5);
keydown(jump);
wait(2);
#xp=%XPOS%;
#zp=%ZPOS%;
keyup(jump);
wait(1);
log(&6[Macro]&b Pegando Localização);
do;
getidrel(0,0,-3,#f1n);getidrel(0,-1,-3,#f2n);getidrel(0,+1,-3,#f3n);
getidrel(0,0,+3,#f1s);getidrel(0,-1,+3,#f2s);getidrel(0,+1,+3,#f3s);
getidrel(-3,0,0,#f1w);getidrel(-3,-1,0,#f2w);getidrel(-3,+1,0,#f3w);
getidrel(+3,0,0,#f1e);getidrel(+3,-1,0,#f2e);getidrel(+3,+1,0,#f3e);
wait(100ms);
if((%#f1n%!=54)&&(%#f1n%!=146)|(%#f2n%!=54)&&(%#f2n%!=146)|(%#f3n%!=54)&&(%#f3n%!=146));
&dir1=NORTH;&dir2=EAST;&dir3=SOUTH;&dir4=WEST;
log(&6[Macro]&b Localização salva com sucesso !);
log(&6[Macro]&b Localização: &6%&dir1%);
break;
elseif((%#f1s%!=54)&&(%#f1s%!=146)|(%#f2s%!=54)&&(%#f2s%!=146)|(%#f3s%!=54)&&(%#f3s%!=146));
&dir1=SOUTH;&dir2=WEST;&dir3=NORTH;&dir4=EAST;
log(&6[Macro]&b Localização salva com sucesso !);
log(&6[Macro]&b Localização: &6%&dir1%);
break;
elseif((%#f1w%!=54)&&(%#f1w%!=146)|(%#f2w%!=54)&&(%#f2w%!=146)|(%#f3w%!=54)&&(%#f3w%!=146));
&dir1=WEST;&dir2=SOUTH;&dir3=EAST;&dir4=NORTH;
log(&6[Macro]&b Localização salva com sucesso !);
log(&6[Macro]&b Localização: &6%&dir1%);
break;
elseif((%#f1e%!=54)&&(%#f1e%!=146)|(%#f2e%!=54)&&(%#f2e%!=146)|(%#f3e%!=54)&&(%#f3e%!=146));
&dir1=EAST;&dir2=NORTH;&dir3=WEST;&dir4=SOUTH;
log(&6[Macro]&b Localização salva com sucesso !);
log(&6[Macro]&b Localização: &6%&dir1%);
break;
else;
log(&6[Macro]&b Algo errado com o local !!!);
log(&6[Macro]&b Visite o forum se necessitar de ajuda);
prompt(&nov,$$?,Deseja pegar a localização manualmente ?);
ifmatches(%&nov%,^[S|s]);
log(&6[Macro]&b Aperte o número 1 para confirma a localização);
do;
if(KEY_1);
getidrel(0,0,+3,#loc1);getidrel(0,-1,+3,#loc2);getidrel(0,+1,+3,#loc3);
if((%#loc1%!=54)&&(%#loc1%!=146)|(%#loc2%!=54)&&(%#loc2%!=156)|(%#loc3%!=54)&&(%#loc3%!=156));
ifmatches(%DIRECTION%,N);&dir1=NORTH;&dir2=WEST;&dir3=SOUTH;&dir4=EAST;endif;
ifmatches(%DIRECTION%,S);&dir1=SOUTH;&dir2=EAST;&dir3=NORTH;&dir4=WEST;endif;
ifmatches(%DIRECTION%,E);&dir1=EAST;&dir2=NORTH;&dir3=WEST;&dir4=SOUTH;endif;
ifmatches(%DIRECTION%,W);&dir1=WEST;&dir2=SOUTH;&dir3=EAST;&dir4=NORTH;endif;
log(&6[Macro]&b Localização salva com sucesso !);
log(&6[Macro]&b Localização: &6%&dir1%);
break;
else;
log(&6[Macro]&b Falha ao pegar localização !);
log(&6[Macro]&b Olhe para a coluna e &6tente novamente !!!);
endif;
endif;
loop;
endif;
endif;
loop;
#temp=0;
#ff=0;
#baup=1;
#baud=1;
#baum=1;
#baua=1;
#bauf=1;
&other="^346$|^287$|^349$|^261$";
&min="^264$|^265$|^266$|^369$|^370$";
&dis="^2256$|^2257$|^2258$|^2259$|^2260$|^2261$|^2262$|^2263$|^2264$|^2265$|^2266$|^2267$";
//&encant="^Afiada$|^Julgamento$|^Ru.*$|^Repul.*$|^Aspecto$|^Pilhagem$|^Efici.*$|^Toque$|^Inquebr.*$|^Fortuna$|^For.*$|^Impacto$|^Chama$|^Infinidade$";
&encant="^Sharpness$|^Smite$|^Bane of Arthropods$|^Knockback$|^Fire Aspect$|^Looting$|^Efficiency$|^Silk Touch$|^Unbreaking$|^Fortune$|^Power$|^Punch$|^Flame$|^Infinity$";
look(%&dir1%);
log(&6[Macro]&b Pesca Encantada &2[ON]);
log(&6[Macro]&b Pressione &6%KEYNAME% &bpara desativar);
gui(inventory);
wait(100ms);
do;
ifmatches(%GUI%,GUIINVENTORY);
do;
if((%XPOS%!=%#xp%)&&(%ZPOS%!=%#z%));
}$$
/home mar
$${
wait(%#de%);
do;
until((%XPOS%=%#xp%)&&(%ZPOS%=%#zp%));
keydown(jump);
wait(2);
keyup(jump);
wait(1);
endif;
#vg=0;
for(#s,9,44);
if(@tes);inc(#tesouro);unset(@tes);endif;
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);gui(inventory);wait(2);break;endif;loop;endif;
look(%&dir1%);
look(,-90);
pick(346);
key(use);
getslotitem(%#s%,#n,#st);
if(bre);unset(bre);break;endif;
ifmatches(%GUI%,INVENTORY);else;break;endif;
if(%#st%=0);
#vg=1;
endif;
if(%DURABILITY%<20);
gui();
wait(1);
look(%&dir1%);
look(,+90);
do(3);
key(use);
key(attack);
wait(50ms);
loop;
gui(inventory);
endif;
wait(1ms);
next;
if(%#vg%=0);break;endif;
while(%GUI%="GUIINVENTORY");
if((%#vg%=0)|(%#ff%=1)|(%#ff%=2));
if(%#ff%=1);
log(&6[Macro]&b Opção 2 selecionada !!! Executando.....);
elseif(%#ff%=2);
log(&6[Macro]&b Opção 3 selecionada !!! Executando.....);
else;
log(&6[Macro]&b Inventario cheio! Jogando itens no lixo);
endif;
#ff=0;
look(%&dir1%);
gui(inventory);
wait(500ms);
for(#s,9,44);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);gui(inventory);wait(2);break;endif;loop;endif;
getslotitem(%#s%,#id,#st);
ifmatches(%#id%,%&other%|%&dis%|%&arm1%|%&arm2%|%&arm3%|%&fer1%|%&fer2%|%&fer3%|%&min%);
ifmatches(%#id%,%&arm1%|%&arm2%|%&arm3%);set(arm);endif;
ifmatches(%#id%,%&fer1%|%&fer2%|%&fer3%|^261$);set(fer);endif;
if(fmin);ifmatches(%#id%,%&min%);set(min);endif;endif;
if(fdis);ifmatches(%#id%,%&dis%);set(dis);endif;endif;
if(%#id%=349);set(fish);endif;
else;
slotclick(%#s%);
slotclick(-999);
endif;
wait(70ms);
next;
gui();
wait(250ms);
if(fish);
do;
look(%&dir3%);
if(%#baup%=1);look(-40,+0);endif;
if(%#baup%=2);look(-20,+0);endif;
if(%#baup%=3);look(+0,+0);endif;
if(%#baup%=4);look(+20,+0);endif;
if(%#baup%=5);look(+40,+0);endif;
if(%#baup%=6);look(-38,+20);endif;
if(%#baup%=7);look(-20,+20);endif;
if(%#baup%=8);look(0,+23);endif;
if(%#baup%=9);look(+20,+20);endif;
if(%#baup%=10);look(+38,+20);endif;
if(%#baup%=11);look(-38,+32);endif;
if(%#baup%=12);look(-22,+38);endif;
if(%#baup%=13);look(0,+40);endif;
if(%#baup%=14);look(+22,+38);endif;
if(%#baup%=15);look(+38,+32);endif;
wait(200ms);
do;
key(use);
wait(1);
ifmatches(%GUI%,CHEST);
break;
endif;
loop;
wait(200ms);
for(#s,54,89);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
getslotitem(%#s%,#id,#st);
if(%#id%=349);
slotclick(%#s%,l,true);
#peixe=%#peixe%+%#st%;
endif;
wait(100ms);
next;
getslotitem(53,#id,#st);
if(%#st%=64);
inc(#baup);
gui();
wait(100ms);
if(%#baup%=16);
ifmatches(%&vd%,^[S|s]);
set(vfish);
gui();
log(&6[Macro]&b Todos os baús de peixe cheios !!!);
log(&6[Macro]&b Preparando para vender peixes !!! &6Aguarde....);
break;
else;
log(&6[Macro]&b Acabo os baus de peixe !!!);
log(&6[Macro]&b Finalizando Macro !!!);
log(&6[Macro]&b Pesca Encantada &4[OFF]);
keyup(right);
keyup(sneak);
keyup(jump);
unset(@px);
unset(min);
unset(fish);
unset(dis);
unset(fer);
unset(arm);
unset(vfish);
unset(vdis);
unset(vender);
unset(break);
stop;
endif;
endif;
endif;
until(%#st%!=64);
gui();
wait(200ms);
unset(fish);
endif;
wait(200ms);
if(min);
do;
look(%&dir1%);
if(%#baum%=1);look(-40,+0);endif;
if(%#baum%=2);look(-25,+0);endif;
if(%#baum%=3);look(-40,+20);endif;
if(%#baum%=4);look(-20,+20);endif;
if(%#baum%=5);look(-40,+33);endif;
if(%#baum%=6);look(-20,+38);endif;
wait(200ms);
do;
key(use);
wait(1);
ifmatches(%GUI%,CHEST);
break;
endif;
loop;
wait(200ms);
for(#s,54,89);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
getslotitem(%#s%,#id,#st);
ifmatches(%#id%,%&min%);
slotclick(%#s%,l,true);
#minerio=%#minerio%+%#st%;
endif;
wait(100ms);
next;
getslotitem(53,#id,#st);
if(%#st%!=0);
inc(#baum);
gui();
if(%#baum%=7);
log(&6[Macro]&b Todos os baus de minerios cheios !!!);
log(&6[Macro]&b Minerios seram jogados fora !!!);
unset(fmin);
look(%&dir1%);
gui(inventory);
wait(1);
for(#i,9,44);
getslotitem(%#i%,#n,#st);
ifmatches(%#n%,%&min%);
slotclick(%#i%);
slotclick(-999);
press(q);
endif;
wait(70ms);
next;
&min=^$;
break;
endif;
wait(100ms);
endif;
until(%#st%=0);
gui();
unset(min);
endif;
wait(200ms);
if(dis);
do;
look(%&dir1%);
if(%#baud%=1);look(+20,+0);endif;
if(%#baud%=2);look(+38,+0);endif;
if(%#baud%=3);look(+20,+20);endif;
if(%#baud%=4);look(+38,+20);endif;
if(%#baud%=5);look(+20,+40);endif;
if(%#baud%=6);look(+38,+35);endif;
wait(200ms);
do;
key(use);
wait(1);
ifmatches(%GUI%,CHEST);
break;
endif;
loop;
wait(200ms);
for(#s,54,89);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
getslotitem(%#s%,#id,#st);
ifmatches(%#id%,%&dis%);
slotclick(%#s%,l,true);
inc(#disco);
endif;
wait(100ms);
next;
getslotitem(53,#id,#st);
if(%#st%!=0);
inc(#baud);
gui();
wait(200ms);
if(%#baud%=7);
ifmatches(%&vp%,^[S|s]);
gui();
set(vdis);
log(&6[Macro]&b Todos os baús de disco cheios !!!);
log(&6[Macro]&b Preparando para vender discos !!! &6Aguarde....);
break;
else;
log(&6[Macro]&b Acabo os baus de disco !!!);
log(&6[Macro]&b Agora disco seram jogados fora !!!);
unset(fdis);
look(%&dir1%);
wait(1);
for(#q,9,44);
getslotitem(%#q%,#n,#st);
ifmatches(%#n%,%&dis%);
slotclick(%#q%);
slotclick(-999);
endif;
wait(100ms);
next;
&dis=^$;
break;
endif;
endif;
endif;
until(%#st%=0);
gui();
unset(dis);
endif;
wait(200ms);
if(fer);
do;
look(%&dir4%);
if(%#bauf%=1);look(-40,+0);endif;
if(%#bauf%=2);look(-20,+0);endif;
if(%#bauf%=3);look(+0,+0);endif;
if(%#bauf%=4);look(+20,+0);endif;
if(%#bauf%=5);look(+40,+0);endif;
if(%#bauf%=6);look(-38,+20);endif;
if(%#bauf%=7);look(-20,+20);endif;
if(%#bauf%=8);look(0,+23);endif;
if(%#bauf%=9);look(+20,+20);endif;
if(%#bauf%=10);look(+38,+20);endif;
if(%#bauf%=11);look(-38,+32);endif;
if(%#bauf%=12);look(-22,+38);endif;
if(%#bauf%=13);look(0,+40);endif;
if(%#bauf%=14);look(+22,+38);endif;
if(%#bauf%=15);look(+38,+32);endif;
wait(200ms);
do;
key(use);
wait(1);
ifmatches(%GUI%,CHEST);
break;
endif;
loop;
wait(200ms);
set(sp);
for(#s,81,89);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
wait(50ms);
getslotitem(%#s%,#id,#st);
if(%#st%=0);
for(#i,54,80);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
getslotitem(%#i%,#id,#st);
wait(50ms);
ifmatches(%#id%,%&fer1%|%&fer2%|%&fer3%|^261$);
slotclick(%#i%,l,false);
wait(100ms);
slotclick(%#s%,l,false);
unset(sp);
break;
endif;
next;
endif;
next;
#enc=1;
#slt=1;
do;
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
slot(%#slt%);
foreach(enchantments);
if(%#enc%=1);&enc1=%ENCHANTMENTNAME%;endif;
if(%#enc%=2);&enc2=%ENCHANTMENTNAME%;endif;
if(%#enc%=3);&enc3=%ENCHANTMENTNAME%;endif;
if(%#enc%=4);&enc4=%ENCHANTMENTNAME%;endif;
inc(#enc);
next;
#enc=1;
ifmatches(%&enc1%,%&encant%);
#stt=%#slt%+80;
slotclick(%#stt%,l,true);
inc(#ferramenta);
endif;
&enc1=;
&enc2=;
&enc3=;
&enc4=;
inc(#slt);
wait(100ms);
getslotitem(53,#id,#st);
set(last);
if(%#st%!=0);
inc(#bauf);
unset(last);
break;
endif;
until(%#slt%=10);
wait(1);
if(last);
gui();
look(%&dir1%);
wait(200ms);
for(#s,1,9);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
getslotitem(%#s%,#id,#st);
ifmatches(%#id%,%&fer1%|%&fer2%|%&fer3%|^261$);
slotclick(%#s%);
slotclick(-999);
press(q);
endif;
wait(100ms);
next;
gui();
wait(200ms);
if(sp);
unset(sp);
break;
endif;
endif;
loop;
unset(fer);
gui();
endif;
wait(200ms);
if(arm);
do;
look(%&dir2%);
if(%#baua%=1);look(-40,+0);endif;
if(%#baua%=2);look(-20,+0);endif;
if(%#baua%=3);look(+0,+0);endif;
if(%#baua%=4);look(+20,+0);endif;
if(%#baua%=5);look(+40,+0);endif;
if(%#baua%=6);look(-38,+20);endif;
if(%#baua%=7);look(-20,+20);endif;
if(%#baua%=8);look(0,+23);endif;
if(%#baua%=9);look(+20,+20);endif;
if(%#baua%=10);look(+38,+20);endif;
if(%#baua%=11);look(-38,+32);endif;
if(%#baua%=12);look(-22,+38);endif;
if(%#baua%=13);look(0,+40);endif;
if(%#baua%=14);look(+22,+38);endif;
if(%#baua%=15);look(+38,+32);endif;
wait(200ms);
do;
key(use);
wait(1);
ifmatches(%GUI%,CHEST);
break;
endif;
loop;
wait(200ms);
set(sp);
for(#s,81,89);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
wait(50ms);
getslotitem(%#s%,#id,#st);
if(%#st%=0);
for(#i,54,80);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
getslotitem(%#i%,#id,#st);
ifmatches(%#id%,%&arm1%|%&arm2%|%&arm3%);
slotclick(%#i%,l,false);
wait(100ms);
slotclick(%#s%,l,false);
unset(sp);
break;
endif;
next;
endif;
next;
#enc=1;
#slt=1;
do;
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
slot(%#slt%);
foreach(enchantments);
if(%#enc%=1);&enc1=%ENCHANTMENT%;endif;
if(%#enc%=2);&enc2=%ENCHANTMENT%;endif;
if(%#enc%=3);&enc3=%ENCHANTMENT%;endif;
if(%#enc%=4);&enc4=%ENCHANTMENT%;endif;
inc(#enc);
next;
#enc=1;
if((%&enc1%="Protection IV")|(%&enc2%="Protection IV")|(%&enc3%="Protection IV")|(%&enc4%="Protection IV"));
//ifmatches(%&enc1%,"^Prote(.*)o IV$");
#stt=%#slt%+80;
slotclick(%#stt%,l,true);
inc(#armadura);
endif;
&enc1=;
&enc2=;
&enc3=;
&enc4=;
inc(#slt);
wait(100ms);
getslotitem(53,#id,#st);
if(%#st%!=0);
inc(#baua);
unset(last);
break;
endif;
until(%#slt%=10);
if(last);
gui();
look(%&dir1%);
wait(200ms);
for(#s,1,9);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
getslotitem(%#s%,#id,#st);
ifmatches(%#id%,%&arm1%|%&arm2%|%&arm3%);
slotclick(%#s%);
slotclick(-999);
press(q);
endif;
wait(100ms);
next;
gui();
wait(200ms);
if(sp);
unset(sp);
break;
endif;
endif;
loop;
unset(arm);
gui();
endif;
gui(inventory);
endif;
wait(200ms);
////////////////////
//Vendas || Vendas//
////////////////////
if(vfish);
gui();
unset(vfish);
#baup=1;
do;
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
do;
look(%&dir3%);
if(%#baup%=1);look(-40,+0);endif;
if(%#baup%=2);look(-20,+0);endif;
if(%#baup%=3);look(+0,+0);endif;
if(%#baup%=4);look(+20,+0);endif;
if(%#baup%=5);look(+40,+0);endif;
if(%#baup%=6);look(-38,+20);endif;
if(%#baup%=7);look(-20,+20);endif;
if(%#baup%=8);look(0,+23);endif;
if(%#baup%=9);look(+20,+20);endif;
if(%#baup%=10);look(+38,+20);endif;
if(%#baup%=11);look(-38,+32);endif;
if(%#baup%=12);look(-22,+38);endif;
if(%#baup%=13);look(0,+40);endif;
if(%#baup%=14);look(+22,+38);endif;
if(%#baup%=15);look(+38,+32);endif;
wait(200ms);
do;
key(use);
wait(1);
ifmatches(%GUI%,CHEST);
break;
endif;
loop;
for(#i,0,53);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
slotclick(%#i%,l,true);
wait(150ms);
next;
#std=0;
for(#i,0,53);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
getslotitem(%#i%,#id,#st);
if(%#id%=349);
#std=1;
endif;
next;
if(%#std%=0);
inc(#baup);
gui();
endif;
if(%#baup%=16);
break;
endif;
wait(200ms);
until(%#std%=1);
log(&6[Macro]&b Indo vender peixe !!!);
#x=%XPOS%;
#z=%ZPOS%;
}$$
/home peixe
$${
do;
if((%XPOS%!=%#x%)&&(%ZPOS%!=%#z%));
break;
endif;
wait(2);
loop;
wait(%#de%);
#toc=0;
do;
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
if(%HITID%=68);
gui(inventory);
wait(1);
for(#i,9,44);
getslotitem(%#i%,#id,#st);
if(%#id%=349);
inc(#toc,4);
endif;
next;
gui();
do(%#toc%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);wait(1);gui(inventory);wait(2);break;endif;loop;endif;
pick(346);
key(attack);
wait(260ms);
loop;
#toc=0;
gui();
wait(1);
gui(inventory);
wait(1);
#toc1=0;
for(#i,9,44);
getslotitem(%#i%,#id,#st);
if(%#id%=349);
inc(#toc1,4);
endif;
next;
gui();
wait(200ms);
do(%#toc1%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);wait(1);gui(inventory);wait(2);break;endif;loop;endif;
pick(346);
key(attack);
wait(260ms);
loop;
#toc1=0;
#x=%XPOS%;
#z=%ZPOS%;
}$$
/home mar
$${
do;
if((%XPOS%!=%#x%)&&(%ZPOS%!=%#z%));
break;
endif;
wait(2);
loop;
wait(%#de%);
#pack=%#pack%+%#toc%;
#moneyp=%#pack%*144;
break;
else;
//player na frente........em criação
log(&6[Macro]&b Algum player na frente !!!);
log(&6[Macro]Aguardando 3 segundos);
wait(3);
endif;
loop;
until(%#baup%=16);
log(&6[Macro]&b Todos os peixes vendidos !!!);
log(&6[Macro]&b Money da venda: %#moneyp%);
endif;
if(vdis);
unset(vdis);
#baud=1;
do;
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
#rec13=0;
#reccat=0;
#recblocks=0;
#recchirp=0;
#recfar=0;
#recmall=0;
#recmellohi=0;
#recstal=0;
#recstrad=0;
#recward=0;
#rec11=0;
#recwait=0;
do;
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir1%);
if(%#baud%=1);look(+20,+0);endif;
if(%#baud%=2);look(+38,+0);endif;
if(%#baud%=3);look(+20,+20);endif;
if(%#baud%=4);look(+38,+20);endif;
if(%#baud%=5);look(+20,+40);endif;
if(%#baud%=6);look(+38,+35);endif;
wait(200ms);
do;
key(use);
wait(2);
ifmatches(%GUI%,CHEST);
break;
endif;
loop;
wait(1);
for(#dis,0,53);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
slotclick(%#dis%,l,true);
wait(150ms);
next;
#std=0;
for(#dis,0,53);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);do(3);key(use);wait(1);loop;wait(2);break;endif;loop;endif;
getslotitem(%#dis%,#id,#st);
ifmatches(%#id%,%&dis%);
#std=1;
endif;
next;
if(%#std%=0);
inc(#baud,1);
gui();
endif;
if(%#baud%=7);
break;
endif;
wait(200ms);
until(%#std%=1);
gui();
#x=%XPOS%;
#z=%ZPOS%;
}$$
/home cds
$${
do;
if((%XPOS%!=%#x%)&&(%ZPOS%!=%#z%));
break;
endif;
wait(2);
loop;
wait(%#de%);
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);
wait(1);
for(#ven,9,44);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);wait(1);gui(inventory);wait(2);break;endif;loop;endif;
getslotitem(%#ven%,#disc,#st);
ifmatches(%#disc%,^2256$);inc(#rec13,1);endif;
ifmatches(%#disc%,^2257$);inc(#reccat,1);endif;
ifmatches(%#disc%,^2258$);inc(#recblocks,1);endif;
ifmatches(%#disc%,^2259$);inc(#recchirp,1);endif;
ifmatches(%#disc%,^2260$);inc(#recfar,1);endif;
ifmatches(%#disc%,^2261$);inc(#recmall,1);endif;
ifmatches(%#disc%,^2262$);inc(#recmellohi,1);endif;
ifmatches(%#disc%,^2263$);inc(#recstal,1);endif;
ifmatches(%#disc%,^2264$);inc(#recstrad,1);endif;
ifmatches(%#disc%,^2265$);inc(#recward,1);endif;
ifmatches(%#disc%,^2266$);inc(#rec11,1);endif;
ifmatches(%#disc%,^2267$);inc(#recwait,1);endif;
wait(50ms);
next;
gui();
wait(2);
//Disco 13
do(%#rec13%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrec13=%#rec13%*100;
log(&6[Macro]&b foram vendidos &6%#rec13% &bDisco 13);
log(&6[Macro]&b Lucro de: &6%#qrec13% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco Cat
do(%#reccat%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qreccat=%#reccat%*100;
log(&6[Macro]&b foram vendidos &6%#reccat% &bDisco Cat);
log(&6[Macro]&b Lucro de: &6%#qreccat% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco Blocks
do(%#recblocks%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrecblocks=%#recblocks%*100;
log(&6[Macro]&b foram vendidos &6%#recblocks% &bDisco Blocks);
log(&6[Macro]&b Lucro de: &6%#qrecblocks% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco Chirp
do(%#recchirp%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrecchirp=%#recchirp%*100;
log(&6[Macro]&b foram vendidos &6%#recchirp% &bDisco Chirp);
log(&6[Macro]&b Lucro de: &6%#qrecchirp% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco Far
do(%#recfar%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrecfar=%#recfar%*100;
log(&6[Macro]&b foram vendidos &6%#recfar% &bDisco Far);
log(&6[Macro]&b Lucro de: &6%#qrecfar% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco Mall
do(%#recmall%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrecmall=%#recmall%*100;
log(&6[Macro]&b foram vendidos &6%#recmall% &bDisco Mall);
log(&6[Macro]&b Lucro de: &6%#qrecmall% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco Mellohi
do(%#recmellohi%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrecmellohi=%#recmellohi%*100;
log(&6[Macro]&b foram vendidos &6%#recmellohi% &bDisco Mellohi);
log(&6[Macro]&b Lucro de: &6%#qrecmellohi% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco Stal
do(%#recstal%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrecstal=%#recstal%*100;
log(&6[Macro]&b foram vendidos &6%#recstal% &bDisco Stal);
log(&6[Macro]&b Lucro de: &6%#qrecstal% Coins);
#z=%ZPOS%;
#y=%YPOS%;
wait(1);
do;
look(%&dir%);
keyup(jump);
keydown(right);
keydown(sneak);
getidrel(0,0,-1,#bl);
if(%#bl%!=0);
keydown(jump);
wait(1t);
endif;
if(%YPOS%!=%#y%);
keydown(jump);
wait(1t);
endif;
until(%ZPOS%=%#z%-9);
keyup(right);
keyup(jump);
do(2);
keydown(left);
wait(1);
loop;
keyup(left);
keyup(sneak);
//Disco Strad
do(%#recstrad%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrecstrad=%#recstrad%*100;
log(&6[Macro]&b foram vendidos &6%#recstrad% &bDisco Strad);
log(&6[Macro]&b Lucro de: &6%#qrecstrad% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco Ward
do(%#recward%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrecward=%#recward%*100;
log(&6[Macro]&b foram vendidos &6%#recward% &bDisco Ward);
log(&6[Macro]&b Lucro de: &6%#qrecward% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco 11
do(%#rec11%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrec11=%#rec11%*100;
log(&6[Macro]&b foram vendidos &6%#rec11% &bDisco 11);
log(&6[Macro]&b Lucro de: &6%#qrec11% Coins);
#z=%ZPOS%;
wait(1);
do;
look(%&dir%);
keydown(right);
keydown(sneak);
until(%ZPOS%=%#z%-1);
keyup(right);
keyup(sneak);
//Disco Wait
do(%#recwait%);
if(@rs);exec(rs.txt);do;if(@qrsp);unset(@qrsp);}$$/home tfish$${wait(%#de%);break;endif;loop;endif;
look(%&dir%);
key(attack);
wait(500ms);
loop;
#qrecwait=%#recwait%*100;
log(&6[Macro]&b foram vendidos &6%#recwait% &bDisco Wait);
log(&6[Macro]&b Lucro de: &6%#qrecwait% Coins);
#z=%ZPOS%;
wait(1);
///////////////////
#qt=%#qt%+%#qrecwait%+%#qrec11%+%#qrecward%+%#qrecstrad%+%#qrecstal%+%#qrecmellohi%+%#qrecmall%+%#qrecfar%+%#qrecchirp%+%#qrecblocks%+%#qreccat%+%#qrec13%;
}$$
/home mar
$${
wait(5);
until(%#baud%=7);
log(&6[Macro]&bMoney Total: &6%#qt%);
gui(inventory);
wait(2);
endif;
#money=%#money%+%#qt%+%#moneyp%;
else;
inc(#temp);
if(%#temp%=10);
#temp=0;
log(&6[Macro]&b Abrindo inventario novamente !!!);
wait(2);
gui(inventory);
endif;
endif;
if(KEY_L);
//teste ainda.....
log(&6[Macro]&b Processando informações.. Aguarde..);
wait(1);
log(&6[Macro]&b Peixes guardados: &6%#peixe%);
log(&6[Macro]&b Disco guardados: &6%#disco%);
log(&6[Macro]&b Minerios guardados: &6%#minerio%);
log(&6[Macro]&b Ferramentas encantadas guardadas: &6%#ferramenta%);
log(&6[Macro]&b Armaduras encantadas guardadas: &6%#armadura%);
log(&6[Macro]&b Tesouros encontrados: &6%#tesouro%);
log(&6[Macro]&b Money Total ganho: &6%#money% Coins);
log(&6[Macro]&8 Para resetar aperte &61);
log(&6[Macro]&8 Para guarda itens aperte &62);
log(&6[Macro]&8 Para pausar a macro aperte &6P);
ifmatches(%&v%,^[S|s]);log(&6[Macro]&8 Para vender itens aperte &63);endif;
endif;
if(KEY_1);
chatopacity(0);
prompt(&reset,$$?,Deseja resetar as informações ? (s / n));
ifmatches(%&reset%,^[S|s]);
log(&6[Macro]&b Informações resetadas !!!);
#peixe=0;
#disco=0;
#minerio=0;
#ferramenta=0;
#armadura=0;
#money=0;
#tesouro=0;
#qt=0;
#moneyp=0;
else;.
log(&6[Macro]&b Reset de informações cancelada !!!);
endif;
chatopacity(100);
endif;
if(KEY_2);
log(&6[Macro]&b Indo guarda itens !!! Aguarde....);
gui(inventory);
#ff=1;
set(bre);
endif;
ifmatches(%&v%,^[S|s]);
if(KEY_3);
log(&6[Macro]&b Indo guarda e vender itens !!! Aguarde....);
gui(inventory);
#ff=2;
set(bre);
ifmatches(%&vp%,^[S|s]);set(vfish);else;log(&6[Macro]&b Voce não selecionou a opção de vender peixe !!!);endif;
ifmatches(%&vd%,^[S|s]);set(vdis);else;log(&6[Macro]&b Voce não selecionou a opção de vender disco !!!);endif;
endif;
endif;
if(KEY_P);
wait(1);
if(KEY_P);
log(&6[Macro]&b Macro Pausado ....);
log(&6[Macro]&b Aperte &6P &bnovamente para voltar a macro....);
wait(2);
do;
if(KEY_P);
log(&6[Macro]&b Voltando a funcionar !!!);
break;
endif;
loop;
endif;
endif;
loop;
endif;
}$$
-----------------------------------------------------
Erros na macro? Ou em outra macro minha ? Me informe e tentarei resolver o mais breve possivel !!!! Basta enviar uma MP no craftlandia !!!Clique para expandir...
