#include <a_samp>
#include <Dini>
#include <dutils>
#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_ZOLD           0x33AA33AA
#define COLOR_PIROS             0xAA3333AA
#define COLOR_CITROM         0xFFFF00AA
#define COLOR_VKEK       0x33CCFFAA
#define COLOR_NARANCS          0xFF9900AA
#pragma tabsize 0
#define JatekosFajl                 \"VIP/%s.ini\"
public OnFilterScriptInit()
    {
print(\"*Vip System by ShoCk*\");
return 1;
    }
#endif
enum JATEKOS_ADAT {
    pNev[MAX_PLAYER_NAME],
Pip[16],
Vip_Szint
}
new Pinfo[MAX_PLAYERS][JATEKOS_ADAT];
public OnPlayerConnect(playerid)
{
SendClientMessage(playerid,COLOR_CITROM,\"Vip System By ShoCk\");
new file[100],Nev[MAX_PLAYER_NAME],Ip[16]; GetPlayerName(playerid,Nev,sizeof(Nev)); GetPlayerIp(playerid,Ip,sizeof(Ip)); format(file,sizeof(file),JatekosFajl,Nev);
if(!dini_Exists(file)) {
dini_Create(file);
dini_Set(file,\"Nev\",Nev);
dini_Set(file,\"Ip\",Ip);
dini_IntSet(file,\"Vip_Szint\",0);
}
Pinfo[playerid][Vip_Szint]                = dini_Int(file,\"Vip_Szint\");
return 1;
}
public OnPlayerDisconnect(playerid, reason)
{
new file[100];
format(file,sizeof(file),JatekosFajl,Pinfo[playerid][pNev]);
dini_Set(file,\"Nev\",Pinfo[playerid][pNev]);
dini_Set(file,\"Ip\",Pinfo[playerid][Pip]);
dini_IntSet(file,\"Vip_Szint\",Pinfo[playerid][Vip_Szint]);
Pinfo[playerid][Vip_Szint]  = 0;
return 1;
}
public OnPlayerCommandText(playerid, cmdtext[])
{
dcmd(vipad,6,cmdtext);
dcmd(vipszint,8,cmdtext);
return 0;
}
dcmd_vipad(playerid, params[])
{
    new file[100];
format(file,sizeof(file),JatekosFajl,Pinfo[playerid][pNev]);
    new string[128],string2[128];
new kerplayerid, szint;
new jatekosnev[MAX_PLAYER_NAME],idnev[MAX_PLAYER_NAME];
GetPlayerName(playerid, jatekosnev, MAX_PLAYER_NAME);
GetPlayerName(playerid,idnev,MAX_PLAYER_NAME);
if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, COLOR_PIROS, \"Nem vagy RCON admin, hogy használni tudd ezt a parancsot%\");
if(sscanf(params, \"ud\", kerplayerid, szint))return SendClientMessage(playerid, COLOR_PIROS, \"Használat: /vipad [Játékos ID/Játékos Név] [szint]\");
else if (kerplayerid == INVALID_PLAYER_ID)return SendClientMessage(playerid, COLOR_PIROS, \"A játékos nem elérhetõ!\");
else if (szint > 3)return SendClientMessage(playerid, COLOR_PIROS, \"Maximum VIP szint: 3\");
    else
{
        Pinfo[kerplayerid][Vip_Szint] = szint;
format(string,sizeof(string),\"Admin %s beállította a VIP szintedet! Jelenlegi szinted: %d\",jatekosnev,szint);
SendClientMessage(kerplayerid,COLOR_CITROM,string);
format(string2,sizeof(string2),\"%s VIP szintje %d\",idnev,szint);
SendClientMessageToAll(COLOR_CITROM,string2);
dini_IntSet(file,\"Vip_Szint\",Pinfo[playerid][Vip_Szint]);
}
return 1;
}
dcmd_vipszint(playerid, params[])
{
#pragma unused params
new string1[128],string2[128],string3[128];
format(string1,sizeof(string1),\"============================\");
format(string2,sizeof(string2),\"A te VIP szinted jelenleg: %d\",Pinfo[playerid][Vip_Szint]);
format(string3,sizeof(string3),\"============================\");
SendClientMessage(playerid,COLOR_CITROM,string1);
SendClientMessage(playerid,COLOR_CITROM,string2);
SendClientMessage(playerid,COLOR_CITROM,string3);
return 1;
}
dcmd_elet(playerid, params[])
{
#pragma unused dcmd_elet
if(Pinfo[playerid][Vip_Szint] >= 1)
{
    SendClientMessage(playerid, COLOR_NARANCS, \"Életed feltöltve! (100)\");
    SetPlayerHealth(playerid, 100);
}else SendClientMessage(playerid, PIROS, \"Nem vagy VIP!\");
return 1;
}
//------------------[sSCANF]-------------------------------------
stock sscanf(string[], format[], {Float,_}:...)
{
#if defined isnull
if (isnull(string))
#else
if (string[0] == 0 || (string[0] == 1 && string[1] == 0))
#endif
{
   return format[0];
}
#pragma tabsize 4
new
formatPos = 0,
stringPos = 0,
paramPos = 2,
paramCount = numargs(),
delim = \' \';
while (string[stringPos] && string[stringPos] <= \' \')
{
stringPos++;
}
while (paramPos < paramCount && string[stringPos])
{
switch (format[formatPos++])
{
   case \'\\0\':
   {
      return 0;
   }
   case \'i\', \'d\':
   {
      new
         neg = 1,
         num = 0,
         ch = string[stringPos];
      if (ch == \'-\')
      {
         neg = -1;
         ch = string[++stringPos];
      }
      do
      {
         stringPos++;
         if (\'0\' <= ch <= \'9\')
         {
            num = (num * 10) + (ch - \'0\');
         }
         else
         {
            return -1;
         }
      }
      while ((ch = string[stringPos]) > \' \' && ch != delim);
      setarg(paramPos, 0, num * neg);
   }
   case \'h\', \'x\':
   {
      new
         num = 0,
         ch = string[stringPos];
      do
      {
         stringPos++;
         switch (ch)
         {
            case \'x\', \'X\':
            {
               num = 0;
               continue;
            }
            case \'0\' .. \'9\':
            {
               num = (num << 4) | (ch - \'0\');
            }
            case \'a\' .. \'f\':
            {
               num = (num << 4) | (ch - (\'a\' - 10));
            }
            case \'A\' .. \'F\':
            {
               num = (num << 4) | (ch - (\'A\' - 10));
            }
            default:
            {
               return -1;
            }
         }
      }
      while ((ch = string[stringPos]) > \' \' && ch != delim);
      setarg(paramPos, 0, num);
   }
   case \'c\':
   {
      setarg(paramPos, 0, string[stringPos++]);
   }
   case \'f\':
   {
      new changestr[16], changepos = 0, strpos = stringPos;
      while(changepos < 16 && string[strpos] && string[strpos] != delim)
      {
         changestr[changepos++] = string[strpos++];
                }
      changestr[changepos] = \'\\0\';
      setarg(paramPos,0,_:floatstr(changestr));
   }
   case \'p\':
   {
      delim = format[formatPos++];
      continue;
   }
   case \'\\\'\':
   {
      new
         end = formatPos - 1,
         ch;
      while ((ch = format[++end]) && ch != \'\\\'\') {}
      if (!ch)
      {
         return -1;
      }
      format[end] = \'\\0\';
      if ((ch = strfind(string, format[formatPos], false, stringPos)) == -1)
      {
         if (format[end + 1])
         {
            return -1;
         }
         return 0;
      }
      format[end] = \'\\\'\';
      stringPos = ch + (end - formatPos);
      formatPos = end + 1;
   }
   case \'u\':
   {
      new
         end = stringPos - 1,
         id = 0,
         bool:num = true,
         ch;
      while ((ch = string[++end]) && ch != delim)
      {
         if (num)
         {
            if (\'0\' <= ch <= \'9\')
            {
               id = (id * 10) + (ch - \'0\');
            }
            else
            {
               num = false;
            }
         }
      }
      if (num && IsPlayerConnected(id))
      {
         setarg(paramPos, 0, id);
      }
      else
      {
         #if !defined foreach
            #define foreach(%1,%2) for (new %2 = 0; %2 < MAX_PLAYERS; %2++) if (IsPlayerConnected(%2))
            #define __SSCANF_FOREACH__
         #endif
         string[end] = \'\\0\';
         num = false;
         new
            name[MAX_PLAYER_NAME];
         id = end - stringPos;
         foreach (Player, playerid)
         {
            GetPlayerName(playerid, name, sizeof (name));
            if (!strcmp(name, string[stringPos], true, id))
            {
               setarg(paramPos, 0, playerid);
               num = true;
               break;
            }
         }
         if (!num)
         {
            setarg(paramPos, 0, INVALID_PLAYER_ID);
         }
         string[end] = ch;
         #if defined __SSCANF_FOREACH__
            #undef foreach
            #undef __SSCANF_FOREACH__
         #endif
      }
      stringPos = end;
   }
   case \'s\', \'z\':
   {
      new
         i = 0,
         ch;
      if (format[formatPos])
      {
         while ((ch = string[stringPos++]) && ch != delim)
         {
            setarg(paramPos, i++, ch);
         }
         if (!i)
         {
            return -1;
         }
      }
      else
      {
         while ((ch = string[stringPos++]))
         {
            setarg(paramPos, i++, ch);
         }
      }
      stringPos--;
      setarg(paramPos, i, \'\\0\');
   }
   default:
   {
      continue;
   }
}
while (string[stringPos] && string[stringPos] != delim && string[stringPos] > \' \')
{
   stringPos++;
}
while (string[stringPos] && (string[stringPos] == delim || string[stringPos] <= \' \'))
{
   stringPos++;
}
paramPos++;
}
do
{
if ((delim = format[formatPos++]) > \' \')
{
   if (delim == \'\\\'\')
   {
      while ((delim = format[formatPos++]) && delim != \'\\\'\') {}
   }
   else if (delim != \'z\')
   {
      return delim;
   }
}
}
while (delim > \' \');
return 0;
}