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
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
|
NPC.Name = "Zombie"
NPC.Desc = "A fearsome monster!"
NPC.Class = "Ambient" --Ambient, Agressive, Boss
NPC.Model = "models/Zombie/Classic.mdl"
NPC.Icon = Material("wintersurvival2/hud/ws1_icons/icon_rock")
NPC.Social = "Solo" --Solo, Pack
NPC.Stats = {
["Vitality"] = 100,
["Speed"] = 50,
["AwareDist"] = 1000,
["Accel"] = 100,
["Decel"] = 200,
["Step"] = 20, --Step height
["Hull"] = HULL_HUMAN
}
--Drops should be formated as [index]={["item name"], percent_drop} where percent_drop is a number from 0 to 100
NPC.Drops = {
[0] = {"Meat",100},--Birds will drop at least 1 meat, and have a 50% chance of dropping 2
[1] = {"Meat",50},
[2] = {"Feather",50},
}
--Some npc's like birds have diffent names for their idle sequences
NPC.IdleSequences = {
[0] = "Idle",
}
--Distance to be made aware of players
--Attacks should be formated as [i]={function (return int dammage) canattack(ply) = function doattack(ply)}
--NPC will do the most dammage possible per attack
local checkmele = function(self, ply)
if(ply:GetPos():Distance(self:GetPos()) < 100) then return 20 end
return -1
end
local domele = function(self, ply)
self:StartActivity(ACT_MELEE_ATTACK1)
--Antlion has 6 attack animations
local attackanim = math.Round(math.Rand(1,6))
coroutine.wait(0.75)
--If the player is still in front of us after the animation, they didn't dodge! apply dammage!
if(ply:GetPos():Distance(self:GetPos()) < 100) then
ply:TakeDamage(20)
end
--Finish up the animation
coroutine.wait(0.25)
end
local checkrun = function(self, ply) return 0 end
local dorun = function(self, ply)
local navarea = navmesh.GetNavArea(self:GetPos(), 100)
self.loco:SetDesiredSpeed( 50 )
if navarea:IsValid() then
local moveop = {}
moveop.tolerance = 50
moveop.repath = 2
moveop.lookahead = 3
moveop.draw = true
self:StartActivity(ACT_WALK)
self:MoveToPos(ply:GetPos(),moveop)
else
print("Could not find valid navmesh, suicideing to prevent server crash!")
self:BecomeRagdoll(DamageInfo())
end
end
NPC.Attacks = {
[1] = { --A mele attack
[checkmele] = domele
},
[2] = {--Move to the player
[checkrun] = dorun
},
}
--Attack priority is a fucntion that takes a player, and returns an int describing it's prority to attack (higher = more important) NPC will always attack the player with the highest priority
function NPC:AttackPriority(ply)
local dist = ply:GetPos():Distance(self:GetPos())
return self.Stats["AwareDist"] - dist
end
--A function that takes a position and returns true if this is an acceptable place to spawn
NPC.SpawnLocations = nil
--The entity that is this npc's current target, if it has one. Nil otherwise
NPC.Target = nil
--All enemies that this NPC is aware of
NPC.AwareEnemies = {}
--What to replace the ENT:BehaveAct with
function NPC:Act()
end
--What to replace ENT:OnStuck with
function NPC:Stuck()
--If we're stuck, jump backwards
end
--What to replace ENT:RunBehaviour with
--[[
function NPC:Behave()
--[[
print("Going into antlion's custom behaviour")
while ( true ) do
--self:PlaySequenceAndWait( "Idle" )
--Main loop for ai
--Update aware enemies
local players = ents.FindByClass("Player")
for k,v in pairs(players) do
if(v:IsPigeon()) then continue end
local dist = v:GetPos():Distance(self:GetPos())
if( dist < self.Stats["AwareDist"]) then
table.insert(self.AwareEnemies,v)
end
end
--Find the enemy with the highest priority
local maxpriority = -1
local maxprioritytarget = nil
for k,v in pairs(self.AwareEnemies) do
local priority = self:AttackPriority(v)
if(priority > maxpriority) then
maxpriority = priority
maxprioritytarget = v
end
end
self.Target = maxprioritytarget
--If we can't find anyone to attack, just stay idle
if(self.Target == nil) then
print("Couldn't find anyone to attack!")
--Play an idle sequence
local randanim = math.Round(math.Rand(0,#self.IdleSequences))
self:PlaySequenceAndWait( self.IdleSequences[randanim] )
self:StartActivity( ACT_IDLE )
else
--We have a target to attack!
print("We found something to attack!")
--Find which attack will do the most dammage
local maxdammage = -1
local maxdammagefunc = nil
for k,v in pairs(self.Attacks) do
local dammagefunc = nil
local attackfunc = nil
for i,j in pairs(v) do
dammagefunc = i
attackfunc = j
end
print("Using damagefunc:")
print(dammagefunc)
local dammage = dammagefunc(self, self.Target)
print("dammage is ")
print(dammage)
if(dammage > maxdammage) then
maxdammage = dammage
maxdammagefunc = attackfunc
end
end
--Do that attack
if(maxdammagefunc) then
maxdammagefunc(self, self.Target)
else
print("It looked like we could attack, but we can't!")
end
end
--coroutine.yield()
end
coroutine.yield()
end
--]]
--These are just here to tell the editors/develoeprs what functions are available.. dont un-comment them out, as this could affect all the items.
/*
function NPC:OnSpawn()
end
--If we need to do more than just reduce health on dammage
function NPC:OnDammage(ammount)
end
--If we need to do more than just drop items on death
function NPC:OnDeath()
end
--A particular spell was cast on this npc by player
function NPC:OnSpell(spell, player)
end
function NPC:OnFindEnemy(enemy)
end
--Called when the npc is attacking anything with any attack
function NPC:OnAttack(target)
end
*/
|
