Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- $${
- //// uma macro simples enquanto ninguem lança uma mais completa ;
- //// qualquer duvida, me procure via discord: lomexicano#2779 ;
- //// ou por /tell, se eu estiver ingame. ;
- //// o/ ~lomexicano ;
- &home_pesqueiro_vip = "/home pesqueirovip"; //// home no pesqueiro vip, olhando para onde você quer pescar -> obrigatório estar imerso na água, a cabeça e as pernas!;
- &home_baus = "/home baus"; //// home em uma trap de baús, estilo mkb/sleepfb/vendedor mexicano, etc;
- &home_com_varas = "/home varas"; //// home olhando pra um baú com varas de pescar com durabilidade boa;
- &home_bloco_de_ferro = "/home blocodeferro"; ///// home olhando pra um bloco de ferro, caso você não esteja com 20 de HP para usar /reparar -> recomendo que seja fora da warp vip, e perto dos baus do &home_baus;
- &reparar = "nao"; ///// Deixe "Sim" se quiser reparar, caso contrario, coloque "Nao" e lembre de configurar o mod para trocar de vara;
- #durabilidade_reparar = 11; ///// durabilidade caso queira reparar;
- #delay_maximo_sem_guardar = 1400; //// numero de segundos que, no maximo, ele vai esperar pra ir esvaziar/guardar;
- #limite_slots_vazios = 5;
- &ids_guardar = "enchanted_book|written_book"; //// guardar livros encantados;
- &ids_guardar = "%&ids_guardar%|^fish$|^fish:|^diamond$|blaze_rod|ghast_tear|apple"; ///// guardar peixe, diamantes, blaze rod, ghast tear e maça; Se nao quiser, remova esta linha.;
- &ids_guardar = "%&ids_guardar%|stone_sword|stone_shovel|stone_pickaxe|stone_axe"; ///// se não quiser guardar itens de pedra, remova esta linha;
- &ids_guardar = "%&ids_guardar%|diamond_sword|diamond_shovel|diamond_pickaxe|diamond_axe|diamond_helmet|diamond_chestplate|diamond_leggings|diamond_boots"; ///// se não quiser guardar itens de diamante, remova esta linha;
- &guardar_varas_pescadas = "Sim" //// caso venha a pescar varas (encantadas ou não). Se nao quiser guardar, troque para "Nao";
- &ids_safe = "string|fishing_rod";
- #bau = 1;
- #coluna = 1;
- //////////////////////////
- //////////////////////////
- //////////////////////////
- toggle(a);
- if(a);
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &f&lPescador da &6warp vip&f: &a&lON&f!");
- echo("&f[&6MACRO&f] &fPescador da &6warp vip&f: &aON&f!");
- else;
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &f&lPescador da &6warp vip&f: &c&lOFF&f!");
- stop;
- endif;
- unset(estou_na_trap);
- do();
- echo(%&home_pesqueiro_vip%);
- do(20);
- unsafe(0);
- getidrel(+0,+0,+0,&id_verif1);
- getidrel(+0,+1,+0,&id_verif2);
- ifmatches(%&id_verif1%,"water");
- ifmatches(%&id_verif2%,"water");
- set(estou_na_trap);
- endif;
- endif;
- endunsafe;
- wait(300ms);
- loop;
- if(estou_na_trap);
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &f&lPesqueiro &a&ldetectado&f!");
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &a&lIniciando...");
- break;
- endif;
- loop;
- #xtrap = %XPOS%;
- #ytrap = %YPOS%;
- #ztrap = %ZPOS%;
- echo("/esconder");
- #pitch = %PITCH%;
- #yaw = %YAW%;
- inc(#yaw,180);if(#yaw > 360); dec(#yaw,360); endif;
- if(#bau < 1); #bau = 1; endif;
- if(#coluna < 1); #coluna = 1; endif;
- unset(achei_linha);
- unset(pegar_vara);
- unset(achei_uma_boa);
- unset(foi);
- ifmatches(%&reparar%,"Sim|SIM|sim");
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r A macro foi configurada para &2&lREPARAR&f.")
- set(reparar);
- else;
- unset(reparar);
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r A macro foi configurada para &4NAO REPARAR&f (verifique se configurou o mod autofish).");
- endif;
- unset(ja_fui_uma);
- #loops_de_verificadores = (#delay_maximo_sem_guardar*1000)/80000;
- if(reparar);
- #gasto_limite = 64 - #durabilidade_reparar;
- else;
- #gasto_limite = 59;
- endif;
- do();
- wait(1000ms);
- if((%ITEM% == "fishing_rod")&&(%DURABILITY% > 5));
- wait(1000ms);
- key(use);
- else;
- for(#slot,1,9);
- SLOT(%#slot%);
- wait(100ms);
- if((%ITEM% == "fishing_rod")&&(%DURABILITY% > 5));
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &fVara de pescar boa equipada.");
- wait(100ms);
- key(use);
- break;
- elseif((%ITEM% == "fishing_rod")&&(%DURABILITY% <= 5)&&(reparar));
- if(%HEALTH% == 20);
- echo(/reparar);
- wait(1000ms);
- if(%DURABILITY% < 5);
- wait(1000ms);
- if(%DURABILITY% < 5);
- echo(%&home_pesqueiro_vip%);
- wait(1000ms);
- endif;
- endif;
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &6Vara &ereparada&f!");
- else;
- do();
- echo(%&home_bloco_de_ferro%);
- do(20);
- wait(320ms);
- ifmatches(%HITID%,"iron");
- break;
- endif;
- loop;
- ifmatches(%HITID%,"iron");
- break;
- else;
- echo("/esconder");
- endif;
- loop;
- keydown(sneak); wait(1ms); keyup(sneak); wait(200ms);
- do(2);
- key(use);
- do(10);
- wait(300ms);
- if(%DURABILITY% > #durabilidade_reparar);
- break;
- endif;
- loop;
- if(%DURABILITY% > #durabilidade_reparar);
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &6Vara &ereparada&f!");
- break;
- endif;
- loop;
- do();
- echo(%&home_pesqueiro_vip%);
- do(22);
- if((%XPOS% == %#xtrap%)&&(%ZPOS% == %#ztrap%)&&(%YPOS% == %#ytrap%));
- break;
- endif;
- wait(300ms);
- loop;
- if((%XPOS% == %#xtrap%)&&(%ZPOS% == %#ztrap%)&&(%YPOS% == %#ytrap%));
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &fReiniciando pescaria!");
- wait(1000ms);
- unset(ja_fui_uma);
- echo("/esconder");
- break;
- endif;
- loop;
- endif;
- break;
- endif;
- next;
- endif;
- if((%ITEM% == "fishing_rod")&&(%DURABILITY% > 5));
- else;
- gui(inventory);
- wait(500ms);
- unsafe(0);
- for(#slot,9,44);
- getslotitem(%#slot%,&oq,#stack,#gasto);
- ifmatches(%&oq%,"fishing_rod");
- if(#gasto < #gasto_limite);
- set(achei_uma_boa);
- break;
- endif;
- endif;
- next;
- endunsafe;
- unset(foi);
- if(achei_uma_boa);
- unset(achei_uma_boa);
- if(#slot < 36);
- slotclick(36,l,true);
- wait(100ms);
- slotclick(%#slot%,l,true)
- wait(100ms);
- getslotitem(36,&oq,#a,#gasto);
- ifmatches(%&oq%,"fishing_rod");
- if(#gasto < #gasto_limite);
- set(foi);
- endif;
- endif;
- endif;
- if(!foi);
- slotclick(%#slot%,l,false);
- wait(100ms);
- slotclick(36,l,false);
- wait(100ms);
- slotclick(%#slot%,l,false);
- wait(100ms);
- endif;
- endif;
- SLOT(1);
- if((%ITEM% == "fishing_rod")&&(%DURABILITY% > 5));
- key(use);
- else;
- set(pegar_vara);
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &6Vara &cnão encontrada&f. Iniciando procedimentos de armazenamento.");
- endif;
- endif;
- if(!pegar_vara);
- #vazios = 40;
- unset(ta_pescando_ok);
- do(%#loops_de_verificadores%);
- unset(#vezes_que_nao_pegou_nada);
- do(4);
- unsafe(0);
- if(ja_fui_uma);
- set(&lista_antiga,"%&lista_itens%");;
- endif;
- unset(&lista_itens);
- unset(#vazios);
- gui(inventory);
- for(#slot,9,44);
- getslotitem(%#slot%,&oq,#stack);
- &lista_itens = "%&lista_itens%-%&oq% %#stack%";
- ifmatches(%&oq%,"air|^0$");
- inc(#vazios,1);
- endif;
- next;
- gui();
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &fSlots vazios: %#vazios%");
- if(#vazios <= #limite_slots_vazios);
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &r&fPoucos slots vazios. &cIniciando armazenamento&f.");
- break;
- endif;
- endunsafe;
- if(ja_fui_uma);
- ifmatches(%&lista_antiga%,%&lista_itens%);
- inc(#vezes_que_nao_pegou_nada,1);
- ///log(%#vezes_que_nao_pegou_nada%)
- else;
- set(ta_pescando_ok);
- endif;
- endif;
- do(10);
- wait(2000ms);
- if(reparar);
- if((%ITEM% == "fishing_rod")&&(%DURABILITY% < #durabilidade_reparar));
- if(%HEALTH% == 20);
- echo(/reparar);
- wait(1000ms);
- if(%DURABILITY% < 5);
- wait(1000ms);
- if(%DURABILITY% < 5);
- echo(%&home_pesqueiro_vip%);
- wait(1000ms);
- endif;
- endif;
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &6Vara &ereparada&f!");
- else;
- do();
- echo(%&home_bloco_de_ferro%);
- do(20);
- wait(320ms);
- ifmatches(%HITID%,"iron");
- break;
- endif;
- loop;
- ifmatches(%HITID%,"iron");
- break;
- else;
- echo("/esconder");
- endif;
- loop;
- do(2);
- key(use);
- do(10);
- wait(300ms);
- if(%DURABILITY% > #durabilidade_reparar);
- break;
- endif;
- loop;
- if(%DURABILITY% > #durabilidade_reparar);
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &6Vara &ereparada&f!");
- break;
- endif;
- loop;
- do();
- echo(%&home_pesqueiro_vip%);
- do(22);
- if((%XPOS% == %#xtrap%)&&(%ZPOS% == %#ztrap%)&&(%YPOS% == %#ytrap%));
- break;
- endif;
- wait(300ms);
- loop;
- if((%XPOS% == %#xtrap%)&&(%ZPOS% == %#ztrap%)&&(%YPOS% == %#ytrap%));
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &fReiniciando pescaria!");
- wait(1000ms);
- unset(ja_fui_uma);
- echo("/esconder");
- break;
- endif;
- loop;
- endif;
- if(%DURABILITY% <= #durabilidade_reparar);
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &fA vara &cnao foi reparada&f!");
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &fTentando corrigir...");
- set(pegar_vara);
- break;
- endif;
- endif;
- endif;
- loop;
- if(!ja_fui_uma); set(ja_fui_uma); endif;
- if(pegar_vara); break; endif;
- loop;
- if(pegar_vara); break; endif;
- if(#vazios < #limite_slots_vazios);
- break;
- endif;
- if(ja_fui_uma);
- if(#vezes_que_nao_pegou_nada >= 3);
- ///if(!ta_pescando_ok);
- if(%DURABILITY% > 5);
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &fParece que nada esta sendo pescado ha algum tempo. Tentando corrigir.");
- key(use);
- else;
- set(pegar_vara);
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &fParece que nao ha varas boas na hotbar. Tentando corrigir.");
- break;
- endif;
- ///endif;
- endif;
- #vezes_que_nao_pegou_nada = 0;
- endif;
- loop;
- endif;
- do();
- echo(%&home_baus%);
- do(30);
- wait(200ms);
- unsafe(0);
- unset(cheguei_na_trap);
- getidrel(0,-1,-2,&id_bau_1);getidrel(0,-1,-3,&id_bau_2);
- getidrel(0,-1,-2,&id_bau_3);getidrel(0,-1,-3,&id_bau_4);
- getidrel(0,-1,-2,&id_bau_5);getidrel(0,-1,-3,&id_bau_6);
- getidrel(0,-1,-2,&id_bau_7);getidrel(0,-1,-3,&id_bau_8);
- getidrel(0,-1,-2,&id_bau_9);getidrel(0,-1,-3,&id_bau_10);
- ifmatches(%&id_bau_1%,"chest");
- ifmatches(%&id_bau_2%,"chest");
- ifmatches(%&id_bau_3%,"chest");
- ifmatches(%&id_bau_4%,"chest");
- ifmatches(%&id_bau_5%,"chest");
- ifmatches(%&id_bau_6%,"chest");
- ifmatches(%&id_bau_7%,"chest");
- ifmatches(%&id_bau_8%,"chest");
- ifmatches(%&id_bau_9%,"chest");
- ifmatches(%&id_bau_10%,"chest");
- set(cheguei_na_trap);
- endif;
- endif;
- endif;
- endif;
- endif;
- endif;
- endif;
- endif;
- endif;
- endif;
- if(cheguei_na_trap);
- break;
- endif;
- endunsafe;
- loop;
- if(cheguei_na_trap);
- wait(300ms);
- look(west);
- wait(300ms);
- unsafe(0);
- gui(inventory);
- for(#slot,9,44);
- getslotitem(%#slot%,&oq);
- ifmatches(%&oq%,%&ids_guardar%);
- else;
- ifmatches(%&oq%,%&ids_safe%);
- else;
- ifmatches(%&oq%,"air|^0$");
- else;
- slotclick(%#slot%,l,false);
- slotclick(-999);
- endif;
- endif;
- endif;
- next;
- gui();
- endunsafe;
- wait(300ms);
- look(north);
- wait(300ms);
- #x_inicio = %XPOS%;
- #z_inicio = %ZPOS%;
- break;
- endif;
- loop;
- do();
- if(proxima_coluna);
- unset(proxima_coluna);
- endif;
- if(#coluna > 1);
- if(%GUI% != "NONE");
- gui();
- endif;
- #x_final = #x_inicio + #coluna - 1;
- look(0,311);
- wait(200ms);
- do();
- look(0,311);
- #x_agora = %XPOS%;
- #z_agora = %ZPOS%;
- if((#x_agora > #x_final)||(#z_agora != #z_inicio)||(#x_agora < #x_inicio));
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &fAlgum erro aconteceu, recomecando!");
- do();
- echo(%&home_baus%);
- do();
- if((%XPOS% == %#x_inicio%)&&(%ZPOS% == %#z_inicio%));
- break;
- endif;
- loop;
- if((%XPOS% == %#x_inicio%)&&(%ZPOS% == %#z_inicio%));
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &fPosicionamento corrigido!");
- break;
- endif;
- loop;
- elseif(#x_agora == #x_final);
- ifmatches(%HITID%,"chest");
- keyup(right);
- wait(10ms);
- keyup(sneak);
- wait(200ms);
- break;
- endif;
- elseif((#x_agora < #x_final)&&(#z_agora == #z_inicio));
- #diferenca = #x_final - #x_agora;
- if(#diferenca < 2);
- keydown(sneak);
- else;
- keyup(sneak);
- endif;
- keydown(right);
- endif;
- loop;
- endif;
- do();
- unset(bau_cheio);
- if(%GUI% != "NONE"); gui(); endif;
- 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 == 6); inc(#coluna,1); #bau = 1; set(proxima_coluna); break; endif;
- wait(200ms);
- do();
- key(use);
- do(10);
- wait(200ms);
- if(%GUI% == "GUICHEST");
- break;
- endif;
- loop;
- if(%GUI% == "GUICHEST");
- look(west);
- wait(500ms);
- break;
- endif;
- loop;
- unsafe(0);
- &ids_guardar_temp = "%&ids_guardar%";
- for(#slot,54,89);
- ifmatches(%&guardar_varas_pescadas%,"Sim");
- if(#slot < 81);
- &ids_guardar = "%&ids_guardar%|fishing_rod";
- else;
- &ids_guardar = "%&ids_guardar_temp%";
- endif;
- endif;
- getslotitem(%#slot%,&oq);
- ifmatches(%&oq%,"air|^0$");
- else;
- ifmatches(%&oq%,%&ids_guardar%);
- slotclick(%#slot%,l,true);
- getslotitem(%#slot%,&oq);
- ifmatches(%&oq%,"air|^0$");
- else;
- set(bau_cheio);
- inc(#bau,1);
- gui();
- break;
- endif;
- else;
- ifmatches(%&oq%,%&ids_safe%);
- else;
- slotclick(%#slot%,l,false);
- slotclick(-999);
- endif;
- endif;
- endif;
- next;
- &ids_guardar = "%&ids_guardar_temp%";
- endunsafe;
- if(!bau_cheio);
- break;
- endif;
- loop;
- if(!proxima_coluna);
- break;
- endif;
- loop;
- if(pegar_vara);
- unsafe(0);
- gui(inventory);
- unset(achei_uma_boa);
- for(#slot,9,44);
- getslotitem(%#slot%,&oq,#stack,#gasto);
- ifmatches(%&oq%,"fishing_rod");
- if(#gasto < #gasto_limite);
- set(achei_uma_boa);
- unset(pegar_vara);
- break;
- endif;
- endif;
- next;
- if(achei_uma_boa);
- if(#slot != 36);
- slotclick(36,l,true);
- wait(100ms);
- if(#slot < 36);
- slotclick(%#slot%,l,true);
- wait(100ms);
- else;
- slotclick(%#slot%,l,false);
- wait(100ms);
- slotclick(36,l,false);
- wait(100ms);
- slotclick(%#slot%,l,false);
- wait(100ms);
- endif;
- else;
- SLOT(1);
- endif;
- endif;
- gui();
- endunsafe;
- if(!achei_uma_boa);
- unset(pegar_vara);
- look(,90);
- do();
- echo(%&home_com_varas%);
- do(20);
- ifmatches(%HITID%,"chest");
- break;
- endif;
- wait(300ms);
- loop;
- ifmatches(%HITID%,"chest");
- break;
- endif;
- loop;
- do();
- key(use);
- do(10);
- wait(300ms);
- if(%GUI% == "GUICHEST");
- wait(600ms);
- break;
- endif;
- loop;
- if(%GUI% == "GUICHEST");
- break;
- endif;
- loop;
- unset(achei_uma_boa);
- wait(600ms);
- unsafe(0);
- for(#slot,54,89);
- getslotitem(%#slot%,&oq,#stack,#gasto);
- ifmatches(%&oq%,"fishing_rod");
- if(#gasto < #gasto_limite);
- set(achei_uma_boa);
- break;
- else;
- slotclick(%#slot%,l,true);
- endif;
- endif;
- next;
- if(!achei_uma_boa);
- for(#slot,0,53);
- getslotitem(%#slot%,&oq,#stack,#gasto);
- ifmatches(%&oq%,"fishing_rod");
- if(#gasto < #gasto_limite);
- set(achei_uma_boa);
- slotclick(%#slot%,l,true);
- break;
- endif;
- endif;
- next;
- endif;
- if(reparar);
- unset(achei_linha);
- do(2);
- getslot(string,#slot);
- if((#slot < 53)&&(#slot >= 0));
- slotclick(%#slot%,l,true);
- set(achei_linha);
- else;
- break;
- endif;
- loop;
- if((!achei_uma_boa)&&(achei_linha));
- set(achei_uma_boa);
- getslot(fishing_rod,#slot);
- if((#slot < 53)&&(#slot >= 0));
- slotclick(%#slot%,l,true);
- endif;
- endif;
- endif;
- gui();
- endunsafe;
- endif;
- if(achei_uma_boa);
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &fSeu problema de vara foi corrigido &6:P");
- if((%ITEM% == "fishing_rod")&&(%DURABILITY% > 5));
- else;
- unsafe(0);
- gui(inventory);
- unset(achei_uma_boa);
- getslotitem(36,&oq,#a,#gasto);
- ifmatches(%&oq%,"fishing_rod");
- if(#gasto < #gasto_limite);
- SLOT(1);
- set(achei_uma_boa);
- endif;
- endif;
- if(!achei_uma_boa);
- for(#slot,9,44);
- getslotitem(%#slot%,&oq,#stack,#gasto);
- ifmatches(%&oq%,"fishing_rod");
- if(#gasto < #gasto_limite);
- break;
- endif;
- endif;
- next;
- endif;
- endunsafe;
- if(!achei_uma_boa);
- slotclick(%#slot%,l,false);
- wait(100ms);
- slotclick(36,l,false);
- wait(100ms);
- slotclick(%#slot%,l,false);
- wait(100ms);
- endif;
- gui();
- endif;
- else;
- for(#slot,1,9);
- SLOT(%#slot%);
- wait(200ms);
- if((%ITEM% == "fishing_rod")&&(%DURABILITY% > 5));
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &fVara de pescar boa equipada.");
- wait(100ms);
- key(use);
- break;
- endif;
- next;
- endif;
- if((%ITEM% == "fishing_rod")&&(%DURABILITY% > 5));
- else;
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &fVara de pescar boa não encontrada &c:/&f.");
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &fFinalizando.");
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &f&lPescador da &6warp vip&f: &c&lOFF&f!");
- toggle(a);
- stop;
- endif;
- ///////////////////////////////
- endif;
- unset(achei_uma_boa);
- do();
- echo(%&home_pesqueiro_vip%);
- do(22);
- if((%XPOS% == %#xtrap%)&&(%ZPOS% == %#ztrap%)&&(%YPOS% == %#ytrap%));
- break;
- endif;
- wait(300ms);
- loop;
- if((%XPOS% == %#xtrap%)&&(%ZPOS% == %#ztrap%)&&(%YPOS% == %#ytrap%));
- log("&e&l[&2&lMA&f&lC&4&lRO&e&l]&r &fReiniciando pescaria!");
- wait(1000ms);
- unset(ja_fui_uma);
- echo("/esconder");
- break;
- endif;
- loop;
- loop;
- //X POSITIVO = LESTE
- //X NEGATIVO = OESTE
- // Y POSITIVO = CIMA
- // Y NEGATIVO = BAIXO
- //Z POSITIVO = SUL
- //Z NEGATIVO = NORTE
- }$$
Advertisement
Add Comment
Please, Sign In to add comment