ENTREGUE [MACRO] Player Connected

SLEEPP · Jun 21, 2016

Player Connected

Jogador Conectado

(imagem ilustrativa)

Esta macro tem como objetivo mostrar em sua tela os jogadores que estão online decididos por você através de três grupos: Amigo, Rival e Staff.

Para você adicionar um jogador para mostrar na tela, o grupo, para ver a lista dos jogadores que já estão adicionados, ligar e desligar a macro...

Existe vários comandos que você poderá executar, comandos que serão detectados pelo chat local.

[!] Comandos [!]

Para você dar os comandos para a macro, você deve envia-los no chat local, por exemplo:

Vamos aos comandos disponíveis:

Comando: sleep pc on
Descrição: Liga a macro Player Connected

Comando: sleep pc off
Descrição: Desliga a macro Player Connected

Comando: sleep pc list
Descrição: Lista todos os jogadores que você adicionou.

Comando: sleep amigo add <nome>
Descrição: Adiciona um jogador na lista de amigos (<nome> você substituíra pelo nickname do jogador).

Comando: sleep amigo rem <nome>
Descrição: Remove um jogador da lista de amigos (<nome> você substituíra pelo nickname do jogador).

Comando: sleep rival add <nome>
Descrição: Adiciona um jogador na lista de rivais (<nome> você substituíra pelo nickname do jogador).

Comando: sleep rival rem <nome>
Descrição: Remove um jogador da lista de rivais (<nome> você substituíra pelo nickname do jogador).

Comando: sleep staff add <nome>
Descrição: Adiciona um jogador na lista de staffs (<nome> você substituíra pelo nickname do jogador).

Comando: sleep staff rem <nome>
Descrição: Remove um jogador da lista de staffs (<nome> você substituíra pelo nickname do jogador).

[!] Instalação [!] (duas etapas: label & código)

Primeira etapa: Instalar a Label.
Nome da Label: PC

Caso não saiba instalar uma Label, clique:

Clique em GUI Editor

Clique em Ingame

Clique em Button Panel Commands

Clique em ADD Label

Escolha um local para a Label e clique

Clique em Background Colour

Deixe Luminosity e Opacity tudo em zero

Clique em OK

Renomeie Control Name e Binding para "PC"

Clique em OK e pronto.

Segunda etapa: Instalar o código da macro (que esta logo abaixo) no evento Onchat.

Caso não saiba instalar uma macro no Evento Onchat, entre neste link:
http://forum.craftlandia.com.br/ipb/index.php?/topic/543966-tutorial-instalando-macros-sleep/

[!] Código da Macro [!]

ChangeLog (mantenha-se atualizado sobre bugs ou upgrades):

21/06/2016 - Postado esta macro.

Script Player Connected:

$${

IFMATCHES("%CHATCLEAN%","^» CraftLandia [\S\s]+ $www.craftlandia.com.br$$");
IF(player_connected);
UNSET(player_connected);
UNSET(foreach);
DO(15);
SETLABEL("PC","&e[PC] &aCriado por &a&oSLEEP&a.");
WAIT(1MS);
SETLABEL("PC","&e[PC] &aCriado por SLEEP.");
WAIT(1MS);
LOOP;
SET(player_connected);
ELSE;
SETLABEL("PC","");
UNSET(foreach);
UNSET(player_connected);
ENDIF;
ENDIF;
IFMATCHES("%CHATCLEAN%","^\[[GL]\] [\s\S]*%PLAYER%: ([\s\S]*)$");
MATCH("%CHATCLEAN%","^\[[GL]\] ([\s\S]*)%PLAYER%: ([\s\S]*)$",{&chatinfo,&chatmsg});
IFMATCHES("%&chatinfo%",":");
ELSE;
IFMATCHES("%&chatmsg%","^sleep pc (on|off|list)$");
MATCH("%&chatmsg%","^sleep pc (on|off|list)$",{&status});
IF((%&status%="on")&&(!player_connected));
LOG("&e[PC] &aLigado.");
}$$/g ativando a macro: sleep player connected.$${
UNSET(foreach);
DO(15);
SETLABEL("PC","&e[PC] &aCriado por &a&oSLEEP&a.");
WAIT(1MS);
SETLABEL("PC","&e[PC] &aCriado por SLEEP.");
WAIT(1MS);
LOOP;
SET(player_connected);
ELSEIF((%&status%="on")&&(player_connected));
LOG("&e[PC] &cEste macro já esta ON.");
ELSEIF((%&status%="off")&&(player_connected));
LOG("&e[PC] &cDesligado.");
UNSET(player_connected);
}$$/g desativando a macro: sleep player connected.$${
ELSEIF((%&status%="off")&&(!player_connected));
LOG("&e[PC] &cEste macro já esta OFF.");
ELSEIF((%&status%="list")&&(player_connected));
SET(&copy_amigos,"%&list_amigos%");
SET(&copy_rivais,"%&list_rivais%");
SET(&copy_staffs,"%&list_staffs%");
LOG("&e[PC] &aLista:");
LOG("");
IF(%&copy_amigos%=NULL);
LOG("&a[Amigo] &fLista vazia.");
ELSE;
IFMATCHES("%&copy_amigos%","<(.*)><(.*)>");
SET(&tag,"Amigos");
ELSE;
SET(&tag,"Amigo");
ENDIF;
REPLACE(&copy_amigos,"<","");
REPLACE(&copy_amigos,">",", ");
IFMATCHES("%&copy_amigos%","(.*),");
MATCH("%&copy_amigos%","(.*),",{&copy_amigos});
ENDIF;
LOG("&a[%&tag%] &f%&copy_amigos%.");
ENDIF;
IF(%&copy_rivais%=NULL);
LOG("&c[Rival] &fLista vazia.");
ELSE;
IFMATCHES("%&copy_rivais%","<(.*)><(.*)>");
SET(&tag,"Rivais");
ELSE;
SET(&tag,"Rival");
ENDIF;
REPLACE(&copy_rivais,"<","");
REPLACE(&copy_rivais,">",", ");
IFMATCHES("%&copy_rivais%","(.*),");
MATCH("%&copy_rivais%","(.*),",{&copy_rivais});
ENDIF;
LOG("&c[%&tag%] &f%&copy_rivais%.");
ENDIF;
IF(%&copy_staffs%=NULL);
LOG("&4[Staff] &fLista vazia.");
ELSE;
IFMATCHES("%&copy_staffs%","<(.*)><(.*)>");
SET(&tag,"Staffs");
ELSE;
SET(&tag,"Staff");
ENDIF;
REPLACE(&copy_staffs,"<","");
REPLACE(&copy_staffs,">",", ");
IFMATCHES("%&copy_staffs%","(.*),");
MATCH("%&copy_staffs%","(.*),",{&copy_staffs});
ENDIF;
LOG("&4[%&tag%] &f%&copy_staffs%.");
ENDIF;
ELSEIF((%&status%="list")&&(!player_connected));
LOG("&e[PC] &cEste macro esta OFF.");
ENDIF;
ENDIF;
IFMATCHES("%&chatmsg%","^sleep (.*) (.*) (.*)$");
MATCH("%&chatmsg%","^sleep (.*) (.*) (.*)$",{&group,&action,&name});
SET(&command,"%&group%>%&action%");
UNSET(send_error_1);
UNSET(send_error_2);
UNSET(send_error_3);
IFMATCHES("%&command%","^(staff|amigo|rival)>(add|rem)$");
IF(player_connected);
IFMATCHES("%&name%","([a-z|0-9|_]*)",&filter,1,NONE);
ENDIF;
IFMATCHES("%&filter%","[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+");
SET(send_error_3);
ENDIF;
IFMATCHES("%&filter%","[\w_]+[\w_]+[\w_]+[\w_]+");
ELSE;
SET(send_error_3);
ENDIF;
IF(!send_error_3);
IFMATCHES("%PLAYER%","%&filter%");
LOG(&e[PC] &cEste jogador é você.);
ELSE;
SET(&name,"%&filter%");
&minusculo[0] = a; &maiusculo[0] = A;
&minusculo[1] = b; &maiusculo[1] = B;
&minusculo[2] = c; &maiusculo[2] = C;
&minusculo[3] = d; &maiusculo[3] = D;
&minusculo[4] = e; &maiusculo[4] = E;
&minusculo[5] = f; &maiusculo[5] = F;
&minusculo[6] = g; &maiusculo[6] = G;
&minusculo[7] = h; &maiusculo[7] = H;
&minusculo[8] = i; &maiusculo[8] = I;
&minusculo[9] = j; &maiusculo[9] = J;
&minusculo[10] = k; &maiusculo[10] = K;
&minusculo[11] = l; &maiusculo[11] = L;
&minusculo[12] = m; &maiusculo[12] = M;
&minusculo[13] = n; &maiusculo[13] = N;
&minusculo[14] = o; &maiusculo[14] = O;
&minusculo[15] = p; &maiusculo[15] = P;
&minusculo[16] = q; &maiusculo[16] = Q;
&minusculo[17] = r; &maiusculo[17] = R;
&minusculo[18] = s; &maiusculo[18] = S;
&minusculo[19] = t; &maiusculo[19] = T;
&minusculo[20] = u; &maiusculo[20] = U;
&minusculo[21] = v; &maiusculo[21] = V;
&minusculo[22] = w; &maiusculo[22] = W;
&minusculo[23] = x; &maiusculo[23] = X;
&minusculo[24] = y; &maiusculo[24] = Y;
&minusculo[25] = z; &maiusculo[25] = Z;
FOR(#sleep_for,0,25);
REPLACE(&name,"%&maiusculo[%#sleep_for%]%","%&minusculo[%#sleep_for%]%")
NEXT;
IF((%&action%="add")&&(%&group%="amigo"));
IFMATCHES("%&list_amigos%","<%&name%>");
SET(send_error_1);
ELSE;
SET(&list_amigos,"%&list_amigos%<%&name%>");
ENDIF;
ELSEIF((%&action%="add")&&(%&group%="staff"));
IFMATCHES("%&list_staffs%","<%&name%>");
SET(send_error_1);
ELSE;
SET(&list_staffs,"%&list_staffs%<%&name%>");
ENDIF;
ELSEIF((%&action%="add")&&(%&group%="rival"));
IFMATCHES("%&list_rivais%","<%&name%>");
SET(send_error_1);
ELSE;
SET(&list_rivais,"%&list_rivais%<%&name%>");
ENDIF;
ELSEIF((%&action%="rem")&&(%&group%="amigo"));
IFMATCHES("%&list_amigos%","<%&name%>");
REPLACE(&list_amigos,"<%&name%>","");
ELSE;
SET(send_error_2);
ENDIF;
ELSEIF((%&action%="rem")&&(%&group%="staff"));
IFMATCHES("%&list_staffs%","<%&name%>");
REPLACE(&list_staffs,"<%&name%>","");
ELSE;
SET(send_error_2);
ENDIF;
ELSEIF((%&action%="rem")&&(%&group%="rival"));
IFMATCHES("%&list_rivais%","<%&name%>");
REPLACE(&list_rivais,"<%&name%>","");
ELSE;
SET(send_error_2);
ENDIF;
ENDIF;
IF(send_error_1);
LOG(&e[PC] &c"%&name%" já esta nesta lista.);
ELSEIF(send_error_2);
LOG(&e[PC] &c"%&name%" nao esta nesta lista.);
ELSE;
IF(%&action%="add");
LOG(&e[PC] &a"%&name%" adicionado como %&group%.);
ELSEIF(%&action%="rem");
LOG(&e[PC] &c"%&name%" removido como %&group%.);
ENDIF;
ENDIF;
ENDIF;
ELSE;
LOG(&e[PC] &c"%&name%" é um nick inválido.);
ENDIF;
ELSE;
LOG(&e[PC] &cEste macro esta OFF.);
ENDIF;
ELSE;
IF(player_connected);
LOG("&e[PC] &cUso correto: &fsleep &c[&famigo&c|&fstaff&c|&frival&c] [&fadd&c|&frem&c] [&fnome&c].");
ELSE;
LOG(&e[PC] &cEste macro esta OFF.);
ENDIF;
ENDIF;
ENDIF;
ENDIF;
ENDIF;
IF((player_connected)&&(!foreach));
IF(foreach);
ELSE;
SET(foreach);
WAIT(5T);
DO;
SET(foreach);
SET(&foreach,"");
FOREACH(players);
IFMATCHES("%&list_amigos%","<%PLAYERNAME%>");
SET(&foreach,"%&foreach%<amigo.%PLAYERNAME%.>");
ENDIF;
IFMATCHES("%&list_rivais%","<%PLAYERNAME%>");
SET(&foreach,"%&foreach%<rival.%PLAYERNAME%.>");
ENDIF;
IFMATCHES("%&list_staffs%","<%PLAYERNAME%>");
SET(&foreach,"%&foreach%<staff.%PLAYERNAME%.>");
ENDIF;
IF(!player_connected);
SET(&foreach,"");
BREAK;
ENDIF;
NEXT;
IFMATCHES("%&foreach%","<[\d\w_]+.[\d\w_]+.><[\d\w_]+.[\d\w_]+.>");
SET(&label_txt,"Conectados");
ELSE;
SET(&label_txt,"Conectado");
ENDIF;
REPLACE(&foreach,"staff","&4[Staff] &c");
REPLACE(&foreach,"amigo","&a[Amigo] &f");
REPLACE(&foreach,"rival","&c[Rival] &f");
REPLACE(&foreach,"<","\n");
REPLACE(&foreach,">","");
REPLACE(&foreach,".","");
IF(%&foreach%!=NULL);
SET(&foreach,"&e&l%&label_txt%:\n%&foreach%");
ENDIF;
SETLABEL("PC","%&foreach%");
IF(!player_connected);
UNSET(foreach);
ENDIF;
WHILE(foreach);
SETLABEL("PC","");
ENDIF;
ENDIF;

}$$

A respeito das mensagens automáticas ativando&desativando, elas não são proibidas e não causam punição, para mais informações (clique aqui).

Sugira novas macros: (clique aqui).

Att. SLEEP

FafadoToddynho · Jun 22, 2016

Nuss, macro PFT SLEEP !!!! Vlw ai e.e assim que arranjar meu PC vou usar :3

zInvsee · Jun 22, 2016

Ja tentei fazer, mais quando tem mais de 2 amigos on, ele buga a label
:/

esse macro me salvou

VortexT14 · Jun 22, 2016

Bom Macro

iFreeze · Jun 22, 2016

Ótimo macro Sleep!Sempre inovando com os melhores macros

Wasmachine · Jun 22, 2016

Usarei sem dúvidas, parabéns pela macro

itzcheeeck · Jun 22, 2016

Parabéns pela macro

~~Não tomarei mais ban ashahhsahhsha~~

DET0NA · Jun 22, 2016

SLEEPP disse:
Player Connected
Jogador Conectado

(imagem ilustrativa)

Esta macro tem como objetivo mostrar em sua tela os jogadores que estão online decididos por você através de três grupos: Amigo, Rival e Staff.
Para você dar informações para a macro, como: jogador para mostrar na tela, o grupo, lista dos jogadores que já estão adicionados, ligar e desligar a macro...
Existe vários comandos que você poderá executar, comandos que serão detectados pelo chat local.

[!] Comandos [!]

Para você dar os comandos para a macro, você deve envia-los no chat local, por exemplo:

Vamos aos comandos disponíveis:

Comando: sleep pc on
Descrição: Liga a macro Player Connected

Comando: sleep pc off
Descrição: Desliga a macro Player Connected

Comando: sleep pc list
Descrição: Lista todos os jogadores que você adicionou.

Comando: sleep amigo add <nome>
Descrição: Adiciona um jogador na lista de amigos (<nome> você substituíra pelo nickname do jogador).

Comando: sleep amigo rem <nome>
Descrição: Remove um jogador da lista de amigos (<nome> você substituíra pelo nickname do jogador).

Comando: sleep rival add <nome>
Descrição: Adiciona um jogador na lista de rivais (<nome> você substituíra pelo nickname do jogador).

Comando: sleep rival rem <nome>
Descrição: Remove um jogador da lista de rivais (<nome> você substituíra pelo nickname do jogador).

Comando: sleep staff add <nome>
Descrição: Adiciona um jogador na lista de staffs (<nome> você substituíra pelo nickname do jogador).

Comando: sleep staff rem <nome>
Descrição: Remove um jogador da lista de rivais (<nome> você substituíra pelo nickname do jogador).

[!] Instalação [!] (duas etapas: label & código)

Primeira etapa: Instalar a Label.
Nome da Label: PC

Caso não saiba instalar uma Label, clique:

Clique em GUI Editor

Clique em Ingame

Clique em Button Panel Commands

Clique em ADD Label

Escolha um local para a Label e clique

Clique em Background Colour

Deixe Luminosity e Opacity tudo em zero

Clique em OK

Renomeie Control Name e Binding para "PC"

Clique em OK e pronto.

Segunda etapa: Instalar o código da macro (que esta logo abaixo) no evento Onchat.

Caso não saiba instalar uma macro no Evento Onchat, entre neste link:
http://forum.craftlandia.com.br/ipb/index.php?/topic/543966-tutorial-instalando-macros-sleep/

[!] Código da Macro [!]

ChangeLog (mantenha-se atualizado sobre bugs ou upgrades):

21/06/2016 - Postado esta macro.

Script Player Connected:

$${

IFMATCHES("%CHATCLEAN%","^» CraftLandia [\S\s]+ $www.craftlandia.com.br$$");
IF(player_connected);
UNSET(player_connected);
UNSET(foreach);
DO(15);
SETLABEL("PC","&e[PC] &aCriado por &a&oSLEEP&a.");
WAIT(1MS);
SETLABEL("PC","&e[PC] &aCriado por SLEEP.");
WAIT(1MS);
LOOP;
SET(player_connected);
ELSE;
SETLABEL("PC","");
UNSET(foreach);
UNSET(player_connected);
ENDIF;
ENDIF;
IFMATCHES("%CHATCLEAN%","^\[[GL]\] [\s\S]*%PLAYER%: ([\s\S]*)$");
MATCH("%CHATCLEAN%","^\[[GL]\] ([\s\S]*)%PLAYER%: ([\s\S]*)$",{&chatinfo,&chatmsg});
IFMATCHES("%&chatinfo%",":");
ELSE;
IFMATCHES("%&chatmsg%","^sleep pc (on|off|list)$");
MATCH("%&chatmsg%","^sleep pc (on|off|list)$",{&status});
IF((%&status%="on")&&(!player_connected));
LOG("&e[PC] &aLigado.");
UNSET(foreach);
DO(15);
SETLABEL("PC","&e[PC] &aCriado por &a&oSLEEP&a.");
WAIT(1MS);
SETLABEL("PC","&e[PC] &aCriado por SLEEP.");
WAIT(1MS);
LOOP;
SET(player_connected);
ELSEIF((%&status%="on")&&(player_connected));
LOG("&e[PC] &cEste macro já esta ON.");
ELSEIF((%&status%="off")&&(player_connected));
LOG("&e[PC] &cDesligado.");
UNSET(player_connected);
ELSEIF((%&status%="off")&&(!player_connected));
LOG("&e[PC] &cEste macro já esta OFF.");
ELSEIF((%&status%="list")&&(player_connected));
SET(&copy_amigos,"%&list_amigos%");
SET(&copy_rivais,"%&list_rivais%");
SET(&copy_staffs,"%&list_staffs%");
LOG("&e[PC] &aLista:");
LOG("");
IF(%&copy_amigos%=NULL);
LOG("&a[Amigo] &fLista vazia.");
ELSE;
IFMATCHES("%&copy_amigos%","<(.*)><(.*)>");
SET(&tag,"Amigos");
ELSE;
SET(&tag,"Amigo");
ENDIF;
REPLACE(&copy_amigos,"<","");
REPLACE(&copy_amigos,">",", ");
IFMATCHES("%&copy_amigos%","(.*),");
MATCH("%&copy_amigos%","(.*),",{&copy_amigos});
ENDIF;
LOG("&a[%&tag%] &f%&copy_amigos%.");
ENDIF;
IF(%&copy_rivais%=NULL);
LOG("&c[Rival] &fLista vazia.");
ELSE;
IFMATCHES("%&copy_rivais%","<(.*)><(.*)>");
SET(&tag,"Rivais");
ELSE;
SET(&tag,"Rival");
ENDIF;
REPLACE(&copy_rivais,"<","");
REPLACE(&copy_rivais,">",", ");
IFMATCHES("%&copy_rivais%","(.*),");
MATCH("%&copy_rivais%","(.*),",{&copy_rivais});
ENDIF;
LOG("&c[%&tag%] &f%&copy_rivais%.");
ENDIF;
IF(%&copy_staffs%=NULL);
LOG("&4[Staff] &fLista vazia.");
ELSE;
IFMATCHES("%&copy_staffs%","<(.*)><(.*)>");
SET(&tag,"Staffs");
ELSE;
SET(&tag,"Staff");
ENDIF;
REPLACE(&copy_staffs,"<","");
REPLACE(&copy_staffs,">",", ");
IFMATCHES("%&copy_staffs%","(.*),");
MATCH("%&copy_staffs%","(.*),",{&copy_staffs});
ENDIF;
LOG("&4[%&tag%] &f%&copy_staffs%.");
ENDIF;
ELSEIF((%&status%="list")&&(!player_connected));
LOG("&e[PC] &cEste macro esta OFF.");
ENDIF;
ENDIF;
IFMATCHES("%&chatmsg%","^sleep (.*) (.*) (.*)$");
MATCH("%&chatmsg%","^sleep (.*) (.*) (.*)$",{&group,&action,&name});
SET(&command,"%&group%>%&action%");
UNSET(send_error_1);
UNSET(send_error_2);
UNSET(send_error_3);
IFMATCHES("%&command%","^(staff|amigo|rival)>(add|rem)$");
IF(player_connected);
IFMATCHES("%&name%","([a-z|0-9|_]*)",&filter,1,NONE);
ENDIF;
IFMATCHES("%&filter%","[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+");
SET(send_error_3);
ENDIF;
IFMATCHES("%&filter%","[\w_]+[\w_]+[\w_]+[\w_]+");
ELSE;
SET(send_error_3);
ENDIF;
IF(!send_error_3);
IFMATCHES("%PLAYER%","%&filter%");
LOG(&e[PC] &cEste jogador é você.);
ELSE;
SET(&name,"%&filter%");
&minusculo[0] = a; &maiusculo[0] = A;
&minusculo[1] = b; &maiusculo[1] = B;
&minusculo[2] = c; &maiusculo[2] = C;
&minusculo[3] = d; &maiusculo[3] = D;
&minusculo[4] = e; &maiusculo[4] = E;
&minusculo[5] = f; &maiusculo[5] = F;
&minusculo[6] = g; &maiusculo[6] = G;
&minusculo[7] = h; &maiusculo[7] = H;
&minusculo[8] = i; &maiusculo[8] = I;
&minusculo[9] = j; &maiusculo[9] = J;
&minusculo[10] = k; &maiusculo[10] = K;
&minusculo[11] = l; &maiusculo[11] = L;
&minusculo[12] = m; &maiusculo[12] = M;
&minusculo[13] = n; &maiusculo[13] = N;
&minusculo[14] = o; &maiusculo[14] = O;
&minusculo[15] = p; &maiusculo[15] = P;
&minusculo[16] = q; &maiusculo[16] = Q;
&minusculo[17] = r; &maiusculo[17] = R;
&minusculo[18] = s; &maiusculo[18] = S;
&minusculo[19] = t; &maiusculo[19] = T;
&minusculo[20] = u; &maiusculo[20] = U;
&minusculo[21] = v; &maiusculo[21] = V;
&minusculo[22] = w; &maiusculo[22] = W;
&minusculo[23] = x; &maiusculo[23] = X;
&minusculo[24] = y; &maiusculo[24] = Y;
&minusculo[25] = z; &maiusculo[25] = Z;
FOR(#sleep_for,0,25);
REPLACE(&name,"%&maiusculo[%#sleep_for%]%","%&minusculo[%#sleep_for%]%")
NEXT;
IF((%&action%="add")&&(%&group%="amigo"));
IFMATCHES("%&list_amigos%","<%&name%>");
SET(send_error_1);
ELSE;
SET(&list_amigos,"%&list_amigos%<%&name%>");
ENDIF;
ELSEIF((%&action%="add")&&(%&group%="staff"));
IFMATCHES("%&list_staffs%","<%&name%>");
SET(send_error_1);
ELSE;
SET(&list_staffs,"%&list_staffs%<%&name%>");
ENDIF;
ELSEIF((%&action%="add")&&(%&group%="rival"));
IFMATCHES("%&list_rivais%","<%&name%>");
SET(send_error_1);
ELSE;
SET(&list_rivais,"%&list_rivais%<%&name%>");
ENDIF;
ELSEIF((%&action%="rem")&&(%&group%="amigo"));
IFMATCHES("%&list_amigos%","<%&name%>");
REPLACE(&list_amigos,"<%&name%>","");
ELSE;
SET(send_error_2);
ENDIF;
ELSEIF((%&action%="rem")&&(%&group%="staff"));
IFMATCHES("%&list_staffs%","<%&name%>");
REPLACE(&list_staffs,"<%&name%>","");
ELSE;
SET(send_error_2);
ENDIF;
ELSEIF((%&action%="rem")&&(%&group%="rival"));
IFMATCHES("%&list_rivais%","<%&name%>");
REPLACE(&list_rivais,"<%&name%>","");
ELSE;
SET(send_error_2);
ENDIF;
ENDIF;
IF(send_error_1);
LOG(&e[PC] &c"%&name%" já esta nesta lista.);
ELSEIF(send_error_2);
LOG(&e[PC] &c"%&name%" nao esta nesta lista.);
ELSE;
IF(%&action%="add");
LOG(&e[PC] &a"%&name%" adicionado como %&group%.);
ELSEIF(%&action%="rem");
LOG(&e[PC] &c"%&name%" removido como %&group%.);
ENDIF;
ENDIF;
ENDIF;
ELSE;
LOG(&e[PC] &c"%&name%" é um nick inválido.);
ENDIF;
ELSE;
LOG(&e[PC] &cEste macro esta OFF.);
ENDIF;
ELSE;
IF(player_connected);
LOG("&e[PC] &cUso correto: &fsleep &c[&famigo&c|&fstaff&c|&frival&c] [&fadd&c|&frem&c] [&fnome&c].");
ELSE;
LOG(&e[PC] &cEste macro esta OFF.);
ENDIF;
ENDIF;
ENDIF;
ENDIF;
ENDIF;
IF((player_connected)&&(!foreach));
IF(foreach);
ELSE;
SET(foreach);
WAIT(5T);
DO;
SET(foreach);
SET(&foreach,"");
FOREACH(players);
IFMATCHES("%&list_amigos%","<%PLAYERNAME%>");
SET(&foreach,"%&foreach%<amigo.%PLAYERNAME%.>");
ENDIF;
IFMATCHES("%&list_rivais%","<%PLAYERNAME%>");
SET(&foreach,"%&foreach%<rival.%PLAYERNAME%.>");
ENDIF;
IFMATCHES("%&list_staffs%","<%PLAYERNAME%>");
SET(&foreach,"%&foreach%<staff.%PLAYERNAME%.>");
ENDIF;
IF(!player_connected);
SET(&foreach,"");
BREAK;
ENDIF;
NEXT;
IFMATCHES("%&foreach%","<[\d\w_]+.[\d\w_]+.><[\d\w_]+.[\d\w_]+.>");
SET(&label_txt,"Conectados");
ELSE;
SET(&label_txt,"Conectado");
ENDIF;
REPLACE(&amp

bom macro tentei usar soq deu umas falhas.

Fari4s · Jun 22, 2016

Boa sleep você é o cara em

zM4TH3US · Jun 22, 2016

Boa Vo Testar, Bom Tópico.

Awol · Jun 22, 2016

Macro TOP essa ae :d Parabén Sleep

Ztrevor2154 · Jun 22, 2016

ai sim bom macro

PapaiDeTodos Servidor 3 · Jun 22, 2016

karai [member=Sleep] BOLADU

zP3RN4L0NG4 Ez · Jun 22, 2016

macro instalada com sucesso :V

lllllillllilllill · Jun 22, 2016

Parabéns!! muito bom

Dooug · Jun 22, 2016

GENIAL, vou usar com todo certeza.

SLEEPP disse:

Player Connected

Jogador Conectado

(imagem ilustrativa)

Esta macro tem como objetivo mostrar em sua tela os jogadores que estão online decididos por você através de três grupos: Amigo, Rival e Staff.

Para você dar informações para a macro, como: jogador para mostrar na tela, o grupo, lista dos jogadores que já estão adicionados, ligar e desligar a macro...

Existe vários comandos que você poderá executar, comandos que serão detectados pelo chat local.

[!] Comandos [!]

Para você dar os comandos para a macro, você deve envia-los no chat local, por exemplo:

Vamos aos comandos disponíveis:

Comando: sleep pc on
Descrição: Liga a macro Player Connected

Comando: sleep pc off
Descrição: Desliga a macro Player Connected

Comando: sleep pc list
Descrição: Lista todos os jogadores que você adicionou.

Comando: sleep amigo add <nome>
Descrição: Adiciona um jogador na lista de amigos (<nome> você substituíra pelo nickname do jogador).

Comando: sleep amigo rem <nome>
Descrição: Remove um jogador da lista de amigos (<nome> você substituíra pelo nickname do jogador).

Comando: sleep rival add <nome>
Descrição: Adiciona um jogador na lista de rivais (<nome> você substituíra pelo nickname do jogador).

Comando: sleep rival rem <nome>
Descrição: Remove um jogador da lista de rivais (<nome> você substituíra pelo nickname do jogador).

Comando: sleep staff add <nome>
Descrição: Adiciona um jogador na lista de staffs (<nome> você substituíra pelo nickname do jogador).

Comando: sleep staff rem <nome>
Descrição: Remove um jogador da lista de rivais (<nome> você substituíra pelo nickname do jogador).

[!] Instalação [!] (duas etapas: label & código)

Primeira etapa: Instalar a Label.
Nome da Label: PC

Caso não saiba instalar uma Label, clique:

Clique em GUI Editor

Clique em Ingame

Clique em Button Panel Commands

Clique em ADD Label

Escolha um local para a Label e clique

Clique em Background Colour

Deixe Luminosity e Opacity tudo em zero

Clique em OK

Renomeie Control Name e Binding para "PC"

Clique em OK e pronto.

Segunda etapa: Instalar o código da macro (que esta logo abaixo) no evento Onchat.

Caso não saiba instalar uma macro no Evento Onchat, entre neste link:
http://forum.craftlandia.com.br/ipb/index.php?/topic/543966-tutorial-instalando-macros-sleep/

[!] Código da Macro [!]

ChangeLog (mantenha-se atualizado sobre bugs ou upgrades):

21/06/2016 - Postado esta macro.

Script Player Connected:

Código:

$${     
    
IFMATCHES("%CHATCLEAN%","^» CraftLandia [\S\s]+ \(www.craftlandia.com.br\)$");
    IF(player_connected);
        UNSET(player_connected);
        UNSET(foreach);
            DO(15);
                SETLABEL("PC","&e[PC] &aCriado por &a&oSLEEP&a.");
                WAIT(1MS);
                SETLABEL("PC","&e[PC] &aCriado por SLEEP.");
                WAIT(1MS);
            LOOP;
        SET(player_connected);
    ELSE;
        SETLABEL("PC","");
        UNSET(foreach);
        UNSET(player_connected);
    ENDIF;
ENDIF;
IFMATCHES("%CHATCLEAN%","^\[[GL]\] [\s\S]*%PLAYER%: ([\s\S]*)$");
    MATCH("%CHATCLEAN%","^\[[GL]\] ([\s\S]*)%PLAYER%: ([\s\S]*)$",{&chatinfo,&chatmsg});
    IFMATCHES("%&chatinfo%",":");
    ELSE;
        IFMATCHES("%&chatmsg%","^sleep pc (on|off|list)$");
            MATCH("%&chatmsg%","^sleep pc (on|off|list)$",{&status});
            IF((%&status%="on")&&(!player_connected));
                LOG("&e[PC] &aLigado.");
                UNSET(foreach);
                    DO(15);
                        SETLABEL("PC","&e[PC] &aCriado por &a&oSLEEP&a.");
                        WAIT(1MS);
                        SETLABEL("PC","&e[PC] &aCriado por SLEEP.");
                        WAIT(1MS);
                    LOOP;
                SET(player_connected);
            ELSEIF((%&status%="on")&&(player_connected));
                LOG("&e[PC] &cEste macro já esta ON.");
            ELSEIF((%&status%="off")&&(player_connected));
                LOG("&e[PC] &cDesligado.");
                UNSET(player_connected);
            ELSEIF((%&status%="off")&&(!player_connected)); 
                LOG("&e[PC] &cEste macro já esta OFF.");
            ELSEIF((%&status%="list")&&(player_connected)); 
                SET(&copy_amigos,"%&list_amigos%");
                SET(&copy_rivais,"%&list_rivais%");
                SET(&copy_staffs,"%&list_staffs%");
                LOG("&e[PC] &aLista:");
                LOG("");
                    IF(%&copy_amigos%=NULL);
                        LOG("&a[Amigo] &fLista vazia.");
                    ELSE;
                            IFMATCHES("%&copy_amigos%","<(.*)><(.*)>");
                                SET(&tag,"Amigos");
                            ELSE;
                                SET(&tag,"Amigo");
                            ENDIF;
                        REPLACE(&copy_amigos,"<","");
                        REPLACE(&copy_amigos,">",", ");
                            IFMATCHES("%&copy_amigos%","(.*),");
                                MATCH("%&copy_amigos%","(.*),",{&copy_amigos});
                            ENDIF;
                        LOG("&a[%&tag%] &f%&copy_amigos%.");
                    ENDIF;
                    IF(%&copy_rivais%=NULL);
                        LOG("&c[Rival] &fLista vazia.");
                    ELSE;
                            IFMATCHES("%&copy_rivais%","<(.*)><(.*)>");
                                SET(&tag,"Rivais");
                            ELSE;
                                SET(&tag,"Rival");
                            ENDIF;                  
                        REPLACE(&copy_rivais,"<","");
                        REPLACE(&copy_rivais,">",", ");
                            IFMATCHES("%&copy_rivais%","(.*),");
                                MATCH("%&copy_rivais%","(.*),",{&copy_rivais});
                            ENDIF;
                        LOG("&c[%&tag%] &f%&copy_rivais%.");
                    ENDIF;                      
                    IF(%&copy_staffs%=NULL);
                        LOG("&4[Staff] &fLista vazia.");
                    ELSE;
                            IFMATCHES("%&copy_staffs%","<(.*)><(.*)>");
                                SET(&tag,"Staffs");
                            ELSE;
                                SET(&tag,"Staff");
                            ENDIF;                          
                        REPLACE(&copy_staffs,"<","");
                        REPLACE(&copy_staffs,">",", ");
                            IFMATCHES("%&copy_staffs%","(.*),");
                                MATCH("%&copy_staffs%","(.*),",{&copy_staffs});
                            ENDIF;
                        LOG("&4[%&tag%] &f%&copy_staffs%.");
                    ENDIF;      
            ELSEIF((%&status%="list")&&(!player_connected));    
                LOG("&e[PC] &cEste macro esta OFF.");
            ENDIF;
        ENDIF;                  
        IFMATCHES("%&chatmsg%","^sleep (.*) (.*) (.*)$");
            MATCH("%&chatmsg%","^sleep (.*) (.*) (.*)$",{&group,&action,&name});
            SET(&command,"%&group%>%&action%");
            UNSET(send_error_1);
            UNSET(send_error_2);
            UNSET(send_error_3);
                IFMATCHES("%&command%","^(staff|amigo|rival)>(add|rem)$");
                    IF(player_connected);
                        IFMATCHES("%&name%","([a-z|0-9|_]*)",&filter,1,NONE);
                        ENDIF;
                        IFMATCHES("%&filter%","[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+[\w_]+");
                            SET(send_error_3);
                        ENDIF;
                        IFMATCHES("%&filter%","[\w_]+[\w_]+[\w_]+[\w_]+");
                        ELSE;
                            SET(send_error_3);
                        ENDIF;                      
                            IF(!send_error_3);
                                IFMATCHES("%PLAYER%","%&filter%");
                                    LOG(&e[PC] &cEste jogador é você.);
                                ELSE;
                                    SET(&name,"%&filter%");
                                    &minusculo[0] = a;  &maiusculo[0] = A;
                                    &minusculo[1] = b;  &maiusculo[1] = B;
                                    &minusculo[2] = c;  &maiusculo[2] = C;
                                    &minusculo[3] = d;  &maiusculo[3] = D;
                                    &minusculo[4] = e;  &maiusculo[4] = E;
                                    &minusculo[5] = f;  &maiusculo[5] = F;
                                    &minusculo[6] = g;  &maiusculo[6] = G;
                                    &minusculo[7] = h;  &maiusculo[7] = H;
                                    &minusculo[8] = i;  &maiusculo[8] = I;
                                    &minusculo[9] = j;  &maiusculo[9] = J;
                                    &minusculo[10] = k; &maiusculo[10] = K;
                                    &minusculo[11] = l; &maiusculo[11] = L;
                                    &minusculo[12] = m; &maiusculo[12] = M;
                                    &minusculo[13] = n; &maiusculo[13] = N;
                                    &minusculo[14] = o; &maiusculo[14] = O;
                                    &minusculo[15] = p; &maiusculo[15] = P;
                                    &minusculo[16] = q; &maiusculo[16] = Q;
                                    &minusculo[17] = r; &maiusculo[17] = R;
                                    &minusculo[18] = s; &maiusculo[18] = S;
                                    &minusculo[19] = t; &maiusculo[19] = T;
                                    &minusculo[20] = u; &maiusculo[20] = U;
                                    &minusculo[21] = v; &maiusculo[21] = V;
                                    &minusculo[22] = w; &maiusculo[22] = W;
                                    &minusculo[23] = x; &maiusculo[23] = X;
                                    &minusculo[24] = y; &maiusculo[24] = Y;
                                    &minusculo[25] = z; &maiusculo[25] = Z; 
                                        FOR(#sleep_for,0,25);
                                            REPLACE(&name,"%&maiusculo[%#sleep_for%]%","%&minusculo[%#sleep_for%]%")
                                        NEXT;
                                        IF((%&action%="add")&&(%&group%="amigo"));
                                            IFMATCHES("%&list_amigos%","<%&name%>");
                                                SET(send_error_1);
                                            ELSE;
                                                SET(&list_amigos,"%&list_amigos%<%&name%>");
                                            ENDIF;
                                        ELSEIF((%&action%="add")&&(%&group%="staff"));
                                            IFMATCHES("%&list_staffs%","<%&name%>");
                                                SET(send_error_1);
                                            ELSE;
                                                SET(&list_staffs,"%&list_staffs%<%&name%>");
                                            ENDIF;                              
                                        ELSEIF((%&action%="add")&&(%&group%="rival"));
                                            IFMATCHES("%&list_rivais%","<%&name%>");
                                                SET(send_error_1);
                                            ELSE;
                                                SET(&list_rivais,"%&list_rivais%<%&name%>");
                                            ENDIF;                                  
                                        ELSEIF((%&action%="rem")&&(%&group%="amigo"));
                                            IFMATCHES("%&list_amigos%","<%&name%>");
                                                REPLACE(&list_amigos,"<%&name%>","");
                                            ELSE;
                                                SET(send_error_2);                              
                                            ENDIF;
                                        ELSEIF((%&action%="rem")&&(%&group%="staff"));
                                            IFMATCHES("%&list_staffs%","<%&name%>");
                                                REPLACE(&list_staffs,"<%&name%>","");
                                            ELSE;
                                                SET(send_error_2);                              
                                            ENDIF;
                                        ELSEIF((%&action%="rem")&&(%&group%="rival"));
                                            IFMATCHES("%&list_rivais%","<%&name%>");
                                                REPLACE(&list_rivais,"<%&name%>","");
                                            ELSE;
                                                SET(send_error_2);                                  
                                            ENDIF;
                                        ENDIF;
                                        IF(send_error_1);
                                            LOG(&e[PC] &c"%&name%" já esta nesta lista.);
                                        ELSEIF(send_error_2);
                                            LOG(&e[PC] &c"%&name%" nao esta nesta lista.);
                                        ELSE;
                                            IF(%&action%="add");
                                                LOG(&e[PC] &a"%&name%" adicionado como %&group%.);
                                            ELSEIF(%&action%="rem");
                                                LOG(&e[PC] &c"%&name%" removido como %&group%.);
                                            ENDIF;
                                        ENDIF;
                                ENDIF;
                            ELSE;
                                LOG(&e[PC] &c"%&name%" é um nick inválido.);
                            ENDIF;
                    ELSE;
                        LOG(&e[PC] &cEste macro esta OFF.);
                    ENDIF;                              
                ELSE;
                    IF(player_connected);
                        LOG("&e[PC] &cUso correto: &fsleep &c[&famigo&c|&fstaff&c|&frival&c] [&fadd&c|&frem&c] [&fnome&c].");
                    ELSE;
                        LOG(&e[PC] &cEste macro esta OFF.);
                    ENDIF;
                ENDIF;
        ENDIF;
    ENDIF;
ENDIF;
IF((player_connected)&&(!foreach));
    IF(foreach);
    ELSE;
        SET(foreach);
        WAIT(5T);
            DO;
                SET(foreach);
                SET(&foreach,"");
                    FOREACH(players);
                        IFMATCHES("%&list_amigos%","<%PLAYERNAME%>");
                            SET(&foreach,"%&foreach%<amigo.%PLAYERNAME%.>");
                        ENDIF;
                        IFMATCHES("%&list_rivais%","<%PLAYERNAME%>");
                            SET(&foreach,"%&foreach%<rival.%PLAYERNAME%.>");
                        ENDIF;
                        IFMATCHES("%&list_staffs%","<%PLAYERNAME%>");
                            SET(&foreach,"%&foreach%<staff.%PLAYERNAME%.>");
                        ENDIF;      
                        IF(!player_connected);
                            SET(&foreach,"");
                            BREAK;
                        ENDIF;                          
                    NEXT;
                    IFMATCHES("%&foreach%","<[\d\w_]+.[\d\w_]+.><[\d\w_]+.[\d\w_]+.>");
                        SET(&label_txt,"Conectados");
                    ELSE;
                        SET(&label_txt,"Conectado");
                    ENDIF;
                REPLACE(&foreach,"staff","&4[Staff] &c");
                REPLACE(&foreach,"amigo","&a[Amigo] &f");
                REPLACE(&foreach,"rival","&c[Rival] &f");
                REPLACE(&foreach,"<","\n");
                REPLACE(&foreach,">","");
                REPLACE(&foreach,".","");
                    IF(%&foreach%!=NULL);
                        SET(&foreach,"&e&l%&label_txt%:\n%&foreach%");
                    ENDIF;
                SETLABEL("PC","%&foreach%");
                    IF(!player_connected);
                        UNSET(foreach);
                    ENDIF;
            WHILE(foreach);
        SETLABEL("PC","");
    ENDIF;
ENDIF;          
                    
}$$

Sugira novas macros: (clique aqui).

Att. SLEEP

Tem como adicionar um novo grupo? Tipo para colocar a galera do clan ou outra coisa?

heavenforce · Jun 22, 2016

Sleep sempre com macros ótimos!
Quando eu for para o PC vou testar..

Enviado de meu XT1069 usando Tapatalk

StivenLH · Jun 22, 2016

Macros bem inteligente mano, parabéns pelo trabalho

SLEEPP · Jun 22, 2016

Plakeam disse:
GENIAL, vou usar com todo certeza.

Tem como adicionar um novo grupo? Tipo para colocar a galera do clan ou outra coisa?

Obrigado,
talvez em uma nova atualização poderei colocar grupos customizáveis.

Bjos.

wFreitaaaS · Jun 22, 2016

Boa macro!

ENTREGUE [MACRO] Player Connected

Bem-vindo!

Mito

Hardcore

Craftlandiano

Razoavel

Neutro

Hardcore

Craftlandiano

Hardcore

Craftlandiano

Neutro

Excelente

Craftlandiano

Craftlandiano

Neutro

Craftlandiano

Craftlandiano

Bom

Hardcore

Mito

Neutro

Users who are viewing this thread

Estatísticas online

Em alta

Novos membros

Stay Connected