API tools faq
paste
Advertisement
Guest User

Colheita Rodrigo

a guest
Mar 29th, 2020
110
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 122.38 KB | None | 0 0
raw download clone embed print report
  1. $${
  2.  
  3. // Versao/Upgrade: 0.2 [10-08-2019]
  4. // Verifique a versao mais atualizada! https://enrt.eu/macros
  5.  
  6. TOGGLE(sleep_macro);
  7. IF(sleep_macro);
  8. IF((KEY_LCONTROL)||(KEY_RCONTROL)||(!config_sc_save)||(baus_lotados));
  9. UNSET(configurar);
  10. UNSET(resposta_invalida);
  11. IF(config_sc_save);
  12. PROMPT(&sleep_first,"$$[ [Resetar,Reconfigurar]]","Resetar (zerar lucro/baús) ou reconfigurar?");
  13. IF(%&sleep_first%="Resetar");
  14. SET(#andar_atual,"1");
  15. SET(#pos_first_chest,"");
  16. SET(#pos_last_chest,"");
  17. SET(#bau_atual,"1");
  18. SET(#sleep_livros,"");
  19. SET(trap_salvar_coordenadas);
  20. SET(#fungos_venarm,"");
  21. SET(#sleep_msg_send,"");
  22. SET(#hora_save,"5454");
  23. UNSET(baus_lotados);
  24. UNSET(pos_save);
  25. ELSEIF(%&sleep_first%="Reconfigurar");
  26. SET(configurar);
  27. UNSET(config_sc_save);
  28. ELSE;
  29. SET(resposta_invalida);
  30. ENDIF;
  31. ELSE;
  32. SET(configurar);
  33. ENDIF;
  34. IF(configurar);
  35. DO;
  36. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  37. PROMPT(&sleep_quest_1,"$$[ [1,2,3,4,5,6,7,8,9,10,Mais]]","Quantos andares têm sua plantação?");
  38. SET(&ma1,"kb3x2at3iv2a3n2do3 a2 3ma2c3r2o:3 ");
  39. SET(&sleep_placas,"Sim");
  40. IFMATCHES("%&sleep_quest_1%","^1$|^2$|^3$|^4$|^5$|^6$|^7$|^8$|^9$|^10$|^Mais$");
  41. IF(%&sleep_quest_1%="Mais");
  42. DO;
  43. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  44. PROMPT(#sleep_quest_1,"$$?","Quantos andares têm sua plantação?");
  45. ELSE;
  46. SET(#sleep_quest_1,"%&sleep_quest_1%");
  47. ENDIF;
  48. IF(%#sleep_quest_1%>=1);
  49. DO;
  50. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  51. PROMPT(&sleep_quest_2,"$$[ [Vender na Warp VIP,Vender na Warp Loja,Armazenar]]","Vender ou armazenar os fungos?");
  52. IFMATCHES("%&sleep_quest_2%","^Vender na Warp VIP$|^Vender na Warp Loja$|^Armazenar$");
  53. DO;
  54. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  55. PROMPT(&sleep_quest_3,"$$[ [Sim,Não]]","Se alimentar durante a colheita? Apenas Filé, Frango e Carne de Porco Assada são compatíveis.");
  56. SET(&ma3,"3y2sl3e2ep3_c2o3lh2e3it2a3 x");
  57. IFMATCHES("%&sleep_quest_3%","^Sim$|^Não$");
  58. DO;
  59. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  60. PROMPT(#sleep_quest_4,"$$[ [1,2,3,4,5,6,7,8,9,10]]","De 1 (rápido) até 10 (lento), em qual velocidade você deseja colher os fungos?");
  61. IFMATCHES("%#sleep_quest_4%","^1$|^2$|^3$|^4$|^5$|^6$|^7$|^8$|^9$|^10$");
  62. DO;
  63. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  64. PROMPT(&sleep_quest_5,"$$[ [Sim,Não]]","Colher apenas fungos totalmente crescidos?");
  65. IFMATCHES("%&sleep_quest_5%","^Sim$|^Não$");
  66. LOG("");
  67. LOG("&6&l[&f&oM&facro&6&l] &aAguarde, verificando SleepOnChat e home(s)... &9&o#SLEEP");
  68. ACHIEVEMENTGET("Aguarde... #SLEEP","115");
  69. LOG("");
  70. WAIT(16T);
  71. SET(&coords_andares,"");
  72. SET(#coord_save,"%#sleep_quest_1%");
  73. SET(&ma5,"3(2u2p3g2.3 3yzx)3");
  74. SET(#sleep_shield,"");
  75. DO;
  76. DO;
  77. UNSET(@sleepteleport);
  78. UNSET(home_ok);
  79. UNSET(delay_teleport);
  80. IF(%GUI%!="GUIINVENTORY");
  81. GUI(INVENTORY);
  82. ENDIF;
  83. WAIT(1T);
  84. ECHO("/home sleepandar%#coord_save%");
  85. WAIT(10T);
  86. DO(250);
  87. IF(%GUI%!="GUIINVENTORY");
  88. GUI(INVENTORY);
  89. ENDIF;
  90. IF(@sleepteleport);
  91. IF(!delay_teleport);
  92. SET(delay_teleport);
  93. WAIT(20T);
  94. ENDIF;
  95. GETIDREL(0,0,0,#id1);
  96. GETIDREL(0,0,1,#id2);
  97. GETIDREL(0,0,-1,#id3);
  98. GETIDREL(1,0,0,#id4);
  99. GETIDREL(-1,0,0,#id5);
  100. IF(%#id1%=88);
  101. IF((%#id2%!=88)&&(%#id3%=88));
  102. IF((%#id4%=88)&&(%#id5%!=88));
  103. SET(home_ok);
  104. ENDIF;
  105. ENDIF;
  106. ENDIF;
  107. ENDIF;
  108. UNTIL((@sleepteleport)&&(home_ok));
  109. INC(#sleep_shield,1);
  110. IF(%#sleep_shield%=3);
  111. BREAK;
  112. ENDIF;
  113. UNTIL((@sleepteleport)&&(home_ok));
  114. IF((@sleepteleport)&&(home_ok));
  115. REPLACE(&ma1,"b","g ");
  116. REPLACE(&ma1,"k","/");
  117. SET(#sleep_shield,"");
  118. DO(20);
  119. IF(%GUI%!="GUIINVENTORY");
  120. GUI(INVENTORY);
  121. ENDIF;
  122. LOOP;
  123. SET(&coords_andares,"%&coords_andares%<A:%#coord_save% X:%XPOS% Y:%YPOS% Z:%ZPOS%>");
  124. ELSEIF(%#sleep_shield%=3);
  125. GUI();
  126. LOG("");
  127. IF(!@sleepteleport);
  128. LOG("&6&l[&f&oM&facro&6&l] &cVocê não instalou ou instalou errado a macro SleepOnChat.");
  129. LOG("&6&l[&f&oM&facro&6&l] &cPara instalar acesse este link:");
  130. LOG("&6&l[&f&oM&facro&6&l] &ahttps://enrt.eu/macros");
  131. ELSE;
  132. LOG("&6&l[&f&oM&facro&6&l] &cVocê não marcou ou marcou errado alguma home.);
  133. LOG("&6&l[&f&oM&facro&6&l] &cVeja como se deve marcar a(s) home(s):");
  134. LOG("&6&l[&f&oM&facro&6&l] &ahttps://prnt.sc/j58j9r");
  135. ENDIF;
  136. LOG("");
  137. WAIT(16T);
  138. LOG("&6&l[&f&oM&facro&6&l] &cSleep_Colheita &6&l[&4OFF&6&l]");
  139. ACHIEVEMENTGET("[OFF] Colheita Upg. 0.2","115");
  140. TOGGLE(sleep_macro);
  141. UNSET(@afk_onchat);
  142. STOP;
  143. ENDIF;
  144. DEC(#coord_save,1);
  145. UNTIL(%#coord_save%=0);
  146. IF(%&sleep_quest_3%="Sim");
  147. UNSET(sleep_erro_home_comida);
  148. LOG("");
  149. LOG("&6&l[&f&oM&facro&6&l] &aAguarde, verificando a home &fsleepcomida&a... &9&o#SLEEP");
  150. ACHIEVEMENTGET("Aguarde... #SLEEP","115");
  151. LOG("");
  152. WAIT(16T);
  153. DO(2);
  154. DO(3);
  155. UNSET(@sleepteleport);
  156. WAIT(1T);
  157. SET(#sleep_inc,"");
  158. ECHO("/home sleepcomida");
  159. WAIT(20T);
  160. DO;
  161. IF(%GUI%!="GUIINVENTORY");
  162. GUI(INVENTORY);
  163. ENDIF;
  164. INC(#sleep_inc,1);
  165. UNTIL((@sleepteleport)||(%#sleep_inc%>=250));
  166. WAIT(5T);
  167. WHILE(!@sleepteleport);
  168. UNTIL(!@sleepteleport);
  169. DO(100);
  170. GETIDREL(0,-1,0,#sleep_id);
  171. WHILE(%#sleep_id%=0);
  172. IF(%XPOS%>=600);
  173. SET(&dir_distanciar,"EAST");
  174. SET(#dir_distanciar,"731");
  175. IFMATCHES("%&sleep_placas%","^Sim$");
  176. SET(#hity_placa,"6");
  177. ELSE;
  178. SET(#hity_placa,"5");
  179. ENDIF;
  180. IF((%HITY%=%#hity_placa%)&&(%HITX%=736)&&((%HITZ%=670)||(%HITZ%=669)||(%HITZ%=676)));
  181. IF(%HITZ%=670);
  182. SET(#sleep_id_comida,"364");
  183. ELSEIF(%HITZ%=669);
  184. SET(#sleep_id_comida,"320");
  185. ELSE(%HITZ%=676);
  186. SET(#sleep_id_comida,"366");
  187. ENDIF;
  188. ELSE;
  189. SET(sleep_erro_home_comida);
  190. ENDIF;
  191. IF(%XPOS%=736);
  192. SET(sleep_erro_home_comida);
  193. ENDIF;
  194. ELSE;
  195. SET(&dir_distanciar,"NORTH");
  196. SET(#dir_distanciar,"610");
  197. IFMATCHES("%&sleep_placas%","^Sim$");
  198. SET(#hity_placa,"7");
  199. ELSE;
  200. SET(#hity_placa,"6");
  201. ENDIF;
  202. IF((%HITY%=%#hity_placa%)&&(%HITZ%=605)&&((%HITX%=-663)||(%HITX%=-662)||(%HITX%=-661)));
  203. IF(%HITX%=-663);
  204. SET(#sleep_id_comida,"364");
  205. ELSEIF(%HITX%=-662);
  206. SET(#sleep_id_comida,"366");
  207. ELSE(%HITX%=-661);
  208. SET(#sleep_id_comida,"320");
  209. ENDIF;
  210. ELSE;
  211. SET(sleep_erro_home_comida);
  212. ENDIF;
  213. IF(%ZPOS%=605);
  214. SET(sleep_erro_home_comida);
  215. ENDIF;
  216. ENDIF;
  217. IF((sleep_erro_home_comida)||(!@sleepteleport));
  218. GUI();
  219. LOG("");
  220. LOG("&6&l[&f&oM&facro&6&l] &cVocê não marcou ou marcou errado a home &fsleepcomida&c.);
  221. LOG("");
  222. LOG("&6&l[&f&oM&facro&6&l] &cMarque a home na &fWarp Loja &cou na &fWarp VIP &colhando para uma das placas que vendem &fFilé&c, &fFrango &cou &fCarne de Porco Assada &cem pack.);
  223. LOG("&6&l[&f&oM&facro&6&l] &cNão é possível marcar a home encostado na placa.);
  224. LOG("");
  225. WAIT(16T);
  226. LOG("&6&l[&f&oM&facro&6&l] &cSleep_Colheita &6&l[&4OFF&6&l]");
  227. ACHIEVEMENTGET("[OFF] Colheita Upg. 0.2","115");
  228. TOGGLE(sleep_macro);
  229. UNSET(@afk_onchat);
  230. STOP;
  231. ELSE;
  232. LOOK(%YAW%,%PITCH%);
  233. WAIT(1T);
  234. SET(#sleep_yaw_placa,"%YAW%");
  235. SET(#sleep_pitch_placa,"%PITCH%");
  236. LOOK(%#sleep_yaw_placa%,%#sleep_pitch_placa%);
  237. ENDIF;
  238. ENDIF;
  239. IF(%&sleep_quest_2%="Vender na Warp Loja");
  240. UNSET(sleep_erro_home_venda);
  241. LOG("");
  242. LOG("&6&l[&f&oM&facro&6&l] &aAguarde, verificando a home &fsleepfv&a... &9&o#SLEEP");
  243. ACHIEVEMENTGET("Aguarde... #SLEEP","115");
  244. LOG("");
  245. WAIT(16T);
  246. DO(2);
  247. DO(3);
  248. UNSET(@sleepteleport);
  249. WAIT(1T);
  250. SET(#sleep_inc,"");
  251. ECHO("/home sleepfv");
  252. WAIT(20T);
  253. DO;
  254. IF(%GUI%!="GUIINVENTORY");
  255. GUI(INVENTORY);
  256. ENDIF;
  257. INC(#sleep_inc,1);
  258. UNTIL((@sleepteleport)||(%#sleep_inc%>=250));
  259. WAIT(5T);
  260. WHILE(!@sleepteleport);
  261. UNTIL(!@sleepteleport);
  262. DO(100);
  263. GETIDREL(0,-1,0,#sleep_id);
  264. WHILE(%#sleep_id%=0);
  265. IF((%YPOS%=6)&&(%ZPOS%=605)&&((%XPOS%=-645)||(%XPOS%=-646)||(%XPOS%=-644)));
  266. SET(sleep_erro_home_venda);
  267. ELSE;
  268. SET(#xpos_fv,"%XPOS%");
  269. SET(#zpos_fv,"%ZPOS%");
  270. ENDIF;
  271. IF((sleep_erro_home_venda)||(!@sleepteleport));
  272. GUI();
  273. LOG("");
  274. LOG("&6&l[&f&oM&facro&6&l] &cVocê não marcou ou marcou errado a home &fsleepfv&c.);
  275. LOG("");
  276. LOG("&6&l[&f&oM&facro&6&l] &cMarque a home na &fWarp Loja &cpróximo a placa que compra &fFungo do Nether&c.);
  277. LOG("&6&l[&f&oM&facro&6&l] &cNão é possível marcar a home encostado na placa.);
  278. LOG("");
  279. WAIT(16T);
  280. LOG("&6&l[&f&oM&facro&6&l] &cSleep_Colheita &6&l[&4OFF&6&l]");
  281. ACHIEVEMENTGET("[OFF] Colheita Upg. 0.2","115");
  282. TOGGLE(sleep_macro);
  283. UNSET(@afk_onchat);
  284. STOP;
  285. ENDIF;
  286. ENDIF;
  287. IF((%&sleep_quest_2%="Vender na Warp VIP")||(%&sleep_quest_2%="Vender na Warp Loja"));
  288. SET(&sleep_msg_1,"a venda");
  289. ELSEIF(%&sleep_quest_2%="Armazenar");
  290. SET(&sleep_msg_1,"o armazenamento");
  291. ENDIF;
  292. IF(%#sleep_quest_4%=1);
  293. #sleep_delay = 1;
  294. ELSE;
  295. #sleep_delay = %#sleep_quest_4% * 10;
  296. ENDIF;
  297. IF(%&sleep_quest_5%="Sim");
  298. SET(#sleep_quest_5,"3");
  299. ELSE;
  300. SET(#sleep_quest_5,"1");
  301. ENDIF;
  302. GUI();
  303. SET(#pos_first_chest,"");
  304. SET(#pos_last_chest,"");
  305. SET(#bau_atual,"1");
  306. SET(#sleep_livros,"");
  307. SET(#andar_atual,"1");
  308. SET(trap_salvar_coordenadas);
  309. SET(&ma,"%&ma1%%&ma3%%&ma5%");
  310. SET(#fungos_venarm,"");
  311. SET(#sleep_msg_send,"");
  312. SET(#hora_save,"5454");
  313. SET(config_sc_save);
  314. UNSET(pos_save);
  315. UNSET(baus_lotados);
  316. REPLACE(&ma,"2","");
  317. REPLACE(&ma,"z","0.2");
  318. REPLACE(&ma,"3","");
  319. REPLACE(&ma,"y","&f");
  320. LOG("");
  321. LOG("&6&l[&f&oM&facro&6&l] &aPara entrar nas configurações novamente pressione as teclas &f&lCTRL &a+ &f&l%KEYNAME%&a.");
  322. LOG("");
  323. WAIT(80T);
  324. PROMPT(&sleep_quest_6,"$$[ [Não,Sim]]","Tutorial: Sabe entrar nas configurações novamente?");
  325. IF(%&sleep_quest_6%="Não");
  326. LOG("");
  327. LOG("&6&l[&f&oM&facro&6&l] &aVocê só precisa apertar a tecla &f&lCTRL &ae ligar essa macro.");
  328. LOG("&8------------ &f&lCTRL &a+ &f&l%KEYNAME% &8------------");
  329. LOG("");
  330. WAIT(100T);
  331. ENDIF;
  332. ELSE;
  333. SET(resposta_invalida);
  334. ENDIF;
  335. ELSE;
  336. SET(resposta_invalida);
  337. ENDIF;
  338. ELSE;
  339. SET(resposta_invalida);
  340. ENDIF;
  341. ELSE;
  342. SET(resposta_invalida);
  343. ENDIF;
  344. ELSE;
  345. SET(resposta_invalida);
  346. ENDIF;
  347. ELSE;
  348. SET(resposta_invalida);
  349. ENDIF;
  350. ENDIF;
  351. IF(resposta_invalida);
  352. LOG("");
  353. LOG("&6&l[&f&oM&facro&6&l] &cResposta inválida. &9&o#SLEEP");
  354. LOG("");
  355. LOG("&6&l[&f&oM&facro&6&l] &cSleep_Colheita &6&l[&4OFF&6&l]");
  356. ACHIEVEMENTGET("[OFF] Colheita Upg. 0.2","115");
  357. TOGGLE(sleep_macro);
  358. UNSET(@afk_onchat);
  359. STOP;
  360. ENDIF;
  361. ENDIF;
  362. SET(@afk_onchat);
  363. SET(@&afk_onchat_bn,"");
  364. UNSET(fungo_nao_encontrado);
  365. UNSET(inventario_cheio);
  366. UNSET(comprar_comida);
  367. UNSET(fileira_trocar);
  368. UNSET(mudar_andar);
  369. UNSET(forcar_comer);
  370. UNSET(sleepft);
  371. CLEARCHAT;
  372. LOG("&6&l[&f&oM&facro&6&l] &aSleep_Colheita &6&l[&2ON&6&l]");
  373. ACHIEVEMENTGET("[ON] Colheita Upg. 0.2","115");
  374. LOG("");
  375. LOG("&6&l[&f&oM&facro&6&l] &aConfiguração:");
  376. IF(%#sleep_quest_1%=1);
  377. LOG("&6&l[&f&oM&facro&6&l] &f&oAndar: &a%#sleep_quest_1%");
  378. ELSE;
  379. LOG("&6&l[&f&oM&facro&6&l] &f&oAndares: &a%#sleep_quest_1%");
  380. ENDIF;
  381. IF(%&sleep_quest_2%="Vender na Warp VIP");
  382. LOG("&6&l[&f&oM&facro&6&l] &f&oVender os fungos: &aSim &f&ona &aWarp VIP");
  383. ELSEIF(%&sleep_quest_2%="Vender na Warp Loja");
  384. LOG("&6&l[&f&oM&facro&6&l] &f&oVender os fungos: &aSim &f&ona &aWarp Loja");
  385. ELSEIF(%&sleep_quest_2%="Armazenar");
  386. IF(baus_lotados);
  387. LOG("&6&l[&f&oM&facro&6&l] &f&oArmazenar os fungos: &aSim");
  388. LOG("&c(não é mais &cpossível &carmazenar, esvazie os baús e clique em \"resetar\" ao ligar a macro)");
  389. ELSE;
  390. LOG("&6&l[&f&oM&facro&6&l] &f&oArmazenar os fungos: &aSim");
  391. ENDIF;
  392. ENDIF;
  393. TIME(#hora_atual,hh);
  394. IF(%#hora_atual%!=%#hora_save%);
  395. SET(sleep_send);
  396. SET(#hora_save,"%#hora_atual%");
  397. ELSE;
  398. UNSET(sleep_send);
  399. ENDIF;
  400. IF(%#sleep_msg_send%=0);
  401. SET(sleep_send);
  402. SET(#sleep_msg_send,"1");
  403. ENDIF;
  404. IF(sleep_send);
  405. SET(&armazem,"%&ma%");
  406. REPLACE(&armazem,"x","&a");
  407. ENDIF;
  408. SET(&credit,"5sl5ee5p_5co5lh5ei5ta5 (5up5g.5 50.52)5");
  409. SET(&buy,"5co5mp5ra5 d5e 5co5mi5da5s 5x.");
  410. SET(&sell,"5ve5nd5a 5de5 f5un5go5s 5x.5");
  411. IF(%&sleep_quest_3%="Sim");
  412. LOG("&6&l[&f&oM&facro&6&l] &f&oSe alimentar durante a colheita: &aSim");
  413. ELSE;
  414. LOG("&6&l[&f&oM&facro&6&l] &f&oSe alimentar durante a colheita: &cNão");
  415. ENDIF;
  416. IF(%&sleep_quest_5%="Sim");
  417. LOG("&6&l[&f&oM&facro&6&l] &f&oColher apenas fungos totalmente crescidos: &aSim");
  418. ELSE;
  419. LOG("&6&l[&f&oM&facro&6&l] &f&oColher apenas fungos totalmente crescidos: &cNão");
  420. ENDIF;
  421. LOG("&6&l[&f&oM&facro&6&l] &f&oVelocidade da colheita: &a%#sleep_quest_4%");
  422. LOG("");
  423. REPLACE(&credit,"5","");
  424. REPLACE(&buy,"5","");
  425. REPLACE(&sell,"5","");
  426. ELSE;
  427. LOG("&6&l[&f&oM&facro&6&l] &cSleep_Colheita &6&l[&4OFF&6&l]");
  428. ACHIEVEMENTGET("[OFF] Colheita Upg. 0.2","115");
  429. IF(config_sc_save);
  430. LOG("");
  431. #lucro_fungos = %#fungos_venarm% * 96;
  432. IF((%&sleep_quest_2%="Vender na Warp VIP")||(%&sleep_quest_2%="Vender na Warp Loja"));
  433. LOG("&6&l[&f&oM&facro&6&l] &aVenda de fungos:");
  434. IF(%#fungos_venarm%>=1);
  435. LOG("&6&l[&f&oM&facro&6&l] &f&oVendidos (em packs): &a%#fungos_venarm% &7- &f&oLucro estimado: &a%#lucro_fungos% &f&ocoins");
  436. ELSE;
  437. LOG("&6&l[&f&oM&facro&6&l] &f&oVendidos: &cNenhum &7- &f&oLucro total: &cSem lucro");
  438. ENDIF;
  439. ELSEIF(%&sleep_quest_2%="Armazenar");
  440. LOG("&6&l[&f&oM&facro&6&l] &aTrap de baús:");
  441. IF(baus_lotados);
  442. #bau_atual_mostrar = %#bau_atual% - 1;
  443. LOG("&6&l[&f&oM&facro&6&l] &f&oBaú de armazenamento atual: &4%#bau_atual_mostrar%&cº");
  444. LOG("&c(não é mais &cpossível &carmazenar, esvazie os baús e clique em \"resetar\" ao ligar a macro)");
  445. ELSE;
  446. LOG("&6&l[&f&oM&facro&6&l] &f&oBaú de armazenamento atual: &a%#bau_atual%&fº");
  447. ENDIF;
  448. IF(%#fungos_venarm%>=1);
  449. LOG("&6&l[&f&oM&facro&6&l] &f&oArmazenados (em packs): &a%#fungos_venarm% &7- &f&oLucro estimado: &a%#lucro_fungos% &f&ocoins");
  450. ELSE;
  451. LOG("&6&l[&f&oM&facro&6&l] &f&oArmazenados: &cNenhum &7- &f&oLucro estimado: &cSem lucro");
  452. ENDIF;
  453. IF(%#sleep_livros%=1);
  454. LOG("");
  455. LOG("&6&l[&f&oM&facro&6&l] &f&oTesouro encontrado: &a%#sleep_livros%");
  456. ELSEIF(%#sleep_livros%>1);
  457. LOG("");
  458. LOG("&6&l[&f&oM&facro&6&l] &f&oTesouros encontrados: &a%#sleep_livros%");
  459. ENDIF;
  460. ENDIF;
  461. LOG("");
  462. ENDIF;
  463. KEYUP(FORWARD);
  464. KEYUP(LEFT);
  465. KEYUP(RIGHT);
  466. KEYUP(SNEAK);
  467. KEYUP(BACK);
  468. IF(sleep_send);
  469. UNSET(sleep_send);
  470. SET(&armazem,"%&ma%");
  471. REPLACE(&armazem,"x","&c");
  472. REPLACE(&armazem,"at","desat");
  473. ENDIF;
  474. UNSET(@afk_onchat);
  475. STOP;
  476. ENDIF;
  477. DO;
  478. SET(#sleep_tentativas,"");
  479. IF((pos_save)&&(!mudar_andar));
  480. SET(&sleep_home,"sleepft");
  481. SET(sleep_look_last);
  482. UNSET(verificar_coord);
  483. ELSE;
  484. IF(mudar_andar);
  485. SET(sleepft);
  486. UNSET(mudar_andar);
  487. INC(#andar_atual,1);
  488. IF(%#andar_atual%>%#sleep_quest_1%);
  489. SET(#andar_atual,"1");
  490. ENDIF;
  491. ECHO("/sethome sleepft");
  492. WAIT(12T);
  493. ENDIF;
  494. SET(&sleep_home,"sleepandar%#andar_atual%");
  495. SET(verificar_coord);
  496. UNSET(sleep_look_last);
  497. ENDIF;
  498. DO;
  499. GUI();
  500. UNSET(@sleepteleport);
  501. UNSET(delay_teleport);
  502. WAIT(1T);
  503. IF(%#sleep_tentativas%=10);
  504. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema aconteceu. &9&o#SLEEP");
  505. LOG("&6&l[&f&oM&facro&6&l] &cTentando resolver... &9&o#SLEEP");
  506. SET(sleepft);
  507. UNSET(mudar_andar);
  508. INC(#andar_atual,1);
  509. IF(%#andar_atual%>%#sleep_quest_1%);
  510. SET(#andar_atual,"1");
  511. ENDIF;
  512. ECHO("/sethome sleepft");
  513. WAIT(12T);
  514. SET(&sleep_home,"sleepandar%#andar_atual%");
  515. SET(verificar_coord);
  516. UNSET(sleep_look_last);
  517. ENDIF;
  518. IF(verificar_coord);
  519. SET(&coords,"A:%#andar_atual% X:%XPOS% Y:%YPOS% Z:%ZPOS%");
  520. IFMATCHES("%&coords_andares%","<%&coords%>");
  521. SET(#ypos_ftemp,"%YPOS%");
  522. SET(#zpos_set,"%ZPOS%");
  523. BREAK;
  524. ELSE;
  525. ECHO("/home %&sleep_home%");
  526. WAIT(10T);
  527. UNSET(coord_ok);
  528. ENDIF;
  529. ELSE;
  530. ECHO("/home %&sleep_home%");
  531. WAIT(10T);
  532. SET(coord_ok);
  533. ENDIF;
  534. #soulsand = 5454;
  535. #sleep_af = 5454;
  536. UNSET(ok1);
  537. DO(250);
  538. IF(@sleepteleport);
  539. IF(!delay_teleport);
  540. SET(delay_teleport);
  541. WAIT(20T);
  542. ENDIF;
  543. IF(verificar_coord);
  544. SET(&coords,"A:%#andar_atual% X:%XPOS% Y:%YPOS% Z:%ZPOS%");
  545. IFMATCHES("%&coords_andares%","<%&coords%>");
  546. SET(coord_ok);
  547. ELSE;
  548. UNSET(coord_ok);
  549. ENDIF;
  550. ENDIF;
  551. GETIDREL(0,0,0,#soulsand);
  552. GETIDREL(0,1,0,#sleep_af);
  553. IF(%#soulsand%=88);
  554. IF((%#sleep_af%=0)||(%#sleep_af%=115));
  555. SET(ok1);
  556. ENDIF;
  557. ENDIF;
  558. ENDIF;
  559. UNTIL((@sleepteleport)&&(coord_ok)&&(ok1));
  560. IF((ok1)&&(%#sleep_tentativas%=5));
  561. SET(#ypos_ftemp,"%YPOS%");
  562. SET(&sleep_home,"sleepft");
  563. SET(sleep_look_last);
  564. SET(coord_ok);
  565. UNSET(verificar_coord);
  566. ENDIF;
  567. DO(10);
  568. IF(verificar_coord);
  569. SET(&coords,"A:%#andar_atual% X:%XPOS% Y:%YPOS% Z:%ZPOS%");
  570. IFMATCHES("%&coords_andares%","<%&coords%>");
  571. SET(#ypos_ftemp,"%YPOS%");
  572. SET(#zpos_set,"%ZPOS%");
  573. SET(coord_ok);
  574. ELSE;
  575. UNSET(coord_ok);
  576. ENDIF;
  577. ENDIF;
  578. LOOP;
  579. INC(#sleep_tentativas,1);
  580. UNTIL((@sleepteleport)&&(coord_ok)&&(%YPOS%=%#ypos_ftemp%));
  581. IF((sleep_look_last)&&(%#sleep_shield_colheita%<10));
  582. DO(4);
  583. GETIDREL(0,0,0,#soulsand);
  584. GETIDREL(0,1,0,#sleep_af);
  585. UNTIL((%#soulsand%=88)&&((%#sleep_af%=0)||(%#sleep_af%=115)));
  586. LOOK(%&look_ftemp%);
  587. ENDIF;
  588. SET(#sleep_shield_colheita,"");
  589. SET(#fungo_nao_encontrado,"");
  590. IF(%DIRECTION%="S");
  591. SET(&sleep_match,"<1.SOUTH><2.RIGHT><3.180><4.1>");
  592. SET(&comer_dir,"SOUTH");
  593. ELSE;
  594. SET(&sleep_match,"<1.NORTH><2.LEFT><3.0><4.-1>");
  595. SET(&comer_dir,"NORTH");
  596. ENDIF;
  597. IF(forcar_comer);
  598. UNSET(forcar_comer);
  599. DO(5);
  600. SET(#sleep_shield,"");
  601. IF(%GUI%="INVENTORY");
  602. GUI();
  603. ENDIF;
  604. DO;
  605. LOOK(%&comer_dir%);
  606. PICK(%#sleep_id_comida%);
  607. KEY(USE);
  608. INC(#sleep_shield,1);
  609. UNTIL((%HUNGER%>=16)||(%#sleep_shield%>=150)||(%STACKSIZE%=0));
  610. WAIT(5T);
  611. UNTIL((%HUNGER%>=16)||(%STACKSIZE%=0));
  612. ENDIF;
  613. GUI();
  614. KEYUP(FORWARD);
  615. KEYUP(LEFT);
  616. KEYUP(RIGHT);
  617. KEYUP(SNEAK);
  618. KEYUP(BACK);
  619. DO;
  620. IFMATCHES("%&sleep_match%","^<1.(.+)><2.(.+)><3.(.+)><4.(.+)>$");
  621. MATCH("%&sleep_match%","^<1.(.+)><2.(.+)><3.(.+)><4.(.+)>$",{&look,&mov,#yaw,#drel_1});
  622. ENDIF;
  623. IF(sleepft);
  624. UNSET(sleepft);
  625. SET(#getslot,"9");
  626. SET(#slot_vazio_cont,"");
  627. TYPE("E");
  628. WAIT(2T);
  629. UNSAFE;
  630. DO;
  631. GETSLOT(0,#slot_vazio,%#getslot%);
  632. IF(%#slot_vazio%!=-1);
  633. INC(#slot_vazio_cont,1);
  634. #getslot = %#slot_vazio% + 1;
  635. ENDIF;
  636. UNTIL((%#slot_vazio_cont%=4)||(%#slot_vazio%=-1));
  637. ENDUNSAFE;
  638. TYPE("E");
  639. WAIT(2T);
  640. IF((%ZPOS%=%#zpos_set%)||(%#slot_vazio_cont%<=3));
  641. UNSET(@sleepsethome);
  642. DO;
  643. LOOK(%&look%);
  644. ECHO("/sethome sleepft");
  645. DO(60);
  646. UNTIL(@sleepsethome);
  647. WHILE(!@sleepsethome);
  648. SET(&look_ftemp,"%&look%");
  649. SET(pos_save);
  650. ENDIF;
  651. IF(fungo_nao_encontrado);
  652. INC(#fungo_nao_encontrado,1);
  653. IF(%#fungo_nao_encontrado%>=3);
  654. BREAK;
  655. ELSE;
  656. UNSET(fungo_nao_encontrado);
  657. ENDIF;
  658. ENDIF;
  659. IF((%&sleep_quest_3%="Sim")&&(%HUNGER%<=6));
  660. SLOT(9);
  661. UNSET(comprar_comida);
  662. IF((%ITEM%=%#sleep_id_comida%)&&(%STACKSIZE%>=2));
  663. ELSE;
  664. GUI(INVENTORY);
  665. GETSLOT(%#sleep_id_comida%,#slot);
  666. IF((%#slot%=-1)||(%#slot%=44));
  667. SLOTCLICK(44,L,TRUE);
  668. LOG("&6&l[&f&oM&facro&6&l] &aCompra de comidas habilitada. &9&o#SLEEP");
  669. SET(comprar_comida);
  670. SET(inventario_cheio);
  671. BREAK;
  672. ENDIF;
  673. SLOTCLICK(%#slot%,L,FALSE);
  674. WAIT(6T);
  675. SLOTCLICK(44,L,FALSE);
  676. WAIT(6T);
  677. SLOTCLICK(%#slot%,L,FALSE);
  678. WAIT(6T);
  679. GUI();
  680. ENDIF;
  681. DO(5);
  682. SET(#sleep_shield,"");
  683. LOOK(%&look%);
  684. DO;
  685. SLOT(9);
  686. KEY(USE);
  687. INC(#sleep_shield,1);
  688. UNTIL((%HUNGER%>=16)||(%#sleep_shield%>=150)||(%STACKSIZE%=0));
  689. WAIT(4T);
  690. UNTIL((%HUNGER%>=16)||(%STACKSIZE%=0));
  691. ENDIF;
  692. GUI();
  693. IF(%#slot_vazio_cont%<=3);
  694. LOG("&6&l[&f&oM&facro&6&l] &aPoucos slots livres, iniciando %&sleep_msg_1%. &9&o#SLEEP");
  695. SET(inventario_cheio);
  696. BREAK;
  697. ELSE;
  698. LOG("&6&l[&f&oM&facro&6&l] &aInventário ainda vazio. &9&o#SLEEP");
  699. ENDIF;
  700. ENDIF;
  701. UNSAFE;
  702. LOOK(%#yaw%,90);
  703. GETIDREL(0,0,0,#soulsand);
  704. GETIDREL(0,1,0,#fungo_1,#data_1);
  705. GETIDREL(0,0,%#drel_1%,#id_1);
  706. &a = "nothing";
  707. IF((%#fungo_1%=115)&&(%#data_1%>=%#sleep_quest_5%));
  708. &a = "colepla";
  709. ELSEIF((%#fungo_1%!=115)&&(%#soulsand%=88));
  710. &a = "plantar";
  711. ENDIF;
  712. IF((%&a%!="nothing")&&((%FPS%<21)||(%#sleep_quest_4%>1)));
  713. KEYUP(FORWARD);
  714. ENDIF;
  715. IF(%&a%="colepla");
  716. SLOT(1);
  717. WAIT(%#sleep_delay%MS);
  718. KEY(ATTACK);
  719. WAIT(%#sleep_delay%MS);
  720. SET(&a,"plantar");
  721. ENDIF;
  722. IF(%&a%="plantar");
  723. PICK(372);
  724. IF((%ITEM%!=372)&&(!fungo_nao_encontrado));
  725. GUI(INVENTORY);
  726. GETSLOT(372,#sleep_slot);
  727. IF((%#sleep_slot%!=-1)&&(%#sleep_slot%<36));
  728. SLOTCLICK(%#sleep_slot%,L,TRUE);
  729. ELSE;
  730. SET(fungo_nao_encontrado);
  731. ENDIF;
  732. PICK(372);
  733. GUI();
  734. ENDIF;
  735. WAIT(%#sleep_delay%MS);
  736. KEY(USE);
  737. WAIT(%#sleep_delay%MS);
  738. ENDIF;
  739. GETIDREL(-1,1,0,#fungo_plant);
  740. GETIDREL(-1,0,0,#soulsand_plant);
  741. IF((%#fungo_plant%=0)&&(%#soulsand_plant%=88));
  742. PICK(372);
  743. IF(%ITEM%=372);
  744. KEYUP(FORWARD);
  745. LOOK(270,53);
  746. WAIT(%#sleep_delay%MS);
  747. KEY(USE);
  748. WAIT(%#sleep_delay%MS);
  749. LOOK(%#yaw%,90);
  750. ENDIF;
  751. ENDIF;
  752. IF(%GUI%!="NONE");
  753. KEYUP(FORWARD);
  754. IF(%GUI%="GUICHAT");
  755. LOG("&6&l[&f&oM&facro&6&l] &aChat detectado, feche para continuar ou pressione as teclas &f&lM &a+ &f&lN &apara executar uma ação. &9&o#SLEEP");
  756. DO;
  757. UNTIL((%GUI%!="GUICHAT")||((KEY_N)&&(KEY_M)));
  758. IF((KEY_N)&&(KEY_M))
  759. GUI();
  760. PROMPT(&menu,"$$[ [%&sleep_quest_2%,Trocar andar]]","Qual ação você deseja executar agora?");
  761. IF((%&menu%="Vender na Warp VIP")||(%&menu%="Vender na Warp Loja")||(%&menu%="Armazenar"));
  762. LOG("&6&l[&f&oM&facro&6&l] &aForçando %&sleep_msg_1%. &9&o#SLEEP");
  763. SET(inventario_cheio);
  764. BREAK;
  765. ELSEIF(%&menu%="Trocar andar");
  766. LOG("&6&l[&f&oM&facro&6&l] &aForçando troca de andar. &9&o#SLEEP");
  767. SET(mudar_andar);
  768. BREAK;
  769. ENDIF;
  770. ENDIF;
  771. ELSE;
  772. LOG("&6&l[&f&oM&facro&6&l] &aJanela detectada, continuando em &f3 &asegundos. &9&o#SLEEP");
  773. WAIT(3);
  774. ENDIF;
  775. LOOK(%#yaw%,90);
  776. GUI();
  777. ENDIF;
  778. ENDUNSAFE;
  779. IF(%#id_1%=88);
  780. KEYDOWN(FORWARD);
  781. SPRINT;
  782. ELSE;
  783. KEYUP(FORWARD);
  784. GETIDREL(1,0,0,#soulsand);
  785. GETIDREL(0,0,%#drel_1%,#id_1);
  786. IF(%YPOS%!=%#ypos_ftemp%);
  787. INC(#sleep_shield_colheita,1);
  788. LOG("&6&l[&f&oM&facro&6&l] &cPosição inválida &f[&c%#sleep_shield_colheita%&f/&c10&f]&c. &9&o#SLEEP");
  789. WAIT(30T);
  790. ELSEIF((%#soulsand%=88)&&(%#id_1%!=88));
  791. LOOK(%&look%);
  792. LOOK(+180,+0);
  793. IF(%DIRECTION%="S");
  794. SET(&sleep_match,"<1.SOUTH><2.RIGHT><3.180><4.1>");
  795. ELSE;
  796. SET(&sleep_match,"<1.NORTH><2.LEFT><3.0><4.-1>");
  797. ENDIF;
  798. SET(#sleep_shield,"");
  799. SET(#xpos_atual,"%XPOS%");
  800. SET(sleepft);
  801. IF(%ZPOS%=%#zpos_set%);
  802. ECHO("/sethome sleepft");
  803. ENDIF;
  804. DO(150);
  805. KEYDOWN(%&mov%);
  806. IF(%XPOS%!=%#xpos_atual%);
  807. KEYDOWN(SNEAK);
  808. INC(#sleep_shield,1);
  809. ENDIF;
  810. UNTIL((%XPOS%!=%#xpos_atual%)&&(%#sleep_shield%=9));
  811. KEYUP(%&mov%);
  812. KEYUP(SNEAK);
  813. ELSEIF((%#soulsand%!=88)&&(%#id_1%!=88));
  814. LOG("&6&l[&f&oM&facro&6&l] &aAndar colhido. &9&o#SLEEP");
  815. SET(mudar_andar);
  816. ENDIF;
  817. ENDIF;
  818. UNTIL((%#sleep_shield_colheita%=10)||(mudar_andar));
  819. IF(%#sleep_shield_colheita%=10);
  820. UNSET(sleepft);
  821. ENDIF;
  822. IF(inventario_cheio);
  823. UNSET(inventario_cheio);
  824. SET(#getslot,"9");
  825. SET(#itens_inv_armazenar,"");
  826. UNSAFE;
  827. DO;
  828. IF(%GUI%!="GUIINVENTORY");
  829. GUI(INVENTORY);
  830. ENDIF;
  831. GETSLOT(372,#slot_fungo,%#getslot%);
  832. IF(%#slot_fungo%!=-1);
  833. INC(#itens_inv_armazenar,1);
  834. #getslot = %#slot_fungo% + 1;
  835. ENDIF;
  836. UNTIL(%#slot_fungo%=-1);
  837. IF(%&sleep_quest_3%="Sim");
  838. GETSLOTITEM(44,#sleep_id);
  839. IF(%#sleep_id%=%#sleep_id_comida%);
  840. ELSE;
  841. SLOTCLICK(44,L,TRUE);
  842. ENDIF;
  843. ENDIF;
  844. ENDUNSAFE;
  845. #fva = %#itens_inv_armazenar% - 1;
  846. IF(%#itens_inv_armazenar%<=1);
  847. LOG("&6&l[&f&oM&facro&6&l] &cFungos insuficientes para iniciar a venda. &9&o#SLEEP");
  848. ELSE;
  849. IF(%&sleep_quest_2%="Vender na Warp VIP");
  850. SET(#id_item,"372");
  851. SET(#coord_item_1,"691");
  852. SET(#coord_item_2,"722");
  853. SET(#sleep_yaw_576,"144");
  854. SET(#sleep_pitch_576,"17");
  855. SET(#sleep_yaw_64,"144");
  856. SET(#sleep_pitch_64,"0");
  857. SET(sell);
  858. DO;
  859. SET(stop);
  860. DO(2);
  861. DO;
  862. GUI();
  863. UNSET(@sleepteleport);
  864. WAIT(1T);
  865. SET(#sleep_inc,"");
  866. ECHO("/warp vip");
  867. DO(200);
  868. GETIDREL(0,-1,0,#sleepteleport);
  869. IF(%#sleepteleport%=57);
  870. INC(#sleep_inc,1);
  871. ELSE;
  872. SET(#sleep_inc,"");
  873. ENDIF;
  874. UNTIL((@sleepteleport)||(%#sleep_inc%=47));
  875. IF(%#sleep_inc%=47);
  876. BREAK;
  877. ELSE;
  878. WAIT(3T);
  879. ENDIF;
  880. WHILE(!@sleepteleport);
  881. UNTIL(%#sleep_inc%=47);
  882. SET(#sleep_inc,"");
  883. UNSET(player_atrapalhando);
  884. UNSET(menuloja);
  885. IF(%#id_item%=372);
  886. SET(#passos,"1");
  887. DO;
  888. UNSET(sleep_zpos);
  889. UNSET(sleep_xpos);
  890. IF(%#passos%=1);
  891. SET(#sleep_yaw,"180");
  892. SET(#sleep_pitch,"0");
  893. SET(sleep_zpos);
  894. SET(#sleep_coord,"659");
  895. SET(#sleep_coord_sneak,"658");
  896. SET(&sleep_move,"FORWARD");
  897. ELSEIF(%#passos%=2);
  898. SET(#sleep_yaw,"124");
  899. SET(#sleep_pitch,"0");
  900. SET(sleep_xpos);
  901. SET(#sleep_coord,"722");
  902. SET(#sleep_coord_sneak,"721");
  903. SET(&sleep_move,"FORWARD");
  904. ELSEIF(%#passos%=3);
  905. IF(!menuloja);
  906. ECHO("/menuloja off");
  907. SET(menuloja);
  908. SET(#sleep_inc,"");
  909. ENDIF;
  910. SET(#sleep_pitch,"0");
  911. SET(sleep_zpos);
  912. SET(#sleep_coord,"%#coord_item_1%");
  913. #sleep_coord_sneak = %#coord_item_1% - 1;
  914. IF(%#id_item%=372);
  915. SET(&sleep_move,"FORWARD");
  916. SET(#sleep_yaw,"180");
  917. ENDIF;
  918. ELSEIF(%#passos%=4);
  919. SET(#sleep_pitch,"0");
  920. SET(sleep_xpos);
  921. SET(#sleep_coord,"%#coord_item_2%");
  922. IF(%#id_item%=372);
  923. SET(&sleep_move,"NADA");
  924. SET(#sleep_yaw,"180");
  925. ENDIF;
  926. ENDIF;
  927. LOOK(%#sleep_yaw%,%#sleep_pitch%);
  928. IF((%HIT%="PLAYER")&&(%#passos%>=3)&&(%ZPOS%<689)&&(!player_atrapalhando));
  929. ECHO("/esconder");
  930. DO(2);
  931. RANDOM(#sleep_delay_esperar,325,200);
  932. DO;
  933. IF(%GUI%!="GUIINVENTORY");
  934. GUI(INVENTORY);
  935. ENDIF;
  936. KEYUP(%&sleep_move%);
  937. LOOK(%#sleep_yaw%,%#sleep_pitch%);
  938. DEC(#sleep_delay_esperar,1);
  939. UNTIL((%#sleep_delay_esperar%<1)||(%HIT%!="PLAYER"));
  940. WHILE(%HIT%="PLAYER");
  941. IF(%HIT%="PLAYER");
  942. SET(player_atrapalhando);
  943. ENDIF;
  944. GUI();
  945. ENDIF;
  946. KEYDOWN(%&sleep_move%);
  947. SPRINT;
  948. IF(sleep_xpos);
  949. IF(%XPOS%=%#sleep_coord%);
  950. KEYUP(%&sleep_move%);
  951. KEYUP(SNEAK);
  952. INC(#passos,1);
  953. ELSEIF(%XPOS%>=%#sleep_coord_sneak%);
  954. IF(%#sleep_coord%=713);
  955. IF(%XPOS%<=714);
  956. KEYDOWN(SNEAK);
  957. ELSE;
  958. KEYUP(SNEAK);
  959. ENDIF;
  960. ELSE;
  961. KEYDOWN(SNEAK);
  962. ENDIF;
  963. ELSE;
  964. KEYUP(SNEAK);
  965. ENDIF;
  966. ELSEIF(sleep_zpos);
  967. IF(%ZPOS%=%#sleep_coord%);
  968. KEYUP(%&sleep_move%);
  969. KEYUP(SNEAK);
  970. INC(#passos,1);
  971. ELSEIF(%ZPOS%>=%#sleep_coord_sneak%);
  972. KEYDOWN(SNEAK);
  973. ELSE;
  974. KEYUP(SNEAK);
  975. ENDIF;
  976. ENDIF;
  977. INC(#sleep_inc,1);
  978. UNTIL((%#passos%=5)||(%#sleep_inc%=500));
  979. RANDOM(#limite_clicks,60,35);
  980. ENDIF;
  981. SET(#sleep_inc_two,"");
  982. IF(%#sleep_inc%=500);
  983. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema aconteceu, venda reiniciada. &9&o#SLEEP");
  984. KEYUP(FORWARD);
  985. KEYUP(%&sleep_move%);
  986. KEYUP(SNEAK);
  987. UNSET(stop);
  988. ELSE;
  989. IF(sell);
  990. REPLACE(&sell,"x","iniciada");
  991. REPLACE(&sell,"iniciada","x");
  992. UNSET(sell);
  993. ENDIF;
  994. SET(#sleep_action,"1");
  995. SET(chest_vazio);
  996. UNSET(desbugar);
  997. DO;
  998. SET(end);
  999. IFMATCHES("%&sleep_placas%","^Sim$");
  1000. #quant_min = 1;
  1001. #quant_sair = 0;
  1002. ELSE;
  1003. #quant_min = 576;
  1004. #quant_sair = 64;
  1005. ENDIF;
  1006. IF(%#sleep_action%=1);
  1007. SET(#quant_itens,"");
  1008. SET(#getslot,"9");
  1009. UNSAFE;
  1010. DO(50);
  1011. IF(%GUI%!="GUIINVENTORY");
  1012. GUI(INVENTORY);
  1013. ENDIF;
  1014. GETSLOT(%#id_item%,#sleep_slot,%#getslot%);
  1015. GETSLOTITEM(%#sleep_slot%,#sleep_id,#sleep_stack);
  1016. IF(%#sleep_slot%!=-1);
  1017. INC(#quant_itens,%#sleep_stack%);
  1018. ENDIF;
  1019. #getslot = %#sleep_slot% + 1;
  1020. UNTIL((%#quant_itens%>=%#quant_min%)||(%#sleep_slot%=-1));
  1021. ENDUNSAFE;
  1022. ENDIF;
  1023. IF((%#quant_itens%<=%#quant_sair%)&&(chest_vazio));
  1024. ELSE;
  1025. GUI();
  1026. UNSET(end);
  1027. WAIT(5MS);
  1028. IF(#sleep_action=1);
  1029. IFMATCHES("%&sleep_placas%","^Sim$");
  1030. LOOK(%#sleep_yaw_64%,%#sleep_pitch_64%);
  1031. WAIT(1T);
  1032. KEY(ATTACK);
  1033. WAIT(1T);
  1034. ELSE;
  1035. IF(%#quant_itens%>=%#quant_min%);
  1036. LOOK(%#sleep_yaw_576%,%#sleep_pitch_576%);
  1037. WAIT(1T);
  1038. KEY(ATTACK);
  1039. WAIT(1T);
  1040. ELSEIF((%#quant_itens%>=64)&&(%#quant_itens%<%#quant_min%));
  1041. LOOK(%#sleep_yaw_64%,%#sleep_pitch_64%);
  1042. WAIT(1T);
  1043. KEY(ATTACK);
  1044. WAIT(1T);
  1045. ENDIF;
  1046. ENDIF;
  1047. INC(#sleep_inc_two,1);
  1048. ENDIF;
  1049. ENDIF;
  1050. UNTIL((end)||(%#sleep_inc_two%>=%#limite_clicks%));
  1051. IF(%#sleep_inc_two%>=%#limite_clicks%);
  1052. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema aconteceu, venda reiniciada. &9&o#SLEEP");
  1053. UNSET(stop);
  1054. ENDIF;
  1055. ENDIF;
  1056. UNTIL(stop);
  1057. DO(10);
  1058. LOOK(SOUTH);
  1059. KEYDOWN(LEFT);
  1060. LOOP;
  1061. KEYUP(LEFT);
  1062. REPLACE(&sell,"x","concluída");
  1063. REPLACE(&sell,"concluída","x");
  1064. GUI();
  1065. INC(#fungos_venarm,%#fva%);
  1066. ELSEIF(%&sleep_quest_2%="Vender na Warp Loja");
  1067. SET(#sleep_inc_three,"");
  1068. DO;
  1069. UNSET(parar);
  1070. DO(2);
  1071. GUI();
  1072. UNSET(@sleepteleport);
  1073. UNSET(delay_teleport);
  1074. WAIT(1T);
  1075. ECHO("/home sleepfv");
  1076. WAIT(10T);
  1077. DO(250);
  1078. IF((@sleepteleport)&&(!delay_teleport));
  1079. SET(delay_teleport);
  1080. DO(100);
  1081. GETIDREL(0,-1,0,#sleep_id);
  1082. WHILE(%#sleep_id%=0);
  1083. WAIT(20T);
  1084. DO(100);
  1085. GETIDREL(0,-1,0,#sleep_id);
  1086. WHILE(%#sleep_id%=0);
  1087. ENDIF;
  1088. UNTIL((@sleepteleport)&&(delay_teleport)&&(%YPOS%=6)&&(%XPOS%=%#xpos_fv%)&&(%ZPOS%=%#zpos_fv%));
  1089. WAIT(5T);
  1090. UNTIL((@sleepteleport)&&(%YPOS%=6)&&(%XPOS%=%#xpos_fv%)&&(%ZPOS%=%#zpos_fv%));
  1091. ECHO("/menuloja off");
  1092. IF((%YPOS%=6)&&(%XPOS%=%#xpos_fv%)&&(%ZPOS%=%#zpos_fv%));
  1093. SET(#sleep_homes,"1");
  1094. SET(#sleep_inc,"");
  1095. SET(&sleep_look,"NORTH");
  1096. DO;
  1097. DO(2);
  1098. DO;
  1099. INC(#sleep_inc,1);
  1100. GETIDREL(0,-1,0,#id_unbug);
  1101. IF((%#sleep_inc%>=200)||(%#id_unbug%=0));
  1102. SET(parar);
  1103. BREAK;
  1104. ENDIF;
  1105. IF(%XPOS%<-645);
  1106. LOOK(EAST);
  1107. KEYDOWN(FORWARD);
  1108. KEYDOWN(SNEAK);
  1109. UNSPRINT;
  1110. ELSEIF(%XPOS%>-645);
  1111. LOOK(WEST);
  1112. KEYDOWN(FORWARD);
  1113. KEYDOWN(SNEAK);
  1114. UNSPRINT;
  1115. ELSE;
  1116. WAIT(1MS);
  1117. KEYUP(FORWARD);
  1118. KEYUP(SNEAK);
  1119. BREAK;
  1120. ENDIF;
  1121. LOOP;
  1122. DO;
  1123. INC(#sleep_inc,1);
  1124. GETIDREL(0,-1,0,#id_unbug);
  1125. IF((%#sleep_inc%>=200)||(%#id_unbug%=0));
  1126. SET(parar);
  1127. BREAK;
  1128. ENDIF;
  1129. IF(%ZPOS%<605);
  1130. LOOK(SOUTH);
  1131. KEYDOWN(FORWARD);
  1132. UNSPRINT;
  1133. ELSEIF(%ZPOS%>605);
  1134. LOOK(NORTH);
  1135. KEYDOWN(FORWARD);
  1136. UNSPRINT;
  1137. ELSE;
  1138. WAIT(3T);
  1139. KEYUP(FORWARD);
  1140. KEYUP(SNEAK);
  1141. BREAK;
  1142. ENDIF;
  1143. LOOP;
  1144. LOOP;
  1145. IF(!parar);
  1146. SET(#sleep_inc,"");
  1147. SET(#sleep_inc_two,"");
  1148. SET(&y_sleep,"+0");
  1149. SET(&p_sleep,"+79");
  1150. UNSET(hotbar);
  1151. IF(%#sleep_inc_three%=0);
  1152. REPLACE(&sell,"x","iniciada");
  1153. REPLACE(&sell,"iniciada","x");
  1154. ENDIF;
  1155. DO;
  1156. LOOK(NORTH);
  1157. IF(hotbar);
  1158. LOOK(%&y_sleep%,%&p_sleep%);
  1159. ELSE;
  1160. LOOK(%&y_sleep%,+0);
  1161. ENDIF;
  1162. #sleep_getslot = 9;
  1163. SET(#quant_fungos,"");
  1164. UNSET(fungo);
  1165. UNSET(hotbar);
  1166. SET(#quant_itens,"");
  1167. SET(#getslot,"9");
  1168. UNSAFE;
  1169. DO(50);
  1170. IF(%GUI%!="GUIINVENTORY");
  1171. GUI(INVENTORY);
  1172. ENDIF;
  1173. GETSLOT(372,#sleep_slot,%#getslot%);
  1174. GETSLOTITEM(%#sleep_slot%,#sleep_id,#sleep_stack);
  1175. IF(%#sleep_slot%!=-1);
  1176. INC(#quant_itens,%#sleep_stack%);
  1177. ENDIF;
  1178. #getslot = %#sleep_slot% + 1;
  1179. UNTIL((%#quant_itens%>=576)||(%#sleep_slot%=-1));
  1180. IFMATCHES("%&sleep_placas%","^Sim$");
  1181. IF(%#quant_itens%>=1);
  1182. SET(fungo);
  1183. ENDIF;
  1184. ELSE;
  1185. IF(%#quant_itens%>=576);
  1186. SET(fungo);
  1187. SET(hotbar);
  1188. ELSEIF((%#quant_itens%>64)&&(%#quant_itens%<576));
  1189. SET(fungo);
  1190. ENDIF;
  1191. ENDIF;
  1192. ENDUNSAFE;
  1193. IF(fungo);
  1194. IF(%HIT%="PLAYER");
  1195. ECHO("/esconder");
  1196. INC(#sleep_inc_two,1);
  1197. RANDOM(#sleep_time,300,25);
  1198. IF(%XPOS%=-645);
  1199. SET(&keydown,"LEFT");
  1200. SET(#pos_stop,"-646");
  1201. SET(&y_sleep,"+66");
  1202. SET(&p_sleep,"+66");
  1203. ELSEIF(%XPOS%=-646);
  1204. SET(&keydown,"RIGHT");
  1205. SET(#pos_stop,"-645");
  1206. SET(&y_sleep,"+0");
  1207. SET(&p_sleep,"+79");
  1208. ENDIF;
  1209. GUI();
  1210. DO(50);
  1211. LOOK(NORTH);
  1212. KEYDOWN(%&keydown%);
  1213. KEYDOWN(SNEAK);
  1214. UNTIL(%XPOS%=%#pos_stop%);
  1215. KEYUP(SNEAK);
  1216. KEYUP(%&keydown%);
  1217. DO(50);
  1218. LOOK(NORTH);
  1219. KEYDOWN(BACK);
  1220. KEYDOWN(SNEAK);
  1221. UNTIL(%ZPOS%=607);
  1222. DO;
  1223. LOOK(NORTH);
  1224. KEYUP(SNEAK);
  1225. KEYUP(BACK);
  1226. DEC(#sleep_time,1);
  1227. GETIDREL(0,0,-3,#id_unbug);
  1228. IF(%HIT%="PLAYER");
  1229. ELSE;
  1230. SET(#sleep_time,"-1");
  1231. ENDIF;
  1232. UNTIL((%#sleep_time%<1)||(%#id_unbug%!=112));
  1233. IF(%#id_unbug%=112);
  1234. DO(50);
  1235. LOOK(NORTH);
  1236. KEYDOWN(FORWARD);
  1237. UNTIL(%ZPOS%=605);
  1238. WAIT(10T);
  1239. KEYUP(FORWARD);
  1240. ELSE;
  1241. SET(parar);
  1242. BREAK;
  1243. ENDIF;
  1244. ELSE;
  1245. SET(#sleep_inc_two,"");
  1246. GUI();
  1247. IF(hotbar);
  1248. LOOK(NORTH);
  1249. LOOK(%&y_sleep%,%&p_sleep%);
  1250. ELSE;
  1251. LOOK(NORTH);
  1252. LOOK(%&y_sleep%,+0);
  1253. ENDIF;
  1254. WAIT(1T);
  1255. KEY(ATTACK);
  1256. WAIT(1T);
  1257. ENDIF;
  1258. ELSE;
  1259. BREAK;
  1260. ENDIF;
  1261. GETIDREL(0,-1,0,#id_unbug);
  1262. INC(#sleep_inc,1);
  1263. IF((%#id_unbug%=0)||(%#sleep_inc%>=70)||(%#sleep_inc_two%>=6));
  1264. SET(parar);
  1265. BREAK;
  1266. ENDIF;
  1267. LOOP;
  1268. IF((parar)||(!fungo));
  1269. BREAK;
  1270. ENDIF;
  1271. ELSE;
  1272. BREAK;
  1273. ENDIF;
  1274. LOOP;
  1275. KEYUP(SNEAK);
  1276. KEYUP(RIGHT);
  1277. KEYUP(LEFT);
  1278. KEYUP(BACK);
  1279. KEYUP(FORWARD);
  1280. KEYUP(JUMP);
  1281. GUI();
  1282. INC(#sleep_inc_three,1);
  1283. IF(parar);
  1284. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema aconteceu, venda reiniciada. &9&o#SLEEP");
  1285. DO(10);
  1286. LOOK(%&sleep_look%);
  1287. KEYDOWN(BACK);
  1288. LOOP;
  1289. KEYUP(BACK);
  1290. ENDIF;
  1291. ELSE;
  1292. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema aconteceu, venda reiniciada. &9&o#SLEEP");
  1293. SET(parar);
  1294. ENDIF;
  1295. UNTIL(!parar);
  1296. DO(10);
  1297. LOOK(NORTH);
  1298. KEYDOWN(BACK);
  1299. LOOP;
  1300. KEYUP(BACK);
  1301. REPLACE(&sell,"x","concluída");
  1302. REPLACE(&sell,"concluída","x");
  1303. GUI();
  1304. INC(#fungos_venarm,%#fva%);
  1305. ELSEIF(%&sleep_quest_2%="Armazenar");
  1306. UNSET(block_home_baus);
  1307. UNSET(pos_baus_verificar);
  1308. DO;
  1309. SET(fim);
  1310. IF(!block_home_baus);
  1311. DO;
  1312. GUI();
  1313. SET(#sleep_inc,"");
  1314. UNSET(@sleepteleport);
  1315. UNSET(delay_teleport);
  1316. UNSET(home_protection);
  1317. WAIT(1T);
  1318. ECHO("/home sleepfb");
  1319. WAIT(10T);
  1320. DO(5);
  1321. DO;
  1322. GETIDREL(0,-1,0,#bloco);
  1323. IF(@sleepteleport);
  1324. IF(!delay_teleport);
  1325. SET(delay_teleport);
  1326. WAIT(20T);
  1327. ENDIF;
  1328. SET(&verificar_baus,"");
  1329. 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);
  1330. 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);
  1331. SET(&verificar_baus,"%#bau1%-%#bau2%-%#bau3%-%#bau4%-%#bau5%-%#bau6%-%#bau7%-%#bau8%-%#bau9%-%#bau10%");
  1332. IFMATCHES("%&verificar_baus%","^(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)$");
  1333. SET(ok1);
  1334. ELSE;
  1335. UNSET(ok1);
  1336. ENDIF;
  1337. ELSE;
  1338. UNSET(ok1);
  1339. ENDIF;
  1340. IF(pos_baus_verificar);
  1341. IF((%XPOS%=%#baus_xpos%)&&(%YPOS%=%#baus_ypos%)&&(%ZPOS%=%#baus_zpos%));
  1342. SET(ok2);
  1343. ELSE;
  1344. UNSET(ok2);
  1345. ENDIF;
  1346. ELSE;
  1347. SET(ok2);
  1348. ENDIF;
  1349. INC(#sleep_inc,1);
  1350. IF(%#sleep_inc%=300);
  1351. LOG("");
  1352. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema aconteceu. Se este erro persistir, tem algo errado com sua trap de baús.");
  1353. LOG("&6&l[&f&oM&facro&6&l] &cVeja como deve ficar a trap de baús:");
  1354. LOG("&6&l[&f&oM&facro&6&l] &ahttps://prnt.sc/j5jtsf");
  1355. LOG("");
  1356. LOG("&6&l[&f&oM&facro&6&l] &cTentando novamente...");
  1357. LOG("");
  1358. SET(home_protection);
  1359. BREAK;
  1360. ENDIF;
  1361. UNTIL((ok1)&&(ok2)&&(%#bloco%!=0)&&(@sleepteleport));
  1362. WHILE(!home_protection);
  1363. UNTIL(!home_protection);
  1364. IF(trap_salvar_coordenadas);
  1365. SET(#baus_xpos,"%XPOS%");
  1366. SET(#baus_ypos,"%YPOS%");
  1367. SET(#baus_zpos,"%ZPOS%");
  1368. UNSET(trap_salvar_coordenadas);
  1369. ENDIF;
  1370. UNSET(pos_baus_verificar);
  1371. ELSE;
  1372. UNSET(block_home_baus);
  1373. ENDIF;
  1374. IF((!baus_lotados)&&(%#itens_inv_armazenar%>1));
  1375. SET(#sleep_inc,"199");
  1376. SET(#sleep_inc_two,"");
  1377. IF(%#bau_atual%=1);
  1378. SET(#pos_first_chest,"%#baus_xpos%");
  1379. SET(#pos_last_chest,"%#baus_xpos%");
  1380. ENDIF;
  1381. #pos_penult_chest = %#pos_last_chest% - 1;
  1382. DO;
  1383. LOOK(NORTH);
  1384. IF(%XPOS%=%#pos_last_chest%);
  1385. WAIT(20MS);
  1386. BREAK;
  1387. ELSEIF((%XPOS%>%#pos_last_chest%)||(%YPOS%!=%#baus_ypos%)||(%ZPOS%!=%#baus_zpos%));
  1388. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema aconteceu. &9&o#SLEEP");
  1389. LOG("&6&l[&f&oM&facro&6&l] &cTentando resolver... &9&o#SLEEP");
  1390. UNSET(fim);
  1391. ELSE;
  1392. GUI(INVENTORY);
  1393. KEYDOWN(RIGHT);
  1394. IF(%XPOS%<%#pos_penult_chest%);
  1395. KEYUP(SNEAK);
  1396. ELSE;
  1397. KEYDOWN(SNEAK);
  1398. ENDIF;
  1399. ENDIF;
  1400. WHILE(fim);
  1401. KEYUP(SNEAK);
  1402. KEYUP(RIGHT);
  1403. GUI();
  1404. LOG("&6&l[&f&oM&facro&6&l] &aBaú de armazenamento número &f%#bau_atual%&a. &9&o#SLEEP");
  1405. IF(fim);
  1406. DO;
  1407. INC(#sleep_inc,1);
  1408. IF(%#sleep_inc%=200);
  1409. GUI();
  1410. SET(#sleep_inc,"");
  1411. INC(#sleep_inc_two,1);
  1412. IF(%#sleep_inc_two%=6);
  1413. LOG("&6&l[&f&oM&facro&6&l] &cO baú não está abrindo. &9&o#SLEEP");
  1414. LOG("&6&l[&f&oM&facro&6&l] &cTentando resolver... &9&o#SLEEP");
  1415. SET(pos_baus_verificar);
  1416. UNSET(fim);
  1417. BREAK;
  1418. ENDIF;
  1419. LOOK(NORTH);
  1420. IFMATCHES("%#bau_atual%","^(.*)[0-9]$");
  1421. MATCH("%#bau_atual%","^(.*)([0-9])$",{,#bau_atual_unit});
  1422. ENDIF;
  1423. IF((%#bau_atual%=1)||(%#bau_atual_unit%=1)||(%#bau_atual_unit%=6));
  1424. LOOK(+0,+308);
  1425. ELSEIF((%#bau_atual%=2)||(%#bau_atual_unit%=2)||(%#bau_atual_unit%=7));
  1426. LOOK(+0,+328);
  1427. ELSEIF((%#bau_atual%=3)||(%#bau_atual_unit%=3)||(%#bau_atual_unit%=8));
  1428. LOOK(+0,+358);
  1429. ELSEIF((%#bau_atual%=4)||(%#bau_atual_unit%=4)||(%#bau_atual_unit%=9));
  1430. LOOK(+0,+33);
  1431. ELSEIF((%#bau_atual%=5)||(%#bau_atual_unit%=5)||(%#bau_atual_unit%=0));
  1432. LOOK(+0,+50);
  1433. ENDIF;
  1434. LOOK(+0,+2,1);
  1435. KEY(USE);
  1436. ELSEIF((%XPOS%!=%#pos_last_chest%)||(%YPOS%!=%#baus_ypos%)||(%ZPOS%!=%#baus_zpos%));
  1437. LOG("&6&l[&f&oM&facro&6&l] &cVocê não esta onde deveria. &9&o#SLEEP");
  1438. LOG("&6&l[&f&oM&facro&6&l] &cTentando resolver... &9&o#SLEEP");
  1439. SET(pos_baus_verificar);
  1440. UNSET(fim);
  1441. ENDIF;
  1442. UNTIL((!fim)||(%GUI%="GUICHEST"));
  1443. IF(%&sleep_quest_3%="Sim");
  1444. SET(#sleep_slot_max,"87");
  1445. ELSE;
  1446. SET(#sleep_slot_max,"88");
  1447. ENDIF;
  1448. IF(fim);
  1449. WAIT(6T);
  1450. #id_inv = 333;
  1451. FOR(#sleep_slot_inv,54,%#sleep_slot_max%);
  1452. IF(%GUI%!="GUICHEST");
  1453. LOG("&6&l[&f&oM&facro&6&l] &cO baú foi fechado. &9&o#SLEEP");
  1454. LOG("&6&l[&f&oM&facro&6&l] &cTentando reabrir... &9&o#SLEEP");
  1455. SET(pos_baus_verificar);
  1456. UNSET(fim);
  1457. BREAK;
  1458. ENDIF;
  1459. UNSET(slot_air);
  1460. IF(%#id_inv%=0);
  1461. SET(slot_air);
  1462. ELSE;
  1463. GETSLOT(0,#slot_vazio_chest);
  1464. IF((%#slot_vazio_chest%!=-1)&&(%#slot_vazio_chest%<54));
  1465. SET(slot_air);
  1466. ENDIF;
  1467. ENDIF;
  1468. IF(!slot_air);
  1469. GETSLOT(372,#slot_fungo,54);
  1470. IF((%#slot_fungo%!=-1)&&(%#slot_fungo%<%#sleep_slot_max%));
  1471. SLOTCLICK(%#slot_fungo%,L,TRUE);
  1472. WAIT(1T);
  1473. ENDIF;
  1474. INC(#bau_atual,1);
  1475. SET(block_home_baus);
  1476. IF((%#bau_atual_unit%=5)||((%#bau_atual_unit%=0));
  1477. 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);
  1478. 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);
  1479. SET(&verificar_baus,"%#bau1%-%#bau2%-%#bau3%-%#bau4%-%#bau5%-%#bau6%-%#bau7%-%#bau8%-%#bau9%-%#bau10%");
  1480. IFMATCHES("%&verificar_baus%","^(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)$");
  1481. INC(#pos_last_chest,1);
  1482. UNSET(fim);
  1483. BREAK;
  1484. ELSE;
  1485. SET(baus_lotados);
  1486. GUI();
  1487. DO;
  1488. LOG("");
  1489. LOG("&6&l[&f&oM&facro&6&l] &cOs baús acabaram, esvazie-os e selecione \"resetar\" ao ligar a macro. &9&o#SLEEP");
  1490. LOG("");
  1491. WAIT(5);
  1492. LOOP;
  1493. ENDIF;
  1494. ENDIF;
  1495. UNSET(fim);
  1496. BREAK;
  1497. ELSE;
  1498. GETSLOTITEM(%#sleep_slot_inv%,#id_inv,#stack_inv);
  1499. IF((%#id_inv%=122)||(%#id_inv%=0)||(%#id_inv%=320)||(%#id_inv%=364)||(%#id_inv%=366));
  1500. ELSE;
  1501. IFMATCHES("%#id_inv%","^372$|^387$");
  1502. SLOTCLICK(%#sleep_slot_inv%,L,TRUE);
  1503. WAIT(20MS);
  1504. DEC(#itens_inv_armazenar,1);
  1505. IF(%#id_inv%=387);
  1506. INC(#sleep_livros,1);
  1507. ENDIF;
  1508. ENDIF;
  1509. ENDIF;
  1510. ENDIF;
  1511.  
  1512. NEXT;
  1513. ELSE;
  1514. GUI();
  1515. ENDIF;
  1516. ENDIF;
  1517. ENDIF;
  1518. UNTIL(fim);
  1519. INC(#fungos_venarm,%#fva%);
  1520. GUI();
  1521. ENDIF;
  1522. ENDIF;
  1523. ENDIF;
  1524. IF(comprar_comida);
  1525. SET(buy);
  1526. UNSET(comprar_comida);
  1527. DO;
  1528. SET(stop);
  1529. DO(2);
  1530. GUI();
  1531. UNSET(@sleepteleport);
  1532. UNSET(delay_teleport);
  1533. WAIT(1T);
  1534. ECHO("/home sleepcomida");
  1535. WAIT(10T);
  1536. DO(250);
  1537. IF((@sleepteleport)&&(!delay_teleport));
  1538. SET(delay_teleport);
  1539. DO(100);
  1540. GETIDREL(0,-1,0,#sleep_id);
  1541. WHILE(%#sleep_id%=0);
  1542. WAIT(20T);
  1543. DO(100);
  1544. GETIDREL(0,-1,0,#sleep_id);
  1545. WHILE(%#sleep_id%=0);
  1546. ENDIF;
  1547. UNTIL((@sleepteleport)&&(delay_teleport));
  1548. WAIT(5T);
  1549. UNTIL((@sleepteleport)&&(delay_teleport));
  1550. ECHO("/menuloja off");
  1551. IF(buy);
  1552. REPLACE(&buy,"x","iniciada");
  1553. REPLACE(&buy,"iniciada","x");
  1554. UNSET(buy);
  1555. ENDIF;
  1556. DO(3);
  1557. LOOK(%#sleep_yaw_placa%,%#sleep_pitch_placa%);
  1558. IF(%GUI%!="GUIINVENTORY");
  1559. GUI(INVENTORY);
  1560. ENDIF;
  1561. IFMATCHES("%&sleep_placas%","^Sim$");
  1562. KEYDOWN(SNEAK);
  1563. ENDIF;
  1564. WAIT(10T);
  1565. KEY(USE);
  1566. WAIT(10T);
  1567. DO(200);
  1568. GETSLOT(%#sleep_id_comida%,#slot);
  1569. UNTIL(%#slot%!=-1);
  1570. UNTIL(%#slot%!=-1);
  1571. KEYUP(SNEAK);
  1572. IF(%#slot%=-1);
  1573. UNSET(stop);
  1574. ENDIF;
  1575. IF(stop);
  1576. GUI(INVENTORY);
  1577. GETSLOT(%#sleep_id_comida%,#slot);
  1578. DO(4);
  1579. SLOTCLICK(44,L,TRUE);
  1580. LOOP;
  1581. WAIT(6T);
  1582. SLOTCLICK(%#slot%,L,FALSE);
  1583. WAIT(6T);
  1584. SLOTCLICK(44,L,FALSE);
  1585. WAIT(6T);
  1586. GUI();
  1587. DO(150);
  1588. LOOK(%&dir_distanciar%);
  1589. KEYDOWN(BACK);
  1590. UNTIL(((%XPOS%<=%#dir_distanciar%)&&(%XPOS%>700))||((%ZPOS%>=%#dir_distanciar%)&&(%ZPOS%<650)));
  1591. KEYUP(BACK);
  1592. GUI();
  1593. SET(forcar_comer);
  1594. ELSE;
  1595. GUI();
  1596. IF(%HIT%="PLAYER");
  1597. ECHO("/esconder");
  1598. LOG("&6&l[&f&oM&facro&6&l] &cAlguém está atrapalhando a sua compra. A compra será reiniciada em alguns segundos. &9&o#SLEEP");
  1599. DO(150);
  1600. LOOK(%&dir_distanciar%);
  1601. KEYDOWN(BACK);
  1602. UNTIL(((%XPOS%<=%#dir_distanciar%)&&(%XPOS%>700))||((%ZPOS%>=%#dir_distanciar%)&&(%ZPOS%<650)));
  1603. KEYUP(BACK);
  1604. RANDOM(#sleep_esperar,12,5);
  1605. WAIT(%#sleep_esperar%);
  1606. ELSE;
  1607. LOG("&6&l[&f&oM&facro&6&l] &cAlgum problema aconteceu, compra reiniciada. &9&o#SLEEP");
  1608. ENDIF;
  1609. ENDIF;
  1610. UNTIL(stop);
  1611. LOG("&6&l[&f&oM&facro&6&l] &aCompra de comidas concluída. &9&o#SLEEP");
  1612. REPLACE(&buy,"x","concluída");
  1613. REPLACE(&buy,"concluída","x");
  1614. ENDIF;
  1615. IF((fungo_nao_encontrado)&&(%#fungo_nao_encontrado%>=3));
  1616. UNSET(fungo_nao_encontrado);
  1617. ECHO("/ativar 666");
  1618. WAIT(60T);
  1619. LOG("");
  1620. LOG("&6&l[&f&oM&facro&6&l] &cVocê foi automaticamente kickado do servidor para tentar solucionar um problema. &9&o#SLEEP");
  1621. LOG("&6&l[&f&oM&facro&6&l] &cTentando retomar em &f3 &csegundos... &9&o#SLEEP");
  1622. LOG("");
  1623. WAIT(60T);
  1624. ENDIF;
  1625. LOOP;
  1626.  
  1627. }$$
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!