lomexicano

Vendedor Mexicano v4.23 [1.5 e 1.8]

Mar 23rd, 2020
3,706
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 59.80 KB | None | 0 0
  1. $${
  2. ///////////////////////////////////////////////////////
  3. //vendedor mexicano v4.23 ~ feito por lomexicano; ////
  4. //Testado em minecraft 1.5.2 e 1.8.9; ////
  5. //Edite e republique como quiser; ////
  6. //Macro exclusivamente GRATUITA. ////
  7. //////////////////////////////////////////////////
  8.  
  9.  
  10.  
  11. //Informacoes extras e aplicaçao para cloudscript;
  12. unset(@cloud);
  13. set(&versao_macro,"4.23");
  14. &dev_mode = "Nao";
  15. ifmatches(%&dev_mode%,"Sim|sim|S|s|Y|y|Yes|yes"); set(dev); else; unset(dev); endif;
  16.  
  17. set(&cloudscripttitle,"&0&k@&0&k@&r &fVendedor &2&lMEX&fIC&4ANO &fv&6%&versao_macro% &0&k@&0&k@");
  18. toggle(@vendedor_mexicano_v4);
  19. log(" ");
  20.  
  21. if(@vendedor_mexicano_v4);
  22. #conta_packs = #conta_itens / 64;
  23. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fVendedor &2Mex&fic&4ano &cFinalizado&f.");
  24. keyup(right);keyup(left);keyup(sneak);keyup(jump);keyup(forward);keyup(back);
  25. if(#conta_itens > 0);
  26. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &f&lContagem: &r&6%#conta_baus% baus verificados&f, &7%#conta_itens% &7itens&f (&a%#conta_packs% packs&f).");
  27. endif;
  28. stop;
  29. endif;
  30.  
  31.  
  32.  
  33. // Resetar contagem de baus e itens;
  34. #conta_baus = 1;
  35. #conta_colunas = 1;
  36. #conta_itens = 0;
  37.  
  38.  
  39. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fVendedor &2Mex&fic&4ano &aIniciado&f.");
  40. wait(500ms);
  41.  
  42. ifmatches(%ITEM%,"[a-zA-Z]");
  43. set(&version,"1.8");
  44. set(&exit_code,"SAIR");
  45. set(&extra_items,"§e-> §bCristais §3de prismarinho,§e-> §9Fragmentos §3de prismarinho,");
  46. else;
  47. unset(&extra_items);
  48. set(&version,"1.5");
  49. set(&exit_code,"9999");
  50. endif;
  51.  
  52. if(@cloud);
  53. if(@cloud_mexican_var);
  54. unset(first_blood);
  55. unset(configuracoes);
  56. unset(&item);
  57. unset(&trap);
  58. unset(&pergunta_set_temp);
  59. unset(&reiniciar);
  60. unset(&home_baus);
  61. unset(&home_venda);
  62. unset(&setar_home_temporaria);
  63. unset(&set_temp);
  64. unset(&sethome_set_temp);
  65. unset(#delay);
  66. unset(&compactar);
  67. ifmatches("%@&cloud_mexican_var[0]%","FirstBlood: OK");
  68. set(first_blood);
  69. else;
  70. unset(first_blood);
  71. endif;
  72. ifmatches("%@&cloud_mexican_var[1]%","Configuracoes: OK");
  73. set(configuracoes);
  74. else;
  75. unset(configuracoes);
  76. endif;
  77. set(&item,"%@&cloud_mexican_var[2]%");
  78. set(&trap,"%@&cloud_mexican_var[3]%");
  79. set(&pergunta_set_temp,"%@&cloud_mexican_var[4]%");
  80. set(&reiniciar,"%@&cloud_mexican_var[5]%");
  81. set(&home_baus,"%@&cloud_mexican_var[6]%");
  82. set(&home_venda,"%@&cloud_mexican_var[7]%");
  83. set(&setar_home_temporaria,"%@&cloud_mexican_var[8]%");
  84. set(&set_temp,"%@&cloud_mexican_var[9]%");
  85. set(&sethome_set_temp,"%@&cloud_mexican_var[10]%");
  86. set(#delay,"%@&cloud_mexican_var[11]%");
  87. set(&compactar,"%@&cloud_mexican_var[12]%");
  88. endif;
  89. endif;
  90.  
  91. if((!first_blood)|(!&item)|(!&trap)|(!&set_temp)|(!&reiniciar)|(!&home_baus)|(!&home_venda));
  92. if(!first_blood);
  93. set(&home_baus,"/home sleepfb");
  94. set(&home_venda,"/home sleepfv");
  95. set(&setar_home_temporaria,"/sethome home_temporaria");
  96. if(dev); log("first_blood"); endif;
  97. set(#delay,300);
  98. endif;
  99. set(first_blood);
  100. unset(configuracoes); set(perguntar_tudo);
  101. if(dev);
  102. log("unset(configuracoes)");
  103. log("set(perguntar tudo)");
  104. endif;
  105. endif;
  106.  
  107. do();
  108. if(configuracoes);
  109. unset(&resposta);
  110. if(@cloud);
  111. unset(@&cloud_mexican_var[]);
  112. if(first_blood);
  113. put(@&cloud_mexican_var[],"FirstBlood: OK"); // 0;
  114. else;
  115. put(@&cloud_mexican_var[],"FirstBlood: NO"); // 0;
  116. endif;
  117. if(configuracoes);
  118. put(@&cloud_mexican_var[],"Configuracoes: OK"); // 1;
  119. else;
  120. put(@&cloud_mexican_var[],"Configuracoes: NO"); // 1;
  121. endif;
  122. put(@&cloud_mexican_var[],"%&item%"); // 2;
  123. put(@&cloud_mexican_var[],"%&trap%"); // 3;
  124. put(@&cloud_mexican_var[],"%&pergunta_set_temp%"); // 4;
  125. put(@&cloud_mexican_var[],"%&reiniciar%"); // 5;
  126. put(@&cloud_mexican_var[],"%&home_baus%"); // 6;
  127. put(@&cloud_mexican_var[],"%&home_venda%"); // 7;
  128. put(@&cloud_mexican_var[],"%&setar_home_temporaria%"); // 8;
  129. put(@&cloud_mexican_var[],"%&set_temp%"); // 9;
  130. put(@&cloud_mexican_var[],"%&sethome_set_temp%"); // 10;
  131. put(@&cloud_mexican_var[],"%#delay%"); // 11;
  132. put(@&cloud_mexican_var[],"%&compactar%"); // 12;
  133. set(@cloud_mexican_var);
  134. endif;
  135.  
  136. set(&empty," ");
  137. unset(&empty_big);
  138. unset(&empty_big2);
  139. unsafe(0);
  140. do(24);
  141. set(&empty_big,"%&empty_big%%&empty%");
  142. loop;
  143. do(8);
  144. set(&empty_big2,"%&empty_big2%%&empty%");
  145. loop;
  146. ifmatches(%&item%,"371|gold_nugget");
  147. if(!&compactar);
  148. set(&compactar,"§cNao");
  149. endif;
  150. set(&mexican_compact_question,",§e§l-> §fCompactar: %&compactar%");
  151. else;
  152. set(&mexican_compact_question,"");
  153. endif;
  154. endunsafe;
  155. do();
  156. prompt(&resposta,"$$[Resposta[§f§lVENDEDOR §2§lMEX§f§lIC§4§lANO,%&empty_big%§7%&versao_macro%,§e§l-> §fItem: §e%&item%%&mexican_compact_question%,§e§l-> §fTrap: §e%&trap%%&pergunta_set_temp%,§e§l-> §fReiniciar: %&reiniciar%,,§6§l-> §fBaus: %&home_baus%,§6§l-> §fVenda: %&home_venda%%&sethome_set_temp%,§6§l-> §fDelay: %#delay%§7ms,,§2§l-> §aContinuar,§4§l-> §cSair]]","");
  157. ifmatches(%&resposta%,"Item|Compactar|Trap|Sethome temp|Reiniciar|Home|Venda|Continuar|Sair|Temp|Delay");
  158. break;
  159. endif;
  160. loop;
  161. ifmatches(%&resposta%,"Sair");
  162. toggle(@vendedor_mexicano_v4);
  163. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fVendedor &2Mex&fic&4ano &cFinalizado&f.");
  164. stop;
  165. endif;
  166. ifmatches(%&resposta%,"Continuar");
  167. if(dev); log("continuar"); endif;
  168. break;
  169. else;
  170. unset(@cloud_mexican_var);
  171. unset(@&cloud_mexican_var[]);
  172. unset(configuracoes);
  173. endif;
  174. else;
  175. set(&resposta,"Item - Trap - §e§l-> §fSethome temp: - Reiniciar");
  176. if(dev); log("perguntar tudo"); endif;
  177. set(perguntar_tudo);
  178. endif;
  179. if(!configuracoes);
  180. ifmatches(%&resposta%,"Item");
  181. set(come_back);
  182. unset(@cloud_mexican_var);
  183. unset(@&cloud_mexican_var[]);
  184. unset(&item);
  185. do();
  186. prompt(&item,"$$[Resposta[§f§lESCOLHA O ITEM,,§6§l-> §a§lOutro,,§f§lPLANTACOES,§e-> §eBatata,§e-> §eBatata envenenada,§e-> §aCana,§e-> §6Cenoura,§e-> §cFungo do nether,§e-> §cMelancia,,§f§lMOBs,§e-> §6Blaze rod,§e-> §4Carne podre,%&extra_items%§e-> §7Linha,§e-> §5Olho de aranha,§e-> §7Osso,§e-> §6Pepita de §eouro,§e-> §8Polvora,§e-> §9Saco de tinta,,§f§lPESCARIA,§e-> §bPeixe cru,§e-> §bPeixe §6assado,,§f§lMINERACAO,§e-> §7Barra de Ferro,§e-> §6Barra de Ouro,§e-> §8Carvao,§e-> §bDiamante,§e-> §aEsmeralda,,§4-> §cSair]]","");
  187. ifmatches(%&item%,"Outro|Batata$|Batata envenenada|Cana|Cenoura|Fungo do nether|Melancia|Blaze rod|Carne podre|Cristais|Fragmentos|Linha|Olho de aranha|Osso|Pepita|Polvora|Saco de tinta|Peixe cru|Peixe §6assado|Barra de Ferro|Barra de Ouro|Carvao|Diamante|Esmeralda|Sair");
  188. break;
  189. endif;
  190. loop;
  191. unsafe(0);
  192. ifmatches(%&item%,"Sair");
  193. unset(&item);
  194. unset(@cloud_mexican_var);
  195. unset(@&cloud_mexican_var[]);
  196. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fVendedor &2Mex&fic&4ano &cFinalizado&f.");
  197. toggle(@vendedor_mexicano_v4);
  198. stop;
  199. endif;
  200. endunsafe;
  201. ifmatches(%&item%,"Outro");
  202. unset(@cloud_mexican_var);
  203. unset(@&cloud_mexican_var[]);
  204. unset(&item);
  205. do();
  206. prompt(&item,$$i:d,"§fSelecione um item para ser vendido. §7§oDigite §c§o%&exit_code% §7§opara sair.");
  207. until(&item);
  208. ifmatches(%&item%,"SAIR|9999");
  209. unset(@cloud_mexican_var);
  210. unset(@&cloud_mexican_var[]);
  211. unset(&item);
  212. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fVendedor &2Mex&fic&4ano &cFinalizado&f.");
  213. toggle(@vendedor_mexicano_v4);
  214. stop;
  215. endif;
  216. endif;
  217. unsafe(0);
  218. ifmatches(%&item%,"Cristais §3de prismarinho");
  219. set(&item,"prismarine_crystals");
  220. endif;
  221. ifmatches(%&item%,"Fragmentos §3de prismarinho");
  222. set(&item,"prismarine_shard");
  223. endif;
  224. ifmatches(%&item%,"Melancia");
  225. ifmatches(%&version%,"1.5");
  226. set(&item,"360");
  227. else;
  228. set(&item,"melon");
  229. endif;
  230. if(dev); log(%&item%); endif;
  231. endif;
  232. ifmatches(%&item%,"Peixe cru");
  233. ifmatches(%&version%,"1.5");
  234. set(&item,"349");
  235. else;
  236. set(&item,"fish");
  237. endif;
  238. if(dev); log(%&item%); endif;
  239. endif;
  240. ifmatches(%&item%,"§bPeixe §6assado");
  241. ifmatches(%&version%,"1.5");
  242. set(&item,"350");
  243. else;
  244. set(&item,"cooked_fish");
  245. endif;
  246. if(dev); log(%&item%); endif;
  247. endif;
  248. ifmatches(%&item%,"Barra de Ferro");
  249. ifmatches(%&version%,"1.5");
  250. set(&item,"265");
  251. else;
  252. set(&item,"iron_ingot");
  253. endif;
  254. if(dev); log(%&item%); endif;
  255. endif;
  256. ifmatches(%&item%,"Barra de Ouro");
  257. ifmatches(%&version%,"1.5");
  258. set(&item,"266");
  259. else;
  260. set(&item,"gold_ingot");
  261. endif;
  262. if(dev); log(%&item%); endif;
  263. endif;
  264. ifmatches(%&item%,"Diamante");
  265. ifmatches(%&version%,"1.5");
  266. set(&item,"264");
  267. else;
  268. set(&item,"diamond");
  269. endif;
  270. if(dev); log(%&item%); endif;
  271. endif;
  272. ifmatches(%&item%,"Carvao");
  273. ifmatches(%&version%,"1.5");
  274. set(&item,"263");
  275. else;
  276. set(&item,"coal");
  277. endif;
  278. if(dev); log(%&item%); endif;
  279. endif;
  280. ifmatches(%&item%,"Esmeralda");
  281. ifmatches(%&version%,"1.5");
  282. set(&item,"388");
  283. else;
  284. set(&item,"emerald");
  285. endif;
  286. if(dev); log(%&item%); endif;
  287. endif;
  288. ifmatches(%&item%,"Batata$");
  289. ifmatches(%&version%,"1.5");
  290. set(&item,"392");
  291. else;
  292. set(&item,"potato");
  293. endif;
  294. if(dev); log(%&item%); endif;
  295. endif;
  296. ifmatches(%&item%,"Batata envenenada");
  297. ifmatches(%&version%,"1.5");
  298. set(&item,"394");
  299. else;
  300. set(&item,"poisonous_potato");
  301. endif;
  302. if(dev); log(%&item%); endif;
  303. endif;
  304. ifmatches(%&item%,"Cana");
  305. ifmatches(%&version%,"1.5");
  306. set(&item,"338");
  307. else;
  308. set(&item,"reeds");
  309. endif;
  310. if(dev); log(%&item%); endif;
  311. endif;
  312. ifmatches(%&item%,"Cenoura");
  313. ifmatches(%&version%,"1.5");
  314. set(&item,"391");
  315. else;
  316. set(&item,"carrot");
  317. endif;
  318. if(dev); log(%&item%); endif;
  319. endif;
  320. ifmatches(%&item%,"Fungo do nether");
  321. ifmatches(%&version%,"1.5");
  322. set(&item,"372");
  323. else;
  324. set(&item,"nether_wart");
  325. endif;
  326. if(dev); log(%&item%); endif;
  327. endif;
  328. ifmatches(%&item%,"Blaze rod");
  329. ifmatches(%&version%,"1.5");
  330. set(&item,"369");
  331. else;
  332. set(&item,"blaze_rod");
  333. endif;
  334. if(dev); log(%&item%); endif;
  335. endif;
  336. ifmatches(%&item%,"Carne podre");
  337. ifmatches(%&version%,"1.5");
  338. set(&item,"367");
  339. else;
  340. set(&item,"rotten_flesh");
  341. endif;
  342. if(dev); log(%&item%); endif;
  343. endif;
  344. ifmatches(%&item%,"Linha");
  345. ifmatches(%&version%,"1.5");
  346. set(&item,"287");
  347. else;
  348. set(&item,"string");
  349. endif;
  350. if(dev); log(%&item%); endif;
  351. endif;
  352. ifmatches(%&item%,"Olho de aranha");
  353. ifmatches(%&version%,"1.5");
  354. set(&item,"375");
  355. else;
  356. set(&item,"spider_eye");
  357. endif;
  358. if(dev); log(%&item%); endif;
  359. endif;
  360. ifmatches(%&item%,"Osso");
  361. ifmatches(%&version%,"1.5");
  362. set(&item,"352");
  363. else;
  364. set(&item,"bone");
  365. endif;
  366. if(dev); log(%&item%); endif;
  367. endif;
  368. ifmatches(%&item%,"Pepita");
  369. ifmatches(%&version%,"1.5");
  370. set(&item,"371");
  371. else;
  372. set(&item,"gold_nugget");
  373. endif;
  374. if(dev); log(%&item%); endif;
  375. endif;
  376. ifmatches(%&item%,"Polvora");
  377. ifmatches(%&version%,"1.5");
  378. set(&item,"289");
  379. else;
  380. set(&item,"gunpowder");
  381. endif;
  382. if(dev); log(%&item%); endif;
  383. endif;
  384. ifmatches(%&item%,"Saco de tinta");
  385. ifmatches(%&version%,"1.5");
  386. set(&item,"351");
  387. else;
  388. set(&item,"dye");
  389. endif;
  390. if(dev); log(%&item%); endif;
  391. endif;
  392. endunsafe;
  393. endif;
  394. if((!come_back)||(perguntar_tudo));
  395. ifmatches(%&resposta%,"Trap");
  396. set(come_back);
  397. unset(@cloud_mexican_var);
  398. unset(@&cloud_mexican_var[]);
  399. unset(&trap);
  400. if(dev);log("Pergunta da trap");endif;
  401. do();
  402. prompt(&trap,"$$[Resposta[§f§lTRAP DE BAUS,,§e-> §6Infinita §f(mkb e sleep colheita),§e-> §6Pesqueiro comum §f(sleep pesca e ztools),§e-> §6zMatheus22 §f(infinito 16 baus),§e-> §6Pesca Mexicana§7/§6homeless]]","");
  403. ifmatches(%&trap%,"Infinita|Pesqueiro|zMatheus22|Mexicana");
  404. ifmatches(%&trap%,"-> "); match(%&trap%,"-> (.*)",{&trap}); if(dev); log("%&trap%"); endif; endif;
  405. ifmatches(%&trap%,"Infinita|zMatheus22");
  406. set(&pergunta_set_temp,",§e§l-> §fSethome temp: %&set_temp%");
  407. ifmatches(%&set_temp%,"Sim$");
  408. set(&sethome_set_temp,",§6§l-> §fTemp: %&setar_home_temporaria%");
  409. else;
  410. set(&sethome_set_temp,"");
  411. endif;
  412. else;
  413. set(&pergunta_set_temp,"");
  414. set(&set_temp,"§cNao");
  415. set(&sethome_set_temp,"");
  416. //set(&sethome_set_temp,"");
  417. ifmatches(%&resposta%,"Sethome temp");
  418. match(%&resposta%,"(.*)Sethome temp(.*)",{&part1,&part2});
  419. set(&resposta,"%&part1%%&part2%");
  420. endif;
  421. endif;
  422. break;
  423. endif;
  424. loop;
  425. endif;
  426. endif;
  427. if((!come_back)||(perguntar_tudo));
  428. ifmatches(%&resposta%,"§e§l-> §fSethome temp:");
  429. set(come_back);
  430. unset(@cloud_mexican_var);
  431. unset(@&cloud_mexican_var[]);
  432. unset(&set_temp);
  433. do();
  434. prompt(&set_temp,"$$[Resposta[§f§lSETHOME TEMPORARIA,,§2-> §aSim,§4-> §cNao,,§fO que faz:, §7utiliza uma sethome, §7(setada e substituida, §7automaticamente), §7para nao precisar, §7caminhar ao mudar, §7de coluna em §7§otrap, §7§oinfinita§7. Nao interfere, §7na trap do pesqueiro]]","");
  435. ifmatches(%&set_temp%,"Sim$|Nao$");
  436. ifmatches(%&set_temp%,"-> "); match(%&set_temp%,"-> (.*)",{&set_temp}); if(dev); log("%&set_temp%"); endif; endif;
  437. set(&pergunta_set_temp,",§e§l-> §fSethome temp: %&set_temp%");
  438.  
  439. ifmatches(%&set_temp%,"Sim$");
  440. set(&sethome_set_temp,",§6§l-> §fTemp: %&setar_home_temporaria%");
  441. else;
  442. set(&sethome_set_temp,"");
  443. endif;
  444.  
  445. break;
  446. endif;
  447. loop;
  448. endif;
  449. endif;
  450. if((!come_back)||(perguntar_tudo));
  451. ifmatches(%&resposta%,"Reiniciar");
  452. set(come_back);
  453. unset(@cloud_mexican_var);
  454. unset(@&cloud_mexican_var[]);
  455. unset(&reiniciar);
  456. do();
  457. prompt(&reiniciar,"$$[Resposta[§f§lREINICIAR,%&empty_big2%§7apos terminar,§2-> §aSim,§4-> §cNao]]","");
  458. ifmatches(%&reiniciar%,"Sim|Nao");
  459. ifmatches(%&reiniciar%,"-> "); match(%&reiniciar%,"-> (.*)",{&reiniciar}); if(dev); log("reiniciar: %&reiniciar%"); endif; endif;
  460. break;
  461. endif;
  462. loop;
  463. endif;
  464. endif;
  465. if((!come_back)||(perguntar_tudo));
  466. ifmatches(%&resposta%,"Compactar");
  467. set(come_back);
  468. unset(@cloud_mexican_var);
  469. unset(@&cloud_mexican_var[]);
  470. unset(&compactar);
  471. do();
  472. prompt(&compactar,"$$[Resposta[§f§lCOMPACTAR,%&empty_big2%§7com §6/compactar -a,§2-> §aSim,§4-> §cNao]]","");
  473. ifmatches(%&compactar%,"Sim|Nao");
  474. ifmatches(%&compactar%,"-> ");
  475. match(%&compactar%,"-> (.*)",{&compactar});
  476. if(dev); log("compactar: %&compactar%"); endif;
  477. endif;
  478. break;
  479. endif;
  480. loop;
  481. endif;
  482. endif;
  483. if((!come_back)||(perguntar_tudo));
  484. ifmatches(%&resposta%,"Baus:");
  485. set(come_back);
  486. unset(@cloud_mexican_var);
  487. unset(@&cloud_mexican_var[]);
  488. unset(&home_baus);
  489. do();
  490. prompt(&home_baus,$$?,"§eQual a sua §6sethome §ena trap de §e§obaus§r§e? §7(ex: §f/home baus§7)");
  491. ifmatches(%&home_baus%,"^/home (.*)");
  492. break;
  493. endif;
  494. loop;
  495. endif;
  496. endif;
  497. if((!come_back)||(perguntar_tudo));
  498. ifmatches(%&resposta%,"Venda:");
  499. set(come_back);
  500. unset(@cloud_mexican_var);
  501. unset(@&cloud_mexican_var[]);
  502. unset(&home_venda);
  503. do();
  504. prompt(&home_venda,$$?,"§eQual a sua §6sethome §eolhando para a §e§oplaca da loja§r§e? §7(ex: §f/home venda§7)");
  505. ifmatches(%&home_venda%,"^/home (.*)");
  506. break;
  507. endif;
  508. loop;
  509. endif;
  510. endif;
  511. if((!come_back)||(perguntar_tudo));
  512. ifmatches(%&resposta%,"§6§l-> §fTemp:");
  513. set(come_back);
  514. unset(@cloud_mexican_var);
  515. unset(@&cloud_mexican_var[]);
  516. unset(&setar_home_temporaria);
  517. do();
  518. prompt(&setar_home_temporaria,$$?,"§eQual a sua §6sethome temporaria§e? §7(ex: §f/sethome home_temporaria§7)");
  519. ifmatches(%&setar_home_temporaria%,"^/sethome (.*)");
  520. set(&sethome_set_temp,",§6§l-> §fTemp: %&setar_home_temporaria%");
  521. break;
  522. endif;
  523. loop;
  524. endif;
  525. endif;
  526. if((!come_back)||(perguntar_tudo));
  527. ifmatches(%&resposta%,"Delay");
  528. set(come_back);
  529. unset(@cloud_mexican_var);
  530. unset(@&cloud_mexican_var[]);
  531. unset(#delay);
  532. do();
  533. prompt(#delay,$$?,"§eDigite o §e§onumero §r§ede §6milissegundos §ede delay para abrir o bau §7(ex: §f500§7 - max 99999ms)");
  534. ifmatches(%#delay%,"[0-9]{1,5}");
  535. break;
  536. endif;
  537. loop;
  538. endif;
  539. endif;
  540. endif;
  541. unset(@cloud_mexican_var);
  542. unset(@&cloud_mexican_var[]);
  543. unset(come_back);
  544. unset(perguntar_tudo);
  545. set(configuracoes);
  546. loop;
  547. ifmatches(%&trap%,"Infinita|zMatheus22");
  548. ifmatches(%&set_temp%,"Sim");
  549. set(home_temporaria);
  550. else;
  551. unset(home_temporaria);
  552. endif;
  553. else;
  554. unset(home_temporaria);
  555. endif;
  556.  
  557.  
  558.  
  559. //Comandos, ids e variaveis (edite, se achar necessario);
  560. &hide_players = "/esconder";
  561. &menu_loja_off = "/menuloja off";
  562. &comando_fly = "/mc";
  563. &id_chest = "chest|trapped_chest|54|146";
  564. &id_sign = "wall_sign|^68$";
  565.  
  566. //Ordem dos lados nos baus do pesqueiro;
  567. unset(&lado_pesqueiro[]);
  568. put(&lado_pesqueiro[],"North");
  569. put(&lado_pesqueiro[],"East");
  570. put(&lado_pesqueiro[],"South");
  571. put(&lado_pesqueiro[],"West");
  572.  
  573. set(first_hide);
  574.  
  575. ifmatches(%&compactar%,"Sim");
  576. ifmatches(%&item%,"371|gold_nugget");
  577. set(compactar);
  578. if(dev);log("compactar: %&compactar%"); endif;
  579. else;
  580. if(dev);log("compactar: %&compactar% - id: %&item%"); wait(1000ms); endif;
  581. unset(compactar);
  582. endif;
  583. else;
  584. if(dev); log("compactar: %&compactar%"); endif;
  585. unset(compactar);
  586. endif;
  587.  
  588. //Desativar /mc caso esteja ativo;
  589. do();
  590. ifmatches(%CANFLY%,"True");
  591. log(" ");
  592. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fDesativando &6/mc&f...");
  593. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fCaso voce tenha uma macro de &6/mc&f automatico, desative-a por enquanto.");
  594. echo("%&comando_fly%"); if(dev); log(%&comando_fly%); endif;
  595. do(5);
  596. ifmatches(%CANFLY%,"True");
  597. wait(500ms);
  598. if(dev);
  599. log("/mc continua ativo...");
  600. endif;
  601. else;
  602. break;
  603. endif;
  604. loop;
  605. else;
  606. break;
  607. endif;
  608. loop;
  609.  
  610. //Desativar menus de loja;
  611. echo(%&menu_loja_off%); if(dev); log(%&menu_loja_off%); endif;
  612. wait(500ms);
  613.  
  614. //Teleportar para a home, em uma primeira instancia;
  615. echo(%&home_baus%); if(dev); log(%&home_baus%); endif;
  616. wait(6000ms);
  617. log(" "); log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fIniciando...");
  618.  
  619.  
  620. //Verificar a integridade da home, para garantir que esta nela;
  621. do();
  622. ifmatches(%&trap%,"Infinita|zMatheus22");
  623. ifmatches(%&trap%,"Infinita");
  624. set(#distancia_inferior,2);
  625. set(#distancia_superior,3);
  626. else;
  627. set(#distancia_inferior,4);
  628. set(#distancia_superior,5);
  629. endif;
  630. unset(&verificador_baus);
  631. unset(&verificador_baus_error);
  632. unsafe(0);
  633. for(#distancia,%#distancia_inferior%,%#distancia_superior%);
  634. for(#altura,-1,3);
  635. ifmatches(%&version%,"1.5");
  636. getidrel(+0,%#altura%,-%#distancia%,#id_verificado);
  637. set(&verificador_baus,"%&verificador_baus%%#id_verificado%");
  638. ifmatches(%#id_verificado%,"%&id_chest%");
  639. else;
  640. set(&verificador_baus_error,"%&verificador_baus_error% - (%#id_verificado% : 0,%#altura%,%#distancia%)");
  641. endif;
  642. else;
  643. getidrel(+0,%#altura%,-%#distancia%,&id_verificado);
  644. set(&verificador_baus,"%&verificador_baus%%&id_verificado%");
  645. ifmatches(%&id_verificado%,"%&id_chest%");
  646. else;
  647. set(&verificador_baus_error,"%&verificador_baus_error% - (%&id_verificado% : 0,%#altura%,-%#distancia%)");
  648. endif;
  649. endif;
  650. next;
  651. next;
  652. endunsafe;
  653. ifmatches(%&verificador_baus%,"(%&id_chest%){10}");
  654. set(#x_trap,"%XPOS%");
  655. set(#y_trap,"%YPOS%");
  656. set(#z_trap,"%ZPOS%");
  657. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fCoordenadas da home de baus coletadas!");
  658. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &f(&a%#x_trap%&7,&e%#y_trap%&7,&9%#z_trap%&f)");
  659. break;
  660. else;
  661. log(" ");
  662. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fParece que voce nao esta na home de baus.");
  663. if(dev);
  664. log("&k&d~~&r&3dev mode&k&d~~");
  665. log(%&verificador_baus%);
  666. log("%&verificador_baus_error%");
  667. log("%&id_chest%");
  668. endif;
  669. set(#x_temp,"%XPOS%");
  670. set(#y_temp,"%YPOS%");
  671. set(#z_temp,"%ZPOS%");
  672. echo("%&home_baus%"); if(dev); log(%&home_baus%); endif;
  673. do(30);
  674. wait(250ms);
  675. if((%XPOS% != %#x_temp%)||(%YPOS% != %#y_temp%)||(%ZPOS% != %#z_temp%));
  676. wait(1000ms);
  677. break;
  678. else;
  679. wait(150ms);
  680. endif;
  681. loop;
  682. endif;
  683. endif;
  684. ifmatches(%&trap%,"Pesqueiro|Mexicana");
  685. ifmatches(%&trap%,"Pesqueiro");
  686. #altura_maxima = 1;
  687. #numero_de_baus = 160;
  688. else;
  689. #altura_maxima = 2;
  690. #numero_de_baus = 200;
  691. endif;
  692. unset(&verificador_baus);
  693. unset(&verificador_baus_error);
  694. unsafe(0);
  695. for(#distancia_x,-2,2);
  696. for(#distancia_z,3,4);
  697. for(#altura,-2,%#altura_maxima%)
  698. ifmatches(%&version%,"1.5");
  699. getidrel(%#distancia_x%,%#altura%,%#distancia_z%,#id_verificado);
  700. set(&verificador_baus,"%&verificador_baus%%#id_verificado%");
  701. ifmatches(%#id_verificado%,"%&id_chest%");
  702. else;
  703. set(&verificador_baus_error,"%&verificador_baus_error% - (%#id_verificado% : %#distancia_x%,%#altura%,%#distancia_z%)");
  704. endif;
  705. else;
  706. getidrel(%#distancia_x%,%#altura%,%#distancia_z%,&id_verificado);
  707. set(&verificador_baus,"%&verificador_baus%%&id_verificado%");
  708. ifmatches(%&id_verificado%,"%&id_chest%");
  709. else;
  710. set(&verificador_baus_error,"%&verificador_baus_error% - (%&id_verificado% : %#distancia_x%,%#altura%,%#distancia_z%)");
  711. endif;
  712. endif;
  713. next;
  714. next;
  715. next;
  716. for(#distancia_x,-2,2);
  717. for(#distancia_z,-4,-3);
  718. for(#altura,-2,%#altura_maxima%)
  719. ifmatches(%&version%,"1.5");
  720. getidrel(%#distancia_x%,%#altura%,%#distancia_z%,#id_verificado);
  721. set(&verificador_baus,"%&verificador_baus%%#id_verificado%");
  722. ifmatches(%#id_verificado%,"%&id_chest%");
  723. else;
  724. set(&verificador_baus_error,"%&verificador_baus_error% - (%#id_verificado% : %#distancia_x%,%#altura%,%#distancia_z%)");
  725. endif;
  726. else;
  727. getidrel(%#distancia_x%,%#altura%,%#distancia_z%,&id_verificado);
  728. set(&verificador_baus,"%&verificador_baus%%&id_verificado%");
  729. ifmatches(%&id_verificado%,"%&id_chest%");
  730. else;
  731. set(&verificador_baus_error,"%&verificador_baus_error% - (%&id_verificado% : %#distancia_x%,%#altura%,%#distancia_z%)");
  732. endif;
  733. endif;
  734. next;
  735. next;
  736. next;
  737. for(#distancia_x,-4,-3);
  738. for(#distancia_z,-2,2);
  739. for(#altura,-2,%#altura_maxima%)
  740. ifmatches(%&version%,"1.5");
  741. getidrel(%#distancia_x%,%#altura%,%#distancia_z%,#id_verificado);
  742. set(&verificador_baus,"%&verificador_baus%%#id_verificado%");
  743. ifmatches(%#id_verificado%,"%&id_chest%");
  744. else;
  745. set(&verificador_baus_error,"%&verificador_baus_error% - (%#id_verificado% : %#distancia_x%,%#altura%,%#distancia_z%)");
  746. endif;
  747. else;
  748. getidrel(%#distancia_x%,%#altura%,%#distancia_z%,&id_verificado);
  749. set(&verificador_baus,"%&verificador_baus%%&id_verificado%");
  750. ifmatches(%&id_verificado%,"%&id_chest%");
  751. else;
  752. set(&verificador_baus_error,"%&verificador_baus_error% - (%&id_verificado% : %#distancia_x%,%#altura%,%#distancia_z%)");
  753. endif;
  754. endif;
  755. next;
  756. next;
  757. next;
  758. for(#distancia_x,3,4);
  759. for(#distancia_z,-2,2);
  760. for(#altura,-2,%#altura_maxima%)
  761. ifmatches(%&version%,"1.5");
  762. getidrel(%#distancia_x%,%#altura%,%#distancia_z%,#id_verificado);
  763. set(&verificador_baus,"%&verificador_baus%%#id_verificado%");
  764. ifmatches(%#id_verificado%,"%&id_chest%");
  765. else;
  766. set(&verificador_baus_error,"%&verificador_baus_error% - (%#id_verificado% : %#distancia_x%,%#altura%,%#distancia_z%)");
  767. endif;
  768. else;
  769. getidrel(%#distancia_x%,%#altura%,%#distancia_z%,&id_verificado);
  770. set(&verificador_baus,"%&verificador_baus%%&id_verificado%");
  771. ifmatches(%&id_verificado%,"%&id_chest%");
  772. else;
  773. set(&verificador_baus_error,"%&verificador_baus_error% - (%&id_verificado% : %#distancia_x%,%#altura%,%#distancia_z%)");
  774. endif;
  775. endif;
  776. next;
  777. next;
  778. next;
  779. endunsafe;
  780. ifmatches(%&verificador_baus%,"(%&id_chest%){%#numero_de_baus%}");
  781. set(#x_trap,"%XPOS%");
  782. set(#y_trap,"%YPOS%");
  783. set(#z_trap,"%ZPOS%");
  784. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fCoordenadas da home de baus coletadas!");
  785. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &f(&a%#x_trap%&7,&e%#y_trap%&7,&9%#z_trap%&f)");
  786. break;
  787. else;
  788. log(" ");
  789. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fParece que voce nao esta na home de baus.");
  790. if(dev);
  791. log("&k&d~~&r&3dev mode&k&d~~");
  792. log("%&verificador_baus_error%");
  793. endif;
  794. set(#x_temp,"%XPOS%");
  795. set(#y_temp,"%YPOS%");
  796. set(#z_temp,"%ZPOS%");
  797. echo("%&home_baus%"); if(dev); log("%&home_baus%"); endif;
  798. do(30);
  799. wait(250ms);
  800. if((%XPOS% != %#x_temp%)||(%YPOS% != %#y_temp%)||(%ZPOS% != %#z_temp%));
  801. wait(1000ms);
  802. break;
  803. else;
  804. wait(150ms);
  805. endif;
  806. loop;
  807. endif;
  808. endif;
  809. loop;
  810.  
  811. #bau = 1;
  812. #coluna = 1;
  813. #lado = 1;
  814. unset(vender_ultima);
  815. unset(proxima_coluna);
  816. unset(proximo_bau);
  817. unset(passou_do_lugar);
  818. unset(#conta_itens_temp);
  819. match(%&setar_home_temporaria%,"/sethome (.*)",{&home_temporaria});
  820.  
  821. if(home_temporaria);
  822. echo(%&setar_home_temporaria%); if(dev); log(%&setar_home_temporaria%); endif;
  823. wait(700ms);
  824. echo(%&setar_home_temporaria%); if(dev); log(%&setar_home_temporaria%); endif;
  825. wait(700ms);
  826. endif;
  827. ///Inicio do processo;
  828. do();
  829. //do();
  830. if(#bau < 1); #bau = 1; endif;
  831. ifmatches(%&trap%,"pesqueiro|mexicana"); // pegar itens na trap do pesqueiro sleep, pesca mexicana ou homeless;
  832. do();
  833. do(); // olhar pro bau e abrir;
  834. unsafe;
  835. if(#lado == 1);
  836. look(%&lado_pesqueiro[0]%);
  837. elseif(#lado == 2);
  838. look(%&lado_pesqueiro[1]%);
  839. elseif(#lado == 3);
  840. look(%&lado_pesqueiro[2]%);
  841. elseif(#lado == 4);
  842. look(%&lado_pesqueiro[3]%);
  843. elseif(#lado == 5);
  844. ifmatches(%&reiniciar%,"sim");
  845. #lado = 1;
  846. look(%&lado_pesqueiro[0]%);
  847. else;
  848. set(vender_ultima);
  849. break;
  850. endif;
  851. endif;
  852. ifmatches(%&trap%,"Pesqueiro comum");
  853. if(#bau < 6);
  854. #bau = 6;
  855. endif;
  856. endif;
  857.  
  858. if(%GUI% != "NONE"); gui(); endif;
  859.  
  860. if(#bau == 1);
  861. look(-36,-12);
  862. elseif(#bau == 2);
  863. look(-20,-14);
  864. elseif(#bau == 3);
  865. look(+0,-15);
  866. elseif(#bau == 4);
  867. look(+20,-14);
  868. elseif(#bau == 5);
  869. look(+36,-12);
  870. elseif(#bau == 6);
  871. look(-35,+2);
  872. elseif(#bau == 7);
  873. look(-20,+2);
  874. elseif(#bau == 8);
  875. look(+0,+0);
  876. elseif(#bau == 9);
  877. look(+20,+2);
  878. elseif(#bau == 10);
  879. look(+35,+2);
  880. elseif(#bau == 11);
  881. look(-37,+19);
  882. elseif(#bau == 12);
  883. look(-21,+22);
  884. elseif(#bau == 13);
  885. look(+0,+22);
  886. elseif(#bau == 14);
  887. look(+21,+22);
  888. elseif(#bau == 15);
  889. look(+37,+19);
  890. elseif(#bau == 16);
  891. look(-38,+32);
  892. elseif(#bau == 17);
  893. look(-21,+37);
  894. elseif(#bau == 18);
  895. look(+0,+39);
  896. elseif(#bau == 19);
  897. look(+21,+37);
  898. elseif(#bau == 20);
  899. look(+38,+32);
  900. elseif(#bau == 21);
  901. look(-38,+43);
  902. elseif(#bau == 22);
  903. look(-22,+48);
  904. elseif(#bau == 23);
  905. look(+0,+50);
  906. elseif(#bau == 24);
  907. look(+21,+48);
  908. elseif(#bau == 25);
  909. look(+38,+43);
  910. endif;
  911.  
  912. #lado_temp = #lado - 1;
  913. set(&lado_temp,"%&lado_pesqueiro[%#lado_temp%]%");
  914. if(dev); log("#bau: %#bau% - lado: %&lado_temp%"); endif;
  915. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &r&eBau &6%#conta_baus% &f- &eLado &6%&lado_temp%&f.");
  916. endunsafe;
  917. keyup(sneak);
  918. //wait(100ms);
  919. unsafe(0);
  920. if(%GUI% != "NONE");
  921. do(); gui(); wait(200ms); until(%GUI% == "NONE");
  922. endif;
  923. wait(200ms);
  924.  
  925. do(2);
  926. key(use);
  927. do(15);
  928. wait(100ms);
  929. if(%GUI% == "GUICHEST");
  930. break;
  931. endif;
  932. ifmatches(%HITID%,%&id_chest%);
  933. else;
  934. break;
  935. endif;
  936. loop;
  937. if(%GUI% == "GUICHEST");
  938. break;
  939. endif;
  940. ifmatches(%HITID%,%&id_chest%);
  941. else;
  942. break;
  943. endif;
  944. loop;
  945. endunsafe;
  946. if(%GUI% == "GUICHEST");
  947. if(#delay > 0); wait(%#delay%ms); endif;
  948. break;
  949. endif;
  950. loop;
  951.  
  952. unsafe(0);
  953. if(compactar);
  954. #vazios = -4;
  955. for(#slot,54,89);
  956. ifmatches(%&version%,"1.5");
  957. getslotitem(%#slot%,#oq);
  958. set(&oq,"%#oq%");
  959. else;
  960. getslotitem(%#slot%,&oq);
  961. endif;
  962. ifmatches(%&oq%,"air|^0$");
  963. inc(#vazios,1);
  964. endif;
  965. next;
  966. if(dev);
  967. log("Pegar %#vazios% pepitas");
  968. endif;
  969. if(#vazios <= 0);
  970. break;
  971. endif;
  972. endif;
  973. if(!vender_ultima);
  974. unset(inv_full);
  975. do();
  976. getslot(%&item%,#slot_com_item);
  977. if((#slot_com_item < 0)||(#slot_com_item > 53)); // bau vazio;
  978. if(dev); log("bau vazio - #slot_com_item: %#slot_com_item%"); endif;
  979. inc(#bau,1);
  980. inc(#conta_baus,1);
  981. if(#bau > 25);
  982. #bau = 1;
  983. inc(#lado,1);
  984. endif;
  985. break;
  986. else;
  987. getslotitem(%#slot_com_item%,#nada,#stack);
  988. inc(#conta_itens_temp,%#stack%);
  989. slotclick(%#slot_com_item%,l,true);
  990. getslotitem(%#slot_com_item%,#nada,#stack);
  991. if(dev); log("dev"); log("%#stack%"); endif;
  992. if(compactar);
  993. dec(#vazios,1);
  994. if(#vazios <= 0);
  995. set(#stack,1);
  996. endif;
  997. endif;
  998. if(#stack > 0); // inventario cheio;
  999. dec(#conta_itens_temp,%#stack%);
  1000. if(compactar);
  1001. inc(#conta_itens_temp,1);
  1002. endif;
  1003. if(dev); log("dec(#conta_itens_temp,%#stack%);");endif;
  1004. if(dev); log("inv full"); endif;
  1005. set(inv_full);
  1006. break;
  1007. endif;
  1008. endif;
  1009. loop;
  1010. endif;
  1011. endunsafe;
  1012. if((vender_ultima)|(inv_full));
  1013. if(dev); log("vender"); endif;
  1014. break;
  1015. endif;
  1016. if(%GUI% != "NONE"); gui(); endif;
  1017. loop;
  1018. else; // pegar itens na trap infinita / zMatheus22;
  1019. do();
  1020. unsafe(0);
  1021. #x_final = #x_trap + #coluna - 1;
  1022. if(dev);
  1023. log("X final: %#x_final%");
  1024. log("X agora: %XPOS%");
  1025. log("X trap: %#x_trap%");
  1026. endif;
  1027. if(%XPOS% != %#x_final%);
  1028. set(proxima_coluna);
  1029. if(dev); log("proxima coluna"); endif;
  1030. else;
  1031. unset(proxima_coluna);
  1032. endif;
  1033. endunsafe;
  1034. if(proxima_coluna);
  1035. unset(voltar_para_home);
  1036. do();
  1037. if(!voltar_para_home);
  1038. unsafe;
  1039. do();
  1040. look(north);
  1041. #x_agora = %XPOS%;
  1042. #distancia_ate_coluna = #x_final - #x_agora;
  1043. if(dev); log("distancia ate coluna: %#distancia_ate_coluna%"); endif;
  1044. if(#distancia_ate_coluna > 2);
  1045. SPRINT();
  1046. keyup(sneak);
  1047. else;
  1048. keydown(sneak);
  1049. UNSPRINT;
  1050. endif;
  1051. if(#distancia_ate_coluna == 0);
  1052. unset(passou_do_lugar);
  1053. ifmatches(%HITID%,%&id_chest%);
  1054. if(dev); log("vejo bau"); endif;
  1055. else;
  1056. if(dev); log("nao vejo bau"); endif;
  1057. wait(20ms);
  1058. keyup(right);
  1059. endif;
  1060. wait(100ms);
  1061. keyup(sneak);
  1062. break;
  1063. endif;
  1064. if((#distancia_ate_coluna < 0)||(%ZPOS% != %#z_trap%));
  1065. if(#distancia_ate_coluna < 0);
  1066. set(passou_do_lugar);
  1067. endif;
  1068. set(voltar_para_home);
  1069. break;
  1070. endif;
  1071. if(#distancia_ate_coluna > 0);
  1072. keydown(right);
  1073. endif;
  1074. loop;
  1075. endunsafe;
  1076. endif;
  1077. if(voltar_para_home);
  1078. ////// voltar para a home dos baus;
  1079. if(dev); log("Voltar para a home dos baus"); endif;
  1080. #x_temp = %XPOS%;
  1081. #y_temp = %YPOS%;
  1082. #z_temp = %ZPOS%;
  1083. do();
  1084. keyup(right);keyup(left);keyup(sneak);keyup(jump);keyup(forward);keyup(back);
  1085. if((home_temporaria)||(passou_do_lugar));
  1086. if(vender_ultima);
  1087. set(home_final_original);
  1088. echo(%&home_baus%); if(dev); log("%&home_baus%"); endif;
  1089. else;
  1090. if((#coluna != 1)&&(!passou_do_lugar));
  1091. echo("/home %&home_temporaria%"); if(dev); log("%&home_temporaria%"); endif;
  1092. unset(home_final_original);
  1093. else;
  1094. if(passou_do_lugar);
  1095. if(dev); log("Erro inesperado. Posicao do player nao faz sentido!"); endif;
  1096. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &r&eErro inesperado&f.");
  1097. wait(500ms);
  1098. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &r&eRetornando&f.");
  1099. endif;
  1100. set(home_final_original);
  1101. echo(%&home_baus%); if(dev); log("%&home_baus%"); endif;
  1102. endif;
  1103. endif;
  1104. else;
  1105. echo(%&home_baus%); if(dev); log("%&home_baus%"); endif;
  1106. endif;
  1107. wait(100ms);
  1108. do(60);
  1109. wait(200ms);
  1110. if((%ZPOS% == %#z_trap%)&&(%YPOS% == %#y_trap%));
  1111. else;
  1112. wait(200ms);
  1113. endif;
  1114. if((%ZPOS% == %#z_trap%)&&(%YPOS% == %#y_trap%));
  1115. else;
  1116. wait(200ms);
  1117. endif;
  1118. if((%XPOS% != %#x_temp%)|(%ZPOS% != %#z_temp%)|(%YPOS% != %#y_temp%));
  1119. if((%ZPOS% == %#z_trap%)&&(%YPOS% == %#y_trap%));
  1120. wait(300ms);
  1121. if(dev); log("Teleporte para a trap concluido."); endif;
  1122. if(home_final_original);
  1123. if(%XPOS% == %#x_trap%);
  1124. unset(voltar_para_home);
  1125. break;
  1126. endif;
  1127. else;
  1128. unset(voltar_para_home);
  1129. break;
  1130. endif;
  1131. else;
  1132. ifmatches(%CANFLY%,"False");
  1133. if(dev); log("Pulando para tentar desbugar..."); endif;
  1134. keydown(jump);
  1135. wait(1ms);
  1136. keyup(jump);
  1137. wait(1000ms);
  1138. else;
  1139. wait(1000ms);
  1140. endif;
  1141. endif;
  1142. endif;
  1143. loop;
  1144. if((%ZPOS% == %#z_trap%)&&(%YPOS% == %#y_trap%));
  1145. if(home_final_original);
  1146. if(%XPOS% == %#x_trap%);
  1147. unset(voltar_para_home);
  1148. break;
  1149. endif;
  1150. else;
  1151. unset(voltar_para_home);
  1152. break;
  1153. endif;
  1154. else;
  1155. if(dev);
  1156. log("Nao consegui chegar na posicao exata da trap.");
  1157. log("Tentando dar /home novamente...");
  1158. endif;
  1159. endif;
  1160. loop;
  1161.  
  1162. ///////
  1163.  
  1164. else;
  1165. unsafe(0);
  1166. unset(tudo_certo);
  1167. ifmatches(%&trap%,"Infinita");
  1168. set(#distancia_inferior,2);
  1169. set(#distancia_superior,3);
  1170. else;
  1171. set(#distancia_inferior,4);
  1172. set(#distancia_superior,5);
  1173. endif;
  1174. unset(&verificador_baus);
  1175. unset(&verificador_baus_error);
  1176. for(#distancia,%#distancia_inferior%,%#distancia_superior%);
  1177. for(#altura,-1,3);
  1178. ifmatches(%&version%,"1.5");
  1179. getidrel(+0,%#altura%,-%#distancia%,#id_verificado);
  1180. set(&verificador_baus,"%&verificador_baus%%#id_verificado%");
  1181. ifmatches(%#id_verificado%,"%&id_chest%");
  1182. else;
  1183. set(&verificador_baus_error,"%&verificador_baus_error% - (%#id_verificado% : 0,%#altura%,%#distancia%)");
  1184. endif;
  1185. else;
  1186. getidrel(+0,%#altura%,-%#distancia%,&id_verificado);
  1187. set(&verificador_baus,"%&verificador_baus%%&id_verificado%");
  1188. ifmatches(%&id_verificado%,"%&id_chest%");
  1189. else;
  1190. set(&verificador_baus_error,"%&verificador_baus_error% - (%&id_verificado% : 0,%#altura%,-%#distancia%)");
  1191. endif;
  1192. endif;
  1193. next;
  1194. next;
  1195. ifmatches(%&verificador_baus%,"(%&id_chest%){10}");
  1196. look(3,2);
  1197. ifmatches(%HITID%,%&id_chest%);
  1198. set(tudo_certo);
  1199. else;
  1200. unset(tudo_certo);
  1201. set(voltar_para_home);
  1202. endif;
  1203. else;
  1204. set(tudo_certo);
  1205. ifmatches(%&reiniciar%,"Nao");
  1206. if(dev); log("TRAP INCOMPLETA! Vendendo ultima rodada."); endif;
  1207. set(vender_ultima);
  1208. else;
  1209. if(dev); log("TRAP INCOMPLETA! Retornando para o inicio."); endif;
  1210. #bau = 1;
  1211. #coluna = 1;
  1212. set(voltar_para_home);
  1213. unset(vender_ultima);
  1214. endif;
  1215. endif;
  1216. endunsafe;
  1217. endif;
  1218.  
  1219. if(passou_do_lugar);
  1220. unset(voltar_para_home);
  1221. unset(tudo_certo);
  1222. unset(passou_do_lugar);
  1223. endif;
  1224.  
  1225. if((!voltar_para_home)&&(tudo_certo));
  1226. if(!vender_ultima);
  1227. if(home_temporaria);
  1228. look(3,2);
  1229. ifmatches(%HITID%,%&id_chest%);
  1230. echo(%&setar_home_temporaria%); if(dev); log(%&setar_home_temporaria%); endif;
  1231. wait(300ms);
  1232. ifmatches(%HITID%,%&id_chest%);
  1233. echo(%&setar_home_temporaria%); if(dev); log(%&setar_home_temporaria%); endif;
  1234. wait(300ms);
  1235. else;
  1236. if(dev); log("Erro inesperado. Bau sumiu?"); endif;
  1237. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &r&eErro inesperado&f.");
  1238. wait(2000ms);
  1239. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &r&eRetornando&f.");
  1240. unset(tudo_certo);
  1241. set(voltar_para_home);
  1242. endif;
  1243. else;
  1244. if(dev); log("Erro inesperado. Bau sumiu?"); endif;
  1245. if(dev); log("Erro inesperado. Bau sumiu?"); endif;
  1246. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &r&eErro inesperado&f.");
  1247. wait(200ms);
  1248. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &r&eRetornando&f.");
  1249. unset(tudo_certo);
  1250. set(voltar_para_home);
  1251. endif;
  1252. endif;
  1253. endif;
  1254. if(tudo_certo)
  1255. break;
  1256. endif;
  1257. endif;
  1258. if(vender_ultima);
  1259. break;
  1260. endif;
  1261. loop;
  1262. endif;
  1263. if(vender_ultima);
  1264. break;
  1265. endif;
  1266. do();
  1267. unsafe(0);
  1268. ifmatches(%&trap%,"zMatheus22");
  1269. if(#bau == 1);
  1270. look(3,335);
  1271. elseif(#bau == 2);
  1272. look(3,348);
  1273. elseif(#bau == 3);
  1274. look(3,2);
  1275. elseif(#bau == 4);
  1276. look(3,17);
  1277. elseif(#bau == 5);
  1278. look(3,31);
  1279. elseif(#bau == 6);
  1280. look(3,46);
  1281. elseif(#bau == 7);
  1282. look(3,67);
  1283. elseif(#bau == 8);
  1284. look(177,53);
  1285. elseif(#bau == 9);
  1286. look(177,37);
  1287. elseif(#bau == 10);
  1288. look(177,24);
  1289. elseif(#bau == 11);
  1290. look(177,4);
  1291. elseif(#bau == 12);
  1292. look(177,342);
  1293. elseif(#bau == 13);
  1294. look(177,325);
  1295. elseif(#bau == 14);
  1296. look(177,303);
  1297. elseif(#bau == 15);
  1298. look(3,283);
  1299. elseif(#bau == 16);
  1300. look(3,316);
  1301. elseif((#bau > 16)||(#bau < 1));
  1302. #bau = 1;
  1303. inc(#coluna,1);
  1304. inc(#conta_colunas,1);
  1305. if(dev); log("proxima coluna (%#coluna%)"); endif;
  1306. set(proxima_coluna);
  1307. break;
  1308. endif;
  1309. else;
  1310. if(#bau == 1);
  1311. if(dev); log("bau 1"); endif;
  1312. look(3,313);
  1313. elseif(#bau == 2);
  1314. if(dev); log("bau 2"); endif;
  1315. look(3,335);
  1316. elseif(#bau == 3);
  1317. if(dev); log("bau 3"); endif;
  1318. look(3,5);
  1319. elseif(#bau == 4);
  1320. if(dev); log("bau 4"); endif;
  1321. look(3,35);
  1322. elseif(#bau == 5);
  1323. if(dev); log("bau 5"); endif;
  1324. look(3,52);
  1325. elseif((#bau > 5)||(#bau < 1));
  1326. #bau = 1;
  1327. inc(#coluna,1);
  1328. inc(#conta_colunas,1);
  1329. set(proxima_coluna);
  1330. break;
  1331. endif;
  1332. endif;
  1333. keyup(sneak);
  1334.  
  1335. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &r&eBau &6%#conta_baus% &f- &eColuna &6%#conta_colunas%&f.");
  1336.  
  1337.  
  1338. //wait(100ms);
  1339. if(%GUI% != "NONE");
  1340. do(); gui(); wait(100ms); until(%GUI% == "NONE");
  1341. endif;
  1342. do(2);
  1343. ifmatches(%HITID%,%&id_chest%);
  1344. key(use);
  1345. do(40);
  1346. wait(50ms);
  1347. if(%GUI% == "GUICHEST");
  1348. break;
  1349. endif;
  1350. ifmatches(%HITID%,%&id_chest%);
  1351. else;
  1352. break;
  1353. endif;
  1354. loop;
  1355. else;
  1356. break;
  1357. endif;
  1358. if(%GUI% == "GUICHEST");
  1359. break;
  1360. endif;
  1361. loop;
  1362. if(%GUI% == "GUICHEST");
  1363. if(#delay > 0); wait(%#delay%ms); endif;
  1364. break;
  1365. endif;
  1366. ifmatches(%HITID%,%&id_chest%);
  1367. else;
  1368. break;
  1369. endif;
  1370. endunsafe;
  1371. loop;
  1372. if(%GUI% == "GUICHEST");
  1373. unsafe(0);
  1374. if(compactar);
  1375. #vazios = -4;
  1376. for(#slot,54,89);
  1377. ifmatches(%&version%,"1.5");
  1378. getslotitem(%#slot%,#oq);
  1379. set(&oq,"%#oq%");
  1380. else;
  1381. getslotitem(%#slot%,&oq);
  1382. endif;
  1383. ifmatches(%&oq%,"air|^0$");
  1384. inc(#vazios,1);
  1385. endif;
  1386. next;
  1387. if(dev);
  1388. log("Pegar %#vazios% pepitas");
  1389. endif;
  1390. if(#vazios <= 0);
  1391. break;
  1392. endif;
  1393. endif;
  1394. if(!vender_ultima);
  1395. unset(inv_full);
  1396. do();
  1397. getslot(%&item%,#slot_com_item);
  1398. if((#slot_com_item < 0)||(#slot_com_item > 53)); // bau vazio;
  1399. if(dev); log("bau vazio. Slot %#slot_com_item%"); endif;
  1400. inc(#bau,1);
  1401. inc(#conta_baus,1);
  1402. ifmatches(%&trap%,"zMatheus22");
  1403. if(#bau > 16);
  1404. #bau = 1;
  1405. inc(#coluna,1);
  1406. inc(#conta_colunas,1);
  1407. endif;
  1408. else;
  1409. if(#bau > 5);
  1410. #bau = 1;
  1411. inc(#coluna,1);
  1412. inc(#conta_colunas,1);
  1413. endif;
  1414. endif;
  1415. if(dev);
  1416. log("break");
  1417. endif;
  1418. break;
  1419. else;
  1420. getslotitem(%#slot_com_item%,&nada,#stack);
  1421. inc(#conta_itens_temp,%#stack%);
  1422. slotclick(%#slot_com_item%,l,true);
  1423. getslotitem(%#slot_com_item%,#nada,#stack);
  1424. if(compactar);
  1425. dec(#vazios,1);
  1426. if(#vazios <= 0);
  1427. set(#stack,1);
  1428. endif;
  1429. endif;
  1430. if(#stack > 0); // inventario cheio;
  1431. dec(#conta_itens_temp,%#stack%);
  1432. if(compactar);
  1433. inc(#conta_itens_temp,1);
  1434. endif;
  1435. if(dev); log("dec(#conta_itens_temp,%#stack%);");endif;
  1436. if(dev); log("inv full"); endif;
  1437. set(inv_full);
  1438. break;
  1439. endif;
  1440.  
  1441. endif;
  1442. loop;
  1443.  
  1444. endif;
  1445. if((vender_ultima)|(inv_full));
  1446. break;
  1447. endif;
  1448. if(%GUI% != "NONE"); gui(); endif;
  1449. endunsafe;
  1450. else;
  1451.  
  1452. endif;
  1453. loop;
  1454. endif;
  1455.  
  1456. if(compactar);
  1457. ifmatches(%&item%,"371|gold_nugget");
  1458. echo("/compactar -a");
  1459. wait(500ms);
  1460. ifmatches(%&item%,"371");
  1461. set(&item,"266");
  1462. endif;
  1463. ifmatches(%&item%,"gold_nugget");
  1464. set(&item,"gold_ingot");
  1465. endif;
  1466. endif;
  1467. endif;
  1468. // vender itens na loja;
  1469. #x_temp = %XPOS%;
  1470. #z_temp = %ZPOS%;
  1471. if(%GUI% != "NONE"); gui(); endif;
  1472. do();
  1473. echo(%&home_venda%); if(dev); log("%&home_venda%"); endif;
  1474. unsafe(0);
  1475. do(40);
  1476. wait(250ms);
  1477. if((%XPOS% != %#x_temp%)||(%ZPOS% != %#z_temp%));
  1478. break;
  1479. endif;
  1480. ifmatches(%HITID%,%&id_sign%);
  1481. break;
  1482. endif;
  1483. loop;
  1484. if((%XPOS% != %#x_temp%)||(%ZPOS% != %#z_temp%));
  1485. break;
  1486. endif;
  1487. ifmatches(%HITID%,%&id_sign%);
  1488. break;
  1489. endif;
  1490. endunsafe;
  1491. loop;
  1492. ifmatches(%CANFLY%,"True");
  1493. do();
  1494. echo(%&comando_fly%); if(dev); log("%&comando_fly%"); endif;
  1495. do(40);
  1496. wait(500ms);
  1497. ifmatches(%CANFLY%,"False");
  1498. wait(500ms);
  1499. break;
  1500. endif;
  1501. loop;
  1502. ifmatches(%CANFLY%,"False");
  1503. break;
  1504. endif;
  1505. loop;
  1506. endif;
  1507.  
  1508. do(4);
  1509. if((first_hide)||(%HITID% > 10000));
  1510. echo("%&hide_players%"); if(dev); log("%&hide_players%"); endif;
  1511. unset(first_hide);
  1512. endif;
  1513. do(10);
  1514. ifmatches(%HITID%,%&id_sign%);
  1515. break;
  1516. else;
  1517. wait(500ms);
  1518. ifmatches(%CANFLY%,"False");
  1519. if(dev); log("Tentando pular pra desbugar..."); endif;
  1520. keydown(jump);
  1521. wait(1ms);
  1522. keyup(jump);
  1523. wait(750ms);
  1524. endif;
  1525. endif;
  1526. loop;
  1527. if(#delay > 650);
  1528. echo(%&menu_loja_off%);
  1529. if(dev);
  1530. log("%&menu_loja_off%");
  1531. endif;
  1532. wait(300ms);
  1533. endif;
  1534. ifmatches(%HITID%,%&id_sign%);
  1535. break;
  1536. else;
  1537. if(dev); log("Nao vejo placa. Aguardando."); endif;
  1538. wait(1000ms);
  1539. ifmatches(%HITID%,%&id_sign%);
  1540. else;
  1541. if(dev); log("Nao vejo placa. Aguardando."); endif;
  1542. wait(1000ms);
  1543. ifmatches(%HITID%,%&id_sign%);
  1544. else;
  1545. if(dev); log("%&hide_players%"); endif;
  1546. echo("%&hide_players%");
  1547. endif;
  1548. endif;
  1549. endif;
  1550. loop;
  1551. do(40);
  1552. unset(nao_vejo_placa);
  1553. if(%GUI% == "NONE");
  1554. ifmatches(%HITID%,%&id_sign%);
  1555. key(attack);
  1556. wait(300ms);
  1557. else;
  1558. set(nao_vejo_placa);
  1559. endif;
  1560. elseif(%GUI% == "GUICHAT");
  1561. log(" ");
  1562. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fChat detectado. Aguardando.");
  1563. do(200);
  1564. wait(300ms);
  1565. if(%GUI% != "GUICHAT");
  1566. log(" ");
  1567. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fChat fechado. Retomando.");
  1568. break;
  1569. endif;
  1570. loop;
  1571. endif;
  1572.  
  1573. if(%GUI% == "GUICHEST");
  1574. log(" ");
  1575. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &6Janela &fdetectada. Fechando...");
  1576. do();
  1577. gui();
  1578. wait(500ms);
  1579. until(%GUI% == "NONE");
  1580. wait(1000ms);
  1581. echo(%&menu_loja_off%); if(dev); log("%&menu_loja_off%"); endif;
  1582. wait(2000ms);
  1583. if(%GUI% != "NONE");
  1584. do();
  1585. gui();
  1586. wait(500ms);
  1587. until(%GUI% == "NONE");
  1588. endif;
  1589. elseif(nao_vejo_placa);
  1590. unset(nao_vejo_placa);
  1591. do(4);
  1592. wait(500ms);
  1593. ifmatches(%HITID%,%&id_sign%);
  1594. key(attack);
  1595. break;
  1596. else;
  1597. echo(%&hide_players%); if(dev); log("%&hide_players%"); endif;
  1598. wait(1000ms);
  1599. ifmatches(%HITID%,%&id_sign%);
  1600. else;
  1601. wait(1000ms);
  1602. ifmatches(%HITID%,%&id_sign%);
  1603. else;
  1604. wait(1000ms);
  1605. ifmatches(%HITID%,%&id_sign%);
  1606. else;
  1607. wait(1000ms);
  1608. ifmatches(%HITID%,%&id_sign%);
  1609. else;
  1610. wait(1000ms);
  1611. ifmatches(%HITID%,%&id_sign%);
  1612. else;
  1613. wait(1000ms);
  1614. ifmatches(%HITID%,%&id_sign%);
  1615. else;
  1616. wait(1000ms);
  1617. endif;
  1618. endif;
  1619. endif;
  1620. endif;
  1621. endif;
  1622. endif;
  1623. endif;
  1624. loop;
  1625. else;
  1626. unsafe(0);
  1627. unset(venda_finalizada);
  1628. gui(inventory);
  1629. if(%GUI% == "GUIINVENTORY");
  1630. getslot(%&item%,#slot_com_item);
  1631. gui();
  1632. if(#slot_com_item < 0);
  1633. inc(#conta_itens,%#conta_itens_temp%);
  1634. if(dev); log("Itens vendidos agora: %#conta_itens_temp%"); log("Itens vendidos ate agora: %#conta_itens%"); endif;
  1635. unset(#conta_itens_temp);
  1636.  
  1637.  
  1638. if(compactar);
  1639. ifmatches(%&item%,"gold_ingot");
  1640. set(&item,"gold_nugget");
  1641. endif;
  1642. ifmatches(%&item%,"266");
  1643. set(&item,"371");
  1644. endif;
  1645. endif;
  1646. break;
  1647. endif;
  1648. endif;
  1649. endunsafe;
  1650. endif;
  1651. loop;
  1652. if(venda_finalizada);
  1653. unset(venda_finalizada);
  1654. endif;
  1655.  
  1656. // Retornar para a trap;
  1657. #x_temp = %XPOS%;
  1658. #y_temp = %YPOS%;
  1659. #z_temp = %ZPOS%;
  1660. do();
  1661. if(home_temporaria);
  1662. if(vender_ultima);
  1663. echo(%&home_baus%); if(dev); log("%&home_baus%"); endif;
  1664. else;
  1665. echo("/home %&home_temporaria%"); if(dev); log("%&home_temporaria%"); endif;
  1666. endif;
  1667. else;
  1668. echo(%&home_baus%); if(dev); log("%&home_baus%"); endif;
  1669. endif;
  1670. do(55);
  1671. wait(100ms);
  1672. if((%ZPOS% == %#z_trap%)&&(%YPOS% == %#y_trap%));
  1673. else;
  1674. wait(100ms);
  1675. endif;
  1676. if((%ZPOS% == %#z_trap%)&&(%YPOS% == %#y_trap%));
  1677. else;
  1678. wait(100ms);
  1679. endif;
  1680. if((%XPOS% != %#x_temp%)|(%ZPOS% != %#z_temp%)|(%YPOS% != %#y_temp%));
  1681. if((%ZPOS% == %#z_trap%)&&(%YPOS% == %#y_trap%));
  1682. wait(100ms);
  1683. unsafe;
  1684. if(dev); log("Teleporte para a trap concluido."); endif;
  1685. break;
  1686. endunsafe;
  1687. else;
  1688. ifmatches(%CANFLY%,"False");
  1689. if(dev); log("Pulando para tentar desbugar..."); endif;
  1690. keydown(jump);
  1691. wait(1ms);
  1692. keyup(jump);
  1693. wait(1000ms);
  1694. endif;
  1695. endif;
  1696. else;
  1697. wait(200ms);
  1698. if(dev); log("Aguardando tp..."); endif;
  1699. endif;
  1700. loop;
  1701. if((%ZPOS% == %#z_trap%)&&(%YPOS% == %#y_trap%));
  1702. break;
  1703. else;
  1704. if(dev);
  1705. log("Nao consegui chegar na posicao exata da trap.");
  1706. log("Tentando dar /home novamente...");
  1707. endif;
  1708. endif;
  1709. loop;
  1710.  
  1711. if(vender_ultima);
  1712. #conta_packs = #conta_itens / 64;
  1713. log(" ");
  1714. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &eVenda finalizada!");
  1715. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &f&lContagem: &r&6%#conta_baus% baus verificados&f, &7%#conta_itens% &7itens&f (&a%#conta_packs% packs&f).");
  1716. unset(vender_ultima);
  1717. break;
  1718. endif;
  1719.  
  1720. loop;
  1721. //X POSITIVO = LESTE;
  1722. //X NEGATIVO = OESTE;
  1723. // Y POSITIVO = CIMA;
  1724. // Y NEGATIVO = BAIXO;
  1725. //Z POSITIVO = SUL;
  1726. //Z NEGATIVO = NORTE;
  1727. toggle(@vendedor_mexicano_v4);
  1728. log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fVendedor &2Mex&fic&4ano &cFinalizado&f.");
  1729.  
  1730. }$$
Advertisement
Add Comment
Please, Sign In to add comment