• 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

Esdo's Gold Award and K-D-A system v1.2a.w3x
Variables
RespawnCreeps
Respawn
Damage Engine
Damage Engine
Unit Indexer
Bounty System
INSTALLATION INSTRUCTIONS
Color Init
AwardGoldConfig
AwardGoldStore
AwardGoldLoop
AwardGoldDeath
VariableCreator
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
AwardGold_Amount real Yes
AwardGold_DiceAmount integer No
AwardGold_DiceSides real No
AwardGold_DiceValue integer No
AwardGold_DmgCap real No
AwardGold_GoldGranted integer No
AwardGold_HasChecker boolean No
AwardGold_HeroMultiplier integer No
AwardGold_Index integer No
AwardGold_IndivDamage real Yes
AwardGold_IndivGold integer No
AwardGold_IndivInteger integer No
AwardGold_IndivOrder integer Yes
AwardGold_IndivUnit unit Yes
AwardGold_KilledLevel integer No
AwardGold_KilledUnit unit No
AwardGold_LevelMultiplier integer No
AwardGold_LoopInteger integer No
AwardGold_LoopInteger2 integer No
AwardGold_NumAwarded integer No
AwardGold_Period integer Yes
AwardGold_ResetTimer integer No
AwardGold_Source unit Yes
AwardGold_Target unit Yes
AwardGold_Text texttag No
DamageBlockingAbility abilcode No
DamageEvent real No
DamageEventAmount real No
DamageEventExplodesUnit boolean No
DamageEventOverride boolean No
DamageEventPrevAmt real No
DamageEventSource unit No
DamageEventsWasted integer No
DamageEventTarget unit No
DamageEventTrigger trigger No
DamageEventType integer No
DamageModifierEvent real No
DamageTypeDOT integer No
DamageTypeRanged integer No
DamageTypeSpell integer No
DmgEvLife real No
DmgEvN integer No
DmgEvStack unit Yes
DmgEvTimer timer No
DmgTypPrev integer No
PlayerColors string Yes
TempUnit unit No
UDex integer No
UDexGen integer No
UDexNext integer Yes
UDexPrev integer Yes
UDexRecycle integer No
UDexUnits unit Yes
UDexWasted integer No
UnitDamageRegistered boolean Yes
UnitIndexerEnabled boolean No
UnitIndexEvent real No
UnitIndexLock integer Yes
Respawns killed units at the location of death.
Respawn
Events
Unit - A unit Dies
Conditions
Actions
Unit - Create 1 . (Unit-type of (Triggering unit)) for (Owner of (Triggering unit)) at (Position of (Triggering unit)) facing Default building facing degrees
Damage Engine lets you detect, amplify, block or nullify damage, and lets you cause special or undetectable damage. Just reference DamageEventAmount/Source/Target, to get the necessary damage event data.
--------
Detect damage: use the event "DamageEvent Equal to 1.00"
Detect zero-damage: use the event "DamageEvent Equal to 2.00"
To change damage before it's dealt: use the event "DamageModifierEvent Equal to 1.00"
--------
Modify DamageEventAmount/ExplodesUnit/Override from a "DamageModifierEvent Equal to 1.00" trigger. To prevent your script's damage stacking with others, include the condition "DamageEventOverride Equal to false".

Likewise, set "DamageEventOverride" to true if you don't want other scripts to stack with it.

If you need to reference the original in-game damage, use the variable "DamageEventPrevAmt".
--------
If you trigger all non-attack damage in the game, you can tell the difference between in-game damage and triggered damage, and you can customize the type of triggered damage as well. You set the variable "DamageEventType" accordingly, <before> triggering the damage.

