$${
ifmatches(%CHATCLEAN%,"^»Bem vindo de volta\. Por favor digite \/login senha\.$");
if(!one);set(one);#tp=1;&player[1]=%PLAYER%;endif;
set(addplayer);
for(#p,1,%#tp%);
ifmatches(%&player[%#p%]%,%PLAYER%);
@#idp=%#p%;
unset(addplayer);
break;
endif;
next;
if(addplayer);
inc(#tp);
&player[%#tp%]=%PLAYER%;
@#idp=%#tp%;
endif;
endif;
&login="^» Craftlandia (.*) \(www.craftlandia.com.br\)$";
match(%CHATCLEAN%,%&login%,{&a});
if(@reiniciar);
ifmatches(%CHATCLEAN%,"\[Server\] Servidor será reiniciado em \[2\] minutos\.");
log(&6[Macro]&b Servidor sendo reiniciado em 2 minutos);
set(@rs);
set(espe);
log(&6[Macro]&b Pausando Macro!!! Aguardando...);
do;gui();wait(1);until(%GUI%="NONE");
wait(60);
log(&6[Macro]&b Servidor sendo reiniciado em 1 minutos);
wait(49);
#time=10;
do(10);
log(&6[Macro]&b Servidor sendo reiniciado em &6%#time% &bsegundos);
wait(1);
dec(#time);
loop;
endif;
if(espe);
if((%&a%="Titan-1")|(%&a%="Titan-2")|(%&a%="Minecraft"));
log(&6[Macro]&b Aguardando 10 segundos....);
wait(10);
unset(espe);
log(&6[Macro]&b Termino da pausa!!!);
log(&6[Macro]&b Continuando Macro...);
unset(@rs);
set(@exit);
else;
ifmatches(%CHATCLEAN%,"^»Agora você está logado\. NUNCA (.*)");
unset(espe);
log(&6[Macro]&b Termino da pausa!!!);
log(&6[Macro]&b Continuando Macro...);
unset(@rs);
set(@exit);
endif;
endif;
endif;
endif;
if(@limpeza);
ifmatches(%CHATCLEAN%,"^\[Server\] » Limpando itens do chao em 5s$");
set(@lc);
log(&6[Macro]&b Servidor limpando o chão!!!);
log(&6[Macro]&b Pausando Macro!!! Aguardando...);
gui();
#time=5;
do(5);
if(%#time%!=1);
log(&6[Macro]&b Limpando em %#time% segundos);
else;
log(&6[Macro]&b Limpando em %#time% segundo);
endif;
dec(#time);
wait(1);
loop;
log(&6[Macro]&b Aguardando 3 segundos!!!);
wait(3);
log(&6[Macro]&b Termino da pausa!!!);
log(&6[Macro]&b Continuando Macro...);
unset(@lc);
set(@exit);
endif;
endif;
if(@livro);
&teso = "^\[Tesouro\] %PLAYER% encontrou um livro\: Tesouro Nível ([0-9]+)$";
ifmatches(%CHATCLEAN%,%&teso%);
inc(@#tesouro);
@&hora[%@#tesouro%] = %DATETIME%;
set(@pl);
endif;
else;
@#tesouro=0;
endif;
if(@rec);
&login = "^»Agora você está logado\. NUNCA (.*)";
ifmatches(%CHATCLEAN%,%&login%);
#i=100;
log(&6[Macro]&b Seu login foi efetuado!);
do;
clearchat;
log(&6[Macro]&b Ativando macro em %#i%);
log(&6[Macro]&b Para cancela pressione "ESC");
if(KEY_ESCAPE);
unset(@rec);
unset(at);
break;
else;
set(at);
endif;
if(#i=0);
break;
endif;
dec(#i);
loop;
if(at);
unset(at);
do;gui(macroplayback);wait(3);log(&6[Macro]&b Desativando macro! Aguarde...);exec(press.txt);wait(1);until(!@rec);
log(&6[Macro]&b Macro desativada!);
if(@pergunta);unset(@pergunta);set(@des);endif;
do;gui(macroplayback);wait(3);log(&6[Macro]&b Ativando macro! Aguarde...);exec(press.txt);wait(1);until(@rec);
log(&6[Macro]&b Macro reativada com sucesso!);
gui();
endif;
endif;
endif;
if(@pv);
ifmatches(%CHATCLEAN%,"^» Ei.. Você já está nesse mundo!$");
set(@home);
endif;
endif;
if(@mob);
ifmatches(%CHATCLEAN%,"^Voce recebeu 1 coin\(s\) por ter ajudado a acabar com o mal!$");
inc(@#mob);
log(sim);
endif;
else;
@#mob=0;
endif;
}$$