Plasma Riffle Like LS But Need to Fix it

/*======================================================*\
||	[ZP] Extra Item : Plasma Rifle			||
||	by Sh0oT3R					||
\*======================================================*/

#include <amxmodx>
#include <amxmisc>
#include <hamsandwich>
#include <engine>
#include <cstrike>
#include <fakemeta>
#include <xs>
#include <zp50_core>
#include <zp50_class_plasma>
#include <zp50_class_survivor>
#include <zp50_class_nemesis>
#include <zp50_class_assassin>
#include <zp50_class_dragon>
#include <zp50_item_zombie_madness>
#include <fun>
#include <bulletdamage>


#define fm_create_entity(%1) engfunc(EngFunc_CreateNamedEntity, engfunc(EngFunc_AllocString, %1))
#define fm_get_user_velocity(%1,%2) pev(%1, pev_velocity, %2)

#define VERSION "1.0"
#define AUTHOR "Sh0oT3R"


#define CSW_WPN CSW_FAMAS
new const weapon[] = "weapon_famas"

new const spr_beam[] = "sprites/plasma/plasma_beam.spr"
new const spr_exp[] = "sprites/plasma/plasma_exp.spr"
new const spr_blood[] = "sprites/blood.spr"
new const snd_fire[][] = { "plasma/plasma_fire.wav" }
new const snd_reload[][] = { "plasma/plasma_reload.wav" }
new const snd_hit[][] = { "plasma/plasma_hit.wav" }
new cvar_firerate, cvar_hitsd, cvar_reloadspd, cvar_dmg, cvar_dmgmul

new bool:g_HasRifle[33]
new g_iCurWpn[33], Float:g_flLastFireTime[33]
new g_sprBeam, g_sprExp, g_sprBlood, g_msgDamage, g_msgScreenFade, g_msgScreenShake


const m_pPlayer = 		41
const m_fInReload =		54
const m_pActiveItem = 		373
const m_flNextAttack = 		83
const m_flTimeWeaponIdle = 	48
const m_flNextPrimaryAttack = 	46
const m_flNextSecondaryAttack =	47

const UNIT_SECOND =		(1<<12)
const ENG_NULLENT = 		-1
const WPN_MAXCLIP =		25
const ANIM_FIRE = 		5
const ANIM_DRAW = 		10
const ANIM_RELOAD =		9
const EV_INT_WEAPONKEY = 	EV_INT_impulse
const WPNKEY = 			2816

public plugin_init()
{
	register_plugin("[ZP] Extra Item: Plasma Rifle", VERSION, AUTHOR)

	register_event("HLTV", "Event_NewRound", "a", "1=0", "2=0");
	register_event("CurWeapon", "event_CurWeapon", "b", "1=1")

	register_forward(FM_CmdStart, "fw_CmdStart")
	register_forward(FM_UpdateClientData, "fw_UpdateClientData_Post", 1)



	RegisterHam(Ham_Killed, "player", "fw_PlayerKilled")
	RegisterHam(Ham_Item_Deploy, weapon, "fw_Deploy_Post", 1)
	RegisterHam(Ham_Item_AddToPlayer, weapon, "fw_AddToPlayer")
	RegisterHam(Ham_Weapon_Reload, weapon, "fw_Reload_Post", 1)
	RegisterHam(Ham_Item_PostFrame, weapon, "fw_PostFrame")
	cvar_firerate = register_cvar("zp_plasma_riffle_firerate", "0.2")
	cvar_hitsd = register_cvar("zp_plasma_riffle_hitsd", "0.7")
	cvar_reloadspd = register_cvar("zp_plasma_riffle_reload_spd", "5")
	cvar_dmg = register_cvar("zp_plasma_riffle_dmg", "250")
	cvar_dmgmul = register_cvar("zp_plasma_riffle_dmg_x", "3")



	g_msgDamage = get_user_msgid("Damage")
	g_msgScreenFade = get_user_msgid("ScreenFade")
	g_msgScreenShake = get_user_msgid("ScreenShake")
}

public zp_fw_core_cure_post(id, attacker)
{
   if(zp_class_plasma_get(id))
   {

	g_HasRifle[id] = true
	give_item(id, "weapon_famas")
	fm_set_user_bpammo(id, CSW_FAMAS, 90)
    }

}

