ENTREGUE [Macro] Pesca Encantada

Atenção: sendo refeita a macro, portanto ela estara disponivel em um novo topico, com varias modificação mas com o mesmo objetivo de guarda encantamentos, porem com um sistema inovador, em breve sera exposto para todos alem de um sistema novo com suporte para todas as macros....apenas aguarde

Ola a todos....

--Edit--

Spoiler

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...

21/07/2015--16:14
--Agora a macro é 2 em 1!!! "Ham?!" Agora o macro pede para selecionar a linguagem ingles ou portugues.
--Guarda os maravilhoso livros do tesouro
--Arquivo onchat modificado, então atualizem ele também
--Agora pega mais linha em dois baus, apenas se você tiver mais ou igual 100 em reparação
--Agora pega mais varas em dois baus, apenas se você tiver menos de 100 em reparação

24/07/2015--13:11
--Modificado a maneira de guarda itens no bau, esá mais rapido
--Reparação de algumas looks

Macro não totalmente autentica minha, Trap 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.....

A versão portugues e ingles estão em uma só.
A macro fará uma pergunta dizendo para escolher uma linguagem, PORTUGUES OU INGLES, claro o minecraft deve esta na linguagem que você escolher.

ERROS GERAIS, NÃO COMPROVADOS OU NÃO OCORRIDOS NOS TESTE:
VENDER PEIXES OU VENDER DISCO.

CASO ALGUM ERRO ACONTECE AVISE-ME IMEDIATAMENTE....

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 reiniciar" 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 resetar informações mantenha pressionado o numero "1".
Para somente guarda mantenha pressionado o numero "2".
Para guarda e vender mantenha pressionado o numero "3".

Pronto !!!

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

Imagem da TRAP:

Bau dos minerios, discos, varas, linhas, e livros
obs: linhas, varas e livros são os dois ultimos baus

Spoiler

Bau peixes

Spoiler

Bau das armaduras

Spoiler

Bau das ferramentas

Spoiler

Macro:
Para testa o look dos baus..

Spoiler

$${
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...

Spoiler

novo sistema sendo criado, nova versão sendo postada em breve....

onchat.txt (Precisa por no "onchat", tbm não altere o nome).--Atualizado em 21/07/2015

Spoiler

será lançado com objetivo de ajudar a todos....tendo suporte para todas as macros

Apenas na versão 1.5 !!!
1.5--

Spoiler

sera feito um novo post, macro esta sofrendo diversas modificações, em breve sera exposta aqui no forum

-----------------------------------------------------

Erros na macro? Ou em outra macro minha ? Me informe e tentarei resolver o mais breve possivel !!!! Basta enviar uma MP no craftlandia !!!

 

Cara como dito ta em beta... Então bugs podem acontecer porem seram corrigidos

 

Já estou fazendo isso

E complexo sim, mas e lento e ainda, para prevenir bug,s pq não testei n servers do craftlandia só no meu msm

 

Cara tem que ser assim senão vai bugs e não guarda os itens....
E pq tu não sabe como funciona o macro.....