API tools faq
paste
RafaelloMC

Untitled

RafaelloMC
Apr 26th, 2019
48
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 20.53 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. SETLABEL("TESOURO","");
  5. IF(sleep_macro);
  6. LOG("&b&l[&a&oM&aacro&b&l] &aSleep_Caça_ao_Tesouro &b&l[&2&lON&b&l]");
  7. WAIT(10T);
  8. ELSE;
  9. LOG("&b&l[&c&oM&cacro&b&l] &cSleep_Caça_ao_Tesouro &b&l[&4&lOFF&b&l]");
  10. GUI();
  11. KEYUP(FORWARD);
  12. KEYUP(JUMP);
  13. KEYUP(SNEAK);
  14. STOP;
  15. ENDIF;
  16. SET(sleep_tem_pot);
  17. SET(sleep_tem_comida);
  18. SET(primeira_coordenada);
  19. SET(&primeira_coordenada,"X");
  20. SET(#sleep_xpos,"");
  21. SET(#sleep_zpos,"");
  22. SET(&sleep_registrar,"");
  23. PICK(387);
  24. IF(%ITEM%=387);
  25. KEY(USE);
  26. ENDIF;
  27. LOG("");
  28. LOG("&b&l[&a&oM&aacro&b&l] &aDigite a coordenada &fX&a. &9&o#SLEEP");
  29. LOG("&b&l[&a&oM&aacro&b&l] &aUtilize o teclado númerico. &9&o#SLEEP");
  30. LOG("");
  31. ACHIEVEMENTGET("%&primeira_coordenada%: %&sleep_registrar%",387);
  32. UNSAFE;
  33. DO;
  34. IF((!sleep_key0)&&((KEY_0)||(KEY_NUMPAD0)));
  35. SET(sleep_key0);
  36. IF((%&sleep_registrar%=NULL)||(%&sleep_registrar%="-"));
  37. ELSE;
  38. SET(&sleep_registrar,"%&sleep_registrar%0");
  39. ENDIF;
  40. ACHIEVEMENTGET("%&primeira_coordenada%: %&sleep_registrar%",387);
  41. ELSEIF((!KEY_0)&&(!KEY_NUMPAD0));
  42. UNSET(sleep_key0);
  43. ENDIF;
  44. IF((!sleep_key1)&&((KEY_1)||(KEY_NUMPAD1)));
  45. SET(sleep_key1);
  46. SET(&sleep_registrar,"%&sleep_registrar%1");
  47. ACHIEVEMENTGET("%&primeira_coordenada%: %&sleep_registrar%",387);
  48. ELSEIF((!KEY_1)&&(!KEY_NUMPAD1));
  49. UNSET(sleep_key1);
  50. ENDIF;
  51. IF((!sleep_key2)&&((KEY_2)||(KEY_NUMPAD2)));
  52. SET(sleep_key2);
  53. SET(&sleep_registrar,"%&sleep_registrar%2");
  54. ACHIEVEMENTGET("%&primeira_coordenada%: %&sleep_registrar%",387);
  55. ELSEIF((!KEY_2)&&(!KEY_NUMPAD2));
  56. UNSET(sleep_key2);
  57. ENDIF;
  58. IF((!sleep_key3)&&((KEY_3)||(KEY_NUMPAD3)));
  59. SET(sleep_key3);
  60. SET(&sleep_registrar,"%&sleep_registrar%3");
  61. ACHIEVEMENTGET("%&primeira_coordenada%: %&sleep_registrar%",387);
  62. ELSEIF((!KEY_3)&&(!KEY_NUMPAD3));
  63. UNSET(sleep_key3);
  64. ENDIF;
  65. IF((!sleep_key4)&&((KEY_4)||(KEY_NUMPAD4)));
  66. SET(sleep_key4);
  67. SET(&sleep_registrar,"%&sleep_registrar%4");
  68. ACHIEVEMENTGET("%&primeira_coordenada%: %&sleep_registrar%",387);
  69. ELSEIF((!KEY_4)&&(!KEY_NUMPAD4));
  70. UNSET(sleep_key4);
  71. ENDIF;
  72. IF((!sleep_key5)&&((KEY_5)||(KEY_NUMPAD5)));
  73. SET(sleep_key5);
  74. SET(&sleep_registrar,"%&sleep_registrar%5");
  75. ACHIEVEMENTGET("%&primeira_coordenada%: %&sleep_registrar%",387);
  76. ELSEIF((!KEY_5)&&(!KEY_NUMPAD5));
  77. UNSET(sleep_key5);
  78. ENDIF;
  79. IF((!sleep_key6)&&((KEY_6)||(KEY_NUMPAD6)));
  80. SET(sleep_key6);
  81. SET(&sleep_registrar,"%&sleep_registrar%6");
  82. ACHIEVEMENTGET("%&primeira_coordenada%: %&sleep_registrar%",387);
  83. ELSEIF((!KEY_6)&&(!KEY_NUMPAD6));
  84. UNSET(sleep_key6);
  85. ENDIF;
  86. IF((!sleep_key7)&&((KEY_7)||(KEY_NUMPAD7)));
  87. SET(sleep_key7);
  88. SET(&sleep_registrar,"%&sleep_registrar%7");
  89. ACHIEVEMENTGET("%&primeira_coordenada%: %&sleep_registrar%",387);
  90. ELSEIF((!KEY_7)&&(!KEY_NUMPAD7));
  91. UNSET(sleep_key7);
  92. ENDIF;
  93. IF((!sleep_key8)&&((KEY_8)||(KEY_NUMPAD8)));
  94. SET(sleep_key8);
  95. SET(&sleep_registrar,"%&sleep_registrar%8");
  96. ACHIEVEMENTGET("%&primeira_coordenada%: %&sleep_registrar%",387);
  97. ELSEIF((!KEY_8)&&(!KEY_NUMPAD8));
  98. UNSET(sleep_key8);
  99. ENDIF;
  100. IF((!sleep_key9)&&((KEY_9)||(KEY_NUMPAD9)));
  101. SET(sleep_key9);
  102. SET(&sleep_registrar,"%&sleep_registrar%9");
  103. ACHIEVEMENTGET("%&primeira_coordenada%: %&sleep_registrar%",387);
  104. ELSEIF((!KEY_9)&&(!KEY_NUMPAD9));
  105. UNSET(sleep_key9);
  106. ENDIF;
  107. IF((!sleep_keysub)&&((KEY_SUBTRACT)||(KEY_MINUS)));
  108. SET(sleep_keysub);
  109. IF(%&sleep_registrar%=NULL);
  110. SET(&sleep_registrar,"%&sleep_registrar%-");
  111. ENDIF;
  112. ACHIEVEMENTGET("%&primeira_coordenada%: %&sleep_registrar%",387);
  113. ELSEIF((!KEY_SUBTRACT)&&(!KEY_MINUS));
  114. UNSET(sleep_keysub);
  115. ENDIF;
  116. IF((!sleep_keyback)&&(KEY_BACK));
  117. SET(sleep_keyback);
  118. SET(&sleep_registrar,"");
  119. ACHIEVEMENTGET("%&primeira_coordenada%: %&sleep_registrar%",387);
  120. ELSEIF(!KEY_BACK);
  121. UNSET(sleep_keyback);
  122. ENDIF;
  123. IF((!sleep_keyreturn)&&(KEY_RETURN));
  124. SET(sleep_keyreturn);
  125. IF((%&sleep_registrar%="-")||(%&sleep_registrar%=NULL));
  126. LOG("&b&l[&a&oM&aacro&b&l] &cVocê não digitou ou digitou uma coordenada inválida. Tente novamente... &9&o#SLEEP");
  127. ACHIEVEMENTGET("%&primeira_coordenada%: %&sleep_registrar%",387);
  128. ELSE;
  129. IF(primeira_coordenada);
  130. SET(&primeira_coordenada,"Z");
  131. UNSET(primeira_coordenada);
  132. SET(#sleep_xpos,"%&sleep_registrar%");
  133. LOG("");
  134. LOG("&b&l[&a&oM&aacro&b&l] &aCoordenada &fX&a: &c&l%&sleep_registrar%");
  135. LOG("");
  136. LOG("&b&l[&a&oM&aacro&b&l] &aDigite a coordenada &fZ&a. &9&o#SLEEP");
  137. LOG("&b&l[&a&oM&aacro&b&l] &aUtilize o teclado númerico. &9&o#SLEEP");
  138. LOG("");
  139. SET(&sleep_registrar,"");
  140. ACHIEVEMENTGET("%&primeira_coordenada%: %&sleep_registrar%",387);
  141. ELSE;
  142. SET(#sleep_zpos,"%&sleep_registrar%");
  143. LOG("");
  144. LOG("&b&l[&a&oM&aacro&b&l] &aCoordenada &fZ&a: &c&l%&sleep_registrar%");
  145. LOG("");
  146. BREAK;
  147. ENDIF;
  148. ENDIF;
  149. ELSEIF(!KEY_RETURN);
  150. UNSET(sleep_keyreturn);
  151. ENDIF;
  152. IFMATCHES("%&sleep_registrar%","[\d]+[\d]+[\d]+[\d]+[\d]+[\d]+[\d]+[\d]");
  153. LOG("&b&l[&a&oM&aacro&b&l] &cCoordenada inválida. Tente novamente... &9&o#SLEEP");
  154. SET(&sleep_registrar,"");
  155. ACHIEVEMENTGET("%&primeira_coordenada%: %&sleep_registrar%",387);
  156. ENDIF;
  157. LOOP;
  158. ENDUNSAFE;
  159. GUI(INVENTORY);
  160. GUI();
  161. IF(!@sleep_m4);
  162. LOG("%@&sleep_m4%"); DO;LOOP;
  163. ENDIF;
  164. WAIT(10T);
  165. LOG("");
  166. LOG("&b&l[&a&oM&aacro&b&l] &aCaça ao Tesouro iniciada. &9&o#SLEEP");
  167. LOG("");
  168. DO;
  169. SET(#xpos_atual,"%XPOS%");
  170. SET(#zpos_atual,"%ZPOS%");
  171. #falta_x = %#xpos_atual% - %#sleep_xpos%;
  172. #falta_z = %#zpos_atual% - %#sleep_zpos%;
  173. IFMATCHES("%#falta_x%","([\d,]*)$",#falta_x,1,NONE);
  174. ENDIF;
  175. IFMATCHES("%#falta_z%","([\d,]*)$",#falta_z,1,NONE);
  176. ENDIF;
  177. #falta_total = %#falta_x% + %#falta_z%;
  178. SETLABEL("TESOURO","&6Blocos a percorrer:\n&f%#falta_total%");
  179. IFMATCHES(%DIRECTION%,N);
  180. GETIDREL(0,0,-1,#sleep_id);
  181. ENDIF;
  182. IFMATCHES(%DIRECTION%,S);
  183. GETIDREL(0,0,1,#sleep_id);
  184. ENDIF;
  185. IFMATCHES(%DIRECTION%,W);
  186. GETIDREL(-1,0,0,#sleep_id);
  187. ENDIF;
  188. IFMATCHES(%DIRECTION%,E);
  189. GETIDREL(1,0,0,#sleep_id);
  190. ENDIF;
  191. IF(%#sleep_id%!=0);
  192. KEYDOWN(JUMP);
  193. WAIT(5T);
  194. KEYUP(JUMP);
  195. ENDIF;
  196. IF((%ZPOS%>%#sleep_zpos%)&&(%XPOS%>%#sleep_xpos%));
  197. LOOK(NORTH);
  198. LOOK(-45,0);
  199. ELSEIF((%ZPOS%<%#sleep_zpos%)&&(%XPOS%>%#sleep_xpos%));
  200. LOOK(SOUTH);
  201. LOOK(+45,0);
  202. ELSEIF((%XPOS%>%#sleep_xpos%)&&(%ZPOS%>%#sleep_zpos%));
  203. LOOK(WEST);
  204. LOOK(-45,0);
  205. ELSEIF((%XPOS%<%#sleep_xpos%)&&(%ZPOS%>%#sleep_zpos%));
  206. LOOK(EAST);
  207. LOOK(-45,0);
  208. ELSEIF((%ZPOS%>%#sleep_zpos%)&&(%XPOS%<%#sleep_xpos%));
  209. LOOK(NORTH);
  210. LOOK(-45,0);
  211. ELSEIF((%ZPOS%<%#sleep_zpos%)&&(%XPOS%<%#sleep_xpos%));
  212. LOOK(SOUTH);
  213. LOOK(-45,0);
  214. ELSEIF((%XPOS%>%#sleep_xpos%)&&(%ZPOS%<%#sleep_zpos%));
  215. LOOK(WEST);
  216. LOOK(-45,0);
  217. ELSEIF((%XPOS%<%#sleep_xpos%)&&(%ZPOS%<%#sleep_zpos%));
  218. LOOK(EAST);
  219. LOOK(+45,0);
  220. ELSEIF(%ZPOS%>%#sleep_zpos%);
  221. LOOK(NORTH);
  222. ELSEIF(%ZPOS%<%#sleep_zpos%);
  223. LOOK(SOUTH);
  224. ELSEIF(%XPOS%>%#sleep_xpos%);
  225. LOOK(WEST);
  226. ELSEIF(%XPOS%<%#sleep_xpos%);
  227. LOOK(EAST);
  228. ELSEIF((%ZPOS%=%#sleep_zpos%)&&(%ZPOS%=%#sleep_zpos%));
  229. BREAK;
  230. ENDIF;
  231. IF(sleep_tem_pot);
  232. UNSET(sleep_speed);
  233. FOREACH(effects);
  234. IF(%EFFECTID%=1);
  235. SET(sleep_speed);
  236. ENDIF;
  237. NEXT;
  238. IF(!sleep_speed);
  239. DO(2);
  240. PICK(373:8194,373:8258,373:8226,373:8290);
  241. IFMATCHES("%ITEMIDDMG%","^373:8194$|^373:8258$|^373:8226$|^373:8290$");
  242. UNSET(break);
  243. LOOK(+0,+90);
  244. KEYUP(FORWARD);
  245. KEYUP(JUMP);
  246. GUI();
  247. DO(100);
  248. PICK(373:8194,373:8258,373:8226,373:8290);
  249. FOREACH(effects);
  250. IF(%EFFECTID%=1);
  251. SET(sleep_speed);
  252. ENDIF;
  253. NEXT;
  254. IFMATCHES("%ITEMIDDMG%","^373:8194$|^373:8258$|^373:8226$|^373:8290$");
  255. KEY(USE);
  256. ELSE;
  257. TOGGLE(break);
  258. IF(!break);
  259. BREAK;
  260. ENDIF;
  261. ENDIF;
  262. UNTIL(sleep_speed);
  263. ELSE;
  264. UNSET(sleep_tem_pot);
  265. LOG("&b&l[&a&oM&aacro&b&l] &cNão foi detectado poção de velocidade na sua hotbar. &9&o#SLEEP");
  266. ENDIF;
  267. UNTIL((!sleep_tem_pot)||(sleep_speed));
  268. IF((sleep_tem_pot)&&(!sleep_speed));
  269. UNSET(sleep_tem_pot);
  270. LOG("&b&l[&a&oM&aacro&b&l] &cAlgum problema aconteceu ao tentar beber a poção. &9&o#SLEEP");
  271. ENDIF;
  272. ENDIF;
  273. ENDIF;
  274. IF((sleep_tem_comida)&&(%HUNGER%<=6));
  275. DO(2);
  276. PICK(320,364,350,297,366,400,396,260);
  277. IFMATCHES("%ITEM%","^320$|^364$|^350$|^297$|^366$|^400$|^396$|^260$");
  278. LOOK(+0,+90);
  279. KEYUP(FORWARD);
  280. KEYUP(JUMP);
  281. GUI();
  282. DO(100);
  283. PICK(320,364,350,297,366,400,396,260);
  284. IFMATCHES("%ITEM%","^320$|^364$|^350$|^297$|^366$|^400$|^396$|^260$");
  285. KEY(USE);
  286. ELSE;
  287. BREAK;
  288. ENDIF;
  289. UNTIL(%HUNGER%>=18);
  290. ELSE;
  291. UNSET(sleep_tem_comida);
  292. LOG("&b&l[&a&oM&aacro&b&l] &cNão foi detectado comida na sua hotbar. &9&o#SLEEP");
  293. ENDIF;
  294. UNTIL((!sleep_tem_comida)||(%HUNGER%>=18));
  295. IF((sleep_tem_comida)&&(%HUNGER%<=6));
  296. UNSET(sleep_tem_comida);
  297. LOG("&b&l[&a&oM&aacro&b&l] &cAlgum problema aconteceu ao tentar se alimentar. &9&o#SLEEP");
  298. ENDIF;
  299. ENDIF;
  300. KEYDOWN(FORWARD);
  301. SPRINT;
  302. IF((!sleep_tem_pot)&&(sleep_tem_comida));
  303. KEYDOWN(JUMP);
  304. ENDIF;
  305. LOOP;
  306. GUI();
  307. KEYUP(FORWARD);
  308. KEYUP(JUMP);
  309. KEYUP(SNEAK);
  310. SPRINT;
  311. LOG("");
  312. LOG("&b&l[&a&oM&aacro&b&l] &aCaça ao Tesouro concluída. &9&o#SLEEP");
  313. LOG("");
  314. PLAYSOUND(note.pling);
  315. SETLABEL("TESOURO","&6Blocos a percorrer:\n&9&o #SLEEP");
  316. WAIT(10T);
  317. PLAYSOUND(note.pling);
  318. SETLABEL("TESOURO","&6Blocos a percorrer:\n&9&o#SLEEP");
  319. WAIT(7T);
  320. PLAYSOUND(note.pling);
  321. SETLABEL("TESOURO","&6Blocos a percorrer:\n&9&o #SLEEP");
  322. WAIT(3T);
  323. PLAYSOUND(note.pling);
  324. SETLABEL("TESOURO","&6Blocos a percorrer:\n&9&o#SLEEP");
  325. WAIT(10T);
  326. PLAYSOUND(note.pling);
  327. SETLABEL("TESOURO","&6Blocos a percorrer:\n&9&o #SLEEP");
  328. WAIT(18T);
  329. PLAYSOUND(note.pling);
  330. PLAYSOUND(note.pling);
  331. PLAYSOUND(note.pling);
  332. SETLABEL("TESOURO","&6Blocos a percorrer:\n&9&o#SLEEP");
  333. WAIT(10T);
  334. PLAYSOUND(note.pling);
  335. PLAYSOUND(note.pling);
  336. PLAYSOUND(note.pling);
  337. PLAYSOUND(note.pling);
  338. PLAYSOUND(note.pling);
  339. SETLABEL("TESOURO","");
  340. TOGGLE(sleep_macro);
  341. LOG("&b&l[&c&oM&cacro&b&l] &cSleep_Caça_ao_Tesouro &b&l[&4&lOFF&b&l]");
  342. STOP;
  343.  
  344. }$$
Add Comment
Please, Sign In to add comment
Public Pastes
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!