// Цвет мины и лазера людей
// Цвет мины и лазера зомби
ENT_MODELS[] = "models/zombie_plague/LaserMines/v_laser_mine.mdl",
ENT_SOUND1[] = "weapons/mine_deploy.wav",
ENT_SOUND2[] = "weapons/mine_charge.wav",
ENT_SOUND3[] = "weapons/mine_activate.wav",
ENT_SOUND4[] = "items/suitchargeok1.wav",
ENT_SOUND5[] = "items/gunpickup2.wav",
ENT_SOUND6[] = "debris/bustglass1.wav",
ENT_SOUND7[] = "debris/bustglass2.wav",
ENT_SPRITE1[] = "sprites/laserbeam.spr",
ENT_SPRITE2[] = "sprites/lm_explode.spr";
ENT_CLASS_NAME[] = "lasermine",
ENT_CLASS_NAME3[] = "func_breakable",
gSnarkClassName[] = "wpn_snark", // Для совместимости с плагином "Snark"
barnacle_class[] = "barnacle", // Для совместимости с плагином "Barnacle"
weapon_box[] = "weaponbox";
new g_EntMine, beam, boom
new g_LENABLE, g_LFMONEY, g_LAMMO, g_LDMG, g_LBEO, g_LTMAX, g_LCOST, g_LHEALTH, g_LMODE, g_LRADIUS, g_NOROUND, g_NEMROUND, g_SURVROUND
new g_LRDMG,g_LFF,g_LCBT, g_LDELAY, g_LVISIBLE, g_LSTAMMO, g_LACCESS, g_LGLOW, g_LDMGMODE, g_LCLMODE
new g_LCBRIGHT, g_LDSEC, g_LCMDMODE, g_LBUYMODE, g_LME;
new g_msgDeathMsg,g_msgScoreInfo,g_msgDamage,g_msgStatusText;
new g_dcount[33],g_nowtime,g_MaxPL
new bool:g_settinglaser[33]
new Float:plspeed[33], plsetting[33], g_havemine[33], g_deployed[33];
register_plugin(PLUGIN, VERSION, AUTHOR);
// Вызываем функцию Laser_TakeDamage при получении урона объектом ENT_CLASS_NAME3 (func_breakable)
RegisterHam(Ham_TakeDamage, ENT_CLASS_NAME3, "Laser_TakeDamage")
register_clcmd("+setlaser","CreateLaserMine_Progress_b");
register_clcmd("-setlaser","StopCreateLaserMine");
register_clcmd("+dellaser","ReturnLaserMine_Progress");
register_clcmd("-dellaser","StopReturnLaserMine");
register_clcmd("say","say_lasermine");
register_clcmd("buy_lasermine","BuyLasermineChat");
g_LENABLE = register_cvar("zp_ltm","1")
g_LACCESS = register_cvar("zp_ltm_acs","0") //0 all, 1 admin
g_LMODE = register_cvar("zp_ltm_mode","0") //0 lasermine, 1 tripmine
g_LAMMO = register_cvar("zp_ltm_ammo","3")
g_LDMG = register_cvar("zp_ltm_dmg","10") //laser hit dmg
g_LCOST = register_cvar("zp_ltm_cost","2")
g_LFMONEY = register_cvar("zp_ltm_fragmoney","1")
g_LHEALTH = register_cvar("zp_ltm_health","10")
g_LTMAX = register_cvar("zp_ltm_teammax","128")
g_LRADIUS = register_cvar("zp_ltm_radius","25.0")
g_LRDMG = register_cvar("zp_ltm_rdmg","100") //radius damage
g_LFF = register_cvar("zp_ltm_ff","0")
g_LCBT = register_cvar("zp_ltm_cbt","ALL")
g_LDELAY = register_cvar("zp_ltm_delay","0.1")
g_LVISIBLE = register_cvar("zp_ltm_line","1")
g_LGLOW = register_cvar("zp_ltm_glow","1")
g_LCBRIGHT = register_cvar("zp_ltm_bright","255")//laser line brightness.
g_LCLMODE = register_cvar("zp_ltm_color","0") //0 is team color,1 is green
g_LDMGMODE = register_cvar("zp_ltm_ldmgmode","0") //0 - frame dmg, 1 - once dmg, 2 - 1 second dmg
g_LDSEC = register_cvar("zp_ltm_ldmgseconds","1") //mode 2 only, damage / seconds. default 1 (sec)
g_LSTAMMO = register_cvar("zp_ltm_startammo","0")
g_LBUYMODE = register_cvar("zp_ltm_buymode","1");
g_LCMDMODE = register_cvar("zp_ltm_cmdmode","1"); //0 is +USE key, 1 is bind, 2 is each.
g_LBEO = register_cvar("zp_ltm_brokeenemy","1");
g_NOROUND = register_cvar("zp_ltm_noround","1");
g_NEMROUND = register_cvar("zp_ltm_nemround","1");
g_SURVROUND = register_cvar("zp_ltm_survround","1");
register_event("DeathMsg", "DeathEvent", "a");
register_event("CurWeapon", "standing", "be", "1=1");
register_event("ResetHUD", "delaycount", "a");
register_event("ResetHUD", "newround", "b");
register_logevent("endround", 2, "0=World triggered", "1=Round_End"); // Регистрируем конец раунда
register_event("Damage","CutDeploy_onDamage","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");
register_forward(FM_Think, "ltm_Think");
register_forward(FM_PlayerPostThink, "ltm_PostThink");
register_forward(FM_PlayerPreThink, "ltm_PreThink");
// Регистируем файл языков
register_dictionary("LaserMines.txt")
register_cvar("Shidla", "[ZP] LaserMines v.2.8.1 Final", FCVAR_SERVER|FCVAR_SPONLY)
// Регистрируем ExtraItem
g_LME = zp_register_extra_item("Laser Mine", get_pcvar_num(g_LCOST), ZP_TEAM_ANY)
precache_sound(ENT_SOUND1);
precache_sound(ENT_SOUND2);
precache_sound(ENT_SOUND3);
precache_sound(ENT_SOUND4);
precache_sound(ENT_SOUND5);
precache_sound(ENT_SOUND6);
precache_sound(ENT_SOUND7);
precache_model(ENT_MODELS);
beam = precache_model(ENT_SPRITE1);
boom = precache_model(ENT_SPRITE2);
require_module("fakemeta");
require_module("cstrike");
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();
new file[64]; get_localinfo("amxx_configsdir",file,63);
format(file, 63, "%s/zp_ltm_cvars_ap.cfg", file);
if(file_exists(file)) server_cmd("exec %s", file), server_exec();
public Laser_TakeDamage(victim, inflictor, attacker, Float:f_Damage, bit_Damage)
if(get_pcvar_num(g_LBEO))
// Получаем ID игрока, который поставил мину
i_Owner = pev(victim, LASERMINE_OWNER)
// Если урон нанасит владелец, а так же проверка игрока.
if(i_Owner == attacker || !is_valid_player(i_Owner) || !is_valid_player(attacker))
// Если мина установлена человеком, то урон ей наносят только зомби
if((CsTeams:pev(victim, LASERMINE_TEAM) == CS_TEAM_CT) && (cs_get_user_team(attacker) != CS_TEAM_CT))
// Если мина установлена зомби, а владелец мины и атакующий в разных командах - урон мине могун наносить все
if((CsTeams:pev(victim, LASERMINE_TEAM) == CS_TEAM_T) && ((cs_get_user_team(i_Owner) != CS_TEAM_T) || (CsTeams:pev(victim, LASERMINE_TEAM) != cs_get_user_team(attacker))))
g_dcount[id] = floatround(get_gametime());
g_nowtime = floatround(get_gametime()) - g_dcount[id];
if(g_nowtime >= get_pcvar_num(g_LDELAY))
public CreateLaserMine_Progress_b(id)
if(get_pcvar_num(g_LCMDMODE) != 0)
CreateLaserMine_Progress(id);
public CreateLaserMine_Progress(id)
g_settinglaser[id] = true;
message_begin(MSG_ONE, 108, {0,0,0}, id);
set_task(1.2, "Spawn", (TASK_PLANT + id));
public ReturnLaserMine_Progress(id)
g_settinglaser[id] = true;
message_begin(MSG_ONE, 108, {0,0,0}, id);
set_task(1.2, "ReturnMine", (TASK_RELEASE + id));
public StopCreateLaserMine(id)
message_begin(MSG_ONE, 108, {0,0,0}, id);
public StopReturnLaserMine(id)
message_begin(MSG_ONE, 108, {0,0,0}, id);
new tgt,body,Float:vo[3],Float:to[3];
get_user_aiming(id,tgt,body);
if(!pev_valid(tgt)) return;
if(get_distance_f(vo,to) > 70.0) return;
pev(tgt, pev_classname, EntityName, 31);
if(!equal(EntityName, ENT_CLASS_NAME)) return;
if(pev(tgt,LASERMINE_OWNER) != id) return;
emit_sound(id, CHAN_ITEM, ENT_SOUND5, VOL_NORM, ATTN_NORM, 0, PITCH_NORM)
new i_Ent = engfunc(EngFunc_CreateNamedEntity,g_EntMine);
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_user_health(i_Ent,get_pcvar_num(g_LHEALTH));
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);
get_tr2(0, TR_flFraction, fFraction);
// -- 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:{ -4.0, -4.0, -4.0 }, Float:{ 4.0, 4.0, 4.0 });
engfunc(EngFunc_SetOrigin, i_Ent, vNewOrigin);
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_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);
stock TeamDeployedCount(id)
static CsTeams:t;t = cs_get_user_team(id);
for(i = 1;i <= g_MaxPL;i++)
if(t == cs_get_user_team(i))
get_pcvar_string(g_LCBT,arg,3);
else if(equali(arg,"ALL") || equali(arg,"HZ") || equali(arg,"ZH"))
num = CsTeam:CS_TEAM_UNASSIGNED;
num = CsTeam:CS_TEAM_UNASSIGNED;
if(num != CsTeam:CS_TEAM_UNASSIGNED && num != CsTeam:cs_get_user_team(id))
bool:CanCheck(id,mode) // Проверки: когда можно ставить мины
if(!get_pcvar_num(g_LENABLE))
client_print(id, print_chat, "%L %L", id, "CHATTAG",id, "STR_NOTACTIVE")
if(get_pcvar_num(g_LACCESS) != 0)
if(!(get_user_flags(id) & ADMIN_IMMUNITY))
client_print(id, print_chat, "%L %L", id, "CHATTAG",id, "STR_NOACCESS")
if(!pev_user_alive(id)) return false;
client_print(id, print_chat, "%L %L", id, "CHATTAG",id, "STR_CBT")
client_print(id, print_chat, "%L %L", id, "CHATTAG",id, "STR_DONTHAVEMINE")
if(get_pcvar_num(g_LBUYMODE) == 0)
client_print(id, print_chat, "%L %L", id, "CHATTAG",id, "STR_CANTBUY")
if(g_havemine[id] >= get_pcvar_num(g_LAMMO))
client_print(id, print_chat, "%L %L", id, "CHATTAG",id, "STR_HAVEMAX")
if(zp_get_user_ammo_packs(id) < get_pcvar_num(g_LCOST))
client_print(id, print_chat, "%L %L%d %L", id, "CHATTAG",id, "STR_NOMONEY",get_pcvar_num(g_LCOST),id, "STR_NEEDED")
client_print(id, print_chat, "%L %L %d %L", id, "CHATTAG",id, "STR_DELAY",get_pcvar_num(g_LDELAY)-g_nowtime,id, "STR_SECONDS")
if(!CanCheck(id,-1)) return false;
if(g_havemine[id] + 1 > get_pcvar_num(g_LAMMO)) return false;
new tgt,body,Float:vo[3],Float:to[3];
get_user_aiming(id,tgt,body);
if(!pev_valid(tgt)) return false;
if(get_distance_f(vo,to) > 70.0) return false;
pev(tgt, pev_classname, EntityName, 31);
if(!equal(EntityName, ENT_CLASS_NAME)) return false;
if(pev(tgt,LASERMINE_OWNER) != id) return false;
if(!CanCheck(id,0)) return false;
// Проверка на разрешение
if(!zp_has_round_started() && get_pcvar_num(g_NOROUND))
client_print(id, print_chat, "%L %L", id, "CHATTAG",id, "STR_NOROUND")
if(zp_is_nemesis_round() && get_pcvar_num(g_NEMROUND))
client_print(id, print_chat, "%L %L", id, "CHATTAG",id, "STR_NEMROUND")
if(zp_is_survivor_round() && get_pcvar_num(g_SURVROUND))
client_print(id, print_chat, "%L %L", id, "CHATTAG",id, "STR_SURVROUND")
if(g_deployed[id] >= get_pcvar_num(g_LAMMO))
client_print(id, print_chat, "%L %L", id, "CHATTAG",id, "STR_MAXDEPLOY")
if(TeamDeployedCount(id) >= get_pcvar_num(g_LTMAX))
client_print(id, print_chat, "%L %L", id, "CHATTAG",id, "STR_MANYPPL")
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);
// -- Save results to be used later.
get_tr2(0, TR_vecEndPos, vTraceEnd);
get_tr2(0, TR_vecPlaneNormal, vTraceNormal);
client_print(id, print_chat, "%L %L", id, "CHATTAG",id, "STR_PLANTWALL")
// -- Did not touched something. (not solid)
pev(i_Ent, pev_classname, EntityName, 31);
if(!get_pcvar_num(g_LENABLE)) return FMRES_IGNORED;
// -- Entity is not a tripmine, ignoring the next...
if(!equal(EntityName, ENT_CLASS_NAME))
fCurrTime = get_gametime();
switch(pev(i_Ent, LASERMINE_STEP))
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);
if(get_pcvar_num(g_LGLOW)!=0)
if(get_pcvar_num(g_LCLMODE)==0)
switch (pev(i_Ent,LASERMINE_TEAM))
case CS_TEAM_T: set_rendering(i_Ent,kRenderFxGlowShell,Red_Zomb,Green_Zomb,Blue_Zomb,kRenderNormal,5);
case CS_TEAM_CT:set_rendering(i_Ent,kRenderFxGlowShell,Red_Hum,Green_Hum,Blue_Hum,kRenderNormal,5);
// цвет лазера, если стоит "одинаковый для всех" цвет
set_rendering(i_Ent,kRenderFxGlowShell,random_num(50 , 200),random_num(50 , 200),random_num(50 , 200),kRenderNormal,5);
set_pev(i_Ent, pev_nextthink, fCurrTime + 0.1);
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.
// -- Ignoring others tripmines entity.
pev(iHit, pev_classname, EntityName, 31);
if(!equal(EntityName, ENT_CLASS_NAME) && !equal(EntityName, gSnarkClassName) && !equal(EntityName, barnacle_class) && !equal(EntityName, weapon_box))
set_pev(i_Ent, pev_enemy, iHit);
if(get_pcvar_num(g_LMODE) == MODE_LASERMINE)
CreateLaserDamage(i_Ent,iHit);
if(get_pcvar_num(g_LFF) || CsTeams:pev(i_Ent,LASERMINE_TEAM) != cs_get_user_team(iHit))
set_pev(i_Ent, LASERMINE_STEP, EXPLOSE_THINK);
if (!pev_valid(i_Ent)) // если не верный объект - ничего не делаем. Спасибо DJ_WEST
set_pev(i_Ent, pev_nextthink, fCurrTime + random_float(0.1, 0.3));
if(get_pcvar_num(g_LDMGMODE)!=0)
if(pev(i_Ent,LASERMINE_HITING) != iHit)
set_pev(i_Ent,LASERMINE_HITING,iHit);
// -- Tripmine is still there.
pev(i_Ent, pev_health, fHealth);
if(fHealth <= 0.0 || (pev(i_Ent,pev_flags) & FL_KILLME))
set_pev(i_Ent, LASERMINE_STEP, EXPLOSE_THINK);
set_pev(i_Ent, pev_nextthink, fCurrTime + random_float(0.1, 0.3));
pev(i_Ent, LASERMINE_BEAMTHINK, fBeamthink);
if(fBeamthink < fCurrTime && get_pcvar_num(g_LVISIBLE))
DrawLaser(i_Ent, vOrigin, vEnd);
set_pev(i_Ent, LASERMINE_BEAMTHINK, fCurrTime + 0.1);
set_pev(i_Ent, pev_nextthink, fCurrTime + 0.01);
// -- Stopping entity to think
set_pev(i_Ent, pev_nextthink, 0.0);
PlaySound(i_Ent, STOP_SOUND);
g_deployed[pev(i_Ent,LASERMINE_OWNER)]--;
CreateDamage(i_Ent,get_pcvar_float(g_LRDMG),get_pcvar_float(g_LRADIUS))
PlaySound(i_Ent, i_SoundType)
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);
emit_sound(i_Ent, CHAN_VOICE, ENT_SOUND3, 0.5, ATTN_NORM, 1, 75);
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 teamid = pev(i_Ent, LASERMINE_TEAM);
if(get_pcvar_num(g_LCLMODE) == 0)
// Цвет луча для Человека
// Цвет луча для всез при режиме 1-н луч для всех
tcolor[0] = random_num(50 , 200);
tcolor[1] = random_num(50 , 200);
tcolor[2] = random_num(50 , 200);
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_byte(tcolor[0]); // r
write_byte(tcolor[1]); // g
write_byte(tcolor[2]); // b
write_byte(get_pcvar_num(g_LCBRIGHT));
CreateDamage(iCurrent,Float:DmgMAX,Float:Radius)
pev(iCurrent, pev_origin, vecSrc);
new AtkID =pev(iCurrent,LASERMINE_OWNER);
new TeamID=pev(iCurrent,LASERMINE_TEAM);
new Float:tmpdmg = DmgMAX;
new Float:kickback = 0.0;
// Needed for doing some nice calculations :P
new Float:Tabsmin[3], Float:Tabsmax[3];
new Float:Aabsmin[3], Float:Aabsmax[3];
new Float:origin[3], Float:vecPush[3];
falloff = DmgMAX / Radius;
// Find monsters and players inside a specifiec radius
while((ent = engfunc(EngFunc_FindEntityInSphere, ent, vecSrc, Radius)) != 0)
if(!pev_valid(ent)) continue;
if(!(pev(ent, pev_flags) & (FL_CLIENT | FL_FAKECLIENT | FL_MONSTER)))
// Entity is not a player or monster, ignore it
if(!pev_user_alive(ent)) continue;
// The following calculations are provided by Orangutanz, THANKS!
// We use absmin and absmax for the most accurate information
pev(ent, pev_absmin, Tabsmin);
pev(ent, pev_absmax, Tabsmax);
xs_vec_add(Tabsmin,Tabsmax,Tabsmin);
xs_vec_mul_scalar(Tabsmin,0.5,vecSpot);
pev(iCurrent, pev_absmin, Aabsmin);
pev(iCurrent, pev_absmax, Aabsmax);
xs_vec_add(Aabsmin,Aabsmax,Aabsmin);
xs_vec_mul_scalar(Aabsmin,0.5,vecSee);
engfunc(EngFunc_TraceLine, vecSee, vecSpot, 0, iCurrent, trRes);
get_tr2(trRes, TR_flFraction, flFraction);
// Explosion can 'see' this entity, so hurt them! (or impact through objects has been enabled xD)
if(flFraction >= 0.9 || get_tr2(trRes, TR_pHit) == ent)
// Work out the distance between impact and entity
get_tr2(trRes, TR_vecEndPos, vecEndPos);
distance = get_distance_f(vecSrc, vecEndPos) * falloff;
xs_vec_sub(vecSpot,vecSee,origin);
invlen = 1.0/get_distance_f(vecSpot, vecSee);
xs_vec_mul_scalar(origin,invlen,vecPush);
pev(ent, pev_velocity, velocity)
xs_vec_mul_scalar(vecPush,tmpdmg,vecPush);
xs_vec_mul_scalar(vecPush,kickback,vecPush);
xs_vec_add(velocity,vecPush,velocity);
xs_vec_mul_scalar(velocity,12.0,velocity);
xs_vec_mul_scalar(velocity,4.0,velocity);
if(velocity[0] != 0.0 || velocity[1] != 0.0 || velocity[2] != 0.0)
// There's some movement todo :)
set_pev(ent, pev_velocity, velocity)
iHitHP = pev_user_health(ent) - floatround(tmpdmg)
iHitTeam = int:cs_get_user_team(ent)
zp_set_user_ammo_packs(AtkID,zp_get_user_ammo_packs(AtkID) + get_pcvar_num(g_LFMONEY))
set_score(AtkID,ent,1,iHitHP)
zp_set_user_ammo_packs(AtkID,zp_get_user_ammo_packs(AtkID) - get_pcvar_num(g_LFMONEY))
set_score(AtkID,ent,-1,iHitHP)
if(iHitTeam != TeamID || get_pcvar_num(g_LFF))
//set_pev(Player,pev_health,iHitHP)
set_user_health(ent, iHitHP)
engfunc(EngFunc_MessageBegin,MSG_ONE_UNRELIABLE,g_msgDamage,{0.0,0.0,0.0},ent);
write_byte(floatround(tmpdmg))
write_byte(floatround(tmpdmg))
engfunc(EngFunc_WriteCoord,vecSrc[0])
engfunc(EngFunc_WriteCoord,vecSrc[1])
engfunc(EngFunc_WriteCoord,vecSrc[2])
new deadflag = pev(ent,pev_deadflag);
CreateExplosion(iCurrent)
pev(iCurrent,pev_origin,vOrigin);
message_begin(MSG_BROADCAST, SVC_TEMPENTITY);
write_byte(99); //99 = KillBeam
engfunc(EngFunc_MessageBegin, MSG_PVS, SVC_TEMPENTITY, vOrigin, 0);
write_byte(TE_EXPLOSION);
engfunc(EngFunc_WriteCoord,vOrigin[0]);
engfunc(EngFunc_WriteCoord,vOrigin[1]);
engfunc(EngFunc_WriteCoord,vOrigin[2]);
CreateLaserDamage(iCurrent,isHit)
if(isHit < 0) return PLUGIN_CONTINUE
switch(get_pcvar_num(g_LDMGMODE))
if(pev(iCurrent,LASERMINE_HITING) == isHit)
if(pev(iCurrent,LASERMINE_HITING) == isHit)
static now,htime;now = floatround(get_gametime())
pev(iCurrent,LASERMINE_COUNT,cnt)
if(now - htime < get_pcvar_num(g_LDSEC))
set_pev(iCurrent,LASERMINE_COUNT,get_gametime())
set_pev(iCurrent,LASERMINE_COUNT,get_gametime())
new Float:vOrigin[3],Float:vEnd[3]
pev(iCurrent,pev_origin,vOrigin)
pev(iCurrent,pev_vuser1,vEnd)
new teamid = pev(iCurrent, LASERMINE_TEAM)
pev(isHit,pev_classname,szClassName,32)
if((pev(isHit, pev_flags) & (FL_CLIENT | FL_FAKECLIENT | FL_MONSTER)))
Alive = pev_user_alive(isHit)
God = get_user_godmode(isHit)
if(!Alive || God) return PLUGIN_CONTINUE
iHitTeam = int:cs_get_user_team(isHit)
iHitHP = pev_user_health(isHit) - get_pcvar_num(g_LDMG)
id = pev(iCurrent,LASERMINE_OWNER)//, szNetName[32]
emit_sound(isHit, CHAN_WEAPON, ENT_SOUND4, 1.0, ATTN_NORM, 0, PITCH_NORM)
zp_set_user_ammo_packs(id,zp_get_user_ammo_packs(id) + get_pcvar_num(g_LFMONEY))
set_score(id,isHit,hitscore,iHitHP)
emit_sound(isHit, CHAN_WEAPON, ENT_SOUND4, 1.0, ATTN_NORM, 0, PITCH_NORM)
zp_set_user_ammo_packs(id,zp_get_user_ammo_packs(id) - get_pcvar_num(g_LFMONEY))
set_score(id,isHit,hitscore,iHitHP)
}else if(iHitTeam != teamid || get_pcvar_num(g_LFF))
emit_sound(isHit, CHAN_WEAPON, ENT_SOUND4, 1.0, ATTN_NORM, 0, PITCH_NORM)
set_user_health(isHit,iHitHP)
set_pev(iCurrent,LASERMINE_HITING,isHit);
engfunc(EngFunc_MessageBegin,MSG_ONE_UNRELIABLE,g_msgDamage,{0.0,0.0,0.0},isHit);
write_byte(get_pcvar_num(g_LDMG))
write_byte(get_pcvar_num(g_LDMG))
engfunc(EngFunc_WriteCoord,vOrigin[0])
engfunc(EngFunc_WriteCoord,vOrigin[1])
engfunc(EngFunc_WriteCoord,vOrigin[2])
}else if(equal(szClassName, ENT_CLASS_NAME3))
hl = pev_user_health(isHit);
set_user_health(isHit,hl-get_pcvar_num(g_LDMG));
stock pev_user_health(id)
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) {
pev(index, pev_takedamage, val)
return (val == DAMAGE_NO)
stock set_user_frags(index, frags)
set_pev(index, pev_frags, float(frags))
stock pev_user_frags(index)
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)
new tarfrags = pev_user_frags(target) + 1 //get_user_frags(target) + 1
set_user_frags(target,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_string(ENT_CLASS_NAME)
message_begin(MSG_ALL, g_msgScoreInfo)
set_msg_block(g_msgDeathMsg, BLOCK_ONCE)
set_user_health(target, HP)
if(!CanCheck(id,1)) return PLUGIN_CONTINUE
client_print(id, print_chat, "%L %L", id, "CHATTAG",id, "STR_BOUGHT")
emit_sound(id, CHAN_ITEM, ENT_SOUND5, VOL_NORM, ATTN_NORM, 0, PITCH_NORM)
public BuyLasermineChat(id)
if(!CanCheck(id,1)) return PLUGIN_CONTINUE
zp_set_user_ammo_packs(id,zp_get_user_ammo_packs(id) - get_pcvar_num(g_LCOST))
client_print(id, print_chat, "%L %L", id, "CHATTAG",id, "STR_BOUGHT")
emit_sound(id, CHAN_ITEM, ENT_SOUND5, VOL_NORM, ATTN_NORM, 0, PITCH_NORM)
public zp_extra_item_selected(id, itemid)
if(g_havemine[id] >= get_pcvar_num(g_LAMMO))
new PlugStat[ 555 char ];
formatex(PlugStat, charsmax(PlugStat), "%L", LANG_PLAYER, "STR_STATE")
formatex(ammo, 50, "%s %i/%i",PlugStat, g_havemine[id],get_pcvar_num(g_LAMMO))
message_begin(MSG_ONE, g_msgStatusText, {0,0,0}, id)
client_print(id, print_chat, "%L", id, "STR_REF")
public say_lasermine(id){
if(!get_pcvar_num(g_LENABLE))
if(equali(said,"/buy lasermine")||equali(said,"/lm")||equali(said,"buy_lasermine")){
}else if(equali(said, "lasermine") || equali(said, "/lasermine")){
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")
else if(containi(said, "laser") != -1) {
set_pev(id, pev_maxspeed, 1.0)
if(!g_settinglaser[id] && plsetting[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]
if(!pev_user_alive(id) || g_settinglaser[id] == true || is_user_bot(id) || get_pcvar_num(g_LCMDMODE) == 1)
if(pev(id, pev_button) & IN_USE && !(pev(id, pev_oldbuttons) & IN_USE))
CreateLaserMine_Progress(id)
set_pev(id, pev_maxspeed, plspeed[id])
public client_putinserver(id){
public client_disconnect(id){
if(!get_pcvar_num(g_LENABLE))
if(!get_pcvar_num(g_LENABLE))
pev(id, pev_maxspeed,plspeed[id])
//client_print(id, print_chat, "[ZP][LM][DeBug] All Mines removied!");
if(!get_pcvar_num(g_LENABLE))
// Удаление мин после конца раунда
if(!get_pcvar_num(g_LENABLE))
if(is_user_connected(id)) DeleteTask(id);
public RemoveAllTripmines(i_Owner)
while((iEnt = engfunc(EngFunc_FindEntityByString, iEnt, "classname", ENT_CLASS_NAME)))
if(pev(iEnt, LASERMINE_OWNER) != i_Owner)
pev(iEnt, pev_classname, clsname, sizeof(clsname)-1);
if(equali(clsname, ENT_CLASS_NAME))
PlaySound(iEnt, STOP_SOUND);
set_pev(iEnt, pev_flags, FL_KILLME);
new stammo = get_pcvar_num(g_LSTAMMO);
if(stammo <= 0) return PLUGIN_CONTINUE;
g_havemine[id] = (g_havemine[id] <= stammo) ? stammo : g_havemine[id];
public CutDeploy_onDamage(id)
if(get_user_health(id) < 1)
if(task_exists((TASK_PLANT + id)))
remove_task((TASK_PLANT + id))
if(task_exists((TASK_RELEASE + id)))
remove_task((TASK_RELEASE + id))
g_settinglaser[id] = false
stock set_rendering(entity, fx = kRenderFxNone, r = 255, g = 255, b = 255, render = kRenderNormal, amount = 16)
static Float:RenderColor[3];
RenderColor[0] = float(r);
RenderColor[1] = float(g);
RenderColor[2] = float(b);
set_pev(entity, pev_renderfx, fx);
set_pev(entity, pev_rendercolor, RenderColor);
set_pev(entity, pev_rendermode, render);
set_pev(entity, pev_renderamt, float(amount));
get_offset_value(id, type)
case OFFSET_TEAM: key = OFFSET_TEAM;
case OFFSET_DEATH: key = OFFSET_DEATH;
if(is_amd64_server()) key += 25;
return get_pdata_int(id, key);