#include <a_samp>
    #include <dudb>
    #include <progress>
     
    new Text:ExpText[MAX_PLAYERS];
    new Text:LevelText[MAX_PLAYERS];
    new Text:Textdraw0;
    new Bar:bar[MAX_PLAYERS];
    new Text3D:LevelLabel[MAX_PLAYERS];
    new pfile[100];
     
    //You can change these values.
    #define ExpForLevel 1000 //How much exp you need to pass a level. The Exp gets multiplied by the level. If you\'ve got 1000 total exp then for lvl 2 it will be 2000
    #define MaxLevel 99 //The maximum level a player can achieve.
    #define UseProgBar // Define wheater to use íthe progress bar or not. Comment the line if you don\'t want a progress bar and leave like that if you do want a progress bar.
    #define ProgBarColor 0x0000FFFF //The experience bar\'s color.
    #define TextLabelColor 0x00FFFFFF // The textlabel\'s color.
    #define CashForLevelUp 300 //This is the cash you get for levelling up. It gets multiplied by the level you achieved and one more time by a number you define.
    #define CashMultiplier 1 //This multiplies the Cash * Level achieved by the number you want.
    #define GameTextStyle 4 //This defines the GameText\'s style used for the GivePlayerExp function.
    #define GameTextTime 3000 //This defines the time for which the GameText for the GivePlayerExp function will be visible
    #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
     
    #pragma unused strtok
    #pragma unused ret_memcpy
     
    //Declaring New
    //new nev[MAX_PLAYER_NAME];
     
     
    //The function which gives exp. Usage: GivePlayerExp(playerid, ammount, reason);
    stock GivePlayerExp(playerid, exp, reason[])
    {
        new string2[126], string3[126], string4[126];
        format(pfile, sizeof(pfile), \"Szerver/%s.ini\",pName(playerid));
        dini_IntSet(pfile, \"Exp\", dini_Int(pfile, \"Exp\") +exp);
        if (dini_Int(pfile, \"Exp\") >= dini_Int(pfile, \"TotalExp\"))
        {
            if (dini_Int(pfile, \"ExpLevel\") < MaxLevel)
            {
                while (dini_Int(pfile, \"Exp\") >= dini_Int(pfile, \"TotalExp\"))
                {
                    dini_IntSet(pfile, \"Exp\", dini_Int(pfile, \"Exp\") - dini_Int(pfile, \"TotalExp\"));
                    dini_IntSet(pfile, \"ExpLevel\", dini_Int(pfile, \"ExpLevel\") + 1);
                    dini_IntSet(pfile, \"TotalExp\", dini_Int(pfile, \"ExpLevel\") * ExpForLevel);
                    format(string3, sizeof(string3), \"Level: %02d\",dini_Int(pfile, \"ExpLevel\"));
                    TextDrawSetString(LevelText[playerid], string3);
                    GivePlayerMoney(playerid, CashForLevelUp * dini_Int(pfile, \"ExpLevel\") * CashMultiplier);
                    format(string4, sizeof(string4), \"~p~You got %d Exp for ~n~%s !~n~~g~Level up!\", exp, reason);
                }
            }
            else
            {
                    GameTextForPlayer(playerid, \"~g~Max Level Reached!\", GameTextTime, GameTextStyle);
                dini_IntSet(pfile, \"Exp\", dini_Int(pfile, \"TotalExp\"));
                    }
        }
        else
        {
                format(string4, sizeof(string4), \"~p~You got %d Exp for ~n~%s !\", exp, reason);
        }
        format(string2, sizeof(string2), \"Exp: %05d/%05d\",dini_Int(pfile, \"Exp\"), dini_Int(pfile, \"TotalExp\"));
        TextDrawSetString(ExpText[playerid], string2);
        #if defined UseProgBar
       SetProgressBarValue(bar[playerid], dini_Int(pfile, \"Exp\"));
        SetProgressBarMaxValue(bar[playerid], dini_Int(pfile, \"TotalExp\"));
        UpdateProgressBar(bar[playerid], playerid);
        #endif
       GameTextForPlayer(playerid, string4, GameTextTime, GameTextStyle);
        format(string3, sizeof(string3), \"Level: %02d\",dini_Int(pfile, \"ExpLevel\"));
        Update3DTextLabelText(LevelLabel[playerid], TextLabelColor, string3);
    }
     
    //The function to get a player\'s level. Usage: GetPlayerLevel(playerid)
    stock GetPlayerExpLevel(playerid)
    {
        new Plevel;
        format(pfile, sizeof(pfile), \"Szerver/%s.ini\",pName(playerid));
        Plevel = dini_Int(pfile, \"ExpLevel\");
        return Plevel;
    }
     
    //The function to get a player\'s experience. Usage: GetPlayerExp(playerid)
    stock GetPlayerExp(playerid)
    {
        new PExp;
        format(pfile, sizeof(pfile), \"Szerver/%s.ini\",pName(playerid));
        PExp = dini_Int(pfile, \"Exp\");
        return PExp;
    }
     
    //The function to get a player\'s experience needed to lvl up. Usage: GetPlayerTotalExp(playerid)
    stock GetPlayerTotalExp(playerid)
    {
        new PTotalExp;
        format(pfile, sizeof(pfile), \"Szerver/%s.ini\",pName(playerid));
        PTotalExp = dini_Int(pfile, \"TotalExp\");
        return PTotalExp;
    }
     
     
     
    public OnPlayerConnect(playerid)
    {
        new string2[126], string3[126];
     
        format(pfile, sizeof(pfile), \"Szerver/%s.ini\",pName(playerid));
        if(dini_Exists(pfile)) // ha létezik..
        {
            format(string2, sizeof(string2), \"Exp: %05d/%05d\",GetPlayerExp(playerid), GetPlayerTotalExp(playerid));
                TextDrawSetString(ExpText[playerid], string2);
                format(string3, sizeof(string3), \"Level: %02d\",GetPlayerExpLevel(playerid));
                TextDrawSetString(LevelText[playerid], string3);
                SetPlayerMoney(playerid, dini_Int(pfile, \"Cash\"));
                    SetPlayerScore(playerid, dini_Int(pfile, \"Score\"));
        }
        else // ha nem..
        {
            dini_Create(pfile); // akkor csinálja meg
            dini_IntSet(pfile, \"ExpLevel\", 1);
                dini_IntSet(pfile, \"Exp\", 0);
                dini_IntSet(pfile, \"TotalExp\", ExpForLevel);
        }
        format(string2, sizeof(string2), \"Exp: %05d/%05d\",GetPlayerExp(playerid), GetPlayerTotalExp(playerid));
        TextDrawSetString(ExpText[playerid], string2);
        format(string3, sizeof(string3), \"Level: %02d\",GetPlayerExpLevel(playerid));
        TextDrawSetString(LevelText[playerid], string3);
     
        return 1;
    }
     
    public OnPlayerDisconnect(playerid, reason)
    {
            TextDrawHideForAll(Textdraw0);
        TextDrawDestroy(Textdraw0);
        TextDrawDestroy(ExpText[playerid]);
        TextDrawDestroy(ExpText[playerid]);
        format(pfile, sizeof(pfile), \"Szerver/%s.ini\",pName(playerid));
        dini_IntSet(pfile, \"Cash\", GetPlayerMoney(playerid));
        dini_IntSet(pfile, \"Score\", GetPlayerScore(playerid));
        dini_IntSet(pfile, \"ExpLevel\", GetPlayerExp(playerid)); // level elmentése
        dini_IntSet(pfile, \"Exp\", GetPlayerExpLevel(playerid)); // exp elmentése
        dini_IntSet(pfile, \"TotalExp\", GetPlayerTotalExp(playerid)); // totalexp elmentése
     
        return 1;
    }
     
    public OnPlayerSpawn(playerid)
    {
        TextDrawShowForPlayer(playerid, Textdraw0);
        TextDrawShowForPlayer(playerid, ExpText[playerid]);
        TextDrawShowForPlayer(playerid, LevelText[playerid]);
        return 1;
    }
     
     
    public OnPlayerDeath(playerid, killerid, reason)
    {
        if (killerid != playerid)
            {
            if (GetPlayerExpLevel(playerid) < GetPlayerExpLevel(killerid))
            {
                GivePlayerExp(killerid, 100, \"killing a lower level player\");
            }
            else if (GetPlayerExpLevel(playerid) > GetPlayerExpLevel(killerid))
            {
                GivePlayerExp(killerid, 300, \"killing a higher level player\");
            }
            else
            {
                GivePlayerExp(killerid, 200, \"killing a player at your own level\");
            }
        } // An example of using my exp system.
        return 1;
    }
     
    dcmd_addexp(playerid,params[])
    {
            #pragma unused params
            GivePlayerExp(playerid, 500, \"addexp parancs hasznalata\");
            return 1;
    }
     
    public OnPlayerCommandText(playerid, cmdtext[])
    {
            dcmd(addexp,6,cmdtext);
            return 0;
    }
     
    new pname[24];
    pName(playerid)
    {
            GetPlayerName(playerid, pname, sizeof(pname));
            return pname;
    }

A mód elejére...
 

#include <dini>

 

public OnPlayerText(playerid, text[])
{   
        if(pInfo[playerid][Admin] >= 1)
{
new str[128];
format(str, 128, \"[Admin]%s: %s\", GetName(playerid), text);
SendClientMessageToAll(COLOR_ORANGE, string);
return 0;
}
if(pInfo[playerid][VIP] >= 1)
{
        new str[130];
format(str, 130, \"[VIP]%s: %s\", GetName(playerid), text);
        SendClientMessageToAll(COLOR_YELLOW, str);
return 0;
}
        }
        return 1;
        }