• 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

Scroll Chat System v0.9.w3x
Variables
Initialization
Unit Indexer
Chat box Initialization
GetPlayerColor
---------------------------
Chat Event
Chat Event P2
Queue Manager
Chat Scroller
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
cBox_animSpeed real No
cBox_chatStartLocation location No
cBox_currentDistance real Yes
cBox_currentName unit No
cBox_currentQueueInteger integer No
cBox_DummyType unitcode No
cBox_floatingText texttag Yes
cBox_Hash hashtable No
cBox_InactiveGroup group No
cBox_indentLength real No
cBox_InitialVelocity real No
cBox_isInstant boolean No false
cBox_isName boolean Yes
cBox_lastPlayer player No
cBox_lineSpace real No
cBox_maxChatRows integer No
cBox_MaxDistance real No
cBox_maxQueueInteger integer No
cBox_NormalSize real No
cBox_QueueEventVariable real No
cBox_scrolledDistance real Yes
cBox_ScrollGroup group No
cBox_Size real Yes
cBox_soundEffect sound No
cBox_String string Yes
cBox_TargetDistance real Yes
cBox_TempPoint location No
cBox_TempPoint2 location No
cBox_TempPoint3 location No
cBox_TempUnit unit No
cBox_TempUnit2 unit No
cBox_TempUnit3 unit No
cBox_TempUnit4 unit No
cBox_TempUnit5 unit No
cBox_Transparancy real Yes
cBox_Velocity real Yes
cBox_X real No
cBox_Y real No
Ccode string No
Ccode_P string Yes
Key integer No
Key2 integer No
LoopInteger integer No
Player player 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
UnitIndexLock integer Yes
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"
Chat box Initialization
Events
Map initialization
Conditions
Actions
-------- Run this Initialization on your map initialization --------
-------- Chat Box System Requires Unit Indexer --------
-------- -------------------------------------- --------
-------- Modifiable --------
-------- Set Up --------
Set Variable Set cBox_DummyType = "h000"
Set Variable Set cBox_maxChatRows = "8"
Set Variable Set cBox_lineSpace = "100.00"
Set Variable Set cBox_indentLength = "80.00"
Set Variable Set cBox_NormalSize = "10.00"
Set Variable Set cBox_animSpeed = "1.50"
Set Variable Set cBox_soundEffect = cBox_ChatSoundEffect <gen>
Set Variable Set cBox_isInstant = "false"
-------- -------------------------------------- --------
-------- Initialize system variables and constants --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
cBox_isInstant Equal to True
Then - Actions
Set Variable Set cBox_InitialVelocity = cBox_lineSpace
Else - Actions
Set Variable Set cBox_InitialVelocity = (5.00 x cBox_animSpeed)
Set Variable Set cBox_MaxDistance = (cBox_lineSpace x (Real(cBox_maxChatRows)))
Set Variable Set cBox_MaxDistance = (cBox_MaxDistance + cBox_lineSpace)
Set Variable Set cBox_currentQueueInteger = "1"
Set Variable Set cBox_maxQueueInteger = "0"
Set Variable Set cBox_lastPlayer = Neutral Passive
Set Variable Set cBox_currentName = No unit
Hashtable - Create a hashtable
Set Variable Set cBox_Hash = (Last created hashtable)
-------- -------------------------------------- --------
-------- Initialize event --------
For each (Integer LoopInteger ) from 1 to 12 , do (Actions)
Loop - Actions
Trigger - Add to Chat_Event <gen> the event ((Player(LoopInteger)) types a chat message containing (Unexpected type: 'stringnoformat') as A substring)
-------- -------------------------------------- --------
-------- Delete line below --------
-------- Testing Purposes --------
-------- Initialize Player Camera --------
For each (Integer LoopInteger ) from 1 to 12 , do (Actions)
Loop - Actions
Camera - Set (Player(LoopInteger)) 's camera Angle of attack to 270.00 over 2.00 seconds
Camera - Set (Player(LoopInteger)) 's camera Rotation to 90.00 over 2.00 seconds
Camera - Set (Player(LoopInteger)) 's camera Distance to target to 2560.00 over 2.00 seconds
Camera - Set (Player(LoopInteger)) 's camera Field of view to 90.00 over 0.00 seconds
Camera - Pan camera for (Player(LoopInteger)) to (Center of Camera_center <gen>) over 0 seconds
Visibility - Disable fog of war
Visibility - Disable black mask
-------- Initialize Player Color --------
Trigger - Run GetPlayerColor <gen> (ignoring conditions)
-------- -------------------------------------- --------
GetPlayerColor
Events
Conditions
Actions
-------- Geki you lazy bastard --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Color of Player) Equal to Red
Then - Actions
Set Variable Set Ccode = "|cffff0303"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Color of Player) Equal to Blue
Then - Actions
Set Variable Set Ccode = "|cff0042ff"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Color of Player) Equal to Teal
Then - Actions
Set Variable Set Ccode = "|cff1ce6b9"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Color of Player) Equal to Purple
Then - Actions
Set Variable Set Ccode = "|cff540081"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Color of Player) Equal to Yellow
Then - Actions
Set Variable Set Ccode = "|cfffffc01"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Color of Player) Equal to Orange
Then - Actions
Set Variable Set Ccode = "|cfffeba0e"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Color of Player) Equal to Green
Then - Actions
Set Variable Set Ccode = "|cff20c000"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Color of Player) Equal to Pink
Then - Actions
Set Variable Set Ccode = "|cffe55bb0"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Color of Player) Equal to Gray
Then - Actions
Set Variable Set Ccode = "|cff959697"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Color of Player) Equal to Light Blue
Then - Actions
Set Variable Set Ccode = "|cff7ebff1"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Color of Player) Equal to Dark Green
Then - Actions
Set Variable Set Ccode = "|cff106246"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Color of Player) Equal to Brown
Then - Actions
Set Variable Set Ccode = "|cff4e2a04"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Color of Player) Equal to Maroon
Then - Actions
Set Variable Set Ccode = "|cff060606"
Else - Actions
Set Variable Set Ccode = "|cffcccccc"
Chat Event
Events
Conditions
Actions
Set Variable Set cBox_chatStartLocation = (Center of Start_Pixel <gen>)
Unit - Create 1 . cBox_DummyType for (Triggering player) at cBox_chatStartLocation facing 90.00 degrees
Set Variable Set cBox_TempUnit4 = (Last created unit)
Set Variable Set Key = (Custom value of (Last created unit))
Set Variable Set cBox_scrolledDistance[Key] = "0.00"
Set Variable Set cBox_TargetDistance[Key] = cBox_lineSpace
Set Variable Set cBox_currentDistance[Key] = "0.00"
Set Variable Set cBox_Size[Key] = (cBox_NormalSize x 1.50)
Set Variable Set cBox_Transparancy[Key] = "0.00"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
cBox_lastPlayer Equal to (Triggering player)
Then - Actions
Set Variable Set cBox_TempPoint3 = (cBox_chatStartLocation offset by cBox_indentLength towards 0.00 degrees.)
Set Variable Set cBox_X = (X of cBox_TempPoint3)
Set Variable Set cBox_Y = (Y of cBox_TempPoint3)
Custom script: call SetUnitX(udg_cBox_TempUnit4, udg_cBox_X)
Custom script: call SetUnitY(udg_cBox_TempUnit4, udg_cBox_Y)
Custom script: call RemoveLocation(udg_cBox_TempPoint3)
Set Variable Set cBox_Velocity[Key] = cBox_InitialVelocity
Set Variable Set cBox_String[Key] = (Entered chat string)
Set Variable Set cBox_isName[Key] = "false"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Length of cBox_String[Key]) Greater than or equal to 32
Then - Actions
-------- -------------------------------------- --------
-------- When string reaches 32, floating text will appear weird --------
Game - Display to (All players) the text: (Over Limit! + (String((Length of (Entered chat string)))))
-------- Overloaded string will be seperated into different segments --------
-------- -------------------------------------- --------
-------- String overload system under construction --------
For each (Integer A) from 0 to (Length of (Entered chat string)) , do (Actions)
Loop - Actions
Set Variable Set cBox_String[Key] = (Substring((Entered chat string), (Integer A), (Integer A)))
-------- -------------------------------------- --------
Else - Actions
Floating Text - Create floating text that reads cBox_String[Key] above (Last created unit) with Z offset 0 , using font size cBox_Size[Key] , color ( 100 %, 100 %, 100 %), and 0 % transparency
Floating Text - Change (Last created floating text) : Disable permanence
Set Variable Set cBox_floatingText[Key] = (Last created floating text)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_ScrollGroup is empty) Equal to True
Then - Actions
-------- If scroll group is empty (not scrolling) --------
-------- Then we instantiate the floating text normally --------
-------- Play sound on chat --------
Sound - Play cBox_soundEffect
-------- -------------------------------------- --------
-------- Scroll Inactive text upward --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_InactiveGroup is empty) Equal to False
Then - Actions
Unit Group - Pick every unit in cBox_InactiveGroup and do (Actions)
Loop - Actions
Set Variable Set cBox_TempUnit2 = (Picked unit)
Set Variable Set Key = (Custom value of cBox_TempUnit2)
Set Variable Set cBox_scrolledDistance[Key] = "0.00"
Set Variable Set cBox_Velocity[Key] = cBox_InitialVelocity
Set Variable Set cBox_TargetDistance[Key] = cBox_lineSpace
Unit Group - Remove cBox_TempUnit2 from cBox_InactiveGroup .
Unit Group - Add cBox_TempUnit2 to cBox_ScrollGroup
Trigger - Turn on Chat_Scroller <gen>
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_ScrollGroup is empty) Equal to False
Then - Actions
Unit Group - Pick every unit in cBox_ScrollGroup and do (Actions)
Loop - Actions
Set Variable Set cBox_TempUnit2 = (Picked unit)
Set Variable Set Key = (Custom value of cBox_TempUnit2)
Set Variable Set cBox_scrolledDistance[Key] = "0.00"
Set Variable Set cBox_Velocity[Key] = cBox_InitialVelocity
Set Variable Set cBox_TargetDistance[Key] = cBox_lineSpace
Trigger - Turn on Chat_Scroller <gen>
Else - Actions
-------- -------------------------------------- --------
Unit Group - Add (Last created unit) to cBox_ScrollGroup
Trigger - Turn on Chat_Scroller <gen>
-------- -------------------------------------- --------
Else - Actions
-------- If scroll group is not empty (scrolling) --------
-------- Then we instantiate the floating text in queued list --------
-------- To avoid clamping of text --------
-------- -------------------------------------- --------
Set Variable Set cBox_maxQueueInteger = (cBox_maxQueueInteger + 1)
Hashtable - Save Handle Of (Last created unit) as (Key QueuedChat.) of cBox_maxQueueInteger in cBox_Hash .
Floating Text - Hide cBox_floatingText[Key] for (All players)
-------- -------------------------------------- --------
Else - Actions
Set Variable Set cBox_Velocity[Key] = (cBox_InitialVelocity x 4.00)
Set Variable Set cBox_String[Key] = (Name of (Triggering player))
Set Variable Set cBox_isName[Key] = "true"
Set Variable Set cBox_lastPlayer = (Triggering player)
Set Variable Set Player = (Triggering player)
Trigger - Run GetPlayerColor <gen> (ignoring conditions)
Set Variable Set cBox_String[Key] = (Ccode + (cBox_String[Key] + |r))
Floating Text - Create floating text that reads cBox_String[Key] above (Last created unit) with Z offset 0 , using font size cBox_Size[Key] , color ( 100 %, 100 %, 100 %), and 0 % transparency
Floating Text - Change (Last created floating text) : Disable permanence
Set Variable Set cBox_floatingText[Key] = (Last created floating text)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_ScrollGroup is empty) Equal to True
Then - Actions
-------- If scroll group is empty (not scrolling) --------
-------- Then we instantiate the floating text normally --------
-------- Play sound on chat --------
Sound - Play cBox_soundEffect
-------- -------------------------------------- --------
-------- Scroll Inactive text upward --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_InactiveGroup is empty) Equal to False
Then - Actions
Unit Group - Pick every unit in cBox_InactiveGroup and do (Actions)
Loop - Actions
Set Variable Set cBox_TempUnit2 = (Picked unit)
Set Variable Set Key = (Custom value of cBox_TempUnit2)
Set Variable Set cBox_scrolledDistance[Key] = "0.00"
Set Variable Set cBox_Velocity[Key] = cBox_InitialVelocity
Set Variable Set cBox_TargetDistance[Key] = cBox_lineSpace
Unit Group - Remove cBox_TempUnit2 from cBox_InactiveGroup .
Unit Group - Add cBox_TempUnit2 to cBox_ScrollGroup
Trigger - Turn on Chat_Scroller <gen>
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_ScrollGroup is empty) Equal to False
Then - Actions
Unit Group - Pick every unit in cBox_ScrollGroup and do (Actions)
Loop - Actions
Set Variable Set cBox_TempUnit2 = (Picked unit)
Set Variable Set Key = (Custom value of cBox_TempUnit2)
Set Variable Set cBox_scrolledDistance[Key] = "0.00"
Set Variable Set cBox_Velocity[Key] = cBox_InitialVelocity
Set Variable Set cBox_TargetDistance[Key] = cBox_lineSpace
Trigger - Turn on Chat_Scroller <gen>
Else - Actions
-------- -------------------------------------- --------
Unit Group - Add (Last created unit) to cBox_ScrollGroup
Trigger - Turn on Chat_Scroller <gen>
-------- -------------------------------------- --------
Else - Actions
-------- If scroll group is not empty (scrolling) --------
-------- Then we instantiate the floating text in queued list --------
-------- To avoid clamping of text --------
-------- -------------------------------------- --------
Set Variable Set cBox_maxQueueInteger = (cBox_maxQueueInteger + 1)
Hashtable - Save Handle Of (Last created unit) as (Key QueuedChat.) of cBox_maxQueueInteger in cBox_Hash .
Floating Text - Hide cBox_floatingText[Key] for (All players)
-------- -------------------------------------- --------
-------- -------------------------------------- --------
Unit - Create 1 . cBox_DummyType for (Triggering player) at cBox_chatStartLocation facing 90.00 degrees
Set Variable Set cBox_TempUnit4 = (Last created unit)
Set Variable Set cBox_lastPlayer = (Owner of cBox_TempUnit4)
Set Variable Set cBox_TempPoint3 = (cBox_chatStartLocation offset by cBox_indentLength towards 0.00 degrees.)
Set Variable Set cBox_X = (X of cBox_TempPoint3)
Set Variable Set cBox_Y = (Y of cBox_TempPoint3)
Custom script: call SetUnitX(udg_cBox_TempUnit4, udg_cBox_X)
Custom script: call SetUnitY(udg_cBox_TempUnit4, udg_cBox_Y)
Custom script: call RemoveLocation(udg_cBox_TempPoint3)
Set Variable Set Key = (Custom value of (Last created unit))
Set Variable Set cBox_scrolledDistance[Key] = "0.00"
Set Variable Set cBox_TargetDistance[Key] = cBox_lineSpace
Set Variable Set cBox_Velocity[Key] = cBox_InitialVelocity
Set Variable Set cBox_currentDistance[Key] = "0.00"
Set Variable Set cBox_Size[Key] = (cBox_NormalSize x 1.50)
Set Variable Set cBox_Transparancy[Key] = "0.00"
Set Variable Set cBox_String[Key] = (Entered chat string)
Set Variable Set cBox_isName[Key] = "false"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Length of cBox_String[Key]) Greater than or equal to 32
Then - Actions
-------- -------------------------------------- --------
-------- When string reaches 32, floating text will appear weird --------
Game - Display to (All players) the text: (Over Limit! + (String((Length of (Entered chat string)))))
-------- Overloaded string will be seperated into different segments --------
-------- -------------------------------------- --------
-------- String overload system under construction --------
For each (Integer A) from 0 to (Length of (Entered chat string)) , do (Actions)
Loop - Actions
Set Variable Set cBox_String[Key] = (Substring((Entered chat string), (Integer A), (Integer A)))
-------- -------------------------------------- --------
Else - Actions
Floating Text - Create floating text that reads cBox_String[Key] above (Last created unit) with Z offset 0 , using font size cBox_Size[Key] , color ( 100 %, 100 %, 100 %), and 0 % transparency
Floating Text - Change (Last created floating text) : Disable permanence
Set Variable Set cBox_floatingText[Key] = (Last created floating text)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_ScrollGroup is empty) Equal to True
Then - Actions
-------- If scroll group is empty (not scrolling) --------
-------- Then we instantiate the floating text normally --------
-------- Play sound on chat --------
Sound - Play cBox_soundEffect
-------- -------------------------------------- --------
-------- Scroll Inactive text upward --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_InactiveGroup is empty) Equal to False
Then - Actions
Unit Group - Pick every unit in cBox_InactiveGroup and do (Actions)
Loop - Actions
Set Variable Set cBox_TempUnit2 = (Picked unit)
Set Variable Set Key = (Custom value of cBox_TempUnit2)
Set Variable Set cBox_scrolledDistance[Key] = "0.00"
Set Variable Set cBox_Velocity[Key] = cBox_InitialVelocity
Set Variable Set cBox_TargetDistance[Key] = cBox_lineSpace
Unit Group - Remove cBox_TempUnit2 from cBox_InactiveGroup .
Unit Group - Add cBox_TempUnit2 to cBox_ScrollGroup
Trigger - Turn on Chat_Scroller <gen>
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_ScrollGroup is empty) Equal to False
Then - Actions
Unit Group - Pick every unit in cBox_ScrollGroup and do (Actions)
Loop - Actions
Set Variable Set cBox_TempUnit2 = (Picked unit)
Set Variable Set Key = (Custom value of cBox_TempUnit2)
Set Variable Set cBox_scrolledDistance[Key] = "0.00"
Set Variable Set cBox_Velocity[Key] = cBox_InitialVelocity
Set Variable Set cBox_TargetDistance[Key] = cBox_lineSpace
Trigger - Turn on Chat_Scroller <gen>
Else - Actions
-------- -------------------------------------- --------
Unit Group - Add (Last created unit) to cBox_ScrollGroup
Trigger - Turn on Chat_Scroller <gen>
-------- -------------------------------------- --------
Else - Actions
-------- If scroll group is not empty (scrolling) --------
-------- Then we instantiate the floating text in queued list --------
-------- To avoid clamping of text --------
-------- -------------------------------------- --------
Set Variable Set cBox_maxQueueInteger = (cBox_maxQueueInteger + 1)
Hashtable - Save Handle Of (Last created unit) as (Key QueuedChat.) of cBox_maxQueueInteger in cBox_Hash .
Floating Text - Hide cBox_floatingText[Key] for (All players)
-------- -------------------------------------- --------
Custom script: call RemoveLocation(udg_cBox_chatStartLocation)
Chat Event P2
Events
Player - Player 1 (Red) skips a cinematic sequence
Conditions
Actions
Set Variable Set cBox_chatStartLocation = (Center of Start_Pixel <gen>)
Unit - Create 1 . cBox_DummyType for Player 2 (Blue) at cBox_chatStartLocation facing 90.00 degrees
Set Variable Set cBox_TempUnit4 = (Last created unit)
Set Variable Set Key = (Custom value of (Last created unit))
Set Variable Set cBox_scrolledDistance[Key] = "0.00"
Set Variable Set cBox_TargetDistance[Key] = cBox_lineSpace
Set Variable Set cBox_currentDistance[Key] = "0.00"
Set Variable Set cBox_Size[Key] = (cBox_NormalSize x 1.50)
Set Variable Set cBox_Transparancy[Key] = "0.00"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
cBox_lastPlayer Equal to Player 2 (Blue)
Then - Actions
Set Variable Set cBox_TempPoint3 = (cBox_chatStartLocation offset by cBox_indentLength towards 0.00 degrees.)
Set Variable Set cBox_X = (X of cBox_TempPoint3)
Set Variable Set cBox_Y = (Y of cBox_TempPoint3)
Custom script: call SetUnitX(udg_cBox_TempUnit4, udg_cBox_X)
Custom script: call SetUnitY(udg_cBox_TempUnit4, udg_cBox_Y)
Custom script: call RemoveLocation(udg_cBox_TempPoint3)
Set Variable Set cBox_Velocity[Key] = cBox_InitialVelocity
Set Variable Set cBox_String[Key] = "Player 2 Testing Message"
Set Variable Set cBox_isName[Key] = "false"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Length of cBox_String[Key]) Greater than or equal to 32
Then - Actions
-------- -------------------------------------- --------
-------- When string reaches 32, floating text will appear weird --------
Game - Display to (All players) the text: (Over Limit! + (String((Length of (Entered chat string)))))
-------- Overloaded string will be seperated into different segments --------
-------- -------------------------------------- --------
-------- String overload system under construction --------
For each (Integer A) from 0 to (Length of (Entered chat string)) , do (Actions)
Loop - Actions
Set Variable Set cBox_String[Key] = (Substring((Entered chat string), (Integer A), (Integer A)))
-------- -------------------------------------- --------
Else - Actions
Floating Text - Create floating text that reads cBox_String[Key] above (Last created unit) with Z offset 0 , using font size cBox_Size[Key] , color ( 100 %, 100 %, 100 %), and 0 % transparency
Floating Text - Change (Last created floating text) : Disable permanence
Set Variable Set cBox_floatingText[Key] = (Last created floating text)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_ScrollGroup is empty) Equal to True
Then - Actions
-------- If scroll group is empty (not scrolling) --------
-------- Then we instantiate the floating text normally --------
-------- Play sound on chat --------
Sound - Play cBox_soundEffect
-------- -------------------------------------- --------
-------- Scroll Inactive text upward --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_InactiveGroup is empty) Equal to False
Then - Actions
Unit Group - Pick every unit in cBox_InactiveGroup and do (Actions)
Loop - Actions
Set Variable Set cBox_TempUnit2 = (Picked unit)
Set Variable Set Key = (Custom value of cBox_TempUnit2)
Set Variable Set cBox_scrolledDistance[Key] = "0.00"
Set Variable Set cBox_Velocity[Key] = cBox_InitialVelocity
Set Variable Set cBox_TargetDistance[Key] = cBox_lineSpace
Unit Group - Remove cBox_TempUnit2 from cBox_InactiveGroup .
Unit Group - Add cBox_TempUnit2 to cBox_ScrollGroup
Trigger - Turn on Chat_Scroller <gen>
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_ScrollGroup is empty) Equal to False
Then - Actions
Unit Group - Pick every unit in cBox_ScrollGroup and do (Actions)
Loop - Actions
Set Variable Set cBox_TempUnit2 = (Picked unit)
Set Variable Set Key = (Custom value of cBox_TempUnit2)
Set Variable Set cBox_scrolledDistance[Key] = "0.00"
Set Variable Set cBox_Velocity[Key] = cBox_InitialVelocity
Set Variable Set cBox_TargetDistance[Key] = cBox_lineSpace
Trigger - Turn on Chat_Scroller <gen>
Else - Actions
-------- -------------------------------------- --------
Unit Group - Add (Last created unit) to cBox_ScrollGroup
Trigger - Turn on Chat_Scroller <gen>
-------- -------------------------------------- --------
Else - Actions
-------- If scroll group is not empty (scrolling) --------
-------- Then we instantiate the floating text in queued list --------
-------- To avoid clamping of text --------
-------- -------------------------------------- --------
Set Variable Set cBox_maxQueueInteger = (cBox_maxQueueInteger + 1)
Hashtable - Save Handle Of (Last created unit) as (Key QueuedChat.) of cBox_maxQueueInteger in cBox_Hash .
Floating Text - Hide cBox_floatingText[Key] for (All players)
-------- -------------------------------------- --------
Else - Actions
Set Variable Set cBox_Velocity[Key] = (cBox_InitialVelocity x 4.00)
Set Variable Set cBox_String[Key] = (Name of Player 2 (Blue))
Set Variable Set cBox_isName[Key] = "true"
Set Variable Set cBox_lastPlayer = Player 2 (Blue)
Set Variable Set Player = Player 2 (Blue)
Trigger - Run GetPlayerColor <gen> (ignoring conditions)
Set Variable Set cBox_String[Key] = (Ccode + (cBox_String[Key] + |r))
Floating Text - Create floating text that reads cBox_String[Key] above (Last created unit) with Z offset 0 , using font size cBox_Size[Key] , color ( 100 %, 100 %, 100 %), and 0 % transparency
Floating Text - Change (Last created floating text) : Disable permanence
Set Variable Set cBox_floatingText[Key] = (Last created floating text)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_ScrollGroup is empty) Equal to True
Then - Actions
-------- If scroll group is empty (not scrolling) --------
-------- Then we instantiate the floating text normally --------
-------- Play sound on chat --------
Sound - Play cBox_soundEffect
-------- -------------------------------------- --------
-------- Scroll Inactive text upward --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_InactiveGroup is empty) Equal to False
Then - Actions
Unit Group - Pick every unit in cBox_InactiveGroup and do (Actions)
Loop - Actions
Set Variable Set cBox_TempUnit2 = (Picked unit)
Set Variable Set Key = (Custom value of cBox_TempUnit2)
Set Variable Set cBox_scrolledDistance[Key] = "0.00"
Set Variable Set cBox_Velocity[Key] = cBox_InitialVelocity
Set Variable Set cBox_TargetDistance[Key] = cBox_lineSpace
Unit Group - Remove cBox_TempUnit2 from cBox_InactiveGroup .
Unit Group - Add cBox_TempUnit2 to cBox_ScrollGroup
Trigger - Turn on Chat_Scroller <gen>
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_ScrollGroup is empty) Equal to False
Then - Actions
Unit Group - Pick every unit in cBox_ScrollGroup and do (Actions)
Loop - Actions
Set Variable Set cBox_TempUnit2 = (Picked unit)
Set Variable Set Key = (Custom value of cBox_TempUnit2)
Set Variable Set cBox_scrolledDistance[Key] = "0.00"
Set Variable Set cBox_Velocity[Key] = cBox_InitialVelocity
Set Variable Set cBox_TargetDistance[Key] = cBox_lineSpace
Trigger - Turn on Chat_Scroller <gen>
Else - Actions
-------- -------------------------------------- --------
Unit Group - Add (Last created unit) to cBox_ScrollGroup
Trigger - Turn on Chat_Scroller <gen>
-------- -------------------------------------- --------
Else - Actions
-------- If scroll group is not empty (scrolling) --------
-------- Then we instantiate the floating text in queued list --------
-------- To avoid clamping of text --------
-------- -------------------------------------- --------
Set Variable Set cBox_maxQueueInteger = (cBox_maxQueueInteger + 1)
Hashtable - Save Handle Of (Last created unit) as (Key QueuedChat.) of cBox_maxQueueInteger in cBox_Hash .
Floating Text - Hide cBox_floatingText[Key] for (All players)
-------- -------------------------------------- --------
-------- -------------------------------------- --------
Unit - Create 1 . cBox_DummyType for Player 2 (Blue) at cBox_chatStartLocation facing 90.00 degrees
Set Variable Set cBox_TempUnit4 = (Last created unit)
Set Variable Set cBox_lastPlayer = (Owner of cBox_TempUnit4)
Set Variable Set cBox_TempPoint3 = (cBox_chatStartLocation offset by cBox_indentLength towards 0.00 degrees.)
Set Variable Set cBox_X = (X of cBox_TempPoint3)
Set Variable Set cBox_Y = (Y of cBox_TempPoint3)
Custom script: call SetUnitX(udg_cBox_TempUnit4, udg_cBox_X)
Custom script: call SetUnitY(udg_cBox_TempUnit4, udg_cBox_Y)
Custom script: call RemoveLocation(udg_cBox_TempPoint3)
Set Variable Set Key = (Custom value of (Last created unit))
Set Variable Set cBox_scrolledDistance[Key] = "0.00"
Set Variable Set cBox_TargetDistance[Key] = cBox_lineSpace
Set Variable Set cBox_Velocity[Key] = cBox_InitialVelocity
Set Variable Set cBox_currentDistance[Key] = "0.00"
Set Variable Set cBox_Size[Key] = (cBox_NormalSize x 1.50)
Set Variable Set cBox_Transparancy[Key] = "0.00"
Set Variable Set cBox_String[Key] = "Player 2 Testing Message"
Set Variable Set cBox_isName[Key] = "false"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Length of cBox_String[Key]) Greater than or equal to 32
Then - Actions
-------- -------------------------------------- --------
-------- When string reaches 32, floating text will appear weird --------
Game - Display to (All players) the text: (Over Limit! + (String((Length of (Entered chat string)))))
-------- Overloaded string will be seperated into different segments --------
-------- -------------------------------------- --------
-------- String overload system under construction --------
For each (Integer A) from 0 to (Length of (Entered chat string)) , do (Actions)
Loop - Actions
Set Variable Set cBox_String[Key] = (Substring((Entered chat string), (Integer A), (Integer A)))
-------- -------------------------------------- --------
Else - Actions
Floating Text - Create floating text that reads cBox_String[Key] above (Last created unit) with Z offset 0 , using font size cBox_Size[Key] , color ( 100 %, 100 %, 100 %), and 0 % transparency
Floating Text - Change (Last created floating text) : Disable permanence
Set Variable Set cBox_floatingText[Key] = (Last created floating text)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_ScrollGroup is empty) Equal to True
Then - Actions
-------- If scroll group is empty (not scrolling) --------
-------- Then we instantiate the floating text normally --------
-------- Play sound on chat --------
Sound - Play cBox_soundEffect
-------- -------------------------------------- --------
-------- Scroll Inactive text upward --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_InactiveGroup is empty) Equal to False
Then - Actions
Unit Group - Pick every unit in cBox_InactiveGroup and do (Actions)
Loop - Actions
Set Variable Set cBox_TempUnit2 = (Picked unit)
Set Variable Set Key = (Custom value of cBox_TempUnit2)
Set Variable Set cBox_scrolledDistance[Key] = "0.00"
Set Variable Set cBox_Velocity[Key] = cBox_InitialVelocity
Set Variable Set cBox_TargetDistance[Key] = cBox_lineSpace
Unit Group - Remove cBox_TempUnit2 from cBox_InactiveGroup .
Unit Group - Add cBox_TempUnit2 to cBox_ScrollGroup
Trigger - Turn on Chat_Scroller <gen>
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_ScrollGroup is empty) Equal to False
Then - Actions
Unit Group - Pick every unit in cBox_ScrollGroup and do (Actions)
Loop - Actions
Set Variable Set cBox_TempUnit2 = (Picked unit)
Set Variable Set Key = (Custom value of cBox_TempUnit2)
Set Variable Set cBox_scrolledDistance[Key] = "0.00"
Set Variable Set cBox_Velocity[Key] = cBox_InitialVelocity
Set Variable Set cBox_TargetDistance[Key] = cBox_lineSpace
Trigger - Turn on Chat_Scroller <gen>
Else - Actions
-------- -------------------------------------- --------
Unit Group - Add (Last created unit) to cBox_ScrollGroup
Trigger - Turn on Chat_Scroller <gen>
-------- -------------------------------------- --------
Else - Actions
-------- If scroll group is not empty (scrolling) --------
-------- Then we instantiate the floating text in queued list --------
-------- To avoid clamping of text --------
-------- -------------------------------------- --------
Set Variable Set cBox_maxQueueInteger = (cBox_maxQueueInteger + 1)
Hashtable - Save Handle Of (Last created unit) as (Key QueuedChat.) of cBox_maxQueueInteger in cBox_Hash .
Floating Text - Hide cBox_floatingText[Key] for (All players)
-------- -------------------------------------- --------
Custom script: call RemoveLocation(udg_cBox_chatStartLocation)
Queue Manager
Events
Conditions
cBox_currentQueueInteger Less than or equal to cBox_maxQueueInteger
cBox_maxQueueInteger Greater than 0
Actions
-------- -------------------------------------- --------
-------- Play sound on chat --------
Sound - Play cBox_soundEffect
-------- -------------------------------------- --------
-------- Scroll Inactive text upward --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_InactiveGroup is empty) Equal to False
Then - Actions
Unit Group - Pick every unit in cBox_InactiveGroup and do (Actions)
Loop - Actions
Set Variable Set cBox_TempUnit2 = (Picked unit)
Set Variable Set Key = (Custom value of cBox_TempUnit2)
Set Variable Set cBox_scrolledDistance[Key] = "0.00"
Set Variable Set cBox_Velocity[Key] = cBox_InitialVelocity
Set Variable Set cBox_TargetDistance[Key] = cBox_lineSpace
Unit Group - Remove cBox_TempUnit2 from cBox_InactiveGroup .
Unit Group - Add cBox_TempUnit2 to cBox_ScrollGroup
Trigger - Turn on Chat_Scroller <gen>
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_ScrollGroup is empty) Equal to False
Then - Actions
Unit Group - Pick every unit in cBox_ScrollGroup and do (Actions)
Loop - Actions
Set Variable Set cBox_TempUnit2 = (Picked unit)
Set Variable Set Key = (Custom value of cBox_TempUnit2)
Set Variable Set cBox_scrolledDistance[Key] = "0.00"
Set Variable Set cBox_Velocity[Key] = cBox_InitialVelocity
Set Variable Set cBox_TargetDistance[Key] = cBox_lineSpace
Trigger - Turn on Chat_Scroller <gen>
Else - Actions
-------- -------------------------------------- --------
-------- Run Queued list in order --------
Set Variable Set cBox_TempUnit3 = (Load (Key QueuedChat.) of cBox_currentQueueInteger in cBox_Hash.)
Set Variable Set Key = (Custom value of cBox_TempUnit3)
Special Effect - Create a special effect attached to the overhead (Unexpected type: 'attachpoint') of cBox_TempUnit3 using Abilities\Spells\Other\TalkToMe\TalkToMe.mdl
Floating Text - Show cBox_floatingText[Key] for (All players)
Set Variable Set cBox_currentQueueInteger = (cBox_currentQueueInteger + 1)
Trigger - Turn off (This trigger)
Unit Group - Add cBox_TempUnit3 to cBox_ScrollGroup
Trigger - Turn on Chat_Scroller <gen>
-------- -------------------------------------- --------
Chat Scroller
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
(cBox_ScrollGroup is empty) Equal to False
Then - Actions
Unit Group - Pick every unit in cBox_ScrollGroup and do (Actions)
Loop - Actions
-------- -------------------------------------- --------
Set Variable Set cBox_TempUnit = (Picked unit)
Set Variable Set Key = (Custom value of cBox_TempUnit)
-------- -------------------------------------- --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
cBox_isName[Key] Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
cBox_scrolledDistance[Key] Less than cBox_TargetDistance[Key]
Then - Actions
-------- -------------------------------------- --------
-------- Decrease chat box size to normal size --------
-------- For animation --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
cBox_Size[Key] Greater than cBox_NormalSize
Then - Actions
Set Variable Set cBox_Size[Key] = (cBox_Size[Key] - (cBox_NormalSize / 20.00))
Else - Actions
-------- -------------------------------------- --------
-------- If velocity exceeds chat distance, set velocity to remaining distance. --------
-------- This is so that the line spacing is perfectly alligned. --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_scrolledDistance[Key] + cBox_Velocity[Key]) Greater than cBox_TargetDistance[Key]
Then - Actions
Set Variable Set cBox_Velocity[Key] = (cBox_TargetDistance[Key] - cBox_scrolledDistance[Key])
Else - Actions
-------- -------------------------------------- --------
-------- Decrease velocity --------
-------- For animation --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
cBox_Velocity[Key] Greater than 1.00
Then - Actions
Set Variable Set cBox_Velocity[Key] = (cBox_Velocity[Key] - (cBox_InitialVelocity / 50.00))
Else - Actions
Set Variable Set cBox_Velocity[Key] = "1.00"
-------- -------------------------------------- --------
-------- Accumulate current distance --------
Set Variable Set cBox_currentDistance[Key] = (cBox_currentDistance[Key] + cBox_Velocity[Key])
-------- -------------------------------------- --------
-------- Move unit location --------
Set Variable Set cBox_TempPoint = (Position of cBox_TempUnit)
Set Variable Set cBox_TempPoint2 = (cBox_TempPoint offset by cBox_Velocity[Key] towards 90.00 degrees.)
Set Variable Set cBox_X = (X of cBox_TempPoint2)
Set Variable Set cBox_Y = (Y of cBox_TempPoint2)
-------- -------------------------------------- --------
-------- Accumulate scrolled distance --------
Set Variable Set cBox_scrolledDistance[Key] = (cBox_scrolledDistance[Key] + cBox_Velocity[Key])
-------- -------------------------------------- --------
-------- If it reach the target distance --------
-------- Stop moving --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
cBox_scrolledDistance[Key] Greater than or equal to cBox_TargetDistance[Key]
Then - Actions
Set Variable Set cBox_Velocity[Key] = "0.00"
Else - Actions
-------- -------------------------------------- --------
-------- Update floating text location --------
-------- -------------------------------------- --------
-------- If floating text exceed floating line limit, remove floating text --------
-------- with dissapearing animation --------
Floating Text - Change text of cBox_floatingText[Key] to cBox_String[Key] using font size cBox_Size[Key]
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
cBox_currentDistance[Key] Greater than or equal to (cBox_MaxDistance + cBox_lineSpace)
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
cBox_currentName Equal to No unit
Then - Actions
Set Variable Set cBox_currentName = cBox_TempUnit
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
cBox_currentName Not equal to cBox_TempUnit
(Owner of cBox_TempUnit) Not equal to (Owner of cBox_currentName)
Then - Actions
Set Variable Set cBox_TempUnit5 = cBox_currentName
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
cBox_TempUnit Not equal to cBox_currentName
Then - Actions
Set Variable Set Key2 = (Custom value of cBox_TempUnit5)
Floating Text - Destroy cBox_floatingText[Key2]
Unit Group - Remove cBox_TempUnit5 from cBox_ScrollGroup .
Unit Group - Remove cBox_TempUnit5 from cBox_InactiveGroup .
Set Variable Set cBox_currentName = cBox_TempUnit
Unit - Remove cBox_TempUnit5 from the game
Else - Actions
Else - Actions
Else - Actions
Custom script: call SetUnitX(udg_cBox_TempUnit, udg_cBox_X)
Custom script: call SetUnitY(udg_cBox_TempUnit, udg_cBox_Y)
Floating Text - Change the position of cBox_floatingText[Key] to cBox_TempUnit with Z offset 0 .
-------- -------------------------------------- --------
-------- Remove leaks --------
Custom script: call RemoveLocation(udg_cBox_TempPoint)
Custom script: call RemoveLocation(udg_cBox_TempPoint2)
-------- -------------------------------------- --------
Else - Actions
-------- -------------------------------------- --------
-------- If chat unit has stopped moving --------
-------- Register unit as inactive --------
Unit Group - Add cBox_TempUnit to cBox_InactiveGroup
Unit Group - Remove cBox_TempUnit from cBox_ScrollGroup .
-------- -------------------------------------- --------
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
cBox_scrolledDistance[Key] Less than cBox_TargetDistance[Key]
Then - Actions
-------- -------------------------------------- --------
-------- Decrease chat box size to normal size --------
-------- For animation --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
cBox_Size[Key] Greater than cBox_NormalSize
Then - Actions
Set Variable Set cBox_Size[Key] = (cBox_Size[Key] - (cBox_NormalSize / 20.00))
Else - Actions
-------- -------------------------------------- --------
-------- If velocity exceeds chat distance, set velocity to remaining distance. --------
-------- This is so that the line spacing is perfectly alligned. --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(cBox_scrolledDistance[Key] + cBox_Velocity[Key]) Greater than cBox_TargetDistance[Key]
Then - Actions
Set Variable Set cBox_Velocity[Key] = (cBox_TargetDistance[Key] - cBox_scrolledDistance[Key])
Else - Actions
-------- -------------------------------------- --------
-------- Decrease velocity --------
-------- For animation --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
cBox_Velocity[Key] Greater than 1.00
Then - Actions
Set Variable Set cBox_Velocity[Key] = (cBox_Velocity[Key] - (cBox_InitialVelocity / 50.00))
Else - Actions
Set Variable Set cBox_Velocity[Key] = "1.00"
-------- -------------------------------------- --------
-------- Accumulate current distance --------
Set Variable Set cBox_currentDistance[Key] = (cBox_currentDistance[Key] + cBox_Velocity[Key])
-------- -------------------------------------- --------
-------- Move unit location --------
Set Variable Set cBox_TempPoint = (Position of cBox_TempUnit)
Set Variable Set cBox_TempPoint2 = (cBox_TempPoint offset by cBox_Velocity[Key] towards 90.00 degrees.)
Set Variable Set cBox_X = (X of cBox_TempPoint2)
Set Variable Set cBox_Y = (Y of cBox_TempPoint2)
Custom script: call SetUnitX(udg_cBox_TempUnit, udg_cBox_X)
Custom script: call SetUnitY(udg_cBox_TempUnit, udg_cBox_Y)
-------- -------------------------------------- --------
-------- Accumulate scrolled distance --------
Set Variable Set cBox_scrolledDistance[Key] = (cBox_scrolledDistance[Key] + cBox_Velocity[Key])
-------- -------------------------------------- --------
-------- If it reach the target distance --------
-------- Stop moving --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
cBox_scrolledDistance[Key] Greater than or equal to cBox_TargetDistance[Key]
Then - Actions
Set Variable Set cBox_Velocity[Key] = "0.00"
Else - Actions
-------- -------------------------------------- --------
-------- Update floating text location --------
Floating Text - Change the position of cBox_floatingText[Key] to cBox_TempUnit with Z offset 0 .
Floating Text - Change text of cBox_floatingText[Key] to cBox_String[Key] using font size cBox_Size[Key]
-------- -------------------------------------- --------
-------- If floating text exceed floating line limit, remove floating text --------
-------- with dissapearing animation --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
cBox_currentDistance[Key] Greater than or equal to (cBox_MaxDistance - (cBox_lineSpace x 2.00))
Then - Actions
Set Variable Set cBox_Transparancy[Key] = ((((cBox_lineSpace x 2.00) - (cBox_MaxDistance - cBox_currentDistance[Key])) / (cBox_lineSpace x 2.00)) x 100.00)
Floating Text - Change the color of cBox_floatingText[Key] to ( 100 %, 100 %, 100 %) with cBox_Transparancy[Key] % transparency
Animation - Change cBox_TempUnit 's vertex coloring to ( 100 %, 100 %, 100 %) with cBox_Transparancy[Key] % transparency
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
cBox_Transparancy[Key] Greater than or equal to 100.00
Then - Actions
Floating Text - Destroy cBox_floatingText[Key]
Unit Group - Remove cBox_TempUnit from cBox_ScrollGroup .
Unit Group - Remove cBox_TempUnit from cBox_InactiveGroup .
Unit - Remove cBox_TempUnit from the game
Else - Actions
Else - Actions
-------- -------------------------------------- --------
-------- Remove leaks --------
Custom script: call RemoveLocation(udg_cBox_TempPoint)
Custom script: call RemoveLocation(udg_cBox_TempPoint2)
-------- -------------------------------------- --------
Else - Actions
-------- -------------------------------------- --------
-------- If chat unit has stopped moving --------
-------- Register unit as inactive --------
Unit Group - Add cBox_TempUnit to cBox_InactiveGroup
Unit Group - Remove cBox_TempUnit from cBox_ScrollGroup .
-------- -------------------------------------- --------
Else - Actions
-------- -------------------------------------- --------
-------- If there is no longer moving chat animations --------
-------- Turn off this trigger --------
Trigger - Turn off (This trigger)
-------- -------------------------------------- --------
-------- Run queue list in order as the chat animation ends --------
Trigger - Run Queue_Manager <gen> (checking conditions)
-------- -------------------------------------- --------
Top