• 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

(8)GolemsInTheMist.w3x
Variables
Init
RaceSelectExpire
Map Initialization
GetReady
CRAI
RandomizeNames
SetUpRaceDialog
Select Race
ForceSelect
CRAI
Gnoll Huts Copy
Gnoll Huts
Forrest Backup
FlyingOger
Defeated
Correct Minecart
CRAI 2nd Townhall
CRAI 2nd Townhall Copy
Debug
test
DebugInfo
OrderPoint
OrderTarget
OrderNoTarget
Ignorance
S Ignorance OFF
S Ignorance ON u OFF
Acid Rain
Acid Rain Starts
Acid Rain End
Catapult
StartCatapult
Harvest
BuildingUnderConstruction
ConstructionCanceled
ConstructionFinished
CancelReturnLumber
CancelReturnLumber2
TreeIsCut
TreeIsCutForrestBackup
CreatedTree
CreatedTreeForrest Backup
WalkingTreeComes
WalkingTreeDies
SelectHarvestTarget
SelectHarvestTarget Point
GatherGold
MineCartRebuilt
MineEmpty
OutOfMine
AttackNoMove
NoMove
MineCartUnloadsAll
MineCartUnloads
MineCartLoads
MineTargeted
MineCartDies
OgerEncampment
EncampmentDown
EncampmentBuild
BuildingOfEncampmentCanceled
AttackingTreeMove
ForrestBackup
ForrestBackupTimerExpires
ExpansionTownMineCart
MineCartDestroyed
NewMineCartOrdered
MineCartBuildCancel
WoodchanterNumber
GnollHut
UnitIsInGnollHut
UnitOutOfGnollHut
AllUnitsOutOfGnollHut
Spiritualize
StartSpiritualize
CastCanceled
CasterDies
GnollGiftedTrained
Spiritualize
RageWard
RageWardSFX
BloodLink
BloodLinkStart
SpeakerTower
SpeakerTowerIsBuild
SpeakerTowerDestroyed
AltarOfRebellion
HeroIsTrained
StunGrenade
StartStunGrenade
LightGrenade
StartLightGrenade
LimitHeroes
LimitHeroes
UnLimitHeroes
UnLimitWhenFinished
Item Luck
TurtleDies
ItemLuck
SelectItemType
TameTurtle
Unmoint Poarcher
TameTurtle
Magic Pain
MagicPain
TeamColoredUnits
UnitProduced
SpiritSummoned
MindBreak
MindBreak
GoblinTimeBomb
BombGetsKilled
GoblinTimeBomb
GoblinTimeBomb Copy
VoodooBlade
VoodooBlade
PoisonNova
PoisonNova
BattleCry
BattleCry
BattleCry Copy
BattleCryCanceled
BattleCryCanceled Copy
ShadowVamp
ShadowVampEffect
ShadowVampAbillities
VampAbillities
VampAbillities Copy
VampireHeight
VampireCrash
TemptressRestore
Assassinate
Assassinate
Assassinate Strike
Bite
Bite
SiegeMachinery
SiegeMachineryBuilt
SiegeDownRoot
SiegeUpRoot
Loyalty
LoadLoyaltyCancel
LoyaltyCanceled
LoyaltyCast
SFX
NoBigBadVoodoo
Steal Gold
Steal Gold
Steal Cancel
Steal Gold Copy
Spy
Spy
SpyNew
Spy Copy
123
Untitled Trigger 001
Untitled Trigger 002
Untitled Trigger 003
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
AliveMineCarts integer No
AliveTownhallCount integer No
AntiFood unit Yes
BattleCryActive boolean Yes
BattleCryLevelTemp integer No
BattleCryPlayerTemp player No
BattleCrySteps integer Yes 1
BBRevive_Owner player No
BloodBrother unit Yes
BTNS_RaceDialog button Yes
BuildingsUnderConstruction group No
CRAI_AI_RND integer No
CRAI_Count integer No 1
CRAI_Defeat_Count integer No
CRAI_Fleeing_Units group No
CRAI_Name_temp string No
CRAI_NameRND integer Yes
CRAI_Names string Yes
CRAI_Player player No
CRAI_Players boolean Yes
DummyCount integer No
ForrestBackupCounter integer No
ForrestBackupTimer timer Yes
ForrestBackupUnits unit Yes
FortifyEffects effect Yes
FoundHarvestTarget boolean No
GnollGiftedNumber integer No
HarvestDistance real No
HarvestMinRangeUnit unit No
HarvestReturnTarget unit No
HarvestReturnTargets unit Yes
HarvestTreeTargets destructable Yes
ItemClass integer No
ItemLevel integer No
ItemLuckTurtle unit No
ItemType itemcode No
LightGrenadeGroup group No
Loyalty_ItemDrop item Yes
LoyaltyActive boolean No
LoyaltyOwner player Yes
LoyaltyTargets unit Yes
LoyaltyTemp unit No
MineCartCount integer No
MineFull boolean No
MinesTargeted unit Yes
NrOfTownhalls integer Yes
NrPlayersReady integer No
PlayerReady boolean Yes
RaceDialog dialog No
RaceDialogs dialog Yes
RaceSelectTimer timer No
RandomRace integer No
RevealBuilding unit Yes
RevivePoint location No
RndNumber integer No
ShadowVamp unit No
SiegeMachinery_Count integer No
SiegeMachineryGlobal unit No
SiegeMachineryTarget location No
SpeakerTower_SFX effect Yes
SpeakerTowerNumber integer No
SpellAktiv boolean Yes
SpellDauer real Yes
SpiritualizeTargets unit Yes
SpyUsedUnitGroup group No
StartMineCartTemp unit No
StunGrenadeGroup group No
SV_Owner player No
SV_Position location No
TimeBombCounter boolean Yes
TimeBombPlayer player No
TimeBombs unit Yes
VoodooBladeChance integer No
WoodChanterCVTemp integer No
WoodChanterNumber integer No
RaceSelectExpire
Events
Time - RaceSelectTimer expires
Conditions
Actions
Trigger - Run ForceSelect <gen> (ignoring conditions)
Map Initialization
Events
Map initialization
Conditions
Actions
Countdown Timer - Start RaceSelectTimer as a One-shot timer that will expire in 15.00 seconds
Set Variable Set SpellDauer[1] = "20.00"
Set Variable Set SpellDauer[2] = "35.00"
Set Variable Set SpellDauer[3] = "50.00"
Game - Display to (All players) the text: |cffffcc00Synchronize, please wait...|r
Wait 2.00 game-time seconds
Melee Game - Remove creeps and critters from used start locations (for all players)
Quest - Create a Required quest titled Credits with the description |cffffcc00Idea, Trigger and Models:|r SantoRayo[iP]|cffffcc00Icons:|r SantoRayo[iP], WoW|cffffcc00Testing & Consulting:|r DarK.FoRcEvisit: http://www.creep-rebellion.de.tf for news and downloads. , using icon path ReplaceableTextures\CommandButtons\BTNSeal.blp
Quest - Create a Required quest titled CRAI with the description |cffffcc00CRAI|r is a short term for the Creep Rebellion Artificial Intelligence. In other words: it's possible to play against a Creep Rebellion AI player. The only thing you have to do is to set the handicap of a normal Computer player to |cffffcc0060%|r and he will play the new race. , using icon path ReplaceableTextures\WorldEditUI\Editor-Toolbar-AIEditor.blp
Quest - Create a Required quest titled Version Info with the description You are playing |cffffcc00v1.07|r of Creep Rebellion.Visit |cffffcc00http://www.creep-rebellion.de.tf|r for the most current version. , using icon path ReplaceableTextures\WorldEditUI\StartingLocation.blp
Player Group - Pick every player in (All players matching (((Matching player) controller) Equal to Computer).) and do (Actions)
Loop - Actions
Set Variable Set NrPlayersReady = (NrPlayersReady + 1)
Set Variable Set PlayerReady[(Player number of (Picked player))] = "true"
Trigger - Run SetUpRaceDialog <gen> (ignoring conditions)
GetReady
Events
Conditions
Actions
Melee Game - Limit Heroes to 1 per Hero-type (for all players)
Melee Game - Use melee time of day (for all players)
Melee Game - Give trained Heroes a Scroll of Town Portal (for all players)
Melee Game - Set starting resources (for all players)
If ((Race of Player 2 (Blue)) Equal to Demon) then do (Display to (All players) the text: random!) else do (Do nothing)
Melee Game - Enforce victory/defeat conditions (for all players)
Player Group - Pick every player in (All players controlled by a Computer player) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked player) handicap) Equal to 60.00
Then - Actions
Set Variable Set CRAI_Player = (Picked player)
Set Variable Set CRAI_Players[(Player number of (Picked player))] = "true"
Trigger - Run CRAI <gen> (ignoring conditions)
Else - Actions
If ((Race of (Picked player)) Equal to Human) then do (Create Human starting units for (Picked player) at ((Picked player) start location) (Include Heroes)) else do (Do nothing)
If ((Race of (Picked player)) Equal to Orc) then do (Create Orc starting units for (Picked player) at ((Picked player) start location) (Include Heroes)) else do (Do nothing)
If ((Race of (Picked player)) Equal to Undead) then do (Create Undead starting units for (Picked player) at ((Picked player) start location) (Include Heroes)) else do (Do nothing)
If ((Race of (Picked player)) Equal to Night Elf) then do (Create Night Elf starting units for (Picked player) at ((Picked player) start location) (Include Heroes)) else do (Do nothing)
Melee Game - Run melee AI scripts (for computer players)
Player Group - Pick every player in (All players) and do (Limit training of Vile Temptress to 1 for (Picked player))
Cinematic - Enable user control for (All players) .
Wait 15.00 game-time seconds
Game - Display to (All players) the text: |cffffcc00Message: |rVisit |cff8080FFhttp://www.creep-rebellion.de.tf |rfor updates and press |cff8080FFF9|r for instructions and how to play against a Creep Rebellion computer player.
CRAI
Events
Conditions
Actions
Set Variable Set CRAI_AI_RND = (Random integer number between 1 and 3)
Player - Set CRAI_Player handicap to 100 %
Melee Game - Create Human starting units for CRAI_Player at (CRAI_Player start location) ( Include Heroes)
Unit Group - Pick every unit in (Units in (Playable map area) matching ((Owner of (Matching unit)) Equal to CRAI_Player)) and do (Remove (Picked unit) from the game)
Unit - Create 1 . Oger Encampment for CRAI_Player at (CRAI_Player start location) facing Default building facing degrees
Set Variable Set NrOfTownhalls[(Player number of CRAI_Player)] = (NrOfTownhalls[(Player number of CRAI_Player)] + 1)
Set Variable Set MineCartCount = (MineCartCount + 1)
Unit - Create 1 . Mine Cart for CRAI_Player at ((CRAI_Player start location) offset by (100.00, -320.00)) facing Default building facing degrees
Unit - Set the custom value of (Last created unit) to MineCartCount
Set Variable Set StartMineCartTemp = (Last created unit)
Player - Limit training of Mine Cart to 1 for CRAI_Player
Unit - Create 1 . Wood Chanter for CRAI_Player at ((CRAI_Player start location) offset by (100.00, -320.00)) facing Default building facing degrees
Unit - Set the custom value of (Last created unit) to WoodChanterNumber
Set Variable Set WoodChanterNumber = (WoodChanterNumber + 1)
Unit - Order (Last created unit) to Board . StartMineCartTemp
Unit - Create 1 . Wood Chanter for CRAI_Player at ((CRAI_Player start location) offset by (100.00, -320.00)) facing Default building facing degrees
Unit - Set the custom value of (Last created unit) to WoodChanterNumber
Set Variable Set WoodChanterNumber = (WoodChanterNumber + 1)
Unit - Order (Last created unit) to Board . StartMineCartTemp
Unit - Create 1 . Wood Chanter for CRAI_Player at ((CRAI_Player start location) offset by (100.00, -320.00)) facing Default building facing degrees
Unit - Set the custom value of (Last created unit) to WoodChanterNumber
Set Variable Set WoodChanterNumber = (WoodChanterNumber + 1)
Unit - Order (Last created unit) to Board . StartMineCartTemp
Unit - Create 1 . Wood Chanter for CRAI_Player at ((CRAI_Player start location) offset by (100.00, -320.00)) facing Default building facing degrees
Unit - Set the custom value of (Last created unit) to WoodChanterNumber
Set Variable Set WoodChanterNumber = (WoodChanterNumber + 1)
Unit - Order (Last created unit) to Board . StartMineCartTemp
Unit - Create 1 . Wood Chanter for CRAI_Player at ((CRAI_Player start location) offset by (100.00, -320.00)) facing Default building facing degrees
Unit - Set the custom value of (Last created unit) to WoodChanterNumber
Set Variable Set WoodChanterNumber = (WoodChanterNumber + 1)
Unit - Order (Last created unit) to Board . StartMineCartTemp
Player - Make Berserker Gnoll Unavailable for training/construction by CRAI_Player
Player - Make Transport Turtle (Berserk) Unavailable for training/construction by CRAI_Player
Unit - Create 1 . Town Hall for CRAI_Player at (CRAI_Player start location) facing Default building facing degrees
Set Variable Set RevealBuilding[(Player number of CRAI_Player)] = (Last created unit)
Unit - Hide (Last created unit)
Unit - Add Invulnerable (Neutral) to (Last created unit)
Unit - Turn collision for (Last created unit) Off .
Unit - Remove Return Gold and Lumber from (Last created unit)
Unit - Create 1 . Anti-Food for CRAI_Player at (CRAI_Player start location) facing Default building facing degrees
Set Variable Set AntiFood[(Player number of CRAI_Player)] = (Last created unit)
Unit - Hide (Last created unit)
Unit - Turn collision for (Last created unit) Off .
Player - Limit training of to 1 for CRAI_Player
Player - Limit training of to 1 for CRAI_Player
Player - Limit training of to 1 for CRAI_Player
Player - Limit training of to 1 for CRAI_Player
If (CRAI_AI_RND Equal to 1) then do (Start melee AI script for CRAI_Player: war3mapImported\CRAI.ai (Unexpected type: 'aiscript')) else do (Do nothing)
If (CRAI_AI_RND Equal to 2) then do (Start melee AI script for CRAI_Player: war3mapImported\CRAI2.ai (Unexpected type: 'aiscript')) else do (Do nothing)
If (CRAI_AI_RND Equal to 3) then do (Start melee AI script for CRAI_Player: war3mapImported\CRAI3.ai (Unexpected type: 'aiscript')) else do (Do nothing)
Player - Set name of CRAI_Player to CRAI_Names[CRAI_Count]
Set Variable Set CRAI_Count = (CRAI_Count + 1)
RandomizeNames
Events
Map initialization
Conditions
Actions
Set Variable Set CRAI_Names[1] = "Kill0r (CRAY)"
Set Variable Set CRAI_Names[2] = "I_own_you (CRAI)"
Set Variable Set CRAI_Names[3] = "Dumbass (CRAI)"
Set Variable Set CRAI_Names[4] = "N00bie (CRAI)"
Set Variable Set CRAI_Names[5] = "Lame (CRAI)"
Set Variable Set CRAI_Names[6] = "Dr. Jekyll (CRAI)"
Set Variable Set CRAI_Names[7] = "Mr. Hide (CRAI)"
Set Variable Set CRAI_Names[8] = "Gee Gee (CRAI)"
Set Variable Set CRAI_Names[9] = "Chaos (CRAI)"
Set Variable Set CRAI_Names[10] = "Neuro (CRAI)"
Set Variable Set CRAI_Names[11] = "Chemo (CRAI)"
Set Variable Set CRAI_Names[12] = "Fray (CRAI)"
Set Variable Set CRAI_Names[13] = "Ghost Lawyer (CRAI)"
Set Variable Set CRAI_Names[14] = "Victor (CRAI)"
Set Variable Set CRAI_Names[15] = "Pain (CRAI)"
For each (Integer A) from 1 to 20 , do (Actions)
Loop - Actions
Set Variable Set CRAI_NameRND[1] = (Random integer number between 1 and 15)
Set Variable Set CRAI_NameRND[2] = (Random integer number between 1 and 15)
Set Variable Set CRAI_Name_temp = CRAI_Names[CRAI_NameRND[1]]
Set Variable Set CRAI_Names[CRAI_NameRND[1]] = CRAI_Names[CRAI_NameRND[2]]
Set Variable Set CRAI_Names[CRAI_NameRND[2]] = CRAI_Name_temp
SetUpRaceDialog
Events
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of players in (All players matching ((((Matching player) controller) Equal to User) and (((Matching player) slot status) Equal to Is playing)).)) Equal to 0
Then - Actions
Trigger - Run GetReady <gen> (ignoring conditions)
Trigger - Turn off RaceSelectExpire <gen>
Skip remaining actions
Else - Actions
For each (Integer A) from 1 to 12 , do (Actions)
Loop - Actions
Dialog - Change the title of RaceDialogs[(Integer A)] to Select Race
Dialog - Create a dialog button for RaceDialogs[(Integer A)] labelled Human
Set Variable Set BTNS_RaceDialog[((((Integer A) - 1) x 6) + 0)] = (Last created dialog Button)
Dialog - Create a dialog button for RaceDialogs[(Integer A)] labelled Orc
Set Variable Set BTNS_RaceDialog[((((Integer A) - 1) x 6) + 1)] = (Last created dialog Button)
Dialog - Create a dialog button for RaceDialogs[(Integer A)] labelled Undead
Set Variable Set BTNS_RaceDialog[((((Integer A) - 1) x 6) + 2)] = (Last created dialog Button)
Dialog - Create a dialog button for RaceDialogs[(Integer A)] labelled Night Elf
Set Variable Set BTNS_RaceDialog[((((Integer A) - 1) x 6) + 3)] = (Last created dialog Button)
Dialog - Create a dialog button for RaceDialogs[(Integer A)] labelled Creep Rebellion
Set Variable Set BTNS_RaceDialog[((((Integer A) - 1) x 6) + 4)] = (Last created dialog Button)
Dialog - Create a dialog button for RaceDialogs[(Integer A)] labelled Random
Set Variable Set BTNS_RaceDialog[((((Integer A) - 1) x 6) + 5)] = (Last created dialog Button)
Player Group - Pick every player in (All players matching (((Matching player) slot status) Equal to Is playing).) and do (Actions)
Loop - Actions
Dialog - Show RaceDialogs[(Player number of (Picked player))] for (Picked player)
Select Race
Events
Dialog - A dialog button is clicked for RaceDialogs[1]
Dialog - A dialog button is clicked for RaceDialogs[2]
Dialog - A dialog button is clicked for RaceDialogs[3]
Dialog - A dialog button is clicked for RaceDialogs[4]
Dialog - A dialog button is clicked for RaceDialogs[5]
Dialog - A dialog button is clicked for RaceDialogs[6]
Dialog - A dialog button is clicked for RaceDialogs[7]
Dialog - A dialog button is clicked for RaceDialogs[8]
Dialog - A dialog button is clicked for RaceDialogs[9]
Dialog - A dialog button is clicked for RaceDialogs[10]
Dialog - A dialog button is clicked for RaceDialogs[11]
Dialog - A dialog button is clicked for RaceDialogs[12]
Conditions
Actions
Cinematic - Disable user control for (Player group((Triggering player))) .
Set Variable Set NrPlayersReady = (NrPlayersReady + 1)
For each (Integer A) from 1 to 12 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Clicked dialog button) Equal to BTNS_RaceDialog[((((Integer A) - 1) x 6) + 0)]
Then - Actions
Game - Display to (All players) the text: ((|cffffcc00 + (Name of (Triggering player))) + selected Human.)
Melee Game - Create Human starting units for (Triggering player) at ((Triggering player) start location) ( Include Heroes)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Clicked dialog button) Equal to BTNS_RaceDialog[((((Integer A) - 1) x 6) + 1)]
Then - Actions
Game - Display to (All players) the text: ((|cffffcc00 + (Name of (Triggering player))) + selected Orc.)
Melee Game - Create Orc starting units for (Triggering player) at ((Triggering player) start location) ( Include Heroes)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Clicked dialog button) Equal to BTNS_RaceDialog[((((Integer A) - 1) x 6) + 2)]
Then - Actions
Game - Display to (All players) the text: ((|cffffcc00 + (Name of (Triggering player))) + selected Undead.)
Melee Game - Create Undead starting units for (Triggering player) at ((Triggering player) start location) ( Include Heroes)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Clicked dialog button) Equal to BTNS_RaceDialog[((((Integer A) - 1) x 6) + 3)]
Then - Actions
Game - Display to (All players) the text: ((|cffffcc00 + (Name of (Triggering player))) + selected Nightelf.)
Melee Game - Create Night Elf starting units for (Triggering player) at ((Triggering player) start location) ( Include Heroes)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Clicked dialog button) Equal to BTNS_RaceDialog[((((Integer A) - 1) x 6) + 4)]
Then - Actions
Game - Display to (All players) the text: ((|cffffcc00 + (Name of (Triggering player))) + selected Creep Rebellion.)
Melee Game - Create Human starting units for (Triggering player) at ((Triggering player) start location) ( Include Heroes)
Unit Group - Pick every unit in (Units in (Playable map area) matching ((Owner of (Matching unit)) Equal to (Triggering player))) and do (Remove (Picked unit) from the game)
Unit - Create 1 . Oger Encampment for (Triggering player) at ((Triggering player) start location) facing Default building facing degrees
Set Variable Set NrOfTownhalls[(Player number of (Triggering player))] = (NrOfTownhalls[(Player number of (Triggering player))] + 1)
Set Variable Set MineCartCount = (MineCartCount + 1)
Unit - Create 1 . Mine Cart for (Triggering player) at (((Triggering player) start location) offset by (100.00, -320.00)) facing Default building facing degrees
Unit - Set the custom value of (Last created unit) to MineCartCount
Set Variable Set StartMineCartTemp = (Last created unit)
Player - Limit training of Mine Cart to 1 for (Triggering player)
Unit - Create 1 . Wood Chanter for (Triggering player) at (((Triggering player) start location) offset by (100.00, -320.00)) facing Default building facing degrees
Unit - Set the custom value of (Last created unit) to WoodChanterNumber
Set Variable Set WoodChanterNumber = (WoodChanterNumber + 1)
Unit - Order (Last created unit) to Board . StartMineCartTemp
Unit - Create 1 . Wood Chanter for (Triggering player) at (((Triggering player) start location) offset by (100.00, -320.00)) facing Default building facing degrees
Unit - Set the custom value of (Last created unit) to WoodChanterNumber
Set Variable Set WoodChanterNumber = (WoodChanterNumber + 1)
Unit - Order (Last created unit) to Board . StartMineCartTemp
Unit - Create 1 . Wood Chanter for (Triggering player) at (((Triggering player) start location) offset by (100.00, -320.00)) facing Default building facing degrees
Unit - Set the custom value of (Last created unit) to WoodChanterNumber
Set Variable Set WoodChanterNumber = (WoodChanterNumber + 1)
Unit - Order (Last created unit) to Board . StartMineCartTemp
Unit - Create 1 . Wood Chanter for (Triggering player) at (((Triggering player) start location) offset by (100.00, -320.00)) facing Default building facing degrees
Unit - Set the custom value of (Last created unit) to WoodChanterNumber
Set Variable Set WoodChanterNumber = (WoodChanterNumber + 1)
Unit - Order (Last created unit) to Board . StartMineCartTemp
Unit - Create 1 . Wood Chanter for (Triggering player) at (((Triggering player) start location) offset by (256.00, 256.00)) facing Default building facing degrees
Unit - Set the custom value of (Last created unit) to WoodChanterNumber
Set Variable Set WoodChanterNumber = (WoodChanterNumber + 1)
Player - Make Berserker Gnoll Unavailable for training/construction by (Triggering player)
Player - Make Transport Turtle (Berserk) Unavailable for training/construction by (Triggering player)
Unit - Create 1 . Town Hall for (Triggering player) at ((Triggering player) start location) facing Default building facing degrees
Set Variable Set RevealBuilding[(Player number of (Triggering player))] = (Last created unit)
Unit - Hide (Last created unit)
Unit - Add Invulnerable (Neutral) to (Last created unit)
Unit - Turn collision for (Last created unit) Off .
Unit - Remove Return Gold and Lumber from (Last created unit)
Unit - Create 1 . Anti-Food for (Triggering player) at ((Triggering player) start location) facing Default building facing degrees
Set Variable Set AntiFood[(Player number of (Triggering player))] = (Last created unit)
Unit - Hide (Last created unit)
Unit - Turn collision for (Last created unit) Off .
Player - Limit training of to 1 for (Triggering player)
Player - Limit training of to 1 for (Triggering player)
Player - Limit training of to 1 for (Triggering player)
Player - Limit training of to 1 for (Triggering player)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Clicked dialog button) Equal to BTNS_RaceDialog[((((Integer A) - 1) x 6) + 5)]
Then - Actions
Game - Display to (All players) the text: ((|cffffcc00 + (Name of (Triggering player))) + selected Random.)
Melee Game - Create (Race of (Triggering player)) starting units for (Triggering player) at ((Triggering player) start location) ( Include Heroes)
Else - Actions
Set Variable Set PlayerReady[(Player number of (Triggering player))] = "true"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
NrPlayersReady Equal to (Number of players in (All players matching (((Matching player) slot status) Equal to Is playing).))
Then - Actions
Countdown Timer - Pause RaceSelectTimer
Trigger - Run GetReady <gen> (ignoring conditions)
Else - Actions
ForceSelect
Events
Conditions
Actions
Trigger - Turn off Select_Race <gen>
Player Group - Pick every player in (All players matching (((Matching player) slot status) Equal to Is playing).) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
PlayerReady[(Player number of (Picked player))] Equal to False
Then - Actions
Dialog - Hide RaceDialog for (Picked player)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Race of (Picked player)) Equal to Human
Then - Actions
Game - Display to (All players) the text: ((|cffffcc00 + (Name of (Triggering player))) + selected Human.)
Melee Game - Create Human starting units for (Triggering player) at ((Triggering player) start location) ( Include Heroes)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Race of (Picked player)) Equal to Orc
Then - Actions
Game - Display to (All players) the text: ((|cffffcc00 + (Name of (Triggering player))) + selected Orc.)
Melee Game - Create Orc starting units for (Triggering player) at ((Triggering player) start location) ( Include Heroes)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Race of (Picked player)) Equal to Undead
Then - Actions
Game - Display to (All players) the text: ((|cffffcc00 + (Name of (Triggering player))) + selected Undead.)
Melee Game - Create Undead starting units for (Triggering player) at ((Triggering player) start location) ( Include Heroes)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Race of (Picked player)) Equal to Night Elf
Then - Actions
Game - Display to (All players) the text: ((|cffffcc00 + (Name of (Triggering player))) + selected Nightelf.)
Melee Game - Create Night Elf starting units for (Triggering player) at ((Triggering player) start location) ( Include Heroes)
Else - Actions
Else - Actions
Trigger - Run GetReady <gen> (ignoring conditions)
Gnoll Huts Copy
Events
Unit - A unit Is attacked
Conditions
((Owner of (Attacked unit)) controller) Equal to Computer
CRAI_Players[(Player number of (Owner of (Attacked unit)))] Equal to True
(Percentage life of (Attacked unit)) Less than or equal to 20.00
((Attacked unit) is in CRAI_Fleeing_Units.) Equal to False
Actions
Set Variable Set StartMineCartTemp = (Random unit from (Units owned by (Owner of (Attacked unit)) of type Gnoll Hut))
AI - Ignore (Attacked unit) 's guard position
Unit Group - Add (Attacked unit) to CRAI_Fleeing_Units
Unit - Order (Attacked unit) to Board . StartMineCartTemp
Wait 30.00 game-time seconds
Unit - Order StartMineCartTemp to Unload . (Attacked unit)
AI - Recycle (Attacked unit) 's guard position
Unit Group - Remove (Attacked unit) from CRAI_Fleeing_Units .
function Trig_Gnoll_Huts_Conditions takes nothing returns boolean
    if ( not ( GetPlayerController(GetOwningPlayer(GetAttackedUnitBJ())) == MAP_CONTROL_COMPUTER ) ) then
        return false
    endif
    if ( not ( udg_CRAI_Players[GetConvertedPlayerId(GetOwningPlayer(GetAttackedUnitBJ()))] == true ) ) then
        return false
    endif
    if ( not ( GetUnitLifePercent(GetAttackedUnitBJ()) <= 20.00 ) ) then
        return false
    endif
    if ( not ( IsUnitInGroup(GetAttackedUnitBJ(), udg_CRAI_Fleeing_Units) == false ) ) then
        return false
    endif
    return true