public plugin_precache()
{
	precache_model("models/zombie_plague/plasma/v_plasma.mdl")
	precache_model("models/zombie_plague/plasma/p_plasma.mdl")

	g_sprBlood = precache_model(spr_blood)
	g_sprBeam = precache_model(spr_beam)
	g_sprExp = precache_model(spr_exp)

	static i
	for(i = 0; i < sizeof snd_fire; i++)
		precache_sound(snd_fire[i])
	for(i = 0; i < sizeof snd_hit; i++)
		precache_sound(snd_hit[i])
	for(i = 0; i < sizeof snd_reload; i++)
		precache_sound(snd_reload[i])
}


public event_CurWeapon(id)
{
	if(!is_user_alive(id))
	return PLUGIN_CONTINUE

	g_iCurWpn[id] = read_data(2)

	if(zp_core_is_zombie(id) || zp_class_survivor_get(id))
		return PLUGIN_CONTINUE

	if(!g_HasRifle[id] || g_iCurWpn[id] != CSW_WPN)
		return PLUGIN_CONTINUE

	entity_set_string(id, EV_SZ_viewmodel, "models/zombie_plague/plasma/v_plasma.mdl")
	entity_set_string(id, EV_SZ_weaponmodel, "models/zombie_plague/plasma/p_plasma.mdl")
	return PLUGIN_CONTINUE
}
public zp_fw_core_cure_pre(id)
{
	g_HasRifle[id] = false
}
public zp_fw_core_infect_post(id)
{
	g_HasRifle[id] = false
}
public fw_PlayerKilled(victim, attacker, shouldgib)
{
	if(is_user_alive(victim))
	{
		g_HasRifle[victim] = false
		return HAM_HANDLED
	}
	return HAM_IGNORED
}

public Event_NewRound()
{
	for (new i = 1; i <= get_maxplayers(); i++)
	{
		g_HasRifle[i] = false
	}
}
public client_putinserver(id)
{
	g_HasRifle[id] = false
}
public client_disconnect(id)
{
	g_HasRifle[id] = false
}

