CMD:warn(playerid,params[])
{
    if(AccInfo[playerid][Level] >= 3)
    {
        new Index;
        new tmp[256];  tmp  = strtok(params,Index);
        new tmp2[256]; tmp2 = strtok(params,Index);

        if(isnull(tmp) || isnull(tmp2)) return
        Inter_SendClientMessage(playerid, LIGHTBLUE2, "Usage: /warn [PlayerID] [Reason]") &&
        Inter_SendClientMessage(playerid, orange, "Function: Will give a Warning in specified player");
        new warned = strval(tmp);
        new str[128];
        if(AccInfo[warned][Level] == ServerInfo[MaxAdminLevel] && AccInfo[playerid][Level] != ServerInfo[MaxAdminLevel])
        return Inter_SendClientMessage(playerid,red,"ERROR: You cannot use this command on this admin");
        if(IsPlayerConnected(warned) && warned != INVALID_PLAYER_ID)
         {
            if(warned != playerid)
             {
                SendCommandToAdmins(playerid,"Warn");
                AccInfo[warned][Warnings]++;
                if( AccInfo[warned][Warnings] == MAX_WARNINGS)
                {
                format(str, sizeof (str), "|- Administrator \"%s\" has Ban \"%s\". | Reason: %s (Warnings: %d/%d) -|", pName(playerid), pName(warned), params[1+strlen(tmp)], AccInfo[warned][Warnings], MAX_WARNINGS);
                Inter_SendClientMessageToAll(lightred, str);
                SaveIn("KickLog",str);
                Ban(warned);
                return AccInfo[warned][Warnings] = 0;
                }
                else
                {
                format(str, sizeof (str), "|- Administrator \"%s\" has given \"%s\" a Warning. | Reason: %s (Warnings: %d/%d) -|", pName(playerid), pName(warned), params[1+strlen(tmp)], AccInfo[warned][Warnings], MAX_WARNINGS);
                return Inter_SendClientMessageToAll(yellow, str);
                }
            }
            else return Inter_SendClientMessage(playerid, red, "ERROR: You cannot warn yourself");
        }
        else return ErrorMessages(playerid, 2);
    }
    else return ErrorMessages(playerid, 1);
}