#include <amxmodx>
#include <fakemeta>

#define HK_GLOW 1 // Подсвечивать аптечки? 0/1
#define HK_FADE 1 // Затемнять экран при поднятии? 0/1
#define HK_REMOVE 1 // Убирать аптечки в начале раунда? 0/1
#define HK_HEALTH 15 // Сколько HP восстанавливает аптечка при простом убийстве?
#define HK_HS 30 // Сколько восстанавливает аптечка при хедшоте?
#define HK_FC 10 // Каков процент вероятности, что выпадет полная хиллка?
#define HK_LIMIT 100 // Максимум HP у игроков?
#define HK_TIME 0 // Сколько секунд апечка лежит на земле (0 - неограничено)
#define HK_OWNER 0 // Может подобрать только убивший? (1 - да, но после мерти или выхода могут все, 2 - да, после смерти или выхода убирать аптечки, 3 - всегда)

// Дальше не трогаем

#if HK_TIME > 0
    #include <engine>
#endif

#define min_ex(%1,%2) (%1 <= %2 ? %1 : %2)

new msg_pickup;

#if HK_FADE == 1
    new msg_fade;
#endif

public plugin_init()
{
    register_plugin("Healthkit", "3.3", "Tuty ft. Sho0ter");
    #if HK_REMOVE == 1
        register_event("HLTV", "ev_start", "a", "1=0", "2=0")
    #endif
    register_event("DeathMsg", "ev_death", "a", "1>0")
    register_forward(FM_Touch, "fm_touch");
    #if HK_TIME > 0
        register_think("healthkit_entity", "eg_think");
    #endif
    #if HK_FADE == 1
        msg_fade = get_user_msgid("ScreenFade");
    #endif
    msg_pickup = get_user_msgid("ItemPickup");
    return PLUGIN_CONTINUE;
}

public plugin_precache()
{
    precache_model("models/w_medkit.mdl");
    precache_sound("items/smallmedkit1.wav");
    return PLUGIN_CONTINUE;
}

public ev_death()
{
    #if HK_OWNER > 0
        new kid = read_data(1);
        if(!is_user_connected(kid))
        {
            kid = 0;
        }
    #endif
    new fc = (random_num(1, 100) <= HK_FC)
    new id = read_data(2);
    new hs = read_data(3);
    #if HK_OWNER == 1 || HK_OWNER == 2
        remove_owner(id)
    #endif
    static Float:origin[3], ent;
    pev(id, pev_origin, origin);
    origin[2] -= 36;
    if(!pev_valid((ent = engfunc(EngFunc_CreateNamedEntity, engfunc(EngFunc_AllocString, "info_target")))))
    {
        return PLUGIN_CONTINUE;
    }
    engfunc(EngFunc_SetOrigin, ent, origin);
    set_pev(ent, pev_classname, "healthkit_entity");
    engfunc(EngFunc_SetModel, ent, "models/w_medkit.mdl");
    dllfunc(DLLFunc_Spawn, ent);
    set_pev(ent, pev_solid, SOLID_BBOX);
    set_pev(ent, pev_movetype, MOVETYPE_NONE);
    engfunc(EngFunc_SetSize, ent, Float:{-23.160000, -13.660000, -0.050000}, Float:{11.470000, 12.780000, 6.720000});
    engfunc(EngFunc_DropToFloor, ent);
    #if HK_GLOW == 1
        set_pev(ent, pev_renderfx, kRenderFxGlowShell);
        set_pev(ent, pev_rendercolor, fc ? (Float:{255.0, 0.0, 0.0}) : (hs ? (Float:{0.0, 255.0, 0.0}) : (Float:{0.0, 0.0, 255.0})));
        set_pev(ent, pev_rendermode, kRenderFxNone);
        set_pev(ent, pev_renderamt, 27.0);
    #endif
    set_pev(ent, pev_health, fc ? float(HK_LIMIT) : (hs ? float(HK_HS) : float(HK_HEALTH)));
    #if HK_OWNER > 0
        set_pev(ent, pev_iuser1, kid);
    #endif
    #if HK_TIME > 0
        set_pev(ent, pev_nextthink, get_gametime() + float(HK_TIME));
    #endif
    return PLUGIN_CONTINUE;
}

