[YARDIM]Sxe İle Lazermine Pluginin Çakışmasını Engelleme

[akcaliberkk]

 /* Plugin generated by AMXX-Studio */

#include <amxmodx>
#include <amxmisc>
#include <fakemeta>
#include <xs>
#include <cstrike>
//#include <fakemeta_util>
#define PLUGIN "Laser/TripMine Entity SXE Fixed"
#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","2")
    g_LDMG = register_cvar("amx_ltm_dmg","10000")
    g_LCOST = register_cvar("amx_ltm_cost","2500")
    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
    
    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
    
    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()
}

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;
}