Advertisement
Guest User

Untitled

a guest
Jul 22nd, 2018
71
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 6.88 KB | None | 0 0
  1. $${
  2. ifmatches(%CHATCLEAN%,[\»]Bem vindo de volta[\.]);}$$ /login sieglixo $${endif;
  3.  
  4. IFMATCHES(%CHAT%,"Agora você está logado.");
  5. wait(1);
  6. set(@cav);
  7. log( );
  8. log("&6&l[VIP] &1Cava-Cava &2(ON)");
  9. log( );
  10. set(cav);
  11. set(@autoesc);
  12. IFMATCHES(%DIRECTION%,N);&near = NORTH;ENDIF;
  13. IFMATCHES(%DIRECTION%,S);&near = SOUTH;ENDIF;
  14. IFMATCHES(%DIRECTION%,W);&near = WEST;ENDIF;
  15. IFMATCHES(%DIRECTION%,E);&near = EAST;ENDIF;
  16. #nether = 0;
  17. #exp = 0;
  18. #bau = 1;
  19. #repq=0;
  20. &rep="diamond";
  21. &pa="diamond_shovel"
  22. &bloco="sand";
  23. look(%&near%);
  24. look(,71);
  25. set(cav2);
  26. do;
  27. do(250);
  28. pick(%&bloco%);
  29. key(use);
  30. wait(1ms);
  31. pick(%&pa%);
  32. if(%DURABILITY%<250);
  33. gui(inventory);
  34. for(#i,9,45);
  35. getslotitem(%#i%,&id,#stack1);
  36. if(%&id%=%&rep%);
  37. #repq=%#repq%+%#stack1%;
  38. endif;
  39. next;
  40. wait(1);
  41. gui();
  42. if(%#repq%=0);
  43. log( );
  44. log("&6&l[VIP] &d&lCava-Cava &4(OFF) &dNão pôde reparar &f- &aAproximadamente &a%#exp% de EXP.");
  45. log( );
  46. unset(@cav);
  47. unset(cav);
  48. unset(cav2);
  49. stop();
  50. else(%#repq%>0%);
  51. #repq=0;
  52. look(%&near%);
  53. look(,90);
  54. key(use);
  55. wait(2);
  56. #repq=0;
  57. endif;
  58. endif;
  59. endif;
  60. look(%&near%);
  61. look(,71);
  62. if(%HITID%=%&bloco%);
  63. key(attack);
  64. inc(#exp, 1);
  65. elseif(%HITID%="cake");
  66. do(30);
  67. look(%&near%);
  68. look(,71);
  69. key(attack);
  70. wait(0.00000001ms);
  71. loop;
  72. elseif(%HITID%="netherrack");
  73. do(80);
  74. look(%&near%);
  75. look(,71);
  76. key(attack);
  77. wait(0.00000001ms);
  78. loop;
  79. endif;
  80. loop;
  81. if(cav2);
  82. gui(inventory);
  83. wait(1);
  84. getslotitem(35,&ida,#stack);
  85. if(%#stack%=0);
  86. else;
  87. unset(@cav);
  88. wait(1);
  89. }$$/home esclixo$${
  90. wait(3);
  91. gui(inventory);
  92. wait(300ms);
  93. for(#lixo,9,35);
  94. getslotitem(%#lixo%,&idl,#stackl);
  95. if((%&idl%="cake")||(%&idl%="egg")||(%&idl%="record_wait"));
  96. slotclick(%#lixo%,l,false);
  97. wait(200ms);
  98. slotclick(-999);
  99. endif;
  100. next;
  101. do;
  102. wait(1);
  103. if(%#bau%=1);}$$/home esc1$${endif;
  104. if(%#bau%=2);}$$/home esc2$${endif;
  105. if(%#bau%=3);}$$/home esc3$${endif;
  106. if(%#bau%=4);}$$/home esc4$${endif;
  107. if(%#bau%=5);}$$/home esc5$${endif;
  108. if(%#bau%=6);}$$/home esc6$${endif;
  109. if(%#bau%=7);}$$/home esc7$${endif;
  110. if(%#bau%=8);}$$/home esc8$${endif;
  111. if(%#bau%=9);}$$/home esc9$${endif;
  112. if(%#bau%=10);}$$/home esc10$${endif;
  113. if(%#bau%=11);}$$/home esc11$${endif;
  114. if(%#bau%=12);}$$/home esc12$${endif;
  115. if(%#bau%=13);}$$/home esc13$${endif;
  116. if(%#bau%=14);}$$/home esc14$${endif;
  117. if(%#bau%=15);}$$/home esc15$${endif;
  118. if(%#bau%=16);}$$/home esc16$${endif;
  119. if(%#bau%=17);}$$/home esc17$${endif;
  120. if(%#bau%=18);}$$/home esc18$${endif;
  121. if(%#bau%=19);}$$/home esc19$${endif;
  122. if(%#bau%=20);}$$/home esc20$${endif;
  123. if(%#bau%=21);}$$/home esc21$${endif;
  124. if(%#bau%=22);}$$/home esc22$${endif;
  125. if(%#bau%=23);}$$/home esc23$${endif;
  126. if(%#bau%=24);}$$/home esc24$${endif;
  127. if(%#bau%=25);}$$/home esc25$${endif;
  128. if(%#bau%=26);}$$/home esc26$${endif;
  129. if(%#bau%=27);}$$/home esc27$${endif;
  130. if(%#bau%=28);}$$/home esc28$${endif;
  131. if(%#bau%=29);}$$/home esc29$${endif;
  132. if(%#bau%=30);}$$/home esc30$${endif;
  133. if(%#bau%=31);}$$/home esc31$${endif;
  134. if(%#bau%=32);}$$/home esc32$${endif;
  135. wait(5);
  136. key(use);
  137. wait(2);
  138. for(#slotn,54,89);
  139. GETSLOTITEM(%#slotn%,&id,#stack);
  140. if((%&id%=%&pa%) || (%&id%=%&bloco%) || (%&id%=%&rep%));
  141. else;
  142. slotclick(%#slotn%,l,true);
  143. wait(30ms);
  144. slotclick(%#slotn%,l,true);
  145. wait(30ms);
  146. endif;
  147. next;
  148. wait(500ms);
  149. getslotitem(53,#id,#stack);
  150. wait(500ms);
  151. if(%#stack%!=0);
  152. inc(#bau);
  153. endif;
  154. if(%#bau%=33);
  155. unset(cav2);
  156. log(&d&l[MACRO] Cava-Cava &b"Baús cheios! Voltando a escavar.");
  157. gui();
  158. else;
  159. gui();
  160. endif;
  161. set(@cav);
  162. until(%#stack%=0);
  163. }$$ /home macroesc $${
  164. endif;//esse
  165. endif;
  166. gui(inventory);
  167. wait(600ms);
  168. for(#cli,36,45);
  169. getslotitem(%#cli%,&ida,#stack);
  170. if((%&ida%=%&bloco%)||(%&ida%=%&pa%));
  171. else;
  172. slotclick(%#cli%,l,true);
  173. wait(50ms);
  174. endif;
  175. next;
  176. wait(400ms);
  177. for(#slot,9,35);
  178. GETSLOTITEM(%#slot%,&id,#stack);
  179. if((%&id%=%&pa%) || (%&id%=%&bloco%));
  180. slotclick(%#slot%,l,true);
  181. wait(30ms);
  182. endif;
  183. next;
  184. getslotitem(35,&id35,#stack35);
  185. if((%&id35%=%&bloco%)||(%&id35%=%&rep%));
  186. slotclick(35,l,false);
  187. wait(200ms);
  188. slotclick(34,l,false);
  189. wait(300ms);
  190. endif;
  191. gui();
  192. loop;
  193. endif;
  194. }$$ $${IFMATCHES(%CHAT%,"Limpando itens do chao em 5s");gui(inventory);wait(6000ms);gui();endif;}$$
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement