/* Plugin generated by AMXX-Studio */

#include <amxmodx>
#include <amxmisc>
#include <fakemeta>
#include <xs>
#include <cstrike>
//#include <fakemeta_util>
#define PLUGIN "Laser/TripMine Entity"
#define VERSION "2.0"
#define AUTHOR "SandStriker"

#define RemoveEntity(%1) engfunc(EngFunc_RemoveEntity,%1)
//#define ACCESSLEVEL ADMIN_LEVEL_H
#define TASK_PLANT 15100
#define TASK_RESET 15500

#define LASERMINE_INT_TEAM pev_iuser1 //EV_INT_iuser1
#define LASERMINE_STEP pev_iuser2
#define LASERMINE_OWNER pev_iuser3 //EV_INT_iuser3
#define LASERMINE_POWERUP pev_fuser1
#define LASERMINE_BEAMTHINK pev_fuser2

#define LASERMINE_BEAMENDPOINT pev_vuser1
//#define MAX_MINES 10
#define MODE_LASERMINE 0

enum tripmine_e {
TRIPMINE_IDLE1 = 0,
TRIPMINE_IDLE2,
TRIPMINE_ARM1,
TRIPMINE_ARM2,
TRIPMINE_FIDGET,
TRIPMINE_HOLSTER,
TRIPMINE_DRAW,
TRIPMINE_WORLD,
TRIPMINE_GROUND,
};

enum
{
POWERUP_THINK,
BEAMBREAK_THINK,
EXPLOSE_THINK
};

enum
{
POWERUP_SOUND,
ACTIVATE_SOUND,
STOP_SOUND
};

new const
ENT_MODELS[] = "models/v_tripmine.mdl",
ENT_SOUND1[] = "weapons/mine_deploy.wav",
ENT_SOUND2[] = "weapons/mine_charge.wav",
ENT_SOUND3[] = "weapons/mine_activate.wav",
ENT_SOUND4[] = "debris/beamstart9.wav",
ENT_SOUND5[] = "items/gunpickup2.wav",
//ENT_SOUND6[] = "weapons/mine_activate.wav",
ENT_SPRITE1[] = "sprites/laserbeam.spr",
ENT_SPRITE2[] = "sprites/zerogxplode.spr";

new const
ENT_CLASS_NAME[] = "lasermine",
//ENT_CLASS_NAME2[] = "info_target",
ENT_CLASS_NAME3[] = "func_breakable";

new const
CHATTAG[] = "[LaserMines]",
//STR_MINEDETNATED[] = "Your mine has detonated.",
//STR_MINEDETNATED2[] = "detonated your mine.",
STR_NOTACTIVE[] = "Lasermines are not currently active.",
STR_DONTHAVEMINE[] = "You don't have lasermine.",
STR_CANTDEPLOY[] = "Your team can't deploying lasermine!",
STR_MAXDEPLOY[] = "Maximum mines have been deployed.",
STR_MANYPPL[] = "Too many ppl on your team...",
STR_PLANTWALL[] = "You must plant the lasermine on a wall!",
STR_REF[] = "Refer to a lasermine rule with this server. say 'lasermine'",
STR_CBT[] = "Your team can't buying lasermine!",
STR_HAVEMAX[] = "You have a maximum lasermine.",
STR_NOMONEY[] = "You don't have enough money to buy a lasermine! ($",
STR_NEEDED[] = "needed)",
STR_DELAY[] = "You can buying and deploying lasermine in after",
STR_SECONDS[] = "seconds.",
STR_BOUGHT[] = "You have successfully bought a lasermine.",
STR_STATE[] = "LaserMines Ammo:";

new g_EntMine;
new beam, boom
new
g_LENABLE,g_LFMONEY,g_LAMMO,g_LDMG,
g_LTMAX,g_LCOST,g_LHEALTH,g_LMODE,g_LRADIUS,g_LRDMG,g_LFF,g_LCBT,
g_LDELAY,/*g_LTHINK,*/g_LVISIBLE;

new g_dcount,g_nowtime,g_MaxPL
new bool:g_settinglaser[33]
new g_msgDeathMsg,g_msgScoreInfo,g_msgDamage,g_msgStatusText;
new Float:plspeed[33]
new plsetting[33]
new g_havemine[33];
new g_deployed[33];

