Community
Maps
Tutorials
Gallery
Support Us
Install the app
-
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.
-
🏆 HD Modeling Contest #7 POLL is live! ✅ Vote for the TOP 3 MODELS! ❗️Poll closes April 28, 2025. 🎬Watch the entries on our YouTube channel! 🔗 Click here to cast your vote!
You are using an out of date browser. It may not display this or other websites correctly.
You should upgrade or use an alternative browser.
You should upgrade or use an alternative browser.
Triggers
CES180812.w3x
Variables
Unit Indexer
Unit Indexer
Creep EXP System
CES Initialization
CES Save EXP
CES Add Unit
CES Remove Unit
CES Die Check
CES Show EXP Bar
TEST
TEST
CES Massage UP LVL
CES Massage INC EXP
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. (This map save with X design Pack)
| Name | Type | is_array | initial_value |
| CES_Event | real | No | |
| CES_EXP | integer | No | |
| CES_EXPRange | real | No | |
| CES_EXPRate | integer | No | |
| CES_Group | group | No | |
| CES_Hashtable | hashtable | No | |
| CES_Int | integer | No | |
| CES_Level | integer | No | |
| CES_LevelTable | integer | Yes | |
| CES_Player | player | No | |
| CES_Point | location | No | |
| CES_Real | real | Yes | |
| CES_RealEXP | integer | No | |
| CES_SFX | string | No | |
| CES_ShareEXPBoolean | boolean | No | |
| CES_String | string | No | |
| CES_StringArray | string | Yes | |
| CES_TempGroup | group | No | |
| CES_Unit | unit | No | |
| CES_Unit2 | unit | No | |
| CES_UnitEXP | integer | No | |
| CES_UnitID | integer | No | |
| CES_UnitID2 | integer | No | |
| CES_UnitType | unitcode | 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 |
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.
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"
CES Initialization
Events
Map initialization
Conditions
Actions
Hashtable - Create a hashtable
Set Variable Set CES_Hashtable = (Last created hashtable)
-------- EXP String show color --------
Set Variable Set CES_StringArray[1] = "|cff00ff00"
-------- EXP String ( EXP_StringArray[2] + EXP + EXP_StringArray[3]) --------
Set Variable Set CES_StringArray[2] = "+ "
Set Variable Set CES_StringArray[3] = " EXP!"
-------- EXP Bar Color --------
Set Variable Set CES_StringArray[4] = "|cffffcc00"
-------- EXP Bar Level Color --------
Set Variable Set CES_StringArray[5] = "|cffccffcc"
-------- EXP String Size --------
Set Variable Set CES_Real[1] = "10.00"
-------- EXP Show Time --------
Set Variable Set CES_Real[2] = "2.00"
-------- EXP Velocity Disatance --------
Set Variable Set CES_Real[3] = "50.00"
-------- EXP Bar Size (I think it need <= 8) --------
Set Variable Set CES_Real[4] = "8.00"
-------- EXP Sharing Range --------
Set Variable Set CES_EXPRange = "1000.00"
-------- ------- --------
-------- CES_ShareEXP = True => Share EXP, CES_ShareEXP = False => Not share EXP --------
Set Variable Set CES_ShareEXPBoolean = "true"
-------- Special Effect when unit up level. --------
Set Variable Set CES_SFX = "Abilities\Spells\Demon\DarkPortal\DarkPortalTarget.mdl"
-------- ------- --------
-------- Level Table --------
-------- Lvl 1 => Lvl 2 Requires 200 EXP --------
Set Variable Set CES_LevelTable[1] = "200"
-------- --------- --------
-------- Lvl 2 => Lvl 3 Requires 500 EXP --------
Set Variable Set CES_LevelTable[2] = "500"
-------- --------- --------
-------- Lvl 3 => Lvl 4 Requires 1000 EXP --------
Set Variable Set CES_LevelTable[3] = "1000"
-------- --------- --------
-------- Lvl 4 => Lvl 5 Requires 2000 EXP --------
Set Variable Set CES_LevelTable[4] = "2000"
-------- --------- --------
-------- Lvl 5 => Lvl 6 Requires 5000 EXP --------
Set Variable Set CES_LevelTable[5] = "5000"
-------- --------- --------
-------- Unit EXP --------
-------- Peasant - 50 EXP --------
Set Variable Set CES_UnitType = "hpea"
Set Variable Set CES_EXP = "50"
Trigger - Run CES_Save_EXP <gen> (checking conditions)
-------- Footman - 150 EXP --------
Set Variable Set CES_UnitType = "hfoo"
Set Variable Set CES_EXP = "150"
Trigger - Run CES_Save_EXP <gen> (checking conditions)
CES Save EXP
Events
Conditions
Actions
Custom script: set udg_CES_UnitID = udg_CES_UnitType
Hashtable - Save CES_EXP as CES_UnitID of 0 in CES_Hashtable .
CES Add Unit
Events
Conditions
Actions
Set Variable Set CES_UnitID = (Custom value of CES_Unit)
Unit Group - Add CES_Unit to CES_Group
Hashtable - Save 0 as CES_UnitID of 1 in CES_Hashtable .
Hashtable - Save 1 as CES_UnitID of 2 in CES_Hashtable .
Hashtable - Save 100 as CES_UnitID of 3 in CES_Hashtable .
Set Variable Set CES_Player = (Owner of CES_Unit)
Custom script: if udg_CES_Player == GetLocalPlayer() then
Floating Text - Create floating text that reads above CES_Unit with Z offset 0 , using font size CES_Real[4] , color ( 100 %, 100 %, 100 %), and 0 % transparency
Hashtable - Save Handle Of (Last created floating text) as CES_UnitID of 4 in CES_Hashtable .
Custom script: endif
CES Remove Unit
Events
Conditions
Actions
Set Variable Set CES_UnitID = (Custom value of CES_Unit)
Floating Text - Destroy (Load CES_UnitID of 4 in CES_Hashtable)
Hashtable - Clear all child hashtables of child CES_UnitID in CES_Hashtable .
Unit Group - Remove CES_Unit from CES_Group .
CES Die Check
Events
Unit - A unit Dies
Conditions
Actions
Set Variable Set CES_Unit2 = (Triggering unit)
Set Variable Set CES_Unit = (Killing unit)
Set Variable Set CES_UnitID = (Custom value of CES_Unit)
Custom script: set udg_CES_UnitID2 = GetUnitTypeId(udg_CES_Unit2)
Set Variable Set CES_EXP = (Load CES_UnitID2 of 0 from CES_Hashtable.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
CES_ShareEXPBoolean Equal to False
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(CES_Unit is alive) Equal to True
Then - Actions
Set Variable Set CES_Event = "0.00"
Set Variable Set CES_UnitEXP = (Load CES_UnitID of 1 from CES_Hashtable.)
Set Variable Set CES_Level = (Load CES_UnitID of 2 from CES_Hashtable.)
Set Variable Set CES_EXPRate = (Load CES_UnitID of 3 from CES_Hashtable.)
Set Variable Set CES_RealEXP = ((CES_EXP x CES_EXPRate) / 100)
Set Variable Set CES_UnitEXP = (CES_UnitEXP + CES_RealEXP)
Set Variable Set CES_Player = (Owner of CES_Unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
CES_UnitEXP Greater than or equal to CES_LevelTable[CES_Level]
Then - Actions
Special Effect - Create a special effect attached to the origin (Unexpected type: 'attachpoint') of CES_Unit using CES_SFX
Special Effect - Destroy (Last created special effect)
Set Variable Set CES_UnitEXP = (CES_UnitEXP - CES_LevelTable[CES_Level])
Set Variable Set CES_Level = (CES_Level + 1)
Set Variable Set CES_Event = "2.00"
Hashtable - Save CES_Level as CES_UnitID of 2 in CES_Hashtable .
Else - Actions
Hashtable - Save CES_UnitEXP as CES_UnitID of 1 in CES_Hashtable .
Set Variable Set CES_Event = "1.00"
Custom script: if udg_CES_Player == GetLocalPlayer() then
Floating Text - Create floating text that reads (CES_StringArray[1] + (CES_StringArray[2] + ((String(CES_RealEXP)) + CES_StringArray[3]))) above CES_Unit with Z offset 0 , using font size CES_Real[1] , color ( 100.00 %, 100 %, 100.00 %), and 0 % transparency
Floating Text - Set the velocity of (Last created floating text) to CES_Real[3] towards 90 degrees
Floating Text - Change (Last created floating text) : Disable permanence
Floating Text - Change the lifespan of (Last created floating text) to CES_Real[2] seconds
Floating Text - Change the fading age of (Last created floating text) to CES_Real[2] seconds
Custom script: endif
Else - Actions
Else - Actions
Set Variable Set CES_Point = (Position of CES_Unit2)
Set Variable Set CES_TempGroup = (Units within CES_EXPRange of CES_Point matching ((((Matching unit) is in CES_Group.) Equal to True) and ((((Matching unit) belongs to an ally of (Owner of CES_Unit).) Equal to True) and (((Matching unit) is alive) Equal to True))).)
Set Variable Set CES_EXP = (CES_EXP / (Number of units in CES_TempGroup))
Unit Group - Pick every unit in CES_TempGroup and do (Actions)
Loop - Actions
Set Variable Set CES_Event = "0.00"
Set Variable Set CES_Unit = (Picked unit)
Set Variable Set CES_Player = (Owner of CES_Unit)
Set Variable Set CES_UnitID = (Custom value of CES_Unit)
Set Variable Set CES_UnitEXP = (Load CES_UnitID of 1 from CES_Hashtable.)
Set Variable Set CES_Level = (Load CES_UnitID of 2 from CES_Hashtable.)
Set Variable Set CES_EXPRate = (Load CES_UnitID of 3 from CES_Hashtable.)
Set Variable Set CES_RealEXP = ((CES_EXP x CES_EXPRate) / 100)
Set Variable Set CES_UnitEXP = (CES_UnitEXP + CES_RealEXP)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
CES_UnitEXP Greater than or equal to CES_LevelTable[CES_Level]
Then - Actions
Special Effect - Create a special effect attached to the origin (Unexpected type: 'attachpoint') of CES_Unit using CES_SFX
Special Effect - Destroy (Last created special effect)
Set Variable Set CES_UnitEXP = (CES_UnitEXP - CES_LevelTable[CES_Level])
Set Variable Set CES_Level = (CES_Level + 1)
Set Variable Set CES_Event = "2.00"
Hashtable - Save CES_Level as CES_UnitID of 2 in CES_Hashtable .
Else - Actions
Hashtable - Save CES_UnitEXP as CES_UnitID of 1 in CES_Hashtable .
Set Variable Set CES_Event = "1.00"
Custom script: if udg_CES_Player == GetLocalPlayer() then
Floating Text - Create floating text that reads (CES_StringArray[1] + (CES_StringArray[2] + ((String(CES_RealEXP)) + CES_StringArray[3]))) above CES_Unit with Z offset 0 , using font size CES_Real[1] , color ( 100.00 %, 100 %, 100.00 %), and 0 % transparency
Floating Text - Set the velocity of (Last created floating text) to CES_Real[3] towards 90 degrees
Floating Text - Change (Last created floating text) : Disable permanence
Floating Text - Change the lifespan of (Last created floating text) to CES_Real[2] seconds
Floating Text - Change the fading age of (Last created floating text) to CES_Real[2] seconds
Custom script: endif
Custom script: call RemoveLocation(udg_CES_Point)
Custom script: call DestroyGroup(udg_CES_TempGroup)
CES Show EXP Bar
Events
Time - Every 0.03 seconds of game time
Conditions
Actions
Unit Group - Pick every unit in CES_Group and do (Actions)
Loop - Actions
Set Variable Set CES_Unit = (Picked unit)
Set Variable Set CES_UnitID = (Custom value of CES_Unit)
Set Variable Set CES_Player = (Owner of CES_Unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(CES_Unit is alive) Equal to True
Then - Actions
Set Variable Set CES_UnitEXP = (Load CES_UnitID of 1 from CES_Hashtable.)
Set Variable Set CES_Level = (Load CES_UnitID of 2 from CES_Hashtable.)
Set Variable Set CES_UnitID2 = ((CES_UnitEXP x 100) / CES_LevelTable[CES_Level])
Set Variable Set CES_String = (CES_StringArray[5] + ((String(CES_Level)) + ()|r > + CES_StringArray[4])))
For each (Integer CES_Int ) from 1 to CES_UnitID2 , do (Actions)
Loop - Actions
Set Variable Set CES_String = (CES_String + |)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(CES_UnitID2 mod 2) Equal to 1
Then - Actions
Set Variable Set CES_String = (CES_String + ||r)
Else - Actions
Set Variable Set CES_String = (CES_String + |r)
For each (Integer CES_Int ) from 1 to (100 - CES_UnitID2) , do (Actions)
Loop - Actions
Set Variable Set CES_String = (CES_String + |)
Set Variable Set CES_String = (CES_String + <)
Custom script: if udg_CES_Player == GetLocalPlayer() then
Floating Text - Change the position of (Load CES_UnitID of 4 in CES_Hashtable) to CES_Unit with Z offset 0 .
Floating Text - Change text of (Load CES_UnitID of 4 in CES_Hashtable) to CES_String using font size CES_Real[4]
Custom script: endif
Set Variable Set CES_String = ""
Else - Actions
Custom script: if udg_CES_Player == GetLocalPlayer() then
Set Variable Set CES_String = ""
Floating Text - Change text of (Load CES_UnitID of 4 in CES_Hashtable) to CES_String using font size CES_Real[4]
Floating Text - Change the position of (Load CES_UnitID of 4 in CES_Hashtable) to CES_Unit with Z offset 0 .
Custom script: endif
TEST
Events
Time - Elapsed game time is 0.00 seconds
Conditions
Actions
Set Variable Set CES_Unit = Knight 0001 <gen>
Trigger - Run CES_Add_Unit <gen> (checking conditions)
Set Variable Set CES_Unit = Knight 0002 <gen>
Trigger - Run CES_Add_Unit <gen> (checking conditions)
Set Variable Set CES_Unit = Knight 0021 <gen>
Trigger - Run CES_Add_Unit <gen> (checking conditions)
-------- HERO TEST --------
Set Variable Set CES_Unit = Paladin 0022 <gen>
Hero - Make (Owner of CES_Unit) Heroes gain 0.00 % experience from future kills
Trigger - Run CES_Add_Unit <gen> (checking conditions)
CES Massage UP LVL
Events
Game - CES_Event becomes Equal to 2.00
Conditions
Actions
Game - Display to (All players) the text: ((Name of CES_Unit) + ( LEVEL UP!!! LEVEL : + (String(CES_Level))))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(CES_Unit is A Hero) Equal to True
Then - Actions
Hero - Set CES_Unit Hero-level to CES_Level , Show level-up graphics
Else - Actions
CES Massage INC EXP
Events
Game - CES_Event becomes Equal to 1.00
Conditions
Actions
Game - Display to (All players) the text: ((Name of CES_Unit) + ('s EXP : + (String(CES_UnitEXP))))