endfunction

function Trig_Gnoll_Huts_Actions takes nothing returns nothing
    local unit GnollHut
    local unit AttackedUnit
    set GnollHut = GroupPickRandomUnit(GetUnitsOfPlayerAndTypeId(GetOwningPlayer(GetAttackedUnitBJ()), 'h005'))
    call RemoveGuardPosition( GetAttackedUnitBJ() )
    call GroupAddUnitSimple( GetAttackedUnitBJ(), udg_CRAI_Fleeing_Units )
    call IssueTargetOrderBJ( GetAttackedUnitBJ(), "board", GnollHut )
    set AttackedUnit = GetAttackedUnitBJ()
    call PolledWait( 30.00 )
    call IssueTargetOrderBJ( GnollHut, "unload", AttackedUnit)
    call RecycleGuardPosition( AttackedUnit )
    call GroupRemoveUnitSimple( AttackedUnit, udg_CRAI_Fleeing_Units )
endfunction

//===========================================================================
function InitTrig_Gnoll_Huts takes nothing returns nothing
    set gg_trg_Gnoll_Huts = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_Gnoll_Huts, EVENT_PLAYER_UNIT_ATTACKED )
    call TriggerAddCondition( gg_trg_Gnoll_Huts, Condition( function Trig_Gnoll_Huts_Conditions ) )
    call TriggerAddAction( gg_trg_Gnoll_Huts, function Trig_Gnoll_Huts_Actions )
endfunction
Forrest Backup
Events
Unit - A unit Is attacked
Conditions
((Owner of (Attacked unit)) controller) Equal to Computer
CRAI_Players[(Player number of (Owner of (Attacked unit)))] Equal to True
((Attacked unit) is A structure) Equal to True
Actions
If ((Number of units in (Units within 1024.00 of (Position of (Attacked unit)) matching (((Owner of (Matching unit)) is an enemy of (Owner of (Attacked unit)).) Equal to True).)) Greater than or equal to 5) then do (Order (Random unit from (Units within 1500.00 of (Position of (Attacked unit)) matching (((Matching unit) is A town-hall-type unit) Equal to True).)) to Night Elf Druid Of The Claw - Roar.) else do (Do nothing)
FlyingOger
Events
Unit - A unit Finishes training a unit
Conditions
(Current research level of R00D (Unexpected type: 'techcode') for (Owner of (Trained unit))) Equal to 1
((Owner of (Trained unit)) controller) Equal to Computer
Or - Any (Conditions) are true
Conditions
(Unit-type of (Trained unit)) Equal to Bigrock
(Unit-type of (Trained unit)) Equal to Oger Warrior
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
And - All (Conditions) are true
Conditions
(Number of units in (Units owned by (Owner of (Trained unit)) of type Oger Warrior)) Greater than or equal to 3
(Number of units in (Units owned by (Owner of (Trained unit)) of type Bigrock)) Greater than or equal to 2
Then - Actions
If ((Unit-type of (Trained unit)) Equal to Bigrock) then do (Order (Trained unit) to Force Board.(Random unit from (Units owned by (Owner of (Trained unit)) of type Oger Warrior))) else do (Do nothing)
If ((Unit-type of (Trained unit)) Equal to Oger Warrior) then do (Order (Trained unit) to Board.(Random unit from (Units owned by (Owner of (Trained unit)) of type Bigrock))) else do (Do nothing)
Else - Actions
Defeated
Events
Unit - A unit Dies
Conditions
((Owner of (Dying unit)) controller) Equal to Computer
Or - Any (Conditions) are true
Conditions
(Unit-type of (Dying unit)) Equal to Wood Chanter
(Unit-type of (Dying unit)) Equal to Oger Encampment
(Unit-type of (Dying unit)) Equal to Oger Village
(Unit-type of (Dying unit)) Equal to Oger City
Actions
Set Variable Set CRAI_Defeat_Count = "0"
Unit Group - Pick every unit in (Units owned by (Owner of (Dying unit)) matching (((Unit-type of (Matching unit)) Equal to Wood Chanter) and (((Matching unit) is alive) Equal to True)).) and do (Set VariableSet CRAI_Defeat_Count = (CRAI_Defeat_Count + 1))
Unit Group - Pick every unit in (Units owned by (Owner of (Dying unit)) matching (((Unit-type of (Matching unit)) Equal to Oger Encampment) and (((Matching unit) is alive) Equal to True)).) and do (Set VariableSet CRAI_Defeat_Count = (CRAI_Defeat_Count + 1))
Unit Group - Pick every unit in (Units owned by (Owner of (Dying unit)) matching (((Unit-type of (Matching unit)) Equal to Oger Village) and (((Matching unit) is alive) Equal to True)).) and do (Set VariableSet CRAI_Defeat_Count = (CRAI_Defeat_Count + 1))
Unit Group - Pick every unit in (Units owned by (Owner of (Dying unit)) matching (((Unit-type of (Matching unit)) Equal to Oger City) and (((Matching unit) is alive) Equal to True)).) and do (Set VariableSet CRAI_Defeat_Count = (CRAI_Defeat_Count + 1))
If (CRAI_Defeat_Count Equal to 0) then do (Pick every unit in (Units owned by (Owner of (Dying unit)).) and do (Kill (Picked unit))) else do (Do nothing)
Correct Minecart
Events
Unit - A unit Is issued an order targeting a point
Unit - A unit Is issued an order targeting an object
Conditions
(Unit-type of (Ordered unit)) Equal to Mine Cart
((Owner of (Ordered unit)) controller) Equal to Computer
And - All (Conditions) are true
Conditions
(Unit-type of (Target unit of issued order)) Not equal to Gold Mine
(Unit-type of (Target unit of issued order)) Not equal to Wood Chanter
(Unit-type of (Target unit of issued order)) Not equal to Oger Encampment
(Unit-type of (Target unit of issued order)) Not equal to Oger Village
(Unit-type of (Target unit of issued order)) Not equal to Oger City
Actions
Unit - Order (Ordered unit) to Right-Click . (Random unit from (Units within 1000.00 of (Position of (Ordered unit)) matching ((Unit-type of (Matching unit)) Equal to Gold Mine).))
function Trig_CRAI_2nd_Townhall_Conditions takes nothing returns boolean
    if ( not ( GetUnitTypeId(GetConstructingStructure()) == 'n006' ) ) then
        return false
    endif
    return true
endfunction

function Trig_CRAI_2nd_Townhall_Func001001001 takes nothing returns boolean
    return ( GetPlayerState(GetOwningPlayer(GetConstructingStructure()), PLAYER_STATE_RESOURCE_GOLD) >= 350 )
endfunction

function Trig_CRAI_2nd_Townhall_Func001001002 takes nothing returns boolean
    return ( GetPlayerState(GetOwningPlayer(GetConstructingStructure()), PLAYER_STATE_RESOURCE_LUMBER) >= 210 )
endfunction

function Trig_CRAI_2nd_Townhall_Func001001 takes nothing returns boolean
    return GetBooleanAnd( Trig_CRAI_2nd_Townhall_Func001001001(), Trig_CRAI_2nd_Townhall_Func001001002() )
endfunction

function Trig_CRAI_2nd_Townhall_Actions takes nothing returns nothing
    local player Techer
    set Techer = GetOwningPlayer(GetConstructingStructure())
    loop
        exitwhen ( Trig_CRAI_2nd_Townhall_Func001001() )
        call TriggerSleepAction(RMaxBJ(bj_WAIT_FOR_COND_MIN_INTERVAL, 4.00))
    endloop
    call ReplaceUnitBJ( GroupPickRandomUnit(GetUnitsOfPlayerAndTypeId(Techer, 'h001')), 'h008', bj_UNIT_STATE_METHOD_RELATIVE )
    call SetPlayerStateBJ( Techer, PLAYER_STATE_RESOURCE_GOLD, ( GetPlayerState(Techer, PLAYER_STATE_RESOURCE_GOLD) - 320 ) )
    call SetPlayerStateBJ( Techer, PLAYER_STATE_RESOURCE_LUMBER, ( GetPlayerState(Techer, PLAYER_STATE_RESOURCE_LUMBER) - 210 ) )
endfunction

//===========================================================================
function InitTrig_CRAI_2nd_Townhall takes nothing returns nothing
    set gg_trg_CRAI_2nd_Townhall = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_CRAI_2nd_Townhall, EVENT_PLAYER_UNIT_CONSTRUCT_START )
    call TriggerAddCondition( gg_trg_CRAI_2nd_Townhall, Condition( function Trig_CRAI_2nd_Townhall_Conditions ) )
    call TriggerAddAction( gg_trg_CRAI_2nd_Townhall, function Trig_CRAI_2nd_Townhall_Actions )
