#define DAMAGE_RECIEVED
#include <amxmodx>
#include <amxmisc>
#include <hamsandwich>
#include <fakemeta>
#include <cstrike>
#include <fun>

#define PLUGIN "VIP"
#define VERSION "3.5"
#define AUTHOR "MODIFICAT MARKWAR3FT"

#define VIP_FLAG ADMIN_LEVEL_H

static const COLOR[] = "^x04" //green
static const CONTACT[] = "ICQ: 642-364-576"
new maxplayers
new gmsgSayText
new g_MsgSync
new mpd, mkb, mhb
new vipsOnline
new health_add
new health_hs_add
new health_max
new nKiller
new nKiller_hp
new nHp_add
new nHp_max
new giveHp
new g_awp_active
[color=green]new block[33][/color]
//Menu Items
new p_Menu_Enable, p_Give_AK47, p_Give_M4A1, p_Give_AWP

//Damage
#if defined DAMAGE_RECIEVED
new g_MsgSync2

#endif

new bool:HasC4[33]

//Start Items
new p_Start_Deagle, p_Start_He, p_Start_Flash, p_Start_Smoke, round_number, g_maxplayers, p_Plugin_Exist, p_Plugin_Exist_Time
public plugin_init() {
register_plugin(PLUGIN, VERSION, AUTHOR)
register_clcmd("say /vip", "vipinfo")
mpd = register_cvar("money_per_damage","3")
mkb = register_cvar("money_kill_bonus","300")
mhb = register_cvar("money_hs_bonus","500")
register_dictionary("viplang.txt")
new configsDir[64]
get_configsdir(configsDir, 63)
server_cmd("exec %s/vip_config.cfg", configsDir)
register_event("CurWeapon", "event_CurWeapon", "be", "1=1")
register_clcmd("awp","HandleCmd")
g_awp_active = register_cvar("awp_only_vips", "1")
giveHp = register_cvar("give_kill_hp", "1")
health_add = register_cvar("kill_hp", "5")
health_hs_add = register_cvar("kill_hs_hp", "10")
health_max = register_cvar("max_hp", "100")
register_event("DeathMsg", "hook_death", "a", "1>0")
p_Menu_Enable = register_cvar("menu_enable", "1")
p_Give_AK47 = register_cvar("menu_ak47", "1")
p_Give_M4A1 = register_cvar("menu_m4a1", "1")
p_Give_AWP = register_cvar("menu_awp", "1")
p_Start_Deagle = register_cvar("start_deagle", "0")
p_Start_He = register_cvar("start_hegrenade", "1")
p_Start_Flash = register_cvar("start_flash", "2")
p_Start_Smoke = register_cvar("start_smokegrenade","1")
p_Plugin_Exist = register_cvar("plugin_exist", "1")
p_Plugin_Exist_Time = register_cvar("plugin_exist_time", "60.0")
vipsOnline = register_cvar("show_vips", "1")
RegisterHam(Ham_Spawn, "player", "fwHamPlayerSpawnPost", 1);
register_event("HLTV", "event_round_start", "a", "1=0", "2=0")
register_event("TextMsg", "event_game_restart", "a", "2=#Game_Commencing", "2=#Game_will_restart_in")
register_event("DeathMsg", "hook_death", "a", "1>0")
register_event("Damage", "on_damage", "b", "2!0", "3=0", "4!0")
g_maxplayers=get_maxplayers()
maxplayers = get_maxplayers()
register_clcmd("say", "handle_say")
register_cvar("amx_contactinfo", CONTACT, FCVAR_SERVER)
g_MsgSync = CreateHudSyncObj()
gmsgSayText = get_user_msgid("SayText")
#if defined DAMAGE_RECIEVED
g_MsgSync2 = CreateHudSyncObj()

#endif
}

