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.
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
Dat anti-proxmityGM v1.04.w3x
Variables
Dat APGM
Unit Indexer
Dat DPGM Configs
Dat DR
Dat Loop
Insturctions
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 |
| A_Dat_DR_DefaultCountDown | integer | No | |
| A_Dat_DR_DefaultTime | integer | No | |
| A_Dat_DR_DistanceCheck | real | No | |
| A_Dat_DR_GroupNumber | integer | No | |
| A_Dat_DR_GroupNumber2 | integer | No | |
| A_Dat_DR_Hall | unit | Yes | |
| A_Dat_DR_StartCount | boolean | Yes | |
| A_Dat_DR_TimeLeft | integer | Yes | |
| A_Dat_DR_Unit | unit | No | |
| Dat_DR_Group | group | No | |
| Dat_DR_Spot1 | location | No | |
| Dat_DR_Spot2 | location | No | |
| Dat_DR_Timer | timer | No | |
| tempinteger | integer | No | |
| tempunit | unit | No | |
| tempunit2 | unit | 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"
This should be the only trigger you touch if your new and/or don't know what you are doing.
Dat DPGM Configs
Events
Time - Elapsed game time is 0.00 seconds
Conditions
Actions
Set Variable Set A_Dat_DR_DefaultTime = "20"
Set Variable Set A_Dat_DR_DefaultCountDown = "1"
Set Variable Set A_Dat_DR_DistanceCheck = "250.00"
Dat Detecting Ranges
Dat DR
Events
Unit - A unit Is issued an order targeting an object
Conditions
(Issued order) Equal to (Order(resumeharvesting))
Actions
Set Variable Set tempinteger = (Custom value of (Triggering unit))
Set Variable Set tempunit = (Target unit of issued order)
-------- Cleaning unit references. . . --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
A_Dat_DR_Hall[tempinteger] Not equal to No unit
Then - Actions
Set Variable Set A_Dat_DR_Hall[tempinteger] = No unit
Else - Actions
Set Variable Set A_Dat_DR_Hall[tempinteger] = tempunit
Set Variable Set Dat_DR_Spot1 = (Position of tempunit)
Set Variable Set tempunit = (Triggering unit)
Set Variable Set tempinteger = (Custom value of tempunit)
Unit - Turn collision for tempunit Off .
Set Variable Set Dat_DR_Spot2 = (Position of tempunit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between Dat_DR_Spot1 and Dat_DR_Spot2) Less than or equal to A_Dat_DR_DistanceCheck
(tempunit is in Dat_DR_Group.) Equal to False
Then - Actions
Unit - Order tempunit to Hold Position .
Unit Group - Add tempunit to Dat_DR_Group
Set Variable Set A_Dat_DR_TimeLeft[tempinteger] = A_Dat_DR_DefaultTime
Set Variable Set A_Dat_DR_GroupNumber = (A_Dat_DR_GroupNumber + 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
A_Dat_DR_GroupNumber Equal to 1
Then - Actions
Countdown Timer - Start Dat_DR_Timer as a Repeating timer that will expire in 0.10 seconds
Else - Actions
Else - Actions
Custom script: call RemoveLocation(udg_Dat_DR_Spot1)
Custom script: call RemoveLocation(udg_Dat_DR_Spot2)
Dat Loop
Events
Time - Dat_DR_Timer expires
Conditions
Actions
Unit Group - Pick every unit in Dat_DR_Group and do (Actions)
Loop - Actions
Set Variable Set tempunit2 = (Picked unit)
Set Variable Set Dat_DR_Spot1 = (Position of A_Dat_DR_Hall[(Custom value of tempunit2)])
Set Variable Set Dat_DR_Spot2 = (Position of tempunit2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between Dat_DR_Spot1 and Dat_DR_Spot2) Less than or equal to 50.00
Then - Actions
Set Variable Set tempinteger = (Custom value of tempunit2)
Set Variable Set A_Dat_DR_StartCount[tempinteger] = "true"
Unit - Hide tempunit2
Else - Actions
Custom script: call RemoveLocation(udg_Dat_DR_Spot1)
Custom script: call RemoveLocation(udg_Dat_DR_Spot2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
A_Dat_DR_TimeLeft[(Custom value of tempunit2)] Less than or equal to 0
Then - Actions
Set Variable Set A_Dat_DR_GroupNumber = (A_Dat_DR_GroupNumber - 1)
Set Variable Set tempinteger = (Custom value of tempunit2)
Set Variable Set A_Dat_DR_StartCount[tempinteger] = "false"
Unit - Unhide tempunit2
Unit - Turn collision for tempunit2 On .
Unit - Order tempunit2 to Harvest Nearby Gold .
Unit Group - Remove tempunit2 from Dat_DR_Group .
Else - Actions
Set Variable Set tempinteger = (Custom value of tempunit2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
A_Dat_DR_StartCount[tempinteger] Equal to True
Then - Actions
Set Variable Set A_Dat_DR_TimeLeft[tempinteger] = (A_Dat_DR_TimeLeft[tempinteger] - A_Dat_DR_DefaultCountDown)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
A_Dat_DR_GroupNumber Less than or equal to 0
Then - Actions
Countdown Timer - Pause Dat_DR_Timer
Else - Actions
For full mastery/control over the basic harvesting system for goldmines/gold in WC3 TFT you can now use a system made by Dat-C3/Tal0n to actually have this.
1.Go into the terrain editor first, File --> Preferences --> General --> Make sure "Automatically create unknown variables while pasting trigger data" is checkmarked.
2. Right-click Dat APGM/folder then left-click "Copy".
3. Load up your map then anywhere within this editor/trigger window/editor you right-click on a folder or trigger or map header then left-click paste.
4. Pat yourself on the back if possible and congratulate yourself because you now can control your evil little lame nasty workers who try their best to exploit to the best of their ability to somehow ruin your game.
To fix any bugs/errors upon pasting my system into your map here is what you do:
Copy the folder again then delete it, go into your variable manager/editer where you find any variables that lie about their type. It will usually be an integer that messes up. Just click on it and set its value to the correct type then re-paste the folder/system back in and it should work perfectly.
============================================================================================Hope you enjoy!
| Dat-C3
============================================================================================
1.Go into the terrain editor first, File --> Preferences --> General --> Make sure "Automatically create unknown variables while pasting trigger data" is checkmarked.
2. Right-click Dat APGM/folder then left-click "Copy".
3. Load up your map then anywhere within this editor/trigger window/editor you right-click on a folder or trigger or map header then left-click paste.
4. Pat yourself on the back if possible and congratulate yourself because you now can control your evil little lame nasty workers who try their best to exploit to the best of their ability to somehow ruin your game.
To fix any bugs/errors upon pasting my system into your map here is what you do:
Copy the folder again then delete it, go into your variable manager/editer where you find any variables that lie about their type. It will usually be an integer that messes up. Just click on it and set its value to the correct type then re-paste the folder/system back in and it should work perfectly.
============================================================================================Hope you enjoy!
| Dat-C3
============================================================================================