ENTREGUE [MACRO] Calendário Inteligente

Bem-vindo!

Ao se registrar conosco, você poderá discutir, compartilhar e enviar mensagens privadas com outros membros da nossa comunidade.

Inscreva-se agora!
Status
Não está aberto para novas respostas.

Xylic

Excelente
VIP
Entrou
Set 23, 2015
Mensagens
455
Cubos
0
Macro automática de calendário.

- Versão Onchat: Marca presença ao receber a mensagem do servidor dizendo que você ainda não marcou presença.
*Onchat aguarda 10 segundos após logar para não dar spam.
- Versão Tecla: Marca presença ao apertar a tecla


- Vai direto na lã certa (conta as lãs de acordo com o dia).
- Funciona tanto em 1.5.2 quanto em 1.8+
- Após marcar no dia a macro não tentará marcar novamente no mesmo dia.


- Se quiser pode editar a macro como quiser, se for distribuir (via Youtube ou fórum) dar os créditos.

Versão Onchat:
https://justpaste.it/calendario1
ou
Código:
$${

ifmatches(%CHATCLEAN%,"Você ainda não marcou presença!");
    wait(10);
    do(1);
        wait(1);
        time(&date,"dd/MM/yyyy");
        match(%&date%,"(.+)/(.+)/(.+)",{#diahj,#meshj,#anohj});
        log("&5&lHoje é o %#diahj%º dia do mês");
        #diahj2=%#diahj%-1;

        if(%#calendario%=%#diahj%);
            @#calendario=%#calendario%;
            log("&9Já marquei meu calendario hoje");
            stop;
        else;
            if(#calendario="");
                log("&9Não marquei calendario hoje ainda, ultimo dia: &bNunca");
            else;
                log("&9Não marquei calendario hoje ainda, ultimo dia: &b%#calendario%");
            endif;
  
            echo("/calendario");

            do();
                wait(200ms);
            until(%GUI%="GUICHEST");
            wait(500ms);

            #quantidadela=0;
            for(#invsl,0,44);
  
            ifcontains(%SERVER%,"propano");
                getslotitem(%#invsl%,&item);
  
                ifmatches(%&item%,"wool");

                    if(%#quantidadela%=%#diahj2%);
                        slotclick(%#invsl%);
                        echo("/g &5[Macro] Marcando calendario do dia: &4%#diahj% &5#&cXylic");
                        #calendario=%#diahj%;
                        @#calendario=%#calendario%;
                        stop;
                    else;
                        #quantidadela=#quantidadela+1;
                    endif;
                endif;
  
            else;
                getslotitem(%#invsl%,#item);
  
                ifmatches(%#item%,"35");

                    if(%#quantidadela%=%#diahj2%);
                        slotclick(%#invsl%);
                        echo("/g &5[Macro] Marcando calendario do dia: &4%#diahj% &5#&cXYL");
                        #calendario=%#diahj%;
                        @#calendario=%#calendario%;
                        stop;
                    else;
                        #quantidadela=#quantidadela+1;
                    endif;
                endif;
      
            endif;
  
  
            wait(2ms);
            next;
        endif;
    loop;
endif;

}$$

Versão Tecla
https://justpaste.it/calendario2
ou
Código:
$${

ifmatches(%CHATCLEAN%,"Você ainda não marcou presença!");
    wait(10);
    do(1);
        wait(1);
        time(&date,"dd/MM/yyyy");
        match(%&date%,"(.+)/(.+)/(.+)",{#diahj,#meshj,#anohj});
        log("&5&lHoje é o %#diahj%º dia do mês");
        #diahj2=%#diahj%-1;

        if(%#calendario%=%#diahj%);
            @#calendario=%#calendario%;
            log("&9Já marquei meu calendario hoje");
            stop;
        else;
            if(#calendario="");
                log("&9Não marquei calendario hoje ainda, ultimo dia: &bNunca");
            else;
                log("&9Não marquei calendario hoje ainda, ultimo dia: &b%#calendario%");
            endif;
  
            echo("/calendario");

            do();
                wait(200ms);
            until(%GUI%="GUICHEST");
            wait(500ms);

            #quantidadela=0;
            for(#invsl,0,44);
  
            ifcontains(%SERVER%,"propano");
                getslotitem(%#invsl%,&item);
  
                ifmatches(%&item%,"wool");

                    if(%#quantidadela%=%#diahj2%);
                        slotclick(%#invsl%);
                        echo("/g &5[Macro] Marcando calendario do dia: &4%#diahj% &5#&cXylic");
                        #calendario=%#diahj%;
                        @#calendario=%#calendario%;
                        stop;
                    else;
                        #quantidadela=#quantidadela+1;
                    endif;
                endif;
  
            else;
                getslotitem(%#invsl%,#item);
  
                ifmatches(%#item%,"35");

                    if(%#quantidadela%=%#diahj2%);
                        slotclick(%#invsl%);
                        echo("/g &5[Macro] Marcando calendario do dia: &4%#diahj% &5#&cXYL");
                        #calendario=%#diahj%;
                        @#calendario=%#calendario%;
                        stop;
                    else;
                        #quantidadela=#quantidadela+1;
                    endif;
                endif;
      
            endif;
  
  
            wait(2ms);
            next;
        endif;
    loop;
endif;

}$$
 
Última edição:
Ótima macro, só uma pergunta: é possível instalar 2 onchat? se eu não me engano tinha um jeito que era assim $$<onchat1.txt>;$$<onchat2.txt>
 
Ótima macro, só uma pergunta: é possível instalar 2 onchat? se eu não me engano tinha um jeito que era assim $$<onchat1.txt>;$$<onchat2.txt>

Sim, mas separado com pipe (barra vertical).

$$<onchat1.txt> | $$<onchat2.txt>
 
acredito que dava pra fazer só usando o '#data' da lã, sem precisar de tanto trabalho, mas está bem supimpinha...
 
acredito que dava pra fazer só usando o '#data' da lã, sem precisar de tanto trabalho, mas está bem supimpinha...
É porque eu fiz originalmente pra 1.8 e me pediram pra adaptar pra 1.5.2 também e foi mais fácil só ctrl-c ctrl-v e editar para o modo numérico dos itens que é usado na 1.5.2.

Testei hoje os dois macros e estão dando erro :D
Vê se não cortou alguma parte, tenta copiar o código novamente.
Código:
$${

ifmatches(%CHATCLEAN%,"Você ainda não marcou presença!");
    wait(10);
    do(1);
        wait(1);
        time(&date,"dd/MM/yyyy");
        match(%&date%,"(.+)/(.+)/(.+)",{#diahj,#meshj,#anohj});
        log("&5&lHoje é o %#diahj%º dia do mês");
        #diahj2=%#diahj%-1;

        if(%#calendario%=%#diahj%);
            @#calendario=%#calendario%;
            log("&9Já marquei meu calendario hoje");
            stop;
        else;
            if(#calendario="");
                log("&9Não marquei calendario hoje ainda, ultimo dia: &bNunca");
            else;
                log("&9Não marquei calendario hoje ainda, ultimo dia: &b%#calendario%");
            endif;
   
            echo("/calendario");

            do();
                wait(200ms);
            until(%GUI%="GUICHEST");
            wait(500ms);

            #quantidadela=0;
            for(#invsl,0,44);
   
            ifcontains(%SERVER%,"propano");
                getslotitem(%#invsl%,&item);
   
                ifmatches(%&item%,"wool");

                    if(%#quantidadela%=%#diahj2%);
                        slotclick(%#invsl%);
                        echo("/g &5[Macro] Marcando calendario do dia: &4%#diahj% &5#&cXylic");
                        #calendario=%#diahj%;
                        @#calendario=%#calendario%;
                        stop;
                    else;
                        #quantidadela=#quantidadela+1;
                    endif;
                endif;
   
            else;
                getslotitem(%#invsl%,#item);
   
                ifmatches(%#item%,"35");

                    if(%#quantidadela%=%#diahj2%);
                        slotclick(%#invsl%);
                        log("/g &5[Macro] Marcando calendario do dia: &4%#diahj% &5#&cXYL");
                        #calendario=%#diahj%;
                        @#calendario=%#calendario%;
                        stop;
                    else;
                        #quantidadela=#quantidadela+1;
                    endif;
                endif;
       
            endif;
   
   
            wait(2ms);
            next;
        endif;
    loop;
endif;

}$$
 
sei que você joga no propano, macro funciona na 1.5.2?
btw, bom tutorial simples e vai direito ao ponto.
 
É porque eu fiz originalmente pra 1.8 e me pediram pra adaptar pra 1.5.2 também e foi mais fácil só ctrl-c ctrl-v e editar para o modo numérico dos itens que é usado na 1.5.2.


Vê se não cortou alguma parte, tenta copiar o código novamente.
Código:
$${

ifmatches(%CHATCLEAN%,"Você ainda não marcou presença!");
    wait(10);
    do(1);
        wait(1);
        time(&date,"dd/MM/yyyy");
        match(%&date%,"(.+)/(.+)/(.+)",{#diahj,#meshj,#anohj});
        log("&5&lHoje é o %#diahj%º dia do mês");
        #diahj2=%#diahj%-1;

        if(%#calendario%=%#diahj%);
            @#calendario=%#calendario%;
            log("&9Já marquei meu calendario hoje");
            stop;
        else;
            if(#calendario="");
                log("&9Não marquei calendario hoje ainda, ultimo dia: &bNunca");
            else;
                log("&9Não marquei calendario hoje ainda, ultimo dia: &b%#calendario%");
            endif;
  
            echo("/calendario");

            do();
                wait(200ms);
            until(%GUI%="GUICHEST");
            wait(500ms);

            #quantidadela=0;
            for(#invsl,0,44);
  
            ifcontains(%SERVER%,"propano");
                getslotitem(%#invsl%,&item);
  
                ifmatches(%&item%,"wool");

                    if(%#quantidadela%=%#diahj2%);
                        slotclick(%#invsl%);
                        echo("/g &5[Macro] Marcando calendario do dia: &4%#diahj% &5#&cXylic");
                        #calendario=%#diahj%;
                        @#calendario=%#calendario%;
                        stop;
                    else;
                        #quantidadela=#quantidadela+1;
                    endif;
                endif;
  
            else;
                getslotitem(%#invsl%,#item);
  
                ifmatches(%#item%,"35");

                    if(%#quantidadela%=%#diahj2%);
                        slotclick(%#invsl%);
                        log("/g &5[Macro] Marcando calendario do dia: &4%#diahj% &5#&cXYL");
                        #calendario=%#diahj%;
                        @#calendario=%#calendario%;
                        stop;
                    else;
                        #quantidadela=#quantidadela+1;
                    endif;
                endif;
      
            endif;
  
  
            wait(2ms);
            next;
        endif;
    loop;
endif;

}$$
Tenho certeza que não copiei errado..

Obs; jogo na 1.5.2
 
Tenho certeza que não copiei errado..

Obs; jogo na 1.5.2
Acabei de testar aqui e funcionou normalmente.
Tenta copiar novamente o código e se mesmo assim não funcionar cola isso no inicio da macro após $${

#calendario="";
 
Status
Não está aberto para novas respostas.

Users who are viewing this thread

Voltar
Topo