Simple PMs! 0.1 ~

#include <a_samp>
#include <zcmd>
#include <sscanf2>

#define COLOR_RED       /**/    0xFF0000AA
#define COLOR_YELLOW    /**/    0xFFFF00AA
#define COLOR_GREEN     /**/    0x66CC99AA

#pragma tabsize 0

public OnFilterScriptInit()
{
    print("--------------------------------");
    print("---Simple PM System! by rooT.---");
    print("-------------Loaded-------------");
    print("--------------------------------");
    return 1;
}

public OnFilterScriptExit()
{
    print("--------------------------------");
    print("---Simple PM System! by rooT.---");
    print("------------Unloaded------------");
    print("--------------------------------");

    for(new i = 0; i < MAX_PLAYERS; i++)
    {
        if(IsPlayerConnected(i))
        {
            DeletePVar(i, "Received");
            DeletePVar(i, "LastPmFrom");
            DeletePVar(i, "PMs");
        }
    }
    return 1;
}

new str[128], pname[MAX_PLAYER_NAME], msje[80], playerid2;

CMD:pm(playerid, params[])
{
    if(!sscanf(params, "rs[80]", playerid2, msje))
    {
        if(playerid2 == playerid) return SendClientMessage(playerid, COLOR_RED, "No puedes enviarte un PM a ti mismo.");
        if(!IsPlayerConnected(playerid2)) return SendClientMessage(playerid, COLOR_RED, "Este jugador no esta conectado.");
        if(GetPVarInt(playerid2, "PMs") == 0) return SendClientMessage(playerid, COLOR_RED, "Este jugador ha desactivado los PMs!");

        GetPlayerName(playerid, pname, sizeof(pname));

        format(str, sizeof(str), "PM de %s: %s", pname, msje);
        SendClientMessage(playerid2, COLOR_GREEN, str);

        SetPVarInt(playerid2, "Received", 1);
        SetPVarInt(playerid2, "LastPmFrom", playerid);

    } else return SendClientMessage(playerid, COLOR_RED, "Uso: /pm <playerid> <mensaje>");
    return 1;
}

CMD:r(playerid, params[])
{
    if(GetPVarInt(playerid, "Received") == 0) return SendClientMessage(playerid, COLOR_RED, "No has recibido ningun PM.");
    if(!sscanf(params, "s[80]", msje))
    {
        playerid2 = GetPVarInt(playerid, "LastPmFrom");

        if(!IsPlayerConnected(playerid2)) return SendClientMessage(playerid, COLOR_RED, "Este jugador no esta conectado.");
        if(GetPVarInt(playerid2, "PMs") == 0) return SendClientMessage(playerid, COLOR_RED, "Este jugador ha desactivado los PMs!");

        GetPlayerName(playerid, pname, sizeof(pname));

        format(str, sizeof(str), "PM de %s: %s", pname, msje);
        SendClientMessage(playerid2, COLOR_GREEN, str);

        SetPVarInt(playerid2, "Received", 1);
        SetPVarInt(playerid2, "LastPmFrom", playerid);

        SetPVarInt(playerid, "Received", 0);
        DeletePVar(playerid, "LastPmFrom");

    } else return SendClientMessage(playerid, COLOR_RED, "Uso: /r <mensaje>");
    return 1;
}

CMD:switchpm(playerid, params[])
{
    if(GetPVarInt(playerid, "PMs") == 1)
    {
        SetPVarInt(playerid, "PMs", 0);
        SendClientMessage(playerid, COLOR_YELLOW, "Ya no recibiras PMs de otros usuarios!");
    }
    else
    {
        SetPVarInt(playerid, "PMs", 1);
        SendClientMessage(playerid, COLOR_YELLOW, "Ahora recibiras PMs de otros usuarios!");
    }
    return 1;
}