#include <a_samp>
#include <ZCMD>
#include <sscanf2>
#include <dini>

#define COLOR_GREY 0xAFAFAFAA
#define COLOR_LIGHTRED 0xFF6347AA

new PKicks[MAX_PLAYERS], PWarns[MAX_PLAYERS], PBanned[MAX_PLAYERS],
PBanReason[MAX_PLAYERS][50];

CMD:kick(playerid,params[])
{
    new string[256],id,name[10],reason[50];
    if(sscanf(params,"us[10]s[50]",id,name,reason))
        return SendClientMessage(playerid,COLOR_GREY,"[SYNTAX]:/kick [ID/PartOfName] [Shown Name] [Reason]");
    if(!IsPlayerConnected(id) || id == INVALID_PLAYER_ID)
        return SendClientMessage(playerid,COLOR_GREY,"INVALID PLAYERID!");
    format(string, sizeof(string), "SERVER: %s have been kicked by %s, reason: %s.",pName(id),name,reason);
    SendClientMessageToAll(COLOR_LIGHTRED,string);
    PKicks[id]++;
    Kick(playerid);
    return 1;
}

CMD:warn(playerid,params[])
{
    new string[256],id,name[10],reason[50];
    if(sscanf(params,"us[10]s[50]",id,name,reason))
        return SendClientMessage(playerid,COLOR_GREY,"[SYNTAX]:/warn [ID/PartOfName] [Shown Name] [Reason]");
    if(!IsPlayerConnected(id) || id == INVALID_PLAYER_ID)
        return SendClientMessage(playerid,COLOR_GREY,"INVALID PLAYERID!");
    if(PWarns[id] > 2) {
        format(string, sizeof(string), "SERVER: %s have been banned by %s, reason: 3 Warnings.",pName(id),name,reason);
        SendClientMessageToAll(COLOR_LIGHTRED,string);
        PBanned[id] = 1;
        format(PBanReason[playerid],128,"%s","3 Warnings");
        BanEx(id,"3 Warnings");
        return 0;
    }
    format(string, sizeof(string), "SERVER: %s have been warned by %s, reason: %s.",pName(id),name,reason);
    SendClientMessageToAll(COLOR_LIGHTRED,string);
    PWarns[playerid]++;
    return 1;
}

CMD:unwarn(playerid,params[])
{
    new string[256],id,name[10],reason[50];
    if(sscanf(params,"us[10]s[50]",id,name,reason))
        return SendClientMessage(playerid,COLOR_GREY,"[SYNTAX]:/warn [ID/PartOfName] [Shown Name] [Reason]");
    if(!IsPlayerConnected(id) || id == INVALID_PLAYER_ID)
        return SendClientMessage(playerid,COLOR_GREY,"INVALID PLAYERID!");
    if(!PWarns[id])
        return SendClientMessage(playerid,COLOR_GREY,"This player have no warnings!");
    format(string, sizeof(string), "SERVER: %s have been unwarned by %s, reason: %s.",pName(id),name,reason);
    SendClientMessageToAll(COLOR_LIGHTRED,string);
    PWarns[playerid]--;
    return 1;
}

CMD:ban(playerid,params[])
{
    new string[256],id,name[10],reason[50];
    if(sscanf(params,"us[10]s[50]",id,name,reason))
        return SendClientMessage(playerid,COLOR_GREY,"[SYNTAX]:/ban [ID/PartOfName] [Shown Name] [Reason]");
    if(!IsPlayerConnected(id) || id == INVALID_PLAYER_ID)
        return SendClientMessage(playerid,COLOR_GREY,"INVALID PLAYERID!");
    format(string, sizeof(string), "SERVER: %s have been banned by %s, reason: %s.",pName(id),name,reason);
    SendClientMessageToAll(COLOR_LIGHTRED,string);
    format(PBanReason[playerid],128,"%s",reason);
    PBanned[id] = 1;
    BanEx(id,reason);
    return 1;
}