public plugin_init() {
register_plugin(PLUGIN, VERSION, AUTHOR)

// Add your code here...
register_clcmd("+setlaser","CreateLaserMine_Progress");
register_clcmd("-setlaser","StopCreateLaserMine");
register_clcmd("say","say_lasermine");
register_clcmd("buy_lasermine","BuyLasermine");
g_LENABLE = register_cvar("amx_ltm","1")

g_LMODE = register_cvar("amx_ltm_mode","0")
g_LAMMO = register_cvar("amx_ltm_ammo","5")
g_LDMG = register_cvar("amx_ltm_dmg","10000")
g_LCOST = register_cvar("amx_ltm_cost","500")
g_LFMONEY = register_cvar("amx_ltm_fragmoney","300")
g_LHEALTH = register_cvar("amx_ltm_health","500")
g_LTMAX = register_cvar("amx_ltm_teammax","10")
g_LRADIUS = register_cvar("amx_ltm_radius","200.0")
g_LRDMG = register_cvar("amx_ltm_rdmg","1000")
g_LFF = register_cvar("amx_ltm_ff","0")
g_LCBT = register_cvar("amx_ltm_cbt","ALL")
g_LDELAY = register_cvar("amx_ltm_delay","15")
//g_LTHINK = register_cvar("amx_ltm_think","0.01")
g_LVISIBLE = register_cvar("amx_ltm_line","1")

register_event("DeathMsg", "DeathEvent", "a")
register_event("CurWeapon", "standing", "be", "1=1")
register_event("ResetHUD", "delaycount", "a")
register_event("ResetHUD", "newround", "b")

g_msgDeathMsg = get_user_msgid("DeathMsg")
g_msgScoreInfo = get_user_msgid("ScoreInfo")
g_msgDamage = get_user_msgid("Damage")
g_msgStatusText = get_user_msgid("StatusText")

// -- Forward.
register_forward( FM_Think, "ltm_Think" );
register_forward( FM_PlayerPostThink, "ltm_PostThink" );
}

public plugin_precache()
{
precache_sound(ENT_SOUND1);
precache_sound(ENT_SOUND2);
precache_sound(ENT_SOUND3);
precache_sound(ENT_SOUND4);
precache_sound(ENT_SOUND5);
precache_model(ENT_MODELS);
beam = precache_model(ENT_SPRITE1);
boom = precache_model(ENT_SPRITE2);

return PLUGIN_CONTINUE;
}

public plugin_modules()
{
require_module("fakemeta")
require_module("cstrike")
//require_module("fun")
}

public plugin_cfg()
{
g_EntMine = engfunc(EngFunc_AllocString,ENT_CLASS_NAME3);
arrayset(g_havemine,0,sizeof(g_havemine));
arrayset(g_deployed,0,sizeof(g_deployed));
g_MaxPL = get_maxplayers();
}

public delaycount()
{
g_dcount = floatround(get_gametime())
}

bool:CheckTime()
{
g_nowtime = floatround(get_gametime()) - g_dcount
if(g_nowtime >= get_pcvar_num(g_LDELAY))
return true
return false
}

public CreateLaserMine_Progress(id){

if (!CreateCheck(id))
return PLUGIN_HANDLED;
g_settinglaser[id] = true

message_begin( MSG_ONE, 108, {0,0,0}, id );
write_byte(1);
write_byte(0);
message_end();

new PID[1];
PID[0] = id;
set_task(1.2, "Spawn", (TASK_PLANT + id), PID, 1);

return PLUGIN_HANDLED;
}

public StopCreateLaserMine(id)
{
if (task_exists((TASK_PLANT + id)))
{
remove_task((TASK_PLANT + id));
}
g_settinglaser[id] = false

message_begin(MSG_ONE, 108, {0,0,0}, id)
write_byte(0);
write_byte(0);
message_end();

return PLUGIN_HANDLED;
}

