zombiesurvival-evolved/gamemodes/zombiesurvival/gamemode/zombieclasses/ghoul.lua
William Moodhe e9da54c2f9 ZS updates for 2014-2018
Too many changes to list.
2018-05-01 18:32:59 -04:00

168 lines
4.2 KiB
Lua

CLASS.Name = "Ghoul"
CLASS.TranslationName = "class_ghoul"
CLASS.Description = "description_ghoul"
CLASS.Help = "controls_ghoul"
CLASS.Wave = 0
CLASS.Unlocked = true
CLASS.BetterVersion = "Noxious Ghoul"
CLASS.Health = 210
CLASS.Speed = 175
CLASS.Points = CLASS.Health/GM.HumanoidZombiePointRatio
CLASS.CanTaunt = true
CLASS.SWEP = "weapon_zs_ghoul"
CLASS.Model = Model("models/player/corpse1.mdl")
CLASS.VoicePitch = 0.7
CLASS.CanFeignDeath = true
CLASS.BloodColor = BLOOD_COLOR_YELLOW
local CurTime = CurTime
local math_random = math.random
local math_max = math.max
local math_min = math.min
local math_ceil = math.ceil
local STEPSOUNDTIME_NORMAL = STEPSOUNDTIME_NORMAL
local STEPSOUNDTIME_WATER_FOOT = STEPSOUNDTIME_WATER_FOOT
local STEPSOUNDTIME_ON_LADDER = STEPSOUNDTIME_ON_LADDER
local STEPSOUNDTIME_WATER_KNEE = STEPSOUNDTIME_WATER_KNEE
local DIR_BACK = DIR_BACK
local ACT_HL2MP_ZOMBIE_SLUMP_RISE = ACT_HL2MP_ZOMBIE_SLUMP_RISE
local ACT_HL2MP_SWIM_PISTOL = ACT_HL2MP_SWIM_PISTOL
local ACT_HL2MP_IDLE_CROUCH_ZOMBIE = ACT_HL2MP_IDLE_CROUCH_ZOMBIE
local ACT_HL2MP_IDLE_ZOMBIE = ACT_HL2MP_IDLE_ZOMBIE
local ACT_HL2MP_WALK_CROUCH_ZOMBIE_01 = ACT_HL2MP_WALK_CROUCH_ZOMBIE_01
local ACT_HL2MP_WALK_ZOMBIE_01 = ACT_HL2MP_WALK_ZOMBIE_01
local StepSounds = {
"npc/zombie/foot1.wav",
"npc/zombie/foot2.wav",
"npc/zombie/foot3.wav"
}
local ScuffSounds = {
"npc/zombie/foot_slide1.wav",
"npc/zombie/foot_slide2.wav",
"npc/zombie/foot_slide3.wav"
}
function CLASS:PlayerFootstep(pl, vFootPos, iFoot, strSoundName, fVolume, pFilter)
if math_random() < 0.15 then
pl:EmitSound(ScuffSounds[math_random(#ScuffSounds)], 70)
else
pl:EmitSound(StepSounds[math_random(#StepSounds)], 70)
end
return true
end
function CLASS:PlayPainSound(pl)
pl:EmitSound("npc/zombie_poison/pz_warn"..math_random(2)..".wav", 75, math.Rand(137, 143))
pl.NextPainSound = CurTime() + 0.5
return true
end
function CLASS:PlayDeathSound(pl)
pl:EmitSound("npc/zombie_poison/pz_die2.wav", 75, math.Rand(122, 128))
return true
end
function CLASS:PlayerStepSoundTime(pl, iType, bWalking)
if iType == STEPSOUNDTIME_NORMAL or iType == STEPSOUNDTIME_WATER_FOOT then
return 625 - pl:GetVelocity():Length()
elseif iType == STEPSOUNDTIME_ON_LADDER then
return 600
elseif iType == STEPSOUNDTIME_WATER_KNEE then
return 750
end
return 450
end
function CLASS:KnockedDown(pl, status, exists)
pl:AnimResetGestureSlot(GESTURE_SLOT_ATTACK_AND_RELOAD)
end
function CLASS:CalcMainActivity(pl, velocity)
local feign = pl.FeignDeath
if feign and feign:IsValid() then
if feign:GetDirection() == DIR_BACK then
return 1, pl:LookupSequence("zombie_slump_rise_02_fast")
end
return ACT_HL2MP_ZOMBIE_SLUMP_RISE, -1
end
if pl:WaterLevel() >= 3 then
return ACT_HL2MP_SWIM_PISTOL, -1
end
if velocity:Length2DSqr() <= 1 then
if pl:Crouching() and pl:OnGround() then
return ACT_HL2MP_IDLE_CROUCH_ZOMBIE, -1
end
return ACT_HL2MP_IDLE_ZOMBIE, -1
end
if pl:Crouching() and pl:OnGround() then
return ACT_HL2MP_WALK_CROUCH_ZOMBIE_01 - 1 + math_ceil((CurTime() / 3 + pl:EntIndex()) % 3), -1
end
return ACT_HL2MP_WALK_ZOMBIE_01 - 1 + math_ceil((CurTime() / 3 + pl:EntIndex()) % 3), -1
end
function CLASS:UpdateAnimation(pl, velocity, maxseqgroundspeed)
local feign = pl.FeignDeath
if feign and feign:IsValid() then
if feign:GetState() == 1 then
pl:SetCycle(1 - math_max(feign:GetStateEndTime() - CurTime(), 0) * 0.666)
else
pl:SetCycle(math_max(feign:GetStateEndTime() - CurTime(), 0) * 0.666)
end
pl:SetPlaybackRate(0)
return true
end
local len2d = velocity:Length2D()
if len2d > 1 then
pl:SetPlaybackRate(math_min(len2d / maxseqgroundspeed * 0.5, 3))
else
pl:SetPlaybackRate(1)
end
return true
end
function CLASS:DoAnimationEvent(pl, event, data)
if event == PLAYERANIMEVENT_ATTACK_PRIMARY then
pl:DoZombieAttackAnim(data)
return ACT_INVALID
elseif event == PLAYERANIMEVENT_RELOAD then
pl:AnimRestartGesture(GESTURE_SLOT_ATTACK_AND_RELOAD, ACT_GMOD_GESTURE_TAUNT_ZOMBIE, true)
return ACT_INVALID
end
end
function CLASS:DoesntGiveFear(pl)
return pl.FeignDeath and pl.FeignDeath:IsValid()
end
if SERVER then
function CLASS:AltUse(pl)
pl:StartFeignDeath()
end
end
if not CLIENT then return end
CLASS.Icon = "zombiesurvival/killicons/ghoul"