mirror of
https://github.com/lifestorm/wnsrc.git
synced 2025-12-16 21:33:46 +03:00
360 lines
10 KiB
Lua
360 lines
10 KiB
Lua
--[[
|
|
| This file was obtained through the combined efforts
|
|
| of Madbluntz & Plymouth Antiquarian Society.
|
|
|
|
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
|
|
| Maloy, DrPepper10 @ RIP, Atle!
|
|
|
|
|
| Visit for more: https://plymouth.thetwilightzone.ru/
|
|
--]]
|
|
|
|
local function hmgfire(ply,vehicle,shootOrigin,shootDirection)
|
|
local projectile = {}
|
|
projectile.filter = vehicle.VehicleData["filter"]
|
|
projectile.shootOrigin = shootOrigin
|
|
projectile.shootDirection = shootDirection
|
|
projectile.attacker = ply
|
|
projectile.Tracer = 1
|
|
projectile.Spread = Vector(0.015,0.015,0.015)
|
|
projectile.HullSize = 5
|
|
projectile.attackingent = vehicle
|
|
projectile.Damage = 30
|
|
projectile.Force = 12
|
|
simfphys.FireHitScan( projectile )
|
|
end
|
|
|
|
local function minigunfire(ply,vehicle,shootOrigin,shootDirection)
|
|
local projectile = {}
|
|
projectile.filter = vehicle.VehicleData["filter"]
|
|
projectile.shootOrigin = shootOrigin
|
|
projectile.shootDirection = shootDirection
|
|
projectile.attacker = ply
|
|
projectile.Tracer = 1
|
|
projectile.Spread = Vector(0.015,0.015,0.015)
|
|
projectile.HullSize = 5
|
|
projectile.attackingent = vehicle
|
|
projectile.Damage = 40
|
|
projectile.Force = 12
|
|
simfphys.FireHitScan( projectile )
|
|
end
|
|
|
|
function simfphys.weapon:ValidClasses()
|
|
|
|
local classes = {
|
|
"sim_fphys_ratmobile",
|
|
"sim_fphys_hedgehog",
|
|
"sim_fphys_chaos126p"
|
|
}
|
|
|
|
return classes
|
|
end
|
|
|
|
function simfphys.weapon:Initialize( vehicle )
|
|
local class = vehicle:GetSpawn_List()
|
|
vehicle.neg = class == "sim_fphys_ratmobile" and 1 or -1
|
|
|
|
local data = {}
|
|
data.Attachment = "machinegun_ref"
|
|
data.Direction = Vector(1,0,0)
|
|
data.Attach_Start_Left = "machinegun_barell_right"
|
|
data.Attach_Start_Right = "machinegun_barell_left"
|
|
|
|
simfphys.RegisterCrosshair( vehicle:GetDriverSeat(), data )
|
|
|
|
vehicle:SetNWString( "WeaponMode", "Machine Gun Turret" )
|
|
end
|
|
|
|
function simfphys.weapon:Think( vehicle )
|
|
vehicle.VehicleData["steerangle"] = 45
|
|
|
|
local curtime = CurTime()
|
|
|
|
local DriverSeat = vehicle:GetDriverSeat()
|
|
|
|
if not IsValid( DriverSeat ) then return end
|
|
|
|
local ply = DriverSeat:GetDriver()
|
|
|
|
if not IsValid(ply) then
|
|
if vehicle.wpn then
|
|
vehicle.wpn:Stop()
|
|
vehicle.wpn = nil
|
|
end
|
|
|
|
if vehicle.wpn2 then
|
|
vehicle.wpn2:Stop()
|
|
vehicle.wpn2 = nil
|
|
end
|
|
return
|
|
end
|
|
|
|
vehicle.wOldPos = vehicle.wOldPos or vehicle:GetPos()
|
|
local deltapos = vehicle:GetPos() - vehicle.wOldPos
|
|
vehicle.wOldPos = vehicle:GetPos()
|
|
|
|
local ID = vehicle:LookupAttachment( "machinegun_ref" )
|
|
local Attachment = vehicle:GetAttachment( ID )
|
|
|
|
local Angles = angle_zero
|
|
|
|
if ply:lvsMouseAim() then
|
|
local TargetAngle = ply:EyeAngles()
|
|
|
|
local ang = vehicle:GetAngles()
|
|
ang.y = DriverSeat:GetAngles().y + 90
|
|
|
|
local Forward = ang:Right()
|
|
local View = DriverSeat:WorldToLocalAngles( TargetAngle )
|
|
|
|
local Pitch = (vehicle:AngleBetweenNormal( View:Up(), ang:Forward() ) - 90)
|
|
local Yaw = (vehicle:AngleBetweenNormal( View:Forward(), ang:Right() ) - 90)
|
|
|
|
Angles = Angle(-Pitch,Yaw,0)
|
|
else
|
|
Angles = vehicle:WorldToLocalAngles( ply:EyeAngles() )
|
|
Angles:Normalize()
|
|
end
|
|
|
|
vehicle.sm_pp_yaw = vehicle.sm_pp_yaw and (vehicle.sm_pp_yaw + (Angles.y - vehicle.sm_pp_yaw) * 0.2) or 0
|
|
vehicle.sm_pp_pitch = vehicle.sm_pp_pitch and (vehicle.sm_pp_pitch + (Angles.p - vehicle.sm_pp_pitch) * 0.2) or 0
|
|
|
|
vehicle:SetPoseParameter("vehicle_weapon_yaw", vehicle.sm_pp_yaw )
|
|
vehicle:SetPoseParameter("vehicle_weapon_pitch", -vehicle.sm_pp_pitch )
|
|
|
|
local tr = util.TraceLine( {
|
|
start = Attachment.Pos,
|
|
endpos = Attachment.Pos + Attachment.Ang:Forward() * 50000,
|
|
filter = {vehicle}
|
|
} )
|
|
local Aimpos = tr.HitPos
|
|
|
|
local AttachmentID_Left = vehicle:LookupAttachment( "machinegun_barell_left" )
|
|
local AttachmentID_Right = vehicle:LookupAttachment( "machinegun_barell_right" )
|
|
|
|
local Attachment_Left = vehicle:GetAttachment( AttachmentID_Left )
|
|
local Attachment_Right = vehicle:GetAttachment( AttachmentID_Right )
|
|
|
|
local pos1 = Attachment_Left.Pos
|
|
local pos2 = Attachment_Right.Pos
|
|
|
|
local Aimang = (Aimpos - (pos1 + pos2) * 0.5):Angle()
|
|
local Angles = vehicle:WorldToLocalAngles( Aimang )
|
|
Angles:Normalize()
|
|
|
|
vehicle:SetPoseParameter("vehicle_minigun_yaw", Angles.y )
|
|
|
|
vehicle:SetPoseParameter("vehicle_minigun_pitch", Angles.p * vehicle.neg )
|
|
|
|
local keyattack = ply:KeyDown( IN_ATTACK ) and not vehicle.lockweapons and (vehicle:GetNWInt( "CurWPNAmmo", -1 ) > 0)
|
|
local alt_fire = ply:KeyDown( IN_ATTACK2 )
|
|
local reload = ply:KeyDown( IN_RELOAD )
|
|
|
|
vehicle.FireMode = vehicle.FireMode or 0
|
|
|
|
vehicle.missle_ammo = vehicle.missle_ammo or 6
|
|
vehicle.mg_ammo = vehicle.mg_ammo or 1500
|
|
vehicle.rac_ammo = vehicle.rac_ammo or 300
|
|
|
|
if vehicle.FireMode == 0 then
|
|
vehicle:SetNWInt( "CurWPNAmmo", vehicle.mg_ammo )
|
|
|
|
elseif vehicle.FireMode == 1 then
|
|
vehicle:SetNWInt( "CurWPNAmmo", vehicle.rac_ammo )
|
|
|
|
else
|
|
vehicle:SetNWInt( "CurWPNAmmo", vehicle.missle_ammo )
|
|
end
|
|
|
|
if reload and (vehicle.missle_ammo ~= 6 or vehicle.mg_ammo ~= 1500 or vehicle.rac_ammo ~= 300) then
|
|
vehicle:EmitSound("simulated_vehicles/weapons/apc_reload.wav")
|
|
|
|
vehicle.missle_ammo = 6
|
|
vehicle.mg_ammo = 1500
|
|
vehicle.rac_ammo = 300
|
|
|
|
vehicle.lockweapons = true
|
|
|
|
vehicle:SetIsCruiseModeOn( false )
|
|
|
|
timer.Simple( 3, function()
|
|
if not IsValid( vehicle ) then return end
|
|
vehicle.lockweapons = false
|
|
vehicle:SetIsCruiseModeOn( false )
|
|
|
|
vehicle:EmitSound("simulated_vehicles/weapons/leopard_ready.wav")
|
|
end)
|
|
end
|
|
|
|
if alt_fire ~= vehicle.afire_pressed then
|
|
vehicle.afire_pressed = alt_fire
|
|
if alt_fire then
|
|
vehicle.FireMode = vehicle.FireMode + 1
|
|
if vehicle.FireMode >= 3 then
|
|
vehicle.FireMode = 0
|
|
end
|
|
|
|
if vehicle.FireMode == 0 then
|
|
vehicle:EmitSound("weapons/smg1/switch_burst.wav")
|
|
vehicle:SetNWString( "WeaponMode", "Machine Gun Turret" )
|
|
|
|
elseif vehicle.FireMode == 1 then
|
|
vehicle:EmitSound("weapons/357/357_spin1.wav")
|
|
vehicle:SetNWString( "WeaponMode", "Minigun" )
|
|
|
|
else
|
|
vehicle:EmitSound("weapons/shotgun/shotgun_cock.wav")
|
|
vehicle:SetNWString( "WeaponMode", "Missiles" )
|
|
end
|
|
end
|
|
end
|
|
|
|
local fire = vehicle.FireMode == 0 and keyattack
|
|
local fire2 = vehicle.FireMode == 1 and keyattack
|
|
local fire3 = vehicle.FireMode == 2 and keyattack
|
|
|
|
vehicle.smoothaltfire = vehicle.smoothaltfire and (vehicle.smoothaltfire + ((fire2 and 20 or 0) - vehicle.smoothaltfire) * 0.1) or 0
|
|
vehicle.minigunspin = vehicle.minigunspin and (vehicle.minigunspin + vehicle.smoothaltfire) or 0
|
|
vehicle:SetPoseParameter("vehicle_minigun_spin", vehicle.minigunspin )
|
|
|
|
vehicle.NextShoot = vehicle.NextShoot or 0
|
|
|
|
if fire then
|
|
if vehicle.NextShoot < curtime then
|
|
|
|
vehicle.mg_ammo = vehicle.mg_ammo - 1
|
|
|
|
if vehicle.swapMuzzle then
|
|
vehicle.swapMuzzle = false
|
|
else
|
|
vehicle.swapMuzzle = true
|
|
end
|
|
|
|
local offset = deltapos * engine.TickInterval()
|
|
|
|
local AttachmentID = vehicle.swapMuzzle and AttachmentID_Left or AttachmentID_Right
|
|
local Attachment = vehicle:GetAttachment( AttachmentID )
|
|
|
|
local shootOrigin = Attachment.Pos + offset
|
|
local shootDirection = Attachment.Ang:Forward()
|
|
|
|
hmgfire( ply, vehicle, shootOrigin, Attachment.Ang:Forward() )
|
|
|
|
vehicle.NextShoot = curtime + 0.08
|
|
end
|
|
end
|
|
|
|
if fire2 then
|
|
if vehicle.NextShoot < curtime then
|
|
|
|
vehicle.rac_ammo = vehicle.rac_ammo - 1
|
|
|
|
local offset = deltapos * engine.TickInterval()
|
|
|
|
local muzzle_1 = vehicle:LookupAttachment( "minigun_barell_right" )
|
|
local muzzle_2 = vehicle:LookupAttachment( "minigun_barell_left" )
|
|
local muzzles = {muzzle_1,muzzle_2}
|
|
|
|
for k, v in pairs( muzzles ) do
|
|
local AttachmentID = v
|
|
local Attachment = vehicle:GetAttachment( AttachmentID )
|
|
|
|
local shootOrigin = Attachment.Pos + offset
|
|
local shootDirection = Attachment.Ang:Forward()
|
|
|
|
minigunfire( ply, vehicle, shootOrigin, shootDirection )
|
|
end
|
|
|
|
vehicle.NextShoot = curtime + 0.03
|
|
end
|
|
end
|
|
|
|
vehicle.OldFire = vehicle.OldFire or false
|
|
vehicle.OldFire2 = vehicle.OldFire2 or false
|
|
vehicle.OldFire3 = vehicle.OldFire3 or false
|
|
|
|
if vehicle.OldFire ~= fire then
|
|
vehicle.OldFire = fire
|
|
if fire then
|
|
vehicle.wpn = CreateSound( vehicle, "simulated_vehicles/weapons/diprip/machinegun_loop.wav" )
|
|
vehicle.wpn:Play()
|
|
vehicle:CallOnRemove( "stop_fire1_sounds", function( vehicle )
|
|
if vehicle.wpn then
|
|
vehicle.wpn:Stop()
|
|
end
|
|
end)
|
|
else
|
|
if vehicle.wpn then
|
|
vehicle.wpn:Stop()
|
|
vehicle.wpn = nil
|
|
end
|
|
end
|
|
end
|
|
|
|
if vehicle.OldFire2 ~= fire2 then
|
|
vehicle.OldFire2 = fire2
|
|
if fire2 then
|
|
vehicle.wpn2 = CreateSound( vehicle, "simulated_vehicles/weapons/diprip/minigun_loop.wav" )
|
|
vehicle.wpn2:Play()
|
|
vehicle:CallOnRemove( "stop_fire2_sounds", function( vehicle )
|
|
if vehicle.wpn2 then
|
|
vehicle.wpn2:Stop()
|
|
end
|
|
end)
|
|
else
|
|
if vehicle.wpn2 then
|
|
vehicle.wpn2:Stop()
|
|
vehicle.wpn2 = nil
|
|
end
|
|
end
|
|
end
|
|
|
|
|
|
if vehicle.OldFire3 ~= fire3 then
|
|
vehicle.OldFire3 = fire3
|
|
if fire3 then
|
|
if vehicle.NextShoot < curtime then
|
|
if not IsValid(vehicle.missle) then
|
|
vehicle:EmitSound("simulated_vehicles/weapons/diprip/rocket.wav")
|
|
|
|
vehicle.missle_ammo = vehicle.missle_ammo - 1
|
|
|
|
if vehicle.swapMuzzle then
|
|
vehicle.swapMuzzle = false
|
|
else
|
|
vehicle.swapMuzzle = true
|
|
end
|
|
|
|
local attach = vehicle.swapMuzzle and vehicle:GetAttachment( vehicle:LookupAttachment( "rocket_barell_right" ) ) or vehicle:GetAttachment( vehicle:LookupAttachment( "rocket_barell_left" ) )
|
|
|
|
vehicle.missle = ents.Create( "rpg_missile" )
|
|
vehicle.missle:SetPos( attach.Pos + attach.Ang:Up() * 25 )
|
|
vehicle.missle:SetAngles( attach.Ang - Angle(10,0,0) )
|
|
vehicle.missle:SetOwner( vehicle )
|
|
vehicle.missle:SetSaveValue( "m_flDamage", 120 )
|
|
vehicle.missle:Spawn()
|
|
vehicle.missle:Activate()
|
|
|
|
vehicle.missle.DirVector = vehicle.missle:GetAngles():Forward()
|
|
|
|
vehicle.NextShoot = curtime + 0.5
|
|
vehicle.UnlockMissle = curtime + 0.5
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
if IsValid(vehicle.missle) then
|
|
if vehicle.UnlockMissle < curtime then
|
|
local targetdir = Aimpos - vehicle.missle:GetPos()
|
|
targetdir:Normalize()
|
|
|
|
vehicle.missle.DirVector = vehicle.missle.DirVector + (targetdir - vehicle.missle.DirVector) * 0.1
|
|
|
|
local vel = -vehicle.missle:GetVelocity() + vehicle.missle.DirVector * 2500 + vehicle:GetVelocity()
|
|
|
|
vehicle.missle:SetVelocity( vel )
|
|
vehicle.missle:SetAngles( vehicle.missle.DirVector:Angle() )
|
|
end
|
|
end
|
|
end
|