public fw_CmdStart(id, handle, seed)
{
	if(!is_user_alive(id))
		return FMRES_IGNORED

	if(!g_HasRifle[id])
		return FMRES_IGNORED

	if(zp_core_is_zombie(id) || zp_class_survivor_get(id))
		return FMRES_IGNORED

	if(g_iCurWpn[id] != CSW_WPN)
		return FMRES_IGNORED

	static iButton
	iButton = get_uc(handle, UC_Buttons)

	if(iButton & IN_ATTACK)
	{
		set_uc(handle, UC_Buttons, iButton & ~IN_ATTACK)

		static Float:flCurTime
		flCurTime = halflife_time()

		if(flCurTime - g_flLastFireTime[id] < get_pcvar_float(cvar_firerate))
			return FMRES_IGNORED

		static iWpnID, iClip
		iWpnID = get_pdata_cbase(id, m_pActiveItem, 5)
		iClip = cs_get_weapon_ammo(iWpnID)

		if(get_pdata_int(iWpnID, m_fInReload, 4))
			return FMRES_IGNORED

		set_pdata_float(iWpnID, m_flNextPrimaryAttack, get_pcvar_float(cvar_firerate), 4)
		set_pdata_float(iWpnID, m_flNextSecondaryAttack, get_pcvar_float(cvar_firerate), 4)
		set_pdata_float(iWpnID, m_flTimeWeaponIdle, get_pcvar_float(cvar_firerate), 4)
		g_flLastFireTime[id] = flCurTime
		if(iClip <= 0)
		{
			ExecuteHamB(Ham_Weapon_PlayEmptySound, iWpnID)
			return FMRES_IGNORED
		}
		primary_attack(id)
		make_punch(id, 50)
		cs_set_weapon_ammo(iWpnID, --iClip)

		return FMRES_IGNORED
	}

	return FMRES_IGNORED
}
public fw_UpdateClientData_Post(id, sendweapons, handle)
{
	if(!is_user_alive(id))
		return FMRES_IGNORED

	if(!g_HasRifle[id])
		return FMRES_IGNORED

	if(zp_core_is_zombie(id) || zp_class_survivor_get(id))
		return FMRES_IGNORED

	if(g_iCurWpn[id] != CSW_WPN)
		return FMRES_IGNORED

	set_cd(handle, CD_flNextAttack, halflife_time() + 0.001)
	return FMRES_HANDLED
}
public fw_Deploy_Post(wpn)
{
	static id
	id = get_pdata_cbase(wpn, m_pPlayer, 4)

	if(is_user_connected(id) && g_HasRifle[id])
	{
		set_wpnanim(id, ANIM_DRAW)
	}
	return HAM_IGNORED
}
public fw_AddToPlayer(wpn, id)
{
	if(is_valid_ent(wpn) && is_user_connected(id) && entity_get_int(wpn, EV_INT_WEAPONKEY) == WPNKEY)
	{
		g_HasRifle[id] = true
		entity_set_int(wpn, EV_INT_WEAPONKEY, 0)
		return HAM_HANDLED
	}
	return HAM_IGNORED
}
public fw_PostFrame(wpn)
{
	static id
	id = get_pdata_cbase(wpn, m_pPlayer, 4)

	if(is_user_alive(id) && g_HasRifle[id])
	{
		static Float:flNextAttack, iBpAmmo, iClip, iInReload
		iInReload = get_pdata_int(wpn, m_fInReload, 4)
		flNextAttack = get_pdata_float(id, m_flNextAttack, 5)
		iBpAmmo = cs_get_user_bpammo(id, CSW_WPN)
		iClip = cs_get_weapon_ammo(wpn)

		if(iInReload && flNextAttack <= 0.0)
		{
			new iRemClip = min(WPN_MAXCLIP - iClip, iBpAmmo)
			cs_set_weapon_ammo(wpn, iClip + iRemClip)
			cs_set_user_bpammo(id, CSW_WPN, iBpAmmo-iRemClip)
			iInReload = 0
			set_pdata_int(wpn, m_fInReload, 0, 4)
		}
		static iButton
		iButton = get_user_button(id)

		if((iButton & IN_ATTACK2 && get_pdata_float(wpn, m_flNextSecondaryAttack, 4) <= 0.0) || (iButton & IN_ATTACK && get_pdata_float(wpn, m_flNextPrimaryAttack, 4) <= 0.0))
			return

		if(iButton & IN_RELOAD && !iInReload)
		{
			if(iClip >= WPN_MAXCLIP)
			{
				entity_set_int(id, EV_INT_button, iButton & ~IN_RELOAD)
				set_wpnanim(id, 0)
			}
			else if(iClip == WPN_MAXCLIP)
			{
				if(iBpAmmo)
				{
					reload(id, wpn, 1)
				}
			}
		}
	}
}
public fw_Reload_Post(wpn)
{
	static id
	id = get_pdata_cbase(wpn, m_pPlayer, 4)

	if(is_user_alive(id) && g_HasRifle[id] && get_pdata_int(wpn, m_fInReload, 4))
	{
		reload(id, wpn)
	}
}
public primary_attack(id)
{
	set_wpnanim(id, ANIM_FIRE)
	entity_set_vector(id, EV_VEC_punchangle, Float:{ -1.5, 0.0, 0.0 })

	emit_sound(id, CHAN_WEAPON, snd_hit[random_num(0, sizeof snd_hit - 1)], VOL_NORM, ATTN_NORM, 0, PITCH_NORM)

	static iTarget, iBody, iEndOrigin[3], iStartOrigin[3]
	get_user_origin(id, iStartOrigin, 1)
	get_user_origin(id, iEndOrigin, 3)
	fire_effects(iStartOrigin, iEndOrigin)
	get_user_aiming(id, iTarget, iBody)

	new iEnt = create_entity("info_target")

	static Float:flOrigin[3]
	IVecFVec(iEndOrigin, flOrigin)
	entity_set_origin(iEnt, flOrigin)
	remove_entity(iEnt)

	if(is_user_alive(iTarget) && zp_core_is_zombie(iTarget) || is_valid_ent(iTarget) && entity_get_float(iTarget, EV_FL_takedamage) != 0.0)
	{
		if(get_pcvar_float(cvar_hitsd) > 0.0)
		{
			static Float:flVelocity[3]
			fm_get_user_velocity(iTarget, flVelocity)
			xs_vec_mul_scalar(flVelocity, get_pcvar_float(cvar_hitsd), flVelocity)
			fm_set_user_velocity(iTarget, flVelocity)
		}

		new Float:iDamage, iBloodScale

		if(iBody == HIT_GENERIC)
		{
			new Text[34]
			new current_damage = get_pcvar_num(cvar_dmg)*get_pcvar_num(cvar_dmgmul)
			format(Text, charsmax(Text) - 1, "%s", current_damage)
			bd_show_text(id, id, Text, 12)
			iDamage = get_pcvar_float(cvar_dmg)
			iBloodScale = 10
		}
		else
		{
			iDamage = get_pcvar_float(cvar_dmg)*get_pcvar_float(cvar_dmgmul)
			iBloodScale = 25
		}

		if(is_user_alive(iTarget) && zp_core_is_zombie(iTarget))
		{

			extra_dmg(iTarget, id , floatround(iDamage), "Plasma Rifle") // Isso vai fazer dar Pack Por dano :)
			make_blood(iTarget, iBloodScale)
			damage_effects(iTarget)

		}
		else ExecuteHamB(Ham_TakeDamage, iTarget, 0, id, iDamage, DMG_BULLET) // Tirar dano de Boss

		emit_sound(id, CHAN_WEAPON, snd_fire[random_num(0, sizeof snd_fire - 1)], VOL_NORM, ATTN_NORM, 0, PITCH_NORM)

	}
}
stock fire_effects(iStartOrigin[3], iEndOrigin[3])
{
	message_begin(MSG_BROADCAST,SVC_TEMPENTITY)
	write_byte(0)
	write_coord(iStartOrigin[0])
	write_coord(iStartOrigin[1])
	write_coord(iStartOrigin[2])
	write_coord(iEndOrigin[0])
	write_coord(iEndOrigin[1])
	write_coord(iEndOrigin[2])
	write_short(g_sprBeam)
	write_byte(1)
	write_byte(5)
	write_byte(10)
	write_byte(25)
	write_byte(0)
	write_byte(0)
	write_byte(255)
	write_byte(0)
	write_byte(100)
	write_byte(0)
	message_end()

	message_begin(MSG_BROADCAST, SVC_TEMPENTITY)
	write_byte(3)
	write_coord(iEndOrigin[0])
	write_coord(iEndOrigin[1])
	write_coord(iEndOrigin[2])
	write_short(g_sprExp)
	write_byte(10)
	write_byte(15)
	write_byte(4)
	message_end()
}
stock reload(id, wpn, force_reload = 0)
{
	set_pdata_float(id, m_flNextAttack, get_pcvar_float(cvar_reloadspd), 5)
	set_wpnanim(id, ANIM_RELOAD)
	emit_sound(id, CHAN_WEAPON, snd_reload[random_num(0, sizeof snd_reload - 1)], VOL_NORM, ATTN_NORM, 0, PITCH_NORM)

	if(force_reload)
		set_pdata_int(wpn, m_fInReload, 1, 4)
}
stock damage_effects(id)
{
	message_begin(MSG_ONE_UNRELIABLE, g_msgDamage, _, id)
	write_byte(0)
	write_byte(0)
	write_long(DMG_NERVEGAS)
	write_coord(0)
	write_coord(0)
	write_coord(0)
	message_end()

	message_begin(MSG_ONE_UNRELIABLE, g_msgScreenFade, {0,0,0}, id)
	write_short(1<<13)
	write_short(1<<14)
	write_short(0x0000)
	write_byte(0)
	write_byte(255)
	write_byte(0)
	write_byte(100)
	message_end()

	message_begin(MSG_ONE, g_msgScreenShake, {0,0,0}, id)
	write_short(0xFFFF)
	write_short(1<<13)
	write_short(0xFFFF)
	message_end()
}
stock make_blood(id, scale)
{
	new Float:iVictimOrigin[3]
	pev(id, pev_origin, iVictimOrigin)

	message_begin(MSG_BROADCAST, SVC_TEMPENTITY)
	write_byte(115)
	write_coord(floatround(iVictimOrigin[0]+random_num(-20,20)))
	write_coord(floatround(iVictimOrigin[1]+random_num(-20,20)))
	write_coord(floatround(iVictimOrigin[2]+random_num(-20,20)))
	write_short(g_sprBlood)
	write_short(g_sprBlood)
	write_byte(248)
	write_byte(scale)
	message_end()
}
stock set_wpnanim(id, anim)
{
	entity_set_int(id, EV_INT_weaponanim, anim)
	message_begin(MSG_ONE, SVC_WEAPONANIM, {0, 0, 0}, id)
	write_byte(anim)
	write_byte(entity_get_int(id, EV_INT_body))
	message_end()
}
stock make_punch(id, velamount)
{
	static Float:flNewVelocity[3], Float:flCurrentVelocity[3]
	velocity_by_aim(id, -velamount, flNewVelocity)
	get_user_velocity(id, flCurrentVelocity)
	xs_vec_add(flNewVelocity, flCurrentVelocity, flNewVelocity)
	set_user_velocity(id, flNewVelocity)
}
stock fm_give_item(index, const item[])
{
	if (!equal(item, "weapon_", 7) && !equal(item, "ammo_", 5) && !equal(item, "item_", 5) && !equal(item, "tf_weapon_", 10))
		return 0;

	new ent = fm_create_entity(item);
	if (!pev_valid(ent))
		return 0;

	new Float:origin[3];
	pev(index, pev_origin, origin);
	set_pev(ent, pev_origin, origin);
	set_pev(ent, pev_spawnflags, pev(ent, pev_spawnflags) | SF_NORESPAWN);
	dllfunc(DLLFunc_Spawn, ent);

	new save = pev(ent, pev_solid);
	dllfunc(DLLFunc_Touch, ent, index);
	if (pev(ent, pev_solid) != save)
		return ent;

	engfunc(EngFunc_RemoveEntity, ent);

	return -1;
}

