Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- $${
- &home_pesqueiro = "/home pesqueirovip";
- &home_baus = "/home baus_infinitos";
- #durabilidade = 20;
- &delay = "150ms";
- set(&continuar_ultimo_bau,"Perguntar");
- set(vip);
- #id_vara = 346;
- #id_linha = 287;
- #id_peixe = 349;
- #id_ghast = 370;
- #id_blaze = 369;
- #id_diamante = 264;
- #id_maca = 322;
- &id_armaduras = "^310$|^311$|^312$|^313$";
- &id_ferramentas = "^276$|^277$|^278$|^279$";
- &ferramentas_de_pedra = "^272$|^273$|^274$|^275$";
- &direto_pro_bau = "^%#id_peixe%$|^%#id_maca%$|^%#id_diamante%$|^%#id_ghast%$|^%#id_blaze%$|%&ferramentas_de_pedra%";
- &nao_jogar_fora = "%&id_armaduras%|%&id_ferramentas%|^%#id_vara%$|^%#id_linha%$|%&direto_pro_bau%";
- set(p4);
- set(s5);
- set(eff5);
- if(a);unset(a);log("pescador simplao: off"); stop; else; log("pescador simplao: on"); set(a); endif;
- ifmatches(%&continuar_ultimo_bau%,"Desligar"); unset(&continuar_ultimo_bau); endif;
- if(#coluna > 0);
- inc(#coluna,1);
- do();
- ifmatches(%&continuar_ultimo_bau%,"SIM|NAO|Desligar");
- break;
- endif;
- prompt(&continuar_ultimo_bau,"$$[ [§a§lSIM §f(coluna §6%#coluna%§f - bau §e%#bau%§f),§c§lNAO§f - recomeçar,§6Desligar macro]]","§fDeseja continuar do ultimo bau?");
- loop;
- ifmatches(%&continuar_ultimo_bau%,"Desligar");
- unset(a);
- log("pescador simplao: off");
- stop;
- endif;
- ifmatches(%&continuar_ultimo_bau%,"NAO");
- log("Bau e coluna resetados.");
- #coluna = 1;
- #bau = 1;
- endif;
- endif;
- ifmatches(%CANFLY%,"True"); echo("/mc"); endif;
- echo("%&home_pesqueiro%");
- wait(2000ms);
- do();
- getidrel(0,0,0,#id_pe);
- getidrel(0,1,0,#id_cabeca);
- if(((#id_pe == 8)||(#id_pe == 9))&&((#id_cabeca == 8)||(#id_pe == 9)));
- echo("/esconder");
- break;
- else;
- echo("%&home_pesqueiro%");
- do(14);
- wait(500ms);
- getidrel(0,0,0,#id_pe);
- getidrel(0,1,0,#id_cabeca);
- if(((#id_pe == 8)||(#id_pe == 9))&&(#id_cabeca == 8)||(#id_pe == 9)));
- break;
- endif;
- loop;
- endif;
- loop;
- #xtrap = %XPOS%;
- #ytrap = %YPOS%;
- #ztrap = %ZPOS%;
- #bau_linha = 2;
- #coluna_linha = 1;
- gui(inventory);
- unset(proxima_coluna);
- unset(proximo_bau);
- unset(guardar);
- unset(acabou_linha);
- unset(acabou_vara);
- if(#coluna <= 0); #coluna = 1; endif;
- dec(#coluna,1);
- do();
- do();
- unsafe(0);
- if((%XPOS% != %#xtrap%)||(%YPOS% != %#ytrap%)||(%ZPOS% != %#ztrap%));
- set(guardar);
- log("Erro de posicionamento detectado!");
- log("Iniciando procedimentos de armazenamento.");
- break;
- endif;
- endunsafe;
- if(%GUI% != "GUIINVENTORY");
- log("Inventario Fechado. Aguardando.");
- do(10);
- wait(500ms);
- if((%GUI% == "GUICHAT")||(%GUI% == "GUIINVENTORY")); break; endif;
- loop;
- if(%GUI% == "GUICHAT");
- log("Chat aberto. Aguardando.");
- do(30);
- wait(500ms);
- if((%GUI% != "GUICHAT")&&(%GUI% != "NONE"));
- break;
- endif;
- loop;
- endif;
- log("Retomando...");
- do(5); wait(400ms); if(%GUI% == "GUIINVENTORY"); break; endif; loop;
- if(%GUI% != "GUIINVENTORY");
- do(); gui(inventory); until(%GUI% == "GUIINVENTORY");
- endif;
- endif;
- if(%ITEM% != %#id_vara%); pick(%#id_vara%); endif;
- if(%GUI% == "GUIINVENTORY");
- unsafe(0);
- getslot(%#id_linha%,#slot_linha,9);
- getslot(%#id_vara%,#slot_vara,9);
- if(#slot_linha < 0); log("Acabou a linha"); set(acabou_linha); endif;
- if(#slot_vara < 0); log("Nao foi encontrada vara."); set(acabou_vara); endif;
- if((#slot_vara > 0)&&(#slot_vara < 36));
- for(#slot,36,44);
- getslotitem(%#slot%,#oq);
- if(#oq != #id_vara);
- slotclick(%#slot%,l,true);
- endif;
- next;
- wait(100ms);
- slotclick(%#slot_vara%,l,true);
- pick(%#id_vara%);
- wait(300ms);
- getslot(%#id_vara%,#slot_vara,36);
- if(#slot_vara < 0);
- set(acabou_vara);
- endif;
- endif;
- if((acabou_linha)||(acabou_vara));
- log("Iniciando procedimentos de armazenamento.");
- set(guardar);
- break;
- endif;
- if(%ITEM% != %#id_vara); pick(%#id_vara%); wait(20ms); endif;
- endunsafe;
- if(%ITEM% == %#id_vara%);
- if(%DURABILITY% >= %#durabilidade%);
- key(use);
- wait(%&delay%);
- else;
- if(vip);
- echo("/reparar");
- else;
- #yaw = %YAW%+180; if(#yaw > 360); dec(#yaw,360); endif; #pitch = %PITCH%;
- look(,90);
- wait(500ms);
- key(use);
- endif;
- wait(500ms);
- if(%DURABILITY% < %#durabilidade%);
- if(!vip); keydown(jump); wait(20ms); keyup(jump); wait(500ms); endif;
- wait(1000ms);
- if(%DURABILITY% < %#durabilidade%);
- if(!vip);
- look(,90);
- key(use);
- else;
- echo("/reparar");
- endif;
- wait(1500ms);
- if(%DURABILITY% < %#durabilidade%);
- log("Durabilidade nao pode ser corrigida.");
- log("Iniciando procedimentos de armazenamento.");
- set(guardar);
- break;
- endif;
- endif;
- endif;
- endif;
- endif;
- unsafe(0);
- if(%GUI% == "GUIINVENTORY");
- #vazio = 0;
- for(#slot,9,44);
- getslotitem(%#slot%,#oq);
- if(#oq == 0);
- inc(#vazio,1);
- endif;
- next;
- if(#vazio < 3);
- log("Menos de 3 slots vazios (%#vazio%)");
- log("Iniciando procedimentos de armazenamento.");
- set(guardar);
- break;
- endif;
- endif;
- endunsafe;
- if(guardar); break; endif;
- endif;
- loop;
- if(guardar);
- unset(restart);
- unset(proxima_coluna);
- do();
- if(!proxima_coluna);
- do();
- echo(%&home_baus%);
- do(20);
- wait(333ms);
- unsafe(0);
- getidrel(0,-1,-2,#bau1);getidrel(0,0,-2,#bau2);getidrel(0,+1,-2,#bau3);getidrel(0,+2,-2,#bau4);getidrel(0,+3,-2,#bau5);
- if(((#bau1 == 54)||(#bau1 == 146))&&((#bau2 == 54)||(#bau2 == 146))&&((#bau3 == 54)||(#bau3 == 146))&&((#bau4 == 54)||(#bau4 == 146))&&((#bau5 == 54)||(#bau5 == 146)));
- if(!restart);
- break;
- else;
- if((%XPOS% == %#x_inicio%)&&(%ZPOS% == %#z_inicio%));
- break;
- endif;
- endif;
- endif;
- endunsafe;
- loop;
- WAIT(500ms);
- if(((#bau1 == 54)||(#bau1 == 146))&&((#bau2 == 54)||(#bau2 == 146))&&((#bau3 == 54)||(#bau3 == 146))&&((#bau4 == 54)||(#bau4 == 146))&&((#bau5 == 54)||(#bau5 == 146)));
- if(!restart);
- #z_inicio = %ZPOS%;
- #y_inicio = %YPOS%;
- #x_inicio = %XPOS%;
- break;
- else;
- if((%XPOS% == %#x_inicio%)&&(%ZPOS% == %#z_inicio%)&&(%YPOS% == %#y_inicio%));
- #z_inicio = %ZPOS%;
- #y_inicio = %YPOS%;
- #x_inicio = %XPOS%;
- break;
- endif;
- endif;
- endif;
- loop;
- look(west);
- wait(500ms);
- unsafe(0);
- gui(inventory);
- for(#slot,9,44);
- getslotitem(%#slot%,#oq);
- ifmatches(%#oq%,%&nao_jogar_fora%);
- else;
- slotclick(%#slot%,l,false);
- slotclick(-999);
- endif;
- next;
- gui();
- endunsafe;
- wait(500ms);
- look(north);
- endif;
- unset(restart);
- #x_final = #x_inicio + #coluna;
- #x_tolerancia_corrida = #x_final - 1;
- #distancia = #x_final - #x_inicio;
- unsafe();
- if(%XPOS% != %#x_final%);
- do();
- #x_agora = %XPOS%;
- if((#x_agora > #x_final)||(%ZPOS% != %#z_inicio%)||(%YPOS% != %#y_inicio%));
- keyup(forward); keyup(right); keyup(left);keyup(back); keyup(jump); keyup(sneak);
- set(restart);
- break;
- endif;
- if(#x_agora == #x_final);
- if((%HITID% == 54)||(%HITID% == 146));
- keyup(forward); keyup(right); keyup(left);keyup(back); keyup(jump); keyup(sneak);
- wait(500ms);
- if((%HITID% == 54)||(%HITID% == 146));
- unset(restart);
- unset(proxima_coluna);
- break;
- else;
- set(restart);
- break;
- endif;
- endif;
- endif;
- if(#x_agora < #x_final);
- if((#distancia > 2)&&(#x_agora < #x_tolerancia_corrida));
- SPRINT();
- keyup(sneak);
- else;
- UNSPRINT();
- keydown(sneak);
- endif;
- keydown(right);
- endif;
- loop;
- endif;
- endunsafe;
- if(!restart);
- do();
- do();
- unset(proximo_bau);
- if(#bau == 1); look(0,311); endif;
- if(#bau == 2); look(0,333); endif;
- if(#bau == 3); look(0,0); endif;
- if(#bau == 4); look(0,32); endif;
- if(#bau == 5); look(0,54); endif;
- if(#bau > 5);
- #bau = 1;
- inc(#coluna,1);
- set(proxima_coluna);
- break;
- endif;
- wait(50ms);
- if(%GUI% != "NONE");
- gui();
- wait(300ms);
- endif;
- do();
- key(use);
- unsafe;
- do(30);
- wait(100ms);
- if(%GUI% == "GUICHEST");
- break;
- endif;
- loop;
- endunsafe;
- if(%GUI% == "GUICHEST");
- break;
- endif;
- loop;
- SLOT(1);
- unsafe(0);
- #vazio = 0;
- getslot(0,#vazio);
- if((#vazio < 0)||(#vazio > 53));
- inc(#bau,1);
- gui();
- set(proximo_bau);
- break;
- else;
- look(295,20);
- endif;
- for(#slot,54,89);
- getslotitem(%#slot%,#oq);
- ifmatches(%#oq%,%&nao_jogar_fora%);
- ifmatches(%#oq%,%&direto_pro_bau%);
- slotclick(%#slot%,l,true);
- endif;
- else;
- if(#oq != 0);
- slotclick(%#slot%,l,false);
- slotclick(-999);
- endif;
- endif;
- next;
- #vazio = 0;
- getslot(0,#vazio);
- if((#vazio < 0)||(#vazio > 53));
- inc(#bau,1);
- set(proximo_bau);
- break;
- endif;
- endunsafe;
- do(4);
- unsafe(0);
- #contador = 0;
- for(#slot,54,89);
- getslotitem(%#slot%,#oq);
- ifmatches(%#oq%,%&direto_pro_bau%|%&id_armaduras%|%&id_ferramentas%);
- inc(#contador,1);
- endif;
- next;
- if(#contador == 0);
- break;
- endif;
- endunsafe;
- wait(100ms);
- for(#slot,54,89);
- unset(&encantamentos);
- unsafe(0);
- getslot(0,#vazio);
- if((#vazio < 0)||(#vazio > 53));
- inc(#bau,1);
- set(proximo_bau);
- break;
- endif;
- getslotitem(%#slot%,#oq);
- endunsafe;
- ifmatches(%#oq%,%&nao_jogar_fora%);
- unsafe(0);
- ifmatches(%#oq%,"%&direto_pro_bau%");
- slotclick(%#slot%,l,true);
- endif;
- endunsafe;
- ifmatches(%#oq%,%&id_ferramentas%|%&id_armaduras%);
- unsafe();
- getslot(0,#slot_vazio,54);
- if(#slot_vazio > 0); slotclick(%#slot_vazio%,l,false); endif;
- if(#slot < 81);
- getslot(0,#slot_vazio,54);
- SLOT(1);
- slotclick(%#slot%,l,false);
- ////wait(50ms);
- slotclick(81,l,false);
- /////wait(50ms);
- slotclick(%#slot%,l,false);
- /////wait(50ms);
- if(#slot_vazio > 0);
- slotclick(%#slot_vazio%,l,false);
- //////wait(200ms);
- endif;
- else;
- #qual_slot = #slot - 80;
- SLOT(%#qual_slot%);
- endif;
- endunsafe;
- unsafe(0);
- unset(&encantamentos);
- foreach(enchantments);
- set(&encantamentos,"%&encantamentos%-%ENCHANTMENT%");
- next;
- if(s5);
- ifmatches(%&encantamentos%,"Sharpness V|Afiada V");
- set(pegar_esse);
- endif;
- endif;
- if(p4);
- ifmatches(%&encantamentos%,"Protection IV|Prote..o IV");
- set(pegar_esse);
- endif;
- endif;
- if(eff5);
- ifmatches(%&encantamentos%,"Efficiency V|Efici.ncia V");
- set(pegar_esse);
- endif;
- endif;
- endunsafe;
- if(pegar_esse);
- unset(pegar_esse);
- if(#slot < 81);
- slotclick(81,l,true);
- else;
- slotclick(%#slot%,l,true);
- endif;
- ///wait(200ms);
- else;
- if(#slot < 81);
- slotclick(81,l,false);
- else;
- slotclick(%#slot%,l,false);
- endif;
- slotclick(-999);
- endif;
- endif;
- else;
- if(#oq != 0);
- slotclick(%#slot%,l,false);
- slotclick(-999);
- endif;
- endif;
- next;
- loop;
- break;
- loop;
- if((!proximo_bau)||(proxima_coluna));
- break;
- endif;
- loop;
- endif
- if(restart); unset(proxima_coluna); endif;
- if((!restart)&&(!proxima_coluna));
- break;
- endif;
- loop;
- if(%GUI% == "GUICHEST");
- getslot(0,#slot_vazio,54);
- if(#slot_vazio > 0);
- slotclick(%#slot_vazio%);
- endif;
- endif;
- endif;
- if(acabou_vara);
- unset(acabou_vara);
- do(); gui(); until(%GUI% == "NONE");
- do(); gui(inventory); until(%GUI% == "GUIINVENTORY");
- do();
- unsafe;
- getslot(%#id_vara%,#slot);
- if(#slot > 0); break; endif;
- for(#slot,36,44);
- getslotitem(%#slot%,#oq);
- if((#oq != #id_vara)&&(#oq != 0));
- slotclick(%#slot%,l,true);
- endif;
- next;
- gui();
- endunsafe;
- if((%XPOS% != %#x_inicio%)||(%YPOS% != %#y_inicio%)||(%ZPOS% != %#z_inicio%));
- do();
- echo("%&home_baus%");
- do(20);
- wait(333ms);
- if((%XPOS% == %#x_inicio%)&&(%YPOS% == %#y_inicio%)&&(%ZPOS% == %#z_inicio%));
- break;
- endif;
- loop;
- if((%XPOS% == %#x_inicio%)&&(%YPOS% == %#y_inicio%)&&(%ZPOS% == %#z_inicio%));
- break;
- endif;
- loop;
- endif;
- look(180,311);
- wait(1000ms);
- do(3);
- look(180,311);
- key(use);
- do(25);
- wait(100ms);
- if(%GUI% == "GUICHEST");
- break;
- endif;
- loop;
- if(%GUI% == "GUICHEST");
- wait(1000ms);
- break;
- endif;
- loop;
- if(%GUI% == "GUICHEST");
- unsafe(0);
- for(#slot,54,89);
- getslotitem(%#slot%,#oq);
- ifmatches(%#oq%,%&nao_jogar_fora%);
- else;
- if(#oq != 0);
- slotclick(%#slot%,l,false);
- wait(5ms);
- slotclick(-999);
- wait(1ms);
- endif;
- endif;
- next;
- endunsafe;
- getslot(%#id_vara%,#slot);
- if(#slot > 54);
- break;
- elseif((#slot >= 0)&&(#slot < 54));
- slotclick(%#slot%,l,true);
- break;
- else;
- log("Parece que acabaram as varas :/");
- log("Finalizando.");
- unset(a);
- log(off);
- stop;
- endif;
- endif;
- loop;
- endif;
- if(acabou_linha);
- look(180,311);
- unset(acabou_linha);
- unset(proximo_bau_linha);
- unset(proxima_coluna_linha);
- set(restart);
- gui();
- do();
- unset(proxima_coluna_linha);
- if(restart);
- unset(restart);
- if((%XPOS% != %#x_inicio%)||(%YPOS% != %#y_inicio%)||(%ZPOS% != %#z_inicio%));
- do();
- echo("%&home_baus%");
- do(20);
- wait(333ms);
- if((%XPOS% == %#x_inicio%)&&(%YPOS% == %#y_inicio%)&&(%ZPOS% == %#z_inicio%));
- break;
- endif;
- loop;
- if((%XPOS% == %#x_inicio%)&&(%YPOS% == %#y_inicio%)&&(%ZPOS% == %#z_inicio%));
- look(180,311);
- break;
- endif;
- loop;
- endif;
- endif;
- do();
- if(!proximo_bau_linha);
- unsafe(0);
- #x_final_linha = #x_inicio + #coluna_linha - 1;
- #x_agora = %XPOS%;
- #x_tolerancia_corrida_linha = #x_final_linha - 3;
- if(#x_agora == #x_final_linha);
- keyup(left);
- keyup(sneak);
- wait(500ms);
- if((%HITID% == 54)||(%HITID% == 146));
- unset(restart);
- break;
- else;
- set(restart);
- break;
- endif;
- endif;
- if(#x_agora < #x_final_linha);
- if(%XPOS% < #x_tolerancia_corrida_linha);
- SPRINT();
- keyup(sneak);
- else;
- keydown(sneak);
- UNSPRINT();
- endif;
- look(180,311);
- keydown(left);
- endif;
- if(#x_agora > #x_final_linha);
- set(restart);
- break;
- endif;
- endunsafe;
- endif;
- loop;
- wait(100ms);
- if(!restart);
- do();
- unset(proximo_bau_linha);
- if(%GUI% != "NONE");
- gui();
- wait(300ms);
- endif;
- if(#bau_linha == 1); look(180,311); endif;
- if(#bau_linha == 2); look(180,333); endif;
- if(#bau_linha == 3); look(180,0); endif;
- if(#bau_linha == 4); look(180,32); endif;
- if(#bau_linha == 5); look(180,54); endif;
- if(#bau_linha > 5);
- #bau_linha = 1;
- inc(#coluna_linha,1);
- set(proxima_coluna_linha);
- unset(proximo_bau_linha);
- break;
- endif;
- keyup(sneak);
- wait(1000ms);
- do();
- key(use);
- do(25); wait(100ms); if(%GUI% == "GUICHEST"); break; endif; loop;
- if(%GUI% == "GUICHEST"); wait(1000ms); break; endif;
- loop;
- unsafe(0);
- getslot(%#id_linha%,#slot,54);
- if(#slot > 0); unset(acabou_linha); unset(proximo_bau_linha); break; endif;
- for(#slot,54,89);
- getslotitem(%#slot%,#oq);
- ifmatches(%#oq%,%&nao_jogar_fora%);
- else;
- slotclick(%#slot%,l,false);
- slotclick(-999);
- endif;
- next;
- getslot(%#id_linha%,#slot);
- if((#slot >= 0)&&(#slot <= 54));
- slotclick(%#slot%,l,true);
- unset(acabou_linha);
- unset(proximo_bau_linha);
- unset(restart);
- unset(proxima_coluna_linha);
- break;
- elseif(#slot < 0);
- inc(#bau_linha,1);
- set(proximo_bau_linha);
- endif;
- endunsafe;
- loop;
- endif;
- if((!proximo_bau_linha)&&(!proxima_coluna_linha)&&(!restart));
- break;
- endif;
- loop;
- endif;
- if((%XPOS% != %#xtrap%)||(%ZPOS% != %#ztrap%));
- pick(%#id_vara%);
- do();
- if((%XPOS% == %#xtrap%)&&(%ZPOS% == %#ztrap%)&&(%YPOS% == %#ytrap%));
- break;
- endif;
- echo("%&home_pesqueiro%");
- do(14);
- wait(500ms);
- if((%XPOS% == %#xtrap%)&&(%ZPOS% == %#ztrap%)&&(%YPOS% == %#ytrap%));
- echo("/esconder");
- break;
- endif;
- loop;
- loop;
- endif;
- gui(inventory);
- unset(guardar);
- loop;
- loop;
- }$$
Advertisement
Add Comment
Please, Sign In to add comment