aes error

zerg · 10 Янв 2019

Код:

/*
*    AES: Bonus System                  v. 0.5
*    by serfreeman1337        http://gf.hldm.org/
*/


#include <amxmodx>
#include <amxmisc>
#include <aes_v>
#include <reapi>

#define PLUGIN "AES: Bonus System"
#define VERSION "0.5.9 Vega[REAPI]"
#define AUTHOR "serfreeman1337/sonyx"
#define LASTUPDATE "12, March (03), 2018"

#if AMXX_VERSION_NUM < 183
    #include <colorchat>

    #define print_team_default DontChange
    #define print_team_grey Grey
    #define print_team_red Red
    #define print_team_blue Blue

    #define MAX_NAME_LENGTH    32
    #define MAX_PLAYERS 32

    #define client_disconnected client_disconnect
#endif

// мы передали тебе массив в массив
// чтобы ты мог работать с массивом пока работаешь  с массивом

enum _:itemTypeStruct
{
    ITEM_GIVE = 1,
    ITEM_CALL,
    ITEM_MENU,
    ITEM_FORWARD
}

enum _:
{
    BONUS_ITEM_SPAWN,
    BONUS_ITEM_MENU,
    BONUS_MENUS
}

#define LIMIT_POINTS (1<<1)
#define    LIMIT_EXP (1<<2)
#define LIMIT_LEVEL (1<<3)
#define LIMIT_ROUND (1<<4)
#define LIMIT_TIME (1<<5)
#define LIMIT_FLAG (1<<6)
#define LIMIT_FLAG_IGNORE (1<<7)

enum _:itemFieldsStruct
{
    IB_TYPE,
    IB_NAME[64],
    IB_ITEM[30],
    IB_PLUGIN_ID,
    IB_FUNCTION_ID,
    Array:IB_LEVELS,
    Array:IB_CHANCE,
    bool:IB_SUMCHANCE,
    IB_VALUE,

    IB_POINTS,
    Float:IB_EXP,
    IB_LEVEL,
    IB_ROUND,
    Float:IB_TIME,
    IB_FLAG,
    IB_FLAG_IGNORE,

    IB_FLAGS[30],
    IB_DAYS
}

enum _:menuFieldsStruct {
    MENU_TITLE[64],
    MENU_SAYCMD[30],
    MENU_CONCMD[30],
    Array: MENU_LIST
}

// Мастер массивов 80 лвл

new Array:g_SpawnBonusItems;
new Array:g_PointsBonusItems;
new Array:g_BonusMenus;
new Trie:g_MenuCommandsValid;

//

new g_SpawnBonusCount;
new g_PointsBonusCount;

// some random stuff
new bool:isLocked,iaNewForward;
new bool:player_already_spawned[MAX_PLAYERS + 1];
new Float:player_spawn_time[MAX_PLAYERS + 1];

// Менюшки
new itemName[128],itemInfo[10];
new Trie:callCmds;

// cvars

enum _:cvars_num
{
    CVAR_BONUS_ENABLED,
    CVAR_BONUS_SPAWN,
}

new cvar[cvars_num];
new items_CB;

new iRound;

public plugin_init()
{
    register_plugin(PLUGIN, VERSION, AUTHOR);

    //
    // Вкл/выкл системы бонусов
    //
    cvar[CVAR_BONUS_ENABLED] = register_cvar("aes_bonus_enable","1",FCVAR_SERVER);

    //
    // Выдача бонусов на спавне
    //    0 - нет бонусов на спавне
    //    1 - выдавать всегда
    //    2 - выдать только один раз за раунд
    cvar[CVAR_BONUS_SPAWN] = register_cvar("aes_bonus_spawn","1");

    register_srvcmd("aes_lockmap","Check_LockMap");
    register_dictionary("aes.txt");

    iaNewForward = CreateMultiForward("aes_on_anew_command",ET_STOP,FP_CELL);

    RegisterHookChain(RG_CBasePlayer_Spawn, "CBasePlayer_Spawn", true);
    RegisterHookChain(RG_CSGameRules_RestartRound, "CSGameRules_RestartRound");
    RegisterHookChain(RG_RoundEnd, "RoundEnd");
}

