SWEP.Spawnable = true
SWEP.AdminOnly = false
SWEP.Base = "astw2_base"

SWEP.PrintName = "SC Pistol (Chaos Theory)"
SWEP.Category = "ASTW2 - Splinter Cell: Chaos Theory DLC"
SWEP.Slot = 1
SWEP.Author = "Arctic"
SWEP.Contact = "/id/ArcticWinterZzZ/"
SWEP.Purpose = "Disables electronics."
SWEP.Instructions = "ATTACK2 to aim, ATTACK1 to fire."

if CLIENT then
SWEP.WepSelectIcon = surface.GetTextureID( "sc/vgui/hud/sc_pistol" )
SWEP.DrawWeaponInfoBox  = false
SWEP.BounceWeaponIcon = false
killicon.Add( "astw2_sc_pistol_ct", "sc/vgui/hud/sc_pistol", Color( 255, 255, 255, 255 ) )
end

SWEP.ViewModel = nil
SWEP.WorldModel = "models/weapons/w_fiveseven_ct.mdl"

SWEP.Primary.Damage = 12
SWEP.Primary.Delay = 60 / 350
SWEP.Primary.Acc = 1 / 75
SWEP.Primary.Recoil = 200
SWEP.Primary.RecoilAcc = 100
SWEP.Primary.Num = 1
SWEP.Primary.Automatic = false
SWEP.Primary.Ammo = "5mm"
SWEP.Primary.ClipSize = 20

SWEP.Projectile = nil
SWEP.ProjectileForce = 2500
SWEP.Effect_MuzzleFlash = "astw2_muzzleflash_scpistol"
SWEP.Tracer = "Tracer"

SWEP.Sound = "weapons/pistol/scpistol_fire.wav"
SWEP.Sound_Vol = 60
SWEP.Sound_Pitch = 100
SWEP.Sound_Magout = "weapons/pistol/scpistol_clipout.wav"
SWEP.Sound_Magin = "weapons/pistol/scpistol_clipin.wav"
SWEP.Sound_Boltpull = "weapons/silence.wav"
SWEP.Sound_Draw = "weapons/pistol/pistol_equip_02.wav"
SWEP.Sound_Holster = "weapons/pistol/pistol_unequip.wav"
SWEP.Secondary.Ammo = nil

SWEP.Effect_ShellEject = "astw2_case_5mm"

SWEP.MagDrop = ""

SWEP.ReloadTime = 1.5
SWEP.CannotChamber = false

SWEP.CanRest = false
SWEP.CrosshairOverride = "crosshairs/sc/ct_pistol_crosshair.png"

SWEP.Special = "melee"
SWEP.Melee = false // Whether to use the melee attack of the gun.
SWEP.Melee_Damage = 10
SWEP.Melee_Range = 8 // Range of the melee attack trace.
SWEP.Melee_SwingTime = 1
SWEP.Melee_HitSound = "physics/metal/weapon_impact_hard1.wav"
SWEP.Melee_HitHumanSound = "physics/body/body_medium_impact_hard4.wav"
SWEP.Melee_DamageType = DMG_CLUB

SWEP.CanRest = false

SWEP.HoldType_Lowered = "pistol"
SWEP.HoldType_Aim = "pistol"
SWEP.HoldType_Hipfire = "pistol"
SWEP.Anim_Reload = ACT_HL2MP_GESTURE_RELOAD_PISTOL
SWEP.Anim_Shoot = ACT_HL2MP_GESTURE_RANGE_ATTACK_PISTOL
SWEP.Anim_Melee = ACT_HL2MP_GESTURE_RANGE_ATTACK_MELEE

SWEP.Special = "none"

SWEP.EMPAmmoMax = 100
SWEP.EMPNeeded = 100
SWEP.EMPTime = 10
SWEP.EMPDelay = 2
SWEP.EMPRegenDelay = 0.065
SWEP.EMPRange = 5000
SWEP.EMPDisableTime = 10

SWEP.UniqueFiremode = true

AddCSLuaFile()