public Spawn( ids[] )
{
new id = ids[0];
// motor
new i_Ent = engfunc(EngFunc_CreateNamedEntity,g_EntMine);
if(!i_Ent) {
client_print(id,print_chat,"[Laesrmine Debug] Can't Create Entity")
return PLUGIN_HANDLED_MAIN;
}
set_pev(i_Ent,pev_classname,ENT_CLASS_NAME)

engfunc(EngFunc_SetModel,i_Ent,ENT_MODELS);

set_pev(i_Ent,pev_solid,SOLID_NOT);
set_pev(i_Ent,pev_movetype,MOVETYPE_FLY);

set_pev(i_Ent,pev_frame,0);
set_pev(i_Ent,pev_body,3);
set_pev(i_Ent,pev_sequence,TRIPMINE_WORLD);
set_pev(i_Ent,pev_framerate,0);

set_pev(i_Ent,pev_takedamage,DAMAGE_YES);
set_pev(i_Ent,pev_dmg,100.0);
set_pev(i_Ent,pev_health, float(get_pcvar_num(g_LHEALTH)));
new Float:vOrigin[3];
new Float:vNewOrigin[3],Float:vNormal[3],Float:vTraceDirection[3],
Float:vTraceEnd[3],Float:vEntAngles[3];
pev( id, pev_origin, vOrigin );
velocity_by_aim( id, 128, vTraceDirection );
xs_vec_add( vTraceDirection, vOrigin, vTraceEnd );

engfunc( EngFunc_TraceLine, vOrigin, vTraceEnd, DONT_IGNORE_MONSTERS, id, 0 );

new Float:fFraction;
get_tr2( 0, TR_flFraction, fFraction );


// -- We hit something!
if ( fFraction < 1.0 )
{
// -- Save results to be used later.
get_tr2( 0, TR_vecEndPos, vTraceEnd );
get_tr2( 0, TR_vecPlaneNormal, vNormal );
}

xs_vec_mul_scalar( vNormal, 8.0, vNormal );
xs_vec_add( vTraceEnd, vNormal, vNewOrigin );

engfunc(EngFunc_SetSize, i_Ent, Float:{ -8.0, -8.0, -8.0 }, Float:{ 8.0, 8.0, 8.0 } );
engfunc(EngFunc_SetOrigin, i_Ent, vNewOrigin );

// -- Rotate tripmine.
vector_to_angle(vNormal,vEntAngles );
set_pev(i_Ent,pev_angles,vEntAngles );

// -- Calculate laser end origin.
new Float:vBeamEnd[3], Float:vTracedBeamEnd[3];

xs_vec_mul_scalar(vNormal, 8192.0, vNormal );
xs_vec_add( vNewOrigin, vNormal, vBeamEnd );

engfunc( EngFunc_TraceLine, vNewOrigin, vBeamEnd, IGNORE_MONSTERS, -1, 0 );

get_tr2( 0, TR_vecPlaneNormal, vNormal );
get_tr2( 0, TR_vecEndPos, vTracedBeamEnd );

// -- Save results to be used later.
set_pev(i_Ent, LASERMINE_OWNER, id );
set_pev(i_Ent,LASERMINE_BEAMENDPOINT,vTracedBeamEnd);
set_pev(i_Ent,LASERMINE_INT_TEAM,int:cs_get_user_team(id));

new Float:fCurrTime = get_gametime();

set_pev(i_Ent,LASERMINE_POWERUP, fCurrTime + 2.5 );

set_pev(i_Ent,LASERMINE_STEP,POWERUP_THINK);
set_pev(i_Ent,pev_nextthink, fCurrTime + 0.2 );

PlaySound(i_Ent,POWERUP_SOUND );
g_deployed[id]++;
g_havemine[id]--;
g_settinglaser[id] = false
ShowAmmo(id);
return 1;
}

stock TeamDeployedCount(id)
{
//new tid[32];

static i;
static CsTeams:t;t = cs_get_user_team(id);
static cnt;cnt=0;

for(i = 1;i <= g_MaxPL;i++)
{
if(is_user_connected(i))
if(t == cs_get_user_team(i))
cnt += g_deployed[i];
}

return cnt;
}

bool:CheckCanTeam(id)
{
new arg[5],CsTeam:num
get_pcvar_string(g_LCBT,arg,3)
if(equali(arg,"T")){
num = CsTeam:CS_TEAM_T
}
else if(equali(arg,"CT")){
num = CsTeam:CS_TEAM_CT
}
else if(equali(arg,"ALL")){
num = CsTeam:CS_TEAM_UNASSIGNED
}
else{
num = CsTeam:CS_TEAM_UNASSIGNED
}
if(num != CsTeam:CS_TEAM_UNASSIGNED && num != CsTeam:cs_get_user_team(id))
return false;
return true
}