// слишком мощный код
public plugin_cfg()
{
    items_CB = menu_makecallback("Format_ItemsCallback");

    new fPath[256],len;
    len += get_configsdir(fPath,charsmax(fPath));
    len += formatex(fPath[len],charsmax(fPath) - len,"/aes/bonus.ini",fPath);

    // читаем файл конфигурации
    new f = fopen(fPath,"r");

    if(!f)
    {
        log_amx("[ERROR] configuration file not found");
        set_fail_state("configuration file not found");

        return;
    }

    new buffer[1024],cfgBlock = -1,itemType,key[32],value[sizeof buffer - sizeof key],keyId,line;
    new itemData[itemFieldsStruct],menuData[menuFieldsStruct];

    // карта ключей параметров
    enum _:{
        KEY_NAME = 1,
        KEY_LEVELMAP,
        KEY_ITEM,
        KEY_CHANCE,
        KEY_PLUGIN,
        KEY_FUNCTION,
        KEY_VALUE,
        KEY_POINTS,
        KEY_SUMLEVELS,

        KEY_MENU_TITLE,
        KEY_MENU_SAY,
        KEY_MENU_CONSOLE,
        KEY_MENU_ITEMS,

        KEY_EXP,
        KEY_LEVEL,
        KEY_ROUND,
        KEY_TIME,

        KEY_FLAGS,
        KEY_DAYS,
        KEY_FLAG
    }

    new Trie:keyMap = TrieCreate();

    TrieSetCell(keyMap,"name",KEY_NAME);
    TrieSetCell(keyMap,"levels",KEY_LEVELMAP);
    TrieSetCell(keyMap,"item",KEY_ITEM);
    TrieSetCell(keyMap,"plugin",KEY_PLUGIN);
    TrieSetCell(keyMap,"function",KEY_FUNCTION);
    TrieSetCell(keyMap,"value",KEY_VALUE);
    TrieSetCell(keyMap,"points",KEY_POINTS);
    TrieSetCell(keyMap,"chance",KEY_CHANCE);
    TrieSetCell(keyMap,"sumlevels",KEY_SUMLEVELS);

    TrieSetCell(keyMap,"title",KEY_MENU_TITLE);
    TrieSetCell(keyMap,"say",KEY_MENU_SAY);
    TrieSetCell(keyMap,"console",KEY_MENU_CONSOLE);
    TrieSetCell(keyMap,"list",KEY_MENU_ITEMS);

    TrieSetCell(keyMap,"exp",KEY_EXP);
    TrieSetCell(keyMap,"level",KEY_LEVEL);
    TrieSetCell(keyMap,"round",KEY_ROUND);
    TrieSetCell(keyMap,"time",KEY_TIME);

    TrieSetCell(keyMap,"flags",KEY_FLAGS);
    TrieSetCell(keyMap,"days",KEY_DAYS);

    TrieSetCell(keyMap,"flag",KEY_FLAG);


    // читаем содержимое файла конфигурации
    while(!feof(f))
    {
        fgets(f,buffer,charsmax(buffer));
        trim(buffer);

        line++;

        if(!buffer[0] || buffer[0] == ';')
            continue;

        if(buffer[0] == '[')
        {    // проверяем какой блок конфигурации сейчас читаем
            switch(cfgBlock)
            {
                case BONUS_ITEM_SPAWN,BONUS_ITEM_MENU:
                {
                    if(RegisterBonusItem(itemData,cfgBlock,line))
                        arrayset(itemData,0,itemFieldsStruct);
                }
                case BONUS_MENUS:
                {
                    if(RegisterMenuItem(menuData,line) >= 0)
                        arrayset(menuData,0,menuFieldsStruct);
                }
            }

            if(strcmp(buffer,"[spawn]") == 0)        // бонусы на спавне
                cfgBlock = BONUS_ITEM_SPAWN;
            else if(strcmp(buffer,"[items]") == 0)    // бонусы в меню
                cfgBlock = BONUS_ITEM_MENU;
            else if(strcmp(buffer,"[menu]") == 0)    // менюшки
                cfgBlock = BONUS_MENUS;

            continue;
        }

        // парсинг предметов
        if(cfgBlock == -1)
            continue;

        if(buffer[0] == '<')
        {    // новый бонус
            if(cfgBlock != BONUS_MENUS)
            {
                if(RegisterBonusItem(itemData,cfgBlock,line))
                    arrayset(itemData,0,itemFieldsStruct);

                if(strcmp(buffer,"<give>") == 0)    // узнаем тип бонуса
                    itemType = ITEM_GIVE;
                else if(strcmp(buffer,"<call>") == 0)
                    itemType = ITEM_CALL;
                else
                {
                    itemType = -1;
                    continue;
                }

                itemData[IB_TYPE] = itemType;
            }
            else
            { // менюшки
                if(RegisterMenuItem(menuData,line) >= 0)
                    arrayset(menuData,0,menuFieldsStruct);

                if(strcmp(buffer,"<menu>") == 0)
                    itemType = ITEM_MENU;
                else
                    itemType = -1;
            }

            continue;
        }

        if(!itemType)
            continue;

        // парсим ключи
        #if AMXX_VERSION_NUM >= 183
            strtok2(buffer,key,charsmax(key),value,charsmax(value),'=',TRIM_FULL);
        #else
            strtok(buffer,key,charsmax(key),value,charsmax(value),'=',1);
            replace(value,charsmax(value),"= ","");
        #endif

        if(!TrieGetCell(keyMap,key,keyId) || (cfgBlock == BONUS_MENUS && keyId < KEY_MENU_TITLE))
        { // узнаем ID ключа
            log_amx("[WARNING] unknown key ^"%s^" on line %d",
                key,line);

            continue;
        }

        // парсинг значений ключей
        switch(keyId)
        {
            //
            // Бонус предметы
            //

            // название бонуса
            case KEY_NAME: copy(itemData[IB_NAME],charsmax(itemData[IB_NAME]),value);
            // бонусы по уровням
            case KEY_LEVELMAP: itemData[IB_LEVELS] = _:parse_levels(value);
            // предмет для конструкции <give>
            case KEY_ITEM: copy(itemData[IB_ITEM],charsmax(itemData[IB_ITEM]),value);
            // шанс бонуса
            case KEY_CHANCE: itemData[IB_CHANCE] = _:parse_levels(value);
            // id плагина для конструкции <call>
            case KEY_PLUGIN:
            {
                itemData[IB_PLUGIN_ID] = find_plugin_byfile(value);

                if(itemData[IB_PLUGIN_ID] == INVALID_PLUGIN_ID)
                {
                    log_amx("[ERROR] can't find plugin ^"%s^" on line %d",value,line);

                    // убираем этот бонус из меню
                    itemData[IB_TYPE] = -1;
                    itemType = -1;
                }
            }
            // id функции для конструкции <call>
            case KEY_FUNCTION:
            {
                if(itemData[IB_PLUGIN_ID] == -1)
                { // плагин не найден
                    log_amx("[ERROR] plugin not found on line %d",line);

                    itemData[IB_TYPE] = -1;
                    itemType = -1;
                }
                else
                {
                    itemData[IB_FUNCTION_ID] = get_func_id(value,itemData[IB_PLUGIN_ID]);

                    if(itemData[IB_FUNCTION_ID] == -1)
                    { // проверка на валидность функции
                        log_amx("[ERROR] can't find function ^"%s^" on line %d",value,line);

                        itemData[IB_TYPE] = -1;
                        itemType = -1;
                    }
                }
            }
            // значение для функции
            case KEY_VALUE: itemData[IB_VALUE] = str_to_num(value);
            // кол-во очков для этого бонуса в меню
            case KEY_POINTS: itemData[IB_POINTS] = str_to_num(value);
            // сумирование шанса за все уровни
            case KEY_SUMLEVELS: itemData[IB_SUMCHANCE] = str_to_num(value) ? false : true;

            //
            // Меню
            //

            // название меню
            case KEY_MENU_TITLE: copy(menuData[MENU_TITLE],charsmax(menuData[MENU_TITLE]),value);
            // команда в чат для вызова меню
            case KEY_MENU_SAY: copy(menuData[MENU_SAYCMD],charsmax(menuData[MENU_SAYCMD]),value);
            // команда в консоли для вызова этого меню
            case KEY_MENU_CONSOLE: copy(menuData[MENU_CONCMD],charsmax(menuData[MENU_CONCMD]),value);
            // список предметов в меню
            case KEY_MENU_ITEMS: menuData[MENU_LIST] = _:parse_levels(value);

            case KEY_EXP: itemData[IB_EXP] = _:str_to_float(value);
            case KEY_LEVEL: itemData[IB_LEVEL] = str_to_num(value);
            case KEY_ROUND: itemData[IB_ROUND] = str_to_num(value);
            case KEY_TIME: itemData[IB_TIME]  = _:str_to_float(value);

            case KEY_FLAGS: copy(itemData[IB_FLAGS], charsmax(itemData[IB_FLAGS]), value);
            case KEY_DAYS: itemData[IB_DAYS] = str_to_num(value);

            case KEY_FLAG:
            {
                if (contain(value, "~") != -1)
                {
                    new szArg[32];
                    strtok(value, value, charsmax(value), szArg, charsmax(szArg), '~');
                    itemData[IB_FLAG_IGNORE] = read_flags(szArg);
                }

                itemData[IB_FLAG] = read_flags(value);
            }
        }
    }
    fclose(f);

    switch(cfgBlock)
    {    // разбираем последний предмет, если есть
        case BONUS_ITEM_SPAWN,BONUS_ITEM_MENU:
            if(RegisterBonusItem(itemData,cfgBlock,line))
                arrayset(itemData,0,itemFieldsStruct);
        case BONUS_MENUS:
            if(RegisterMenuItem(menuData,line) >= 0)
                arrayset(menuData,0,menuFieldsStruct);
    }

    TrieDestroy(keyMap);

    // бонусы на спавне
    if(g_SpawnBonusItems)
        g_SpawnBonusCount = ArraySize(g_SpawnBonusItems);

    if(g_PointsBonusItems){
        g_PointsBonusCount = ArraySize(g_PointsBonusItems);

        // регистрация бонус менюшек
        if(g_PointsBonusCount)
        {
            if(g_BonusMenus)
            {
                for(new i,length = ArraySize(g_BonusMenus) ; i < length ; i++)
                {
                    ArrayGetArray(g_BonusMenus,i,menuData);

                    if(!callCmds)
                        callCmds = TrieCreate();

                    if(menuData[MENU_SAYCMD][0])
                    {
                        if(!TrieKeyExists(callCmds,menuData[MENU_SAYCMD]))
                        {
                            new sayCmd[128];
                            formatex(sayCmd,charsmax(sayCmd),"say %s",menuData[MENU_SAYCMD]);
                            register_clcmd(sayCmd,"Forward_CallCommand");

                            TrieSetCell(callCmds,menuData[MENU_SAYCMD],i);
                        }
                        else
                        {
                            log_amx("WARNING! ^"%s^" say command already in use on line %d!",menuData[MENU_CONCMD],line);
                        }
                    }

                    if(menuData[MENU_CONCMD][0])
                    {
                        if(!TrieKeyExists(callCmds,menuData[MENU_CONCMD]))
                        {
                            register_clcmd(menuData[MENU_CONCMD],"Forward_CallCommand");
                            TrieSetCell(callCmds,menuData[MENU_CONCMD],i);
                        }
                        else
                            log_amx("WARNING ^"%s^" console command already in use on line %d!",menuData[MENU_CONCMD],line);
                    }
                }
            }
            else
            {
                register_clcmd("say /anew","Forward_CallCommand");
                register_clcmd("anew","Forward_CallCommand");
            }
        }
    }
}

