Etch's Base Vip System

#include <a_samp>
#include <Dini>
#include <dutils>
#include <sscanf2>
#define FILTERSCRIPT
#if defined FILTERSCRIPT
#define dcmd(%1,%2,%3) if ((strcmp((%3)[1], #%1, true, (%2)) == 0) && ((((%3)[(%2) + 1] == 0) && (dcmd_%1(playerid, "")))||(((%3)[(%2) + 1] == 32) && (dcmd_%1(playerid, (%3)[(%2) + 2]))))) return 1
#define COLOR_GREEN           0x33AA33AA
#define COLOR_RED             0xAA3333AA
#define COLOR_YELLOW          0xFFFF00AA
#define COLOR_LIGHTBLUE       0x33CCFFAA
#define COLOR_ORANGE          0xFF9900AA
#pragma tabsize 0
#define PlayerFile              "VIP/%s.ini"
public OnFilterScriptInit()
    {
    print("*Vip System By Etch*");
    return 1;
    }
#endif
enum PLAYER_MAIN {
    pName[MAX_PLAYER_NAME],
    Pip[16],
    Vip_Level
}
new Pinfo[MAX_PLAYERS][PLAYER_MAIN];
public OnPlayerConnect(playerid)
{
    SendClientMessage(playerid,COLOR_YELLOW,"Vip System By Etch");
    new file[100],Name[MAX_PLAYER_NAME],Ip[16]; GetPlayerName(playerid,Name,sizeof(Name)); GetPlayerIp(playerid,Ip,sizeof(Ip)); format(file,sizeof(file),PlayerFile,Name);
    if(!dini_Exists(file)) {
        dini_Create(file);
        dini_Set(file,"Name",Name);
        dini_Set(file,"Ip",Ip);
        dini_IntSet(file,"Vip_Level",0);
    }
    Pinfo[playerid][Vip_Level]                = dini_Int(file,"Vip_Level");
    return 1;
}
public OnPlayerDisconnect(playerid, reason)
{
    new file[100];
    format(file,sizeof(file),PlayerFile,Pinfo[playerid][pName]);
    dini_Set(file,"Name",Pinfo[playerid][pName]);
    dini_Set(file,"Ip",Pinfo[playerid][Pip]);
    dini_IntSet(file,"Vip_Level",Pinfo[playerid][Vip_Level]);
    Pinfo[playerid][Vip_Level]  = 0;
    return 1;
}
public OnPlayerCommandText(playerid, cmdtext[])
{
dcmd(setvip,6,cmdtext);
dcmd(viplevel,8,cmdtext);
return 0;
}

dcmd_setvip(playerid, params[])
{
    new file[100];
    format(file,sizeof(file),PlayerFile,Pinfo[playerid][pName]);
    new string[128],string2[128];
    new giveplayerid, level;
    new playername[MAX_PLAYER_NAME],idname[MAX_PLAYER_NAME];
    GetPlayerName(playerid, playername, MAX_PLAYER_NAME);
    GetPlayerName(playerid,idname,MAX_PLAYER_NAME);
    if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, COLOR_RED, "You Have To Be Rcon Admin To Use This Command!");
    if(sscanf(params, "ud", giveplayerid, level))return SendClientMessage(playerid, COLOR_RED, "Usage: /setvip [Playerid/Partname] [Level]");
    else if (giveplayerid == INVALID_PLAYER_ID)return SendClientMessage(playerid, COLOR_RED, "Player Is Not Connected");
    else if (level > 3)return SendClientMessage(playerid, COLOR_RED, "Maximum Vip Level Is 3");
    else
    {
        Pinfo[giveplayerid][Vip_Level] = level;
        format(string,sizeof(string),"Administrator %s Set Your Vip Level To %d",playername,level);
        SendClientMessage(giveplayerid,COLOR_YELLOW,string);
        format(string2,sizeof(string2),"%s Vip Level Is Now %d",idname,level);
        SendClientMessageToAll(COLOR_YELLOW,string2);
        dini_IntSet(file,"Vip_Level",Pinfo[playerid][Vip_Level]);
    }
    return 1;
}
dcmd_viplevel(playerid, params[])
{
#pragma unused params
new string1[128],string2[128],string3[128];
format(string1,sizeof(string1),"============================");
format(string2,sizeof(string2),"Your V.I.P Level Is %d",Pinfo[playerid][Vip_Level]);
format(string3,sizeof(string3),"============================");
SendClientMessage(playerid,COLOR_YELLOW,string1);
SendClientMessage(playerid,COLOR_YELLOW,string2);
SendClientMessage(playerid,COLOR_YELLOW,string3);
return 1;
}