bool:CreateCheck( id )
{
if( !get_pcvar_num( g_LENABLE ) )
{
client_print(id, print_chat, "%s %s",CHATTAG,STR_NOTACTIVE)
return false
}
if(g_settinglaser[id] || task_exists((TASK_PLANT + id))) return false
if(!is_user_alive(id)) return false
if(!CheckTime()){
client_print(id,print_chat, "%s %s %d %s",CHATTAG,STR_DELAY,get_pcvar_num(g_LDELAY)-g_nowtime,STR_SECONDS)
return false
}
if(g_havemine[id] <= 0){
client_print(id, print_chat, "%s %s",CHATTAG,STR_DONTHAVEMINE)
return false
}

if (!CheckCanTeam(id))
{
client_print(id, print_chat, "%s %s",CHATTAG,STR_CANTDEPLOY)
return false
}
if (g_deployed[id] >= get_pcvar_num(g_LAMMO)) //unhandled error
{
client_print(id, print_chat, "%s %s",CHATTAG,STR_MAXDEPLOY)
return false
}
//client_print(id,print_chat,"[Lasermine] your team deployed %d",TeamDeployedCount(id))
if(TeamDeployedCount(id) >= get_pcvar_num(g_LTMAX))
{
client_print(id, print_chat, "%s %s",CHATTAG,STR_MANYPPL)
return false
}
new Float:vTraceDirection[3], Float:vTraceEnd[3],Float:vOrigin[3];

pev( id, pev_origin, vOrigin );
velocity_by_aim( id, 128, vTraceDirection );
xs_vec_add( vTraceDirection, vOrigin, vTraceEnd );

engfunc( EngFunc_TraceLine, vOrigin, vTraceEnd, DONT_IGNORE_MONSTERS, id, 0 );

new Float:fFraction,Float:vTraceNormal[3];
get_tr2( 0, TR_flFraction, fFraction );

// -- We hit something!
if ( fFraction < 1.0 )
{
// -- Save results to be used later.
get_tr2( 0, TR_vecEndPos, vTraceEnd );
get_tr2( 0, TR_vecPlaneNormal, vTraceNormal );

//get_tr2( 0, TR_pHit );

return true;
}
client_print(id, print_chat, "%s %s",CHATTAG,STR_PLANTWALL)
g_settinglaser[id] = false
// -- Did not touched something. (not solid)
return false;
}

public ltm_Think( i_Ent )
{
if ( !pev_valid( i_Ent ) )
return FMRES_IGNORED;
new EntityName[sizeof(ENT_CLASS_NAME)+1];
static const size = sizeof(ENT_CLASS_NAME);
pev( i_Ent, pev_classname, EntityName, size);
if(!get_pcvar_num(g_LENABLE)) return FMRES_IGNORED;
// -- Entity is not a tripmine, ignoring the next...
if ( !equal( EntityName, ENT_CLASS_NAME ) )
return FMRES_IGNORED;

static Float:fCurrTime;
fCurrTime = get_gametime();

switch( pev( i_Ent, LASERMINE_STEP ) )
{
case POWERUP_THINK :
{
new Float:fPowerupTime;
pev( i_Ent, LASERMINE_POWERUP, fPowerupTime );

if( fCurrTime > fPowerupTime )
{
set_pev( i_Ent, pev_solid, SOLID_BBOX );
set_pev( i_Ent, LASERMINE_STEP, BEAMBREAK_THINK );

PlaySound( i_Ent, ACTIVATE_SOUND );
}

set_pev( i_Ent, pev_nextthink, fCurrTime + 0.1 );
}
case BEAMBREAK_THINK :
{
static Float:vEnd[3],Float:vOrigin[3];
pev( i_Ent, pev_origin, vOrigin );
pev( i_Ent, LASERMINE_BEAMENDPOINT, vEnd );

static iHit, Float:fFraction;
engfunc( EngFunc_TraceLine, vOrigin, vEnd, DONT_IGNORE_MONSTERS, i_Ent, 0 );

get_tr2( 0, TR_flFraction, fFraction );
iHit = get_tr2( 0, TR_pHit );

// -- Something has passed the laser.
if ( fFraction < 1.0 )
{
// -- Ignoring others tripmines entity.
pev( iHit, pev_classname, EntityName, size );

if( !equal( EntityName, ENT_CLASS_NAME ) )
{
set_pev( i_Ent, pev_enemy, iHit );
if(get_pcvar_num(g_LMODE) == MODE_LASERMINE)
CreateLaserDamage(i_Ent,iHit);
else
set_pev( i_Ent, LASERMINE_STEP, EXPLOSE_THINK );

set_pev( i_Ent, pev_nextthink, fCurrTime + random_float( 0.1, 0.3 ) );
}
}

// -- Tripmine is still there.
if ( pev_valid( i_Ent ) )
{
static Float:fHealth;
pev( i_Ent, pev_health, fHealth );

if( fHealth < 0 )
{
set_pev( i_Ent, LASERMINE_STEP, EXPLOSE_THINK );
set_pev( i_Ent, pev_nextthink, fCurrTime + random_float( 0.1, 0.3 ) );
}

static Float:fBeamthink;
pev( i_Ent, LASERMINE_BEAMTHINK, fBeamthink );

if( fBeamthink < fCurrTime && get_pcvar_num(g_LVISIBLE) && pev(i_Ent, LASERMINE_STEP) != EXPLOSE_THINK)
{
DrawLaser(i_Ent, vOrigin, vEnd );
set_pev( i_Ent, LASERMINE_BEAMTHINK, fCurrTime + 0.1 );
}

set_pev( i_Ent, pev_nextthink, fCurrTime + 0.01 );
}
}
case EXPLOSE_THINK :
{
// -- Stopping entity to think
set_pev( i_Ent, pev_nextthink, 0.0 );
PlaySound( i_Ent, STOP_SOUND );
g_deployed[pev(i_Ent,LASERMINE_OWNER)]--;
CreateExplosion( i_Ent );
CreateDamage(i_Ent,get_pcvar_num(g_LRDMG),get_pcvar_float(g_LRADIUS))
RemoveEntity ( i_Ent );
}
}

return FMRES_IGNORED;
}

