API tools faq
paste
Guest User

Untitled

a guest
Mar 24th, 2020
63
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 85.75 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_save)||(baus_lotados));
  9. UNSET(configurar);
  10. UNSET(resposta_invalida);
  11. IF(config_pb_save);
  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_save);
  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(2u2p1g2. 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_save);
  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 (5up5g5. 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. ENDIF;
  282. REPLACE(&buy,"5","");
  283. ELSE;
  284. LOG("&6&l[&f&oM&facro&6&l] &cSleep_PescaBlaze &6&l[&4OFF&6&l]");
  285. ACHIEVEMENTGET("[OFF] PescaBlaze Upg. 1","369");
  286. IF(config_pb_save);
  287. LOG("");
  288. #lucro_blaze = %#blaze_venarm% * 12800;
  289. LOG("&6&l[&f&oM&facro&6&l] &aTrap de baús:");
  290. IF(baus_lotados);
  291. #bau_atual_mostrar = %#bau_atual% - 1;
  292. LOG("&6&l[&f&oM&facro&6&l] &f&oBaú de armazenamento atual: &4%#bau_atual_mostrar%&cº");
  293. LOG("&c(não é mais &cpossível &carmazenar, esvazie os baús e clique em \"resetar\" ao ligar a macro)");
  294. ELSE;
  295. LOG("&6&l[&f&oM&facro&6&l] &f&oBaú de armazenamento atual: &a%#bau_atual%&fº");
  296. ENDIF;
  297. IF(%#blaze_venarm%>=1);
  298. LOG("&6&l[&f&oM&facro&6&l] &f&oArmazenados (em packs): &a%#blaze_venarm% &7- &f&oLucro estimado: &a%#lucro_blaze% &f&ocoins");
  299. ELSE;
  300. LOG("&6&l[&f&oM&facro&6&l] &f&oArmazenados: &cNenhum &7- &f&oLucro estimado: &cSem lucro");
  301. ENDIF;
  302. IF(%#sleep_livros%=1);
  303. LOG("");
  304. LOG("&6&l[&f&oM&facro&6&l] &f&oTesouro encontrado: &a%#sleep_livros%");
  305. ELSEIF(%#sleep_livros%>1);
  306. LOG("");
  307. LOG("&6&l[&f&oM&facro&6&l] &f&oTesouros encontrados: &a%#sleep_livros%");
  308. ENDIF;
  309. IF(%#mobs_mortos%>=1);
  310. LOG("");
  311. LOG("&6&l[&f&oM&facro&6&l] &f&oMobs mortos: &a%#mobs_mortos%");
  312. ELSEIF(%#mobs_mortos%=0);
  313. LOG("");
  314. LOG("&6&l[&f&oM&facro&6&l] &f&oMobs mortos: &cNenhum");
  315. ENDIF;
  316. LOG("");
  317. ENDIF;
  318. KEYUP(FORWARD);
  319. KEYUP(LEFT);
  320. KEYUP(RIGHT);
  321. KEYUP(SNEAK);
  322. KEYUP(BACK);
  323. IF(sleep_send);
  324. UNSET(sleep_send);
  325. SET(&armazem,"%&ma%");
  326. REPLACE(&armazem,"x","&c");
  327. REPLACE(&armazem,"at","desat");
  328. ENDIF;
  329. UNSET(@afk_onchat);
  330. STOP;
  331. ENDIF;
  332.  
  333. SET(sleep_ver_all);
  334. SET(sleep_ver_vara);
  335. SET(sleep_ver_linha);
  336. SET(#pack_linha_min,"8");
  337. SET(unbug_vara);
  338. UNSET(sleep_armazenar);
  339. UNSET(reabastecer_linha);
  340. UNSET(reabastecer_vara);
  341. UNSET(comprar_linha);
  342. UNSET(home_break);
  343. UNSET(@sleepmobkill);
  344.  
  345. DO;
  346. SET(&sleep_coord_atual,"X:%XPOS% Y:%YPOS% Z:%ZPOS%");
  347. SET(#sleep_homes,"1");
  348. IFMATCHES("%&sleep_coord_atual%","^%&sleep_mob_coord%$");
  349. IF(home_break);
  350. SET(#sleep_homes,"");
  351. UNSET(home_break);
  352. ENDIF;
  353. ENDIF;
  354. DO(%#sleep_homes%);
  355. DO;
  356. GUI();
  357. UNSET(@sleepteleport);
  358. UNSET(delay_teleport);
  359. WAIT(1T);
  360. ECHO("/home sleepblaze");
  361. WAIT(10T);
  362. DO(250);
  363. IF((@sleepteleport)&&(!delay_teleport));
  364. SET(delay_teleport);
  365. DO(100);
  366. GETIDREL(0,-1,0,#sleep_id);
  367. WHILE(%#sleep_id%=0);
  368. WAIT(20T);
  369. DO(100);
  370. GETIDREL(0,-1,0,#sleep_id);
  371. WHILE(%#sleep_id%=0);
  372. ENDIF;
  373. UNTIL((@sleepteleport)&&(delay_teleport)&&(%YPOS%=%#mob_ypos%)&&(%XPOS%=%#mob_xpos%)&&(%ZPOS%=%#mob_zpos%));
  374. WAIT(5T);
  375. UNTIL((@sleepteleport)&&(%YPOS%=%#mob_ypos%)&&(%XPOS%=%#mob_xpos%)&&(%ZPOS%=%#mob_zpos%));
  376. LOOP;
  377. IF(%GUI%!="GUIINVENTORY");
  378. GUI(INVENTORY);
  379. ENDIF;
  380. IF(sleep_ver_vara);
  381. DO;
  382. GETSLOT(346,#slot_vara);
  383. IF(%#slot_vara%!=-1);
  384. GETSLOTITEM(44,#id_vara);
  385. IF(%#id_vara%!=346);
  386. IF(%#id_vara%!=0);
  387. SLOTCLICK(44,L,TRUE);
  388. WAIT(3T);
  389. ENDIF;
  390. SLOTCLICK(%#slot_vara%,L,FALSE);
  391. WAIT(2T);
  392. SLOTCLICK(44,L,FALSE);
  393. WAIT(2T);
  394. SLOTCLICK(%#slot_vara%,L,FALSE);
  395. WAIT(2T);
  396. ELSE;
  397. IF(%#slot_vara%=44);
  398. BREAK;
  399. ELSE;
  400. 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");
  401. WAIT(40T);
  402. BREAK;
  403. ENDIF;
  404. ENDIF;
  405. ELSE;
  406. BREAK;
  407. ENDIF;
  408. LOOP;
  409. UNSET(sleep_ver_vara);
  410. ENDIF;
  411. IF(sleep_ver_linha);
  412. FOR(#sleep_slot,36,44);
  413. GETSLOTITEM(%#sleep_slot%,#sleep_id,#sleep_stack);
  414. IF((%#sleep_id%!=346)&&(%#sleep_id%!=287)&&(%#sleep_id%!=0));
  415. SLOTCLICK(%#sleep_slot%,L,TRUE);
  416. WAIT(1T);
  417. ENDIF;
  418. NEXT;
  419. SET(#pack_linha,"");
  420. SET(#getslot,"9");
  421. DO;
  422. GETSLOT(287,#slot_linha,%#getslot%);
  423. IF(%#slot_linha%=-1);
  424. BREAK;
  425. ELSE;
  426. INC(#pack_linha,1);
  427. #getslot = %#slot_linha% + 1;
  428. IF(%#slot_linha%<36);
  429. SLOTCLICK(%#slot_linha%,L,TRUE);
  430. GETSLOTITEM(%#slot_linha%,#id_linha);
  431. IF(%#id_linha%=287);
  432. ELSE;
  433. WAIT(2T);
  434. DEC(#pack_linha,1);
  435. ENDIF;
  436. ENDIF;
  437. ENDIF;
  438. LOOP;
  439. IF(%#pack_linha%>%#pack_linha_min%);
  440. 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");
  441. WAIT(40T);
  442. ENDIF;
  443. UNSET(sleep_ver_linha);
  444. ENDIF;
  445. #sleep_loop = %#sleep_quest_2% * 23;
  446. UNSAFE;
  447. DO;
  448. PICK(346);
  449. IF((%DURABILITY%<=%#sleep_quest_1%)||(%ITEM%!=346)||(unbug_vara));
  450. UNSET(@sleeplack);
  451. SET(#sleep_inc,"299");
  452. SET(#sleep_inc_two,"");
  453. DO;
  454. INC(#sleep_inc,1);
  455. IF(%#sleep_inc%=300);
  456. SET(#sleep_inc,"200");
  457. INC(#sleep_inc_two,1);
  458. PICK(346);
  459. IF(%ITEM%!=346);
  460. LOG("&6&l[&f&oM&facro&6&l] &aReabastecimento de &fvara &ahabilitado. &9&o#SLEEP");
  461. SET(reabastecer_vara);
  462. ENDIF;
  463. LOOK(%#yaw_iron%,%#pitch_iron%);
  464. WAIT(2T);
  465. DO(2);
  466. KEY(USE);
  467. WAIT(2T);
  468. LOOP;
  469. ELSEIF(@sleeplack);
  470. LOG("&6&l[&f&oM&facro&6&l] &aReabastecimento de &flinhas &ahabilitado. &9&o#SLEEP");
  471. SET(reabastecer_linha);
  472. ENDIF;
  473. UNTIL((%DURABILITY%=64)||(%#sleep_inc_two%>=10)||(reabastecer_vara)||(reabastecer_linha));
  474. IF(%#sleep_inc_two%>=10);
  475. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema aconteceu. Tentando resolver... &9&o#SLEEP");
  476. GUI();
  477. BREAK;
  478. ELSEIF((reabastecer_vara)||(reabastecer_linha));
  479. SET(sleep_armazenar);
  480. SET(unbug_vara);
  481. BREAK;
  482. ENDIF;
  483. IF(unbug_vara);
  484. UNSET(unbug_vara);
  485. LOOK(%&sleep_dir_mob%);
  486. LOOK(%#sleep_yaw%,%#sleep_pitch%);
  487. ENDIF;
  488. ELSE;
  489. LOOK(%#sleep_yaw%,%#sleep_pitch%);
  490. IF(%&sleep_quest_3%="Sim");
  491. IF(%HIT%="ENTITY");
  492. KEY(USE);
  493. ENDIF;
  494. ELSE;
  495. KEY(USE);
  496. ENDIF;
  497. ENDIF;
  498. IF(%GUI%!="GUIINVENTORY");
  499. WAIT(3);
  500. IF(%GUI%="GUICHAT");
  501. LOG("&6&l[&f&oM&facro&6&l] &aChat detectado, feche para continuar. &9&o#SLEEP");
  502. DO;
  503. WHILE(%GUI%="GUICHAT");
  504. WAIT(3T);
  505. ENDIF;
  506. GUI(INVENTORY);
  507. PICK(346);
  508. LOOK(%#sleep_yaw%,%#sleep_pitch%);
  509. ELSEIF((%XPOS%!=%#mob_xpos%)||(%YPOS%!=%#mob_ypos%)||(%ZPOS%!=%#mob_zpos%));
  510. LOG("&6&l[&f&oM&facro&6&l] &cParece que você não esta nas coordenadas configuradas do MobSpawn. Tentando resolver... &9&o#SLEEP");
  511. GUI();
  512. BREAK;
  513. ELSEIF(@sleepmobkill);
  514. UNSET(@sleepmobkill);
  515. INC(#mobs_mortos,1);
  516. ENDIF;
  517. DEC(#sleep_loop,1);
  518. IF(%#sleep_loop%<1);
  519. SET(#slot_clean,"");
  520. SET(#getslot,"9");
  521. LOG("");
  522. LOG("&6&l[&f&oM&facro&6&l] &aAguarde, verificando o inventário. &9&o#SLEEP");
  523. DO;
  524. IF(%GUI%!="GUIINVENTORY");
  525. GUI(INVENTORY);
  526. ENDIF;
  527. GETSLOT(0,#sleep_slot,%#getslot%);
  528. IF(%#sleep_slot%!=-1);
  529. INC(#slot_clean,1);
  530. #getslot = %#sleep_slot% + 1;
  531. ENDIF;
  532. UNTIL((%#sleep_slot%=-1)||(%#slot_clean%>=4));
  533. IF(%#slot_clean%<4);
  534. LOG("&6&l[&f&oM&facro&6&l] &aPoucos slots livres, iniciando o armazenamento. &9&o#SLEEP");
  535. SET(sleep_armazenar);
  536. SET(unbug_vara);
  537. ELSE;
  538. LOG("&6&l[&f&oM&facro&6&l] &aInventário ainda vazio. &9&o#SLEEP");
  539. #sleep_loop = %#sleep_quest_2% * 23;
  540. ENDIF;
  541. LOG("");
  542. ENDIF;
  543. WHILE(%#sleep_loop%>=1);
  544. ENDUNSAFE;
  545. IF(sleep_armazenar);
  546. UNSET(sleep_armazenar);
  547. SET(#getslot,"9");
  548. SET(#itens_inv_armazenar,"");
  549. UNSAFE;
  550. DO;
  551. IF(%GUI%!="GUIINVENTORY");
  552. GUI(INVENTORY);
  553. ENDIF;
  554. GETSLOT(369,#slot_blaze,%#getslot%);
  555. IF(%#slot_blaze%!=-1);
  556. INC(#itens_inv_armazenar,1);
  557. #getslot = %#slot_blaze% + 1;
  558. ENDIF;
  559. UNTIL(%#slot_blaze%=-1);
  560. ENDUNSAFE;
  561. UNSET(block_home_baus);
  562. UNSET(pos_baus_verificar);
  563. DO;
  564. SET(fim);
  565. IF(!block_home_baus);
  566. DO;
  567. GUI();
  568. SET(#sleep_inc,"");
  569. UNSET(@sleepteleport);
  570. UNSET(delay_teleport);
  571. UNSET(home_protection);
  572. WAIT(1T);
  573. ECHO("/home sleepbb");
  574. WAIT(10T);
  575. DO(5);
  576. DO;
  577. GETIDREL(0,-1,0,#bloco);
  578. IF(@sleepteleport);
  579. IF(!delay_teleport);
  580. SET(delay_teleport);
  581. WAIT(20T);
  582. ENDIF;
  583. SET(&verificar_baus,"");
  584. 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);
  585. 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);
  586. SET(&verificar_baus,"%#bau1%-%#bau2%-%#bau3%-%#bau4%-%#bau5%-%#bau6%-%#bau7%-%#bau8%-%#bau9%-%#bau10%");
  587. IFMATCHES("%&verificar_baus%","^(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)$");
  588. GETIDREL(-2,-1,0,#bau1);
  589. GETIDREL(-3,-1,0,#bau2);
  590. GETIDREL(-2,-1,1,#bau3);
  591. GETIDREL(-3,-1,1,#bau4);
  592. GETIDREL(-2,-1,-1,#bau5);
  593. GETIDREL(-3,-1,-1,#bau6);
  594. GETIDREL(-2,3,0,#bau7);
  595. GETIDREL(-3,3,0,#bau8);
  596. GETIDREL(-2,3,1,#bau9);
  597. GETIDREL(-3,3,1,#bau10);
  598. GETIDREL(-2,3,-1,#bau11);
  599. GETIDREL(-3,3,-1,#bau12);
  600. SET(&verificar_baus,"%#bau1%-%#bau2%-%#bau3%-%#bau4%-%#bau5%-%#bau6%-%#bau7%-%#bau8%-%#bau9%-%#bau10%-%#bau11%-%#bau12%");
  601. 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)$");
  602. SET(ok1);
  603. ELSE;
  604. UNSET(ok1);
  605. ENDIF;
  606. ELSE;
  607. UNSET(ok1);
  608. ENDIF;
  609. ELSE;
  610. UNSET(ok1);
  611. ENDIF;
  612. IF(pos_baus_verificar);
  613. IF((%XPOS%=%#baus_xpos%)&&(%YPOS%=%#baus_ypos%)&&(%ZPOS%=%#baus_zpos%));
  614. SET(ok2);
  615. ELSE;
  616. UNSET(ok2);
  617. ENDIF;
  618. ELSE;
  619. SET(ok2);
  620. ENDIF;
  621. INC(#sleep_inc,1);
  622. IF(%#sleep_inc%=300);
  623. LOG("");
  624. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema aconteceu. Se este erro persistir, tem algo errado com sua trap de baús.");
  625. LOG("&6&l[&f&oM&facro&6&l] &cVeja como deve ficar a trap de baús:");
  626. LOG("&6&l[&f&oM&facro&6&l] &ahttps://prnt.sc/jdtfqn");
  627. LOG("");
  628. LOG("&6&l[&f&oM&facro&6&l] &cTentando novamente...");
  629. LOG("");
  630. SET(home_protection);
  631. BREAK;
  632. ENDIF;
  633. UNTIL((ok1)&&(ok2)&&(%#bloco%!=0)&&(@sleepteleport));
  634. WHILE(!home_protection);
  635. UNTIL(!home_protection);
  636. IF(trap_salvar_coordenadas);
  637. SET(#baus_xpos,"%XPOS%");
  638. SET(#baus_ypos,"%YPOS%");
  639. SET(#baus_zpos,"%ZPOS%");
  640. UNSET(trap_salvar_coordenadas);
  641. ENDIF;
  642. UNSET(pos_baus_verificar);
  643. ELSE;
  644. UNSET(block_home_baus);
  645. ENDIF;
  646. IF((!baus_lotados)&&(%#itens_inv_armazenar%>=1));
  647. SET(#sleep_inc,"199");
  648. SET(#sleep_inc_two,"");
  649. IF(%#bau_atual%=1);
  650. SET(#pos_first_chest,"%#baus_xpos%");
  651. SET(#pos_last_chest,"%#baus_xpos%");
  652. ENDIF;
  653. #pos_penult_chest = %#pos_last_chest% - 1;
  654. DO;
  655. LOOK(NORTH);
  656. IF(%XPOS%=%#pos_last_chest%);
  657. WAIT(20MS);
  658. BREAK;
  659. ELSEIF((%XPOS%>%#pos_last_chest%)||(%YPOS%!=%#baus_ypos%)||(%ZPOS%!=%#baus_zpos%));
  660. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema aconteceu. &9&o#SLEEP");
  661. LOG("&6&l[&f&oM&facro&6&l] &cTentando resolver... &9&o#SLEEP");
  662. UNSET(fim);
  663. ELSE;
  664. GUI(INVENTORY);
  665. KEYDOWN(RIGHT);
  666. IF(%XPOS%<%#pos_penult_chest%);
  667. KEYUP(SNEAK);
  668. ELSE;
  669. KEYDOWN(SNEAK);
  670. ENDIF;
  671. ENDIF;
  672. WHILE(fim);
  673. KEYUP(SNEAK);
  674. KEYUP(RIGHT);
  675. GUI();
  676. LOG("&6&l[&f&oM&facro&6&l] &aBaú de armazenamento número &f%#bau_atual%&a. &9&o#SLEEP");
  677. IF(fim);
  678. DO;
  679. INC(#sleep_inc,1);
  680. IF(%#sleep_inc%=200);
  681. GUI();
  682. SET(#sleep_inc,"");
  683. INC(#sleep_inc_two,1);
  684. IF(%#sleep_inc_two%=6);
  685. LOG("&6&l[&f&oM&facro&6&l] &cO baú não está abrindo. &9&o#SLEEP");
  686. LOG("&6&l[&f&oM&facro&6&l] &cTentando resolver... &9&o#SLEEP");
  687. SET(pos_baus_verificar);
  688. UNSET(fim);
  689. BREAK;
  690. ENDIF;
  691. LOOK(NORTH);
  692. IFMATCHES("%#bau_atual%","^(.*)[0-9]$");
  693. MATCH("%#bau_atual%","^(.*)([0-9])$",{,#bau_atual_unit});
  694. ENDIF;
  695. IF((%#bau_atual%=1)||(%#bau_atual_unit%=1)||(%#bau_atual_unit%=6));
  696. LOOK(+0,+308);
  697. ELSEIF((%#bau_atual%=2)||(%#bau_atual_unit%=2)||(%#bau_atual_unit%=7));
  698. LOOK(+0,+328);
  699. ELSEIF((%#bau_atual%=3)||(%#bau_atual_unit%=3)||(%#bau_atual_unit%=8));
  700. LOOK(+0,+358);
  701. ELSEIF((%#bau_atual%=4)||(%#bau_atual_unit%=4)||(%#bau_atual_unit%=9));
  702. LOOK(+0,+33);
  703. ELSEIF((%#bau_atual%=5)||(%#bau_atual_unit%=5)||(%#bau_atual_unit%=0));
  704. LOOK(+0,+50);
  705. ENDIF;
  706. LOOK(+0,+2,1);
  707. KEY(USE);
  708. ELSEIF((%XPOS%!=%#pos_last_chest%)||(%YPOS%!=%#baus_ypos%)||(%ZPOS%!=%#baus_zpos%));
  709. LOG("&6&l[&f&oM&facro&6&l] &cVocê não esta onde deveria. &9&o#SLEEP");
  710. LOG("&6&l[&f&oM&facro&6&l] &cTentando resolver... &9&o#SLEEP");
  711. SET(pos_baus_verificar);
  712. UNSET(fim);
  713. ENDIF;
  714. UNTIL((!fim)||(%GUI%="GUICHEST"));
  715. SET(#sleep_slot_max,"89");
  716. IF(fim);
  717. WAIT(6T);
  718. #id_inv = 333;
  719. FOR(#sleep_slot_inv,54,%#sleep_slot_max%);
  720. IF(%GUI%!="GUICHEST");
  721. LOG("&6&l[&f&oM&facro&6&l] &cO baú foi fechado. &9&o#SLEEP");
  722. LOG("&6&l[&f&oM&facro&6&l] &cTentando reabrir... &9&o#SLEEP");
  723. SET(pos_baus_verificar);
  724. UNSET(fim);
  725. BREAK;
  726. ENDIF;
  727. UNSET(slot_air);
  728. IF(%#id_inv%=0);
  729. SET(slot_air);
  730. ELSE;
  731. GETSLOT(0,#slot_vazio_chest);
  732. IF((%#slot_vazio_chest%!=-1)&&(%#slot_vazio_chest%<54));
  733. SET(slot_air);
  734. ENDIF;
  735. ENDIF;
  736. IF(!slot_air);
  737. GETSLOT(369,#slot_blaze,54);
  738. IF(%#slot_blaze%!=-1);
  739. SLOTCLICK(%#slot_blaze%,L,TRUE);
  740. WAIT(1T);
  741. ENDIF;
  742. INC(#bau_atual,1);
  743. SET(block_home_baus);
  744. IF((%#bau_atual_unit%=5)||((%#bau_atual_unit%=0));
  745. 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);
  746. 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);
  747. SET(&verificar_baus,"%#bau1%-%#bau2%-%#bau3%-%#bau4%-%#bau5%-%#bau6%-%#bau7%-%#bau8%-%#bau9%-%#bau10%");
  748. IFMATCHES("%&verificar_baus%","^(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)$");
  749. INC(#pos_last_chest,1);
  750. UNSET(fim);
  751. BREAK;
  752. ELSE;
  753. SET(baus_lotados);
  754. GUI();
  755. DO;
  756. LOG("");
  757. LOG("&6&l[&f&oM&facro&6&l] &cOs baús acabaram, esvazie-os e selecione \"resetar\" ao ligar a macro. &9&o#SLEEP");
  758. LOG("");
  759. WAIT(5);
  760. LOOP;
  761. ENDIF;
  762. ENDIF;
  763. UNSET(fim);
  764. BREAK;
  765. ELSE;
  766. GETSLOTITEM(%#sleep_slot_inv%,#id_inv,#stack_inv);
  767. IF((%#id_inv%=122)||(%#id_inv%=0)||(%#id_inv%=346)||(%#id_inv%=287));
  768. ELSE;
  769. IFMATCHES("%#id_inv%","^369$|^387$");
  770. SLOTCLICK(%#sleep_slot_inv%,L,TRUE);
  771. WAIT(1T);
  772. DEC(#itens_inv_armazenar,1);
  773. IF(%#id_inv%=387);
  774. INC(#sleep_livros,1);
  775. ELSE;
  776. INC(#blaze_venarm,1);
  777. ENDIF;
  778. ENDIF;
  779. ENDIF;
  780. ENDIF;
  781.  
  782. NEXT;
  783. ELSE;
  784. GUI();
  785. ENDIF;
  786. ENDIF;
  787. ENDIF;
  788. UNTIL(fim);
  789. GUI();
  790. ENDIF;
  791. IF((reabastecer_linha)||(reabastecer_vara));
  792. SET(#chest_reab_inc,"1");
  793. IF(reabastecer_vara);
  794. UNSET(reabastecer_vara);
  795. SET(&sleep_name_reab,"vara");
  796. SET(sleep_ver_vara);
  797. SET(#sleep_id_reab,"346");
  798. SET(#sleep_quant,"1");
  799. ELSE;
  800. UNSET(reabastecer_linha);
  801. SET(sleep_ver_linha);
  802. SET(&sleep_name_reab,"linha");
  803. SET(#sleep_id_reab,"287");
  804. SET(#sleep_quant,"%#pack_linha_min%");
  805. ENDIF;
  806. SET(#itens_reab,"");
  807. UNSET(comprar_linha);
  808. DO;
  809. IF((%XPOS%=%#baus_xpos%)&&(%YPOS%=%#baus_ypos%)&&(%ZPOS%=%#baus_zpos%));
  810. ELSE;
  811. DO;
  812. GUI();
  813. UNSET(@sleepteleport);
  814. UNSET(delay_teleport);
  815. WAIT(1T);
  816. ECHO("/home sleepbb");
  817. WAIT(10T);
  818. DO(250);
  819. IF((@sleepteleport)&&(!delay_teleport));
  820. SET(delay_teleport);
  821. DO(100);
  822. GETIDREL(0,-1,0,#sleep_id);
  823. WHILE(%#sleep_id%=0);
  824. WAIT(20T);
  825. DO(100);
  826. GETIDREL(0,-1,0,#sleep_id);
  827. WHILE(%#sleep_id%=0);
  828. ENDIF;
  829. UNTIL((@sleepteleport)&&(delay_teleport)&&(%YPOS%=%#baus_ypos%)&&(%XPOS%=%#baus_xpos%)&&(%ZPOS%=%#baus_zpos%));
  830. WAIT(5T);
  831. UNTIL((@sleepteleport)&&(%YPOS%=%#baus_ypos%)&&(%XPOS%=%#baus_xpos%)&&(%ZPOS%=%#baus_zpos%));
  832. ENDIF;
  833. GUI();
  834. LOG("&6&l[&f&oM&facro&6&l] &aBaú de reabastecimento número &f%#chest_reab_inc%&a. &9&o#SLEEP");
  835. SET(stop);
  836. SET(#sleep_inc_two,"");
  837. DO;
  838. IF(%#sleep_inc_two%>=3);
  839. LOG("&6&l[&f&oM&facro&6&l] &cO baú não está abrindo. &9&o#SLEEP");
  840. LOG("&6&l[&f&oM&facro&6&l] &cTentando resolver... &9&o#SLEEP");
  841. LOOK(0,270);
  842. PICK(346);
  843. WAIT(3T);
  844. KEY(USE);
  845. WAIT(3T);
  846. UNSET(stop);
  847. BREAK;
  848. ENDIF;
  849. IF(%#chest_reab_inc%=1);
  850. LOOK(237,314);
  851. ELSEIF(%#chest_reab_inc%=2);
  852. LOOK(270,309);
  853. ELSEIF(%#chest_reab_inc%=3);
  854. LOOK(302,314);
  855. ELSEIF(%#chest_reab_inc%=4);
  856. LOOK(237,334);
  857. ELSEIF(%#chest_reab_inc%=5);
  858. LOOK(270,329);
  859. ELSEIF(%#chest_reab_inc%=6);
  860. LOOK(302,334);
  861. ELSEIF(%#chest_reab_inc%=7);
  862. LOOK(237,359);
  863. ELSEIF(%#chest_reab_inc%=8);
  864. LOOK(269,359);
  865. ELSEIF(%#chest_reab_inc%=9);
  866. LOOK(302,359);
  867. ELSEIF(%#chest_reab_inc%=10);
  868. LOOK(238,29);
  869. ELSEIF(%#chest_reab_inc%=11);
  870. LOOK(270,34);
  871. ELSEIF(%#chest_reab_inc%=12);
  872. LOOK(302,29);
  873. ELSEIF(%#chest_reab_inc%=13);
  874. LOOK(237,47);
  875. ELSEIF(%#chest_reab_inc%=14);
  876. LOOK(270,51);
  877. ELSEIF(%#chest_reab_inc%=15);
  878. LOOK(302,47);
  879. ENDIF;
  880. LOOKS(+0,+1,1);
  881. WAIT(1T);
  882. KEY(USE);
  883. SET(#sleep_inc,"");
  884. DO;
  885. INC(#sleep_inc,1);
  886. UNTIL((%GUI%="GUICHEST")||(%#sleep_inc%=250));
  887. INC(#sleep_inc_two,1);
  888. WHILE(%GUI%!="GUICHEST");
  889. IF(stop);
  890. WAIT(10T);
  891. DO;
  892. IF(%&sleep_name_reab%="vara");
  893. PICK(346);
  894. IF(%ITEM%=346);
  895. SET(stop);
  896. BREAK;
  897. ENDIF;
  898. ENDIF;
  899. IF(%GUI%!="GUICHEST");
  900. LOG("&6&l[&f&oM&facro&6&l] &cO baú foi fechado. &9&o#SLEEP");
  901. LOG("&6&l[&f&oM&facro&6&l] &cTentando reabrir... &9&o#SLEEP");
  902. UNSET(stop);
  903. BREAK;
  904. ENDIF;
  905. GETSLOT(%#sleep_id_reab%,#sleep_slot);
  906. IF((%#sleep_slot%!=-1)&&(%#sleep_slot%<54));
  907. UNSET(clicar);
  908. IF(%&sleep_name_reab%="linha");
  909. SET(#linha_fix_bug,"");
  910. SET(#sleep_getslot,"54");
  911. UNSAFE;
  912. DO;
  913. GETSLOT(%#sleep_id_reab%,#slot_fix_bug,%#sleep_getslot%);
  914. IF(%#slot_fix_bug%=-1);
  915. BREAK;
  916. ELSE;
  917. INC(#linha_fix_bug,1);
  918. #sleep_getslot = %#slot_fix_bug% + 1;
  919. ENDIF;
  920. LOOP;
  921. ENDUNSAFE;
  922. IF(%#linha_fix_bug%<%#pack_linha_min%);
  923. SET(clicar);
  924. ENDIF;
  925. ELSE;
  926. GETSLOT(%#sleep_id_reab%,#slot_fix_bug,54);
  927. IF(%#slot_fix_bug%=-1);
  928. SET(clicar);
  929. ENDIF;
  930. ENDIF;
  931. IF(clicar);
  932. DO(2);
  933. SLOTCLICK(%#sleep_slot%,L,TRUE);
  934. WAIT(5MS);
  935. LOOP;
  936. ENDIF;
  937. INC(#itens_reab,1);
  938. ELSE;
  939. IF(%#chest_reab_inc%<15);
  940. INC(#chest_reab_inc,1);
  941. UNSET(stop);
  942. BREAK;
  943. ELSEIF(%#chest_reab_inc%=15);
  944. IF(%#itens_reab%=0);
  945. LOG("");
  946. IF(%&sleep_name_reab%="linha");
  947. UNSET(sleep_reiniciar);
  948. IFMATCHES("%SERVER%","([\d\w]+).craftlandia.com.br",&server_atual,1,NONE);
  949. IFMATCHES("%&server_atual%","(fenix|Fenix|FENIX|destiny|Destiny|DESTINY|titan|Titan|TITAN|heaven|Heaven|HEAVEN|asgard|Asgard|ASGARD)");
  950. LOG("&6&l[&f&oM&facro&6&l] &cNenhuma &f%&sleep_name_reab% &cencontrada, compra habilitada. &9&o#SLEEP");
  951. SET(comprar_linha);
  952. ELSE;
  953. LOG("");
  954. 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");
  955. LOG("");
  956. WAIT(40T);
  957. SET(sleep_reiniciar);
  958. ENDIF;
  959. ELSE;
  960. SET(sleep_reiniciar);
  961. ENDIF;
  962. IF(sleep_reiniciar);
  963. LOG("&6&l[&f&oM&facro&6&l] &cNenhuma &f%&sleep_name_reab% &cencontrada, busca reiniciada. &9&o#SLEEP");
  964. SET(#chest_reab_inc,"1");
  965. UNSET(stop);
  966. ENDIF;
  967. ELSE;
  968. LOG("&6&l[&f&oM&facro&6&l] &cNenhuma &f%&sleep_name_reab% &cencontrada, busca reiniciada. &9&o#SLEEP");
  969. SET(#chest_reab_inc,"1");
  970. UNSET(stop);
  971. ENDIF;
  972. LOG("");
  973. BREAK;
  974. ELSE;
  975. SET(stop);
  976. BREAK;
  977. ENDIF;
  978. ENDIF;
  979. ENDIF;
  980. DEC(#sleep_quant,1);
  981. IF((%#sleep_quant%=0)&&(reabastecer_linha));
  982. SET(#chest_reab_inc,"1");
  983. SET(#itens_reab,"");
  984. SET(sleep_ver_linha);
  985. SET(&sleep_name_reab,"linha");
  986. SET(#sleep_id_reab,"287");
  987. SET(#sleep_quant,"%#pack_linha_min%");
  988. UNSET(reabastecer_linha);
  989. UNSET(stop);
  990. BREAK;
  991. ENDIF;
  992. UNTIL(%#sleep_quant%=0);
  993. WAIT(3T);
  994. ENDIF;
  995. UNTIL(stop);
  996. SET(unbug);
  997. GUI();
  998. IF(!comprar_linha);
  999. LOG("&6&l[&f&oM&facro&6&l] &aReabastecimento concluído. &9&o#SLEEP");
  1000. ENDIF;
  1001. ENDIF;
  1002. IF(comprar_linha);
  1003. UNSET(comprar_linha);
  1004. SET(#sleep_inc_three,"");
  1005. SET(#sleep_quant,"%#pack_linha_min%");
  1006. DO;
  1007. SET(fim);
  1008. DO(2);
  1009. DO;
  1010. UNSET(@sleepteleport);
  1011. ECHO("/warp loja");
  1012. GUI();
  1013. WAIT(40T);
  1014. DO(350);
  1015. GETIDREL(0,-1,0,#sleep_id);
  1016. IF((%XPOS%=%#mob_xpos%)&&(%YPOS%=%#mob_ypos%)&&(%ZPOS%=%#mob_zpos%));
  1017. UNSET(ok);
  1018. ELSE;
  1019. SET(ok);
  1020. ENDIF;
  1021. GETIDREL(0,-1,0,#sleepteleport);
  1022. IF(%#sleepteleport%=4);
  1023. INC(#sleep_inc,1);
  1024. IF(%#sleep_inc%=47);
  1025. SET(@sleepteleport);
  1026. ENDIF;
  1027. ELSE;
  1028. SET(#sleep_inc,"");
  1029. ENDIF;
  1030. UNTIL((%#sleep_id%=4)&&(ok)&&(%YPOS%=6)&&(@sleepteleport));
  1031. WHILE(!@sleepteleport);
  1032. UNTIL(%#sleep_inc%=47);
  1033. UNSET(cancelar_compra);
  1034. UNSET(menuloja);
  1035. SET(#slots_vazios,"");
  1036. SET(#getslot,"9");
  1037. DO;
  1038. IF(%GUI%!="GUIINVENTORY");
  1039. GUI(INVENTORY);
  1040. ENDIF;
  1041. GETSLOT(0,#verificar_slot_vazio,%#getslot%);
  1042. IF(%#verificar_slot_vazio%!=-1);
  1043. INC(#slots_vazios,1);
  1044. #getslot = %#verificar_slot_vazio% + 1;
  1045. ELSE;
  1046. BREAK;
  1047. ENDIF;
  1048. UNTIL(%#slots_vazios%=%#sleep_quant%);
  1049. GUI();
  1050. IF(%#slots_vazios%=%#sleep_quant%);
  1051. SET(#sleep_time,"");
  1052. SET(#passos,"1");
  1053. DO;
  1054. UNSET(sleep_zpos);
  1055. UNSET(sleep_xpos);
  1056. IF(%#passos%=1);
  1057. SET(&sleep_look,"NORTH");
  1058. SET(sleep_zpos);
  1059. SET(#sleep_coord,"697");
  1060. SET(#sleep_coord_sneak,"699");
  1061. SET(&sleep_move,"FORWARD");
  1062. ELSEIF(%#passos%=2);
  1063. SET(&sleep_look,"NORTH");
  1064. SET(sleep_xpos);
  1065. SET(#sleep_coord,"-679");
  1066. SET(#sleep_coord_sneak,"-677");
  1067. SET(&sleep_move,"LEFT");
  1068. ELSEIF(%#passos%=3);
  1069. SET(&sleep_look,"NORTH");
  1070. SET(sleep_zpos);
  1071. SET(#sleep_coord,"673");
  1072. SET(#sleep_coord_sneak,"675");
  1073. SET(&sleep_move,"FORWARD");
  1074. ELSEIF(%#passos%=4);
  1075. SET(&sleep_look,"NORTH");
  1076. SET(sleep_xpos);
  1077. SET(#sleep_coord,"-685");
  1078. SET(#sleep_coord_sneak,"-683");
  1079. SET(&sleep_move,"LEFT");
  1080. ELSEIF(%#passos%=5);
  1081. SET(&sleep_look,"NORTH");
  1082. SET(sleep_zpos);
  1083. SET(#sleep_coord,"662");
  1084. SET(#sleep_coord_sneak,"664");
  1085. SET(&sleep_move,"FORWARD");
  1086. ELSEIF(%#passos%=6);
  1087. SET(&sleep_look,"SOUTH");
  1088. SET(sleep_xpos);
  1089. SET(#sleep_coord,"-698");
  1090. SET(#sleep_coord_sneak,"-696");
  1091. SET(&sleep_move,"RIGHT");
  1092. ELSEIF(%#passos%=7);
  1093. IF(!menuloja);
  1094. ECHO("/menuloja off");
  1095. SET(menuloja);
  1096. ENDIF;
  1097. SET(&sleep_look,"SOUTH");
  1098. SET(sleep_zpos);
  1099. SET(#sleep_coord,"675");
  1100. SET(&sleep_move,"FORWARD");
  1101. ENDIF;
  1102. INC(#sleep_time,1);
  1103. IF(%#sleep_time%=600);
  1104. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema pode estar acontecendo... &9&o#SLEEP");
  1105. ELSEIF(%#sleep_time%=1200);
  1106. UNSET(fim);
  1107. BREAK;
  1108. ENDIF;
  1109. LOOK(%&sleep_look%);
  1110. KEYDOWN(%&sleep_move%);
  1111. SPRINT;
  1112. IF(sleep_xpos);
  1113. IF(%XPOS%=%#sleep_coord%);
  1114. KEYUP(%&sleep_move%);
  1115. KEYUP(SNEAK);
  1116. INC(#passos,1);
  1117. ELSEIF(%XPOS%<=%#sleep_coord_sneak%);
  1118. KEYDOWN(SNEAK);
  1119. ELSE;
  1120. KEYUP(SNEAK);
  1121. ENDIF;
  1122. ELSEIF(sleep_zpos);
  1123. IF(%ZPOS%=%#sleep_coord%);
  1124. IF(%#passos%<=7);
  1125. KEYUP(%&sleep_move%);
  1126. KEYUP(SNEAK);
  1127. INC(#passos,1);
  1128. ENDIF;
  1129. ELSEIF(%ZPOS%<=%#sleep_coord_sneak%);
  1130. KEYDOWN(SNEAK);
  1131. ELSE;
  1132. KEYUP(SNEAK);
  1133. ENDIF;
  1134. ENDIF;
  1135. UNTIL((%XPOS%=-698)&&(%YPOS%=6)&&(%ZPOS%=675));
  1136. IF((%XPOS%=-698)&&(%YPOS%=6)&&(%ZPOS%=675));
  1137. KEYDOWN(%&sleep_move%);
  1138. WAIT(10T);
  1139. ENDIF;
  1140. KEYUP(%&sleep_move%);
  1141. KEYUP(SNEAK);
  1142. SET(#sleep_inc,"");
  1143. SET(#sleep_inc_two,"");
  1144. SET(&y_sleep,"+0");
  1145. SET(&p_sleep,"+79");
  1146. IF(fim);
  1147. IF(%#sleep_inc_three%=0);
  1148. REPLACE(&buy,"x","iniciada");
  1149. REPLACE(&buy,"iniciada","x");
  1150. INC(#sleep_inc_three,1);
  1151. ENDIF;
  1152. GETIDREL(0,0,0,#placa_dinamica);
  1153. IF(%#placa_dinamica%!=68);
  1154. SET(&y_sleep,"180");
  1155. SET(&p_sleep,"0");
  1156. ELSE;
  1157. SET(&y_sleep,"+0");
  1158. SET(&p_sleep,"+79");
  1159. ENDIF;
  1160. DO;
  1161. LOOK(SOUTH);
  1162. LOOK(%&y_sleep%,%&p_sleep%);
  1163. SET(#linhas_inventory,"");
  1164. #sleep_getslot = 9;
  1165. UNSET(linha);
  1166. DO;
  1167. IF(%GUI%!="GUIINVENTORY");
  1168. GUI(INVENTORY);
  1169. WAIT(5MS);
  1170. ENDIF;
  1171. GETSLOT(287,#sleep_slot,%#sleep_getslot%);
  1172. IF((%#sleep_slot%=-1)||(%#linhas_inventory%>=%#sleep_quant%));
  1173. BREAK;
  1174. ELSE;
  1175. INC(#linhas_inventory,1);
  1176. #sleep_getslot = %#sleep_slot% + 1;
  1177. ENDIF;
  1178. LOOP;
  1179. IF(%#linhas_inventory%<%#sleep_quant%);
  1180. SET(linha);
  1181. ENDIF;
  1182. IF(linha);
  1183. IF(%HIT%="PLAYER");
  1184. INC(#sleep_inc_two,1);
  1185. RANDOM(#sleep_time,375,50);
  1186. IF(%XPOS%=-697);
  1187. SET(&keydown,"RIGHT");
  1188. SET(#pos_stop,"-698");
  1189. IF(%#placa_dinamica%!=68);
  1190. SET(&y_sleep,"180");
  1191. SET(&p_sleep,"0");
  1192. ELSE;
  1193. SET(&y_sleep,"+0");
  1194. SET(&p_sleep,"+79");
  1195. ENDIF;
  1196. ELSEIF(%XPOS%=-699);
  1197. SET(&keydown,"LEFT");
  1198. SET(#pos_stop,"-697");
  1199. IF(%#placa_dinamica%!=68);
  1200. SET(&y_sleep,"238");
  1201. SET(&p_sleep,"0");
  1202. ELSE;
  1203. SET(&y_sleep,"+66");
  1204. SET(&p_sleep,"+66");
  1205. ENDIF;
  1206. ELSEIF(%XPOS%=-698);
  1207. SET(&keydown,"RIGHT");
  1208. SET(#pos_stop,"-699");
  1209. IF(%#placa_dinamica%!=68);
  1210. SET(&y_sleep,"128");
  1211. SET(&p_sleep,"0");
  1212. ELSE;
  1213. SET(&y_sleep,"-66");
  1214. SET(&p_sleep,"+66");
  1215. ENDIF;
  1216. ENDIF;
  1217. GUI();
  1218. DO(50);
  1219. LOOK(SOUTH);
  1220. KEYDOWN(%&keydown%);
  1221. KEYDOWN(SNEAK);
  1222. UNTIL(%XPOS%=%#pos_stop%);
  1223. KEYUP(SNEAK);
  1224. KEYUP(%&keydown%);
  1225. DO(50);
  1226. LOOK(SOUTH);
  1227. KEYDOWN(BACK);
  1228. KEYDOWN(SNEAK);
  1229. UNTIL(%ZPOS%=673);
  1230. DO;
  1231. LOOK(SOUTH);
  1232. KEYUP(SNEAK);
  1233. KEYUP(BACK);
  1234. DEC(#sleep_time,1);
  1235. GETIDREL(0,-1,1,#id_unbug);
  1236. IF(%HIT%="PLAYER");
  1237. ELSE;
  1238. SET(#sleep_time,"-1");
  1239. ENDIF;
  1240. UNTIL((%#sleep_time%<1)||(%#id_unbug%!=124));
  1241. IF(%#id_unbug%=124);
  1242. DO(50);
  1243. LOOK(SOUTH);
  1244. KEYDOWN(FORWARD);
  1245. UNTIL(%ZPOS%=675);
  1246. WAIT(10T);
  1247. KEYUP(FORWARD);
  1248. ELSE;
  1249. UNSET(fim);
  1250. BREAK;
  1251. ENDIF;
  1252. ELSE;
  1253. SET(#sleep_inc_two,"");
  1254. LOOK(SOUTH);
  1255. LOOK(%&y_sleep%,%&p_sleep%);
  1256. IF(%#placa_dinamica%!=68);
  1257. KEYDOWN(SNEAK);
  1258. ENDIF;
  1259. WAIT(2T);
  1260. KEY(USE);
  1261. WAIT(4T);
  1262. KEYUP(SNEAK);
  1263. ENDIF;
  1264. ELSE;
  1265. BREAK;
  1266. ENDIF;
  1267. GETIDREL(0,-1,0,#id_unbug);
  1268. INC(#sleep_inc,1);
  1269. IF((%#id_unbug%=0)||(%#sleep_inc%>=50)||(%#sleep_inc_two%>=6));
  1270. UNSET(fim);
  1271. BREAK;
  1272. ENDIF;
  1273. LOOP;
  1274. ENDIF;
  1275. IF(!fim);
  1276. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema aconteceu, compra reiniciada. &9&o#SLEEP");
  1277. DO(6);
  1278. LOOK(%&sleep_look%);
  1279. KEYDOWN(BACK);
  1280. LOOP;
  1281. KEYUP(BACK);
  1282. ENDIF;
  1283. ELSE;
  1284. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema aconteceu, compra cancelada. &9&o#SLEEP");
  1285. SET(cancelar_compra);
  1286. ENDIF;
  1287. UNTIL(fim);
  1288. IF(!cancelar_compra);
  1289. DO(6);
  1290. LOOK(%&sleep_look%);
  1291. KEYDOWN(BACK);
  1292. LOOP;
  1293. KEYUP(BACK);
  1294. LOG("&6&l[&f&oM&facro&6&l] &aCompra de &flinhas &aconcluída. &9&o#SLEEP");
  1295. REPLACE(&buy,"x","concluída");
  1296. REPLACE(&buy,"concluída","x");
  1297. ENDIF;
  1298. ENDIF;
  1299. LOOP;
  1300.  
  1301. }$$
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!