DamageEventType will be 0 if the damage was dealt in-game or if you didn't set it right before causing the damage. You can create your own special damage types and add them to the list, and/or you can reference the existing ones (DamageTypeSpell/DOT/Ranged).
Damage Engine
Events
Game - UnitIndexEvent becomes Equal to 1.00
Game - UnitIndexEvent becomes Equal to 2.00
Conditions
Actions
-------- Copy the Cheat Death Ability from Object Editor into your map and set the following variable respectively: --------
Set Variable Set DamageBlockingAbility = "A000"
-------- - --------
Set Variable Set DamageTypeSpell = "1"
Set Variable Set DamageTypeDOT = "2"
Set Variable Set DamageTypeRanged = "3"
-------- - --------
Custom script: call ExecuteFunc("InitDamageEvent")
Custom script: endfunction
Custom script:
Custom script: function DmgEvFilter takes nothing returns boolean
-------- - --------
-------- The next conditions let you filter out unwanted units. By default, units with Locust will not pass the check. --------
-------- - --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(TempUnit is A structure) Equal to False
Then - Actions
Custom script: return true
Else - Actions
Custom script: return false
Custom script: endfunction
Custom script:
Custom script: function DmgEvRemoveAbilities takes nothing returns nothing
Custom script: local real r
Custom script: loop
Set Variable Set DmgEvN = (DmgEvN - 1)
Custom script: set r = GetWidgetLife(udg_DmgEvStack[udg_DmgEvN])
Unit - Remove DamageBlockingAbility from DmgEvStack[DmgEvN]
Custom script: call SetWidgetLife(udg_DmgEvStack[udg_DmgEvN], r)
Set Variable Set DmgEvStack[DmgEvN] = No unit
Custom script: exitwhen udg_DmgEvN == 0
Custom script: endloop
Custom script: endfunction
Custom script:
Custom script: function DmgEvSetVars takes nothing returns nothing
Set Variable Set DamageEventAmount = (Damage taken)
Set Variable Set DamageEventSource = (Damage source)
Set Variable Set DamageEventTarget = (Triggering unit)
Custom script: endfunction
Custom script:
Custom script: function FireDmgEv takes nothing returns nothing
Custom script: local boolean b = GetUnitAbilityLevel(udg_DamageEventTarget, udg_DamageBlockingAbility) > 0
Custom script: local real life = 0
Custom script: local real pain = 0
Custom script: if b then
Custom script: set life = GetWidgetLife(udg_DamageEventTarget)
Unit - Remove DamageBlockingAbility from DamageEventTarget
Custom script: call SetWidgetLife(udg_DamageEventTarget, life)
Custom script: set pain = GetWidgetLife(udg_DamageEventTarget)
Custom script: endif
Set Variable Set DamageEventPrevAmt = DamageEventAmount
Set Variable Set DamageEventExplodesUnit = "false"
Set Variable Set DamageEventOverride = "false"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DamageEventAmount Equal to 0.00
Then - Actions
Set Variable Set DamageEvent = "2.00"
Else - Actions
Set Variable Set DamageModifierEvent = "1.00"
Set Variable Set DamageEvent = "1.00"
Custom script: if b then
Unit - Add DamageBlockingAbility to DamageEventTarget
Custom script: call SetWidgetLife(udg_DamageEventTarget, life + GetWidgetLife(udg_DamageEventTarget) - pain)
Custom script: endif
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DamageEventAmount Not equal to DamageEventPrevAmt
Then - Actions
Set Variable Set DmgEvLife = ((Life of DamageEventTarget) + (DamageEventPrevAmt - DamageEventAmount))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DamageEventAmount Greater than DamageEventPrevAmt
Then - Actions
Unit - Set life of DamageEventTarget to (Max(0.41, DmgEvLife))
Custom script: if udg_DmgEvLife <= .405 then
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DamageEventExplodesUnit Equal to True
Then - Actions
Unit - Make DamageEventTarget Explode on death
Else - Actions
Trigger - Turn off DamageEventTrigger
Custom script: call UnitDamageTarget(udg_DamageEventSource, udg_DamageEventTarget, 999, false, false, null, null, null)
Trigger - Turn on DamageEventTrigger
Custom script: endif
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Max life of DamageEventTarget) Less than DmgEvLife
Then - Actions
Unit - Add DamageBlockingAbility to DamageEventTarget
Set Variable Set DmgEvStack[DmgEvN] = DamageEventTarget
Set Variable Set DmgEvN = (DmgEvN + 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DmgEvN Equal to 1
Then - Actions
Custom script: call TimerStart(udg_DmgEvTimer, 0, false, function DmgEvRemoveAbilities)
Else - Actions
Else - Actions
Unit - Set life of DamageEventTarget to DmgEvLife
Else - Actions
Custom script: endfunction
Custom script:
Custom script: function FireRecursiveDmgEv takes nothing returns nothing
Custom script: local real d = udg_DamageEventAmount
Custom script: local unit s = udg_DamageEventSource
Custom script: local unit t = udg_DamageEventTarget
Custom script: local integer ptype = udg_DmgTypPrev
Custom script: local boolean explode = udg_DamageEventExplodesUnit
Custom script: local boolean override = udg_DamageEventOverride
Custom script: local real prev = udg_DamageEventPrevAmt
Custom script: call DmgEvSetVars()
Custom script: if udg_DamageEventTarget != t or udg_DamageEventSource != s or udg_DamageEventAmount != d or udg_DamageEventType != ptype then
Set Variable Set DamageEvent = "0.00"
Set Variable Set DamageModifierEvent = "0.00"
Custom script: call FireDmgEv()
-------- - --------
-------- Delete the next three lines to disable the in-game recursion crash warnings --------
-------- - --------
Custom script: else
Cinematic - Clear the screen of text messages for (All players) .
Game - Display to (All players) for 999.00 seconds the text: WARNING: Recursion error when dealing damage! Make sure when you deal damage from within a DamageEvent trigger, do it like this: Trigger - Turn off DamageEventTrigger Unit - Cause... Trigger - Turn on DamageEventTrigger
-------- - --------
Custom script: endif
Custom script: set udg_DamageEventOverride = override
Custom script: set udg_DamageEventExplodesUnit = explode
Custom script: set udg_DamageEventPrevAmt = prev
Custom script: set udg_DmgTypPrev = ptype
Custom script: set udg_DamageEventAmount = d
Custom script: set udg_DamageEventSource = s
Custom script: set udg_DamageEventTarget = t
Custom script: set s = null
Custom script: set t = null
Custom script: endfunction
Custom script:
Custom script: function OnDmgEv takes nothing returns boolean
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DamageEvent Equal to 0.00
Then - Actions
Set Variable Set DmgTypPrev = DamageEventType
Custom script: call DmgEvSetVars()
Custom script: call FireDmgEv()
Set Variable Set DamageModifierEvent = "0.00"
Set Variable Set DamageEvent = "0.00"
Set Variable Set DamageEventType = "0"
Else - Actions
Custom script: call FireRecursiveDmgEv()
Custom script: return false
Custom script: endfunction
Custom script:
Custom script: function CreateDmgEv takes nothing returns nothing
Custom script: set udg_DamageEventTrigger = CreateTrigger()
Custom script: call TriggerAddCondition(udg_DamageEventTrigger, Filter(function OnDmgEv))
Custom script: endfunction
Custom script:
Custom script: function SetupDmgEv 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
UnitIndexEvent Equal to 1.00
Then - Actions
Set Variable Set TempUnit = UDexUnits[UDex]
Custom script: if GetUnitAbilityLevel(udg_TempUnit, 'Aloc') == 0 and DmgEvFilter() then
Set Variable Set UnitDamageRegistered[UDex] = "true"
Trigger - Add to DamageEventTrigger the event (TempUnit Takes damage)
Custom script: endif
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
UnitDamageRegistered[UDex] Equal to True
Then - Actions
Set Variable Set UnitDamageRegistered[UDex] = "false"
Set Variable Set DamageEventsWasted = (DamageEventsWasted + 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DamageEventsWasted Equal to 15
Then - Actions
Set Variable Set DamageEventsWasted = "0"
Custom script: call DestroyTrigger(udg_DamageEventTrigger)
Custom script: call CreateDmgEv()
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
UnitDamageRegistered[UDex] Equal to True
Then - Actions
Trigger - Add to DamageEventTrigger the event (UDexUnits[UDex] Takes damage)
Else - Actions
Set Variable Set UDex = UDexNext[UDex]
Custom script: endloop
Custom script: set udg_UDex = pdex
Else - Actions
Else - Actions
Custom script: return false
Custom script: endfunction
Custom script:
Custom script: function InitDamageEvent takes nothing returns nothing
Custom script: call CreateDmgEv()
Custom script: call TriggerAddCondition(GetTriggeringTrigger(), Filter(function SetupDmgEv))
Set Variable Set UnitIndexerEnabled = "false"
Custom script: set udg_TempUnit = CreateUnit(Player(15), 'uloc', 0, 0, 0)
Set Variable Set UnitIndexerEnabled = "true"
Unit - Add DamageBlockingAbility to TempUnit
Unit - Remove TempUnit from the game
Countdown Timer - Start DmgEvTimer as a One-shot timer that will expire in 0.00 seconds
Trigger - Run (This trigger) (checking conditions)
Unit Indexer gives you an array-safe (1-8190) custom value for units, eliminating the need for hashtables to store unit-specific data.
Just use "Set MyArrayData[(Custom value of Unit)] = (Some data)".
--------
If you want to get the unit assigned to an index (reverse lookup) use "UDexUnits[(Index)]".
--------
If you want to detect when an index is created or when it is released, use "UnitIndexEvent Equal to 1.00" (created) or "UnitIndexEvent Equal to 2.00" (released). The index being created/released is called "UDex".
--------
You can enable/disable Unit Indexer to protect some of your undesirable units from being indexed like this:

Trigger - Turn off Unit Indexer <gen>
Unit - Create 1 Dummy for (Triggering player) at TempPoint facing 0.00 degrees
Trigger - Turn on Unit Indexer <gen>
--------
If you want to use a Map Initialization trigger that uses custom value of units, to make sure that UnitIndexer initializes first, use the event "UnitIndexEvent Equal to 3.00". Otherwise the custom value of units may be zero.
--------
Advanced:
--------
If you want to lock the index of a unit, use "Set UnitIndexLock[(Index)] = (UnitIndexLock[(Index)] + 1)". This will prevent the index from being recycled. If you want to unlock it and allow it to be recycled, run the Unit Indexer <gen> trigger.

Note: Make sure if you add a lock that you will eventually remove the lock, otherwise the index will never be recycled.
Unit Indexer
Events
Map initialization
Conditions
Actions
Custom script: call ExecuteFunc("InitializeUnitIndexer")
Custom script: endfunction
Custom script:
Custom script: function ClearUnitIndex takes nothing returns nothing
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
Set Variable Set UnitIndexLock[UDex] = (UnitIndexLock[UDex] - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
UnitIndexLock[UDex] Equal to 0
Then - Actions
Set Variable Set UDexNext[UDexPrev[UDex]] = UDexNext[UDex]
Set Variable Set UDexPrev[UDexNext[UDex]] = UDexPrev[UDex]
Set Variable Set UDexPrev[UDex] = "0"
Set Variable Set UnitIndexEvent = "0.00"
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
Else - Actions
Else - Actions
Custom script: endfunction
Custom script:
Custom script: function IndexUnit takes nothing returns boolean
Custom script: local integer pdex = udg_UDex
Custom script: local integer ndex
-------- - --------
-------- You can 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
(Custom value of (Matching unit)) Equal to 0
Then - Actions
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
Custom script: set ndex = udg_UDexNext[udg_UDex]
Custom script: call ClearUnitIndex()
Custom script: set udg_UDex = ndex
Custom script: endloop
Else - 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 UnitIndexLock[UDex] = "1"
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:
Custom script: function InitializeUnitIndexer takes nothing returns nothing
Custom script: local integer i = 16
Custom script: local boolexpr b = Filter(function IndexUnit)
Custom script: local region re = CreateRegion()
Custom script: local trigger t = GetTriggeringTrigger()
Custom script: local rect r = GetWorldBounds()
Custom script: call RegionAddRect(re, r)
Custom script: call TriggerRegisterEnterRegion(t, re, b)
Custom script: call TriggerClearActions(t)
Custom script: call TriggerAddAction(t, function ClearUnitIndex)
Set Variable Set UnitIndexerEnabled = "true"
Custom script: loop
Custom script: set i = i - 1
Custom script: call GroupEnumUnitsOfPlayer(bj_lastCreatedGroup, Player(i), b)
Custom script: exitwhen i == 0
Custom script: endloop
Custom script: call RemoveRect(r)
Custom script: set re = null
Custom script: set r = null
Custom script: set t = null
Custom script: set b = null
Set Variable Set UnitIndexEvent = "3.00"
Set Variable Set UnitIndexEvent = "0.00"
If you use this on your map, give credit to esdo ( me, creator of this map ) and Bribe ( maker of the Damage Engine ).

1 - On your World Editor, go Files - Preferences... and check the button "Automatically create unknown variables while pasting trigger data.

2 - Still on that window, go to the "Test Map" label and unmark "Use fixed random seed".

3. Copy the Cheat Death Ability to your map.

4. Copy the trigger folders "Damage Engine" and "Bounty System" to your map.

5. Enjoy!
Color Init
Events
Map initialization
Conditions
Actions
Set Variable Set PlayerColors[1] = "|cffff0303"
Set Variable Set PlayerColors[2] = "|cff0042ff"
Set Variable Set PlayerColors[3] = "|cff1ce6b9"
Set Variable Set PlayerColors[4] = "|cff540081"
Set Variable Set PlayerColors[5] = "|cfffffc01"
Set Variable Set PlayerColors[6] = "|cfffeba0e"
Set Variable Set PlayerColors[7] = "|cff20c000"
Set Variable Set PlayerColors[8] = "|cffe55bb0"
Set Variable Set PlayerColors[9] = "|cff959697"
Set Variable Set PlayerColors[10] = "|cff7ebff1"
Set Variable Set PlayerColors[11] = "|cff106246"
Set Variable Set PlayerColors[12] = "|cff4e2a04"
This configs some data used by my system.

REMEMBER - If your use this system you should set all unit default bounty granted to ZERO - otherwize, units who het the killing blow will get extra gold.

To do this, go to each unit your map uses on the object editor and under "Gold Bounty Awarded -", there will be three values with this prefix. Set them all to zero.

The "Dice amount -" and "Sides per die -" fuctions are replaced by the "AwardGold_DiceAmount" and "AwardGold_DiceSides", respectively.
AwardGoldConfig
Events
Map initialization
Conditions
Actions
-------- How much gold is granted per killed unit level. --------
Set Variable Set AwardGold_LevelMultiplier = "10"
-------- How much extra gold is awarded if killed unit is a hero ( multiplier ). --------
Set Variable Set AwardGold_HeroMultiplier = "3"
-------- How much time does it take for damage instances to be reset. --------
Set Variable Set AwardGold_ResetTimer = "20"
-------- Dice amount is the quantity of dice rolled when a unit dies. A bigger number of dice makes to that extreme values ( Min. and Max.) become more unlikely and mid values become more common. This value multiplies DiceSides --------
Set Variable Set AwardGold_DiceAmount = "2"
-------- Dice Sides is the value range that can be obtained when rolling a dice. This value multiplies creature level, so that Maximum gold awarded is 50% certain and 50% random when this var is == to 1. --------
Set Variable Set AwardGold_DiceSides = "1.50"
This creates a damage struct each time a unit is attacked, containing all data needed to award gold - those being damage source, target, amount and reset timer.
AwardGoldStore
Events
Game - DamageEvent becomes Equal to 1.00
Conditions
((Owner of DamageEventSource) is an ally of (Owner of DamageEventTarget).) Equal to False
Actions
Set Variable Set AwardGold_HasChecker = "false"
For each (Integer AwardGold_LoopInteger ) from 1 to AwardGold_Index , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DamageEventTarget Equal to AwardGold_Target[AwardGold_LoopInteger]
DamageEventSource Equal to AwardGold_Source[AwardGold_LoopInteger]
Then - Actions
Set Variable Set AwardGold_HasChecker = "true"
Set Variable Set AwardGold_Amount[AwardGold_LoopInteger] = (AwardGold_Amount[AwardGold_LoopInteger] + DamageEventAmount)
Set Variable Set AwardGold_Period[AwardGold_LoopInteger] = AwardGold_ResetTimer
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
AwardGold_HasChecker Equal to False
Then - Actions
Set Variable Set AwardGold_Index = (AwardGold_Index + 1)
Set Variable Set AwardGold_Target[AwardGold_Index] = DamageEventTarget
Set Variable Set AwardGold_Source[AwardGold_Index] = DamageEventSource
Set Variable Set AwardGold_Amount[AwardGold_Index] = DamageEventAmount
Set Variable Set AwardGold_Period[AwardGold_Index] = AwardGold_ResetTimer
Game - Display to (All players) the text: New damage instance!
Else - Actions
Game - Display to (All players) the text: ((Name of DamageEventSource) + ( dealt + ((String(DamageEventAmount, 0, 0)) + ( damage to + ((Name of DamageEventTarget) + .)))))
This decreases the reset timer and resets the damage instance once it reaches zero.
AwardGoldLoop
Events
Time - Every 1.00 seconds of game time
Conditions
Actions
For each (Integer AwardGold_LoopInteger ) from 1 to AwardGold_Index , do (Actions)
Loop - Actions
Set Variable Set AwardGold_Period[AwardGold_LoopInteger] = (AwardGold_Period[AwardGold_LoopInteger] - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
AwardGold_Period[AwardGold_LoopInteger] Equal to 0
Then - Actions
Set Variable Set AwardGold_Target[AwardGold_LoopInteger] = AwardGold_Target[AwardGold_Index]
Set Variable Set AwardGold_Source[AwardGold_LoopInteger] = AwardGold_Source[AwardGold_Index]
Set Variable Set AwardGold_Amount[AwardGold_LoopInteger] = AwardGold_Amount[AwardGold_Index]
Set Variable Set AwardGold_Period[AwardGold_LoopInteger] = AwardGold_Period[AwardGold_Index]
Set Variable Set AwardGold_Index = (AwardGold_Index - 1)
Set Variable Set AwardGold_LoopInteger = (AwardGold_LoopInteger - 1)
Game - Display to (All players) the text: Damage instance reset.
Else - Actions
This is the main trigger - it grants gold to all source units according to the amount of damage they dealt.
AwardGoldDeath
Events
Unit - A unit Dies
Conditions
Actions
Set Variable Set AwardGold_KilledUnit = (Triggering unit)
Set Variable Set AwardGold_KilledLevel = (Level of AwardGold_KilledUnit)
Set Variable Set AwardGold_NumAwarded = "0"
Set Variable Set AwardGold_DmgCap = "0.00"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(AwardGold_KilledUnit is A Hero) Equal to True
Then - Actions
Set Variable Set AwardGold_KilledLevel = (AwardGold_KilledLevel x AwardGold_HeroMultiplier)
Else - Actions
Set Variable Set AwardGold_GoldGranted = (AwardGold_KilledLevel x AwardGold_LevelMultiplier)
For each (Integer AwardGold_LoopInteger ) from 1 to AwardGold_DiceAmount , do (Actions)
Loop - Actions
Set Variable Set AwardGold_DiceValue = (Integer(((Random real number between 1.00 and (Real(AwardGold_KilledLevel))) x AwardGold_DiceSides)))
Set Variable Set AwardGold_GoldGranted = (AwardGold_GoldGranted + AwardGold_DiceValue)
Game - Display to (All players) the text: (Dice Roll: + (String(AwardGold_DiceValue)))
For each (Integer AwardGold_LoopInteger ) from 1 to AwardGold_Index , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
AwardGold_Target[AwardGold_LoopInteger] Equal to AwardGold_KilledUnit
AwardGold_Source[AwardGold_LoopInteger] Not equal to AwardGold_KilledUnit
Then - Actions
Set Variable Set AwardGold_NumAwarded = (AwardGold_NumAwarded + 1)
Set Variable Set AwardGold_DmgCap = (AwardGold_DmgCap + AwardGold_Amount[AwardGold_LoopInteger])
Set Variable Set AwardGold_IndivUnit[AwardGold_NumAwarded] = AwardGold_Source[AwardGold_LoopInteger]
Set Variable Set AwardGold_IndivDamage[AwardGold_NumAwarded] = AwardGold_Amount[AwardGold_LoopInteger]
-------- Reset --------
Set Variable Set AwardGold_Target[AwardGold_LoopInteger] = AwardGold_Target[AwardGold_Index]
Set Variable Set AwardGold_Source[AwardGold_LoopInteger] = AwardGold_Source[AwardGold_Index]
Set Variable Set AwardGold_Amount[AwardGold_LoopInteger] = AwardGold_Amount[AwardGold_Index]
Set Variable Set AwardGold_Period[AwardGold_LoopInteger] = AwardGold_Period[AwardGold_Index]
Set Variable Set AwardGold_Index = (AwardGold_Index - 1)
Set Variable Set AwardGold_LoopInteger = (AwardGold_LoopInteger - 1)
Game - Display to (All players) the text: Damage instance reset.
Else - Actions
For each (Integer AwardGold_LoopInteger ) from 1 to AwardGold_NumAwarded , do (Actions)
Loop - Actions
Set Variable Set AwardGold_IndivInteger = AwardGold_NumAwarded
For each (Integer AwardGold_LoopInteger2 ) from 1 to AwardGold_NumAwarded , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
AwardGold_IndivDamage[AwardGold_LoopInteger] Greater than AwardGold_IndivDamage[AwardGold_LoopInteger2]
Then - Actions
Set Variable Set AwardGold_IndivInteger = (AwardGold_IndivInteger - 1)
Else - Actions
Set Variable Set AwardGold_IndivOrder[AwardGold_IndivInteger] = AwardGold_LoopInteger
Game - Display to (All players) the text: (((PlayerColors[(Player number of (Owner of AwardGold_KilledUnit))] + (Name of (Owner of AwardGold_KilledUnit))) + |r) + ('s unit has died granting a total of + ((String(AwardGold_GoldGranted)) + gold. Stats:)))
For each (Integer AwardGold_LoopInteger ) from 1 to AwardGold_NumAwarded , do (Actions)
Loop - Actions
Set Variable Set AwardGold_IndivGold = (Integer(((AwardGold_IndivDamage[AwardGold_IndivOrder[AwardGold_LoopInteger]] / AwardGold_DmgCap) x (Real(AwardGold_GoldGranted)))))
Player - Add AwardGold_IndivGold to (Owner of AwardGold_Source[AwardGold_LoopInteger]) . Current gold
Special Effect - Create a special effect attached to the overhead (Unexpected type: 'attachpoint') of AwardGold_IndivUnit[AwardGold_IndivOrder[AwardGold_LoopInteger]] using UI\Feedback\GoldCredit\GoldCredit.mdl
Special Effect - Destroy (Last created special effect)
Floating Text - Create floating text that reads (String(AwardGold_IndivGold)) above AwardGold_IndivUnit[AwardGold_IndivOrder[AwardGold_LoopInteger]] with Z offset 0 , using font size 12.00 , color ( 100.00 %, 100.00 %, 0.00 %), and 0 % transparency
Set Variable Set AwardGold_Text = (Last created floating text)
Floating Text - Set the velocity of AwardGold_Text to 70.00 towards 110.00 degrees
Floating Text - Change AwardGold_Text : Disable permanence
Floating Text - Change the fading age of AwardGold_Text to 0.60 seconds
Floating Text - Change the lifespan of AwardGold_Text to 1.00 seconds
Game - Display to (All players) the text: (((PlayerColors[(Player number of (Owner of AwardGold_IndivUnit[AwardGold_IndivOrder[AwardGold_LoopInteger]]))] + (Name of (Owner of AwardGold_IndivUnit[AwardGold_IndivOrder[AwardGold_LoopInteger]]))) + |r) + ('s + ((Name of AwardGold_IndivUnit[AwardGold_IndivOrder[AwardGold_LoopInteger]]) + ( : + ((String((Integer(((AwardGold_IndivDamage[AwardGold_IndivOrder[AwardGold_LoopInteger]] / AwardGold_DmgCap) x 100.00))))) + (% damage and + ((String((Integer(((AwardGold_IndivDamage[AwardGold_IndivOrder[AwardGold_LoopInteger]] / AwardGold_DmgCap) x (Real(AwardGold_GoldGranted))))))) + gold.)))))))
You only need this when pasting the system into your map. It creates needed variable when pasting trigger data.
VariableCreator
Events
Conditions
Actions
Set Variable Set AwardGold_Amount[0] = "0.00"
Set Variable Set AwardGold_DiceAmount = "0"
Set Variable Set AwardGold_DiceSides = "0.00"
Set Variable Set AwardGold_DiceValue = "0"
Set Variable Set AwardGold_DmgCap = "0.00"
Set Variable Set AwardGold_GoldGranted = "0"
Set Variable Set AwardGold_HasChecker = "false"
Set Variable Set AwardGold_HeroMultiplier = "0"
Set Variable Set AwardGold_Index = "0"
Set Variable Set AwardGold_IndivDamage[0] = "0.00"
Set Variable Set AwardGold_IndivGold = "0"
Set Variable Set AwardGold_IndivInteger = "0"
Set Variable Set AwardGold_IndivOrder[0] = "0"
Set Variable Set AwardGold_IndivUnit[0] = No unit
Set Variable Set AwardGold_KilledLevel = "0"
Set Variable Set AwardGold_KilledUnit = No unit
Set Variable Set AwardGold_LevelMultiplier = "0"
Set Variable Set AwardGold_LoopInteger = "0"
Set Variable Set AwardGold_LoopInteger2 = "0"
Set Variable Set AwardGold_NumAwarded = "0"
Set Variable Set AwardGold_Period[0] = "0"
Set Variable Set AwardGold_ResetTimer = "0"
Set Variable Set AwardGold_Source[0] = No unit
Set Variable Set AwardGold_Target[0] = No unit
Set Variable Set AwardGold_Text = (Last created floating text)
Set Variable Set PlayerColors[0] = "a"
Top