endfunction
CRAI 2nd Townhall Copy
Events
Unit - A unit Begins construction
Conditions
(Unit-type of (Constructing structure)) Equal to Boulder Tower
Actions
Wait until ((((Owner of (Constructing structure)) Current gold) Greater than or equal to 350) and (((Owner of (Constructing structure)) Current lumber) Greater than or equal to 210)) , checking every 4.00 seconds
Unit - Replace (Random unit from (Units owned by (Owner of (Constructing structure)) of type Oger Encampment)) with a Oger Village using The old unit's relative life and mana
Player - Set (Owner of (Constructing structure)) . Current gold to (((Owner of (Constructing structure)) Current gold) - 320)
Player - Set (Owner of (Constructing structure)) . Current lumber to (((Owner of (Constructing structure)) Current lumber) - 210)
test
Events
Player - Player 1 (Red) types a chat message containing test (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Unit - Create 5 . Oger Magi for Player 1 (Red) at (Center of (Playable map area)) facing Default building facing degrees
Unit - Create 1 . for Player 1 (Red) at (Center of (Playable map area)) facing Default building facing degrees
Hero - Set (Last created unit) Hero-level to 10 , Hide level-up graphics
DebugInfo
Events
Time - Every 120.00 seconds of game time
Conditions
Actions
Set Variable Set DummyCount = (Number of units in (Units of type Beyond Death (Dummy)))
Set Variable Set DummyCount = (DummyCount + (Number of units in (Units of type Ignorance (Dummy))))
Set Variable Set DummyCount = (DummyCount + (Number of units in (Units of type Mindbreak (Dummy))))
Set Variable Set DummyCount = (DummyCount + (Number of units in (Units of type Poison Nova (Dummy))))
Set Variable Set DummyCount = (DummyCount + (Number of units in (Units of type Spiritualize (Dummy))))
Set Variable Set DummyCount = (DummyCount + (Number of units in (Units of type Stun Grenade (Dummy))))
Set Variable Set DummyCount = (DummyCount + (Number of units in (Units of type Voodooblade (Dummy))))
Set Variable Set DummyCount = (DummyCount + (Number of units in (Units of type Wood Chanter (Attack-Dummy))))
Set Variable Set DummyCount = (DummyCount + (Number of units in (Units of type Wood Chanter (Dummy))))
Game - Display to (All players) the text: (|cff00ffaa00Debug message:|r Existent dummies - + (String(DummyCount)))
OrderPoint
Events
Unit - A unit Is issued an order targeting a point
Conditions
(Unit-type of (Ordered unit)) Equal to Wood Chanter
Actions
Custom script: call DisplayTextToForce( GetPlayersAll(), "Point: " + I2S(GetIssuedOrderIdBJ()) + " - " + OrderId2StringBJ(GetIssuedOrderIdBJ()) )
OrderTarget
Events
Unit - A unit Is issued an order targeting an object
Conditions
(Unit-type of (Ordered unit)) Equal to Wood Chanter
Actions
Custom script: call DisplayTextToForce( GetPlayersAll(), "Target: " + I2S(GetIssuedOrderIdBJ()) + " - " + OrderId2StringBJ(GetIssuedOrderIdBJ()) )
OrderNoTarget
Events
Unit - A unit Is issued an order with no target
Conditions
(Unit-type of (Ordered unit)) Equal to Wood Chanter
Actions
Custom script: call DisplayTextToForce( GetPlayersAll(), "No target: " + I2S(GetIssuedOrderIdBJ()) + " - " + OrderId2StringBJ(GetIssuedOrderIdBJ()) )
manuelles deaktivieren
S Ignorance OFF
Events
Unit - A unit Is issued an order with no target
Conditions
(Issued order) Equal to (Order(unimmolation))
Actions
Set Variable Set SpellAktiv[(Player number of (Owner of (Ordered unit)))] = "false"
Unit - Remove Mana Stop from (Ordered unit)
Unit - Remove Spell Immunity (Oger Lord) from (Ordered unit)
Unit - Remove Ignorance buff from (Ordered unit)
Unit Group - Pick every unit in (Units owned by (Owner of (Ordered unit)) of type Ignorance (Dummy)) and do (Remove (Picked unit) from the game)
function Trig_S_Ignorance_ON_u_OFF_Conditions takes nothing returns boolean
    if ( not ( GetIssuedOrderIdBJ() == String2OrderIdBJ("immolation") ) ) then
        return false
    endif
    return true
endfunction

function Trig_S_Ignorance_ON_u_OFF_Func011C takes nothing returns boolean
    if ( not ( udg_SpellAktiv[GetConvertedPlayerId(GetOwningPlayer(GetOrderedUnit()))] == true ) ) then
        return false
    endif
    return true
endfunction

function Trig_S_Ignorance_ON_u_OFF_Actions takes nothing returns nothing
    // Aktivieren
    local unit OgerLord
    local unit Ignorance_Dummy
    set OgerLord = GetOrderedUnit()
    set udg_SpellAktiv[GetConvertedPlayerId(GetOwningPlayer(GetOrderedUnit()))] = true
    call UnitAddAbilityBJ( 'A00S', GetOrderedUnit() )
    call UnitAddAbilityBJ( 'A00R', GetOrderedUnit() )
    call CreateNUnitsAtLoc( 1, 'h00S', GetOwningPlayer(GetOrderedUnit()), GetUnitLoc(GetOrderedUnit()), bj_UNIT_FACING )
    call IssueTargetOrderBJ( GetLastCreatedUnit(), "smart", GetOrderedUnit() )
    call ShowUnitHide( GetLastCreatedUnit() )
    set Ignorance_Dummy = GetLastCreatedUnit()
    // Wait für Auto Disable
    call PolledWait( udg_SpellDauer[GetUnitAbilityLevelSwapped('A01L', OgerLord)] )
    // Auto Disable (wenn Spell noch aktiv)
    if ( Trig_S_Ignorance_ON_u_OFF_Func011C() ) then
        call IssueImmediateOrderBJ( OgerLord, "unimmolation" )
        call RemoveUnit( Ignorance_Dummy )
    else
    endif
endfunction

//===========================================================================
function InitTrig_S_Ignorance_ON_u_OFF takes nothing returns nothing
    set gg_trg_S_Ignorance_ON_u_OFF = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_S_Ignorance_ON_u_OFF, EVENT_PLAYER_UNIT_ISSUED_ORDER )
    call TriggerAddCondition( gg_trg_S_Ignorance_ON_u_OFF, Condition( function Trig_S_Ignorance_ON_u_OFF_Conditions ) )
    call TriggerAddAction( gg_trg_S_Ignorance_ON_u_OFF, function Trig_S_Ignorance_ON_u_OFF_Actions )
endfunction
Acid Rain Starts
Events
Unit - A unit Begins casting an ability
Conditions
(Ability being cast) Equal to Acid Rain
Actions
Cinematic - Apply a filter over 2 seconds using Normal blending on texture White Mask , starting with color ( 0.00 %, 100.00 %, 0.00 %) and 100.00 % transparency and ending with color ( 0 %, 80.00 %, 0 %) and 80.00 % transparency
Acid Rain End
Events
Unit - A unit Stops casting an ability
Unit - A unit Finishes casting an ability
Conditions
(Ability being cast) Equal to Acid Rain
Actions
Cinematic - Apply a filter over 2 seconds using Normal blending on texture White Mask , starting with color ( 100 %, 100 %, 100 %) and 100 % transparency and ending with color ( 0 %, 0 %, 0 %) and 100.00 % transparency
function Trig_StartCatapult_Conditions takes nothing returns boolean
    if ( not ( GetUnitTypeId(GetTransportUnitBJ()) == 'o001' ) ) then
        return false
    endif
    return true
endfunction

function Trig_StartCatapult_Actions takes nothing returns nothing
    local unit OgerSGonnaFly
    call ReplaceUnitBJ( GetLoadedUnitBJ(), 'n00A', bj_UNIT_STATE_METHOD_RELATIVE )
    set OgerSGonnaFly = GetLastReplacedUnitBJ()
    call IssuePointOrderLocBJ( GetLastReplacedUnitBJ(), "move", PolarProjectionBJ(GetUnitLoc(GetTransportUnitBJ()), 512.00, GetUnitFacing(GetLastReplacedUnitBJ())) )
    call SetUnitFlyHeightBJ( GetLastReplacedUnitBJ(), 400.00, 300.00 )
    call AddSpecialEffectTargetUnitBJ( "origin", GetSpellAbilityUnit(), "Abilities\\Spells\\Orc\\WarStomp\\WarStompCaster.mdl" )
    call KillUnit( GetTransportUnitBJ() )
    call PolledWait( 1.00 )
    call SetUnitFlyHeightBJ( OgerSGonnaFly, 100.00, 300.00 )
endfunction

//===========================================================================
function InitTrig_StartCatapult takes nothing returns nothing
    set gg_trg_StartCatapult = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_StartCatapult, EVENT_PLAYER_UNIT_LOADED )
    call TriggerAddCondition( gg_trg_StartCatapult, Condition( function Trig_StartCatapult_Conditions ) )
    call TriggerAddAction( gg_trg_StartCatapult, function Trig_StartCatapult_Actions )
endfunction
BuildingUnderConstruction
Events
Unit - A unit Begins construction
Conditions
Actions
Unit Group - Add (Constructing structure) to BuildingsUnderConstruction
ConstructionCanceled
Events
Unit - A unit Cancels construction
Conditions
Actions
Unit Group - Remove (Cancelled structure) from BuildingsUnderConstruction .
ConstructionFinished
Events
Unit - A unit Finishes construction
Conditions
Actions
Unit Group - Remove (Constructed structure) from BuildingsUnderConstruction .
CancelReturnLumber
Events
Unit - A unit Is issued an order targeting an object
Conditions
(Issued order) Equal to (Order(smart))
(Unit-type of (Ordered unit)) Equal to Wood Chanter
((Target unit of issued order) is in BuildingsUnderConstruction.) Equal to False
Or - Any (Conditions) are true
Conditions
(Unit-type of (Target unit of issued order)) Equal to Oger Encampment
(Unit-type of (Target unit of issued order)) Equal to Oger Village
(Unit-type of (Target unit of issued order)) Equal to Oger City
(Unit-type of (Target unit of issued order)) Equal to Tree School
Actions
Unit - Order (Ordered unit) to Harvest Nearby Lumber .
CancelReturnLumber2
Events
Unit - A unit Is issued an order with no target
Conditions
(Issued order) Equal to (Order(resumeharvesting))
Actions
Unit - Order (Ordered unit) to Harvest Nearby Lumber .
function Trig_TreeIsCut_Conditions takes nothing returns boolean
    if ( not ( TimerGetRemaining(udg_ForrestBackupTimer[GetConvertedPlayerId(GetOwningPlayer(GetOrderedUnit()))]) <= 0.00 ) ) then
        return false
    endif
    if ( not ( GetUnitTypeId(GetOrderedUnit()) == 'h000' ) ) then
        return false
    endif
    if ( not ( GetIssuedOrderIdBJ() == String2OrderIdBJ("resumeharvesting") ) ) then
        return false
    endif
    return true
endfunction

function Trig_TreeIsCut_Actions takes nothing returns nothing
    local unit ForceOfNature_Dummy
    local destructable ForceOfNature_Target
    local unit Ordered_WoodChanter
    set Ordered_WoodChanter = GetOrderedUnit()
    set ForceOfNature_Target = udg_HarvestTreeTargets[GetUnitUserData(GetOrderedUnit())]
    set udg_HarvestReturnTargets[GetUnitUserData(GetOrderedUnit())] = GetOrderTargetUnit()
    call UnitRemoveAbilityBJ( 'A000', GetOrderedUnit() )
    call CreateNUnitsAtLoc( 1, 'h002', Player(PLAYER_NEUTRAL_PASSIVE), GetUnitLoc(GetOrderedUnit()), bj_UNIT_FACING )
    set ForceOfNature_Dummy = GetLastCreatedUnit()
    call SetUnitUserData( GetLastCreatedUnit(), GetUnitUserData(GetOrderedUnit()) )
    call ShowUnitHide( GetLastCreatedUnit() )
    call IssuePointOrderLocBJ( GetLastCreatedUnit(), "forceofnature", GetDestructableLoc(udg_HarvestTreeTargets[GetUnitUserData(GetOrderedUnit())]) )
    call UnitAddAbilityBJ( 'A000', GetOrderedUnit() )
    call PolledWait( 0.2 )
    call IssueImmediateOrderBJ( Ordered_WoodChanter, "autoharvestlumber" )
    call PolledWait( 3.00 )
    call RemoveUnit( ForceOfNature_Dummy )
    call DestructableRestoreLife( ForceOfNature_Target, GetDestructableMaxLife(ForceOfNature_Target), true )
    //call IssueImmediateOrderBJ( Ordered_WoodChanter, "autoharvestlumber" )
endfunction

//===========================================================================
function InitTrig_TreeIsCut takes nothing returns nothing
    set gg_trg_TreeIsCut = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_TreeIsCut, EVENT_PLAYER_UNIT_ISSUED_TARGET_ORDER )
    call TriggerAddCondition( gg_trg_TreeIsCut, Condition( function Trig_TreeIsCut_Conditions ) )
    call TriggerAddAction( gg_trg_TreeIsCut, function Trig_TreeIsCut_Actions )
endfunction
TreeIsCutForrestBackup
Events
Unit - A unit Is issued an order targeting an object
Conditions
(Remaining time for ForrestBackupTimer[(Player number of (Owner of (Ordered unit)))]) Greater than 0.00
(Unit-type of (Ordered unit)) Equal to Wood Chanter
(Issued order) Equal to (Order(resumeharvesting))
Actions
Set Variable Set HarvestReturnTargets[(Custom value of (Ordered unit))] = (Target unit of issued order)
Unit - Remove Harvest (Wood Chanter) from (Ordered unit)
Unit - Create 1 . Wood Chanter (Attack-Dummy) for Neutral Passive at (Position of (Ordered unit)) facing Default building facing degrees
Unit - Set the custom value of (Last created unit) to (Custom value of (Ordered unit))
Unit - Hide (Last created unit)
Unit - Order (Last created unit) to Night Elf Keeper Of The Grove - Force Of Nature . (Position of HarvestTreeTargets[(Custom value of (Ordered unit))])
Unit - Add Harvest (Wood Chanter) to (Ordered unit)
Unit - Order (Ordered unit) to Harvest Nearby Lumber .
Wait 1.00 game-time seconds
Unit - Remove (Last created unit) from the game
CreatedTree
Events
Unit - A unit Spawns a summoned unit
Conditions
(Remaining time for ForrestBackupTimer[(Player number of (Owner of HarvestReturnTargets[(Custom value of (Summoning unit))]))]) Less than or equal to 0.00
(Unit-type of (Summoned unit)) Equal to Walking Tree
Actions
Set Variable Set FoundHarvestTarget = "false"
Set Variable Set HarvestDistance = "999999.00"
Unit Group - Pick every unit in (Units within 1500.00 of (Position of (Summoned unit)).) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
And - All (Conditions) are true
Conditions
((Picked unit) is in BuildingsUnderConstruction.) Equal to False
Or - Any (Conditions) are true
Conditions
(Unit-type of (Picked unit)) Equal to Oger Encampment
(Unit-type of (Picked unit)) Equal to Oger Village
(Unit-type of (Picked unit)) Equal to Oger City
(Unit-type of (Picked unit)) Equal to Tree School
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between (Position of (Picked unit)) and (Position of (Summoned unit))) Less than or equal to HarvestDistance
Then - Actions
Set Variable Set HarvestDistance = (Distance between (Position of (Picked unit)) and (Position of (Summoned unit)))
Set Variable Set HarvestMinRangeUnit = (Picked unit)
Else - Actions
Set Variable Set FoundHarvestTarget = "true"
Else - Actions
If (FoundHarvestTarget Equal to True) then do (Order (Summoned unit) to Human Blood Mage - Banish.HarvestMinRangeUnit) else do (Do nothing)
If (FoundHarvestTarget Equal to False) then do (Kill (Summoned unit)) else do (Do nothing)
Unit - Set the custom value of (Summoned unit) to (Custom value of (Summoning unit))
CreatedTreeForrest Backup
Events
Unit - A unit Spawns a summoned unit
Conditions
(Remaining time for ForrestBackupTimer[(Player number of (Owner of HarvestReturnTargets[(Custom value of (Summoning unit))]))]) Greater than 0.00
(Unit-type of (Summoned unit)) Equal to Walking Tree (attacking)
Actions
Unit - Change ownership of (Summoned unit) to (Owner of HarvestReturnTargets[(Custom value of (Summoning unit))]) and Change color
Unit - Set the custom value of (Summoned unit) to (Custom value of (Summoning unit))
Unit Group - Pick every unit in (Units owned by (Owner of HarvestReturnTargets[(Custom value of (Summoning unit))]) matching (((Matching unit) is A structure) Equal to True).) and do (Actions)
Loop - Actions
Set Variable Set ForrestBackupCounter = (ForrestBackupCounter + 1)
Set Variable Set ForrestBackupUnits[ForrestBackupCounter] = (Picked unit)
For each (Integer A) from 1 to ForrestBackupCounter , do (Actions)
Loop - Actions
Unit Group - Pick every unit in (Units within 768.00 of (Position of ForrestBackupUnits[(Integer A)]) matching (((Owner of (Matching unit)) is an enemy of (Owner of HarvestReturnTargets[(Custom value of (Summoning unit))]).) Equal to True).) and do (Actions)
Loop - Actions
Unit - Order (Summoned unit) to Attack . (Picked unit)
Set Variable Set ForrestBackupCounter = "0"
WalkingTreeComes
Events
Unit - A unit Begins casting an ability
Conditions
(Ability being cast) Equal to Tree Comes
Actions
If ((Current research level of R00F (Unexpected type: 'techcode') for (Owner of (Target unit of ability being cast))) Equal to 0) then do (Add 10 to (Owner of (Target unit of ability being cast)).Current lumber) else do (Do nothing)
If ((Current research level of R00F (Unexpected type: 'techcode') for (Owner of (Target unit of ability being cast))) Equal to 1) then do (Add 15 to (Owner of (Target unit of ability being cast)).Current lumber) else do (Do nothing)
Floating Text - Hide (Last created floating text) for (All players)
Floating Text - Show (Last created floating text) for (Player group((Owner of (Casting unit))))
function Trig_WalkingTreeDies_Conditions takes nothing returns boolean
    if ( not ( GetSpellAbilityId() == 'A01R' ) ) then
        return false
    endif
    return true
endfunction

function Trig_WalkingTreeDies_Func001001 takes nothing returns boolean
    
    return ( GetPlayerTechCountSimple('R00F', GetOwningPlayer(udg_HarvestReturnTargets[GetUnitUserData(GetSpellAbilityUnit())])) == 1 )
endfunction

function Trig_WalkingTreeDies_Func002002 takes nothing returns boolean
    
    return ( GetPlayerTechCountSimple('R00F', GetOwningPlayer(udg_HarvestReturnTargets[GetUnitUserData(GetSpellAbilityUnit())])) == 0 )
endfunction


function Trig_WalkingTreeDies_Actions takes nothing returns nothing
    local texttag lumber_text
    if ( Trig_WalkingTreeDies_Func001001() ) then
        call CreateTextTagUnitBJ( "+15", GetSpellAbilityUnit(), 64.00, 10, 0.00, 100, 40.00, 0 )        
    else
        call DoNothing(  )
    endif
    if ( Trig_WalkingTreeDies_Func002002() ) then
        call CreateTextTagUnitBJ( "+10", GetSpellAbilityUnit(), 64.00, 10, 0.00, 100, 40.00, 0 )
    else
        call DoNothing(  )
    endif

    call SetTextTagVelocityBJ( GetLastCreatedTextTag(), 64, 90 )
    call ShowTextTagForceBJ( false, GetLastCreatedTextTag(), GetPlayersAll() )
    call ShowTextTagForceBJ( true, GetLastCreatedTextTag(), GetForceOfPlayer(GetOwningPlayer(udg_HarvestReturnTargets[GetUnitUserData(GetSpellAbilityUnit())])) )
    set lumber_text = GetLastCreatedTextTag()
    call RemoveUnit( GetSpellAbilityUnit() )
    call PolledWait( 1.00 )
    call DestroyTextTagBJ( lumber_text )
endfunction

//===========================================================================
function InitTrig_WalkingTreeDies takes nothing returns nothing
    set gg_trg_WalkingTreeDies = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_WalkingTreeDies, EVENT_PLAYER_UNIT_SPELL_FINISH )
    call TriggerAddCondition( gg_trg_WalkingTreeDies, Condition( function Trig_WalkingTreeDies_Conditions ) )
    call TriggerAddAction( gg_trg_WalkingTreeDies, function Trig_WalkingTreeDies_Actions )
endfunction


function Trig_InitHarvest_Func002C takes nothing returns boolean
    if ( ( GetIssuedOrderIdBJ() == 851970 ) ) then
        return true
    endif
    if ( ( GetIssuedOrderIdBJ() == 852019 ) ) then
        return true
    endif
    if ( ( GetIssuedOrderIdBJ() == String2OrderIdBJ("smart") ) ) then
        return true
    endif
    if ( ( GetIssuedOrderIdBJ() == String2OrderIdBJ("harvest") ) ) then
        return true
    endif
    if ( ( GetIssuedOrderIdBJ() == String2OrderIdBJ("autoharvestlumber") ) ) then
        return true
    endif
    return false
endfunction

function Trig_InitHarvest_Conditions takes nothing returns boolean
    if ( not ( GetUnitTypeId(GetOrderedUnit()) == 'h000' ) ) then
        return false
    endif
    if ( not Trig_InitHarvest_Func002C() ) then
        return false
    endif
    return true
endfunction

function Trig_InitHarvest_Actions takes nothing returns nothing
    set udg_HarvestTreeTargets[GetUnitUserData(GetOrderedUnit())] = GetOrderTargetDestructable()