public RoundEnd(WinStatus:status, ScenarioEventEndRound:event)
{
    ResetSpawn();

    if(event == ROUND_GAME_COMMENCE || event == ROUND_GAME_RESTART)
        iRound = 0;
}

public CSGameRules_RestartRound()
    iRound++;

public Check_LockMap()
{
    new getmap[32],map[32];
    read_args(getmap,charsmax(getmap));
    remove_quotes(getmap);

    get_mapname(map,charsmax(map));

    if(!strcmp(getmap,map,true))
    {
        isLocked = true;

        set_pcvar_num(cvar[CVAR_BONUS_ENABLED],0);

        pause("acd", "aes_bonus_cstrike.amxx");
        pause("ad");
    }
}

public client_disconnected(id)
    player_already_spawned[id] = false;

//
// Обработчик консольных команд
//
public Forward_ConsoleCommand(id)
{
    if(!g_BonusMenus)
        return Format_BonusMenu(id,-1);

    new consoleCmd[128];
    read_argv(0,consoleCmd,127);

    new cmdId;

    // проверяем что сообщение содержит команду и узнаем её ID
    if(!TrieGetCell(g_MenuCommandsValid,consoleCmd,cmdId))
        return PLUGIN_HANDLED;

    Format_BonusMenu(id,cmdId);

    return PLUGIN_HANDLED;
}

