mirror of
https://github.com/fortressforever/fortressforever-scripts.git
synced 2024-11-22 12:41:17 +00:00
471 lines
14 KiB
Lua
471 lines
14 KiB
Lua
|
|
-- base_hunted.lua
|
|
|
|
-----------------------------------------------------------------------------
|
|
-- includes
|
|
-----------------------------------------------------------------------------
|
|
IncludeScript("base_teamplay");
|
|
IncludeScript("base_location");
|
|
|
|
-----------------------------------------------------------------------------
|
|
-- Basic hunted-style gameplay. Respawns all players when the VIP is killed
|
|
-----------------------------------------------------------------------------
|
|
POINTS_PER_HUNTED_DEATH = 5
|
|
POINTS_PER_HUNTED_DEATH_FOR_ASSASSIN = 5
|
|
POINTS_PER_HUNTED_ESCAPE = 10
|
|
POINTS_PER_HUNTED_ESCAPE_FOR_HUNTED = 10
|
|
POINTS_PER_HUNTED_ESCAPE_FOR_BODYGUARDS = 10
|
|
POINTS_PER_HUNTED_ATTACK = 2
|
|
HUNTED_ALLIES_TEAM = Team.kRed
|
|
HUNTED_ENTITY = nil
|
|
LAST_HUNTED_LOCATION = nil
|
|
ESCAPE_DOOR_BUTTON_UNLOCKED = true
|
|
|
|
-- escape_door_top is also defined as a base_escape_door object down below
|
|
escape_door = {
|
|
entity_names = { "escape_door_top", "escape_door_bottom" },
|
|
isopen = false,
|
|
openicon = "hud_door_open.vtf",
|
|
closedicon = "hud_door_closed.vtf",
|
|
hudposx = 0,
|
|
hudposy = 32,
|
|
hudwidth = 64,
|
|
hudheight = 32,
|
|
hudalignx = 4,
|
|
hudaligny = 0
|
|
}
|
|
|
|
-- precache sounds
|
|
function precache()
|
|
PrecacheSound("ff_hunted.thunder")
|
|
PrecacheSound("ff_hunted.cheer")
|
|
PrecacheSound("ff_hunted.dying_bird")
|
|
PrecacheSound("ff_hunted.dying_bird_full")
|
|
PrecacheSound("ff_hunted.dying_bird_full")
|
|
PrecacheSound("ff_hunted.i_am_the_werewolf")
|
|
PrecacheSound("ff_hunted.i_fight_vampires")
|
|
PrecacheSound("ff_hunted.werewolf_howling")
|
|
PrecacheSound("ff_hunted.werewolf_movies")
|
|
PrecacheSound("ff_hunted.werewolves_howling")
|
|
|
|
PrecacheSound("otherteam.flagstolen")
|
|
end
|
|
|
|
function startup()
|
|
SetGameDescription( "Hunted" )
|
|
|
|
-- set up team names
|
|
SetTeamName( Team.kBlue, "The Hunted" )
|
|
SetTeamName( Team.kRed, "Bodyguards" )
|
|
SetTeamName( Team.kYellow, "Assassins" )
|
|
SetTeamName( Team.kGreen, "Green Kid Touchers" )
|
|
|
|
-- set up team limits
|
|
SetPlayerLimit( Team.kBlue, 1 ) -- There can be only one Highlander!
|
|
SetPlayerLimit( Team.kRed, 0 ) -- Unlimited bodyguards.
|
|
SetPlayerLimit( Team.kYellow, 6 ) -- Only 6 assassins, but can we dynamically change this based on maxplayers and/or the current playercount?
|
|
SetPlayerLimit( Team.kGreen, -1 ) -- Fuck green.
|
|
|
|
local team = GetTeam( Team.kBlue )
|
|
team:SetAllies( Team.kRed )
|
|
team:SetClassLimit( Player.kScout, -1 )
|
|
team:SetClassLimit( Player.kSniper, -1 )
|
|
team:SetClassLimit( Player.kSoldier, -1 )
|
|
team:SetClassLimit( Player.kDemoman, -1 )
|
|
team:SetClassLimit( Player.kMedic, -1 )
|
|
team:SetClassLimit( Player.kHwguy, -1 )
|
|
team:SetClassLimit( Player.kPyro, -1 )
|
|
team:SetClassLimit( Player.kSpy, -1 )
|
|
team:SetClassLimit( Player.kEngineer, -1 )
|
|
team:SetClassLimit( Player.kCivilian, 0 )
|
|
|
|
team = GetTeam( Team.kRed )
|
|
team:SetAllies( Team.kBlue )
|
|
team:SetClassLimit( Player.kScout, -1 )
|
|
team:SetClassLimit( Player.kSniper, 1 )
|
|
team:SetClassLimit( Player.kSoldier, 0 )
|
|
team:SetClassLimit( Player.kDemoman, -1 )
|
|
team:SetClassLimit( Player.kMedic, 0 )
|
|
team:SetClassLimit( Player.kHwguy, 0 )
|
|
team:SetClassLimit( Player.kPyro, 1 )
|
|
team:SetClassLimit( Player.kSpy, -1 )
|
|
team:SetClassLimit( Player.kEngineer, 0 )
|
|
team:SetClassLimit( Player.kCivilian, -1 )
|
|
|
|
team = GetTeam( Team.kYellow )
|
|
team:SetClassLimit( Player.kScout, -1 )
|
|
team:SetClassLimit( Player.kSniper, 0 )
|
|
team:SetClassLimit( Player.kSoldier, -1 )
|
|
team:SetClassLimit( Player.kDemoman, -1 )
|
|
team:SetClassLimit( Player.kMedic, -1 )
|
|
team:SetClassLimit( Player.kHwguy, -1 )
|
|
team:SetClassLimit( Player.kPyro, -1 )
|
|
team:SetClassLimit( Player.kSpy, 1 )
|
|
team:SetClassLimit( Player.kEngineer, -1 )
|
|
team:SetClassLimit( Player.kCivilian, -1 )
|
|
|
|
RemoveSchedule( "hunted_location_timer" )
|
|
AddScheduleRepeating( "hunted_location_timer" , 1.0, hunted_location_timer )
|
|
|
|
end
|
|
|
|
-------------------------------------------
|
|
-- hunted flaginfo
|
|
-------------------------------------------
|
|
|
|
function flaginfo( player_entity )
|
|
|
|
local player = CastToPlayer( player_entity )
|
|
|
|
if escape_door.isopen then
|
|
RemoveHudItem( player, "escape_door_closed" )
|
|
AddHudIcon( player, escape_door.openicon, "escape_door_open", escape_door.hudposx, escape_door.hudposy, escape_door.hudwidth, escape_door.hudheight, escape_door.hudalignx, escape_door.hudaligny )
|
|
else
|
|
RemoveHudItem( player, "escape_door_open" )
|
|
AddHudIcon( player, escape_door.closedicon, "escape_door_closed", escape_door.hudposx, escape_door.hudposy, escape_door.hudwidth, escape_door.hudheight, escape_door.hudalignx, escape_door.hudaligny )
|
|
end
|
|
|
|
end
|
|
|
|
function hunted_location_timer()
|
|
|
|
if HUNTED_ENTITY ~= nil then
|
|
|
|
local player = CastToPlayer( HUNTED_ENTITY )
|
|
|
|
if player:GetLocation() ~= LAST_HUNTED_LOCATION then
|
|
|
|
LAST_HUNTED_LOCATION = player:GetLocation()
|
|
RemoveHudItem( player, "hunted_location" )
|
|
AddHudTextToTeam( GetTeam(Team.kRed), "hunted_location", "Hunted Location: " .. player:GetLocation(), 4, 44, 0, 1 )
|
|
RemoveHudItemFromTeam( GetTeam(Team.kYellow), "hunted_location" )
|
|
|
|
end
|
|
|
|
elseif LAST_HUNTED_LOCATION ~= nil then
|
|
|
|
LAST_HUNTED_LOCATION = nil
|
|
RemoveHudItemFromAll( "hunted_location" )
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
function respawn_everyone()
|
|
ApplyToAll({ AT.kAllowRespawn, AT.kRespawnPlayers, AT.kRemoveProjectiles, AT.kStopPrimedGrens })
|
|
|
|
AddSchedule( "close_escape_doors", 4.0, close_escape_doors )
|
|
end
|
|
|
|
function close_escape_doors()
|
|
for i,v in ipairs(escape_door.entity_names) do
|
|
-- close each enemy escape door
|
|
OutputEvent( v, "Close" )
|
|
end
|
|
end
|
|
|
|
function lock_escape_door_button()
|
|
ESCAPE_DOOR_BUTTON_UNLOCKED = false
|
|
end
|
|
|
|
function unlock_escape_door_button()
|
|
ESCAPE_DOOR_BUTTON_UNLOCKED = true
|
|
end
|
|
|
|
function hunted_escape_notification()
|
|
BroadCastMessage( "The Hunted escaped!" )
|
|
BroadCastSound ( "ff_hunted.cheer" )
|
|
end
|
|
|
|
function player_ondamage( player, damageinfo )
|
|
|
|
-- if no damageinfo do nothing
|
|
if not damageinfo then return end
|
|
|
|
local attacker = damageinfo:GetAttacker()
|
|
local inflictor = damageinfo:GetInflictor()
|
|
|
|
-- hunted has body armor on and only takes damage from certain things
|
|
if player:GetTeamId() == Team.kBlue then
|
|
|
|
local weapon = damageinfo:GetInflictor():GetClassName()
|
|
local attacker_is_buildable = false
|
|
|
|
if IsSentrygun(attacker) or IsDispenser(attacker) or IsSentrygun(inflictor) or IsDispenser(inflictor) then
|
|
|
|
attacker_is_buildable = true
|
|
|
|
end
|
|
|
|
if attacker_is_buildable ~= true and weapon ~= "ff_weapon_sniperrifle" and weapon ~= "ff_weapon_crowbar" and weapon ~= "ff_projectile_dart" and weapon ~= "ff_weapon_knife" then
|
|
|
|
damageinfo:ScaleDamage(0)
|
|
|
|
else
|
|
|
|
-- BroadCastSound ( "ff_hunted.dying_bird" )
|
|
|
|
end
|
|
|
|
-- hunted also has quad damage
|
|
else
|
|
|
|
if IsPlayer( attacker ) then
|
|
|
|
attacker = CastToPlayer( attacker )
|
|
|
|
if attacker:GetTeamId() == Team.kBlue and player:GetTeamId() ~= HUNTED_ALLIES_TEAM then
|
|
|
|
damageinfo:ScaleDamage(4)
|
|
attacker:AddFortPoints( POINTS_PER_HUNTED_ATTACK * 10, "Hunted Attack" )
|
|
ConsoleToAll( "The Hunted, " .. attacker:GetName() .. ", dealt quad damage to" .. player:GetName() .. "!" )
|
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|
|
|
|
function player_onkill( player )
|
|
-- Don't let blue hunted suicide.
|
|
if player:GetTeamId() == Team.kBlue then
|
|
return false
|
|
end
|
|
return true
|
|
end
|
|
|
|
-- We only care when The Hunted is killed by another player
|
|
function player_killed ( player_victim, damageinfo )
|
|
|
|
-- if no damageinfo do nothing
|
|
if not damageinfo then return end
|
|
|
|
-- Entity that is attacking
|
|
local attacker = damageinfo:GetAttacker()
|
|
|
|
-- If no attacker do nothing
|
|
if not attacker then return end
|
|
|
|
local player_attacker = nil
|
|
|
|
-- get the attacking player
|
|
if IsPlayer(attacker) then
|
|
attacker = CastToPlayer(attacker)
|
|
player_attacker = attacker
|
|
elseif IsSentrygun(attacker) then
|
|
attacker = CastToSentrygun(attacker)
|
|
player_attacker = attacker:GetOwner()
|
|
elseif IsDetpack(attacker) then
|
|
attacker = CastToDetpack(attacker)
|
|
player_attacker = attacker:GetOwner()
|
|
elseif IsDispenser(attacker) then
|
|
attacker = CastToDispenser(attacker)
|
|
player_attacker = attacker:GetOwner()
|
|
end
|
|
|
|
-- if still no attacking player after all that, try the inflictor
|
|
if not player_attacker then
|
|
|
|
-- Entity that is attacking
|
|
local inflictor = damageinfo:GetInflictor()
|
|
|
|
if inflictor then
|
|
if IsSentrygun(inflictor) then
|
|
inflictor = CastToSentrygun(inflictor)
|
|
player_attacker = inflictor:GetOwner()
|
|
elseif IsDetpack(inflictor) then
|
|
inflictor = CastToDetpack(inflictor)
|
|
player_attacker = inflictor:GetOwner()
|
|
elseif IsDispenser(inflictor) then
|
|
inflictor = CastToDispenser(inflictor)
|
|
player_attacker = inflictor:GetOwner()
|
|
end
|
|
end
|
|
|
|
end
|
|
|
|
-- if still no attacking player after all that, forget about it
|
|
if not player_attacker then return end
|
|
|
|
if player_victim:GetTeamId() == Team.kBlue then
|
|
ConsoleToAll( "The Hunted, " .. player_victim:GetName() .. ", was assassinated!" )
|
|
BroadCastMessage( "The Hunted was assassinated!" )
|
|
-- BroadCastSound ( "ff_hunted.werewolves_howling" )
|
|
BroadCastSound ( "ff_hunted.thunder" )
|
|
local team = GetTeam( Team.kYellow )
|
|
team:AddScore( POINTS_PER_HUNTED_DEATH )
|
|
ApplyToAll( { AT.kDisallowRespawn } )
|
|
AddSchedule("respawn_everyone", 2, respawn_everyone)
|
|
end
|
|
end
|
|
|
|
function player_disconnected( player )
|
|
if player:GetTeamId() == Team.kBlue then
|
|
HUNTED_ENTITY = nil
|
|
UpdateObjectiveIcon( player, HUNTED_ENTITY )
|
|
UpdateTeamObjectiveIcon( GetTeam(Team.kRed), HUNTED_ENTITY )
|
|
RemoveHudItemFromAll("hunted_location")
|
|
end
|
|
end
|
|
|
|
|
|
BLOCKTEAMCHANGE = {}
|
|
|
|
function player_switchteam( player, currentteam, desiredteam )
|
|
local i = player:GetId()
|
|
local stime = GetServerTime()
|
|
|
|
if desiredteam == Team.kBlue then
|
|
local delaytime = BLOCKTEAMCHANGE[i]
|
|
if delaytime ~= nil and delaytime > stime then
|
|
return false
|
|
end
|
|
|
|
BLOCKTEAMCHANGE[i] = stime + 10;
|
|
end
|
|
|
|
if player:GetTeamId() == Team.kBlue then
|
|
HUNTED_ENTITY = nil
|
|
UpdateObjectiveIcon( player, HUNTED_ENTITY )
|
|
UpdateTeamObjectiveIcon( GetTeam(Team.kRed), HUNTED_ENTITY )
|
|
RemoveHudItemFromAll("hunted_location")
|
|
end
|
|
|
|
return true
|
|
end
|
|
|
|
-- Give everyone a full resupply, but strip grenades from assassins
|
|
function player_spawn( player_entity )
|
|
local player = CastToPlayer( player_entity )
|
|
|
|
player:AddHealth( 100 )
|
|
player:AddArmor( 100 )
|
|
player:AddAmmo( Ammo.kNails, 300 )
|
|
player:AddAmmo( Ammo.kShells, 300 )
|
|
player:AddAmmo( Ammo.kRockets, 300 )
|
|
player:AddAmmo( Ammo.kCells, 300 )
|
|
player:AddAmmo( Ammo.kDetpack, 1 )
|
|
player:AddAmmo( Ammo.kManCannon, 1 )
|
|
|
|
if player:GetTeamId() ~= Team.kYellow then
|
|
player:AddAmmo( Ammo.kGren1, 4 )
|
|
player:AddAmmo( Ammo.kGren2, 4 )
|
|
end
|
|
|
|
-- AddHudText( player, "escape_door_text", "ESCAPE DOOR:", 0, 32, 4 )
|
|
|
|
if player:GetTeamId() == Team.kRed then
|
|
UpdateObjectiveIcon( player, HUNTED_ENTITY )
|
|
if HUNTED_ENTITY ~= nil then
|
|
local player_hunted = CastToPlayer( HUNTED_ENTITY )
|
|
AddHudText( player, "hunted_location", "Hunted Location: " .. player_hunted:GetLocation(), 4, 44, 0, 1 )
|
|
end
|
|
elseif player:GetTeamId() == Team.kYellow then
|
|
UpdateObjectiveIcon( player, nil )
|
|
else
|
|
HUNTED_ENTITY = player
|
|
UpdateObjectiveIcon( player, GetEntityByName("hunted_escape") )
|
|
UpdateTeamObjectiveIcon( GetTeam(Team.kRed), HUNTED_ENTITY )
|
|
end
|
|
|
|
-- if player:GetTeamId() == Team.kRed then
|
|
-- BroadCastSoundToPlayer(player, "ff_hunted.i_fight_vampires")
|
|
-- elseif player:GetTeamId() == Team.kYellow then
|
|
-- BroadCastSoundToPlayer(player, "ff_hunted.werewolf_howling")
|
|
-- else
|
|
-- BroadCastSoundToPlayer(player, "ff_hunted.i_am_the_werewolf")
|
|
-- end
|
|
end
|
|
|
|
|
|
-- escape portal entrance
|
|
hunted_escape = trigger_ff_script:new({
|
|
botgoaltype = Bot.kHuntedEscape,
|
|
team = Team.kBlue
|
|
})
|
|
|
|
-- escape touch
|
|
function hunted_escape:ontouch( touch_entity )
|
|
|
|
if IsPlayer( touch_entity ) then
|
|
local player = CastToPlayer( touch_entity )
|
|
if player:GetTeamId() == Team.kBlue then
|
|
player:AddFrags( POINTS_PER_HUNTED_ESCAPE_FOR_HUNTED )
|
|
player:AddFortPoints( POINTS_PER_HUNTED_ESCAPE_FOR_HUNTED * 10, "Hunted Escape" )
|
|
|
|
ConsoleToAll( "The Hunted, " .. player:GetName() .. ", escaped!" )
|
|
|
|
local team = GetTeam( Team.kBlue )
|
|
team:AddScore( POINTS_PER_HUNTED_ESCAPE )
|
|
team = GetTeam( Team.kRed )
|
|
team:AddScore( POINTS_PER_HUNTED_ESCAPE )
|
|
|
|
ApplyToAll({ AT.kAllowRespawn, AT.kRespawnPlayers, AT.kRemoveProjectiles, AT.kStopPrimedGrens })
|
|
AddSchedule( "hunted_escape_notification", 0.1, hunted_escape_notification )
|
|
AddSchedule( "close_escape_doors", 4.0, close_escape_doors )
|
|
|
|
end
|
|
end
|
|
|
|
end
|
|
|
|
|
|
base_escape_door = trigger_ff_script:new({})
|
|
|
|
function base_escape_door:onopen()
|
|
|
|
BroadCastMessage("Escape Door Open!")
|
|
BroadCastSound("otherteam.flagstolen")
|
|
|
|
escape_door.isopen = true
|
|
|
|
RemoveHudItemFromAll( "escape_door_closed" )
|
|
AddHudIconToAll( escape_door.openicon, "escape_door_open", escape_door.hudposx, escape_door.hudposy, escape_door.hudwidth, escape_door.hudheight, escape_door.hudalignx, escape_door.hudaligny )
|
|
|
|
end
|
|
|
|
function base_escape_door:onfullyclosed()
|
|
|
|
BroadCastMessage("Escape Door Closed!")
|
|
-- BroadCastSound("otherteam.flagstolen")
|
|
|
|
escape_door.isopen = false
|
|
|
|
RemoveHudItemFromAll( "escape_door_open" )
|
|
AddHudIconToAll( escape_door.closedicon, "escape_door_closed", escape_door.hudposx, escape_door.hudposy, escape_door.hudwidth, escape_door.hudheight, escape_door.hudalignx, escape_door.hudaligny )
|
|
|
|
end
|
|
|
|
escape_door_top = base_escape_door
|
|
|
|
|
|
base_escape_door_button = func_button:new({})
|
|
|
|
function base_escape_door_button:allowed( allowed_entity )
|
|
if IsPlayer( allowed_entity ) then
|
|
local player = CastToPlayer( allowed_entity )
|
|
if ESCAPE_DOOR_BUTTON_UNLOCKED then
|
|
lock_escape_door_button()
|
|
AddSchedule( "unlock_escape_door_button", 6.66, unlock_escape_door_button )
|
|
return EVENT_ALLOWED
|
|
end
|
|
end
|
|
|
|
return EVENT_DISALLOWED
|
|
end
|
|
|
|
-- TODO this doesn't work
|
|
function base_escape_door_button:onfailuse( use_entity )
|
|
if IsPlayer( use_entity ) then
|
|
local player = CastToPlayer( use_entity )
|
|
BroadCastMessageToPlayer( player, "#FF_NOTALLOWEDBUTTON" )
|
|
end
|
|
end
|
|
|
|
escape_door_button_left = base_escape_door_button
|
|
escape_door_button_right = base_escape_door_button
|
|
escape_door_button_inside = base_escape_door_button
|
|
|