function SWEP:OnInitialize()
   self.EMPSound = nil
   self:SetNWInt("Light", 0)
   self:SetNWInt("EMPammo", self.EMPAmmoMax)
   self:SetNWFloat("EMPnextregen", CurTime() + self.EMPRegenDelay)
   self:SetNWBool("EMPmode", false)

   --Ent fire list
    self.Disable = {"npc_turret_floor","npc_combine_camera","npc_turret_ceiling","gmod_lamp","gmod_light","prop_thumper","hl2_thumper_large"}
    self.IgniteFire = {"hl2_npc_turret_ground"}
    self.Break = {"npc_cscanner","npc_clawscanner"}
    self.InteractivePowerDown = {"npc_manhack"}
    self.Recharge = {"item_suitcharger","item_healthcharger"}
    self.TurnOff = {"npc_rollermine"}
    self.Disarm = {"combine_mine"}
    self.DisableShooting = {"npc_hunter"}
    self.DropBomb = {"npc_helicopter"}
    self.LookOff = {"npc_combine_s","npc_metropolice"}

    --Sound
    self.Turrets = {"npc_turret_floor","npc_turret_ceiling","hl2_npc_turret_ground"}
    self.Other = {"npc_rollermine", "combine_mine" }
    self.Light = {"gmod_lamp","gmod_light"}

end

function SWEP:SpecialAttack()
   if self:GetNWInt( "EMPammo" ) < self.EMPNeeded then return end
    self:EmitSound( "weapons/pistol/pistol_emp.wav", 50, 100 )

   local shootpos = self:GetShootPosASTW()

   local Dir = (self.Owner:EyeAngles() + self.Fire_AngleOffset):Forward()

   local tr = util.TraceLine({
      start = shootpos,
      endpos = shootpos + (Dir * self.EMPRange)
   })

   self:SetNextPrimaryFire( CurTime() + self.EMPDelay )

   PrintTable(tr)
   print("meem")

   -- do stuff here

   local k = tr.Entity

   local newammo = self.Owner:GetNWInt( "EMPammo" )
   local oked = true
   local trclass = k:GetClass()
   local DoEMPTimer = false
   local DoTurnOnTimer = false
   local idloop = nil

   if !tr.Hit or tr.HitWorld or tr.HitSky or !tr.Entity or !IsValid(tr.Entity) then
      newammo = newammo + self.EMPNeeded
      oked = false
   elseif table.HasValue( self.Disable, trclass ) then --Fire Disable
        if SERVER then
        k:Fire("Disable", "", 0) end
        DoEMPTimer = true
    elseif table.HasValue( self.IgniteFire, trclass ) then --Fire Ignite
        if SERVER then
        k:Fire("Ignite", "", 0) end
        DoEMPTimer = true
    elseif table.HasValue( self.Break, trclass ) then --Fire Break
        if SERVER then
        k:Fire("Break", "", 0) end
    elseif table.HasValue( self.InteractivePowerDown, trclass ) then --Fire InteractivePowerDown
        if SERVER then
        k:Fire("InteractivePowerDown", "", 0) end
    elseif table.HasValue( self.Recharge, trclass ) then --Fire Recharge
        if SERVER then
        k:Fire("Recharge", "", 0) end
    elseif table.HasValue( self.TurnOff, trclass ) then --Fire TurnOff
        if SERVER then
        k:Fire("TurnOff", "", 0) end
        DoTurnOnTimer = true
    elseif table.HasValue( self.Disarm, trclass ) then --Fire Disarm
        if SERVER then
        k:Fire("Disarm", "", 0) end
    elseif table.HasValue( self.DisableShooting, trclass ) then --Fire DisableShooting
        if SERVER then
        k:Fire("DisableShooting", "", 0) end
    elseif table.HasValue( self.DropBomb, trclass ) then --Fire DropBomb
        if SERVER then
        k:Fire("DropBomb", "", 0) end
    elseif table.HasValue( self.LookOff, trclass ) then --Fire LookOff
        if SERVER then
        k:Fire("LookOff", "", 0) end


   else
      -- failure
      newammo = newammo + self.EMPNeeded
      oked = false
   end

   if DoEMPTimer then
         timer.Simple(self.EMPDisableTime, function()
         if !k:IsValid() then return end
         if SERVER then
         k:Fire("Enable", "", 0) end
      end)
   end

   if DoTurnOnTimer then
         timer.Simple(self.EMPDisableTime, function()
         if !k:IsValid() then return end
         if SERVER then
         k:Fire("TurnOn", "", 0) end
      end)
   end

       if table.HasValue(self.Turrets,trclass) then
        idloop = k:StartLoopingSound(Sound("weapons/misc_effects/turret_broke_loop.wav"))
   elseif trclass == "npc_combine_camera" then
        idloop = k:StartLoopingSound(Sound("weapons/misc_effects/camera_bugged_loop.wav"))
 elseif trclass == "combine_mine" then
        idloop = k:StartLoopingSound(Sound("weapons/misc_effects/other_bugged_loop" .. math.random(2,3) .. ".wav"))
 elseif trclass == "item_healthcharger" then
        idloop = k:StartLoopingSound(Sound("weapons/misc_effects/other_bugged_loop" .. math.random(2,3) .. ".wav"))
 elseif trclass == "item_suitcharger" then
        idloop = k:StartLoopingSound(Sound("weapons/misc_effects/other_bugged_loop" .. math.random(2,3) .. ".wav"))
 elseif trclass == "prop_thumper" then
        idloop = k:StartLoopingSound(Sound("weapons/misc_effects/generator_malfunction.wav"))
   elseif trclass == "npc_cscanner" then
        idloop = k:StartLoopingSound(Sound("weapons/sc/sticky_shocker3.wav"))
   elseif trclass == "npc_manhack" then
        idloop = k:StartLoopingSound(Sound("weapons/sc/sticky_shocker3.wav"))
   elseif trclass == "npc_clawscanner" then
        idloop = k:StartLoopingSound(Sound("weapons/sc/sticky_shocker3.wav"))
 elseif trclass == "hl2_thumper_large" then
        idloop = k:StartLoopingSound(Sound("weapons/misc_effects/generator_malfunction.wav"))
   elseif table.HasValue(self.Other, trclass) then
        idloop = k:StartLoopingSound(Sound("weapons/misc_effects/other_bugged_loop" .. math.random(2,3) .. ".wav"))
   elseif table.HasValue(self.Light, trclass) then
        idloop = k:StartLoopingSound(Sound("weapons/misc_effects/light_bugged_loop" .. math.random(1,5) .. ".wav"))
       end


   self:SetNWInt("EMPammo", newammo)

   if oked then
    newammo = newammo - self.EMPNeeded
      timer.Simple(self.EMPTime, function()
         if !self:IsValid() then return end
         k:StopLoopingSound(idloop)
      end)
      self:SetNWInt("Light", 2)
   else
      self:SetNWInt("Light", 1)
   end

   timer.Simple(self.EMPDelay, function()
      if !self:IsValid() then return end
      self:SetNWInt("Light", 0)
   end)
