API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Mar 29th, 2020
168
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 79.78 KB | None | 0 0
raw download clone embed print report
  1. $${
  2.  
  3. ///////////////////////
  4. // Viciante 1.8 //
  5. ///////////////////////
  6. // Colheita 1.0 //
  7. ///////////////////////
  8. // NAO EDITAR //
  9. ///////////////////////
  10.  
  11. TOGGLE(sleep_macro);
  12. IF(sleep_macro);
  13. IF((KEY_LCONTROL)||(KEY_RCONTROL)||(!config_sc_save)||(baus_lotados));
  14. UNSET(configurar);
  15. UNSET(resposta_invalida);
  16. IF(config_sc_save);
  17. PROMPT(&sleep_first,"$$[ [Resetar,Reconfigurar]]","Resetar (zerar lucro/baús) ou reconfigurar?");
  18. IF(%&sleep_first%="Resetar");
  19. SET(#andar_atual,"1");
  20. SET(#pos_first_chest,"");
  21. SET(#pos_last_chest,"");
  22. SET(#bau_atual,"1");
  23. SET(trap_salvar_coordenadas);
  24. SET(#fungos_venarm,"");
  25. UNSET(baus_lotados);
  26. UNSET(pos_save);
  27. ELSEIF(%&sleep_first%="Reconfigurar");
  28. SET(configurar);
  29. UNSET(config_sc_save);
  30. ELSE;
  31. SET(resposta_invalida);
  32. ENDIF;
  33. ELSE;
  34. SET(configurar);
  35. ENDIF;
  36. IF(configurar);
  37. IFMATCHES("%KEYNAME%","^A$|^B$|^C$|^D$|^E$|^F$|^G$|^H$|^I$|^J$|^K$|^L$|^M$|^N$|^O$|^P$|^Q$|^R$|^S$|^T$|^U$|^V$|^W$|^X$|^Y$|^Z$");
  38. SET(sleep_key_accept);
  39. SET(@&sleep_colheita_key,"%KEYNAME%");
  40. DO;
  41. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  42. PROMPT(&sleep_quest_1,"$$[ [1,2,3,4,5,6,7,8,9,10,Mais]]","Quantos andares têm sua plantação?");
  43. SET(&sleep_placas,"Sim");
  44. IFMATCHES("%&sleep_quest_1%","^1$|^2$|^3$|^4$|^5$|^6$|^7$|^8$|^9$|^10$|^Mais$");
  45. IF(%&sleep_quest_1%="Mais");
  46. DO;
  47. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  48. PROMPT(#sleep_quest_1,"$$?","Quantos andares têm sua plantação?");
  49. ELSE;
  50. SET(#sleep_quest_1,"%&sleep_quest_1%");
  51. ENDIF;
  52. IF(%#sleep_quest_1%>=1);
  53. DO;
  54. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  55. PROMPT(&sleep_quest_2,"$$[ [Vender,Armazenar]]","Vender ou armazenar os fungos?");
  56. IFMATCHES("%&sleep_quest_2%","^Vender$|^Armazenar$");
  57. DO;
  58. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  59. PROMPT(&sleep_quest_3,"$$[ [Sim,Não]]","Se alimentar durante a colheita? A comida será comprada através da home sleepfood.");
  60. IFMATCHES("%&sleep_quest_3%","^Sim$|^Não$");
  61. DO;
  62. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  63. 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?");
  64. IFMATCHES("%#sleep_quest_4%","^1$|^2$|^3$|^4$|^5$|^6$|^7$|^8$|^9$|^10$");
  65. DO;
  66. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  67. LOG("");
  68. LOG("&6&l[&f&oM&facro&6&l] &aAguarde, &averificando &aSleepOnChat &ae &ahome(s)... &9&o#SLEEP");
  69. ACHIEVEMENTGET("Aguarde... #SLEEP","nether_wart");
  70. LOG("");
  71. WAIT(10T);
  72. SET(&coords_andares,"");
  73. SET(#coord_save,"%#sleep_quest_1%");
  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. ECHO("/home sleepa%#coord_save%");
  84. DO(200);
  85. IF(%GUI%!="GUIINVENTORY");
  86. GUI(INVENTORY);
  87. ENDIF;
  88. IF(@sleepteleport);
  89. IF(!delay_teleport);
  90. SET(delay_teleport);
  91. WAIT(12T);
  92. KEYDOWN(JUMP);
  93. WAIT(8T);
  94. KEYUP(JUMP);
  95. ENDIF;
  96. GETIDREL(0,0,0,&id1);
  97. GETIDREL(0,0,1,&id2);
  98. GETIDREL(0,0,-1,&id3);
  99. GETIDREL(1,0,0,&id4);
  100. GETIDREL(-1,0,0,&id5);
  101. IF(%&id1%="soul_sand");
  102. IF((%&id2%!="soul_sand")&&(%&id3%="soul_sand"));
  103. IF((%&id4%="soul_sand")&&(%&id5%!="soul_sand"));
  104. SET(home_ok);
  105. ENDIF;
  106. ENDIF;
  107. ENDIF;
  108. ENDIF;
  109. UNTIL((@sleepteleport)&&(home_ok));
  110. INC(#sleep_shield,1);
  111. IF(%#sleep_shield%=3);
  112. BREAK;
  113. ENDIF;
  114. UNTIL((@sleepteleport)&&(home_ok));
  115. IF((@sleepteleport)&&(home_ok));
  116. SET(#sleep_shield,"");
  117. DO(10);
  118. IF(%GUI%!="GUIINVENTORY");
  119. GUI(INVENTORY);
  120. ENDIF;
  121. LOOP;
  122. SET(&coords_andares,"%&coords_andares%<A:%#coord_save% X:%XPOS% Y:%YPOS% Z:%ZPOS%>");
  123. ELSEIF(%#sleep_shield%=3);
  124. GUI();
  125. LOG("");
  126. IF(!@sleepteleport);
  127. LOG("&6&l[&f&oM&facro&6&l] &cVocê &cprecisa &cinstalar &ca &cmacro &fSleepOnChat &cpara &cessa &cmacro &cfuncionar.");
  128. LOG("&6&l[&f&oM&facro&6&l] &c&ahttps://enrt.eu/NVSwrDyE");
  129. ELSE;
  130. LOG("&6&l[&f&oM&facro&6&l] &cVocê &cnão &cmarcou &cou &cmarcou &cerrado &calguma &chome.");
  131. LOG("&6&l[&f&oM&facro&6&l] &cVeja &ccomo &cse &cdeve &cmarcar &ca(s) &chome(s):");
  132. LOG("&6&l[&f&oM&facro&6&l] &ahttps://prnt.sc/j58j9r");
  133. ENDIF;
  134. LOG("");
  135. WAIT(10T);
  136. LOG("&6&l[&f&oM&facro&6&l] &cSleep_Colheita &c1.0 &6&l[&4OFF&6&l]");
  137. TOGGLE(sleep_macro);
  138. UNSET(@colheita_ativada);
  139. UNSET(@afk_onchat);
  140. STOP;
  141. ENDIF;
  142. DEC(#coord_save,1);
  143. UNTIL(%#coord_save%=0);
  144. IF(%&sleep_quest_3%="Sim");
  145. SET(&sleep_id_comida,"cooked_beef");
  146. LOG("");
  147. LOG("&6&l[&f&oM&facro&6&l] &aAguarde, &averificando &aa &ahome &fsleepfood&a... &9&o#SLEEP");
  148. ACHIEVEMENTGET("Aguarde... #SLEEP","nether_wart");
  149. LOG("");
  150. WAIT(10T);
  151. DO(2);
  152. DO(3);
  153. UNSET(@sleepteleport);
  154. SET(#sleep_inc,"");
  155. ECHO("/home sleepfood");
  156. WAIT(15T);
  157. DO(200);
  158. IF(%GUI%!="GUIINVENTORY");
  159. GUI(INVENTORY);
  160. ENDIF;
  161. UNTIL(@sleepteleport);
  162. WAIT(5T);
  163. WHILE(!@sleepteleport);
  164. UNTIL(!@sleepteleport);
  165. DO(100);
  166. GETIDREL(0,-1,0,&sleep_id);
  167. WHILE(%&sleep_id%="air");
  168. IF(!@sleepteleport);
  169. GUI();
  170. LOG("");
  171. LOG("&6&l[&f&oM&facro&6&l] &cVocê &cnão &cmarcou &cou &cmarcou &cerrado &ca &chome &fsleepfood&c.");
  172. LOG("&6&l[&f&oM&facro&6&l] &cMarque &ca &chome &colhando &cpara &co &cNPC &fFazendeiro&c.);
  173. LOG("");
  174. WAIT(10T);
  175. LOG("&6&l[&f&oM&facro&6&l] &cSleep_Colheita &c1.0 &6&l[&4OFF&6&l]");
  176. TOGGLE(sleep_macro);
  177. UNSET(@colheita_ativada);
  178. UNSET(@afk_onchat);
  179. STOP;
  180. ENDIF;
  181. ENDIF;
  182. IF(%&sleep_quest_2%="Vender");
  183. UNSET(sleep_erro_home_venda);
  184. LOG("");
  185. LOG("&6&l[&f&oM&facro&6&l] &aAguarde, &averificando &aa &ahome &fsleepfv&a... &9&o#SLEEP");
  186. ACHIEVEMENTGET("Aguarde... #SLEEP","nether_wart");
  187. LOG("");
  188. WAIT(10T);
  189. DO(2);
  190. DO(3);
  191. UNSET(@sleepteleport);
  192. SET(#sleep_inc,"");
  193. ECHO("/home sleepfv");
  194. WAIT(15T);
  195. DO(200);
  196. IF(%GUI%!="GUIINVENTORY");
  197. GUI(INVENTORY);
  198. ENDIF;
  199. UNTIL(@sleepteleport);
  200. WAIT(5T);
  201. WHILE(!@sleepteleport);
  202. UNTIL(!@sleepteleport);
  203. DO(100);
  204. GETIDREL(0,-1,0,&sleep_id);
  205. WHILE(%&sleep_id%="air");
  206. IF(!@sleepteleport);
  207. GUI();
  208. LOG("");
  209. LOG("&6&l[&f&oM&facro&6&l] &cVocê &cnão &cmarcou &cou &cmarcou &cerrado &ca &chome &fsleepfv&c.");
  210. LOG("&6&l[&f&oM&facro&6&l] &cMarque &ca &chome &colhando &cpara &co &cNPC &fFazendeiro&c.);
  211. LOG("");
  212. WAIT(10T);
  213. LOG("&6&l[&f&oM&facro&6&l] &cSleep_Colheita 1.0 &6&l[&4OFF&6&l]");
  214. TOGGLE(sleep_macro);
  215. UNSET(@colheita_ativada);
  216. UNSET(@afk_onchat);
  217. STOP;
  218. ENDIF;
  219. ENDIF;
  220. IF(%&sleep_quest_2%="Vender");
  221. SET(&sleep_msg_1,"&aa &avenda");
  222. ELSEIF(%&sleep_quest_2%="Armazenar");
  223. SET(&sleep_msg_1,"&ao &aarmazenamento");
  224. ENDIF;
  225. IF(%#sleep_quest_4%=1);
  226. #sleep_delay = 1;
  227. ELSE;
  228. #sleep_delay = %#sleep_quest_4% * 10;
  229. ENDIF;
  230. GUI();
  231. SET(#pos_first_chest,"");
  232. SET(#pos_last_chest,"");
  233. SET(#bau_atual,"1");
  234. SET(#andar_atual,"1");
  235. SET(trap_salvar_coordenadas);
  236. SET(#fungos_venarm,"");
  237. SET(config_sc_save);
  238. UNSET(pos_save);
  239. UNSET(baus_lotados);
  240. LOG("");
  241. LOG("&6&l[&f&oM&facro&6&l] &aPara &aentrar &anas &aconfigurações &anovamente &apressione &aas &ateclas &f&lCTRL &a+ &f&l%KEYNAME%&a.");
  242. LOG("");
  243. WAIT(80T);
  244. PROMPT(&sleep_quest_6,"$$[ [Não,Sim]]","Tutorial: Sabe entrar nas configurações novamente?");
  245. IF(%&sleep_quest_6%="Não");
  246. LOG("");
  247. LOG("&6&l[&f&oM&facro&6&l] &aVocê &asó &aprecisa &aapertar &aa &atecla &f&lCTRL &ae &aligar &aessa &amacro.");
  248. LOG("&8------------ &f&lCTRL &a+ &f&l%KEYNAME% &8------------");
  249. LOG("");
  250. WAIT(100T);
  251. ENDIF;
  252. ELSE;
  253. SET(resposta_invalida);
  254. ENDIF;
  255. ELSE;
  256. SET(resposta_invalida);
  257. ENDIF;
  258. ELSE;
  259. SET(resposta_invalida);
  260. ENDIF;
  261. ELSE;
  262. SET(resposta_invalida);
  263. ENDIF;
  264. ELSE;
  265. SET(resposta_invalida);
  266. ENDIF;
  267. ELSE;
  268. LOG("");
  269. LOG("&6&l[&f&oM&facro&6&l] &cVocê &cprecisa &cinstalar &cessa &cmacro &cem &cuma &ctecla &falfabética&c.");
  270. LOG("&6&l[&f&oM&facro&6&l] &cInstale &ca &cmacro &cem &cuma &f&lLETRA &ce &ctente &cnovamente.);
  271. LOG("");
  272. SET(resposta_invalida);
  273. UNSET(sleep_key_accept);
  274. ENDIF;
  275. ENDIF;
  276. IF(resposta_invalida);
  277. IF(sleep_key_accept);
  278. LOG("");
  279. LOG("&6&l[&f&oM&facro&6&l] &cResposta &cinválida. &9&o#SLEEP");
  280. LOG("");
  281. ENDIF;
  282. WAIT(10T);
  283. LOG("&6&l[&f&oM&facro&6&l] &cSleep_Colheita &c1.0 &6&l[&4OFF&6&l]");
  284. TOGGLE(sleep_macro);
  285. UNSET(@colheita_ativada);
  286. UNSET(@afk_onchat);
  287. STOP;
  288. ENDIF;
  289. ENDIF;
  290. SET(@colheita_ativada);
  291. SET(@afk_onchat);
  292. SET(@&afk_onchat_bn,"");
  293. UNSET(fungo_nao_encontrado);
  294. UNSET(inventario_cheio);
  295. UNSET(comprar_comida);
  296. UNSET(fileira_trocar);
  297. UNSET(mudar_andar);
  298. UNSET(forcar_comer);
  299. UNSET(sleepft);
  300. CLEARCHAT;
  301. LOG("&6&l[&f&oM&facro&6&l] &aSleep_Colheita &a1.0 &6&l[&2ON&6&l]");
  302. LOG("");
  303. LOG("&6&l[&f&oM&facro&6&l] &aConfiguração:");
  304. IF(%#sleep_quest_1%=1);
  305. LOG("&6&l[&f&oM&facro&6&l] &f&oAndar: &a%#sleep_quest_1%");
  306. ELSE;
  307. LOG("&6&l[&f&oM&facro&6&l] &f&oAndares: &a%#sleep_quest_1%");
  308. ENDIF;
  309. IF(%&sleep_quest_2%="Vender");
  310. LOG("&6&l[&f&oM&facro&6&l] &f&oVender &f&oos &f&ofungos: &aSim");
  311. ELSEIF(%&sleep_quest_2%="Armazenar");
  312. IF(baus_lotados);
  313. LOG("&6&l[&f&oM&facro&6&l] &f&oArmazenar &f&oos &f&ofungos: &aSim");
  314. LOG("&c(não &cé &cmais &cpossível &carmazenar, &cesvazie &cos &cbaús &ce &cclique &cem &c\"&cresetar&c\" &cao &cligar &ca &cmacro)");
  315. ELSE;
  316. LOG("&6&l[&f&oM&facro&6&l] &f&oArmazenar &f&oos &f&ofungos: &aSim");
  317. ENDIF;
  318. ENDIF;
  319. IF(%&sleep_quest_3%="Sim");
  320. LOG("&6&l[&f&oM&facro&6&l] &f&oSe &f&oalimentar &f&odurante &f&oa &f&ocolheita: &aSim");
  321. ELSE;
  322. LOG("&6&l[&f&oM&facro&6&l] &f&oSe &f&oalimentar &f&odurante &f&oa &f&ocolheita: &cNão");
  323. ENDIF;
  324. LOG("&6&l[&f&oM&facro&6&l] &f&oVelocidade &f&oda &f&ocolheita: &a%#sleep_quest_4%");
  325. LOG("");
  326. ELSE;
  327. LOG("&6&l[&f&oM&facro&6&l] &cSleep_Colheita &c1.0 &6&l[&4OFF&6&l]");
  328. IF(config_sc_save);
  329. LOG("");
  330. #lucro_fungos = %#fungos_venarm% * 114;
  331. IF(%&sleep_quest_2%="Vender");
  332. LOG("&6&l[&f&oM&facro&6&l] &aVenda &ade &afungos:");
  333. IF(%#fungos_venarm%>=1);
  334. LOG("&6&l[&f&oM&facro&6&l] &f&oVendidos &f&o(em packs): &a%#fungos_venarm% &7- &f&oLucro &f&oestimado: &a%#lucro_fungos% &f&ocoins");
  335. ELSE;
  336. LOG("&6&l[&f&oM&facro&6&l] &f&oVendidos: &cNenhum &7- &f&oLucro &f&ototal: &cSem &clucro");
  337. ENDIF;
  338. ELSEIF(%&sleep_quest_2%="Armazenar");
  339. LOG("&6&l[&f&oM&facro&6&l] &aTrap &ade &abaús:");
  340. IF(baus_lotados);
  341. #bau_atual_mostrar = %#bau_atual% - 1;
  342. LOG("&6&l[&f&oM&facro&6&l] &f&oBaú &f&ode &f&oarmazenamento &f&oatual: &4%#bau_atual_mostrar%&cº");
  343. LOG("&c(não &cé &cmais &cpossível &carmazenar, &cesvazie &cos &cbaús &ce &cclique &cem &c\"&cresetar&c\" &cao &cligar &ca &cmacro)");
  344. ELSE;
  345. LOG("&6&l[&f&oM&facro&6&l] &f&oBaú &f&ode &f&oarmazenamento &f&oatual: &a%#bau_atual%&fº");
  346. ENDIF;
  347. IF(%#fungos_venarm%>=1);
  348. LOG("&6&l[&f&oM&facro&6&l] &f&oArmazenados &f&o(em &f&opacks): &a%#fungos_venarm% &7- &f&oLucro &f&oestimado: &a%#lucro_fungos% &f&ocoins");
  349. ELSE;
  350. LOG("&6&l[&f&oM&facro&6&l] &f&oArmazenados: &cNenhum &7- &f&oLucro &f&oestimado: &cSem &clucro");
  351. ENDIF;
  352. ENDIF;
  353. LOG("");
  354. ENDIF;
  355. KEYUP(FORWARD);
  356. KEYUP(LEFT);
  357. KEYUP(RIGHT);
  358. KEYUP(SNEAK);
  359. KEYUP(BACK);
  360. UNSET(@colheita_ativada);
  361. UNSET(@afk_onchat);
  362. STOP;
  363. ENDIF;
  364. DO;
  365. SET(#sleep_tentativas,"");
  366. IF((pos_save)&&(!mudar_andar));
  367. SET(&sleep_home,"sleepft");
  368. SET(sleep_look_last);
  369. UNSET(verificar_coord);
  370. ELSE;
  371. IF(mudar_andar);
  372. SET(sleepft);
  373. UNSET(mudar_andar);
  374. INC(#andar_atual,1);
  375. IF(%#andar_atual%>%#sleep_quest_1%);
  376. SET(#andar_atual,"1");
  377. ENDIF;
  378. ECHO("/delhome sleepft");
  379. WAIT(10T);
  380. ENDIF;
  381. SET(&sleep_home,"sleepa%#andar_atual%");
  382. SET(verificar_coord);
  383. UNSET(sleep_look_last);
  384. ENDIF;
  385. DO;
  386. GUI();
  387. UNSET(@sleepteleport);
  388. UNSET(delay_teleport);
  389. IF(%#sleep_tentativas%=10);
  390. LOG("");
  391. LOG("&6&l[&f&oM&facro&6&l] &cAlgum &cproblema &caconteceu. &cTentando &cresolver... &9&o#SLEEP");
  392. LOG("");
  393. SET(sleepft);
  394. UNSET(mudar_andar);
  395. INC(#andar_atual,1);
  396. IF(%#andar_atual%>%#sleep_quest_1%);
  397. SET(#andar_atual,"1");
  398. ENDIF;
  399. ECHO("/sethome sleepft");
  400. WAIT(10T);
  401. SET(&sleep_home,"sleepa%#andar_atual%");
  402. SET(verificar_coord);
  403. UNSET(sleep_look_last);
  404. ENDIF;
  405. IF(verificar_coord);
  406. SET(&coords,"A:%#andar_atual% X:%XPOS% Y:%YPOS% Z:%ZPOS%");
  407. IFMATCHES("%&coords_andares%","<%&coords%>");
  408. SET(#ypos_ftemp,"%YPOS%");
  409. SET(#zpos_set,"%ZPOS%");
  410. BREAK;
  411. ELSE;
  412. ECHO("/home %&sleep_home%");
  413. WAIT(10T);
  414. UNSET(coord_ok);
  415. ENDIF;
  416. ELSE;
  417. ECHO("/home %&sleep_home%");
  418. WAIT(10T);
  419. SET(coord_ok);
  420. ENDIF;
  421. &soulsand = 5454;
  422. &sleep_af = 5454;
  423. UNSET(ok1);
  424. DO(200);
  425. IF(@sleepteleport);
  426. IF(!delay_teleport);
  427. SET(delay_teleport);
  428. WAIT(12T);
  429. KEYDOWN(JUMP);
  430. WAIT(8T);
  431. KEYUP(JUMP);
  432. ENDIF;
  433. IF(verificar_coord);
  434. SET(&coords,"A:%#andar_atual% X:%XPOS% Y:%YPOS% Z:%ZPOS%");
  435. IFMATCHES("%&coords_andares%","<%&coords%>");
  436. SET(coord_ok);
  437. ELSE;
  438. UNSET(coord_ok);
  439. ENDIF;
  440. ENDIF;
  441. GETIDREL(0,0,0,&soulsand);
  442. GETIDREL(0,1,0,&sleep_af);
  443. IF(%&soulsand%="soul_sand");
  444. IF((%&sleep_af%="air")||(%&sleep_af%="nether_wart"));
  445. SET(ok1);
  446. ENDIF;
  447. ENDIF;
  448. ENDIF;
  449. UNTIL((@sleepteleport)&&(coord_ok)&&(ok1));
  450. IF((ok1)&&(%#sleep_tentativas%=5));
  451. SET(#ypos_ftemp,"%YPOS%");
  452. SET(&sleep_home,"sleepft");
  453. SET(sleep_look_last);
  454. SET(coord_ok);
  455. UNSET(verificar_coord);
  456. ENDIF;
  457. DO(10);
  458. IF(verificar_coord);
  459. SET(&coords,"A:%#andar_atual% X:%XPOS% Y:%YPOS% Z:%ZPOS%");
  460. IFMATCHES("%&coords_andares%","<%&coords%>");
  461. SET(#ypos_ftemp,"%YPOS%");
  462. SET(#zpos_set,"%ZPOS%");
  463. SET(coord_ok);
  464. ELSE;
  465. UNSET(coord_ok);
  466. ENDIF;
  467. ENDIF;
  468. LOOP;
  469. INC(#sleep_tentativas,1);
  470. UNTIL((@sleepteleport)&&(coord_ok)&&(%YPOS%=%#ypos_ftemp%));
  471. IF((sleep_look_last)&&(%#sleep_shield_colheita%<10));
  472. DO(4);
  473. GETIDREL(0,0,0,&soulsand);
  474. GETIDREL(0,1,0,&sleep_af);
  475. UNTIL((%&soulsand%="soul_sand")&&((%&sleep_af%="air")||(%&sleep_af%="nether_wart")));
  476. LOOK(%&look_ftemp%);
  477. ENDIF;
  478. SET(#sleep_shield_colheita,"");
  479. SET(#fungo_nao_encontrado,"");
  480. IF(%DIRECTION%="S");
  481. SET(&sleep_match,"<1.SOUTH><2.RIGHT><3.180><4.1>");
  482. SET(&comer_dir,"SOUTH");
  483. ELSE;
  484. SET(&sleep_match,"<1.NORTH><2.LEFT><3.0><4.-1>");
  485. SET(&comer_dir,"NORTH");
  486. ENDIF;
  487. IF(forcar_comer);
  488. UNSET(forcar_comer);
  489. DO(5);
  490. SET(#sleep_shield,"");
  491. IF(%GUI%="INVENTORY");
  492. GUI();
  493. ENDIF;
  494. DO;
  495. LOOK(%&comer_dir%);
  496. PICK(%&sleep_id_comida%);
  497. KEY(USE);
  498. INC(#sleep_shield,1);
  499. UNTIL((%HUNGER%>=16)||(%#sleep_shield%>=150)||(%STACKSIZE%=0));
  500. WAIT(5T);
  501. UNTIL((%HUNGER%>=16)||(%STACKSIZE%=0));
  502. ENDIF;
  503. GUI();
  504. KEYUP(FORWARD);
  505. KEYUP(LEFT);
  506. KEYUP(RIGHT);
  507. KEYUP(SNEAK);
  508. KEYUP(BACK);
  509. SET(#xig,"");
  510. SET(#zig,"");
  511. DO;
  512. IFMATCHES("%&sleep_match%","^<1.(.+)><2.(.+)><3.(.+)><4.(.+)>$");
  513. MATCH("%&sleep_match%","^<1.(.+)><2.(.+)><3.(.+)><4.(.+)>$",{&look,&mov,#yaw,#drel_1});
  514. ENDIF;
  515. IF(sleepft);
  516. UNSET(sleepft);
  517. SET(#slot_vazio_cont,"");
  518. TYPE("E");
  519. WAIT(75MS);
  520. UNSAFE;
  521. FOR(#sleep_slot,44,9);
  522. GETSLOTITEM(%#sleep_slot%,&sleep_id);
  523. IF(%&sleep_id%="air");
  524. INC(#slot_vazio_cont,1);
  525. ENDIF;
  526. IF(%#slot_vazio_cont%=4);
  527. BREAK;
  528. ENDIF;
  529. NEXT;
  530. ENDUNSAFE;
  531. TYPE("E");
  532. WAIT(75MS);
  533. IF((%ZPOS%=%#zpos_set%)||(%#slot_vazio_cont%<=3));
  534. UNSET(@sleepsethome);
  535. DO(2);
  536. LOOK(%&look%);
  537. ECHO("/sethome sleepft");
  538. DO(60);
  539. UNTIL(@sleepsethome);
  540. WHILE(!@sleepsethome);
  541. SET(&look_ftemp,"%&look%");
  542. SET(pos_save);
  543. ENDIF;
  544. IF(fungo_nao_encontrado);
  545. INC(#fungo_nao_encontrado,1);
  546. IF(%#fungo_nao_encontrado%>=10);
  547. BREAK;
  548. ELSE;
  549. UNSET(fungo_nao_encontrado);
  550. ENDIF;
  551. ENDIF;
  552. IF((%&sleep_quest_3%="Sim")&&(%HUNGER%<=6));
  553. SLOT(9);
  554. UNSET(comprar_comida);
  555. UNSET(conjuncao);
  556. IFMATCHES("%ITEM%","%&sleep_id_comida%");
  557. IF(%STACKSIZE%>=2);
  558. SET(conjuncao);
  559. ENDIF;
  560. ENDIF;
  561. IF(conjuncao);
  562. ELSE;
  563. GUI(INVENTORY);
  564. GETSLOT(%&sleep_id_comida%,#slot);
  565. IF((%#slot%=-1)||(%#slot%=44));
  566. SLOTCLICK(44,L,TRUE);
  567. LOG("");
  568. LOG("&6&l[&f&oM&facro&6&l] &aCompra &ade &acomida &ahabilitada. &9&o#SLEEP");
  569. LOG("");
  570. SET(comprar_comida);
  571. SET(inventario_cheio);
  572. BREAK;
  573. ENDIF;
  574. SLOTCLICK(%#slot%,L,FALSE);
  575. WAIT(3T);
  576. SLOTCLICK(44,L,FALSE);
  577. WAIT(3T);
  578. SLOTCLICK(%#slot%,L,FALSE);
  579. WAIT(3T);
  580. GUI();
  581. ENDIF;
  582. DO(5);
  583. SET(#sleep_shield,"");
  584. LOOK(%&look%);
  585. DO;
  586. SLOT(9);
  587. KEY(USE);
  588. INC(#sleep_shield,1);
  589. UNTIL((%HUNGER%>=16)||(%#sleep_shield%>=150)||(%STACKSIZE%=0));
  590. WAIT(4T);
  591. UNTIL((%HUNGER%>=16)||(%STACKSIZE%=0));
  592. ENDIF;
  593. GUI();
  594. IF(%#slot_vazio_cont%<=3);
  595. LOG("");
  596. LOG("&6&l[&f&oM&facro&6&l] &aPoucos &aslots &alivres, &ainiciando %&sleep_msg_1%. &9&o#SLEEP");
  597. LOG("");
  598. SET(inventario_cheio);
  599. BREAK;
  600. ELSE;
  601. LOG("&6&l[&f&oM&facro&6&l] &aInventário &aainda &avazio. &9&o#SLEEP");
  602. ENDIF;
  603. ENDIF;
  604. UNSAFE;
  605. LOOK(%#yaw%,90);
  606. GETIDREL(0,0,0,&soulsand);
  607. GETIDREL(0,1,0,&fungo_1);
  608. GETIDREL(0,0,%#drel_1%,&id_1);
  609. SET(&a,"nothing");
  610. IF((%&fungo_1%="nether_wart")&&((%XPOS%!=%#xig%)||(%ZPOS%!=%#zig%)));
  611. SET(&a,"colepla");
  612. ELSEIF((%&fungo_1%!="nether_wart")&&(%&soulsand%="soul_sand"));
  613. SET(&a,"plantar");
  614. ENDIF;
  615. IF((%&a%!="nothing")&&((%FPS%<21)||(%#sleep_quest_4%>1)));
  616. KEYUP(FORWARD);
  617. ENDIF;
  618. IF(%&a%="colepla");
  619. SLOT(1);
  620. WAIT(%#sleep_delay%MS);
  621. KEY(ATTACK);
  622. WAIT(%#sleep_delay%MS);
  623. SET(&a,"plantar");
  624. SET(#xig,"%XPOS%");
  625. SET(#zig,"%ZPOS%");
  626. ENDIF;
  627. IF(%&a%="plantar");
  628. PICK(nether_wart);
  629. IF((%ITEM%!="nether_wart")&&(!fungo_nao_encontrado));
  630. GUI(INVENTORY);
  631. GETSLOT(nether_wart,#sleep_slot);
  632. IF((%#sleep_slot%!=-1)&&(%#sleep_slot%<36));
  633. SLOTCLICK(%#sleep_slot%,L,TRUE);
  634. ELSE;
  635. SET(fungo_nao_encontrado);
  636. ENDIF;
  637. PICK(nether_wart);
  638. GUI();
  639. ENDIF;
  640. WAIT(%#sleep_delay%MS);
  641. KEY(USE);
  642. WAIT(%#sleep_delay%MS);
  643. ENDIF;
  644. GETIDREL(-1,1,0,&fungo_plant);
  645. GETIDREL(-1,0,0,&soulsand_plant);
  646. IF((%&fungo_plant%="air")&&(%&soulsand_plant%="soul_sand"));
  647. PICK(nether_wart);
  648. IF(%ITEM%="nether_wart");
  649. KEYUP(FORWARD);
  650. LOOK(270,53);
  651. WAIT(%#sleep_delay%MS);
  652. KEY(USE);
  653. WAIT(%#sleep_delay%MS);
  654. LOOK(%#yaw%,90);
  655. ENDIF;
  656. ENDIF;
  657. IF(%GUI%!="NONE");
  658. KEYUP(FORWARD);
  659. IF(%GUI%="GUICHAT");
  660. LOG("");
  661. LOG("&6&l[&f&oM&facro&6&l] &aChat &adetectado, &afeche &apara &acontinuar &aou &apressione &asimultaneamente &aas &ateclas &f&lM &a+ &f&lN &apara &aexecutar &auma &aação. &9&o#SLEEP");
  662. LOG("");
  663. DO;
  664. UNTIL((%GUI%!="GUICHAT")||((KEY_N)&&(KEY_M)));
  665. IF((KEY_N)&&(KEY_M))
  666. GUI();
  667. PROMPT(&menu,"$$[ [%&sleep_quest_2%,Trocar andar]]","Qual ação você deseja executar agora?");
  668. IF((%&menu%="Vender")||(%&menu%="Armazenar"));
  669. LOG("&6&l[&f&oM&facro&6&l] &aForçando %&sleep_msg_1%. &9&o#SLEEP");
  670. SET(inventario_cheio);
  671. BREAK;
  672. ELSEIF(%&menu%="Trocar andar");
  673. LOG("&6&l[&f&oM&facro&6&l] &aForçando &aa &atroca &ade &aandar. &9&o#SLEEP");
  674. SET(mudar_andar);
  675. BREAK;
  676. ENDIF;
  677. ENDIF;
  678. ELSE;
  679. LOG("&6&l[&f&oM&facro&6&l] &aJanela &adetectada, &acontinuando &aem &f3 &asegundos. &9&o#SLEEP");
  680. WAIT(60T);
  681. ENDIF;
  682. LOOK(%#yaw%,90);
  683. GUI();
  684. ENDIF;
  685. ENDUNSAFE;
  686. IF(%&id_1%="soul_sand");
  687. KEYDOWN(FORWARD);
  688. SPRINT;
  689. ELSE;
  690. KEYUP(FORWARD);
  691. GETIDREL(1,0,0,&soulsand);
  692. GETIDREL(0,0,%#drel_1%,&id_1);
  693. IF(%YPOS%!=%#ypos_ftemp%);
  694. INC(#sleep_shield_colheita,1);
  695. LOG("&6&l[&f&oM&facro&6&l] &cPosição &cinválida &f[&c%#sleep_shield_colheita%&f/&c10&f]&c. &9&o#SLEEP");
  696. WAIT(30T);
  697. ELSEIF((%&soulsand%="soul_sand")&&(%&id_1%!="soul_sand"));
  698. LOOK(%&look%);
  699. LOOK(+180,+0);
  700. IF(%DIRECTION%="S");
  701. SET(&sleep_match,"<1.SOUTH><2.RIGHT><3.180><4.1>");
  702. ELSE;
  703. SET(&sleep_match,"<1.NORTH><2.LEFT><3.0><4.-1>");
  704. ENDIF;
  705. SET(#sleep_shield,"");
  706. SET(#xpos_atual,"%XPOS%");
  707. SET(sleepft);
  708. IF(%ZPOS%=%#zpos_set%);
  709. ECHO("/delhome sleepft");
  710. ENDIF;
  711. DO(150);
  712. KEYDOWN(%&mov%);
  713. IF(%XPOS%!=%#xpos_atual%);
  714. KEYDOWN(SNEAK);
  715. INC(#sleep_shield,1);
  716. ENDIF;
  717. UNTIL((%XPOS%!=%#xpos_atual%)&&(%#sleep_shield%=9));
  718. KEYUP(%&mov%);
  719. KEYUP(SNEAK);
  720. ELSEIF((%&soulsand%!="soul_sand")&&(%&id_1%!="soul_sand"));
  721. LOG("");
  722. LOG("&6&l[&f&oM&facro&6&l] &aAndar &acolhido. &9&o#SLEEP");
  723. LOG("");
  724. SET(mudar_andar);
  725. ENDIF;
  726. ENDIF;
  727. UNTIL((%#sleep_shield_colheita%=10)||(mudar_andar));
  728. IF(%#sleep_shield_colheita%=10);
  729. UNSET(sleepft);
  730. ENDIF;
  731. IF(inventario_cheio);
  732. UNSET(inventario_cheio);
  733. SET(#getslot,"9");
  734. SET(#itens_inv_armazenar,"");
  735. UNSAFE;
  736. DO;
  737. IF(%GUI%!="GUIINVENTORY");
  738. GUI(INVENTORY);
  739. ENDIF;
  740. GETSLOT(nether_wart,#slot_fungo,%#getslot%);
  741. IF(%#slot_fungo%!=-1);
  742. INC(#itens_inv_armazenar,1);
  743. #getslot = %#slot_fungo% + 1;
  744. ENDIF;
  745. UNTIL(%#slot_fungo%=-1);
  746. IF(%&sleep_quest_3%="Sim");
  747. GETSLOTITEM(44,&sleep_id);
  748. IFMATCHES("%&sleep_id%","%&sleep_id_comida%");
  749. ELSE;
  750. SLOTCLICK(44,L,TRUE);
  751. ENDIF;
  752. ENDIF;
  753. ENDUNSAFE;
  754. #fva = %#itens_inv_armazenar% - 1;
  755. IF(%#itens_inv_armazenar%<1);
  756. LOG("");
  757. LOG("&6&l[&f&oM&facro&6&l] &cFungos &cinsuficientes &cpara &ciniciar %&sleep_msg_1%. &9&o#SLEEP");
  758. LOG("");
  759. ELSE;
  760. IF(%&sleep_quest_2%="Vender");
  761. UNSET(sleep_venda_concluida);
  762. UNSET(npc_obs);
  763. DO;
  764. DO;
  765. UNSET(@sleepteleport);
  766. SET(#sleep_inc,"");
  767. ECHO("/home sleepfv");
  768. WAIT(15T);
  769. DO(200);
  770. IF(%GUI%!="GUIINVENTORY");
  771. GUI(INVENTORY);
  772. ENDIF;
  773. UNTIL(@sleepteleport);
  774. WAIT(5T);
  775. WHILE(!@sleepteleport);
  776. DO(100);
  777. GETIDREL(0,-1,0,&sleep_id);
  778. WHILE(%&sleep_id%="air");
  779. IFMATCHEST("%HITNAME%","CLIQUE");
  780. IF(%GUI%!="GUIINVENTORY");
  781. GUI(INVENTORY);
  782. ENDIF;
  783. DO(3);
  784. KEY(USE);
  785. WAIT(2T);
  786. DO(100);
  787. UNTIL(%GUI%="GUICHEST");
  788. UNTIL(%GUI%="GUICHEST");
  789. IF(%GUI%="GUICHEST");
  790. WAIT(2T);
  791. SLOTCLICK(33,R,FALSE);
  792. DO(100);
  793. GETSLOTITEM(4,&sleep_id);
  794. UNTIL(%&sleep_id%="nether_wart");
  795. WAIT(2T);
  796. SLOTCLICK(31,L,FALSE);
  797. WAIT(10T);
  798. SET(sleep_venda_concluida);
  799. ENDIF;
  800. ELSE;
  801. SET(npc_obs);
  802. ENDIF;
  803. IF(!sleep_venda_concluida);
  804. DO(20);
  805. KEYDOWN(BACK);
  806. LOOP;
  807. KEYUP(BACK);
  808. GUI();
  809. LOG("");
  810. IF(npc_obs);
  811. LOG("&6&l[&f&oM&facro&6&l] &cVisão &cpara &co &cNPC &fFazendeiro &cobstruída. &cReiniciando &ca &cvenda &cem &f5 &csegundos... &9&o#SLEEP");
  812. ELSE;
  813. LOG("&6&l[&f&oM&facro&6&l] &cAlgum &cproblema &caconteceu. &cReiniciando &ca &cvenda &cem &f5 &csegundos... &9&o#SLEEP");
  814. ENDIF;
  815. LOG("");
  816. WAIT(100T);
  817. ELSE;
  818. LOG("");
  819. LOG("&6&l[&f&oM&facro&6&l] &aVenda &aconcluída. &9&o#SLEEP");
  820. LOG("");
  821. ENDIF;
  822. UNTIL(sleep_venda_concluida);
  823. GUI();
  824. INC(#fungos_venarm,%#fva%);
  825. INC(#fungos_venarm,1);
  826. ELSEIF(%&sleep_quest_2%="Armazenar");
  827. UNSET(block_home_baus);
  828. UNSET(pos_baus_verificar);
  829. DO;
  830. SET(fim);
  831. IF(!block_home_baus);
  832. DO;
  833. GUI();
  834. SET(#sleep_inc,"");
  835. UNSET(@sleepteleport);
  836. UNSET(delay_teleport);
  837. UNSET(home_protection);
  838. ECHO("/home sleepfb");
  839. DO(3);
  840. DO;
  841. GETIDREL(0,-1,0,&bloco);
  842. IF(@sleepteleport);
  843. IF(!delay_teleport);
  844. SET(delay_teleport);
  845. WAIT(12T);
  846. KEYDOWN(JUMP);
  847. WAIT(8T);
  848. KEYUP(JUMP);
  849. ENDIF;
  850. SET(&verificar_baus,"");
  851. 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);
  852. 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);
  853. SET(&verificar_baus,"%&bau1%-%&bau2%-%&bau3%-%&bau4%-%&bau5%-%&bau6%-%&bau7%-%&bau8%-%&bau9%-%&bau10%");
  854. IFMATCHES("%&verificar_baus%","^(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)$");
  855. SET(ok1);
  856. ELSE;
  857. UNSET(ok1);
  858. ENDIF;
  859. ELSE;
  860. UNSET(ok1);
  861. ENDIF;
  862. IF(pos_baus_verificar);
  863. IF((%XPOS%=%#baus_xpos%)&&(%YPOS%=%#baus_ypos%)&&(%ZPOS%=%#baus_zpos%));
  864. SET(ok2);
  865. ELSE;
  866. UNSET(ok2);
  867. ENDIF;
  868. ELSE;
  869. SET(ok2);
  870. ENDIF;
  871. INC(#sleep_inc,1);
  872. IF(%#sleep_inc%=200);
  873. LOG("");
  874. LOG("&6&l[&f&oM&facro&6&l] &cAlgum &cproblema &caconteceu. &cSe &ceste &cerro &cpersistir, &ctem &calgo &cerrado &ccom &csua &ctrap &cde &cbaús.");
  875. LOG("&6&l[&f&oM&facro&6&l] &cVeja &ccomo &cvocê &cdeve &ccontruir &ca &ctrap &cde &cbaús:");
  876. LOG("&6&l[&f&oM&facro&6&l] &ahttps://prnt.sc/j5jtsf");
  877. LOG("");
  878. LOG("&6&l[&f&oM&facro&6&l] &cTentando &cnovamente...");
  879. LOG("");
  880. SET(home_protection);
  881. BREAK;
  882. ENDIF;
  883. UNTIL((ok1)&&(ok2)&&(%&bloco%!="air")&&(@sleepteleport));
  884. WHILE(!home_protection);
  885. UNTIL(!home_protection);
  886. IF(trap_salvar_coordenadas);
  887. SET(#baus_xpos,"%XPOS%");
  888. SET(#baus_ypos,"%YPOS%");
  889. SET(#baus_zpos,"%ZPOS%");
  890. UNSET(trap_salvar_coordenadas);
  891. ENDIF;
  892. UNSET(pos_baus_verificar);
  893. ELSE;
  894. UNSET(block_home_baus);
  895. ENDIF;
  896. IF((!baus_lotados)&&(%#itens_inv_armazenar%>=1));
  897. SET(#sleep_inc,"199");
  898. SET(#sleep_inc_two,"");
  899. IF(%#bau_atual%=1);
  900. SET(#pos_first_chest,"%#baus_xpos%");
  901. SET(#pos_last_chest,"%#baus_xpos%");
  902. ENDIF;
  903. #pos_penult_chest = %#pos_last_chest% - 1;
  904. DO;
  905. LOOK(NORTH);
  906. IF(%XPOS%=%#pos_last_chest%);
  907. WAIT(20MS);
  908. BREAK;
  909. ELSEIF((%XPOS%>%#pos_last_chest%)||(%YPOS%!=%#baus_ypos%)||(%ZPOS%!=%#baus_zpos%));
  910. LOG("");
  911. LOG("&6&l[&f&oM&facro&6&l] &cAlgum &cproblema &caconteceu. &cTentando &cresolver... &9&o#SLEEP");
  912. LOG("");
  913. UNSET(fim);
  914. ELSE;
  915. GUI(INVENTORY);
  916. KEYDOWN(RIGHT);
  917. IF(%XPOS%<%#pos_penult_chest%);
  918. KEYUP(SNEAK);
  919. ELSE;
  920. KEYDOWN(SNEAK);
  921. ENDIF;
  922. ENDIF;
  923. WHILE(fim);
  924. KEYUP(SNEAK);
  925. KEYUP(RIGHT);
  926. GUI();
  927. LOG("");
  928. LOG("&6&l[&f&oM&facro&6&l] &aBaú &ade &aarmazenamento &anúmero &f%#bau_atual%&a. &9&o#SLEEP");
  929. LOG("");
  930. IF(fim);
  931. DO;
  932. INC(#sleep_inc,1);
  933. IF(%#sleep_inc%=200);
  934. GUI();
  935. SET(#sleep_inc,"");
  936. INC(#sleep_inc_two,1);
  937. IF(%#sleep_inc_two%=6);
  938. LOG("");
  939. LOG("&6&l[&f&oM&facro&6&l] &cO &cbaú &cnão &cestá &cabrindo. &cTentando &cresolver... &9&o#SLEEP");
  940. LOG("");
  941. SET(pos_baus_verificar);
  942. UNSET(fim);
  943. BREAK;
  944. ENDIF;
  945. LOOK(NORTH);
  946. IFMATCHES("%#bau_atual%","^(.*)[0-9]$");
  947. MATCH("%#bau_atual%","^(.*)([0-9])$",{,#bau_atual_unit});
  948. ENDIF;
  949. IF((%#bau_atual%=1)||(%#bau_atual_unit%=1)||(%#bau_atual_unit%=6));
  950. LOOK(+0,+308);
  951. ELSEIF((%#bau_atual%=2)||(%#bau_atual_unit%=2)||(%#bau_atual_unit%=7));
  952. LOOK(+0,+328);
  953. ELSEIF((%#bau_atual%=3)||(%#bau_atual_unit%=3)||(%#bau_atual_unit%=8));
  954. LOOK(+0,+358);
  955. ELSEIF((%#bau_atual%=4)||(%#bau_atual_unit%=4)||(%#bau_atual_unit%=9));
  956. LOOK(+0,+33);
  957. ELSEIF((%#bau_atual%=5)||(%#bau_atual_unit%=5)||(%#bau_atual_unit%=0));
  958. LOOK(+0,+50);
  959. ENDIF;
  960. LOOKS(+0,+1,1);
  961. KEY(USE);
  962. ELSEIF((%XPOS%!=%#pos_last_chest%)||(%YPOS%!=%#baus_ypos%)||(%ZPOS%!=%#baus_zpos%));
  963. LOG("");
  964. LOG("&6&l[&f&oM&facro&6&l] &cVocê &cnão &cestá &conde &cdeveria. &cTentando &cresolver... &9&o#SLEEP");
  965. LOG("");
  966. SET(pos_baus_verificar);
  967. UNSET(fim);
  968. ENDIF;
  969. UNTIL((!fim)||(%GUI%="GUICHEST"));
  970. IF(%&sleep_quest_3%="Sim");
  971. SET(#sleep_slot_max,"87");
  972. ELSE;
  973. SET(#sleep_slot_max,"88");
  974. ENDIF;
  975. IF(fim);
  976. WAIT(5T);
  977. &id_inv = 333;
  978. FOR(#sleep_slot_inv,54,%#sleep_slot_max%);
  979. IF(%GUI%!="GUICHEST");
  980. LOG("");
  981. LOG("&6&l[&f&oM&facro&6&l] &cO &cbaú &cfoi &cfechado. &cTentando &creabrir... &9&o#SLEEP");
  982. LOG("");
  983. SET(pos_baus_verificar);
  984. UNSET(fim);
  985. BREAK;
  986. ENDIF;
  987. UNSET(slot_air);
  988. UNSAFE;
  989. IF(%&id_inv%="air");
  990. SET(slot_air);
  991. ELSE;
  992. FOR(#sleep_slot_chest,53,0);
  993. GETSLOTITEM(%#sleep_slot_chest%,&id_chest);
  994. IF(%&id_chest%="air");
  995. SET(slot_air);
  996. BREAK;
  997. ENDIF;
  998. NEXT;
  999. ENDIF;
  1000. ENDUNSAFE;
  1001. IF(!slot_air);
  1002. GETSLOT(nether_wart,#slot_fungo,54);
  1003. IF((%#slot_fungo%!=-1)&&(%#slot_fungo%<%#sleep_slot_max%));
  1004. SLOTCLICK(%#slot_fungo%,L,TRUE);
  1005. WAIT(10MS);
  1006. ENDIF;
  1007. INC(#bau_atual,1);
  1008. SET(block_home_baus);
  1009. IF((%#bau_atual_unit%=5)||((%#bau_atual_unit%=0));
  1010. 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);
  1011. 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);
  1012. SET(&verificar_baus,"%&bau1%-%&bau2%-%&bau3%-%&bau4%-%&bau5%-%&bau6%-%&bau7%-%&bau8%-%&bau9%-%&bau10%");
  1013. IFMATCHES("%&verificar_baus%","^(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)$");
  1014. INC(#pos_last_chest,1);
  1015. UNSET(fim);
  1016. BREAK;
  1017. ELSE;
  1018. SET(baus_lotados);
  1019. GUI();
  1020. DO;
  1021. LOG("");
  1022. LOG("&6&l[&f&oM&facro&6&l] &cOs &cbaús &cacabaram, &cesvazie-os &ce &cselecione &c\"&cresetar&c\" &cao &cligar &ca &cmacro. &9&o#SLEEP");
  1023. LOG("");
  1024. WAIT(100T);
  1025. LOOP;
  1026. ENDIF;
  1027. ENDIF;
  1028. UNSET(fim);
  1029. BREAK;
  1030. ELSE;
  1031. GETSLOTITEM(%#sleep_slot_inv%,&id_inv,#stack_inv);
  1032. IF((%&id_inv%="air")||(%&id_inv%="cooked_beef"));
  1033. ELSE;
  1034. IFMATCHES("%&id_inv%","^nether_wart$");
  1035. SLOTCLICK(%#sleep_slot_inv%,L,TRUE);
  1036. WAIT(10MS);
  1037. DEC(#itens_inv_armazenar,1);
  1038. ENDIF;
  1039. ENDIF;
  1040. ENDIF;
  1041.  
  1042. NEXT;
  1043. ELSE;
  1044. GUI();
  1045. ENDIF;
  1046. ENDIF;
  1047. ENDIF;
  1048. UNTIL(fim);
  1049. INC(#fungos_venarm,%#fva%);
  1050. GUI();
  1051. ENDIF;
  1052. ENDIF;
  1053. ENDIF;
  1054. IF(comprar_comida);
  1055. UNSET(comprar_comida);
  1056. UNSET(sleep_compra_concluida);
  1057. UNSET(npc_obs);
  1058. DO;
  1059. DO;
  1060. UNSET(@sleepteleport);
  1061. SET(#sleep_inc,"");
  1062. ECHO("/home sleepfood");
  1063. WAIT(15T);
  1064. DO(200);
  1065. IF(%GUI%!="GUIINVENTORY");
  1066. GUI(INVENTORY);
  1067. ENDIF;
  1068. UNTIL(@sleepteleport);
  1069. WAIT(5T);
  1070. WHILE(!@sleepteleport);
  1071. DO(100);
  1072. GETIDREL(0,-1,0,&sleep_id);
  1073. WHILE(%&sleep_id%="air");
  1074. IFMATCHEST("%HITNAME%","CLIQUE");
  1075. IF(%GUI%!="GUIINVENTORY");
  1076. GUI(INVENTORY);
  1077. ENDIF;
  1078. DO(3);
  1079. KEY(USE);
  1080. WAIT(2T);
  1081. DO(100);
  1082. UNTIL(%GUI%="GUICHEST");
  1083. UNTIL(%GUI%="GUICHEST");
  1084. IF(%GUI%="GUICHEST");
  1085. WAIT(2T);
  1086. SLOTCLICK(8,L,FALSE);
  1087. DO(100);
  1088. GETSLOTITEM(4,&sleep_id);
  1089. UNTIL(%&sleep_id%="cooked_beef");
  1090. WAIT(2T);
  1091. SLOTCLICK(33,L,FALSE);
  1092. WAIT(7T);
  1093. GUI();
  1094. WAIT(3T);
  1095. GUI(INVENTORY);
  1096. GETSLOT(%&sleep_id_comida%,#slot);
  1097. DO(3);
  1098. SLOTCLICK(44,L,TRUE);
  1099. LOOP;
  1100. WAIT(3T);
  1101. SLOTCLICK(%#slot%,L,FALSE);
  1102. WAIT(3T);
  1103. SLOTCLICK(44,L,FALSE);
  1104. WAIT(3T);
  1105. SET(sleep_compra_concluida);
  1106. SET(forcar_comer);
  1107. ENDIF;
  1108. ELSE;
  1109. SET(npc_obs);
  1110. ENDIF;
  1111. IF(!sleep_compra_concluida);
  1112. DO(20);
  1113. KEYDOWN(BACK);
  1114. LOOP;
  1115. KEYUP(BACK);
  1116. GUI();
  1117. LOG("");
  1118. IF(npc_obs);
  1119. LOG("&6&l[&f&oM&facro&6&l] &cVisão &cpara &co &cNPC &fCozinheiro &cobstruída. &cReiniciando &ca &ccompra &cem &f5 &csegundos... &9&o#SLEEP");
  1120. ELSE;
  1121. LOG("&6&l[&f&oM&facro&6&l] &cAlgum &cproblema &caconteceu. &cReiniciando &ca &ccompra &cem &f5 &csegundos... &9&o#SLEEP");
  1122. ENDIF;
  1123. LOG("");
  1124. WAIT(100T);
  1125. ELSE;
  1126. LOG("");
  1127. LOG("&6&l[&f&oM&facro&6&l] &aCompra &aconcluída. &9&o#SLEEP");
  1128. LOG("");
  1129. ENDIF;
  1130. UNTIL(sleep_compra_concluida);
  1131. GUI();
  1132. ENDIF;
  1133. IF((fungo_nao_encontrado)&&(%#fungo_nao_encontrado%>=10));
  1134. UNSET(fungo_nao_encontrado);
  1135. UNSET(@sleepteleport);
  1136. ECHO("/spawn");
  1137. DO(100);
  1138. UNTIL(@sleepteleport);
  1139. LOG("");
  1140. LOG("&6&l[&f&oM&facro&6&l] &cVocê &cfoi &cenviado &cao &cspawn &cpara &ctentar &ccorrigir &cum &cproblema. Retomando &cem &f3 &csegundos... &9&o#SLEEP");
  1141. LOG("");
  1142. WAIT(60T);
  1143. ENDIF;
  1144. LOOP;
  1145.  
  1146. }$$
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!