[FS] Vip System Ver. BETA!

// Sistema vip por: [iPs]SuYaNw
// iPs  Team ~
// Versão beta, então tire o olho!

#include <a_samp>

#define MAX_MONEY (10000)

new
    Vip[MAX_PLAYERS],
    string[128];

public OnPlayerConnect(playerid)
{
    Vip[playerid] = 0xFFFFFF;
    return 1;
}
public OnPlayerCommandText(playerid, cmdtext[])
{

    if(!strcmp(cmdtext,"/vcomandos", true))
    {
        if(IsPlayerAdmin(playerid))
        {
            SendClientMessage(playerid, 0xFF00FF,"[VIP]: Digite: /Darvip para dar vip para algum player");
        }
        SendClientMessage(playerid, -1,"[VIP]: /Vips, /Vidav, /Coletev, /Granav, /Invisivel, /Nickv, /Vnn");
        SendClientMessage(playerid, -1,"[VIP]: /Irv.");
        SendClientMessage(playerid, -1,"Atenção: Alguns comandos estão separados por quantidade,");
        SendClientMessage(playerid, -1,"Dependendo do nivel vip você pode usálos por uma quantidade.");
        return 1;
    }
    if(!strcmp(cmdtext,"/darvip",true,6))
    {
        if(!strlen(cmdtext[8]) || !strlen(cmdtext[10]))
            return SendClientMessage(playerid, -1,"Correto: /Darvip [ID] [1-3]");

        if(!IsPlayerConnected(strval(cmdtext[8])))
            return SendClientMessage(playerid, -1,"Player não conectado");

        if(0 < strval(cmdtext[10]) > 3)
            return SendClientMessage(playerid, -1,"o Nível máximo é de 1 até 3");

        Vip[strval(cmdtext[8])] = strval(cmdtext[11]) ;

        format(string, 100,"[INFO]: o Administrador %s[ID:%i] deu a você membro vip %i (%s)",GetNick(strval(cmdtext[8])), playerid, strval(cmdtext[10]),Ranking(strval(cmdtext[8])));
        SendClientMessage(strval(cmdtext[8]), -1, string);

        format(string, 100,"[INFO]: Você deu à %s[ID:%i]  membro vip %i (%s)",GetNick(strval(cmdtext[8])), strval(cmdtext[8]), strval(cmdtext[10]),Ranking(strval(cmdtext[8])));
        SendClientMessage(playerid, -1, string);
        return true;
    }
    if(!strcmp(cmdtext,"/Vips", true))
    {
        static bool: result;
        for(new i; i < MAX_PLAYERS; ++i)
        {
            if(IsPlayerConnected(i) && Vip[i] > 0)
            {
                format(string, sizeof(string),"[VIPS] Nome: %s[ID:%i] Nivel: %i",GetNick(i),i,Vip[i]);
                SendClientMessage(playerid, -1, string);
                result = true;
            }
        }
        if(!result)
            return SendClientMessage(playerid, -1,"No momento não se encontra nenhum membro vip.");
        return true;
    }
    if(!strcmp(cmdtext,"/vidav", true))
    {
        if(Vip[playerid] < 0)
            return SendClientMessage(playerid, -1,"[ERRO]: Você não tem nível suficiente para realizar este comando.");

        SetPlayerHealth(playerid, 100);

        format(string, sizeof(string),"[VIP]: %s[ID:%i] Acabou de comprar vida!", GetNick(playerid), playerid);
        SendMessageForProx(playerid, 50.0, -1, string);
        return true;
    }
    if(!strcmp(cmdtext,"/coletev", true))
    {
        if(Vip[playerid] < 0)
            return SendClientMessage(playerid, -1,"[ERRO]: Você não tem nível suficiente para realizar este comando.");

        SetPlayerHealth(playerid, 100);

        format(string, sizeof(string),"[VIP]: %s[ID:%i] Acabou de comprar colete!", GetNick(playerid), playerid);
        SendMessageForProx(playerid, 50.0, -1, string);
        return true;
    }
    if(!strcmp(cmdtext,"/armav", true,5))
    {
        if(Vip[playerid] < 0)
            return SendClientMessage(playerid, -1,"[ERRO]: Você não tem nível suficiente para realizar este comando.");

        if(!strlen(cmdtext[7]))
            return SendClientMessage(playerid, -1,"[INFO]: Digite: /Armav [ID]");

        GivePlayerWeapon(playerid, strval(cmdtext[7]), 100);

        format(string, sizeof(string),"[VIP]: %s[ID:%i] Acabou de comprar a arma %i!", GetNick(playerid), playerid, strval(cmdtext[7]));
        SendMessageForProx(playerid, 50.0, -1, string);
        return true;
    }
    if(!strcmp(cmdtext,"/granav", true, 6))
    {
        if(Vip[playerid] < 0)
            return SendClientMessage(playerid, -1,"[ERRO]: Você não tem nível suficiente para realizar este comando.");

        if(strval(cmdtext[8]) > MAX_MONEY)
            return SendClientMessage(playerid, -1,"[ERRO]: o dinheiro pedido é maior que o limite!");

        GivePlayerMoney(playerid, strval(cmdtext[8]));

        format(string, sizeof(string),"[VIP]: %s[ID:%i] Acabou de receber grana!", GetNick(playerid), playerid);
        SendMessageForProx(playerid, 50.0, -1, string);
        return true;
    }
    if(!strcmp(cmdtext,"/invisivel", true))
    {
        if(Vip[playerid] < 0)
            return SendClientMessage(playerid, -1,"[ERRO]: Você não tem nível suficiente para realizar este comando.");

        format(string, sizeof(string),"[VIP]: %s[ID:%i] Acabou de se esconder no mapa!", GetNick(playerid), playerid);
        SendMessageForProx(playerid, 50.0, -1, string);

        for(new i; i < MAX_PLAYERS; ++i)
        {
            if(IsPlayerConnected(i) && Vip[i] < 2)
            {
                SetPlayerMarkerForPlayer(playerid, i, GetPlayerColor(i));
            }
        }
        return true;
    }
    if(!strcmp(cmdtext,"/nickv", true,4))
    {
        if(Vip[playerid] < 0)
            return SendClientMessage(playerid, -1,"[ERRO]: Você não tem nível suficiente para realizar este comando.");

        if(!strlen(cmdtext[6]))
            return SendClientMessage(playerid, -1,"[ERRO]: Correto: /Nome [Novo Nome]");

        if(3 < strlen(cmdtext[6]) > 24)
            return SendClientMessage(playerid, -1,"[ERRO]: o Nome tem que ser maior que 3 e menor que 24 caracteres.");

        static
            string2[24];

        GetPlayerName(playerid, string2, 24);
        SetPlayerName(playerid, cmdtext[6]);

        format(string, sizeof(string),"[VIP]: %s[ID:%i] Acabou de mudar de nick. para %s!", string2, playerid, GetNick(playerid));
        SendMessageForProx(playerid, 50.0, -1, string);
        return true;
    }
    if(!strcmp(cmdtext,"/vnn", true,3))
    {
        if(Vip[playerid] < 2)
            return SendClientMessage(playerid, -1,"[ERRO]: Você não tem nível suficiente para realizar este comando.");

        format(string, sizeof(string),"~r~[VIP]~b~%s~w~:%s",GetNick(playerid), cmdtext[7]);
        GameTextForPlayer(strval(cmdtext[5]), string, 3000, 4);

        format(string, sizeof(string),"[VIP]: %s[ID:%i] Anunciou para o %s[ID:%i] Mensagem:%s", GetNick(playerid), playerid, GetNick(strval(cmdtext[5])), strval(cmdtext[5]), cmdtext[7]);
        SendMessageToAdmins(-1, string);
        return true;
    }
    if(!strcmp(cmdtext,"/irv", true, 3))
    {
        if(Vip[playerid] < 3)
            return SendClientMessage(playerid, -1,"[ERRO]: Você não tem nível suficiente para realizar este comando.");

        if(!strval(cmdtext[5]))
            return SendClientMessage(playerid, -1,"[ERRO]: Correto: /Irv [Id do player]");

        static
            Float:x_,Float:Y_,Float:Z_, vw, inter;

        GetPlayerPos(strval(cmdtext[5]), x_, Y_, Z_);
        inter = GetPlayerInterior(strval(cmdtext[5]));
        vw = GetPlayerVirtualWorld(strval(cmdtext[5]));

        SetPlayerPos(playerid, x_, Y_, Z_);
        SetPlayerInterior(playerid, inter);
        SetPlayerVirtualWorld(playerid, vw);

        format(string, sizeof(string),"[VIP]: Você foi até %s[ID:%i]", GetNick(strval(cmdtext[5])), strval(cmdtext[5]));
        SendClientMessage(playerid, -1, string);
        format(string, sizeof(string),"[VIP]: %s[ID:%i] foi até %s[ID:%i]",GetNick(playerid), playerid, GetNick(strval(cmdtext[5])), strval(cmdtext[5]));
        SendMessageToAdmins(-1, string);
        SendMessageForProx(playerid, 50.0, -1, string);
        return true;
    }
    return 0;
}
stock GetNick(p)
{
    static Name[24];
    GetPlayerName(p, Name,24);
    return Name;
}
stock SendMessageForProx(playerid, Float:range,color, messageid[])
{
    static
        Float:_Y,
        Float:_X,
        Float:_Z;
    GetPlayerPos(playerid, _X, _Y,_X);
    for(new i; i < MAX_PLAYERS; ++i)
    {
        if(IsPlayerConnected(i))
        {
            if(IsPlayerInRangeOfPoint(i, range, _X,_Y,_Z))
            {
                SendClientMessage(i, color, messageid);
            }
        }
    }
}
stock SendMessageToAdmins(color, msg[])
{
    for(new i; i < MAX_PLAYERS; ++i)
    {
        if(IsPlayerConnected(i) && IsPlayerAdmin(i))
        {
            SendClientMessage(i, color, msg);
        }
    }
}
Ranking(pid)
{
    static a[50];
    if(Vip[pid] == 0) a = "Player Regular";
    if(Vip[pid] == 1) a = "Vip Ajudante";
    if(Vip[pid] == 2) a = "Vip Colaborador";
    if(Vip[pid] == 3) a = "Vip Master";
    return a;
}