API tools faq
paste
Advertisement
RafaelloMC

Untitled

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