API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Dec 14th, 2017
72
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 9.61 KB | None | 0 0
raw download clone embed print report
  1. $${
  2. IFMATCHES(%CHAT%,"ativar pegasolivro");
  3. Set(@cava1);
  4. &dir = %DIRECTION%;
  5. #bau=1;
  6. set(nf);
  7. IFMATCHES(%DIRECTION%,N);&direcao = NORTH;ENDIF;
  8. IFMATCHES(%DIRECTION%,S);&direcao = SOUTH;ENDIF;
  9. IFMATCHES(%DIRECTION%,W);&direcao = WEST;ENDIF;
  10. IFMATCHES(%DIRECTION%,E);&direcao = EAST;ENDIF;
  11. echo(/home cava);//mudar se nao for essa
  12. wait(5);
  13. do();
  14. slot(6);
  15. &item=%ITEM%;
  16. &itens=diamond_shovel|Written_Book|%&item%|diamond;
  17. do(2000);
  18. look(%&DIRECTION%,59);
  19. pick(%&item%);
  20. key(use);
  21. wait(1ms);
  22. slot(9);
  23. if(%DURABILITY% < 50);
  24. look(%&DIRECTION%,90);
  25. wait(500ms);
  26. KEY(USE);
  27. wait(500ms);
  28. endif;
  29. if(%DURABILITY%<3);
  30. unset(@cava1);
  31. echo(/home)
  32. stop();
  33. endif;
  34. look(%&DIRECTION%,59);
  35. do(1);
  36. key(attack);
  37. loop;
  38. loop;
  39. if(nf);
  40. gui(inventory);
  41. pick(%&Item%);
  42. if(%STACKSIZE%<9);
  43. for(#i,9,35);
  44. getslotitem(%#i%,#id);
  45. if(%#id%=%&Item%);
  46. slotclick(%#i%,l,true);
  47. wait(5ms);
  48. endif;
  49. next;
  50. wait(1);
  51. gui(inventory);
  52. wait(1);
  53. GETSLOTITEM(23,#id,#stack);
  54. IF(%#stack%=0);
  55. gui();
  56. elseif;
  57. gui();
  58. echo(/home baucava);
  59. wait(7);
  60. gui(inventory);
  61. for(#i,9,44);
  62. getslotitem(%#i%,&id,#stack);
  63. ifmatches(%&id%,%&itens%);
  64. else;
  65. slotclick(%#i%);
  66. slotclick(-999);
  67. wait(50ms);
  68. endif;
  69. next;
  70. for(#i,9,35);
  71. slotclick(%#i%,l,true);
  72. wait(30ms);
  73. next;
  74. gui();
  75. echo(/home baucava)//mudar se nao for essa
  76. wait(7);
  77. do;
  78. until((%XPOS%!=%#nposx1%)|(%ZPOS%!=%#nposx2%));
  79. keydown(jump);
  80. wait(100ms);
  81. keyup(jump);
  82. wait(1);
  83. &dir=%DIRECTION%;
  84. ifmatches(%&dir%,N);&dir=NORTH;endif;
  85. ifmatches(%&dir%,S);&dir=SOUTH;endif;
  86. ifmatches(%&dir%,E);&dir=EAST;endif;
  87. ifmatches(%&dir%,W);&dir=WEST;endif;
  88. do;
  89. look(%&dir%);
  90. if(%#bau%=1);look(-50,-24);endif;
  91. if(%#bau%=2);look(-39,-28);endif;
  92. if(%#bau%=3);look(-23,-32);endif;
  93. if(%#bau%=4);look(+1,-34);endif;
  94. if(%#bau%=5);look(+23,-32);endif;
  95. if(%#bau%=6);look(+39,-28);endif;
  96. if(%#bau%=7);look(+50,-24);endif;
  97. if(%#bau%=8);look(+61,-23);endif;
  98. if(%#bau%=9);look(+74,-24);endif;
  99. if(%#bau%=10);look(+91,-26);endif;
  100. if(%#bau%=11);look(+104,-25);endif;
  101. if(%#bau%=12);look(+120,-23);endif;
  102. if(%#bau%=13);look(+130,-24);endif;
  103. if(%#bau%=14);look(+141,-28);endif;
  104. if(%#bau%=15);look(+158,-32);endif;
  105. if(%#bau%=16);look(-179,-34);endif;
  106. if(%#bau%=17);look(-159,-32);endif;
  107. if(%#bau%=18);look(-143,-27);endif;
  108. if(%#bau%=19);look(-131,-24);endif;
  109. if(%#bau%=20);look(-120,-23);endif;
  110. if(%#bau%=21);look(-106,-24);endif;
  111. if(%#bau%=22);look(-89,-26);endif;
  112. if(%#bau%=23);look(-75,-25);endif;
  113. if(%#bau%=24);look(-61,-23);endif;
  114. if(%#bau%=25);look(-50,-10);endif;
  115. if(%#bau%=26);look(-39,-12);endif;
  116. if(%#bau%=27);look(-23,-14);endif;
  117. if(%#bau%=28);look(+1,-16);endif;
  118. if(%#bau%=29);look(+23,-14);endif;
  119. if(%#bau%=30);look(+39,-12);endif;
  120. if(%#bau%=31);look(+50,-10);endif;
  121. if(%#bau%=32);look(+61,-10);endif;
  122. if(%#bau%=33);look(+74,-11);endif;
  123. if(%#bau%=34);look(+91,-11);endif;
  124. if(%#bau%=35);look(+104,-11);endif;
  125. if(%#bau%=36);look(+120,-10);endif;
  126. if(%#bau%=37);look(+130,-10);endif;
  127. if(%#bau%=38);look(+141,-12);endif;
  128. if(%#bau%=39);look(+158,-14);endif;
  129. if(%#bau%=40);look(-179,-16);endif;
  130. if(%#bau%=41);look(-159,-14);endif;
  131. if(%#bau%=42);look(-143,-12);endif;
  132. if(%#bau%=43);look(-131,-10);endif;
  133. if(%#bau%=44);look(-120,-10);endif;
  134. if(%#bau%=45);look(-106,-11);endif;
  135. if(%#bau%=46);look(-89,-11);endif;
  136. if(%#bau%=47);look(-75,-11);endif;
  137. if(%#bau%=48);look(-61,-10);endif;
  138. if(%#bau%=49);look(-50,+4);endif;
  139. if(%#bau%=50);look(-39,+4);endif;
  140. if(%#bau%=51);look(-23,+4);endif;
  141. if(%#bau%=52);look(+23,+4);endif;
  142. if(%#bau%=53);look(+39,+4);endif;
  143. if(%#bau%=54);look(+50,+4);endif;
  144. if(%#bau%=55);look(+61,+4);endif;
  145. if(%#bau%=56);look(+74,+4);endif;
  146. if(%#bau%=57);look(+91,+4);endif;
  147. if(%#bau%=58);look(+104,+4);endif;
  148. if(%#bau%=59);look(+120,+4);endif;
  149. if(%#bau%=60);look(+130,+4);endif;
  150. if(%#bau%=61);look(+141,+4);endif;
  151. if(%#bau%=62);look(+158,+4);endif;
  152. if(%#bau%=63);look(-179,+4);endif;
  153. if(%#bau%=64);look(-159,+4);endif;
  154. if(%#bau%=65);look(-143,+4);endif;
  155. if(%#bau%=66);look(-131,+4);endif;
  156. if(%#bau%=67);look(-120,+4);endif;
  157. if(%#bau%=68);look(-106,+4);endif;
  158. if(%#bau%=69);look(-89,+4);endif;
  159. if(%#bau%=70);look(-75,+4);endif;
  160. if(%#bau%=71);look(-61,+4);endif;
  161. if(%#bau%=72);look(-50,+16);endif;
  162. if(%#bau%=73);look(-39,+20);endif;
  163. if(%#bau%=74);look(-23,+22);endif;
  164. if(%#bau%=75);look(+23,+22);endif;
  165. if(%#bau%=76);look(+39,+20);endif;
  166. if(%#bau%=77);look(+50,+16);endif;
  167. if(%#bau%=78);look(+61,+16);endif;
  168. if(%#bau%=79);look(+74,+18);endif;
  169. if(%#bau%=80);look(+91,+18);endif;
  170. if(%#bau%=81);look(+104,+18);endif;
  171. if(%#bau%=82);look(+120,+16);endif;
  172. if(%#bau%=83);look(+130,+16);endif;
  173. if(%#bau%=84);look(+141,+20);endif;
  174. if(%#bau%=85);look(+158,+22);endif;
  175. if(%#bau%=86);look(-179,+24);endif;
  176. if(%#bau%=87);look(-159,+22);endif;
  177. if(%#bau%=88);look(-143,+20);endif;
  178. if(%#bau%=89);look(-131,+16);endif;
  179. if(%#bau%=90);look(-120,+17);endif;
  180. if(%#bau%=91);look(-106,+18);endif;
  181. if(%#bau%=92);look(-89,+19);endif;
  182. if(%#bau%=93);look(-75,+18);endif;
  183. if(%#bau%=94);look(-61,+17);endif;
  184. wait(1);
  185. wait(5);
  186. key(use);
  187. wait(1);
  188. for(#i,54,71);
  189. slotclick(%#i%,l,true);
  190. wait(30ms);
  191. next;
  192. wait(500ms);
  193. getslotitem(53,#id,#stack);
  194. wait(500ms);
  195. if(%#stack%!=0);
  196. inc(#bau);
  197. endif;
  198. if(%#bau%=94);
  199. unset(nf);
  200. log("&4[Macro] &6Baús cheios! Apenas irá escavar agora.");
  201. gui();
  202. else;
  203. gui();
  204. endif;
  205. until(%#stack%=0);
  206. echo(/home cava);//mudar se nao for essa
  207. wait(5);
  208. endif;
  209. endif;
  210. endif;
  211. loop;
  212. endif;
  213.  
  214. }$$
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!