Level and Exp System By Xav212

/*==============================================================================
    Credits:
        - Xaviour212, make this script
        - Leingod, helping me
        - Dracoblue, dini and dcmd
        - Y_Less, for sscanf
=====================************************===================================
    Functions:
        - SetPlayerExp(playerid, exp)
        - GivePlayerExp(playerid, exp)
        - GetPlayerExp(playerid)
        - SetPlayerLevel(playerid, level)
        - GivePlayerLevel(playerid, level)
        - GetPlayerLevel(playerid)
        - Payday(playerid)
==============================================================================*/

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

#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 Green 0x16EB43FF

enum PData
{
    EXP,
    Level
};
new PlayerInfo[MAX_PLAYERS][PData];
new file2[256];

forward Payday(playerid);

public OnFilterScriptInit()
{
    print("\n==========================================");
    print(" Exp and Level System by Xaviour212 Loaded");
    print("==========================================\n");
    for(new j = 0; j < MAX_PLAYERS; j++)
    {
        SetTimerEx("Payday",1*60*60*1000,true,"i",j);
    }
    return 1;
}

public OnFilterScriptExit()
{
    return 1;
}

public OnPlayerConnect(playerid)
{
    if(!dini_Exists(PFile(playerid)))
    {
        dini_Create(PFile(playerid));
        SetPlayerScore(playerid, GetPlayerLevel(playerid));
        GivePlayerLevel(playerid, 1);
    }
    else
    {
        SetPlayerScore(playerid, GetPlayerLevel(playerid));
        PlayerInfo[playerid][EXP] = GetPlayerExp(playerid);
        PlayerInfo[playerid][Level] = GetPlayerLevel(playerid);
    }
    return 0;
}

public OnPlayerDeath(playerid, killerid, reason)
{
    new string[256];
    new Xp = 5*GetPlayerLevel(killerid);
    GivePlayerExp(killerid, 200-Xp);
    format(string, sizeof(string), "You has killed {FF0000}%s {16EB43}and get a {FFFFFF}%d {16EB43}exp", Gn(playerid), 200-Xp);
    SendClientMessage(killerid, Green, string);
    return 1;
}

public Payday(playerid)
{
    new Bonus = 500*GetPlayerLevel(playerid);
    new string[50];
    GivePlayerMoney(playerid, 2500+Bonus);
    format(string, sizeof(string), "~w~PayDay! ~n~~g~$%d", 2500+Bonus);
    GameTextForPlayer(playerid, string, 3000, 1);
}

public OnPlayerUpdate(playerid)
{
    new string[256];
    SetPlayerScore(playerid, GetPlayerLevel(playerid));
    if(GetPlayerExp(playerid) >= 1000)
    {
        if(GetPlayerLevel(playerid) <= 40)
        {
            GivePlayerLevel(playerid, 1);
            format(string, sizeof(string), "Congratulations! Your level has been increased to {FFFFFF}%d", GetPlayerLevel(playerid));
            SendClientMessage(playerid, Green, string);
            GameTextForPlayer(playerid, "~n~~n~~n~~n~~n~~n~~n~~w~Updating Score List...",3000,3);
            GivePlayerExp(playerid, - 1000);
        }
        else if(GetPlayerLevel(playerid) >= 40)
        {
            SetPlayerExp(playerid, 1000);
            SetPlayerLevel(playerid, 40);
        }
    }
    if(GetPlayerLevel(playerid) >= 40)
    {
        format(string, sizeof(string), "You have reached the maximum level", GetPlayerLevel(playerid));
        SendClientMessage(playerid, Green, string);
    }
    return 1;
}

SetPlayerExp(playerid, exp)
{
    dini_IntSet(PFile(playerid), "Exp", exp);
    PlayerInfo[playerid][EXP] = exp;
}

GivePlayerExp(playerid, exp)
{
    PlayerInfo[playerid][EXP] += exp;
    dini_IntSet(PFile(playerid), "Exp", PlayerInfo[playerid][EXP]);
}

SetPlayerLevel(playerid, level)
{
    PlayerInfo[playerid][Level] = level;
    dini_IntSet(PFile(playerid), "Level", PlayerInfo[playerid][Level]);
}

GivePlayerLevel(playerid, level)
{
    PlayerInfo[playerid][Level] += level;
    dini_IntSet(PFile(playerid), "Level", PlayerInfo[playerid][Level]);
}

stock GetPlayerExp(playerid) return dini_Int(PFile(playerid), "Exp");

stock GetPlayerLevel(playerid) return dini_Int(PFile(playerid), "Level");

stock Gn(playerid)
{
    new pname[24];
    GetPlayerName(playerid,pname,MAX_PLAYER_NAME);
    return pname;
}

stock PFile(playerid)
{
    format(file2,64,"Users/%s.ini",Gn(playerid));
    return file2;
}