PlaySound( i_Ent, i_SoundType )
{
switch ( i_SoundType )
{
case POWERUP_SOUND :
{
emit_sound( i_Ent, CHAN_VOICE, ENT_SOUND1, VOL_NORM, ATTN_NORM, 0, PITCH_NORM );
emit_sound( i_Ent, CHAN_BODY , ENT_SOUND2, 0.2, ATTN_NORM, 0, PITCH_NORM );
}
case ACTIVATE_SOUND :
{
emit_sound( i_Ent, CHAN_VOICE, ENT_SOUND3, 0.5, ATTN_NORM, 1, 75 );
}
case STOP_SOUND :
{
emit_sound( i_Ent, CHAN_BODY , ENT_SOUND2, 0.2, ATTN_NORM, SND_STOP, PITCH_NORM );
emit_sound( i_Ent, CHAN_VOICE, ENT_SOUND3, 0.5, ATTN_NORM, SND_STOP, 75 );
}
}
}

DrawLaser(i_Ent, const Float:v_Origin[3], const Float:v_EndOrigin[3] )
{
new tcolor[3];
new teamid = pev(i_Ent, LASERMINE_INT_TEAM);
switch(teamid){
case 1:{
tcolor[0] = 255
tcolor[1] = 0
tcolor[2] = 0
}
case 2:{
tcolor[0] = 0
tcolor[1] = 0
tcolor[2] = 255
}
}
message_begin(MSG_BROADCAST,SVC_TEMPENTITY)
write_byte(TE_BEAMPOINTS)
engfunc(EngFunc_WriteCoord,v_Origin[0])
engfunc(EngFunc_WriteCoord,v_Origin[1])
engfunc(EngFunc_WriteCoord,v_Origin[2])
engfunc(EngFunc_WriteCoord,v_EndOrigin[0]) //Random
engfunc(EngFunc_WriteCoord,v_EndOrigin[1]) //Random
engfunc(EngFunc_WriteCoord,v_EndOrigin[2]) //Random
write_short(beam)
write_byte(0)
write_byte(0)
write_byte(11) //Life
write_byte(5) //Width
write_byte(0)//wave
write_byte(tcolor[0]) // r
write_byte(tcolor[1]) // g
write_byte(tcolor[2]) // b
write_byte(255)
write_byte(255)
message_end()
}

CreateDamage(iCurrent,DmgMAX,Float:Radius)
{
new AtkID = pev(iCurrent,LASERMINE_OWNER)// entity_get_int(iCurrent,LASERMINE_OWNER)
new TeamID= pev(iCurrent,LASERMINE_INT_TEAM) //entity_get_int(iCurrent,LASERMINE_INT_TEAM)
new Player = -1;
new Float:distance,dmg;
new Float:tOrigin[3];
new Float:vOrigin[3];
new iHitHP,iHitTeam;
pev(iCurrent,pev_origin,vOrigin);
Player = engfunc(EngFunc_FindEntityInSphere,Player,vOrigin,Radius);
while(Player != 0)
{
if(is_user_alive(Player))
{
pev(Player,pev_origin,tOrigin)
distance = get_distance_f(vOrigin, tOrigin)
dmg = floatround(DmgMAX - ((DmgMAX / Radius) * distance))
iHitHP = pev_user_health(Player) - dmg
iHitTeam = int:cs_get_user_team(Player)
if(iHitHP <= 0)
{
if(iHitTeam != TeamID)
{
cs_set_user_money(AtkID,cs_get_user_money(AtkID) + get_pcvar_num(g_LFMONEY))
set_score(AtkID,Player,1,iHitHP)
}else
{
if(get_pcvar_num(g_LFF))
{
cs_set_user_money(AtkID,cs_get_user_money(AtkID) - get_pcvar_num(g_LFMONEY))
set_score(AtkID,Player,-1,iHitHP)
}
}
}else
{
if(iHitTeam != TeamID || get_pcvar_num(g_LFF))
{
//set_pev(Player,pev_health,iHitHP)
set_user_health(Player, iHitHP)
message_begin(MSG_ONE_UNRELIABLE, g_msgDamage, {0,0,0}, Player)
write_byte(dmg)
write_byte(dmg)
write_long(DMG_BULLET)
engfunc(EngFunc_WriteCoord,vOrigin[0])
engfunc(EngFunc_WriteCoord,vOrigin[1])
engfunc(EngFunc_WriteCoord,vOrigin[2])
message_end()
}
}
}
Player = engfunc(EngFunc_FindEntityInSphere,Player,vOrigin,Radius)
}
return PLUGIN_CONTINUE
}