//
// Обработчик say комманд
//
public Forward_CallCommand(id)
{
    if(!g_BonusMenus)
        return Format_BonusMenu(id,-1);

    new cmd[128];
    read_args(cmd,charsmax(cmd));

    if(!cmd[0])
        read_argv(0,cmd,charsmax(cmd));

    trim(cmd);
    remove_quotes(cmd);

    new cmdId;

    if(!TrieGetCell(callCmds,cmd,cmdId))
        return PLUGIN_CONTINUE;

    Format_BonusMenu(id,cmdId);

    return PLUGIN_CONTINUE;
}

//
// Форматирование менюшек
//
public Format_BonusMenu(id,cmdId)
{
    if(isLocked)
    {    // проверка возможности использования бонусов на этой карте
        client_print_color(id,0,"%L %L",id,"AES_TAG",id,"AES_ANEW_BLOCKED");

        return PLUGIN_CONTINUE;
    }

    new player_bonus = aes_get_player_bonus(id);

    new player_bonus_str[10];
    num_to_str(player_bonus,player_bonus_str,charsmax(player_bonus_str));

    if(player_bonus <= 0)
    { // еще какая-то проверка
        client_print_color(id,0,"%L %L",id,"AES_TAG",id,"AES_ANEW_NOT");

        return PLUGIN_CONTINUE;
    }

    new ret;
    ExecuteForward(iaNewForward,ret,id);

    if(ret == PLUGIN_HANDLED) // блок вызова в другом плагине
        return PLUGIN_HANDLED;

    new m,itemData[itemFieldsStruct];

    if(cmdId == -1)
    { // строим дефолтное меню anew со списком всех предметов
        formatex(itemName,charsmax(itemName),"%L %L",id,"AES_TAG_MENU",id,"AES_BONUS_MENU",player_bonus);
        m = menu_create(itemName,"aNew_MenuHandler");

        for(new i ; i < g_PointsBonusCount ; i++)
        {
            ArrayGetArray(g_PointsBonusItems,i,itemData);

            num_to_str(i,itemInfo,charsmax(itemInfo));
            aes_get_item_name(itemData[IB_NAME],itemName,charsmax(itemName),id);

            menu_additem(m,itemName,itemInfo,.callback = items_CB);
        }
    }
    else
    {
        new menuData[menuFieldsStruct],itemIndex;
        ArrayGetArray(g_BonusMenus,cmdId,menuData);

        new len = formatex(itemName,charsmax(itemName),"%L ",id,"AES_TAG_MENU");
        len += aes_get_item_name(menuData[MENU_TITLE],itemName[len],charsmax(itemName) - len,id);

        replace_all(itemName,charsmax(itemName),"\n","^n");
        replace_all(itemName,charsmax(itemName),"<p>",player_bonus_str);

        m = menu_create(itemName,"aNew_MenuHandler");

        for(new i,length = ArraySize(menuData[MENU_LIST]) ; i < length ; i++)
        {
            itemIndex = ArrayGetCell(menuData[MENU_LIST],i) - 1;

            if(!(0 <=itemIndex < g_PointsBonusCount)) // что ты мне подсунул, блеать
                continue;

            ArrayGetArray(g_PointsBonusItems,i,itemData);
            num_to_str(i,itemInfo,charsmax(itemInfo));
            aes_get_item_name(itemData[IB_NAME],itemName,charsmax(itemName),id);
            formatex(itemName,charsmax(itemName),"%s \r[\y%d\r]", itemName, itemData[IB_POINTS]);
            menu_additem(m,itemName,itemInfo,.callback = items_CB);
        }
    }


    if(m != -1)
    {
        F_Format_NavButtons(id,m);
        menu_display(id,m);
    }

    return PLUGIN_CONTINUE;
}

//
// Хандлер итемов в меню
//
public Format_ItemsCallback(id,menu,item)
{
    new info[10],item_name[256],dummy;
    menu_item_getinfo(menu,item,dummy,info,charsmax(info),item_name,charsmax(item_name),dummy);

    new itemData[itemFieldsStruct];
    ArrayGetArray(g_PointsBonusItems,str_to_num(info),itemData);

    new limit_fields = Bonus_CheckLimits(id,itemData);

    for(new i = 1; i <= 7 ; i++)
    {
        if(limit_fields & (1<<i))
        {
            new tmpLang[128],lang_key[16];
            formatex(lang_key,charsmax(lang_key),"AES_ANEW_INFO%d",i);
            formatex(tmpLang,charsmax(tmpLang)," %L",id,lang_key,itemData[IB_POINTS + (i - 1)]);
            aes_get_item_name(itemData[IB_NAME],item_name,charsmax(item_name),id);
            add(item_name,charsmax(item_name),tmpLang);

            menu_item_setname(menu,item,item_name);

            return ITEM_DISABLED;
        }
    }
    return ITEM_ENABLED;
}

//
// Проверяем ограничения на бонусы
//
Bonus_CheckLimits(id,itemData[itemFieldsStruct])
{
    new limit_fields = 0;

    // проверяем доступность по бонусам
    if(itemData[IB_POINTS] && (itemData[IB_POINTS] > aes_get_player_bonus(id)))
        limit_fields |= LIMIT_POINTS;

    // проверяем доступность по обыту
    if(itemData[IB_EXP] && (itemData[IB_EXP] > Float:aes_get_player_exp(id)))
        limit_fields |= LIMIT_EXP;

    // проверяем доступность по уровню
    if(itemData[IB_LEVEL] && (itemData[IB_LEVEL] > (aes_get_player_level(id) + 1)))
        limit_fields |= LIMIT_LEVEL;

    // проверяем доступность по раунду
    if(itemData[IB_ROUND] && (itemData[IB_ROUND] > iRound))
        limit_fields |= LIMIT_ROUND;

    // проверяем на доступность по времени
    if(itemData[IB_TIME] && (itemData[IB_TIME] < (get_gametime() - player_spawn_time[id])))
        limit_fields |= LIMIT_TIME;

    if(itemData[IB_FLAG] && (get_user_flags(id) & itemData[IB_FLAG]) != itemData[IB_FLAG])
        limit_fields |= LIMIT_FLAG;

    if(itemData[IB_FLAG_IGNORE] && (get_user_flags(id) & itemData[IB_FLAG_IGNORE]) == itemData[IB_FLAG_IGNORE])
        limit_fields |= LIMIT_FLAG_IGNORE;

    return limit_fields;
}