endfunction

//===========================================================================
function InitTrig_SelectHarvestTarget takes nothing returns nothing
    set gg_trg_SelectHarvestTarget = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_SelectHarvestTarget, EVENT_PLAYER_UNIT_ISSUED_TARGET_ORDER )
    call TriggerAddCondition( gg_trg_SelectHarvestTarget, Condition( function Trig_InitHarvest_Conditions ) )
    call TriggerAddAction( gg_trg_SelectHarvestTarget, function Trig_InitHarvest_Actions )
endfunction


function Trig_SelectHarvestTarget_Point_Func002C takes nothing returns boolean
    if ( ( GetIssuedOrderIdBJ() == 851970 ) ) then
        return true
    endif
    if ( ( GetIssuedOrderIdBJ() == String2OrderIdBJ("smart") ) ) then
        return true
    endif
    if ( ( GetIssuedOrderIdBJ() == String2OrderIdBJ("harvest") ) ) then
        return true
    endif
    return false
endfunction

function Trig_SelectHarvestTarget_Point_Conditions takes nothing returns boolean
    if ( not ( GetUnitTypeId(GetOrderedUnit()) == 'h000' ) ) then
        return false
    endif
    if ( not Trig_SelectHarvestTarget_Point_Func002C() ) then
        return false
    endif
    return true
endfunction

function Trig_SelectHarvestTarget_Point_Actions takes nothing returns nothing
    set udg_HarvestTreeTargets[GetUnitUserData(GetOrderedUnit())] = RandomDestructableInRectSimpleBJ(RectFromCenterSizeBJ(GetOrderPointLoc(), 64.00, 64.00))
endfunction

//===========================================================================
function InitTrig_SelectHarvestTarget_Point takes nothing returns nothing
    set gg_trg_SelectHarvestTarget_Point = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_SelectHarvestTarget_Point, EVENT_PLAYER_UNIT_ISSUED_POINT_ORDER )
    call TriggerAddCondition( gg_trg_SelectHarvestTarget_Point, Condition( function Trig_SelectHarvestTarget_Point_Conditions ) )
    call TriggerAddAction( gg_trg_SelectHarvestTarget_Point, function Trig_SelectHarvestTarget_Point_Actions )
endfunction
MineCartRebuilt
Events
Unit - A unit Finishes training a unit
Conditions
(Unit-type of (Trained unit)) Equal to Mine Cart
Actions
Set Variable Set MineCartCount = (MineCartCount + 1)
Unit - Set the custom value of (Trained unit) to MineCartCount
MineEmpty
Events
Unit - A unit Dies
Conditions
(Unit-type of (Dying unit)) Equal to Gold Mine
Actions
Trigger - Turn off MineCartDestroyed <gen>
For each (Integer A) from 1 to 300 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Dying unit) Equal to MinesTargeted[(Integer A)]
Then - Actions
Unit Group - Pick every unit in (Units of type Mine Cart) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of (Picked unit)) Equal to (Integer A)
Then - Actions
Item - Create Gold Coins at (Position of (Picked unit))
Unit - Explode (Picked unit) .
Else - Actions
Else - Actions
Trigger - Turn on MineCartDestroyed <gen>
OutOfMine
Events
Unit - A unit Is issued an order targeting an object
Conditions
(Issued order) Equal to (Order(resumeharvesting))
(Unit-type of (Ordered unit)) Equal to Mine Cart
Actions
Unit - Order (Ordered unit) to Move To . ((Position of (Ordered unit)) offset by 256 towards (Facing of (Ordered unit)) degrees.)
Trigger - Turn off (This trigger)
Unit - Order (Ordered unit) to Harvest Nearby Gold .
Wait 0.01 game-time seconds
Trigger - Turn on (This trigger)
AttackNoMove
Events
Unit - A unit Is issued an order targeting a point
Conditions
(Issued order) Equal to (Order(attack))
(Unit-type of (Ordered unit)) Equal to Mine Cart
Actions
Unit - Pause (Ordered unit)
Unit - Order (Ordered unit) to Stop .
Unit - Unpause (Ordered unit)
NoMove
Events
Unit - A unit Is issued an order targeting a point
Unit - A unit Is issued an order targeting an object
Conditions
(Unit-type of (Ordered unit)) Equal to Mine Cart
(Current movement speed of (Ordered unit)) Less than or equal to 150.00
Or - Any (Conditions) are true
Conditions
(Issued order) Equal to (Order(move))
(Issued order) Equal to (Order(smart))
Actions
Unit - Pause (Ordered unit)
Unit - Order (Ordered unit) to Stop .
Wait 0.01 game-time seconds
Unit - Unpause (Ordered unit)
MineCartUnloadsAll
Events
Unit - A unit Begins casting an ability
Conditions
(Ability being cast) Equal to Unload Worker (Mine Cart)
Actions
Unit - Set (Casting unit) movement speed to 150.00
function Trig_MineCartUnloads_Conditions takes nothing returns boolean
    if ( not ( GetUnitTypeId(GetOrderedUnit()) == 'h004' ) ) then
        return false
    endif
    if ( not ( GetIssuedOrderIdBJ() == String2OrderIdBJ("unload") ) ) then
        return false
    endif
    return true
endfunction

function Trig_MineCartUnloads_Actions takes nothing returns nothing
    local unit MineCart
    set MineCart = GetOrderedUnit()
    call SetUnitMoveSpeed( GetOrderedUnit(), ( GetUnitMoveSpeed(GetOrderedUnit()) - 15.00 ) )
    call PolledWait( 0.20 )
    call PauseUnitBJ( true, MineCart )
    call IssueImmediateOrderBJ( MineCart, "stop" )
    call PolledWait( 0.01 )
    call PauseUnitBJ( false, MineCart )
endfunction

//===========================================================================
function InitTrig_MineCartUnloads takes nothing returns nothing
    set gg_trg_MineCartUnloads = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_MineCartUnloads, EVENT_PLAYER_UNIT_ISSUED_TARGET_ORDER )
    call TriggerAddCondition( gg_trg_MineCartUnloads, Condition( function Trig_MineCartUnloads_Conditions ) )
    call TriggerAddAction( gg_trg_MineCartUnloads, function Trig_MineCartUnloads_Actions )
endfunction
MineCartLoads
Events
Unit - A unit Is loaded into a transport
Conditions
(Unit-type of (Transporting unit)) Equal to Mine Cart
Actions
Unit - Set (Transporting unit) movement speed to ((Current movement speed of (Transporting unit)) + 15.00)
MineTargeted
Events
Unit - A unit Is issued an order targeting an object
Conditions
(Unit-type of (Ordered unit)) Equal to Mine Cart
(Unit-type of (Target unit of issued order)) Equal to Gold Mine
Actions
Set Variable Set MineFull = "false"
For each (Integer A) from 1 to MineCartCount , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
And - All (Conditions) are true
Conditions
(Target unit of issued order) Equal to MinesTargeted[(Integer A)]
(Integer A) Not equal to (Custom value of (Ordered unit))
Then - Actions
Game - Display to (Player group((Owner of (Ordered unit)))) the text: |cffffcc00Message: |rOnly one cart per mine.
Unit - Pause (Ordered unit)
Unit - Unpause (Ordered unit)
Unit - Order (Ordered unit) to Stop .
Set Variable Set MineFull = "true"
Else - Actions
If (MineFull Equal to False) then do (Set VariableSet MinesTargeted[(Custom value of (Ordered unit))] = (Target unit of issued order)) else do (Do nothing)
MineCartDies
Events
Unit - A unit Dies
Conditions
(Unit-type of (Dying unit)) Equal to Mine Cart
Actions
Set Variable Set MinesTargeted[(Custom value of (Dying unit))] = No unit
function Trig_EncampmentDown_Func003C takes nothing returns boolean
    if ( ( GetUnitTypeId(GetDyingUnit()) == 'h001' ) ) then
        return true
    endif
    if ( ( GetUnitTypeId(GetDyingUnit()) == 'h008' ) ) then
        return true
    endif
    if ( ( GetUnitTypeId(GetDyingUnit()) == 'h009' ) ) then
        return true
    endif
    return false
endfunction

function Trig_EncampmentDown_Conditions takes nothing returns boolean
    if ( not Trig_EncampmentDown_Func003C() ) then
        return false
    endif
    return true
endfunction

function Trig_EncampmentDown_Func002Func004001001002001 takes nothing returns boolean
    return ( IsUnitType(GetFilterUnit(), UNIT_TYPE_TOWNHALL) == true )
endfunction

function Trig_EncampmentDown_Func002Func004001001002002 takes nothing returns boolean
    return ( IsUnitAliveBJ(GetFilterUnit()) == true )
endfunction

function Trig_EncampmentDown_Func002Func004001001002 takes nothing returns boolean
    return GetBooleanAnd( Trig_EncampmentDown_Func002Func004001001002001(), Trig_EncampmentDown_Func002Func004001001002002() )
endfunction

function Trig_EncampmentDown_Func002C takes nothing returns boolean
    if ( not ( CountUnitsInGroup(GetUnitsOfPlayerMatching(GetOwningPlayer(GetDyingUnit()), Condition(function Trig_EncampmentDown_Func002Func004001001002))) == 1 ) ) then
        return false
    endif
    return true
endfunction

function Trig_EncampmentDown_Actions takes nothing returns nothing
    local integer PlayerNumber
    set PlayerNumber = GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))
    set udg_NrOfTownhalls[PlayerNumber] = ( udg_NrOfTownhalls[PlayerNumber] - 1 )
    call SetPlayerTechMaxAllowedSwap( 'h004', udg_NrOfTownhalls[PlayerNumber], GetOwningPlayer(GetDyingUnit()) )
    call PolledWait( 0.20 )
    if ( Trig_EncampmentDown_Func002C() ) then
        call KillUnit( udg_RevealBuilding[PlayerNumber] )
        call KillUnit( udg_AntiFood[PlayerNumber] )
        return
    else
    endif
endfunction

//===========================================================================
function InitTrig_EncampmentDown takes nothing returns nothing
    set gg_trg_EncampmentDown = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_EncampmentDown, EVENT_PLAYER_UNIT_DEATH )
    call TriggerAddCondition( gg_trg_EncampmentDown, Condition( function Trig_EncampmentDown_Conditions ) )
    call TriggerAddAction( gg_trg_EncampmentDown, function Trig_EncampmentDown_Actions )
endfunction
EncampmentBuild
Events
Unit - A unit Begins construction
Conditions
(RevealBuilding[(Player number of (Owner of (Constructing structure)))] is dead) Equal to True
(Unit-type of (Constructing structure)) Equal to Oger Encampment
Actions
Unit - Create 1 . Town Hall for (Owner of (Constructing structure)) at ((Owner of (Constructing structure)) start location) facing Default building facing degrees
Set Variable Set RevealBuilding[(Player number of (Owner of (Constructing structure)))] = (Last created unit)
Unit - Hide (Last created unit)
Unit - Turn collision for (Last created unit) Off .
Unit - Create 1 . Anti-Food for (Owner of (Constructing structure)) at ((Owner of (Constructing structure)) start location) facing Default building facing degrees
Set Variable Set AntiFood[(Player number of (Owner of (Constructing structure)))] = (Last created unit)
Unit - Hide (Last created unit)
Unit - Turn collision for (Last created unit) Off .
BuildingOfEncampmentCanceled
Events
Unit - A unit Cancels construction
Conditions
(Unit-type of (Cancelled structure)) Equal to Oger Encampment
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in (Units owned by (Owner of (Cancelled structure)) matching ((((Matching unit) is A town-hall-type unit) Equal to True) and (((Matching unit) is alive) Equal to True)).)) Equal to 1
Then - Actions
Unit - Kill RevealBuilding[(Player number of (Owner of (Cancelled structure)))]
Unit - Kill AntiFood[(Player number of (Owner of (Cancelled structure)))]
Skip remaining actions
Else - Actions
AttackingTreeMove
Events
Unit - A unit Is issued an order targeting a point
Conditions
(Issued order) Equal to (Order(move))
(Unit-type of (Ordered unit)) Equal to Walking Tree (attacking)
Actions
Unit Group - Pick every unit in (Units within 256.00 of (Position of (Ordered unit)) matching (((Owner of (Matching unit)) is an enemy of (Owner of HarvestReturnTargets[(Custom value of (Ordered unit))]).) Equal to True).) and do (Actions)
Loop - Actions
Unit - Order (Ordered unit) to Attack . (Picked unit)
function Trig_ForrestBackup_Conditions takes nothing returns boolean
    if ( not ( GetSpellAbilityId() == 'A008' ) ) then
        return false
    endif
    return true
endfunction

function Trig_ForrestBackup_Actions takes nothing returns nothing
    local effect forrest_backup
    call AddSpecialEffectTargetUnitBJ( "overhead", GetSpellAbilityUnit(), "Abilities\\Spells\\Human\\Brilliance\\Brilliance.mdl" )
    set forrest_backup = GetLastCreatedEffectBJ()
    call StartTimerBJ( udg_ForrestBackupTimer[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))], false, 20.00 )
    call PolledWait( 20 )
    call DestroyEffectBJ( forrest_backup )
endfunction

//===========================================================================
function InitTrig_ForrestBackup takes nothing returns nothing
    set gg_trg_ForrestBackup = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_ForrestBackup, EVENT_PLAYER_UNIT_SPELL_FINISH )
    call TriggerAddCondition( gg_trg_ForrestBackup, Condition( function Trig_ForrestBackup_Conditions ) )
    call TriggerAddAction( gg_trg_ForrestBackup, function Trig_ForrestBackup_Actions )
endfunction
ForrestBackupTimerExpires
Events
Time - ForrestBackupTimer[1] expires
Time - ForrestBackupTimer[2] expires
Time - ForrestBackupTimer[3] expires
Time - ForrestBackupTimer[4] expires
Time - ForrestBackupTimer[5] expires
Time - ForrestBackupTimer[6] expires
Time - ForrestBackupTimer[7] expires
Time - ForrestBackupTimer[8] expires
Time - ForrestBackupTimer[9] expires
Time - ForrestBackupTimer[10] expires
Time - ForrestBackupTimer[11] expires
Time - ForrestBackupTimer[12] expires
Conditions
Actions
ExpansionTownMineCart
Events
Unit - A unit Finishes construction
Conditions
(Unit-type of (Constructed structure)) Equal to Oger Encampment
Actions
Unit - Create 1 . Mine Cart for (Owner of (Constructed structure)) at ((Position of (Constructed structure)) offset by (100.00, -320.00)) facing Default building facing degrees
Set Variable Set StartMineCartTemp = (Last created unit)
Set Variable Set CRAI_Player = (Owner of (Constructed structure))
Set Variable Set MineCartCount = (MineCartCount + 1)
Unit - Set the custom value of (Last created unit) to MineCartCount
Set Variable Set NrOfTownhalls[(Player number of (Owner of (Constructed structure)))] = (NrOfTownhalls[(Player number of (Owner of (Constructed structure)))] + 1)
Player - Limit training of Mine Cart to NrOfTownhalls[(Player number of (Owner of (Constructed structure)))] for (Owner of (Constructed structure))
Player - Limit training of Mine Cart to NrOfTownhalls[(Player number of (Owner of (Constructed structure)))] for (Owner of (Constructed structure))
Unit Group - Pick every unit in (Units within 1024.00 of (Position of (Constructed structure)) matching ((Unit-type of (Matching unit)) Equal to Wood Chanter).) and do (Order (Picked unit) to Board.StartMineCartTemp)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of (Constructed structure)) controller) Equal to Computer
Then - Actions
Unit - Create 1 . Wood Chanter for CRAI_Player at ((Position of (Constructed structure)) offset by (100.00, -320.00)) facing Default building facing degrees
Unit - Set the custom value of (Last created unit) to WoodChanterNumber
Set Variable Set WoodChanterNumber = (WoodChanterNumber + 1)
Unit - Order (Last created unit) to Board . StartMineCartTemp
Unit - Create 1 . Wood Chanter for CRAI_Player at ((Position of (Constructed structure)) offset by (100.00, -320.00)) facing Default building facing degrees
Unit - Set the custom value of (Last created unit) to WoodChanterNumber
Set Variable Set WoodChanterNumber = (WoodChanterNumber + 1)
Unit - Order (Last created unit) to Board . StartMineCartTemp
Unit - Create 1 . Wood Chanter for CRAI_Player at ((Position of (Constructed structure)) offset by (100.00, -320.00)) facing Default building facing degrees
Unit - Set the custom value of (Last created unit) to WoodChanterNumber
Set Variable Set WoodChanterNumber = (WoodChanterNumber + 1)
Unit - Order (Last created unit) to Board . StartMineCartTemp
Unit - Create 1 . Wood Chanter for CRAI_Player at ((Position of (Constructed structure)) offset by (100.00, -320.00)) facing Default building facing degrees
Unit - Set the custom value of (Last created unit) to WoodChanterNumber
Set Variable Set WoodChanterNumber = (WoodChanterNumber + 1)
Unit - Order (Last created unit) to Board . StartMineCartTemp
Unit - Create 1 . Wood Chanter for CRAI_Player at ((Position of (Constructed structure)) offset by (100.00, -320.00)) facing Default building facing degrees
Unit - Set the custom value of (Last created unit) to WoodChanterNumber
Set Variable Set WoodChanterNumber = (WoodChanterNumber + 1)
AI - Ignore StartMineCartTemp 's guard position
Unit - Order (Last created unit) to Board . StartMineCartTemp
Player - Set CRAI_Player . Current gold to ((CRAI_Player Current gold) - 350)
Wait 2.00 game-time seconds
Unit - Order StartMineCartTemp to Right-Click . (Random unit from (Units within 2000.00 of (Position of StartMineCartTemp) matching ((Unit-type of (Matching unit)) Equal to Gold Mine).))
Else - Actions
Wait 2.00 game-time seconds
Unit - Order StartMineCartTemp to Right-Click . (Random unit from (Units within 2000.00 of (Position of StartMineCartTemp) matching ((Unit-type of (Matching unit)) Equal to Gold Mine).))
MineCartDestroyed
Events
Unit - A unit Dies
Conditions
(Unit-type of (Dying unit)) Equal to Mine Cart
Actions
function Trig_NewMineCartOrdere_Conditions takes nothing returns boolean
    if ( not ( GetIssuedOrderIdBJ() == 1747988532 ) ) then
        return false
    endif
    return true
endfunction

function Trig_NewMineCartOrdere_Actions takes nothing returns nothing
    call PolledWait( 0.01 )
    call SetPlayerUnitAvailableBJ( 'h004', false, GetOwningPlayer(GetOrderedUnit()) )
endfunction

//===========================================================================
function InitTrig_NewMineCartOrdered takes nothing returns nothing
    set gg_trg_NewMineCartOrdered = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_NewMineCartOrdered, EVENT_PLAYER_UNIT_ISSUED_ORDER )
    call TriggerAddCondition( gg_trg_NewMineCartOrdered, Condition( function Trig_NewMineCartOrdere_Conditions ) )
    call TriggerAddAction( gg_trg_NewMineCartOrdered, function Trig_NewMineCartOrdere_Actions )
