• 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

Simple Personal Inventory System v1.0.w3x
Variables
Simple Personal Inventory System
PI Setup
PI Save
PI Store
PI Get
---------------------------
Vexorian
SimError
---------------------------
Bribe
Unit Indexer
Untitled Category
Untitled Trigger 001
Untitled Trigger 002
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.
function SimError takes nothing returns nothing
    if udg_TempItem != null then
        set udg_TempString = "\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n|cffffcc00"+udg_TempString+"."+"|r"
        set udg_TempItem = null
    else
        set udg_TempString = "\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n|cffffcc00"+udg_TempString+"|r"
    endif
    if (GetLocalPlayer() == udg_TempPlayer) then
        call ClearTextMessages()
        call DisplayTimedTextToPlayer(udg_TempPlayer, 0.52, 0.96, 2.00, udg_TempString)
        call StartSound(udg_ErrorSound)
    endif
endfunction
Name Type is_array initial_value
ErrorSound sound No
LoopingInteger integer No
PI_1UnitOnlyMessage string No
PI_Dummy unit Yes
PI_DummyType unitcode No
PI_InvalidSlotMessage string No
PI_Key integer No
PI_NoItemMessage string No
PI_OccupiedSlotMessage string No
PI_SpawnDummyLoc location No
TempGroup group No
TempInteger integer No
TempItem item No
TempItem2 item No
TempPlayer player No
TempString string No
TempUnit 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
PI Setup
Events
Map initialization
Conditions
Actions
-------- ---------- --------
-------- Make sure this setting match --------
-------- It varies with your World Editor Raw ID, that is why you have to make sure it is the correct ID for this dummy --------
-------- ---------- --------
-------- Set PI_DummyType = Dummy Inventory (Personal Inventory) --------
-------- ---------- --------
-------- MISC CONFIGURABLES --------
-------- ---------- --------
-------- PI_OccupiedMessage sets the message to appear on screen when there is an item at that slot (you should leave a space at the end of the message) --------
-------- PI_InvalidSlotMessage sets the message to appear on screen when you are trying to store/get to an invalid slot (other than 1 - 6) --------
-------- PI_1UnitOnlyMessage sets the message to appear on screen when you are selecting more than 1 unit at a time --------
-------- PI_NoItemMessage sets the message to appear on screen when you are trying to store/get a null item at that slot --------
-------- ---------- --------
Set Variable Set PI_DummyType = "h000"
Set Variable Set PI_OccupiedSlotMessage = "This slot has been occupied by "
Set Variable Set PI_InvalidSlotMessage = "Invalid slot."
Set Variable Set PI_1UnitOnlyMessage = "You must select only 1 unit at a time."
Set Variable Set PI_NoItemMessage = "There is no item at that slot."
-------- ---------- --------
-------- END OF CONFIGURABLES --------
-------- ---------- --------
-------- Do not clean this location as it will be re-use when new Hero with new Index enters the map --------
Set Variable Set PI_SpawnDummyLoc = (Center of (Playable map area))
For each (Integer LoopingInteger ) from 1 to 12 , do (Actions)
Loop - Actions
Trigger - Add to PI_Store <gen> the event ((Player(LoopingInteger)) types a chat message containing -store (Unexpected type: 'stringnoformat') as A substring)
For each (Integer LoopingInteger ) from 1 to 12 , do (Actions)
Loop - Actions
Trigger - Add to PI_Get <gen> the event ((Player(LoopingInteger)) types a chat message containing -get (Unexpected type: 'stringnoformat') as A substring)
PI Save
Events
Game - UnitIndexEvent becomes Equal to 1.00
Conditions
(UDexUnits[UDex] is A Hero) Equal to True
Actions
Set Variable Set PI_Key = (Custom value of UDexUnits[UDex])
Unit - Create 1 . PI_DummyType for (Owner of UDexUnits[UDex]) at PI_SpawnDummyLoc facing Default building facing degrees
Set Variable Set PI_Dummy[PI_Key] = (Last created unit)
Default melee game initialization for all players
PI Store
Events
Conditions
Actions
Set Variable Set TempPlayer = (Triggering player)
Set Variable Set TempInteger = (Integer((Substring((Entered chat string), 8, 9))))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
TempInteger Greater than 0
TempInteger Less than 7
Then - Actions
Set Variable Set TempGroup = (Units currently selected by (Triggering player))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in TempGroup) Greater than 1
Then - Actions
Set Variable Set TempString = PI_1UnitOnlyMessage
Custom script: call SimError()
Else - Actions
Set Variable Set TempUnit = (Random unit from TempGroup)
Set Variable Set PI_Key = (Custom value of TempUnit)
Set Variable Set TempItem = (Item carried by PI_Dummy[PI_Key] in slot TempInteger)
Set Variable Set TempItem2 = (Item carried by TempUnit in slot TempInteger)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
TempItem2 Equal to No item
Then - Actions
Set Variable Set TempString = PI_NoItemMessage
Custom script: call SimError()
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
TempItem Not equal to No item
Then - Actions
Custom script: set udg_TempString = udg_PI_OccupiedSlotMessage + GetItemName(udg_TempItem)
Custom script: call SimError()
Else - Actions
Hero - Give TempItem2 to PI_Dummy[PI_Key]
Unit - Order PI_Dummy[PI_Key] to move TempItem2 to inventory slot TempInteger .
Custom script: call DestroyGroup(udg_TempGroup)
Else - Actions
Set Variable Set TempString = PI_InvalidSlotMessage
Custom script: call SimError()
PI Get
Events
Conditions
Actions
Set Variable Set TempPlayer = (Triggering player)
Set Variable Set TempInteger = (Integer((Substring((Entered chat string), 6, 7))))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
TempInteger Greater than 0
TempInteger Less than 7
Then - Actions
Set Variable Set TempGroup = (Units currently selected by (Triggering player))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in TempGroup) Greater than 1
Then - Actions
Set Variable Set TempString = PI_1UnitOnlyMessage
Custom script: call SimError()
Else - Actions
Set Variable Set TempUnit = (Random unit from TempGroup)
Set Variable Set PI_Key = (Custom value of TempUnit)
Set Variable Set TempItem = (Item carried by PI_Dummy[PI_Key] in slot TempInteger)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
TempItem Equal to No item
Then - Actions
Set Variable Set TempString = PI_NoItemMessage
Custom script: call SimError()
Else - Actions
Set Variable Set TempItem2 = (Item carried by TempUnit in slot TempInteger)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
TempItem2 Not equal to No item
Then - Actions
Custom script: set udg_TempString = udg_PI_OccupiedSlotMessage + GetItemName(udg_TempItem2)
Custom script: call SimError()
Else - Actions
Hero - Give TempItem to TempUnit
Unit - Order TempUnit to move TempItem to inventory slot TempInteger .
Custom script: call DestroyGroup(udg_TempGroup)
Else - Actions
Set Variable Set TempString = PI_InvalidSlotMessage
Custom script: call SimError()
SimError
Events
Map initialization
Conditions
Actions
Custom script: set udg_ErrorSound = CreateSoundFromLabel("InterfaceError", false, false, false, 10, 10)
This trigger works in two key phases:

1) During map initialization, enumerate all units of all players to give them an index.
2) Adds a second event to itself to index new units as they enter the map.

As a unit enters the map, check for any old units that may have been removed at some point in order to free their index.
Unit Indexer
Events
Map initialization
Conditions
Actions
Custom script: call ExecuteFunc("InitializeUnitIndexer")
Custom script: endfunction
-------- --------
-------- This is the most important function - it provides an index for units as they enter the map --------
-------- --------
Custom script: function IndexUnit takes nothing returns boolean
Custom script: local integer pdex = udg_UDex
-------- --------
-------- You can use the boolean UnitIndexerEnabled to protect some of your undesirable units from being indexed --------
-------- - Example: --------
-------- -- Set UnitIndexerEnabled = False --------
-------- -- Unit - Create 1 Dummy for (Triggering player) at TempLoc facing 0.00 degrees --------
-------- -- Set UnitIndexerEnabled = True --------
-------- --------
-------- You can also customize the following block - if conditions are false the (Matching unit) won't be indexed. --------
-------- --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
UnitIndexerEnabled Equal to True
Then - Actions
-------- --------
-------- Generate a unique integer index for this unit --------
-------- --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
UDexRecycle Equal to 0
Then - Actions
Set Variable Set UDex = (UDexGen + 1)
Set Variable Set UDexGen = UDex
Else - Actions
Set Variable Set UDex = UDexRecycle
Set Variable Set UDexRecycle = UDexNext[UDex]
-------- --------
-------- Link index to unit, unit to index --------
-------- --------
Set Variable Set UDexUnits[UDex] = (Matching unit)
Unit - Set the custom value of UDexUnits[UDex] to UDex
-------- --------
-------- Use a doubly-linked list to store all active indexes --------
-------- --------
Set Variable Set UDexPrev[UDexNext[0]] = UDex
Set Variable Set UDexNext[UDex] = UDexNext[0]
Set Variable Set UDexNext[0] = UDex
-------- --------
-------- Fire index event for UDex --------
-------- --------
Set Variable Set UnitIndexEvent = "0.00"
Set Variable Set UnitIndexEvent = "1.00"
Set Variable Set UnitIndexEvent = "0.00"
Custom script: set udg_UDex = pdex
Else - Actions
Custom script: return false
Custom script: endfunction
-------- --------
-------- The next function is called each time a unit enters the map --------
-------- --------
Custom script: function IndexNewUnit takes nothing returns boolean
Custom script: local integer pdex = udg_UDex
Custom script: local integer ndex
-------- --------
-------- Recycle indices of units no longer in-play every (15) units created --------
-------- --------
Set Variable Set UDexWasted = (UDexWasted + 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
UDexWasted Equal to 15
Then - Actions
Set Variable Set UDexWasted = "0"
Set Variable Set UDex = UDexNext[0]
Custom script: loop
Custom script: exitwhen udg_UDex == 0
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of UDexUnits[UDex]) Equal to 0
Then - Actions
-------- --------
-------- Remove index from linked list --------
-------- --------
Custom script: set ndex = udg_UDexNext[udg_UDex]
Custom script: set udg_UDexNext[udg_UDexPrev[udg_UDex]] = ndex
Custom script: set udg_UDexPrev[ndex] = udg_UDexPrev[udg_UDex]
Set Variable Set UDexPrev[UDex] = "0"
-------- --------
-------- Fire deindex event for UDex --------
-------- --------
Set Variable Set UnitIndexEvent = "2.00"
Set Variable Set UnitIndexEvent = "0.00"
-------- --------
-------- Recycle the index for later use --------
-------- --------
Set Variable Set UDexUnits[UDex] = No unit
Set Variable Set UDexNext[UDex] = UDexRecycle
Set Variable Set UDexRecycle = UDex
Custom script: set udg_UDex = ndex
Else - Actions
Set Variable Set UDex = UDexNext[UDex]
Custom script: endloop
Custom script: set udg_UDex = pdex
Else - Actions
-------- --------
-------- Handle the entering unit (Matching unit) --------
-------- --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of (Matching unit)) Equal to 0
((Matching unit) is A Hero) Equal to True
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"
Untitled Trigger 001
Events
Player - Player 1 (Red) skips a cinematic sequence
Conditions
Actions
Unit - Create 1 . Mountain King for Player 1 (Red) at (Center of (Playable map area)) facing Default building facing degrees
Untitled Trigger 002
Events
Map initialization
Conditions
Actions
Game - Display to (All players) for 999.00 seconds the text: Press F9 if you don't know how to use this system.
Quest - Create a Required quest titled HOW TO USE with the description HOW TO USE:To store item from a Hero;-store X (X = 1 - 6)Example: -store 3 (to store item from your Slot 3)To get the item back;-get X (X = 1 - 6)Example: -get 3 (to get the stored item you stored on Slot 3)SIDE NOTE:- Maximum number of items that can be stored per Hero is 6.- You must select 1 Hero at a time to use this system. , using icon path ReplaceableTextures\CommandButtons\BTNSelectHeroOff.blp
Top