• 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

xyz Momentum.w3x
Variables
Initialization
Read me
Unit Indexer
ini
Spell
Example
Momentum loop
Land Event
//TESH.scrollpos=0
//TESH.alwaysfold=0
function SetUnitZ takes unit u, real r returns nothing
  call UnitAddAbility( u, 'Arav')
  call UnitRemoveAbility( u, 'Arav')
  call SetUnitFlyHeight( u, r, 0 )
endfunction
Name Type is_array initial_value
CastPoint location No
Cus integer No
Distance real No
Friction real No
Gravity real No
LandEvent real No
LandPoint location No
LandSFX string Yes
LeapDamageAmount real Yes
LeapDamageAoE real Yes
LeapDamageSource unit Yes
LeapSFX effect Yes
LeapType abilcode Yes
LocDiffirence real No
MomentumGroup group No
TargetPoint location No
Temp_Group group No
Temp_Point location No
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
XBountry real No
XCur real No
XVel real Yes
YBountry real No
YCur real No
YVel real Yes
ZCur real No
ZGround real No
ZVel real Yes
How to install:

1. Check File -> Preferences -> General tab -> Automaticly create varibles while pasting unknown trigger data
2. Copy function SetUnitZ in the header (the header is "xyz Momentum.w3x" above the Initialization foulder) and the initialization foulder
3. Paste in in your map
4. Copy the Spell foulder and paste it in your map.
5. If you copied the Example, Copy the Leap spell and make sure that the condition and SpellType[] = Leap in the Example trigger
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.
Unit Indexer
Events
Map initialization
Conditions
Actions
Custom script: call ExecuteFunc("InitializeUnitIndexer")
Custom script: endfunction
-------- --------
-------- This is the most important function - it provides an index for units as they enter the map --------
-------- --------
Custom script: function IndexUnit takes nothing returns boolean
Custom script: local integer pdex = udg_UDex
-------- --------
-------- You can use the boolean UnitIndexerEnabled to protect some of your undesirable units from being indexed --------
-------- - Example: --------
-------- -- Set UnitIndexerEnabled = False --------
-------- -- Unit - Create 1 Dummy for (Triggering player) at TempLoc facing 0.00 degrees --------
-------- -- Set UnitIndexerEnabled = True --------
-------- --------
-------- You can also customize the following block - if conditions are false the (Matching unit) won't be indexed. --------
-------- --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
UnitIndexerEnabled Equal to True
Then - Actions
-------- --------
-------- Generate a unique integer index for this unit --------
-------- --------
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]
-------- --------
-------- Link index to unit, unit to index --------
-------- --------
Set Variable Set UDexUnits[UDex] = (Matching unit)
Unit - Set the custom value of UDexUnits[UDex] to UDex
-------- --------
-------- Use a doubly-linked list to store all active indexes --------
-------- --------
Set Variable Set UDexPrev[UDexNext[0]] = UDex
Set Variable Set UDexNext[UDex] = UDexNext[0]
Set Variable Set UDexNext[0] = UDex
-------- --------
-------- Fire index event for 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
-------- --------
-------- The next function is called each time a unit enters the map --------
-------- --------
Custom script: function IndexNewUnit takes nothing returns boolean
Custom script: local integer pdex = udg_UDex
Custom script: local integer ndex
-------- --------
-------- Recycle indices of units no longer in-play every (15) units created --------
-------- --------
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
-------- --------
-------- Remove index from linked list --------
-------- --------
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"
-------- --------
-------- Fire deindex event for UDex --------
-------- --------
Set Variable Set UnitIndexEvent = "2.00"
Set Variable Set UnitIndexEvent = "0.00"
-------- --------
-------- Recycle the index for later use --------
-------- --------
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
-------- --------
-------- Handle the entering unit (Matching unit) --------
-------- --------
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
-------- --------
-------- The next function initializes the core of the system --------
-------- --------
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
-------- --------
-------- This is the "Unit Indexer Initialized" event, use it instead of "Map Initialization" for best results --------
-------- --------
Set Variable Set UnitIndexEvent = "3.00"
Set Variable Set UnitIndexEvent = "0.00"
ini
Events
Map initialization
Conditions
Actions
Set Variable Set Gravity = "-2.50"
Set Variable Set Friction = "-1.50"
Set Variable Set XBountry = "3300.00"
Set Variable Set YBountry = "3300.00"
Example
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Leap
Actions
Custom script: if CountUnitsInGroup(udg_MomentumGroup) == 0 then
Trigger - Turn on Momentum_loop <gen>
Custom script: endif
Set Variable Set Cus = (Custom value of (Triggering unit))
Unit Group - Add UDexUnits[Cus] to MomentumGroup
-------- Let the Land event trigger know what ability are we dealing with --------
Set Variable Set LeapType[Cus] = "A000"
-------- - --------
-------- The following is used to calculate xyz --------
Set Variable Set CastPoint = (Position of UDexUnits[Cus])
Set Variable Set TargetPoint = (Target point of ability being cast)
Set Variable Set Distance = (Distance between CastPoint and TargetPoint)
-------- - --------
-------- Here you set the amount of momentum... This equation must be ajusted if you change the gravity to ensure that the unit land on the target point accuratly --------
Set Variable Set XVel[Cus] = (XVel[Cus] + (((Square root(Distance)) / 1.40) x (Cos((Angle from CastPoint to TargetPoint)))))
Set Variable Set YVel[Cus] = (YVel[Cus] + (((Square root(Distance)) / 1.40) x (Sin((Angle from CastPoint to TargetPoint)))))
Set Variable Set ZVel[Cus] = (2.00 x ((Abs(XVel[Cus])) + (Abs(YVel[Cus]))))
-------- The Z value may be a fixed value. Just remember to ajust the X and Y --------
-------- - --------
Custom script: call RemoveLocation(udg_TargetPoint)
Special Effect - Destroy LeapSFX[Cus]
-------- Configurate landing special effect --------
Special Effect - Create a special effect attached to the orign (Unexpected type: 'attachpoint') of UDexUnits[Cus] using Abilities\Weapons\ProcMissile\ProcMissile.mdl
-------- - --------
Set Variable Set LeapSFX[Cus] = (Last created special effect)
-------- More Configuratables --------
Set Variable Set LandSFX[Cus] = "Abilities\Spells\Human\FlakCannons\FlakTarget.mdl"
Set Variable Set LeapDamageSource[Cus] = UDexUnits[Cus]
Set Variable Set LeapDamageAmount[Cus] = "300.00"
Set Variable Set LeapDamageAoE[Cus] = "300.00"
XVel - the X velocity of a unit
YVel - the Y velocity of a unit
ZVel - the Z velocity of a unit
Gravity - the change rate of ZVel. Gravity will have no effect while the unit is on the ground
Friction - the change rate of XVel and YVel. Friction will have no effect while the unit is in the air.