public fm_touch(ent, id)
{
    if(!pev_valid(ent))
    {
        return FMRES_IGNORED;
    }
    static classname[32];  
    pev(ent, pev_classname, classname, 31);  
    if(!equal(classname, "healthkit_entity"))  
    {
        return FMRES_IGNORED;  
    }
    #if HK_OWNER > 0
        new kid = pev(ent, pev_iuser1);
        if(kid && kid != id)
        {
            return FMRES_IGNORED;
        }
    #endif
    new chp = pev(id, pev_health);
    if(chp >= HK_LIMIT)
    {  
        return FMRES_IGNORED;
    }
    new hkv = pev(ent, pev_health);
    if(hkv == HK_LIMIT)
    {
        set_hudmessage(255, 0, 0, -1.0, 0.80, 0, 6.0, 3.0, 0.1, 0.1);
    }
    else if(hkv == HK_HS)
    {
        set_hudmessage(0, 255, 0, -1.0, 0.80, 0, 6.0, 3.0, 0.1, 0.1);
    }
    else if(hkv == HK_HEALTH)
    {
        set_hudmessage(0, 0, 255, -1.0, 0.80, 0, 6.0, 3.0, 0.1, 0.1);
    }
    show_hudmessage(id, "+ %d HP", hkv);
    set_pev(id, pev_health, float(min_ex(chp + hkv, HK_LIMIT)));
    emit_sound(id, CHAN_ITEM, "items/smallmedkit1.wav", VOL_NORM, ATTN_NORM , 0, PITCH_NORM);
    message_begin(MSG_ONE_UNRELIABLE, msg_pickup, _, id);
    write_string("item_healthkit");
    message_end();
    #if HK_FADE == 1
        message_begin(MSG_ONE_UNRELIABLE, msg_fade , _, id);
        write_short(1 << 10);
        write_short(1 << 10);
        write_short(0x0000);
        write_byte(hkv == HK_LIMIT ? 255 : 0);
        write_byte(hkv == HK_HS ? 255 : 0);
        write_byte(hkv == HK_HEALTH ? 255 : 0);
        write_byte(150);
        message_end();
    #endif
    engfunc(EngFunc_RemoveEntity, ent);
    return FMRES_IGNORED;
}


#if HK_TIME > 0
    public eg_think(ent)
    {
        if(!pev_valid(ent))
        {
            return FMRES_IGNORED;
        }
        engfunc(EngFunc_RemoveEntity, ent);
        return FMRES_IGNORED;
    }
#endif

#if HK_REMOVE == 1
    public ev_start()
    {
        new ent;
        while((ent = engfunc(EngFunc_FindEntityByString, ent, "classname", "healthkit_entity")))
        {
            engfunc(EngFunc_RemoveEntity, ent);
        }
        return PLUGIN_CONTINUE;
    }
#endif

#if HK_OWNER == 1 || HK_OWNER == 2
    public client_disconnect(id)
    {
        return remove_owner(id);
    }
    
    public remove_owner(id)
    {
        new ent;
        while((ent = engfunc(EngFunc_FindEntityByString, ent, "classname", "healthkit_entity")))
        {
            if(pev(ent, pev_iuser1) == id)
            {
                #if HK_OWNER == 1
                    set_pev(ent, pev_iuser1, 0);
                #else
                    engfunc(EngFunc_RemoveEntity, ent);
                #endif
            }
        }
        return PLUGIN_CONTINUE;
    }
#endif

#include <amxmodx>
#include <fakemeta>

#define HK_GLOW 1 // Подсвечивать аптечки? 0/1
#define HK_FADE 1 // Затемнять экран при поднятии? 0/1
#define HK_REMOVE 1 // Убирать аптечки в начале раунда? 0/1
#define HK_HEALTH 15 // Сколько HP восстанавливает аптечка при простом убийстве?
#define HK_HS 30 // Сколько восстанавливает аптечка при хедшоте?
#define HK_LIMIT 100 // Максимум HP у игроков?
#define HK_TIME 0 // Сколько секунд апечка лежит на земле (0 - неограничено)
#define HK_OWNER 0 // Может подобрать только убивший? (1 - да, но после мерти или выхода могут все, 2 - да, после смерти или выхода убирать аптечки, 3 - всегда)

// Дальше не трогаем

#if HK_TIME > 0
    #include <engine>
#endif

#define min_ex(%1,%2) (%1 <= %2 ? %1 : %2)

new msg_pickup;

#if HK_FADE == 1
    new msg_fade;
#endif

public plugin_init()
{
    register_plugin("Healthkit", "3.3", "Tuty ft. Sho0ter");
    #if HK_REMOVE == 1
        register_event("HLTV", "ev_start", "a", "1=0", "2=0")
    #endif
    register_event("DeathMsg", "ev_death", "a", "1>0")
    register_forward(FM_Touch, "fm_touch");
    #if HK_TIME > 0
        register_think("healthkit_entity", "eg_think");
    #endif
    #if HK_FADE == 1
        msg_fade = get_user_msgid("ScreenFade");
    #endif
    msg_pickup = get_user_msgid("ItemPickup");
    return PLUGIN_CONTINUE;
}

public plugin_precache()
{
    precache_model("models/w_medkit.mdl");
    precache_sound("items/smallmedkit1.wav");
    return PLUGIN_CONTINUE;
}