CreateExplosion(iCurrent)
{

new Float:vOrigin[3]
pev(iCurrent,pev_origin,vOrigin)
//entity_get_vector(iCurrent, EV_VEC_origin, vOrigin)

message_begin(MSG_BROADCAST, SVC_TEMPENTITY)
write_byte(99) //99 = KillBeam
write_short(iCurrent)
message_end()

message_begin(MSG_BROADCAST, SVC_TEMPENTITY)
write_byte(3)
engfunc(EngFunc_WriteCoord,vOrigin[0])
engfunc(EngFunc_WriteCoord,vOrigin[1])
engfunc(EngFunc_WriteCoord,vOrigin[2])
write_short(boom)
write_byte(50)
write_byte(15)
write_byte(0)
message_end()
/*
if (iHit == -1)
{
client_print(id, print_chat, "%s %s",CHATTAG,STR_MINEDETNATED)
} else
{
szNetName[0] = '^0'
engfunc(EngFunc_AllocString,iHit,szNetName)
//entity_get_string(iHit, EV_SZ_netname, szNetName, 32)
client_print(id, print_chat, "%s %s %s",CHATTAG,szNetName,STR_MINEDETNATED2)
}
*/
}

CreateLaserDamage(iCurrent,isHit)
{
new Float:vOrigin[3],Float:vEnd[3]
pev(iCurrent,pev_origin,vOrigin)
pev(iCurrent,pev_vuser1,vEnd)

//new isHit = fm_trace_line(iCurrent, vOrigin, vEnd, vTrace)
new teamid = pev(iCurrent, LASERMINE_INT_TEAM)

new szClassName[32]
new Alive,God
new iHitTeam,iHitHP,id
new hitscore

if(isHit < 0 ) return PLUGIN_CONTINUE

szClassName[0] = '^0'
pev(isHit,pev_classname,szClassName,32)

if(equal(szClassName, "player"))
{
Alive = is_user_alive(isHit)
God = get_user_godmode(isHit)
if(!Alive || God) return PLUGIN_CONTINUE

iHitTeam = int:cs_get_user_team(isHit)
//iHitHP = entity_get_float(isHit,EV_FL_health) - float(LASER_HIT_DMG)
iHitHP = pev_user_health(isHit) - get_pcvar_num(g_LDMG)
id = pev(iCurrent,LASERMINE_OWNER)//, szNetName[32]
if( get_pcvar_num(g_LMODE) == MODE_LASERMINE)
{
if(iHitHP <= 0)
{
if(iHitTeam != teamid)
{
hitscore = 1
cs_set_user_money(id,cs_get_user_money(id) + get_pcvar_num(g_LFMONEY))
//set_user_health(iHit, 0)
//entity_set_float(iHit, EV_FL_health,0.0)
emit_sound(isHit, CHAN_WEAPON, ENT_SOUND4, 1.0, ATTN_NORM, 0, PITCH_NORM )
set_score(id,isHit,hitscore,iHitHP)
//entity_get_string(iHit, EV_SZ_netname, szNetName, 32)
//client_print(id, print_chat, "[LaserMines] %s killed your mine.",szNetName)
}else
{
if(get_pcvar_num(g_LFF))
{
hitscore = -1
cs_set_user_money(id,cs_get_user_money(id) - get_pcvar_num(g_LFMONEY))
emit_sound(isHit, CHAN_WEAPON, ENT_SOUND4, 1.0, ATTN_NORM, 0, PITCH_NORM )
set_score(id,isHit,hitscore,iHitHP)
//set_user_health(iHit, 0)
//entity_set_float(iHit, EV_FL_health, 0.0)
//entity_get_string(iHit, EV_SZ_netname, szNetName, 32)
//client_print(id, print_chat, "[LaserMines] %s killed your mine.",szNetName)
}
}
}else if(iHitTeam != teamid || get_pcvar_num(g_LFF))
{
//entity_set_float(isHit,EV_FL_health,iHitHP)
//set_user_health(isHit, iHitHP)
set_user_health(isHit,iHitHP)
message_begin(MSG_ONE_UNRELIABLE, g_msgDamage, {0,0,0}, isHit)
write_byte(get_pcvar_num(g_LDMG))
write_byte(get_pcvar_num(g_LDMG))
write_long(DMG_BULLET)
engfunc(EngFunc_WriteCoord,vOrigin[0])
engfunc(EngFunc_WriteCoord,vOrigin[1])
engfunc(EngFunc_WriteCoord,vOrigin[2])
message_end()
}
}else
{
CreateExplosion(iCurrent)
CreateDamage(iCurrent,get_pcvar_num(g_LRDMG),get_pcvar_float(g_LRADIUS))
RemoveEntity(iCurrent);
}
}else if(equal(szClassName, ENT_CLASS_NAME3))
{
new hl;
hl = pev_user_health(isHit);
set_user_health(isHit,hl-get_pcvar_num(g_LDMG));
}
return PLUGIN_CONTINUE
}