udg_XCur + udg_XVel[udg_Cus]
Momentum loop
Events
Time - Every 0.03 seconds of game time
Conditions
Actions
Unit Group - Pick every unit in MomentumGroup and do (Actions)
Loop - Actions
Set Variable Set Cus = (Custom value of (Picked unit))
Set Variable Set Temp_Point = (Position of UDexUnits[Cus])
Set Variable Set XCur = (X of Temp_Point)
Set Variable Set YCur = (Y of Temp_Point)
Custom script: if RAbsBJ(udg_XCur) > udg_XBountry then
Set Variable Set XVel[Cus] = (XVel[Cus] x -1.00)
Custom script: endif
Custom script: if RAbsBJ(udg_YCur) > udg_YBountry then
Set Variable Set YVel[Cus] = (YVel[Cus] x -1.00)
Custom script: endif
Set Variable Set ZCur = (Current flying height of UDexUnits[Cus])
Custom script: set udg_ZGround = GetLocationZ(udg_Temp_Point)
Custom script: call RemoveLocation(udg_Temp_Point)
Custom script: call SetUnitX(udg_UDexUnits[udg_Cus],udg_XCur + udg_XVel[udg_Cus])
Custom script: call SetUnitY(udg_UDexUnits[udg_Cus],udg_YCur + udg_YVel[udg_Cus])
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
ZCur Less than 1.00
ZVel[Cus] Less than or equal to 0.00
Then - Actions
Custom script: if udg_ZVel[udg_Cus] < 0 then
Set Variable Set LandPoint = (Position of UDexUnits[Cus])
Special Effect - Destroy LeapSFX[Cus]
Custom script: call DestroyEffect(AddSpecialEffectLoc( udg_LandSFX[udg_Cus],udg_LandPoint))
Set Variable Set ZVel[Cus] = (ZVel[Cus] x -1.00)
Set Variable Set LandEvent = "1.00"
Set Variable Set LandEvent = "0.00"
Custom script: call RemoveLocation(udg_LandPoint)
Set Variable Set ZVel[Cus] = "0.00"
Custom script: endif
Custom script: set udg_XVel[udg_Cus] = udg_XVel[udg_Cus] + (udg_Friction / (RAbsBJ(udg_XVel[udg_Cus]) + RAbsBJ(udg_YVel[udg_Cus]))) * udg_XVel[udg_Cus]
Custom script: set udg_YVel[udg_Cus] = udg_YVel[udg_Cus] + (udg_Friction / (RAbsBJ(udg_XVel[udg_Cus]) + RAbsBJ(udg_YVel[udg_Cus]))) * udg_YVel[udg_Cus]
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs(XVel[Cus])) Less than 1.00
(Abs(YVel[Cus])) Less than 1.00
Then - Actions
Set Variable Set XVel[Cus] = "0.00"
Set Variable Set YVel[Cus] = "0.00"
Unit Group - Remove UDexUnits[Cus] from MomentumGroup .
Custom script: if CountUnitsInGroup(udg_MomentumGroup) == 0 then
Trigger - Turn off (This trigger)
Custom script: endif
Else - Actions
Else - Actions
Set Variable Set Temp_Point = (Point((XCur + XVel[Cus]), (YCur + YVel[Cus])))
Custom script: set udg_LocDiffirence = GetLocationZ(udg_Temp_Point)
Custom script: call RemoveLocation(udg_Temp_Point)
Custom script: call SetUnitZ(udg_UDexUnits[udg_Cus], udg_ZCur + udg_ZVel[udg_Cus] + udg_ZGround - udg_LocDiffirence)
Set Variable Set ZVel[Cus] = (ZVel[Cus] + Gravity)
Land Event
Events
Game - LandEvent becomes Equal to 1.00
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
LeapType[Cus] Equal to Leap
Then - Actions
Custom script: call DestroyEffect(AddSpecialEffectLocBJ( udg_LandPoint, "Abilities\\Spells\\Human\\ThunderClap\\ThunderClapCaster.mdl" ))
Unit Group - Pick every unit in (Units within LeapDamageAoE[Cus] of LandPoint matching (((Owner of (Matching unit)) is an enemy of (Owner of LeapDamageSource[Cus]).) Equal to True).) and do (Actions)
Loop - Actions
Unit - Cause LeapDamageSource[Cus] to damage (Picked unit) , dealing (5.00 x ZVel[Cus]) damage of attack type Spells and damage type Normal
Custom script: call DestroyGroup(GetLastCreatedGroup())
Else - Actions
Top