initial commit

aghanim_singleplayer/scripts/vscripts/modifiers/modifier_monster_leash.lua

@@ -0,0 +1,79 @@
+LinkLuaModifier( "modifier_detect_invisible", "modifiers/modifier_detect_invisible", LUA_MODIFIER_MOTION_NONE )
+
+modifier_monster_leash = class({})
+
+--------------------------------------------------------------------------------
+
+function modifier_monster_leash:IsHidden()
+	return true
+end
+
+--------------------------------------------------------------------------------
+
+function modifier_monster_leash:IsPermanent()
+	return true
+end
+
+--------------------------------------------------------------------------------
+
+function modifier_monster_leash:OnCreated( kv )
+	if IsServer() then
+		self.flKillStartTime = -1
+		self.bAddedGem = false
+		
+		self.bProvideVision = false
+		self.fProvideVisionTime = 240
+
+		self:StartIntervalThink( 0.01 )
+	end
+end
+
+-----------------------------------------------------------------------
+
+function modifier_monster_leash:OnIntervalThink()
+
+	local hEncounter = self:GetParent().Encounter
+	if hEncounter == nil then
+		self:Destroy()
+		return
+	end
+
+	-- Check to see if we want to add a gem as counter-invisibility
+	if self.bAddedGem == false and self:GetParent():IsConsideredHero() and 
+		hEncounter:HasStarted() == true and ( ( GameRules:GetGameTime() - hEncounter:GetStartTime() ) > 150 ) then
+		self.bAddedGem = true
+		self:GetParent():AddNewModifier( self:GetParent(), nil, "modifier_detect_invisible", {} )
+	end
+
+	-- Provide vision if the room has gone on for too long - helps to protect against enemies getting lost or stuck
+	if self.bProvideVision == false and
+		hEncounter:HasStarted() == true and ( ( GameRules:GetGameTime() - hEncounter:GetStartTime() ) > self.fProvideVisionTime ) then
+
+		self.bProvideVision = true
+		self:GetParent():AddNewModifier( thisEntity, nil, "modifier_provide_vision", { duration = -1 } )
+	end
+
+	local vOrigin = self:GetParent():GetAbsOrigin()
+	local vClampedPos = hEncounter:GetRoom():ClampPointToRoomBounds( vOrigin, 128.0 )
+	if vOrigin ~= vClampedPos then
+		FindClearSpaceForUnit( self:GetParent(), vClampedPos, true )
+	end
+
+	if vOrigin.z > -1000 then
+		self.flKillStartTime = -1
+		return
+	end
+
+	if self.flKillStartTime < 0 then
+		self.flKillStartTime = GameRules:GetGameTime()
+	end
+
+	--print ("killcountdown = ", self.killcountdown )
+	-- only kill the unit if they are in a bad position for 3 seconds, 
+	-- to make sure it's not a weird flying unit thing that is actually behaving legally.
+	if ( GameRules:GetGameTime() - self.flKillStartTime ) >= 3 then
+		SendToServerConsole( "say *** KILLING ROGUE UNIT " .. self:GetParent():GetUnitName() .. " at " .. tostring( vOrigin ) )
+		self:GetParent():ForceKill( false )	
+	end
+
+end