public F_Format_NavButtons(id,menu)
{
    new tmpLang[20];

    formatex(tmpLang,charsmax(tmpLang),"%L",id,"BACK");
    menu_setprop(menu,MPROP_BACKNAME,tmpLang);

    formatex(tmpLang,charsmax(tmpLang),"%L",id,"EXIT");
    menu_setprop(menu,MPROP_EXITNAME,tmpLang);

    formatex(tmpLang,charsmax(tmpLang),"%L",id,"MORE");
    menu_setprop(menu,MPROP_NEXTNAME,tmpLang);
}

//
// Хандлер бонус меню
//
public aNew_MenuHandler(id,m,item)
{
    if(item == MENU_EXIT)
    {
        menu_destroy(m);
        return PLUGIN_HANDLED;
    }

    if(Format_ItemsCallback(id,m,item) != ITEM_ENABLED)
    {
        menu_destroy(m);
        return PLUGIN_HANDLED;
    }

    menu_item_getinfo(m,item,itemName[0],itemInfo,charsmax(itemInfo),itemName,1,itemName[0]);
    new itemKey = str_to_num(itemInfo);

    menu_destroy(m);

    new itemData[itemFieldsStruct];
    ArrayGetArray(g_PointsBonusItems,itemKey,itemData);

    if(GiveBonus(itemData,id,itemData[IB_VALUE] ? itemData[IB_VALUE] : 0))
    {
        aes_add_player_bonus_f(id,-itemData[IB_POINTS]);

        aes_get_item_name(itemData[IB_NAME],itemName,charsmax(itemName),id);
        strip_menu_codes(itemName,charsmax(itemName));

        client_print_color(id,0,"%L %L",id,"AES_TAG",id,"AES_ANEW_GIVE",itemName,itemData[IB_POINTS]);
    }

    return PLUGIN_HANDLED;
}

//
// Назначение бонус предметов
//    itemData- данные бонуса
//    id - игрок
//    count - кол-во бонусов
//    psh - пшш парень, значение в функцию передать не хочешь?
//
GiveBonus(itemData[itemFieldsStruct],id,count = 0,psh = 0)
{

    switch(itemData[IB_TYPE])
    {
        case ITEM_GIVE:
        {
            if(!is_user_alive(id)) return false;

            new wId = rg_get_weapon_info(itemData[IB_ITEM], WI_ID);

            if(user_has_weapon(id, wId))
                rg_remove_item(id, itemData[IB_ITEM]);

            if(rg_give_item(id, itemData[IB_ITEM], (rg_get_weapon_info(wId, WI_GUN_CLIP_SIZE) > 0) ? GT_REPLACE : GT_APPEND) >= 0)
                rg_set_user_bpammo(id, WeaponIdType:wId, count ? count : rg_get_weapon_info(wId, WI_MAX_ROUNDS));
            else
            {
                client_print_color(id,print_team_default,"%L %L",id,"AES_TAG",id,"AES_ANEW_CALL_PROBLEM");
                return false;
            }
        }
        case ITEM_CALL:
        {
            if(callfunc_begin_i(itemData[IB_FUNCTION_ID],itemData[IB_PLUGIN_ID]))
            {
                callfunc_push_int(id);

                if(itemData[IB_FLAGS][0])
                {
                    callfunc_push_str(itemData[IB_FLAGS]);
                    if(itemData[IB_DAYS])
                        callfunc_push_int(itemData[IB_DAYS]);
                }
                else
                    callfunc_push_int(count);

                if(psh)
                    callfunc_push_int(psh);

                return callfunc_end();
            }
            else
            {
                client_print_color(id,print_team_default,"%L %L",id,"AES_TAG",id,"AES_ANEW_CALL_PROBLEM");
                return false;
            }
        }
    }

    return true;
}

//
// Очищение строки от символов меню
//
strip_menu_codes(itemName[],len)
{
    replace_all(itemName,len,"\r","");
    replace_all(itemName,len,"\y","");
    replace_all(itemName,len,"\R","");
    replace_all(itemName,len,"\w","");
}

//
// Выдача бонусов на спавнеы
//
public CBasePlayer_Spawn(const id)
{
    if (!is_user_bot(id))
        Bonus_OnSpawn(id);
}


