1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
|
AddCSLuaFile( "cl_init.lua" )
AddCSLuaFile( "shared.lua" )
include( 'shared.lua' )
ENT.HitSound = Sound( "Metal_Box.ImpactHard" )
ENT.DieSound = Sound( "ambient/fire/ignite.wav" )
ENT.Model = Model( "models/props_junk/metalgascan.mdl" )
ENT.Damage = 80
ENT.Radius = 350
function ENT:Initialize()
self.Entity:SetModel( self.Model )
self.Entity:PhysicsInit( SOLID_VPHYSICS )
self.Entity:SetMoveType( MOVETYPE_VPHYSICS )
self.Entity:SetSolid( SOLID_VPHYSICS )
//self.Entity:SetCollisionGroup( COLLISION_GROUP_WEAPON )
local phys = self.Entity:GetPhysicsObject()
if IsValid( phys ) then
phys:Wake()
end
end
function ENT:SetSpeed( num )
self.Speed = num
end
function ENT:Think()
end
function ENT:Explode()
if self.Exploded then return end
self.Exploded = true
local ed = EffectData()
ed:SetOrigin( self.Entity:GetPos() )
util.Effect( "Explosion", ed, true, true )
local trace = {}
trace.start = self.Entity:GetPos() + Vector(0,0,20)
trace.endpos = trace.start + Vector( 0, 0, -200 )
trace.filter = self.Entity
local tr = util.TraceLine( trace )
if tr.HitWorld then
--[[local ed = EffectData()
ed:SetOrigin( tr.HitPos )
ed:SetMagnitude( 0.8 )
util.Effect( "smoke_crater", ed, true, true )]]
util.Decal( "Scorch", tr.HitPos + tr.HitNormal, tr.HitPos - tr.HitNormal )
end
if IsValid( self.Entity:GetOwner() ) then
util.BlastDamage( self.Entity, self.Entity:GetOwner(), self.Entity:GetPos(), self.Radius, self.Damage )
end
local fire = ents.Create( "sent_fire" )
fire:SetPos( self.Entity:GetPos() )
fire:SetOwner( self.Entity:GetOwner() )
fire:SetLifeTime( 10 )
fire:Spawn()
self.Entity:EmitSound( self.DieSound, 100, math.random(90,110) )
self.Entity:Remove()
end
function ENT:Use( ply, caller )
ply:AddToInventory( self.Entity )
end
function ENT:OnRemove()
end
function ENT:OnTakeDamage( dmginfo )
if dmginfo:IsBulletDamage() and IsValid( dmginfo:GetAttacker() ) and dmginfo:GetAttacker():IsPlayer() then
self.Entity:SetOwner( dmginfo:GetAttacker() )
self.Entity:Explode()
end
end
function ENT:PhysicsCollide( data, phys )
if data.Speed > 50 and data.DeltaTime > 0.15 then
self.Entity:EmitSound( self.HitSound )
end
end
|