endfunction
MineCartBuildCancel
Events
Unit - A unit Cancels training a unit
Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Triggering unit)) Equal to Oger Encampment
(Unit-type of (Triggering unit)) Equal to Oger Village
(Unit-type of (Triggering unit)) Equal to Oger City
Actions
Set Variable Set AliveTownhallCount = "0"
Set Variable Set AliveMineCarts = "0"
Unit Group - Pick every unit in (Units owned by (Owner of (Triggering unit)) matching (((Matching unit) is A town-hall-type unit) Equal to True).) and do (Actions)
Loop - Actions
If (((Picked unit) is in BuildingsUnderConstruction.) Equal to False) then do (Set VariableSet AliveTownhallCount = (AliveTownhallCount + 1)) else do (Do nothing)
Set Variable Set AliveTownhallCount = (AliveTownhallCount - 1)
Unit Group - Pick every unit in (Units owned by (Owner of (Triggering unit)) of type Mine Cart) and do (Actions)
Loop - Actions
If (((Picked unit) is alive) Equal to True) then do (Set VariableSet AliveMineCarts = (AliveMineCarts + 1)) else do (Do nothing)
If (AliveMineCarts Less than AliveTownhallCount) then do (Make Mine Cart Available for training/construction by (Owner of (Triggering unit))) else do (Do nothing)
WoodchanterNumber
Events
Unit - A unit Finishes training a unit
Conditions
(Unit-type of (Trained unit)) Equal to Wood Chanter
Actions
Unit - Set the custom value of (Trained unit) to WoodChanterNumber
Set Variable Set WoodChanterNumber = (WoodChanterNumber + 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of (Trained unit)) controller) Equal to Computer
Then - Actions
Unit - Remove Harvest (Wood Chanter) from (Trained unit)
Unit - Add Harvest (CRAI) to (Trained unit)
Else - Actions
UnitIsInGnollHut
Events
Unit - A unit Is loaded into a transport
Conditions
(Unit-type of (Transporting unit)) Equal to Gnoll Hut
Actions
Unit - Add Heal (Gnoll Hut) to (Loading unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Loading unit)) Equal to Gnoll Poacher
(Unit-type of (Loading unit)) Equal to Berserker Gnoll
Then - Actions
Unit - Add Gnoll Attack Activate to (Transporting unit)
Unit - Set the custom value of (Transporting unit) to ((Custom value of (Transporting unit)) + 1)
Else - Actions
UnitOutOfGnollHut
Events
Unit - A unit Is issued an order targeting an object
Conditions
(Unit-type of (Ordered unit)) Equal to Gnoll Hut
(Issued order) Equal to (Order(unload))
Actions
Unit - Remove Heal (Gnoll Hut) from (Target unit of issued order)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Target unit of issued order)) Equal to Gnoll Poacher
(Unit-type of (Target unit of issued order)) Equal to Berserker Gnoll
Then - Actions
Unit - Set the custom value of (Ordered unit) to ((Custom value of (Ordered unit)) - 1)
If ((Custom value of (Ordered unit)) Equal to 0) then do (Remove Gnoll Attack Activate from (Ordered unit)) else do (Do nothing)
Else - Actions
AllUnitsOutOfGnollHut
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Unload (Gnoll Hut)
Actions
Unit - Remove Gnoll Attack Activate from (Casting unit)
Unit - Set the custom value of (Casting unit) to 0
Wait 1.00 seconds
Unit Group - Pick every unit in (Units in (Playable map area) matching ((Level of Heal (Gnoll Hut) for (Matching unit)) Greater than 0)) and do (Remove Heal (Gnoll Hut) from (Picked unit))
function Trig_StartSpiritualize_Conditions takes nothing returns boolean
    if ( not ( GetSpellAbilityId() == 'A01H' ) ) then
        return false
    endif
    return true
endfunction

function Trig_StartSpiritualize_Actions takes nothing returns nothing
    local unit Spirit_Divine
    local unit Spirit_Banish
    set udg_SpiritualizeTargets[GetUnitUserData(GetSpellAbilityUnit())] = GetSpellTargetUnit()
    call CreateNUnitsAtLoc( 1, 'h00E', Player(PLAYER_NEUTRAL_PASSIVE), GetUnitLoc(GetSpellTargetUnit()), bj_UNIT_FACING )
    call ShowUnitHide( GetLastCreatedUnit() )
    call IssueTargetOrderBJ( GetLastCreatedUnit(), "innerfire", GetSpellTargetUnit() )
    set Spirit_Divine = GetLastCreatedUnit()
    call CreateNUnitsAtLoc( 1, 'h00E', Player(PLAYER_NEUTRAL_PASSIVE), GetUnitLoc(GetSpellAbilityUnit()), bj_UNIT_FACING )
    call ShowUnitHide( GetLastCreatedUnit() )
    call IssueTargetOrderBJ( GetLastCreatedUnit(), "banish", GetSpellAbilityUnit() )
    set Spirit_Banish = GetLastCreatedUnit()
    call PolledWait( 2.00 )
    call RemoveUnit( Spirit_Divine )
    call RemoveUnit( Spirit_Banish )
endfunction

//===========================================================================
function InitTrig_StartSpiritualize takes nothing returns nothing
    set gg_trg_StartSpiritualize = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_StartSpiritualize, EVENT_PLAYER_UNIT_SPELL_CAST )
    call TriggerAddCondition( gg_trg_StartSpiritualize, Condition( function Trig_StartSpiritualize_Conditions ) )
    call TriggerAddAction( gg_trg_StartSpiritualize, function Trig_StartSpiritualize_Actions )
endfunction
CastCanceled
Events
Unit - A unit Stops casting an ability
Unit - A unit Finishes casting an ability
Conditions
(Ability being cast) Equal to Spiritualize (Gnoll Gifted)
Actions
Unit - Remove buff from SpiritualizeTargets[(Custom value of (Casting unit))]
Unit - Remove Banish buff from (Casting unit)
CasterDies
Events
Unit - A unit Dies
Conditions
(Unit-type of (Dying unit)) Equal to Gnoll Gifted
Actions
Unit - Remove buff from SpiritualizeTargets[(Custom value of (Dying unit))]
GnollGiftedTrained
Events
Unit - A unit Finishes training a unit
Conditions
(Unit-type of (Trained unit)) Equal to Gnoll Gifted
Actions
Set Variable Set GnollGiftedNumber = (GnollGiftedNumber + 1)
Unit - Set the custom value of (Trained unit) to GnollGiftedNumber
Spiritualize
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Spiritualize (new)
Actions
Unit - Create 1 . Spiritualize (Dummy) for (Owner of (Casting unit)) at (Position of (Target unit of ability being cast)) facing Default building facing degrees
Unit - Hide (Last created unit)
Unit - Order (Last created unit) to Neutral Dark Ranger - Silence . (Position of (Target unit of ability being cast))
Wait 2 game-time seconds
Unit - Remove (Last created unit) from the game
function Trig_RageWardSFX_Conditions takes nothing returns boolean
    if ( not ( GetUnitTypeId(GetSummonedUnit()) == 'o000' ) ) then
        return false
    endif
    return true
endfunction

function Trig_RageWardSFX_Actions takes nothing returns nothing
    local effect RageWard_SFX
    call AddSpecialEffectLocBJ( OffsetLocation(GetUnitLoc(GetSummonedUnit()), -20.00, -20.00), "Abilities\\Spells\\Other\\Doom\\DoomTarget.mdl" )
    set RageWard_SFX = GetLastCreatedEffectBJ()
    call PolledWait( 25 )
    call DestroyEffectBJ( RageWard_SFX )
endfunction

//===========================================================================
function InitTrig_RageWardSFX takes nothing returns nothing
    set gg_trg_RageWardSFX = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_RageWardSFX, EVENT_PLAYER_UNIT_SUMMON )
    call TriggerAddCondition( gg_trg_RageWardSFX, Condition( function Trig_RageWardSFX_Conditions ) )
    call TriggerAddAction( gg_trg_RageWardSFX, function Trig_RageWardSFX_Actions )
endfunction


function Trig_BloodLinkStart_Conditions takes nothing returns boolean
    if ( not ( GetSpellAbilityId() == 'A02C' ) ) then
        return false
    endif
    return true
endfunction

function Trig_BloodLinkStart_Actions takes nothing returns nothing
    local effect BL
    call AddSpecialEffectTargetUnitBJ( "overhead", GetSpellAbilityUnit(), "Abilities\\Weapons\\ChimaeraAcidMissile\\ChimaeraAcidMissile.mdl" )
    set BL = GetLastCreatedEffectBJ()
    call PolledWait( 4.00 )
    call DestroyEffectBJ( BL )
endfunction

//===========================================================================
function InitTrig_BloodLinkStart takes nothing returns nothing
    set gg_trg_BloodLinkStart = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_BloodLinkStart, EVENT_PLAYER_UNIT_SPELL_CHANNEL )
    call TriggerAddCondition( gg_trg_BloodLinkStart, Condition( function Trig_BloodLinkStart_Conditions ) )
    call TriggerAddAction( gg_trg_BloodLinkStart, function Trig_BloodLinkStart_Actions )
endfunction
SpeakerTowerIsBuild
Events
Unit - A unit Finishes an upgrade
Conditions
(Unit-type of (Triggering unit)) Equal to Speaker Tower (Upgraded)
Actions
Set Variable Set SpeakerTowerNumber = (SpeakerTowerNumber + 1)
Special Effect - Create a special effect attached to the overhead (Unexpected type: 'attachpoint') of (Triggering unit) using war3mapImported\speaker.mdx
Set Variable Set SpeakerTower_SFX[SpeakerTowerNumber] = (Last created special effect)
Unit - Set the custom value of (Triggering unit) to SpeakerTowerNumber
SpeakerTowerDestroyed
Events
Unit - A unit Dies
Conditions
(Unit-type of (Dying unit)) Equal to Speaker Tower (Upgraded)
Actions
Special Effect - Destroy SpeakerTower_SFX[(Custom value of (Dying unit))]
HeroIsTrained
Events
Unit - A unit Finishes training a unit
Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Trained unit)) Equal to
(Unit-type of (Trained unit)) Equal to
(Unit-type of (Trained unit)) Equal to
Actions
Special Effect - Create a special effect attached to the origin (Unexpected type: 'attachpoint') of (Trained unit) using war3mapImported\Glow.mdx
Unit - Change color of (Trained unit) to (Color of (Owner of (Trained unit)))
StartStunGrenade
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Stun Grenade
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Level of Stun Grenade for (Casting unit)) Equal to 1
Then - Actions
Unit Group - Pick every unit in (Units within 220.00 of (Target point of ability being cast) matching (((Matching unit) is A structure) Equal to False).) and do (Actions)
Loop - Actions
Unit - Create 1 . Stun Grenade (Dummy) for (Owner of (Casting unit)) at (Target point of ability being cast) facing Default building facing degrees
Unit - Hide (Last created unit)
Unit Group - Add (Last created unit) to StunGrenadeGroup
Unit - Add Stun Grenade (Level1) to (Last created unit)
Unit - Order (Last created unit) to Neutral - Hurl Boulder . (Picked unit)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Level of Stun Grenade for (Casting unit)) Equal to 2
Then - Actions
Unit Group - Pick every unit in (Units within 220.00 of (Target point of ability being cast) matching (((Matching unit) is A structure) Equal to False).) and do (Actions)
Loop - Actions
Unit - Create 1 . Stun Grenade (Dummy) for (Owner of (Casting unit)) at (Target point of ability being cast) facing Default building facing degrees
Unit - Hide (Last created unit)
Unit Group - Add (Last created unit) to StunGrenadeGroup
Unit - Add Stun Grenade (Level2) to (Last created unit)
Unit - Order (Last created unit) to Neutral - Hurl Boulder . (Picked unit)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Level of Stun Grenade for (Casting unit)) Equal to 3
Then - Actions
Unit Group - Pick every unit in (Units within 220.00 of (Target point of ability being cast) matching (((Matching unit) is A structure) Equal to False).) and do (Actions)
Loop - Actions
Unit - Create 1 . Stun Grenade (Dummy) for (Owner of (Casting unit)) at (Target point of ability being cast) facing Default building facing degrees
Unit - Hide (Last created unit)
Unit Group - Add (Last created unit) to StunGrenadeGroup
Unit - Add Stun Grenade (Level3) to (Last created unit)
Unit - Order (Last created unit) to Neutral - Hurl Boulder . (Picked unit)
Else - Actions
Wait 2.00 game-time seconds
Unit Group - Pick every unit in StunGrenadeGroup and do (Remove (Picked unit) from the game)
function Trig_StartLightGrenade_Conditions takes nothing returns boolean
    if ( not ( GetSpellAbilityId() == 'A012' ) ) then
        return false
    endif
    return true
endfunction

function Trig_StartLightGrenade_Func001001003 takes nothing returns boolean
    return ( GetOwningPlayer(GetFilterUnit()) == GetOwningPlayer(GetSpellAbilityUnit()) )
endfunction

function Trig_StartLightGrenade_Func001A takes nothing returns nothing
    call UnitAddAbilityBJ( 'Agho', GetEnumUnit() )
    call GroupAddUnitSimple( GetEnumUnit(), udg_LightGrenadeGroup )
endfunction

function Trig_StartLightGrenade_Func002001 takes nothing returns boolean
    return ( GetUnitAbilityLevelSwapped('A012', GetSpellAbilityUnit()) == 1 )
endfunction

function Trig_StartLightGrenade_Func003001 takes nothing returns boolean
    return ( GetUnitAbilityLevelSwapped('A012', GetSpellAbilityUnit()) == 2 )
endfunction

function Trig_StartLightGrenade_Func004001 takes nothing returns boolean
    return ( GetUnitAbilityLevelSwapped('A012', GetSpellAbilityUnit()) == 3 )
endfunction

function Trig_StartLightGrenade_Func005002 takes nothing returns nothing
    call UnitRemoveAbilityBJ( 'Agho', GetEnumUnit() )
endfunction

function Trig_StartLightGrenade_Actions takes nothing returns nothing
    local group LightGrenade_Targets
    call CinematicFadeBJ( bj_CINEFADETYPE_FADEOUTIN, 0.5, "ReplaceableTextures\\CameraMasks\\White_mask.blp", 100.00, 100.00, 100.00, 0 )
    call ForGroupBJ( GetUnitsInRangeOfLocMatching(400.00, GetSpellTargetLoc(), Condition(function Trig_StartLightGrenade_Func001001003)), function Trig_StartLightGrenade_Func001A )
    if ( Trig_StartLightGrenade_Func002001() ) then
        call PolledWait( 4.00 )
    else
        call DoNothing(  )
    endif
    set LightGrenade_Targets = udg_LightGrenadeGroup
    if ( Trig_StartLightGrenade_Func003001() ) then
        call PolledWait( 6.00 )
    else
        call DoNothing(  )
    endif
    if ( Trig_StartLightGrenade_Func004001() ) then
        call PolledWait( 8.00 )
    else
        call DoNothing(  )
    endif
    call ForGroupBJ( LightGrenade_Targets, function Trig_StartLightGrenade_Func005002 )
endfunction

//===========================================================================
function InitTrig_StartLightGrenade takes nothing returns nothing
    set gg_trg_StartLightGrenade = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_StartLightGrenade, EVENT_PLAYER_UNIT_SPELL_CAST )
    call TriggerAddCondition( gg_trg_StartLightGrenade, Condition( function Trig_StartLightGrenade_Conditions ) )
    call TriggerAddAction( gg_trg_StartLightGrenade, function Trig_StartLightGrenade_Actions )