public Bonus_OnSpawn(id)
{
    if(isLocked || !get_pcvar_num(cvar[CVAR_BONUS_ENABLED]) || !is_user_alive(id))
        return false;

    player_spawn_time[id] = get_gametime();

    new player_level = aes_get_player_level(id);

    switch(get_pcvar_num(cvar[CVAR_BONUS_SPAWN]))
    {
        case 0: return false;
        case 2: // запоминаем спавн игрока
        {
            // игрок уже заспавнился
            if(player_already_spawned[id])
                return false;

            player_already_spawned[id] = true;
        }
    }

    new itemData[itemFieldsStruct],actLevel = -1;
    new levelValue;

    new Array:assigned_bonuses;

    // проверяем бонусы на спавне
    for(new i;i < g_SpawnBonusCount ; ++i)
    {
        arrayset(itemData,0,itemFieldsStruct);
        ArrayGetArray(g_SpawnBonusItems,i,itemData);

        if(Bonus_CheckLimits(id,itemData))
            continue;

        // считаем шанс выдачи бонуса
        if(itemData[IB_CHANCE])
        {
            new chanceValue;

            if(player_level >= ArraySize(itemData[IB_CHANCE]))
                actLevel = ArraySize(itemData[IB_CHANCE]) - 1;
            else
                actLevel = player_level;

            if(itemData[IB_SUMCHANCE])
            {
                for(new z ; z <= actLevel ; z++)    // складываем общий шанс за все уровни
                    chanceValue += ArrayGetCell(itemData[IB_CHANCE],i);
            }
            else
            {
                if(actLevel < 0)
                    continue;

                chanceValue = ArrayGetCell(itemData[IB_CHANCE],actLevel);
            }

            if(chanceValue * 10 < random_num(0,1000))
                continue;
        }

        // узнаем значение бонуса для определенного уровня
        if(itemData[IB_LEVELS])
        {
            if(player_level >= ArraySize(itemData[IB_LEVELS])) // :D
                actLevel = ArraySize(itemData[IB_LEVELS]) - 1;
            else
                actLevel = player_level;


            if(itemData[IB_SUMCHANCE])
            {
                for(new i ; i <= actLevel ; i++)    // складываем значения за все уровни
                    levelValue += ArrayGetCell(itemData[IB_LEVELS],i);
            }
            else
            {
                if(actLevel < 0)
                    continue;

                levelValue = ArrayGetCell(itemData[IB_LEVELS],actLevel);
            }
        }

        if(levelValue > 0)
        {
            // выдаем бонус
            if(GiveBonus(itemData,id,levelValue))
            {
                if(!assigned_bonuses)
                    assigned_bonuses = ArrayCreate(sizeof itemData[IB_NAME]);

                ArrayPushString(assigned_bonuses,itemData[IB_NAME]);
            }
        }
    }

    if(assigned_bonuses)
    {
        new bonus_info[192],len;

        len = formatex(bonus_info,charsmax(bonus_info),"%L %L ",id,"AES_TAG",id,"AES_ANEW_INFO8");

        for(new i,length = ArraySize(assigned_bonuses) ; i < length ; i++)
        {
            ArrayGetString(assigned_bonuses,i,itemData[IB_NAME],charsmax(itemData[IB_NAME]));

            if(i > 0)
                len += formatex(bonus_info[len],charsmax(bonus_info) - len,", ");

            len += formatex(bonus_info[len],charsmax(bonus_info) - len,"^4");
            len += aes_get_item_name(itemData[IB_NAME],bonus_info[len],charsmax(bonus_info) - len,id);
            len += formatex(bonus_info[len],charsmax(bonus_info) - len,"^1");
        }

        ArrayDestroy(assigned_bonuses);

        client_print_color(id,print_team_default,bonus_info);
    }

    return true;
}

public Array:parse_levels(levelString[])
{
    new Array:which = ArrayCreate(1);

    new stPos,ePos,rawPoint[20];

    // parse levels entry
    do {
        ePos = strfind(levelString[stPos]," ");

        formatex(rawPoint,ePos,levelString[stPos]);
        ArrayPushCell(which,str_to_num(rawPoint));

        stPos += ePos + 1;
    } while (ePos != -1)

    return which;
}

public aes_get_item_name(itemString[],out[],len,id)
{
    new l;

    if(strfind(itemString,"LANG_") == 0)// формирование по словарю
    {
        replace(itemString,strlen(itemString),"LANG_","");

        l = formatex(out,len,"%L",id,itemString);
    }
    else
    {
        l = copy(out,len,itemString);
    }

    return l;
}

//
// Регистрация бонус предмета
//    itemData - данные
//    cfgBlock - конфигурационный блок
//    line - линия
//
public RegisterBonusItem(itemData[itemFieldsStruct],cfgBlock,line)
{
    if(itemData[IB_TYPE])
    {    // записываем параметры предедущего бонуса
        new bool:isOk = true;

        // проверки на валидность
        switch(itemData[IB_TYPE])
        {
            case ITEM_GIVE:
            {
                if(!itemData[IB_ITEM][0])
                {
                    log_amx("[ERROR] give item not set on line %d",line);
                    isOk = false;
                }
            }
        }

        if(isOk){
            new Array:itemArray;

            switch(cfgBlock)
            {
                case BONUS_ITEM_SPAWN:
                {
                    if(!g_SpawnBonusItems)
                        g_SpawnBonusItems = ArrayCreate(itemFieldsStruct);

                    itemArray = g_SpawnBonusItems;
                }
                case BONUS_ITEM_MENU:
                {
                    if(!g_PointsBonusItems)
                        g_PointsBonusItems = ArrayCreate(itemFieldsStruct);

                    itemArray = g_PointsBonusItems;
                }
            }

            if(itemArray)
                ArrayPushArray(itemArray,itemData);
        }

        return true;
    }

    return false;
}

public RegisterMenuItem(menuData[menuFieldsStruct],line)
{
    if(!menuData[MENU_SAYCMD][0] && !menuData[MENU_CONCMD][0])
        return -1;

    if(!g_BonusMenus)
        g_BonusMenus = ArrayCreate(menuFieldsStruct);

    ArrayPushArray(g_BonusMenus,menuData);

    return ArraySize(g_BonusMenus) - 1;
}

ResetSpawn()
{
    arrayset(player_already_spawned,false,sizeof player_already_spawned);
    arrayset(_:player_spawn_time,0,sizeof player_spawn_time);
}

Код:

/*
    Advanced Experience System
    by serfreeman1337        http://gf.hldm.org/
*/

