Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- $${
- if(cav);
- unset(cav);
- log( );
- log("&6&l[VIP] &1Cava-Cava &4(OFF) &f- &aAproximadamente &a%#exp% de EXP.");
- log( );
- unset(@cav);
- unset(@autoesc);
- stop();
- else;
- set(cav);
- log( );
- log("&6&l[VIP] &1Cava-Cava &2(ON)");
- log( );
- set(@cav);
- set(@autoesc);
- IFMATCHES(%DIRECTION%,N);&near = NORTH;ENDIF;
- IFMATCHES(%DIRECTION%,S);&near = SOUTH;ENDIF;
- IFMATCHES(%DIRECTION%,W);&near = WEST;ENDIF;
- IFMATCHES(%DIRECTION%,E);&near = EAST;ENDIF;
- #inibloco=0;
- #finalbloco=4;
- #nether = 0;
- #exp = 0;
- #bau = 1;
- #repq=0;
- &rep="diamond";
- &pa="diamond_shovel";
- &bloco="soul sand";
- look(%&near%);
- look(,71);
- set(cav2);
- do;
- do(350);
- pick(%&bloco%);
- key(use);
- wait(10ms);
- pick(%&pa%);
- if(%DURABILITY%<300);
- gui(inventory);
- for(#i,9,45);
- getslotitem(%#i%,&id,#stack1);
- if(%&id%=%&rep%);
- #repq=%#repq%+%#stack1%;
- endif;
- next;
- wait(1);
- gui();
- if(%#repq%=0);
- log( );
- log("&6&l[VIP] &d&lCava-Cava &4(OFF) &dNão pôde reparar &f- &aAproximadamente &a%#exp% de EXP.");
- log( );
- unset(@cav);
- unset(cav);
- unset(cav2);
- stop();
- else(%#repq%>0%);
- #repq=0;
- look(%&near%);
- look(,90);
- key(use);
- wait(2);
- #repq=0;
- endif;
- endif;
- endif;
- look(%&near%);
- look(,60);
- if(%HITID%=%&bloco%);
- key(attack);
- inc(#exp, 1);
- elseif(%HITID%="cake");
- do(30);
- look(%&near%);
- look(,71);
- key(attack);
- wait(0.00000001ms);
- loop;
- elseif(%HITID%="netherrack");
- do(80);
- look(%&near%);
- look(,71);
- key(attack);
- wait(0.00000001ms);
- loop;
- endif;
- loop;
- if(cav2);
- gui(inventory);
- wait(1);
- getslotitem(35,&ida,#stack);
- if(%#stack%=0);
- else;
- unset(@cav);
- wait(1);
- }$$/home esclixo$${
- wait(3);
- gui(inventory);
- wait(300ms);
- for(#lixo,9,35);
- getslotitem(%#lixo%,&idl,#stackl);
- if((%&idl%="cake")||(%&idl%="egg")||(%&idl%="record_wait"));
- slotclick(%#lixo%,l,false);
- wait(200ms);
- slotclick(-999);
- endif;
- next;
- do;
- wait(1);
- if(%#bau%=1);}$$/home esc1$${endif;
- if(%#bau%=2);}$$/home esc2$${endif;
- if(%#bau%=3);}$$/home esc3$${endif;
- if(%#bau%=4);}$$/home esc4$${endif;
- if(%#bau%=5);}$$/home esc5$${endif;
- if(%#bau%=6);}$$/home esc6$${endif;
- if(%#bau%=7);}$$/home esc7$${endif;
- if(%#bau%=8);}$$/home esc8$${endif;
- if(%#bau%=9);}$$/home esc9$${endif;
- if(%#bau%=10);}$$/home esc10$${endif;
- if(%#bau%=11);}$$/home esc11$${endif;
- if(%#bau%=12);}$$/home esc12$${endif;
- if(%#bau%=13);}$$/home esc13$${endif;
- if(%#bau%=14);}$$/home esc14$${endif;
- if(%#bau%=15);}$$/home esc15$${endif;
- if(%#bau%=16);}$$/home esc16$${endif;
- if(%#bau%=17);}$$/home esc17$${endif;
- if(%#bau%=18);}$$/home esc18$${endif;
- if(%#bau%=19);}$$/home esc19$${endif;
- if(%#bau%=20);}$$/home esc20$${endif;
- if(%#bau%=21);}$$/home esc21$${endif;
- if(%#bau%=22);}$$/home esc22$${endif;
- if(%#bau%=23);}$$/home esc23$${endif;
- if(%#bau%=24);}$$/home esc24$${endif;
- if(%#bau%=25);}$$/home esc25$${endif;
- if(%#bau%=26);}$$/home esc26$${endif;
- if(%#bau%=27);}$$/home esc27$${endif;
- if(%#bau%=28);}$$/home esc28$${endif;
- if(%#bau%=29);}$$/home esc29$${endif;
- if(%#bau%=30);}$$/home esc30$${endif;
- if(%#bau%=31);}$$/home esc31$${endif;
- if(%#bau%=32);}$$/home esc32$${endif;
- wait(5);
- key(use);
- wait(2);
- for(#slotn,54,89);
- GETSLOTITEM(%#slotn%,&id,#stack);
- if((%&id%=%&pa%) || (%&id%=%&bloco%) || (%&id%=%&rep%));
- else;
- slotclick(%#slotn%,l,true);
- wait(30ms);
- slotclick(%#slotn%,l,true);
- wait(30ms);
- endif;
- next;
- wait(500ms);
- getslotitem(53,#id,#stack);
- wait(500ms);
- if(%#stack%!=0);
- inc(#bau);
- endif;
- if(%#bau%=33);
- unset(cav2);
- log(&d&l[MACRO] Cava-Cava &b"Baús cheios! Voltando a escavar.");
- gui();
- else;
- gui();
- endif;
- set(@cav);
- until(%#stack%=0);
- #mix2=0;
- gui(inventory);
- for(#slot2,9,44);
- getslotitem(%#slot2%,&idbloco,#stackbloco);
- if(%&idbloco%=%&bloco%);
- inc(#mix2,%#stackbloco%);
- endif;
- next;
- log(&dVocê está com &4%#mix2% blocos no inventário.);
- if(%#mix2%<128);
- }$$ /home escbloco $${
- wait(3);
- gui(inventory);
- for(#slottira,36,40);
- slotclick(%#slottira%,l,true);
- wait(100ms);
- slotclick(%#slottira%,l,true);
- next;
- key(use);
- wait(2);
- for(#slotpegabloco,%#inibloco%,%#finalbloco%);
- wait(100ms);
- slotclick(%#slotpegabloco%,l,true);
- wait(100ms);
- slotclick(%#slotpegabloco%,l,true);
- next;
- inc(#inibloco,5);
- inc(#finalbloco,5);
- endif;
- gui();
- }$$ /home macroesc $${
- endif;//esse
- endif;
- //tirar lixo da hotbar
- gui(inventory);
- wait(600ms);
- for(#cli,36,44);
- getslotitem(%#cli%,&ida,#stack);
- if((%&ida%=%&bloco%)||(%&ida%=%&pa%));
- else;
- slotclick(%#cli%,l,true);
- wait(50ms);
- endif;
- next;
- wait(400ms);
- //Tira ultimo slot
- getslotitem(35,&id35,#stack35);
- if((%&id35%=%&bloco%)||(%&id35%=%&rep%));
- slotclick(35,l,false);
- wait(200ms);
- getslotitem(34,&id,#stackt1);
- if(%#stackt1%=0);
- slotclick(34,l,false);
- else;
- slotclick(33,l,false);
- endif;
- wait(300ms);
- endif;
- //coloca bloco na hotbar
- for(#slot,9,35);
- GETSLOTITEM(%#slot%,&id,#stack);
- if((%&id%=%&pa%) || (%&id%=%&bloco%));
- slotclick(%#slot%,l,true);
- wait(30ms);
- endif;
- next;
- gui();
- loop;
- endif;
- }$$
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement