API tools faq
paste
Advertisement
Guest User

Untitled

a guest
May 22nd, 2018
90
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 82.41 KB | None | 0 0
raw download clone embed print report
  1. $${
  2.  
  3. // Versao/Upgrade: 1
  4. // Verifique a versao mais atualizada neste link: http://adflyk.com/r2hH
  5.  
  6. TOGGLE(sleep_macro);
  7. IF(sleep_macro);
  8. IF((KEY_LCONTROL)||(KEY_RCONTROL)||(!config_pb)||(baus_lotados));
  9. UNSET(configurar);
  10. UNSET(resposta_invalida);
  11. IF(config_pb);
  12. PROMPT(&sleep_first,"$$[ [Resetar,Reconfigurar]]","Resetar (zerar lucro/baús) ou reconfigurar?");
  13. IF(%&sleep_first%="Resetar");
  14. SET(#pos_first_chest,"");
  15. SET(#pos_last_chest,"");
  16. SET(#bau_atual,"1");
  17. SET(#sleep_livros,"");
  18. SET(trap_salvar_coordenadas);
  19. SET(#blaze_venarm,"");
  20. SET(#mobs_mortos,"");
  21. SET(#sleep_msg_send,"");
  22. SET(#hora_save,"5454");
  23. UNSET(baus_lotados);
  24. ELSEIF(%&sleep_first%="Reconfigurar");
  25. SET(configurar);
  26. UNSET(config_pb);
  27. ELSE;
  28. SET(resposta_invalida);
  29. ENDIF;
  30. ELSE;
  31. SET(configurar);
  32. ENDIF;
  33. IF(configurar);
  34. LOG("");
  35. LOG("&6&l[&f&oM&facro&6&l] &aAguarde, verificando SleepOnChat e a home &fsleepblaze&a... &9&o#SLEEP");
  36. SET(&ma1,"kb1x2at1iv2a1n2do1 a2 1ma2c1r2o:1 ");
  37. LOG("");
  38. WAIT(16T);
  39. SET(#sleep_shield,"");
  40. DO;
  41. UNSET(@sleepteleport);
  42. UNSET(home_ok);
  43. UNSET(delay_teleport);
  44. IF(%GUI%!="GUIINVENTORY");
  45. GUI(INVENTORY);
  46. ENDIF;
  47. WAIT(1T);
  48. ECHO("/home sleepblaze");
  49. WAIT(10T);
  50. DO(250);
  51. IF(%GUI%!="GUIINVENTORY");
  52. GUI(INVENTORY);
  53. ENDIF;
  54. IF(@sleepteleport);
  55. IF(!delay_teleport);
  56. SET(delay_teleport);
  57. WAIT(20T);
  58. ENDIF;
  59. SET(#yaw_iron,"54");
  60. SET(#pitch_iron,"54");
  61. GETIDREL(0,-1,0,#sleep_id1);
  62. IF(%#sleep_id1%=42);
  63. SET(#yaw_iron,"0");
  64. SET(#pitch_iron,"90");
  65. ENDIF;
  66. GETIDREL(0,0,-1,#sleep_id2);
  67. IF(%#sleep_id2%=42);
  68. SET(#yaw_iron,"0");
  69. SET(#pitch_iron,"67");
  70. ENDIF;
  71. GETIDREL(0,0,1,#sleep_id3);
  72. IF(%#sleep_id3%=42);
  73. SET(#yaw_iron,"180");
  74. SET(#pitch_iron,"67");
  75. ENDIF;
  76. GETIDREL(-1,0,0,#sleep_id4);
  77. IF(%#sleep_id4%=42);
  78. SET(#yaw_iron,"270");
  79. SET(#pitch_iron,"67");
  80. ENDIF;
  81. GETIDREL(1,0,0,#sleep_id5);
  82. IF(%#sleep_id5%=42);
  83. SET(#yaw_iron,"90");
  84. SET(#pitch_iron,"67");
  85. ENDIF;
  86. IF(%#yaw_iron%!=54);
  87. SET(home_ok);
  88. ENDIF;
  89. ENDIF;
  90. UNTIL((@sleepteleport)&&(home_ok));
  91. INC(#sleep_shield,1);
  92. IF(%#sleep_shield%=3);
  93. BREAK;
  94. ENDIF;
  95. UNTIL((@sleepteleport)&&(home_ok));
  96. IF((@sleepteleport)&&(home_ok));
  97. SET(#sleep_shield,"");
  98. DO(20);
  99. IF(%GUI%!="GUIINVENTORY");
  100. GUI(INVENTORY);
  101. ENDIF;
  102. LOOP;
  103. GUI();
  104. SET(&sleep_mob_coord,"X:%XPOS% Y:%YPOS% Z:%ZPOS%");
  105. SET(&ma3,"1y2sl1e2ep1_p2e1sc2a1bl2a12z12e1 x");
  106. SET(#mob_xpos,"%XPOS%");
  107. SET(#mob_ypos,"%YPOS%");
  108. SET(#mob_zpos,"%ZPOS%");
  109. ELSEIF(%#sleep_shield%=3);
  110. GUI();
  111. LOG("");
  112. IF(!@sleepteleport);
  113. LOG("&6&l[&f&oM&facro&6&l] &cVocê não instalou ou instalou errado a macro SleepOnChat.");
  114. LOG("&6&l[&f&oM&facro&6&l] &cPara instalar acesse este link:");
  115. LOG("&6&l[&f&oM&facro&6&l] &ahttp://adflyk.com/oIw1Z");
  116. ELSE;
  117. LOG("&6&l[&f&oM&facro&6&l] &cNão foi encontrado um &fBloco de Ferro&c, verifique.");
  118. ENDIF;
  119. LOG("");
  120. WAIT(16T);
  121. LOG("&6&l[&f&oM&facro&6&l] &cSleep_PescaBlaze &6&l[&4OFF&6&l]");
  122. ACHIEVEMENTGET("[OFF] PescaBlaze Upg. 1","369");
  123. TOGGLE(sleep_macro);
  124. UNSET(@afk_onchat);
  125. STOP;
  126. ENDIF;
  127. LOG("");
  128. LOG("&6&l[&f&oM&facro&6&l] &aEm qual posição você deseja fixar sua mira?");
  129. LOG("&6&l[&f&oM&facro&6&l] &aOlhe na melhor posição para atacar os mobs. ");
  130. LOG("&6&l[&f&oM&facro&6&l] &aPressione a &atecla &f&lENTER&a durante &f3 &asegundos para salvar a posição.");
  131. SET(&ma5,"1(2u2p1gr2a1d2e 1yç2x)1");
  132. LOG("");
  133. SET(#tempo_real,"30");
  134. SET(#tempo_ms,"600");
  135. UNSET(achievementget);
  136. DO;
  137. IFMATCHES("%#tempo_ms%","^(.*)0$");
  138. IF(achievementget);
  139. IF(%#tempo_real%>1);
  140. ACHIEVEMENTGET("Você tem: %#tempo_real% segundos","397");
  141. ELSEIF(%#tempo_real%=1);
  142. ACHIEVEMENTGET("Você tem: 1 segundo","397");
  143. ELSE;
  144. ACHIEVEMENTGET("Tempo esgotado.","397");
  145. ENDIF;
  146. DEC(#tempo_real,1);
  147. IF(%#tempo_real%=-1);
  148. LOG("");
  149. LOG("&6&l[&f&oM&facro&6&l] &cVocê demorou demais. &9&o#SLEEP");
  150. LOG("");
  151. LOG("&6&l[&f&oM&facro&6&l] &cSleep_PescaBlaze &6&l[&4OFF&6&l]");
  152. ACHIEVEMENTGET("[OFF] PescaBlaze Upg. 1","369");
  153. TOGGLE(sleep_macro);
  154. UNSET(@afk_onchat);
  155. STOP;
  156. ENDIF;
  157. ENDIF;
  158. TOGGLE(achievementget);
  159. ENDIF;
  160. IF((KEY_RETURN)||(KEY_NUMPADENTER));
  161. DO(45);
  162. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  163. IF((KEY_RETURN)||(KEY_NUMPADENTER));
  164. LOOK(%YAW%,%PITCH%);
  165. WAIT(1T);
  166. SET(#sleep_yaw,"%YAW%");
  167. SET(#sleep_pitch,"%PITCH%");
  168. LOOK(%#sleep_yaw%,%#sleep_pitch%,1);
  169. IF(%DIRECTION%="N");
  170. SET(&sleep_dir_mob,"NORTH");
  171. ELSEIF(%DIRECTION%="S");
  172. SET(&sleep_dir_mob,"SOUTH");
  173. ELSEIF(%DIRECTION%="W");
  174. SET(&sleep_dir_mob,"WEST");
  175. ELSEIF(%DIRECTION%="E");
  176. SET(&sleep_dir_mob,"EAST");
  177. ENDIF;
  178. LOG("&6&l[&f&oM&facro&6&l] &aPosição &f(%#sleep_yaw%,&f%#sleep_pitch%) &asalva. &9&o#SLEEP");
  179. REPLACE(&ma1,"b","g ");
  180. REPLACE(&ma1,"k","/");
  181. BREAK;
  182. ENDIF;
  183. ENDIF;
  184. DEC(#tempo_ms,1);
  185. LOOP;
  186. DO;
  187. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  188. PROMPT(#sleep_quest_1,"$$[ [7,10,15,20,25,32]]","Reparar a vara com qual durabilidade?");
  189. SET(&ma,"%&ma1%%&ma3%%&ma5%");
  190. IFMATCHES("%#sleep_quest_1%","^7$|^10$|^15$|^20$|^25$|^32$");
  191. DO;
  192. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  193. PROMPT(&sleep_quest_2,"$$[ [10 segundos,15 segundos,20 segundos,25 segundos,30 segundos,60 segundos]]","Quanto tempo para verificar o inventário?");
  194. IFMATCHES("%&sleep_quest_2%","^10 segundos$|^15 segundos$|^20 segundos$|^25 segundos$|^30 segundos$|^60 segundos$");
  195. MATCH("%&sleep_quest_2%","^(.+) segundos$",#sleep_quest_2,1,NONE);
  196. DO;
  197. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  198. PROMPT(&sleep_quest_3,"$$[ [Sim,Não]]","Atacar os mobs somente ao detecta-los?");
  199. REPLACE(&ma,"1","");
  200. REPLACE(&ma,"ç","1");
  201. IFMATCHES("%&sleep_quest_3%","^Sim$|^Não$");
  202. GUI();
  203. SET(#pos_first_chest,"");
  204. SET(#pos_last_chest,"");
  205. SET(#bau_atual,"1");
  206. SET(#sleep_livros,"");
  207. SET(trap_salvar_coordenadas);
  208. SET(#blaze_venarm,"");
  209. SET(#mobs_mortos,"");
  210. SET(#sleep_msg_send,"");
  211. SET(#hora_save,"5454");
  212. SET(config_pb);
  213. UNSET(baus_lotados);
  214. REPLACE(&ma,"2","");
  215. REPLACE(&ma,"y","&f");
  216. LOG("");
  217. LOG("&6&l[&f&oM&facro&6&l] &aPara entrar nas configurações novamente pressione as teclas &f&lCTRL &a+ &f&l%KEYNAME%&a.");
  218. LOG("");
  219. WAIT(80T);
  220. PROMPT(&sleep_quest_6,"$$[ [Não,Sim]]","Você sabe entrar nas configurações novamente?");
  221. IF(%&sleep_quest_6%="Não");
  222. LOG("");
  223. LOG("&6&l[&f&oM&facro&6&l] &aVocê só precisa apertar a tecla &f&lCTRL &ae ligar essa macro.");
  224. LOG("&8------------ &f&lCTRL &a+ &f&l%KEYNAME% &8------------");
  225. LOG("");
  226. WAIT(100T);
  227. ENDIF;
  228. ELSE;
  229. SET(resposta_invalida);
  230. ENDIF;
  231. ELSE;
  232. SET(resposta_invalida);
  233. ENDIF;
  234. ELSE;
  235. SET(resposta_invalida);
  236. ENDIF;
  237. ENDIF;
  238. IF(resposta_invalida);
  239. LOG("");
  240. LOG("&6&l[&f&oM&facro&6&l] &cResposta inválida. &9&o#SLEEP");
  241. LOG("");
  242. LOG("&6&l[&f&oM&facro&6&l] &cSleep_PescaBlaze &6&l[&4OFF&6&l]");
  243. ACHIEVEMENTGET("[OFF] PescaBlaze Upg. 1","369");
  244. TOGGLE(sleep_macro);
  245. UNSET(@afk_onchat);
  246. STOP;
  247. ENDIF;
  248. ENDIF;
  249. SET(@afk_onchat);
  250. SET(@&afk_onchat_bn,"");
  251. CLEARCHAT;
  252. LOG("&6&l[&f&oM&facro&6&l] &aSleep_PescaBlaze &6&l[&2ON&6&l]");
  253. ACHIEVEMENTGET("[ON] PescaBlaze Upg. 1","369");
  254. SET(&credit,"5sl5ee5p_5p5es5ca5bl5az5e (5up5gr5ad5e 51)5");
  255. LOG("");
  256. LOG("&6&l[&f&oM&facro&6&l] &aConfiguração:");
  257. LOG("&6&l[&f&oM&facro&6&l] &f&oDurabilidade para reparar: &a%#sleep_quest_1%");
  258. LOG("&6&l[&f&oM&facro&6&l] &f&oTempo para verificar o inventário: &a%#sleep_quest_2% &f&osegundos");
  259. SET(&buy,"5co5mp5ra5 d5e 5li5nh5a5s 5x.");
  260. IF(%&sleep_quest_3%="Sim");
  261. LOG("&6&l[&f&oM&facro&6&l] &f&oAtacar os mobs somente ao detecta-los: &aSim");
  262. ELSE;
  263. LOG("&6&l[&f&oM&facro&6&l] &f&oAtacar os mobs somente ao detecta-los: &cNão");
  264. ENDIF;
  265. LOG("");
  266. REPLACE(&credit,"5","");
  267. TIME(#hora_atual,hh);
  268. IF(%#hora_atual%!=%#hora_save%);
  269. SET(sleep_send);
  270. SET(#hora_save,"%#hora_atual%");
  271. ELSE;
  272. UNSET(sleep_send);
  273. ENDIF;
  274. IF(%#sleep_msg_send%=0);
  275. SET(sleep_send);
  276. SET(#sleep_msg_send,"1");
  277. ENDIF;
  278. IF(sleep_send);
  279. SET(&armazem,"%&ma%");
  280. REPLACE(&armazem,"x","&a");
  281. ECHO("%&armazem%");
  282. ENDIF;
  283. REPLACE(&buy,"5","");
  284. ELSE;
  285. LOG("&6&l[&f&oM&facro&6&l] &cSleep_PescaBlaze &6&l[&4OFF&6&l]");
  286. ACHIEVEMENTGET("[OFF] PescaBlaze Upg. 1","369");
  287. IF(config_pb);
  288. LOG("");
  289. #lucro_blaze = %#blaze_venarm% * 12800;
  290. LOG("&6&l[&f&oM&facro&6&l] &aTrap de baús:");
  291. IF(baus_lotados);
  292. #bau_atual_mostrar = %#bau_atual% - 1;
  293. LOG("&6&l[&f&oM&facro&6&l] &f&oBaú de armazenamento atual: &4%#bau_atual_mostrar%&cº");
  294. LOG("&c(não é mais &cpossível &carmazenar, esvazie os baús e clique em \"resetar\" ao ligar a macro)");
  295. ELSE;
  296. LOG("&6&l[&f&oM&facro&6&l] &f&oBaú de armazenamento atual: &a%#bau_atual%&fº");
  297. ENDIF;
  298. IF(%#blaze_venarm%>=1);
  299. LOG("&6&l[&f&oM&facro&6&l] &f&oArmazenados (em packs): &a%#blaze_venarm% &7- &f&oLucro estimado: &a%#lucro_blaze% &f&ocoins");
  300. ELSE;
  301. LOG("&6&l[&f&oM&facro&6&l] &f&oArmazenados: &cNenhum &7- &f&oLucro estimado: &cSem lucro");
  302. ENDIF;
  303. IF(%#sleep_livros%=1);
  304. LOG("");
  305. LOG("&6&l[&f&oM&facro&6&l] &f&oTesouro encontrado: &a%#sleep_livros%");
  306. ELSEIF(%#sleep_livros%>1);
  307. LOG("");
  308. LOG("&6&l[&f&oM&facro&6&l] &f&oTesouros encontrados: &a%#sleep_livros%");
  309. ENDIF;
  310. IF(%#mobs_mortos%>=1);
  311. LOG("");
  312. LOG("&6&l[&f&oM&facro&6&l] &f&oMobs mortos: &a%#mobs_mortos%");
  313. ELSEIF(%#mobs_mortos%=0);
  314. LOG("");
  315. LOG("&6&l[&f&oM&facro&6&l] &f&oMobs mortos: &cNenhum");
  316. ENDIF;
  317. LOG("");
  318. ENDIF;
  319. KEYUP(FORWARD);
  320. KEYUP(LEFT);
  321. KEYUP(RIGHT);
  322. KEYUP(SNEAK);
  323. KEYUP(BACK);
  324. IF(sleep_send);
  325. UNSET(sleep_send);
  326. SET(&armazem,"%&ma%");
  327. REPLACE(&armazem,"x","&c");
  328. REPLACE(&armazem,"at","desat");
  329. ECHO("%&armazem%");
  330. ENDIF;
  331. UNSET(@afk_onchat);
  332. STOP;
  333. ENDIF;
  334.  
  335. SET(sleep_ver_all);
  336. SET(sleep_ver_vara);
  337. SET(sleep_ver_linha);
  338. SET(#pack_linha_min,"8");
  339. SET(unbug_vara);
  340. UNSET(sleep_armazenar);
  341. UNSET(reabastecer_linha);
  342. UNSET(reabastecer_vara);
  343. UNSET(comprar_linha);
  344. UNSET(home_break);
  345. UNSET(@sleepmobkill);
  346.  
  347. DO;
  348. SET(&sleep_coord_atual,"X:%XPOS% Y:%YPOS% Z:%ZPOS%");
  349. SET(#sleep_homes,"1");
  350. IFMATCHES("%&sleep_coord_atual%","^%&sleep_mob_coord%$");
  351. IF(home_break);
  352. SET(#sleep_homes,"");
  353. UNSET(home_break);
  354. ENDIF;
  355. ENDIF;
  356. DO(%#sleep_homes%);
  357. DO;
  358. GUI();
  359. UNSET(@sleepteleport);
  360. UNSET(delay_teleport);
  361. WAIT(1T);
  362. ECHO("/home sleepblaze");
  363. WAIT(10T);
  364. DO(250);
  365. IF((@sleepteleport)&&(!delay_teleport));
  366. SET(delay_teleport);
  367. DO(100);
  368. GETIDREL(0,-1,0,#sleep_id);
  369. WHILE(%#sleep_id%=0);
  370. WAIT(20T);
  371. DO(100);
  372. GETIDREL(0,-1,0,#sleep_id);
  373. WHILE(%#sleep_id%=0);
  374. ENDIF;
  375. UNTIL((@sleepteleport)&&(delay_teleport)&&(%YPOS%=%#mob_ypos%)&&(%XPOS%=%#mob_xpos%)&&(%ZPOS%=%#mob_zpos%));
  376. WAIT(5T);
  377. UNTIL((@sleepteleport)&&(%YPOS%=%#mob_ypos%)&&(%XPOS%=%#mob_xpos%)&&(%ZPOS%=%#mob_zpos%));
  378. LOOP;
  379. IF(%GUI%!="GUIINVENTORY");
  380. GUI(INVENTORY);
  381. ENDIF;
  382. IF(sleep_ver_vara);
  383. DO;
  384. GETSLOT(346,#slot_vara);
  385. IF(%#slot_vara%!=-1);
  386. GETSLOTITEM(44,#id_vara);
  387. IF(%#id_vara%!=346);
  388. IF(%#id_vara%!=0);
  389. SLOTCLICK(44,L,TRUE);
  390. WAIT(3T);
  391. ENDIF;
  392. SLOTCLICK(%#slot_vara%,L,FALSE);
  393. WAIT(2T);
  394. SLOTCLICK(44,L,FALSE);
  395. WAIT(2T);
  396. SLOTCLICK(%#slot_vara%,L,FALSE);
  397. WAIT(2T);
  398. ELSE;
  399. IF(%#slot_vara%=44);
  400. BREAK;
  401. ELSE;
  402. LOG("&6&l[&f&oM&facro&6&l] &cNão é recomendado deixar mais que &f1 vara &cno inventário. Continuando mesmo assim... &9&o#SLEEP");
  403. WAIT(40T);
  404. BREAK;
  405. ENDIF;
  406. ENDIF;
  407. ELSE;
  408. BREAK;
  409. ENDIF;
  410. LOOP;
  411. UNSET(sleep_ver_vara);
  412. ENDIF;
  413. IF(sleep_ver_linha);
  414. FOR(#sleep_slot,36,44);
  415. GETSLOTITEM(%#sleep_slot%,#sleep_id,#sleep_stack);
  416. IF((%#sleep_id%!=346)&&(%#sleep_id%!=287)&&(%#sleep_id%!=0));
  417. SLOTCLICK(%#sleep_slot%,L,TRUE);
  418. WAIT(1T);
  419. ENDIF;
  420. NEXT;
  421. SET(#pack_linha,"");
  422. SET(#getslot,"9");
  423. DO;
  424. GETSLOT(287,#slot_linha,%#getslot%);
  425. IF(%#slot_linha%=-1);
  426. BREAK;
  427. ELSE;
  428. INC(#pack_linha,1);
  429. #getslot = %#slot_linha% + 1;
  430. IF(%#slot_linha%<36);
  431. SLOTCLICK(%#slot_linha%,L,TRUE);
  432. GETSLOTITEM(%#slot_linha%,#id_linha);
  433. IF(%#id_linha%=287);
  434. ELSE;
  435. WAIT(2T);
  436. DEC(#pack_linha,1);
  437. ENDIF;
  438. ENDIF;
  439. ENDIF;
  440. LOOP;
  441. IF(%#pack_linha%>%#pack_linha_min%);
  442. LOG("&6&l[&f&oM&facro&6&l] &cNão é recomendado deixar mais que &f8 &cpacks de &flinhas &cno inventário. Continuando mesmo assim... &9&o#SLEEP");
  443. WAIT(40T);
  444. ENDIF;
  445. UNSET(sleep_ver_linha);
  446. ENDIF;
  447. #sleep_loop = %#sleep_quest_2% * 23;
  448. UNSAFE;
  449. DO;
  450. PICK(346);
  451. IF((%DURABILITY%<=%#sleep_quest_1%)||(%ITEM%!=346)||(unbug_vara));
  452. UNSET(@sleeplack);
  453. SET(#sleep_inc,"299");
  454. SET(#sleep_inc_two,"");
  455. DO;
  456. INC(#sleep_inc,1);
  457. IF(%#sleep_inc%=300);
  458. SET(#sleep_inc,"200");
  459. INC(#sleep_inc_two,1);
  460. PICK(346);
  461. IF(%ITEM%!=346);
  462. LOG("&6&l[&f&oM&facro&6&l] &aReabastecimento de &fvara &ahabilitado. &9&o#SLEEP");
  463. SET(reabastecer_vara);
  464. ENDIF;
  465. LOOK(%#yaw_iron%,%#pitch_iron%);
  466. WAIT(2T);
  467. DO(2);
  468. KEY(USE);
  469. WAIT(2T);
  470. LOOP;
  471. ELSEIF(@sleeplack);
  472. LOG("&6&l[&f&oM&facro&6&l] &aReabastecimento de &flinhas &ahabilitado. &9&o#SLEEP");
  473. SET(reabastecer_linha);
  474. ENDIF;
  475. UNTIL((%DURABILITY%=64)||(%#sleep_inc_two%>=10)||(reabastecer_vara)||(reabastecer_linha));
  476. IF(%#sleep_inc_two%>=10);
  477. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema aconteceu. Tentando resolver... &9&o#SLEEP");
  478. GUI();
  479. BREAK;
  480. ELSEIF((reabastecer_vara)||(reabastecer_linha));
  481. SET(sleep_armazenar);
  482. SET(unbug_vara);
  483. BREAK;
  484. ENDIF;
  485. IF(unbug_vara);
  486. UNSET(unbug_vara);
  487. LOOK(%&sleep_dir_mob%);
  488. LOOK(%#sleep_yaw%,%#sleep_pitch%);
  489. ENDIF;
  490. ELSE;
  491. LOOK(%#sleep_yaw%,%#sleep_pitch%);
  492. IF(%&sleep_quest_3%="Sim");
  493. IF(%HIT%="ENTITY");
  494. KEY(USE);
  495. ENDIF;
  496. ELSE;
  497. KEY(USE);
  498. ENDIF;
  499. ENDIF;
  500. IF(%GUI%!="GUIINVENTORY");
  501. WAIT(3);
  502. IF(%GUI%="GUICHAT");
  503. LOG("&6&l[&f&oM&facro&6&l] &aChat detectado, feche para continuar. &9&o#SLEEP");
  504. DO;
  505. WHILE(%GUI%="GUICHAT");
  506. WAIT(3T);
  507. ENDIF;
  508. GUI(INVENTORY);
  509. PICK(346);
  510. LOOK(%#sleep_yaw%,%#sleep_pitch%);
  511. ELSEIF((%XPOS%!=%#mob_xpos%)||(%YPOS%!=%#mob_ypos%)||(%ZPOS%!=%#mob_zpos%));
  512. LOG("&6&l[&f&oM&facro&6&l] &cParece que você não esta nas coordenadas configuradas do MobSpawn. Tentando resolver... &9&o#SLEEP");
  513. GUI();
  514. BREAK;
  515. ELSEIF(@sleepmobkill);
  516. UNSET(@sleepmobkill);
  517. INC(#mobs_mortos,1);
  518. ENDIF;
  519. DEC(#sleep_loop,1);
  520. IF(%#sleep_loop%<1);
  521. SET(#slot_clean,"");
  522. SET(#getslot,"9");
  523. LOG("");
  524. LOG("&6&l[&f&oM&facro&6&l] &aAguarde, verificando o inventário. &9&o#SLEEP");
  525. DO;
  526. IF(%GUI%!="GUIINVENTORY");
  527. GUI(INVENTORY);
  528. ENDIF;
  529. GETSLOT(0,#sleep_slot,%#getslot%);
  530. IF(%#sleep_slot%!=-1);
  531. INC(#slot_clean,1);
  532. #getslot = %#sleep_slot% + 1;
  533. ENDIF;
  534. UNTIL((%#sleep_slot%=-1)||(%#slot_clean%>=4));
  535. IF(%#slot_clean%<4);
  536. LOG("&6&l[&f&oM&facro&6&l] &aPoucos slots livres, iniciando o armazenamento. &9&o#SLEEP");
  537. SET(sleep_armazenar);
  538. SET(unbug_vara);
  539. ELSE;
  540. LOG("&6&l[&f&oM&facro&6&l] &aInventário ainda vazio. &9&o#SLEEP");
  541. #sleep_loop = %#sleep_quest_2% * 23;
  542. ENDIF;
  543. LOG("");
  544. ENDIF;
  545. WHILE(%#sleep_loop%>=1);
  546. ENDUNSAFE;
  547. IF(sleep_armazenar);
  548. UNSET(sleep_armazenar);
  549. SET(#getslot,"9");
  550. SET(#itens_inv_armazenar,"");
  551. UNSAFE;
  552. DO;
  553. IF(%GUI%!="GUIINVENTORY");
  554. GUI(INVENTORY);
  555. ENDIF;
  556. GETSLOT(369,#slot_blaze,%#getslot%);
  557. IF(%#slot_blaze%!=-1);
  558. INC(#itens_inv_armazenar,1);
  559. #getslot = %#slot_blaze% + 1;
  560. ENDIF;
  561. UNTIL(%#slot_blaze%=-1);
  562. ENDUNSAFE;
  563. UNSET(block_home_baus);
  564. UNSET(pos_baus_verificar);
  565. DO;
  566. SET(fim);
  567. IF(!block_home_baus);
  568. DO;
  569. GUI();
  570. SET(#sleep_inc,"");
  571. UNSET(@sleepteleport);
  572. UNSET(delay_teleport);
  573. UNSET(home_protection);
  574. WAIT(1T);
  575. ECHO("/home sleepbb");
  576. WAIT(10T);
  577. DO(5);
  578. DO;
  579. GETIDREL(0,-1,0,#bloco);
  580. IF(@sleepteleport);
  581. IF(!delay_teleport);
  582. SET(delay_teleport);
  583. WAIT(20T);
  584. ENDIF;
  585. SET(&verificar_baus,"");
  586. 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);
  587. 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);
  588. SET(&verificar_baus,"%#bau1%-%#bau2%-%#bau3%-%#bau4%-%#bau5%-%#bau6%-%#bau7%-%#bau8%-%#bau9%-%#bau10%");
  589. IFMATCHES("%&verificar_baus%","^(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)$");
  590. GETIDREL(-2,-1,0,#bau1);
  591. GETIDREL(-3,-1,0,#bau2);
  592. GETIDREL(-2,-1,1,#bau3);
  593. GETIDREL(-3,-1,1,#bau4);
  594. GETIDREL(-2,-1,-1,#bau5);
  595. GETIDREL(-3,-1,-1,#bau6);
  596. GETIDREL(-2,3,0,#bau7);
  597. GETIDREL(-3,3,0,#bau8);
  598. GETIDREL(-2,3,1,#bau9);
  599. GETIDREL(-3,3,1,#bau10);
  600. GETIDREL(-2,3,-1,#bau11);
  601. GETIDREL(-3,3,-1,#bau12);
  602. SET(&verificar_baus,"%#bau1%-%#bau2%-%#bau3%-%#bau4%-%#bau5%-%#bau6%-%#bau7%-%#bau8%-%#bau9%-%#bau10%-%#bau11%-%#bau12%");
  603. IFMATCHES("%&verificar_baus%","^(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)$");
  604. SET(ok1);
  605. ELSE;
  606. UNSET(ok1);
  607. ENDIF;
  608. ELSE;
  609. UNSET(ok1);
  610. ENDIF;
  611. ELSE;
  612. UNSET(ok1);
  613. ENDIF;
  614. IF(pos_baus_verificar);
  615. IF((%XPOS%=%#baus_xpos%)&&(%YPOS%=%#baus_ypos%)&&(%ZPOS%=%#baus_zpos%));
  616. SET(ok2);
  617. ELSE;
  618. UNSET(ok2);
  619. ENDIF;
  620. ELSE;
  621. SET(ok2);
  622. ENDIF;
  623. INC(#sleep_inc,1);
  624. IF(%#sleep_inc%=300);
  625. LOG("");
  626. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema aconteceu. Se este erro persistir, tem algo errado com sua trap de baús.");
  627. LOG("&6&l[&f&oM&facro&6&l] &cVeja como deve ficar a trap de baús:");
  628. LOG("&6&l[&f&oM&facro&6&l] &ahttps://prnt.sc/jdtfqn");
  629. LOG("");
  630. LOG("&6&l[&f&oM&facro&6&l] &cTentando novamente...");
  631. LOG("");
  632. SET(home_protection);
  633. BREAK;
  634. ENDIF;
  635. UNTIL((ok1)&&(ok2)&&(%#bloco%!=0)&&(@sleepteleport));
  636. WHILE(!home_protection);
  637. UNTIL(!home_protection);
  638. IF(trap_salvar_coordenadas);
  639. SET(#baus_xpos,"%XPOS%");
  640. SET(#baus_ypos,"%YPOS%");
  641. SET(#baus_zpos,"%ZPOS%");
  642. UNSET(trap_salvar_coordenadas);
  643. ENDIF;
  644. UNSET(pos_baus_verificar);
  645. ELSE;
  646. UNSET(block_home_baus);
  647. ENDIF;
  648. IF((!baus_lotados)&&(%#itens_inv_armazenar%>=1));
  649. SET(#sleep_inc,"199");
  650. SET(#sleep_inc_two,"");
  651. IF(%#bau_atual%=1);
  652. SET(#pos_first_chest,"%#baus_xpos%");
  653. SET(#pos_last_chest,"%#baus_xpos%");
  654. ENDIF;
  655. #pos_penult_chest = %#pos_last_chest% - 1;
  656. DO;
  657. LOOK(NORTH);
  658. IF(%XPOS%=%#pos_last_chest%);
  659. WAIT(20MS);
  660. BREAK;
  661. ELSEIF((%XPOS%>%#pos_last_chest%)||(%YPOS%!=%#baus_ypos%)||(%ZPOS%!=%#baus_zpos%));
  662. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema aconteceu. &9&o#SLEEP");
  663. LOG("&6&l[&f&oM&facro&6&l] &cTentando resolver... &9&o#SLEEP");
  664. UNSET(fim);
  665. ELSE;
  666. GUI(INVENTORY);
  667. KEYDOWN(RIGHT);
  668. IF(%XPOS%<%#pos_penult_chest%);
  669. KEYUP(SNEAK);
  670. ELSE;
  671. KEYDOWN(SNEAK);
  672. ENDIF;
  673. ENDIF;
  674. WHILE(fim);
  675. KEYUP(SNEAK);
  676. KEYUP(RIGHT);
  677. GUI();
  678. LOG("&6&l[&f&oM&facro&6&l] &aBaú de armazenamento número &f%#bau_atual%&a. &9&o#SLEEP");
  679. IF(fim);
  680. DO;
  681. INC(#sleep_inc,1);
  682. IF(%#sleep_inc%=200);
  683. GUI();
  684. SET(#sleep_inc,"");
  685. INC(#sleep_inc_two,1);
  686. IF(%#sleep_inc_two%=6);
  687. LOG("&6&l[&f&oM&facro&6&l] &cO baú não está abrindo. &9&o#SLEEP");
  688. LOG("&6&l[&f&oM&facro&6&l] &cTentando resolver... &9&o#SLEEP");
  689. SET(pos_baus_verificar);
  690. UNSET(fim);
  691. BREAK;
  692. ENDIF;
  693. LOOK(NORTH);
  694. IFMATCHES("%#bau_atual%","^(.*)[0-9]$");
  695. MATCH("%#bau_atual%","^(.*)([0-9])$",{,#bau_atual_unit});
  696. ENDIF;
  697. IF((%#bau_atual%=1)||(%#bau_atual_unit%=1)||(%#bau_atual_unit%=6));
  698. LOOK(+0,+308);
  699. ELSEIF((%#bau_atual%=2)||(%#bau_atual_unit%=2)||(%#bau_atual_unit%=7));
  700. LOOK(+0,+328);
  701. ELSEIF((%#bau_atual%=3)||(%#bau_atual_unit%=3)||(%#bau_atual_unit%=8));
  702. LOOK(+0,+358);
  703. ELSEIF((%#bau_atual%=4)||(%#bau_atual_unit%=4)||(%#bau_atual_unit%=9));
  704. LOOK(+0,+33);
  705. ELSEIF((%#bau_atual%=5)||(%#bau_atual_unit%=5)||(%#bau_atual_unit%=0));
  706. LOOK(+0,+50);
  707. ENDIF;
  708. LOOK(+0,+2,1);
  709. KEY(USE);
  710. ELSEIF((%XPOS%!=%#pos_last_chest%)||(%YPOS%!=%#baus_ypos%)||(%ZPOS%!=%#baus_zpos%));
  711. LOG("&6&l[&f&oM&facro&6&l] &cVocê não esta onde deveria. &9&o#SLEEP");
  712. LOG("&6&l[&f&oM&facro&6&l] &cTentando resolver... &9&o#SLEEP");
  713. SET(pos_baus_verificar);
  714. UNSET(fim);
  715. ENDIF;
  716. UNTIL((!fim)||(%GUI%="GUICHEST"));
  717. SET(#sleep_slot_max,"89");
  718. IF(fim);
  719. WAIT(6T);
  720. #id_inv = 333;
  721. FOR(#sleep_slot_inv,54,%#sleep_slot_max%);
  722. IF(%GUI%!="GUICHEST");
  723. LOG("&6&l[&f&oM&facro&6&l] &cO baú foi fechado. &9&o#SLEEP");
  724. LOG("&6&l[&f&oM&facro&6&l] &cTentando reabrir... &9&o#SLEEP");
  725. SET(pos_baus_verificar);
  726. UNSET(fim);
  727. BREAK;
  728. ENDIF;
  729. UNSET(slot_air);
  730. IF(%#id_inv%=0);
  731. SET(slot_air);
  732. ELSE;
  733. GETSLOT(0,#slot_vazio_chest);
  734. IF((%#slot_vazio_chest%!=-1)&&(%#slot_vazio_chest%<54));
  735. SET(slot_air);
  736. ENDIF;
  737. ENDIF;
  738. IF(!slot_air);
  739. GETSLOT(369,#slot_blaze,54);
  740. IF(%#slot_blaze%!=-1);
  741. SLOTCLICK(%#slot_blaze%,L,TRUE);
  742. WAIT(1T);
  743. ENDIF;
  744. INC(#bau_atual,1);
  745. SET(block_home_baus);
  746. IF((%#bau_atual_unit%=5)||((%#bau_atual_unit%=0));
  747. 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);
  748. 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);
  749. SET(&verificar_baus,"%#bau1%-%#bau2%-%#bau3%-%#bau4%-%#bau5%-%#bau6%-%#bau7%-%#bau8%-%#bau9%-%#bau10%");
  750. IFMATCHES("%&verificar_baus%","^(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)$");
  751. INC(#pos_last_chest,1);
  752. UNSET(fim);
  753. BREAK;
  754. ELSE;
  755. SET(baus_lotados);
  756. GUI();
  757. DO;
  758. LOG("");
  759. LOG("&6&l[&f&oM&facro&6&l] &cOs baús acabaram, esvazie-os e selecione \"resetar\" ao ligar a macro. &9&o#SLEEP");
  760. LOG("");
  761. WAIT(5);
  762. LOOP;
  763. ENDIF;
  764. ENDIF;
  765. UNSET(fim);
  766. BREAK;
  767. ELSE;
  768. GETSLOTITEM(%#sleep_slot_inv%,#id_inv,#stack_inv);
  769. IF((%#id_inv%=122)||(%#id_inv%=0)||(%#id_inv%=346)||(%#id_inv%=287));
  770. ELSE;
  771. IFMATCHES("%#id_inv%","^369$|^387$");
  772. SLOTCLICK(%#sleep_slot_inv%,L,TRUE);
  773. WAIT(1T);
  774. DEC(#itens_inv_armazenar,1);
  775. IF(%#id_inv%=387);
  776. INC(#sleep_livros,1);
  777. ELSE;
  778. INC(#blaze_venarm,1);
  779. ENDIF;
  780. ENDIF;
  781. ENDIF;
  782. ENDIF;
  783.  
  784. NEXT;
  785. ELSE;
  786. GUI();
  787. ENDIF;
  788. ENDIF;
  789. ENDIF;
  790. UNTIL(fim);
  791. GUI();
  792. ENDIF;
  793. IF((reabastecer_linha)||(reabastecer_vara));
  794. SET(#chest_reab_inc,"1");
  795. IF(reabastecer_vara);
  796. UNSET(reabastecer_vara);
  797. SET(&sleep_name_reab,"vara");
  798. SET(sleep_ver_vara);
  799. SET(#sleep_id_reab,"346");
  800. SET(#sleep_quant,"1");
  801. ELSE;
  802. UNSET(reabastecer_linha);
  803. SET(sleep_ver_linha);
  804. SET(&sleep_name_reab,"linha");
  805. SET(#sleep_id_reab,"287");
  806. SET(#sleep_quant,"%#pack_linha_min%");
  807. ENDIF;
  808. SET(#itens_reab,"");
  809. UNSET(comprar_linha);
  810. DO;
  811. IF((%XPOS%=%#baus_xpos%)&&(%YPOS%=%#baus_ypos%)&&(%ZPOS%=%#baus_zpos%));
  812. ELSE;
  813. DO;
  814. GUI();
  815. UNSET(@sleepteleport);
  816. UNSET(delay_teleport);
  817. WAIT(1T);
  818. ECHO("/home sleepbb");
  819. WAIT(10T);
  820. DO(250);
  821. IF((@sleepteleport)&&(!delay_teleport));
  822. SET(delay_teleport);
  823. DO(100);
  824. GETIDREL(0,-1,0,#sleep_id);
  825. WHILE(%#sleep_id%=0);
  826. WAIT(20T);
  827. DO(100);
  828. GETIDREL(0,-1,0,#sleep_id);
  829. WHILE(%#sleep_id%=0);
  830. ENDIF;
  831. UNTIL((@sleepteleport)&&(delay_teleport)&&(%YPOS%=%#baus_ypos%)&&(%XPOS%=%#baus_xpos%)&&(%ZPOS%=%#baus_zpos%));
  832. WAIT(5T);
  833. UNTIL((@sleepteleport)&&(%YPOS%=%#baus_ypos%)&&(%XPOS%=%#baus_xpos%)&&(%ZPOS%=%#baus_zpos%));
  834. ENDIF;
  835. GUI();
  836. LOG("&6&l[&f&oM&facro&6&l] &aBaú de reabastecimento número &f%#chest_reab_inc%&a. &9&o#SLEEP");
  837. SET(stop);
  838. SET(#sleep_inc_two,"");
  839. DO;
  840. IF(%#sleep_inc_two%>=3);
  841. LOG("&6&l[&f&oM&facro&6&l] &cO baú não está abrindo. &9&o#SLEEP");
  842. LOG("&6&l[&f&oM&facro&6&l] &cTentando resolver... &9&o#SLEEP");
  843. LOOK(0,270);
  844. PICK(346);
  845. WAIT(3T);
  846. KEY(USE);
  847. WAIT(3T);
  848. UNSET(stop);
  849. BREAK;
  850. ENDIF;
  851. IF(%#chest_reab_inc%=1);
  852. LOOK(237,314);
  853. ELSEIF(%#chest_reab_inc%=2);
  854. LOOK(270,309);
  855. ELSEIF(%#chest_reab_inc%=3);
  856. LOOK(302,314);
  857. ELSEIF(%#chest_reab_inc%=4);
  858. LOOK(237,334);
  859. ELSEIF(%#chest_reab_inc%=5);
  860. LOOK(270,329);
  861. ELSEIF(%#chest_reab_inc%=6);
  862. LOOK(302,334);
  863. ELSEIF(%#chest_reab_inc%=7);
  864. LOOK(237,359);
  865. ELSEIF(%#chest_reab_inc%=8);
  866. LOOK(269,359);
  867. ELSEIF(%#chest_reab_inc%=9);
  868. LOOK(302,359);
  869. ELSEIF(%#chest_reab_inc%=10);
  870. LOOK(238,29);
  871. ELSEIF(%#chest_reab_inc%=11);
  872. LOOK(270,34);
  873. ELSEIF(%#chest_reab_inc%=12);
  874. LOOK(302,29);
  875. ELSEIF(%#chest_reab_inc%=13);
  876. LOOK(237,47);
  877. ELSEIF(%#chest_reab_inc%=14);
  878. LOOK(270,51);
  879. ELSEIF(%#chest_reab_inc%=15);
  880. LOOK(302,47);
  881. ENDIF;
  882. LOOKS(+0,+1,1);
  883. WAIT(1T);
  884. KEY(USE);
  885. SET(#sleep_inc,"");
  886. DO;
  887. INC(#sleep_inc,1);
  888. UNTIL((%GUI%="GUICHEST")||(%#sleep_inc%=250));
  889. INC(#sleep_inc_two,1);
  890. WHILE(%GUI%!="GUICHEST");
  891. IF(stop);
  892. WAIT(10T);
  893. DO;
  894. IF(%&sleep_name_reab%="vara");
  895. PICK(346);
  896. IF(%ITEM%=346);
  897. SET(stop);
  898. BREAK;
  899. ENDIF;
  900. ENDIF;
  901. IF(%GUI%!="GUICHEST");
  902. LOG("&6&l[&f&oM&facro&6&l] &cO baú foi fechado. &9&o#SLEEP");
  903. LOG("&6&l[&f&oM&facro&6&l] &cTentando reabrir... &9&o#SLEEP");
  904. UNSET(stop);
  905. BREAK;
  906. ENDIF;
  907. GETSLOT(%#sleep_id_reab%,#sleep_slot);
  908. IF((%#sleep_slot%!=-1)&&(%#sleep_slot%<54));
  909. UNSET(clicar);
  910. IF(%&sleep_name_reab%="linha");
  911. SET(#linha_fix_bug,"");
  912. SET(#sleep_getslot,"54");
  913. UNSAFE;
  914. DO;
  915. GETSLOT(%#sleep_id_reab%,#slot_fix_bug,%#sleep_getslot%);
  916. IF(%#slot_fix_bug%=-1);
  917. BREAK;
  918. ELSE;
  919. INC(#linha_fix_bug,1);
  920. #sleep_getslot = %#slot_fix_bug% + 1;
  921. ENDIF;
  922. LOOP;
  923. ENDUNSAFE;
  924. IF(%#linha_fix_bug%<%#pack_linha_min%);
  925. SET(clicar);
  926. ENDIF;
  927. ELSE;
  928. GETSLOT(%#sleep_id_reab%,#slot_fix_bug,54);
  929. IF(%#slot_fix_bug%=-1);
  930. SET(clicar);
  931. ENDIF;
  932. ENDIF;
  933. IF(clicar);
  934. DO(2);
  935. SLOTCLICK(%#sleep_slot%,L,TRUE);
  936. WAIT(5MS);
  937. LOOP;
  938. ENDIF;
  939. INC(#itens_reab,1);
  940. ELSE;
  941. IF(%#chest_reab_inc%<15);
  942. INC(#chest_reab_inc,1);
  943. UNSET(stop);
  944. BREAK;
  945. ELSEIF(%#chest_reab_inc%=15);
  946. IF(%#itens_reab%=0);
  947. LOG("");
  948. IF(%&sleep_name_reab%="linha");
  949. UNSET(sleep_reiniciar);
  950. IFMATCHES("%SERVER%","([\d\w]+).craftlandia.com.br",&server_atual,1,NONE);
  951. IFMATCHES("%&server_atual%","(fenix|Fenix|FENIX|destiny|Destiny|DESTINY|titan|Titan|TITAN|heaven|Heaven|HEAVEN)");
  952. LOG("&6&l[&f&oM&facro&6&l] &cNenhuma &f%&sleep_name_reab% &cencontrada, compra habilitada. &9&o#SLEEP");
  953. SET(comprar_linha);
  954. ELSE;
  955. LOG("");
  956. LOG("&6&l[&f&oM&facro&6&l] &cA compra automática de &flinhas &cnão está disponível no servidor &f%&server_atual%&c. &9&o#SLEEP");
  957. LOG("");
  958. WAIT(40T);
  959. SET(sleep_reiniciar);
  960. ENDIF;
  961. ELSE;
  962. SET(sleep_reiniciar);
  963. ENDIF;
  964. IF(sleep_reiniciar);
  965. LOG("&6&l[&f&oM&facro&6&l] &cNenhuma &f%&sleep_name_reab% &cencontrada, busca reiniciada. &9&o#SLEEP");
  966. SET(#chest_reab_inc,"1");
  967. UNSET(stop);
  968. ENDIF;
  969. ELSE;
  970. LOG("&6&l[&f&oM&facro&6&l] &cNenhuma &f%&sleep_name_reab% &cencontrada, busca reiniciada. &9&o#SLEEP");
  971. SET(#chest_reab_inc,"1");
  972. UNSET(stop);
  973. ENDIF;
  974. LOG("");
  975. BREAK;
  976. ELSE;
  977. SET(stop);
  978. BREAK;
  979. ENDIF;
  980. ENDIF;
  981. ENDIF;
  982. DEC(#sleep_quant,1);
  983. IF((%#sleep_quant%=0)&&(reabastecer_linha));
  984. SET(#chest_reab_inc,"1");
  985. SET(#itens_reab,"");
  986. SET(sleep_ver_linha);
  987. SET(&sleep_name_reab,"linha");
  988. SET(#sleep_id_reab,"287");
  989. SET(#sleep_quant,"%#pack_linha_min%");
  990. UNSET(reabastecer_linha);
  991. UNSET(stop);
  992. BREAK;
  993. ENDIF;
  994. UNTIL(%#sleep_quant%=0);
  995. WAIT(3T);
  996. ENDIF;
  997. UNTIL(stop);
  998. SET(unbug);
  999. GUI();
  1000. IF(!comprar_linha);
  1001. LOG("&6&l[&f&oM&facro&6&l] &aReabastecimento concluído. &9&o#SLEEP");
  1002. ENDIF;
  1003. ENDIF;
  1004. IF(comprar_linha);
  1005. UNSET(comprar_linha);
  1006. SET(#sleep_inc_three,"");
  1007. SET(#sleep_quant,"%#pack_linha_min%");
  1008. DO;
  1009. SET(fim);
  1010. DO(2);
  1011. DO;
  1012. UNSET(@sleepteleport);
  1013. ECHO("/warp loja");
  1014. GUI();
  1015. WAIT(40T);
  1016. DO(350);
  1017. GETIDREL(0,-1,0,#sleep_id);
  1018. IF((%XPOS%=%#mob_xpos%)&&(%YPOS%=%#mob_ypos%)&&(%ZPOS%=%#mob_zpos%));
  1019. UNSET(ok);
  1020. ELSE;
  1021. SET(ok);
  1022. ENDIF;
  1023. UNTIL((%#sleep_id%=4)&&(ok)&&(%YPOS%=6)&&(@sleepteleport));
  1024. WHILE(!@sleepteleport);
  1025. LOOP;
  1026. UNSET(cancelar_compra);
  1027. SET(#slots_vazios,"");
  1028. SET(#getslot,"9");
  1029. DO;
  1030. IF(%GUI%!="GUIINVENTORY");
  1031. GUI(INVENTORY);
  1032. ENDIF;
  1033. GETSLOT(0,#verificar_slot_vazio,%#getslot%);
  1034. IF(%#verificar_slot_vazio%!=-1);
  1035. INC(#slots_vazios,1);
  1036. #getslot = %#verificar_slot_vazio% + 1;
  1037. ELSE;
  1038. BREAK;
  1039. ENDIF;
  1040. UNTIL(%#slots_vazios%=%#sleep_quant%);
  1041. GUI();
  1042. IF(%#slots_vazios%=%#sleep_quant%);
  1043. SET(#sleep_time,"");
  1044. SET(#passos,"1");
  1045. DO;
  1046. UNSET(sleep_zpos);
  1047. UNSET(sleep_xpos);
  1048. IF(%#passos%=1);
  1049. SET(&sleep_look,"NORTH");
  1050. SET(sleep_zpos);
  1051. SET(#sleep_coord,"697");
  1052. SET(#sleep_coord_sneak,"699");
  1053. SET(&sleep_move,"FORWARD");
  1054. ELSEIF(%#passos%=2);
  1055. SET(&sleep_look,"NORTH");
  1056. SET(sleep_xpos);
  1057. SET(#sleep_coord,"-679");
  1058. SET(#sleep_coord_sneak,"-677");
  1059. SET(&sleep_move,"LEFT");
  1060. ELSEIF(%#passos%=3);
  1061. SET(&sleep_look,"NORTH");
  1062. SET(sleep_zpos);
  1063. SET(#sleep_coord,"673");
  1064. SET(#sleep_coord_sneak,"675");
  1065. SET(&sleep_move,"FORWARD");
  1066. ELSEIF(%#passos%=4);
  1067. SET(&sleep_look,"NORTH");
  1068. SET(sleep_xpos);
  1069. SET(#sleep_coord,"-685");
  1070. SET(#sleep_coord_sneak,"-683");
  1071. SET(&sleep_move,"LEFT");
  1072. ELSEIF(%#passos%=5);
  1073. SET(&sleep_look,"NORTH");
  1074. SET(sleep_zpos);
  1075. SET(#sleep_coord,"662");
  1076. SET(#sleep_coord_sneak,"664");
  1077. SET(&sleep_move,"FORWARD");
  1078. ELSEIF(%#passos%=6);
  1079. SET(&sleep_look,"SOUTH");
  1080. SET(sleep_xpos);
  1081. SET(#sleep_coord,"-698");
  1082. SET(#sleep_coord_sneak,"-696");
  1083. SET(&sleep_move,"RIGHT");
  1084. ELSEIF(%#passos%=7);
  1085. SET(&sleep_look,"SOUTH");
  1086. SET(sleep_zpos);
  1087. SET(#sleep_coord,"675");
  1088. SET(&sleep_move,"FORWARD");
  1089. ENDIF;
  1090. INC(#sleep_time,1);
  1091. IF(%#sleep_time%=600);
  1092. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema pode estar acontecendo... &9&o#SLEEP");
  1093. ELSEIF(%#sleep_time%=1200);
  1094. UNSET(fim);
  1095. BREAK;
  1096. ENDIF;
  1097. LOOK(%&sleep_look%);
  1098. KEYDOWN(%&sleep_move%);
  1099. SPRINT;
  1100. IF(sleep_xpos);
  1101. IF(%XPOS%=%#sleep_coord%);
  1102. KEYUP(%&sleep_move%);
  1103. KEYUP(SNEAK);
  1104. INC(#passos,1);
  1105. ELSEIF(%XPOS%<=%#sleep_coord_sneak%);
  1106. KEYDOWN(SNEAK);
  1107. ELSE;
  1108. KEYUP(SNEAK);
  1109. ENDIF;
  1110. ELSEIF(sleep_zpos);
  1111. IF(%ZPOS%=%#sleep_coord%);
  1112. IF(%#passos%<=7);
  1113. KEYUP(%&sleep_move%);
  1114. KEYUP(SNEAK);
  1115. INC(#passos,1);
  1116. ENDIF;
  1117. ELSEIF(%ZPOS%<=%#sleep_coord_sneak%);
  1118. KEYDOWN(SNEAK);
  1119. ELSE;
  1120. KEYUP(SNEAK);
  1121. ENDIF;
  1122. ENDIF;
  1123. UNTIL((%XPOS%=-698)&&(%YPOS%=6)&&(%ZPOS%=675));
  1124. IF((%XPOS%=-698)&&(%YPOS%=6)&&(%ZPOS%=675));
  1125. KEYDOWN(%&sleep_move%);
  1126. WAIT(10T);
  1127. ENDIF;
  1128. KEYUP(%&sleep_move%);
  1129. KEYUP(SNEAK);
  1130. SET(#sleep_inc,"");
  1131. SET(#sleep_inc_two,"");
  1132. SET(&y_sleep,"+0");
  1133. SET(&p_sleep,"+79");
  1134. IF(fim);
  1135. IF(%#sleep_inc_three%=0);
  1136. REPLACE(&buy,"x","iniciada");
  1137. ECHO("%&buy% %&credit%");
  1138. REPLACE(&buy,"iniciada","x");
  1139. INC(#sleep_inc_three,1);
  1140. ENDIF;
  1141. DO;
  1142. LOOK(SOUTH);
  1143. LOOK(%&y_sleep%,%&p_sleep%);
  1144. SET(#linhas_inventory,"");
  1145. #sleep_getslot = 9;
  1146. UNSET(linha);
  1147. DO;
  1148. IF(%GUI%!="GUIINVENTORY");
  1149. GUI(INVENTORY);
  1150. WAIT(5MS);
  1151. ENDIF;
  1152. GETSLOT(287,#sleep_slot,%#sleep_getslot%);
  1153. IF((%#sleep_slot%=-1)||(%#linhas_inventory%>=%#sleep_quant%));
  1154. BREAK;
  1155. ELSE;
  1156. INC(#linhas_inventory,1);
  1157. #sleep_getslot = %#sleep_slot% + 1;
  1158. ENDIF;
  1159. LOOP;
  1160. IF(%#linhas_inventory%<%#sleep_quant%);
  1161. SET(linha);
  1162. ENDIF;
  1163. IF(linha);
  1164. IF(%HIT%="PLAYER");
  1165. INC(#sleep_inc_two,1);
  1166. RANDOM(#sleep_time,375,50);
  1167. IF(%XPOS%=-697);
  1168. SET(&keydown,"RIGHT");
  1169. SET(#pos_stop,"-698");
  1170. SET(&y_sleep,"+0");
  1171. SET(&p_sleep,"+79");
  1172. ELSEIF(%XPOS%=-699);
  1173. SET(&keydown,"LEFT");
  1174. SET(#pos_stop,"-697");
  1175. SET(&y_sleep,"+66");
  1176. SET(&p_sleep,"+66");
  1177. ELSEIF(%XPOS%=-698);
  1178. SET(&keydown,"RIGHT");
  1179. SET(#pos_stop,"-699");
  1180. SET(&y_sleep,"-66");
  1181. SET(&p_sleep,"+66");
  1182. ENDIF;
  1183. GUI();
  1184. DO(50);
  1185. LOOK(SOUTH);
  1186. KEYDOWN(%&keydown%);
  1187. KEYDOWN(SNEAK);
  1188. UNTIL(%XPOS%=%#pos_stop%);
  1189. KEYUP(SNEAK);
  1190. KEYUP(%&keydown%);
  1191. DO(50);
  1192. LOOK(SOUTH);
  1193. KEYDOWN(BACK);
  1194. KEYDOWN(SNEAK);
  1195. UNTIL(%ZPOS%=673);
  1196. DO;
  1197. LOOK(SOUTH);
  1198. KEYUP(SNEAK);
  1199. KEYUP(BACK);
  1200. DEC(#sleep_time,1);
  1201. GETIDREL(0,-1,1,#id_unbug);
  1202. IF(%HIT%="PLAYER");
  1203. ELSE;
  1204. SET(#sleep_time,"-1");
  1205. ENDIF;
  1206. UNTIL((%#sleep_time%<1)||(%#id_unbug%!=124));
  1207. IF(%#id_unbug%=124);
  1208. DO(50);
  1209. LOOK(SOUTH);
  1210. KEYDOWN(FORWARD);
  1211. UNTIL(%ZPOS%=675);
  1212. WAIT(10T);
  1213. KEYUP(FORWARD);
  1214. ELSE;
  1215. UNSET(fim);
  1216. BREAK;
  1217. ENDIF;
  1218. ELSE;
  1219. SET(#sleep_inc_two,"");
  1220. LOOK(SOUTH);
  1221. LOOK(%&y_sleep%,%&p_sleep%);
  1222. WAIT(10MS);
  1223. KEY(USE);
  1224. WAIT(6T);
  1225. ENDIF;
  1226. ELSE;
  1227. BREAK;
  1228. ENDIF;
  1229. GETIDREL(0,-1,0,#id_unbug);
  1230. INC(#sleep_inc,1);
  1231. IF((%#id_unbug%=0)||(%#sleep_inc%>=50)||(%#sleep_inc_two%>=6));
  1232. UNSET(fim);
  1233. BREAK;
  1234. ENDIF;
  1235. LOOP;
  1236. ENDIF;
  1237. IF(!fim);
  1238. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema aconteceu, compra reiniciada. &9&o#SLEEP");
  1239. DO(6);
  1240. LOOK(%&sleep_look%);
  1241. KEYDOWN(BACK);
  1242. LOOP;
  1243. KEYUP(BACK);
  1244. ENDIF;
  1245. ELSE;
  1246. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema aconteceu, compra cancelada. &9&o#SLEEP");
  1247. SET(cancelar_compra);
  1248. ENDIF;
  1249. UNTIL(fim);
  1250. IF(!cancelar_compra);
  1251. DO(6);
  1252. LOOK(%&sleep_look%);
  1253. KEYDOWN(BACK);
  1254. LOOP;
  1255. KEYUP(BACK);
  1256. LOG("&6&l[&f&oM&facro&6&l] &aCompra de &flinhas &aconcluída. &9&o#SLEEP");
  1257. REPLACE(&buy,"x","concluída");
  1258. ECHO("%&buy% %&credit%");
  1259. REPLACE(&buy,"concluída","x");
  1260. ENDIF;
  1261. ENDIF;
  1262. LOOP;
  1263.  
  1264. }$$
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!