/*
    Random CSTRIKE Bonuses
*/

#include <amxmodx>
#include <aes_v>
#include <engine>
#include <reapi>

#define PLUGIN "AES: Bonus CSTRIKE"
#define VERSION "0.5.9 [REAPI]"
#define AUTHOR "serfreeman1337/sonyx"
#define LASTUPDATE "12, March (03), 2018"

#if AMXX_VERSION_NUM < 183
    #include <colorchat>

    #define print_team_default DontChange
    #define print_team_grey Grey
    #define print_team_red Red
    #define print_team_blue Blue

    #define MAX_NAME_LENGTH    32
    #define MAX_PLAYERS 32

    #define client_disconnected client_disconnect
#endif

enum _:
{
    SUPER_NICHEGO,
    SUPER_NADE,
    SUPER_DEAGLE
};

enum DamagerModes
{
    Disable,
    ModeAll,
    ModeIfVisible
};

new g_PlayerPos[MAX_PLAYERS + 1], g_iSyncMsg, g_iSyncMsg2, DamagerModes:g_ModeDam[MAX_PLAYERS + 1];
new const Float:g_flCoords[][] = { {0.55, 0.55}, {0.5, 0.55}, {0.55, 0.5}, {0.45, 0.5}, {0.45, 0.45}, {0.5, 0.45}, {0.55, 0.45}, {0.45, 0.55} };
new g_players[MAX_PLAYERS + 1];
new bool: g_PointDam[MAX_PLAYERS + 1] = false;

public plugin_init()
{
    register_plugin(PLUGIN, VERSION, AUTHOR);

    RegisterHookChain(RG_CBasePlayer_TakeDamage, "CBasePlayer_TakeDamage", false);
    RegisterHookChain(RG_CBasePlayer_Killed, "CBasePlayer_Killed_Post", true);
    register_event ("Damage", "EventDamage", "b", "2!0");

    g_iSyncMsg = CreateHudSyncObj();
    g_iSyncMsg2 = CreateHudSyncObj();
}

public client_disconnected(id)
    g_players[id] = SUPER_NICHEGO; // сбрасываем возможности на дисконнекте

public CBasePlayer_Killed_Post(const victim, const killer)
    g_players[victim] = SUPER_NICHEGO; // сбрасываем возможности при смерти

public CBasePlayer_TakeDamage(const id, idinflictor, idattacker, Float:damage)
{
    if(!is_user_connected(idattacker))
        return HC_CONTINUE;

    if(g_players[idattacker])
    {
        if(idattacker == idinflictor && get_member(get_member(idattacker, m_pActiveItem), m_iId) == WEAPON_DEAGLE && (g_players[idattacker] & (1 << SUPER_DEAGLE)))
        {
            damage *= 2.0;
        }
        else if(FClassnameIs(idinflictor, "grenade") && (g_players[idattacker] & (1 << SUPER_NADE)))
        {
            set_task(0.5,"deSetNade",idattacker);
            damage *= 3.0;
        }

        SetHookChainArg(4, ATYPE_FLOAT, damage);
    }
    return HC_CONTINUE;
}

public EventDamage(iVictim)
{
    static iKiller;
    iKiller = get_user_attacker(iVictim);

    if(!iKiller || iKiller > MAX_PLAYERS) return;

    new iPos = ++g_PlayerPos[iKiller];

    if(iPos == sizeof(g_flCoords))
        iPos = g_PlayerPos[iKiller] = 0;

    if (g_PointDam[iKiller] && iVictim != iKiller)
    {
        if (g_ModeDam[iKiller] == ModeAll || (g_ModeDam[iKiller] == ModeIfVisible && is_visible(iVictim, iKiller)))
        {
            set_hudmessage(0, 100, 200, Float:g_flCoords[iPos][0], Float:g_flCoords[iPos][1], 0, 0.0, 1.0, 0.0, 0.0);
            ShowSyncHudMsg(iKiller, g_iSyncMsg, "%i^n", read_data(2));
        }
    }
    if (g_PointDam[iVictim])
    {
        set_hudmessage(200, 100, 0, Float:g_flCoords[iPos][0], Float:g_flCoords[iPos][1], 0, 0.0, 1.0, 0.0, 0.0);
        ShowSyncHudMsg(iVictim, g_iSyncMsg2, "%i^n", read_data(2));
    }
}

public deSetNade(id)
    g_players[id] &= ~(1<<SUPER_NADE);

public roundBonus_GiveDefuser(id,cnt)
{
    if(!cnt)
        return false;

    if(get_member(id, m_iTeam) != TEAM_CT)
        return false;

    rg_give_item(id, "item_thighpack");

    return true;
}

public roundBonus_GiveNV(id,cnt)
{
    if(!cnt)
        return false;

    set_member(id, m_bHasNightVision, 1);

    return true;
}

public roundBonus_Dmgr(id,DamagerModes:cnt)
{
    if(cnt <= Disable)
        return false;

    g_PointDam[id] = true;
    g_ModeDam[id] = (ModeAll < cnt <= ModeIfVisible) ? cnt : ModeAll;

    return true;
}

public GiveArmor(id,cnt)
{
    if(!is_user_alive(id))
    {
        client_print_color(id,0,"%L %L",id,"AES_TAG",id,"AES_ANEW_ALIVE");
        return false;
    }

    if(!cnt)
        return false;

    new iArmor = rg_get_user_armor(id);

    switch(cnt)
    {
        case 1:rg_set_user_armor(id, max(100, iArmor), ARMOR_KEVLAR);
        case 2:rg_set_user_armor(id, max(100, iArmor), ARMOR_VESTHELM);
        default:rg_set_user_armor(id, max(cnt, iArmor), ARMOR_VESTHELM);
    }

    return true;
}