stock pev_user_health(id)
{
new Float:health
pev(id,pev_health,health)
return floatround(health)
}

stock set_user_health(id,health)
{
health > 0 ? set_pev(id, pev_health, float(health)) : dllfunc(DLLFunc_ClientKill, id);
}

stock get_user_godmode(index)
{
new Float:val
pev(index, pev_takedamage, val)

return (val == DAMAGE_NO)
}

stock set_user_frags(index, frags)
{
set_pev(index, pev_frags, float(frags))

return 1
}

stock pev_user_frags(index)
{
new Float:frags;
pev(index,pev_frags,frags);
return floatround(frags);
}

set_score(id,target,hitscore,HP){

new idfrags = pev_user_frags(id) + hitscore// get_user_frags(id) + hitscore
set_user_frags(id,idfrags)
//set_user_frags(id, idfrags)
//entity_set_float(id, EV_FL_frags, float(idfrags))

new tarfrags = pev_user_frags(target) + 1 //get_user_frags(target) + 1
set_user_frags(target,tarfrags)
//set_user_frags(target,tarfrags)
//entity_set_float(target, EV_FL_frags, float(tarfrags))

new idteam = int:cs_get_user_team(id)
new iddeaths = cs_get_user_deaths(id)

message_begin(MSG_ALL, g_msgDeathMsg, {0, 0, 0} ,0)
write_byte(id)
write_byte(target)
write_byte(0)
write_string(ENT_CLASS_NAME)
message_end()

message_begin(MSG_ALL, g_msgScoreInfo)
write_byte(id)
write_short(idfrags)
write_short(iddeaths)
write_short(0)
write_short(idteam)
message_end()

set_msg_block(g_msgDeathMsg, BLOCK_ONCE)

//entity_set_float(target, EV_FL_health,float(HP))
set_user_health(target, HP)
//set_pev(target,pev_health,HP)

}

public BuyLasermine(id)

{
if( !get_pcvar_num( g_LENABLE ) ){
client_print(id, print_chat, "%s %s",CHATTAG,STR_NOTACTIVE)
return PLUGIN_CONTINUE
}
if (!CheckCanTeam(id))
{
client_print(id, print_chat, "%s %s",CHATTAG,STR_CBT)
return PLUGIN_HANDLED
}
if (cs_get_user_money(id) < get_pcvar_num(g_LCOST)) {
client_print(id, print_chat, "%s %s%d %s",CHATTAG, STR_NOMONEY,get_pcvar_num(g_LCOST),STR_NEEDED)
return PLUGIN_HANDLED
}
if (g_havemine[id] >= get_pcvar_num(g_LAMMO)){
client_print(id, print_chat, "%s %s",CHATTAG,STR_HAVEMAX)
return PLUGIN_HANDLED
}
if(!CheckTime())
{
client_print(id,print_chat, "%s %s %d %s",CHATTAG,STR_DELAY,get_pcvar_num(g_LDELAY)-g_nowtime,STR_SECONDS)
return PLUGIN_HANDLED
}
cs_set_user_money(id,cs_get_user_money(id) - get_pcvar_num(g_LCOST))
g_havemine[id]++;
emit_sound(id, CHAN_ITEM, ENT_SOUND5, VOL_NORM, ATTN_NORM, 0, PITCH_NORM)
client_print(id, print_chat, "%s %s",CHATTAG,STR_BOUGHT)
ShowAmmo(id)
return PLUGIN_HANDLED
}