public ev_death()
{
    #if HK_OWNER > 0
        new kid = read_data(1);
        if(!is_user_connected(kid))
        {
            kid = 0;
        }
    #endif
    new id = read_data(2);
    new hs = read_data(3);
    #if HK_OWNER == 1 || HK_OWNER == 2
        remove_owner(id)
    #endif
    static Float:origin[3], ent;
    pev(id, pev_origin, origin);
    origin[2] -= 36;
    if(!pev_valid((ent = engfunc(EngFunc_CreateNamedEntity, engfunc(EngFunc_AllocString, "info_target")))))
    {
        return PLUGIN_CONTINUE;
    }
    engfunc(EngFunc_SetOrigin, ent, origin);
    set_pev(ent, pev_classname, "healthkit_entity");
    engfunc(EngFunc_SetModel, ent, "models/w_medkit.mdl");
    dllfunc(DLLFunc_Spawn, ent);
    set_pev(ent, pev_solid, SOLID_BBOX);
    set_pev(ent, pev_movetype, MOVETYPE_NONE);
    engfunc(EngFunc_SetSize, ent, Float:{-23.160000, -13.660000, -0.050000}, Float:{11.470000, 12.780000, 6.720000});
    engfunc(EngFunc_DropToFloor, ent);
    #if HK_GLOW == 1
        set_pev(ent, pev_renderfx, kRenderFxGlowShell);
        set_pev(ent, pev_rendercolor, hs ? (Float:{255.0, 0.0, 0.0}) : (Float:{0.0, 255.0, 0.0}));
        set_pev(ent, pev_rendermode, kRenderFxNone);
        set_pev(ent, pev_renderamt, 27.0);
    #endif
    set_pev(ent, pev_health, hs ? float(HK_HS) : float(HK_HEALTH));
    #if HK_OWNER > 0
        set_pev(ent, pev_iuser1, kid);
    #endif
    #if HK_TIME > 0
        set_pev(ent, pev_nextthink, get_gametime() + float(HK_TIME));
    #endif
    return PLUGIN_CONTINUE;
}

public fm_touch(ent, id)
{
    if(!pev_valid(ent))
    {
        return FMRES_IGNORED;
    }
    static classname[32];  
    pev(ent, pev_classname, classname, 31);  
    if(!equal(classname, "healthkit_entity"))  
    {
        return FMRES_IGNORED;  
    }
    #if HK_OWNER > 0
        new kid = pev(ent, pev_iuser1);
        if(kid && kid != id)
        {
            return FMRES_IGNORED;
        }
    #endif
    new chp = pev(id, pev_health);
    if(chp >= HK_LIMIT)
    {  
        return FMRES_IGNORED;
    }
    new hkv = pev(ent, pev_health);
    if(hkv == HK_HEALTH)
    {
        set_hudmessage(0, 255, 0, -1.0, 0.83, 2, 6.0, 3.0);
    }
    else
    {
        set_hudmessage(255, 0, 0, -1.0, 0.83, 2, 6.0, 3.0);
    }
    show_hudmessage(id, "+ %d HP", hkv);
    set_pev(id, pev_health, float(min_ex(chp + hkv, HK_LIMIT)));
    emit_sound(id, CHAN_ITEM, "items/smallmedkit1.wav", VOL_NORM, ATTN_NORM , 0, PITCH_NORM);
    message_begin(MSG_ONE_UNRELIABLE, msg_pickup, _, id);
    write_string("item_healthkit");
    message_end();
    #if HK_FADE == 1
        message_begin(MSG_ONE_UNRELIABLE, msg_fade , _, id);
        write_short(1 << 10);
        write_short(1 << 10);
        write_short(0x0000);
        if(chp == HK_HEALTH)
        {
            write_byte(255);
            write_byte(0);
        }
        else
        {
            write_byte(0);
            write_byte(255);
        }
        write_byte(0);
        write_byte(75);
        message_end();
    #endif
    engfunc(EngFunc_RemoveEntity, ent);
    return FMRES_IGNORED;
}


#if HK_TIME > 0
    public eg_think(ent)
    {
        if(!pev_valid(ent))
        {
            return FMRES_IGNORED;
        }
        engfunc(EngFunc_RemoveEntity, ent);
        return FMRES_IGNORED;
    }
#endif

#if HK_REMOVE == 1
    public ev_start()
    {
        new ent;
        while((ent = engfunc(EngFunc_FindEntityByString, ent, "classname", "healthkit_entity")))
        {
            engfunc(EngFunc_RemoveEntity, ent);
        }
        return PLUGIN_CONTINUE;
    }
#endif

#if HK_OWNER == 1 || HK_OWNER == 2
    public client_disconnect(id)
    {
        return remove_owner(id);
    }
    
    public remove_owner(id)
    {
        new ent;
        while((ent = engfunc(EngFunc_FindEntityByString, ent, "classname", "healthkit_entity")))
        {
            if(pev(ent, pev_iuser1) == id)
            {
                #if HK_OWNER == 1
                    set_pev(ent, pev_iuser1, 0);
                #else
                    engfunc(EngFunc_RemoveEntity, ent);
                #endif
            }
        }
        return PLUGIN_CONTINUE;
    }
#endif