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

#define V_MODEL "models/v_knifea.mdl"
#define W_MODEL "models/w_knifeb.mdl"
#define P_MODEL "models/p_knifec.mdl"

#define KNIFE_W_MODEL "models/w_knife.mdl"

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

forward amxbans_admin_connect(id);

new Array:g_Array, CsArmorType:armortype, bool:g_FreezeTime, bool:g_Vip[33], g_Hudmsg,
ioid, maxPlayers, skoki[33];

new const g_Langcmd[][]={"say /vips","say_team /vips","say /vipy","say_team /vipy"};
new const g_Prefix[] = "Vip Chat";

new const gSounds[][] = {
	"cb/knife_deploy1.wav",
	"cb/knife_hitwall1.wav",
	"cb/knife_hit1.wav",
	"cb/knife_hit2.wav",
	"cb/knife_hit3.wav",
	"cb/knife_hit4.wav",
	"cb/knife_slash1.wav",
	"cb/knife_slash2.wav",
	"cb/knife_stab.wav"
};

public plugin_init(){
	register_plugin("VIP Ultimate", "12.3.0.2", "benio101 & speedkill");
	RegisterHam(get_player_resetmaxspeed_func(), "player", "fw_Player_ResetMaxSpeed", 1);
	register_logevent("logevent_round_start", 2, "1=Round_Start");
	register_event("HLTV", "event_new_round", "a", "1=0", "2=0");
	register_forward(FM_CmdStart, "CmdStartPre");
	RegisterHam(Ham_Spawn, "player", "SpawnedEventPre", 1);
	RegisterHam(Ham_TakeDamage, "player", "takeDamage", 0);
	register_event("DeathMsg", "DeathMsg", "a");
	register_event("CurWeapon", "Event_CurWeapon", "be","1=1");
	register_forward(FM_SetModel,"fw_setmodel"/*,1*/);
	register_forward(FM_EmitSound,"fw_emitsound");
	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(180.0, "ShowAdv",.flags = "b");
	register_clcmd("say_team", "VipChat");
	register_message(get_user_msgid("SayText"),"handleSayText");
	g_Hudmsg=CreateHudSyncObj();
}
public plugin_precache()
{
	// precache the required models
	engfunc(EngFunc_PrecacheModel,V_MODEL);
	engfunc(EngFunc_PrecacheModel,P_MODEL);
	engfunc(EngFunc_PrecacheModel,W_MODEL);
	for(new i = 0 ; i < sizeof gSounds ; i++)
	precache_sound(gSounds[i]);
	
	precache_model("models/player/wysyct/wysyct.mdl");
	precache_model("models/player/wysytt/wysytt.mdl");
}
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);
	set_hudmessage(24, 190, 220, 0.25, 0.2, 0, 6.0, 6.0);
	ShowSyncHudMsg(0, g_Hudmsg, "Vip %s wbija na serwer !",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;
		}
	}
}
Ham:get_player_resetmaxspeed_func(){
	#if defined Ham_CS_Player_ResetMaxSpeed
	return IsHamValid(Ham_CS_Player_ResetMaxSpeed)?Ham_CS_Player_ResetMaxSpeed:Ham_Item_PreFrame;
	#else
	return Ham_Item_PreFrame;
	#endif
}
public fw_Player_ResetMaxSpeed(id){
	if(g_Vip[id]){
		if(is_user_alive(id)){
			fw_Player_ResetMaxSpeedVip(id);
		}
	}
}
public logevent_round_start(){
	g_FreezeTime=false;
}
public event_new_round(){
	g_FreezeTime=true;
}
public fw_Player_ResetMaxSpeedVip(id){
	if(!g_FreezeTime){
		set_user_maxspeed(id,get_user_maxspeed(id) + 25);
	}
}
public CmdStartPre(id, uc_handle){
	if(g_Vip[id]){
		if(is_user_alive(id)){
			CmdStartPreVip(id, uc_handle);
		}
	}
}
public CmdStartPreVip(id, uc_handle){
	new flags = pev(id, pev_flags);
	if((get_uc(uc_handle, UC_Buttons) & IN_JUMP) && !(flags & FL_ONGROUND) && !(pev(id, pev_oldbuttons) & IN_JUMP) && skoki[id]>0){
		--skoki[id];
		new Float:velocity[3];
		pev(id, pev_velocity,velocity);
		velocity[2] = random_float(265.0,285.0);
		set_pev(id,pev_velocity,velocity);
	} else if(flags & FL_ONGROUND && skoki[id]!=-1){
		skoki[id] = 1;
	}
}
public SpawnedEventPre(id){
	if(g_Vip[id]){
		if(is_user_alive(id)){
			SpawnedEventPreVip(id);
		}
	}
}
public SpawnedEventPreVip(id){
	skoki[id]=1;
	set_user_health(id, get_user_health(id)+50);
	cs_set_user_armor(id, min(cs_get_user_armor(id,armortype)+100, 100), armortype);
	new g_Model[64];
	formatex(g_Model,charsmax(g_Model),"%s",get_user_team(id) == 1 ? "wysytt" : "wysyct");
	cs_set_user_model(id,g_Model);
}
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_BULLET){
			if(get_user_weapon(ioid)==CSW_KNIFE){
				damage*=(100+10)/100;
			}
		}
	}
}
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){
	set_user_health(kid, min(get_user_health(kid)+(hs?15:10),150));
}
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 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 handleSayText(msgId,msgDest,msgEnt){
	new id = get_msg_arg_int(1);
	
	if(is_user_connected(id) && g_Vip[id]){
		new szTmp[256],szTmp2[256];
		get_msg_arg_string(2,szTmp, charsmax(szTmp))
		
		new szPrefix[64] = "^x04[VIP]";
		
		if(!equal(szTmp,"#Cstrike_Chat_All")){
			add(szTmp2,charsmax(szTmp2),szPrefix);
			add(szTmp2,charsmax(szTmp2)," ");
			add(szTmp2,charsmax(szTmp2),szTmp);
		}
		else{
			add(szTmp2,charsmax(szTmp2),szPrefix);
			add(szTmp2,charsmax(szTmp2),"^x03 %s1^x01 :  %s2");
		}
		set_msg_arg_string(2,szTmp2);
	}
	return PLUGIN_CONTINUE;
}
public amxbans_admin_connect(id){
	client_authorized(id);
}
public Event_CurWeapon(id) 
{     
	if(!is_user_alive(id))
		return PLUGIN_CONTINUE;
		
	if(!g_Vip[id])
		return PLUGIN_CONTINUE;
		
	new weaponID = read_data(2);

	if(weaponID != CSW_KNIFE)
		return PLUGIN_CONTINUE;

	set_pev(id, pev_viewmodel2, V_MODEL);
	set_pev(id, pev_weaponmodel2, P_MODEL);
    
	return PLUGIN_CONTINUE;
}

