mirror of
https://github.com/lifestorm/wnsrc.git
synced 2025-12-17 13:53:45 +03:00
Upload
This commit is contained in:
lifestorm
187
lua/entities/obj_vj_hlr1_rocket.lua
Normal file
187
lua/entities/obj_vj_hlr1_rocket.lua
Normal file
@@ -0,0 +1,187 @@
|
||||
--[[
|
||||
| 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/
|
||||
--]]
|
||||
|
||||
/*--------------------------------------------------
|
||||
*** Copyright (c) 2012-2023 by DrVrej, All rights reserved. ***
|
||||
No parts of this code or any of its contents may be reproduced, copied, modified or adapted,
|
||||
without the prior written consent of the author, unless otherwise indicated for stand-alone materials.
|
||||
--------------------------------------------------*/
|
||||
AddCSLuaFile()
|
||||
|
||||
ENT.Type = "anim"
|
||||
ENT.Base = "obj_vj_projectile_base"
|
||||
ENT.PrintName = "Rocket"
|
||||
ENT.Author = "DrVrej"
|
||||
ENT.Contact = "http://steamcommunity.com/groups/vrejgaming"
|
||||
ENT.Information = "Projectiles for my addons"
|
||||
ENT.Category = "Projectiles"
|
||||
|
||||
ENT.VJ_IsDetectableDanger = true
|
||||
|
||||
if CLIENT then
|
||||
local Name = "Tank Shell"
|
||||
local LangName = "obj_vj_hlr1_rocket"
|
||||
language.Add(LangName, Name)
|
||||
killicon.Add(LangName,"HUD/killicons/default",Color(255,80,0,255))
|
||||
language.Add("#"..LangName, Name)
|
||||
killicon.Add("#"..LangName,"HUD/killicons/default",Color(255,80,0,255))
|
||||
|
||||
function ENT:Think()
|
||||
if IsValid(self) && self:GetNW2Bool("VJ_Dead") != true then
|
||||
self.Emitter = ParticleEmitter(self:GetPos())
|
||||
self.SmokeEffect1 = self.Emitter:Add("particles/flamelet2", self:GetPos() + self:GetForward()*-7)
|
||||
self.SmokeEffect1:SetVelocity(self:GetForward()*math.Rand(0, -50) + Vector(math.Rand(5, -5), math.Rand(5, -5), math.Rand(5, -5)) + self:GetVelocity())
|
||||
self.SmokeEffect1:SetDieTime(0.2)
|
||||
self.SmokeEffect1:SetStartAlpha(100)
|
||||
self.SmokeEffect1:SetEndAlpha(0)
|
||||
self.SmokeEffect1:SetStartSize(4)
|
||||
self.SmokeEffect1:SetEndSize(1)
|
||||
self.SmokeEffect1:SetRoll(math.Rand(-0.2, 0.2))
|
||||
self.SmokeEffect1:SetAirResistance(200)
|
||||
self.Emitter:Finish()
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
if !SERVER then return end
|
||||
|
||||
ENT.Model = {"models/vj_hlr/hl1/rpgrocket.mdl"} -- The models it should spawn with | Picks a random one from the table
|
||||
ENT.DoesRadiusDamage = true -- Should it do a blast damage when it hits something?
|
||||
ENT.RadiusDamageRadius = 150 -- How far the damage go? The farther away it's from its enemy, the less damage it will do | Counted in world units
|
||||
ENT.RadiusDamage = 100 -- How much damage should it deal? Remember this is a radius damage, therefore it will do less damage the farther away the entity is from its enemy
|
||||
ENT.RadiusDamageUseRealisticRadius = true -- Should the damage decrease the farther away the enemy is from the position that the projectile hit?
|
||||
ENT.RadiusDamageType = DMG_BLAST -- Damage type
|
||||
ENT.RadiusDamageForce = 90 -- Put the force amount it should apply | false = Don't apply any force
|
||||
ENT.DelayedRemove = 6 -- Change this to a number greater than 0 to delay the removal of the entity
|
||||
ENT.DecalTbl_DeathDecals = {"VJ_HLR_Scorch"}
|
||||
ENT.SoundTbl_Idle = {"vj_hlr/hl1_weapon/rpg/rocket1.wav"}
|
||||
ENT.SoundTbl_OnCollide = {"vj_hlr/hl1_weapon/explosion/explode3.wav","vj_hlr/hl1_weapon/explosion/explode4.wav","vj_hlr/hl1_weapon/explosion/explode5.wav"}
|
||||
ENT.OnCollideSoundLevel = 100
|
||||
|
||||
-- Custom
|
||||
ENT.Rocket_AirMissile = false
|
||||
ENT.Rocket_HelicopterMissile = false
|
||||
---------------------------------------------------------------------------------------------------------------------------------------------
|
||||
local vecZ20 = Vector(0, 0, 40)
|
||||
local colorTrail = Color(224, 224, 255, 255)
|
||||
--
|
||||
function ENT:CustomOnInitialize()
|
||||
self.StartGlow1 = ents.Create("env_sprite")
|
||||
self.StartGlow1:SetKeyValue("model","vj_hl/sprites/animglow01.vmt")
|
||||
self.StartGlow1:SetKeyValue("rendercolor","224 224 255")
|
||||
self.StartGlow1:SetKeyValue("GlowProxySize","5.0")
|
||||
self.StartGlow1:SetKeyValue("HDRColorScale","1.0")
|
||||
self.StartGlow1:SetKeyValue("renderfx","14")
|
||||
self.StartGlow1:SetKeyValue("rendermode","3")
|
||||
self.StartGlow1:SetKeyValue("renderamt","255")
|
||||
self.StartGlow1:SetKeyValue("disablereceiveshadows","0")
|
||||
self.StartGlow1:SetKeyValue("mindxlevel","0")
|
||||
self.StartGlow1:SetKeyValue("maxdxlevel","0")
|
||||
self.StartGlow1:SetKeyValue("framerate","40.0")
|
||||
self.StartGlow1:SetKeyValue("spawnflags","0")
|
||||
self.StartGlow1:SetKeyValue("scale","0.5")
|
||||
self.StartGlow1:SetPos(self:GetPos())
|
||||
self.StartGlow1:Spawn()
|
||||
self.StartGlow1:SetParent(self)
|
||||
self:DeleteOnRemove(self.StartGlow1)
|
||||
util.SpriteTrail(self, 0, colorTrail, true, 5, 20, 6, 1/(5+20)*0.5, "vj_hl/sprites/smoke.vmt")
|
||||
self:SetNW2Bool("VJ_Dead", false)
|
||||
|
||||
-- Used by helicopters
|
||||
if self.Rocket_HelicopterMissile then
|
||||
timer.Simple(0.5, function()
|
||||
if IsValid(self) && IsValid(self:GetOwner()) then
|
||||
local phys = self:GetPhysicsObject()
|
||||
local ene = self:GetOwner():GetEnemy()
|
||||
if IsValid(phys) && IsValid(ene) then
|
||||
phys:SetVelocity(self:CalculateProjectile("Line", self:GetPos(), ene:GetPos() + ene:OBBCenter(), 2000))
|
||||
self:SetAngles(self:GetVelocity():GetNormal():Angle())
|
||||
end
|
||||
end
|
||||
end)
|
||||
-- Used by the Bradley
|
||||
elseif self.Rocket_AirMissile then
|
||||
local phys = self:GetPhysicsObject()
|
||||
if IsValid(phys) then
|
||||
-- Go forward
|
||||
phys:SetVelocity(self:GetForward()*200)
|
||||
self:SetAngles(self:GetVelocity():GetNormal():Angle())
|
||||
timer.Simple(0.5, function()
|
||||
if IsValid(self) then
|
||||
-- Go up
|
||||
local tr = util.TraceLine({
|
||||
start = self:GetPos(),
|
||||
endpos = self:GetPos() + self:GetUp()*math.random(2000, 2800),
|
||||
filter = self
|
||||
})
|
||||
local hitPos = tr.HitPos - vecZ20
|
||||
phys = self:GetPhysicsObject()
|
||||
if IsValid(phys) then
|
||||
phys:SetVelocity(self:CalculateProjectile("Line", self:GetPos(), hitPos, 800))
|
||||
self:SetAngles(self:GetVelocity():GetNormal():Angle())
|
||||
timer.Simple(self:GetPos():Distance(hitPos) / self:GetVelocity():Length(), function()
|
||||
if IsValid(self) && IsValid(self:GetOwner()) then
|
||||
-- Finally, go to the enemy!
|
||||
phys = self:GetPhysicsObject()
|
||||
local ene = self:GetOwner():GetEnemy()
|
||||
if IsValid(phys) && IsValid(ene) then
|
||||
phys:SetVelocity(self:CalculateProjectile("Line", self:GetPos(), ene:GetPos() + ene:OBBCenter(), 5000))
|
||||
self:SetAngles(self:GetVelocity():GetNormal():Angle())
|
||||
end
|
||||
end
|
||||
end)
|
||||
end
|
||||
end
|
||||
end)
|
||||
end
|
||||
end
|
||||
end
|
||||
---------------------------------------------------------------------------------------------------------------------------------------------
|
||||
local vecZ80 = Vector(0, 0, 80)
|
||||
--
|
||||
function ENT:DeathEffects(data, phys)
|
||||
util.ScreenShake(data.HitPos, 16, 200, 1, 3000)
|
||||
if IsValid(self.StartGlow1) then self.StartGlow1:Remove() end
|
||||
|
||||
self:SetNW2Bool("VJ_Dead", true)
|
||||
VJ_EmitSound(self, "vj_hlr/hl1_weapon/explosion/debris"..math.random(1,3)..".wav", 80, 100)
|
||||
VJ_EmitSound(self, "vj_hlr/hl1_weapon/explosion/explode"..math.random(3,5).."_dist.wav", 140, 100, 100, 1)
|
||||
local spr = ents.Create("env_sprite")
|
||||
spr:SetKeyValue("model","vj_hl/sprites/zerogxplode.vmt")
|
||||
spr:SetKeyValue("GlowProxySize","2.0")
|
||||
spr:SetKeyValue("HDRColorScale","1.0")
|
||||
spr:SetKeyValue("renderfx","14")
|
||||
spr:SetKeyValue("rendermode","5")
|
||||
spr:SetKeyValue("renderamt","255")
|
||||
spr:SetKeyValue("disablereceiveshadows","0")
|
||||
spr:SetKeyValue("mindxlevel","0")
|
||||
spr:SetKeyValue("maxdxlevel","0")
|
||||
spr:SetKeyValue("framerate","15.0")
|
||||
spr:SetKeyValue("spawnflags","0")
|
||||
spr:SetKeyValue("scale","4")
|
||||
spr:SetPos(self:GetPos() + vecZ80)
|
||||
spr:Spawn()
|
||||
spr:Fire("Kill","",0.9)
|
||||
timer.Simple(0.9, function() if IsValid(spr) then spr:Remove() end end)
|
||||
|
||||
local expLight = ents.Create("light_dynamic")
|
||||
expLight:SetKeyValue("brightness", "4")
|
||||
expLight:SetKeyValue("distance", "300")
|
||||
expLight:SetLocalPos(data.HitPos)
|
||||
expLight:SetLocalAngles(self:GetAngles())
|
||||
expLight:Fire("Color", "255 150 0")
|
||||
expLight:SetParent(self)
|
||||
expLight:Spawn()
|
||||
expLight:Activate()
|
||||
expLight:Fire("TurnOn", "", 0)
|
||||
expLight:Fire("Kill", "", 0.1)
|
||||
self:DeleteOnRemove(expLight)
|
||||
end
|
||||
Reference in New Issue
Block a user