• Listen to a special audio message from Bill Roper to the Hive Workshop community (Bill is a former Vice President of Blizzard Entertainment, Producer, Designer, Musician, Voice Actor) 🔗Click here to hear his message!
  • Read Evilhog's interview with Gregory Alper, the original composer of the music for WarCraft: Orcs & Humans 🔗Click here to read the full interview.

Triggers

Simple Threat System v1.2.w3x
Variables
Threat System v1.1
Threat System Inilt
Threat System Focus
Threat System Change Display
Threat System FT Loop
Unit Indexer by Bribe
Unit Indexer
How to Add more Units
Adds More Unit
Example
Increase Threat
Gain Through Attacking
Gain Through Casting
Reduce Threat
Gain Through Attacked
Enter map-specific custom script code below. This text will be included in the map script after variables are declared and before any trigger code.
Name Type is_array initial_value
CoL_Caster unit No
CoL_JumpsRemaining integer No
CoL_Lightning lightning Yes
CoL_NexTarget unit No
CoL_Pos location Yes
CoL_Target unit No
TS_G_DisplayMode integer No
TS_G_FT texttag Yes
TS_G_HeroGroup group No
TS_G_Real real Yes
TS_G_TempInt integer Yes
TS_G_TempInt1 integer Yes
TS_G_TempInt2 integer No
TS_G_TempIntGreatest integer No
TS_G_TempPoint location No
TS_G_TempPos location Yes
TS_G_ThreatHolder unit No
TS_G_ThreatHolderPrev unit No
TS_G_Txt_ChgTxt string No
TS_G_Txt_ChgTxt_Size real No
TS_G_Txt_ValTxt_Size real No
TS_G_Unit unit Yes
TS_G_Value integer Yes
UDex integer No
UDexGen integer No
UDexNext integer Yes
UDexPrev integer Yes
UDexRecycle integer No
UDexUnits unit Yes
UDexWasted integer No
UnitIndexerEnabled boolean No
UnitIndexEvent real No
Threat System Inilt
Events
Time - Elapsed game time is 1.00 seconds
Conditions
Actions
-------- This Tigger's Event should always set to anytime not less than 1 seconds --------
Trigger - Turn off (This trigger)
-------- Main Configuration --------
-------- In the Threat System Focus Trigger, reduce the interval means more accurate and fast change of target, 0.75 will wok just fine --------
-------- Display Mode = 0 will show exact threat; Display Mode = 1 will show % threat --------
-------- This can be changed anytime when the systems runs --------
Set Variable Set TS_G_DisplayMode = "1"
Set Variable Set TS_G_Txt_ValTxt_Size = "8.00"
Set Variable Set TS_G_Txt_ChgTxt_Size = "9.00"
Set Variable Set TS_G_Txt_ChgTxt = "Change Target!"
Custom script: set bj_wantDestroyGroup = true
-------- Adds unit into the Unit Group Here --------
Unit Group - Pick every unit in (Units in (Playable map area) matching (((Matching unit) is A Hero) Equal to True)) and do (Actions)
Loop - Actions
Unit Group - Add (Picked unit) to TS_G_HeroGroup
-------- Don't touch this unless you know what you're doing --------
Unit Group - Pick every unit in TS_G_HeroGroup and do (Actions)
Loop - Actions
Set Variable Set TS_G_TempInt2 = (Custom value of (Picked unit))
Floating Text - Create floating text that reads (String(TS_G_Value[(Custom value of (Picked unit))])) above (Picked unit) with Z offset 0 , using font size TS_G_Txt_ValTxt_Size , color ( 100 %, 100 %, 100 %), and 0 % transparency
Set Variable Set TS_G_FT[TS_G_TempInt2] = (Last created floating text)
Trigger - Turn on Threat_System_Focus <gen>
Trigger - Turn on Threat_System_FT_Loop <gen>
Threat System Focus
Events
Time - Every 0.75 seconds of game time
Conditions
Actions
Set Variable Set TS_G_TempInt[0] = "0"
Set Variable Set TS_G_ThreatHolderPrev = TS_G_ThreatHolder
Unit Group - Pick every unit in TS_G_HeroGroup and do (Actions)
Loop - Actions
Set Variable Set TS_G_TempInt[0] = (TS_G_TempInt[0] + 1)
Set Variable Set TS_G_Unit[TS_G_TempInt[0]] = (Picked unit)
Set Variable Set TS_G_TempInt1[TS_G_TempInt[0]] = TS_G_Value[(Custom value of TS_G_Unit[TS_G_TempInt[0]])]
For each (Integer B) from 1 to TS_G_TempInt[0] , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
TS_G_TempInt1[(Integer B)] Greater than or equal to TS_G_TempIntGreatest
Then - Actions
Set Variable Set TS_G_TempIntGreatest = TS_G_TempInt1[(Integer B)]
Set Variable Set TS_G_ThreatHolder = TS_G_Unit[(Integer B)]
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
TS_G_ThreatHolder Not equal to TS_G_ThreatHolderPrev
Then - Actions
Set Variable Set TS_G_Value[(Custom value of TS_G_ThreatHolderPrev)] = (Integer(((Real(TS_G_Value[(Custom value of TS_G_ThreatHolderPrev)])) x 0.85)))
Else - Actions
Set Variable Set TS_G_TempPos[0] = (Position of TS_G_ThreatHolder)
Custom script: set bj_wantDestroyGroup = true
Unit Group - Pick every unit in (Units within 800.00 of TS_G_TempPos[0].) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) belongs to an enemy of (Owner of TS_G_ThreatHolder).) Equal to True
((Picked unit) is alive) Equal to True
Then - Actions
Unit - Order (Picked unit) to Attack . TS_G_ThreatHolder
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
TS_G_ThreatHolder Not equal to TS_G_ThreatHolderPrev
Then - Actions
Set Variable Set TS_G_TempPos[1] = (Position of (Picked unit))
Floating Text - Create floating text that reads TS_G_Txt_ChgTxt at TS_G_TempPos[1] with Z offset 0 , using font size TS_G_Txt_ChgTxt_Size , color ( 100 %, 0.00 %, 0.00 %), and 0 % transparency
Floating Text - Change (Last created floating text) : Disable permanence
Floating Text - Set the velocity of (Last created floating text) to 25.00 towards 90 degrees
Floating Text - Change the fading age of (Last created floating text) to 2.15 seconds
Floating Text - Change the lifespan of (Last created floating text) to 3.00 seconds
Custom script: call RemoveLocation(udg_TS_G_TempPos[1])
Else - Actions
Else - Actions
Custom script: call RemoveLocation(udg_TS_G_TempPos[0])
Threat System Change Display
Events
Player - Player 1 (Red) types a chat message containing -chgdisplay (Unexpected type: 'stringnoformat') as An exact match
Conditions
Or - Any (Conditions) are true
Conditions
TS_G_DisplayMode Equal to 0
TS_G_DisplayMode Equal to 1
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
TS_G_DisplayMode Equal to 0
Then - Actions
Set Variable Set TS_G_DisplayMode = "1"
Else - Actions
Set Variable Set TS_G_DisplayMode = "0"
Threat System FT Loop
Events
Time - Every 0.03 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
TS_G_DisplayMode Equal to 0
Then - Actions
Unit Group - Pick every unit in TS_G_HeroGroup and do (Actions)
Loop - Actions
Set Variable Set TS_G_TempInt2 = (Custom value of (Picked unit))
Floating Text - Change the position of TS_G_FT[TS_G_TempInt2] to (Picked unit) with Z offset 0 .
Floating Text - Change text of TS_G_FT[TS_G_TempInt2] to (String(TS_G_Value[TS_G_TempInt2])) using font size TS_G_Txt_ValTxt_Size
Else - Actions
Unit Group - Pick every unit in TS_G_HeroGroup and do (Actions)
Loop - Actions
Set Variable Set TS_G_TempInt2 = (Custom value of (Picked unit))
Set Variable Set TS_G_Real[0] = (Real(TS_G_Value[TS_G_TempInt2]))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
TS_G_Real[0] Greater than TS_G_Real[1]
Then - Actions
Set Variable Set TS_G_Real[1] = TS_G_Real[0]
Else - Actions
Unit Group - Pick every unit in TS_G_HeroGroup and do (Actions)
Loop - Actions
Set Variable Set TS_G_TempInt2 = (Custom value of (Picked unit))
Set Variable Set TS_G_Real[0] = (Real(TS_G_Value[TS_G_TempInt2]))
Set Variable Set TS_G_Real[2] = ((TS_G_Real[0] / TS_G_Real[1]) x 100.00)
Floating Text - Change the position of TS_G_FT[TS_G_TempInt2] to (Picked unit) with Z offset 0 .
Floating Text - Change text of TS_G_FT[TS_G_TempInt2] to ((String((Integer(TS_G_Real[2])))) + %) using font size TS_G_Txt_ValTxt_Size
Set Variable Set TS_G_Real[0] = "0.00"
Set Variable Set TS_G_Real[1] = "0.00"
Set Variable Set TS_G_Real[2] = "0.00"
This trigger works in two key phases:

1) During map initialization, enumerate all units of all players to give them an index.
2) Adds a second event to itself to index new units as they enter the map.

As a unit enters the map, check for any old units that may have been removed at some point in order to free their index.

When event become 2, mmeans some one is indexed
Unit Indexer
Events
Time - Elapsed game time is 0.00 seconds
Conditions
Actions
Custom script: call ExecuteFunc("InitializeUnitIndexer")
Custom script: endfunction
Custom script: function IndexUnit takes nothing returns boolean
Custom script: local integer pdex = udg_UDex
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
UnitIndexerEnabled Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
UDexRecycle Equal to 0
Then - Actions
Set Variable Set UDex = (UDexGen + 1)
Set Variable Set UDexGen = UDex
Else - Actions
Set Variable Set UDex = UDexRecycle
Set Variable Set UDexRecycle = UDexNext[UDex]
Set Variable Set UDexUnits[UDex] = (Matching unit)
Unit - Set the custom value of UDexUnits[UDex] to UDex
Set Variable Set UDexPrev[UDexNext[0]] = UDex
Set Variable Set UDexNext[UDex] = UDexNext[0]
Set Variable Set UDexNext[0] = UDex
Set Variable Set UnitIndexEvent = "0.00"
Set Variable Set UnitIndexEvent = "1.00"
Set Variable Set UnitIndexEvent = "0.00"
Custom script: set udg_UDex = pdex
Else - Actions
Custom script: return false
Custom script: endfunction
Custom script: function IndexNewUnit takes nothing returns boolean
Custom script: local integer pdex = udg_UDex
Custom script: local integer ndex
Set Variable Set UDexWasted = (UDexWasted + 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
UDexWasted Equal to 15
Then - Actions
Set Variable Set UDexWasted = "0"
Set Variable Set UDex = UDexNext[0]
Custom script: loop
Custom script: exitwhen udg_UDex == 0
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of UDexUnits[UDex]) Equal to 0
Then - Actions
Custom script: set ndex = udg_UDexNext[udg_UDex]
Custom script: set udg_UDexNext[udg_UDexPrev[udg_UDex]] = ndex
Custom script: set udg_UDexPrev[ndex] = udg_UDexPrev[udg_UDex]
Set Variable Set UDexPrev[UDex] = "0"
Set Variable Set UnitIndexEvent = "2.00"
Set Variable Set UnitIndexEvent = "0.00"
Set Variable Set UDexUnits[UDex] = No unit
Set Variable Set UDexNext[UDex] = UDexRecycle
Set Variable Set UDexRecycle = UDex
Custom script: set udg_UDex = ndex
Else - Actions
Set Variable Set UDex = UDexNext[UDex]
Custom script: endloop
Custom script: set udg_UDex = pdex
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of (Matching unit)) Equal to 0
Then - Actions
Custom script: call IndexUnit()
Else - Actions
Custom script: return false
Custom script: endfunction
Custom script: function InitializeUnitIndexer takes nothing returns nothing
Custom script: local integer i = 0
Custom script: local region re = CreateRegion()
Custom script: local rect r = GetWorldBounds()
Set Variable Set UnitIndexerEnabled = "true"
Custom script: call RegionAddRect(re, r)
Custom script: call TriggerRegisterEnterRegion(CreateTrigger(), re, Filter(function IndexNewUnit))
Custom script: call RemoveRect(r)
Custom script: set re = null
Custom script: set r = null
Custom script: loop
Custom script: call GroupEnumUnitsOfPlayer(bj_lastCreatedGroup, Player(i), Filter(function IndexUnit))
Custom script: set i = i + 1
Custom script: exitwhen i == 16
Custom script: endloop
Set Variable Set UnitIndexEvent = "3.00"
Set Variable Set UnitIndexEvent = "0.00"
If you want to add additional units to use this system after the initial installation please use the actions below.
Adds More Unit
Events
Conditions
Actions
Unit Group - Add (Triggering unit) to TS_G_HeroGroup
Set Variable Set TS_G_TempInt2 = (Custom value of (Triggering unit))
Floating Text - Create floating text that reads (String(TS_G_Value[(Custom value of (Triggering unit))])) above (Triggering unit) with Z offset 0 , using font size TS_G_Txt_ValTxt_Size , color ( 100 %, 100 %, 100 %), and 0 % transparency
Set Variable Set TS_G_FT[(Custom value of (Triggering unit))] = (Last created floating text)
Gain Through Attacking
Events
Unit - A unit Is attacked
Conditions
((Attacking unit) is in TS_G_HeroGroup.) Equal to True
Actions
Set Variable Set TS_G_Value[(Custom value of (Attacking unit))] = (TS_G_Value[(Custom value of (Attacking unit))] + (Random integer number between 1 and 13))
Gain Through Casting
Events
Unit - A unit Starts the effect of an ability
Conditions
((Triggering unit) is in TS_G_HeroGroup.) Equal to True
Actions
Set Variable Set TS_G_Value[(Custom value of (Triggering unit))] = (Random integer number between 36 and 41)
Gain Through Attacked
Events
Unit - A unit Is attacked
Conditions
((Triggering unit) is in TS_G_HeroGroup.) Equal to True
Actions
Set Variable Set TS_G_Value[(Custom value of (Triggering unit))] = (TS_G_Value[(Custom value of (Triggering unit))] - (Random integer number between 1 and 3))
Top