public fw_setmodel(ent,const model[])
{
	if(!pev_valid(ent))
		return FMRES_IGNORED;
		
	if(strcmp(KNIFE_W_MODEL,model) )
		return FMRES_IGNORED;
	
	static classname[32]
	pev(ent,pev_classname,classname,31);
	
	
	if(!strcmp(classname, "weaponbox") || !strcmp(classname, "armoury_entity") || !strcmp(classname, "grenade"))
	{
		engfunc(EngFunc_SetModel, ent, W_MODEL);
		return FMRES_SUPERCEDE;
	}
	
	return FMRES_IGNORED;
}

public fw_emitsound(id,channel,sample[],Float:volume,Float:attenuation,fFlags,pitch)
{
	if(!g_Vip[id])
		return PLUGIN_CONTINUE;

	{
		if(equal(sample,"weapons/knife_deploy1.wav"))
		{         
			emit_sound(id,channel,gSounds[6],volume,attenuation,fFlags,pitch);
			return FMRES_SUPERCEDE;
		}
		if(equal(sample,"weapons/knife_hitwall1.wav"))
		{         
			emit_sound(id,channel,gSounds[1],volume,attenuation,fFlags,pitch);
			return FMRES_SUPERCEDE;
		}
		if(equal(sample,"weapons/knife_hit1.wav"))
		{         
			emit_sound(id,channel,gSounds[2],volume,attenuation,fFlags,pitch);
			return FMRES_SUPERCEDE;
		}
		if(equal(sample,"weapons/knife_hit2.wav"))
		{         
			emit_sound(id,channel,gSounds[3],volume,attenuation,fFlags,pitch);
			return FMRES_SUPERCEDE;
		}
		if(equal(sample,"weapons/knife_hit3.wav"))
		{         
			emit_sound(id,channel,gSounds[4],volume,attenuation,fFlags,pitch);
			return FMRES_SUPERCEDE;
		}
		if(equal(sample,"weapons/knife_hit4.wav"))
		{         
			emit_sound(id,channel,gSounds[5],volume,attenuation,fFlags,pitch);
			return FMRES_SUPERCEDE;
		}
		if(equal(sample,"weapons/knife_slash1.wav"))
		{         
			emit_sound(id,channel,gSounds[6],volume,attenuation,fFlags,pitch);
			return FMRES_SUPERCEDE;
		}
		if(equal(sample,"weapons/knife_slash2.wav"))
		{         
			emit_sound(id,channel,gSounds[7],volume,attenuation,fFlags,pitch);
			return FMRES_SUPERCEDE;
		}
		if(equal(sample,"weapons/knife_stab.wav"))
		{         
			emit_sound(id,channel,gSounds[7],volume,attenuation,fFlags,pitch);
			return FMRES_SUPERCEDE;
		}
	}
	
	return FMRES_IGNORED; 
}