ShowAmmo(id)
{
new ammo[51]
formatex(ammo, 50, "%s %i/%i",STR_STATE, g_havemine[id],get_pcvar_num(g_LAMMO))

message_begin(MSG_ONE, g_msgStatusText, {0,0,0}, id)
write_byte(0)
write_string(ammo)
message_end()
}

public showInfo(id)
{
client_print(id, print_chat, STR_REF)
}

public say_lasermine(id){
new said[32]
read_argv(1,said,31);
if( !get_pcvar_num( g_LENABLE ) ){
// client_print(id, print_chat, "%s Lasermines are not currently active.",CHATTAG)
return PLUGIN_CONTINUE
}

if (equali(said,"/buy lasermine")||equali(said,"/lm")){
BuyLasermine(id)
}else if (equali(said, "lasermine") || equali(said, "/lasermine")){
const SIZE = 1024
new msg[SIZE+1],len = 0;
len += formatex(msg[len], SIZE - len, "<html><body>")
len += formatex(msg[len], SIZE - len, "<p><b>LaserMine</b></p><br/><br/>")
len += formatex(msg[len], SIZE - len, "<p>You can be setting the mine on the wall.</p><br/>")
len += formatex(msg[len], SIZE - len, "<p>That laser will give what touched it damage.</p><br/><br/>")
len += formatex(msg[len], SIZE - len, "<p><b>LaserMine Commands</b></p><br/><br/>")
len += formatex(msg[len], SIZE - len, "<p><b>Say /buy lasermine</b> or <b>Say /lm</b> //buying lasermine<br/>")
len += formatex(msg[len], SIZE - len, "<b>buy_lasermine</b> //bind ^"F2^" buy_lasermine : using F2 buying lasermine<br/>")
len += formatex(msg[len], SIZE - len, "<b>+setlaser</b> //bind mouse3 +setlaser : using mouse3 set lasermine on wall<br/>")
len += formatex(msg[len], SIZE - len, "</body></html>")
show_motd(id, msg, "Lasermine Entity help")
return PLUGIN_CONTINUE
}
else if (containi(said, "laser") != -1) {
showInfo(id)
return PLUGIN_CONTINUE
}
return PLUGIN_CONTINUE
}

public standing(id) {
if (!g_settinglaser[id])
return PLUGIN_CONTINUE

set_pev(id, pev_maxspeed, 1.0)
// ShowAmmo(id)

return PLUGIN_CONTINUE
}

public ltm_PostThink(id) {
if (!g_settinglaser[id] && plsetting[id]){
resetspeed(id)
}
else if (g_settinglaser[id] && !plsetting[id]) {
pev(id, pev_maxspeed,plspeed[id])
set_pev(id, pev_maxspeed, 1.0)
}
plsetting[id] = g_settinglaser[id]
return FMRES_IGNORED
}

resetspeed(who) {
set_pev(who, pev_maxspeed, plspeed[who])
}

public client_putinserver(id){
g_deployed[id] = 0;
g_havemine[id] = 0;
g_settinglaser[id] = false;
return PLUGIN_CONTINUE
}

public client_disconnect(id){
if(!get_pcvar_num( g_LENABLE ))
return PLUGIN_CONTINUE
g_settinglaser[id] = false
RemoveAllTripmines(id);
return PLUGIN_CONTINUE
}

public newround(id){
if(!get_pcvar_num( g_LENABLE ))
return PLUGIN_CONTINUE
pev(id, pev_maxspeed,plspeed[id])
g_settinglaser[id] = false
RemoveAllTripmines(id);
return PLUGIN_CONTINUE
}

public DeathEvent(){
if(!get_pcvar_num( g_LENABLE ))
return PLUGIN_CONTINUE

new id = read_data(2)
if (task_exists(TASK_PLANT+id))
remove_task(TASK_PLANT+id)
g_settinglaser[id] = false
return PLUGIN_CONTINUE
}

RemoveAllTripmines( i_Owner )
{
new iEnt = g_MaxPL + 1;
new clsname[32];
while( ( iEnt = engfunc( EngFunc_FindEntityByString, iEnt, "classname", ENT_CLASS_NAME ) ) )
{
if ( i_Owner )
{
if( pev( iEnt, LASERMINE_OWNER ) != i_Owner )
continue;
clsname[0] = '^0'
pev( iEnt, pev_classname, clsname, sizeof(clsname)-1 );

if ( equali( clsname, ENT_CLASS_NAME ) )
{
PlaySound( iEnt, STOP_SOUND );
RemoveEntity( iEnt );
}
}
else
set_pev( iEnt, pev_flags, FL_KILLME );
}
g_deployed[i_Owner]=0;
}