AMXX.pl: Support AMX Mod X i SourceMod

#include <amxmodx>
#include <colorchat>
#include <cstrike>
#include <engine>
#include <fakemeta>
#include <fun>
#include <hamsandwich>

#define DMG_HE (1<<24)
#define IsPlayer(%1) (1<=%1<=maxPlayers)

forward amxbans_admin_connect(id);

new Array:g_Array, CsArmorType:armortype, bool:g_Vip[33], gRound=0, g_Hudmsg,
ioid, maxPlayers, menu, menu_callback_handler, weapon_id;

new const clips[]={0, 13, -0, 10, 1, 7, 0, 30, 30, 1, 30, 20, 25, 30, 35, 25, 12, 20, 10, 30, 100, 8, 30, 30, 20, 2, 7, 30, 30, 0, 50};
new const g_Langcmd[][]={"say /vips","say_team /vips","say /vipy","say_team /vipy"};
new const g_Prefix[] = "Vip Chat";

public plugin_init(){
	register_plugin("VIP Ultimate", "12.3.0.2", "benio101 & speedkill");
	register_event("HLTV", "event_new_round", "a", "1=0", "2=0");
	register_logevent("GameCommencing", 2, "1=Game_Commencing");
	RegisterHam(Ham_Spawn, "player", "SpawnedEventPre", 1);
	RegisterHam(Ham_TakeDamage, "player", "takeDamage", 0);
	register_event("DeathMsg", "DeathMsg", "a");
	register_message(get_user_msgid("ScoreAttrib"), "VipStatus");
	g_Array=ArrayCreate(64,32);
	for(new i;i<sizeof g_Langcmd;i++){
		register_clcmd(g_Langcmd[i], "ShowVips");
	}
	register_clcmd("say /vip", "ShowMotd");
	set_task(30.0, "ShowAdv",.flags = "b");
	g_Hudmsg=CreateHudSyncObj();
	register_event("Damage", "damage", "b", "2!0", "3=0", "4!0");
	register_clcmd("say_team", "VipChat");
}
public client_authorized(id){
	if(get_user_flags(id) & 524288 == 524288){
		client_authorized_vip(id);
	}
}
public client_authorized_vip(id){
	g_Vip[id]=true;
	new g_Name[64];
	get_user_name(id,g_Name,charsmax(g_Name));
	
	new g_Size = ArraySize(g_Array);
	new szName[64];
	
	for(new i = 0; i < g_Size; i++){
		ArrayGetString(g_Array, i, szName, charsmax(szName));
		
		if(equal(g_Name, szName)){
			return 0;
		}
	}
	ArrayPushString(g_Array,g_Name);
	
	return PLUGIN_CONTINUE;
}
public client_disconnect(id){
	if(g_Vip[id]){
		client_disconnect_vip(id);
	}
}
public client_disconnect_vip(id){
	g_Vip[id]=false;
	new Name[64];
	get_user_name(id,Name,charsmax(Name));
	
	new g_Size = ArraySize(g_Array);
	new g_Name[64];
	
	for(new i = 0; i < g_Size; i++){
		ArrayGetString(g_Array, i, g_Name, charsmax(g_Name));
		
		if(equal(g_Name,Name)){
			ArrayDeleteItem(g_Array,i);
			break;
		}
	}
}
public event_new_round(){
	++gRound;
}
public GameCommencing(){
	gRound=0;
}
public SpawnedEventPre(id){
	if(g_Vip[id]){
		if(is_user_alive(id)){
			SpawnedEventPreVip(id);
		}
	}
}
public SpawnedEventPreVip(id){
	if(gRound>=2){
		cs_set_user_armor(id, min(cs_get_user_armor(id,armortype)+100, 300), armortype);
		losoweGranaty(id, 3);
	}
	if(gRound>=3){
		give_item(id, "weapon_deagle");
		give_item(id, "ammo_50ae");
		weapon_id=find_ent_by_owner(-1, "weapon_deagle", id);
		if(weapon_id)cs_set_weapon_ammo(weapon_id, 7);
		cs_set_user_bpammo(id, CSW_DEAGLE, 35);
	}
	if(get_user_team(id)==2){
		give_item(id, "item_thighpack");
	}
	cs_set_user_nvg(id);
	recharge(id);
	show_vip_menu(id);
}
public losoweGranaty(id, losowe_granaty){
	new henum=(user_has_weapon(id,CSW_HEGRENADE)?cs_get_user_bpammo(id,CSW_HEGRENADE):0);
	new fbnum=(user_has_weapon(id,CSW_FLASHBANG)?cs_get_user_bpammo(id,CSW_FLASHBANG):0);
	new sgnum=(user_has_weapon(id,CSW_SMOKEGRENADE)?cs_get_user_bpammo(id,CSW_SMOKEGRENADE):0);
	while(--losowe_granaty>=0){
		new granat=random(3);
		switch(granat){
			case 0:{
				if(++henum>1){
					cs_set_user_bpammo(id,CSW_HEGRENADE,cs_get_user_bpammo(id,CSW_HEGRENADE)+1);
				} else {
					give_item(id, "weapon_hegrenade");
				}
			}
			case 1:{
				if(++fbnum>2){
					cs_set_user_bpammo(id,CSW_FLASHBANG,cs_get_user_bpammo(id,CSW_FLASHBANG)+1);
				} else {
					give_item(id, "weapon_flashbang");
				}
			}
			case 2:{
				if(++sgnum>1){
					cs_set_user_bpammo(id,CSW_SMOKEGRENADE,cs_get_user_bpammo(id,CSW_SMOKEGRENADE)+1);
				} else {
					give_item(id, "weapon_smokegrenade");
				}
			}
		}
	}
}
public menu_1_handler(id){
	if(get_pdata_cbase(id, 368)==-1){
		give_item(id, "weapon_mp5navy");
		give_item(id, "ammo_9mm");
		weapon_id=find_ent_by_owner(-1, "weapon_mp5navy", id);
		if(weapon_id)cs_set_weapon_ammo(weapon_id, 30);
		cs_set_user_bpammo(id, CSW_MP5NAVY, 120);
	}
}
public menu_3_handler(id){
	if(get_pdata_cbase(id, 368)==-1){
		give_item(id, "weapon_ak47");
		give_item(id, "ammo_762nato");
		weapon_id=find_ent_by_owner(-1, "weapon_ak47", id);
		if(weapon_id)cs_set_weapon_ammo(weapon_id, 30);
		cs_set_user_bpammo(id, CSW_AK47, 90);
	}
}
public menu_2_handler(id){
	if(get_pdata_cbase(id, 368)==-1){
		give_item(id, "weapon_m4a1");
		give_item(id, "ammo_556nato");
		weapon_id=find_ent_by_owner(-1, "weapon_m4a1", id);
		if(weapon_id)cs_set_weapon_ammo(weapon_id, 30);
		cs_set_user_bpammo(id, CSW_M4A1, 90);
	}
}
public menu_4_handler(id){
	if(get_pdata_cbase(id, 368)==-1){
		give_item(id, "weapon_awp");
		give_item(id, "ammo_338magnum");
		weapon_id=find_ent_by_owner(-1, "weapon_awp", id);
		if(weapon_id)cs_set_weapon_ammo(weapon_id, 10);
		cs_set_user_bpammo(id, CSW_AWP, 30);
	}
}
public recharge(id){
	new wid=get_user_weapon(id);
	if(wid){
		new weaponname[32], weid;
		get_weaponname(wid, weaponname, 31);
		weid=find_ent_by_owner(-1, weaponname, id);
		if(weid){
			cs_set_weapon_ammo(weid, clips[wid]);
		}
	}
}
public plugin_cfg(){
	maxPlayers=get_maxplayers();
}
public takeDamage(this, idinflictor, idattacker, Float:damage, damagebits){
	if(((IsPlayer(idattacker) && is_user_connected(idattacker) && g_Vip[idattacker] && (ioid=idattacker)) ||
	(ioid=pev(idinflictor, pev_owner) && IsPlayer(ioid) && is_user_connected(ioid) && g_Vip[ioid]))){
		if(damagebits & DMG_HE){
			if(gRound>=2){
				if(gRound<=11){
					damage*=(100+15)/100;
				}
			}
		}
		if(damagebits & DMG_BULLET){
			if(get_user_weapon(ioid)==CSW_GLOCK18){
				if(get_user_team(ioid)==1){
					if(random(6)<1){
						damage*=(100+20)/100;
					}
				}
			}
			if(get_user_weapon(ioid)==CSW_USP){
				if(get_user_team(ioid)==2){
					if(random(6)<1){
						damage*=(100+20)/100;
					}
				}
			}
			if(get_user_weapon(ioid)==CSW_P228){
				if(random(6)<1){
					damage*=(100+20)/100;
				}
			}
			if(get_user_weapon(ioid)==CSW_DEAGLE){
				if(random(6)<1){
					damage*=(100+20)/100;
				}
			}
			if(get_user_weapon(ioid)==CSW_ELITE){
				if(get_user_team(ioid)==1){
					if(random(6)<1){
						damage*=(100+20)/100;
					}
				}
			}
			if(get_user_weapon(ioid)==CSW_FIVESEVEN){
				if(get_user_team(ioid)==2){
					if(random(6)<1){
						damage*=(100+20)/100;
					}
				}
			}
		}
	}
	
	SetHamParamFloat(4, damage);
	return HAM_HANDLED;
}
public DeathMsg(){
	new killer=read_data(1);
	new victim=read_data(2);
	
	if(is_user_alive(killer) && g_Vip[killer] && get_user_team(killer) != get_user_team(victim)){
		DeathMsgVip(killer,victim,read_data(3));
	}
}
public DeathMsgVip(kid,vid,hs){
	cs_set_user_money(kid, cs_get_user_money(kid)+(hs?500:300));
}
public show_vip_menu(id){
	menu=menu_create("\rMenu VIPa","menu_handler");
	menu_callback_handler=menu_makecallback("menu_callback");
	new bool:active=false, num=-1;
	menu_additem(menu,"\d(\w100\y$\d) \wMP5","",0,menu_callback_handler);
	if(menu_callback(id, menu, ++num)==ITEM_ENABLED){
		active=true;
	}
	menu_additem(menu,"\wM4A1","",0,menu_callback_handler);
	if(menu_callback(id, menu, ++num)==ITEM_ENABLED){
		active=true;
	}
	menu_additem(menu,"\wAK47","",0,menu_callback_handler);
	if(menu_callback(id, menu, ++num)==ITEM_ENABLED){
		active=true;
	}
	menu_additem(menu,"\wAWP","",0,menu_callback_handler);
	if(menu_callback(id, menu, ++num)==ITEM_ENABLED){
		active=true;
	}
	if(active){
		menu_setprop(menu,MPROP_EXITNAME,"Wyjscie");
		menu_setprop(menu,MPROP_TITLE,"\yMenu Vipa");
		menu_setprop(menu,MPROP_NUMBER_COLOR,"\r");
		menu_display(id, menu);
	} else {
		menu_destroy(menu);
	}
}
public menu_callback(id, menu, item){
	if(is_user_alive(id)){
		if(gRound>=3){
			if(gRound<=13){
				if(cs_get_user_money(id)>=100){
					if(item==0){
						return ITEM_ENABLED;
					}
				}
			}
		}
		if(gRound>=5){
			if(gRound<=9){
				if(get_user_team(id)==2){
					if(item==1){
						return ITEM_ENABLED;
					}
				}
				if(get_user_team(id)==1){
					if(item==2){
						return ITEM_ENABLED;
					}
				}
			}
		}
		if(gRound>=4){
			if(gRound<=6){
				if(item==3){
					return ITEM_ENABLED;
				}
			}
		}
	}
	return ITEM_DISABLED;
}
public menu_handler(id, menu, item){
	if(is_user_alive(id)){
		if(gRound>=3){
			if(gRound<=13){
				if(cs_get_user_money(id)>=100){
					if(item==0){
						menu_1_handler(id);
						cs_set_user_money(id, cs_get_user_money(id)-100, 1);
					}
				}
			}
		}
		if(gRound>=5){
			if(gRound<=9){
				if(get_user_team(id)==2){
					if(item==1){
						menu_2_handler(id);
					}
				}
				if(get_user_team(id)==1){
					if(item==2){
						menu_3_handler(id);
					}
				}
			}
		}
		if(gRound>=4){
			if(gRound<=6){
				if(item==3){
					menu_4_handler(id);
				}
			}
		}
	}
	menu_destroy(menu);
	return PLUGIN_HANDLED;
}
public VipStatus(){
	new id=get_msg_arg_int(1);
	if(is_user_alive(id) && g_Vip[id]){
		set_msg_arg_int(2, ARG_BYTE, get_msg_arg_int(2)|4);
	}
}
public ShowVips(id){
	new g_Name[64],g_Message[192];
	
	new g_Size=ArraySize(g_Array);
	
	for(new i = 0; i < g_Size; i++){
		ArrayGetString(g_Array, i, g_Name, charsmax(g_Name));
		
		add(g_Message, charsmax(g_Message), g_Name);
		
		if(i == g_Size - 1){
			add(g_Message, charsmax(g_Message), ".");
		}
		else{
			add(g_Message, charsmax(g_Message), ", ");
		}
	}
	ColorChat(id,GREEN,"^x03Vipy ^x04na ^x03serwerze: ^x04%s", g_Message);
	return PLUGIN_CONTINUE;
}
public client_infochanged(id){
	if(g_Vip[id]){
		new szName[64];
		get_user_info(id,"name",szName,charsmax(szName));
		
		new Name[64];
		get_user_name(id,Name,charsmax(Name));
		
		if(!equal(szName,Name)){
			ArrayPushString(g_Array,szName);
			
			new g_Size=ArraySize(g_Array);
			new g_Name[64];
			for(new i = 0; i < g_Size; i++){
				ArrayGetString(g_Array, i, g_Name, charsmax(g_Name));
				
				if(equal(g_Name,Name)){
					ArrayDeleteItem(g_Array,i);
					break;
				}
			}
		}
	}
}
public plugin_end(){
	ArrayDestroy(g_Array);
}
public ShowMotd(id){
	show_motd(id, "vip.txt", "Informacje o vipie");
}
public ShowAdv(){
	ColorChat(0, NORMAL, "[VIP]^x04 Chcesz dowiedziec sie co posiada vip ? Napisz na say'u /vip");
}
public damage(id){
	new attacker=get_user_attacker(id);
	new damage=read_data(2);
	
	if(g_Vip[id]){
		set_hudmessage(255, 0, 0, 0.45, 0.50, 2, 0.1, 4.0, 0.1, 0.1, -1);
		ShowSyncHudMsg(id, g_Hudmsg, "%i^n", damage);
	}
	if(is_user_connected(attacker) && g_Vip[attacker]){
		set_hudmessage(0, 100, 200, -1.0, 0.55, 2, 0.1, 4.0, 0.02, 0.02, -1);
		ShowSyncHudMsg(attacker, g_Hudmsg, "%i^n", damage);
	}
}
public VipChat(id){
	if(g_Vip[id]){
		new g_Msg[256],
		g_Text[256];
		
		read_args(g_Msg,charsmax(g_Msg));
		remove_quotes(g_Msg);
		
		if(g_Msg[0] == '*' && g_Msg[1]){
			new g_Name[64];
			get_user_name(id,g_Name,charsmax(g_Name));
			
			formatex(g_Text,charsmax(g_Text),"^x01(%s) ^x03%s : ^x04%s",g_Prefix, g_Name, g_Msg[1]);
			
			for(new i=1;i<33;i++){
				if(is_user_connected(i) && g_Vip[i])
				ColorChat(i, GREEN, "%s", g_Text);
			}
			return PLUGIN_HANDLED_MAIN;
		}
	}
	return PLUGIN_CONTINUE;
}
public amxbans_admin_connect(id){
	client_authorized(id);
}