API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Mar 17th, 2018
184
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 8.71 KB | None | 0 0
raw download clone embed print report
  1. //------paulo77 Encantador Pica v2.2---------HTbruno mod-----------------//
  2. //--------------------------07/10/17-------------------------------------//
  3. //----------------------------9:00AM-------------------------------------//
  4. $${
  5. IF(@encantador);
  6. LOG("&3Macro: &7Encantador Pica &4&lDESATIVADA");
  7. UNSET(@encantador);
  8. STOP();
  9. ELSE;
  10. LOG("&3Macro: &7Encantador Pica &2&lATIVADA");
  11. SET(@encantador);
  12. #bau=1;
  13. #islot=0;
  14. #pegou=0;
  15. //------CONFIGURAÇÕES------------------------------------------//
  16. #tpdelay=2; //delay depois de dar /home
  17. #encdelay=1; //tempo do item na mesa de encantamento
  18. &player="paulo77_"; //deixe assim
  19. &googledocs="default"; //deixe assim
  20. //-------------------------------------------------------------//
  21. ECHO("/home encantadora");
  22. ECHO("/convites off");
  23. ECHO("/pvp off");
  24. WAIT(%#tpdelay%);
  25. WAIT(1);
  26. #xpos=%XPOS%;
  27. #zpos=%ZPOS%;
  28.  
  29. DO();
  30. IF((#xpos!=%XPOS%)|(#zpos!=%ZPOS%));
  31. ECHO("/home encantador");
  32. WAIT(%#tpdelay%);
  33. ENDIF;
  34. //------CHECANDO-INVENTÁRIO------------------------------------//
  35. GUI();
  36. WAIT(2);
  37. DO();
  38. LOOKS(90,325,0.3);
  39. GUI();
  40. WAIT(200ms);
  41. KEY(USE);
  42. WAIT(1);
  43. UNTIL(%GUI%="GUICHEST");
  44.  
  45. SLOTCLICK(54,L,FALSE);
  46. WAIT(1);
  47. SLOTCLICK(-999,L,FALSE);
  48. WAIT(1);
  49. GUI();
  50. WAIT(1);
  51. //------ENCANTANDO---------------------------------------------//
  52. IF(%LEVEL%>=30);
  53. DO();
  54. DO();
  55. IF(%#bau%=1); LOOK(150,315); ENDIF;
  56. IF(%#bau%=2); LOOK(150,335); ENDIF;
  57. IF(%#bau%=3); LOOK(150,365); ENDIF;
  58. IF(%#bau%=4); LOOK(150,390); ENDIF;
  59. IF(%#bau%=5); LOOK(180,310); ENDIF;
  60. IF(%#bau%=6); LOOK(180,335); ENDIF;
  61. IF(%#bau%=7); LOOK(180,365); ENDIF;
  62. IF(%#bau%=8); LOOK(180,395); ENDIF;
  63. GUI();
  64. WAIT(200ms);
  65. PICK(diamond_sword);
  66. KEY(use);
  67. WAIT(1);
  68. UNTIL(%GUI%="GUICHEST");
  69.  
  70. #pegou=0;
  71. #islot=0;
  72. #ar=0;
  73. DO(54);
  74. GETSLOTITEM(%#islot%,&id,#stack);
  75. IFMATCHES(%&id%,Air|String|Eye|Blaze);
  76. INC(#islot);
  77. INC(#ar);
  78. ELSE;
  79. LOG("&3Macro: &7Encontrado um &b%&id%");
  80. SLOTCLICK(%#islot%,LMOUSE);
  81. WAIT(500ms);
  82. SLOTCLICK(81,LMOUSE)
  83. INC(#islot);
  84. SET(#pegou,1);
  85. BREAK;
  86. ENDIF;
  87. LOOP;
  88. IF(%#ar%>53);
  89. INC(#bau);
  90. WAIT(90ms);
  91. GUI();
  92. WAIT(700ms);
  93. IF(%#bau%>=9);
  94. LOG("&3Macro: &7Todos os itens foram encantados!");
  95. LOG("&3Macro: &7Encantador &4&lDESATIVADA");
  96. UNSET(@encantador);
  97. STOP();
  98. ENDIF;
  99. ENDIF;
  100.  
  101. WAIT(90ms);
  102. GUI();
  103. WAIT(700ms);
  104.  
  105. UNTIL(%#pegou%=1);
  106.  
  107. DO();
  108. LOOK(270,420);
  109. WAIT(200ms);
  110. GUI();
  111. WAIT(200ms);
  112. PICK(diamond_sword);
  113. KEY(use);
  114. WAIT(1);
  115. UNTIL(%GUI%!="NONE");
  116.  
  117. SLOTCLICK(28,LMOUSE,TRUE);
  118. WAIT(%#encdelay%);
  119. PRESSBUTTON(2);
  120. WAIT(%#encdelay%);
  121. SLOTCLICK(0,LMOUSE);
  122. WAIT(500ms);
  123. SLOTCLICK(28,LMOUSE);
  124. WAIT(700ms);
  125. GUI();
  126. WAIT(700ms);
  127.  
  128. //------VERIFICANDO-ENCANTAMENTO-------------------------------//
  129. SLOT(1);
  130. WAIT(1);
  131. #p4=0;
  132. #u3=0;
  133. #des=0;
  134. FOREACH(enchantments);
  135. IFMATCHES(%ENCHANTMENT%,"Proteção IV");
  136. #p4=1;
  137. ENDIF;
  138. IFMATCHES(%ENCHANTMENT%,"Inquebrável III");
  139. #u3=1;
  140. ENDIF;
  141. IFMATCHES(%ENCHANTMENT%,"Espinhos I");
  142. #des=1;
  143. ENDIF;
  144. IFMATCHES(%ENCHANTMENT%,"Espinhos II");
  145. #des=1;
  146. ENDIF;
  147. NEXT;
  148.  
  149. IF(%#p4%=1);
  150. ELSE;
  151. #des=1;
  152. ENDIF;
  153.  
  154. IF(%#u3%=1);
  155. ELSE;
  156. #des=1;
  157. ENDIF;
  158.  
  159. IF(%#des%=0);
  160. LOG("&3Macro: &7Guardando &b%&id%");
  161. ELSE;
  162. ECHO("/desencantar");
  163. ENDIF;
  164. //------GUARDANDO-ITEM-----------------------------------------//
  165. IF(%#des%=0);
  166. DO();
  167. IF(%#bau%=1); LOOK(30,315); ENDIF;
  168. IF(%#bau%=2); LOOK(30,335); ENDIF;
  169. IF(%#bau%=3); LOOK(30,365); ENDIF;
  170. IF(%#bau%=4); LOOK(30,390); ENDIF;
  171. IF(%#bau%=5); LOOK(0,310); ENDIF;
  172. IF(%#bau%=6); LOOK(0,335); ENDIF;
  173. IF(%#bau%=7); LOOK(0,365); ENDIF;
  174. IF(%#bau%=8); LOOK(0,395); ENDIF;
  175. GUI();
  176. WAIT(200ms);
  177. PICK(diamond_sword);
  178. KEY(use);
  179. WAIT(1);
  180. UNTIL(%GUI%="GUICHEST");
  181. ELSE;
  182. DO();
  183. IF(%#bau%=1); LOOK(150,315); ENDIF;
  184. IF(%#bau%=2); LOOK(150,335); ENDIF;
  185. IF(%#bau%=3); LOOK(150,365); ENDIF;
  186. IF(%#bau%=4); LOOK(150,390); ENDIF;
  187. IF(%#bau%=5); LOOK(180,310); ENDIF;
  188. IF(%#bau%=6); LOOK(180,335); ENDIF;
  189. IF(%#bau%=7); LOOK(180,365); ENDIF;
  190. IF(%#bau%=8); LOOK(180,395); ENDIF;
  191. GUI();
  192. WAIT(200ms);
  193. PICK(diamond_sword);
  194. KEY(use);
  195. WAIT(1);
  196. UNTIL(%GUI%="GUICHEST");
  197. ENDIF;
  198.  
  199. SLOTCLICK(81,LMOUSE,TRUE);
  200.  
  201. WAIT(1);
  202. GUI();
  203.  
  204. ENDIF;
  205. //------MATANDO-MOBS-------------------------------------------//
  206. DO();
  207. IF(%HEALTH%<6);
  208. LOG("&3Macro: &7Vida Baixa! Regenerando...");
  209. PICK(golden_apple);
  210. #reg=%STACKSIZE%
  211. DO();
  212. PICK(golden_apple);
  213. KEY(use);
  214. IF(%#reg%!=%STACKSIZE%);
  215. BREAK;
  216. ENDIF;
  217. LOOP;
  218. WAIT(8);
  219. ENDIF;
  220.  
  221. PICK(diamond_sword);
  222. IF(%DURABILITY%<70);
  223. LOOK(,90);
  224. LOG("&3Macro: &7Reparando a espada...");
  225. WAIT(200ms);
  226. KEY(use);
  227. WAIT(200ms);
  228. KEY(use);
  229. LOG("&3Macro: &7Espada reparada!");
  230. ENDIF;
  231.  
  232. IF(%DURABILITY%<30);
  233. WAIT(5);
  234. IF(%DURABILITY%<30);
  235. UNSET(@encantador);
  236. LOG("&3Macro: &7Acabaram os recursos para reparar!");
  237. LOG("&3Macro: &7Encantador Pica &4&lDESATIVADA");
  238. STOP();
  239. ENDIF;
  240. ENDIF;
  241. SET(&hit, %HIT%);
  242. SET(&target, ENTITY);
  243. LOOK(270,340);
  244. IF(&hit=&target);
  245. KEY(attack);
  246. ENDIF;
  247. UNTIL(%LEVEL%>=30);
  248.  
  249. LOOP;
  250. ENDIF;
  251. }$$
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!