CMD:unban(playerid,params[])
{
    new string[256],name[MAX_PLAYER_NAME],file[MAX_PLAYER_NAME+5];
    if(sscanf(params,"s[MAX_PLAYER_NAME]",name))
        return SendClientMessage(playerid,COLOR_GREY,"[SYNTAX]:/unban [PlayerName]");
    format(file,sizeof(file),"%s.ini",name);
    if(!dini_Exists(file))
        return SendClientMessage(playerid,COLOR_GREY,"Player file not exists!");
    if(!dini_Int(file,"Banned"))
        return SendClientMessage(playerid,COLOR_GREY,"This player is not banned!");
    dini_IntSet(file,"Banned",0);
    dini_Set(file,"BanReason","None");
    format(string, sizeof(string), "SERVER: %s have been unbanned.",name);
    SendClientMessage(playerid,COLOR_LIGHTRED,string);
    return 1;
}

CMD:playerstats(playerid,params[])
{
    new string[256],id;
    if(sscanf(params,"u",id))
        return SendClientMessage(playerid,COLOR_GREY,"[SYNTAX]:/playerstats [ID/PartOfName]");
    if(!IsPlayerConnected(id) || id == INVALID_PLAYER_ID)
        return SendClientMessage(playerid,COLOR_GREY,"INVALID PLAYERID!");
    format(string,sizeof(string),"|| Name: %s. || Warnings: %d. || Kicks: %d.",pName(id),PWarns[playerid],PKicks[playerid]);
    SendClientMessage(playerid,COLOR_LIGHTRED,string);
    return 1;
}

CMD:playerstats2(playerid,params[])
{
    new string[256],name[MAX_PLAYER_NAME];
    if(sscanf(params,"s[MAX_PLAYER_NAME]",name))
        return SendClientMessage(playerid,COLOR_GREY,"[SYNTAX]:/playerstats2 [Name]");
    new file[MAX_PLAYER_NAME+5];
    format(file,sizeof(file),"%s.ini",name);
    if(!dini_Exists(file))
        return SendClientMessage(playerid,COLOR_GREY,"Player file not exists!");
    format(string,sizeof(string),"|| Name: %s. || Warnings: %d. || Kicks: %d. || Banned: %d. || BanReason: %s.",name,dini_Int(file,"Warnings"),dini_Int(file,"Kicks"),dini_Int(file,"Banned"),dini_Get(file,"BanReason"));
    SendClientMessage(playerid,COLOR_LIGHTRED,string);
    return 1;
}

public OnPlayerConnect(playerid)
{
    format(PBanReason[playerid],50,"%s","None");
    PBanned[playerid] = 0;
    PKicks[playerid] = 0;
    PWarns[playerid] = 0;

    if(!dini_Exists(pFile(playerid))) {
        dini_Create(pFile(playerid));
        dini_IntSet(pFile(playerid),"Banned",PBanned[playerid]);
        dini_Set(pFile(playerid),"BanReason","None");
        dini_IntSet(pFile(playerid),"Kicks",PKicks[playerid]);
        dini_IntSet(pFile(playerid),"Warnings",PWarns[playerid]);
    } else {
        PBanned[playerid] = dini_Int(pFile(playerid),"Banned");
        format(PBanReason[playerid],50,"%s",dini_Get(pFile(playerid),"BanReason"));
        PKicks[playerid] = dini_Int(pFile(playerid),"Kicks");
        PWarns[playerid] = dini_Int(pFile(playerid),"Warnings");

        if(PBanned[playerid] != 0) {
            new string[256];
            format(string,sizeof(string),"SERVER: You are banned from this server, reason: %s.",PBanReason[playerid]);
            SendClientMessage(playerid,COLOR_LIGHTRED,string);
            Kick(playerid);
            return 0;
        }
    }
    return 1;
}

public OnPlayerDisconnect(playerid, reason)
{
    if(dini_Exists(pFile(playerid))) {
        dini_IntSet(pFile(playerid),"Banned",PBanned[playerid]);
        dini_Set(pFile(playerid),"BanReason",PBanReason[playerid]);
        dini_IntSet(pFile(playerid),"Kicks",PKicks[playerid]);
        dini_IntSet(pFile(playerid),"Warnings",PWarns[playerid]);
    }
    return 1;
}


stock pName(playerid) {
    new name[MAX_PLAYER_NAME];
    GetPlayerName(playerid, name, sizeof(name));
    return name;
}

stock pFile(playerid) {
    new file[MAX_PLAYER_NAME+5];
    format(file,sizeof(file),"%s.ini",pName(playerid));
    return file;
}