stock fm_set_user_bpammo(id, weaponid, amnt)
{
    static offset;
    switch(weaponid)
    {
        case CSW_AWP: offset = 377;
        case CSW_SCOUT,CSW_AK47,CSW_G3SG1: offset = 378;
        case CSW_M249: offset = 379;
        case CSW_FAMAS,CSW_M4A1,CSW_AUG,CSW_SG550,CSW_GALI,CSW_SG552: offset = 380;
        case CSW_M3,CSW_XM1014: offset = 381;
        case CSW_USP,CSW_UMP45,CSW_MAC10: offset = 382;
        case CSW_FIVESEVEN,CSW_P90: offset = 383;
        case CSW_DEAGLE: offset = 384;
        case CSW_P228: offset = 385;
        case CSW_GLOCK18,CSW_MP5NAVY,CSW_TMP,CSW_ELITE: offset = 386;
        case CSW_FLASHBANG: offset = 387;
        case CSW_HEGRENADE: offset = 388;
        case CSW_SMOKEGRENADE: offset = 389;
        default: return 0;
    }
    set_pdata_int(id,offset,amnt,5);

    return 1;
}

stock extra_dmg(id, attacker, damage, weaponDescription[])
{
	new dmgcount[33]

	if ( pev(id, pev_takedamage) == DAMAGE_NO ) return;
	if ( damage <= 0 ) return;

	new userHealth = get_user_health(id);

	if (userHealth - damage <= 0 )
	{
		dmgcount[attacker] += userHealth - damage;
		set_msg_block(get_user_msgid("DeathMsg"), BLOCK_SET);
		ExecuteHamB(Ham_Killed, id, attacker, 2);
		set_msg_block(get_user_msgid("DeathMsg"), BLOCK_NOT);


		message_begin(MSG_BROADCAST, get_user_msgid("DeathMsg"));
		write_byte(attacker);
		write_byte(id);
		write_byte(0);
		write_string(weaponDescription);
		message_end();

		set_pev(attacker, pev_frags, float(get_user_frags(attacker) + 1));

		new kname[32], vname[32], kauthid[32], vauthid[32], kteam[10], vteam[10];

		get_user_name(attacker, kname, 31);
		get_user_team(attacker, kteam, 9);
		get_user_authid(attacker, kauthid, 31);

		get_user_name(id, vname, 31);
		get_user_team(id, vteam, 9);
		get_user_authid(id, vauthid, 31);

		log_message("^"%s<%d><%s><%s>^" killed ^"%s<%d><%s><%s>^" with ^"%s^"",
		kname, get_user_userid(attacker), kauthid, kteam,
		vname, get_user_userid(id), vauthid, vteam, weaponDescription);
	}
	else
	{
		ExecuteHamB(Ham_TakeDamage, id, 0, attacker, float(damage), DMG_BULLET)

		//set_pev(id, pev_health, pev(id, pev_health) - float(damage));
	}
}
stock fm_set_user_velocity(entity, const Float:vector[3]) {
	set_pev(entity, pev_velocity, vector);

	return 1;
}