endfunction
LimitHeroes
Events
Unit - A unit Begins training a unit
Conditions
(Unit-type of (Triggering unit)) Equal to Altar of Rebellion
Actions
Player - Make Unavailable for training/construction by (Owner of (Triggering unit))
Player - Make Unavailable for training/construction by (Owner of (Triggering unit))
Player - Make Unavailable for training/construction by (Owner of (Triggering unit))
UnLimitHeroes
Events
Unit - A unit Cancels training a unit
Conditions
(Unit-type of (Triggering unit)) Equal to Altar of Rebellion
Actions
If ((Number of units in (Units owned by (Owner of (Triggering unit)) of type H00N)) Equal to 0) then do (Make H00N Available for training/construction by (Owner of (Triggering unit))) else do (Do nothing)
If ((Number of units in (Units owned by (Owner of (Triggering unit)) of type H00K)) Equal to 0) then do (Make H00K Available for training/construction by (Owner of (Triggering unit))) else do (Do nothing)
If ((Number of units in (Units owned by (Owner of (Triggering unit)) of type H00L)) Equal to 0) then do (Make H00L Available for training/construction by (Owner of (Triggering unit))) else do (Do nothing)
UnLimitWhenFinished
Events
Unit - A unit Finishes training a unit
Conditions
(Unit-type of (Triggering unit)) Equal to Altar of Rebellion
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Trained unit)) Equal to
Then - Actions
If ((Number of units in (Units owned by (Owner of (Trained unit)) of type H00N)) Equal to 0) then do (Make H00N Available for training/construction by (Owner of (Trained unit))) else do (Do nothing)
If ((Number of units in (Units owned by (Owner of (Trained unit)) of type H00L)) Equal to 0) then do (Make H00L Available for training/construction by (Owner of (Trained unit))) else do (Do nothing)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Trained unit)) Equal to
Then - Actions
If ((Number of units in (Units owned by (Owner of (Trained unit)) of type H00K)) Equal to 0) then do (Make H00K Available for training/construction by (Owner of (Trained unit))) else do (Do nothing)
If ((Number of units in (Units owned by (Owner of (Trained unit)) of type H00L)) Equal to 0) then do (Make H00L Available for training/construction by (Owner of (Trained unit))) else do (Do nothing)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Trained unit)) Equal to
Then - Actions
If ((Number of units in (Units owned by (Owner of (Trained unit)) of type H00K)) Equal to 0) then do (Make H00K Available for training/construction by (Owner of (Trained unit))) else do (Do nothing)
If ((Number of units in (Units owned by (Owner of (Trained unit)) of type H00N)) Equal to 0) then do (Make H00N Available for training/construction by (Owner of (Trained unit))) else do (Do nothing)
Else - Actions
TurtleDies
Events
Unit - A unit Dies
Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Dying unit)) Equal to Transport Turtle
(Unit-type of (Dying unit)) Equal to Tamed Turtle
Actions
Unit - Remove (Dying unit) from the game
ItemLuck
Events
Unit - A unit Dies
Conditions
((Dying unit) is A structure) Equal to False
(Owner of (Dying unit)) Not equal to Neutral Hostile
(Owner of (Dying unit)) Not equal to Neutral Passive
Actions
Unit Group - Pick every unit in (Units within 900.00 of (Position of (Dying unit)) matching ((Unit-type of (Matching unit)) Equal to Transport Turtle).) and do (Actions)
Loop - Actions
Set Variable Set RndNumber = (Random integer number between 1 and 100)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
RndNumber Less than or equal to 10
Then - Actions
Set Variable Set ItemLevel = (Level of (Dying unit))
If (ItemLevel Greater than 7) then do (Set VariableSet ItemLevel = "7") else do (Do nothing)
Set Variable Set ItemLuckTurtle = (Picked unit)
If (ItemLevel Greater than 1) then do (Run SelectItemType <gen> (ignoring conditions)) else do (Do nothing)
Else - Actions
SelectItemType
Events
Conditions
Actions
Item - Create (Random level ItemLevel item-type) at (Center of (Playable map area))
Set Variable Set ItemType = (Item-type of (Last created item))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-class of (Last created item)) Equal to Powerup
Then - Actions
Item - Remove (Last created item)
Wait 0.10 game-time seconds
Trigger - Run SelectItemType <gen> (ignoring conditions)
Skip remaining actions
Else - Actions
Item - Remove (Last created item)
If (ItemLevel Greater than 0) then do (Create ItemType and give it to ItemLuckTurtle) else do (Do nothing)
Unmoint Poarcher
Events
Unit - A unit Begins casting an ability
Conditions
(Ability being cast) Equal to Unmount Poarcher (Neutral Hostile)
Actions
Unit - Create 1 . Gnoll Poacher for (Owner of (Casting unit)) at (Position of (Casting unit)) facing Default building facing degrees
Unit - Replace (Casting unit) with a Transport Turtle using The old unit's relative life and mana
TameTurtle
Events
Unit - A unit Is loaded into a transport
Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Transporting unit)) Equal to Transport Turtle
(Unit-type of (Transporting unit)) Equal to Transport Turtle (Berserk)
Actions
Unit - Remove (Loading unit) from the game
Unit - Replace (Transporting unit) with a Tamed Turtle using The old unit's relative life and mana
Special Effect - Create a special effect attached to the overhead (Unexpected type: 'attachpoint') of (Last replaced unit) using units\creeps\GnollArcher\GnollArcher.mdl
MagicPain
Events
Unit - A unit Begins casting an ability
Conditions
(Ability being cast) Equal to Magic Pain
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Target unit of ability being cast) is Summoned) Equal to False
Then - Actions
Unit - Order (Casting unit) to Stop .
Wait 0.20 game-time seconds
Unit - Reset ability cooldowns for (Casting unit) .
Game - Display to (Player group((Owner of (Casting unit)))) the text: |cffffcc00Unable to target non-summoned units.|r
Else - Actions
UnitProduced
Events
Unit - A unit Finishes training a unit
Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Trained unit)) Equal to Gnoll Poacher
(Unit-type of (Trained unit)) Equal to Gnoll Brute
(Unit-type of (Trained unit)) Equal to Gnoll Gifted
Actions
If ((Color of (Owner of (Trained unit))) Equal to Red) then do (Change (Trained unit)'s vertex coloring to (100%, 50.00%, 50.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Trained unit))) Equal to Blue) then do (Change (Trained unit)'s vertex coloring to (50.00%, 63.00%, 100.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Trained unit))) Equal to Teal) then do (Change (Trained unit)'s vertex coloring to (55.00%, 95.00%, 86.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Trained unit))) Equal to Purple) then do (Change (Trained unit)'s vertex coloring to (66.00%, 50.00%, 75.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Trained unit))) Equal to Yellow) then do (Change (Trained unit)'s vertex coloring to (100.00%, 100.00%, 50.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Trained unit))) Equal to Orange) then do (Change (Trained unit)'s vertex coloring to (100.00%, 77.00%, 53.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Trained unit))) Equal to Green) then do (Change (Trained unit)'s vertex coloring to (56.00%, 87.00%, 50.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Trained unit))) Equal to Pink) then do (Change (Trained unit)'s vertex coloring to (95.00%, 68.00%, 84.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Trained unit))) Equal to Gray) then do (Change (Trained unit)'s vertex coloring to (80.00%, 80.00%, 80.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Trained unit))) Equal to Light Blue) then do (Change (Trained unit)'s vertex coloring to (74.00%, 87.00%, 97.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Trained unit))) Equal to Dark Green) then do (Change (Trained unit)'s vertex coloring to (53.00%, 69.00%, 63.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Trained unit))) Equal to Brown) then do (Change (Trained unit)'s vertex coloring to (65.00%, 58.00%, 50.00%) with 0% transparency) else do (Do nothing)
SpiritSummoned
Events
Unit - A unit Spawns a summoned unit
Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Summoned unit)) Equal to Raging Spirit (Level 1)
(Unit-type of (Summoned unit)) Equal to Furious Spirit (Level 2)
(Unit-type of (Summoned unit)) Equal to Amok Spirit (Level 3)
Actions
If ((Color of (Owner of (Summoned unit))) Equal to Red) then do (Change (Summoned unit)'s vertex coloring to (100%, 50.00%, 50.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Summoned unit))) Equal to Blue) then do (Change (Summoned unit)'s vertex coloring to (50.00%, 63.00%, 100.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Summoned unit))) Equal to Teal) then do (Change (Summoned unit)'s vertex coloring to (55.00%, 95.00%, 86.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Summoned unit))) Equal to Purple) then do (Change (Summoned unit)'s vertex coloring to (66.00%, 50.00%, 75.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Summoned unit))) Equal to Yellow) then do (Change (Summoned unit)'s vertex coloring to (100.00%, 100.00%, 50.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Summoned unit))) Equal to Orange) then do (Change (Summoned unit)'s vertex coloring to (100.00%, 77.00%, 53.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Summoned unit))) Equal to Green) then do (Change (Summoned unit)'s vertex coloring to (56.00%, 87.00%, 50.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Summoned unit))) Equal to Pink) then do (Change (Summoned unit)'s vertex coloring to (95.00%, 68.00%, 84.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Summoned unit))) Equal to Gray) then do (Change (Summoned unit)'s vertex coloring to (80.00%, 80.00%, 80.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Summoned unit))) Equal to Light Blue) then do (Change (Summoned unit)'s vertex coloring to (74.00%, 87.00%, 97.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Summoned unit))) Equal to Dark Green) then do (Change (Summoned unit)'s vertex coloring to (53.00%, 69.00%, 63.00%) with 0% transparency) else do (Do nothing)
If ((Color of (Owner of (Summoned unit))) Equal to Brown) then do (Change (Summoned unit)'s vertex coloring to (65.00%, 58.00%, 50.00%) with 0% transparency) else do (Do nothing)
function Trig_MindBreak_Conditions takes nothing returns boolean
    if ( not ( GetSpellAbilityId() == 'A01U' ) ) then
        return false
    endif
    return true
endfunction

function Trig_MindBreak_Actions takes nothing returns nothing
    local unit SlowCaster
    call CreateNUnitsAtLoc( 1, 'h00U', Player(0), GetUnitLoc(GetSpellTargetUnit()), bj_UNIT_FACING )
    set SlowCaster = GetLastCreatedUnit()
    call ShowUnitHide( GetLastCreatedUnit() )
    call IssueTargetOrderBJ( GetLastCreatedUnit(), "slow", GetSpellTargetUnit() )
    call PolledWait( 2.00 )
    call RemoveUnit( SlowCaster )
endfunction

//===========================================================================
function InitTrig_MindBreak takes nothing returns nothing
    set gg_trg_MindBreak = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_MindBreak, EVENT_PLAYER_UNIT_SPELL_EFFECT )
    call TriggerAddCondition( gg_trg_MindBreak, Condition( function Trig_MindBreak_Conditions ) )
    call TriggerAddAction( gg_trg_MindBreak, function Trig_MindBreak_Actions )
endfunction
BombGetsKilled
Events
Unit - A unit Dies
Conditions
And - All (Conditions) are true
Conditions
(Unit-type of (Dying unit)) Equal to
(Killing unit) Not equal to No unit
Actions
Set Variable Set TimeBombCounter[(Player number of (Owner of (Dying unit)))] = "false"
Unit - Remove (Dying unit) from the game
function Trig_GoblinTimeBomb_Func003Func004001 takes nothing returns boolean
    return ( udg_TimeBombCounter[GetConvertedPlayerId(udg_TimeBombPlayer)] == false )
endfunction

function Trig_GoblinTimeBomb_Conditions takes nothing returns boolean
    if ( not ( GetSpellAbilityId() == 'A00A' ) ) then
        return false
    endif
    return true
endfunction

function Trig_GoblinTimeBomb_Func006Func001001 takes nothing returns boolean
    return ( IsUnitType(GetEnumUnit(), UNIT_TYPE_STRUCTURE) == true )
endfunction

function Trig_GoblinTimeBomb_Func006A takes nothing returns nothing
    if ( Trig_GoblinTimeBomb_Func006Func001001() ) then
        call SetUnitLifeBJ( GetEnumUnit(), ( GetUnitStateSwap(UNIT_STATE_LIFE, GetEnumUnit()) - ( 250.00 * ( GetUnitLifePercent(udg_TimeBombs[GetConvertedPlayerId(udg_TimeBombPlayer)]) / 100.00 ) ) ) )
    else
        call SetUnitLifeBJ( GetEnumUnit(), ( GetUnitStateSwap(UNIT_STATE_LIFE, GetEnumUnit()) - ( 50.00 * ( GetUnitLifePercent(udg_TimeBombs[GetConvertedPlayerId(udg_TimeBombPlayer)]) / 100.00 ) ) ) )
    endif
endfunction

function Trig_GoblinTimeBomb_Func007Func001001 takes nothing returns boolean
    return ( IsUnitType(GetEnumUnit(), UNIT_TYPE_STRUCTURE) == true )
endfunction

function Trig_GoblinTimeBomb_Func007A takes nothing returns nothing
    if ( Trig_GoblinTimeBomb_Func007Func001001() ) then
        call SetUnitLifeBJ( GetEnumUnit(), ( GetUnitStateSwap(UNIT_STATE_LIFE, GetEnumUnit()) - ( 1250.00 * ( GetUnitLifePercent(udg_TimeBombs[GetConvertedPlayerId(udg_TimeBombPlayer)]) / 100.00 ) ) ) )
    else
        call SetUnitLifeBJ( GetEnumUnit(), ( GetUnitStateSwap(UNIT_STATE_LIFE, GetEnumUnit()) - ( 250.00 * ( GetUnitLifePercent(udg_TimeBombs[GetConvertedPlayerId(udg_TimeBombPlayer)]) / 100.00 ) ) ) )
    endif
endfunction

function Trig_GoblinTimeBomb_Actions takes nothing returns nothing
    local unit Timebomb
    local texttag Countdown
    local integer loop_index
    local integer loop_indexend
     set udg_TimeBombCounter[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))] = true
    call CreateNUnitsAtLoc( 1, 'h00V', GetOwningPlayer(GetSpellAbilityUnit()), GetSpellTargetLoc(), bj_UNIT_FACING )
    set Timebomb = GetLastCreatedUnit()
    set udg_TimeBombs[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))] = GetLastCreatedUnit()
    set loop_index = 1
    set loop_indexend = 45
    loop
        exitwhen loop_index > loop_indexend
        call CreateTextTagUnitBJ( I2S(( 46 - loop_index )), Timebomb, 0, 10, 100, 0.00, 0.00, 0 )
        set Countdown = GetLastCreatedTextTag()
        call PolledWait( 1.00 )
        call DestroyTextTagBJ( Countdown )
        set udg_TimeBombPlayer = GetOwningPlayer(Timebomb)
        if ( Trig_GoblinTimeBomb_Func003Func004001() ) then
            return
        else
            call DoNothing(  )
        endif
        set loop_index = loop_index + 1
    endloop
    set udg_TimeBombPlayer = GetOwningPlayer(Timebomb)
    call ForGroupBJ( GetUnitsInRangeOfLocAll(900.00, GetUnitLoc(Timebomb)), function Trig_GoblinTimeBomb_Func006A )
    call ForGroupBJ( GetUnitsInRangeOfLocAll(512, GetUnitLoc(Timebomb)), function Trig_GoblinTimeBomb_Func007A )
    call AddSpecialEffectLocBJ( GetUnitLoc(Timebomb), "Abilities\\Spells\\Human\\FlameStrike\\FlameStrike1.mdl" )
    call KillUnit( Timebomb )
    call PlaySoundBJ( gg_snd_FlameStrikeBirth1 )
endfunction

//===========================================================================
function InitTrig_GoblinTimeBomb takes nothing returns nothing
    set gg_trg_GoblinTimeBomb = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_GoblinTimeBomb, EVENT_PLAYER_UNIT_SPELL_EFFECT )
    call TriggerAddCondition( gg_trg_GoblinTimeBomb, Condition( function Trig_GoblinTimeBomb_Conditions ) )
    call TriggerAddAction( gg_trg_GoblinTimeBomb, function Trig_GoblinTimeBomb_Actions )
endfunction
GoblinTimeBomb Copy
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Goblin Timebomb
Actions
Set Variable Set TimeBombCounter[(Player number of (Owner of (Casting unit)))] = "true"
Unit - Create 1 . for (Owner of (Casting unit)) at (Target point of ability being cast) facing Default building facing degrees
For each (Integer B) from 1 to 45 , do (Actions)
Loop - Actions
Floating Text - Destroy (Last created floating text)
Floating Text - Create floating text that reads (String((46 - (Integer B)))) above (Last created unit) with Z offset 0 , using font size 10 , color ( 100 %, 0.00 %, 0.00 %), and 0 % transparency
Wait 1.00 game-time seconds
If (TimeBombCounter[(Player number of TimeBombPlayer)] Equal to False) then do (Skip remaining actions) else do (Do nothing)
Unit Group - Pick every unit in (Units within 900.00 of (Position of (Last created unit)).) and do (Actions)
Loop - Actions
If (((Picked unit) is A structure) Equal to True) then do (Set life of (Picked unit) to ((Life of (Picked unit)) - (150.00 x ((Percentage life of (Last created unit)) / 100.00)))) else do (Set life of (Picked unit) to ((Life of (Picked unit)) - (50.00 x ((Percentage life of (Last created unit)) / 100.00))))
Unit Group - Pick every unit in (Units within 512 of (Position of (Last created unit)).) and do (Actions)
Loop - Actions
If (((Picked unit) is A structure) Equal to True) then do (Set life of (Picked unit) to ((Life of (Picked unit)) - (750.00 x ((Percentage life of (Last created unit)) / 100.00)))) else do (Set life of (Picked unit) to ((Life of (Picked unit)) - (450.00 x ((Percentage life of (Last created unit)) / 100.00))))
Unit - Kill (Triggering unit)
Sound - Play FlameStrikeBirth1 <gen>
function Trig_VoodooBlade_Conditions takes nothing returns boolean
    if ( not ( GetUnitTypeId(GetKillingUnitBJ()) == 'H00M' ) ) then
        return false
    endif
    return true
endfunction

function Trig_VoodooBlade_Func002Func006C takes nothing returns boolean
    if ( not ( GetUnitAbilityLevelSwapped('A01A', GetKillingUnitBJ()) == 1 ) ) then
        return false
    endif
    if ( not ( udg_VoodooBladeChance <= 15 ) ) then
        return false
    endif
    return true
endfunction

function Trig_VoodooBlade_Func002C takes nothing returns boolean
    if ( not Trig_VoodooBlade_Func002Func006C() ) then
        return false
    endif
    return true
endfunction

function Trig_VoodooBlade_Func003Func006C takes nothing returns boolean
    if ( not ( GetUnitAbilityLevelSwapped('A01A', GetKillingUnitBJ()) == 2 ) ) then
        return false
    endif
    if ( not ( udg_VoodooBladeChance <= 25 ) ) then
        return false
    endif
    return true
endfunction

function Trig_VoodooBlade_Func003C takes nothing returns boolean
    if ( not Trig_VoodooBlade_Func003Func006C() ) then
        return false
    endif
    return true
endfunction

function Trig_VoodooBlade_Func004Func006C takes nothing returns boolean
    if ( not ( GetUnitAbilityLevelSwapped('A01A', GetKillingUnitBJ()) == 3 ) ) then
        return false
    endif
    if ( not ( udg_VoodooBladeChance <= 35 ) ) then
        return false
    endif
    return true
endfunction

function Trig_VoodooBlade_Func004C takes nothing returns boolean
    if ( not Trig_VoodooBlade_Func004Func006C() ) then
        return false
    endif
    return true
endfunction

function Trig_VoodooBlade_Actions takes nothing returns nothing
    local unit VoodooBlade_Dummy
    set udg_VoodooBladeChance = GetRandomInt(1, 100)
    if ( Trig_VoodooBlade_Func002C() ) then
        call CreateNUnitsAtLoc( 1, 'h00W', GetOwningPlayer(GetKillingUnitBJ()), GetUnitLoc(GetDyingUnit()), bj_UNIT_FACING )
        set VoodooBlade_Dummy = GetLastCreatedUnit()
        call ShowUnitHide( GetLastCreatedUnit() )
        call IssueImmediateOrderBJ( GetLastCreatedUnit(), "animatedead" )
        call TriggerSleepAction( 2 )
        call RemoveUnit( VoodooBlade_Dummy )
    else
    endif
    if ( Trig_VoodooBlade_Func003C() ) then
        call CreateNUnitsAtLoc( 1, 'h00W', GetOwningPlayer(GetKillingUnitBJ()), GetUnitLoc(GetDyingUnit()), bj_UNIT_FACING )
        set VoodooBlade_Dummy = GetLastCreatedUnit()
        call ShowUnitHide( GetLastCreatedUnit() )
        call IssueImmediateOrderBJ( GetLastCreatedUnit(), "animatedead" )
        call TriggerSleepAction( 2 )
        call RemoveUnit( VoodooBlade_Dummy )
    else
    endif
    if ( Trig_VoodooBlade_Func004C() ) then
        call CreateNUnitsAtLoc( 1, 'h00W', GetOwningPlayer(GetKillingUnitBJ()), GetUnitLoc(GetDyingUnit()), bj_UNIT_FACING )
        set VoodooBlade_Dummy = GetLastCreatedUnit()
        call ShowUnitHide( GetLastCreatedUnit() )
        call IssueImmediateOrderBJ( GetLastCreatedUnit(), "animatedead" )
        call TriggerSleepAction( 2 )
        call RemoveUnit( VoodooBlade_Dummy )
    else
    endif
endfunction

//===========================================================================
function InitTrig_VoodooBlade takes nothing returns nothing
    set gg_trg_VoodooBlade = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_VoodooBlade, EVENT_PLAYER_UNIT_DEATH )
    call TriggerAddCondition( gg_trg_VoodooBlade, Condition( function Trig_VoodooBlade_Conditions ) )
    call TriggerAddAction( gg_trg_VoodooBlade, function Trig_VoodooBlade_Actions )
endfunction
PoisonNova
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Poison Nova
Actions
Unit Group - Pick every unit in (Units within 300.00 of (Position of (Target unit of ability being cast)) matching (((Matching unit) belongs to an ally of (Owner of (Casting unit)).) Equal to False).) and do (Actions)
Loop - Actions
Unit - Create 1 . Poison Nova (Dummy) for (Owner of (Casting unit)) at (Position of (Picked unit)) facing Default building facing degrees
Unit - Hide (Last created unit)
Unit - Order (Last created unit) to Attack . (Picked unit)
Wait 1.00 game-time seconds
Unit Group - Pick every unit in (Units of type Poison Nova (Dummy)) and do (Remove (Picked unit) from the game)
function Trig_BattleCry_Conditions takes nothing returns boolean
    if ( not ( GetSpellAbilityId() == 'A01Z' ) ) then
        return false
    endif
    return true
endfunction

function Trig_BattleCry_Func002Func001001 takes nothing returns boolean
    return ( udg_BattleCryActive[GetConvertedPlayerId(udg_BattleCryPlayerTemp)] == false )
endfunction

function Trig_BattleCry_Func002Func005001 takes nothing returns boolean
    return ( udg_BattleCryLevelTemp == 1 )
endfunction


function Trig_BattleCry_Func002Func003001 takes nothing returns boolean
    return ( udg_BattleCryLevelTemp == 2 )
endfunction

function Trig_BattleCry_Func002Func004001 takes nothing returns boolean
    return ( udg_BattleCryLevelTemp == 3 )
endfunction