public GiveHP(id,cnt)
{
    if(!is_user_alive(id))
    {
        client_print_color(id,0,"%L %L",id,"AES_TAG",id,"AES_ANEW_ALIVE");
        return false;
    }

    if(!cnt)
        return false;

    set_entvar(id, var_health, (Float:get_entvar(id, var_health) + float(cnt)));
    return true;
}

public GiveMoney(id,cnt)
{
    if(!cnt)
        return false;

    rg_add_account(id, cnt);

    return true;
}


public pointBonus_Dmgr(id)
{
    g_PointDam[id] = true;

    return true;
}


public pointBonus_GiveMegaGrenade(id)
{
    if(!is_user_alive(id))
    {
        client_print_color(id,0,"%L %L",id,"AES_TAG",id,"AES_ANEW_ALIVE");
        return false;
    }

    if(!user_has_weapon(id,CSW_HEGRENADE))
    {
        rg_give_item(id, "weapon_hegrenade");
    }

    g_players[id] |= (1<<SUPER_NADE);

    client_print_color(id,0,"%L %L",id,"AES_TAG",id,"AES_BONUS_GET_MEGAGRENADE");

    return true;
}

public pointBonus_GiveMegaDeagle(id){
    if(!is_user_alive(id))
    {
        client_print_color(id,0,"%L %L",id,"AES_TAG",id,"AES_ANEW_ALIVE");
        return false;
    }

    rg_give_item(id, "weapon_deagle", GT_REPLACE);
    rg_set_user_bpammo(id, WEAPON_DEAGLE, 35);

    g_players[id] |= (1<<SUPER_DEAGLE);
    client_print_color(id,0,"%L %L",id,"AES_TAG",id,"AES_BONUS_GET_MEGADEAGLE");

    return true;
}


/**
* Совместимость со старым bonus.ini
*/
public pointBonus_Give10000M(id)
    GiveMoney(id, 10000);

public pointBonus_Set200HP(id)
    GiveHP(id, 200);

public pointBonus_Set200CP(id)
    GiveArmor(id, 200);

Код:

[menu]

<menu>
title = LANG_AES_BONUS_MENU
say = /anew
console = anew
list = 1 2 3 4 5 6 7

[items]

<give>
item = weapon_galil
name = LANG_AES_BONUS_GALIL
points = 1
round = 2
time = 15

<give>
item = weapon_famas
name = LANG_AES_BONUS_FAMAS
points = 1
round = 2
time = 15

<give>
item = weapon_m4a1
name = LANG_AES_BONUS_M4A1
points = 1
round = 2
time = 15
level = 2

<give>
item = weapon_ak47
name = LANG_AES_BONUS_AK47
points = 1
round = 2
time = 15
level = 2

;<give>
;item = weapon_scout
;name = LANG_AES_BONUS_SCOUT
;points = 1
;round = 4
;time = 15
;level = 2

<give>
item = weapon_awp
name = LANG_AES_BONUS_AWP
points = 2
round = 4
time = 15
level = 3

<give>
item = weapon_m249
name = LANG_AES_BONUS_M249
points = 2
round = 4
time = 15
level = 5

<call>
plugin = aes_bonus_cstrike.amxx
name = 16000$
value = 16000
function = GiveMoney
points = 3
round = 5
level = 10

<call>
plugin = aes_bonus_cstrike.amxx
name = LANG_AES_BONUS_MEGAGRENADE
function = pointBonus_GiveMegaGrenade
points = 15
round = 5
level = 20
time = 15

<give>
item = weapon_g3sg1
name = LANG_AES_BONUS_G3SG1
points = 5
round = 5
time = 15
level = 20

<give>
item = weapon_sg550
name = LANG_AES_BONUS_SG550
points = 5
round = 5
level = 20
time = 15

<call>
plugin = aes_bonus_cstrike.amxx
name = LANG_AES_BONUS_MEGADEAGLE
function = pointBonus_GiveMegaDeagle
points = 20
round = 5
level = 30
time = 15

[spawn]

<give>
item = weapon_smokegrenade
name = Smoke
levels = 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
flag = ~t

<give>
item = weapon_hegrenade
name = HE
levels = 0 0 0 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
flag = ~t

<give>
item = weapon_flashbang
name = Flash
levels = 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 2 2 2 2 2 2 2
flag = ~t

<call>
plugin = aes_bonus_cstrike.amxx
name = LANG_AES_BONUS_DEFKIT
function = roundBonus_GiveDefuser
levels = 0 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
flag = ~t

<call>
plugin = aes_bonus_cstrike.amxx
name = Damager
function = roundBonus_Dmgr
levels = 0 0 0 0 0 0 0 2 2 2 2 2 2 2 2 2 2 1 1 1 1 1 1 1 1 1 1

<call>
plugin = aes_bonus_cstrike.amxx
name = LANG_AES_BONUS_ARMOR
function = GiveArmor
levels = 0 0 0 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 2 2 2 2 2 2 2
round = 2
flag = ~t

;<call>
;plugin = aes_bonus_cstrike.amxx
;name = LANG_AES_BOUNS_HP
;function = roundBonus_GiveHP
;levels = 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 10 10 20 20

10 Янв 2019

Перепроверил. Бонусы выдает, но пишет такую ошибку.
Проблема есть только, когда плагины лежат в подпапке plugins/dirname, если же они размещены в plugins - ошибок нет.
Можно закрыть.

SergeyShorokhov · 10 Янв 2019

zerg,

Код:

<call>
plugin = aes_bonus_cstrike.amxx

тут то тоже папку тогда указывай

zerg · 10 Янв 2019

wopox1337, да доглядел уже.
Поздно было, когда создавал тему. :crazy:

Спасибо.

aes error

zerg

Download all Attachments

SergeyShorokhov

zerg

Пользователи, просматривающие эту тему