Todas as dicas para o Servidor Craftlandia.

quarta-feira, 21 de junho de 2017

MEU ONCHAT COMPLETO - 2017 V1





MEU ONCHAT COMPLETO, VERSÃO 2017:

As linhas em vermelho lá em baixo, vc não precisa usar, são meus labes para onjoin.

001 - NOVO:

$${
ifmatches(%CHATCLEAN%,"Bem vindo de volta.");
       ACHIEVEMENTGET(Logando em 1sg- Aguarde,diamond_helmet);

            wait(1);
if(%PLAYER%="nodes");
            }$$
            /login ZZZZZZ
            $${
            endif;

           wait(1ms);
if(%PLAYER%="nodinho");    
            }$$
            /login BBBBBBBBB
            $${
            endif;

           wait(1ms);
if(%PLAYER%="Linda4747");
            }$$
            /login ZZZBBBBB
            $${
            endif;

           wait(1ms);
if(%PLAYER%="nodesbr");
            }$$
            /login ZZZZZZCCC
            $${
            endif;

           wait(1ms);
if(%PLAYER%="DinamoCz");
            }$$
            /login CZZZZBBBB
            $${
            endif;

        wait(4);
        ACHIEVEMENTGET(Vc esta Logado- %PLAYER%,diamond_sword);
wait(1ms);
        playsound(mob.chicken.say);
wait(2ms);

        endif;
          //Chat_dos_Macros_devem_ficar_aqui//
        }$$




$${
ifmatches(%CHATCLEAN%,"Bem vindo de volta.NDS");
wait(3);
///=== tempo acima aguarda o autologin iniciar ==///
wait(4);
ACHIEVEMENTGET(Reiniciando Macro... ,stone);
wait(2);
unset(cav);
wait(2);
unset(@cav);
wait(1);
//        exec(cavacavaauto.txt);
//        exec(herbalismo.txt);
//        exec(cavands.txt);
wait(1ms);
endif;
}$$



$${
   //= PROTETOR DE 5 SEGUNDOS ==//
   if(@cav);
   ifmatches(%CHATCLEAN%,"Limpando itens do chao em 5s");
ACHIEVEMENTGET("Aguarde 5segundos",furnace);
         gui(inventory);
          wait(8);
     gui();
endif;
endif;
}$$



