mirror of
https://github.com/lifestorm/wnsrc.git
synced 2025-12-17 21:53:46 +03:00
Upload
This commit is contained in:
lifestorm
209
lua/arccw/shared/sh_move.lua
Normal file
209
lua/arccw/shared/sh_move.lua
Normal file
@@ -0,0 +1,209 @@
|
||||
--[[
|
||||
| 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/
|
||||
--]]
|
||||
|
||||
|
||||
function ArcCW.Move(ply, mv, cmd)
|
||||
local wpn = ply:GetActiveWeapon()
|
||||
|
||||
if !wpn.ArcCW then return end
|
||||
|
||||
local s = 1
|
||||
|
||||
local sm = Lerp( ArcCW.ConVars["mult_movespeed"]:GetFloat(), 1, math.Clamp(wpn.SpeedMult * wpn:GetBuff_Mult("Mult_SpeedMult") * wpn:GetBuff_Mult("Mult_MoveSpeed"), 0, 1) )
|
||||
|
||||
-- look, basically I made a bit of an oopsy and uh this is the best way to fix that
|
||||
s = s * sm
|
||||
|
||||
local basespd = (Vector(cmd:GetForwardMove(), cmd:GetUpMove(), cmd:GetSideMove())):Length()
|
||||
basespd = math.min(basespd, mv:GetMaxClientSpeed())
|
||||
|
||||
local shotdelta = 0 -- how close should we be to the shoot speed mult
|
||||
local shottime = wpn:GetNextPrimaryFireSlowdown() - CurTime()
|
||||
|
||||
local blocksprint = false
|
||||
|
||||
if wpn:GetNWState() == ArcCW.STATE_SIGHTS or wpn:GetTriggerDelta() > 0 or
|
||||
wpn:GetNWState() == ArcCW.STATE_CUSTOMIZE then
|
||||
blocksprint = true
|
||||
s = s * Lerp( ArcCW.ConVars["mult_movespeedads"]:GetFloat() * (1-wpn:GetSightDelta()), 1, math.Clamp(wpn:GetBuff("SightedSpeedMult") * wpn:GetBuff_Mult("Mult_SightedMoveSpeed"), 0, 1) )
|
||||
elseif shottime > 0 or wpn:GetGrenadePrimed() then
|
||||
blocksprint = true
|
||||
|
||||
if wpn:CanShootWhileSprint() then
|
||||
blocksprint = false
|
||||
end
|
||||
end
|
||||
|
||||
if blocksprint then
|
||||
basespd = math.min(basespd, ply:GetWalkSpeed())
|
||||
end
|
||||
|
||||
if wpn:GetInBipod() then
|
||||
s = 0.0001
|
||||
end
|
||||
|
||||
if shottime > 0 then
|
||||
-- full slowdown for duration of firing
|
||||
shotdelta = 1
|
||||
else
|
||||
-- recover from firing slowdown after shadow duration
|
||||
local delay = wpn:GetFiringDelay()
|
||||
local aftershottime = -shottime / delay
|
||||
shotdelta = math.Clamp(1 - aftershottime, 0, 1)
|
||||
end
|
||||
local shootmove = Lerp( ArcCW.ConVars["mult_movespeedfire"]:GetFloat(), 1, math.Clamp(wpn:GetBuff("ShootSpeedMult"), 0.0001, 1) )
|
||||
s = s * Lerp(shotdelta, 1, shootmove)
|
||||
|
||||
mv:SetMaxSpeed(basespd * s)
|
||||
mv:SetMaxClientSpeed(basespd * s)
|
||||
ply.ArcCW_LastTickSpeedMult = s -- in case other addons need it
|
||||
end
|
||||
|
||||
hook.Add("SetupMove", "ArcCW_SetupMove", ArcCW.Move)
|
||||
|
||||
local limy_p = 45
|
||||
local limy_n = -45
|
||||
local limp_p = 30
|
||||
local limp_n = -30
|
||||
|
||||
function ArcCW.CreateMove(cmd)
|
||||
local ply = LocalPlayer()
|
||||
local wpn = ply:GetActiveWeapon()
|
||||
|
||||
if !wpn.ArcCW then return end
|
||||
|
||||
if wpn:GetInBipod() and wpn:GetBipodAngle() then
|
||||
--[[]
|
||||
if !wpn:GetBipodAngle() then
|
||||
wpn:SetBipodPos(wpn:GetOwner():EyePos())
|
||||
wpn:SetBipodAngle(wpn:GetOwner():EyeAngles())
|
||||
end
|
||||
]]
|
||||
|
||||
local bipang = wpn:GetBipodAngle()
|
||||
local ang = cmd:GetViewAngles()
|
||||
|
||||
local dy = math.AngleDifference(ang.y, bipang.y)
|
||||
local dp = math.AngleDifference(ang.p, bipang.p)
|
||||
|
||||
if dy > limy_p then
|
||||
ang.y = bipang.y + limy_p
|
||||
elseif dy < limy_n then
|
||||
ang.y = bipang.y + limy_n
|
||||
end
|
||||
|
||||
if dp > limp_p then
|
||||
ang.p = bipang.p + limp_p
|
||||
elseif dp < limp_n then
|
||||
ang.p = bipang.p + limp_n
|
||||
end
|
||||
|
||||
cmd:SetViewAngles(ang)
|
||||
end
|
||||
end
|
||||
|
||||
hook.Add("CreateMove", "ArcCW_CreateMove", ArcCW.CreateMove)
|
||||
|
||||
local function tgt_pos(ent, head)
|
||||
local mins, maxs = ent:WorldSpaceAABB()
|
||||
local pos = ent:WorldSpaceCenter()
|
||||
pos.z = pos.z + (maxs.z - mins.z) * 0.2 -- Aim at chest level
|
||||
if head and ent:GetAttachment(ent:LookupAttachment("eyes")) ~= nil then
|
||||
pos = ent:GetAttachment(ent:LookupAttachment("eyes")).Pos
|
||||
end
|
||||
return pos
|
||||
end
|
||||
|
||||
local lst = SysTime()
|
||||
|
||||
function ArcCW.StartCommand(ply, ucmd)
|
||||
-- Sprint will not interrupt a runaway burst
|
||||
local wep = ply:GetActiveWeapon()
|
||||
if ply:Alive() and IsValid(wep) and wep.ArcCW and wep:GetBurstCount() > 0
|
||||
and ucmd:KeyDown(IN_SPEED) and wep:GetCurrentFiremode().RunawayBurst
|
||||
and !wep:CanShootWhileSprint() then
|
||||
ucmd:SetButtons(ucmd:GetButtons() - IN_SPEED)
|
||||
end
|
||||
|
||||
-- Holster code
|
||||
if IsValid(wep) and wep.ArcCW and wep:GetHolster_Time() != 0 and wep:GetHolster_Time() <= CurTime() and IsValid(wep:GetHolster_Entity()) then
|
||||
wep:SetHolster_Time(-math.huge)
|
||||
ucmd:SelectWeapon(wep:GetHolster_Entity())
|
||||
end
|
||||
|
||||
|
||||
-- Aim assist
|
||||
if CLIENT and IsValid(wep) and wep.ArcCW
|
||||
and (wep:GetBuff("AimAssist", true) or (ArcCW.ConVars["aimassist"]:GetBool() and ply:GetInfoNum("arccw_aimassist_cl", 0) == 1)) then
|
||||
local cone = wep:GetBuff("AimAssist", true) and wep:GetBuff("AimAssist_Cone") or ArcCW.ConVars["aimassist_cone"]:GetFloat()
|
||||
local dist = wep:GetBuff("AimAssist", true) and wep:GetBuff("AimAssist_Distance") or ArcCW.ConVars["aimassist_distance"]:GetFloat()
|
||||
local inte = wep:GetBuff("AimAssist", true) and wep:GetBuff("AimAssist_Intensity") or ArcCW.ConVars["aimassist_intensity"]:GetFloat()
|
||||
local head = wep:GetBuff("AimAssist", true) and wep:GetBuff("AimAssist_Head") or ArcCW.ConVars["aimassist_head"]:GetBool()
|
||||
|
||||
-- Check if current target is beyond tracking cone
|
||||
local tgt = ply.ArcCW_AATarget
|
||||
if IsValid(tgt) and (tgt_pos(tgt, head) - ply:EyePos()):Cross(ply:EyeAngles():Forward()):Length() > cone * 2 then ply.ArcCW_AATarget = nil end -- lost track
|
||||
|
||||
-- Try to seek target if not exists
|
||||
tgt = ply.ArcCW_AATarget
|
||||
if !IsValid(tgt) or (tgt.Health and tgt:Health() <= 0) or util.QuickTrace(ply:EyePos(), tgt_pos(tgt, head) - ply:EyePos(), ply).Entity ~= tgt then
|
||||
local min_diff
|
||||
ply.ArcCW_AATarget = nil
|
||||
for _, ent in ipairs(ents.FindInCone(ply:EyePos(), ply:EyeAngles():Forward(), dist, math.cos(math.rad(cone)))) do
|
||||
if ent == ply or (!ent:IsNPC() and !ent:IsNextBot() and !ent:IsPlayer()) or ent:Health() <= 0
|
||||
or (ent:IsPlayer() and ent:Team() ~= TEAM_UNASSIGNED and ent:Team() == ply:Team()) then continue end
|
||||
local tr = util.TraceLine({
|
||||
start = ply:EyePos(),
|
||||
endpos = tgt_pos(ent, head),
|
||||
mask = MASK_SHOT,
|
||||
filter = ply
|
||||
})
|
||||
if tr.Entity ~= ent then continue end
|
||||
local diff = (tgt_pos(ent, head) - ply:EyePos()):Cross(ply:EyeAngles():Forward()):Length()
|
||||
if !ply.ArcCW_AATarget or diff < min_diff then
|
||||
ply.ArcCW_AATarget = ent
|
||||
min_diff = diff
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
-- Aim towards target
|
||||
tgt = ply.ArcCW_AATarget
|
||||
if wep:GetState() ~= ArcCW.STATE_CUSTOMIZE and wep:GetState() ~= ArcCW.STATE_SPRINT and IsValid(tgt) then
|
||||
local ang = ucmd:GetViewAngles()
|
||||
local pos = tgt_pos(tgt, head)
|
||||
local tgt_ang = (pos - ply:EyePos()):Angle()
|
||||
local ang_diff = (pos - ply:EyePos()):Cross(ply:EyeAngles():Forward()):Length()
|
||||
if ang_diff > 0.1 then
|
||||
ang = LerpAngle(math.Clamp(inte / ang_diff, 0, 1), ang, tgt_ang)
|
||||
ucmd:SetViewAngles(ang)
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
if CLIENT and IsValid(wep) and wep.ArcCW then
|
||||
local ang2 = ucmd:GetViewAngles()
|
||||
local ft = (SysTime() - (lst or SysTime())) * GetConVar("host_timescale"):GetFloat()
|
||||
|
||||
local recoil = Angle()
|
||||
recoil = recoil + (wep:GetBuff_Override("Override_RecoilDirection") or wep.RecoilDirection) * wep.RecoilAmount
|
||||
recoil = recoil + (wep:GetBuff_Override("Override_RecoilDirectionSide") or wep.RecoilDirectionSide) * wep.RecoilAmountSide
|
||||
ang2 = ang2 - (recoil * ft * 30)
|
||||
ucmd:SetViewAngles(ang2)
|
||||
|
||||
local r = wep.RecoilAmount
|
||||
local rs = wep.RecoilAmountSide
|
||||
wep.RecoilAmount = math.Approach(wep.RecoilAmount, 0, ft * 20 * r)
|
||||
wep.RecoilAmountSide = math.Approach(wep.RecoilAmountSide, 0, ft * 20 * rs)
|
||||
end
|
||||
lst = SysTime()
|
||||
end
|
||||
|
||||
hook.Add("StartCommand", "ArcCW_StartCommand", ArcCW.StartCommand)
|
||||
Reference in New Issue
Block a user