/*================EXAMPLE COMMAND
public OnPlayerCommandText(playerid, cmdtext[])
{
    dcmd(setlevel, 8, cmdtext);
    dcmd(setexp, 6, cmdtext);
    dcmd(giveexp, 7, cmdtext);
    dcmd(getexp, 6, cmdtext);
    dcmd(givelevel, 9, cmdtext);
    dcmd(getlevel, 8, cmdtext);
    dcmd(paydayplayer, 12, cmdtext);
    dcmd(paydayall, 9, cmdtext);
    dcmd(getstatus, 9, cmdtext);
    return 0;
}

dcmd_setlevel(playerid, params[])//Set a player level
{
    new giveplayerid, amount;
    if(!sscanf(params, "dd", giveplayerid, amount)) return SendClientMessage(playerid, 0xFF0000AA, "{FF0000}[ERROR]{FFFFFF}Usage: /setlevel [PlayerID] [Level]");
    SetPlayerLevel(giveplayerid, amount);
    return 1;
}

dcmd_setexp(playerid, params[])// Set player exp
{
    new giveplayerid, amount;
    if(!sscanf(params, "dd", giveplayerid, amount)) return SendClientMessage(playerid, 0xFF0000AA, "{FF0000}[ERROR]{FFFFFF}Usage: /setexp [PlayerID] [Exp]");
    SetPlayerExp(playerid, amount);
    return 1;
}

dcmd_giveexp(playerid, params[])// Give player level
{
    new giveplayerid, amount;
    if(!sscanf(params, "dd", giveplayerid, amount)) return SendClientMessage(playerid, 0xFF0000AA, "{FF0000}[ERROR]{FFFFFF}Usage: /giveexp [PlayerID] [Exp]");
    GivePlayerExp(giveplayerid, amount);
    return 1;
}

dcmd_getexp(playerid, params[])//Get a player exp
{
    new giveplayerid, string[256];
    if(!sscanf(params, "d", giveplayerid)) return SendClientMessage(playerid, 0xFF0000AA, "{FF0000}[ERROR]{FFFFFF}Usage: /getexp [PlayerID]");
    format(string, sizeof(string), "{FF0000}%s{FFFFFF} having {A1CAF1}%d{FFFFFF} exp", Gn(giveplayerid), GetPlayerExp(giveplayerid));
    SendClientMessage(playerid, Green, string);
    return 1;
}

dcmd_givelevel(playerid, params[])//Give player level
{
    new giveplayerid, amount;
    if(!sscanf(params, "dd", giveplayerid, amount)) return SendClientMessage(playerid, 0xFF0000AA, "{FF0000}[ERROR]{FFFFFF}Usage: /givelevel [PlayerID] [Level]");
    GivePlayerLevel(giveplayerid, amount);
    return 1;
}

dcmd_getlevel(playerid, params[])//Get player level
{
    new giveplayerid, string[256];
    if(!sscanf(params, "d", giveplayerid)) return SendClientMessage(playerid, 0xFF0000AA, "{FF0000}[ERROR]{FFFFFF}Usage: /getlevel [PlayerID]");
    format(string, sizeof(string), "{FF0000}%s{FFFFFF} is a level{A1CAF1}%d{FFFFFF}.", Gn(giveplayerid), GetPlayerLevel(giveplayerid));
    SendClientMessage(playerid, Green, string);
    return 1;
}

dcmd_paydayplayer(playerid, params[])//Payday only for a one player
{
    new giveplayerid;
    if(!sscanf(params, "d", giveplayerid)) return SendClientMessage(playerid, 0xFF0000AA, "{FF0000}[ERROR]{FFFFFF}Usage: /payday [PlayerID]");
    Payday(giveplayerid);
    return 1;
}

dcmd_paydayall(playerid, params[])//Payday for all player
{
    #pragma unused params
    #pragma unused playerid
    for(new j = 0; j < MAX_PLAYERS; j++)
    {
        Payday(j);
    }
    return 1;
}

dcmd_getstatus(playerid, params[])//Get player status
{
    new giveplayerid, string[256];
    new Bonus = 500*GetPlayerLevel(giveplayerid);
    if(!sscanf(params, "d", giveplayerid)) return SendClientMessage(playerid, 0xFF0000AA, "{FF0000}[ERROR]{FFFFFF}Usage: /getstatus [PlayerID]");
    format(string, sizeof(string), "{446CCF}Name{FFFFFF}: %s \n{FF0000}Exp{FFFFFF}: %d \n{A1CAF1}Level{FFFFFF}: %d \n{00FF00}Payday{FFFFFF}: %d", Gn(giveplayerid), GetPlayerExp(giveplayerid), GetPlayerLevel(playerid), 2500+Bonus);
    SendClientMessage(playerid, Green, string);
    return 1;
}
=================================*/