$${

///////////////////////////////////////////////////////
//vendedor mexicano v4.23 ~ feito por lomexicano; ////
//Testado em minecraft 1.5.2 e 1.8.9; ////
//Edite e republique como quiser; ////
//Macro exclusivamente GRATUITA. ////
//////////////////////////////////////////////////

//Informacoes extras e aplicaçao para cloudscript;

unset(@cloud);
set(&versao_macro,"4.23");
&dev_mode = "Nao";
ifmatches(%&dev_mode%,"Sim|sim|S|s|Y|y|Yes|yes"); set(dev); else; unset(dev);
endif;

set(&cloudscripttitle,"&0&k@&0&k@&r &fVendedor &2&lMEX&fIC&4ANO &fv&6%&versao_macro

% &0&k@&0&k@");
toggle(@vendedor_mexicano_v4);
log(" ");

if(@vendedor_mexicano_v4);
#conta_packs = #conta_itens / 64;
log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fVendedor &2Mex&fic&4ano &cFinalizado&f.");
keyup(right);keyup(left);keyup(sneak);keyup(jump);keyup(forward);keyup(back);
if(#conta_itens > 0);
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).");
endif;
stop;
endif;

// Resetar contagem de baus e itens;

#conta_baus = 1;
#conta_colunas = 1;
#conta_itens = 0;

log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fVendedor &2Mex&fic&4ano &aIniciado&f.");

wait(500ms);

ifmatches(%ITEM%,"[a-zA-Z]");
set(&version,"1.8");
set(&exit_code,"SAIR");
set(&extra_items,"§e-> §bCristais §3de prismarinho,§e-> §9Fragmentos §3de
prismarinho,");
else;
unset(&extra_items);
set(&version,"1.5");
set(&exit_code,"9999");
endif;

if(@cloud);
if(@cloud_mexican_var);
unset(first_blood);
unset(configuracoes);
 unset(&item);
unset(&trap);
unset(&pergunta_set_temp);
unset(&reiniciar);
unset(&home_baus);
unset(&home_venda);
unset(&setar_home_temporaria);
unset(&set_temp);
unset(&sethome_set_temp);
unset(#delay);
unset(&compactar);
ifmatches("%@&cloud_mexican_var[0]%","FirstBlood: OK");
set(first_blood);
else;
unset(first_blood);
endif;
ifmatches("%@&cloud_mexican_var[1]%","Configuracoes: OK");
set(configuracoes);
else;
unset(configuracoes);
endif;
set(&item,"%@&cloud_mexican_var[2]%");
set(&trap,"%@&cloud_mexican_var[3]%");
set(&pergunta_set_temp,"%@&cloud_mexican_var[4]%");
set(&reiniciar,"%@&cloud_mexican_var[5]%");
set(&home_baus,"%@&cloud_mexican_var[6]%");
set(&home_venda,"%@&cloud_mexican_var[7]%");
set(&setar_home_temporaria,"%@&cloud_mexican_var[8]%");
set(&set_temp,"%@&cloud_mexican_var[9]%");
set(&sethome_set_temp,"%@&cloud_mexican_var[10]%");
set(#delay,"%@&cloud_mexican_var[11]%");
set(&compactar,"%@&cloud_mexican_var[12]%");
endif;
endif;

if((!first_blood)|(!&item)|(!&trap)|(!&set_temp)|(!&reiniciar)|(!&home_baus)|(!
&home_venda));
if(!first_blood);
set(&home_baus,"/home sleepfb");
set(&home_venda,"/home sleepfv");
set(&setar_home_temporaria,"/sethome home_temporaria");
if(dev); log("first_blood"); endif;
set(#delay,300);
endif;
set(first_blood);
unset(configuracoes); set(perguntar_tudo);
if(dev);
log("unset(configuracoes)");
log("set(perguntar tudo)");
endif;
endif;

do();
if(configuracoes);
unset(&resposta);
if(@cloud);
unset(@&cloud_mexican_var[]);
if(first_blood);
put(@&cloud_mexican_var[],"FirstBlood: OK"); // 0;
 else;
put(@&cloud_mexican_var[],"FirstBlood: NO"); // 0;
endif;
if(configuracoes);
put(@&cloud_mexican_var[],"Configuracoes: OK"); // 1;
else;
put(@&cloud_mexican_var[],"Configuracoes: NO"); // 1;
endif;
put(@&cloud_mexican_var[],"%&item%"); // 2;
put(@&cloud_mexican_var[],"%&trap%"); // 3;
put(@&cloud_mexican_var[],"%&pergunta_set_temp%"); // 4;
put(@&cloud_mexican_var[],"%&reiniciar%"); // 5;
put(@&cloud_mexican_var[],"%&home_baus%"); // 6;
put(@&cloud_mexican_var[],"%&home_venda%"); // 7;
put(@&cloud_mexican_var[],"%&setar_home_temporaria%"); // 8;
put(@&cloud_mexican_var[],"%&set_temp%"); // 9;
put(@&cloud_mexican_var[],"%&sethome_set_temp%"); // 10;
put(@&cloud_mexican_var[],"%#delay%"); // 11;
put(@&cloud_mexican_var[],"%&compactar%"); // 12;
set(@cloud_mexican_var);
endif;

set(&empty," ");
unset(&empty_big);
unset(&empty_big2);
unsafe(0);
do(24);
set(&empty_big,"%&empty_big%%&empty%");
loop;
do(8);
set(&empty_big2,"%&empty_big2%%&empty%");
loop;
ifmatches(%&item%,"371|gold_nugget");
if(!&compactar);
set(&compactar,"§cNao");
endif;
set(&mexican_compact_question,",§e§l-> §fCompactar:
%&compactar%");
else;
set(&mexican_compact_question,"");
endif;
endunsafe;
do();
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]]","");
ifmatches(%&resposta%,"Item|Compactar|Trap|Sethome temp|Reiniciar|Home|
Venda|Continuar|Sair|Temp|Delay");
break;
endif;
loop;
ifmatches(%&resposta%,"Sair");
toggle(@vendedor_mexicano_v4);
log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fVendedor &2Mex&fic&4ano
&cFinalizado&f.");
stop;
endif;
 ifmatches(%&resposta%,"Continuar");
if(dev); log("continuar"); endif;
break;
else;
unset(@cloud_mexican_var);
unset(@&cloud_mexican_var[]);
unset(configuracoes);
endif;
else;
set(&resposta,"Item - Trap - §e§l-> §fSethome temp: - Reiniciar");
if(dev); log("perguntar tudo"); endif;
set(perguntar_tudo);
endif;
if(!configuracoes);
ifmatches(%&resposta%,"Item");
set(come_back);
unset(@cloud_mexican_var);
unset(@&cloud_mexican_var[]);
unset(&item);
do();
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]]","");
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");
break;
endif;
loop;
unsafe(0);
ifmatches(%&item%,"Sair");
unset(&item);
unset(@cloud_mexican_var);
unset(@&cloud_mexican_var[]);
log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fVendedor
&2Mex&fic&4ano &cFinalizado&f.");
toggle(@vendedor_mexicano_v4);
stop;
endif;
endunsafe;
ifmatches(%&item%,"Outro");
unset(@cloud_mexican_var);
unset(@&cloud_mexican_var[]);
unset(&item);
do();
prompt(&item,$$i:d,"§fSelecione um item para ser
vendido. §7§oDigite §c§o%&exit_code% §7§opara sair.");
until(&item);
ifmatches(%&item%,"SAIR|9999");
unset(@cloud_mexican_var);
unset(@&cloud_mexican_var[]);
unset(&item);
log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fVendedor
&2Mex&fic&4ano &cFinalizado&f.");
 toggle(@vendedor_mexicano_v4);
stop;
endif;
endif;
unsafe(0);
ifmatches(%&item%,"Cristais §3de prismarinho");
set(&item,"prismarine_crystals");
endif;
ifmatches(%&item%,"Fragmentos §3de prismarinho");
set(&item,"prismarine_shard");
endif;
ifmatches(%&item%,"Melancia");
ifmatches(%&version%,"1.5");
set(&item,"360");
else;
set(&item,"melon");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Peixe cru");
ifmatches(%&version%,"1.5");
set(&item,"349");
else;
set(&item,"fish");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"§bPeixe §6assado");
ifmatches(%&version%,"1.5");
set(&item,"350");
else;
set(&item,"cooked_fish");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Barra de Ferro");
ifmatches(%&version%,"1.5");
set(&item,"265");
else;
set(&item,"iron_ingot");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Barra de Ouro");
ifmatches(%&version%,"1.5");
set(&item,"266");
else;
set(&item,"gold_ingot");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Diamante");
ifmatches(%&version%,"1.5");
set(&item,"264");
else;
set(&item,"diamond");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Carvao");
ifmatches(%&version%,"1.5");
set(&item,"263");
else;
set(&item,"coal");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Esmeralda");
ifmatches(%&version%,"1.5");
set(&item,"388");
else;
set(&item,"emerald");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Batata$");
ifmatches(%&version%,"1.5");
set(&item,"392");
else;
set(&item,"potato");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Batata envenenada");
ifmatches(%&version%,"1.5");
set(&item,"394");
else;
set(&item,"poisonous_potato");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Cana");
ifmatches(%&version%,"1.5");
set(&item,"338");
else;
set(&item,"reeds");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Cenoura");
ifmatches(%&version%,"1.5");
set(&item,"391");
else;
set(&item,"carrot");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Fungo do nether");
ifmatches(%&version%,"1.5");
set(&item,"372");
else;
set(&item,"nether_wart");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Blaze rod");
ifmatches(%&version%,"1.5");
set(&item,"369");
 else;
set(&item,"blaze_rod");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Carne podre");
ifmatches(%&version%,"1.5");
set(&item,"367");
else;
set(&item,"rotten_flesh");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Linha");
ifmatches(%&version%,"1.5");
set(&item,"287");
else;
set(&item,"string");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Olho de aranha");
ifmatches(%&version%,"1.5");
set(&item,"375");
else;
set(&item,"spider_eye");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Osso");
ifmatches(%&version%,"1.5");
set(&item,"352");
else;
set(&item,"bone");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Pepita");
ifmatches(%&version%,"1.5");
set(&item,"371");
else;
set(&item,"gold_nugget");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Polvora");
ifmatches(%&version%,"1.5");
set(&item,"289");
else;
set(&item,"gunpowder");
endif;
if(dev); log(%&item%); endif;
endif;
ifmatches(%&item%,"Saco de tinta");
ifmatches(%&version%,"1.5");
set(&item,"351");
else;
set(&item,"dye");
endif;
 if(dev); log(%&item%); endif;
endif;
endunsafe;
endif;
if((!come_back)||(perguntar_tudo));
ifmatches(%&resposta%,"Trap");
set(come_back);
unset(@cloud_mexican_var);
unset(@&cloud_mexican_var[]);
unset(&trap);
if(dev);log("Pergunta da trap");endif;
do();
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]]","");
ifmatches(%&trap%,"Infinita|Pesqueiro|zMatheus22|Mexicana");
ifmatches(%&trap%,"-> "); match(%&trap%,"-> (.*)",{&trap});
if(dev); log("%&trap%"); endif; endif;
ifmatches(%&trap%,"Infinita|zMatheus22");
set(&pergunta_set_temp,",§e§l-> §fSethome temp:
%&set_temp%");
ifmatches(%&set_temp%,"Sim$");
set(&sethome_set_temp,",§6§l-> §fTemp:
%&setar_home_temporaria%");
else;
set(&sethome_set_temp,"");
endif;
else;
set(&pergunta_set_temp,"");
set(&set_temp,"§cNao");
set(&sethome_set_temp,"");
//set(&sethome_set_temp,"");
ifmatches(%&resposta%,"Sethome temp");
match(%&resposta%,"(.*)Sethome temp(.*)",
{&part1,&part2});
set(&resposta,"%&part1%%&part2%");
endif;
endif;
break;
endif;
loop;
endif;
endif;
if((!come_back)||(perguntar_tudo));
ifmatches(%&resposta%,"§e§l-> §fSethome temp:");
set(come_back);
unset(@cloud_mexican_var);
unset(@&cloud_mexican_var[]);
unset(&set_temp);
do();
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]]","");
ifmatches(%&set_temp%,"Sim$|Nao$");
ifmatches(%&set_temp%,"-> "); match(%&set_temp%,"-> (.*)",
{&set_temp}); if(dev); log("%&set_temp%"); endif; endif;
set(&pergunta_set_temp,",§e§l-> §fSethome temp: %&set_temp
%");
 ifmatches(%&set_temp%,"Sim$");
set(&sethome_set_temp,",§6§l-> §fTemp:
%&setar_home_temporaria%");
else;
set(&sethome_set_temp,"");
endif;

break;
endif;
loop;
endif;
endif;
if((!come_back)||(perguntar_tudo));
ifmatches(%&resposta%,"Reiniciar");
set(come_back);
unset(@cloud_mexican_var);
unset(@&cloud_mexican_var[]);
unset(&reiniciar);
do();
prompt(&reiniciar,"$$[Resposta[§f§lREINICIAR,
%&empty_big2%§7apos terminar,§2-> §aSim,§4-> §cNao]]","");
ifmatches(%&reiniciar%,"Sim|Nao");
ifmatches(%&reiniciar%,"-> "); match(%&reiniciar%,"->
(.*)",{&reiniciar}); if(dev); log("reiniciar: %&reiniciar%"); endif; endif;
break;
endif;
loop;
endif;
endif;
if((!come_back)||(perguntar_tudo));
ifmatches(%&resposta%,"Compactar");
set(come_back);
unset(@cloud_mexican_var);
unset(@&cloud_mexican_var[]);
unset(&compactar);
do();
prompt(&compactar,"$$[Resposta[§f§lCOMPACTAR,%&empty_big2%§7com
§6/compactar -a,§2-> §aSim,§4-> §cNao]]","");
ifmatches(%&compactar%,"Sim|Nao");
ifmatches(%&compactar%,"-> ");
match(%&compactar%,"-> (.*)",{&compactar});
if(dev); log("compactar: %&compactar%"); endif;
endif;
break;
endif;
loop;
endif;
endif;
if((!come_back)||(perguntar_tudo));
ifmatches(%&resposta%,"Baus:");
set(come_back);
unset(@cloud_mexican_var);
unset(@&cloud_mexican_var[]);
unset(&home_baus);
do();
prompt(&home_baus,$$?,"§eQual a sua §6sethome §ena trap de
§e§obaus§r§e? §7(ex: §f/home baus§7)");
ifmatches(%&home_baus%,"^/home (.*)");
 break;
endif;
loop;
endif;
endif;
if((!come_back)||(perguntar_tudo));
ifmatches(%&resposta%,"Venda:");
set(come_back);
unset(@cloud_mexican_var);
unset(@&cloud_mexican_var[]);
unset(&home_venda);
do();
prompt(&home_venda,$$?,"§eQual a sua §6sethome §eolhando para a
§e§oplaca da loja§r§e? §7(ex: §f/home venda§7)");
ifmatches(%&home_venda%,"^/home (.*)");
break;
endif;
loop;
endif;
endif;
if((!come_back)||(perguntar_tudo));
ifmatches(%&resposta%,"§6§l-> §fTemp:");
set(come_back);
unset(@cloud_mexican_var);
unset(@&cloud_mexican_var[]);
unset(&setar_home_temporaria);
do();
prompt(&setar_home_temporaria,$$?,"§eQual a sua §6sethome
temporaria§e? §7(ex: §f/sethome home_temporaria§7)");
ifmatches(%&setar_home_temporaria%,"^/sethome (.*)");
set(&sethome_set_temp,",§6§l-> §fTemp:
%&setar_home_temporaria%");
break;
endif;
loop;
endif;
endif;
if((!come_back)||(perguntar_tudo));
ifmatches(%&resposta%,"Delay");
set(come_back);
unset(@cloud_mexican_var);
unset(@&cloud_mexican_var[]);
unset(#delay);
do();
prompt(#delay,$$?,"§eDigite o §e§onumero §r§ede §6milissegundos
§ede delay para abrir o bau §7(ex: §f500§7 - max 99999ms)");
ifmatches(%#delay%,"[0-9]{1,5}");
break;
endif;
loop;
endif;
endif;
endif;
unset(@cloud_mexican_var);
unset(@&cloud_mexican_var[]);
unset(come_back);
unset(perguntar_tudo);
set(configuracoes);
loop;
ifmatches(%&trap%,"Infinita|zMatheus22");
ifmatches(%&set_temp%,"Sim");
set(home_temporaria);
else;
unset(home_temporaria);
endif;
else;
unset(home_temporaria);
endif;

//Comandos, ids e variaveis (edite, se achar necessario);

&hide_players = "/esconder";
&menu_loja_off = "/menuloja off";
&comando_fly = "/mc";
&id_chest = "chest|trapped_chest|54|146";
&id_sign = "wall_sign|^68$";

//Ordem dos lados nos baus do pesqueiro;

unset(&lado_pesqueiro[]);
put(&lado_pesqueiro[],"North");
put(&lado_pesqueiro[],"East");
put(&lado_pesqueiro[],"South");
put(&lado_pesqueiro[],"West");

set(first_hide);

ifmatches(%&compactar%,"Sim");
ifmatches(%&item%,"371|gold_nugget");
set(compactar);
if(dev);log("compactar: %&compactar%"); endif;
else;
if(dev);log("compactar: %&compactar% - id: %&item%"); wait(1000ms);
endif;
unset(compactar);
endif;
else;
if(dev); log("compactar: %&compactar%"); endif;
unset(compactar);
endif;

//Desativar /mc caso esteja ativo;

do();
ifmatches(%CANFLY%,"True");
log(" ");
log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fDesativando &6/mc&f...");
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.");
echo("%&comando_fly%"); if(dev); log(%&comando_fly%); endif;
do(5);
ifmatches(%CANFLY%,"True");
wait(500ms);
if(dev);
log("/mc continua ativo...");
endif;
else;
break;
endif;
 loop;
else;
break;
endif;
loop;

//Desativar menus de loja;

echo(%&menu_loja_off%); if(dev); log(%&menu_loja_off%); endif;
wait(500ms);

//Teleportar para a home, em uma primeira instancia;

echo(%&home_baus%); if(dev); log(%&home_baus%); endif;
wait(6000ms);
log(" "); log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fIniciando...");

//Verificar a integridade da home, para garantir que esta nela;

do();
ifmatches(%&trap%,"Infinita|zMatheus22");
ifmatches(%&trap%,"Infinita");
set(#distancia_inferior,2);
set(#distancia_superior,3);
else;
set(#distancia_inferior,4);
set(#distancia_superior,5);
endif;
unset(&verificador_baus);
unset(&verificador_baus_error);
unsafe(0);
for(#distancia,%#distancia_inferior%,%#distancia_superior%);
for(#altura,-1,3);
ifmatches(%&version%,"1.5");
getidrel(+0,%#altura%,-%#distancia%,#id_verificado);
set(&verificador_baus,"%&verificador_baus%%#id_verificado
%");
ifmatches(%#id_verificado%,"%&id_chest%");
else;
set(&verificador_baus_error,"%&verificador_baus_error%
- (%#id_verificado% : 0,%#altura%,%#distancia%)");
endif;
else;
getidrel(+0,%#altura%,-%#distancia%,&id_verificado);
set(&verificador_baus,"%&verificador_baus%%&id_verificado
%");
ifmatches(%&id_verificado%,"%&id_chest%");
else;
set(&verificador_baus_error,"%&verificador_baus_error%
- (%&id_verificado% : 0,%#altura%,-%#distancia%)");
endif;
endif;
next;
next;
endunsafe;
ifmatches(%&verificador_baus%,"(%&id_chest%){10}");
set(#x_trap,"%XPOS%");
set(#y_trap,"%YPOS%");
set(#z_trap,"%ZPOS%");
log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fCoordenadas da home de baus
coletadas!");
 log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &f(&a%#x_trap%&7,&e%#y_trap
%&7,&9%#z_trap%&f)");
break;
else;
log(" ");
log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fParece que voce nao esta na home de
baus.");
if(dev);
log("&k&d~~&r&3dev mode&k&d~~");
log(%&verificador_baus%);
log("%&verificador_baus_error%");
log("%&id_chest%");
endif;
set(#x_temp,"%XPOS%");
set(#y_temp,"%YPOS%");
set(#z_temp,"%ZPOS%");
echo("%&home_baus%"); if(dev); log(%&home_baus%); endif;
do(30);
wait(250ms);
if((%XPOS% != %#x_temp%)||(%YPOS% != %#y_temp%)||(%ZPOS% !=
%#z_temp%));
wait(1000ms);
break;
else;
wait(150ms);
endif;
loop;
endif;
endif;
ifmatches(%&trap%,"Pesqueiro|Mexicana");
ifmatches(%&trap%,"Pesqueiro");
#altura_maxima = 1;
#numero_de_baus = 160;
else;
#altura_maxima = 2;
#numero_de_baus = 200;
endif;
unset(&verificador_baus);
unset(&verificador_baus_error);
unsafe(0);
for(#distancia_x,-2,2);
for(#distancia_z,3,4);
for(#altura,-2,%#altura_maxima%)
ifmatches(%&version%,"1.5");
getidrel(%#distancia_x%,%#altura%,%#distancia_z
%,#id_verificado);
set(&verificador_baus,"%&verificador_baus%
%#id_verificado%");
ifmatches(%#id_verificado%,"%&id_chest%");
else;

set(&verificador_baus_error,"%&verificador_baus_error% - (%#id_verificado% :
%#distancia_x%,%#altura%,%#distancia_z%)");
endif;
else;
getidrel(%#distancia_x%,%#altura%,%#distancia_z
%,&id_verificado);
set(&verificador_baus,"%&verificador_baus%
%&id_verificado%");
 ifmatches(%&id_verificado%,"%&id_chest%");
else;

set(&verificador_baus_error,"%&verificador_baus_error% - (%&id_verificado% :
%#distancia_x%,%#altura%,%#distancia_z%)");
endif;
endif;
next;
next;
next;
for(#distancia_x,-2,2);
for(#distancia_z,-4,-3);
for(#altura,-2,%#altura_maxima%)
ifmatches(%&version%,"1.5");
getidrel(%#distancia_x%,%#altura%,%#distancia_z
%,#id_verificado);
set(&verificador_baus,"%&verificador_baus%
%#id_verificado%");
ifmatches(%#id_verificado%,"%&id_chest%");
else;

set(&verificador_baus_error,"%&verificador_baus_error% - (%#id_verificado% :
%#distancia_x%,%#altura%,%#distancia_z%)");
endif;
else;
getidrel(%#distancia_x%,%#altura%,%#distancia_z
%,&id_verificado);
set(&verificador_baus,"%&verificador_baus%
%&id_verificado%");
ifmatches(%&id_verificado%,"%&id_chest%");
else;

set(&verificador_baus_error,"%&verificador_baus_error% - (%&id_verificado% :
%#distancia_x%,%#altura%,%#distancia_z%)");
endif;
endif;
next;
next;
next;
for(#distancia_x,-4,-3);
for(#distancia_z,-2,2);
for(#altura,-2,%#altura_maxima%)
ifmatches(%&version%,"1.5");
getidrel(%#distancia_x%,%#altura%,%#distancia_z
%,#id_verificado);
set(&verificador_baus,"%&verificador_baus%
%#id_verificado%");
ifmatches(%#id_verificado%,"%&id_chest%");
else;

set(&verificador_baus_error,"%&verificador_baus_error% - (%#id_verificado% :
%#distancia_x%,%#altura%,%#distancia_z%)");
endif;
else;
getidrel(%#distancia_x%,%#altura%,%#distancia_z
%,&id_verificado);
set(&verificador_baus,"%&verificador_baus%
%&id_verificado%");
ifmatches(%&id_verificado%,"%&id_chest%");
 else;

set(&verificador_baus_error,"%&verificador_baus_error% - (%&id_verificado% :
%#distancia_x%,%#altura%,%#distancia_z%)");
endif;
endif;
next;
next;
next;
for(#distancia_x,3,4);
for(#distancia_z,-2,2);
for(#altura,-2,%#altura_maxima%)
ifmatches(%&version%,"1.5");
getidrel(%#distancia_x%,%#altura%,%#distancia_z
%,#id_verificado);
set(&verificador_baus,"%&verificador_baus%
%#id_verificado%");
ifmatches(%#id_verificado%,"%&id_chest%");
else;

set(&verificador_baus_error,"%&verificador_baus_error% - (%#id_verificado% :
%#distancia_x%,%#altura%,%#distancia_z%)");
endif;
else;
getidrel(%#distancia_x%,%#altura%,%#distancia_z
%,&id_verificado);
set(&verificador_baus,"%&verificador_baus%
%&id_verificado%");
ifmatches(%&id_verificado%,"%&id_chest%");
else;

set(&verificador_baus_error,"%&verificador_baus_error% - (%&id_verificado% :
%#distancia_x%,%#altura%,%#distancia_z%)");
endif;
endif;
next;
next;
next;
endunsafe;
ifmatches(%&verificador_baus%,"(%&id_chest%){%#numero_de_baus%}");
set(#x_trap,"%XPOS%");
set(#y_trap,"%YPOS%");
set(#z_trap,"%ZPOS%");
log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fCoordenadas da home de baus
coletadas!");
log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &f(&a%#x_trap%&7,&e%#y_trap
%&7,&9%#z_trap%&f)");
break;
else;
log(" ");
log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fParece que voce nao esta na home de
baus.");
if(dev);
log("&k&d~~&r&3dev mode&k&d~~");
log("%&verificador_baus_error%");
endif;
set(#x_temp,"%XPOS%");
set(#y_temp,"%YPOS%");
set(#z_temp,"%ZPOS%");
 echo("%&home_baus%"); if(dev); log("%&home_baus%"); endif;
do(30);
wait(250ms);
if((%XPOS% != %#x_temp%)||(%YPOS% != %#y_temp%)||(%ZPOS% !=
%#z_temp%));
wait(1000ms);
break;
else;
wait(150ms);
endif;
loop;
endif;
endif;
loop;

#bau = 1;
#coluna = 1;
#lado = 1;
unset(vender_ultima);
unset(proxima_coluna);
unset(proximo_bau);
unset(passou_do_lugar);
unset(#conta_itens_temp);
match(%&setar_home_temporaria%,"/sethome (.*)",{&home_temporaria});

if(home_temporaria);
echo(%&setar_home_temporaria%); if(dev); log(%&setar_home_temporaria%); endif;
wait(700ms);
echo(%&setar_home_temporaria%); if(dev); log(%&setar_home_temporaria%); endif;
wait(700ms);
endif;
///Inicio do processo;
do();
//do();
if(#bau < 1); #bau = 1; endif;
ifmatches(%&trap%,"pesqueiro|mexicana"); // pegar itens na trap do pesqueiro
sleep, pesca mexicana ou homeless;
do();
do(); // olhar pro bau e abrir;
unsafe;
if(#lado == 1);
look(%&lado_pesqueiro[0]%);
elseif(#lado == 2);
look(%&lado_pesqueiro[1]%);
elseif(#lado == 3);
look(%&lado_pesqueiro[2]%);
elseif(#lado == 4);
look(%&lado_pesqueiro[3]%);
elseif(#lado == 5);
ifmatches(%&reiniciar%,"sim");
#lado = 1;
look(%&lado_pesqueiro[0]%);
else;
set(vender_ultima);
break;
endif;
endif;
ifmatches(%&trap%,"Pesqueiro comum");
if(#bau < 6);
 #bau = 6;
endif;
endif;

if(%GUI% != "NONE"); gui(); endif;

if(#bau == 1);
look(-36,-12);
elseif(#bau == 2);
look(-20,-14);
elseif(#bau == 3);
look(+0,-15);
elseif(#bau == 4);
look(+20,-14);
elseif(#bau == 5);
look(+36,-12);
elseif(#bau == 6);
look(-35,+2);
elseif(#bau == 7);
look(-20,+2);
elseif(#bau == 8);
look(+0,+0);
elseif(#bau == 9);
look(+20,+2);
elseif(#bau == 10);
look(+35,+2);
elseif(#bau == 11);
look(-37,+19);
elseif(#bau == 12);
look(-21,+22);
elseif(#bau == 13);
look(+0,+22);
elseif(#bau == 14);
look(+21,+22);
elseif(#bau == 15);
look(+37,+19);
elseif(#bau == 16);
look(-38,+32);
elseif(#bau == 17);
look(-21,+37);
elseif(#bau == 18);
look(+0,+39);
elseif(#bau == 19);
look(+21,+37);
elseif(#bau == 20);
look(+38,+32);
elseif(#bau == 21);
look(-38,+43);
elseif(#bau == 22);
look(-22,+48);
elseif(#bau == 23);
look(+0,+50);
elseif(#bau == 24);
look(+21,+48);
elseif(#bau == 25);
look(+38,+43);
endif;

#lado_temp = #lado - 1;
 set(&lado_temp,"%&lado_pesqueiro[%#lado_temp%]%");
if(dev); log("#bau: %#bau% - lado: %&lado_temp%");
endif;
log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &r&eBau
&6%#conta_baus% &f- &eLado &6%&lado_temp%&f.");
endunsafe;
keyup(sneak);
//wait(100ms);
unsafe(0);
if(%GUI% != "NONE");
do(); gui(); wait(200ms); until(%GUI% ==
"NONE");
endif;
wait(200ms);

do(2);
key(use);
do(15);
wait(100ms);
if(%GUI% == "GUICHEST");
break;
endif;
ifmatches(%HITID%,%&id_chest%);
else;
break;
endif;
loop;
if(%GUI% == "GUICHEST");
break;
endif;
ifmatches(%HITID%,%&id_chest%);
else;
break;
endif;
loop;
endunsafe;
if(%GUI% == "GUICHEST");
if(#delay > 0); wait(%#delay%ms); endif;
break;
endif;
loop;

unsafe(0);
if(compactar);
#vazios = -4;
for(#slot,54,89);
ifmatches(%&version%,"1.5");
getslotitem(%#slot%,#oq);
set(&oq,"%#oq%");
else;
getslotitem(%#slot%,&oq);
endif;
ifmatches(%&oq%,"air|^0$");
inc(#vazios,1);
endif;
next;
if(dev);
log("Pegar %#vazios% pepitas");
endif;
 if(#vazios <= 0);
break;
endif;
endif;
if(!vender_ultima);
unset(inv_full);
do();
getslot(%&item%,#slot_com_item);
if((#slot_com_item < 0)||(#slot_com_item >
53)); // bau vazio;
if(dev); log("bau vazio - #slot_com_item:
%#slot_com_item%"); endif;
inc(#bau,1);
inc(#conta_baus,1);
if(#bau > 25);
#bau = 1;
inc(#lado,1);
endif;
break;
else;
getslotitem(%#slot_com_item
%,#nada,#stack);
inc(#conta_itens_temp,%#stack%);
slotclick(%#slot_com_item%,l,true);
getslotitem(%#slot_com_item
%,#nada,#stack);
if(dev); log("dev"); log("%#stack%");
endif;
if(compactar);
dec(#vazios,1);
if(#vazios <= 0);
set(#stack,1);
endif;
endif;
if(#stack > 0); // inventario cheio;
dec(#conta_itens_temp,%#stack%);
if(compactar);
inc(#conta_itens_temp,1);
endif;
if(dev);
log("dec(#conta_itens_temp,%#stack%);");endif;
if(dev); log("inv full"); endif;
set(inv_full);
break;
endif;
endif;
loop;
endif;
endunsafe;
if((vender_ultima)|(inv_full));
if(dev); log("vender"); endif;
break;
endif;
if(%GUI% != "NONE"); gui(); endif;
loop;
else; // pegar itens na trap infinita / zMatheus22;
do();
unsafe(0);
#x_final = #x_trap + #coluna - 1;
 if(dev);
log("X final: %#x_final%");
log("X agora: %XPOS%");
log("X trap: %#x_trap%");
endif;
if(%XPOS% != %#x_final%);
set(proxima_coluna);
if(dev); log("proxima coluna"); endif;
else;
unset(proxima_coluna);
endif;
endunsafe;
if(proxima_coluna);
unset(voltar_para_home);
do();
if(!voltar_para_home);
unsafe;
do();
look(north);
#x_agora = %XPOS%;
#distancia_ate_coluna = #x_final - #x_agora;
if(dev); log("distancia ate coluna:
%#distancia_ate_coluna%"); endif;
if(#distancia_ate_coluna > 2);
SPRINT();
keyup(sneak);
else;
keydown(sneak);
UNSPRINT;
endif;
if(#distancia_ate_coluna == 0);
unset(passou_do_lugar);
ifmatches(%HITID%,%&id_chest%);
if(dev); log("vejo bau"); endif;
else;
if(dev); log("nao vejo bau"); endif;
wait(20ms);
keyup(right);
endif;
wait(100ms);
keyup(sneak);
break;
endif;
if((#distancia_ate_coluna < 0)||(%ZPOS% != %#z_trap
%));
if(#distancia_ate_coluna <
0);
set(passou_do_lugar);
endif;
set(voltar_para_home);
break;
endif;
if(#distancia_ate_coluna > 0);
keydown(right);
endif;
loop;
endunsafe;
endif;
if(voltar_para_home);
 ////// voltar para a home dos baus;
if(dev); log("Voltar para a home dos baus"); endif;
#x_temp = %XPOS%;
#y_temp = %YPOS%;
#z_temp = %ZPOS%;
do();

keyup(right);keyup(left);keyup(sneak);keyup(jump);keyup(forward);keyup(back);
if((home_temporaria)||(passou_do_lugar));
if(vender_ultima);
set(home_final_original);
echo(%&home_baus%); if(dev); log("%&home_baus
%"); endif;
else;
if((#coluna != 1)&&(!passou_do_lugar));
echo("/home %&home_temporaria%"); if(dev);
log("%&home_temporaria%"); endif;
unset(home_final_original);
else;
if(passou_do_lugar);
if(dev); log("Erro
inesperado. Posicao do player nao faz sentido!"); endif;

log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &r&eErro inesperado&f.");

wait(500ms);

log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &r&eRetornando&f.");
endif;
set(home_final_original);
echo(%&home_baus%); if(dev);
log("%&home_baus%"); endif;
endif;
endif;
else;
echo(%&home_baus%); if(dev); log("%&home_baus%");
endif;
endif;
wait(100ms);
do(60);
wait(200ms);
if((%ZPOS% == %#z_trap%)&&(%YPOS%
== %#y_trap%));
else;
wait(200ms);
endif;
if((%ZPOS% == %#z_trap%)&&(%YPOS%
== %#y_trap%));
else;
wait(200ms);
endif;
if((%XPOS% != %#x_temp%)|(%ZPOS% != %#z_temp%)|
(%YPOS% != %#y_temp%));
if((%ZPOS% == %#z_trap%)&&(%YPOS% == %#y_trap
%));
wait(300ms);
if(dev); log("Teleporte para a trap
concluido."); endif;
if(home_final_original);
if(%XPOS% == %#x_trap%);
 unset(voltar_para_home);
break;
endif;
else;
unset(voltar_para_home);
break;
endif;
else;
ifmatches(%CANFLY%,"False");
if(dev); log("Pulando para tentar
desbugar..."); endif;
keydown(jump);
wait(1ms);
keyup(jump);
wait(1000ms);
else;
wait(1000ms);
endif;
endif;
endif;
loop;
if((%ZPOS% == %#z_trap%)&&(%YPOS% == %#y_trap%));
if(home_final_original);
if(%XPOS% == %#x_trap%);
unset(voltar_para_home);
break;
endif;
else;
unset(voltar_para_home);
break;
endif;
else;
if(dev);
log("Nao consegui chegar na posicao exata da
trap.");
log("Tentando dar /home novamente...");
endif;
endif;
loop;

///////

else;
unsafe(0);
unset(tudo_certo);
ifmatches(%&trap%,"Infinita");
set(#distancia_inferior,2);
set(#distancia_superior,3);
else;
set(#distancia_inferior,4);
set(#distancia_superior,5);
endif;
unset(&verificador_baus);
unset(&verificador_baus_error);
for(#distancia,%#distancia_inferior%,
%#distancia_superior%);
for(#altura,-1,3);
ifmatches(%&version%,"1.5");
getidrel(+0,%#altura%,-%#distancia
%,#id_verificado);

set(&verificador_baus,"%&verificador_baus%%#id_verificado%");
ifmatches(%#id_verificado%,"%&id_chest
%");
else;

set(&verificador_baus_error,"%&verificador_baus_error% - (%#id_verificado% :
0,%#altura%,%#distancia%)");
endif;
else;
getidrel(+0,%#altura%,-%#distancia
%,&id_verificado);

set(&verificador_baus,"%&verificador_baus%%&id_verificado%");
ifmatches(%&id_verificado%,"%&id_chest
%");
else;

set(&verificador_baus_error,"%&verificador_baus_error% - (%&id_verificado% :
0,%#altura%,-%#distancia%)");
endif;
endif;
next;
next;
ifmatches(%&verificador_baus%,"(%&id_chest%){10}");
look(3,2);
ifmatches(%HITID%,%&id_chest%);
set(tudo_certo);
else;
unset(tudo_certo);
set(voltar_para_home);
endif;
else;
set(tudo_certo);
ifmatches(%&reiniciar%,"Nao");
if(dev); log("TRAP INCOMPLETA! Vendendo ultima
rodada."); endif;
set(vender_ultima);
else;
if(dev); log("TRAP INCOMPLETA! Retornando para
o inicio."); endif;
#bau = 1;
#coluna = 1;
set(voltar_para_home);
unset(vender_ultima);
endif;
endif;
endunsafe;
endif;

if(passou_do_lugar);
unset(voltar_para_home);
unset(tudo_certo);
unset(passou_do_lugar);
endif;

if((!voltar_para_home)&&(tudo_certo));
if(!vender_ultima);
 if(home_temporaria);
look(3,2);
ifmatches(%HITID%,%&id_chest%);
echo(%&setar_home_temporaria
%); if(dev); log(%&setar_home_temporaria%); endif;
wait(300ms);
ifmatches(%HITID%,%&id_chest
%);

echo(%&setar_home_temporaria%); if(dev); log(%&setar_home_temporaria%);

endif;
wait(300ms);
else;
if(dev); log("Erro
inesperado. Bau sumiu?"); endif;

log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &r&eErro inesperado&f.");

wait(2000ms);

log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &r&eRetornando&f.");
unset(tudo_certo);
set(voltar_para_home);
endif;
else;
if(dev); log("Erro
inesperado. Bau sumiu?"); endif;
if(dev); log("Erro
inesperado. Bau sumiu?"); endif;

log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &r&eErro inesperado&f.");

wait(200ms);

log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &r&eRetornando&f.");
unset(tudo_certo);
set(voltar_para_home);
endif;
endif;
endif;
if(tudo_certo)
break;
endif;
endif;
if(vender_ultima);
break;
endif;
loop;
endif;
if(vender_ultima);
break;
endif;
do();
unsafe(0);
ifmatches(%&trap%,"zMatheus22");
if(#bau == 1);
look(3,335);
elseif(#bau == 2);
look(3,348);
elseif(#bau == 3);
look(3,2);
 elseif(#bau == 4);
look(3,17);
elseif(#bau == 5);
look(3,31);
elseif(#bau == 6);
look(3,46);
elseif(#bau == 7);
look(3,67);
elseif(#bau == 8);
look(177,53);
elseif(#bau == 9);
look(177,37);
elseif(#bau == 10);
look(177,24);
elseif(#bau == 11);
look(177,4);
elseif(#bau == 12);
look(177,342);
elseif(#bau == 13);
look(177,325);
elseif(#bau == 14);
look(177,303);
elseif(#bau == 15);
look(3,283);
elseif(#bau == 16);
look(3,316);
elseif((#bau > 16)||(#bau < 1));
#bau = 1;
inc(#coluna,1);
inc(#conta_colunas,1);
if(dev); log("proxima coluna (%#coluna
%)"); endif;
set(proxima_coluna);
break;
endif;
else;
if(#bau == 1);
if(dev); log("bau 1"); endif;
look(3,313);
elseif(#bau == 2);
if(dev); log("bau 2"); endif;
look(3,335);
elseif(#bau == 3);
if(dev); log("bau 3"); endif;
look(3,5);
elseif(#bau == 4);
if(dev); log("bau 4"); endif;
look(3,35);
elseif(#bau == 5);
if(dev); log("bau 5"); endif;
look(3,52);
elseif((#bau > 5)||(#bau < 1));
#bau = 1;
inc(#coluna,1);
inc(#conta_colunas,1);
set(proxima_coluna);
break;
endif;
endif;
 keyup(sneak);

log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &r&eBau
&6%#conta_baus% &f- &eColuna &6%#conta_colunas%&f.");

//wait(100ms);
if(%GUI% != "NONE");
do(); gui(); wait(100ms); until(%GUI% ==
"NONE");
endif;
do(2);
ifmatches(%HITID%,%&id_chest%);
key(use);
do(40);
wait(50ms);
if(%GUI% == "GUICHEST");
break;
endif;
ifmatches(%HITID%,%&id_chest%);
else;
break;
endif;
loop;
else;
break;
endif;
if(%GUI% == "GUICHEST");
break;
endif;
loop;
if(%GUI% == "GUICHEST");
if(#delay > 0); wait(%#delay%ms); endif;
break;
endif;
ifmatches(%HITID%,%&id_chest%);
else;
break;
endif;
endunsafe;
loop;
if(%GUI% == "GUICHEST");
unsafe(0);
if(compactar);
#vazios = -4;
for(#slot,54,89);
ifmatches(%&version%,"1.5");
getslotitem(%#slot%,#oq);
set(&oq,"%#oq%");
else;
getslotitem(%#slot%,&oq);
endif;
ifmatches(%&oq%,"air|^0$");
inc(#vazios,1);
endif;
next;
if(dev);
log("Pegar %#vazios% pepitas");
endif;
 if(#vazios <= 0);
break;
endif;
endif;
if(!vender_ultima);
unset(inv_full);
do();
getslot(%&item%,#slot_com_item);
if((#slot_com_item < 0)||(#slot_com_item
> 53)); // bau vazio;
if(dev); log("bau vazio. Slot
%#slot_com_item%"); endif;
inc(#bau,1);
inc(#conta_baus,1);
ifmatches(%&trap%,"zMatheus22");
if(#bau > 16);
#bau = 1;
inc(#coluna,1);
inc(#conta_colunas,1);
endif;
else;
if(#bau > 5);
#bau = 1;
inc(#coluna,1);
inc(#conta_colunas,1);
endif;
endif;
if(dev);
log("break");
endif;
break;
else;
getslotitem(%#slot_com_item
%,&nada,#stack);
inc(#conta_itens_temp,%#stack%);
slotclick(%#slot_com_item%,l,true);
getslotitem(%#slot_com_item
%,#nada,#stack);
if(compactar);
dec(#vazios,1);
if(#vazios <= 0);
set(#stack,1);
endif;
endif;
if(#stack > 0); // inventario
cheio;
dec(#conta_itens_temp,%#stack
%);
if(compactar);

inc(#conta_itens_temp,1);
endif;
if(dev);
log("dec(#conta_itens_temp,%#stack%);");endif;
if(dev); log("inv full");
endif;
set(inv_full);
break;
endif;
 endif;
loop;

endif;
if((vender_ultima)|(inv_full));
break;
endif;
if(%GUI% != "NONE"); gui(); endif;
endunsafe;
else;

endif;
loop;
endif;

if(compactar);
ifmatches(%&item%,"371|gold_nugget");
echo("/compactar -a");
wait(500ms);
ifmatches(%&item%,"371");
set(&item,"266");
endif;
ifmatches(%&item%,"gold_nugget");
set(&item,"gold_ingot");
endif;
endif;
endif;
// vender itens na loja;
#x_temp = %XPOS%;
#z_temp = %ZPOS%;
if(%GUI% != "NONE"); gui(); endif;
do();
echo(%&home_venda%); if(dev); log("%&home_venda%"); endif;
unsafe(0);
do(40);
wait(250ms);
if((%XPOS% != %#x_temp%)||(%ZPOS% != %#z_temp%));
break;
endif;
ifmatches(%HITID%,%&id_sign%);
break;
endif;
loop;
if((%XPOS% != %#x_temp%)||(%ZPOS% != %#z_temp%));
break;
endif;
ifmatches(%HITID%,%&id_sign%);
break;
endif;
endunsafe;
loop;
ifmatches(%CANFLY%,"True");
do();
echo(%&comando_fly%); if(dev); log("%&comando_fly%"); endif;
do(40);
wait(500ms);
ifmatches(%CANFLY%,"False");
wait(500ms);
 break;
endif;
loop;
ifmatches(%CANFLY%,"False");
break;
endif;
loop;
endif;

do(4);
if((first_hide)||(%HITID% > 10000));
echo("%&hide_players%"); if(dev); log("%&hide_players%"); endif;
unset(first_hide);
endif;
do(10);
ifmatches(%HITID%,%&id_sign%);
break;
else;
wait(500ms);
ifmatches(%CANFLY%,"False");
if(dev); log("Tentando pular pra desbugar..."); endif;
keydown(jump);
wait(1ms);
keyup(jump);
wait(750ms);
endif;
endif;
loop;
if(#delay > 650);
echo(%&menu_loja_off%);
if(dev);
log("%&menu_loja_off%");
endif;
wait(300ms);
endif;
ifmatches(%HITID%,%&id_sign%);
break;
else;
if(dev); log("Nao vejo placa. Aguardando."); endif;
wait(1000ms);
ifmatches(%HITID%,%&id_sign%);
else;
if(dev); log("Nao vejo placa. Aguardando."); endif;
wait(1000ms);
ifmatches(%HITID%,%&id_sign%);
else;
if(dev); log("%&hide_players%"); endif;
echo("%&hide_players%");
endif;
endif;
endif;
loop;
do(40);
unset(nao_vejo_placa);
if(%GUI% == "NONE");
ifmatches(%HITID%,%&id_sign%);
key(attack);
wait(300ms);
else;
 set(nao_vejo_placa);
endif;
elseif(%GUI% == "GUICHAT");
log(" ");
log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fChat detectado. Aguardando.");
do(200);
wait(300ms);
if(%GUI% != "GUICHAT");
log(" ");
log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fChat fechado. Retomando.");
break;
endif;
loop;
endif;

if(%GUI% == "GUICHEST");
log(" ");
log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &6Janela &fdetectada. Fechando...");
do();
gui();
wait(500ms);
until(%GUI% == "NONE");
wait(1000ms);
echo(%&menu_loja_off%); if(dev); log("%&menu_loja_off%"); endif;
wait(2000ms);
if(%GUI% != "NONE");
do();
gui();
wait(500ms);
until(%GUI% == "NONE");
endif;
elseif(nao_vejo_placa);
unset(nao_vejo_placa);
do(4);
wait(500ms);
ifmatches(%HITID%,%&id_sign%);
key(attack);
break;
else;
echo(%&hide_players%); if(dev); log("%&hide_players%"); endif;
wait(1000ms);
ifmatches(%HITID%,%&id_sign%);
else;
wait(1000ms);
ifmatches(%HITID%,%&id_sign%);
else;
wait(1000ms);
ifmatches(%HITID%,%&id_sign%);
else;
wait(1000ms);
ifmatches(%HITID%,%&id_sign%);
else;
wait(1000ms);
ifmatches(%HITID%,%&id_sign
%);
else;
wait(1000ms);
ifmatches(%HITID%,
%&id_sign%);
 else;
wait(1000ms);
endif;
endif;
endif;
endif;
endif;
endif;
endif;
loop;
else;
unsafe(0);
unset(venda_finalizada);
gui(inventory);
if(%GUI% == "GUIINVENTORY");
getslot(%&item%,#slot_com_item);
gui();
if(#slot_com_item < 0);
inc(#conta_itens,%#conta_itens_temp%);
if(dev); log("Itens vendidos agora:
%#conta_itens_temp%"); log("Itens vendidos ate agora: %#conta_itens%"); endif;
unset(#conta_itens_temp);

if(compactar);
ifmatches(%&item%,"gold_ingot");
set(&item,"gold_nugget");
endif;
ifmatches(%&item%,"266");
set(&item,"371");
endif;
endif;
break;
endif;
endif;
endunsafe;
endif;
loop;
if(venda_finalizada);
unset(venda_finalizada);
endif;

// Retornar para a trap;

#x_temp = %XPOS%;
#y_temp = %YPOS%;
#z_temp = %ZPOS%;
do();
if(home_temporaria);
if(vender_ultima);
echo(%&home_baus%); if(dev); log("%&home_baus%"); endif;
else;
echo("/home %&home_temporaria%"); if(dev); log("%&home_temporaria
%"); endif;
endif;
else;
echo(%&home_baus%); if(dev); log("%&home_baus%"); endif;
endif;
do(55);
wait(100ms);
 if((%ZPOS% == %#z_trap%)&&(%YPOS% == %#y_trap%));
else;
wait(100ms);
endif;
if((%ZPOS% == %#z_trap%)&&(%YPOS% == %#y_trap%));
else;
wait(100ms);
endif;
if((%XPOS% != %#x_temp%)|(%ZPOS% != %#z_temp%)|(%YPOS% != %#y_temp%));
if((%ZPOS% == %#z_trap%)&&(%YPOS% == %#y_trap%));
wait(100ms);
unsafe;
if(dev); log("Teleporte para a trap
concluido."); endif;
break;
endunsafe;
else;
ifmatches(%CANFLY%,"False");
if(dev); log("Pulando para tentar desbugar..."); endif;
keydown(jump);
wait(1ms);
keyup(jump);
wait(1000ms);
endif;
endif;
else;
wait(200ms);
if(dev); log("Aguardando tp..."); endif;
endif;
loop;
if((%ZPOS% == %#z_trap%)&&(%YPOS% == %#y_trap%));
break;
else;
if(dev);
log("Nao consegui chegar na posicao exata da trap.");
log("Tentando dar /home novamente...");
endif;
endif;
loop;

if(vender_ultima);
#conta_packs = #conta_itens / 64;
log(" ");
log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &eVenda finalizada!");
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).");
unset(vender_ultima);
break;
endif;

loop;
//X POSITIVO = LESTE;
//X NEGATIVO = OESTE;
// Y POSITIVO = CIMA;
// Y NEGATIVO = BAIXO;
//Z POSITIVO = SUL;
//Z NEGATIVO = NORTE;
toggle(@vendedor_mexicano_v4);
log("&f&l[&2&lMA&f&lC&4&lRO&f&l] &fVendedor &2Mex&fic&4ano &cFinalizado&f.");
}$$