function Trig_BattleCry_Actions takes nothing returns nothing
    local unit BattleCry_Caster
    local integer AbilityLevel
    local player CasterOwner
    local integer LoopVarStart
    local integer LoopVarEnd

    set udg_BattleCryActive[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))] = true
    set BattleCry_Caster = GetSpellAbilityUnit()
    set AbilityLevel = GetUnitAbilityLevelSwapped('A01Z', BattleCry_Caster)
    set CasterOwner = GetOwningPlayer(BattleCry_Caster)
    set LoopVarStart = 1
    set LoopVarEnd = 10
    set udg_BattleCryLevelTemp = AbilityLevel
    loop
        exitwhen LoopVarStart > LoopVarEnd
        set udg_BattleCryPlayerTemp = CasterOwner
        if ( Trig_BattleCry_Func002Func001001() ) then
            return
        else
            call DoNothing(  )
        endif
        if ( Trig_BattleCry_Func002Func005001() ) then
           call ModifyHeroStat( bj_HEROSTAT_INT, BattleCry_Caster, bj_MODIFYMETHOD_ADD, 1 )
           call ModifyHeroStat( bj_HEROSTAT_AGI, BattleCry_Caster, bj_MODIFYMETHOD_ADD, 1 )
           call ModifyHeroStat( bj_HEROSTAT_STR, BattleCry_Caster, bj_MODIFYMETHOD_ADD, 1 )

        else
            call DoNothing(  )
        endif

        if ( Trig_BattleCry_Func002Func003001() ) then
           call ModifyHeroStat( bj_HEROSTAT_INT, BattleCry_Caster, bj_MODIFYMETHOD_ADD, 2 )
           call ModifyHeroStat( bj_HEROSTAT_AGI, BattleCry_Caster, bj_MODIFYMETHOD_ADD, 2 )
           call ModifyHeroStat( bj_HEROSTAT_STR, BattleCry_Caster, bj_MODIFYMETHOD_ADD, 2 )

        else
            call DoNothing(  )
        endif
        if ( Trig_BattleCry_Func002Func004001() ) then
           call ModifyHeroStat( bj_HEROSTAT_INT, BattleCry_Caster, bj_MODIFYMETHOD_ADD, 3 )
           call ModifyHeroStat( bj_HEROSTAT_AGI, BattleCry_Caster, bj_MODIFYMETHOD_ADD, 3 )
           call ModifyHeroStat( bj_HEROSTAT_STR, BattleCry_Caster, bj_MODIFYMETHOD_ADD, 3 )

        else
            call DoNothing(  )
        endif
        call SetUnitScalePercent( BattleCry_Caster, ( 100.00 + ( 10.00 * I2R(LoopVarStart) ) ), ( 100.00 + ( 10.00 * I2R(LoopVarStart) ) ), ( 100.00 + ( 10.00 * I2R(LoopVarStart) ) ) )
        set udg_BattleCrySteps[GetConvertedPlayerId(GetOwningPlayer(BattleCry_Caster))] = ( udg_BattleCrySteps[GetConvertedPlayerId(GetOwningPlayer(BattleCry_Caster))] + 1 )
        call PolledWait( 0.50 )
        set LoopVarStart = LoopVarStart + 1
    endloop
endfunction

//===========================================================================
function InitTrig_BattleCry takes nothing returns nothing
    set gg_trg_BattleCry = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_BattleCry, EVENT_PLAYER_UNIT_SPELL_CHANNEL )
    call TriggerAddCondition( gg_trg_BattleCry, Condition( function Trig_BattleCry_Conditions ) )
    call TriggerAddAction( gg_trg_BattleCry, function Trig_BattleCry_Actions )
endfunction
BattleCry Copy
Events
Unit - A unit Begins channeling an ability
Conditions
(Ability being cast) Equal to Battle Cry
Actions
Set Variable Set BattleCryActive[(Player number of (Owner of (Casting unit)))] = "true"
For each (Integer A) from 1 to 10 , do (Actions)
Loop - Actions
If (BattleCryActive[(Player number of (Owner of (Casting unit)))] Equal to False) then do (Skip remaining actions) else do (Do nothing)
Hero - Modify Intelligence of (Casting unit) : Add 1 .
If ((Level of Battle Cry for (Casting unit)) Greater than 1) then do (Modify Agility of (Casting unit): Add 1.) else do (Do nothing)
If ((Level of Battle Cry for (Casting unit)) Greater than 2) then do (Modify Strength of (Casting unit): Add 1.) else do (Do nothing)
Animation - Change (Casting unit) 's size to ( (100.00 + (10.00 x (Real((Integer A))))) %, (100.00 + (10.00 x (Real((Integer A))))) %, (100.00 + (10.00 x (Real((Integer A))))) %) of its original size
Set Variable Set BattleCrySteps[(Player number of (Owner of (Casting unit)))] = (BattleCrySteps[(Player number of (Owner of (Casting unit)))] + 1)
Wait 2.00 game-time seconds
function Trig_BattleCryCanceled_Conditions takes nothing returns boolean
    if ( not ( GetSpellAbilityId() == 'A01Z' ) ) then
        return false
    endif
    return true
endfunction

function Trig_BattleCryCanceled_Func003Func003001 takes nothing returns boolean
    return ( udg_BattleCryLevelTemp == 2 )
endfunction

function Trig_BattleCryCanceled_Func003Func004001 takes nothing returns boolean
    return ( udg_BattleCryLevelTemp == 3 )
endfunction

function Trig_BattleCryCanceled_Func003Func005001 takes nothing returns boolean
    return ( udg_BattleCryLevelTemp == 1 )
endfunction

function Trig_BattleCryCanceled_Actions takes nothing returns nothing
    local unit BattleCry_Caster
    local integer AbilityLevel
    local integer LoopStart
    local integer LoopEnd

    set udg_BattleCryActive[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))] = false
    set BattleCry_Caster = GetSpellAbilityUnit()
    set AbilityLevel = GetUnitAbilityLevelSwapped('A01Z', BattleCry_Caster)
    set udg_BattleCryLevelTemp = AbilityLevel
    if ( Trig_BattleCryCanceled_Func003Func003001() ) then
       call PolledWait( 10.00 ) 
    else
        call DoNothing(  )
    endif
    if ( Trig_BattleCryCanceled_Func003Func004001() ) then
       call PolledWait( 20.00 ) 
    else
        call DoNothing(  )
    endif
    
    set LoopStart = 1
    set LoopEnd = udg_BattleCrySteps[GetConvertedPlayerId(GetOwningPlayer(BattleCry_Caster))] - 1
    loop
        exitwhen LoopStart > LoopEnd
        call PolledWait( 3.00 )
        if ( Trig_BattleCryCanceled_Func003Func005001() ) then
            call ModifyHeroStat( bj_HEROSTAT_INT, BattleCry_Caster, bj_MODIFYMETHOD_SUB, 1 )
            call ModifyHeroStat( bj_HEROSTAT_AGI, BattleCry_Caster, bj_MODIFYMETHOD_SUB, 1 )
            call ModifyHeroStat( bj_HEROSTAT_STR, BattleCry_Caster, bj_MODIFYMETHOD_SUB, 1 )
        else
            call DoNothing(  )
        endif
        if ( Trig_BattleCryCanceled_Func003Func004001() ) then
            call ModifyHeroStat( bj_HEROSTAT_INT, BattleCry_Caster, bj_MODIFYMETHOD_SUB, 3 )
            call ModifyHeroStat( bj_HEROSTAT_AGI, BattleCry_Caster, bj_MODIFYMETHOD_SUB, 3 )
            call ModifyHeroStat( bj_HEROSTAT_STR, BattleCry_Caster, bj_MODIFYMETHOD_SUB, 3 )
        else
            call DoNothing(  )
        endif
        if ( Trig_BattleCryCanceled_Func003Func003001() ) then
            call ModifyHeroStat( bj_HEROSTAT_INT, BattleCry_Caster, bj_MODIFYMETHOD_SUB, 2 )
            call ModifyHeroStat( bj_HEROSTAT_AGI, BattleCry_Caster, bj_MODIFYMETHOD_SUB, 2 )
            call ModifyHeroStat( bj_HEROSTAT_STR, BattleCry_Caster, bj_MODIFYMETHOD_SUB, 2 )
        else
            call DoNothing(  )
        endif

        call SetUnitScalePercent( BattleCry_Caster, ( 100.00 + ( 10.00 * ( I2R(udg_BattleCrySteps[GetConvertedPlayerId(GetOwningPlayer(BattleCry_Caster))]) - I2R(LoopStart) ) ) ), ( 100.00 + ( 10.00 * ( I2R(udg_BattleCrySteps[GetConvertedPlayerId(GetOwningPlayer(BattleCry_Caster))]) - I2R(LoopStart) ) ) ), ( 100.00 + ( 10.00 * ( I2R(udg_BattleCrySteps[GetConvertedPlayerId(GetOwningPlayer(BattleCry_Caster))]) - I2R(LoopStart) ) ) ) )
        set LoopStart = LoopStart + 1
    endloop
    set udg_BattleCrySteps[GetConvertedPlayerId(GetOwningPlayer(BattleCry_Caster))] = 1
endfunction

//===========================================================================
function InitTrig_BattleCryCanceled takes nothing returns nothing
    set gg_trg_BattleCryCanceled = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_BattleCryCanceled, EVENT_PLAYER_UNIT_SPELL_ENDCAST )
    call TriggerAddCondition( gg_trg_BattleCryCanceled, Condition( function Trig_BattleCryCanceled_Conditions ) )
    call TriggerAddAction( gg_trg_BattleCryCanceled, function Trig_BattleCryCanceled_Actions )
endfunction
BattleCryCanceled Copy
Events
Unit - A unit Stops casting an ability
Conditions
(Ability being cast) Equal to Battle Cry
Actions
Set Variable Set BattleCryActive[(Player number of (Owner of (Casting unit)))] = "false"
Game - Display to (All players) the text: test
For each (Integer A) from 1 to BattleCrySteps[(Player number of (Owner of (Casting unit)))] , do (Actions)
Loop - Actions
Wait 3.00 game-time seconds
Hero - Modify Intelligence of (Casting unit) : Subtract 1 .
If ((Level of Battle Cry for (Casting unit)) Greater than 1) then do (Modify Agility of (Casting unit): Subtract 1.) else do (Do nothing)
If ((Level of Battle Cry for (Casting unit)) Greater than 2) then do (Modify Strength of (Casting unit): Subtract 1.) else do (Do nothing)
Animation - Change (Casting unit) 's size to ( (100.00 + (10.00 x ((Real(BattleCrySteps[(Player number of (Owner of (Casting unit)))])) - (Real((Integer A)))))) %, (100.00 + (10.00 x ((Real(BattleCrySteps[(Player number of (Owner of (Casting unit)))])) - (Real((Integer A)))))) %, (100.00 + (10.00 x ((Real(BattleCrySteps[(Player number of (Owner of (Casting unit)))])) - (Real((Integer A)))))) %) of its original size
Set Variable Set BattleCrySteps[(Player number of (Owner of (Casting unit)))] = "1"
function Trig_ShadowVampEffect_Conditions takes nothing returns boolean
    if ( not ( GetSpellAbilityId() == 'A02K' ) ) then
        return false
    endif
    return true
endfunction

function Trig_ShadowVampEffect_Actions takes nothing returns nothing
    local unit ShadowVampSFX
    call CreateNUnitsAtLoc( 1, 'h00Y', Player(PLAYER_NEUTRAL_PASSIVE), GetUnitLoc(GetSpellAbilityUnit()), bj_UNIT_FACING )
    set ShadowVampSFX = GetLastCreatedUnit()
    call PolledWait( 2 )
    call RemoveUnit( ShadowVampSFX )
endfunction

//===========================================================================
function InitTrig_ShadowVampEffect takes nothing returns nothing
    set gg_trg_ShadowVampEffect = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_ShadowVampEffect, EVENT_PLAYER_UNIT_SPELL_EFFECT )
    call TriggerAddCondition( gg_trg_ShadowVampEffect, Condition( function Trig_ShadowVampEffect_Conditions ) )
    call TriggerAddAction( gg_trg_ShadowVampEffect, function Trig_ShadowVampEffect_Actions )
endfunction


function Trig_ShadowVampAbillities_Conditions takes nothing returns boolean
    if ( not ( GetSpellAbilityId() == 'A02K' ) ) then
        return false
    endif
    return true
endfunction

function Trig_ShadowVampAbillities_Actions takes nothing returns nothing
    local player CastingOwner
    local unit Shadow_Vamp
    local location SV_Position
    
    set Shadow_Vamp = GetSpellAbilityUnit()
    set SV_Position = GetUnitLoc(Shadow_Vamp)
    set CastingOwner = GetOwningPlayer(GetSpellAbilityUnit())
    call SetPlayerAbilityAvailableBJ( false, 'A023', GetOwningPlayer(GetSpellAbilityUnit()) )
    call SetPlayerAbilityAvailableBJ( false, 'A025', GetOwningPlayer(GetSpellAbilityUnit()) )
    call SetPlayerAbilityAvailableBJ( false, 'A027', GetOwningPlayer(GetSpellAbilityUnit()) )
endfunction

//===========================================================================
function InitTrig_ShadowVampAbillities takes nothing returns nothing
    set gg_trg_ShadowVampAbillities = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_ShadowVampAbillities, EVENT_PLAYER_UNIT_SPELL_EFFECT )
    call TriggerAddCondition( gg_trg_ShadowVampAbillities, Condition( function Trig_ShadowVampAbillities_Conditions ) )
    call TriggerAddAction( gg_trg_ShadowVampAbillities, function Trig_ShadowVampAbillities_Actions )
endfunction


function Trig_VampAbillities_Conditions takes nothing returns boolean
    if ( not ( GetIssuedOrderIdBJ() == String2OrderIdBJ("ravenform") ) ) then
        return false
    endif
    if ( not ( GetUnitTypeId(GetOrderedUnit()) == 'E000' ) ) then
        return false
    endif
    return true
endfunction

function Trig_VampAbillities_Actions takes nothing returns nothing
    local unit OrderedUnit
    set OrderedUnit = GetOrderedUnit()
    call SetPlayerAbilityAvailableBJ( false, 'A023', GetOwningPlayer(GetOrderedUnit()) )
    call SetPlayerAbilityAvailableBJ( false, 'A025', GetOwningPlayer(GetOrderedUnit()) )
    call SetPlayerAbilityAvailableBJ( false, 'A027', GetOwningPlayer(GetOrderedUnit()) )
    call PolledWait( 1.00 )
    call UnitResetCooldown( OrderedUnit )
    call PolledWait( 59.00 )
    call IssueImmediateOrderBJ( OrderedUnit, "unravenform" )
endfunction

//===========================================================================
function InitTrig_VampAbillities takes nothing returns nothing
    set gg_trg_VampAbillities = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_VampAbillities, EVENT_PLAYER_UNIT_ISSUED_ORDER )
    call TriggerAddCondition( gg_trg_VampAbillities, Condition( function Trig_VampAbillities_Conditions ) )
    call TriggerAddAction( gg_trg_VampAbillities, function Trig_VampAbillities_Actions )
endfunction
VampAbillities Copy
Events
Unit - A unit Is issued an order with no target
Conditions
(Issued order) Equal to (Order(ravenform))
(Unit-type of (Ordered unit)) Equal to Vile Temptress
Actions
Player - Disable Assassinate for (Owner of (Ordered unit))
Player - Disable Bite for (Owner of (Ordered unit))
Player - Disable Enslave for (Owner of (Ordered unit))
Wait 1.00 game-time seconds
Unit - Reset ability cooldowns for (Ordered unit) .
function Trig_VampireHeight_Func001Func001C takes nothing returns boolean
    if ( not ( GetUnitFlyHeight(GetEnumUnit()) > 0.00 ) ) then
        return false
    endif
    return true
endfunction

function Trig_VampireHeight_Func001A takes nothing returns nothing
    if ( Trig_VampireHeight_Func001Func001C() ) then
        call SetUnitAnimation( udg_ShadowVamp, "death" )
        set udg_ShadowVamp = GetEnumUnit()
        call TriggerExecute( gg_trg_VampireCrash )
    else
    endif
endfunction

function Trig_VampireHeight_Func003A takes nothing returns nothing
    call UnitRemoveAbilityBJ( 'ACrn', GetEnumUnit() )
    call SetUnitLifeBJ( GetEnumUnit(), 10.00 )
endfunction

function Trig_VampireHeight_Actions takes nothing returns nothing
    local player SV_Owner
    set SV_Owner = GetOwningPlayer(udg_ShadowVamp)
    call ForGroupBJ( GetUnitsOfPlayerAndTypeId(GetOwningPlayer(udg_ShadowVamp), 'E001'), function Trig_VampireHeight_Func001A )
endfunction

//===========================================================================
function InitTrig_VampireHeight takes nothing returns nothing
    set gg_trg_VampireHeight = CreateTrigger(  )
    call TriggerAddAction( gg_trg_VampireHeight, function Trig_VampireHeight_Actions )
endfunction
VampireCrash
Events
Conditions
Actions
Wait 1.20 game-time seconds
Unit - Hide ShadowVamp
Wait 0.80 game-time seconds
Unit - Remove ShadowVamp from the game
Game Cache - Create a game cache from CreepRebellion.w3v (Unexpected type: 'stringnoformat')
Game Cache - Store ShadowVamp as Temptress (Unexpected type: 'stringnoformat') of Category (Unexpected type: 'stringnoformat') in (Last created game cache)
Set Variable Set SV_Owner = (Owner of ShadowVamp)
Game Cache - Restore Temptress (Unexpected type: 'stringnoformat') of Category (Unexpected type: 'stringnoformat') from (Last created game cache) for SV_Owner at (SV_Owner start location) facing 0
Unit - Set life of (Last restored unit) to 10.00
Unit - Set mana of (Last restored unit) to 0
Selection - Add (Last restored unit) to selection for SV_Owner
Game Cache - Clear (Last created game cache)
TemptressRestore
Events
Unit - A unit Is issued an order with no target
Conditions
(Issued order) Equal to (Order(unravenform))
(Unit-type of (Ordered unit)) Equal to
Actions
Animation - Change (Ordered unit) 's vertex coloring to ( 100 %, 100 %, 100 %) with 0 % transparency
Player - Enable Assassinate for (Owner of (Ordered unit))
Player - Enable Bite for (Owner of (Ordered unit))
Player - Enable Enslave for (Owner of (Ordered unit))
function Trig_Assassinate_Conditions takes nothing returns boolean
    if ( not ( GetSpellAbilityId() == 'A023' ) ) then
        return false
    endif
    return true
endfunction

function Trig_Assassinate_Actions takes nothing returns nothing
    local unit A_Caster
    local unit A_Target
    set A_Caster = GetSpellAbilityUnit()
    set A_Target = GetSpellTargetUnit()
    call TriggerSleepAction( 0.10 )
    call SetUnitPositionLoc( A_Caster, GetUnitLoc(A_Target) )
endfunction

//===========================================================================
function InitTrig_Assassinate takes nothing returns nothing
    set gg_trg_Assassinate = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_Assassinate, EVENT_PLAYER_UNIT_SPELL_EFFECT )
    call TriggerAddCondition( gg_trg_Assassinate, Condition( function Trig_Assassinate_Conditions ) )
    call TriggerAddAction( gg_trg_Assassinate, function Trig_Assassinate_Actions )
endfunction
Assassinate Strike
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Assassinate Strike (Neutral Hostile)
Actions
Game - Display to (All players) the text: test
Bite
Events
Unit - A unit Spawns a summoned unit
Conditions
(Unit-type of (Summoned unit)) Equal to Bite (Dummy)
Actions
Unit Group - Pick every unit in (Units owned by (Owner of (Summoned unit)) of type Vile Temptress) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Level of Bite for (Picked unit)) Equal to 1
Then - Actions
Unit - Set life of (Picked unit) to ((Life of (Picked unit)) + 25.00)
Unit - Set mana of (Picked unit) to ((Mana of (Picked unit)) + 20.00)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Level of Bite for (Picked unit)) Equal to 2
Then - Actions
Unit - Set life of (Picked unit) to ((Life of (Picked unit)) + 50.00)
Unit - Set mana of (Picked unit) to ((Mana of (Picked unit)) + 35.00)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Level of Bite for (Picked unit)) Equal to 3
Then - Actions
Unit - Set life of (Picked unit) to ((Life of (Picked unit)) + 75.00)
Unit - Set mana of (Picked unit) to ((Mana of (Picked unit)) + 50.00)
Else - Actions
Unit - Remove (Summoned unit) from the game
SiegeMachineryBuilt
Events
Unit - A unit Sells a unit
Conditions
(Unit-type of (Sold unit)) Equal to Flying Oger
Actions
Unit - Order (Sold unit) to Night Elf Ancients - Uproot .
Set Variable Set SiegeMachinery_Count = (SiegeMachinery_Count + 1)
Unit - Set the custom value of (Sold unit) to SiegeMachinery_Count
function Trig_SiegeDownRoot_Conditions takes nothing returns boolean
    if ( not ( GetIssuedOrderIdBJ() == String2OrderIdBJ("root") ) ) then
        return false
    endif
    if ( not ( GetUnitTypeId(GetOrderedUnit()) == 'h00Z' ) ) then
        return false
    endif
    return true
