[JawsPlus]

How to make VIP expire in real time

This is code

Код:

COMMAND:setvip(playerid,params[])
{
    if(!CmdLevelCheck(playerid,"setmoney")) return CmdLevelError(playerid,"setmoney");
    {
    new targetid,Level ,file[256];
    if(sscanf(params, "ud", targetid, Level)) return SendClientMessage(playerid, COLOR_RED,"[USAGE]:{FFFFFF}/setvip [playerid] [level 1/3]");
    if(!IsPlayerConnected(targetid)) return SendClientMessage(playerid,COLOR_RED, "[ERROR]:{FFFFFF}This player is offline");
    if(Level > 3) return SendClientMessage(playerid, COLOR_RED, "[ERROR]:{fFFFFF}Max VIP level is 3");
    if(PInfo[targetid][pVIP] == Level)return SendClientMessage(playerid, COLOR_RED,"[ERROR]:{FFFFFF}This player is already with this vip level.");
 	{
	    new name[50],string[390],str[390],tname[50];
	    GetPlayerName(playerid,name,sizeof(name));
	    GetPlayerName(targetid,tname,sizeof(tname));
	    format(file, sizeof(file), PATH, name);
	    dini_IntSet(file, "VIP",PInfo[playerid][pVIP]);
	    PInfo[targetid][pVIP] = Level;
	    format(str, sizeof(str),"{FF02A7}[ADMIN]:{FFFFFF}%s had set %s VIP level to %d.",name,tname,Level);
	    SendClientMessageToAll(0xFF9900AA,str);
		}
	}
	return 1;
}