SA-MP Forums Archive
[AJUDA] Admins poder ler pms - Printable Version

+- SA-MP Forums Archive (https://sampforum.blast.hk)
+-- Forum: Non-English (https://sampforum.blast.hk/forumdisplay.php?fid=9)
+--- Forum: Languages (https://sampforum.blast.hk/forumdisplay.php?fid=33)
+---- Forum: Português/Portuguese (https://sampforum.blast.hk/forumdisplay.php?fid=34)
+---- Thread: [AJUDA] Admins poder ler pms (/showthread.php?tid=223169)



[AJUDA] Admins poder ler pms - junioor - 09.02.2011

Boa noite!
Gostaria que vocкs me ajudacem nesse sistema para eu poder colocar para todos os administradores poder ler os pm's dos jogadores..

Sistema:
pawn Код:
#include <a_samp>
#include "../include/gl_common.inc"

#define ADMINFS_MESSAGE_COLOR 0xFF444499
#define PM_INCOMING_COLOR     0xFFFF22AA
#define PM_OUTGOING_COLOR     0xFFCC2299

//------------------------------------------------

public OnFilterScriptInit()
{
    return 1;
}

//------------------------------------------------

public OnPlayerCommandText(playerid, cmdtext[])
{
    new cmd[256];
    new tmp[256];
    new Message[256];
    new gMessage[256];
    new pName[MAX_PLAYER_NAME+1];
    new iName[MAX_PLAYER_NAME+1];
    new idx;
   
    cmd = strtok(cmdtext, idx);

    // PM Command
    if(strcmp("/pm", cmd, true) == 0)
    {
        tmp = strtok(cmdtext,idx);
       
        if(!strlen(tmp) || strlen(tmp) > 5) {
            SendClientMessage(playerid,ADMINFS_MESSAGE_COLOR,"Use: /pm (id) (message)");
            return 1;
        }
       
        new id = strval(tmp);
        gMessage = strrest(cmdtext,idx);
       
        if(!strlen(gMessage)) {
            SendClientMessage(playerid,ADMINFS_MESSAGE_COLOR,"Use: /pm (id) (message)");
            return 1;
        }
       
        if(!IsPlayerConnected(id)) {
            SendClientMessage(playerid,ADMINFS_MESSAGE_COLOR,"/pm : ID inexistente!");
            return 1;
        }
       
        if(playerid != id) {
            GetPlayerName(id,iName,sizeof(iName));
            GetPlayerName(playerid,pName,sizeof(pName));
            format(Message,sizeof(Message),">> %s(%d): %s",iName,id,gMessage);
            SendClientMessage(playerid,PM_OUTGOING_COLOR,Message);
            format(Message,sizeof(Message),"** %s(%d): %s",pName,playerid,gMessage);
            SendClientMessage(id,PM_INCOMING_COLOR,Message);
            PlayerPlaySound(id,1085,0.0,0.0,0.0);
           
            printf("PM: %s",Message);
           
        }
        else {
            SendClientMessage(playerid,ADMINFS_MESSAGE_COLOR,"Voce nao pode mandar um pm para si mesmo!");
        }
        return 1;
    }
    return 0;
}



Re: [AJUDA] Admins poder ler pms - GuikBretas - 09.02.2011

pawn Код:
e: new string[100]; //No comeзo do GM
if(IsPlayerAdmin(playerid)) //No Comando
{
    format(string, sizeof(string), "Sistema LerPM: [%s](%d): %s", pName, playerid, gMessage);
    SendClientMessage(playerid,  0xE5C43EAA, string);
}
Vк se funciona.


Re: [AJUDA] Admins poder ler pms - zSuYaNw - 09.02.2011

Quote:
Originally Posted by GuikBretas
Посмотреть сообщение
pawn Код:
e: new string[100]; //No comeзo do GM
if(IsPlayerAdmin(playerid)) //No Comando
{
    format(string, sizeof(string), "Sistema LerPM: [%s](%d): %s", pName, playerid, gMessage);
    SendClientMessage(playerid,  0xE5C43EAA, string);
}
Vк se funciona.
ERRADO!


Fiz esta stock para ucк:
pawn Код:
stock SendMessageToAdmins(cor, message[])
{
       for(new i; i < MAX_PLAYERS; ++i)
       {
              if(IsPlayerConnected(i))
              {
                     if(IsPlayerAdmin(i))
                     {
                             SendClientMessage(i, cor, message[])
                     }
               }
       }
}
ussage:

pawn Код:
SendMessageToAdmins(VERMELHO, string);