[color=red]public blockvipmenu(id){
new mapname[64]
get_mapname(mapname,charsmax(mapname))

if(equal(mapname,"35hp_2"))

{
block[id]
client_print(id, print_chat, "Вы не можете использовать V.I.P. привилегии на этой карте")
}
}
[/color]
public on_damage(id)
{
new attacker = get_user_attacker(id)

#if defined DAMAGE_RECIEVED
// id should be connected if this message is sent, but lets check anyway
if ( is_user_connected(id) && is_user_connected(attacker) )
if (get_user_flags(attacker) & ADMIN_LEVEL_H)
{
new damage = read_data(2)

set_hudmessage(255, 0, 0, 0.45, 0.50, 2, 0.1, 4.0, 0.1, 0.1, -1)
ShowSyncHudMsg(id, g_MsgSync2, "%i^n", damage)
#else
if ( is_user_connected(attacker) && if (get_user_flags(attacker) & ADMIN_LEVEL_H) )
{
new damage = read_data(2)
#endif
set_hudmessage(0, 100, 200, -1.0, 0.55, 2, 0.1, 4.0, 0.02, 0.02, -1)
ShowSyncHudMsg(attacker, g_MsgSync, "%i^n", damage)
}
}

public Damage(id)
{
new weapon, hitpoint, attacker = get_user_attacker(id,weapon,hitpoint)
if(attacker<=maxplayers && is_user_alive(attacker) && attacker!=id)
if (get_user_flags(attacker) & ADMIN_LEVEL_H)
{
new money = read_data(2) * get_pcvar_num(mpd)
if(hitpoint==1) money += get_pcvar_num(mhb)
cs_set_user_money(attacker,cs_get_user_money(attacker) + money)
}
}

public death_msg()
{
if(read_data(1)<=maxplayers && read_data(1) && read_data(1)!=read_data(2)) cs_set_user_money(read_data(1),cs_get_user_money(read_data(1)) + get_pcvar_num(mkb) - 300)
}

stock ChatColor(const id,const input[],any:...)
{
new count = 1,players[32]
static msg[191]
vformat(msg,190,input,3)

replace_all(msg,190,"!g","^4")
replace_all(msg,190,"!y","^1")
replace_all(msg,190,"!team","^3")
replace_all(msg, 190,"!team2","^0")

if(id)players[0] = id;else get_players(players,count,"ch")
{
for (new i = 0;i < count;i++)
{
if(is_user_connected(players[i]))
{
message_begin(MSG_ONE_UNRELIABLE,get_user_msgid("SayText"),_,players[i])
write_byte(players[i])
write_string(msg)
message_end()
}
}
}
}
public HandleCmd(id){
if (get_pcvar_num(g_awp_active) == 1)
return PLUGIN_CONTINUE
if(!(get_user_flags(id) & VIP_FLAG))
return PLUGIN_CONTINUE
client_print(id, print_center, "%L", LANG_SERVER, "AWP_ONLY_FOR_VIP")
return PLUGIN_HANDLED
}

public event_CurWeapon(id){
if (get_pcvar_num(g_awp_active) == 1){
if(read_data(2) == CSW_AWP){
if(!(get_user_flags(id) & VIP_FLAG)){
client_print(id, print_center, "%L", LANG_SERVER, "AWP_ONLY_FOR_VIP")
client_cmd(id, "drop")
}

}
}
return PLUGIN_HANDLED
}
public hook_death()
{
if(get_pcvar_num(giveHp) == 1){
nKiller = read_data(1)
if(!access(nKiller,VIP_FLAG))
return;
if ( (read_data(3) == 1) && (read_data(5) == 0) )
{
nHp_add = get_pcvar_num (health_hs_add)
}
else
nHp_add = get_pcvar_num (health_add)
nHp_max = get_pcvar_num (health_max)
nKiller_hp = get_user_health(nKiller)
nKiller_hp += nHp_add
if (nKiller_hp > nHp_max) nKiller_hp = nHp_max
set_user_health(nKiller, nKiller_hp)
set_hudmessage(0, 255, 0, -1.0, 0.15, 0, 1.0, 1.0, 0.1, 0.1, -1)
show_hudmessage(nKiller, "%L", LANG_SERVER, "HP_ADD", nHp_add)
}
}
public mymenu(id){
new MyMenu=menu_create("VIPMENU By MARKO","vipMenu");
new MyMenuFun=menu_makecallback("mcbMyMenu");
new m4a1[150]
formatex(m4a1, sizeof m4a1 - 1, "%L", id, "MENU_M4A1")
menu_additem(MyMenu,m4a1,"",0,MyMenuFun);
new ak47[150]
formatex(ak47, sizeof ak47 - 1, "%L", id, "MENU_AK47")
menu_additem(MyMenu,ak47 ,"",0,MyMenuFun);
new awp[150]
formatex(awp, sizeof awp - 1, "%L", id, "MENU_AWP")
menu_additem(MyMenu,awp,"",0,MyMenuFun);
if(get_user_flags(id) & VIP_FLAG){
menu_display(id, MyMenu,0);
}
else{
ChatColor(id,"%L",LANG_SERVER,"NOT_VIP")
}
return PLUGIN_HANDLED;
}

public vipMenu(id, menu, item){
switch(item){
case 0:{
if (user_has_weapon(id, CSW_C4)){
HasC4[id] = true;
}
else{
HasC4[id] = false;
}
strip_user_weapons (id)
give_item(id, "weapon_m4a1")
cs_set_user_bpammo(id, CSW_M4A1, 90)
give_item(id, "weapon_deagle")
cs_set_user_bpammo(id, CSW_DEAGLE, 35)
give_item(id,"weapon_knife")
if(get_pcvar_num(p_Start_He) == 1){
give_item(id,"weapon_hegrenade")
}
if(get_pcvar_num(p_Start_Flash) == 1){
give_item(id, "weapon_flashbang");
}
else if(get_pcvar_num(p_Start_Flash) == 2){
give_item(id, "weapon_flashbang");
give_item(id, "weapon_flashbang");
}
if(get_pcvar_num(p_Start_Smoke) == 1){
give_item(id, "weapon_smokegrenade");
}
if(get_pcvar_num(p_Start_Deagle) == 1){
give_item(id,"weapon_deagle")
cs_set_user_bpammo(id, CSW_DEAGLE, 35)
}
give_item(id, "weapon_smokegrenade");
give_item(id, "item_assaultsuit");
give_item(id, "item_thighpack");
if (HasC4[id]){
give_item(id, "weapon_c4");
cs_set_user_plant( id );
}
client_print(id, print_center, "Вы получили M4A1+Deagle!")
}
case 1:{
if (user_has_weapon(id, CSW_C4)){
HasC4[id] = true;
}
else{
HasC4[id] = false;
}
strip_user_weapons (id)
give_item(id, "weapon_ak47")
cs_set_user_bpammo(id, CSW_AK47, 90)
give_item(id, "weapon_deagle")
cs_set_user_bpammo(id, CSW_DEAGLE, 35)
give_item(id,"weapon_knife")
if(get_pcvar_num(p_Start_He) == 1){
give_item(id,"weapon_hegrenade")
}
if(get_pcvar_num(p_Start_Flash) == 1){
give_item(id, "weapon_flashbang");
}
else if(get_pcvar_num(p_Start_Flash) == 2){
give_item(id, "weapon_flashbang");
give_item(id, "weapon_flashbang");
}
if(get_pcvar_num(p_Start_Smoke) == 1){
give_item(id, "weapon_smokegrenade");
}
if(get_pcvar_num(p_Start_Deagle) == 1){
give_item(id,"weapon_deagle")
cs_set_user_bpammo(id, CSW_DEAGLE, 35)
}
give_item(id, "weapon_smokegrenade");
give_item(id, "item_assaultsuit");
give_item(id, "item_thighpack");
if (HasC4[id]){
give_item(id, "weapon_c4");
cs_set_user_plant( id );
}
client_print(id, print_center, "Вы получили AK47+Deagle!")

}
case 2:{
if (user_has_weapon(id, CSW_C4)){
HasC4[id] = true;
}
else{
HasC4[id] = false;
}
strip_user_weapons (id)
give_item(id, "weapon_awp")
cs_set_user_bpammo(id, CSW_AWP, 30)
give_item(id, "weapon_deagle")
cs_set_user_bpammo(id, CSW_DEAGLE, 35)
give_item(id,"weapon_knife")
if(get_pcvar_num(p_Start_He) == 1){
give_item(id,"weapon_hegrenade")
}
if(get_pcvar_num(p_Start_Flash) == 1){
give_item(id, "weapon_flashbang");
}
else if(get_pcvar_num(p_Start_Flash) == 2){
give_item(id, "weapon_flashbang");
give_item(id, "weapon_flashbang");
}
if(get_pcvar_num(p_Start_Smoke) == 1){
give_item(id, "weapon_smokegrenade");
}
if(get_pcvar_num(p_Start_Deagle) == 1){
give_item(id,"weapon_deagle")
cs_set_user_bpammo(id, CSW_DEAGLE, 35)
}
give_item(id, "weapon_smokegrenade");
give_item(id, "item_assaultsuit");
give_item(id, "item_thighpack")
if (HasC4[id]){
give_item(id, "weapon_c4");
cs_set_user_plant( id );
}
client_print(id, print_center, "Вы получили AWP+Deagle!")
}
}

}
public mcbMyMenu(id, menu, item){
if(item==0){
if(get_pcvar_num(p_Give_M4A1) != 1){
return ITEM_DISABLED;
}
}
if(item==1){
if(get_pcvar_num(p_Give_AK47) != 1){
return ITEM_DISABLED;
}
}
if(item==2){
if(get_pcvar_num(p_Give_AWP) != 1){
return ITEM_DISABLED;
}
}
return ITEM_ENABLED;
}
public event_round_start()
{
if(get_pcvar_num(p_Menu_Enable) == 1){
round_number++

if (round_number>1)
{
for (new id=1;id<=g_maxplayers;id++)
{
if (!is_user_connected(id)||is_user_bot(id))
continue
if(get_user_flags(id) & VIP_FLAG){
if(cs_get_user_team(id) == CS_TEAM_CT || CS_TEAM_T){
set_task(0.1, "mymenu", id, _, _, "a", 1)

}
}
}
}
}
}
public event_game_restart()
{
round_number=0
}
public fwHamPlayerSpawnPost(id){
if (get_user_flags(id) & VIP_FLAG) {
strip_user_weapons (id)
give_item(id,"weapon_knife")
if(get_pcvar_num(p_Start_Deagle) == 1){
give_item(id,"weapon_deagle")
cs_set_user_bpammo(id, CSW_DEAGLE, 35)
}
else if(cs_get_user_team(id) == CS_TEAM_CT){
give_item(id, "weapon_usp")
cs_set_user_bpammo(id, CSW_USP, 24)
}
else if (cs_get_user_team(id) == CS_TEAM_T){
give_item(id, "weapon_glock18")
cs_set_user_bpammo(id, CSW_GLOCK18, 40)
}
if(get_pcvar_num(p_Start_He) == 1){
give_item(id, "weapon_hegrenade")
}
if(get_pcvar_num(p_Start_Flash) == 1){
give_item(id, "weapon_flashbang")
}
else if(get_pcvar_num(p_Start_Flash) == 2){
give_item(id, "weapon_flashbang")
give_item(id, "weapon_flashbang")
}
if(get_pcvar_num(p_Start_Smoke) == 1){
give_item(id, "weapon_smokegrenade")
}
}
}

public vipinfo(id){
show_motd(id, "vipinfo.txt")
}
public client_authorized(id)
{
if(get_pcvar_num(p_Plugin_Exist) == 1){
set_task(get_pcvar_float(p_Plugin_Exist_Time), "vipInfoMessage", id, _, _, "b")
}
}
public vipInfoMessage(id)
{
if(!is_user_admin(id))
ChatColor(id,"%L",LANG_SERVER,"INFO_VIP_PLUGIN_EXIST")

}
public handle_say(id) {
new said[192]
read_args(said,192)
if( ( containi(said, "who") != -1 && containi(said, "admin") != -1 ) || contain(said, "/vips") != -1 )
set_task(0.1,"print_adminlist",id)
return PLUGIN_CONTINUE
}

public print_adminlist(user)
{
if(get_pcvar_num(vipsOnline) == 1){
new adminnames[33][32]
new message[256]
new contactinfo[256], contact[112]
new id, count, x, len

for(id = 1 ; id <= maxplayers ; id++)
if(is_user_connected(id))
if(get_user_flags(id) & VIP_FLAG)
get_user_name(id, adminnames[count++], 31)

len = format(message, 255, "%s VIP Online: ",COLOR)
if(count > 0) {
for(x = 0 ; x < count ; x++) {
len += format(message[len], 255-len, "%s%s ", adminnames[x], x < (count-1) ? ", ":"")
if(len > 96 ) {
print_message(user, message)
len = format(message, 255, "%s ",COLOR)
}
}
print_message(user, message)
}
else {
len += format(message[len], 255-len, "%L", LANG_SERVER,"NO_VIPS_ONLLINE")
print_message(user, message)
}

get_cvar_string("amx_contactinfo", contact, 63)
if(contact[0]) {
format(contactinfo, 111, "%s Contact Server Admin -- %s", COLOR, contact)
print_message(user, contactinfo)
}
}
}
print_message(id, msg[]) {
message_begin(MSG_ONE, gmsgSayText, {0,0,0}, id)
write_byte(id)
write_string(msg)
message_end()
}