endfunction

function Trig_SiegeDownRoot_Func001001 takes nothing returns boolean
    return ( DistanceBetweenPoints(GetUnitLoc(udg_SiegeMachineryGlobal), udg_SiegeMachineryTarget) <= 1.00 )
endfunction

function Trig_SiegeDownRoot_Actions takes nothing returns nothing
    local unit SiegeMachinery
    local location Siege_Target
    set SiegeMachinery = GetOrderedUnit()
    set Siege_Target = GetOrderPointLoc()
    loop
        set udg_SiegeMachineryGlobal = SiegeMachinery
        set udg_SiegeMachineryTarget = Siege_Target
        exitwhen ( Trig_SiegeDownRoot_Func001001() )
        call TriggerSleepAction(RMaxBJ(bj_WAIT_FOR_COND_MIN_INTERVAL, 0.50))
    endloop
    call AddSpecialEffectTargetUnitBJ( "origin", SiegeMachinery, "Abilities\\Spells\\Orc\\ReinforcedTrollBurrow\\ReinforcedTrollBurrowTarget.mdl" )
    set udg_FortifyEffects[GetUnitUserData(SiegeMachinery)] = GetLastCreatedEffectBJ()
endfunction

//===========================================================================
function InitTrig_SiegeDownRoot takes nothing returns nothing
    set gg_trg_SiegeDownRoot = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_SiegeDownRoot, EVENT_PLAYER_UNIT_ISSUED_POINT_ORDER )
    call TriggerAddCondition( gg_trg_SiegeDownRoot, Condition( function Trig_SiegeDownRoot_Conditions ) )
    call TriggerAddAction( gg_trg_SiegeDownRoot, function Trig_SiegeDownRoot_Actions )
endfunction
SiegeUpRoot
Events
Unit - A unit Is issued an order with no target
Conditions
(Issued order) Equal to (Order(unroot))
(Unit-type of (Ordered unit)) Equal to Siege Machinery
Actions
Special Effect - Destroy FortifyEffects[(Custom value of (Ordered unit))]
LoadLoyaltyCancel
Events
Unit - A unit Is loaded into a transport
Conditions
(Loading unit) Equal to LoyaltyTargets[(Player number of (Owner of (Loading unit)))]
Actions
Game - Display to (Player group((Owner of (Loading unit)))) the text: |cffffcc00Unable to load target.|r
Unit - Order (Transporting unit) to Unload . (Loading unit)
function Trig_LoyaltyCanceled_Conditions takes nothing returns boolean
    if ( not ( GetSpellAbilityId() == 'A02E' ) ) then
        return true
    endif
    return true
endfunction

function Trig_LoyaltyCanceled_Actions takes nothing returns nothing
    local unit Target_Loyalty
    set Target_Loyalty = udg_LoyaltyTargets[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))]
    set udg_LoyaltyActive = false
    call SetUnitVertexColorBJ( GetSpellAbilityUnit(), 100.00, 100.00, 100.00, 0.00 )
    call ResetUnitAnimation( GetSpellAbilityUnit() )
    call SetUnitOwner( udg_LoyaltyTargets[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))], udg_LoyaltyOwner[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))], true )
    set bj_forLoopAIndex = 1
    set bj_forLoopAIndexEnd = 6
    loop
        exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
        call UnitRemoveItemFromSlotSwapped( GetForLoopIndexA(), udg_LoyaltyTargets[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))] )
        set udg_Loyalty_ItemDrop[GetForLoopIndexA()] = GetLastRemovedItem()
        set bj_forLoopAIndex = bj_forLoopAIndex + 1
    endloop
    call UnitRemoveAbilityBJ( 'A01J', udg_LoyaltyTargets[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))] )
    call UnitAddAbilityBJ( 'AInv', udg_LoyaltyTargets[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))] )
    set bj_forLoopAIndex = 1
    set bj_forLoopAIndexEnd = 6
    loop
        exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
        call UnitAddItemSwapped( udg_Loyalty_ItemDrop[GetForLoopIndexA()], udg_LoyaltyTargets[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))] )
        call SetItemDroppableBJ( udg_Loyalty_ItemDrop[GetForLoopIndexA()], true )
        set bj_forLoopAIndex = bj_forLoopAIndex + 1
    endloop
    call SuspendHeroXPBJ( true, udg_LoyaltyTargets[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))] )
    call TriggerSleepAction( 5.00 )
    call SetUnitInvulnerable( Target_Loyalty, false )
endfunction

//===========================================================================
function InitTrig_LoyaltyCanceled takes nothing returns nothing
    set gg_trg_LoyaltyCanceled = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_LoyaltyCanceled, EVENT_PLAYER_UNIT_SPELL_ENDCAST )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_LoyaltyCanceled, EVENT_PLAYER_UNIT_SPELL_FINISH )
    call TriggerAddCondition( gg_trg_LoyaltyCanceled, Condition( function Trig_LoyaltyCanceled_Conditions ) )
    call TriggerAddAction( gg_trg_LoyaltyCanceled, function Trig_LoyaltyCanceled_Actions )
endfunction
LoyaltyCast
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Loyalty
Actions
Game - Display to (Player group((Owner of (Target unit of ability being cast)))) the text: |cffffcc00A Hero has been converted !|r
Set Variable Set LoyaltyOwner[(Player number of (Owner of (Casting unit)))] = (Owner of (Target unit of ability being cast))
Unit - Change ownership of (Target unit of ability being cast) to (Owner of (Casting unit)) and Change color
Unit - Make (Target unit of ability being cast) Invulnerable
Set Variable Set LoyaltyTargets[(Player number of (Owner of (Casting unit)))] = (Target unit of ability being cast)
For each (Integer A) from 1 to 6 , do (Actions)
Loop - Actions
Hero - Drop the item from slot (Integer A) of (Target unit of ability being cast) .
Set Variable Set Loyalty_ItemDrop[(Integer A)] = (Last dropped item)
Unit - Remove Inventory (Hero) from (Target unit of ability being cast)
Unit - Add Turtle Inventory (Human) to (Target unit of ability being cast)
For each (Integer A) from 1 to 6 , do (Actions)
Loop - Actions
Hero - Give Loyalty_ItemDrop[(Integer A)] to (Target unit of ability being cast)
Item - Make Loyalty_ItemDrop[(Integer A)] Undroppable
Hero - Disable experience gain for (Target unit of ability being cast) .
Animation - Change (Casting unit) 's vertex coloring to ( 0.00 %, 0.00 %, 0.00 %) with 75.00 % transparency
Animation - Play (Casting unit) 's stand victory animation
Set Variable Set LoyaltyTemp = (Casting unit)
Sound - Play SoulGem <gen> at 100 % volume, attached to (Casting unit)
Trigger - Run SFX <gen> (ignoring conditions)
function Trig_SFX_Func002Func003001 takes nothing returns boolean
    return ( udg_LoyaltyActive == false )
endfunction

function Trig_SFX_Actions takes nothing returns nothing
    local unit Loyalty_Caster
    local integer counter
    set udg_LoyaltyActive = true
    set counter = 1
    set Loyalty_Caster = udg_LoyaltyTemp
    loop
        exitwhen counter > 100
        call AddSpecialEffectTargetUnitBJ( "origin", Loyalty_Caster, "war3mapImported\\DoomDeath.mdl" )
        call TriggerSleepAction( 1.00 )
        if ( Trig_SFX_Func002Func003001() ) then
            return
        else
            call DoNothing(  )
        endif
        set counter = counter + 1
    endloop
endfunction

//===========================================================================
function InitTrig_SFX takes nothing returns nothing
    set gg_trg_SFX = CreateTrigger(  )
    call TriggerAddAction( gg_trg_SFX, function Trig_SFX_Actions )
endfunction
NoBigBadVoodoo
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Battle Roar
Actions
Unit Group - Pick every unit in (Units of type H00L) and do (Add classification of An Ancient to (Picked unit))
Wait 30.00 game-time seconds
Unit - Remove classification of An Ancient from (Picked unit)
function Trig_Steal_Gold_Conditions takes nothing returns boolean
    if ( not ( GetSpellAbilityId() == 'A01E' ) ) then
        return false
    endif
    return true
endfunction

function Trig_Steal_Gold_Func001Func001Func003C takes nothing returns boolean
    if ( not ( GetPlayerState(GetOwningPlayer(GetSpellTargetUnit()), PLAYER_STATE_RESOURCE_GOLD) <= 0 ) ) then
        return false
    endif
    return true
endfunction

function Trig_Steal_Gold_Func001C takes nothing returns boolean
    if ( not ( IsUnitType(GetSpellTargetUnit(), UNIT_TYPE_TOWNHALL) == false ) ) then
        return false
    endif
    return true
endfunction

function Trig_Steal_Gold_Func001Func001Func002001 takes nothing returns boolean
    return ( GetUnitUserData(GetSpellAbilityUnit()) != 1 )
endfunction


function Trig_Steal_Gold_Actions takes nothing returns nothing
    local unit Caster
    local unit CasterTarget
    local integer bj_forLoopCIndex
    local integer bj_forLoopCIndexEnd
    set Caster = GetSpellAbilityUnit()
    set CasterTarget = GetSpellTargetUnit()
    if ( Trig_Steal_Gold_Func001C() ) then
        call IssueImmediateOrderBJ( Caster, "stop" )
        call DisplayTextToForce( GetForceOfPlayer(GetOwningPlayer(GetSpellAbilityUnit())), "TRIGSTR_1349" )
        call PolledWait( 0.10 )
        call SetUnitManaBJ( Caster, ( GetUnitStateSwap(UNIT_STATE_MANA, Caster) + 100.00 ) )
        call UnitResetCooldown( Caster )
    else
        call SetUnitUserData( GetSpellAbilityUnit(), 1 )
        set bj_forLoopCIndex = 1
        set bj_forLoopCIndexEnd = 60
        loop
            exitwhen bj_forLoopCIndex > bj_forLoopCIndexEnd
            if ( Trig_Steal_Gold_Func001Func001Func002001() ) then
                set bj_forLoopCIndex = 61
            else
                call DoNothing(  )
            endif

            call SetPlayerStateBJ( GetOwningPlayer(Caster), PLAYER_STATE_RESOURCE_GOLD, ( GetPlayerState(GetOwningPlayer(Caster), PLAYER_STATE_RESOURCE_GOLD) + 10 ) )
            call SetPlayerStateBJ( GetOwningPlayer(CasterTarget), PLAYER_STATE_RESOURCE_GOLD, ( GetPlayerState(GetOwningPlayer(CasterTarget), PLAYER_STATE_RESOURCE_GOLD) - 10 ) )
            if ( Trig_Steal_Gold_Func001Func001Func003C() ) then
                call IssueImmediateOrderBJ( Caster, "stop" )
                return
            else
            endif
            call PolledWait( 1.00 )
            set bj_forLoopCIndex = bj_forLoopCIndex + 1
        endloop
    endif
endfunction

//===========================================================================
function InitTrig_Steal_Gold takes nothing returns nothing
    set gg_trg_Steal_Gold = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_Steal_Gold, EVENT_PLAYER_UNIT_SPELL_EFFECT )
    call TriggerAddCondition( gg_trg_Steal_Gold, Condition( function Trig_Steal_Gold_Conditions ) )
    call TriggerAddAction( gg_trg_Steal_Gold, function Trig_Steal_Gold_Actions )
endfunction
Steal Cancel
Events
Unit - A unit Stops casting an ability
Unit - A unit Finishes casting an ability
Conditions
(Ability being cast) Equal to Steal Gold
Actions
Unit - Set the custom value of (Casting unit) to 0
Steal Gold Copy
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Steal Gold
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Target unit of ability being cast) is A town-hall-type unit) Equal to False
Then - Actions
Unit - Order (Casting unit) to Stop .
Unit - Reset ability cooldowns for (Casting unit) .
Unit - Set mana of (Casting unit) to ((Mana of (Casting unit)) + 100.00)
Game - Display to (Player group((Owner of (Casting unit)))) the text: |cffffcc00Must target Townhall !|r
Game - Display to (All players) the text: (String((Mana of (Casting unit))))
Else - Actions
For each (Integer A) from 1 to 60 , do (Actions)
Loop - Actions
Player - Set (Owner of (Casting unit)) . Current gold to (((Owner of (Casting unit)) Current gold) + 10)
If ((Custom value of (Casting unit)) Not equal to 1) then do (Skip remaining actions) else do (Do nothing)
Player - Set (Owner of (Target unit of ability being cast)) . Current gold to (((Owner of (Target unit of ability being cast)) Current gold) - 10)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of (Target unit of ability being cast)) Current gold) Less than or equal to 0
Then - Actions
Unit - Order (Casting unit) to Stop .
Skip remaining actions
Else - Actions
Wait 1.00 game-time seconds
function Trig_Spy_Conditions takes nothing returns boolean
    if ( not ( GetSpellAbilityId() == 'A02D' ) ) then
        return false
    endif
    return true
endfunction

function Trig_Spy_Func001Func001C takes nothing returns boolean
    if ( not ( GetPlayerState(GetOwningPlayer(GetSpellAbilityUnit()), PLAYER_STATE_RESOURCE_GOLD) < 50 ) ) then
        return false
    endif
    return true
endfunction

function Trig_Spy_Func001Func002C takes nothing returns boolean
    if ( not ( GetUnitTypeId(GetSpellTargetUnit()) != 'hhou' ) ) then
        return false
    endif
    if ( not ( GetUnitTypeId(GetSpellTargetUnit()) != 'otrb' ) ) then
        return false
    endif
    if ( not ( GetUnitTypeId(GetSpellTargetUnit()) != 'uzig' ) ) then
        return false
    endif
    if ( not ( GetUnitTypeId(GetSpellTargetUnit()) != 'uzg1' ) ) then
        return false
    endif
    if ( not ( GetUnitTypeId(GetSpellTargetUnit()) != 'uzg2' ) ) then
        return false
    endif
    if ( not ( GetUnitTypeId(GetSpellTargetUnit()) != 'emow' ) ) then
        return false
    endif
    if ( not ( GetUnitTypeId(GetSpellTargetUnit()) != 'h005' ) ) then
        return false
    endif
    return true
endfunction

function Trig_Spy_Func001C takes nothing returns boolean
    if ( not Trig_Spy_Func001Func002C() ) then
        return false
    endif
    return true
endfunction

function Trig_Spy_Actions takes nothing returns nothing
    local unit Caster
    set Caster = GetSpellAbilityUnit()
    if ( Trig_Spy_Func001C() ) then
        call IssueImmediateOrderBJ( GetSpellAbilityUnit(), "stop" )
        call DisplayTextToForce( GetForceOfPlayer(GetOwningPlayer(GetSpellAbilityUnit())), "TRIGSTR_1363" )
        call PolledWait( 0.10 )
        call UnitResetCooldown( Caster )
        call SetUnitManaBJ( Caster, ( GetUnitStateSwap(UNIT_STATE_MANA, Caster) + 50.00 ) )
    else
        if ( Trig_Spy_Func001Func001C() ) then
            call IssueImmediateOrderBJ( GetSpellAbilityUnit(), "stop" )
            call DisplayTextToForce( GetForceOfPlayer(GetOwningPlayer(GetSpellAbilityUnit())), "TRIGSTR_1364" )
            call PolledWait( 0.10 )
            call UnitResetCooldown( Caster )
            call SetUnitManaBJ( Caster, ( GetUnitStateSwap(UNIT_STATE_MANA, Caster) + 50.00 ) )
        else
            call SetPlayerStateBJ( GetOwningPlayer(GetSpellAbilityUnit()), PLAYER_STATE_RESOURCE_GOLD, ( GetPlayerState(GetOwningPlayer(GetSpellAbilityUnit()), PLAYER_STATE_RESOURCE_GOLD) - 50 ) )
            call DisplayTextToForce( GetForceOfPlayer(GetOwningPlayer(GetSpellAbilityUnit())), ( "|cffffcc00Spy Message:|r Enemie's food is approximately " + ( I2S(( ( GetPlayerState(GetOwningPlayer(GetSpellTargetUnit()), PLAYER_STATE_RESOURCE_FOOD_USED) - 5 ) + GetRandomInt(0, 10) )) + "." ) ) )
        endif
    endif
endfunction

//===========================================================================
function InitTrig_Spy takes nothing returns nothing
    set gg_trg_Spy = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_Spy, EVENT_PLAYER_UNIT_SPELL_EFFECT )
    call TriggerAddCondition( gg_trg_Spy, Condition( function Trig_Spy_Conditions ) )
    call TriggerAddAction( gg_trg_Spy, function Trig_Spy_Actions )
endfunction
SpyNew
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Spy (Kobold)
Actions
Unit Group - Add (Casting unit) to SpyUsedUnitGroup
Unit - Remove Spy (Kobold) from (Casting unit)
Spy Copy
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Spy (old)
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
And - All (Conditions) are true
Conditions
(Unit-type of (Target unit of ability being cast)) Not equal to Farm
(Unit-type of (Target unit of ability being cast)) Not equal to Burrow
(Unit-type of (Target unit of ability being cast)) Not equal to Ziggurat
(Unit-type of (Target unit of ability being cast)) Not equal to Spirit Tower
(Unit-type of (Target unit of ability being cast)) Not equal to Nerubian Tower
(Unit-type of (Target unit of ability being cast)) Not equal to Moon Well
(Unit-type of (Target unit of ability being cast)) Not equal to Gnoll Hut
Then - Actions
Unit - Order (Casting unit) to Stop .
Unit - Reset ability cooldowns for (Casting unit) .
Unit - Set mana of (Casting unit) to ((Mana of (Casting unit)) + 100.00)
Game - Display to (Player group((Owner of (Casting unit)))) the text: |cffffcc00Must target food producing building !|r
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of (Casting unit)) Current gold) Less than 50
Then - Actions
Unit - Order (Casting unit) to Stop .
Unit - Reset ability cooldowns for (Casting unit) .
Unit - Set mana of (Casting unit) to ((Mana of (Casting unit)) + 100.00)
Game - Display to (Player group((Owner of (Casting unit)))) the text: |cffffcc00Not enough gold !|r
Else - Actions
Player - Set (Owner of (Casting unit)) . Current gold to (((Owner of (Casting unit)) Current gold) - 50)
Game - Display to (Player group((Owner of (Casting unit)))) the text: (|cffffcc00Spy Message:|r Enemie's food is approximately + ((String(((((Owner of (Target unit of ability being cast)) Food used) - 5) + (Random integer number between 0 and 10)))) + .))
Untitled Trigger 001
Events
Unit - A unit owned by Player 1 (Red) . Gains a level
Conditions
(((Triggering unit) is dead) Equal to True) and ((Item-type of (Last created item)) Equal to Tome of Experience)
Actions
Wait 2 seconds
Untitled Trigger 002
Events
Unit - A unit Dies
Conditions
Mirror Image Equal to Human Archmage - Blizzard
Actions
Do nothing
Untitled Trigger 003
Events
Unit - Warlock 0000 <gen> Sells an item (from shop)
Conditions
(Item-type of (Last created item)) Equal to Tome of Experience
Actions
Do nothing
Top