end

function SWEP:GetUniqueFiremode()
   if self:GetNWBool("EMPmode") then
      return "EMP"
   else
      return "SEMI"
   end
end

function SWEP:GetAmmoDisplay()
   if self:GetNWBool("EMPmode") then
      return self:GetNWInt("EMPammo", 0) .. "%"
   end
end

local lmat = Material("engine/lightsprite")

function SWEP:OnThink()
   if !self:IsValid() then return end

   if self:GetNWFloat("EMPnextregen", 0) < CurTime() then
      self:SetNWInt("EMPammo", math.Clamp(self:GetNWInt("EMPammo", 0) + 1, 0, self.EMPAmmoMax))
      self:SetNWFloat("EMPnextregen", CurTime() + self.EMPRegenDelay)
   end

   if self.Owner:KeyPressed(IN_USE) and self.Owner:KeyDown(IN_ATTACK2) then
      self:SetNWBool("EMPmode", !self:GetNWBool("EMPmode"))
      if self:GetNWBool("EMPmode") then
         self.Special = "uniqueaimed"
      else
         self.Special = "none"
      end
   end

end

function SWEP:DrawWorldModel()
   self:DrawModel()

   local lm = self:GetNWInt("Light", 0)

   local sppos = self:GetAttachment(3).Pos

   render.SetMaterial(lmat)

   if lm == 1 then
      render.DrawSprite(sppos, 4, 4, Color(255, 0, 0))
   elseif lm == 2 then
      render.DrawSprite(sppos, 4, 4, Color(0, 255, 0))
   end
end