$${
IFMATCHES(%CHATCLEAN%,"Agora você está logado. NUNCA use a mesma senha do CraftLandia em outros servidores.");
wait(1800ms);

}$$
/stats
$${
wait(10ms);
endif;

ifmatches(%CHATCLEAN%,"Escavaçao: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Escavaçao: %#a%,([0-9]+) XP",#b,1);
setlabel(v1,&6Escavacao: &a%#a%.%#b%,v1);
ifmatches(%CHATCLEAN%,"Habilidade escavaçao aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Escavaçao: ([0-9]+) XP",#c,1);
setlabel(v1,&6Escavacao: &a%#c%,v1);
ifmatches(%CHATCLEAN%,"Habilidade escavaçã aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Pescador: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Pescador: %#a%,([0-9]+) XP",#b,1);
setlabel(v2,&6Pescador: &a%#a%.%#b%,v2);
ifmatches(%CHATCLEAN%,"Habilidade pescador aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Pescador: ([0-9]+) XP",#c,1);
setlabel(v2,&6Pescador: &a%#c%,v2);
ifmatches(%CHATCLEAN%,"Habilidade pescador aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Herbalismo: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Herbalismo: %#a%,([0-9]+) XP",#b,1);
setlabel(v3,&6Herbalismo: &a%#a%.%#b%,v3);
ifmatches(%CHATCLEAN%,"Habilidade herbalismo aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Herbalismo: ([0-9]+) XP",#c,1);
setlabel(v3,&6Herbalismo: &a%#c%,v3);
ifmatches(%CHATCLEAN%,"Habilidade herbalismo aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Mineraçã: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Mineraçã: %#a%,([0-9]+) XP",#b,1);
setlabel(v4,&6Mineraçã: &a%#a%.%#b%,v4);
ifmatches(%CHATCLEAN%,"Habilidade mineraçã aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Mineraçã: ([0-9]+) XP",#c,1);
setlabel(v4,&6Mineracao: &a%#c%,v4);
ifmatches(%CHATCLEAN%,"Habilidade mineraçã aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Lenhador: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Lenhador: %#a%,([0-9]+) XP",#b,1);
setlabel(v5,&6Lenhador: &a%#a%.%#b%,v5);
ifmatches(%CHATCLEAN%,"Habilidade lenhador aumentada em 1.");
#b = %#b%+1
endif
endif;
endif;

ifmatches(%CHATCLEAN%,"Lenhador: ([0-9]+) XP",#c,1);
setlabel(v5,&6Lenhador: &a%#c%,v5);
ifmatches(%CHATCLEAN%,"Habilidade lenhador aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Arqueiro: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Arqueiro: %#a%,([0-9]+) XP",#b,1);
setlabel(v6,&6Arqueiro: &a%#a%.%#b%,v6);
ifmatches(%CHATCLEAN%,"Habilidade arqueiro aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Arqueiro: ([0-9]+) XP",#c,1);
setlabel(v6,&6Arqueiro: &a%#c%,v6);
ifmatches(%CHATCLEAN%,"Habilidade arqueiro aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Espadas: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Espadas: %#a%,([0-9]+) XP",#b,1);
setlabel(v7,&6Espadas: &a%#a%.%#b%,v7);
ifmatches(%CHATCLEAN%,"Habilidade espadas aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Espadas: ([0-9]+) XP",#c,1);
setlabel(v7,&6Espadas: &a%#c%,v7);
ifmatches(%CHATCLEAN%,"Habilidade espadas aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Domar: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Domar: %#a%,([0-9]+) XP",#b,1);
setlabel(v8,&6Domar: &a%#a%.%#b%,v8);
ifmatches(%CHATCLEAN%,"Habilidade domar aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Domar: ([0-9]+) XP",#c,1);
setlabel(v8,&6Domar: &a%#c%,v8);
ifmatches(%CHATCLEAN%,"Habilidade domar aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Acrobacia: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Acrobacia: %#a%,([0-9]+) XP",#b,1);
setlabel(v9,&6Acrobacia: &a%#a%.%#b%,v9);
ifmatches(%CHATCLEAN%,"Habilidade acrobacia aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Acrobacia: ([0-9]+) XP",#c,1);
setlabel(v9,&6Acrobacia: &a%#c%,v9);
ifmatches(%CHATCLEAN%,"Habilidade acrobacia aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Reparaçã: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Reparaçã: %#a%,([0-9]+) XP",#b,1);
setlabel(v10,&6Reparaçã: &a%#a%.%#b%,v10);
ifmatches(%CHATCLEAN%,"Habilidade reparaçã aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Reparaçã: ([0-9]+) XP",#c,1);
setlabel(v10,&6Reparacao: &a%#c%,v10);
ifmatches(%CHATCLEAN%,"Habilidade reparaçã aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Desarmado: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Desarmado: %#a%,([0-9]+) XP",#b,1);
setlabel(v11,&6Desarmado: &a%#a%.%#b%,v11);
ifmatches(%CHATCLEAN%,"Habilidade desarmado aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;
ifmatches(%CHATCLEAN%,"Desarmado: ([0-9]+) XP",#c,1);
setlabel(v11,&6Desarmado: &a%#c%,v11);
ifmatches(%CHATCLEAN%,"Habilidade desarmado aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Machado: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Machado: %#a%,([0-9]+) XP",#b,1);
setlabel(v11,&6Machado: &a%#a%.%#b%,v11);
ifmatches(%CHATCLEAN%,"Habilidade machado aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Machado: ([0-9]+) XP",#c,1);
setlabel(v12,&6Machado: &a%#c%,v12);
ifmatches(%CHATCLEAN%,"Habilidade machado aumentada em 1.");
#c = %#c%+1
endif;
endif;
}$$




$${
&rgxsaldo="^(\[l\] [\S]+%PLAYER%\: reset saldo)$";ifmatches(%CHATCLEAN%,%&rgxsaldo%);set(filt);#saldo=0;&saldo=0;log(&d» &6Saldo Resetado!);endif;
&rgxmob="^(\[l\] [\S]+%PLAYER%\: reset mob)$";ifmatches(%CHATCLEAN%,%&rgxmob%);set(filt);#mobs=0;log(&d» &6Mobs Resetado!);endif;
&rgxplayer="^(\[l\] [\S]+%PLAYER%\: reset kills)$";ifmatches(%CHATCLEAN%,%&rgxplayer%);set(filt);#morreu=0;#matou=0;log(&d» &6Mortes Resetadas!);endif;
ifmatches(%CHATCLEAN%,[\»]Agora você está logado\. NUNCA);wait(1);#acbiel = 0;
#pbiel = 0;
#abiel = 0;
#pebiel = 0;
}$$|/money|$${wait(1);}$$|/stats|$${endif;

ifmatches(%CHATCLEAN%,\>(.+) comprou .+,&rum,1);set(filt);ifmatches(%&rum%,Voce);&plt=-;else;&plt=+;endif;
        &rgx1ad="\>.+ comprou .+ por ([0-9]+)\,([0-9]+)\,([0-9]+)\.([0-9]+) Coins";ifmatches(%CHATCLEAN%,%&rgx1ad%);MATCH(%CHATCLEAN%,%&rgx1ad%,{&aatd,&bbtd,&cctd});MATCH(%&aatd%%&bbtd%%&cctd%,([0-9]+),{#d});endif;
                &rgx2ad="\>.+ comprou .+ por ([0-9]+)\,([0-9]+)\.([0-9]+) Coins";ifmatches(%CHATCLEAN%,%&rgx2ad%);MATCH(%CHATCLEAN%,%&rgx2ad%,{&bbsd,&ccsd});MATCH(%&bbsd%%&ccsd%,([0-9]+),{#d});endif;
                        &rgx3ad="\>.+ comprou .+ por ([0-9]+)\.([0-9]+) Coins";ifmatches(%CHATCLEAN%,%&rgx3ad%);MATCH(%CHATCLEAN%,%&rgx3ad%,{&ccod});MATCH(%&ccod%,([0-9]+),{#d});endif;
                            ifmatches(%&plt%,\+);#saldo=%#saldo%+%#d%;@#t=%@#t%-%#d%;endif;ifmatches(%&plt%,\-);@#t=%@#t%+%#d%;#saldo=%#saldo%-%#d%;endif;
endif;

ifmatches(%CHATCLEAN%,\>(.+) vendeu .+,&rum,1);set(filt);ifmatches(%&rum%,Voce);&plt=+;else;&plt=-;endif;
        &rgx1ac="\>.+ vendeu .+ por ([0-9]+)\,([0-9]+)\,([0-9]+)\.([0-9]+) Coins";ifmatches(%CHATCLEAN%,%&rgx1ac%);MATCH(%CHATCLEAN%,%&rgx1ac%,{&aatc,&bbtc,&cctc});MATCH(%&aatc%%&bbtc%%&cctc%,([0-9]+),{#g});endif;
                &rgx2ac="\>.+ vendeu .+ por ([0-9]+)\,([0-9]+)\.([0-9]+) Coins";ifmatches(%CHATCLEAN%,%&rgx2ac%);MATCH(%CHATCLEAN%,%&rgx2ac%,{&bbsc,&ccsc});MATCH(%&bbsc%%&ccsc%,([0-9]+),{#g});endif;
                        &rgx3ac="\>.+ vendeu .+ por ([0-9]+)\.([0-9]+) Coins";ifmatches(%CHATCLEAN%,%&rgx3ac%);MATCH(%CHATCLEAN%,%&rgx3ac%,{&ccac});MATCH(%&ccac%,([0-9]+),{#g});endif;
                            ifmatches(%&plt%,\+);#saldo=%#saldo%+%#g%;@#t=%@#t%+%#g%;;endif;ifmatches(%&plt%,\-);@#t=%@#t%-%#g%;#saldo=%#saldo%-%#g%;endif;
endif;

ifmatches(%CHATCLEAN%,^\[Money\] ([\S]+).+[\.]$,&rum,1);set(filt);ifmatches(%&rum%,Voce);&plt=-;else;&plt=+;endif;
                &rgx1act="\[Money\] .+ ([0-9]+)\,([0-9]+)\,([0-9]+)\.([0-9]+) Coins.+";ifmatches(%CHATCLEAN%,%&rgx1act%);MATCH(%CHATCLEAN%,%&rgx1act%,{&aatct,&bbtct,&cctct});MATCH(%&aatct%%&bbtct%%&cctct%,([0-9]+),{#p});endif;
                        &rgx2act="\[Money\] .+ ([0-9]+)\,([0-9]+)\.([0-9]+) Coins.+";ifmatches(%CHATCLEAN%,%&rgx2act%);MATCH(%CHATCLEAN%,%&rgx2act%,{&bbsct,&ccsct});MATCH(%&bbsct%%&ccsct%,([0-9]+),{#p});endif;
                                &rgx3act="\[Money\] .+ ([0-9]+)\.([0-9]+) Coins.+";ifmatches(%CHATCLEAN%,%&rgx3act%);MATCH(%CHATCLEAN%,%&rgx3act%,{&ccact});MATCH(%&ccact%,([0-9]+),{#p});endif;
                                    ifmatches(%&plt%,\+);#saldo=%#saldo%+%#p%;@#t=%@#t%+%#p%;endif;ifmatches(%&plt%,\-);#saldo=%#saldo%-%#p%;@#t=%@#t%-%#p%;endif;
endif;

&rgxmob="^Voce recebeu ([\S]+) Coin por ter ajudado a acabar com o mal $";ifmatches(%CHATCLEAN%,%&rgxmob%,#mob,1);@#t=%@#t%+%#mob%;#saldo=%#saldo%+%#mob%;#mobs=%#mobs%+1;set(filt);endif;
&rgxpl1="^\[CraftLandia\] Você matou\:.+";ifmatches(%CHATCLEAN%,%&rgxpl1%);#matou=%#matou%+1;set(filt);;endif;
&rgxpl2="^\[CraftLandia\] Você foi morto por:.+";ifmatches(%CHATCLEAN%,%&rgxpl2%);#morreu=%#morreu%+1;set(filt);endif;

&rgx1b="\[Money\] Balanco\: ([0-9]+)\,([0-9]+)\,([0-9]+)\.([0-9]+) Coins";ifmatches(%CHATCLEAN%,%&rgx1b%);MATCH(%CHATCLEAN%,%&rgx1b%,{&a,&b,&c});MATCH(%&a%%&b%%&c%,([0-9]+),{@#t});set(filt);endif;
&rgx2b="\[Money\] Balanco\: ([0-9]+)\,([0-9]+)\.([0-9]+) Coins";ifmatches(%CHATCLEAN%,%&rgx2b%);MATCH(%CHATCLEAN%,%&rgx2b%,{&b,&c});MATCH(%&b%%&c%,([0-9]+),{@#t});set(filt);endif;
&rgx3b="\[Money\] Balanco\: ([0-9]+)\.([0-9]+) Coins";ifmatches(%CHATCLEAN%,%&rgx3b%);MATCH(%CHATCLEAN%,%&rgx3b%,{&c});MATCH(%&c%,([0-9]+),{@#t});set(filt);endif;


if(filt);unset(filt);
if(%@#t%>9999999);&rrgx="([1-9]{1}[0-9]{1})([0-9]{3})([0-9]{3})";MATCH(%@#t%,%&rrgx%,{&ra,&rb,&rc});&t=%&ra%.%&rb%.%&rc%;else;
if(%@#t%>999999);&rrgx="([1-9]{1})([0-9]{3})([0-9]{3})";MATCH(%@#t%,%&rrgx%,{&ra,&rb,&rc});&t=%&ra%.%&rb%.%&rc%;else;
if(%@#t%>99999);&rrgx="([1-9]{1}[0-9]{2})([0-9]{3})";MATCH(%@#t%,%&rrgx%,{&rb,&rc});&t=%&rb%.%&rc%;else;
if(%@#t%>9999);&rrgx="([1-9]{1}[0-9]{1})([0-9]{3})";MATCH(%@#t%,%&rrgx%,{&rb,&rc});&t=%&rb%.%&rc%;else;
if(%@#t%>999);&rrgx="([1-9]{1})([0-9]{3})";MATCH(%@#t%,%&rrgx%,{&rb,&rc});&t=%&rb%.%&rc%;else;
if(%@#t%<=999);&rrgx="([0-9]{1,3})";MATCH(%@#t%,%&rrgx%,{&rc});&t=%&rc%;endif;endif;endif;endif;endif;endif;
if((%#saldo%>9999999)||(%#saldo%<-9999999));&arrgx="([\-]?[1-9]{1}[0-9]{1})([0-9]{3})([0-9]{3})";MATCH(%#saldo%,%&arrgx%,{&ara,&arb,&arc});&saldo=%&ara%.%&arb%.%&arc%;else;
if((%#saldo%>999999)||(%#saldo%<-999999));&arrgx="([\-]?[1-9]{1})([0-9]{3})([0-9]{3})";MATCH(%#saldo%,%&arrgx%,{&ara,&arb,&arc});&saldo=%&ara%.%&arb%.%&arc%;else;
if((%#saldo%>99999)||(%#saldo%<-99999));&arrgx="([\-]?[1-9]{1}[0-9]{2})([0-9]{3})";MATCH(%#saldo%,%&arrgx%,{&arb,&arc});&saldo=%&arb%.%&arc%;else;
if((%#saldo%>9999)||(%#saldo%<-9999));&arrgx="([\-]?[1-9]{1}[0-9]{1})([0-9]{3})";MATCH(%#saldo%,%&arrgx%,{&arb,&arc});&saldo=%&arb%.%&arc%;else;
if((%#saldo%>999)||(%#saldo%<-999));&arrgx="([\-]?[1-9]{1})([0-9]{3})";MATCH(%#saldo%,%&arrgx%,{&arb,&arc});&saldo=%&arb%.%&arc%;else;
if((%#saldo%<=999)||(%#saldo%>=-999));&arrgx="([\-]?[0-9]{1,3})";MATCH(%#saldo%,%&arrgx%,{&arc});&saldo=%&arc%;endif;endif;endif;endif;endif;endif;
if(%#saldo%<0);&sgy=;&saldohm="&c :(";else;&sgy=+;&saldohm="&c :)";endif;if(%#saldo%=0);&sgy=;&saldohm="&c '-'";endif;
setlabel(DD1,&6Dinheiro: &3%&t%,DD1);
setlabel(DD2,"&6Saldo: &3%&sgy%%&saldo%%&saldohm%",DD2);
setlabel(DD4,&6Mobs mortos: &3%#mobs%,DD4);
endif;
}$$



$${
if(@tellrecorder); 
       ifmatches(%CHATCLEAN%,"^\(Mensagem de (.+)\): .*$",&pname,1,none);
        match(%CHATCLEAN%,"^\(Mensagem de .+\): (.*)$",&message,1,none);

        wait(1ms);
        time(&date,"dd/MM/yyyy HH:mm:ss");
        logto("tells.txt","[%&date%] %&pname%: %&message%");

        log(&6 ATENCAO = AVISO: &aMensagem recebida e arquivada.);
        ACHIEVEMENTGET(MESANGEM ARQUIVADA,furnace);
          wait(1);
     playsound(mob.bat.death);

       wait(1);
        }$$
         /r Desculpe-me, mas no momento estou AFK, upando.
          $${
           wait(15);
loop();
endIf;
endIf;
}$$





002 - ANTIGO:

$${
ifmatches(%CHATCLEAN%,"Bem vindo de volta.");
ACHIEVEMENTGET(Logando em 1sg- Aguarde,diamond_helmet);
wait(1);
       }$$
       /login SUASENHAAQUI
       $${
wait(2);
        ACHIEVEMENTGET(Vc esta Logado- %PLAYER%,diamond_sword);
playsound(mob.chicken.say);

wait(1ms);
endif;
}$$


$${
ifmatches(%CHATCLEAN%,"Bem vindo de volta.");

wait(3);
///=== tempo acima aguarda o autologin iniciar ==///

wait(4);
        ACHIEVEMENTGET(Reiniciando Macro... ,stone);
wait(2);
        unset(cav);
wait(2);
        unset(@cav);
wait(1);

//        exec(cavacavaauto.txt);
//        exec(herbalismo.txt);

wait(1ms);
endif;
}$$



$${
   if(@cav);
   ifmatches(%CHATCLEAN%,"Limpando itens do chao em 5s");
ACHIEVEMENTGET("Aguarde 5segundos",furnace);
         gui(inventory);
          wait(8);
     gui();
endif;
endif;
}$$



$${
IFMATCHES(%CHATCLEAN%,"Agora você está logado. NUNCA use a mesma senha do CraftLandia em outros servidores.");
wait(1800ms);

}$$
/stats
$${
wait(10ms);
endif;

ifmatches(%CHATCLEAN%,"Escavaçao: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Escavaçao: %#a%,([0-9]+) XP",#b,1);
setlabel(v1,&6Escavacao: &a%#a%.%#b%,v1);
ifmatches(%CHATCLEAN%,"Habilidade escavaçao aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Escavaçao: ([0-9]+) XP",#c,1);
setlabel(v1,&6Escavacao: &a%#c%,v1);
ifmatches(%CHATCLEAN%,"Habilidade escavaçã aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Pescador: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Pescador: %#a%,([0-9]+) XP",#b,1);
setlabel(v2,&6Pescador: &a%#a%.%#b%,v2);
ifmatches(%CHATCLEAN%,"Habilidade pescador aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Pescador: ([0-9]+) XP",#c,1);
setlabel(v2,&6Pescador: &a%#c%,v2);
ifmatches(%CHATCLEAN%,"Habilidade pescador aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Herbalismo: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Herbalismo: %#a%,([0-9]+) XP",#b,1);
setlabel(v3,&6Herbalismo: &a%#a%.%#b%,v3);
ifmatches(%CHATCLEAN%,"Habilidade herbalismo aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Herbalismo: ([0-9]+) XP",#c,1);
setlabel(v3,&6Herbalismo: &a%#c%,v3);
ifmatches(%CHATCLEAN%,"Habilidade herbalismo aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Mineraçã: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Mineraçã: %#a%,([0-9]+) XP",#b,1);
setlabel(v4,&6Mineraçã: &a%#a%.%#b%,v4);
ifmatches(%CHATCLEAN%,"Habilidade mineraçã aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Mineraçã: ([0-9]+) XP",#c,1);
setlabel(v4,&6Mineracao: &a%#c%,v4);
ifmatches(%CHATCLEAN%,"Habilidade mineraçã aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Lenhador: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Lenhador: %#a%,([0-9]+) XP",#b,1);
setlabel(v5,&6Lenhador: &a%#a%.%#b%,v5);
ifmatches(%CHATCLEAN%,"Habilidade lenhador aumentada em 1.");
#b = %#b%+1
endif
endif;
endif;

ifmatches(%CHATCLEAN%,"Lenhador: ([0-9]+) XP",#c,1);
setlabel(v5,&6Lenhador: &a%#c%,v5);
ifmatches(%CHATCLEAN%,"Habilidade lenhador aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Arqueiro: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Arqueiro: %#a%,([0-9]+) XP",#b,1);
setlabel(v6,&6Arqueiro: &a%#a%.%#b%,v6);
ifmatches(%CHATCLEAN%,"Habilidade arqueiro aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Arqueiro: ([0-9]+) XP",#c,1);
setlabel(v6,&6Arqueiro: &a%#c%,v6);
ifmatches(%CHATCLEAN%,"Habilidade arqueiro aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Espadas: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Espadas: %#a%,([0-9]+) XP",#b,1);
setlabel(v7,&6Espadas: &a%#a%.%#b%,v7);
ifmatches(%CHATCLEAN%,"Habilidade espadas aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Espadas: ([0-9]+) XP",#c,1);
setlabel(v7,&6Espadas: &a%#c%,v7);
ifmatches(%CHATCLEAN%,"Habilidade espadas aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Domar: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Domar: %#a%,([0-9]+) XP",#b,1);
setlabel(v8,&6Domar: &a%#a%.%#b%,v8);
ifmatches(%CHATCLEAN%,"Habilidade domar aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Domar: ([0-9]+) XP",#c,1);
setlabel(v8,&6Domar: &a%#c%,v8);
ifmatches(%CHATCLEAN%,"Habilidade domar aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Acrobacia: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Acrobacia: %#a%,([0-9]+) XP",#b,1);
setlabel(v9,&6Acrobacia: &a%#a%.%#b%,v9);
ifmatches(%CHATCLEAN%,"Habilidade acrobacia aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Acrobacia: ([0-9]+) XP",#c,1);
setlabel(v9,&6Acrobacia: &a%#c%,v9);
ifmatches(%CHATCLEAN%,"Habilidade acrobacia aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Reparaçã: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Reparaçã: %#a%,([0-9]+) XP",#b,1);
setlabel(v10,&6Reparaçã: &a%#a%.%#b%,v10);
ifmatches(%CHATCLEAN%,"Habilidade reparaçã aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Reparaçã: ([0-9]+) XP",#c,1);
setlabel(v10,&6Reparacao: &a%#c%,v10);
ifmatches(%CHATCLEAN%,"Habilidade reparaçã aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Desarmado: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Desarmado: %#a%,([0-9]+) XP",#b,1);
setlabel(v11,&6Desarmado: &a%#a%.%#b%,v11);
ifmatches(%CHATCLEAN%,"Habilidade desarmado aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;
ifmatches(%CHATCLEAN%,"Desarmado: ([0-9]+) XP",#c,1);
setlabel(v11,&6Desarmado: &a%#c%,v11);
ifmatches(%CHATCLEAN%,"Habilidade desarmado aumentada em 1.");
#c = %#c%+1
endif;
endif;

ifmatches(%CHATCLEAN%,"Machado: ([0-9]+),",#a,1);
ifmatches(%CHATCLEAN%,"Machado: %#a%,([0-9]+) XP",#b,1);
setlabel(v11,&6Machado: &a%#a%.%#b%,v11);
ifmatches(%CHATCLEAN%,"Habilidade machado aumentada em 1.");
#b = %#b%+1
endif;
endif;
endif;

ifmatches(%CHATCLEAN%,"Machado: ([0-9]+) XP",#c,1);
setlabel(v12,&6Machado: &a%#c%,v12);
ifmatches(%CHATCLEAN%,"Habilidade machado aumentada em 1.");
#c = %#c%+1
endif;
endif;
}$$




$${
&rgxsaldo="^(\[l\] [\S]+%PLAYER%\: reset saldo)$";ifmatches(%CHATCLEAN%,%&rgxsaldo%);set(filt);#saldo=0;&saldo=0;log(&d» &6Saldo Resetado!);endif;
&rgxmob="^(\[l\] [\S]+%PLAYER%\: reset mob)$";ifmatches(%CHATCLEAN%,%&rgxmob%);set(filt);#mobs=0;log(&d» &6Mobs Resetado!);endif;
&rgxplayer="^(\[l\] [\S]+%PLAYER%\: reset kills)$";ifmatches(%CHATCLEAN%,%&rgxplayer%);set(filt);#morreu=0;#matou=0;log(&d» &6Mortes Resetadas!);endif;
ifmatches(%CHATCLEAN%,[\»]Agora você está logado\. NUNCA);wait(1);#acbiel = 0;
#pbiel = 0;
#abiel = 0;
#pebiel = 0;
}$$|/money|$${wait(1);}$$|/stats|$${endif;

ifmatches(%CHATCLEAN%,\>(.+) comprou .+,&rum,1);set(filt);ifmatches(%&rum%,Voce);&plt=-;else;&plt=+;endif;
        &rgx1ad="\>.+ comprou .+ por ([0-9]+)\,([0-9]+)\,([0-9]+)\.([0-9]+) Coins";ifmatches(%CHATCLEAN%,%&rgx1ad%);MATCH(%CHATCLEAN%,%&rgx1ad%,{&aatd,&bbtd,&cctd});MATCH(%&aatd%%&bbtd%%&cctd%,([0-9]+),{#d});endif;
                &rgx2ad="\>.+ comprou .+ por ([0-9]+)\,([0-9]+)\.([0-9]+) Coins";ifmatches(%CHATCLEAN%,%&rgx2ad%);MATCH(%CHATCLEAN%,%&rgx2ad%,{&bbsd,&ccsd});MATCH(%&bbsd%%&ccsd%,([0-9]+),{#d});endif;
                        &rgx3ad="\>.+ comprou .+ por ([0-9]+)\.([0-9]+) Coins";ifmatches(%CHATCLEAN%,%&rgx3ad%);MATCH(%CHATCLEAN%,%&rgx3ad%,{&ccod});MATCH(%&ccod%,([0-9]+),{#d});endif;
                            ifmatches(%&plt%,\+);#saldo=%#saldo%+%#d%;@#t=%@#t%-%#d%;endif;ifmatches(%&plt%,\-);@#t=%@#t%+%#d%;#saldo=%#saldo%-%#d%;endif;
endif;

ifmatches(%CHATCLEAN%,\>(.+) vendeu .+,&rum,1);set(filt);ifmatches(%&rum%,Voce);&plt=+;else;&plt=-;endif;
        &rgx1ac="\>.+ vendeu .+ por ([0-9]+)\,([0-9]+)\,([0-9]+)\.([0-9]+) Coins";ifmatches(%CHATCLEAN%,%&rgx1ac%);MATCH(%CHATCLEAN%,%&rgx1ac%,{&aatc,&bbtc,&cctc});MATCH(%&aatc%%&bbtc%%&cctc%,([0-9]+),{#g});endif;
                &rgx2ac="\>.+ vendeu .+ por ([0-9]+)\,([0-9]+)\.([0-9]+) Coins";ifmatches(%CHATCLEAN%,%&rgx2ac%);MATCH(%CHATCLEAN%,%&rgx2ac%,{&bbsc,&ccsc});MATCH(%&bbsc%%&ccsc%,([0-9]+),{#g});endif;
                        &rgx3ac="\>.+ vendeu .+ por ([0-9]+)\.([0-9]+) Coins";ifmatches(%CHATCLEAN%,%&rgx3ac%);MATCH(%CHATCLEAN%,%&rgx3ac%,{&ccac});MATCH(%&ccac%,([0-9]+),{#g});endif;
                            ifmatches(%&plt%,\+);#saldo=%#saldo%+%#g%;@#t=%@#t%+%#g%;;endif;ifmatches(%&plt%,\-);@#t=%@#t%-%#g%;#saldo=%#saldo%-%#g%;endif;
endif;

ifmatches(%CHATCLEAN%,^\[Money\] ([\S]+).+[\.]$,&rum,1);set(filt);ifmatches(%&rum%,Voce);&plt=-;else;&plt=+;endif;
                &rgx1act="\[Money\] .+ ([0-9]+)\,([0-9]+)\,([0-9]+)\.([0-9]+) Coins.+";ifmatches(%CHATCLEAN%,%&rgx1act%);MATCH(%CHATCLEAN%,%&rgx1act%,{&aatct,&bbtct,&cctct});MATCH(%&aatct%%&bbtct%%&cctct%,([0-9]+),{#p});endif;
                        &rgx2act="\[Money\] .+ ([0-9]+)\,([0-9]+)\.([0-9]+) Coins.+";ifmatches(%CHATCLEAN%,%&rgx2act%);MATCH(%CHATCLEAN%,%&rgx2act%,{&bbsct,&ccsct});MATCH(%&bbsct%%&ccsct%,([0-9]+),{#p});endif;
                                &rgx3act="\[Money\] .+ ([0-9]+)\.([0-9]+) Coins.+";ifmatches(%CHATCLEAN%,%&rgx3act%);MATCH(%CHATCLEAN%,%&rgx3act%,{&ccact});MATCH(%&ccact%,([0-9]+),{#p});endif;
                                    ifmatches(%&plt%,\+);#saldo=%#saldo%+%#p%;@#t=%@#t%+%#p%;endif;ifmatches(%&plt%,\-);#saldo=%#saldo%-%#p%;@#t=%@#t%-%#p%;endif;
endif;

&rgxmob="^Voce recebeu ([\S]+) Coin por ter ajudado a acabar com o mal $";ifmatches(%CHATCLEAN%,%&rgxmob%,#mob,1);@#t=%@#t%+%#mob%;#saldo=%#saldo%+%#mob%;#mobs=%#mobs%+1;set(filt);endif;
&rgxpl1="^\[CraftLandia\] Você matou\:.+";ifmatches(%CHATCLEAN%,%&rgxpl1%);#matou=%#matou%+1;set(filt);;endif;
&rgxpl2="^\[CraftLandia\] Você foi morto por:.+";ifmatches(%CHATCLEAN%,%&rgxpl2%);#morreu=%#morreu%+1;set(filt);endif;

&rgx1b="\[Money\] Balanco\: ([0-9]+)\,([0-9]+)\,([0-9]+)\.([0-9]+) Coins";ifmatches(%CHATCLEAN%,%&rgx1b%);MATCH(%CHATCLEAN%,%&rgx1b%,{&a,&b,&c});MATCH(%&a%%&b%%&c%,([0-9]+),{@#t});set(filt);endif;
&rgx2b="\[Money\] Balanco\: ([0-9]+)\,([0-9]+)\.([0-9]+) Coins";ifmatches(%CHATCLEAN%,%&rgx2b%);MATCH(%CHATCLEAN%,%&rgx2b%,{&b,&c});MATCH(%&b%%&c%,([0-9]+),{@#t});set(filt);endif;
&rgx3b="\[Money\] Balanco\: ([0-9]+)\.([0-9]+) Coins";ifmatches(%CHATCLEAN%,%&rgx3b%);MATCH(%CHATCLEAN%,%&rgx3b%,{&c});MATCH(%&c%,([0-9]+),{@#t});set(filt);endif;


if(filt);unset(filt);
if(%@#t%>9999999);&rrgx="([1-9]{1}[0-9]{1})([0-9]{3})([0-9]{3})";MATCH(%@#t%,%&rrgx%,{&ra,&rb,&rc});&t=%&ra%.%&rb%.%&rc%;else;
if(%@#t%>999999);&rrgx="([1-9]{1})([0-9]{3})([0-9]{3})";MATCH(%@#t%,%&rrgx%,{&ra,&rb,&rc});&t=%&ra%.%&rb%.%&rc%;else;
if(%@#t%>99999);&rrgx="([1-9]{1}[0-9]{2})([0-9]{3})";MATCH(%@#t%,%&rrgx%,{&rb,&rc});&t=%&rb%.%&rc%;else;
if(%@#t%>9999);&rrgx="([1-9]{1}[0-9]{1})([0-9]{3})";MATCH(%@#t%,%&rrgx%,{&rb,&rc});&t=%&rb%.%&rc%;else;
if(%@#t%>999);&rrgx="([1-9]{1})([0-9]{3})";MATCH(%@#t%,%&rrgx%,{&rb,&rc});&t=%&rb%.%&rc%;else;
if(%@#t%<=999);&rrgx="([0-9]{1,3})";MATCH(%@#t%,%&rrgx%,{&rc});&t=%&rc%;endif;endif;endif;endif;endif;endif;
if((%#saldo%>9999999)||(%#saldo%<-9999999));&arrgx="([\-]?[1-9]{1}[0-9]{1})([0-9]{3})([0-9]{3})";MATCH(%#saldo%,%&arrgx%,{&ara,&arb,&arc});&saldo=%&ara%.%&arb%.%&arc%;else;
if((%#saldo%>999999)||(%#saldo%<-999999));&arrgx="([\-]?[1-9]{1})([0-9]{3})([0-9]{3})";MATCH(%#saldo%,%&arrgx%,{&ara,&arb,&arc});&saldo=%&ara%.%&arb%.%&arc%;else;
if((%#saldo%>99999)||(%#saldo%<-99999));&arrgx="([\-]?[1-9]{1}[0-9]{2})([0-9]{3})";MATCH(%#saldo%,%&arrgx%,{&arb,&arc});&saldo=%&arb%.%&arc%;else;
if((%#saldo%>9999)||(%#saldo%<-9999));&arrgx="([\-]?[1-9]{1}[0-9]{1})([0-9]{3})";MATCH(%#saldo%,%&arrgx%,{&arb,&arc});&saldo=%&arb%.%&arc%;else;
if((%#saldo%>999)||(%#saldo%<-999));&arrgx="([\-]?[1-9]{1})([0-9]{3})";MATCH(%#saldo%,%&arrgx%,{&arb,&arc});&saldo=%&arb%.%&arc%;else;
if((%#saldo%<=999)||(%#saldo%>=-999));&arrgx="([\-]?[0-9]{1,3})";MATCH(%#saldo%,%&arrgx%,{&arc});&saldo=%&arc%;endif;endif;endif;endif;endif;endif;
if(%#saldo%<0);&sgy=;&saldohm="&c :(";else;&sgy=+;&saldohm="&c :)";endif;if(%#saldo%=0);&sgy=;&saldohm="&c '-'";endif;
setlabel(DD1,&6Dinheiro: &3%&t%,DD1);
setlabel(DD2,"&6Saldo: &3%&sgy%%&saldo%%&saldohm%",DD2);
setlabel(DD4,&6Mobs mortos: &3%#mobs%,DD4);
endif;
}$$






$${
if(@tellrecorder); 
       ifmatches(%CHATCLEAN%,"^\(Mensagem de (.+)\): .*$",&pname,1,none);
        match(%CHATCLEAN%,"^\(Mensagem de .+\): (.*)$",&message,1,none);

        wait(1ms);
        time(&date,"dd/MM/yyyy HH:mm:ss");
        logto("tells.txt","[%&date%] %&pname%: %&message%");

        log(&6 ATENCAO = AVISO: &aMensagem recebida e arquivada.);
        ACHIEVEMENTGET(MESANGEM ARQUIVADA,furnace);
          wait(1);
     playsound(mob.bat.death);

       wait(1);
        }$$
         /r Desculpe-me, mas no momento estou AFK, upando.
          $${
           wait(15);
endIf;
endIf;
}$$




Compartilhar Google+
←  Anterior Proxima  → Página inicial