API tools faq
paste
lomexicano

Vendedor Mexicano v4.22 [1.5 e 1.8]

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