API tools faq
paste
Advertisement
RafaelloMC

Untitled

RafaelloMC
Apr 19th, 2019
120
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 20.01 KB | None | 0 0
raw download clone embed print report
  1. $${
  2. SET(@&sleep_m4,"&6&l[&f&oI&fnfo&6&l] &cUtilize o &fModPack 4.0 &cpara conseguir ativar essa macro. &9&o#SLEEP");
  3. TOGGLE(sleep_macro);
  4. IF(sleep_macro);
  5. LOG("&b&l[&a&oM&aacro&b&l] &aSleep_1.Min_2.Esc_3.Len &b&l[&2&lON&b&l]");
  6. SET(#sleep_delay_home,"100");
  7. SET(#sleep_blocos_quebrados,"");
  8. SET(#sleep_xp_ganho,"");
  9. SET(@afk_onchat);
  10. SET(@&afk_onchat_bn,"");
  11. SET(#sleep_slot_atual,"1");
  12. UNSET(achievementget);
  13. UNSET(@sleep5s);
  14. UNSET(sleep_coordenadas);
  15. ELSE;
  16. LOG("&b&l[&c&oM&cacro&b&l] &cSleep_1.Min_2.Esc_3.Len &b&l[&4&lOFF&b&l]");
  17. IF(%#sleep_blocos_quebrados%!=0);
  18. LOG("");
  19. LOG(" &fXP: &b&l%#sleep_xp_ganho%");
  20. LOG(" &fBlocos: &b&l%#sleep_blocos_quebrados%");
  21. LOG("");
  22. ENDIF;
  23. UNSET(@afk_onchat);
  24. STOP;
  25. ENDIF;
  26. UNSET(sleep_desligar);
  27. SLOT(1);
  28. LOG("");
  29. IFMATCHES("%ITEM%","^277$|^278$|^279$");
  30. IF(%ITEM%=277);
  31. SET(&sleep_ferramenta,"Pá");
  32. SET(#sleep_ferramenta,"277");
  33. SET(#sleep_xp,"10");
  34. ELSEIF(%ITEM%=278);
  35. SET(&sleep_ferramenta,"Picareta");
  36. SET(#sleep_ferramenta,"278");
  37. SET(#sleep_xp,"2");
  38. ELSEIF(%ITEM%=279);
  39. SET(&sleep_ferramenta,"Machado");
  40. SET(#sleep_ferramenta,"279");
  41. SET(#sleep_xp,"10");
  42. ENDIF;
  43. LOG("&b&l[&a&oM&aacro&b&l] &fFerramenta detectada: &b&l%&sleep_ferramenta%&f. &9&o#SLEEP");
  44. ELSE;
  45. LOG("&b&l[&a&oM&aacro&b&l] &fVocê precisa deixar uma ferramenta de &b&ldiamante &fno primeiro slot da hotbar. &9&o#SLEEP");
  46. SET(sleep_desligar);
  47. ENDIF;
  48. LOG("");
  49. IF(!sleep_desligar);
  50. WAIT(20T);
  51. SLOT(9);
  52. LOG("");
  53. IF(%ITEM%=0);
  54. LOG("&b&l[&a&oM&aacro&b&l] &fVocê precisa deixar algum bloco no último slot da hotbar. &9&o#SLEEP");
  55. SET(sleep_desligar);
  56. ELSE;
  57. SET(#sleep_bloco,"%ITEM%");
  58. GETITEMINFO(%#sleep_bloco%,&sleep_bloco);
  59. LOG("&b&l[&a&oM&aacro&b&l] &fBloco detectado: &b&l%&sleep_bloco%&f. &9&o#SLEEP");
  60. ENDIF;
  61. LOG("");
  62. IF(!sleep_desligar);
  63. WAIT(20T);
  64. GUI(INVENTORY);
  65. GETSLOT(57,#sleep_slot,9);
  66. GUI();
  67. LOG("");
  68. IF(%#sleep_slot%=-1);
  69. LOG("&b&l[&a&oM&aacro&b&l] &fNão tem &b&ldiamante &fno inventário, portanto a reparação foi &c&ldesativada&f. &9&o#SLEEP");
  70. UNSET(sleep_reparar);
  71. ELSE;
  72. IF(%#sleep_slot%>=36);
  73. LOG("&b&l[&a&oM&aacro&b&l] &fNão deixe &b&ldiamante &fna hotbar principal do inventário. &9&o#SLEEP");
  74. SET(sleep_desligar);
  75. ELSE;
  76. LOG("&b&l[&a&oM&aacro&b&l] &fDetectado &b&ldiamante &fno inventário, portanto a reparação foi &a&lativada&f. &9&o#SLEEP");
  77. SET(sleep_reparar);
  78. ENDIF;
  79. ENDIF;
  80. LOG("");
  81. ENDIF;
  82. ENDIF;
  83. IF(sleep_desligar);
  84. WAIT(20T);
  85. LOG("&b&l[&c&oM&cacro&b&l] &cSleep_1.Min_2.Esc_3.Len &b&l[&4&lOFF&b&l]");
  86. TOGGLE(sleep_macro);
  87. UNSET(@afk_onchat);
  88. STOP;
  89. ENDIF;
  90. IF(!@sleep_m4);
  91. LOG("%@&sleep_m4%"); DO;LOOP;
  92. ENDIF;
  93. DO;
  94. ECHO("/home sleepmel");
  95. DO(%#sleep_delay_home%);
  96. IF((%XPOS%=%#sleep_xpos%)&&(%YPOS%=%#sleep_ypos%)&&(%ZPOS%=%#sleep_zpos%));
  97. SET(sleep_coordenadas);
  98. BREAK;
  99. ENDIF;
  100. LOOP;
  101. KEYDOWN(JUMP);
  102. WAIT(20MS);
  103. KEYUP(JUMP);
  104. WAIT(12T);
  105. IF(!sleep_coordenadas);
  106. SET(sleep_coordenadas);
  107. SET(#sleep_delay_home,"20");
  108. SET(#sleep_xpos,"%XPOS%");
  109. SET(#sleep_ypos,"%YPOS%");
  110. SET(#sleep_zpos,"%ZPOS%");
  111. IF(%DIRECTION%="N");
  112. SET(&sleep_dir,"NORTH");
  113. ELSEIF(%DIRECTION%="S");
  114. SET(&sleep_dir,"SOUTH");
  115. ELSEIF(%DIRECTION%="E");
  116. SET(&sleep_dir,"EAST");
  117. ELSEIF(%DIRECTION%="W");
  118. SET(&sleep_dir,"WEST");
  119. ENDIF;
  120. ELSE;
  121. DO(100);
  122. UNTIL((%XPOS%=%#sleep_xpos%)&&(%YPOS%=%#sleep_ypos%)&&(%ZPOS%=%#sleep_zpos%));
  123. IF(sleep_reparar);
  124. GETIDREL(0,-1,0,#sleep_id);
  125. IF(%#sleep_id%!=42);
  126. DO;
  127. GUI();
  128. CLEARCHAT;
  129. LOG("");
  130. LOG("&b&l[&a&oM&aacro&b&l] &fVocê precisa colocar um &b&lbloco de ferro &fno chão para reparar. &9&o#SLEEP");
  131. LOG("");
  132. WAIT(60T);
  133. GETIDREL(0,-1,0,#sleep_id);
  134. UNTIL(%#sleep_id%=42);
  135. ENDIF;
  136. ENDIF;
  137. ENDIF;
  138. DO;
  139. DO;
  140. IF(%GUI%!="NONE");
  141. IF(%GUI%="GUICHAT");
  142. LOG("&b&l[&a&oM&aacro&b&l] &fChat detectado, feche para continuar. &9&o#SLEEP");
  143. DO;
  144. WHILE(%GUI%="GUICHAT");
  145. ELSE;
  146. LOG("&b&l[&a&oM&aacro&b&l] &fJanela detectada, continuando em &b&l3 &fsegundos. &9&o#SLEEP");
  147. WAIT(3);
  148. GUI();
  149. ENDIF;
  150. ENDIF;
  151. PICK(%#sleep_bloco%);
  152. IF(%ITEM%!=%#sleep_bloco%);
  153. BREAK;
  154. ENDIF;
  155. LOOK(%&sleep_dir%);
  156. LOOK(+0,+64);
  157. WAIT(1MS);
  158. KEY(USE);
  159. WAIT(1MS);
  160. IF(sleep_reparar);
  161. PICK(%#sleep_ferramenta%);
  162. WAIT(1MS);
  163. IF(%DURABILITY%<=100);
  164. GUI(INVENTORY);
  165. GETSLOT(57,#sleep_slot);
  166. IF(%#sleep_slot%=-1);
  167. BREAK;
  168. ELSE;
  169. DO(10);
  170. GUI();
  171. PICK(%#sleep_ferramenta%);
  172. LOOK(%&sleep_dir%);
  173. LOOK(+0,+90);
  174. WAIT(1T);
  175. KEY(USE);
  176. DO(10);
  177. PICK(%#sleep_ferramenta%);
  178. UNTIL(%DURABILITY%>300);
  179. UNTIL(%DURABILITY%>300);
  180. ENDIF;
  181. ENDIF;
  182. ELSE;
  183. SLOT(%#sleep_slot_atual%);
  184. WAIT(1MS);
  185. IF((%ITEM%!=%#sleep_ferramenta%)||(%DURABILITY%<=100));
  186. DO;
  187. INC(#sleep_slot_atual,1);
  188. IF(%#sleep_slot_atual%=10);
  189. SET(#sleep_slot_atual,"1");
  190. ENDIF;
  191. SLOT(%#sleep_slot_atual%);
  192. WAIT(3T);
  193. UNTIL((%DURABILITY%>100)&&(%ITEM%=%#sleep_ferramenta%));
  194. ENDIF;
  195. ENDIF;
  196. IF(%HITID%=%#sleep_bloco%);
  197. UNSAFE;
  198. DO;
  199. KEY(ATTACK);
  200. DO(600);
  201. KEY(ATTACK);
  202. UNTIL(%HITID%!=%#sleep_bloco%);
  203. IF(%HITID%=%#sleep_bloco%);
  204. GUI(INVENTORY);
  205. WAIT(1T);
  206. GUI();
  207. WAIT(1T);
  208. ENDIF;
  209. UNTIL(%HITID%!=%#sleep_bloco%);
  210. ENDUNSAFE;
  211. WAIT(1MS);
  212. INC(#sleep_blocos_quebrados,1);
  213. INC(#sleep_xp_ganho,"%#sleep_xp%");
  214. TOGGLE(achievementget);
  215. IF(achievementget);
  216. ACHIEVEMENTGET("%#sleep_xp_ganho% XP","384");
  217. ELSE;
  218. ACHIEVEMENTGET("%#sleep_blocos_quebrados% blocos","%#sleep_bloco%");
  219. ENDIF;
  220. ENDIF;
  221. IF((@sleep5s)&&(%#sleep_ferramenta%!=277));
  222. LOG("");
  223. LOG("&b&l[&a&oM&aacro&b&l] &fO chão vai limpar, pausa por &b&l5 &fsegundos. &9&o#SLEEP");
  224. LOG("");
  225. DO(140);
  226. WHILE(@sleep5s);
  227. WAIT(10T);
  228. ENDIF;
  229. UNTIL((%XPOS%!=%#sleep_xpos%)||(%YPOS%!=%#sleep_ypos%)||(%ZPOS%!=%#sleep_zpos%));
  230. IF((%XPOS%!=%#sleep_xpos%)||(%YPOS%!=%#sleep_ypos%)||(%ZPOS%!=%#sleep_zpos%));
  231. LOG("");
  232. LOG("&b&l[&a&oM&aacro&b&l] &fPosição inválida! Tentando resolver... &9&o#SLEEP");
  233. LOG("");
  234. ELSE;
  235. LOG("");
  236. LOG("&b&l[&a&oM&aacro&b&l] &fArrumando o inventário... &9&o#SLEEP");
  237. LOG("");
  238. UNSAFE;
  239. FOR(#sleep_slot,36,44);
  240. GUI(INVENTORY);
  241. GETSLOTITEM(%#sleep_slot%,#sleep_id);
  242. IF((%#sleep_id%=%#sleep_ferramenta%)||(%#sleep_id%=%#sleep_bloco%)||(%#sleep_id%=0));
  243. ELSE;
  244. SLOTCLICK(%#sleep_slot%,L,TRUE);
  245. WAIT(3T);
  246. GETSLOTITEM(%#sleep_slot%,#sleep_id);
  247. IF(%#sleep_id%!=0);
  248. LOOK(%&sleep_dir%);
  249. LOOK(+180,+0);
  250. SLOTCLICK(%#sleep_slot%,L,FALSE);
  251. WAIT(3T);
  252. SLOTCLICK(-999);
  253. WAIT(3T);
  254. ENDIF;
  255. ENDIF;
  256. NEXT;
  257. DO(10);
  258. GUI(INVENTORY);
  259. GETSLOT(%#sleep_bloco%,#sleep_slot);
  260. IF((%#sleep_slot%!=-1)&&(%#sleep_slot%<36));
  261. SLOTCLICK(%#sleep_slot%,L,TRUE);
  262. WAIT(3T);
  263. GETSLOTITEM(%#sleep_slot%,#sleep_id);
  264. IF(%#sleep_id%!=0);
  265. BREAK;
  266. ENDIF;
  267. ENDIF;
  268. UNTIL((%#sleep_slot%=-1)||(%#sleep_slot%>=36));
  269. ENDUNSAFE;
  270. IF(%#sleep_slot%=-1);
  271. DO;
  272. GUI();
  273. CLEARCHAT;
  274. LOG("");
  275. LOG("&b&l[&a&oM&aacro&b&l] &fOs blocos acabaram. &9&o#SLEEP");
  276. LOG("");
  277. WAIT(60T);
  278. GUI(INVENTORY);
  279. GETSLOT(%#sleep_bloco%,#sleep_slot);
  280. GUI();
  281. UNTIL(%#sleep_slot%!=-1);
  282. ELSEIF(sleep_reparar);
  283. GETSLOT(57,#sleep_slot);
  284. IF(%#sleep_slot%=-1);
  285. DO;
  286. GUI();
  287. CLEARCHAT;
  288. LOG("");
  289. LOG("&b&l[&a&oM&aacro&b&l] &fOs diamantes acabaram. &9&o#SLEEP");
  290. LOG("");
  291. WAIT(60T);
  292. GUI(INVENTORY);
  293. GETSLOT(57,#sleep_slot);
  294. GUI();
  295. UNTIL(%#sleep_slot%!=-1);
  296. ENDIF;
  297. ENDIF;
  298. GUI();
  299. ENDIF;
  300. UNTIL((%XPOS%!=%#sleep_xpos%)||(%YPOS%!=%#sleep_ypos%)||(%ZPOS%!=%#sleep_zpos%));
  301. LOOP;
  302.  
  303. }$$
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!