API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Feb 23rd, 2020
201
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 93.72 KB | None | 0 0
raw download clone embed print report
  1. $${
  2. SET(@&sleep_m4,"&6&l[&f&oI&fnfo&6&l] &cUtilize o &fSLEEP ModPack 4.2 &cpara conseguir ativar essa macro. &9&o#SLEEP");
  3. // Versao/Upgrade: 0.4 [13-08-2019]
  4. // Verifique a versao mais atualizada! https://enrt.eu/macros
  5.  
  6. TOGGLE(sleep_macro);
  7. IF(sleep_macro);
  8. LOG("&b&l[&f&oM&facro&b&l] &aSleep_&lM&aob&a&lK&aill &b&l[&2ON&b&l]");
  9. ACHIEVEMENTGET("[ON] MobKill Upgrade 0.4","skull");
  10. SET(@mobkill_ativada);
  11. SET(@afk_onchat);
  12. SET(@&afk_onchat_bn,"");
  13. SET(trap_salvar_coordenadas);
  14. UNSET(sleep_error);
  15. UNSET(mob_invadido);
  16. WAIT(10T);
  17. ELSE;
  18. LOG("&b&l[&f&oM&facro&b&l] &cSleep_&lM&cob&c&lK&cill &b&l[&4OFF&b&l]");
  19. ACHIEVEMENTGET("[OFF] MobKill Upgrade 0.4","skull");
  20. IF(configkm_save);
  21. IF(%&itens_armazenar%!="DESABILITADO");
  22. LOG("");
  23. LOG("&b&l[&f&oM&facro&b&l] &aTrap de baús:");
  24. IF(!baus_lotados);
  25. IF((sleep_reparar)||(sleep_trocar));
  26. #bau_atual_mostrar = %#bau_atual% - 1;
  27. IF(%#bau_atual_mostrar%=0);
  28. INC(#bau_atual_mostrar,1);
  29. ENDIF;
  30. LOG("&b&l[&f&oM&facro&b&l] &f&oBaú de armazenamento atual: &a%#bau_atual_mostrar%&fº");
  31. ELSE;
  32. LOG("&b&l[&f&oM&facro&b&l] &f&oBaú de armazenamento atual: &a%#bau_atual%&fº");
  33. ENDIF;
  34. ELSE;
  35. IF((sleep_reparar)||(sleep_trocar));
  36. #bau_atual_mostrar = %#bau_atual% - 2;
  37. ELSE;
  38. #bau_atual_mostrar = %#bau_atual% - 1;
  39. ENDIF;
  40. LOG("&b&l[&f&oM&facro&b&l] &f&oBaú de armazenamento atual: &4%#bau_atual_mostrar%&cº");
  41. LOG("&b&l[&f&oM&facro&b&l] &cNão é mais possível armazenar.");
  42. ENDIF;
  43. ENDIF;
  44. LOG("");
  45. IF(mob_invadido);
  46. LOG("&b&l[&f&oM&facro&b&l] &cVocê ficou com a vida baixa e o alarme de invasão foi acionado.");
  47. LOG("&b&l[&f&oM&facro&b&l] &cPrints foram salvas, verifique na pasta screenshots do seu ModPack.");
  48. LOG("");
  49. ENDIF;
  50. ENDIF;
  51. UNSET(@mobkill_ativada);
  52. UNSET(@mobkill_power);
  53. UNSET(@afk_onchat);
  54. KEYUP(LEFT);
  55. KEYUP(RIGHT);
  56. KEYUP(SNEAK);
  57. STOP;
  58. ENDIF;
  59. IF(configkm_save);
  60. SET(&prompt_texto,"Digite: 1 ou 2.");
  61. LOG("");
  62. LOG("&b&l[&f&oM&facro&b&l] &aIniciar com as últimas configurações?");
  63. LOG("&b&l[&f&oM&facro&b&l] &2[&f1&2] &fSim");
  64. LOG("&b&l[&f&oM&facro&b&l] &4[&f2&4] &cNão");
  65. SET(@#ligou,"1");
  66. IF(%&itens_armazenar%!="DESABILITADO");
  67. LOG("&b&l[&f&oM&facro&b&l] &2[&f3&2] &fSim, mas recomeçar do 1º baú.");
  68. SET(&prompt_texto,"Digite: 1, 2 ou 3.");
  69. ENDIF;
  70. LOG("");
  71. IF(@mobkill_power);
  72. SET(#sleep_quest_4,"1");
  73. ELSE;
  74. SET(#sleep_quest_4,"1");
  75. ENDIF;
  76. IF(%#sleep_quest_4%=1);
  77. LOG("&b&l[&f&oM&facro&b&l] &2[&f1&2] &fSim");
  78. WAIT(20T);
  79. ELSEIF(%#sleep_quest_4%=2);
  80. LOG("&b&l[&f&oM&facro&b&l] &4[&f2&4] &cNão");
  81. SET(configkm_load);
  82. WAIT(20T);
  83. ELSEIF((%#sleep_quest_4%=3)&&(%&itens_armazenar%!="DESABILITADO"));
  84. LOG("&b&l[&f&oM&facro&b&l] &2[&f3&2] &fSim, mas recomeçar do 1º baú.");
  85. SET(#pos_first_chest,"");
  86. SET(#pos_last_chest,"");
  87. SET(#bau_atual,"1");
  88. UNSET(baus_lotados);
  89. WAIT(20T);
  90. ELSE;
  91. LOG("&b&l[&f&oM&facro&b&l] &cResposta inválida. &9&o#SLEEP");
  92. SET(sleep_error);
  93. ENDIF;
  94. ELSE;
  95. SET(configkm_load);
  96. ENDIF;
  97. IF(configkm_load);
  98. SET(&itens_armazenar,"");
  99. SET(#pos_first_chest,"");
  100. SET(#pos_last_chest,"");
  101. SET(#bau_atual,"1");
  102. UNSET(configkm_save);
  103. UNSET(configkm_load);
  104. UNSET(sleep_reparar);
  105. UNSET(sleep_trocar);
  106. UNSET(sleep_desarmado);
  107. UNSET(baus_lotados);
  108. LOG("");
  109. LOG("&b&l[&f&oM&facro&b&l] &aDeseja reparar seu &f&oArco&a/&f&oMachado&a/&f&oEspada&a?");
  110. LOG("&b&l[&f&oM&facro&b&l] &2[&f1&2] &fSim");
  111. LOG("&b&l[&f&oM&facro&b&l] &4[&f2&4] &cNão");
  112. LOG("&b&l[&f&oM&facro&b&l] &2[&f3&2] &fVou upar desarmado");
  113. LOG("");
  114. PROMPT(#sleep_quest_1,$$?,"Digite: 1, 2 ou 3.");
  115. IF(%#sleep_quest_1%=1);
  116. LOG("&b&l[&f&oM&facro&b&l] &2[&f1&2] &fSim");
  117. SET(sleep_reparar);
  118. ELSEIF(%#sleep_quest_1%=2);
  119. LOG("&b&l[&f&oM&facro&b&l] &4[&f2&4] &cNão");
  120. SET(sleep_trocar);
  121. ELSEIF(%#sleep_quest_1%=3);
  122. LOG("&b&l[&f&oM&facro&b&l] &2[&f3&2] &fVou upar desarmado");
  123. SET(sleep_desarmado);
  124. ELSE;
  125. LOG("&b&l[&f&oM&facro&b&l] &cResposta inválida. &9&o#SLEEP");
  126. SET(sleep_error);
  127. ENDIF;
  128. IF(!sleep_error);
  129. IF(!sleep_desarmado);
  130. WAIT(20T);
  131. LOG("");
  132. IF(sleep_reparar);
  133. LOG("&b&l[&f&oM&facro&b&l] &aReparar seu &f&oArco&a/&f&oMachado&a/&f&oEspada &acom &aqual durabilidade?");
  134. ELSE;
  135. LOG("&b&l[&f&oM&facro&b&l] &aTrocar de &f&oArco&a/&f&oMachado&a/&f&oEspada &acom &aqual durabilidade?");
  136. ENDIF;
  137. LOG("&b&l[&f&oM&facro&b&l] &aDigite um número de &f5 &aaté &f150&a.");
  138. LOG("");
  139. PROMPT(#sleep_quest_2,$$?,"Digite um número de 5 até 150.");
  140. IF((%#sleep_quest_2%>=5)&&(%#sleep_quest_2%<=150));
  141. LOG("&b&l[&f&oM&facro&b&l] &f%#sleep_quest_2%");
  142. ELSE;
  143. LOG("&b&l[&f&oM&facro&b&l] &cResposta inválida. &9&o#SLEEP");
  144. SET(sleep_error);
  145. ENDIF;
  146. ENDIF;
  147. IF(!sleep_error);
  148. WAIT(20T);
  149. LOG("");
  150. LOG("&b&l[&f&oM&facro&b&l] &aQuais itens você deseja armazenar?");
  151. LOG("&b&l[&f&oM&facro&b&l] &aAbra um &fBaú Duplo &acom os itens que você deseja armazenar.");
  152. LOG("&b&l[&f&oM&facro&b&l] &aPressione a tecla &f&lENTER &adurante &f3 &asegundos para salvar os itens.");
  153. LOG("");
  154. SET(#tempo_real,"30");
  155. SET(#tempo_ms,"600");
  156. UNSET(achievementget);
  157. DO;
  158. IFMATCHES("%#tempo_ms%","^(.*)0$");
  159. IF(achievementget);
  160. IF(%#tempo_real%>1);
  161. ACHIEVEMENTGET("Você tem: %#tempo_real% segundos","skull");
  162. ELSEIF(%#tempo_real%=1);
  163. ACHIEVEMENTGET("Você tem: 1 segundo","skull");
  164. ELSE;
  165. ACHIEVEMENTGET("Tempo esgotado.","skull");
  166. ENDIF;
  167. DEC(#tempo_real,1);
  168. IF(%#tempo_real%=-1);
  169. LOG("&b&l[&f&oM&facro&b&l] &cVocê demorou demais. &9&o#SLEEP");
  170. SET(sleep_error);
  171. BREAK;
  172. ENDIF;
  173. ENDIF;
  174. TOGGLE(achievementget);
  175. ENDIF;
  176. IF((KEY_RETURN)||(KEY_NUMPADENTER));
  177. DO(45);
  178. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  179. IF((KEY_RETURN)||(KEY_NUMPADENTER));
  180. IF(%GUI%="GUICHEST");
  181. LOG("&b&l[&f&oM&facro&b&l] &aAguarde, salvando os itens... &9&o#SLEEP");
  182. FOR(#sleep_slot,0,53);
  183. GETSLOTITEM(%#sleep_slot%,&sleep_id);
  184. IF(%&sleep_id%!="air");
  185. GETITEMINFO(%&sleep_id%,&sleep_name);
  186. ACHIEVEMENTGET("%&sleep_name%","%&sleep_id%");
  187. WAIT(10T);
  188. SET(&itens_armazenar,"%&itens_armazenar%^%&sleep_id%$|");
  189. ENDIF;
  190. NEXT;
  191. IF(%GUI%!="GUICHEST");
  192. LOG("&b&l[&f&oM&facro&b&l] &cNão foi possível salvar os itens. &9&o#SLEEP");
  193. SET(sleep_error);
  194. ENDIF;
  195. GUI();
  196. IF(!sleep_error);
  197. IF(%&itens_armazenar%=NONE);
  198. LOG("&b&l[&f&oM&facro&b&l] &cNão foi encontrado nenhum item. &9&o#SLEEP");
  199. SET(&itens_armazenar,"DESABILITADO");
  200. ELSE;
  201. SET(&itens_armazenar,"%&itens_armazenar%^387$");
  202. ENDIF;
  203. ENDIF;
  204. BREAK;
  205. ELSE;
  206. LOG("&b&l[&f&oM&facro&b&l] &cVocê precisa abrir um &fBaú Duplo &cprimeiro. &9&o#SLEEP");
  207. ENDIF;
  208. ENDIF;
  209. ENDIF;
  210. DEC(#tempo_ms,1);
  211. LOOP;
  212. IF(!sleep_error);
  213. IF((%&itens_armazenar%!="DESABILITADO")||(sleep_desarmado));
  214. WAIT(20T);
  215. LOG("");
  216. LOG("&b&l[&f&oM&facro&b&l] &aQuanto tempo para verificar o inventário?");
  217. LOG("&b&l[&f&oM&facro&b&l] &2[&f1&2] &f15s &c&o(obrigátorio para ARQUEIRO)");
  218. LOG("&b&l[&f&oM&facro&b&l] &2[&f2&2] &f30s");
  219. LOG("&b&l[&f&oM&facro&b&l] &2[&f3&2] &f1min");
  220. LOG("&b&l[&f&oM&facro&b&l] &2[&f4&2] &f2min");
  221. LOG("&b&l[&f&oM&facro&b&l] &2[&f5&2] &f3min");
  222. LOG("");
  223. PROMPT(#sleep_quest_3,$$?,"Digite: 1, 2, 3, 4 ou 5.");
  224. IF(%#sleep_quest_3%=1);
  225. LOG("&b&l[&f&oM&facro&b&l] &2[&f1&2] &f15s");
  226. SET(#tempo_verificar_ms,"300");
  227. ELSEIF(%#sleep_quest_3%=2);
  228. LOG("&b&l[&f&oM&facro&b&l] &2[&f2&2] &f30s");
  229. SET(#tempo_verificar_ms,"600");
  230. ELSEIF(%#sleep_quest_3%=3);
  231. LOG("&b&l[&f&oM&facro&b&l] &2[&f3&2] &f1min");
  232. SET(#tempo_verificar_ms,"1200");
  233. ELSEIF(%#sleep_quest_3%=4);
  234. LOG("&b&l[&f&oM&facro&b&l] &2[&f4&2] &f2min");
  235. SET(#tempo_verificar_ms,"2400");
  236. ELSEIF(%#sleep_quest_3%=5);
  237. LOG("&b&l[&f&oM&facro&b&l] &2[&f5&2] &f3min");
  238. SET(#tempo_verificar_ms,"3600");
  239. ELSE;
  240. LOG("&b&l[&f&oM&facro&b&l] &cResposta inválida. &9&o#SLEEP");
  241. SET(sleep_error);
  242. ENDIF;
  243. ELSE;
  244. SET(#tempo_verificar_ms,"600");
  245. ENDIF;
  246. IF(!sleep_error);
  247. WAIT(20T);
  248. LOG("");
  249. LOG("&b&l[&f&oM&facro&b&l] &aDeseja dar pequenas pausas antes de atacar os mobs?");
  250. LOG("&b&l[&f&oM&facro&b&l] &2[&f1&2] &fSim: 3s");
  251. LOG("&b&l[&f&oM&facro&b&l] &2[&f2&2] &fSim: 6s");
  252. LOG("&b&l[&f&oM&facro&b&l] &2[&f3&2] &fSim: 12s");
  253. LOG("&b&l[&f&oM&facro&b&l] &2[&f4&2] &fSim: 24s");
  254. LOG("&b&l[&f&oM&facro&b&l] &2[&f5&2] &cNão &c&o(obrigátorio para ARQUEIRO)");
  255. LOG("");
  256. PROMPT(#sleep_quest_3,$$?,"Digite: 1, 2, 3, 4 ou 5.");
  257. IF(%#sleep_quest_3%=1);
  258. LOG("&b&l[&f&oM&facro&b&l] &2[&f1&2] &fSim: 3s");
  259. SET(#tempo_pausar,"60");
  260. ELSEIF(%#sleep_quest_3%=2);
  261. LOG("&b&l[&f&oM&facro&b&l] &2[&f2&2] &fSim: 6s");
  262. SET(#tempo_pausar,"120");
  263. ELSEIF(%#sleep_quest_3%=3);
  264. LOG("&b&l[&f&oM&facro&b&l] &2[&f3&2] &fSim: 12s");
  265. SET(#tempo_pausar,"240");
  266. ELSEIF(%#sleep_quest_3%=4);
  267. LOG("&b&l[&f&oM&facro&b&l] &2[&f4&2] &fSim: 24s");
  268. SET(#tempo_pausar,"480");
  269. ELSEIF(%#sleep_quest_3%=5);
  270. LOG("&b&l[&f&oM&facro&b&l] &2[&f5&2] &cNão");
  271. SET(#tempo_pausar,"");
  272. ELSE;
  273. LOG("&b&l[&f&oM&facro&b&l] &cResposta inválida. &9&o#SLEEP");
  274. SET(sleep_error);
  275. ENDIF;
  276. IF(!sleep_error);
  277. WAIT(20T);
  278. LOG("");
  279. LOG("&b&l[&f&oM&facro&b&l] &aEm qual posição você deseja fixar a sua mira?");
  280. LOG("&b&l[&f&oM&facro&b&l] &aOlhe na melhor posição para atacar os mobs.");
  281. LOG("&b&l[&f&oM&facro&b&l] &aPressione a &atecla &f&lENTER &adurante &f3 &asegundos para salvar a posição.");
  282. LOG("");
  283. SET(#tempo_real,"30");
  284. SET(#tempo_ms,"600");
  285. UNSET(achievementget);
  286. DO;
  287. IFMATCHES("%#tempo_ms%","^(.*)0$");
  288. IF(achievementget);
  289. IF(%#tempo_real%>1);
  290. ACHIEVEMENTGET("Você tem: %#tempo_real% segundos","skull");
  291. ELSEIF(%#tempo_real%=1);
  292. ACHIEVEMENTGET("Você tem: 1 segundo","skull");
  293. ELSE;
  294. ACHIEVEMENTGET("Tempo esgotado.","skull");
  295. ENDIF;
  296. DEC(#tempo_real,1);
  297. IF(%#tempo_real%=-1);
  298. LOG("&b&l[&f&oM&facro&b&l] &cVocê demorou demais. &9&o#SLEEP");
  299. SET(sleep_error);
  300. BREAK;
  301. ENDIF;
  302. ENDIF;
  303. TOGGLE(achievementget);
  304. ENDIF;
  305. IF((KEY_RETURN)||(KEY_NUMPADENTER));
  306. DO(45);
  307. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  308. IF((KEY_RETURN)||(KEY_NUMPADENTER));
  309. LOOK(%YAW%,%PITCH%);
  310. WAIT(1T);
  311. SET(#sleep_yaw,"%YAW%");
  312. SET(#sleep_pitch,"%PITCH%");
  313. LOOK(%#sleep_yaw%,%#sleep_pitch%);
  314. SET(#mob_xpos,"%XPOS%");
  315. SET(#mob_ypos,"%YPOS%");
  316. SET(#mob_zpos,"%ZPOS%");
  317. LOG("&b&l[&f&oM&facro&b&l] &aPosição &f(%#sleep_yaw%,%#sleep_pitch%) &asalva. &9&o#SLEEP");
  318. BREAK;
  319. ENDIF;
  320. ENDIF;
  321. DEC(#tempo_ms,1);
  322. LOOP;
  323. IF(!sleep_error);
  324. LOG("");
  325. LOG("&b&l[&f&oM&facro&b&l] &aAguarde, verificando SleepOnChat... &9&o#SLEEP");
  326. LOG("");
  327. UNSET(sleeponchat);
  328. DO(2);
  329. SET(#sleep_inc,"");
  330. UNSET(@sleepsethome);
  331. DO(2);
  332. ECHO("/sethome sleepmob");
  333. WAIT(30T);
  334. LOOP;
  335. GUI(INVENTORY);
  336. DO;
  337. LOOK(%#sleep_yaw%,%#sleep_pitch%);
  338. IF(%GUI%!="GUIINVENTORY");
  339. GUI(INVENTORY);
  340. LOG("");
  341. LOG("&b&l[&f&oM&facro&b&l] &aAguarde, verificando SleepOnChat... &9&o#SLEEP");
  342. LOG("");
  343. ENDIF;
  344. INC(#sleep_inc,1);
  345. UNTIL((@sleepsethome)||(%#sleep_inc%>=250));
  346. IF(@sleepsethome);
  347. LOG("&b&l[&f&oM&facro&b&l] &aSleepOnChat verificada. &9&o#SLEEP");
  348. SET(sleeponchat);
  349. BREAK;
  350. ENDIF;
  351. LOOP;
  352. GUI();
  353. IF(!sleeponchat);
  354. LOG("");
  355. LOG("&b&l[&f&oM&facro&b&l] &cNão foi possível marcar a home &fsleepmob &cno local correto, deseja continuar mesmo assim?");
  356. LOG("&b&l[&f&oM&facro&b&l] &2[&f1&2] &fSim");
  357. LOG("&b&l[&f&oM&facro&b&l] &4[&f2&4] &cNão");
  358. LOG("");
  359. PROMPT(#home_desativada,$$?,"Digite: 1 ou 2.");
  360. IF(%#home_desativada%=1);
  361. LOG("&b&l[&f&oM&facro&b&l] &2[&f1&2] &fSim");
  362. SET(sleeponchat);
  363. WAIT(20T);
  364. ELSEIF(%#home_desativada%=2);
  365. LOG("&b&l[&f&oM&facro&b&l] &4[&f2&4] &cNão");
  366. WAIT(20T);
  367. ELSE;
  368. LOG("&b&l[&f&oM&facro&b&l] &cResposta inválida. &9&o#SLEEP");
  369. ENDIF;
  370. IF(!sleeponchat);
  371. LOG("");
  372. LOG("&b&l[&f&oM&facro&b&l] &cVocê não instalou ou instalou errado a macro SleepOnChat.");
  373. LOG("&b&l[&f&oM&facro&b&l] &cPara instalar acesse este link:");
  374. LOG("&b&l[&f&oM&facro&b&l] &ahttps://enrt.eu/macros");
  375. LOG("");
  376. SET(sleep_error);
  377. ENDIF;
  378. ENDIF;
  379. IF(sleeponchat);
  380. LOOK(%#sleep_yaw%,%#sleep_pitch%);
  381. SET(configkm_save);
  382. IF(%DIRECTION%="N");
  383. SET(&sleep_look_real,"NORTH");
  384. SET(&sleep_look_oposto,"SOUTH");
  385. ELSEIF(%DIRECTION%="S");
  386. SET(&sleep_look_real,"SOUTH");
  387. SET(&sleep_look_oposto,"NORTH");
  388. ELSEIF(%DIRECTION%="E");
  389. SET(&sleep_look_real,"EAST");
  390. SET(&sleep_look_oposto,"WEST");
  391. ELSEIF(%DIRECTION%="W");
  392. SET(&sleep_look_real,"WEST");
  393. SET(&sleep_look_oposto,"EAST");
  394. ENDIF;
  395. GETIDREL(0,-1,0,&iron1);
  396. IF(%&iron1%="anvil");
  397. SET(#yaw_iron,"0");
  398. SET(#pitch_iron,"90");
  399. ENDIF;
  400. GETIDREL(-1,0,0,&iron2);
  401. IF(%&iron2%="anvil");
  402. SET(#yaw_iron,"270");
  403. SET(#pitch_iron,"64");
  404. ENDIF;
  405. GETIDREL(1,0,0,&iron3);
  406. IF(%&iron3%="anvil");
  407. SET(#yaw_iron,"90");
  408. SET(#pitch_iron,"64");
  409. ENDIF;
  410. GETIDREL(0,0,-1,&iron4);
  411. IF(%&iron4%="anvil");
  412. SET(#yaw_iron,"0");
  413. SET(#pitch_iron,"64");
  414. ENDIF;
  415. GETIDREL(0,0,1,&iron5);
  416. IF(%&iron5%="anvil");
  417. SET(#yaw_iron,"180");
  418. SET(#pitch_iron,"64");
  419. ENDIF;
  420. WAIT(20T);
  421. ENDIF;
  422. ENDIF;
  423. ENDIF;
  424. ENDIF;
  425. ENDIF;
  426. ENDIF;
  427. ENDIF;
  428. ENDIF;
  429. IF((!sleep_error)&&(!@mobkill_power)&&((sleep_reparar)||(sleep_trocar)));
  430. LOG("&b&l[&f&oM&facro&b&l] &aVerificando &f&oArco&a/&f&oMachado&a/&f&oEspada&a... &9&o#SLEEP");
  431. SET(&arma,"");
  432. SET(#armas,"");
  433. UNSET(modo_arco);
  434. UNSAFE;
  435. FOR(#sleep_slot,9,44);
  436. IF(%GUI%!="GUIINVENTORY");
  437. GUI(INVENTORY);
  438. ENDIF;
  439. GETSLOT(golden_sword,#slot_golden_sword);
  440. GETSLOT(golden_axe,#slot_golden_axe);
  441. GETSLOTITEM(%#sleep_slot%,&sleep_id);
  442. IFMATCHES("%&sleep_id%","^diamond_sword$|^diamond_axe$|^iron_sword$|^iron_axe$|^wooden_sword$|^wooden_axe$|^stone_sword$|^stone_axe$");
  443. INC(#armas,1);
  444. SET(&arma,"%&sleep_id%");
  445. IF((%&sleep_id%="diamond_sword")||(%&sleep_id%="diamond_axe"));
  446. SET(&sleep_material,"diamond");
  447. SET(#sleep_material_dur,"1561");
  448. SET(#sleep_material_pegar,"2");
  449. ELSEIF((%&sleep_id%="iron_sword")||(%&sleep_id%="iron_axe"));
  450. SET(&sleep_material,"iron_block");
  451. SET(#sleep_material_dur,"250");
  452. SET(#sleep_material_pegar,"5");
  453. ELSEIF((%&sleep_id%="wooden_sword")||(%&sleep_id%="wooden_axe"));
  454. SET(&sleep_material,"log");
  455. SET(#sleep_material_dur,"59");
  456. SET(#sleep_material_pegar,"8");
  457. ELSEIF((%&sleep_id%="stone_sword")||(%&sleep_id%="stone_axe"));
  458. SET(&sleep_material,"cobblestone");
  459. SET(#sleep_material_dur,"131");
  460. SET(#sleep_material_pegar,"8");
  461. ELSEIF(%&sleep_id%="bow");
  462. SET(modo_arco);
  463. SET(&sleep_material,"string");
  464. SET(#sleep_material_dur,"384");
  465. SET(#sleep_material_pegar,"12");
  466. ENDIF;
  467. GETITEMINFO(%&sleep_material%,&material_name);
  468. GETITEMINFO(%&arma%,&arma_name);
  469. ENDIF;
  470. NEXT;
  471. IF(%#armas%>1);
  472. LOG("&b&l[&f&oM&facro&b&l] &cDeixe apenas um &f&oArco&c/&f&oMachado&c/&f&oEspada &cno inventário. &9&o#SLEEP");
  473. SET(sleep_error);
  474. ELSEIF(%#armas%=1);
  475. SET(#armas,"");
  476. FOR(#sleep_slot,36,44);
  477. GETSLOTITEM(%#sleep_slot%,&sleep_id);
  478. IFMATCHES("%&sleep_id%","%&arma%");
  479. INC(#armas,1);
  480. BREAK;
  481. ENDIF;
  482. NEXT;
  483. IF(%#armas%=0);
  484. LOG("&b&l[&f&oM&facro&b&l] &cNão foi encontrado um &f&oArco&c/&f&oMachado&c/&f&oEspada &cno inventário. &9&o#SLEEP");
  485. SET(sleep_error);
  486. ELSEIF(!modo_arco);
  487. LOG("&b&l[&f&oM&facro&b&l] &aTudo certo para iniciar. &9&o#SLEEP");
  488. ENDIF;
  489. ELSE;
  490. LOG("&b&l[&f&oM&facro&b&l] &cNão foi encontrado um &f&oArco&c/&f&oMachado&c/&f&oEspada &cno inventário. &9&o#SLEEP");
  491. IF((%#slot_golden_sword%!=-1)||(%#slot_golden_axe%!=-1));
  492. LOG("");
  493. LOG("&b&l[&f&oM&facro&b&l] &cNão é possível utilizar &f&oMachado&c/&f&oEspada &cde &f&lOURO&c. &9&o#SLEEP");
  494. LOG("");
  495. ENDIF;
  496. SET(sleep_error);
  497. ENDIF;
  498. IF((modo_arco)&&(!sleep_error));
  499. SET(#inc_arma_contagem,"5");
  500. SET(#dec_verificar_ms,"10");
  501. SET(#verificar_ms_janela,"11");
  502. SET(&item_especial,"arrow");
  503. SET(#tempo_pausar_oficial,"0");
  504. UNSET(infinidade);
  505. GETSLOT(arrow,#slot_flecha);
  506. PICK(%&arma%);
  507. FOREACH(enchantments);
  508. IFMATCHES("%ENCHANTMENT%","^(Infinidade|Infinity) I$");
  509. SET(infinidade);
  510. BREAK;
  511. ENDIF;
  512. NEXT;
  513. IF(!infinidade);
  514. LOG("&b&l[&f&oM&facro&b&l] &cSeu arco precisa ter &fInfinidade I&c. &9&o#SLEEP");
  515. SET(sleep_error);
  516. ELSE;
  517. IF(%#slot_flecha%=-1);
  518. LOG("&b&l[&f&oM&facro&b&l] &cVocê precisa deixar uma &fFlecha &cno inventário. &9&o#SLEEP");
  519. SET(sleep_error);
  520. ELSE;
  521. GUI();
  522. LOG("&b&l[&f&oM&facro&b&l] &aTudo certo para iniciar. &9&o#SLEEP");
  523. WAIT(20T);
  524. IF(!@first_arco);
  525. SET(@first_arco);
  526. GUI();
  527. LOG("");
  528. LOG("&b&l[&f&oM&facro&b&l] &aParece que é a sua primeira vez upando &f&lARQUEIRO&a... &9&o#SLEEP");
  529. LOG("");
  530. WAIT(5);
  531. LOG("");
  532. LOG("&b&l[&f&oM&facro&b&l] &aA macro precisa se movimentar periodicamente. &9&o#SLEEP");
  533. LOG("");
  534. WAIT(5);
  535. LOG("");
  536. LOG("&b&l[&f&oM&facro&b&l] &aEsse movimento impede que a skill pare de upar. &9&o#SLEEP");
  537. LOG("");
  538. WAIT(5);
  539. LOG("");
  540. LOG("&b&l[&f&oM&facro&b&l] &aA macro vai andar &f1 &abloco &apara a &fesquerda &aa cada &f15 &asegundos. &9&o#SLEEP");
  541. LOG("");
  542. WAIT(5);
  543. LOG("");
  544. LOG("&b&l[&f&oM&facro&b&l] &aAdapte seu MobSpawn! &9&o#SLEEP");
  545. LOG("");
  546. WAIT(5);
  547. ENDIF;
  548. ENDIF;
  549. ENDIF;
  550. #verificar_reparacao1 = %#sleep_quest_2% + 10;
  551. #verificar_reparacao2 = %#sleep_quest_2% + 15;
  552. #verificar_reparacao3 = %#sleep_quest_2% + 20;
  553. ELSE;
  554. SET(#inc_arma_contagem,"1");
  555. SET(#dec_verificar_ms,"2");
  556. SET(#verificar_ms_janela,"3");
  557. SET(&item_especial,"666");
  558. SET(#tempo_pausar_oficial,"%#tempo_pausar%");
  559. #verificar_reparacao1 = %#sleep_quest_2% + 30;
  560. #verificar_reparacao2 = %#sleep_quest_2% + 40;
  561. #verificar_reparacao3 = %#sleep_quest_2% + 50;
  562. ENDIF;
  563. GUI();
  564. ENDUNSAFE;
  565. ELSE;
  566. IF(!@mobkill_power);
  567. SET(&arma,"666");
  568. SET(&sleep_material,"999");
  569. ENDIF;
  570. ENDIF;
  571. IF(sleep_error);
  572. LOG("&b&l[&f&oM&facro&b&l] &cSleep_&lM&cob&c&lK&cill &b&l[&4OFF&b&l]");
  573. ACHIEVEMENTGET("[OFF] MobKill Upgrade 0.4","skull");
  574. UNSET(@mobkill_ativada);
  575. UNSET(@mobkill_power);
  576. UNSET(@afk_onchat);
  577. TOGGLE(sleep_macro);
  578. STOP;
  579. ENDIF;
  580. IF(%HEALTH%<=6);
  581. DO;
  582. LOG("&b&l[&f&oM&facro&b&l] &cVocê está com pouca vida, aguardando regenerar... &9&o#SLEEP");
  583. DO(50);
  584. UNTIL(%HEALTH%>6);
  585. WHILE(%HEALTH%<=6);
  586. ENDIF;
  587. IF(!@sleep_m4);
  588. LOG("%@&sleep_m4%"); DO;LOOP;
  589. ENDIF;
  590. SET(home_mob);
  591. SET(verificacao_completa);
  592. UNSET(sleep_limpar);
  593. UNSET(sleep_armazenar);
  594. UNSET(sleep_reabastecer_arma);
  595. UNSET(sleep_reabastecer_material);
  596. DO;
  597. IF(home_mob);
  598. UNSET(home_mob);
  599. DO;
  600. GUI();
  601. SET(#sleep_inc,"");
  602. UNSET(home_protection);
  603. ECHO("/home sleepmob");
  604. IF(verificacao_completa);
  605. WAIT(60T);
  606. KEYDOWN(JUMP);
  607. WAIT(20T);
  608. KEYUP(JUMP);
  609. DO(2);
  610. DO;
  611. GETIDREL(0,-1,0,&iron1);GETIDREL(-1,0,0,&iron2);GETIDREL(1,0,0,&iron3);GETIDREL(0,0,-1,&iron4);GETIDREL(0,0,1,&iron5);
  612. IF((%XPOS%=%#mob_xpos%)&&(%YPOS%=%#mob_ypos%)&&(%ZPOS%=%#mob_zpos%));
  613. SET(ok1);
  614. ELSE;
  615. UNSET(ok1);
  616. ENDIF;
  617. IF(sleep_reparar);
  618. IF((%&iron1%="anvil")||(%&iron2%="anvil")||(%&iron3%="anvil")||(%&iron4%="anvil")||(%&iron5%="anvil"));
  619. SET(ok2);
  620. ELSE;
  621. UNSET(ok2);
  622. ENDIF;
  623. ELSE;
  624. SET(ok2);
  625. ENDIF;
  626. GETIDREL(0,-1,0,&bloco);
  627. INC(#sleep_inc,1);
  628. IF(%#sleep_inc%=300);
  629. IF((%&iron1%="anvil")||(%&iron2%="anvil")||(%&iron3%="anvil")||(%&iron4%="anvil")||(%&iron5%="anvil"));
  630. LOG("&b&l[&f&oM&facro&b&l] &cAlgum problema aconteceu. Se esse erro persistir, reconfigure a macro.");
  631. LOG("&b&l[&f&oM&facro&b&l] &cTentando novamente...");
  632. ELSE;
  633. LOG("&b&l[&f&oM&facro&b&l] &cNão foi encontrado um &fBloco de Ferro&c, verifique.");
  634. ENDIF;
  635. SET(home_protection);
  636. BREAK;
  637. ENDIF;
  638. IF(%HEALTH%<=6);
  639. ECHO("(macro) alarme de invasao acionado. #SLEEP");
  640. SET(mob_invadido);
  641. UNSET(@mobkill_power);
  642. UNSET(@mobkill_ativada);
  643. UNSET(@afk_onchat);
  644. GUI();
  645. PRESS(F2);
  646. WAIT(3T);
  647. LOOK(%&sleep_look_oposto%);
  648. DO(3);
  649. KEY(ATTACK);
  650. WAIT(1MS);
  651. LOOP;
  652. PRESS(F2);
  653. WAIT(3T);
  654. DISCONNECT;
  655. ENDIF;
  656. UNTIL((ok1)&&(ok2)&&(%&bloco%!="air"));
  657. WHILE(!home_protection);
  658. ENDIF;
  659. UNTIL(!home_protection);
  660. UNSET(verificacao_completa);
  661. ENDIF;
  662. IF(modo_arco);
  663. #verificar_ms = 300;
  664. ELSE;
  665. #verificar_ms = %#tempo_verificar_ms%;
  666. ENDIF;
  667. SET(#arma_contagem,"");
  668. SET(atacar_agora);
  669. SET(#atacar_agora,"");
  670. DO;
  671. LOOK(%#sleep_yaw%,%#sleep_pitch%);
  672. IF(sleep_desarmado);
  673. SLOT(9);
  674. IF(%ITEM%!="air");
  675. GUI(INVENTORY);
  676. SLOTCLICK(44,L,TRUE);
  677. WAIT(3T);
  678. GETSLOTITEM(44,&sleep_id);
  679. IF(%&sleep_id%!="air");
  680. SET(#verificar_ms,"2");
  681. ELSE;
  682. GUI();
  683. LOG("&b&l[&f&oM&facro&b&l] &aItem do slot &f9 &aretirado. &9&o#SLEEP");
  684. ENDIF;
  685. ENDIF;
  686. ELSE;
  687. IF((%XPOS%!=%#mob_xpos%)||(%YPOS%!=%#mob_ypos%)||(%ZPOS%!=%#mob_zpos%));
  688. LOG("&b&l[&f&oM&facro&b&l] &cPosição inválida! Tentando resolver... &9&o#SLEEP");
  689. SET(home_mob);
  690. SET(verificacao_completa);
  691. BREAK;
  692. ELSEIF(%HEALTH%<=6);
  693. ECHO("(macro) alarme de invasao acionado. #SLEEP");
  694. SET(mob_invadido);
  695. UNSET(@mobkill_power);
  696. UNSET(@mobkill_ativada);
  697. UNSET(@afk_onchat);
  698. GUI();
  699. PRESS(F2);
  700. WAIT(2T);
  701. LOOK(%&sleep_look_oposto%);
  702. DO(3);
  703. KEY(ATTACK);
  704. WAIT(1MS);
  705. LOOP;
  706. PRESS(F2);
  707. WAIT(2T);
  708. DISCONNECT;
  709. ENDIF;
  710. PICK(%&arma%);
  711. IFMATCHES("%ITEM%","%&arma%");
  712. IF(%DURABILITY%<=%#sleep_quest_2%);
  713. ECHO("/kit");
  714. DO(100);
  715. UNTIL(%GUI%="GUICHEST");
  716. PRESS(E);
  717. WAIT(1T);
  718. GUI();
  719. IF(%DURABILITY%<=%#verificar_reparacao1%);
  720. IF(sleep_reparar);
  721. SET(#sleep_inc,"299");
  722. SET(#sleep_inc_two,"");
  723. UNSET(@sleeplack)
  724. DO;
  725. INC(#sleep_inc,1);
  726. IF(%#sleep_inc%=300);
  727. SET(#sleep_inc,"222");
  728. INC(#sleep_inc_two,1);
  729. IF(%#sleep_inc_two%=15);
  730. BREAK;
  731. ENDIF;
  732. GUI();
  733. PICK(%&arma%);
  734. IF(%#pitch_iron%=90);
  735. LOOK(%&sleep_look_real%);
  736. LOOK(+0,+90);
  737. ELSE;
  738. LOOK(%#yaw_iron%,%#pitch_iron%);
  739. ENDIF;
  740. WAIT(1T);
  741. KEY(USE);
  742. ENDIF;
  743. UNTIL((@sleeplack)||(%DURABILITY%>=%#verificar_reparacao2%));
  744. IF(@sleeplack);
  745. SET(sleep_reabastecer_material);
  746. ENDIF;
  747. IF(sleep_reabastecer_material);
  748. LOG("&b&l[&f&oM&facro&b&l] &f%&material_name% &aacabou. &9&o#SLEEP");
  749. LOG("&b&l[&f&oM&facro&b&l] &aReabastecimento habilitado. &9&o#SLEEP");
  750. SET(sleep_limpar);
  751. SET(sleep_armazenar);
  752. BREAK;
  753. ELSEIF(%#sleep_inc_two%=15);
  754. LOG("&b&l[&f&oM&facro&b&l] &cAlgum problema aconteceu. Tentando resolver... &9&o#SLEEP");
  755. ECHO("/warp loja");
  756. WAIT(120T);
  757. SET(home_mob);
  758. SET(verificacao_completa);
  759. BREAK;
  760. ELSE;
  761. LOG("&b&l[&f&oM&facro&b&l] &aReparação concluída. &9&o#SLEEP");
  762. ENDIF;
  763. ELSE;
  764. SET(sleep_limpar);
  765. SET(sleep_armazenar);
  766. SET(sleep_reabastecer_arma);
  767. LOG("&b&l[&f&oM&facro&b&l] &f%&arma_name% &acom durabilidade baixa. &9&o#SLEEP");
  768. LOG("&b&l[&f&oM&facro&b&l] &aReabastecimento habilitado. &9&o#SLEEP");
  769. BREAK;
  770. ENDIF;
  771. ENDIF;
  772. ENDIF;
  773. ELSE;
  774. INC(#arma_contagem,%#inc_arma_contagem%);
  775. IF(%#arma_contagem%>=50);
  776. SET(sleep_limpar);
  777. SET(sleep_armazenar);
  778. SET(sleep_reabastecer_arma);
  779. LOG("&b&l[&f&oM&facro&b&l] &f%&arma_name% &aquebrou. &9&o#SLEEP");
  780. LOG("&b&l[&f&oM&facro&b&l] &aReabastecimento habilitado. &9&o#SLEEP");
  781. BREAK;
  782. ENDIF;
  783. ENDIF;
  784. ENDIF;
  785. INC(#atacar_agora,2);
  786. IF(%#atacar_agora%=%#tempo_pausar_oficial%);
  787. SET(#atacar_agora,"");
  788. TOGGLE(atacar_agora);
  789. ENDIF;
  790. IF((atacar_agora)||(%#tempo_pausar_oficial%=0));
  791. IF(!modo_arco);
  792. KEY(ATTACK);
  793. ELSE;
  794. DO(10);
  795. LOOK(%#sleep_yaw%,%#sleep_pitch%);
  796. PICK(%&arma%);
  797. KEY(USE);
  798. UNTIL(%GUI%!="NONE");
  799. ENDIF;
  800. ENDIF;
  801. IF(%GUI%!="NONE");
  802. IF(%GUI%="GUICHAT");
  803. LOG("&b&l[&f&oM&facro&b&l] &aChat detectado, feche para continuar. &9&o#SLEEP");
  804. DO;
  805. WHILE(%GUI%="GUICHAT");
  806. ELSE;
  807. IF(%#verificar_ms%>=%#verificar_ms_janela%);
  808. LOG("&b&l[&f&oM&facro&b&l] &aJanela detectada, continuando em &f3 &asegundos. &9&o#SLEEP");
  809. WAIT(3);
  810. GUI();
  811. ENDIF;
  812. ENDIF;
  813. ENDIF;
  814. DEC(#verificar_ms,%#dec_verificar_ms%);
  815. IF(%#verificar_ms%=0);
  816. IF(modo_arco);
  817. DO(100);
  818. GUI();
  819. LOOK(%&sleep_look_real%);
  820. KEYDOWN(LEFT);
  821. KEYDOWN(SNEAK);
  822. UNTIL((%XPOS%!=%#mob_xpos%)||(%YPOS%!=%#mob_ypos%)||(%ZPOS%!=%#mob_zpos%));
  823. KEYUP(LEFT);
  824. DO(100);
  825. GUI();
  826. LOOK(%&sleep_look_real%);
  827. KEYDOWN(RIGHT);
  828. KEYDOWN(SNEAK);
  829. UNTIL((%XPOS%!=%#mob_xpos%)||(%YPOS%!=%#mob_ypos%)||(%ZPOS%!=%#mob_zpos%));
  830. WAIT(425MS);
  831. KEYUP(RIGHT);
  832. KEYUP(SNEAK);
  833. ENDIF;
  834. SET(#arma_contagem,"");
  835. #verificar_ms = %#tempo_verificar_ms%;
  836. IF((baus_lotados)&&(!sleep_desarmado));
  837. LOG("&b&l[&f&oM&facro&b&l] &cOs baús estão lotados, verificação cancelada. &9&o#SLEEP");
  838. ELSE;
  839. IF((%&itens_armazenar%!="DESABILITADO")||(sleep_desarmado));
  840. LOG("&b&l[&f&oM&facro&b&l] &aAguarde, verificando o inventário... &9&o#SLEEP");
  841. SET(#slots_livres,"");
  842. UNSAFE;
  843. FOR(#sleep_slot,9,44);
  844. IF(%GUI%!="GUIINVENTORY");
  845. GUI(INVENTORY);
  846. ENDIF;
  847. GETSLOTITEM(%#sleep_slot%,&sleep_id);
  848. IF(%&sleep_id%="air");
  849. INC(#slots_livres,1);
  850. IF(%#slots_livres%=4);
  851. BREAK;
  852. ENDIF;
  853. ENDIF;
  854. NEXT;
  855. ENDUNSAFE;
  856. IF(%#slots_livres%<4);
  857. LOG("&b&l[&f&oM&facro&b&l] &aInventário lotado, limpeza habilitada. &9&o#SLEEP");
  858. SET(sleep_limpar);
  859. BREAK;
  860. ELSE;
  861. LOG("&b&l[&f&oM&facro&b&l] &aInventário ainda vazio. &9&o#SLEEP");
  862. GUI();
  863. ENDIF;
  864. ELSE;
  865. LOG("&b&l[&f&oM&facro&b&l] &cArmazenamento desabilitado, verificação cancelada. &9&o#SLEEP");
  866. ENDIF;
  867. ENDIF;
  868. ENDIF;
  869. LOOP;
  870. IF(sleep_limpar);
  871. UNSET(sleep_limpar);
  872. DO(3);
  873. SET(#itens_inv_armazenar,"");
  874. UNSAFE;
  875. FOR(#sleep_slot,44,9);
  876. UNSET(item_invalido);
  877. IF(%GUI%!="GUIINVENTORY");
  878. GUI(INVENTORY);
  879. ENDIF;
  880. GETSLOTITEM(%#sleep_slot%,&sleep_id);
  881. IFMATCHES("%&sleep_id%","^%&arma%$|^%&sleep_material%$|^%&item_especial%$|^air$");
  882. ELSE;
  883. IFMATCHES("%&sleep_id%","%&itens_armazenar%");
  884. INC(#itens_inv_armazenar,1);
  885. ELSE;
  886. SET(item_invalido);
  887. ENDIF;
  888. IF((item_invalido)||(baus_lotados));
  889. LOOK(%&sleep_look_oposto%,1);
  890. SLOTCLICK(%#sleep_slot%,L,FALSE);
  891. WAIT(60MS);
  892. SLOTCLICK(-999);
  893. WAIT(60MS);
  894. ENDIF;
  895. ENDIF;
  896. NEXT;
  897. ENDUNSAFE;
  898. LOOP;
  899. IF((%#itens_inv_armazenar%>=25)&&(!sleep_armazenar));
  900. LOG("&b&l[&f&oM&facro&b&l] &aInventário lotado, armazenamento habilitado. &9&o#SLEEP");
  901. SET(sleep_armazenar);
  902. ELSE;
  903. SET(home_mob);
  904. ENDIF;
  905. ENDIF;
  906. IF((sleep_armazenar)||(sleep_reabastecer_arma)||(sleep_reabastecer_material));
  907. UNSET(block_home_baus);
  908. UNSET(pos_baus_verificar);
  909. DO;
  910. SET(fim);
  911. IF(!block_home_baus);
  912. DO;
  913. GUI();
  914. SET(#sleep_inc,"");
  915. UNSET(home_protection);
  916. ECHO("/home mkb");
  917. DO(200);
  918. IF((%XPOS%=%#mob_xpos%)&&(%YPOS%=%#mob_ypos%)&&(%ZPOS%=%#mob_zpos%));
  919. ELSE;
  920. BREAK;
  921. ENDIF;
  922. LOOP;
  923. WAIT(60T);
  924. KEYDOWN(JUMP);
  925. WAIT(20T);
  926. KEYUP(JUMP);
  927. WAIT(6T);
  928. DO(6);
  929. DO;
  930. SET(&verificar_baus,"");
  931. GETIDREL(0,-1,-2,&bau1);GETIDREL(0,0,-2,&bau2);GETIDREL(0,1,-2,&bau3);GETIDREL(0,2,-2,&bau4);GETIDREL(0,3,-2,&bau5);
  932. GETIDREL(0,-1,-3,&bau6);GETIDREL(0,0,-3,&bau7);GETIDREL(0,1,-3,&bau8);GETIDREL(0,2,-3,&bau9);GETIDREL(0,3,-3,&bau10);
  933. SET(&verificar_baus,"%&bau1%-%&bau2%-%&bau3%-%&bau4%-%&bau5%-%&bau6%-%&bau7%-%&bau8%-%&bau9%-%&bau10%");
  934. IF((%XPOS%=%#mob_xpos%)&&(%YPOS%=%#mob_ypos%)&&(%ZPOS%=%#mob_zpos%));
  935. UNSET(ok1);
  936. ELSE;
  937. SET(ok1);
  938. ENDIF;
  939. IFMATCHES("%&verificar_baus%","^(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)$");
  940. SET(ok2);
  941. ELSE;
  942. UNSET(ok2);
  943. ENDIF;
  944. GETIDREL(0,-1,0,&bloco);
  945. INC(#sleep_inc,1);
  946. IF(%#sleep_inc%=300);
  947. LOG("");
  948. LOG("&b&l[&f&oM&facro&b&l] &cAlgum problema aconteceu. Se este erro persistir, tem algo errado com sua trap de baús.");
  949. LOG("&b&l[&f&oM&facro&b&l] &cVeja como deve ficar a trap de baús:");
  950. LOG("&b&l[&f&oM&facro&b&l] &ahttps://prnt.sc/orrghs");
  951. LOG("");
  952. LOG("&b&l[&f&oM&facro&b&l] &cTentando novamente...");
  953. LOG("");
  954. SET(home_protection);
  955. BREAK;
  956. ENDIF;
  957. IF(pos_baus_verificar);
  958. IF((%XPOS%=%#baus_xpos%)&&(%YPOS%=%#baus_ypos%)&&(%ZPOS%=%#baus_zpos%));
  959. SET(ok3);
  960. ELSE;
  961. UNSET(ok3);
  962. ENDIF;
  963. ELSE;
  964. SET(ok3);
  965. ENDIF;
  966. UNTIL((ok1)&&(ok2)&&(ok3)&&(%&bloco%!="air"));
  967. WHILE(!home_protection);
  968. UNTIL(!home_protection);
  969. IF(trap_salvar_coordenadas);
  970. SET(#baus_xpos,"%XPOS%");
  971. SET(#baus_ypos,"%YPOS%");
  972. SET(#baus_zpos,"%ZPOS%");
  973. UNSET(trap_salvar_coordenadas);
  974. ENDIF;
  975. UNSET(pos_baus_verificar);
  976. ELSE;
  977. UNSET(block_home_baus);
  978. ENDIF;
  979. IF((sleep_armazenar)&&(!baus_lotados)&&(%#itens_inv_armazenar%>=1));
  980. SET(#sleep_inc,"199");
  981. SET(#sleep_inc_two,"");
  982. IF(%#bau_atual%=1);
  983. SET(#pos_first_chest,"%#baus_xpos%");
  984. SET(#pos_last_chest,"%#baus_xpos%");
  985. ENDIF;
  986. #pos_penult_chest = %#pos_last_chest% - 1;
  987. DO;
  988. LOOK(NORTH);
  989. IF(%XPOS%=%#pos_last_chest%);
  990. WAIT(20MS);
  991. BREAK;
  992. ELSEIF((%XPOS%>%#pos_last_chest%)||(%YPOS%!=%#baus_ypos%)||(%ZPOS%!=%#baus_zpos%));
  993. LOG("&b&l[&f&oM&facro&b&l] &cAlgum problema aconteceu. &9&o#SLEEP");
  994. LOG("&b&l[&f&oM&facro&b&l] &cTentando resolver... &9&o#SLEEP");
  995. UNSET(fim);
  996. ELSE;
  997. GUI(INVENTORY);
  998. KEYDOWN(RIGHT);
  999. IF(%XPOS%<%#pos_penult_chest%);
  1000. KEYUP(SNEAK);
  1001. ELSE;
  1002. KEYDOWN(SNEAK);
  1003. ENDIF;
  1004. ENDIF;
  1005. WHILE(fim);
  1006. KEYUP(SNEAK);
  1007. KEYUP(RIGHT);
  1008. GUI();
  1009. IF(fim);
  1010. DO;
  1011. INC(#sleep_inc,1);
  1012. IF(%#sleep_inc%=200);
  1013. GUI();
  1014. SET(#sleep_inc,"");
  1015. INC(#sleep_inc_two,1);
  1016. IF(%#sleep_inc_two%=6);
  1017. LOG("&b&l[&f&oM&facro&b&l] &cO baú não está abrindo. &9&o#SLEEP");
  1018. LOG("&b&l[&f&oM&facro&b&l] &cTentando resolver... &9&o#SLEEP");
  1019. SET(pos_baus_verificar);
  1020. UNSET(fim);
  1021. BREAK;
  1022. ENDIF;
  1023. LOOK(NORTH);
  1024. IFMATCHES("%#bau_atual%","^(.*)[0-9]$");
  1025. MATCH("%#bau_atual%","^(.*)([0-9])$",{,#bau_atual_unit});
  1026. ENDIF;
  1027. IF((%#bau_atual%=1)||(%#bau_atual_unit%=1)||(%#bau_atual_unit%=6));
  1028. IF((%#bau_atual%=1)&&((sleep_reparar)||(sleep_trocar)));
  1029. LOOK(+0,+328);
  1030. ELSE;
  1031. LOOK(+0,+308);
  1032. ENDIF;
  1033. ELSEIF((%#bau_atual%=2)||(%#bau_atual_unit%=2)||(%#bau_atual_unit%=7));
  1034. IF((%#bau_atual%=2)&&((sleep_reparar)||(sleep_trocar)));
  1035. LOOK(+0,+358);
  1036. ELSE;
  1037. LOOK(+0,+328);
  1038. ENDIF;
  1039. ELSEIF((%#bau_atual%=3)||(%#bau_atual_unit%=3)||(%#bau_atual_unit%=8));
  1040. IF((%#bau_atual%=3)&&((sleep_reparar)||(sleep_trocar)));
  1041. LOOK(+0,+33);
  1042. ELSE;
  1043. LOOK(+0,+358);
  1044. ENDIF;
  1045. ELSEIF((%#bau_atual%=4)||(%#bau_atual_unit%=4)||(%#bau_atual_unit%=9));
  1046. IF((%#bau_atual%=4)&&((sleep_reparar)||(sleep_trocar)));
  1047. LOOK(+0,+50);
  1048. ELSE;
  1049. LOOK(+0,+33);
  1050. ENDIF;
  1051. ELSEIF((%#bau_atual%=5)||(%#bau_atual_unit%=5)||(%#bau_atual_unit%=0));
  1052. LOOK(+0,+50);
  1053. ENDIF;
  1054. LOOK(+0,+1,1);
  1055. KEY(USE);
  1056. ELSEIF((%XPOS%!=%#pos_last_chest%)||(%YPOS%!=%#baus_ypos%)||(%ZPOS%!=%#baus_zpos%));
  1057. LOG("&b&l[&f&oM&facro&b&l] &cVocê não esta onde deveria. &9&o#SLEEP");
  1058. LOG("&b&l[&f&oM&facro&b&l] &cTentando resolver... &9&o#SLEEP");
  1059. SET(pos_baus_verificar);
  1060. UNSET(fim);
  1061. ENDIF;
  1062. UNTIL((!fim)||(%GUI%="GUICHEST"));
  1063. IF(fim);
  1064. WAIT(6T);
  1065. &id_inv = 333;
  1066. FOR(#sleep_slot_inv,89,54);
  1067. IF(%GUI%!="GUICHEST");
  1068. LOG("&b&l[&f&oM&facro&b&l] &cO baú foi fechado. &9&o#SLEEP");
  1069. LOG("&b&l[&f&oM&facro&b&l] &cTentando reabrir... &9&o#SLEEP");
  1070. SET(pos_baus_verificar);
  1071. UNSET(fim);
  1072. BREAK;
  1073. ENDIF;
  1074. UNSET(slot_air);
  1075. UNSAFE;
  1076. IF(%&id_inv%="air");
  1077. SET(slot_air);
  1078. ELSE;
  1079. FOR(#sleep_slot_chest,53,0);
  1080. GETSLOTITEM(%#sleep_slot_chest%,&id_chest);
  1081. IF(%&id_chest%="air");
  1082. SET(slot_air);
  1083. BREAK;
  1084. ENDIF;
  1085. NEXT;
  1086. ENDIF;
  1087. ENDUNSAFE;
  1088. IF(!slot_air);
  1089. INC(#bau_atual,1);
  1090. SET(block_home_baus);
  1091. IF((%#bau_atual%=4)&&((sleep_reparar)||(sleep_trocar)));
  1092. INC(#bau_atual,1);
  1093. INC(#bau_atual_unit,1);
  1094. ENDIF;
  1095. IF((%#bau_atual_unit%=5)||((%#bau_atual_unit%=0));
  1096. GETIDREL(1,-1,-2,&bau1);GETIDREL(1,0,-2,&bau2);GETIDREL(1,1,-2,&bau3);GETIDREL(1,2,-2,&bau4);GETIDREL(1,3,-2,&bau5);
  1097. GETIDREL(1,-1,-3,&bau6);GETIDREL(1,0,-3,&bau7);GETIDREL(1,1,-3,&bau8);GETIDREL(1,2,-3,&bau9);GETIDREL(1,3,-3,&bau10);
  1098. SET(&verificar_baus,"%&bau1%-%&bau2%-%&bau3%-%&bau4%-%&bau5%-%&bau6%-%&bau7%-%&bau8%-%&bau9%-%&bau10%");
  1099. IFMATCHES("%&verificar_baus%","^(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)$");
  1100. INC(#pos_last_chest,1);
  1101. UNSET(fim);
  1102. BREAK;
  1103. ELSE;
  1104. LOG("&b&l[&f&oM&facro&b&l] &cOs baús acabaram, armazenamento desabilitado agora. &9&o#SLEEP");
  1105. SET(baus_lotados);
  1106. BREAK;
  1107. ENDIF;
  1108. ENDIF;
  1109. UNSET(fim);
  1110. BREAK;
  1111. ELSE;
  1112. GETSLOTITEM(%#sleep_slot_inv%,&id_inv);
  1113. IFMATCHES("%&id_inv%","^%&arma%$|^%&sleep_material%$|^%&item_especial%$|^air$");
  1114. ELSE;
  1115. IFMATCHES("%&id_inv%","%&itens_armazenar%");
  1116. SLOTCLICK(%#sleep_slot_inv%,L,TRUE);
  1117. WAIT(5MS);
  1118. GETITEMINFO(%&id_inv%,&inv_name);
  1119. LOG("&b&l[&f&oM&facro&b&l] &f%&inv_name% &aarmazenado. &9&o#SLEEP");
  1120. DEC(#itens_inv_armazenar,1);
  1121. ELSE;
  1122. SLOTCLICK(%#sleep_slot_inv%,L,FALSE);
  1123. WAIT(2T);
  1124. SLOTCLICK(-999);
  1125. WAIT(2T);
  1126. LOG("&b&l[&f&oM&facro&b&l] &cItem inválido descartado. &9&o#SLEEP");
  1127. ENDIF;
  1128. ENDIF;
  1129. ENDIF;
  1130.  
  1131. NEXT;
  1132. ELSE;
  1133. GUI();
  1134. ENDIF;
  1135. ENDIF;
  1136. ELSEIF((sleep_reabastecer_arma)||(sleep_reabastecer_material));
  1137. IF((%XPOS%=%#baus_xpos%)&&(%YPOS%=%#baus_ypos%)&&(%ZPOS%=%#baus_zpos%));
  1138. SET(#sleep_inc,"199");
  1139. SET(#sleep_inc_two,"");
  1140. IF(sleep_reabastecer_arma);
  1141. LOG("&b&l[&f&oM&facro&b&l] &aIniciando reabastecimento de &f%&arma_name%&a... &9&o#SLEEP");
  1142. #quant_reabastecer = 1;
  1143. SET(&sleep_id_procurar,"%&arma%");
  1144. ELSE;
  1145. LOG("&b&l[&f&oM&facro&b&l] &aIniciando reabastecimento de &f%&material_name%&a... &9&o#SLEEP");
  1146. IF((%&sleep_material%="diamond_sword")||(%&sleep_material%="diamond_axe")||(%&sleep_material%="iron_sword")||(%&sleep_material%="iron_axe"));
  1147. #quant_reabastecer = 3;
  1148. ELSE;
  1149. #quant_reabastecer = 8;
  1150. ENDIF;
  1151. SET(&sleep_id_procurar,"%&sleep_material%");
  1152. ENDIF;
  1153. GETITEMINFO(%&sleep_id_procurar%,&procurar_name);
  1154. DO;
  1155. INC(#sleep_inc,1);
  1156. IF(%#sleep_inc%=200);
  1157. GUI();
  1158. SET(#sleep_inc,"");
  1159. INC(#sleep_inc_two,1);
  1160. IF(%#sleep_inc_two%=6);
  1161. LOG("&b&l[&f&oM&facro&b&l] &cO baú não está abrindo. &9&o#SLEEP");
  1162. LOG("&b&l[&f&oM&facro&b&l] &cTentando resolver... &9&o#SLEEP");
  1163. SET(pos_baus_verificar);
  1164. UNSET(fim);
  1165. BREAK;
  1166. ENDIF;
  1167. LOOK(NORTH);
  1168. LOOK(+0,+308);
  1169. LOOK(+0,+1,1);
  1170. KEY(USE);
  1171. ELSEIF((%XPOS%!=%#baus_xpos%)||(%YPOS%!=%#baus_ypos%)||(%ZPOS%!=%#baus_zpos%));
  1172. LOG("&b&l[&f&oM&facro&b&l] &cVocê não esta onde deveria. &9&o#SLEEP");
  1173. LOG("&b&l[&f&oM&facro&b&l] &cTentando resolver... &9&o#SLEEP");
  1174. SET(pos_baus_verificar);
  1175. UNSET(fim);
  1176. ENDIF;
  1177. UNTIL((!fim)||(%GUI%="GUICHEST"));
  1178. WAIT(5T);
  1179. UNSET(item_ja_abastecido);
  1180. IF(fim);
  1181. UNSAFE;
  1182. FOR(#sleep_slot_inv,54,89);
  1183. GETSLOTITEM(%#sleep_slot_inv%,&sleep_id_inv,#sleep_stack_inv,#sleep_data_inv);
  1184. IF(sleep_reabastecer_arma);
  1185. IFMATCHES("%&sleep_id_inv%","%&arma%");
  1186. #dur_atual = %#sleep_material_dur% - %#sleep_data_inv%;
  1187. IF(%#sleep_slot_inv%>=81);
  1188. IF(%#dur_atual%<%#sleep_material_dur%);
  1189. ELSE;
  1190. SET(item_ja_abastecido);
  1191. BREAK;
  1192. ENDIF;
  1193. ENDIF;
  1194. ENDIF;
  1195. ELSEIF(sleep_reabastecer_material);
  1196. IFMATCHES("%&sleep_id_inv%","%&sleep_material%");
  1197. SET(item_ja_abastecido);
  1198. BREAK;
  1199. ENDIF;
  1200. ENDIF;
  1201. NEXT;
  1202. ENDUNSAFE;
  1203. ENDIF;
  1204. IF(!item_ja_abastecido);
  1205. IF(fim);
  1206. UNSET(item_achado);
  1207. UNSET(item_inventario);
  1208. UNSAFE;
  1209. DO(3);
  1210. GETSLOT(%&arma%,#slot_arma,54);
  1211. IF((%#slot_arma%!=-1)&&(%#slot_arma%<81));
  1212. SLOTCLICK(%#slot_arma%,L,TRUE);
  1213. WAIT(10T);
  1214. ENDIF;
  1215. LOOP;
  1216. FOR(#sleep_slot_chest,0,53);
  1217. GETSLOTITEM(%#sleep_slot_chest%,&sleep_id_chest,#sleep_stack_chest,#sleep_data_chest);
  1218. IFMATCHES("%&sleep_id_chest%","%&sleep_id_procurar%");
  1219. IF(sleep_reabastecer_arma);
  1220. #dur_atual = %#sleep_material_dur% - %#sleep_data_chest%;
  1221. IF(%#dur_atual%>=%#verificar_reparacao3%);
  1222. SET(item_achado);
  1223. SET(#slot_chest_arma,"%#sleep_slot_chest%");
  1224. BREAK;
  1225. ENDIF;
  1226. ELSE;
  1227. SET(item_achado);
  1228. BREAK;
  1229. ENDIF;
  1230. ENDIF;
  1231. NEXT;
  1232. IF(%GUI%="GUICHEST");
  1233. IF(item_achado);
  1234. IF(sleep_reabastecer_arma);
  1235. DO(3);
  1236. GETSLOT(%&arma%,#slot_arma,54);
  1237. IF(%#slot_arma%!=-1);
  1238. SLOTCLICK(%#slot_arma%,L,TRUE);
  1239. WAIT(10T);
  1240. ENDIF;
  1241. LOOP;
  1242. SET(#slot_hot_vazio,"");
  1243. FOR(#sleep_slot_vazio,81,89);
  1244. GETSLOTITEM(%#sleep_slot_vazio%,&id_slot_vazio);
  1245. IF(%&id_slot_vazio%="air");
  1246. SET(#slot_hot_vazio,"%#sleep_slot_vazio%");
  1247. BREAK;
  1248. ENDIF;
  1249. NEXT;
  1250. IF(%#slot_hot_vazio%=0);
  1251. SLOTCLICK(81,L,FALSE);
  1252. WAIT(5T);
  1253. SLOTCLICK(-999);
  1254. WAIT(5T);
  1255. SET(#slot_hot_vazio,"81");
  1256. ENDIF;
  1257. SLOTCLICK(%#slot_chest_arma%,L,FALSE);
  1258. WAIT(10T);
  1259. SLOTCLICK(%#slot_hot_vazio%,L,FALSE);
  1260. WAIT(20T);
  1261. LOG("&b&l[&f&oM&facro&b&l] &aReabastecimento de &f%&arma_name% &aconcluído. &9&o#SLEEP");
  1262. UNSET(sleep_reabastecer_arma);
  1263. ELSE;
  1264. DO(%#sleep_material_pegar%);
  1265. GETSLOT(%&sleep_id_procurar%,#sleep_slot);
  1266. IF((%#sleep_slot%!=-1)&&(%#sleep_slot%<54));
  1267. SLOTCLICK(%#sleep_slot%,L,TRUE);
  1268. WAIT(4T);
  1269. ELSE;
  1270. BREAK;
  1271. ENDIF;
  1272. LOOP;
  1273. LOG("&b&l[&f&oM&facro&b&l] &aReabastecimento de &f%&material_name% &aconcluído. &9&o#SLEEP");
  1274. UNSET(sleep_reabastecer_material);
  1275. ENDIF;
  1276. ELSE;
  1277. PICK(%&arma%);
  1278. IFMATCHES("%ITEM%","%&arma%");
  1279. IF((sleep_reparar)&&(sleep_reabastecer_arma));
  1280. UNSET(sleep_reabastecer_arma);
  1281. BREAK;
  1282. ENDIF;
  1283. ELSE;
  1284. LOG("");
  1285. LOG("&b&l[&f&oM&facro&b&l] &cNão foi encontrado &f%&procurar_name% &cno baú. &9&o#SLEEP");
  1286. LOG("&b&l[&f&oM&facro&b&l] &cReiniciando busca... &9&o#SLEEP");
  1287. LOG("");
  1288. SET(pos_baus_verificar);
  1289. UNSET(fim);
  1290. ENDIF;
  1291. ENDIF;
  1292. ELSE;
  1293. LOG("&b&l[&f&oM&facro&b&l] &cO baú foi fechado. &9&o#SLEEP");
  1294. LOG("&b&l[&f&oM&facro&b&l] &cTentando reabrir... &9&o#SLEEP");
  1295. SET(pos_baus_verificar);
  1296. UNSET(fim);
  1297. ENDIF;
  1298. ENDUNSAFE;
  1299. ENDIF;
  1300. ELSE;
  1301. LOG("&b&l[&f&oM&facro&b&l] &f%&procurar_name% &cdetectado no inventário. &9&o#SLEEP");
  1302. LOG("&b&l[&f&oM&facro&b&l] &cReabastecimento cancelado. &9&o#SLEEP");
  1303. UNSET(sleep_reabastecer_arma);
  1304. UNSET(sleep_reabastecer_material);
  1305. SET(fim);
  1306. ENDIF;
  1307. ELSE;
  1308. UNSET(fim);
  1309. UNSET(block_home_baus);
  1310. ENDIF;
  1311. ENDIF;
  1312. IF((sleep_reabastecer_arma)||(sleep_reabastecer_material));
  1313. IF((%XPOS%=%#baus_xpos%)&&(%YPOS%=%#baus_ypos%)&&(%ZPOS%=%#baus_zpos%));
  1314. SET(block_home_baus);
  1315. ENDIF;
  1316. ENDIF;
  1317. UNTIL((fim)&&(!sleep_reabastecer_arma)&&(!sleep_reabastecer_material));
  1318. SET(home_mob);
  1319. SET(verificacao_completa);
  1320. UNSET(sleep_armazenar);
  1321. GUI();
  1322. ENDIF;
  1323. LOOP;
  1324.  
  1325. }$$
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!