API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Jul 28th, 2016
86
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 8.13 KB | None | 0 0
raw download clone embed print report
  1. $${
  2. if(cav);
  3. unset(cav);
  4. log( );
  5. log("&6&l[VIP] &1Cava-Cava &4(OFF) &f- &aAproximadamente &a%#exp% de EXP.");
  6. log( );
  7. unset(@cav);
  8. unset(@autoesc);
  9. stop();
  10. else;
  11. set(cav);
  12. log( );
  13. log("&6&l[VIP] &1Cava-Cava &2(ON)");
  14. log( );
  15. set(@cav);
  16. set(@autoesc);
  17. IFMATCHES(%DIRECTION%,N);&near = NORTH;ENDIF;
  18. IFMATCHES(%DIRECTION%,S);&near = SOUTH;ENDIF;
  19. IFMATCHES(%DIRECTION%,W);&near = WEST;ENDIF;
  20. IFMATCHES(%DIRECTION%,E);&near = EAST;ENDIF;
  21. #inibloco=0;
  22. #finalbloco=4;
  23. #nether = 0;
  24. #exp = 0;
  25. #bau = 1;
  26. #repq=0;
  27. &rep="diamond";
  28. &pa="iron_shovel";
  29. &bloco="soul_sand";
  30. look(%&near%);
  31. look(,71);
  32. set(cav2);
  33. do;
  34. do(500);
  35. pick(%&bloco%);
  36. key(use);
  37. wait(10ms);
  38. pick(%&pa%);
  39. if(%DURABILITY%<300);
  40. gui(inventory);
  41. for(#i,9,45);
  42. getslotitem(%#i%,&id,#stack1);
  43. if(%&id%=%&rep%);
  44. #repq=%#repq%+%#stack1%;
  45. endif;
  46. next;
  47. wait(1);
  48. gui();
  49. if(%#repq%=0);
  50. log( );
  51. log("&6&l[VIP] &d&lCava-Cava &4(OFF) &dNão pôde reparar &f- &aAproximadamente &a%#exp% de EXP.");
  52. log( );
  53. unset(@cav);
  54. unset(cav);
  55. unset(cav2);
  56. stop();
  57. else(%#repq%>0%);
  58. #repq=0;
  59. look(%&near%);
  60. look(,90);
  61. key(use);
  62. wait(2);
  63. #repq=0;
  64. endif;
  65. endif;
  66. endif;
  67. look(%&near%);
  68. look(,60);
  69. if(%HITID%=%&bloco%);
  70. key(attack);
  71. inc(#exp, 1);
  72. elseif(%HITID%="cake");
  73. do(30);
  74. look(%&near%);
  75. look(,71);
  76. key(attack);
  77. wait(0.00000001ms);
  78. loop;
  79. elseif(%HITID%="netherrack");
  80. do(80);
  81. look(%&near%);
  82. look(,71);
  83. key(attack);
  84. wait(0.00000001ms);
  85. loop;
  86. endif;
  87. loop;
  88. if(cav2);
  89. gui(inventory);
  90. wait(1);
  91. getslotitem(35,&ida,#stack);
  92. if(%#stack%=0);
  93. else;
  94. unset(@cav);
  95. wait(1);
  96. }$$/home esclixo$${
  97. wait(3);
  98. gui(inventory);
  99. wait(300ms);
  100. for(#lixo,9,35);
  101. getslotitem(%#lixo%,&idl,#stackl);
  102. if((%&idl%="cake")||(%&idl%="glowstone_dust")||(%&idl%="cocoa_beans_")||(%&idl%="record_wait"));
  103. slotclick(%#lixo%,l,false);
  104. wait(200ms);
  105. slotclick(-999);
  106. endif;
  107. next;
  108. do;
  109. wait(1);
  110. if(%#bau%=1);}$$/home esc1$${endif;
  111. if(%#bau%=2);}$$/home esc2$${endif;
  112. if(%#bau%=3);}$$/home esc3$${endif;
  113. if(%#bau%=4);}$$/home esc4$${endif;
  114. if(%#bau%=5);}$$/home esc5$${endif;
  115. if(%#bau%=6);}$$/home esc6$${endif;
  116. if(%#bau%=7);}$$/home esc7$${endif;
  117. if(%#bau%=8);}$$/home esc8$${endif;
  118. if(%#bau%=9);}$$/home esc9$${endif;
  119. if(%#bau%=10);}$$/home esc10$${endif;
  120. if(%#bau%=11);}$$/home esc11$${endif;
  121. if(%#bau%=12);}$$/home esc12$${endif;
  122. if(%#bau%=13);}$$/home esc13$${endif;
  123. if(%#bau%=14);}$$/home esc14$${endif;
  124. if(%#bau%=15);}$$/home esc15$${endif;
  125. if(%#bau%=16);}$$/home esc16$${endif;
  126. if(%#bau%=17);}$$/home esc17$${endif;
  127. if(%#bau%=18);}$$/home esc18$${endif;
  128. if(%#bau%=19);}$$/home esc19$${endif;
  129. if(%#bau%=20);}$$/home esc20$${endif;
  130. if(%#bau%=21);}$$/home esc21$${endif;
  131. if(%#bau%=22);}$$/home esc22$${endif;
  132. if(%#bau%=23);}$$/home esc23$${endif;
  133. if(%#bau%=24);}$$/home esc24$${endif;
  134. if(%#bau%=25);}$$/home esc25$${endif;
  135. if(%#bau%=26);}$$/home esc26$${endif;
  136. if(%#bau%=27);}$$/home esc27$${endif;
  137. if(%#bau%=28);}$$/home esc28$${endif;
  138. if(%#bau%=29);}$$/home esc29$${endif;
  139. if(%#bau%=30);}$$/home esc30$${endif;
  140. if(%#bau%=31);}$$/home esc31$${endif;
  141. if(%#bau%=32);}$$/home esc32$${endif;
  142. wait(5);
  143. key(use);
  144. wait(2);
  145. for(#slotn,54,89);
  146. GETSLOTITEM(%#slotn%,&id,#stack);
  147. if((%&id%=%&pa%) || (%&id%=%&bloco%) || (%&id%=%&rep%));
  148. else;
  149. slotclick(%#slotn%,l,true);
  150. wait(30ms);
  151. slotclick(%#slotn%,l,true);
  152. wait(30ms);
  153. endif;
  154. next;
  155. wait(500ms);
  156. getslotitem(53,#id,#stack);
  157. wait(500ms);
  158. if(%#stack%!=0);
  159. inc(#bau);
  160. endif;
  161. if(%#bau%=33);
  162. unset(cav2);
  163. log(&d&l[MACRO] Cava-Cava &b"Baús cheios! Voltando a escavar.");
  164. gui();
  165. else;
  166. gui();
  167. endif;
  168. set(@cav);
  169. until(%#stack%=0);
  170.  
  171. #mix2=0;
  172. gui(inventory);
  173. for(#slot2,9,44);
  174. getslotitem(%#slot2%,&idbloco,#stackbloco);
  175. if(%&idbloco%=%&bloco%);
  176. inc(#mix2,%#stackbloco%);
  177. endif;
  178. next;
  179. log(&dVocê está com &4%#mix2% blocos no inventário.);
  180. if(%#mix2%<128);
  181. }$$ /home escbloco $${
  182. wait(3);
  183. gui(inventory);
  184. for(#slottira,36,40);
  185. slotclick(%#slottira%,l,true);
  186. wait(100ms);
  187. slotclick(%#slottira%,l,true);
  188. next;
  189. key(use);
  190. wait(2);
  191. for(#slotpegabloco,%#inibloco%,%#finalbloco%);
  192. wait(100ms);
  193. slotclick(%#slotpegabloco%,l,true);
  194. wait(100ms);
  195. slotclick(%#slotpegabloco%,l,true);
  196. next;
  197. inc(#inibloco,5);
  198. inc(#finalbloco,5);
  199. endif;
  200. gui();
  201.  
  202. }$$ /home macroesc $${
  203. endif;//esse
  204. endif;
  205. //tirar lixo da hotbar
  206. gui(inventory);
  207. wait(600ms);
  208. for(#cli,36,44);
  209. getslotitem(%#cli%,&ida,#stack);
  210. if((%&ida%=%&bloco%)||(%&ida%=%&pa%));
  211. else;
  212. slotclick(%#cli%,l,true);
  213. wait(50ms);
  214. endif;
  215. next;
  216. wait(400ms);
  217.  
  218. //Tira ultimo slot
  219. getslotitem(35,&id35,#stack35);
  220. if((%&id35%=%&bloco%)||(%&id35%=%&rep%));
  221. slotclick(35,l,false);
  222. wait(200ms);
  223. getslotitem(34,&id,#stackt1);
  224. if(%#stackt1%=0);
  225. slotclick(34,l,false);
  226. else;
  227. slotclick(33,l,false);
  228. endif;
  229. wait(300ms);
  230. endif;
  231.  
  232. //coloca bloco na hotbar
  233. for(#slot,9,35);
  234. GETSLOTITEM(%#slot%,&id,#stack);
  235. if((%&id%=%&pa%) || (%&id%=%&bloco%));
  236. slotclick(%#slot%,l,true);
  237. wait(30ms);
  238. endif;
  239. next;
  240.  
  241. gui();
  242. loop;
  243. endif;
  244. }$$
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!